xref: /freebsd/sbin/devfs/rule.c (revision 52267f7411adcc76ede961420e08c0e42f42d415)
1 /*-
2  * Copyright (c) 2002 Dima Dorfman.
3  * 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  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  */
26 
27 /*
28  * Rule subsystem manipulation.
29  */
30 
31 #include <sys/cdefs.h>
32 __FBSDID("$FreeBSD$");
33 
34 #include <sys/param.h>
35 #include <sys/conf.h>
36 #include <sys/ioctl.h>
37 
38 #include <assert.h>
39 #include <err.h>
40 #include <errno.h>
41 #include <grp.h>
42 #include <pwd.h>
43 #include <stdio.h>
44 #include <stdlib.h>
45 #include <string.h>
46 #include <unistd.h>
47 
48 #include "extern.h"
49 
50 static void rulespec_infp(FILE *fp, unsigned long reqest, devfs_rsnum rsnum);
51 static void rulespec_instr(struct devfs_rule *dr, const char *str,
52     devfs_rsnum rsnum);
53 static void rulespec_intok(struct devfs_rule *dr, int ac, char **av,
54     devfs_rsnum rsnum);
55 static void rulespec_outfp(FILE *fp, struct devfs_rule *dr);
56 
57 static command_t rule_add, rule_apply, rule_applyset;
58 static command_t rule_del, rule_delset, rule_show, rule_showsets;
59 
60 static ctbl_t ctbl_rule = {
61 	{ "add",		rule_add },
62 	{ "apply",		rule_apply },
63 	{ "applyset",		rule_applyset },
64 	{ "del",		rule_del },
65 	{ "delset",		rule_delset },
66 	{ "show",		rule_show },
67 	{ "showsets",		rule_showsets },
68 	{ NULL,			NULL }
69 };
70 
71 static struct intstr ist_type[] = {
72 	{ "disk",		D_DISK },
73 	{ "mem",		D_MEM },
74 	{ "tape",		D_TAPE },
75 	{ "tty",		D_TTY },
76 	{ NULL,			-1 }
77 };
78 
79 devfs_rsnum in_rsnum;
80 
81 int
82 rule_main(int ac, char **av)
83 {
84 	struct cmd *c;
85 	int ch;
86 
87 	setprogname("devfs rule");
88 	optreset = optind = 1;
89 	while ((ch = getopt(ac, av, "s:")) != -1)
90 		switch (ch) {
91 		case 's':
92 			in_rsnum = eatonum(optarg);
93 			break;
94 		default:
95 			usage();
96 		}
97 	ac -= optind;
98 	av += optind;
99 	if (ac < 1)
100 		usage();
101 
102 	for (c = ctbl_rule; c->name != NULL; ++c)
103 		if (strcmp(c->name, av[0]) == 0)
104 			exit((*c->handler)(ac, av));
105 	errx(1, "unknown command: %s", av[0]);
106 }
107 
108 static int
109 rule_add(int ac, char **av)
110 {
111 	struct devfs_rule dr;
112 	int rv;
113 
114 	if (ac < 2)
115 		usage();
116 	if (strcmp(av[1], "-") == 0)
117 		rulespec_infp(stdin, DEVFSIO_RADD, in_rsnum);
118 	else {
119 		rulespec_intok(&dr, ac - 1, av + 1, in_rsnum);
120 		rv = ioctl(mpfd, DEVFSIO_RADD, &dr);
121 		if (rv == -1)
122 			err(1, "ioctl DEVFSIO_RADD");
123 	}
124 	return (0);
125 }
126 
127 static int
128 rule_apply(int ac __unused, char **av __unused)
129 {
130 	struct devfs_rule dr;
131 	devfs_rnum rnum;
132 	devfs_rid rid;
133 	int rv;
134 
135 	if (ac < 2)
136 		usage();
137 	if (!atonum(av[1], &rnum)) {
138 		if (strcmp(av[1], "-") == 0)
139 			rulespec_infp(stdin, DEVFSIO_RAPPLY, in_rsnum);
140 		else {
141 			rulespec_intok(&dr, ac - 1, av + 1, in_rsnum);
142 			rv = ioctl(mpfd, DEVFSIO_RAPPLY, &dr);
143 			if (rv == -1)
144 				err(1, "ioctl DEVFSIO_RAPPLY");
145 		}
146 	} else {
147 		rid = mkrid(in_rsnum, rnum);
148 		rv = ioctl(mpfd, DEVFSIO_RAPPLYID, &rid);
149 		if (rv == -1)
150 			err(1, "ioctl DEVFSIO_RAPPLYID");
151 	}
152 	return (0);
153 }
154 
155 static int
156 rule_applyset(int ac, char **av __unused)
157 {
158 	int rv;
159 
160 	if (ac != 1)
161 		usage();
162 	rv = ioctl(mpfd, DEVFSIO_SAPPLY, &in_rsnum);
163 	if (rv == -1)
164 		err(1, "ioctl DEVFSIO_SAPPLY");
165 	return (0);
166 }
167 
168 static int
169 rule_del(int ac __unused, char **av)
170 {
171 	devfs_rid rid;
172 	int rv;
173 
174 	if (av[1] == NULL)
175 		usage();
176 	rid = mkrid(in_rsnum, eatoi(av[1]));
177 	rv = ioctl(mpfd, DEVFSIO_RDEL, &rid);
178 	if (rv == -1)
179 		err(1, "ioctl DEVFSIO_RDEL");
180 	return (0);
181 }
182 
183 static int
184 rule_delset(int ac, char **av __unused)
185 {
186 	struct devfs_rule dr;
187 	int rv;
188 
189 	if (ac != 1)
190 		usage();
191 	memset(&dr, '\0', sizeof(dr));
192 	dr.dr_magic = DEVFS_MAGIC;
193 	dr.dr_id = mkrid(in_rsnum, 0);
194 	while (ioctl(mpfd, DEVFSIO_RGETNEXT, &dr) != -1) {
195 		rv = ioctl(mpfd, DEVFSIO_RDEL, &dr.dr_id);
196 		if (rv == -1)
197 			err(1, "ioctl DEVFSIO_RDEL");
198 	}
199 	if (errno != ENOENT)
200 		err(1, "ioctl DEVFSIO_RGETNEXT");
201 	return (0);
202 }
203 
204 static int
205 rule_show(int ac __unused, char **av)
206 {
207 	struct devfs_rule dr;
208 	devfs_rnum rnum;
209 	int rv;
210 
211 	memset(&dr, '\0', sizeof(dr));
212 	dr.dr_magic = DEVFS_MAGIC;
213 	if (av[1] != NULL) {
214 		rnum = eatoi(av[1]);
215 		dr.dr_id = mkrid(in_rsnum, rnum - 1);
216 		rv = ioctl(mpfd, DEVFSIO_RGETNEXT, &dr);
217 		if (rv == -1)
218 			err(1, "ioctl DEVFSIO_RGETNEXT");
219 		if (rid2rn(dr.dr_id) == rnum)
220 			rulespec_outfp(stdout, &dr);
221 	} else {
222 		dr.dr_id = mkrid(in_rsnum, 0);
223 		while (ioctl(mpfd, DEVFSIO_RGETNEXT, &dr) != -1)
224 			rulespec_outfp(stdout, &dr);
225 		if (errno != ENOENT)
226 			err(1, "ioctl DEVFSIO_RGETNEXT");
227 	}
228 	return (0);
229 }
230 
231 static int
232 rule_showsets(int ac, char **av __unused)
233 {
234 	devfs_rsnum rsnum;
235 
236 	if (ac != 1)
237 		usage();
238 	rsnum = 0;
239 	while (ioctl(mpfd, DEVFSIO_SGETNEXT, &rsnum) != -1)
240 		printf("%d\n", rsnum);
241 	if (errno != ENOENT)
242 		err(1, "ioctl DEVFSIO_SGETNEXT");
243 	return (0);
244 }
245 
246 int
247 ruleset_main(int ac, char **av)
248 {
249 	devfs_rsnum rsnum;
250 	int rv;
251 
252 	setprogname("devfs ruleset");
253 	if (ac < 2)
254 		usage();
255 	rsnum = eatonum(av[1]);
256 	rv = ioctl(mpfd, DEVFSIO_SUSE, &rsnum);
257 	if (rv == -1)
258 		err(1, "ioctl DEVFSIO_SUSE");
259 	return (0);
260 }
261 
262 
263 /*
264  * Input rules from a file (probably the standard input).  This
265  * differs from the other rulespec_in*() routines in that it also
266  * calls ioctl() for the rules, since it is impractical (and not very
267  * useful) to return a list (or array) of rules, just so the caller
268  * can call call ioctl() for each of them.
269  */
270 static void
271 rulespec_infp(FILE *fp, unsigned long request, devfs_rsnum rsnum)
272 {
273 	struct devfs_rule dr;
274 	char *line;
275 	int rv;
276 
277 	assert(fp == stdin);	/* XXX: De-hardcode "stdin" from error msg. */
278 	while (efgetln(fp, &line)) {
279 		rulespec_instr(&dr, line, rsnum);
280 		rv = ioctl(mpfd, request, &dr);
281 		if (rv == -1)
282 			err(1, "ioctl");
283 		free(line);	/* efgetln() always malloc()s. */
284 	}
285 	if (ferror(stdin))
286 		err(1, "stdin");
287 }
288 
289 /*
290  * Construct a /struct devfs_rule/ from a string.
291  */
292 static void
293 rulespec_instr(struct devfs_rule *dr, const char *str, devfs_rsnum rsnum)
294 {
295 	char **av;
296 	int ac;
297 
298 	tokenize(str, &ac, &av);
299 	if (ac == 0)
300 		errx(1, "unexpected end of rulespec");
301 	rulespec_intok(dr, ac, av, rsnum);
302 	free(av[0]);
303 	free(av);
304 }
305 
306 /*
307  * Construct a /struct devfs_rule/ from ac and av.
308  */
309 static void
310 rulespec_intok(struct devfs_rule *dr, int ac __unused, char **av,
311     devfs_rsnum rsnum)
312 {
313 	struct intstr *is;
314 	struct passwd *pw;
315 	struct group *gr;
316 	devfs_rnum rnum;
317 	void *set;
318 
319 	memset(dr, '\0', sizeof(*dr));
320 
321 	/*
322 	 * We don't maintain ac hereinafter.
323 	 */
324 	if (av[0] == NULL)
325 		errx(1, "unexpected end of rulespec");
326 
327 	/* If the first argument is an integer, treat it as a rule number. */
328 	if (!atonum(av[0], &rnum))
329 		rnum = 0;		/* auto-number */
330 	else
331 		++av;
332 
333 	/*
334 	 * These aren't table-driven since that would result in more
335 	 * tiny functions than I care to deal with.
336 	 */
337 	for (;;) {
338 		if (av[0] == NULL)
339 			break;
340 		else if (strcmp(av[0], "type") == 0) {
341 			if (av[1] == NULL)
342 				errx(1, "expecting argument for type");
343 			for (is = ist_type; is->s != NULL; ++is)
344 				if (strcmp(av[1], is->s) == 0) {
345 					dr->dr_dswflags |= is->i;
346 					break;
347 				}
348 			if (is->s == NULL)
349 				errx(1, "unknown type: %s", av[1]);
350 			dr->dr_icond |= DRC_DSWFLAGS;
351 			av += 2;
352 		} else if (strcmp(av[0], "path") == 0) {
353 			if (av[1] == NULL)
354 				errx(1, "expecting argument for path");
355 			if (strlcpy(dr->dr_pathptrn, av[1], DEVFS_MAXPTRNLEN)
356 			    >= DEVFS_MAXPTRNLEN)
357 				warnx("pattern specified too long; truncated");
358 			dr->dr_icond |= DRC_PATHPTRN;
359 			av += 2;
360 		} else
361 			break;
362 	}
363 	while (av[0] != NULL) {
364 		if (strcmp(av[0], "hide") == 0) {
365 			dr->dr_iacts |= DRA_BACTS;
366 			dr->dr_bacts |= DRB_HIDE;
367 			++av;
368 		} else if (strcmp(av[0], "unhide") == 0) {
369 			dr->dr_iacts |= DRA_BACTS;
370 			dr->dr_bacts |= DRB_UNHIDE;
371 			++av;
372 		} else if (strcmp(av[0], "user") == 0) {
373 			if (av[1] == NULL)
374 				errx(1, "expecting argument for user");
375 			dr->dr_iacts |= DRA_UID;
376 			pw = getpwnam(av[1]);
377 			if (pw != NULL)
378 				dr->dr_uid = pw->pw_uid;
379 			else
380 				dr->dr_uid = eatoi(av[1]); /* XXX overflow */
381 			av += 2;
382 		} else if (strcmp(av[0], "group") == 0) {
383 			if (av[1] == NULL)
384 				errx(1, "expecting argument for group");
385 			dr->dr_iacts |= DRA_GID;
386 			gr = getgrnam(av[1]);
387 			if (gr != NULL)
388 				dr->dr_gid = gr->gr_gid;
389 			else
390 				dr->dr_gid = eatoi(av[1]); /* XXX overflow */
391 			av += 2;
392 		} else if (strcmp(av[0], "mode") == 0) {
393 			if (av[1] == NULL)
394 				errx(1, "expecting argument for mode");
395 			dr->dr_iacts |= DRA_MODE;
396 			set = setmode(av[1]);
397 			if (set == NULL)
398 				errx(1, "invalid mode: %s", av[1]);
399 			dr->dr_mode = getmode(set, 0);
400 			av += 2;
401 		} else if (strcmp(av[0], "include") == 0) {
402 			if (av[1] == NULL)
403 				errx(1, "expecting argument for include");
404 			dr->dr_iacts |= DRA_INCSET;
405 			dr->dr_incset = eatonum(av[1]);
406 			av += 2;
407 		} else
408 			errx(1, "unknown argument: %s", av[0]);
409 	}
410 
411 	dr->dr_id = mkrid(rsnum, rnum);
412 	dr->dr_magic = DEVFS_MAGIC;
413 }
414 
415 /*
416  * Write a human-readable (and machine-parsable, by rulespec_in*())
417  * representation of dr to bufp.  *bufp should be free(3)'d when the
418  * caller is finished with it.
419  */
420 static void
421 rulespec_outfp(FILE *fp, struct devfs_rule *dr)
422 {
423 	struct intstr *is;
424 	struct passwd *pw;
425 	struct group *gr;
426 
427 	fprintf(fp, "%d", rid2rn(dr->dr_id));
428 
429 	if (dr->dr_icond & DRC_DSWFLAGS)
430 		for (is = ist_type; is->s != NULL; ++is)
431 			if (dr->dr_dswflags & is->i)
432 				fprintf(fp, " type %s", is->s);
433 	if (dr->dr_icond & DRC_PATHPTRN)
434 		fprintf(fp, " path %s", dr->dr_pathptrn);
435 
436 	if (dr->dr_iacts & DRA_BACTS) {
437 		if (dr->dr_bacts & DRB_HIDE)
438 			fprintf(fp, " hide");
439 		if (dr->dr_bacts & DRB_UNHIDE)
440 			fprintf(fp, " unhide");
441 	}
442 	if (dr->dr_iacts & DRA_UID) {
443 		pw = getpwuid(dr->dr_uid);
444 		if (pw == NULL)
445 			fprintf(fp, " user %d", dr->dr_uid);
446 		else
447 			fprintf(fp, " user %s", pw->pw_name);
448 	}
449 	if (dr->dr_iacts & DRA_GID) {
450 		gr = getgrgid(dr->dr_gid);
451 		if (gr == NULL)
452 			fprintf(fp, " group %d", dr->dr_gid);
453 		else
454 			fprintf(fp, " group %s", gr->gr_name);
455 	}
456 	if (dr->dr_iacts & DRA_MODE)
457 		fprintf(fp, " mode %o", dr->dr_mode);
458 	if (dr->dr_iacts & DRA_INCSET)
459 		fprintf(fp, " include %d", dr->dr_incset);
460 
461 	fprintf(fp, "\n");
462 }
463