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