[apple/file_cmds.git] / chmod / chmod.c

/*	$NetBSD: chmod.c,v 1.20 1998/07/28 05:31:22 mycroft Exp $	*/

/*
 * Copyright (c) 1989, 1993, 1994
 *	The Regents of the University of California.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *	This product includes software developed by the University of
 *	California, Berkeley and its contributors.
 * 4. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 */

#include <sys/cdefs.h>
#ifndef lint
__COPYRIGHT(
"@(#) Copyright (c) 1989, 1993, 1994\n\
	The Regents of the University of California.  All rights reserved.\n");
#endif /* not lint */

#ifndef lint
#if 0
static char sccsid[] = "@(#)chmod.c	8.8 (Berkeley) 4/1/94";
#else
__RCSID("$NetBSD: chmod.c,v 1.20 1998/07/28 05:31:22 mycroft Exp $");
#endif
#endif /* not lint */

#include <sys/types.h>
#include <sys/stat.h>

#include <err.h>
#include <errno.h>
#include <fts.h>
#include <locale.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <limits.h>

int main __P((int, char *[]));
void usage __P((void));

int
main(argc, argv)
	int argc;
	char *argv[];
{
	FTS *ftsp;
	FTSENT *p;
	mode_t *set;
	long val;
	int oct, omode;
	int Hflag, Lflag, Rflag, ch, fflag, fts_options, hflag, rval;
	char *ep, *mode;
	int (*change_mode) __P((const char *, mode_t));

	set = NULL;	/* XXX gcc -Wuninitialized */
	omode = 0;	/* XXX gcc -Wuninitialized */

	(void)setlocale(LC_ALL, "");

	Hflag = Lflag = Rflag = fflag = hflag = 0;
	while ((ch = getopt(argc, argv, "HLPRXfghorstuwx")) != -1)
		switch (ch) {
		case 'H':
			Hflag = 1;
			Lflag = 0;
			break;
		case 'L':
			Lflag = 1;
			Hflag = 0;
			break;
		case 'P':
			Hflag = Lflag = 0;
			break;
		case 'R':
			Rflag = 1;
			break;
		case 'f':		/* XXX: undocumented. */
			fflag = 1;
			break;
#ifndef __APPLE__
		case 'h':
			/*
			 * In System V (and probably POSIX.2) the -h option
			 * causes chmod to change the mode of the symbolic
			 * link.  4.4BSD's symbolic links didn't have modes,
			 * so it was an undocumented noop.  In NetBSD 1.3,
			 * lchmod(2) is introduced and this option does real
			 * work.
			 */
			hflag = 1;
			break;
#endif
		/*
		 * XXX
		 * "-[rwx]" are valid mode commands.  If they are the entire
		 * argument, getopt has moved past them, so decrement optind.
		 * Regardless, we're done argument processing.
		 */
		case 'g': case 'o': case 'r': case 's':
		case 't': case 'u': case 'w': case 'X': case 'x':
			if (argv[optind - 1][0] == '-' &&
			    argv[optind - 1][1] == ch &&
			    argv[optind - 1][2] == '\0')
				--optind;
			goto done;
		case '?':
		default:
			usage();
		}
done:	argv += optind;
	argc -= optind;

	if (argc < 2)
		usage();

	fts_options = FTS_PHYSICAL;
	if (Rflag) {
		if (hflag)
			errx(1,
		"the -R and -h options may not be specified together.");
		if (Hflag)
			fts_options |= FTS_COMFOLLOW;
		if (Lflag) {
			fts_options &= ~FTS_PHYSICAL;
			fts_options |= FTS_LOGICAL;
		}
	}
#ifndef __APPLE__
	if (hflag)
		change_mode = lchmod;
	else
            change_mode = chmod;
#else
        change_mode = chmod;
#endif

	mode = *argv;
	if (*mode >= '0' && *mode <= '7') {
		errno = 0;
		val = strtol(mode, &ep, 8);
		if (val > INT_MAX || val < 0)
			errno = ERANGE;
		if (errno)
			err(1, "invalid file mode: %s", mode);
		if (*ep)
			errx(1, "invalid file mode: %s", mode);
		omode = val;
		oct = 1;
	} else {
		if ((set = setmode(mode)) == NULL)
			errx(1, "invalid file mode: %s", mode);
		oct = 0;
	}

	if ((ftsp = fts_open(++argv, fts_options, 0)) == NULL)
		err(1, argv[0]);
	for (rval = 0; (p = fts_read(ftsp)) != NULL;) {
		switch (p->fts_info) {
		case FTS_D:
			if (!Rflag)
				(void)fts_set(ftsp, p, FTS_SKIP);
			break;
		case FTS_DNR:			/* Warn, chmod, continue. */
			warnx("%s: %s", p->fts_path, strerror(p->fts_errno));
			rval = 1;
			break;
		case FTS_DP:			/* Already changed at FTS_D. */
			continue;
		case FTS_ERR:			/* Warn, continue. */
		case FTS_NS:
			warnx("%s: %s", p->fts_path, strerror(p->fts_errno));
			rval = 1;
			continue;
		case FTS_SL:			/* Ignore. */
		case FTS_SLNONE:
			/*
			 * The only symlinks that end up here are ones that
			 * don't point to anything and ones that we found
			 * doing a physical walk.
			 */
#ifndef __APPLE__
			if (!hflag)
				continue;
			/* else */
			/* FALLTHROUGH */
#else
			continue;
#endif
		default:
			break;
		}
		if ((*change_mode)(p->fts_accpath, oct ? omode :
		    getmode(set, p->fts_statp->st_mode)) && !fflag) {
			warn("%s", p->fts_path);
			rval = 1;
		}
	}
	if (errno)
		err(1, "fts_read");
	exit(rval);
	/* NOTREACHED */
}

