2 * Copyright (c) 1995 Jason R. Thorpe.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
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 for the NetBSD Project
17 * 4. The name of the author may not be used to endorse or promote products
18 * derived from this software without specific prior written permission.
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
25 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
26 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
27 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
28 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * $NetBSD: ccdconfig.c,v 1.2.2.1 1995/11/11 02:43:35 thorpej Exp $
33 * $FreeBSD: src/sbin/ccdconfig/ccdconfig.c,v 1.16.2.2 2000/12/11 01:03:25 obrien Exp $
36 #define _KERNEL_STRUCTURES
37 #include <sys/param.h>
38 #include <sys/linker.h>
40 #include <sys/module.h>
53 #include <sys/devicestat.h>
54 #include <sys/ccdvar.h>
56 #include "pathnames.h"
58 static int lineno = 0;
59 static int verbose = 0;
60 static const char *ccdconf = _PATH_CCDCONF;
62 static char *core = NULL;
63 static char *kernel = NULL;
69 { "CCDF_SWAP", CCDF_SWAP },
70 { "CCDF_UNIFORM", CCDF_UNIFORM },
71 { "CCDF_MIRROR", CCDF_MIRROR },
72 { "CCDF_PARITY", CCDF_PARITY },
76 static struct nlist nl[] = {
77 { "_ccd_softc", 0, 0, 0, 0 },
78 #define SYM_CCDSOFTC 0
79 { "_numccd", 0, 0, 0, 0 },
81 { NULL , 0, 0, 0, 0 },
84 #define CCD_CONFIG 0 /* configure a device */
85 #define CCD_CONFIGALL 1 /* configure all devices */
86 #define CCD_UNCONFIG 2 /* unconfigure a device */
87 #define CCD_UNCONFIGALL 3 /* unconfigure all devices */
88 #define CCD_DUMP 4 /* dump a ccd's configuration */
90 static int checkdev(char *);
91 static int do_io(char *, u_long, struct ccd_ioctl *);
92 static int do_single(int, char **, int);
93 static int do_all(int);
94 static int dump_ccd(int, char **);
95 static int getmaxpartitions(void);
96 static int flags_to_val(char *);
97 static void print_ccd_info(struct ccd_softc *, kvm_t *);
98 static char *resolve_ccdname(char *);
99 static void usage(void);
102 main(int argc, char **argv)
104 int ch, options = 0, action = CCD_CONFIG;
106 while ((ch = getopt(argc, argv, "cCf:gM:N:uUv")) != -1) {
114 action = CCD_CONFIGALL;
135 action = CCD_UNCONFIG;
140 action = CCD_UNCONFIGALL;
159 * Discard setgid privileges if not the running kernel so that bad
160 * guys can't print interesting stuff from kernel memory.
162 if (core != NULL || kernel != NULL || action != CCD_DUMP) {
167 if (modfind("ccd") < 0) {
168 /* Not present in kernel, try loading it */
169 if (kldload("ccd") < 0 || modfind("ccd") < 0)
170 warn("ccd module not available!");
176 exit(do_single(argc, argv, action));
180 case CCD_UNCONFIGALL:
181 exit(do_all(action));
185 exit(dump_ccd(argc, argv));
193 do_single(int argc, char **argv, int action)
195 struct ccd_ioctl ccio;
196 char *ccd, *cp, *cp2, **disks;
197 int noflags = 0, ileave, flags = 0, j;
200 bzero(&ccio, sizeof(ccio));
203 * If unconfiguring, all arguments are treated as ccds.
205 if (action == CCD_UNCONFIG || action == CCD_UNCONFIGALL) {
206 for (i = 0; argc != 0; ) {
207 cp = *argv++; --argc;
208 if ((ccd = resolve_ccdname(cp)) == NULL) {
209 warnx("invalid ccd name: %s", cp);
213 if (do_io(ccd, CCDIOCCLR, &ccio))
217 printf("%s unconfigured\n", cp);
222 /* Make sure there are enough arguments. */
225 /* Assume that no flags are specified. */
228 if (action == CCD_CONFIGALL) {
229 warnx("%s: bad line: %d", ccdconf, lineno);
236 /* First argument is the ccd to configure. */
237 cp = *argv++; --argc;
238 if ((ccd = resolve_ccdname(cp)) == NULL) {
239 warnx("invalid ccd name: %s", cp);
243 /* Next argument is the interleave factor. */
244 cp = *argv++; --argc;
245 errno = 0; /* to check for ERANGE */
246 ileave = (int)strtol(cp, &cp2, 10);
247 if ((errno == ERANGE) || (ileave < 0) || (*cp2 != '\0')) {
248 warnx("invalid interleave factor: %s", cp);
253 /* Next argument is the ccd configuration flags. */
254 cp = *argv++; --argc;
255 if ((flags = flags_to_val(cp)) < 0) {
256 warnx("invalid flags argument: %s", cp);
261 /* Next is the list of disks to make the ccd from. */
262 disks = malloc(argc * sizeof(char *));
264 warnx("no memory to configure ccd");
267 for (i = 0; argc != 0; ) {
268 cp = *argv++; --argc;
269 if ((j = checkdev(cp)) == 0)
272 warnx("%s: %s", cp, strerror(j));
277 /* Fill in the ccio. */
278 ccio.ccio_disks = disks;
279 ccio.ccio_ndisks = i;
280 ccio.ccio_ileave = ileave;
281 ccio.ccio_flags = flags;
283 if (do_io(ccd, CCDIOCSET, &ccio)) {
289 printf("ccd%d: %d components ", ccio.ccio_unit,
291 for (i = 0; i < ccio.ccio_ndisks; ++i) {
292 if ((cp2 = strrchr(disks[i], '/')) != NULL)
297 i == 0 ? '(' : ' ', cp2,
298 i == ccio.ccio_ndisks - 1 ? ')' : ',');
300 printf(", %ju blocks ", (uintmax_t)ccio.ccio_size);
301 if (ccio.ccio_ileave != 0)
302 printf("interleaved at %d blocks\n", ccio.ccio_ileave);
304 printf("concatenated\n");
315 char line[_POSIX2_LINE_MAX];
323 if ((f = fopen(ccdconf, "r")) == NULL) {
325 warn("fopen: %s", ccdconf);
330 while (fgets(line, sizeof(line), f) != NULL) {
334 if ((cp = strrchr(line, '\n')) != NULL)
337 /* Break up the line and pass it's contents to do_single(). */
340 for (cp = line; (cp = strtok(cp, " \t")) != NULL; cp = NULL) {
343 if ((argv = realloc(argv,
344 sizeof(char *) * ++argc)) == NULL) {
345 warnx("no memory to configure ccds");
350 * If our action is to unconfigure all, then pass
351 * just the first token to do_single() and ignore
352 * the rest. Since this will be encountered on
353 * our first pass through the line, the Right
356 if (action == CCD_UNCONFIGALL) {
357 if (do_single(argc, argv, action))
363 if (do_single(argc, argv, action))
380 if (stat(path, &st) != 0)
383 if (!S_ISBLK(st.st_mode) && !S_ISCHR(st.st_mode))
390 pathtounit(char *path, int *unitp)
395 if (stat(path, &st) != 0)
398 if (!S_ISBLK(st.st_mode) && !S_ISCHR(st.st_mode))
401 if ((maxpartitions = getmaxpartitions()) < 0)
404 *unitp = minor(st.st_rdev) / maxpartitions;
410 resolve_ccdname(char *name)
414 if (name[0] == '/' || name[0] == '.') {
415 /* Assume they gave the correct pathname. */
416 return (strdup(name));
419 asprintf(&path, "%s%s", _PATH_DEV, name);
425 do_io(char *path, u_long cmd, struct ccd_ioctl *cciop)
430 if ((fd = open(path, O_RDWR, 0640)) < 0) {
431 warn("open: %s", path);
435 if (ioctl(fd, cmd, cciop) < 0) {
448 warn("ioctl (%s): %s", cp, path);
455 #define KVM_ABORT(kd, str) { \
457 warnx("%s", (str)); \
458 warnx("%s", kvm_geterr((kd))); \
463 dump_ccd(int argc, char **argv)
465 char errbuf[_POSIX2_LINE_MAX], *ccd, *cp;
466 struct ccd_softc *cs, *kcs;
468 int i = 0, error, numccd, numconfiged = 0;
471 bzero(errbuf, sizeof(errbuf));
473 if ((kd = kvm_openfiles(kernel, core, NULL, O_RDONLY,
475 warnx("can't open kvm: %s", errbuf);
479 if (kvm_nlist(kd, nl))
480 KVM_ABORT(kd, "ccd-related symbols not available");
482 /* Check to see how many ccds are currently configured. */
483 if (kvm_read(kd, nl[SYM_NUMCCD].n_value, (char *)&numccd,
484 sizeof(numccd)) != sizeof(numccd))
485 KVM_ABORT(kd, "can't determine number of configured ccds");
488 printf("ccd driver in kernel, but is uninitialized\n");
492 /* Allocate space for the configuration data. */
493 readsize = numccd * sizeof(struct ccd_softc);
494 if ((cs = malloc(readsize)) == NULL) {
495 warnx("no memory for configuration data");
501 * Read the ccd configuration data from the kernel and dump
504 if (kvm_read(kd, nl[SYM_CCDSOFTC].n_value, (char *)&kcs,
505 sizeof(kcs)) != sizeof(kcs)) {
507 KVM_ABORT(kd, "can't find pointer to configuration data");
509 if (kvm_read(kd, (u_long)kcs, (char *)cs, readsize) != readsize) {
511 KVM_ABORT(kd, "can't read configuration data");
515 for (i = 0; i < numccd; ++i)
516 if (cs[i].sc_flags & CCDF_INITED) {
518 print_ccd_info(&cs[i], kd);
521 if (numconfiged == 0)
522 printf("no concatenated disks configured\n");
525 cp = *argv++; --argc;
526 if ((ccd = resolve_ccdname(cp)) == NULL) {
527 warnx("invalid ccd name: %s", cp);
530 if ((error = pathtounit(ccd, &i)) != 0) {
531 warnx("%s: %s", ccd, strerror(error));
535 warnx("ccd%d not configured", i);
538 if (cs[i].sc_flags & CCDF_INITED)
539 print_ccd_info(&cs[i], kd);
541 printf("ccd%d not configured\n", i);
557 print_ccd_info(struct ccd_softc *cs, kvm_t *kd)
559 static int header_printed = 0;
560 struct ccdcinfo *cip;
562 char path[MAXPATHLEN];
565 if (header_printed == 0 && verbose) {
566 printf("# ccd\t\tileave\tflags\tcompnent devices\n");
570 readsize = cs->sc_nccdisks * sizeof(struct ccdcinfo);
571 if ((cip = malloc(readsize)) == NULL) {
572 warn("ccd%d: can't allocate memory for component info",
576 bzero(cip, readsize);
578 /* Dump out softc information. */
579 printf("ccd%d\t\t%d\t%d\t", cs->sc_unit, cs->sc_ileave,
580 cs->sc_cflags & CCDF_USERMASK);
583 /* Read in the component info. */
584 if (kvm_read(kd, (u_long)cs->sc_cinfo, (char *)cip,
585 readsize) != readsize) {
587 warnx("can't read component info");
588 warnx("%s", kvm_geterr(kd));
592 /* Read component pathname and display component info. */
593 for (i = 0; i < cs->sc_nccdisks; ++i) {
594 if ((unsigned)kvm_read(kd, (u_long)cip[i].ci_path, (char *)path,
595 cip[i].ci_pathlen) != cip[i].ci_pathlen) {
597 warnx("can't read component pathname");
598 warnx("%s", kvm_geterr(kd));
601 printf((i + 1 < cs->sc_nccdisks) ? "%s " : "%s\n", path);
610 getmaxpartitions(void)
612 return (MAXPARTITIONS);
616 flags_to_val(char *flags)
619 int i, tmp, val = ~CCDF_USERMASK;
623 * The most common case is that of NIL flags, so check for
626 if (strcmp("none", flags) == 0 || strcmp("0x0", flags) == 0 ||
627 strcmp("0", flags) == 0)
630 flagslen = strlen(flags);
632 /* Check for values represented by strings. */
633 if ((cp = strdup(flags)) == NULL)
634 err(1, "no memory to parse flags");
636 for (tok = cp; (tok = strtok(tok, ",")) != NULL; tok = NULL) {
637 for (i = 0; flagvaltab[i].fv_flag != NULL; ++i)
638 if (strcmp(tok, flagvaltab[i].fv_flag) == 0)
640 if (flagvaltab[i].fv_flag == NULL) {
644 tmp |= flagvaltab[i].fv_val;
647 /* If we get here, the string was ok. */
654 /* Check for values represented in hex. */
655 if (flagslen > 2 && flags[0] == '0' && flags[1] == 'x') {
656 errno = 0; /* to check for ERANGE */
657 val = (int)strtol(&flags[2], &cp, 16);
658 if ((errno == ERANGE) || (*cp != '\0'))
663 /* Check for values represented in decimal. */
664 errno = 0; /* to check for ERANGE */
665 val = (int)strtol(flags, &cp, 10);
666 if ((errno == ERANGE) || (*cp != '\0'))
670 return (((val & ~CCDF_USERMASK) == 0) ? val : -1);
676 fprintf(stderr, "%s\n%s\n%s\n%s\n%s\n",
677 "usage: ccdconfig [-cv] ccd ileave [flags] dev ...",
678 " ccdconfig -C [-v] [-f config_file]",
679 " ccdconfig -u [-v] ccd ...",
680 " ccdconfig -U [-v] [-f config_file]",
681 " ccdconfig -g [-M core] [-N system] [ccd ...]");