chown.c revision 24446
1/*
2 * Copyright (c) 1988, 1993, 1994
3 *	The Regents of the University of California.  All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 *    must display the following acknowledgement:
15 *	This product includes software developed by the University of
16 *	California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 *    may be used to endorse or promote products derived from this software
19 *    without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
32 */
33
34#ifndef lint
35static char copyright[] =
36"@(#) Copyright (c) 1988, 1993, 1994\n\
37	The Regents of the University of California.  All rights reserved.\n";
38#endif /* not lint */
39
40#ifndef lint
41static char sccsid[] = "@(#)chown.c	8.8 (Berkeley) 4/4/94";
42#endif /* not lint */
43
44#include <sys/param.h>
45#include <sys/stat.h>
46
47#include <ctype.h>
48#include <dirent.h>
49#include <err.h>
50#include <errno.h>
51#include <fts.h>
52#include <grp.h>
53#include <pwd.h>
54#include <stdio.h>
55#include <stdlib.h>
56#include <string.h>
57#include <unistd.h>
58
59void	a_gid __P((char *));
60void	a_uid __P((char *));
61void	chownerr __P((char *));
62u_long	id __P((char *, char *));
63void	usage __P((void));
64
65uid_t uid;
66gid_t gid;
67int Rflag, ischown, fflag, hflag;
68char *gname, *myname;
69
70int
71main(argc, argv)
72	int argc;
73	char *argv[];
74{
75	FTS *ftsp;
76	FTSENT *p;
77	int Hflag, Lflag, Pflag, ch, fts_options, hflag, rval;
78	char *cp;
79
80	myname = (cp = rindex(*argv, '/')) ? cp + 1 : *argv;
81	ischown = myname[2] == 'o';
82
83	Hflag = Lflag = Pflag = hflag = 0;
84	while ((ch = getopt(argc, argv, "HLPRfh")) != -1)
85		switch (ch) {
86		case 'H':
87			Hflag = 1;
88			Lflag = Pflag = 0;
89			break;
90		case 'L':
91			Lflag = 1;
92			Hflag = Pflag = 0;
93			break;
94		case 'P':
95			Pflag = 1;
96			Hflag = Lflag = 0;
97			break;
98		case 'R':
99			Rflag = 1;
100			break;
101		case 'f':
102			fflag = 1;
103			break;
104		case 'h':
105			hflag = 1;
106			break;
107		case '?':
108		default:
109			usage();
110		}
111	argv += optind;
112	argc -= optind;
113
114	if (argc < 2)
115		usage();
116
117	fts_options = FTS_PHYSICAL;
118	if (Rflag) {
119		if (hflag)
120			errx(1,
121		"the -R and -h options may not be specified together.");
122		if (Hflag)
123			fts_options |= FTS_COMFOLLOW;
124		if (Lflag) {
125			fts_options &= ~FTS_PHYSICAL;
126			fts_options |= FTS_LOGICAL;
127		}
128	}
129
130	uid = gid = -1;
131	if (ischown) {
132#ifdef SUPPORT_DOT
133		if ((cp = strchr(*argv, '.')) != NULL) {
134			*cp++ = '\0';
135			a_gid(cp);
136		} else
137#endif
138		if ((cp = strchr(*argv, ':')) != NULL) {
139			*cp++ = '\0';
140			a_gid(cp);
141		}
142		a_uid(*argv);
143	} else
144		a_gid(*argv);
145
146	if ((ftsp = fts_open(++argv, fts_options, 0)) == NULL)
147		err(1, NULL);
148
149	for (rval = 0; (p = fts_read(ftsp)) != NULL;) {
150		switch (p->fts_info) {
151		case FTS_D: 			/* Change it at FTS_DP. */
152			if (!Rflag)
153				fts_set(ftsp, p, FTS_SKIP);
154			continue;
155		case FTS_DNR:			/* Warn, chown, continue. */
156			warnx("%s: %s", p->fts_path, strerror(p->fts_errno));
157			rval = 1;
158			break;
159		case FTS_ERR:			/* Warn, continue. */
160		case FTS_NS:
161			warnx("%s: %s", p->fts_path, strerror(p->fts_errno));
162			rval = 1;
163			continue;
164		case FTS_SL:			/* Ignore. */
165		case FTS_SLNONE:
166			/*
167			 * The only symlinks that end up here are ones that
168			 * don't point to anything and ones that we found
169			 * doing a physical walk.
170			 */
171			if (hflag)
172				break;
173			else
174				continue;
175		default:
176			break;
177		}
178		if (hflag) {
179			if (lchown(p->fts_accpath, uid, gid) && !fflag) {
180				chownerr(p->fts_path);
181				rval = 1;
182			}
183		} else {
184			if (chown(p->fts_accpath, uid, gid) && !fflag) {
185				chownerr(p->fts_path);
186				rval = 1;
187			}
188		}
189	}
190	if (errno)
191		err(1, "fts_read");
192	exit(rval);
193}
194
195void
196a_gid(s)
197	char *s;
198{
199	struct group *gr;
200
201	if (*s == '\0')			/* Argument was "uid[:.]". */
202		return;
203	gname = s;
204	gid = ((gr = getgrnam(s)) == NULL) ? id(s, "group") : gr->gr_gid;
205}
206
207void
208a_uid(s)
209	char *s;
210{
211	struct passwd *pw;
212
213	if (*s == '\0')			/* Argument was "[:.]gid". */
214		return;
215	uid = ((pw = getpwnam(s)) == NULL) ? id(s, "user") : pw->pw_uid;
216}
217
218u_long
219id(name, type)
220	char *name, *type;
221{
222	u_long val;
223	char *ep;
224
225	/*
226	 * XXX
227	 * We know that uid_t's and gid_t's are unsigned longs.
228	 */
229	errno = 0;
230	val = strtoul(name, &ep, 10);
231	if (errno)
232		err(1, "%s", name);
233	if (*ep != '\0')
234		errx(1, "%s: illegal %s name", name, type);
235	return (val);
236}
237
238void
239chownerr(file)
240	char *file;
241{
242	static int euid = -1, ngroups = -1;
243	gid_t groups[NGROUPS];
244
245	/* Check for chown without being root. */
246	if (errno != EPERM ||
247	    uid != -1 && euid == -1 && (euid = geteuid()) != 0) {
248		if (fflag)
249			exit(0);
250		err(1, "%s", file);
251	}
252
253	/* Check group membership; kernel just returns EPERM. */
254	if (gid != -1 && ngroups == -1) {
255		ngroups = getgroups(NGROUPS, groups);
256		while (--ngroups >= 0 && gid != groups[ngroups]);
257		if (ngroups < 0) {
258			if (fflag)
259				exit(0);
260			errx(1, "you are not a member of group %s", gname);
261		}
262	}
263
264	if (!fflag)
265		warn("%s", file);
266}
267
268void
269usage()
270{
271	(void)fprintf(stderr,
272	    "usage: %s [-R [-H | -L | -P]] [-f] [-h] %s file ...\n",
273	    myname, ischown ? "[owner][:group]" : "group");
274	exit(1);
275}
276