Home | History | Annotate | Line # | Download | only in lib
biosdisk.c revision 1.10
      1 /*	$NetBSD: biosdisk.c,v 1.10 1999/01/27 20:54:57 thorpej Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1996, 1998
      5  *	Matthias Drochner.  All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. All advertising materials mentioning features or use of this software
     16  *    must display the following acknowledgement:
     17  *	This product includes software developed for the NetBSD Project
     18  *	by Matthias Drochner.
     19  * 4. The name of the author may not be used to endorse or promote products
     20  *    derived from this software without specific prior written permission.
     21  *
     22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     23  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     24  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     25  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     27  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     28  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     29  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     30  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     31  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     32  *
     33  */
     34 
     35 /*
     36  * raw BIOS disk device for libsa.
     37  * needs lowlevel parts from bios_disk.S and biosdisk_ll.c
     38  * partly from netbsd:sys/arch/i386/boot/disk.c
     39  * no bad144 handling!
     40  */
     41 
     42 /*
     43  * Ported to boot 386BSD by Julian Elischer (julian (at) tfs.com) Sept 1992
     44  *
     45  * Mach Operating System
     46  * Copyright (c) 1992, 1991 Carnegie Mellon University
     47  * All Rights Reserved.
     48  *
     49  * Permission to use, copy, modify and distribute this software and its
     50  * documentation is hereby granted, provided that both the copyright
     51  * notice and this permission notice appear in all copies of the
     52  * software, derivative works or modified versions, and any portions
     53  * thereof, and that both notices appear in supporting documentation.
     54  *
     55  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
     56  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
     57  * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
     58  *
     59  * Carnegie Mellon requests users of this software to return to
     60  *
     61  *  Software Distribution Coordinator  or  Software.Distribution (at) CS.CMU.EDU
     62  *  School of Computer Science
     63  *  Carnegie Mellon University
     64  *  Pittsburgh PA 15213-3890
     65  *
     66  * any improvements or extensions that they make and grant Carnegie Mellon
     67  * the rights to redistribute these changes.
     68  */
     69 
     70 #include <sys/types.h>
     71 #include <sys/disklabel.h>
     72 
     73 #include <lib/libsa/stand.h>
     74 #include <lib/libsa/saerrno.h>
     75 #include <machine/stdarg.h>
     76 
     77 #include "libi386.h"
     78 #include "biosdisk_ll.h"
     79 #include "biosdisk.h"
     80 #ifdef _STANDALONE
     81 #include "bootinfo.h"
     82 #endif
     83 
     84 #define BUFSIZE (1 * BIOSDISK_SECSIZE)
     85 
     86 struct biosdisk {
     87 	struct biosdisk_ll ll;
     88 #ifdef COMPAT_OLDBOOT
     89 	int             disktype;
     90 #endif
     91 	int             boff;
     92 	char            buf[BUFSIZE];
     93 };
     94 
     95 #ifdef _STANDALONE
     96 static struct btinfo_bootdisk bi_disk;
     97 #endif
     98 
     99 int
    100 biosdiskstrategy(devdata, flag, dblk, size, buf, rsize)
    101 	void           *devdata;
    102 	int             flag;
    103 	daddr_t         dblk;
    104 	size_t          size;
    105 	void           *buf;
    106 	size_t         *rsize;
    107 {
    108 	struct biosdisk *d;
    109 	int             blks, frag;
    110 
    111 	if (flag != F_READ)
    112 		return (EROFS);
    113 
    114 	d = (struct biosdisk *) devdata;
    115 
    116 	dblk += d->boff;
    117 
    118 	blks = size / BIOSDISK_SECSIZE;
    119 	if (blks && readsects(&d->ll, dblk, blks, buf, 0)) {
    120 		if (rsize)
    121 			*rsize = 0;
    122 		return (EIO);
    123 	}
    124 	/* do we really need this? */
    125 	frag = size % BIOSDISK_SECSIZE;
    126 	if (frag) {
    127 		if (readsects(&d->ll, dblk + blks, 1, d->buf, 0)) {
    128 			if (rsize)
    129 				*rsize = blks * BIOSDISK_SECSIZE;
    130 			return (EIO);
    131 		}
    132 		bcopy(d->buf, buf + blks * BIOSDISK_SECSIZE, frag);
    133 	}
    134 	if (rsize)
    135 		*rsize = size;
    136 	return (0);
    137 }
    138 
    139 #ifdef COMPAT_OLDBOOT
    140 int
    141 biosdisk_gettype(f)
    142 	struct open_file *f;
    143 {
    144 	struct biosdisk *d = f->f_devdata;
    145 	return (d->disktype);
    146 }
    147 #endif
    148 
    149 int
    150 biosdiskopen(struct open_file *f, ...)
    151 /* file, biosdev, partition */
    152 {
    153 	va_list ap;
    154 	struct biosdisk *d;
    155 	int partition;
    156 #ifndef NO_DISKLABEL
    157 	struct mbr_partition *dptr;
    158 	int sector, i;
    159 	struct disklabel *lp;
    160 #endif
    161 	int error = 0;
    162 
    163 	d = (struct biosdisk *) alloc(sizeof(struct biosdisk));
    164 	if (!d) {
    165 #ifdef DEBUG
    166 		printf("biosdiskopen: no memory\n");
    167 #endif
    168 		return (ENOMEM);
    169 	}
    170 	va_start(ap, f);
    171 	d->ll.dev = va_arg(ap, int);
    172 	if (set_geometry(&d->ll)) {
    173 #ifdef DISK_DEBUG
    174 		printf("no geometry information\n");
    175 #endif
    176 		error = ENXIO;
    177 		goto out;
    178 	}
    179 
    180 	d->boff = 0;
    181 	partition = va_arg(ap, int);
    182 #ifdef _STANDALONE
    183 	bi_disk.biosdev = d->ll.dev;
    184 	bi_disk.partition = partition;
    185 	bi_disk.labelsector = -1;
    186 #endif
    187 
    188 #ifndef NO_DISKLABEL
    189 	if (!(d->ll.dev & 0x80) /* floppy */
    190 	    || partition == RAW_PART)
    191 		goto nolabel;
    192 
    193 	/*
    194 	 * find NetBSD Partition in DOS partition table
    195 	 * XXX check magic???
    196 	 */
    197 	if (readsects(&d->ll, 0, 1, d->buf, 0)) {
    198 #ifdef DISK_DEBUG
    199 		printf("error reading MBR\n");
    200 #endif
    201 		error = EIO;
    202 		goto out;
    203 	}
    204 	sector = -1;
    205 	dptr = (struct mbr_partition *) & d->buf[MBR_PARTOFF];
    206 	/* Look for NetBSD partition ID */
    207 	for (i = 0; i < NMBRPART; i++, dptr++)
    208 		if (dptr->mbrp_typ == MBR_PTYPE_NETBSD) {
    209 			sector = dptr->mbrp_start;
    210 			break;
    211 		}
    212 #ifdef COMPAT_386BSD_MBRPART
    213 	if (sector == -1) {
    214 		/* If we didn't find one, look for 386BSD partition ID */
    215 		dptr = (struct mbr_partition *) & d->buf[MBR_PARTOFF];
    216 		for (i = 0; i < NMBRPART; i++, dptr++)
    217 			if (dptr->mbrp_typ == MBR_PTYPE_386BSD) {
    218 				printf("old BSD partition ID!\n");
    219 				sector = dptr->mbrp_start;
    220 				break;
    221 			}
    222 	}
    223 #endif
    224 	if (sector == -1) {
    225 		/*
    226 		 * One of two things:
    227 		 * 	1. no MBR
    228 		 *	2. no NetBSD partition in MBR
    229 		 *
    230 		 * We simply default to "start of disk" in this case and
    231 		 * press on.
    232 		 */
    233 		sector = 0;
    234 	}
    235 
    236 	/* find partition in NetBSD disklabel */
    237 	if (readsects(&d->ll, sector + LABELSECTOR, 1, d->buf, 0)) {
    238 #ifdef DISK_DEBUG
    239 		printf("Error reading disklabel\n");
    240 #endif
    241 		error = EIO;
    242 		goto out;
    243 	}
    244 	lp = (struct disklabel *) (d->buf + LABELOFFSET);
    245 	if (lp->d_magic != DISKMAGIC) {
    246 #ifdef DISK_DEBUG
    247 		printf("warning: no disklabel\n");
    248 #endif
    249 		d->boff = sector;
    250 	} else if (partition >= lp->d_npartitions ||
    251 		   lp->d_partitions[partition].p_fstype == FS_UNUSED) {
    252 #ifdef DISK_DEBUG
    253 		printf("illegal partition\n");
    254 #endif
    255 		error = EPART;
    256 		goto out;
    257 	} else {
    258 		d->boff = lp->d_partitions[partition].p_offset;
    259 #ifdef COMPAT_OLDBOOT
    260 		d->disktype = lp->d_type;
    261 #endif
    262 #ifdef _STANDALONE
    263 		bi_disk.labelsector = sector + LABELSECTOR;
    264 		bi_disk.label.type = lp->d_type;
    265 		bcopy(lp->d_packname, bi_disk.label.packname, 16);
    266 		bi_disk.label.checksum = lp->d_checksum;
    267 #endif
    268 	}
    269 nolabel:
    270 #endif /* NO_DISKLABEL */
    271 
    272 #ifdef DISK_DEBUG
    273 	printf("partition @%d\n", d->boff);
    274 #endif
    275 
    276 #ifdef _STANDALONE
    277 	BI_ADD(&bi_disk, BTINFO_BOOTDISK, sizeof(bi_disk));
    278 #endif
    279 
    280 	f->f_devdata = d;
    281 out:
    282         va_end(ap);
    283 	if (error)
    284 		free(d, sizeof(struct biosdisk));
    285 	return (error);
    286 }
    287 
    288 int
    289 biosdiskclose(f)
    290 	struct open_file *f;
    291 {
    292 	struct biosdisk *d = f->f_devdata;
    293 
    294 	if (!(d->ll.dev & 0x80))/* let the floppy drive go off */
    295 		delay(3000000);	/* 2s is enough on all PCs I found */
    296 
    297 	free(d, sizeof(struct biosdisk));
    298 	f->f_devdata = NULL;
    299 	return (0);
    300 }
    301 
    302 int
    303 biosdiskioctl(f, cmd, arg)
    304 	struct open_file *f;
    305 	u_long          cmd;
    306 	void           *arg;
    307 {
    308 	return EIO;
    309 }
    310