Mercurial > hg > octave-lojdl > gnulib-hg
annotate lib/lchown.c @ 1378:5b37c6d8cd35
Fix braino: check S_ISLNK only if lstat succeeds.
| author | Jim Meyering <jim@meyering.net> |
|---|---|
| date | Sun, 24 May 1998 14:00:03 +0000 |
| parents | 0f6f593b4f5a |
| children | 4981bd43506c |
| rev | line source |
|---|---|
| 1365 | 1 /* Provide a stub lchown function for systems that lack it. |
| 2 Copyright (C) 1998 Free Software Foundation, Inc. | |
| 3 | |
| 4 This program is free software; you can redistribute it and/or modify | |
| 5 it under the terms of the GNU General Public License as published by | |
| 6 the Free Software Foundation; either version 2, or (at your option) | |
| 7 any later version. | |
| 8 | |
| 9 This program is distributed in the hope that it will be useful, | |
| 10 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 12 GNU General Public License for more details. | |
| 13 | |
| 14 You should have received a copy of the GNU General Public License | |
| 15 along with this program; if not, write to the Free Software Foundation, | |
| 16 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ | |
| 17 | |
| 18 /* written by Jim Meyering */ | |
| 19 | |
| 20 #include <config.h> | |
| 21 | |
| 22 #include <sys/types.h> | |
| 23 #include <sys/stat.h> | |
| 24 #include <errno.h> | |
| 25 #ifndef errno | |
| 26 extern int errno; | |
| 27 #endif | |
| 28 | |
| 29 /* Work just like chown, except when FILE is a symbolic link. | |
| 30 In that case, set errno to ENOSYS and return -1. */ | |
| 31 | |
| 32 int | |
| 1377 | 33 lchown (const char *file, uid_t uid, gid_t gid) |
| 1365 | 34 { |
| 35 struct stat stats; | |
| 36 | |
|
1378
5b37c6d8cd35
Fix braino: check S_ISLNK only if lstat succeeds.
Jim Meyering <jim@meyering.net>
parents:
1377
diff
changeset
|
37 if (lstat (file, &stats) == 0 && S_ISLNK (stats.st_mode)) |
| 1365 | 38 { |
| 39 errno = ENOSYS; | |
| 40 return -1; | |
| 41 } | |
| 42 | |
| 43 return chown (file, uid, gid); | |
| 44 } |