biosdisk_ll.c revision 1.13 1 /* $NetBSD: biosdisk_ll.c,v 1.13 2002/12/04 18:26:57 jdolecek 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 long ourseg;
49
50 extern int get_diskinfo __P((int));
51 extern void int13_getextinfo __P((int, struct biosdisk_ext13info *));
52 extern int int13_extension __P((int));
53 extern int biosdiskreset __P((int));
54 extern int biosread __P((int, int, int, int, int, char *));
55 extern int biosextread __P((int, void *));
56 static int do_read __P((struct biosdisk_ll *, int, int, char *));
57
58 /*
59 * we get from get_diskinfo():
60 * xxxx %ch %cl %dh (registers after int13/8), ie
61 * xxxx cccc Csss hhhh
62 */
63 #define SPT(di) (((di)>>8)&0x3f)
64 #define HEADS(di) (((di)&0xff)+1)
65 #define CYL(di) (((((di)>>16)&0xff)|(((di)>>6)&0x300))+1)
66
67 #ifndef BIOSDISK_RETRIES
68 #define BIOSDISK_RETRIES 5
69 #endif
70
71 int
72 set_geometry(d, ed)
73 struct biosdisk_ll *d;
74 struct biosdisk_ext13info *ed;
75 {
76 int diskinfo;
77
78 diskinfo = get_diskinfo(d->dev);
79 d->sec = SPT(diskinfo);
80 d->head = HEADS(diskinfo);
81 d->cyl = CYL(diskinfo);
82 d->chs_sectors = d->sec * d->head * d->cyl;
83
84 d->flags = 0;
85 if ((d->dev & 0x80) && int13_extension(d->dev)) {
86 d->flags |= BIOSDISK_EXT13;
87 if (ed != NULL)
88 int13_getextinfo(d->dev, ed);
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, diskbuf)) {
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(d, dblk, num, buf)
121 struct biosdisk_ll *d;
122 int dblk, num;
123 char *buf;
124 {
125 int cyl, head, sec, nsec, spc;
126 struct {
127 int8_t size;
128 int8_t resvd;
129 int16_t cnt;
130 int16_t off;
131 int16_t seg;
132 int64_t sec;
133 } ext;
134
135 if ((d->dev & 0x80) && (dblk + num) >= d->chs_sectors) {
136 if (!(d->flags & BIOSDISK_EXT13))
137 return -1;
138 ext.size = sizeof(ext);
139 ext.resvd = 0;
140 ext.cnt = num;
141 ext.off = (int32_t)buf;
142 ext.seg = ourseg;
143 ext.sec = dblk;
144
145 if (biosextread(d->dev, &ext)) {
146 (void)biosdiskreset(d->dev);
147 return -1;
148 }
149
150 return ext.cnt;
151 } else {
152 spc = d->head * d->sec;
153 cyl = dblk / spc;
154 head = (dblk % spc) / d->sec;
155 sec = dblk % d->sec;
156 nsec = d->sec - sec;
157
158 if (nsec > num)
159 nsec = num;
160
161 if (biosread(d->dev, cyl, head, sec, nsec, buf)) {
162 (void)biosdiskreset(d->dev);
163 return -1;
164 }
165
166 return nsec;
167 }
168 }
169
170 int
171 readsects(d, dblk, num, buf, cold) /* reads ahead if (!cold) */
172 struct biosdisk_ll *d;
173 int dblk, num;
174 char *buf;
175 int cold; /* don't use data segment or bss, don't call
176 * library functions */
177 {
178 while (num) {
179 int nsec;
180
181 /* check for usable data in read-ahead buffer */
182 if (cold || diskbuf_user != &ra_dev || d->dev != ra_dev
183 || dblk < ra_first || dblk >= ra_end) {
184
185 /* no, read from disk */
186 char *trbuf;
187 int maxsecs;
188 int retries = BIOSDISK_RETRIES;
189
190 if (cold) {
191 /* transfer directly to buffer */
192 trbuf = buf;
193 maxsecs = num;
194 } else {
195 /* fill read-ahead buffer */
196 trbuf = diskbuf;
197 maxsecs = RA_SECTORS;
198 diskbuf_user = 0; /* not yet valid */
199 }
200
201 while ((nsec = do_read(d, dblk, maxsecs, trbuf)) < 0) {
202 #ifdef DISK_DEBUG
203 if (!cold)
204 printf("read error dblk %d-%d\n", dblk,
205 dblk + maxsecs - 1);
206 #endif
207 if (--retries >= 0)
208 continue;
209 return (-1); /* XXX cannot output here if
210 * (cold) */
211 }
212 if (!cold) {
213 ra_dev = d->dev;
214 ra_first = dblk;
215 ra_end = dblk + nsec;
216 diskbuf_user = &ra_dev;
217 }
218 } else /* can take blocks from end of read-ahead
219 * buffer */
220 nsec = ra_end - dblk;
221
222 if (!cold) {
223 /* copy data from read-ahead to user buffer */
224 if (nsec > num)
225 nsec = num;
226 memcpy(buf,
227 diskbuf + (dblk - ra_first) * BIOSDISK_SECSIZE,
228 nsec * BIOSDISK_SECSIZE);
229 }
230 buf += nsec * BIOSDISK_SECSIZE;
231 num -= nsec;
232 dblk += nsec;
233 }
234
235 return (0);
236 }
237