Mercurial > hg > octave-kai > gnulib-hg
diff lib/write-any-file.c @ 8504:24420da38757
* MODULES.html.sh (File system functions): New module write-any-file.
* modules/write-any-file, lib/write-any-file.c, lib/write-any-file.h:
* m4/write-any-file.m4: New files.
author | Paul Eggert <eggert@cs.ucla.edu> |
---|---|
date | Fri, 23 Mar 2007 17:33:07 +0000 |
parents | |
children | e91286e73129 |
line wrap: on
line diff
new file mode 100644 --- /dev/null +++ b/lib/write-any-file.c @@ -0,0 +1,59 @@ +/* Determine whether we can write any file. + + Copyright (C) 2007 Free Software Foundation, Inc. + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2, or (at your option) + any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software Foundation, + Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. */ + +/* Written by Paul Eggert. */ + +#include <config.h> + +#include "write-any-file.h" + +#if HAVE_PRIV_H +# include <priv.h> +#endif +#include <unistd.h> + +/* Return true if we know that we can write any file, including + writing directories. */ + +bool +can_write_any_file (void) +{ + static bool initialized; + static bool can; + + if (! initialized) + { +#if defined PRIV_EFFECTIVE && defined PRIV_FILE_DAC_WRITE + priv_set_t *pset = priv_allocset (); + if (pset) + { + can = + (getppriv (PRIV_EFFECTIVE, pset) == 0 + && priv_ismember (pset, PRIV_FILE_DAC_WRITE)); + priv_freeset (pset); + } + else +#else + /* In traditional Unix, only root can unlink directories. */ + can = (geteuid () == 0); +#endif + initialized = true; + } + + return can; +}