The test case below relies on /etc/groups and similar info that is not available in chroot builds, so skip it. --- scheme48-1.9/scheme/posix/check.scm 2013-05-11 21:55:36.000000000 +0200 +++ scheme48-1.9/scheme/posix/check.scm 2013-05-11 21:55:40.000000000 +0200 @@ -229,29 +229,7 @@ ; This assumes that we are not running as root and that / is owned by root. -(define-test-case users&groups posix-core-tests - (let ((my-info (get-file-info directory-name)) - (root-info (get-file-info "/"))) - (let ((my-user (user-id->user-info (file-info-owner my-info))) - (root-user (user-id->user-info (file-info-owner root-info))) - (my-group (group-id->group-info (file-info-group my-info))) - (root-group (group-id->group-info (file-info-group root-info)))) - (let ((my-other-user (name->user-info (user-info-name my-user))) - (my-other-group (name->group-info (group-info-name my-group)))) - (check-that (file-info-owner my-info) - (is user-id=? (user-info-id my-user))) - (check-that (file-info-owner root-info) - (opposite (is user-id=? (user-info-id my-user)))) - (check-that (file-info-group my-info) - (is group-id=? (group-info-id my-group))) - ;; doesn't work reliably - ;; (specifically, if the user is member of wheel) - ;; (check (not (group-id=? (file-info-group root-info) - ;; (group-info-id my-group)))) - (check-that (os-string->string (user-info-name root-user)) - (member-of '("root" - "bin" ; AIX - ))))))) + (define-test-case environment posix-core-tests (let ((env (reverse (environment-alist))))
path: root/gnu/build/linux-container.scm
AgeCommit message (Expand)Author
2019-09-12linux-container: "run-container" scripts shows the container's PID....* gnu/build/linux-container.scm (call-with-container): Add #:process-spawned-hook and honor it. * gnu/system/linux-container.scm (container-script)[script]: Define 'explain' and pass it as #:process-spawned-hook'. Ludovic Courtès
2019-07-06linux-container: Mount a new /dev/pts instance in the container....Fixes <https://bugs.gnu.org/36463>. Reported by Steffen Rytter Postas <nc@scalehost.eu>. * gnu/build/linux-container.scm (mount-file-systems): When /dev/ptmx exists on the host, explicitly mount a new instance of devpts and make /dev/ptmx a symlink to /dev/pts/ptmx. Ludovic Courtès
2019-06-23linux-container: Remove dependency on (guix utils)....Fixes a bug whereby derivations importing (gnu build linux-container), such as the 'bitlbee' and 'tor' services, would depend on the user's (guix config) file, which was pulled as a dependency of (guix utils). As a result, those derivations would vary from user to user. * gnu/build/linux-container.scm (call-with-temporary-directory): New procedure. Ludovic Courtès
2019-04-02linux-container: Make the guest UID and GID a parameter....* gnu/build/linux-container.scm (initialize-user-namespace): Add #:guest-uid and #:guest-gid parameters and honor them. (run-container): Likewise. (call-with-container): Likewise. * tests/containers.scm ("call-with-container, user namespace, guest UID/GID"): New test. Ludovic Courtès