void
usage()
{
#ifndef __APPLE__
	(void)fprintf(stderr,
	    "usage: chmod [-R [-H | -L | -P]] [-h] mode file ...\n");
#else
	(void)fprintf(stderr,
	    "usage: chmod [-R [-H | -L | -P]] mode file ...\n");
#endif
	exit(1);
	/* NOTREACHED */
}
Commit	Line	Data
44a7a5ab A	1	/* $NetBSD: chmod.c,v 1.20 1998/07/28 05:31:22 mycroft Exp $ */
	2
	3	/*
	4	* Copyright (c) 1989, 1993, 1994
	5	* The Regents of the University of California. All rights reserved.
	6	*
	7	* Redistribution and use in source and binary forms, with or without
	8	* modification, are permitted provided that the following conditions
	9	* are met:
	10	* 1. Redistributions of source code must retain the above copyright
	11	* notice, this list of conditions and the following disclaimer.
	12	* 2. Redistributions in binary form must reproduce the above copyright
	13	* notice, this list of conditions and the following disclaimer in the
	14	* documentation and/or other materials provided with the distribution.
	15	* 3. All advertising materials mentioning features or use of this software
	16	* must display the following acknowledgement:
	17	* This product includes software developed by the University of
	18	* California, Berkeley and its contributors.
	19	* 4. Neither the name of the University nor the names of its contributors
	20	* may be used to endorse or promote products derived from this software
	21	* without specific prior written permission.
	22	*
	23	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
	24	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	25	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	26	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
	27	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	28	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	29	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	30	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	31	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	32	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	33	* SUCH DAMAGE.
	34	*/
	35
	36	#include <sys/cdefs.h>
	37	#ifndef lint
	38	__COPYRIGHT(
	39	"@(#) Copyright (c) 1989, 1993, 1994\n\
	40	The Regents of the University of California. All rights reserved.\n");
	41	#endif /* not lint */
	42
	43	#ifndef lint
	44	#if 0
	45	static char sccsid[] = "@(#)chmod.c 8.8 (Berkeley) 4/1/94";
	46	#else
	47	__RCSID("$NetBSD: chmod.c,v 1.20 1998/07/28 05:31:22 mycroft Exp $");
	48	#endif
	49	#endif /* not lint */
	50
	51	#include <sys/types.h>
	52	#include <sys/stat.h>
	53
	54	#include <err.h>
	55	#include <errno.h>
	56	#include <fts.h>
	57	#include <locale.h>
	58	#include <stdio.h>
	59	#include <stdlib.h>
	60	#include <string.h>
	61	#include <unistd.h>
	62	#include <limits.h>
	63
	64	int main __P((int, char *[]));
