xref: /freebsd/usr.sbin/chown/chown.c (revision 1b6c76a2fe091c74f08427e6c870851025a9cf67)
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 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
42 static char sccsid[] = "@(#)chown.c	8.8 (Berkeley) 4/4/94";
43 #else
44 static const char rcsid[] =
45   "$FreeBSD$";
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 
64 void	a_gid __P((char *));
65 void	a_uid __P((char *));
66 void	chownerr __P((char *));
67 u_long	id __P((char *, char *));
68 void	usage __P((void));
69 
70 uid_t uid;
71 gid_t gid;
72 int Rflag, ischown, fflag, hflag, vflag;
73 char *gname, *myname;
74 
75 int
76 main(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 = vflag = 0;
89 	while ((ch = getopt(argc, argv, "HLPRfhv")) != -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 'v':
113 			vflag = 1;
114 			break;
115 		case '?':
116 		default:
117 			usage();
118 		}
119 	argv += optind;
120 	argc -= optind;
121 
122 	if (argc < 2)
123 		usage();
124 
125 	if (Rflag) {
126 		fts_options = FTS_PHYSICAL;
127 		if (hflag && (Lflag || Hflag))
128 			errx(1, "the -R and -h options may not be specified together");
129 		if (Hflag)
130 			fts_options |= FTS_COMFOLLOW;
131 		if (Lflag) {
132 			fts_options &= ~FTS_PHYSICAL;
133 			fts_options |= FTS_LOGICAL;
134 		}
135 	} else
136 		fts_options = hflag ? FTS_PHYSICAL : FTS_LOGICAL;
137 
138 	uid = gid = -1;
139 	if (ischown) {
140 		if ((cp = strchr(*argv, ':')) != NULL) {
141 			*cp++ = '\0';
142 			a_gid(cp);
143 		}
144 #ifdef SUPPORT_DOT
145 		else if ((cp = strchr(*argv, '.')) != NULL) {
146 			*cp++ = '\0';
147 			a_gid(cp);
148 		}
149 #endif
150 		a_uid(*argv);
151 	} else
152 		a_gid(*argv);
153 
154 	if ((ftsp = fts_open(++argv, fts_options, 0)) == NULL)
155 		err(1, NULL);
156 
157 	for (rval = 0; (p = fts_read(ftsp)) != NULL;) {
158 		switch (p->fts_info) {
159 		case FTS_D: 			/* Change it at FTS_DP. */
160 			if (!Rflag)
161 				fts_set(ftsp, p, FTS_SKIP);
162 			continue;
163 		case FTS_DNR:			/* Warn, chown, continue. */
164 			warnx("%s: %s", p->fts_path, strerror(p->fts_errno));
165 			rval = 1;
166 			break;
167 		case FTS_ERR:			/* Warn, continue. */
168 		case FTS_NS:
169 			warnx("%s: %s", p->fts_path, strerror(p->fts_errno));
170 			rval = 1;
171 			continue;
172 		case FTS_SL:			/* Ignore. */
173 		case FTS_SLNONE:
174 			/*
175 			 * The only symlinks that end up here are ones that
176 			 * don't point to anything and ones that we found
177 			 * doing a physical walk.
178 			 */
179 			if (hflag)
180 				break;
181 			else
182 				continue;
183 		default:
184 			break;
185 		}
186 		if ((uid == -1 || uid == p->fts_statp->st_uid) &&
187 		    (gid == -1 || gid == p->fts_statp->st_gid))
188 			continue;
189 		if (hflag) {
190 			if (lchown(p->fts_accpath, uid, gid) && !fflag) {
191 				chownerr(p->fts_path);
192 				rval = 1;
193 			} else {
194 			    	if (vflag)
195 					(void)printf("%s\n", p->fts_accpath);
196 			}
197 		} else {
198 			if (chown(p->fts_accpath, uid, gid) && !fflag) {
199 				chownerr(p->fts_path);
200 				rval = 1;
201 			} else {
202 			    	if (vflag)
203 					(void)printf("%s\n", p->fts_accpath);
204 			}
205 		}
206 	}
207 	if (errno)
208 		err(1, "fts_read");
209 	exit(rval);
210 }
211 
212 void
213 a_gid(s)
214 	char *s;
215 {
216 	struct group *gr;
217 
218 	if (*s == '\0')			/* Argument was "uid[:.]". */
219 		return;
220 	gname = s;
221 	gid = ((gr = getgrnam(s)) == NULL) ? id(s, "group") : gr->gr_gid;
222 }
223 
224 void
225 a_uid(s)
226 	char *s;
227 {
228 	struct passwd *pw;
229 
230 	if (*s == '\0')			/* Argument was "[:.]gid". */
231 		return;
232 	uid = ((pw = getpwnam(s)) == NULL) ? id(s, "user") : pw->pw_uid;
233 }
234 
235 u_long
236 id(name, type)
237 	char *name, *type;
238 {
239 	u_long val;
240 	char *ep;
241 
242 	/*
243 	 * XXX
244 	 * We know that uid_t's and gid_t's are unsigned longs.
245 	 */
246 	errno = 0;
247 	val = strtoul(name, &ep, 10);
248 	if (errno)
249 		err(1, "%s", name);
250 	if (*ep != '\0')
251 		errx(1, "%s: illegal %s name", name, type);
252 	return (val);
253 }
254 
255 void
256 chownerr(file)
257 	char *file;
258 {
259 	static int euid = -1, ngroups = -1;
260 	gid_t groups[NGROUPS];
261 
262 	/* Check for chown without being root. */
263 	if (errno != EPERM ||
264 	    (uid != -1 && euid == -1 && (euid = geteuid()) != 0))
265 		err(1, "%s", file);
266 
267 	/* Check group membership; kernel just returns EPERM. */
268 	if (gid != -1 && ngroups == -1 &&
269 	    euid == -1 && (euid = geteuid()) != 0) {
270 		ngroups = getgroups(NGROUPS, groups);
271 		while (--ngroups >= 0 && gid != groups[ngroups]);
272 		if (ngroups < 0)
273 			errx(1, "you are not a member of group %s", gname);
274 	}
275 	warn("%s", file);
276 }
277 
278 void
279 usage()
280 {
281 	(void)fprintf(stderr, "%s\n%s\n%s\n",
282 	    "usage: chown [-R [-H | -L | -P]] [-f] [-h] [-v] owner[:group] file ...",
283 	    "       chown [-R [-H | -L | -P]] [-f] [-h] [-v] :group file ...",
284 	    "       chgrp [-R [-H | -L | -P]] [-f] [-h] [-v] group file ...");
285 	exit(1);
286 }
287