xref: /freebsd/usr.sbin/jail/config.c (revision f6385d921b2f354d71256d1d0392122597e0fd33)
1 /*-
2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
3  *
4  * Copyright (c) 2011 James Gritton
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  */
28 
29 #include <sys/cdefs.h>
30 __FBSDID("$FreeBSD$");
31 
32 #include <sys/types.h>
33 #include <sys/errno.h>
34 #include <sys/socket.h>
35 #include <sys/sysctl.h>
36 
37 #include <arpa/inet.h>
38 #include <netinet/in.h>
39 
40 #include <err.h>
41 #include <netdb.h>
42 #include <stdio.h>
43 #include <stdlib.h>
44 #include <string.h>
45 #include <unistd.h>
46 
47 #include "jailp.h"
48 
49 struct ipspec {
50 	const char	*name;
51 	unsigned	flags;
52 };
53 
54 extern FILE *yyin;
55 extern int yynerrs;
56 
57 extern int yyparse(void);
58 
59 struct cfjails cfjails = TAILQ_HEAD_INITIALIZER(cfjails);
60 
61 static void free_param(struct cfparams *pp, struct cfparam *p);
62 static void free_param_strings(struct cfparam *p);
63 
64 static const struct ipspec intparams[] = {
65     [IP_ALLOW_DYING] =		{"allow.dying",		PF_INTERNAL | PF_BOOL},
66     [IP_COMMAND] =		{"command",		PF_INTERNAL},
67     [IP_DEPEND] =		{"depend",		PF_INTERNAL},
68     [IP_EXEC_CLEAN] =		{"exec.clean",		PF_INTERNAL | PF_BOOL},
69     [IP_EXEC_CONSOLELOG] =	{"exec.consolelog",	PF_INTERNAL},
70     [IP_EXEC_FIB] =		{"exec.fib",		PF_INTERNAL | PF_INT},
71     [IP_EXEC_JAIL_USER] =	{"exec.jail_user",	PF_INTERNAL},
72     [IP_EXEC_POSTSTART] =	{"exec.poststart",	PF_INTERNAL},
73     [IP_EXEC_POSTSTOP] =	{"exec.poststop",	PF_INTERNAL},
74     [IP_EXEC_PREPARE] =		{"exec.prepare",	PF_INTERNAL},
75     [IP_EXEC_PRESTART] =	{"exec.prestart",	PF_INTERNAL},
76     [IP_EXEC_PRESTOP] =		{"exec.prestop",	PF_INTERNAL},
77     [IP_EXEC_RELEASE] =		{"exec.release",	PF_INTERNAL},
78     [IP_EXEC_CREATED] =		{"exec.created",	PF_INTERNAL},
79     [IP_EXEC_START] =		{"exec.start",		PF_INTERNAL},
80     [IP_EXEC_STOP] =		{"exec.stop",		PF_INTERNAL},
81     [IP_EXEC_SYSTEM_JAIL_USER]=	{"exec.system_jail_user",
82 							PF_INTERNAL | PF_BOOL},
83     [IP_EXEC_SYSTEM_USER] =	{"exec.system_user",	PF_INTERNAL},
84     [IP_EXEC_TIMEOUT] =		{"exec.timeout",	PF_INTERNAL | PF_INT},
85 #if defined(INET) || defined(INET6)
86     [IP_INTERFACE] =		{"interface",		PF_INTERNAL},
87     [IP_IP_HOSTNAME] =		{"ip_hostname",		PF_INTERNAL | PF_BOOL},
88 #endif
89     [IP_MOUNT] =		{"mount",		PF_INTERNAL | PF_REV},
90     [IP_MOUNT_DEVFS] =		{"mount.devfs",		PF_INTERNAL | PF_BOOL},
91     [IP_MOUNT_FDESCFS] =	{"mount.fdescfs",	PF_INTERNAL | PF_BOOL},
92     [IP_MOUNT_PROCFS] =		{"mount.procfs",	PF_INTERNAL | PF_BOOL},
93     [IP_MOUNT_FSTAB] =		{"mount.fstab",		PF_INTERNAL},
94     [IP_STOP_TIMEOUT] =		{"stop.timeout",	PF_INTERNAL | PF_INT},
95     [IP_VNET_INTERFACE] =	{"vnet.interface",	PF_INTERNAL},
96 #ifdef INET
97     [IP__IP4_IFADDR] =		{"ip4.addr",	PF_INTERNAL | PF_CONV | PF_REV},
98 #endif
99 #ifdef INET6
100     [IP__IP6_IFADDR] =		{"ip6.addr",	PF_INTERNAL | PF_CONV | PF_REV},
101 #endif
102     [IP__MOUNT_FROM_FSTAB] =	{"mount.fstab",	PF_INTERNAL | PF_CONV | PF_REV},
103     [IP__OP] =			{NULL,			PF_CONV},
104     [KP_ALLOW_CHFLAGS] =	{"allow.chflags",	0},
105     [KP_ALLOW_MOUNT] =		{"allow.mount",		0},
106     [KP_ALLOW_RAW_SOCKETS] =	{"allow.raw_sockets",	0},
107     [KP_ALLOW_SET_HOSTNAME]=	{"allow.set_hostname",	0},
108     [KP_ALLOW_SOCKET_AF] =	{"allow.socket_af",	0},
109     [KP_ALLOW_SYSVIPC] =	{"allow.sysvipc",	0},
110     [KP_DEVFS_RULESET] =	{"devfs_ruleset",	0},
111     [KP_HOST_HOSTNAME] =	{"host.hostname",	0},
112 #ifdef INET
113     [KP_IP4_ADDR] =		{"ip4.addr",		0},
114 #endif
115 #ifdef INET6
116     [KP_IP6_ADDR] =		{"ip6.addr",		0},
117 #endif
118     [KP_JID] =			{"jid",			PF_IMMUTABLE},
119     [KP_NAME] =			{"name",		PF_IMMUTABLE},
120     [KP_PATH] =			{"path",		0},
121     [KP_PERSIST] =		{"persist",		0},
122     [KP_SECURELEVEL] =		{"securelevel",		0},
123     [KP_VNET] =			{"vnet",		0},
124 };
125 
126 /*
127  * Parse the jail configuration file.
128  */
129 void
130 load_config(void)
131 {
132 	struct cfjails wild;
133 	struct cfparams opp;
134 	struct cfjail *j, *tj, *wj;
135 	struct cfparam *p, *vp, *tp;
136 	struct cfstring *s, *vs, *ns;
137 	struct cfvar *v, *vv;
138 	char *ep;
139 	int did_self, jseq, pgen;
140 
141 	if (!strcmp(cfname, "-")) {
142 		cfname = "STDIN";
143 		yyin = stdin;
144 	} else {
145 		yyin = fopen(cfname, "r");
146 		if (!yyin)
147 			err(1, "%s", cfname);
148 	}
149 	if (yyparse() || yynerrs)
150 		exit(1);
151 
152 	/* Separate the wildcard jails out from the actual jails. */
153 	jseq = 0;
154 	TAILQ_INIT(&wild);
155 	TAILQ_FOREACH_SAFE(j, &cfjails, tq, tj) {
156 		j->seq = ++jseq;
157 		if (wild_jail_name(j->name))
158 			requeue(j, &wild);
159 	}
160 
161 	TAILQ_FOREACH(j, &cfjails, tq) {
162 		/* Set aside the jail's parameters. */
163 		TAILQ_INIT(&opp);
164 		TAILQ_CONCAT(&opp, &j->params, tq);
165 		/*
166 		 * The jail name implies its "name" or "jid" parameter,
167 		 * though they may also be explicitly set later on.
168 		 */
169 		add_param(j, NULL,
170 		    strtol(j->name, &ep, 10) && !*ep ? KP_JID : KP_NAME,
171 		    j->name);
172 		/*
173 		 * Collect parameters for the jail, global parameters/variables,
174 		 * and any matching wildcard jails.
175 		 */
176 		did_self = 0;
177 		TAILQ_FOREACH(wj, &wild, tq) {
178 			if (j->seq < wj->seq && !did_self) {
179 				TAILQ_FOREACH(p, &opp, tq)
180 					add_param(j, p, 0, NULL);
181 				did_self = 1;
182 			}
183 			if (wild_jail_match(j->name, wj->name))
184 				TAILQ_FOREACH(p, &wj->params, tq)
185 					add_param(j, p, 0, NULL);
186 		}
187 		if (!did_self)
188 			TAILQ_FOREACH(p, &opp, tq)
189 				add_param(j, p, 0, NULL);
190 
191 		/* Resolve any variable substitutions. */
192 		pgen = 0;
193 		TAILQ_FOREACH(p, &j->params, tq) {
194 		    p->gen = ++pgen;
195 		find_vars:
196 		    TAILQ_FOREACH(s, &p->val, tq) {
197 			while ((v = STAILQ_FIRST(&s->vars))) {
198 				TAILQ_FOREACH(vp, &j->params, tq)
199 					if (!strcmp(vp->name, v->name))
200 						break;
201 				if (!vp) {
202 					jail_warnx(j,
203 					    "%s: variable \"%s\" not found",
204 					    p->name, v->name);
205 				bad_var:
206 					j->flags |= JF_FAILED;
207 					TAILQ_FOREACH(vp, &j->params, tq)
208 						if (vp->gen == pgen)
209 							vp->flags |= PF_BAD;
210 					goto free_var;
211 				}
212 				if (vp->flags & PF_BAD)
213 					goto bad_var;
214 				if (vp->gen == pgen) {
215 					jail_warnx(j, "%s: variable loop",
216 					    v->name);
217 					goto bad_var;
218 				}
219 				TAILQ_FOREACH(vs, &vp->val, tq)
220 					if (!STAILQ_EMPTY(&vs->vars)) {
221 						vp->gen = pgen;
222 						TAILQ_REMOVE(&j->params, vp,
223 						    tq);
224 						TAILQ_INSERT_BEFORE(p, vp, tq);
225 						p = vp;
226 						goto find_vars;
227 					}
228 				vs = TAILQ_FIRST(&vp->val);
229 				if (TAILQ_NEXT(vs, tq) != NULL &&
230 				    (s->s[0] != '\0' ||
231 				     STAILQ_NEXT(v, tq))) {
232 					jail_warnx(j, "%s: array cannot be "
233 					    "substituted inline",
234 					    p->name);
235 					goto bad_var;
236 				}
237 				s->s = erealloc(s->s, s->len + vs->len + 1);
238 				memmove(s->s + v->pos + vs->len,
239 				    s->s + v->pos,
240 				    s->len - v->pos + 1);
241 				memcpy(s->s + v->pos, vs->s, vs->len);
242 				vv = v;
243 				while ((vv = STAILQ_NEXT(vv, tq)))
244 					vv->pos += vs->len;
245 				s->len += vs->len;
246 				while ((vs = TAILQ_NEXT(vs, tq))) {
247 					ns = emalloc(sizeof(struct cfstring));
248 					ns->s = estrdup(vs->s);
249 					ns->len = vs->len;
250 					STAILQ_INIT(&ns->vars);
251 					TAILQ_INSERT_AFTER(&p->val, s, ns, tq);
252 					s = ns;
253 				}
254 			free_var:
255 				free(v->name);
256 				STAILQ_REMOVE_HEAD(&s->vars, tq);
257 				free(v);
258 			}
259 		    }
260 		}
261 
262 		/* Free the jail's original parameter list and any variables. */
263 		while ((p = TAILQ_FIRST(&opp)))
264 			free_param(&opp, p);
265 		TAILQ_FOREACH_SAFE(p, &j->params, tq, tp)
266 			if (p->flags & PF_VAR)
267 				free_param(&j->params, p);
268 	}
269 	while ((wj = TAILQ_FIRST(&wild))) {
270 		free(wj->name);
271 		while ((p = TAILQ_FIRST(&wj->params)))
272 			free_param(&wj->params, p);
273 		TAILQ_REMOVE(&wild, wj, tq);
274 	}
275 }
276 
277 /*
278  * Create a new jail record.
279  */
280 struct cfjail *
281 add_jail(void)
282 {
283 	struct cfjail *j;
284 
285 	j = emalloc(sizeof(struct cfjail));
286 	memset(j, 0, sizeof(struct cfjail));
287 	TAILQ_INIT(&j->params);
288 	STAILQ_INIT(&j->dep[DEP_FROM]);
289 	STAILQ_INIT(&j->dep[DEP_TO]);
290 	j->queue = &cfjails;
291 	TAILQ_INSERT_TAIL(&cfjails, j, tq);
292 	return j;
293 }
294 
295 /*
296  * Add a parameter to a jail.
297  */
298 void
299 add_param(struct cfjail *j, const struct cfparam *p, enum intparam ipnum,
300     const char *value)
301 {
302 	struct cfstrings nss;
303 	struct cfparam *dp, *np;
304 	struct cfstring *s, *ns;
305 	struct cfvar *v, *nv;
306 	const char *name;
307 	char *cs, *tname;
308 	unsigned flags;
309 
310 	if (j == NULL) {
311 		/* Create a single anonymous jail if one doesn't yet exist. */
312 		j = TAILQ_LAST(&cfjails, cfjails);
313 		if (j == NULL)
314 			j = add_jail();
315 	}
316 	TAILQ_INIT(&nss);
317 	if (p != NULL) {
318 		name = p->name;
319 		flags = p->flags;
320 		/*
321 		 * Make a copy of the parameter's string list,
322 		 * which may be freed if it's overridden later.
323 		 */
324 		TAILQ_FOREACH(s, &p->val, tq) {
325 			ns = emalloc(sizeof(struct cfstring));
326 			ns->s = estrdup(s->s);
327 			ns->len = s->len;
328 			STAILQ_INIT(&ns->vars);
329 			STAILQ_FOREACH(v, &s->vars, tq) {
330 				nv = emalloc(sizeof(struct cfvar));
331 				nv->name = strdup(v->name);
332 				nv->pos = v->pos;
333 				STAILQ_INSERT_TAIL(&ns->vars, nv, tq);
334 			}
335 			TAILQ_INSERT_TAIL(&nss, ns, tq);
336 		}
337 	} else {
338 		flags = PF_APPEND;
339 		if (ipnum != IP__NULL) {
340 			name = intparams[ipnum].name;
341 			flags |= intparams[ipnum].flags;
342 		} else if ((cs = strchr(value, '='))) {
343 			tname = alloca(cs - value + 1);
344 			strlcpy(tname, value, cs - value + 1);
345 			name = tname;
346 			value = cs + 1;
347 		} else {
348 			name = value;
349 			value = NULL;
350 		}
351 		if (value != NULL) {
352 			ns = emalloc(sizeof(struct cfstring));
353 			ns->s = estrdup(value);
354 			ns->len = strlen(value);
355 			STAILQ_INIT(&ns->vars);
356 			TAILQ_INSERT_TAIL(&nss, ns, tq);
357 		}
358 	}
359 
360 	/* See if this parameter has already been added. */
361 	if (ipnum != IP__NULL)
362 		dp = j->intparams[ipnum];
363 	else
364 		TAILQ_FOREACH(dp, &j->params, tq)
365 			if (!(dp->flags & PF_CONV) && equalopts(dp->name, name))
366 				break;
367 	if (dp != NULL) {
368 		/* Found it - append or replace. */
369 		if (dp->flags & PF_IMMUTABLE) {
370 			jail_warnx(j, "cannot redefine variable \"%s\".",
371 			    dp->name);
372 			return;
373 		}
374 		if (strcmp(dp->name, name)) {
375 			free(dp->name);
376 			dp->name = estrdup(name);
377 		}
378 		if (!(flags & PF_APPEND) || TAILQ_EMPTY(&nss))
379 			free_param_strings(dp);
380 		TAILQ_CONCAT(&dp->val, &nss, tq);
381 		dp->flags |= flags;
382 	} else {
383 		/* Not found - add it. */
384 		np = emalloc(sizeof(struct cfparam));
385 		np->name = estrdup(name);
386 		TAILQ_INIT(&np->val);
387 		TAILQ_CONCAT(&np->val, &nss, tq);
388 		np->flags = flags;
389 		np->gen = 0;
390 		TAILQ_INSERT_TAIL(&j->params, np, tq);
391 		if (ipnum != IP__NULL)
392 			j->intparams[ipnum] = np;
393 		else
394 			for (ipnum = IP__NULL + 1; ipnum < IP_NPARAM; ipnum++)
395 				if (!(intparams[ipnum].flags & PF_CONV) &&
396 				    equalopts(name, intparams[ipnum].name) &&
397 				    !(p->flags & PF_VAR)) {
398 					j->intparams[ipnum] = np;
399 					np->flags |= intparams[ipnum].flags;
400 					break;
401 				}
402 	}
403 }
404 
405 /*
406  * Return if a boolean parameter exists and is true.
407  */
408 int
409 bool_param(const struct cfparam *p)
410 {
411 	const char *cs;
412 
413 	if (p == NULL)
414 		return 0;
415 	cs = strrchr(p->name, '.');
416 	return !strncmp(cs ? cs + 1 : p->name, "no", 2) ^
417 	    (TAILQ_EMPTY(&p->val) ||
418 	     !strcasecmp(TAILQ_LAST(&p->val, cfstrings)->s, "true") ||
419 	     (strtol(TAILQ_LAST(&p->val, cfstrings)->s, NULL, 10)));
420 }
421 
422 /*
423  * Set an integer if a parameter if it exists.
424  */
425 int
426 int_param(const struct cfparam *p, int *ip)
427 {
428 	if (p == NULL || TAILQ_EMPTY(&p->val))
429 		return 0;
430 	*ip = strtol(TAILQ_LAST(&p->val, cfstrings)->s, NULL, 10);
431 	return 1;
432 }
433 
434 /*
435  * Return the string value of a scalar parameter if it exists.
436  */
437 const char *
438 string_param(const struct cfparam *p)
439 {
440 	return (p && !TAILQ_EMPTY(&p->val)
441 	    ? TAILQ_LAST(&p->val, cfstrings)->s : NULL);
442 }
443 
444 /*
445  * Check syntax and values of internal parameters.  Set some internal
446  * parameters based on the values of others.
447  */
448 int
449 check_intparams(struct cfjail *j)
450 {
451 	struct cfparam *p;
452 	struct cfstring *s;
453 	FILE *f;
454 	const char *val;
455 	char *cs, *ep, *ln;
456 	size_t lnlen;
457 	int error;
458 #if defined(INET) || defined(INET6)
459 	struct addrinfo hints;
460 	struct addrinfo *ai0, *ai;
461 	const char *hostname;
462 	int gicode, defif;
463 #endif
464 #ifdef INET
465 	struct in_addr addr4;
466 	int ip4ok;
467 	char avalue4[INET_ADDRSTRLEN];
468 #endif
469 #ifdef INET6
470 	struct in6_addr addr6;
471 	int ip6ok;
472 	char avalue6[INET6_ADDRSTRLEN];
473 #endif
474 
475 	error = 0;
476 	/* Check format of boolan and integer values. */
477 	TAILQ_FOREACH(p, &j->params, tq) {
478 		if (!TAILQ_EMPTY(&p->val) && (p->flags & (PF_BOOL | PF_INT))) {
479 			val = TAILQ_LAST(&p->val, cfstrings)->s;
480 			if (p->flags & PF_BOOL) {
481 				if (strcasecmp(val, "false") &&
482 				    strcasecmp(val, "true") &&
483 				    ((void)strtol(val, &ep, 10), *ep)) {
484 					jail_warnx(j,
485 					    "%s: unknown boolean value \"%s\"",
486 					    p->name, val);
487 					error = -1;
488 				}
489 			} else {
490 				(void)strtol(val, &ep, 10);
491 				if (ep == val || *ep) {
492 					jail_warnx(j,
493 					    "%s: non-integer value \"%s\"",
494 					    p->name, val);
495 					error = -1;
496 				}
497 			}
498 		}
499 	}
500 
501 #if defined(INET) || defined(INET6)
502 	/*
503 	 * The ip_hostname parameter looks up the hostname, and adds parameters
504 	 * for any IP addresses it finds.
505 	 */
506 	if (((j->flags & JF_OP_MASK) != JF_STOP ||
507 	    j->intparams[IP_INTERFACE] != NULL) &&
508 	    bool_param(j->intparams[IP_IP_HOSTNAME]) &&
509 	    (hostname = string_param(j->intparams[KP_HOST_HOSTNAME]))) {
510 		j->intparams[IP_IP_HOSTNAME] = NULL;
511 		/*
512 		 * Silently ignore unsupported address families from
513 		 * DNS lookups.
514 		 */
515 #ifdef INET
516 		ip4ok = feature_present("inet");
517 #endif
518 #ifdef INET6
519 		ip6ok = feature_present("inet6");
520 #endif
521 		if (
522 #if defined(INET) && defined(INET6)
523 		    ip4ok || ip6ok
524 #elif defined(INET)
525 		    ip4ok
526 #elif defined(INET6)
527 		    ip6ok
528 #endif
529 			 ) {
530 			/* Look up the hostname (or get the address) */
531 			memset(&hints, 0, sizeof(hints));
532 			hints.ai_socktype = SOCK_STREAM;
533 			hints.ai_family =
534 #if defined(INET) && defined(INET6)
535 			    ip4ok ? (ip6ok ? PF_UNSPEC : PF_INET) :  PF_INET6;
536 #elif defined(INET)
537 			    PF_INET;
538 #elif defined(INET6)
539 			    PF_INET6;
540 #endif
541 			gicode = getaddrinfo(hostname, NULL, &hints, &ai0);
542 			if (gicode != 0) {
543 				jail_warnx(j, "host.hostname %s: %s", hostname,
544 				    gai_strerror(gicode));
545 				error = -1;
546 			} else {
547 				/*
548 				 * Convert the addresses to ASCII so jailparam
549 				 * can convert them back.  Errors are not
550 				 * expected here.
551 				 */
552 				for (ai = ai0; ai; ai = ai->ai_next)
553 					switch (ai->ai_family) {
554 #ifdef INET
555 					case AF_INET:
556 						memcpy(&addr4,
557 						    &((struct sockaddr_in *)
558 						    (void *)ai->ai_addr)->
559 						    sin_addr, sizeof(addr4));
560 						if (inet_ntop(AF_INET,
561 						    &addr4, avalue4,
562 						    INET_ADDRSTRLEN) == NULL)
563 							err(1, "inet_ntop");
564 						add_param(j, NULL, KP_IP4_ADDR,
565 						    avalue4);
566 						break;
567 #endif
568 #ifdef INET6
569 					case AF_INET6:
570 						memcpy(&addr6,
571 						    &((struct sockaddr_in6 *)
572 						    (void *)ai->ai_addr)->
573 						    sin6_addr, sizeof(addr6));
574 						if (inet_ntop(AF_INET6,
575 						    &addr6, avalue6,
576 						    INET6_ADDRSTRLEN) == NULL)
577 							err(1, "inet_ntop");
578 						add_param(j, NULL, KP_IP6_ADDR,
579 						    avalue6);
580 						break;
581 #endif
582 					}
583 				freeaddrinfo(ai0);
584 			}
585 		}
586 	}
587 
588 	/*
589 	 * IP addresses may include an interface to set that address on,
590 	 * a netmask/suffix for that address and options for ifconfig.
591 	 * These are copied to an internal command parameter and then stripped
592 	 * so they won't be passed on to jailparam_set.
593 	 */
594 	defif = string_param(j->intparams[IP_INTERFACE]) != NULL;
595 #ifdef INET
596 	if (j->intparams[KP_IP4_ADDR] != NULL) {
597 		TAILQ_FOREACH(s, &j->intparams[KP_IP4_ADDR]->val, tq) {
598 			cs = strchr(s->s, '|');
599 			if (cs || defif)
600 				add_param(j, NULL, IP__IP4_IFADDR, s->s);
601 			if (cs) {
602 				s->len -= cs + 1 - s->s;
603 				memmove(s->s, cs + 1, s->len + 1);
604 			}
605 			if ((cs = strchr(s->s, '/')) != NULL) {
606 				*cs = '\0';
607 				s->len = cs - s->s;
608 			}
609 			if ((cs = strchr(s->s, ' ')) != NULL) {
610 				*cs = '\0';
611 				s->len = cs - s->s;
612 			}
613 		}
614 	}
615 #endif
616 #ifdef INET6
617 	if (j->intparams[KP_IP6_ADDR] != NULL) {
618 		TAILQ_FOREACH(s, &j->intparams[KP_IP6_ADDR]->val, tq) {
619 			cs = strchr(s->s, '|');
620 			if (cs || defif)
621 				add_param(j, NULL, IP__IP6_IFADDR, s->s);
622 			if (cs) {
623 				s->len -= cs + 1 - s->s;
624 				memmove(s->s, cs + 1, s->len + 1);
625 			}
626 			if ((cs = strchr(s->s, '/')) != NULL) {
627 				*cs = '\0';
628 				s->len = cs - s->s;
629 			}
630 			if ((cs = strchr(s->s, ' ')) != NULL) {
631 				*cs = '\0';
632 				s->len = cs - s->s;
633 			}
634 		}
635 	}
636 #endif
637 #endif
638 
639 	/*
640 	 * Read mount.fstab file(s), and treat each line as its own mount
641 	 * parameter.
642 	 */
643 	if (j->intparams[IP_MOUNT_FSTAB] != NULL) {
644 		TAILQ_FOREACH(s, &j->intparams[IP_MOUNT_FSTAB]->val, tq) {
645 			if (s->len == 0)
646 				continue;
647 			f = fopen(s->s, "r");
648 			if (f == NULL) {
649 				jail_warnx(j, "mount.fstab: %s: %s",
650 				    s->s, strerror(errno));
651 				error = -1;
652 				continue;
653 			}
654 			while ((ln = fgetln(f, &lnlen))) {
655 				if ((cs = memchr(ln, '#', lnlen - 1)))
656 					lnlen = cs - ln + 1;
657 				if (ln[lnlen - 1] == '\n' ||
658 				    ln[lnlen - 1] == '#')
659 					ln[lnlen - 1] = '\0';
660 				else {
661 					cs = alloca(lnlen + 1);
662 					strlcpy(cs, ln, lnlen + 1);
663 					ln = cs;
664 				}
665 				add_param(j, NULL, IP__MOUNT_FROM_FSTAB, ln);
666 			}
667 			fclose(f);
668 		}
669 	}
670 	if (error)
671 		failed(j);
672 	return error;
673 }
674 
675 /*
676  * Import parameters into libjail's binary jailparam format.
677  */
678 int
679 import_params(struct cfjail *j)
680 {
681 	struct cfparam *p;
682 	struct cfstring *s, *ts;
683 	struct jailparam *jp;
684 	char *value, *cs;
685 	size_t vallen;
686 	int error;
687 
688 	error = 0;
689 	j->njp = 0;
690 	TAILQ_FOREACH(p, &j->params, tq)
691 		if (!(p->flags & PF_INTERNAL))
692 			j->njp++;
693 	j->jp = jp = emalloc(j->njp * sizeof(struct jailparam));
694 	TAILQ_FOREACH(p, &j->params, tq) {
695 		if (p->flags & PF_INTERNAL)
696 			continue;
697 		if (jailparam_init(jp, p->name) < 0) {
698 			error = -1;
699 			jail_warnx(j, "%s", jail_errmsg);
700 			jp++;
701 			continue;
702 		}
703 		if (TAILQ_EMPTY(&p->val))
704 			value = NULL;
705 		else if (!jp->jp_elemlen ||
706 			 !TAILQ_NEXT(TAILQ_FIRST(&p->val), tq)) {
707 			/*
708 			 * Scalar parameters silently discard multiple (array)
709 			 * values, keeping only the last value added.  This
710 			 * lets values added from the command line append to
711 			 * arrays wthout pre-checking the type.
712 			 */
713 			value = TAILQ_LAST(&p->val, cfstrings)->s;
714 		} else {
715 			/*
716 			 * Convert arrays into comma-separated strings, which
717 			 * jailparam_import will then convert back into arrays.
718 			 */
719 			vallen = 0;
720 			TAILQ_FOREACH(s, &p->val, tq)
721 				vallen += s->len + 1;
722 			value = alloca(vallen);
723 			cs = value;
724 			TAILQ_FOREACH_SAFE(s, &p->val, tq, ts) {
725 				memcpy(cs, s->s, s->len);
726 				cs += s->len + 1;
727 				cs[-1] = ',';
728 			}
729 			value[vallen - 1] = '\0';
730 		}
731 		if (jailparam_import(jp, value) < 0) {
732 			error = -1;
733 			jail_warnx(j, "%s", jail_errmsg);
734 		}
735 		jp++;
736 	}
737 	if (error) {
738 		jailparam_free(j->jp, j->njp);
739 		free(j->jp);
740 		j->jp = NULL;
741 		failed(j);
742 	}
743 	return error;
744 }
745 
746 /*
747  * Check if options are equal (with or without the "no" prefix).
748  */
749 int
750 equalopts(const char *opt1, const char *opt2)
751 {
752 	char *p;
753 
754 	/* "opt" vs. "opt" or "noopt" vs. "noopt" */
755 	if (strcmp(opt1, opt2) == 0)
756 		return (1);
757 	/* "noopt" vs. "opt" */
758 	if (strncmp(opt1, "no", 2) == 0 && strcmp(opt1 + 2, opt2) == 0)
759 		return (1);
760 	/* "opt" vs. "noopt" */
761 	if (strncmp(opt2, "no", 2) == 0 && strcmp(opt1, opt2 + 2) == 0)
762 		return (1);
763 	while ((p = strchr(opt1, '.')) != NULL &&
764 	    !strncmp(opt1, opt2, ++p - opt1)) {
765 		opt2 += p - opt1;
766 		opt1 = p;
767 		/* "foo.noopt" vs. "foo.opt" */
768 		if (strncmp(opt1, "no", 2) == 0 && strcmp(opt1 + 2, opt2) == 0)
769 			return (1);
770 		/* "foo.opt" vs. "foo.noopt" */
771 		if (strncmp(opt2, "no", 2) == 0 && strcmp(opt1, opt2 + 2) == 0)
772 			return (1);
773 	}
774 	return (0);
775 }
776 
777 /*
778  * See if a jail name matches a wildcard.
779  */
780 int
781 wild_jail_match(const char *jname, const char *wname)
782 {
783 	const char *jc, *jd, *wc, *wd;
784 
785 	/*
786 	 * A non-final "*" component in the wild name matches a single jail
787 	 * component, and a final "*" matches one or more jail components.
788 	 */
789 	for (jc = jname, wc = wname;
790 	     (jd = strchr(jc, '.')) && (wd = strchr(wc, '.'));
791 	     jc = jd + 1, wc = wd + 1)
792 		if (strncmp(jc, wc, jd - jc + 1) && strncmp(wc, "*.", 2))
793 			return 0;
794 	return (!strcmp(jc, wc) || !strcmp(wc, "*"));
795 }
796 
797 /*
798  * Return if a jail name is a wildcard.
799  */
800 int
801 wild_jail_name(const char *wname)
802 {
803 	const char *wc;
804 
805 	for (wc = strchr(wname, '*'); wc; wc = strchr(wc + 1, '*'))
806 		if ((wc == wname || wc[-1] == '.') &&
807 		    (wc[1] == '\0' || wc[1] == '.'))
808 			return 1;
809 	return 0;
810 }
811 
812 /*
813  * Free a parameter record and all its strings and variables.
814  */
815 static void
816 free_param(struct cfparams *pp, struct cfparam *p)
817 {
818 	free(p->name);
819 	free_param_strings(p);
820 	TAILQ_REMOVE(pp, p, tq);
821 	free(p);
822 }
823 
824 static void
825 free_param_strings(struct cfparam *p)
826 {
827 	struct cfstring *s;
828 	struct cfvar *v;
829 
830 	while ((s = TAILQ_FIRST(&p->val))) {
831 		free(s->s);
832 		while ((v = STAILQ_FIRST(&s->vars))) {
833 			free(v->name);
834 			STAILQ_REMOVE_HEAD(&s->vars, tq);
835 			free(v);
836 		}
837 		TAILQ_REMOVE(&p->val, s, tq);
838 		free(s);
839 	}
840 }
841