mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-31 14:56:54 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

file-systems: Always do recursive bind mounts.

Browse source 
Fixes <https://issues.guix.gnu.org/59185>.

* guix/build/syscalls.scm (MS_REC): New variable.
* gnu/build/file-systems.scm (mount-flags->bit-mask): Set MS_REC bit when
bind-mounting.
This commit is contained in:
Ricardo Wurmus 2022-11-19 23:16:52 +01:00
parent 4416e94e51
commit c585b4bc68
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
2 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
gnu/build/file-systems.scm
View file

@ -1127,7 +1127,7 @@ (define (mount-flags->bit-mask flags)
(('read-only rest ...) (('read-only rest ...)
(logior MS_RDONLY (loop rest))) (logior MS_RDONLY (loop rest)))
(('bind-mount rest ...) (('bind-mount rest ...)
(logior MS_BIND (loop rest))) (logior MS_REC (logior MS_BIND (loop rest))))
(('no-suid rest ...) (('no-suid rest ...)
(logior MS_NOSUID (loop rest))) (logior MS_NOSUID (loop rest)))
(('no-dev rest ...) (('no-dev rest ...)

2
guix/build/syscalls.scm
View file

@ -51,6 +51,7 @@ (define-module (guix build syscalls)
MS_RELATIME MS_RELATIME
MS_BIND MS_BIND
MS_MOVE MS_MOVE
MS_REC
MS_SHARED MS_SHARED
MS_LAZYTIME MS_LAZYTIME
MNT_FORCE MNT_FORCE
@ -541,6 +542,7 @@ (define MS_NOATIME 1024)
(define MS_NODIRATIME 2048) (define MS_NODIRATIME 2048)
(define MS_BIND 4096) (define MS_BIND 4096)
(define MS_MOVE 8192) (define MS_MOVE 8192)
(define MS_REC 16384)
(define MS_SHARED 1048576) (define MS_SHARED 1048576)
(define MS_RELATIME 2097152) (define MS_RELATIME 2097152)
(define MS_STRICTATIME 16777216) (define MS_STRICTATIME 16777216)