Home | History | Annotate | Line # | Download | only in lib
biosdisk_ll.c revision 1.16
      1 /*	$NetBSD: biosdisk_ll.c,v 1.16 2003/04/02 10:39:33 fvdl Exp $	 */
      2 
      3 /*
      4  * Copyright (c) 1996
      5  * 	Matthias Drochner.  All rights reserved.
      6  * Copyright (c) 1996
      7  * 	Perry E. Metzger.  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  * 3. All advertising materials mentioning features or use of this software
     18  *    must display the following acknowledgements:
     19  *	This product includes software developed for the NetBSD Project
     20  *	by Matthias Drochner.
     21  *	This product includes software developed for the NetBSD Project
     22  *	by Perry E. Metzger.
     23  * 4. The names of the authors may not be used to endorse or promote products
     24  *    derived from this software without specific prior written permission.
     25  *
     26  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     27  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     28  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     29  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     30  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     31  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     32  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     33  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     34  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     35  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     36  */
     37 
     38 /*
     39  * shared by bootsector startup (bootsectmain) and biosdisk.c
     40  * needs lowlevel parts from bios_disk.S
     41  */
     42 
     43 #include <lib/libsa/stand.h>
     44 
     45 #include "biosdisk_ll.h"
     46 #include "diskbuf.h"
     47 
     48 extern int get_diskinfo(int);
     49 extern void int13_getextinfo(int, struct biosdisk_ext13info *);
     50 extern int int13_extension(int);
     51 extern int biosread(int, int, int, int, int, void *);
     52 extern int biosdiskreset(int);
     53 extern int biosextread(int, void *);
     54 static int do_read(struct biosdisk_ll *, int64_t, int, char *);
     55 extern u_int vtophys(void *);
     56 
     57 /*
     58  * we get from get_diskinfo():
     59  * xxxx  %ch  %cl  %dh (registers after int13/8), ie
     60  * xxxx cccc Csss hhhh
     61  */
     62 #define	SPT(di)		(((di)>>8)&0x3f)
     63 #define	HEADS(di)	(((di)&0xff)+1)
     64 #define CYL(di)		(((((di)>>16)&0xff)|(((di)>>6)&0x300))+1)
     65 
     66 #ifndef BIOSDISK_RETRIES
     67 #define BIOSDISK_RETRIES 5
     68 #endif
     69 
     70 int
     71 set_geometry(struct biosdisk_ll *d, struct biosdisk_ext13info *ed)
     72 {
     73 	int diskinfo;
     74 	char buf[512];
     75 
     76 	diskinfo = get_diskinfo(d->dev);
     77 	d->sec = SPT(diskinfo);
     78 	d->head = HEADS(diskinfo);
     79 	d->cyl = CYL(diskinfo);
     80 	d->chs_sectors = d->sec * d->head * d->cyl;
     81 
     82 	d->flags = 0;
     83 	if ((d->dev & 0x80) && int13_extension(d->dev)) {
     84 		d->flags |= BIOSDISK_EXT13;
     85 		if (ed != NULL)
     86 			int13_getextinfo(d->dev, ed);
     87 	}
     88 
     89 	/*
     90 	 * If the drive is 2.88 floppy drive, check that we can actually
     91 	 * read sector >= 18. If not, assume 1.44 floppy disk.
     92 	 */
     93 	if (d->dev == 0 && SPT(diskinfo) == 36) {
     94 		if (biosread(d->dev, 0, 0, 18, 1, buf)) {
     95 			d->sec = 18;
     96 			d->chs_sectors /= 2;
     97 		}
     98 	}
     99 
    100 	/*
    101 	 * get_diskinfo assumes floppy if BIOS call fails. Check at least
    102 	 * "valid" geometry.
    103 	 */
    104 	return (!d->sec || !d->head);
    105 }
    106 
    107 /*
    108  * Global shared "diskbuf" is used as read ahead buffer.  For reading from
    109  * floppies, the bootstrap has to be loaded on a 64K boundary to ensure that
    110  * this buffer doesn't cross a 64K DMA boundary.
    111  */
    112 #define RA_SECTORS      (DISKBUFSIZE / BIOSDISK_SECSIZE)
    113 static int      ra_dev;
    114 static int      ra_end;
    115 static int      ra_first;
    116 
    117 static int
    118 do_read(struct biosdisk_ll *d, int64_t dblk, int num, char *buf)
    119 {
    120 	int		cyl, head, sec, nsec, spc, dblk32;
    121 	struct {
    122 		int8_t	size;
    123 		int8_t	resvd;
    124 		int16_t	cnt;
    125 		int16_t	off;
    126 		int16_t	seg;
    127 		int64_t	sec;
    128 	}		ext;
    129 
    130 	if ((d->dev & 0x80) && (dblk + num) >= d->chs_sectors) {
    131 		if (!(d->flags & BIOSDISK_EXT13))
    132 			return -1;
    133 		ext.size = sizeof(ext);
    134 		ext.resvd = 0;
    135 		ext.cnt = num;
    136 		/* seg:off of physical address */
    137 		ext.off = (int)buf & 0xf;
    138 		ext.seg = vtophys(buf) >> 4;
    139 		ext.sec = dblk;
    140 
    141 		if (biosextread(d->dev, &ext)) {
    142 			(void)biosdiskreset(d->dev);
    143 			return -1;
    144 		}
    145 
    146 		return ext.cnt;
    147 	} else {
    148 		dblk32 = (int)dblk;
    149 		spc = d->head * d->sec;
    150 		cyl = dblk32 / spc;
    151 		head = (dblk32 % spc) / d->sec;
    152 		sec = dblk32 % d->sec;
    153 		nsec = d->sec - sec;
    154 
    155 		if (nsec > num)
    156 			nsec = num;
    157 
    158 		if (biosread(d->dev, cyl, head, sec, nsec, buf)) {
    159 			(void)biosdiskreset(d->dev);
    160 			return -1;
    161 		}
    162 
    163 		return nsec;
    164 	}
    165 }
    166 
    167 /* NB if 'cold' is set below not all of the program is loaded, so
    168  * musn't use data segment, bss, call library functions or do
    169  * read-ahead.
    170  */
    171 
    172 int
    173 readsects(struct biosdisk_ll *d, int64_t dblk, int num, char *buf, int cold)
    174 {
    175 	while (num) {
    176 		int             nsec;
    177 
    178 		/* check for usable data in read-ahead buffer */
    179 		if (cold || diskbuf_user != &ra_dev || d->dev != ra_dev
    180 		    || dblk < ra_first || dblk >= ra_end) {
    181 
    182 			/* no, read from disk */
    183 			char           *trbuf;
    184 			int maxsecs;
    185 			int retries = BIOSDISK_RETRIES;
    186 
    187 			if (cold) {
    188 				/* transfer directly to buffer */
    189 				trbuf = buf;
    190 				maxsecs = num;
    191 			} else {
    192 				/* fill read-ahead buffer */
    193 				trbuf = alloc_diskbuf(0); /* no data yet */
    194 				maxsecs = RA_SECTORS;
    195 			}
    196 
    197 			while ((nsec = do_read(d, dblk, maxsecs, trbuf)) < 0) {
    198 #ifdef DISK_DEBUG
    199 				if (!cold)
    200 					printf("read error dblk %d-%d\n", dblk,
    201 					       dblk + maxsecs - 1);
    202 #endif
    203 				if (--retries >= 0)
    204 					continue;
    205 				return (-1);	/* XXX cannot output here if
    206 						 * (cold) */
    207 			}
    208 			if (!cold) {
    209 				ra_dev = d->dev;
    210 				ra_first = dblk;
    211 				ra_end = dblk + nsec;
    212 				diskbuf_user = &ra_dev;
    213 			}
    214 		} else		/* can take blocks from end of read-ahead
    215 				 * buffer */
    216 			nsec = ra_end - dblk;
    217 
    218 		if (!cold) {
    219 			/* copy data from read-ahead to user buffer */
    220 			if (nsec > num)
    221 				nsec = num;
    222 			memcpy(buf,
    223 			       diskbufp + (dblk - ra_first) * BIOSDISK_SECSIZE,
    224 			       nsec * BIOSDISK_SECSIZE);
    225 		}
    226 		buf += nsec * BIOSDISK_SECSIZE;
    227 		num -= nsec;
    228 		dblk += nsec;
    229 	}
    230 
    231 	return (0);
    232 }
    233