[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/13: build: syscalls: Add additional mount flags.
From: |
David Thompson |
Subject: |
03/13: build: syscalls: Add additional mount flags. |
Date: |
Fri, 26 Jun 2015 00:27:32 +0000 |
davexunit pushed a commit to branch wip-container
in repository guix.
commit a9a11e33b15f537f5e6861cf793e970d723aa9f4
Author: David Thompson <address@hidden>
Date: Sun May 31 21:40:29 2015 -0400
build: syscalls: Add additional mount flags.
* guix/build/syscalls.scm (MS_NOSUID, MS_NODEV, MS_NOEXEC, MS_STRICTATIME):
New variables.
---
guix/build/syscalls.scm | 16 ++++++++++++----
1 files changed, 12 insertions(+), 4 deletions(-)
diff --git a/guix/build/syscalls.scm b/guix/build/syscalls.scm
index 90975e3..72a91a5 100644
--- a/guix/build/syscalls.scm
+++ b/guix/build/syscalls.scm
@@ -27,9 +27,13 @@
#:use-module (ice-9 ftw)
#:export (errno
MS_RDONLY
+ MS_NOSUID
+ MS_NODEV
+ MS_NOEXEC
MS_REMOUNT
MS_BIND
MS_MOVE
+ MS_STRICTATIME
restart-on-EINTR
mount
umount
@@ -146,10 +150,14 @@
entries))))
;; Linux mount flags, from libc's <sys/mount.h>.
-(define MS_RDONLY 1)
-(define MS_REMOUNT 32)
-(define MS_BIND 4096)
-(define MS_MOVE 8192)
+(define MS_RDONLY 1)
+(define MS_NOSUID 2)
+(define MS_NODEV 4)
+(define MS_NOEXEC 8)
+(define MS_REMOUNT 32)
+(define MS_BIND 4096)
+(define MS_MOVE 8192)
+(define MS_STRICTATIME 16777216)
(define mount
(let* ((ptr (dynamic-func "mount" (dynamic-link)))
- branch wip-container created (now bfd304b), David Thompson, 2015/06/25
- 01/13: build: syscalls: Add clone syscall wrapper., David Thompson, 2015/06/25
- 04/13: build: syscalls: Add unmount flags., David Thompson, 2015/06/25
- 02/13: build: syscalls: Add setns syscall wrapper., David Thompson, 2015/06/25
- 03/13: build: syscalls: Add additional mount flags.,
David Thompson <=
- 05/13: build: syscalls: Add mkdtemp!, David Thompson, 2015/06/25
- 06/13: build: syscalls: Add pivot-root., David Thompson, 2015/06/25
- 07/13: utils: Add call-with-temporary-directory., David Thompson, 2015/06/25
- 09/13: gnu: Add Linux container system script., David Thompson, 2015/06/25
- 10/13: gnu: system: Do not activate firmware when activating a container., David Thompson, 2015/06/25
- 08/13: gnu: Add Linux container module., David Thompson, 2015/06/25
- 11/13: gnu: system: Add operating-system-derivation/container., David Thompson, 2015/06/25
- 12/13: scripts: system: Add 'container' subcommand., David Thompson, 2015/06/25
- 13/13: scripts: environment: Add --container option., David Thompson, 2015/06/25