Home | History | Annotate | Line # | Download | only in dev
ld.c revision 1.21
      1  1.21    itojun /*	$NetBSD: ld.c,v 1.21 2003/05/16 15:34:25 itojun Exp $	*/
      2   1.1        ad 
      3   1.1        ad /*-
      4   1.1        ad  * Copyright (c) 1998, 2000 The NetBSD Foundation, Inc.
      5   1.1        ad  * All rights reserved.
      6   1.1        ad  *
      7   1.1        ad  * This code is derived from software contributed to The NetBSD Foundation
      8   1.1        ad  * by Andrew Doran and Charles M. Hannum.
      9   1.1        ad  *
     10   1.1        ad  * Redistribution and use in source and binary forms, with or without
     11   1.1        ad  * modification, are permitted provided that the following conditions
     12   1.1        ad  * are met:
     13   1.1        ad  * 1. Redistributions of source code must retain the above copyright
     14   1.1        ad  *    notice, this list of conditions and the following disclaimer.
     15   1.1        ad  * 2. Redistributions in binary form must reproduce the above copyright
     16   1.1        ad  *    notice, this list of conditions and the following disclaimer in the
     17   1.1        ad  *    documentation and/or other materials provided with the distribution.
     18   1.1        ad  * 3. All advertising materials mentioning features or use of this software
     19   1.1        ad  *    must display the following acknowledgement:
     20   1.1        ad  *        This product includes software developed by the NetBSD
     21   1.1        ad  *        Foundation, Inc. and its contributors.
     22   1.1        ad  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23   1.1        ad  *    contributors may be used to endorse or promote products derived
     24   1.1        ad  *    from this software without specific prior written permission.
     25   1.1        ad  *
     26   1.1        ad  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27   1.1        ad  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28   1.1        ad  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29   1.1        ad  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30   1.1        ad  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31   1.1        ad  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32   1.1        ad  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33   1.1        ad  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34   1.1        ad  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35   1.1        ad  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36   1.1        ad  * POSSIBILITY OF SUCH DAMAGE.
     37   1.1        ad  */
     38   1.1        ad 
     39   1.1        ad /*
     40   1.1        ad  * Disk driver for use by RAID controllers.
     41   1.1        ad  */
     42  1.12     lukem 
     43  1.12     lukem #include <sys/cdefs.h>
     44  1.21    itojun __KERNEL_RCSID(0, "$NetBSD: ld.c,v 1.21 2003/05/16 15:34:25 itojun Exp $");
     45   1.1        ad 
     46   1.1        ad #include "rnd.h"
     47   1.1        ad 
     48   1.1        ad #include <sys/param.h>
     49   1.1        ad #include <sys/systm.h>
     50   1.1        ad #include <sys/kernel.h>
     51   1.1        ad #include <sys/device.h>
     52   1.1        ad #include <sys/queue.h>
     53   1.1        ad #include <sys/proc.h>
     54   1.1        ad #include <sys/buf.h>
     55   1.1        ad #include <sys/endian.h>
     56   1.1        ad #include <sys/disklabel.h>
     57   1.1        ad #include <sys/disk.h>
     58   1.1        ad #include <sys/dkio.h>
     59   1.1        ad #include <sys/stat.h>
     60   1.1        ad #include <sys/lock.h>
     61   1.1        ad #include <sys/conf.h>
     62   1.1        ad #include <sys/fcntl.h>
     63   1.2        ad #include <sys/vnode.h>
     64   1.1        ad #include <sys/syslog.h>
     65   1.1        ad #if NRND > 0
     66   1.1        ad #include <sys/rnd.h>
     67   1.1        ad #endif
     68   1.1        ad 
     69   1.1        ad #include <dev/ldvar.h>
     70   1.1        ad 
     71   1.1        ad static void	ldgetdefaultlabel(struct ld_softc *, struct disklabel *);
     72   1.1        ad static void	ldgetdisklabel(struct ld_softc *);
     73   1.1        ad static int	ldlock(struct ld_softc *);
     74   1.1        ad static void	ldminphys(struct buf *bp);
     75   1.1        ad static void	ldshutdown(void *);
     76   1.1        ad static int	ldstart(struct ld_softc *, struct buf *);
     77   1.1        ad static void	ldunlock(struct ld_softc *);
     78   1.1        ad 
     79   1.1        ad extern struct	cfdriver ld_cd;
     80   1.1        ad 
     81  1.16   gehenna dev_type_open(ldopen);
     82  1.16   gehenna dev_type_close(ldclose);
     83  1.16   gehenna dev_type_read(ldread);
     84  1.16   gehenna dev_type_write(ldwrite);
     85  1.16   gehenna dev_type_ioctl(ldioctl);
     86  1.16   gehenna dev_type_strategy(ldstrategy);
     87  1.16   gehenna dev_type_dump(lddump);
     88  1.16   gehenna dev_type_size(ldsize);
     89  1.16   gehenna 
     90  1.16   gehenna const struct bdevsw ld_bdevsw = {
     91  1.16   gehenna 	ldopen, ldclose, ldstrategy, ldioctl, lddump, ldsize, D_DISK
     92  1.16   gehenna };
     93  1.16   gehenna 
     94  1.16   gehenna const struct cdevsw ld_cdevsw = {
     95  1.16   gehenna 	ldopen, ldclose, ldread, ldwrite, ldioctl,
     96  1.17  jdolecek 	nostop, notty, nopoll, nommap, nokqfilter, D_DISK
     97  1.16   gehenna };
     98  1.16   gehenna 
     99   1.1        ad static struct	dkdriver lddkdriver = { ldstrategy };
    100   1.1        ad static void	*ld_sdh;
    101   1.1        ad 
    102   1.1        ad void
    103   1.1        ad ldattach(struct ld_softc *sc)
    104   1.1        ad {
    105   1.1        ad 	char buf[9];
    106   1.1        ad 
    107   1.7        ad 	if ((sc->sc_flags & LDF_ENABLED) == 0) {
    108   1.7        ad 		printf("%s: disabled\n", sc->sc_dv.dv_xname);
    109   1.7        ad 		return;
    110   1.7        ad 	}
    111   1.7        ad 
    112   1.1        ad 	/* Initialise and attach the disk structure. */
    113   1.1        ad 	sc->sc_dk.dk_driver = &lddkdriver;
    114   1.1        ad 	sc->sc_dk.dk_name = sc->sc_dv.dv_xname;
    115   1.1        ad 	disk_attach(&sc->sc_dk);
    116   1.1        ad 
    117   1.1        ad 	if (sc->sc_maxxfer > MAXPHYS)
    118   1.1        ad 		sc->sc_maxxfer = MAXPHYS;
    119   1.9        ad 
    120  1.19   thorpej 	/* Build synthetic geometry if necessary. */
    121  1.19   thorpej 	if (sc->sc_nheads == 0 || sc->sc_nsectors == 0 ||
    122  1.19   thorpej 	    sc->sc_ncylinders == 0) {
    123  1.19   thorpej 		if (sc->sc_secperunit <= 528 * 2048)		/* 528MB */
    124  1.19   thorpej 			sc->sc_nheads = 16;
    125  1.19   thorpej 		else if (sc->sc_secperunit <= 1024 * 2048)	/* 1GB */
    126  1.19   thorpej 			sc->sc_nheads = 32;
    127  1.19   thorpej 		else if (sc->sc_secperunit <= 21504 * 2048)	/* 21GB */
    128  1.19   thorpej 			sc->sc_nheads = 64;
    129  1.19   thorpej 		else if (sc->sc_secperunit <= 43008 * 2048)	/* 42GB */
    130  1.19   thorpej 			sc->sc_nheads = 128;
    131  1.19   thorpej 		else
    132  1.19   thorpej 			sc->sc_nheads = 255;
    133  1.19   thorpej 
    134  1.19   thorpej 		sc->sc_nsectors = 63;
    135  1.19   thorpej 		sc->sc_ncylinders = sc->sc_secperunit /
    136  1.19   thorpej 		    (sc->sc_nheads * sc->sc_nsectors);
    137  1.19   thorpej 	}
    138   1.1        ad 
    139   1.1        ad 	format_bytes(buf, sizeof(buf), (u_int64_t)sc->sc_secperunit *
    140   1.1        ad 	    sc->sc_secsize);
    141   1.1        ad 	printf("%s: %s, %d cyl, %d head, %d sec, %d bytes/sect x %d sectors\n",
    142   1.1        ad 	    sc->sc_dv.dv_xname, buf, sc->sc_ncylinders, sc->sc_nheads,
    143   1.1        ad 	    sc->sc_nsectors, sc->sc_secsize, sc->sc_secperunit);
    144   1.1        ad 
    145   1.1        ad #if NRND > 0
    146   1.1        ad 	/* Attach the device into the rnd source list. */
    147   1.1        ad 	rnd_attach_source(&sc->sc_rnd_source, sc->sc_dv.dv_xname,
    148   1.1        ad 	    RND_TYPE_DISK, 0);
    149   1.1        ad #endif
    150   1.1        ad 
    151   1.1        ad 	/* Set the `shutdownhook'. */
    152   1.1        ad 	if (ld_sdh == NULL)
    153   1.1        ad 		ld_sdh = shutdownhook_establish(ldshutdown, NULL);
    154  1.15   hannken 	bufq_alloc(&sc->sc_bufq, BUFQ_FCFS);
    155   1.1        ad }
    156   1.1        ad 
    157   1.3        ad int
    158   1.7        ad ldadjqparam(struct ld_softc *sc, int max)
    159   1.3        ad {
    160   1.7        ad 	int s, rv;
    161   1.7        ad 
    162   1.7        ad 	s = splbio();
    163   1.7        ad 	sc->sc_maxqueuecnt = max;
    164   1.7        ad 	if (sc->sc_queuecnt > max) {
    165   1.7        ad 		sc->sc_flags |= LDF_DRAIN;
    166   1.7        ad 		rv = tsleep(&sc->sc_queuecnt, PRIBIO, "lddrn", 30 * hz);
    167   1.7        ad 		sc->sc_flags &= ~LDF_DRAIN;
    168   1.7        ad 	} else
    169   1.7        ad 		rv = 0;
    170   1.7        ad 	splx(s);
    171   1.7        ad 
    172   1.7        ad 	return (rv);
    173   1.7        ad }
    174   1.7        ad 
    175   1.7        ad int
    176   1.7        ad ldbegindetach(struct ld_softc *sc, int flags)
    177   1.7        ad {
    178   1.7        ad 	int s, rv;
    179   1.7        ad 
    180   1.7        ad 	if ((sc->sc_flags & LDF_ENABLED) == 0)
    181   1.7        ad 		return (0);
    182   1.3        ad 
    183   1.3        ad 	if ((flags & DETACH_FORCE) == 0 && sc->sc_dk.dk_openmask != 0)
    184   1.3        ad 		return (EBUSY);
    185   1.3        ad 
    186   1.3        ad 	s = splbio();
    187   1.7        ad 	sc->sc_flags |= LDF_DETACH;
    188   1.7        ad 	rv = ldadjqparam(sc, 0);
    189   1.3        ad 	splx(s);
    190   1.7        ad 
    191   1.7        ad 	return (rv);
    192   1.3        ad }
    193   1.3        ad 
    194   1.2        ad void
    195   1.7        ad ldenddetach(struct ld_softc *sc)
    196   1.2        ad {
    197   1.2        ad 	struct buf *bp;
    198  1.13  drochner 	int s, bmaj, cmaj, i, mn;
    199   1.2        ad 
    200   1.7        ad 	if ((sc->sc_flags & LDF_ENABLED) == 0)
    201   1.7        ad 		return;
    202   1.7        ad 
    203   1.2        ad 	/* Wait for commands queued with the hardware to complete. */
    204   1.2        ad 	if (sc->sc_queuecnt != 0)
    205   1.7        ad 		if (tsleep(&sc->sc_queuecnt, PRIBIO, "lddtch", 30 * hz))
    206   1.7        ad 			printf("%s: not drained\n", sc->sc_dv.dv_xname);
    207   1.2        ad 
    208   1.2        ad 	/* Locate the major numbers. */
    209  1.16   gehenna 	bmaj = bdevsw_lookup_major(&ld_bdevsw);
    210  1.16   gehenna 	cmaj = cdevsw_lookup_major(&ld_cdevsw);
    211   1.2        ad 
    212   1.2        ad 	/* Kill off any queued buffers. */
    213   1.2        ad 	s = splbio();
    214  1.14   hannken 	while ((bp = BUFQ_GET(&sc->sc_bufq)) != NULL) {
    215   1.2        ad 		bp->b_error = EIO;
    216   1.2        ad 		bp->b_flags |= B_ERROR;
    217   1.2        ad 		bp->b_resid = bp->b_bcount;
    218   1.2        ad 		biodone(bp);
    219   1.2        ad 	}
    220  1.15   hannken 	bufq_free(&sc->sc_bufq);
    221   1.2        ad 	splx(s);
    222   1.2        ad 
    223   1.2        ad 	/* Nuke the vnodes for any open instances. */
    224  1.13  drochner 	for (i = 0; i < MAXPARTITIONS; i++) {
    225  1.13  drochner 		mn = DISKMINOR(sc->sc_dv.dv_unit, i);
    226  1.13  drochner 		vdevgone(bmaj, mn, mn, VBLK);
    227  1.13  drochner 		vdevgone(cmaj, mn, mn, VCHR);
    228  1.13  drochner 	}
    229  1.13  drochner 
    230   1.2        ad 	/* Detach from the disk list. */
    231   1.2        ad 	disk_detach(&sc->sc_dk);
    232   1.2        ad 
    233   1.2        ad #if NRND > 0
    234   1.2        ad 	/* Unhook the entropy source. */
    235   1.2        ad 	rnd_detach_source(&sc->sc_rnd_source);
    236   1.2        ad #endif
    237   1.2        ad 
    238   1.2        ad 	/* Flush the device's cache. */
    239   1.2        ad 	if (sc->sc_flush != NULL)
    240   1.2        ad 		if ((*sc->sc_flush)(sc) != 0)
    241   1.2        ad 			printf("%s: unable to flush cache\n",
    242   1.2        ad 			    sc->sc_dv.dv_xname);
    243   1.2        ad }
    244   1.2        ad 
    245   1.8     lukem /* ARGSUSED */
    246   1.1        ad static void
    247   1.1        ad ldshutdown(void *cookie)
    248   1.1        ad {
    249   1.1        ad 	struct ld_softc *sc;
    250   1.1        ad 	int i;
    251   1.1        ad 
    252   1.1        ad 	for (i = 0; i < ld_cd.cd_ndevs; i++) {
    253   1.1        ad 		if ((sc = device_lookup(&ld_cd, i)) == NULL)
    254   1.1        ad 			continue;
    255   1.1        ad 		if (sc->sc_flush != NULL && (*sc->sc_flush)(sc) != 0)
    256   1.1        ad 			printf("%s: unable to flush cache\n",
    257   1.1        ad 			    sc->sc_dv.dv_xname);
    258   1.1        ad 	}
    259   1.1        ad }
    260   1.1        ad 
    261   1.8     lukem /* ARGSUSED */
    262   1.1        ad int
    263   1.1        ad ldopen(dev_t dev, int flags, int fmt, struct proc *p)
    264   1.1        ad {
    265   1.1        ad 	struct ld_softc *sc;
    266   1.1        ad 	int unit, part;
    267   1.1        ad 
    268   1.1        ad 	unit = DISKUNIT(dev);
    269   1.1        ad 	if ((sc = device_lookup(&ld_cd, unit))== NULL)
    270   1.1        ad 		return (ENXIO);
    271   1.1        ad 	if ((sc->sc_flags & LDF_ENABLED) == 0)
    272   1.1        ad 		return (ENODEV);
    273   1.1        ad 	part = DISKPART(dev);
    274   1.1        ad 	ldlock(sc);
    275   1.1        ad 
    276   1.1        ad 	if (sc->sc_dk.dk_openmask == 0)
    277   1.1        ad 		ldgetdisklabel(sc);
    278   1.1        ad 
    279   1.1        ad 	/* Check that the partition exists. */
    280   1.1        ad 	if (part != RAW_PART && (part >= sc->sc_dk.dk_label->d_npartitions ||
    281   1.1        ad 	    sc->sc_dk.dk_label->d_partitions[part].p_fstype == FS_UNUSED)) {
    282   1.1        ad 	     	ldunlock(sc);
    283   1.1        ad 		return (ENXIO);
    284   1.1        ad 	}
    285   1.1        ad 
    286   1.1        ad 	/* Ensure only one open at a time. */
    287   1.1        ad 	switch (fmt) {
    288   1.1        ad 	case S_IFCHR:
    289   1.1        ad 		sc->sc_dk.dk_copenmask |= (1 << part);
    290   1.1        ad 		break;
    291   1.1        ad 	case S_IFBLK:
    292   1.1        ad 		sc->sc_dk.dk_bopenmask |= (1 << part);
    293   1.1        ad 		break;
    294   1.1        ad 	}
    295   1.1        ad 	sc->sc_dk.dk_openmask =
    296   1.1        ad 	    sc->sc_dk.dk_copenmask | sc->sc_dk.dk_bopenmask;
    297   1.1        ad 
    298   1.1        ad 	ldunlock(sc);
    299   1.1        ad 	return (0);
    300   1.1        ad }
    301   1.1        ad 
    302   1.8     lukem /* ARGSUSED */
    303   1.1        ad int
    304   1.1        ad ldclose(dev_t dev, int flags, int fmt, struct proc *p)
    305   1.1        ad {
    306   1.1        ad 	struct ld_softc *sc;
    307   1.1        ad 	int part, unit;
    308   1.1        ad 
    309   1.1        ad 	unit = DISKUNIT(dev);
    310   1.1        ad 	part = DISKPART(dev);
    311   1.1        ad 	sc = device_lookup(&ld_cd, unit);
    312   1.1        ad 	ldlock(sc);
    313   1.1        ad 
    314   1.1        ad 	switch (fmt) {
    315   1.1        ad 	case S_IFCHR:
    316   1.1        ad 		sc->sc_dk.dk_copenmask &= ~(1 << part);
    317   1.1        ad 		break;
    318   1.1        ad 	case S_IFBLK:
    319   1.1        ad 		sc->sc_dk.dk_bopenmask &= ~(1 << part);
    320   1.1        ad 		break;
    321   1.1        ad 	}
    322   1.1        ad 	sc->sc_dk.dk_openmask =
    323   1.1        ad 	    sc->sc_dk.dk_copenmask | sc->sc_dk.dk_bopenmask;
    324   1.1        ad 
    325   1.1        ad 	if (sc->sc_dk.dk_openmask == 0 && sc->sc_flush != NULL)
    326   1.1        ad 		if ((*sc->sc_flush)(sc) != 0)
    327   1.1        ad 			printf("%s: unable to flush cache\n",
    328   1.1        ad 			    sc->sc_dv.dv_xname);
    329   1.1        ad 
    330   1.1        ad 	ldunlock(sc);
    331   1.1        ad 	return (0);
    332   1.1        ad }
    333   1.1        ad 
    334   1.8     lukem /* ARGSUSED */
    335   1.1        ad int
    336   1.1        ad ldread(dev_t dev, struct uio *uio, int ioflag)
    337   1.1        ad {
    338   1.1        ad 
    339   1.1        ad 	return (physio(ldstrategy, NULL, dev, B_READ, ldminphys, uio));
    340   1.1        ad }
    341   1.1        ad 
    342   1.8     lukem /* ARGSUSED */
    343   1.1        ad int
    344   1.1        ad ldwrite(dev_t dev, struct uio *uio, int ioflag)
    345   1.1        ad {
    346   1.1        ad 
    347   1.1        ad 	return (physio(ldstrategy, NULL, dev, B_WRITE, ldminphys, uio));
    348   1.1        ad }
    349   1.1        ad 
    350   1.8     lukem /* ARGSUSED */
    351   1.1        ad int
    352   1.1        ad ldioctl(dev_t dev, u_long cmd, caddr_t addr, int32_t flag, struct proc *p)
    353   1.1        ad {
    354   1.1        ad 	struct ld_softc *sc;
    355   1.1        ad 	int part, unit, error;
    356   1.4      fvdl #ifdef __HAVE_OLD_DISKLABEL
    357   1.6    itojun 	struct disklabel newlabel;
    358   1.4      fvdl #endif
    359   1.6    itojun 	struct disklabel *lp;
    360   1.1        ad 
    361   1.1        ad 	unit = DISKUNIT(dev);
    362   1.1        ad 	part = DISKPART(dev);
    363   1.1        ad 	sc = device_lookup(&ld_cd, unit);
    364   1.1        ad 	error = 0;
    365   1.1        ad 
    366   1.1        ad 	switch (cmd) {
    367   1.1        ad 	case DIOCGDINFO:
    368   1.1        ad 		memcpy(addr, sc->sc_dk.dk_label, sizeof(struct disklabel));
    369   1.1        ad 		return (0);
    370   1.1        ad 
    371   1.4      fvdl #ifdef __HAVE_OLD_DISKLABEL
    372   1.4      fvdl 	case ODIOCGDINFO:
    373   1.4      fvdl 		newlabel = *(sc->sc_dk.dk_label);
    374   1.4      fvdl 		if (newlabel.d_npartitions > OLDMAXPARTITIONS)
    375   1.5      fvdl 			return ENOTTY;
    376   1.4      fvdl 		memcpy(addr, &newlabel, sizeof(struct olddisklabel));
    377   1.4      fvdl 		return (0);
    378   1.4      fvdl #endif
    379   1.4      fvdl 
    380   1.1        ad 	case DIOCGPART:
    381   1.1        ad 		((struct partinfo *)addr)->disklab = sc->sc_dk.dk_label;
    382   1.1        ad 		((struct partinfo *)addr)->part =
    383   1.1        ad 		    &sc->sc_dk.dk_label->d_partitions[part];
    384   1.1        ad 		break;
    385   1.1        ad 
    386   1.1        ad 	case DIOCWDINFO:
    387   1.1        ad 	case DIOCSDINFO:
    388   1.4      fvdl #ifdef __HAVE_OLD_DISKLABEL
    389   1.4      fvdl 	case ODIOCWDINFO:
    390   1.4      fvdl 	case ODIOCSDINFO:
    391   1.4      fvdl 
    392   1.4      fvdl 		if (cmd == ODIOCSDINFO || cmd == ODIOCWDINFO) {
    393   1.4      fvdl 			memset(&newlabel, 0, sizeof newlabel);
    394   1.4      fvdl 			memcpy(&newlabel, addr, sizeof (struct olddisklabel));
    395   1.4      fvdl 			lp = &newlabel;
    396   1.4      fvdl 		} else
    397   1.4      fvdl #endif
    398   1.4      fvdl 		lp = (struct disklabel *)addr;
    399   1.4      fvdl 
    400   1.1        ad 		if ((flag & FWRITE) == 0)
    401   1.1        ad 			return (EBADF);
    402   1.1        ad 
    403   1.1        ad 		if ((error = ldlock(sc)) != 0)
    404   1.1        ad 			return (error);
    405   1.1        ad 		sc->sc_flags |= LDF_LABELLING;
    406   1.1        ad 
    407   1.1        ad 		error = setdisklabel(sc->sc_dk.dk_label,
    408   1.4      fvdl 		    lp, /*sc->sc_dk.dk_openmask : */0,
    409   1.1        ad 		    sc->sc_dk.dk_cpulabel);
    410   1.4      fvdl 		if (error == 0 && (cmd == DIOCWDINFO
    411   1.4      fvdl #ifdef __HAVE_OLD_DISKLABEL
    412   1.4      fvdl 		    || cmd == ODIOCWDINFO
    413   1.4      fvdl #endif
    414   1.4      fvdl 		    ))
    415   1.1        ad 			error = writedisklabel(
    416   1.1        ad 			    MAKEDISKDEV(major(dev), DISKUNIT(dev), RAW_PART),
    417   1.1        ad 			    ldstrategy, sc->sc_dk.dk_label,
    418   1.1        ad 			    sc->sc_dk.dk_cpulabel);
    419   1.1        ad 
    420   1.1        ad 		sc->sc_flags &= ~LDF_LABELLING;
    421   1.1        ad 		ldunlock(sc);
    422   1.1        ad 		break;
    423   1.1        ad 
    424   1.1        ad 	case DIOCWLABEL:
    425   1.1        ad 		if ((flag & FWRITE) == 0)
    426   1.1        ad 			return (EBADF);
    427   1.1        ad 		if (*(int *)addr)
    428   1.1        ad 			sc->sc_flags |= LDF_WLABEL;
    429   1.1        ad 		else
    430   1.1        ad 			sc->sc_flags &= ~LDF_WLABEL;
    431   1.1        ad 		break;
    432   1.1        ad 
    433   1.1        ad 	case DIOCGDEFLABEL:
    434   1.1        ad 		ldgetdefaultlabel(sc, (struct disklabel *)addr);
    435   1.1        ad 		break;
    436   1.4      fvdl 
    437   1.4      fvdl #ifdef __HAVE_OLD_DISKLABEL
    438   1.4      fvdl 	case ODIOCGDEFLABEL:
    439   1.4      fvdl 		ldgetdefaultlabel(sc, &newlabel);
    440   1.4      fvdl 		if (newlabel.d_npartitions > OLDMAXPARTITIONS)
    441   1.5      fvdl 			return ENOTTY;
    442   1.4      fvdl 		memcpy(addr, &newlabel, sizeof (struct olddisklabel));
    443   1.4      fvdl 		break;
    444   1.4      fvdl #endif
    445   1.1        ad 
    446   1.1        ad 	default:
    447   1.1        ad 		error = ENOTTY;
    448   1.1        ad 		break;
    449   1.1        ad 	}
    450   1.1        ad 
    451   1.1        ad 	return (error);
    452   1.1        ad }
    453   1.1        ad 
    454   1.1        ad void
    455   1.1        ad ldstrategy(struct buf *bp)
    456   1.1        ad {
    457   1.1        ad 	struct ld_softc *sc;
    458   1.1        ad 	int s;
    459   1.1        ad 
    460   1.1        ad 	sc = device_lookup(&ld_cd, DISKUNIT(bp->b_dev));
    461   1.1        ad 
    462   1.1        ad 	s = splbio();
    463   1.7        ad 	if (sc->sc_queuecnt >= sc->sc_maxqueuecnt) {
    464  1.14   hannken 		BUFQ_PUT(&sc->sc_bufq, bp);
    465   1.1        ad 		splx(s);
    466   1.1        ad 		return;
    467   1.1        ad 	}
    468   1.1        ad 	splx(s);
    469   1.1        ad 	ldstart(sc, bp);
    470   1.1        ad }
    471   1.1        ad 
    472   1.1        ad static int
    473   1.1        ad ldstart(struct ld_softc *sc, struct buf *bp)
    474   1.1        ad {
    475   1.1        ad 	struct disklabel *lp;
    476   1.1        ad 	int part, s, rv;
    477   1.1        ad 
    478   1.7        ad 	if ((sc->sc_flags & LDF_DETACH) != 0) {
    479   1.2        ad 		bp->b_error = EIO;
    480   1.2        ad 		bp->b_flags |= B_ERROR;
    481   1.2        ad 		bp->b_resid = bp->b_bcount;
    482   1.2        ad 		biodone(bp);
    483   1.2        ad 		return (-1);
    484   1.2        ad 	}
    485   1.2        ad 
    486   1.1        ad 	part = DISKPART(bp->b_dev);
    487   1.1        ad 	lp = sc->sc_dk.dk_label;
    488   1.1        ad 
    489   1.1        ad 	/*
    490   1.1        ad 	 * The transfer must be a whole number of blocks and the offset must
    491   1.1        ad 	 * not be negative.
    492   1.1        ad 	 */
    493   1.1        ad 	if ((bp->b_bcount % lp->d_secsize) != 0 || bp->b_blkno < 0) {
    494   1.1        ad 		bp->b_flags |= B_ERROR;
    495   1.1        ad 		biodone(bp);
    496   1.1        ad 		return (-1);
    497   1.1        ad 	}
    498   1.1        ad 
    499   1.1        ad 	/*
    500   1.1        ad 	 * If it's a null transfer, return.
    501   1.1        ad 	 */
    502   1.1        ad 	if (bp->b_bcount == 0) {
    503   1.1        ad 		bp->b_resid = bp->b_bcount;
    504   1.1        ad 		biodone(bp);
    505   1.1        ad 		return (-1);
    506   1.1        ad 	}
    507   1.1        ad 
    508   1.1        ad 	/*
    509   1.1        ad 	 * Do bounds checking and adjust the transfer.  If error, process.
    510   1.1        ad 	 * If past the end of partition, just return.
    511   1.1        ad 	 */
    512   1.1        ad 	if (part != RAW_PART &&
    513  1.20   thorpej 	    bounds_check_with_label(&sc->sc_dk, bp,
    514   1.1        ad 	    (sc->sc_flags & (LDF_WLABEL | LDF_LABELLING)) != 0) <= 0) {
    515   1.1        ad 		bp->b_resid = bp->b_bcount;
    516   1.1        ad 		biodone(bp);
    517   1.1        ad 		return (-1);
    518   1.1        ad 	}
    519   1.1        ad 
    520   1.1        ad 	/*
    521   1.1        ad 	 * Convert the logical block number to a physical one and put it in
    522   1.1        ad 	 * terms of the device's logical block size.
    523   1.1        ad 	 */
    524   1.1        ad 	if (lp->d_secsize >= DEV_BSIZE)
    525   1.1        ad 		bp->b_rawblkno = bp->b_blkno / (lp->d_secsize / DEV_BSIZE);
    526   1.1        ad 	else
    527   1.1        ad 		bp->b_rawblkno = bp->b_blkno * (DEV_BSIZE / lp->d_secsize);
    528   1.1        ad 
    529  1.11   thorpej 	if (part != RAW_PART)
    530   1.1        ad 		bp->b_rawblkno += lp->d_partitions[part].p_offset;
    531   1.1        ad 
    532   1.1        ad 	s = splbio();
    533   1.1        ad 	disk_busy(&sc->sc_dk);
    534   1.1        ad 	sc->sc_queuecnt++;
    535   1.1        ad 	splx(s);
    536   1.1        ad 
    537   1.1        ad 	if ((rv = (*sc->sc_start)(sc, bp)) != 0) {
    538   1.1        ad 		bp->b_error = rv;
    539   1.1        ad 		bp->b_flags |= B_ERROR;
    540   1.1        ad 		bp->b_resid = bp->b_bcount;
    541   1.1        ad 		s = splbio();
    542   1.1        ad 		lddone(sc, bp);
    543   1.1        ad 		splx(s);
    544   1.1        ad 	}
    545   1.1        ad 
    546   1.1        ad 	return (0);
    547   1.1        ad }
    548   1.1        ad 
    549   1.1        ad void
    550   1.1        ad lddone(struct ld_softc *sc, struct buf *bp)
    551   1.1        ad {
    552   1.1        ad 
    553   1.1        ad 	if ((bp->b_flags & B_ERROR) != 0) {
    554   1.1        ad 		diskerr(bp, "ld", "error", LOG_PRINTF, 0, sc->sc_dk.dk_label);
    555   1.1        ad 		printf("\n");
    556   1.1        ad 	}
    557   1.1        ad 
    558  1.18       mrg 	disk_unbusy(&sc->sc_dk, bp->b_bcount - bp->b_resid,
    559  1.18       mrg 	    (bp->b_flags & B_READ));
    560   1.1        ad #if NRND > 0
    561   1.1        ad 	rnd_add_uint32(&sc->sc_rnd_source, bp->b_rawblkno);
    562   1.1        ad #endif
    563   1.1        ad 	biodone(bp);
    564   1.1        ad 
    565   1.7        ad 	if (--sc->sc_queuecnt <= sc->sc_maxqueuecnt) {
    566   1.7        ad 		if ((sc->sc_flags & LDF_DRAIN) != 0)
    567   1.7        ad 			wakeup(&sc->sc_queuecnt);
    568  1.14   hannken 		while ((bp = BUFQ_GET(&sc->sc_bufq)) != NULL) {
    569   1.7        ad 			if (!ldstart(sc, bp))
    570   1.7        ad 				break;
    571   1.7        ad 		}
    572   1.1        ad 	}
    573   1.1        ad }
    574   1.1        ad 
    575   1.1        ad int
    576   1.1        ad ldsize(dev_t dev)
    577   1.1        ad {
    578   1.1        ad 	struct ld_softc *sc;
    579   1.1        ad 	int part, unit, omask, size;
    580   1.1        ad 
    581   1.1        ad 	unit = DISKUNIT(dev);
    582   1.1        ad 	if ((sc = device_lookup(&ld_cd, unit)) == NULL)
    583   1.1        ad 		return (ENODEV);
    584   1.1        ad 	if ((sc->sc_flags & LDF_ENABLED) == 0)
    585   1.1        ad 		return (ENODEV);
    586   1.1        ad 	part = DISKPART(dev);
    587   1.1        ad 
    588   1.1        ad 	omask = sc->sc_dk.dk_openmask & (1 << part);
    589   1.1        ad 
    590   1.1        ad 	if (omask == 0 && ldopen(dev, 0, S_IFBLK, NULL) != 0)
    591   1.1        ad 		return (-1);
    592   1.1        ad 	else if (sc->sc_dk.dk_label->d_partitions[part].p_fstype != FS_SWAP)
    593   1.1        ad 		size = -1;
    594   1.1        ad 	else
    595   1.1        ad 		size = sc->sc_dk.dk_label->d_partitions[part].p_size *
    596   1.1        ad 		    (sc->sc_dk.dk_label->d_secsize / DEV_BSIZE);
    597   1.1        ad 	if (omask == 0 && ldclose(dev, 0, S_IFBLK, NULL) != 0)
    598   1.1        ad 		return (-1);
    599   1.1        ad 
    600   1.1        ad 	return (size);
    601   1.1        ad }
    602   1.1        ad 
    603   1.1        ad /*
    604   1.1        ad  * Load the label information from the specified device.
    605   1.1        ad  */
    606   1.1        ad static void
    607   1.1        ad ldgetdisklabel(struct ld_softc *sc)
    608   1.1        ad {
    609   1.1        ad 	const char *errstring;
    610   1.1        ad 
    611   1.1        ad 	ldgetdefaultlabel(sc, sc->sc_dk.dk_label);
    612   1.1        ad 
    613   1.1        ad 	/* Call the generic disklabel extraction routine. */
    614   1.1        ad 	errstring = readdisklabel(MAKEDISKDEV(0, sc->sc_dv.dv_unit, RAW_PART),
    615   1.1        ad 	    ldstrategy, sc->sc_dk.dk_label, sc->sc_dk.dk_cpulabel);
    616   1.1        ad 	if (errstring != NULL)
    617   1.1        ad 		printf("%s: %s\n", sc->sc_dv.dv_xname, errstring);
    618   1.1        ad }
    619   1.1        ad 
    620   1.1        ad /*
    621   1.1        ad  * Construct a ficticious label.
    622   1.1        ad  */
    623   1.1        ad static void
    624   1.1        ad ldgetdefaultlabel(struct ld_softc *sc, struct disklabel *lp)
    625   1.1        ad {
    626   1.1        ad 
    627   1.1        ad 	memset(lp, 0, sizeof(struct disklabel));
    628   1.1        ad 
    629   1.1        ad 	lp->d_secsize = sc->sc_secsize;
    630   1.1        ad 	lp->d_ntracks = sc->sc_nheads;
    631   1.1        ad 	lp->d_nsectors = sc->sc_nsectors;
    632   1.1        ad 	lp->d_ncylinders = sc->sc_ncylinders;
    633   1.1        ad 	lp->d_secpercyl = lp->d_ntracks * lp->d_nsectors;
    634   1.1        ad 	lp->d_type = DTYPE_LD;
    635  1.21    itojun 	strlcpy(lp->d_typename, "unknown", sizeof(lp->d_typename));
    636  1.21    itojun 	strlcpy(lp->d_packname, "fictitious", sizeof(lp->d_packname));
    637   1.1        ad 	lp->d_secperunit = sc->sc_secperunit;
    638   1.1        ad 	lp->d_rpm = 7200;
    639   1.1        ad 	lp->d_interleave = 1;
    640   1.1        ad 	lp->d_flags = 0;
    641   1.1        ad 
    642   1.1        ad 	lp->d_partitions[RAW_PART].p_offset = 0;
    643   1.1        ad 	lp->d_partitions[RAW_PART].p_size =
    644   1.1        ad 	    lp->d_secperunit * (lp->d_secsize / DEV_BSIZE);
    645   1.1        ad 	lp->d_partitions[RAW_PART].p_fstype = FS_UNUSED;
    646   1.1        ad 	lp->d_npartitions = RAW_PART + 1;
    647   1.1        ad 
    648   1.1        ad 	lp->d_magic = DISKMAGIC;
    649   1.1        ad 	lp->d_magic2 = DISKMAGIC;
    650   1.1        ad 	lp->d_checksum = dkcksum(lp);
    651   1.1        ad }
    652   1.1        ad 
    653   1.1        ad /*
    654   1.1        ad  * Wait interruptibly for an exclusive lock.
    655   1.1        ad  *
    656   1.1        ad  * XXX Several drivers do this; it should be abstracted and made MP-safe.
    657   1.1        ad  */
    658   1.1        ad static int
    659   1.1        ad ldlock(struct ld_softc *sc)
    660   1.1        ad {
    661   1.1        ad 	int error;
    662   1.1        ad 
    663   1.1        ad 	while ((sc->sc_flags & LDF_LKHELD) != 0) {
    664   1.1        ad 		sc->sc_flags |= LDF_LKWANTED;
    665   1.1        ad 		if ((error = tsleep(sc, PRIBIO | PCATCH, "ldlck", 0)) != 0)
    666   1.1        ad 			return (error);
    667   1.1        ad 	}
    668   1.1        ad 	sc->sc_flags |= LDF_LKHELD;
    669   1.1        ad 	return (0);
    670   1.1        ad }
    671   1.1        ad 
    672   1.1        ad /*
    673   1.1        ad  * Unlock and wake up any waiters.
    674   1.1        ad  */
    675   1.1        ad static void
    676   1.1        ad ldunlock(struct ld_softc *sc)
    677   1.1        ad {
    678   1.1        ad 
    679   1.1        ad 	sc->sc_flags &= ~LDF_LKHELD;
    680   1.1        ad 	if ((sc->sc_flags & LDF_LKWANTED) != 0) {
    681   1.1        ad 		sc->sc_flags &= ~LDF_LKWANTED;
    682   1.1        ad 		wakeup(sc);
    683   1.1        ad 	}
    684   1.1        ad }
    685   1.1        ad 
    686   1.1        ad /*
    687   1.1        ad  * Take a dump.
    688   1.1        ad  */
    689   1.1        ad int
    690   1.1        ad lddump(dev_t dev, daddr_t blkno, caddr_t va, size_t size)
    691   1.1        ad {
    692   1.1        ad 	struct ld_softc *sc;
    693   1.1        ad 	struct disklabel *lp;
    694   1.1        ad 	int unit, part, nsects, sectoff, towrt, nblk, maxblkcnt, rv;
    695   1.1        ad 	static int dumping;
    696   1.1        ad 
    697   1.1        ad 	unit = DISKUNIT(dev);
    698   1.1        ad 	if ((sc = device_lookup(&ld_cd, unit)) == NULL)
    699   1.1        ad 		return (ENXIO);
    700   1.1        ad 	if ((sc->sc_flags & LDF_ENABLED) == 0)
    701   1.1        ad 		return (ENODEV);
    702   1.3        ad 	if (sc->sc_dump == NULL)
    703   1.3        ad 		return (ENXIO);
    704   1.3        ad 
    705   1.3        ad 	/* Check if recursive dump; if so, punt. */
    706   1.3        ad 	if (dumping)
    707   1.3        ad 		return (EFAULT);
    708   1.3        ad 	dumping = 1;
    709   1.1        ad 
    710   1.1        ad 	/* Convert to disk sectors.  Request must be a multiple of size. */
    711   1.3        ad 	part = DISKPART(dev);
    712   1.1        ad 	lp = sc->sc_dk.dk_label;
    713   1.1        ad 	if ((size % lp->d_secsize) != 0)
    714   1.1        ad 		return (EFAULT);
    715   1.1        ad 	towrt = size / lp->d_secsize;
    716   1.1        ad 	blkno = dbtob(blkno) / lp->d_secsize;	/* blkno in DEV_BSIZE units */
    717   1.1        ad 
    718   1.1        ad 	nsects = lp->d_partitions[part].p_size;
    719   1.1        ad 	sectoff = lp->d_partitions[part].p_offset;
    720   1.1        ad 
    721   1.1        ad 	/* Check transfer bounds against partition size. */
    722   1.1        ad 	if ((blkno < 0) || ((blkno + towrt) > nsects))
    723   1.1        ad 		return (EINVAL);
    724   1.1        ad 
    725   1.1        ad 	/* Offset block number to start of partition. */
    726   1.1        ad 	blkno += sectoff;
    727   1.1        ad 
    728   1.1        ad 	/* Start dumping and return when done. */
    729   1.3        ad 	maxblkcnt = sc->sc_maxxfer / sc->sc_secsize - 1;
    730   1.1        ad 	while (towrt > 0) {
    731   1.3        ad 		nblk = min(maxblkcnt, towrt);
    732   1.1        ad 
    733   1.1        ad 		if ((rv = (*sc->sc_dump)(sc, va, blkno, nblk)) != 0)
    734   1.1        ad 			return (rv);
    735   1.1        ad 
    736   1.1        ad 		towrt -= nblk;
    737   1.1        ad 		blkno += nblk;
    738   1.1        ad 		va += nblk * sc->sc_secsize;
    739   1.1        ad 	}
    740   1.1        ad 
    741   1.1        ad 	dumping = 0;
    742   1.1        ad 	return (0);
    743   1.1        ad }
    744   1.1        ad 
    745   1.1        ad /*
    746   1.1        ad  * Adjust the size of a transfer.
    747   1.1        ad  */
    748   1.1        ad static void
    749   1.1        ad ldminphys(struct buf *bp)
    750   1.1        ad {
    751   1.1        ad 	struct ld_softc *sc;
    752   1.1        ad 
    753   1.1        ad 	sc = device_lookup(&ld_cd, DISKUNIT(bp->b_dev));
    754   1.1        ad 
    755   1.1        ad 	if (bp->b_bcount > sc->sc_maxxfer)
    756   1.1        ad 		bp->b_bcount = sc->sc_maxxfer;
    757   1.1        ad 	minphys(bp);
    758   1.1        ad }
    759