Insecure Inherited Permissions Affecting guix package, versions [0,]

Affected versions of this package are vulnerable to Insecure Inherited Permissions due to improper handling of file metadata for setuid and setgid programs during the build output process. An attacker can escalate privileges by exploiting the accessible build outputs before metadata concerns are addressed.

This vulnerability can be mitigated by performing certain pull, reconfigure, and restart actions within the product.

(use-modules (guix)
             (srfi srfi-34))

(define maybe-setuid-file
  ;; Attempt to create a setuid file in the store, with one of the build
  ;; users as its owner.
  (computed-file "maybe-setuid-file"
                 #~(begin
                     (call-with-output-file #$output (const #t))
                     (chmod #$output #o6000)

                     ;; Failing causes guix-daemon to copy the output from
                     ;; its temporary location back to the store.
                     (exit 1))))

(with-store store
  (let* ((drv (run-with-store store
                (lower-object maybe-setuid-file)))
         (out (derivation->output-path drv)))
    (guard (c (#t
               (if (zero? (logand #o6000 (stat:perms (stat out))))
                   (format #t "~a is not setuid: your system is not \
vulnerable.~%"
                           out)
                   (format #t "~a is setuid: YOUR SYSTEM IS VULNERABLE.

Run 'guix gc' to remove that file and upgrade.~%"
                           out))))
      (build-things store (list (derivation-file-name drv))))))

• Git Commit
• Git Commit
• Security Advisory