01/01: guix-install.sh: Add the build users to the 'kvm' group.

[guix-commits]

lfam pushed a commit to branch wip-install-sh-kvm
in repository guix.

commit ac2286c31e7d7fcab508956e94d4736e19d65f6f
Author: Leo Famulari <leo@famulari.name>
AuthorDate: Thu Apr 8 18:34:43 2021 -0400

    guix-install.sh: Add the build users to the 'kvm' group.
    
    Fixes <https://bugs.gnu.org/42129>.
    
    * etc/guix-install.sh (sys_create_build_user): If a 'kvm' group exists,
    add it to the guixbuilders' lists of supplementary groups.
---
 etc/guix-install.sh | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/etc/guix-install.sh b/etc/guix-install.sh
index c84e7b7..949ef77 100755
--- a/etc/guix-install.sh
+++ b/etc/guix-install.sh
@@ -330,15 +330,20 @@ sys_create_build_user()
         _msg "${PAS}group <guixbuild> created"
     fi
 
+    if [ $(getent group kvm) ]; then
+        _msg "${INF}group kvm exists and build users will be added to it"
+       local KVMGROUP=,kvm
+    fi
+
     for i in $(seq -w 1 10); do
         if id "guixbuilder${i}" &>/dev/null; then
             _msg "${INF}user is already in the system, reset"
-            usermod -g guixbuild -G guixbuild           \
+            usermod -g guixbuild -G guixbuild${KVMGROUP}     \
                     -d /var/empty -s "$(which nologin)" \
                     -c "Guix build user $i"             \
                     "guixbuilder${i}";
         else
-            useradd -g guixbuild -G guixbuild           \
+            useradd -g guixbuild -G guixbuild${KVMGROUP}     \
                     -d /var/empty -s "$(which nologin)" \
                     -c "Guix build user $i" --system    \
                     "guixbuilder${i}";