(change_file_mode): Save errno from a possibly failed chown,
[platform/upstream/coreutils.git] / src / chmod.c
1 /* chmod -- change permission modes of files
2    Copyright (C) 89, 90, 91, 1995-2000 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 David MacKenzie <djm@gnu.ai.mit.edu> */
19
20 #include <config.h>
21 #include <stdio.h>
22 #include <getopt.h>
23 #include <sys/types.h>
24
25 #include "system.h"
26 #include "error.h"
27 #include "filemode.h"
28 #include "modechange.h"
29 #include "savedir.h"
30
31 /* The official name of this program (e.g., no `g' prefix).  */
32 #define PROGRAM_NAME "chmod"
33
34 #define AUTHORS "David MacKenzie"
35
36 enum Change_status
37 {
38   CH_SUCCEEDED,
39   CH_FAILED,
40   CH_NO_CHANGE_REQUESTED
41 };
42
43 enum Verbosity
44 {
45   /* Print a message for each file that is processed.  */
46   V_high,
47
48   /* Print a message for each file whose attributes we change.  */
49   V_changes_only,
50
51   /* Do not be verbose.  This is the default. */
52   V_off
53 };
54
55 void strip_trailing_slashes ();
56
57 static int change_dir_mode PARAMS ((const char *dir,
58                                     const struct mode_change *changes,
59                                     const struct stat *statp));
60
61 /* The name the program was run with. */
62 char *program_name;
63
64 /* If nonzero, change the modes of directories recursively. */
65 static int recurse;
66
67 /* If nonzero, force silence (no error messages). */
68 static int force_silent;
69
70 /* Level of verbosity.  */
71 static enum Verbosity verbosity = V_off;
72
73 /* The argument to the --reference option.  Use the owner and group IDs
74    of this file.  This file must exist.  */
75 static char *reference_file;
76
77 /* For long options that have no equivalent short option, use a
78    non-character as a pseudo short option, starting with CHAR_MAX + 1.  */
79 enum
80 {
81   REFERENCE_FILE_OPTION = CHAR_MAX + 1
82 };
83
84 static struct option const long_options[] =
85 {
86   {"recursive", no_argument, 0, 'R'},
87   {"changes", no_argument, 0, 'c'},
88   {"silent", no_argument, 0, 'f'},
89   {"quiet", no_argument, 0, 'f'},
90   {"reference", required_argument, 0, REFERENCE_FILE_OPTION},
91   {"verbose", no_argument, 0, 'v'},
92   {GETOPT_HELP_OPTION_DECL},
93   {GETOPT_VERSION_OPTION_DECL},
94   {0, 0, 0, 0}
95 };
96
97 /* Tell the user how/if the MODE of FILE has been changed.
98    CHANGED describes what (if anything) has happened. */
99
100 static void
101 describe_change (const char *file, mode_t mode,
102                  enum Change_status changed)
103 {
104   char perms[11];               /* "-rwxrwxrwx" ls-style modes. */
105   const char *fmt;
106
107   mode_string (mode, perms);
108   perms[10] = '\0';             /* `mode_string' does not null terminate. */
109   switch (changed)
110     {
111     case CH_SUCCEEDED:
112       fmt = _("mode of %s changed to %04lo (%s)\n");
113       break;
114     case CH_FAILED:
115       fmt = _("failed to change mode of %s to %04lo (%s)\n");
116       break;
117     case CH_NO_CHANGE_REQUESTED:
118       fmt = _("mode of %s retained as %04lo (%s)\n");
119       break;
120     default:
121       abort ();
122     }
123   printf (fmt, file, (unsigned long) (mode & CHMOD_MODE_BITS), &perms[1]);
124 }
125
126 /* Change the mode of FILE according to the list of operations CHANGES.
127    If DEREF_SYMLINK is nonzero and FILE is a symbolic link, change the
128    mode of the referenced file.  If DEREF_SYMLINK is zero, ignore symbolic
129    links.  Return 0 if successful, 1 if errors occurred. */
130
131 static int
132 change_file_mode (const char *file, const struct mode_change *changes,
133                   const int deref_symlink)
134 {
135   struct stat file_stats;
136   mode_t newmode;
137   int errors = 0;
138
139   if (lstat (file, &file_stats))
140     {
141       if (force_silent == 0)
142         error (0, errno, "%s", file);
143       return 1;
144     }
145 #ifdef S_ISLNK
146   if (S_ISLNK (file_stats.st_mode))
147     {
148       if (! deref_symlink)
149         return 0;
150       else
151         if (stat (file, &file_stats))
152           {
153             if (force_silent == 0)
154               error (0, errno, "%s", file);
155             return 1;
156           }
157     }
158 #endif
159
160   newmode = mode_adjust (file_stats.st_mode, changes);
161
162   if (newmode != (file_stats.st_mode & CHMOD_MODE_BITS))
163     {
164       int fail = chmod (file, newmode);
165       int saved_errno = errno;
166
167       if (verbosity == V_high || (verbosity == V_changes_only && !fail))
168         describe_change (file, newmode, (fail ? CH_FAILED : CH_SUCCEEDED));
169
170       if (fail)
171         {
172           if (force_silent == 0)
173             error (0, saved_errno, "%s", file);
174           errors = 1;
175         }
176     }
177   else if (verbosity == V_high)
178     describe_change (file, newmode, CH_NO_CHANGE_REQUESTED);
179
180   if (recurse && S_ISDIR (file_stats.st_mode))
181     errors |= change_dir_mode (file, changes, &file_stats);
182   return errors;
183 }
184
185 /* Recursively change the modes of the files in directory DIR
186    according to the list of operations CHANGES.
187    STATP points to the results of lstat on DIR.
188    Return 0 if successful, 1 if errors occurred. */
189
190 static int
191 change_dir_mode (const char *dir, const struct mode_change *changes,
192                  const struct stat *statp)
193 {
194   char *name_space, *namep;
195   char *path;                   /* Full path of each entry to process. */
196   unsigned dirlength;           /* Length of DIR and '\0'. */
197   unsigned filelength;          /* Length of each pathname to process. */
198   unsigned pathlength;          /* Bytes allocated for `path'. */
199   int errors = 0;
200
201   name_space = savedir (dir, statp->st_size);
202   if (name_space == NULL)
203     {
204       if (force_silent == 0)
205         error (0, errno, "%s", dir);
206       return 1;
207     }
208
209   dirlength = strlen (dir) + 1; /* + 1 is for the trailing '/'. */
210   pathlength = dirlength + 1;
211   /* Give `path' a dummy value; it will be reallocated before first use. */
212   path = xmalloc (pathlength);
213   strcpy (path, dir);
214   path[dirlength - 1] = '/';
215
216   for (namep = name_space; *namep; namep += filelength - dirlength)
217     {
218       filelength = dirlength + strlen (namep) + 1;
219       if (filelength > pathlength)
220         {
221           pathlength = filelength * 2;
222           path = xrealloc (path, pathlength);
223         }
224       strcpy (path + dirlength, namep);
225       errors |= change_file_mode (path, changes, 0);
226     }
227   free (path);
228   free (name_space);
229   return errors;
230 }
231
232 void
233 usage (int status)
234 {
235   if (status != 0)
236     fprintf (stderr, _("Try `%s --help' for more information.\n"),
237              program_name);
238   else
239     {
240       printf (_("\
241 Usage: %s [OPTION]... MODE[,MODE]... FILE...\n\
242   or:  %s [OPTION]... OCTAL-MODE FILE...\n\
243   or:  %s [OPTION]... --reference=RFILE FILE...\n\
244 "),
245               program_name, program_name, program_name);
246       printf (_("\
247 Change the mode of each FILE to MODE.\n\
248 \n\
249   -c, --changes           like verbose but report only when a change is made\n\
250   -f, --silent, --quiet   suppress most error messages\n\
251   -v, --verbose           output a diagnostic for every file processed\n\
252       --reference=RFILE   use RFILE's mode instead of MODE values\n\
253   -R, --recursive         change files and directories recursively\n\
254       --help              display this help and exit\n\
255       --version           output version information and exit\n\
256 \n\
257 Each MODE is one or more of the letters ugoa, one of the symbols +-= and\n\
258 one or more of the letters rwxXstugo.\n\
259 "));
260       puts (_("\nReport bugs to <bug-fileutils@gnu.org>."));
261     }
262   exit (status);
263 }
264
265 /* Parse the ASCII mode given on the command line into a linked list
266    of `struct mode_change' and apply that to each file argument. */
267
268 int
269 main (int argc, char **argv)
270 {
271   struct mode_change *changes;
272   int errors = 0;
273   int modeind = 0;              /* Index of the mode argument in `argv'. */
274   int thisind;
275   int c;
276
277   program_name = argv[0];
278   setlocale (LC_ALL, "");
279   bindtextdomain (PACKAGE, LOCALEDIR);
280   textdomain (PACKAGE);
281
282   atexit (close_stdout);
283
284   recurse = force_silent = 0;
285
286   while (1)
287     {
288       thisind = optind ? optind : 1;
289
290       c = getopt_long (argc, argv, "RcfvrwxXstugoa,+-=", long_options, NULL);
291       if (c == -1)
292         break;
293
294       switch (c)
295         {
296         case 0:
297           break;
298         case 'r':
299         case 'w':
300         case 'x':
301         case 'X':
302         case 's':
303         case 't':
304         case 'u':
305         case 'g':
306         case 'o':
307         case 'a':
308         case ',':
309         case '+':
310         case '-':
311         case '=':
312           if (modeind != 0 && modeind != thisind)
313             error (1, 0, _("invalid mode"));
314           modeind = thisind;
315           break;
316         case REFERENCE_FILE_OPTION:
317           reference_file = optarg;
318           break;
319         case 'R':
320           recurse = 1;
321           break;
322         case 'c':
323           verbosity = V_changes_only;
324           break;
325         case 'f':
326           force_silent = 1;
327           break;
328         case 'v':
329           verbosity = V_high;
330           break;
331         case_GETOPT_HELP_CHAR;
332         case_GETOPT_VERSION_CHAR (PROGRAM_NAME, AUTHORS);
333         default:
334           usage (1);
335         }
336     }
337
338   if (modeind == 0 && reference_file == NULL)
339     modeind = optind++;
340
341   if (optind >= argc)
342     {
343       error (0, 0, _("too few arguments"));
344       usage (1);
345     }
346
347   changes = (reference_file ? mode_create_from_ref (reference_file)
348              : mode_compile (argv[modeind], MODE_MASK_ALL));
349
350   if (changes == MODE_INVALID)
351     error (1, 0, _("invalid mode"));
352   else if (changes == MODE_MEMORY_EXHAUSTED)
353     error (1, 0, _("virtual memory exhausted"));
354   else if (changes == MODE_BAD_REFERENCE)
355     error (1, errno, "%s", reference_file);
356
357   for (; optind < argc; ++optind)
358     {
359       strip_trailing_slashes (argv[optind]);
360       errors |= change_file_mode (argv[optind], changes, 1);
361     }
362
363   exit (errors);
364 }