1 /* $NetBSD: biosdisk_ll.c,v 1.21 2005/06/22 06:06:34 junyoung Exp $ */ 2 3 /*- 4 * Copyright (c) 2005 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Bang Jun-Young. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. All advertising materials mentioning features or use of this software 19 * must display the following acknowledgement: 20 * This product includes software developed by the NetBSD 21 * Foundation, Inc. and its contributors. 22 * 4. Neither the name of The NetBSD Foundation nor the names of its 23 * contributors may be used to endorse or promote products derived 24 * from this software without specific prior written permission. 25 * 26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 36 * POSSIBILITY OF SUCH DAMAGE. 37 */ 38 39 /* 40 * Copyright (c) 1996 41 * Matthias Drochner. All rights reserved. 42 * Copyright (c) 1996 43 * Perry E. Metzger. All rights reserved. 44 * 45 * Redistribution and use in source and binary forms, with or without 46 * modification, are permitted provided that the following conditions 47 * are met: 48 * 1. Redistributions of source code must retain the above copyright 49 * notice, this list of conditions and the following disclaimer. 50 * 2. Redistributions in binary form must reproduce the above copyright 51 * notice, this list of conditions and the following disclaimer in the 52 * documentation and/or other materials provided with the distribution. 53 * 3. All advertising materials mentioning features or use of this software 54 * must display the following acknowledgements: 55 * This product includes software developed for the NetBSD Project 56 * by Matthias Drochner. 57 * This product includes software developed for the NetBSD Project 58 * by Perry E. Metzger. 59 * 4. The names of the authors may not be used to endorse or promote products 60 * derived from this software without specific prior written permission. 61 * 62 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 63 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 64 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 65 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 66 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 67 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 68 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 69 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 70 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 71 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 72 */ 73 74 /* 75 * shared by bootsector startup (bootsectmain) and biosdisk.c 76 * needs lowlevel parts from bios_disk.S 77 */ 78 79 #include <lib/libsa/stand.h> 80 81 #include "biosdisk_ll.h" 82 #include "diskbuf.h" 83 #include "libi386.h" 84 85 static int do_read(struct biosdisk_ll *, daddr_t, int, char *); 86 87 /* 88 * we get from get_diskinfo(): 89 * unused %ch %cl %dh (registers after int13/8), ie 90 * xxxxxxxx cccccccc CCssssss hhhhhhhh 91 */ 92 #define SPT(di) (((di)>>8)&0x3f) 93 #define HEADS(di) (((di)&0xff)+1) 94 #define CYL(di) (((((di)>>16)&0xff)|(((di)>>6)&0x300))+1) 95 96 #ifndef BIOSDISK_RETRIES 97 #define BIOSDISK_RETRIES 5 98 #endif 99 100 int 101 set_geometry(struct biosdisk_ll *d, struct biosdisk_ext13info *ed) 102 { 103 int diskinfo; 104 105 diskinfo = get_diskinfo(d->dev); 106 d->sec = SPT(diskinfo); 107 d->head = HEADS(diskinfo); 108 d->cyl = CYL(diskinfo); 109 d->chs_sectors = d->sec * d->head * d->cyl; 110 111 if (d->dev >= 0x80 + get_harddrives()) { 112 d->secsize = 2048; 113 d->type = BIOSDISK_TYPE_CD; 114 } else { 115 d->secsize = 512; 116 if (d->dev & 0x80) 117 d->type = BIOSDISK_TYPE_HD; 118 else 119 d->type = BIOSDISK_TYPE_FD; 120 } 121 122 /* 123 * Some broken BIOSes such as one found on Soltek SL-75DRV2 report 124 * that they don't support int13 extension for CD-ROM drives while 125 * they actually do. As a workaround, if the boot device is a CD we 126 * assume that the extension is available. Note that only very old 127 * BIOSes don't support the extended mode, and they don't work with 128 * ATAPI CD-ROM drives, either. So there's no problem. 129 */ 130 d->flags = 0; 131 if (d->type == BIOSDISK_TYPE_CD || 132 (d->type == BIOSDISK_TYPE_HD && int13_extension(d->dev))) { 133 d->flags |= BIOSDISK_EXT13; 134 if (ed != NULL) { 135 ed->size = sizeof(*ed); 136 int13_getextinfo(d->dev, ed); 137 } 138 } 139 140 /* 141 * If the drive is 2.88MB floppy drive, check that we can actually 142 * read sector >= 18. If not, assume 1.44MB floppy disk. 143 */ 144 if (d->type == BIOSDISK_TYPE_FD && SPT(diskinfo) == 36) { 145 char buf[512]; 146 147 if (biosread(d->dev, 0, 0, 18, 1, buf)) { 148 d->sec = 18; 149 d->chs_sectors /= 2; 150 } 151 } 152 153 return 0; 154 } 155 156 /* 157 * Global shared "diskbuf" is used as read ahead buffer. For reading from 158 * floppies, the bootstrap has to be loaded on a 64K boundary to ensure that 159 * this buffer doesn't cross a 64K DMA boundary. 160 */ 161 static int ra_dev; 162 static int ra_end; 163 static int ra_first; 164 165 /* 166 * Because some older BIOSes have bugs in their int13 extensions, we 167 * only try to use the extended read if the I/O request can't be addressed 168 * using CHS. 169 * 170 * Of course, some BIOSes have bugs in ths CHS read, such as failing to 171 * function properly if the MBR table has a different geometry than the 172 * BIOS would generate internally for the device in question, and so we 173 * provide a way to force the extended on hard disks via a compile-time 174 * option. 175 */ 176 #if defined(FORCE_INT13EXT) 177 #define NEED_INT13EXT(d, dblk, num) \ 178 (((d)->dev & 0x80) != 0) 179 #else 180 #define NEED_INT13EXT(d, dblk, num) \ 181 (((d)->type == BIOSDISK_TYPE_CD) || \ 182 ((d)->type == BIOSDISK_TYPE_HD && \ 183 ((dblk) + (num)) >= (d)->chs_sectors)) 184 #endif 185 186 static int 187 do_read(struct biosdisk_ll *d, daddr_t dblk, int num, char *buf) 188 { 189 190 if (NEED_INT13EXT(d, dblk, num)) { 191 struct { 192 int8_t size; 193 int8_t resvd; 194 int16_t cnt; 195 int16_t off; 196 int16_t seg; 197 int64_t sec; 198 } ext; 199 200 if (!(d->flags & BIOSDISK_EXT13)) 201 return -1; 202 ext.size = sizeof(ext); 203 ext.resvd = 0; 204 ext.cnt = num; 205 /* seg:off of physical address */ 206 ext.off = (int)buf & 0xf; 207 ext.seg = vtophys(buf) >> 4; 208 ext.sec = dblk; 209 210 if (biosextread(d->dev, &ext)) { 211 (void)biosdiskreset(d->dev); 212 return -1; 213 } 214 215 return ext.cnt; 216 } else { 217 int cyl, head, sec, nsec, spc, dblk32; 218 219 dblk32 = (int)dblk; 220 spc = d->head * d->sec; 221 cyl = dblk32 / spc; 222 head = (dblk32 % spc) / d->sec; 223 sec = dblk32 % d->sec; 224 nsec = d->sec - sec; 225 226 if (nsec > num) 227 nsec = num; 228 229 if (biosread(d->dev, cyl, head, sec, nsec, buf)) { 230 (void)biosdiskreset(d->dev); 231 return -1; 232 } 233 234 return nsec; 235 } 236 } 237 238 /* 239 * NB if 'cold' is set below not all of the program is loaded, so 240 * mustn't use data segment, bss, call library functions or do read-ahead. 241 */ 242 int 243 readsects(struct biosdisk_ll *d, daddr_t dblk, int num, char *buf, int cold) 244 { 245 #ifdef BOOTXX 246 #define cold 1 /* collapse out references to diskbufp */ 247 #endif 248 while (num) { 249 int nsec; 250 251 /* check for usable data in read-ahead buffer */ 252 if (cold || diskbuf_user != &ra_dev || d->dev != ra_dev 253 || dblk < ra_first || dblk >= ra_end) { 254 255 /* no, read from disk */ 256 char *trbuf; 257 int maxsecs; 258 int retries = BIOSDISK_RETRIES; 259 260 if (cold) { 261 /* transfer directly to buffer */ 262 trbuf = buf; 263 maxsecs = num; 264 } else { 265 /* fill read-ahead buffer */ 266 trbuf = alloc_diskbuf(0); /* no data yet */ 267 maxsecs = DISKBUFSIZE / d->secsize; 268 } 269 270 while ((nsec = do_read(d, dblk, maxsecs, trbuf)) < 0) { 271 #ifdef DISK_DEBUG 272 if (!cold) 273 printf("read error dblk %d-%d\n", dblk, 274 dblk + maxsecs - 1); 275 #endif 276 if (--retries >= 0) 277 continue; 278 return -1; /* XXX cannot output here if 279 * (cold) */ 280 } 281 if (!cold) { 282 ra_dev = d->dev; 283 ra_first = dblk; 284 ra_end = dblk + nsec; 285 diskbuf_user = &ra_dev; 286 } 287 } else /* can take blocks from end of read-ahead 288 * buffer */ 289 nsec = ra_end - dblk; 290 291 if (!cold) { 292 /* copy data from read-ahead to user buffer */ 293 if (nsec > num) 294 nsec = num; 295 memcpy(buf, 296 diskbufp + (dblk - ra_first) * d->secsize, 297 nsec * d->secsize); 298 } 299 buf += nsec * d->secsize; 300 num -= nsec; 301 dblk += nsec; 302 } 303 304 return 0; 305 } 306 307 /* 308 * Return the number of hard disk drives. 309 */ 310 int 311 get_harddrives(void) 312 { 313 /* 314 * Some BIOSes are buggy so that they return incorrect number 315 * of hard drives with int13/ah=8. We read a byte at 0040:0075 316 * instead, which is known to be always correct. 317 */ 318 int n = 0; 319 320 pvbcopy((void *)0x475, &n, 1); 321 322 return n; 323 } 324