diff options
| author | Maxime Devos <maximedevos@telenet.be> | 2021-03-02 18:03:22 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2021-05-07 17:22:52 +0200 |
| commit | 553c82cee924f0bada27f8209c3bcb28be407953 (patch) | |
| tree | 2e789148613bcd9f75958c974e5ebddbe40f66d1 | |
| parent | a242d2d2b2caf2f2bb5430506c9084756b966eca (diff) | |
| download | guile-553c82cee924f0bada27f8209c3bcb28be407953.tar.gz | |
Define `O_NOFOLLOW' and various other flags when supported.
* libguile/filesys.c (scm_init_filesys): Define ‘O_IGNORE_CTTY’,
‘O_NOLINK’, ‘O_NOFOLLOW’, ‘O_PATH’, ‘O_TMPFILE’, ‘O_SHLOCK’,
‘O_EXLOCK’, ‘O_ASYNC’, ‘O_NOATIME’, ‘O_DIRECTORY’, ‘O_CLOEXEC’
and ‘O_DIRECT’ when available.
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
| -rw-r--r-- | libguile/filesys.c | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/libguile/filesys.c b/libguile/filesys.c index 7ca46c8af..6247734e8 100644 --- a/libguile/filesys.c +++ b/libguile/filesys.c @@ -1992,9 +1992,45 @@ scm_init_filesys () #ifdef O_LARGEFILE scm_c_define ("O_LARGEFILE", scm_from_int (O_LARGEFILE)); #endif +#ifdef O_IGNORE_CTTY + scm_c_define ("O_IGNORE_CTTY", scm_from_int (O_IGNORE_CTTY)); +#endif +#ifdef O_NOLINK + scm_c_define ("O_NOLINK", scm_from_int (O_NOLINK)); +#endif #ifdef O_NOTRANS scm_c_define ("O_NOTRANS", scm_from_int (O_NOTRANS)); #endif +#ifdef O_NOFOLLOW + scm_c_define ("O_NOFOLLOW", scm_from_int (O_NOFOLLOW)); +#endif +#ifdef O_PATH + scm_c_define ("O_PATH", scm_from_int (O_PATH)); +#endif +#ifdef O_TMPFILE + scm_c_define ("O_TMPFILE", scm_from_int (O_TMPFILE)); +#endif +#ifdef O_SHLOCK + scm_c_define ("O_SHLOCK", scm_from_int (O_SHLOCK)); +#endif +#ifdef O_EXLOCK + scm_c_define ("O_EXLOCK", scm_from_int (O_EXLOCK)); +#endif +#ifdef O_ASYNC + scm_c_define ("O_ASYNC", scm_from_int (O_ASYNC)); +#endif +#ifdef O_NOATIME + scm_c_define ("O_NOATIME", scm_from_int (O_NOATIME)); +#endif +#ifdef O_DIRECTORY + scm_c_define ("O_DIRECTORY", scm_from_int (O_DIRECTORY)); +#endif +#ifdef O_CLOEXEC + scm_c_define ("O_CLOEXEC", scm_from_int (O_CLOEXEC)); +#endif +#ifdef O_DIRECT + scm_c_define ("O_DIRECT", scm_from_int (O_DIRECT)); +#endif #ifdef F_DUPFD scm_c_define ("F_DUPFD", scm_from_int (F_DUPFD)); |