chown.c revision 28643
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 const 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
41#if 0
42static char sccsid[] = "@(#)chown.c	8.8 (Berkeley) 4/4/94";
43#else
44static const char rcsid[] =
45	"$Id$";
46#endif
47#endif /* not lint */
48
49#include <sys/param.h>
50#include <sys/stat.h>
51
52#include <ctype.h>
53#include <dirent.h>
54#include <err.h>
55#include <errno.h>
56#include <fts.h>
57#include <grp.h>
58#include <pwd.h>
59#include <stdio.h>
60#include <stdlib.h>
61#include <string.h>
62#include <unistd.h>
63
64void	a_gid __P((char *));
65void	a_uid __P((char *));
66void	chownerr __P((char *));
67u_long	id __P((char *, char *));
68void	usage __P((void));
69
70uid_t uid;
71gid_t gid;
72int Rflag, ischown, fflag, hflag;
73char *gname, *myname;
74
75int
76main(argc, argv)
77	int argc;
78	char *argv[];
79{
80	FTS *ftsp;
81	FTSENT *p;
82	int Hflag, Lflag, Pflag, ch, fts_options, hflag, rval;
83	char *cp;
84
85	myname = (cp = rindex(*argv, '/')) ? cp + 1 : *argv;
86	ischown = myname[2] == 'o';
87
88	Hflag = Lflag = Pflag = hflag = 0;
89	while ((ch = getopt(argc, argv, "HLPRfh")) != -1)
90		switch (ch) {
91		case 'H':
92			Hflag = 1;
93			Lflag = Pflag = 0;
94			break;
95		case 'L':
96			Lflag = 1;
97			Hflag = Pflag = 0;
98			break;
99		case 'P':
100			Pflag = 1;
101			Hflag = Lflag = 0;
102			break;
103		case 'R':
104			Rflag = 1;
105			break;
106		case 'f':
107			fflag = 1;
108			break;
109		case 'h':
110			hflag = 1;
111			break;
112		case '?':
113		default:
114			usage();
115		}
116	argv += optind;
117	argc -= optind;
118
119	if (argc < 2)
120		usage();
121
122	fts_options = FTS_PHYSICAL;
123	if (Rflag) {
124		if (hflag)
125			errx(1,
126		"the -R and -h options may not be specified together.");
127		if (Hflag)
128			fts_options |= FTS_COMFOLLOW;
129		if (Lflag) {
130			fts_options &= ~FTS_PHYSICAL;
131			fts_options |= FTS_LOGICAL;
132		}
133	}
134
135	uid = gid = -1;
136	if (ischown) {
137#ifdef SUPPORT_DOT
138		if ((cp = strchr(*argv, '.')) != NULL) {
139			*cp++ = '\0';
140			a_gid(cp);
141		} else
142#endif
143		if ((cp = strchr(*argv, ':')) != NULL) {
144			*cp++ = '\0';
145			a_gid(cp);
146		}
147		a_uid(*argv);
148	} else
149		a_gid(*argv);
150
151	if ((ftsp = fts_open(++argv, fts_options, 0)) == NULL)
152		err(1, NULL);
153
154	for (rval = 0; (p = fts_read(ftsp)) != NULL;) {
155		switch (p->fts_info) {
156		case FTS_D: 			/* Change it at FTS_DP. */
157			if (!Rflag)
158				fts_set(ftsp, p, FTS_SKIP);
159			continue;
160		case FTS_DNR:			/* Warn, chown, continue. */
161			warnx("%s: %s", p->fts_path, strerror(p->fts_errno));
162			rval = 1;
163			break;
164		case FTS_ERR:			/* Warn, continue. */
165		case FTS_NS:
166			warnx("%s: %s", p->fts_path, strerror(p->fts_errno));
167			rval = 1;
168			continue;
169		case FTS_SL:			/* Ignore. */
170		case FTS_SLNONE:
171			/*
172			 * The only symlinks that end up here are ones that
173			 * don't point to anything and ones that we found
174			 * doing a physical walk.
175			 */
176			if (hflag)
177				break;
178			else
179				continue;
180		default:
181			break;
182		}
183		if (hflag) {
184			if (lchown(p->fts_accpath, uid, gid) && !fflag) {
185				chownerr(p->fts_path);
186				rval = 1;
187			}
188		} else {
189			if (chown(p->fts_accpath, uid, gid) && !fflag) {
190				chownerr(p->fts_path);
191				rval = 1;
192			}
193		}
194	}
195	if (errno)
196		err(1, "fts_read");
197	exit(rval);
198}
199
200void
201a_gid(s)
202	char *s;
203{
204	struct group *gr;
205
206	if (*s == '\0')			/* Argument was "uid[:.]". */
207		return;
208	gname = s;
209	gid = ((gr = getgrnam(s)) == NULL) ? id(s, "group") : gr->gr_gid;
210}
211
212void
213a_uid(s)
214	char *s;
215{
216	struct passwd *pw;
217
218	if (*s == '\0')			/* Argument was "[:.]gid". */
219		return;
220	uid = ((pw = getpwnam(s)) == NULL) ? id(s, "user") : pw->pw_uid;
221}
222
223u_long
224id(name, type)
225	char *name, *type;
226{
227	u_long val;
228	char *ep;
229
230	/*
231	 * XXX
232	 * We know that uid_t's and gid_t's are unsigned longs.
233	 */
234	errno = 0;
235	val = strtoul(name, &ep, 10);
236	if (errno)
237		err(1, "%s", name);
238	if (*ep != '\0')
239		errx(1, "%s: illegal %s name", name, type);
240	return (val);
241}
242
243void
244chownerr(file)
245	char *file;
246{
247	static int euid = -1, ngroups = -1;
248	gid_t groups[NGROUPS];
249
250	/* Check for chown without being root. */
251	if (errno != EPERM ||
252	    (uid != -1 && euid == -1 && (euid = geteuid()) != 0))
253		err(1, "%s", file);
254
255	/* Check group membership; kernel just returns EPERM. */
256	if (gid != -1 && ngroups == -1 &&
257	    euid == -1 && (euid = geteuid()) != 0) {
258		ngroups = getgroups(NGROUPS, groups);
259		while (--ngroups >= 0 && gid != groups[ngroups]);
260		if (ngroups < 0)
261			errx(1, "you are not a member of group %s", gname);
262	}
263	warn("%s", file);
264}
265
266void
267usage()
268{
269	(void)fprintf(stderr,
270	    "usage: %s [-R [-H | -L | -P]] [-f] [-h] %s file ...\n",
271	    myname, ischown ? "[owner][:group]" : "group");
272	exit(1);
273}
274