Mercurial > hg > octave-nkf > gnulib-hg
changeset 1365:8a51920b9a22
.
author | Jim Meyering <jim@meyering.net> |
---|---|
date | Tue, 19 May 1998 15:06:49 +0000 |
parents | 763891cf8cfd |
children | 645e6fea2fce |
files | lib/lchown.c |
diffstat | 1 files changed, 49 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
new file mode 100644 --- /dev/null +++ b/lib/lchown.c @@ -0,0 +1,49 @@ +/* Provide a stub lchown function for systems that lack it. + Copyright (C) 1998 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ + +/* written by Jim Meyering */ + +#include <config.h> + +/* Disable the definition of lchown to rpl_lchown (from config.h) in this + file. Otherwise, we'd get conflicting prototypes for rpl_lchown on + most systems. */ +#undef lchown + +#include <sys/types.h> +#include <sys/stat.h> +#include <errno.h> +#ifndef errno +extern int errno; +#endif + +/* Work just like chown, except when FILE is a symbolic link. + In that case, set errno to ENOSYS and return -1. */ + +int +rpl_lchown (const chat *file, uid_t uid, gid_t gid) +{ + struct stat stats; + + if (lstat (file, &stats) && S_ISLNK (stats.st_mode)) + { + errno = ENOSYS; + return -1; + } + + return chown (file, uid, gid); +}