Home | History | Annotate | Line # | Download | only in bioctl
      1 /* $NetBSD: bioctl.c,v 1.20 2023/08/04 03:45:07 rin Exp $ */
      2 /* $OpenBSD: bioctl.c,v 1.52 2007/03/20 15:26:06 jmc Exp $ */
      3 
      4 /*
      5  * Copyright (c) 2007, 2008 Juan Romero Pardines
      6  * Copyright (c) 2004, 2005 Marco Peereboom
      7  * All rights reserved.
      8  *
      9  * Redistribution and use in source and binary forms, with or without
     10  * modification, are permitted provided that the following conditions
     11  * are met:
     12  * 1. Redistributions of source code must retain the above copyright
     13  *    notice, this list of conditions and the following disclaimer.
     14  * 2. Redistributions in binary form must reproduce the above copyright
     15  *    notice, this list of conditions and the following disclaimer in the
     16  *    documentation and/or other materials provided with the distribution.
     17  *
     18  * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND
     19  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     20  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     21  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE FOR
     22  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     23  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     24  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     25  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     26  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     27  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     28  * SUCH DAMAGE.
     29  *
     30  */
     31 #include <sys/cdefs.h>
     32 
     33 #ifndef lint
     34 __RCSID("$NetBSD: bioctl.c,v 1.20 2023/08/04 03:45:07 rin Exp $");
     35 #endif
     36 
     37 #include <sys/types.h>
     38 #include <sys/ioctl.h>
     39 #include <sys/param.h>
     40 #include <sys/queue.h>
     41 #include <dev/biovar.h>
     42 
     43 #include <errno.h>
     44 #include <err.h>
     45 #include <fcntl.h>
     46 #include <util.h>
     47 #include <stdbool.h>
     48 #include <stdio.h>
     49 #include <stdlib.h>
     50 #include <string.h>
     51 #include <unistd.h>
     52 #include <ctype.h>
     53 #include <util.h>
     54 
     55 struct command {
     56 	const char *cmd_name;
     57 	const char *arg_names;
     58 	void (*cmd_func)(int, int, char **);
     59 };
     60 
     61 struct biotmp {
     62 	struct bioc_inq *bi;
     63 	struct bioc_vol *bv;
     64 	char volname[64];
     65 	int fd;
     66 	int volid;
     67 	int diskid;
     68 	bool format;
     69 	bool show_disknovol;
     70 };
     71 
     72 struct locator {
     73 	int channel;
     74 	int target;
     75 	int lun;
     76 };
     77 
     78 __dead static void 	usage(void);
     79 static void	bio_alarm(int, int, char **);
     80 static void	bio_show_common(int, int, char **);
     81 static int	bio_show_volumes(struct biotmp *, struct bioc_vol *);
     82 static void	bio_show_disks(struct biotmp *);
     83 static void	bio_setblink(int, int, char **);
     84 static void 	bio_blink(int, char *, int, int);
     85 static void	bio_setstate_hotspare(int, int, char **);
     86 static void	bio_setstate_passthru(int, int, char **);
     87 static void	bio_setstate_common(int, char *, struct bioc_setstate *,
     88 				    struct locator *);
     89 static void	bio_setstate_consistency(int, int, char **);
     90 static void	bio_volops_create(int, int, char **);
     91 #ifdef notyet
     92 static void	bio_volops_modify(int, int, char **);
     93 #endif
     94 static void	bio_volops_remove(int, int, char **);
     95 
     96 static const char *str2locator(const char *, struct locator *);
     97 
     98 static struct bio_locate bl;
     99 static struct command commands[] = {
    100 	{
    101 	  "show",
    102 	  "[disks] | [volumes]",
    103 	  bio_show_common },
    104 	{
    105 	  "alarm",
    106 	  "[enable] | [disable] | [silence] | [test]",
    107 	  bio_alarm },
    108 	{
    109 	  "blink",
    110 	  "start [channel:target[.lun]] | stop [channel:target[.lun]]",
    111 	  bio_setblink },
    112 	{
    113 	  "hotspare",
    114 	  "add channel:target.lun | remove channel:target.lun",
    115 	  bio_setstate_hotspare },
    116 	{
    117 	  "passthru",
    118 	  "add DISKID channel:target.lun | remove channel:target.lun",
    119 	  bio_setstate_passthru },
    120 	{
    121 	  "check",
    122 	  "start VOLID | stop VOLID",
    123 	  bio_setstate_consistency },
    124 	{
    125 	  "create",
    126 	  "volume VOLID DISKIDs [SIZE] STRIPE RAID_LEVEL channel:target.lun",
    127 	  bio_volops_create },
    128 #ifdef notyet
    129 	{
    130 	  "modify",
    131 	  "volume VOLID STRIPE RAID_LEVEL channel:target.lun",
    132 	  bio_volops_modify },
    133 #endif
    134 	{
    135 	  "remove",
    136 	  "volume VOLID channel:target.lun",
    137 	  bio_volops_remove },
    138 
    139 	{ NULL, NULL, NULL }
    140 };
    141 
    142 int
    143 main(int argc, char **argv)
    144 {
    145 	char 		*dvname;
    146 	const char 	*cmdname;
    147 	int 		fd = 0, i;
    148 
    149 	/* Must have at least: device command */
    150 	if (argc < 3)
    151 		usage();
    152 
    153 	/* Skip program name, get and skip device name and command */
    154 	setprogname(*argv);
    155 	dvname = argv[1];
    156 	cmdname = argv[2];
    157 	argv += 3;
    158 	argc -= 3;
    159 
    160 	/* Look up and call the command */
    161 	for (i = 0; commands[i].cmd_name != NULL; i++)
    162 		if (strcmp(cmdname, commands[i].cmd_name) == 0)
    163 			break;
    164 	if (commands[i].cmd_name == NULL)
    165 		errx(EXIT_FAILURE, "unknown command: %s", cmdname);
    166 
    167 	/* Locate the device by issuing the BIOCLOCATE ioctl */
    168 	fd = open("/dev/bio", O_RDWR);
    169 	if (fd == -1)
    170 		err(EXIT_FAILURE, "Can't open /dev/bio");
    171 
    172 	bl.bl_name = dvname;
    173 	if (ioctl(fd, BIOCLOCATE, &bl) == -1)
    174 		errx(EXIT_FAILURE, "Can't locate %s device via /dev/bio",
    175 		    bl.bl_name);
    176 
    177 	/* and execute the command */
    178 	(*commands[i].cmd_func)(fd, argc, argv);
    179 
    180 	(void)close(fd);
    181 	exit(EXIT_SUCCESS);
    182 }
    183 
    184 static void
    185 usage(void)
    186 {
    187 	int i;
    188 
    189 	(void)fprintf(stderr, "usage: %s device command [arg [...]]\n",
    190 	    getprogname());
    191 
    192 	(void)fprintf(stderr, "Available commands:\n");
    193 	for (i = 0; commands[i].cmd_name != NULL; i++)
    194 		(void)fprintf(stderr, "  %s %s\n", commands[i].cmd_name,
    195 		    commands[i].arg_names);
    196 
    197 	exit(EXIT_FAILURE);
    198 	/* NOTREACHED */
    199 }
    200 
    201 static const char *
    202 str2locator(const char *string, struct locator *location)
    203 {
    204 	const char 	*errstr;
    205 	char 		parse[80], *targ, *lun;
    206 
    207 	strlcpy(parse, string, sizeof parse);
    208 	targ = strchr(parse, ':');
    209 	if (targ == NULL)
    210 		return "target not specified";
    211 
    212 	*targ++ = '\0';
    213 	lun = strchr(targ, '.');
    214 	if (lun != NULL) {
    215 		*lun++ = '\0';
    216 		location->lun = strtonum(lun, 0, 256, &errstr);
    217 		if (errstr)
    218 			return errstr;
    219 	} else
    220 		location->lun = 0;
    221 
    222 	location->target = strtonum(targ, 0, 256, &errstr);
    223 	if (errstr)
    224 		return errstr;
    225 	location->channel = strtonum(parse, 0, 256, &errstr);
    226 	if (errstr)
    227 		return errstr;
    228 	return NULL;
    229 }
    230 
    231 /*
    232  * Shows info about available RAID volumes.
    233  */
    234 static int
    235 bio_show_volumes(struct biotmp *bt, struct bioc_vol *bv)
    236 {
    237 	const char 		*status, *rtypestr, *stripestr;
    238 	char 			size[64], percent[16], seconds[20];
    239 	char 			rtype[16], stripe[16], tmp[48];
    240 
    241 	rtypestr = stripestr = NULL;
    242 
    243 	memset(bv, 0, sizeof(*bv));
    244 	bv->bv_cookie = bl.bl_cookie;
    245 	bv->bv_volid = bt->volid;
    246 	bv->bv_percent = -1;
    247 	bv->bv_seconds = 0;
    248 
    249 	if (ioctl(bt->fd, BIOCVOL, bv) == -1)
    250 		err(EXIT_FAILURE, "BIOCVOL");
    251 
    252 	percent[0] = '\0';
    253 	seconds[0] = '\0';
    254 	if (bv->bv_percent != -1)
    255 		snprintf(percent, sizeof(percent),
    256 		    " %3.2f%% done", bv->bv_percent / 10.0);
    257 	if (bv->bv_seconds)
    258 		snprintf(seconds, sizeof(seconds),
    259 		    " %u seconds", bv->bv_seconds);
    260 
    261 	switch (bv->bv_status) {
    262 	case BIOC_SVONLINE:
    263 		status = BIOC_SVONLINE_S;
    264 		break;
    265 	case BIOC_SVOFFLINE:
    266 		status = BIOC_SVOFFLINE_S;
    267 		break;
    268 	case BIOC_SVDEGRADED:
    269 		status = BIOC_SVDEGRADED_S;
    270 		break;
    271 	case BIOC_SVBUILDING:
    272 		status = BIOC_SVBUILDING_S;
    273 		break;
    274 	case BIOC_SVREBUILD:
    275 		status = BIOC_SVREBUILD_S;
    276 		break;
    277 	case BIOC_SVMIGRATING:
    278 		status = BIOC_SVMIGRATING_S;
    279 		break;
    280 	case BIOC_SVSCRUB:
    281 		status = BIOC_SVSCRUB_S;
    282 		break;
    283 	case BIOC_SVCHECKING:
    284 		status = BIOC_SVCHECKING_S;
    285 		break;
    286 	case BIOC_SVINVALID:
    287 	default:
    288 		status = BIOC_SVINVALID_S;
    289 		break;
    290 	}
    291 
    292 	snprintf(bt->volname, sizeof(bt->volname), "%u", bv->bv_volid);
    293 	if (bv->bv_vendor[0])
    294 		snprintf(tmp, sizeof(tmp), "%s %s", bv->bv_dev, bv->bv_vendor);
    295 	else
    296 		snprintf(tmp, sizeof(tmp), "%s", bv->bv_dev);
    297 
    298 	switch (bv->bv_level) {
    299 	case BIOC_SVOL_HOTSPARE:
    300 		rtypestr = "Hot spare";
    301 		stripestr = "N/A";
    302 		break;
    303 	case BIOC_SVOL_PASSTHRU:
    304 		rtypestr = "Pass through";
    305 		stripestr = "N/A";
    306 		break;
    307 	case BIOC_SVOL_RAID01:
    308 		rtypestr = "RAID 0+1";
    309 		break;
    310 	case BIOC_SVOL_RAID10:
    311 		rtypestr = "RAID 1+0";
    312 		break;
    313 	default:
    314 		snprintf(rtype, sizeof(rtype), "RAID %u", bv->bv_level);
    315 		if (bv->bv_level == 1 || bv->bv_stripe_size == 0)
    316 			stripestr = "N/A";
    317 		break;
    318 	}
    319 
    320 	if (rtypestr)
    321 		strlcpy(rtype, rtypestr, sizeof(rtype));
    322 	if (stripestr)
    323 		strlcpy(stripe, stripestr, sizeof(stripe));
    324 	else
    325 		snprintf(stripe, sizeof(stripe), "%uK", bv->bv_stripe_size);
    326 
    327 	humanize_number(size, 5, (int64_t)bv->bv_size, "", HN_AUTOSCALE,
    328 	    HN_B | HN_NOSPACE | HN_DECIMAL);
    329 
    330 	printf("%6s %-12s %4s %20s %8s %6s %s%s\n",
    331 	    bt->volname, status, size, tmp,
    332 	    rtype, stripe, percent, seconds);
    333 
    334 	bt->bv = bv;
    335 
    336 	return bv->bv_nodisk;
    337 }
    338 
    339 /*
    340  * Shows info about physical disks.
    341  */
    342 static void
    343 bio_show_disks(struct biotmp *bt)
    344 {
    345 	struct bioc_disk 	bd;
    346 	const char 		*status;
    347 	char 			size[64], serial[32], scsiname[34];
    348 
    349 	memset(&bd, 0, sizeof(bd));
    350 	bd.bd_cookie = bl.bl_cookie;
    351 	bd.bd_diskid = bt->diskid;
    352 	bd.bd_volid = bt->volid;
    353 
    354 	if (bt->show_disknovol) {
    355 		if (ioctl(bt->fd, BIOCDISK_NOVOL, &bd) == -1)
    356 			err(EXIT_FAILURE, "BIOCDISK_NOVOL");
    357 		if (!bd.bd_disknovol)
    358 			return;
    359 	} else {
    360 		if (ioctl(bt->fd, BIOCDISK, &bd) == -1)
    361 			err(EXIT_FAILURE, "BIOCDISK");
    362 	}
    363 
    364 	switch (bd.bd_status) {
    365 	case BIOC_SDONLINE:
    366 		status = BIOC_SDONLINE_S;
    367 		break;
    368 	case BIOC_SDOFFLINE:
    369 		status = BIOC_SDOFFLINE_S;
    370 		break;
    371 	case BIOC_SDFAILED:
    372 		status = BIOC_SDFAILED_S;
    373 		break;
    374 	case BIOC_SDREBUILD:
    375 		status = BIOC_SDREBUILD_S;
    376 		break;
    377 	case BIOC_SDHOTSPARE:
    378 		status = BIOC_SDHOTSPARE_S;
    379 		break;
    380 	case BIOC_SDUNUSED:
    381 		status = BIOC_SDUNUSED_S;
    382 		break;
    383 	case BIOC_SDSCRUB:
    384 		status = BIOC_SDSCRUB_S;
    385 		break;
    386 	case BIOC_SDPASSTHRU:
    387 		status = BIOC_SDPASSTHRU_S;
    388 		break;
    389 	case BIOC_SDINVALID:
    390 	default:
    391 		status = BIOC_SDINVALID_S;
    392 		break;
    393 	}
    394 
    395 	if (bt->format)
    396 		snprintf(bt->volname, sizeof(bt->volname),
    397 		    "%u:%u", bt->bv->bv_volid, bd.bd_diskid);
    398 
    399 	humanize_number(size, 5, bd.bd_size, "", HN_AUTOSCALE,
    400 	    HN_B | HN_NOSPACE | HN_DECIMAL);
    401 
    402 	if (bd.bd_procdev[0])
    403 		snprintf(scsiname, sizeof(scsiname), "%u:%u.%u %s",
    404 	    	    bd.bd_channel, bd.bd_target, bd.bd_lun,
    405 		    bd.bd_procdev);
    406 	else
    407 		snprintf(scsiname, sizeof(scsiname), "%u:%u.%u noencl",
    408 		    bd.bd_channel, bd.bd_target, bd.bd_lun);
    409 
    410 	if (bd.bd_serial[0])
    411 		strlcpy(serial, bd.bd_serial, sizeof(serial));
    412 	else
    413 		strlcpy(serial, "unknown serial", sizeof(serial));
    414 
    415 	if (bt->format)
    416 		printf("%6s %-12s %4s %20s <%s>\n",
    417 		    bt->volname, status, size, scsiname,
    418 				    bd.bd_vendor);
    419 	else
    420 		printf("%5d [%-28s] %-12s %-6s %12s\n",
    421 		    bt->diskid, bd.bd_vendor, status, size, scsiname);
    422 
    423 }
    424 
    425 /*
    426  * Shows info about volumes/disks.
    427  */
    428 static void
    429 bio_show_common(int fd, int argc, char **argv)
    430 {
    431 	struct biotmp 		*biot;
    432 	struct bioc_inq 	bi;
    433 	struct bioc_vol 	bv;
    434 	int 			i, d, ndisks;
    435 	bool 			show_all, show_disks;
    436 	bool 			show_vols, show_caps;
    437 
    438 	show_all = show_disks = show_vols = show_caps = false;
    439 
    440 	if (argc > 1)
    441 		usage();
    442 
    443 	if (argv[0]) {
    444 		if (strcmp(argv[0], "disks") == 0)
    445 			show_disks = true;
    446 		else if (strcmp(argv[0], "volumes") == 0)
    447 			show_vols = true;
    448 		else
    449 			usage();
    450 	} else
    451 		show_all = true;
    452 
    453 	memset(&bi, 0, sizeof(bi));
    454 	bi.bi_cookie = bl.bl_cookie;
    455 
    456 	if (ioctl(fd, BIOCINQ, &bi) == -1)
    457 		err(EXIT_FAILURE, "BIOCINQ");
    458 
    459 	/*
    460 	 * If there are volumes there's no point to continue.
    461 	 */
    462 	if (show_all || show_vols) {
    463 		if (!bi.bi_novol) {
    464 			warnx("no volumes available");
    465 			return;
    466 		}
    467 	}
    468 
    469 	biot = calloc(1, sizeof(*biot));
    470 	if (!biot)
    471 		err(EXIT_FAILURE, "biotemp calloc");
    472 
    473 	biot->fd = fd;
    474 	biot->bi = &bi;
    475 	/*
    476 	 * Go to the disks section if that was specified.
    477 	 */
    478 	if (show_disks)
    479 		goto disks;
    480 
    481 	/*
    482 	 * Common code to show only info about volumes and disks
    483 	 * associated to them.
    484 	 */
    485 	printf("%6s %-12s %4s %20s %8s %6s\n",
    486 	    "Volume", "Status", "Size", "Device/Label",
    487 	    "Level", "Stripe");
    488 	printf("=============================================="
    489 	       "===============\n");
    490 
    491 	for (i = 0; i < bi.bi_novol; i++) {
    492 		biot->format = true;
    493 		biot->volid = i;
    494 		ndisks = bio_show_volumes(biot, &bv);
    495 		if (show_vols)
    496 			continue;
    497 
    498 		for (d = 0; d < ndisks; d++) {
    499 			biot->diskid = d;
    500 			bio_show_disks(biot);
    501 		}
    502 
    503 	}
    504 	goto out;
    505 
    506 disks:
    507 	/*
    508 	 * show info about all disks connected to the raid controller,
    509 	 * even if they aren't associated with a volume or raid set.
    510 	 */
    511 	if (show_disks) {
    512 		printf("%5s %-30s %-12s %-6s %12s\n",
    513 		    "Disk", "Model/Serial", "Status", "Size", "Location");
    514 		printf("==============================================="
    515 		       "======================\n");
    516 		for (d = 0; d < bi.bi_nodisk; d++) {
    517 			biot->show_disknovol = true;
    518 			biot->diskid = d;
    519 			bio_show_disks(biot);
    520 		}
    521 	}
    522 out:
    523 	free(biot);
    524 }
    525 
    526 /*
    527  * To handle the alarm feature.
    528  */
    529 static void
    530 bio_alarm(int fd, int argc, char **argv)
    531 {
    532 	struct bioc_alarm 	ba;
    533 	bool 			show = false;
    534 
    535 	memset(&ba, 0, sizeof(ba));
    536 	ba.ba_cookie = bl.bl_cookie;
    537 
    538 	if (argc > 1)
    539 		usage();
    540 
    541 	if (argc == 0) {
    542 		/* show alarm status */
    543 		ba.ba_opcode = BIOC_GASTATUS;
    544 		show = true;
    545 	} else if (strcmp(argv[0], "silence") == 0) {
    546 		/* silence alarm */
    547 		ba.ba_opcode = BIOC_SASILENCE;
    548 	} else if (strcmp(argv[0], "enable") == 0) {
    549 		/* enable alarm */
    550 		ba.ba_opcode = BIOC_SAENABLE;
    551 	} else if (strcmp(argv[0], "disable") == 0) {
    552 		/* disable alarm */
    553 		ba.ba_opcode = BIOC_SADISABLE;
    554 	} else if (strcmp(argv[0], "test") == 0) {
    555 		/* test alarm */
    556 		ba.ba_opcode = BIOC_SATEST;
    557 	} else
    558 		usage();
    559 
    560 	if (ioctl(fd, BIOCALARM, &ba) == -1)
    561 		err(EXIT_FAILURE, "BIOCALARM");
    562 
    563 	if (show)
    564 		printf("alarm is currently %s\n",
    565 		    ba.ba_status ? "enabled" : "disabled");
    566 }
    567 
    568 /*
    569  * To add/remove a hotspare disk.
    570  */
    571 static void
    572 bio_setstate_hotspare(int fd, int argc, char **argv)
    573 {
    574 	struct bioc_setstate	bs;
    575 	struct locator		location;
    576 
    577 	memset(&bs, 0, sizeof(bs));
    578 
    579 	if (argc != 2)
    580 		usage();
    581 
    582 	if (strcmp(argv[0], "add") == 0)
    583 		bs.bs_status = BIOC_SSHOTSPARE;
    584 	else if (strcmp(argv[0], "remove") == 0)
    585 		bs.bs_status = BIOC_SSDELHOTSPARE;
    586 	else
    587 		usage();
    588 
    589 	bio_setstate_common(fd, argv[1], &bs, &location);
    590 }
    591 
    592 /*
    593  * To add/remove a pass through disk.
    594  */
    595 static void
    596 bio_setstate_passthru(int fd, int argc, char **argv)
    597 {
    598 	struct bioc_setstate	bs;
    599 	struct locator		location;
    600 	char			*endptr;
    601 	bool			rem = false;
    602 
    603 	if (argc < 2 || argc > 3)
    604 		usage();
    605 
    606 	memset(&bs, 0, sizeof(bs));
    607 
    608 	if (strcmp(argv[0], "add") == 0) {
    609 		if (argv[1] == NULL || argv[2] == NULL)
    610 			usage();
    611 
    612 		bs.bs_status = BIOC_SSPASSTHRU;
    613 	} else if (strcmp(argv[0], "remove") == 0) {
    614 		if (argv[1] == NULL)
    615 			usage();
    616 
    617 		bs.bs_status = BIOC_SSDELPASSTHRU;
    618 		rem = true;
    619 	} else
    620 		usage();
    621 
    622 	if (rem)
    623 		bio_setstate_common(fd, argv[1], &bs, &location);
    624 	else {
    625 		bs.bs_other_id = (unsigned int)strtoul(argv[1], &endptr, 10);
    626 		if (*endptr != '\0')
    627 			errx(EXIT_FAILURE, "Invalid Volume ID value");
    628 
    629 		bio_setstate_common(fd, argv[2], &bs, &location);
    630 	}
    631 }
    632 
    633 /*
    634  * To start/stop a consistency check in a RAID volume.
    635  */
    636 static void
    637 bio_setstate_consistency(int fd, int argc, char **argv)
    638 {
    639 	struct bioc_setstate	bs;
    640 	char			*endptr;
    641 
    642 	if (argc != 2)
    643 		usage();
    644 
    645 	memset(&bs, 0, sizeof(bs));
    646 
    647 	if (strcmp(argv[0], "start") == 0)
    648 		bs.bs_status = BIOC_SSCHECKSTART_VOL;
    649 	else if (strcmp(argv[0], "stop") == 0)
    650 		bs.bs_status = BIOC_SSCHECKSTOP_VOL;
    651 	else
    652 		usage();
    653 
    654 	bs.bs_volid = (unsigned int)strtoul(argv[1], &endptr, 10);
    655 	if (*endptr != '\0')
    656 		errx(EXIT_FAILURE, "Invalid Volume ID value");
    657 
    658 	bio_setstate_common(fd, NULL, &bs, NULL);
    659 }
    660 
    661 static void
    662 bio_setstate_common(int fd, char *arg, struct bioc_setstate *bs,
    663 		    struct locator *location)
    664 {
    665 	const char		*errstr;
    666 
    667 	if (!arg || !location)
    668 		goto send;
    669 
    670 	errstr = str2locator(arg, location);
    671 	if (errstr)
    672 		errx(EXIT_FAILURE, "Target %s: %s", arg, errstr);
    673 
    674 	bs->bs_channel = location->channel;
    675 	bs->bs_target = location->target;
    676 	bs->bs_lun = location->lun;
    677 
    678 send:
    679 	bs->bs_cookie = bl.bl_cookie;
    680 
    681 	if (ioctl(fd, BIOCSETSTATE, bs) == -1)
    682 		err(EXIT_FAILURE, "BIOCSETSTATE");
    683 }
    684 
    685 /*
    686  * To create a RAID volume.
    687  */
    688 static void
    689 bio_volops_create(int fd, int argc, char **argv)
    690 {
    691 	struct bioc_volops	bc;
    692 	struct bioc_inq 	bi;
    693 	struct bioc_disk	bd;
    694 	struct locator		location;
    695 	uint64_t 		total_size = 0, disksize = 0;
    696 	int64_t 		volsize = 0;
    697 	const char 		*errstr;
    698 	char 			*endptr, *stripe, levelstr[32];
    699 	char			*scsiname, *raid_level, size[64];
    700 	int			disk_first = 0, disk_end = 0;
    701 	int			i, nfreedisks = 0;
    702 	int			user_disks = 0;
    703 
    704 	if (argc < 6 || argc > 7)
    705 		usage();
    706 
    707 	if (strcmp(argv[0], "volume") != 0)
    708 		usage();
    709 
    710 	/*
    711 	 * No size requested, use max size depending on RAID level.
    712 	 */
    713 	if (argc == 6) {
    714 		stripe = argv[3];
    715 		raid_level = argv[4];
    716 		scsiname = argv[5];
    717 	} else {
    718 		stripe = argv[4];
    719 		raid_level = argv[5];
    720 		scsiname = argv[6];
    721 	}
    722 
    723 	memset(&bd, 0, sizeof(bd));
    724 	memset(&bc, 0, sizeof(bc));
    725 	memset(&bi, 0, sizeof(bi));
    726 
    727 	bc.bc_cookie = bd.bd_cookie = bi.bi_cookie = bl.bl_cookie;
    728 	bc.bc_opcode = BIOC_VCREATE_VOLUME;
    729 
    730 	bc.bc_volid = (unsigned int)strtoul(argv[1], &endptr, 10);
    731 	if (*endptr != '\0')
    732 		errx(EXIT_FAILURE, "Invalid Volume ID value");
    733 
    734 	if (argc == 7)
    735 		if (dehumanize_number(argv[3], &volsize) == -1
    736 		    || volsize < 0)
    737 			errx(EXIT_FAILURE, "Invalid SIZE value");
    738 
    739 	bc.bc_stripe = (unsigned int)strtoul(stripe, &endptr, 10);
    740 	if (*endptr != '\0')
    741 		errx(EXIT_FAILURE, "Invalid STRIPE size value");
    742 
    743 	bc.bc_level = (unsigned int)strtoul(raid_level, &endptr, 10);
    744 	if (*endptr != '\0')
    745 		errx(EXIT_FAILURE, "Invalid RAID_LEVEL value");
    746 
    747 	errstr = str2locator(scsiname, &location);
    748 	if (errstr)
    749 		errx(EXIT_FAILURE, "Target %s: %s", scsiname, errstr);
    750 
    751 	/*
    752 	 * Parse the device list that will be used for the volume,
    753 	 * by using a bit field for the disks.
    754 	 */
    755 	if ((isdigit((unsigned char)argv[2][0]) == 0) || argv[2][1] != '-' ||
    756 	    (isdigit((unsigned char)argv[2][2]) == 0))
    757 		errx(EXIT_FAILURE, "Invalid DISKIDs value");
    758 
    759 	disk_first = atoi(&argv[2][0]);
    760 	disk_end = atoi(&argv[2][2]);
    761 
    762 	for (i = disk_first; i < disk_end + 1; i++) {
    763 		bc.bc_devmask |= (1 << i);
    764 		user_disks++;
    765 	}
    766 
    767 	/*
    768 	 * Find out how many disks are free and how much size we
    769 	 * have available for the new volume.
    770 	 */
    771 	if (ioctl(fd, BIOCINQ, &bi) == -1)
    772 		err(EXIT_FAILURE, "BIOCINQ");
    773 
    774 	for (i = 0; i < bi.bi_nodisk; i++) {
    775 		bd.bd_diskid = i;
    776 		if (ioctl(fd, BIOCDISK_NOVOL, &bd) == -1)
    777 			err(EXIT_FAILURE, "BIOCDISK_NOVOL");
    778 
    779 		if (bd.bd_status == BIOC_SDUNUSED) {
    780 			if (i == 0)
    781 				disksize = bd.bd_size;
    782 
    783 			total_size += bd.bd_size;
    784 			nfreedisks++;
    785 		}
    786 	}
    787 
    788 	if (user_disks > nfreedisks)
    789 		errx(EXIT_FAILURE, "specified disks number is higher than "
    790 		    "available free disks");
    791 
    792 	/*
    793 	 * Basic checks to be sure we don't do something stupid.
    794 	 */
    795 	if (nfreedisks == 0)
    796 		errx(EXIT_FAILURE, "No free disks available");
    797 
    798 	switch (bc.bc_level) {
    799 	case 0:	/* RAID 0 requires at least one disk */
    800 		if (argc == 7) {
    801 			if ((uint64_t)volsize > (disksize * user_disks))
    802 				errx(EXIT_FAILURE, "volume size specified "
    803 				   "is larger than available on free disks");
    804 			bc.bc_size = (uint64_t)volsize;
    805 		} else
    806 			bc.bc_size = disksize * user_disks;
    807 
    808 		break;
    809 	case 1:	/* RAID 1 requires two disks and size is total / 2 */
    810 		if (nfreedisks < 2 || user_disks < 2)
    811 			errx(EXIT_FAILURE, "2 disks are required at least for "
    812 			    "this RAID level");
    813 
    814 		/* RAID 1+0 requires three disks at least */
    815 		if (nfreedisks > 2 && user_disks > 2)
    816 			bc.bc_level = BIOC_SVOL_RAID10;
    817 
    818 		if (argc == 7) {
    819 			if ((uint64_t)volsize > ((disksize * user_disks) / 2))
    820 				errx(EXIT_FAILURE, "volume size specified "
    821 				   "is larger than available on free disks");
    822 			bc.bc_size = (uint64_t)volsize;
    823 		} else
    824 			bc.bc_size = ((disksize * user_disks) / 2);
    825 
    826 		break;
    827 	case 3:	/* RAID 3/5 requires three disks and size is total - 1 disk */
    828 	case 5:
    829 		if (nfreedisks < 3 || user_disks < 3)
    830 			errx(EXIT_FAILURE, "3 disks are required at least for "
    831 			    "this RAID level");
    832 
    833 		if (argc == 7) {
    834 			if ((uint64_t)volsize > (disksize * (user_disks - 1)))
    835 				errx(EXIT_FAILURE, "volume size specified "
    836 				    "is larger than available on free disks");
    837 			bc.bc_size = (uint64_t)volsize;
    838 		} else
    839 			bc.bc_size = (disksize * (user_disks - 1));
    840 
    841 		break;
    842 	case 6:	/* RAID 6 requires four disks and size is total - 2 disks */
    843 		if (nfreedisks < 4 || user_disks < 4)
    844 			errx(EXIT_FAILURE, "4 disks are required at least for "
    845 			    "this RAID level");
    846 
    847 		if (argc == 7) {
    848 			if ((uint64_t)volsize >
    849 			    ((disksize * user_disks) - (disksize * 2)))
    850 				err(EXIT_FAILURE, "volume size specified "
    851 				    "is larger than available on free disks");
    852 			bc.bc_size = (uint64_t)volsize;
    853 		} else
    854 			bc.bc_size =
    855 			    (((disksize * user_disks) - (disksize * 2)));
    856 
    857 		break;
    858 	default:
    859 		errx(EXIT_FAILURE, "Unsupported RAID level");
    860 	}
    861 
    862 	bc.bc_channel = location.channel;
    863 	bc.bc_target = location.target;
    864 	bc.bc_lun = location.lun;
    865 
    866 	if (ioctl(fd, BIOCVOLOPS, &bc) == -1)
    867 		err(EXIT_FAILURE, "BIOCVOLOPS");
    868 
    869         humanize_number(size, 5, bc.bc_size, "", HN_AUTOSCALE,
    870 	    HN_B | HN_NOSPACE | HN_DECIMAL);
    871 
    872 	if (bc.bc_level == BIOC_SVOL_RAID10)
    873 		snprintf(levelstr, sizeof(levelstr), "1+0");
    874 	else
    875 		snprintf(levelstr, sizeof(levelstr), "%u", bc.bc_level);
    876 
    877 	printf("Created volume %u size: %s stripe: %uK level: %s "
    878 	    "SCSI location: %u:%u.%u\n", bc.bc_volid, size, bc.bc_stripe,
    879 	    levelstr, bc.bc_channel, bc.bc_target, bc.bc_lun);
    880 }
    881 
    882 #ifdef notyet
    883 /*
    884  * To modify a RAID volume.
    885  */
    886 static void
    887 bio_volops_modify(int fd, int argc, char **argv)
    888 {
    889 	/* XTRAEME: TODO */
    890 }
    891 #endif
    892 
    893 /*
    894  * To remove a RAID volume.
    895  */
    896 static void
    897 bio_volops_remove(int fd, int argc, char **argv)
    898 {
    899 	struct bioc_volops	bc;
    900 	struct locator		location;
    901 	const char		*errstr;
    902 	char			*endptr;
    903 
    904 	if (argc != 3 || strcmp(argv[0], "volume") != 0)
    905 		usage();
    906 
    907 	memset(&bc, 0, sizeof(bc));
    908 	bc.bc_cookie = bl.bl_cookie;
    909 	bc.bc_opcode = BIOC_VREMOVE_VOLUME;
    910 
    911 	bc.bc_volid = (unsigned int)strtoul(argv[1], &endptr, 10);
    912 	if (*endptr != '\0')
    913 		errx(EXIT_FAILURE, "Invalid Volume ID value");
    914 
    915 	errstr = str2locator(argv[2], &location);
    916 	if (errstr)
    917 		errx(EXIT_FAILURE, "Target %s: %s", argv[2], errstr);
    918 
    919 	bc.bc_channel = location.channel;
    920 	bc.bc_target = location.target;
    921 	bc.bc_lun = location.lun;
    922 
    923 	if (ioctl(fd, BIOCVOLOPS, &bc) == -1)
    924 		err(EXIT_FAILURE, "BIOCVOLOPS");
    925 
    926 	printf("Removed volume %u at SCSI location %u:%u.%u\n",
    927 	    bc.bc_volid, bc.bc_channel, bc.bc_target, bc.bc_lun);
    928 }
    929 
    930 /*
    931  * To blink/unblink a disk in enclosures.
    932  */
    933 static void
    934 bio_setblink(int fd, int argc, char **argv)
    935 {
    936 	struct locator		location;
    937 	struct bioc_inq		bi;
    938 	struct bioc_vol		bv;
    939 	struct bioc_disk	bd;
    940 	struct bioc_blink	bb;
    941 	const char		*errstr;
    942 	int			v, d, rv, blink = 0;
    943 
    944 	if (argc != 2)
    945 		usage();
    946 
    947 	if (strcmp(argv[0], "start") == 0)
    948 		blink = BIOC_SBBLINK;
    949 	else if (strcmp(argv[0], "stop") == 0)
    950 		blink = BIOC_SBUNBLINK;
    951 	else
    952 		usage();
    953 
    954 	errstr = str2locator(argv[1], &location);
    955 	if (errstr)
    956 		errx(EXIT_FAILURE, "Target %s: %s", argv[1], errstr);
    957 
    958 	/* try setting blink on the device directly */
    959 	memset(&bb, 0, sizeof(bb));
    960 	bb.bb_cookie = bl.bl_cookie;
    961 	bb.bb_status = blink;
    962 	bb.bb_target = location.target;
    963 	bb.bb_channel = location.channel;
    964 	rv = ioctl(fd, BIOCBLINK, &bb);
    965 	if (rv == 0)
    966 		return;
    967 
    968 	/* if the blink didnt work, try to find something that will */
    969 	memset(&bi, 0, sizeof(bi));
    970 	bi.bi_cookie = bl.bl_cookie;
    971 	rv = ioctl(fd, BIOCINQ, &bi);
    972 	if (rv == -1)
    973 		err(EXIT_FAILURE, "BIOCINQ");
    974 
    975 	for (v = 0; v < bi.bi_novol; v++) {
    976 		memset(&bv, 0, sizeof(bv));
    977 		bv.bv_cookie = bl.bl_cookie;
    978 		bv.bv_volid = v;
    979 		rv = ioctl(fd, BIOCVOL, &bv);
    980 		if (rv == -1)
    981 			err(EXIT_FAILURE, "BIOCVOL");
    982 
    983 		for (d = 0; d < bv.bv_nodisk; d++) {
    984 			memset(&bd, 0, sizeof(bd));
    985 			bd.bd_cookie = bl.bl_cookie;
    986 			bd.bd_volid = v;
    987 			bd.bd_diskid = d;
    988 
    989 			rv = ioctl(fd, BIOCDISK, &bd);
    990 			if (rv == -1)
    991 				err(EXIT_FAILURE, "BIOCDISK");
    992 
    993 			if (bd.bd_channel == location.channel &&
    994 			    bd.bd_target == location.target &&
    995 			    bd.bd_lun == location.lun) {
    996 				if (bd.bd_procdev[0] != '\0') {
    997 					bio_blink(fd, bd.bd_procdev,
    998 					    location.target, blink);
    999 				} else
   1000 					warnx("Disk %s is not in an enclosure",
   1001 					   argv[1]);
   1002 				return;
   1003 			}
   1004 		}
   1005 	}
   1006 
   1007 	warnx("Disk %s does not exist", argv[1]);
   1008 }
   1009 
   1010 static void
   1011 bio_blink(int fd, char *enclosure, int target, int blinktype)
   1012 {
   1013 	struct bio_locate	bio;
   1014 	struct bioc_blink	blink;
   1015 
   1016 	bio.bl_name = enclosure;
   1017 	if (ioctl(fd, BIOCLOCATE, &bio) == -1)
   1018 		errx(EXIT_FAILURE,
   1019 		    "Can't locate %s device via /dev/bio", enclosure);
   1020 
   1021 	memset(&blink, 0, sizeof(blink));
   1022 	blink.bb_cookie = bio.bl_cookie;
   1023 	blink.bb_status = blinktype;
   1024 	blink.bb_target = target;
   1025 
   1026 	if (ioctl(fd, BIOCBLINK, &blink) == -1)
   1027 		err(EXIT_FAILURE, "BIOCBLINK");
   1028 }
   1029