From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([209.51.188.92]:59673) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1hLBSe-0002ri-85 for guix-patches@gnu.org; Mon, 29 Apr 2019 14:57:09 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1hLBSa-000176-Gm for guix-patches@gnu.org; Mon, 29 Apr 2019 14:57:07 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:54412) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1hLBSY-00016r-KM for guix-patches@gnu.org; Mon, 29 Apr 2019 14:57:03 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1hLBSY-0004xU-Fu for guix-patches@gnu.org; Mon, 29 Apr 2019 14:57:02 -0400 Subject: [bug#35494] [PATCH] file-systems: Support the 'rel-atime' flag. Resent-Message-ID: Received: from eggs.gnu.org ([209.51.188.92]:59570) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1hLBRu-0002ja-FZ for guix-patches@gnu.org; Mon, 29 Apr 2019 14:56:23 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1hLBRs-000113-Bn for guix-patches@gnu.org; Mon, 29 Apr 2019 14:56:22 -0400 Received: from dd26836.kasserver.com ([85.13.145.193]:53862) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1hLBRo-00010G-OF for guix-patches@gnu.org; Mon, 29 Apr 2019 14:56:18 -0400 From: Danny Milosavljevic Date: Mon, 29 Apr 2019 20:56:10 +0200 Message-Id: <20190429185610.14475-1-dannym@scratchpost.org> MIME-Version: 1.0 Content-Transfer-Encoding: quoted-printable List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" To: 35494@debbugs.gnu.org * guix/build/syscalls.scm (MS_RELATIME): New variable. * gnu/build/file-systems.scm (mount-flags->bit-mask): Support it. * doc/guix.texi (File Systems): Document it. --- doc/guix.texi | 9 ++++++--- gnu/build/file-systems.scm | 2 ++ guix/build/syscalls.scm | 2 ++ 3 files changed, 10 insertions(+), 3 deletions(-) diff --git a/doc/guix.texi b/doc/guix.texi index fcee57d9cd..20c9b570c9 100644 --- a/doc/guix.texi +++ b/doc/guix.texi @@ -10756,9 +10756,12 @@ corresponding device mapping established. This is a list of symbols denoting mount flags. Recognized flags include @code{read-only}, @code{bind-mount}, @code{no-dev} (disallow access to special files), @code{no-suid} (ignore setuid and setgid -bits), @code{no-atime} (do not update file access times), and @code{no-e= xec} -(disallow program execution). @xref{Mount-Unmount-Remount,,, libc, The = GNU C -Library Reference Manual}, for more information on these flags. +bits), @code{no-atime} (do not update file access times), +@code{rel-atime} (update file access time minimally), and +@code{no-exec} (disallow program execution). + +@xref{Mount-Unmount-Remount,,, libc, The GNU C Library Reference Manual}= , +for more information on these flags. =20 @item @code{options} (default: @code{#f}) This is either @code{#f}, or a string denoting mount options passed to t= he diff --git a/gnu/build/file-systems.scm b/gnu/build/file-systems.scm index 8bb10d574d..06fdf0ccd8 100644 --- a/gnu/build/file-systems.scm +++ b/gnu/build/file-systems.scm @@ -577,6 +577,8 @@ corresponds to the symbols listed in FLAGS." (logior MS_NOEXEC (loop rest))) (('no-atime rest ...) (logior MS_NOATIME (loop rest))) + (('rel-atime rest ...) + (logior MS_RELATIME (loop rest))) (() 0)))) =20 diff --git a/guix/build/syscalls.scm b/guix/build/syscalls.scm index 3316dc8dc5..5039003bcb 100644 --- a/guix/build/syscalls.scm +++ b/guix/build/syscalls.scm @@ -40,6 +40,7 @@ MS_NOEXEC MS_REMOUNT MS_NOATIME + MS_RELATIME MS_BIND MS_MOVE MS_STRICTATIME @@ -455,6 +456,7 @@ the returned procedure is called." (define MS_NOATIME 1024) (define MS_BIND 4096) (define MS_MOVE 8192) +(define MS_RELATIME 2097152) (define MS_STRICTATIME 16777216) =20 (define MNT_FORCE 1)