65	void usage __P((void));
66
67	int
68	main(argc, argv)
69	int argc;
70	char *argv[];
71	{
72	FTS *ftsp;
73	FTSENT *p;
74	mode_t *set;
75	long val;
76	int oct, omode;
77	int Hflag, Lflag, Rflag, ch, fflag, fts_options, hflag, rval;
78	char ep, mode;
79	int (change_mode) __P((const char , mode_t));
80
81	set = NULL; /* XXX gcc -Wuninitialized */
82	omode = 0; /* XXX gcc -Wuninitialized */
83
84	(void)setlocale(LC_ALL, "");
85
86	Hflag = Lflag = Rflag = fflag = hflag = 0;
87	while ((ch = getopt(argc, argv, "HLPRXfghorstuwx")) != -1)
88	switch (ch) {
89	case 'H':
90	Hflag = 1;
91	Lflag = 0;
92	break;
93	case 'L':
94	Lflag = 1;
95	Hflag = 0;
96	break;
97	case 'P':
98	Hflag = Lflag = 0;
99	break;
100	case 'R':
101	Rflag = 1;
102	break;
103	case 'f': /* XXX: undocumented. */
104	fflag = 1;
105	break;
106	#ifndef __APPLE__
107	case 'h':
108	/*
109	* In System V (and probably POSIX.2) the -h option
110	* causes chmod to change the mode of the symbolic
111	* link. 4.4BSD's symbolic links didn't have modes,
112	* so it was an undocumented noop. In NetBSD 1.3,
113	* lchmod(2) is introduced and this option does real
114	* work.
115	*/
116	hflag = 1;
117	break;
118	#endif
119	/*
120	* XXX
121	* "-[rwx]" are valid mode commands. If they are the entire
122	* argument, getopt has moved past them, so decrement optind.
123	* Regardless, we're done argument processing.
124	*/
125	case 'g': case 'o': case 'r': case 's':
126	case 't': case 'u': case 'w': case 'X': case 'x':
127	if (argv[optind - 1][0] == '-' &&
128	argv[optind - 1][1] == ch &&
129	argv[optind - 1][2] == '\0')
130	--optind;
131	goto done;
132	case '?':
133	default:
134	usage();
135	}
136	done: argv += optind;
137	argc -= optind;
138
139	if (argc < 2)
140	usage();
141
142	fts_options = FTS_PHYSICAL;
143	if (Rflag) {
144	if (hflag)
145	errx(1,
146	"the -R and -h options may not be specified together.");
147	if (Hflag)
148	fts_options \|= FTS_COMFOLLOW;
149	if (Lflag) {
150	fts_options &= ~FTS_PHYSICAL;
151	fts_options \|= FTS_LOGICAL;
152	}
153	}
154	#ifndef __APPLE__
155	if (hflag)
156	change_mode = lchmod;
157	else
158	change_mode = chmod;
159	#else
160	change_mode = chmod;
161	#endif
162
163	mode = *argv;
164	if (mode >= '0' && mode <= '7') {
165	errno = 0;
166	val = strtol(mode, &ep, 8);
167	if (val > INT_MAX \|\| val < 0)
168	errno = ERANGE;
169	if (errno)
170	err(1, "invalid file mode: %s", mode);
171	if (*ep)
172	errx(1, "invalid file mode: %s", mode);
173	omode = val;
174	oct = 1;
175	} else {
176	if ((set = setmode(mode)) == NULL)
177	errx(1, "invalid file mode: %s", mode);
178	oct = 0;
179	}
180
181	if ((ftsp = fts_open(++argv, fts_options, 0)) == NULL)
182	err(1, argv[0]);
183	for (rval = 0; (p = fts_read(ftsp)) != NULL;) {
184	switch (p->fts_info) {
185	case FTS_D:
186	if (!Rflag)
187	(void)fts_set(ftsp, p, FTS_SKIP);
188	break;
189	case FTS_DNR: /* Warn, chmod, continue. */
190	warnx("%s: %s", p->fts_path, strerror(p->fts_errno));
191	rval = 1;
192	break;
193	case FTS_DP: /* Already changed at FTS_D. */
194	continue;
195	case FTS_ERR: /* Warn, continue. */
196	case FTS_NS:
197	warnx("%s: %s", p->fts_path, strerror(p->fts_errno));
198	rval = 1;
199	continue;
200	case FTS_SL: /* Ignore. */
201	case FTS_SLNONE:
202	/*
203	* The only symlinks that end up here are ones that
204	* don't point to anything and ones that we found
205	* doing a physical walk.
206	*/
207	#ifndef __APPLE__
208	if (!hflag)
209	continue;
210	/* else */
211	/* FALLTHROUGH */
212	#else
213	continue;
214	#endif
215	default:
216	break;
217	}
218	if ((*change_mode)(p->fts_accpath, oct ? omode :
219	getmode(set, p->fts_statp->st_mode)) && !fflag) {
220	warn("%s", p->fts_path);
221	rval = 1;
222	}
223	}
224	if (errno)
225	err(1, "fts_read");
226	exit(rval);
227	/* NOTREACHED */
228	}
229
230	void
231	usage()
232	{
233	#ifndef __APPLE__
234	(void)fprintf(stderr,
235	"usage: chmod [-R [-H \| -L \| -P]] [-h] mode file ...\n");
236	#else
237	(void)fprintf(stderr,
238	"usage: chmod [-R [-H \| -L \| -P]] mode file ...\n");
239	#endif
240	exit(1);
241	/* NOTREACHED */
242	}