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