Home | History | Annotate | Line # | Download | only in lib
biosdisk_ll.c revision 1.17
      1 /*	$NetBSD: biosdisk_ll.c,v 1.17 2003/04/16 12:41:03 dsl 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 *, daddr_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 			ed->size = sizeof *ed;
     87 			int13_getextinfo(d->dev, ed);
     88 		}
     89 	}
     90 
     91 	/*
     92 	 * If the drive is 2.88 floppy drive, check that we can actually
     93 	 * read sector >= 18. If not, assume 1.44 floppy disk.
     94 	 */
     95 	if (d->dev == 0 && SPT(diskinfo) == 36) {
     96 		if (biosread(d->dev, 0, 0, 18, 1, buf)) {
     97 			d->sec = 18;
     98 			d->chs_sectors /= 2;
     99 		}
    100 	}
    101 
    102 	/*
    103 	 * get_diskinfo assumes floppy if BIOS call fails. Check at least
    104 	 * "valid" geometry.
    105 	 */
    106 	return (!d->sec || !d->head);
    107 }
    108 
    109 /*
    110  * Global shared "diskbuf" is used as read ahead buffer.  For reading from
    111  * floppies, the bootstrap has to be loaded on a 64K boundary to ensure that
    112  * this buffer doesn't cross a 64K DMA boundary.
    113  */
    114 #define RA_SECTORS      (DISKBUFSIZE / BIOSDISK_SECSIZE)
    115 static int      ra_dev;
    116 static int      ra_end;
    117 static int      ra_first;
    118 
    119 static int
    120 do_read(struct biosdisk_ll *d, daddr_t dblk, int num, char *buf)
    121 {
    122 	int		cyl, head, sec, nsec, spc, dblk32;
    123 	struct {
    124 		int8_t	size;
    125 		int8_t	resvd;
    126 		int16_t	cnt;
    127 		int16_t	off;
    128 		int16_t	seg;
    129 		int64_t	sec;
    130 	}		ext;
    131 
    132 	if ((d->dev & 0x80) && (dblk + num) >= d->chs_sectors) {
    133 		if (!(d->flags & BIOSDISK_EXT13))
    134 			return -1;
    135 		ext.size = sizeof(ext);
    136 		ext.resvd = 0;
    137 		ext.cnt = num;
    138 		/* seg:off of physical address */
    139 		ext.off = (int)buf & 0xf;
    140 		ext.seg = vtophys(buf) >> 4;
    141 		ext.sec = dblk;
    142 
    143 		if (biosextread(d->dev, &ext)) {
    144 			(void)biosdiskreset(d->dev);
    145 			return -1;
    146 		}
    147 
    148 		return ext.cnt;
    149 	} else {
    150 		dblk32 = (int)dblk;
    151 		spc = d->head * d->sec;
    152 		cyl = dblk32 / spc;
    153 		head = (dblk32 % spc) / d->sec;
    154 		sec = dblk32 % d->sec;
    155 		nsec = d->sec - sec;
    156 
    157 		if (nsec > num)
    158 			nsec = num;
    159 
    160 		if (biosread(d->dev, cyl, head, sec, nsec, buf)) {
    161 			(void)biosdiskreset(d->dev);
    162 			return -1;
    163 		}
    164 
    165 		return nsec;
    166 	}
    167 }
    168 
    169 /* NB if 'cold' is set below not all of the program is loaded, so
    170  * musn't use data segment, bss, call library functions or do
    171  * read-ahead.
    172  */
    173 
    174 int
    175 readsects(struct biosdisk_ll *d, daddr_t dblk, int num, char *buf, int cold)
    176 {
    177 #ifdef BOOTXX
    178 #define cold 1		/* collapse out references to diskbufp */
    179 #endif
    180 	while (num) {
    181 		int             nsec;
    182 
    183 		/* check for usable data in read-ahead buffer */
    184 		if (cold || diskbuf_user != &ra_dev || d->dev != ra_dev
    185 		    || dblk < ra_first || dblk >= ra_end) {
    186 
    187 			/* no, read from disk */
    188 			char           *trbuf;
    189 			int maxsecs;
    190 			int retries = BIOSDISK_RETRIES;
    191 
    192 			if (cold) {
    193 				/* transfer directly to buffer */
    194 				trbuf = buf;
    195 				maxsecs = num;
    196 			} else {
    197 				/* fill read-ahead buffer */
    198 				trbuf = alloc_diskbuf(0); /* no data yet */
    199 				maxsecs = RA_SECTORS;
    200 			}
    201 
    202 			while ((nsec = do_read(d, dblk, maxsecs, trbuf)) < 0) {
    203 #ifdef DISK_DEBUG
    204 				if (!cold)
    205 					printf("read error dblk %d-%d\n", dblk,
    206 					       dblk + maxsecs - 1);
    207 #endif
    208 				if (--retries >= 0)
    209 					continue;
    210 				return (-1);	/* XXX cannot output here if
    211 						 * (cold) */
    212 			}
    213 			if (!cold) {
    214 				ra_dev = d->dev;
    215 				ra_first = dblk;
    216 				ra_end = dblk + nsec;
    217 				diskbuf_user = &ra_dev;
    218 			}
    219 		} else		/* can take blocks from end of read-ahead
    220 				 * buffer */
    221 			nsec = ra_end - dblk;
    222 
    223 		if (!cold) {
    224 			/* copy data from read-ahead to user buffer */
    225 			if (nsec > num)
    226 				nsec = num;
    227 			memcpy(buf,
    228 			       diskbufp + (dblk - ra_first) * BIOSDISK_SECSIZE,
    229 			       nsec * BIOSDISK_SECSIZE);
    230 		}
    231 		buf += nsec * BIOSDISK_SECSIZE;
    232 		num -= nsec;
    233 		dblk += nsec;
    234 	}
    235 
    236 	return (0);
    237 }
    238