Home | History | Annotate | Line # | Download | only in sysctl
sysctl.c revision 1.47
      1 /*	$NetBSD: sysctl.c,v 1.47 2001/06/16 12:00:04 jdolecek Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1993
      5  *	The Regents of the University of California.  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  * 3. All advertising materials mentioning features or use of this software
     16  *    must display the following acknowledgement:
     17  *	This product includes software developed by the University of
     18  *	California, Berkeley and its contributors.
     19  * 4. Neither the name of the University nor the names of its contributors
     20  *    may be used to endorse or promote products derived from this software
     21  *    without specific prior written permission.
     22  *
     23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     33  * SUCH DAMAGE.
     34  */
     35 
     36 #include <sys/cdefs.h>
     37 #ifndef lint
     38 __COPYRIGHT(
     39 "@(#) Copyright (c) 1993\n\
     40 	The Regents of the University of California.  All rights reserved.\n");
     41 #endif /* not lint */
     42 
     43 #ifndef lint
     44 #if 0
     45 static char sccsid[] = "@(#)sysctl.c	8.1 (Berkeley) 6/6/93";
     46 #else
     47 __RCSID("$NetBSD: sysctl.c,v 1.47 2001/06/16 12:00:04 jdolecek Exp $");
     48 #endif
     49 #endif /* not lint */
     50 
     51 #include <sys/param.h>
     52 #include <sys/gmon.h>
     53 #include <sys/stat.h>
     54 #include <sys/sysctl.h>
     55 #include <sys/socket.h>
     56 #include <sys/mount.h>
     57 #include <sys/mbuf.h>
     58 #include <sys/resource.h>
     59 #include <uvm/uvm_param.h>
     60 #include <machine/cpu.h>
     61 
     62 #include <ufs/ufs/dinode.h>
     63 #include <ufs/ufs/dir.h>
     64 #include <ufs/ffs/fs.h>
     65 #include <ufs/ffs/ffs_extern.h>
     66 
     67 #include <nfs/rpcv2.h>
     68 #include <nfs/nfsproto.h>
     69 #include <nfs/nfs.h>
     70 
     71 #include <netinet/in.h>
     72 #include <netinet/in_systm.h>
     73 #include <netinet/ip.h>
     74 #include <netinet/ip_icmp.h>
     75 #include <netinet/icmp_var.h>
     76 #include <netinet/ip_var.h>
     77 #include <netinet/udp.h>
     78 #include <netinet/udp_var.h>
     79 #include <netinet/tcp.h>
     80 #include <netinet/tcp_timer.h>
     81 #include <netinet/tcp_var.h>
     82 
     83 #ifdef INET6
     84 #include <netinet/ip6.h>
     85 #include <netinet/icmp6.h>
     86 #include <netinet6/ip6_var.h>
     87 #include <netinet6/udp6.h>
     88 #include <netinet6/udp6_var.h>
     89 #ifdef TCP6
     90 #include <netinet6/tcp6.h>
     91 #include <netinet6/tcp6_timer.h>
     92 #include <netinet6/tcp6_var.h>
     93 #endif
     94 #include <netinet6/pim6_var.h>
     95 #endif /* INET6 */
     96 
     97 #ifdef IPSEC
     98 #include <net/route.h>
     99 #include <netinet6/ipsec.h>
    100 #include <netkey/key_var.h>
    101 #endif /* IPSEC */
    102 
    103 #include <err.h>
    104 #include <ctype.h>
    105 #include <errno.h>
    106 #include <stdio.h>
    107 #include <stdlib.h>
    108 #include <string.h>
    109 #include <unistd.h>
    110 #include <util.h>
    111 
    112 struct ctlname topname[] = CTL_NAMES;
    113 struct ctlname kernname[] = CTL_KERN_NAMES;
    114 struct ctlname vmname[] = CTL_VM_NAMES;
    115 struct ctlname vfsname[] = CTL_VFS_NAMES;
    116 struct ctlname netname[] = CTL_NET_NAMES;
    117 struct ctlname hwname[] = CTL_HW_NAMES;
    118 struct ctlname username[] = CTL_USER_NAMES;
    119 struct ctlname ddbname[] = CTL_DDB_NAMES;
    120 struct ctlname debugname[CTL_DEBUG_MAXID];
    121 #ifdef CTL_MACHDEP_NAMES
    122 struct ctlname machdepname[] = CTL_MACHDEP_NAMES;
    123 #endif
    124 /* this one is dummy, it's used only for '-a' or '-A' */
    125 struct ctlname procname[] = { {0, 0}, {"curproc", CTLTYPE_NODE} };
    126 
    127 char names[BUFSIZ];
    128 
    129 struct list {
    130 	struct	ctlname *list;
    131 	int	size;
    132 };
    133 struct list toplist = { topname, CTL_MAXID };
    134 struct list secondlevel[] = {
    135 	{ 0, 0 },			/* CTL_UNSPEC */
    136 	{ kernname, KERN_MAXID },	/* CTL_KERN */
    137 	{ vmname, VM_MAXID },		/* CTL_VM */
    138 	{ vfsname, VFS_MAXID },		/* CTL_VFS */
    139 	{ netname, NET_MAXID },		/* CTL_NET */
    140 	{ 0, CTL_DEBUG_MAXID },		/* CTL_DEBUG */
    141 	{ hwname, HW_MAXID },		/* CTL_HW */
    142 #ifdef CTL_MACHDEP_NAMES
    143 	{ machdepname, CPU_MAXID },	/* CTL_MACHDEP */
    144 #else
    145 	{ 0, 0 },			/* CTL_MACHDEP */
    146 #endif
    147 	{ username, USER_MAXID },	/* CTL_USER_NAMES */
    148 	{ ddbname, DDBCTL_MAXID },	/* CTL_DDB_NAMES */
    149 	{ procname, 2 },		/* dummy name */
    150 	{ 0, 0},
    151 };
    152 
    153 int	Aflag, aflag, nflag, wflag;
    154 
    155 /*
    156  * Variables requiring special processing.
    157  */
    158 #define	CLOCK		0x00000001
    159 #define	BOOTTIME	0x00000002
    160 #define	CONSDEV		0x00000004
    161 #define	DISKINFO	0x00000008
    162 #define	CPTIME		0x00000010
    163 
    164 /*
    165  * A dummy type for limits, which requires special parsing
    166  */
    167 #define CTLTYPE_LIMIT	((~0x1) << 31)
    168 
    169 int main __P((int, char *[]));
    170 
    171 static void listall __P((const char *, struct list *));
    172 static void parse __P((char *, int));
    173 static void debuginit __P((void));
    174 static int sysctl_inet __P((char *, char **, int[], int, int *));
    175 #ifdef INET6
    176 static int sysctl_inet6 __P((char *, char **, int[], int, int *));
    177 #endif
    178 #ifdef IPSEC
    179 static int sysctl_key __P((char *, char **, int[], int, int *));
    180 #endif
    181 static int sysctl_vfs __P((char *, char **, int[], int, int *));
    182 static int sysctl_vfsgen __P((char *, char **, int[], int, int *));
    183 static int sysctl_mbuf __P((char *, char **, int[], int, int *));
    184 static int sysctl_pipe __P((char *, char **, int[], int, int *));
    185 static int sysctl_proc __P((char *, char **, int[], int, int *));
    186 static int findname __P((char *, char *, char **, struct list *));
    187 static void usage __P((void));
    188 
    189 int
    190 main(argc, argv)
    191 	int argc;
    192 	char *argv[];
    193 {
    194 	char *fn = NULL;
    195 	int ch, lvl1;
    196 
    197 	while ((ch = getopt(argc, argv, "Aaf:nw")) != -1) {
    198 		switch (ch) {
    199 
    200 		case 'A':
    201 			Aflag = 1;
    202 			break;
    203 
    204 		case 'a':
    205 			aflag = 1;
    206 			break;
    207 
    208 		case 'f':
    209 			fn = optarg;
    210 			wflag = 1;
    211 			break;
    212 
    213 		case 'n':
    214 			nflag = 1;
    215 			break;
    216 
    217 		case 'w':
    218 			wflag = 1;
    219 			break;
    220 
    221 		default:
    222 			usage();
    223 		}
    224 	}
    225 	argc -= optind;
    226 	argv += optind;
    227 
    228 	if (Aflag || aflag) {
    229 		debuginit();
    230 		for (lvl1 = 1; lvl1 < CTL_MAXID; lvl1++)
    231 			listall(topname[lvl1].ctl_name, &secondlevel[lvl1]);
    232 		return 0;
    233 	}
    234 
    235 	if (fn) {
    236 		FILE *fp;
    237 		char *l;
    238 
    239 		fp = fopen(fn, "r");
    240 		if (fp == NULL) {
    241 			err(1, "%s", fn);
    242 		} else {
    243 			for (; (l = fparseln(fp, NULL, NULL, NULL, 0)) != NULL;
    244 			    free(l)) {
    245 				if (*l)
    246 					parse(l, 1);
    247 			}
    248 			fclose(fp);
    249 		}
    250 	} else {
    251 		if (argc == 0)
    252 			usage();
    253 		while (argc-- > 0)
    254 			parse(*argv++, 1);
    255 	}
    256 	return 0;
    257 }
    258 
    259 /*
    260  * List all variables known to the system.
    261  */
    262 static void
    263 listall(prefix, lp)
    264 	const char *prefix;
    265 	struct list *lp;
    266 {
    267 	int lvl2;
    268 	char *cp, name[BUFSIZ];
    269 
    270 	if (lp->list == 0)
    271 		return;
    272 	strcpy(name, prefix);
    273 	cp = &name[strlen(name)];
    274 	*cp++ = '.';
    275 	for (lvl2 = 0; lvl2 < lp->size; lvl2++) {
    276 		if (lp->list[lvl2].ctl_name == 0)
    277 			continue;
    278 		strcpy(cp, lp->list[lvl2].ctl_name);
    279 		parse(name, Aflag);
    280 	}
    281 }
    282 
    283 /*
    284  * Parse a name into a MIB entry.
    285  * Lookup and print out the MIB entry if it exists.
    286  * Set a new value if requested.
    287  */
    288 static void
    289 parse(string, flags)
    290 	char *string;
    291 	int flags;
    292 {
    293 	int indx, type, state, len;
    294 	int special = 0;
    295 	void *newval = 0;
    296 	int intval, newsize = 0;
    297 	quad_t quadval;
    298 	size_t size;
    299 	struct list *lp;
    300 	int mib[CTL_MAXNAME];
    301 	char *cp, *bufp, buf[BUFSIZ];
    302 	double loads[3];
    303 
    304 	bufp = buf;
    305 	snprintf(buf, BUFSIZ, "%s", string);
    306 	if ((cp = strchr(string, '=')) != NULL) {
    307 		if (!wflag)
    308 			errx(2, "Must specify -w to set variables");
    309 		*strchr(buf, '=') = '\0';
    310 		*cp++ = '\0';
    311 		while (isspace((unsigned char) *cp))
    312 			cp++;
    313 		newval = cp;
    314 		newsize = strlen(cp);
    315 	}
    316 	if ((indx = findname(string, "top", &bufp, &toplist)) == -1)
    317 		return;
    318 	mib[0] = indx;
    319 	if (indx == CTL_DEBUG)
    320 		debuginit();
    321 	if (mib[0] == CTL_PROC) {
    322 		type = CTLTYPE_NODE;
    323 		len = 1;
    324 	} else {
    325 		lp = &secondlevel[indx];
    326 		if (lp->list == 0) {
    327 			warnx("Class `%s' is not implemented",
    328 			topname[indx].ctl_name);
    329 			return;
    330 		}
    331 		if (bufp == NULL) {
    332 			listall(topname[indx].ctl_name, lp);
    333 			return;
    334 		}
    335 		if ((indx = findname(string, "second", &bufp, lp)) == -1)
    336 			return;
    337 		mib[1] = indx;
    338 		type = lp->list[indx].ctl_type;
    339 		len = 2;
    340 	}
    341 	switch (mib[0]) {
    342 
    343 	case CTL_KERN:
    344 		switch (mib[1]) {
    345 		case KERN_PROF:
    346 			mib[2] = GPROF_STATE;
    347 			size = sizeof state;
    348 			if (sysctl(mib, 3, &state, &size, NULL, 0) < 0) {
    349 				if (flags == 0)
    350 					return;
    351 				if (!nflag)
    352 					printf("%s: ", string);
    353 				warnx("Kernel is not compiled for profiling");
    354 				return;
    355 			}
    356 			if (!nflag)
    357 				printf("%s: %s\n", string,
    358 				    state == GMON_PROF_OFF ? "off" : "running");
    359 			return;
    360 		case KERN_VNODE:
    361 		case KERN_FILE:
    362 			if (flags == 0)
    363 				return;
    364 			warnx("Use pstat to view %s information", string);
    365 			return;
    366 		case KERN_PROC:
    367 		case KERN_PROC2:
    368 		case KERN_PROC_ARGS:
    369 			if (flags == 0)
    370 				return;
    371 			warnx("Use ps to view %s information", string);
    372 			return;
    373 		case KERN_CLOCKRATE:
    374 			special |= CLOCK;
    375 			break;
    376 		case KERN_BOOTTIME:
    377 			special |= BOOTTIME;
    378 			break;
    379 		case KERN_NTPTIME:
    380 			if (flags == 0)
    381 				return;
    382 			warnx("Use ntpdc -c kerninfo to view %s information",
    383 			    string);
    384 			return;
    385 		case KERN_MBUF:
    386 			len = sysctl_mbuf(string, &bufp, mib, flags, &type);
    387 			if (len < 0)
    388 				return;
    389 			break;
    390 		case KERN_CP_TIME:
    391 			special |= CPTIME;
    392 			break;
    393 		case KERN_MSGBUF:
    394 			if (flags == 0)
    395 				return;
    396 			warnx("Use dmesg to view %s information", string);
    397 			return;
    398 		case KERN_CONSDEV:
    399 			special |= CONSDEV;
    400 			break;
    401 		case KERN_PIPE:
    402 			len = sysctl_pipe(string, &bufp, mib, flags, &type);
    403 			if (len < 0)
    404 				return;
    405 			break;
    406 		}
    407 		break;
    408 
    409 	case CTL_HW:
    410 		break;
    411 
    412 	case CTL_VM:
    413 		switch (mib[1]) {
    414 		case VM_LOADAVG:
    415 			getloadavg(loads, 3);
    416 			if (!nflag)
    417 				printf("%s: ", string);
    418 			printf("%.2f %.2f %.2f\n", loads[0], loads[1],
    419 			    loads[2]);
    420 			return;
    421 
    422 		case VM_METER:
    423 		case VM_UVMEXP:
    424 		case VM_UVMEXP2:
    425 			if (flags) {
    426 				warnx("Use vmstat or systat to view %s"
    427 				    "information", string);
    428 			}
    429 			return;
    430 		}
    431 		break;
    432 
    433 	case CTL_NET:
    434 		if (mib[1] == PF_INET) {
    435 			len = sysctl_inet(string, &bufp, mib, flags, &type);
    436 			if (len >= 0)
    437 				break;
    438 			return;
    439 		}
    440 #ifdef INET6
    441 		else if (mib[1] == PF_INET6) {
    442 			len = sysctl_inet6(string, &bufp, mib, flags, &type);
    443 			if (len >= 0)
    444 				break;
    445 			return;
    446 		}
    447 #endif /* INET6 */
    448 #ifdef IPSEC
    449 		else if (mib[1] == PF_KEY) {
    450 			len = sysctl_key(string, &bufp, mib, flags, &type);
    451 			if (len >= 0)
    452 				break;
    453 			return;
    454 		}
    455 #endif /* IPSEC */
    456 		if (flags == 0)
    457 			return;
    458 		warnx("Use netstat to view %s information", string);
    459 		return;
    460 
    461 	case CTL_DEBUG:
    462 		mib[2] = CTL_DEBUG_VALUE;
    463 		len = 3;
    464 		break;
    465 
    466 	case CTL_MACHDEP:
    467 #ifdef CPU_CONSDEV
    468 		if (mib[1] == CPU_CONSDEV)
    469 			special |= CONSDEV;
    470 #endif
    471 #ifdef CPU_DISKINFO
    472 		if (mib[1] == CPU_DISKINFO)
    473 			special |= DISKINFO;
    474 #endif
    475 		break;
    476 
    477 	case CTL_VFS:
    478 		if (mib[1] == VFS_GENERIC)
    479 			len = sysctl_vfsgen(string, &bufp, mib, flags, &type);
    480 		else
    481 			len = sysctl_vfs(string, &bufp, mib, flags, &type);
    482 		if (len < 0)
    483 			return;
    484 
    485 		/* XXX Special-case for NFS stats. */
    486 		if (mib[1] == 2 && mib[2] == NFS_NFSSTATS) {
    487 			if (flags == 0)
    488 				return;
    489 			warnx("Use nfsstat to view %s information", string);
    490 			return;
    491 		}
    492 		break;
    493 
    494 	case CTL_VENDOR:
    495 	case CTL_USER:
    496 	case CTL_DDB:
    497 		break;
    498 	case CTL_PROC:
    499 		len = sysctl_proc(string, &bufp, mib, flags, &type);
    500 		if (len < 0)
    501 			return;
    502 		break;
    503 	default:
    504 		warnx("Illegal top level value: %d", mib[0]);
    505 		return;
    506 
    507 	}
    508 	if (bufp) {
    509 		warnx("Name %s in %s is unknown", bufp, string);
    510 		return;
    511 	}
    512 	if (newsize > 0) {
    513 		switch (type) {
    514 		case CTLTYPE_INT:
    515 			intval = atoi(newval);
    516 			newval = &intval;
    517 			newsize = sizeof intval;
    518 			break;
    519 
    520 		case CTLTYPE_LIMIT:
    521 			if (strcmp(newval, "unlimited") == 0) {
    522 				quadval = RLIM_INFINITY;
    523 				newval = &quadval;
    524 				newsize = sizeof quadval;
    525 				break;
    526 			}
    527 			/* FALLTHROUGH */
    528 		case CTLTYPE_QUAD:
    529 			sscanf(newval, "%lld", (long long *)&quadval);
    530 			newval = &quadval;
    531 			newsize = sizeof quadval;
    532 			break;
    533 		}
    534 	}
    535 	size = BUFSIZ;
    536 	if (sysctl(mib, len, buf, &size, newsize ? newval : 0, newsize) == -1) {
    537 		if (flags == 0)
    538 			return;
    539 		switch (errno) {
    540 		case EOPNOTSUPP:
    541 			warnx("The value of %s is not available", string);
    542 			return;
    543 		case ENOTDIR:
    544 			warnx("The specification of %s is incomplete",
    545 			    string);
    546 			return;
    547 		case ENOMEM:
    548 			warnx("The type %s is unknown to this program",
    549 			    string);
    550 			return;
    551 		default:
    552 			warn("sysctl() for %s failed", string);
    553 			return;
    554 		}
    555 	}
    556 	if (special & CLOCK) {
    557 		struct clockinfo *clkp = (struct clockinfo *)buf;
    558 
    559 		if (!nflag)
    560 			printf("%s: ", string);
    561 		printf(
    562 		    "tick = %d, tickadj = %d, hz = %d, profhz = %d, stathz = %d\n",
    563 		    clkp->tick, clkp->tickadj, clkp->hz, clkp->profhz, clkp->stathz);
    564 		return;
    565 	}
    566 	if (special & BOOTTIME) {
    567 		struct timeval *btp = (struct timeval *)buf;
    568 		time_t boottime;
    569 
    570 		if (!nflag) {
    571 			boottime = btp->tv_sec;
    572 			/* ctime() provides the trailing newline */
    573 			printf("%s = %s", string, ctime(&boottime));
    574 		} else
    575 			printf("%ld\n", (long) btp->tv_sec);
    576 		return;
    577 	}
    578 	if (special & CONSDEV) {
    579 		dev_t dev = *(dev_t *)buf;
    580 
    581 		if (!nflag)
    582 			printf("%s = %s\n", string, devname(dev, S_IFCHR));
    583 		else
    584 			printf("0x%x\n", dev);
    585 		return;
    586 	}
    587 	if (special & DISKINFO) {
    588 		/* Don't know a good way to deal with this i386 specific one */
    589 		return;
    590 	}
    591 	if (special & CPTIME) {
    592 		u_int64_t *cp_time = (u_int64_t *)buf;
    593 
    594 		if (!nflag)
    595 			printf("%s: ", string);
    596 		printf("user = %llu, nice = %llu, sys = %llu, intr = %llu, "
    597 		    "idle = %llu\n", (unsigned long long) cp_time[0],
    598 		    (unsigned long long) cp_time[1],
    599 		    (unsigned long long) cp_time[2],
    600 		    (unsigned long long) cp_time[3],
    601 		    (unsigned long long) cp_time[4]);
    602 		return;
    603 	}
    604 
    605 	switch (type) {
    606 	case CTLTYPE_INT:
    607 		if (newsize == 0) {
    608 			if (!nflag)
    609 				printf("%s = ", string);
    610 			printf("%d\n", *(int *)buf);
    611 		} else {
    612 			if (!nflag)
    613 				printf("%s: %d -> ", string, *(int *)buf);
    614 			printf("%d\n", *(int *)newval);
    615 		}
    616 		return;
    617 
    618 	case CTLTYPE_STRING:
    619 		if (newsize == 0) {
    620 			if (!nflag)
    621 				printf("%s = ", string);
    622 			printf("%s\n", buf);
    623 		} else {
    624 			if (!nflag)
    625 				printf("%s: %s -> ", string, buf);
    626 			printf("%s\n", (char *) newval);
    627 		}
    628 		return;
    629 
    630 	case CTLTYPE_LIMIT:
    631 #define PRINTF_LIMIT(lim) { \
    632 if ((lim) == RLIM_INFINITY) \
    633 	printf("unlimited");\
    634 else \
    635 	printf("%lld", (long long)(lim)); \
    636 }
    637 
    638 		if (newsize == 0) {
    639 			if (!nflag)
    640 				printf("%s = ", string);
    641 			PRINTF_LIMIT((long long)(*(quad_t *)buf));
    642 		} else {
    643 			if (!nflag) {
    644 				printf("%s: ", string);
    645 				PRINTF_LIMIT((long long)(*(quad_t *)buf));
    646 				printf(" -> ");
    647 			}
    648 			PRINTF_LIMIT((long long)(*(quad_t *)newval));
    649 		}
    650 		printf("\n");
    651 		return;
    652 #undef PRINTF_LIMIT
    653 
    654 	case CTLTYPE_QUAD:
    655 		if (newsize == 0) {
    656 			if (!nflag)
    657 				printf("%s = ", string);
    658 			printf("%lld\n", (long long)(*(quad_t *)buf));
    659 		} else {
    660 			if (!nflag)
    661 				printf("%s: %lld -> ", string,
    662 				    (long long)(*(quad_t *)buf));
    663 			printf("%lld\n", (long long)(*(quad_t *)newval));
    664 		}
    665 		return;
    666 
    667 	case CTLTYPE_STRUCT:
    668 		warnx("%s: unknown structure returned", string);
    669 		return;
    670 
    671 	default:
    672 	case CTLTYPE_NODE:
    673 		warnx("%s: unknown type returned", string);
    674 		return;
    675 	}
    676 }
    677 
    678 /*
    679  * Initialize the set of debugging names
    680  */
    681 static void
    682 debuginit()
    683 {
    684 	int mib[3], loc, i;
    685 	size_t size;
    686 
    687 	if (secondlevel[CTL_DEBUG].list != 0)
    688 		return;
    689 	secondlevel[CTL_DEBUG].list = debugname;
    690 	mib[0] = CTL_DEBUG;
    691 	mib[2] = CTL_DEBUG_NAME;
    692 	for (loc = 0, i = 0; i < CTL_DEBUG_MAXID; i++) {
    693 		mib[1] = i;
    694 		size = BUFSIZ - loc;
    695 		if (sysctl(mib, 3, &names[loc], &size, NULL, 0) == -1)
    696 			continue;
    697 		debugname[i].ctl_name = &names[loc];
    698 		debugname[i].ctl_type = CTLTYPE_INT;
    699 		loc += size;
    700 	}
    701 }
    702 
    703 struct ctlname inetname[] = CTL_IPPROTO_NAMES;
    704 struct ctlname ipname[] = IPCTL_NAMES;
    705 struct ctlname icmpname[] = ICMPCTL_NAMES;
    706 struct ctlname tcpname[] = TCPCTL_NAMES;
    707 struct ctlname udpname[] = UDPCTL_NAMES;
    708 #ifdef IPSEC
    709 struct ctlname ipsecname[] = IPSECCTL_NAMES;
    710 #endif
    711 struct list inetlist = { inetname, IPPROTO_MAXID };
    712 struct list inetvars[] = {
    713 /*0*/	{ ipname, IPCTL_MAXID },	/* ip */
    714 	{ icmpname, ICMPCTL_MAXID },	/* icmp */
    715 	{ 0, 0 },			/* igmp */
    716 	{ 0, 0 },			/* ggmp */
    717 	{ 0, 0 },
    718 	{ 0, 0 },
    719 	{ tcpname, TCPCTL_MAXID },	/* tcp */
    720 	{ 0, 0 },
    721 	{ 0, 0 },			/* egp */
    722 	{ 0, 0 },
    723 /*10*/	{ 0, 0 },
    724 	{ 0, 0 },
    725 	{ 0, 0 },			/* pup */
    726 	{ 0, 0 },
    727 	{ 0, 0 },
    728 	{ 0, 0 },
    729 	{ 0, 0 },
    730 	{ udpname, UDPCTL_MAXID },	/* udp */
    731 	{ 0, 0 },
    732 	{ 0, 0 },
    733 /*20*/	{ 0, 0 },
    734 	{ 0, 0 },
    735 	{ 0, 0 },			/* idp */
    736 	{ 0, 0 },
    737 	{ 0, 0 },
    738 	{ 0, 0 },
    739 	{ 0, 0 },
    740 	{ 0, 0 },
    741 	{ 0, 0 },
    742 	{ 0, 0 },
    743 /*30*/	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    744 	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    745 /*40*/	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    746 	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    747 #ifdef IPSEC
    748 	{ ipsecname, IPSECCTL_MAXID },	/* esp - for backward compatibility */
    749 	{ ipsecname, IPSECCTL_MAXID },	/* ah */
    750 #else
    751 	{ 0, 0 },
    752 	{ 0, 0 },
    753 #endif
    754 };
    755 
    756 /*
    757  * handle internet requests
    758  */
    759 static int
    760 sysctl_inet(string, bufpp, mib, flags, typep)
    761 	char *string;
    762 	char **bufpp;
    763 	int mib[];
    764 	int flags;
    765 	int *typep;
    766 {
    767 	struct list *lp;
    768 	int indx;
    769 
    770 	if (*bufpp == NULL) {
    771 		listall(string, &inetlist);
    772 		return (-1);
    773 	}
    774 	if ((indx = findname(string, "third", bufpp, &inetlist)) == -1)
    775 		return (-1);
    776 	mib[2] = indx;
    777 	if (indx <= IPPROTO_MAXID && inetvars[indx].list != NULL)
    778 		lp = &inetvars[indx];
    779 	else if (!flags)
    780 		return (-1);
    781 	else {
    782 		warnx("No variables defined for protocol %s", string);
    783 		return (-1);
    784 	}
    785 	if (*bufpp == NULL) {
    786 		listall(string, lp);
    787 		return (-1);
    788 	}
    789 	if ((indx = findname(string, "fourth", bufpp, lp)) == -1)
    790 		return (-1);
    791 	mib[3] = indx;
    792 	*typep = lp->list[indx].ctl_type;
    793 	return (4);
    794 }
    795 
    796 #ifdef INET6
    797 struct ctlname inet6name[] = CTL_IPV6PROTO_NAMES;
    798 struct ctlname ip6name[] = IPV6CTL_NAMES;
    799 struct ctlname icmp6name[] = ICMPV6CTL_NAMES;
    800 #ifdef TCP6
    801 struct ctlname tcp6name[] = TCP6CTL_NAMES;
    802 #endif
    803 struct ctlname udp6name[] = UDP6CTL_NAMES;
    804 struct ctlname pim6name[] = PIM6CTL_NAMES;
    805 struct ctlname ipsec6name[] = IPSEC6CTL_NAMES;
    806 struct list inet6list = { inet6name, IPV6PROTO_MAXID };
    807 struct list inet6vars[] = {
    808 /*0*/	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    809 	{ 0, 0 },
    810 #ifdef TCP6
    811 	{ tcp6name, TCP6CTL_MAXID },	/* tcp6 */
    812 #else
    813 	{ 0, 0 },
    814 #endif
    815 	{ 0, 0 },
    816 	{ 0, 0 },
    817 	{ 0, 0 },
    818 /*10*/	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    819 	{ 0, 0 },
    820 	{ 0, 0 },
    821 	{ udp6name, UDP6CTL_MAXID },	/* udp6 */
    822 	{ 0, 0 },
    823 	{ 0, 0 },
    824 /*20*/	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    825 	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    826 /*30*/	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    827 	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    828 /*40*/	{ 0, 0 },
    829 	{ ip6name, IPV6CTL_MAXID },	/* ipv6 */
    830 	{ 0, 0 },
    831 	{ 0, 0 },
    832 	{ 0, 0 },
    833 	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    834 #ifdef IPSEC
    835 /*50*/	{ ipsec6name, IPSECCTL_MAXID },	/* esp6 - for backward compatibility */
    836 	{ ipsec6name, IPSECCTL_MAXID },	/* ah6 */
    837 #else
    838 	{ 0, 0 },
    839 	{ 0, 0 },
    840 #endif
    841 	{ 0, 0 },
    842 	{ 0, 0 },
    843 	{ 0, 0 },
    844 	{ 0, 0 },
    845 	{ 0, 0 },
    846 	{ 0, 0 },
    847 	{ icmp6name, ICMPV6CTL_MAXID },	/* icmp6 */
    848 	{ 0, 0 },
    849 /*60*/	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    850 	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    851 /*70*/	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    852 	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    853 /*80*/	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    854 	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    855 /*90*/	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    856 	{ 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 },
    857 /*100*/	{ 0, 0 },
    858 	{ 0, 0 },
    859 	{ 0, 0 },
    860 	{ pim6name, PIM6CTL_MAXID },	/* pim6 */
    861 };
    862 
    863 /*
    864  * handle internet6 requests
    865  */
    866 static int
    867 sysctl_inet6(string, bufpp, mib, flags, typep)
    868 	char *string;
    869 	char **bufpp;
    870 	int mib[];
    871 	int flags;
    872 	int *typep;
    873 {
    874 	struct list *lp;
    875 	int indx;
    876 
    877 	if (*bufpp == NULL) {
    878 		listall(string, &inet6list);
    879 		return (-1);
    880 	}
    881 	if ((indx = findname(string, "third", bufpp, &inet6list)) == -1)
    882 		return (-1);
    883 	mib[2] = indx;
    884 	if (indx <= sizeof(inet6vars)/sizeof(inet6vars[0])
    885 	 && inet6vars[indx].list != NULL) {
    886 		lp = &inet6vars[indx];
    887 	} else if (!flags) {
    888 		return (-1);
    889 	} else {
    890 		fprintf(stderr, "%s: no variables defined for this protocol\n",
    891 		    string);
    892 		return (-1);
    893 	}
    894 	if (*bufpp == NULL) {
    895 		listall(string, lp);
    896 		return (-1);
    897 	}
    898 	if ((indx = findname(string, "fourth", bufpp, lp)) == -1)
    899 		return (-1);
    900 	mib[3] = indx;
    901 	*typep = lp->list[indx].ctl_type;
    902 	return (4);
    903 }
    904 #endif /* INET6 */
    905 
    906 #ifdef IPSEC
    907 struct ctlname keynames[] = KEYCTL_NAMES;
    908 struct list keylist = { keynames, KEYCTL_MAXID };
    909 
    910 /*
    911  * handle key requests
    912  */
    913 static int
    914 sysctl_key(string, bufpp, mib, flags, typep)
    915 	char *string;
    916 	char **bufpp;
    917 	int mib[];
    918 	int flags;
    919 	int *typep;
    920 {
    921 	struct list *lp;
    922 	int indx;
    923 
    924 	if (*bufpp == NULL) {
    925 		listall(string, &keylist);
    926 		return (-1);
    927 	}
    928 	if ((indx = findname(string, "third", bufpp, &keylist)) == -1)
    929 		return (-1);
    930 	mib[2] = indx;
    931 	lp = &keylist;
    932 	*typep = lp->list[indx].ctl_type;
    933 	return 3;
    934 }
    935 #endif /*IPSEC*/
    936 
    937 struct ctlname ffsname[] = FFS_NAMES;
    938 struct ctlname nfsname[] = NFS_NAMES;
    939 struct list vfsvars[] = {
    940 	{ 0, 0 },			/* generic */
    941 	{ ffsname, FFS_MAXID },		/* FFS */
    942 	{ nfsname, NFS_MAXID },		/* NFS */
    943 	{ 0, 0 },			/* MFS */
    944 	{ 0, 0 },			/* MSDOS */
    945 	{ 0, 0 },			/* LFS */
    946 	{ 0, 0 },			/* old LOFS */
    947 	{ 0, 0 },			/* FDESC */
    948 	{ 0, 0 },			/* PORTAL */
    949 	{ 0, 0 },			/* NULL */
    950 	{ 0, 0 },			/* UMAP */
    951 	{ 0, 0 },			/* KERNFS */
    952 	{ 0, 0 },			/* PROCFS */
    953 	{ 0, 0 },			/* AFS */
    954 	{ 0, 0 },			/* CD9660 */
    955 	{ 0, 0 },			/* UNION */
    956 	{ 0, 0 },			/* ADOSFS */
    957 	{ 0, 0 },			/* EXT2FS */
    958 	{ 0, 0 },			/* CODA */
    959 	{ 0, 0 },			/* FILECORE */
    960 };
    961 
    962 /*
    963  * handle vfs requests
    964  */
    965 static int
    966 sysctl_vfs(string, bufpp, mib, flags, typep)
    967 	char *string;
    968 	char **bufpp;
    969 	int mib[];
    970 	int flags;
    971 	int *typep;
    972 {
    973 	struct list *lp = &vfsvars[mib[1]];
    974 	int indx;
    975 
    976 	if (lp->list == NULL) {
    977 		if (flags)
    978 			warnx("No variables defined for file system %s",
    979 			    string);
    980 		return (-1);
    981 	}
    982 	if (*bufpp == NULL) {
    983 		listall(string, lp);
    984 		return (-1);
    985 	}
    986 	if ((indx = findname(string, "third", bufpp, lp)) == -1)
    987 		return (-1);
    988 	mib[2] = indx;
    989 	*typep = lp->list[indx].ctl_type;
    990 	return (3);
    991 }
    992 
    993 struct ctlname vfsgenname[] = CTL_VFSGENCTL_NAMES;
    994 struct list vfsgenvars = { vfsgenname, VFSGEN_MAXID };
    995 
    996 /*
    997  * handle vfs.generic requests
    998  */
    999 static int
   1000 sysctl_vfsgen(string, bufpp, mib, flags, typep)
   1001 	char *string;
   1002 	char **bufpp;
   1003 	int mib[];
   1004 	int flags;
   1005 	int *typep;
   1006 {
   1007 	struct list *lp = &vfsgenvars;
   1008 	int indx;
   1009 
   1010 	if (*bufpp == NULL) {
   1011 		listall(string, lp);
   1012 		return (-1);
   1013 	}
   1014 	if ((indx = findname(string, "third", bufpp, lp)) == -1)
   1015 		return (-1);
   1016 	/* Don't bother with VFS_CONF. */
   1017 	if (indx == VFS_CONF)
   1018 		return (-1);
   1019 	mib[2] = indx;
   1020 	*typep = lp->list[indx].ctl_type;
   1021 	return (3);
   1022 }
   1023 
   1024 struct ctlname procnames[] = PROC_PID_NAMES;
   1025 struct list procvars = {procnames, PROC_PID_MAXID};
   1026 struct ctlname proclimitnames[] = PROC_PID_LIMIT_NAMES;
   1027 struct list proclimitvars = {proclimitnames, PROC_PID_LIMIT_MAXID};
   1028 struct ctlname proclimittypenames[] = PROC_PID_LIMIT_TYPE_NAMES;
   1029 struct list proclimittypevars = {proclimittypenames,
   1030     PROC_PID_LIMIT_TYPE_MAXID};
   1031 /*
   1032  * handle kern.proc requests
   1033  */
   1034 static int
   1035 sysctl_proc(string, bufpp, mib, flags, typep)
   1036 	char *string;
   1037 	char **bufpp;
   1038 	int mib[];
   1039 	int flags;
   1040 	int *typep;
   1041 {
   1042 	char *cp, name[BUFSIZ];
   1043 	struct list *lp;
   1044 	int indx;
   1045 
   1046 	if (*bufpp == NULL) {
   1047 		strcpy(name, string);
   1048 		cp = &name[strlen(name)];
   1049 		*cp++ = '.';
   1050 		strcpy(cp, "curproc");
   1051 		parse(name, Aflag);
   1052 		return (-1);
   1053 	}
   1054 	cp = strsep(bufpp, ".");
   1055 	if (cp == NULL) {
   1056 		warnx("%s: incomplete specification", string);
   1057 		return (-1);
   1058 	}
   1059 	if (strcmp(cp, "curproc") == 0) {
   1060 		mib[1] = PROC_CURPROC;
   1061 	} else {
   1062 		mib[1] = atoi(cp);
   1063 		if (mib[1] == 0) {
   1064 			warnx("second level name %s in %s is invalid", cp,
   1065 			    string);
   1066 			return (-1);
   1067 		}
   1068 	}
   1069 	*typep = CTLTYPE_NODE;
   1070 	lp = &procvars;
   1071 	if (*bufpp == NULL) {
   1072 		listall(string, lp);
   1073 		return (-1);
   1074 	}
   1075 	if ((indx = findname(string, "third", bufpp, lp)) == -1)
   1076 		return (-1);
   1077 	mib[2] = indx;
   1078 	*typep = lp->list[indx].ctl_type;
   1079 	if (*typep != CTLTYPE_NODE)
   1080 		return(3);
   1081 	lp = &proclimitvars;
   1082 	if (*bufpp == NULL) {
   1083 		listall(string, lp);
   1084 		return (-1);
   1085 	}
   1086 	if ((indx = findname(string, "fourth", bufpp, lp)) == -1)
   1087 		return (-1);
   1088 	mib[3] = indx;
   1089 	lp = &proclimittypevars;
   1090 	if (*bufpp == NULL) {
   1091 		listall(string, lp);
   1092 		return (-1);
   1093 	}
   1094 	if ((indx = findname(string, "fifth", bufpp, lp)) == -1)
   1095 		return (-1);
   1096 	mib[4] = indx;
   1097 	*typep = CTLTYPE_LIMIT;
   1098 	return(5);
   1099 }
   1100 
   1101 struct ctlname mbufnames[] = CTL_MBUF_NAMES;
   1102 struct list mbufvars = { mbufnames, MBUF_MAXID };
   1103 /*
   1104  * handle kern.mbuf requests
   1105  */
   1106 static int
   1107 sysctl_mbuf(string, bufpp, mib, flags, typep)
   1108 	char *string;
   1109 	char **bufpp;
   1110 	int mib[];
   1111 	int flags;
   1112 	int *typep;
   1113 {
   1114 	struct list *lp = &mbufvars;
   1115 	int indx;
   1116 
   1117 	if (*bufpp == NULL) {
   1118 		listall(string, lp);
   1119 		return (-1);
   1120 	}
   1121 	if ((indx = findname(string, "third", bufpp, lp)) == -1)
   1122 		return (-1);
   1123 	mib[2] = indx;
   1124 	*typep = lp->list[indx].ctl_type;
   1125 	return (3);
   1126 }
   1127 
   1128 struct ctlname pipenames[] = CTL_PIPE_NAMES;
   1129 struct list pipevars = { pipenames, KERN_PIPE_MAXID };
   1130 /*
   1131  * handle kern.mbuf requests
   1132  */
   1133 static int
   1134 sysctl_pipe(string, bufpp, mib, flags, typep)
   1135 	char *string;
   1136 	char **bufpp;
   1137 	int mib[];
   1138 	int flags;
   1139 	int *typep;
   1140 {
   1141 	struct list *lp = &pipevars;
   1142 	int indx;
   1143 
   1144 	if (*bufpp == NULL) {
   1145 		listall(string, lp);
   1146 		return (-1);
   1147 	}
   1148 	if ((indx = findname(string, "third", bufpp, lp)) == -1)
   1149 		return (-1);
   1150 	mib[2] = indx;
   1151 	*typep = lp->list[indx].ctl_type;
   1152 	return (3);
   1153 }
   1154 
   1155 /*
   1156  * Scan a list of names searching for a particular name.
   1157  */
   1158 static int
   1159 findname(string, level, bufp, namelist)
   1160 	char *string;
   1161 	char *level;
   1162 	char **bufp;
   1163 	struct list *namelist;
   1164 {
   1165 	char *name;
   1166 	int i;
   1167 
   1168 	if (namelist->list == 0 || (name = strsep(bufp, ".")) == NULL) {
   1169 		warnx("%s: incomplete specification", string);
   1170 		return (-1);
   1171 	}
   1172 	for (i = 0; i < namelist->size; i++)
   1173 		if (namelist->list[i].ctl_name != NULL &&
   1174 		    strcmp(name, namelist->list[i].ctl_name) == 0)
   1175 			break;
   1176 	if (i == namelist->size) {
   1177 		warnx("%s level name %s in %s is invalid",
   1178 		    level, name, string);
   1179 		return (-1);
   1180 	}
   1181 	return (i);
   1182 }
   1183 
   1184 static void
   1185 usage()
   1186 {
   1187 	const char *progname = getprogname();
   1188 
   1189 	(void)fprintf(stderr, "Usage:\t%s %s\n\t%s %s\n\t%s %s\n\t%s %s\n\t%s %s\n",
   1190 	    progname, "[-n] variable ...",
   1191 	    progname, "[-n] -w variable=value ...",
   1192 	    progname, "[-n] -a",
   1193 	    progname, "[-n] -A",
   1194 	    progname, "[-n] -f file");
   1195 	exit(1);
   1196 }
   1197