xref: /freebsd/usr.sbin/chown/chown.c (revision 952d112864d8008aa87278a30a539d888a8493cd)
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
35 static 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 static 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 
59 void	a_gid __P((char *));
60 void	a_uid __P((char *));
61 void	chownerr __P((char *));
62 u_long	id __P((char *, char *));
63 void	usage __P((void));
64 
65 uid_t uid;
66 gid_t gid;
67 int Rflag, ischown, fflag, hflag;
68 char *gname, *myname;
69 
70 int
71 main(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 
195 void
196 a_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 
207 void
208 a_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 
218 u_long
219 id(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 
238 void
239 chownerr(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 
268 void
269 usage()
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