Home | History | Annotate | Line # | Download | only in dev
dksubr.c revision 1.75
      1 /* $NetBSD: dksubr.c,v 1.75 2015/08/28 05:49:31 mlelstv Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 1996, 1997, 1998, 1999, 2002, 2008 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Jason R. Thorpe and Roland C. Dowdeswell.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 __KERNEL_RCSID(0, "$NetBSD: dksubr.c,v 1.75 2015/08/28 05:49:31 mlelstv Exp $");
     34 
     35 #include <sys/param.h>
     36 #include <sys/systm.h>
     37 #include <sys/stat.h>
     38 #include <sys/proc.h>
     39 #include <sys/ioctl.h>
     40 #include <sys/device.h>
     41 #include <sys/disk.h>
     42 #include <sys/disklabel.h>
     43 #include <sys/buf.h>
     44 #include <sys/bufq.h>
     45 #include <sys/vnode.h>
     46 #include <sys/fcntl.h>
     47 #include <sys/namei.h>
     48 #include <sys/module.h>
     49 #include <sys/syslog.h>
     50 
     51 #include <dev/dkvar.h>
     52 #include <miscfs/specfs/specdev.h> /* for v_rdev */
     53 
     54 int	dkdebug = 0;
     55 
     56 #ifdef DEBUG
     57 #define DKDB_FOLLOW	0x1
     58 #define DKDB_INIT	0x2
     59 #define DKDB_VNODE	0x4
     60 
     61 #define IFDEBUG(x,y)		if (dkdebug & (x)) y
     62 #define DPRINTF(x,y)		IFDEBUG(x, printf y)
     63 #define DPRINTF_FOLLOW(y)	DPRINTF(DKDB_FOLLOW, y)
     64 #else
     65 #define IFDEBUG(x,y)
     66 #define DPRINTF(x,y)
     67 #define DPRINTF_FOLLOW(y)
     68 #endif
     69 
     70 static int dk_subr_modcmd(modcmd_t, void *);
     71 
     72 #define DKLABELDEV(dev)	\
     73 	(MAKEDISKDEV(major((dev)), DISKUNIT((dev)), RAW_PART))
     74 
     75 static void	dk_makedisklabel(struct dk_softc *);
     76 static int	dk_translate(struct dk_softc *, struct buf *);
     77 static void	dk_done1(struct dk_softc *, struct buf *, bool);
     78 
     79 void
     80 dk_init(struct dk_softc *dksc, device_t dev, int dtype)
     81 {
     82 
     83 	memset(dksc, 0x0, sizeof(*dksc));
     84 	dksc->sc_dtype = dtype;
     85 	dksc->sc_dev = dev;
     86 
     87 	strlcpy(dksc->sc_xname, device_xname(dev), DK_XNAME_SIZE);
     88 	dksc->sc_dkdev.dk_name = dksc->sc_xname;
     89 }
     90 
     91 void
     92 dk_attach(struct dk_softc *dksc)
     93 {
     94 	mutex_init(&dksc->sc_iolock, MUTEX_DEFAULT, IPL_VM);
     95 	dksc->sc_flags |= DKF_INITED;
     96 #ifdef DIAGNOSTIC
     97 	dksc->sc_flags |= DKF_WARNLABEL | DKF_LABELSANITY;
     98 #endif
     99 }
    100 
    101 void
    102 dk_detach(struct dk_softc *dksc)
    103 {
    104 	dksc->sc_flags &= ~DKF_INITED;
    105 	mutex_destroy(&dksc->sc_iolock);
    106 }
    107 
    108 /* ARGSUSED */
    109 int
    110 dk_open(struct dk_softc *dksc, dev_t dev,
    111     int flags, int fmt, struct lwp *l)
    112 {
    113 	struct	disklabel *lp = dksc->sc_dkdev.dk_label;
    114 	int	part = DISKPART(dev);
    115 	int	pmask = 1 << part;
    116 	int	ret = 0;
    117 	struct disk *dk = &dksc->sc_dkdev;
    118 
    119 	DPRINTF_FOLLOW(("dk_open(%s, %p, 0x%"PRIx64", 0x%x)\n",
    120 	    dksc->sc_xname, dksc, dev, flags));
    121 
    122 	mutex_enter(&dk->dk_openlock);
    123 
    124 	/*
    125 	 * If there are wedges, and this is not RAW_PART, then we
    126 	 * need to fail.
    127 	 */
    128 	if (dk->dk_nwedges != 0 && part != RAW_PART) {
    129 		ret = EBUSY;
    130 		goto done;
    131 	}
    132 
    133 	/*
    134 	 * If we're init'ed and there are no other open partitions then
    135 	 * update the in-core disklabel.
    136 	 */
    137 	if ((dksc->sc_flags & DKF_INITED)) {
    138 		if ((dksc->sc_flags & DKF_VLABEL) == 0) {
    139 			dksc->sc_flags |= DKF_VLABEL;
    140 			dk_getdisklabel(dksc, dev);
    141 		}
    142 	}
    143 
    144 	/* Fail if we can't find the partition. */
    145 	if (part != RAW_PART &&
    146 	    ((dksc->sc_flags & DKF_VLABEL) == 0 ||
    147 	     part >= lp->d_npartitions ||
    148 	     lp->d_partitions[part].p_fstype == FS_UNUSED)) {
    149 		ret = ENXIO;
    150 		goto done;
    151 	}
    152 
    153 	/* Mark our unit as open. */
    154 	switch (fmt) {
    155 	case S_IFCHR:
    156 		dk->dk_copenmask |= pmask;
    157 		break;
    158 	case S_IFBLK:
    159 		dk->dk_bopenmask |= pmask;
    160 		break;
    161 	}
    162 
    163 	dk->dk_openmask = dk->dk_copenmask | dk->dk_bopenmask;
    164 
    165 done:
    166 	mutex_exit(&dk->dk_openlock);
    167 	return ret;
    168 }
    169 
    170 /* ARGSUSED */
    171 int
    172 dk_close(struct dk_softc *dksc, dev_t dev,
    173     int flags, int fmt, struct lwp *l)
    174 {
    175 	const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
    176 	int	part = DISKPART(dev);
    177 	int	pmask = 1 << part;
    178 	struct disk *dk = &dksc->sc_dkdev;
    179 
    180 	DPRINTF_FOLLOW(("dk_close(%s, %p, 0x%"PRIx64", 0x%x)\n",
    181 	    dksc->sc_xname, dksc, dev, flags));
    182 
    183 	mutex_enter(&dk->dk_openlock);
    184 
    185 	switch (fmt) {
    186 	case S_IFCHR:
    187 		dk->dk_copenmask &= ~pmask;
    188 		break;
    189 	case S_IFBLK:
    190 		dk->dk_bopenmask &= ~pmask;
    191 		break;
    192 	}
    193 	dk->dk_openmask = dk->dk_copenmask | dk->dk_bopenmask;
    194 
    195 	if (dk->dk_openmask == 0) {
    196 		if (dkd->d_lastclose != NULL)
    197 			(*dkd->d_lastclose)(dksc->sc_dev);
    198 		if ((dksc->sc_flags & DKF_KLABEL) == 0)
    199 			dksc->sc_flags &= ~DKF_VLABEL;
    200 	}
    201 
    202 	mutex_exit(&dk->dk_openlock);
    203 	return 0;
    204 }
    205 
    206 static int
    207 dk_translate(struct dk_softc *dksc, struct buf *bp)
    208 {
    209 	int	part;
    210 	int	wlabel;
    211 	daddr_t	blkno;
    212 	struct disklabel *lp;
    213 	struct disk *dk;
    214 	uint64_t numsecs;
    215 	unsigned secsize;
    216 
    217 	lp = dksc->sc_dkdev.dk_label;
    218 	dk = &dksc->sc_dkdev;
    219 
    220 	part = DISKPART(bp->b_dev);
    221 	numsecs = dk->dk_geom.dg_secperunit;
    222 	secsize = dk->dk_geom.dg_secsize;
    223 
    224 	/*
    225 	 * The transfer must be a whole number of blocks and the offset must
    226 	 * not be negative.
    227 	 */
    228 	if ((bp->b_bcount % secsize) != 0 || bp->b_blkno < 0) {
    229 		bp->b_error = EINVAL;
    230 		goto done;
    231 	}
    232 
    233 	/* If there is nothing to do, then we are done */
    234 	if (bp->b_bcount == 0)
    235 		goto done;
    236 
    237 	wlabel = dksc->sc_flags & (DKF_WLABEL|DKF_LABELLING);
    238 	if (part == RAW_PART) {
    239 		if (bounds_check_with_mediasize(bp, DEV_BSIZE, numsecs) <= 0)
    240 			goto done;
    241 	} else {
    242 		if (bounds_check_with_label(&dksc->sc_dkdev, bp, wlabel) <= 0)
    243 			goto done;
    244 	}
    245 
    246 	/*
    247 	 * Convert the block number to absolute and put it in terms
    248 	 * of the device's logical block size.
    249 	 */
    250 	if (secsize >= DEV_BSIZE)
    251 		blkno = bp->b_blkno / (secsize / DEV_BSIZE);
    252 	else
    253 		blkno = bp->b_blkno * (DEV_BSIZE / secsize);
    254 
    255 	if (part != RAW_PART)
    256 		blkno += lp->d_partitions[DISKPART(bp->b_dev)].p_offset;
    257 	bp->b_rawblkno = blkno;
    258 
    259 	return -1;
    260 
    261 done:
    262 	bp->b_resid = bp->b_bcount;
    263 	return bp->b_error;
    264 }
    265 
    266 void
    267 dk_strategy(struct dk_softc *dksc, struct buf *bp)
    268 {
    269 	int error;
    270 
    271 	DPRINTF_FOLLOW(("dk_strategy(%s, %p, %p)\n",
    272 	    dksc->sc_xname, dksc, bp));
    273 
    274 	if (!(dksc->sc_flags & DKF_INITED)) {
    275 		DPRINTF_FOLLOW(("dk_strategy: not inited\n"));
    276 		bp->b_error  = ENXIO;
    277 		biodone(bp);
    278 		return;
    279 	}
    280 
    281 	error = dk_translate(dksc, bp);
    282 	if (error >= 0) {
    283 		biodone(bp);
    284 		return;
    285 	}
    286 
    287 	/*
    288 	 * Queue buffer and start unit
    289 	 */
    290 	dk_start(dksc, bp);
    291 }
    292 
    293 void
    294 dk_start(struct dk_softc *dksc, struct buf *bp)
    295 {
    296 	const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
    297 	int error;
    298 
    299 	mutex_enter(&dksc->sc_iolock);
    300 
    301 	if (bp != NULL)
    302 		bufq_put(dksc->sc_bufq, bp);
    303 
    304 	if (dksc->sc_busy)
    305 		goto done;
    306 	dksc->sc_busy = true;
    307 
    308 	/*
    309 	 * Peeking at the buffer queue and committing the operation
    310 	 * only after success isn't atomic.
    311 	 *
    312 	 * So when a diskstart fails, the buffer is saved
    313 	 * and tried again before the next buffer is fetched.
    314 	 * dk_drain() handles flushing of a saved buffer.
    315 	 *
    316 	 * This keeps order of I/O operations, unlike bufq_put.
    317 	 */
    318 
    319 	bp = dksc->sc_deferred;
    320 	dksc->sc_deferred = NULL;
    321 
    322 	if (bp == NULL)
    323 		bp = bufq_get(dksc->sc_bufq);
    324 
    325 	while (bp != NULL) {
    326 
    327 		disk_busy(&dksc->sc_dkdev);
    328 		mutex_exit(&dksc->sc_iolock);
    329 		error = dkd->d_diskstart(dksc->sc_dev, bp);
    330 		mutex_enter(&dksc->sc_iolock);
    331 		if (error == EAGAIN) {
    332 			dksc->sc_deferred = bp;
    333 			disk_unbusy(&dksc->sc_dkdev, 0, (bp->b_flags & B_READ));
    334 			break;
    335 		}
    336 
    337 		if (error != 0) {
    338 			bp->b_error = error;
    339 			bp->b_resid = bp->b_bcount;
    340 			dk_done1(dksc, bp, false);
    341 		}
    342 
    343 		bp = bufq_get(dksc->sc_bufq);
    344 	}
    345 
    346 	dksc->sc_busy = false;
    347 done:
    348 	mutex_exit(&dksc->sc_iolock);
    349 }
    350 
    351 static void
    352 dk_done1(struct dk_softc *dksc, struct buf *bp, bool lock)
    353 {
    354 	struct disk *dk = &dksc->sc_dkdev;
    355 
    356 	if (bp->b_error != 0) {
    357 		struct cfdriver *cd = device_cfdriver(dksc->sc_dev);
    358 
    359 		diskerr(bp, cd->cd_name, "error", LOG_PRINTF, 0,
    360 			dk->dk_label);
    361 		printf("\n");
    362 	}
    363 
    364 	if (lock)
    365 		mutex_enter(&dksc->sc_iolock);
    366 	disk_unbusy(dk, bp->b_bcount - bp->b_resid, (bp->b_flags & B_READ));
    367 	if (lock)
    368 		mutex_exit(&dksc->sc_iolock);
    369 
    370 #ifdef notyet
    371 	rnd_add_uint(&dksc->sc_rnd_source, bp->b_rawblkno);
    372 #endif
    373 
    374 	biodone(bp);
    375 }
    376 
    377 void
    378 dk_done(struct dk_softc *dksc, struct buf *bp)
    379 {
    380 	dk_done1(dksc, bp, true);
    381 }
    382 
    383 void
    384 dk_drain(struct dk_softc *dksc)
    385 {
    386 	struct buf *bp;
    387 
    388 	mutex_enter(&dksc->sc_iolock);
    389 	bp = dksc->sc_deferred;
    390 	if (bp != NULL) {
    391 		bp->b_error = EIO;
    392 		bp->b_resid = bp->b_bcount;
    393 		biodone(bp);
    394 	}
    395 	bufq_drain(dksc->sc_bufq);
    396 	mutex_exit(&dksc->sc_iolock);
    397 }
    398 
    399 int
    400 dk_discard(struct dk_softc *dksc, dev_t dev, off_t pos, off_t len)
    401 {
    402 	const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
    403 	unsigned secsize = dksc->sc_dkdev.dk_geom.dg_secsize;
    404 	struct buf tmp, *bp = &tmp;
    405 	int error;
    406 
    407 	DPRINTF_FOLLOW(("dk_discard(%s, %p, 0x"PRIx64", %jd, %jd)\n",
    408 	    dksc->sc_xname, dksc, (intmax_t)pos, (intmax_t)len));
    409 
    410 	if (!(dksc->sc_flags & DKF_INITED)) {
    411 		DPRINTF_FOLLOW(("dk_discard: not inited\n"));
    412 		return ENXIO;
    413 	}
    414 
    415 	if (secsize == 0 || (pos % secsize) != 0)
    416 		return EINVAL;
    417 
    418 	/* enough data to please the bounds checking code */
    419 	bp->b_dev = dev;
    420 	bp->b_blkno = (daddr_t)(pos / secsize);
    421 	bp->b_bcount = len;
    422 	bp->b_flags = B_WRITE;
    423 
    424 	error = dk_translate(dksc, bp);
    425 	if (error >= 0)
    426 		return error;
    427 
    428 	error = dkd->d_discard(dksc->sc_dev,
    429 		(off_t)bp->b_rawblkno * secsize,
    430 		(off_t)bp->b_bcount);
    431 
    432 	return error;
    433 }
    434 
    435 int
    436 dk_size(struct dk_softc *dksc, dev_t dev)
    437 {
    438 	const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
    439 	struct	disklabel *lp;
    440 	int	is_open;
    441 	int	part;
    442 	int	size;
    443 
    444 	if ((dksc->sc_flags & DKF_INITED) == 0)
    445 		return -1;
    446 
    447 	part = DISKPART(dev);
    448 	is_open = dksc->sc_dkdev.dk_openmask & (1 << part);
    449 
    450 	if (!is_open && dkd->d_open(dev, 0, S_IFBLK, curlwp))
    451 		return -1;
    452 
    453 	lp = dksc->sc_dkdev.dk_label;
    454 	if (lp->d_partitions[part].p_fstype != FS_SWAP)
    455 		size = -1;
    456 	else
    457 		size = lp->d_partitions[part].p_size *
    458 		    (lp->d_secsize / DEV_BSIZE);
    459 
    460 	if (!is_open && dkd->d_close(dev, 0, S_IFBLK, curlwp))
    461 		return -1;
    462 
    463 	return size;
    464 }
    465 
    466 int
    467 dk_ioctl(struct dk_softc *dksc, dev_t dev,
    468 	    u_long cmd, void *data, int flag, struct lwp *l)
    469 {
    470 	const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
    471 	struct	disklabel *lp;
    472 	struct	disk *dk = &dksc->sc_dkdev;
    473 #ifdef __HAVE_OLD_DISKLABEL
    474 	struct	disklabel newlabel;
    475 #endif
    476 	int	error;
    477 
    478 	DPRINTF_FOLLOW(("dk_ioctl(%s, %p, 0x%"PRIx64", 0x%lx)\n",
    479 	    dksc->sc_xname, dksc, dev, cmd));
    480 
    481 	/* ensure that the pseudo disk is open for writes for these commands */
    482 	switch (cmd) {
    483 	case DIOCSDINFO:
    484 	case DIOCWDINFO:
    485 #ifdef __HAVE_OLD_DISKLABEL
    486 	case ODIOCSDINFO:
    487 	case ODIOCWDINFO:
    488 #endif
    489 	case DIOCKLABEL:
    490 	case DIOCWLABEL:
    491 	case DIOCAWEDGE:
    492 	case DIOCDWEDGE:
    493 	case DIOCSSTRATEGY:
    494 		if ((flag & FWRITE) == 0)
    495 			return EBADF;
    496 	}
    497 
    498 	/* ensure that the pseudo-disk is initialized for these */
    499 	switch (cmd) {
    500 	case DIOCGDINFO:
    501 	case DIOCSDINFO:
    502 	case DIOCWDINFO:
    503 	case DIOCGPART:
    504 	case DIOCKLABEL:
    505 	case DIOCWLABEL:
    506 	case DIOCGDEFLABEL:
    507 	case DIOCAWEDGE:
    508 	case DIOCDWEDGE:
    509 	case DIOCLWEDGES:
    510 	case DIOCMWEDGES:
    511 	case DIOCCACHESYNC:
    512 #ifdef __HAVE_OLD_DISKLABEL
    513 	case ODIOCGDINFO:
    514 	case ODIOCSDINFO:
    515 	case ODIOCWDINFO:
    516 	case ODIOCGDEFLABEL:
    517 #endif
    518 		if ((dksc->sc_flags & DKF_INITED) == 0)
    519 			return ENXIO;
    520 	}
    521 
    522 	error = disk_ioctl(dk, dev, cmd, data, flag, l);
    523 	if (error != EPASSTHROUGH)
    524 		return error;
    525 	else
    526 		error = 0;
    527 
    528 	switch (cmd) {
    529 	case DIOCWDINFO:
    530 	case DIOCSDINFO:
    531 #ifdef __HAVE_OLD_DISKLABEL
    532 	case ODIOCWDINFO:
    533 	case ODIOCSDINFO:
    534 #endif
    535 #ifdef __HAVE_OLD_DISKLABEL
    536 		if (cmd == ODIOCSDINFO || cmd == ODIOCWDINFO) {
    537 			memset(&newlabel, 0, sizeof newlabel);
    538 			memcpy(&newlabel, data, sizeof (struct olddisklabel));
    539 			lp = &newlabel;
    540 		} else
    541 #endif
    542 		lp = (struct disklabel *)data;
    543 
    544 		mutex_enter(&dk->dk_openlock);
    545 		dksc->sc_flags |= DKF_LABELLING;
    546 
    547 		error = setdisklabel(dksc->sc_dkdev.dk_label,
    548 		    lp, 0, dksc->sc_dkdev.dk_cpulabel);
    549 		if (error == 0) {
    550 			if (cmd == DIOCWDINFO
    551 #ifdef __HAVE_OLD_DISKLABEL
    552 			    || cmd == ODIOCWDINFO
    553 #endif
    554 			   )
    555 				error = writedisklabel(DKLABELDEV(dev),
    556 				    dkd->d_strategy, dksc->sc_dkdev.dk_label,
    557 				    dksc->sc_dkdev.dk_cpulabel);
    558 		}
    559 
    560 		dksc->sc_flags &= ~DKF_LABELLING;
    561 		mutex_exit(&dk->dk_openlock);
    562 		break;
    563 
    564 	case DIOCKLABEL:
    565 		if (*(int *)data != 0)
    566 			dksc->sc_flags |= DKF_KLABEL;
    567 		else
    568 			dksc->sc_flags &= ~DKF_KLABEL;
    569 		break;
    570 
    571 	case DIOCWLABEL:
    572 		if (*(int *)data != 0)
    573 			dksc->sc_flags |= DKF_WLABEL;
    574 		else
    575 			dksc->sc_flags &= ~DKF_WLABEL;
    576 		break;
    577 
    578 	case DIOCGDEFLABEL:
    579 		dk_getdefaultlabel(dksc, (struct disklabel *)data);
    580 		break;
    581 
    582 #ifdef __HAVE_OLD_DISKLABEL
    583 	case ODIOCGDEFLABEL:
    584 		dk_getdefaultlabel(dksc, &newlabel);
    585 		if (newlabel.d_npartitions > OLDMAXPARTITIONS)
    586 			return ENOTTY;
    587 		memcpy(data, &newlabel, sizeof (struct olddisklabel));
    588 		break;
    589 #endif
    590 
    591 	case DIOCGSTRATEGY:
    592 	    {
    593 		struct disk_strategy *dks = (void *)data;
    594 
    595 		mutex_enter(&dksc->sc_iolock);
    596 		strlcpy(dks->dks_name, bufq_getstrategyname(dksc->sc_bufq),
    597 		    sizeof(dks->dks_name));
    598 		mutex_exit(&dksc->sc_iolock);
    599 		dks->dks_paramlen = 0;
    600 
    601 		return 0;
    602 	    }
    603 
    604 	case DIOCSSTRATEGY:
    605 	    {
    606 		struct disk_strategy *dks = (void *)data;
    607 		struct bufq_state *new;
    608 		struct bufq_state *old;
    609 
    610 		if (dks->dks_param != NULL) {
    611 			return EINVAL;
    612 		}
    613 		dks->dks_name[sizeof(dks->dks_name) - 1] = 0; /* ensure term */
    614 		error = bufq_alloc(&new, dks->dks_name,
    615 		    BUFQ_EXACT|BUFQ_SORT_RAWBLOCK);
    616 		if (error) {
    617 			return error;
    618 		}
    619 		mutex_enter(&dksc->sc_iolock);
    620 		old = dksc->sc_bufq;
    621 		bufq_move(new, old);
    622 		dksc->sc_bufq = new;
    623 		mutex_exit(&dksc->sc_iolock);
    624 		bufq_free(old);
    625 
    626 		return 0;
    627 	    }
    628 
    629 	default:
    630 		error = ENOTTY;
    631 	}
    632 
    633 	return error;
    634 }
    635 
    636 /*
    637  * dk_dump dumps all of physical memory into the partition specified.
    638  * This requires substantially more framework than {s,w}ddump, and hence
    639  * is probably much more fragile.
    640  *
    641  */
    642 
    643 #define DKF_READYFORDUMP	(DKF_INITED|DKF_TAKEDUMP)
    644 #define DKFF_READYFORDUMP(x)	(((x) & DKF_READYFORDUMP) == DKF_READYFORDUMP)
    645 static volatile int	dk_dumping = 0;
    646 
    647 /* ARGSUSED */
    648 int
    649 dk_dump(struct dk_softc *dksc, dev_t dev,
    650     daddr_t blkno, void *vav, size_t size)
    651 {
    652 	const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
    653 	char *va = vav;
    654 	struct disklabel *lp;
    655 	int part, towrt, nsects, sectoff, maxblkcnt, nblk;
    656 	int maxxfer, rv = 0;
    657 
    658 	/*
    659 	 * ensure that we consider this device to be safe for dumping,
    660 	 * and that the device is configured.
    661 	 */
    662 	if (!DKFF_READYFORDUMP(dksc->sc_flags))
    663 		return ENXIO;
    664 
    665 	/* ensure that we are not already dumping */
    666 	if (dk_dumping)
    667 		return EFAULT;
    668 	dk_dumping = 1;
    669 
    670 	if (dkd->d_dumpblocks == NULL)
    671 		return ENXIO;
    672 
    673 	/* device specific max transfer size */
    674 	maxxfer = MAXPHYS;
    675 	if (dkd->d_iosize != NULL)
    676 		(*dkd->d_iosize)(dksc->sc_dev, &maxxfer);
    677 
    678 	/* Convert to disk sectors.  Request must be a multiple of size. */
    679 	part = DISKPART(dev);
    680 	lp = dksc->sc_dkdev.dk_label;
    681 	if ((size % lp->d_secsize) != 0)
    682 		return (EFAULT);
    683 	towrt = size / lp->d_secsize;
    684 	blkno = dbtob(blkno) / lp->d_secsize;   /* blkno in secsize units */
    685 
    686 	nsects = lp->d_partitions[part].p_size;
    687 	sectoff = lp->d_partitions[part].p_offset;
    688 
    689 	/* Check transfer bounds against partition size. */
    690 	if ((blkno < 0) || ((blkno + towrt) > nsects))
    691 		return (EINVAL);
    692 
    693 	/* Offset block number to start of partition. */
    694 	blkno += sectoff;
    695 
    696 	/* Start dumping and return when done. */
    697 	maxblkcnt = howmany(maxxfer, lp->d_secsize);
    698 	while (towrt > 0) {
    699 		nblk = min(maxblkcnt, towrt);
    700 
    701 		if ((rv = (*dkd->d_dumpblocks)(dksc->sc_dev, va, blkno, nblk)) != 0)
    702 			return (rv);
    703 
    704 		towrt -= nblk;
    705 		blkno += nblk;
    706 		va += nblk * lp->d_secsize;
    707 	}
    708 
    709 	dk_dumping = 0;
    710 
    711 	return 0;
    712 }
    713 
    714 /* ARGSUSED */
    715 void
    716 dk_getdefaultlabel(struct dk_softc *dksc, struct disklabel *lp)
    717 {
    718 	struct disk_geom *dg = &dksc->sc_dkdev.dk_geom;
    719 
    720 	memset(lp, 0, sizeof(*lp));
    721 
    722 	if (dg->dg_secperunit > UINT32_MAX)
    723 		lp->d_secperunit = UINT32_MAX;
    724 	else
    725 		lp->d_secperunit = dg->dg_secperunit;
    726 	lp->d_secsize = dg->dg_secsize;
    727 	lp->d_nsectors = dg->dg_nsectors;
    728 	lp->d_ntracks = dg->dg_ntracks;
    729 	lp->d_ncylinders = dg->dg_ncylinders;
    730 	lp->d_secpercyl = lp->d_ntracks * lp->d_nsectors;
    731 
    732 	strlcpy(lp->d_typename, dksc->sc_xname, sizeof(lp->d_typename));
    733 	lp->d_type = dksc->sc_dtype;
    734 	strlcpy(lp->d_packname, "fictitious", sizeof(lp->d_packname));
    735 	lp->d_rpm = 3600;
    736 	lp->d_interleave = 1;
    737 	lp->d_flags = 0;
    738 
    739 	lp->d_partitions[RAW_PART].p_offset = 0;
    740 	lp->d_partitions[RAW_PART].p_size = lp->d_secperunit;
    741 	lp->d_partitions[RAW_PART].p_fstype = FS_UNUSED;
    742 	lp->d_npartitions = RAW_PART + 1;
    743 
    744 	lp->d_magic = DISKMAGIC;
    745 	lp->d_magic2 = DISKMAGIC;
    746 	lp->d_checksum = dkcksum(dksc->sc_dkdev.dk_label);
    747 }
    748 
    749 /* ARGSUSED */
    750 void
    751 dk_getdisklabel(struct dk_softc *dksc, dev_t dev)
    752 {
    753 	const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
    754 	struct	 disklabel *lp = dksc->sc_dkdev.dk_label;
    755 	struct	 cpu_disklabel *clp = dksc->sc_dkdev.dk_cpulabel;
    756 	struct   disk_geom *dg = &dksc->sc_dkdev.dk_geom;
    757 	struct	 partition *pp;
    758 	int	 i;
    759 	const char	*errstring;
    760 
    761 	memset(clp, 0x0, sizeof(*clp));
    762 	dk_getdefaultlabel(dksc, lp);
    763 	errstring = readdisklabel(DKLABELDEV(dev), dkd->d_strategy,
    764 	    dksc->sc_dkdev.dk_label, dksc->sc_dkdev.dk_cpulabel);
    765 	if (errstring) {
    766 		dk_makedisklabel(dksc);
    767 		if (dksc->sc_flags & DKF_WARNLABEL)
    768 			printf("%s: %s\n", dksc->sc_xname, errstring);
    769 		return;
    770 	}
    771 
    772 	if ((dksc->sc_flags & DKF_LABELSANITY) == 0)
    773 		return;
    774 
    775 	/* Sanity check */
    776 	if (lp->d_secperunit < UINT32_MAX ?
    777 		lp->d_secperunit != dg->dg_secperunit :
    778 		lp->d_secperunit > dg->dg_secperunit)
    779 		printf("WARNING: %s: total sector size in disklabel (%ju) "
    780 		    "!= the size of %s (%ju)\n", dksc->sc_xname,
    781 		    (uintmax_t)lp->d_secperunit, dksc->sc_xname,
    782 		    (uintmax_t)dg->dg_secperunit);
    783 
    784 	for (i=0; i < lp->d_npartitions; i++) {
    785 		pp = &lp->d_partitions[i];
    786 		if (pp->p_offset + pp->p_size > dg->dg_secperunit)
    787 			printf("WARNING: %s: end of partition `%c' exceeds "
    788 			    "the size of %s (%ju)\n", dksc->sc_xname,
    789 			    'a' + i, dksc->sc_xname,
    790 			    (uintmax_t)dg->dg_secperunit);
    791 	}
    792 }
    793 
    794 /* ARGSUSED */
    795 static void
    796 dk_makedisklabel(struct dk_softc *dksc)
    797 {
    798 	struct	disklabel *lp = dksc->sc_dkdev.dk_label;
    799 
    800 	lp->d_partitions[RAW_PART].p_fstype = FS_BSDFFS;
    801 	strlcpy(lp->d_packname, "default label", sizeof(lp->d_packname));
    802 	lp->d_checksum = dkcksum(lp);
    803 }
    804 
    805 /* This function is taken from ccd.c:1.76  --rcd */
    806 
    807 /*
    808  * XXX this function looks too generic for dksubr.c, shouldn't we
    809  *     put it somewhere better?
    810  */
    811 
    812 /*
    813  * Lookup the provided name in the filesystem.  If the file exists,
    814  * is a valid block device, and isn't being used by anyone else,
    815  * set *vpp to the file's vnode.
    816  */
    817 int
    818 dk_lookup(struct pathbuf *pb, struct lwp *l, struct vnode **vpp)
    819 {
    820 	struct nameidata nd;
    821 	struct vnode *vp;
    822 	int     error;
    823 
    824 	if (l == NULL)
    825 		return ESRCH;	/* Is ESRCH the best choice? */
    826 
    827 	NDINIT(&nd, LOOKUP, FOLLOW, pb);
    828 	if ((error = vn_open(&nd, FREAD | FWRITE, 0)) != 0) {
    829 		DPRINTF((DKDB_FOLLOW|DKDB_INIT),
    830 		    ("dk_lookup: vn_open error = %d\n", error));
    831 		return error;
    832 	}
    833 
    834 	vp = nd.ni_vp;
    835 	if (vp->v_type != VBLK) {
    836 		error = ENOTBLK;
    837 		goto out;
    838 	}
    839 
    840 	/* Reopen as anonymous vnode to protect against forced unmount. */
    841 	if ((error = bdevvp(vp->v_rdev, vpp)) != 0)
    842 		goto out;
    843 	VOP_UNLOCK(vp);
    844 	if ((error = vn_close(vp, FREAD | FWRITE, l->l_cred)) != 0) {
    845 		vrele(*vpp);
    846 		return error;
    847 	}
    848 	if ((error = VOP_OPEN(*vpp, FREAD | FWRITE, l->l_cred)) != 0) {
    849 		vrele(*vpp);
    850 		return error;
    851 	}
    852 	mutex_enter((*vpp)->v_interlock);
    853 	(*vpp)->v_writecount++;
    854 	mutex_exit((*vpp)->v_interlock);
    855 
    856 	IFDEBUG(DKDB_VNODE, vprint("dk_lookup: vnode info", *vpp));
    857 
    858 	return 0;
    859 out:
    860 	VOP_UNLOCK(vp);
    861 	(void) vn_close(vp, FREAD | FWRITE, l->l_cred);
    862 	return error;
    863 }
    864 
    865 MODULE(MODULE_CLASS_MISC, dk_subr, NULL);
    866 
    867 static int
    868 dk_subr_modcmd(modcmd_t cmd, void *arg)
    869 {
    870 	switch (cmd) {
    871 	case MODULE_CMD_INIT:
    872 	case MODULE_CMD_FINI:
    873 		return 0;
    874 	case MODULE_CMD_STAT:
    875 	case MODULE_CMD_AUTOUNLOAD:
    876 	default:
    877 		return ENOTTY;
    878 	}
    879 }
    880