04/10: guix-install.sh: Check the service 'nscd' and suggest it.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit b2683a2bed424f58722c9c17c9582e3e2e19d9a3
Author: zimoun <zimon.toutoune@gmail.com>
AuthorDate: Tue Oct 13 19:12:03 2020 +0200

    guix-install.sh: Check the service 'nscd' and suggest it.
    
    Fixes <https://bugs.gnu.org/43744>.
    
    * etc/guix-install.sh (chk_sys_nscd): New function to check if the service
    'nscd is running, otherwise suggest to install distribution-wide.
    
    Signed-off-by: Ludovic Courtès <ludo@gnu.org>
---
 etc/guix-install.sh | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/etc/guix-install.sh b/etc/guix-install.sh
index f51a1b6..7f0dd00 100755
--- a/etc/guix-install.sh
+++ b/etc/guix-install.sh
@@ -55,6 +55,7 @@ REQUIRE=(
 
 PAS=$'[ \033[32;1mPASS\033[0m ] '
 ERR=$'[ \033[31;1mFAIL\033[0m ] '
+WAR=$'[ \033[33;1mWARN\033[0m ] '
 INF="[ INFO ] "
 
 DEBUG=0
@@ -200,6 +201,19 @@ chk_sys_arch()
     ARCH_OS="${arch}-${os}"
 }
 
+chk_sys_nscd()
+{ # Check if nscd is up and suggest to start it or install it
+    if [ "$(type -P pidof)" ]; then
+        if [ ! "$(pidof nscd)" ]; then
+            _msg "${WAR}We recommend installing and/or starting your 
distribution 'nscd' service"
+            _msg "${WAR}Please read 'info guix \"Application Setup\"' about 
\"Name Service Switch\""
+        fi
+    else
+        _msg "${INF}We cannot determine if your distribution 'nscd' service is 
running"
+        _msg "${INF}Please read 'info guix \"Application Setup\"' about \"Name 
Service Switch\""
+    fi
+}
+
 # 
------------------------------------------------------------------------------
 #+MAIN
 
@@ -523,6 +537,7 @@ main()
     chk_gpg_keyring
     chk_init_sys
     chk_sys_arch
+    chk_sys_nscd
 
     _msg "${INF}system is ${ARCH_OS}"