biosdisk.c revision 1.7 1 /* $NetBSD: biosdisk.c,v 1.7 1997/10/13 09:26:29 drochner Exp $ */
2
3 /*
4 * Copyright (c) 1996
5 * Matthias Drochner. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed for the NetBSD Project
18 * by Matthias Drochner.
19 * 4. The name of the author may not be used to endorse or promote products
20 * derived from this software without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
26 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
31 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 *
33 */
34
35 /*
36 * raw BIOS disk device for libsa.
37 * needs lowlevel parts from bios_disk.S and biosdisk_ll.c
38 * partly from netbsd:sys/arch/i386/boot/disk.c
39 * no bad144 handling!
40 */
41
42 /*
43 * Ported to boot 386BSD by Julian Elischer (julian (at) tfs.com) Sept 1992
44 *
45 * Mach Operating System
46 * Copyright (c) 1992, 1991 Carnegie Mellon University
47 * All Rights Reserved.
48 *
49 * Permission to use, copy, modify and distribute this software and its
50 * documentation is hereby granted, provided that both the copyright
51 * notice and this permission notice appear in all copies of the
52 * software, derivative works or modified versions, and any portions
53 * thereof, and that both notices appear in supporting documentation.
54 *
55 * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
56 * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
57 * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
58 *
59 * Carnegie Mellon requests users of this software to return to
60 *
61 * Software Distribution Coordinator or Software.Distribution (at) CS.CMU.EDU
62 * School of Computer Science
63 * Carnegie Mellon University
64 * Pittsburgh PA 15213-3890
65 *
66 * any improvements or extensions that they make and grant Carnegie Mellon
67 * the rights to redistribute these changes.
68 */
69
70 #include <sys/types.h>
71 #include <sys/disklabel.h>
72
73 #include <lib/libsa/stand.h>
74 #include <lib/libsa/saerrno.h>
75 #include <machine/stdarg.h>
76
77 #include "libi386.h"
78 #include "biosdisk_ll.h"
79 #include "biosdisk.h"
80 #include "bootinfo.h"
81
82 #define BUFSIZE (1 * BIOSDISK_SECSIZE)
83
84 struct biosdisk {
85 struct biosdisk_ll ll;
86 #ifdef COMPAT_OLDBOOT
87 int disktype;
88 #endif
89 int boff;
90 char buf[BUFSIZE];
91 };
92
93 static struct btinfo_bootdisk bi_disk;
94
95 int
96 biosdiskstrategy(devdata, flag, dblk, size, buf, rsize)
97 void *devdata;
98 int flag;
99 daddr_t dblk;
100 size_t size;
101 void *buf;
102 size_t *rsize;
103 {
104 struct biosdisk *d;
105 int blks, frag;
106
107 if (flag != F_READ)
108 return (EROFS);
109
110 d = (struct biosdisk *) devdata;
111
112 dblk += d->boff;
113
114 blks = size / BIOSDISK_SECSIZE;
115 if (blks && readsects(&d->ll, dblk, blks, buf, 0)) {
116 if (rsize)
117 *rsize = 0;
118 return (EIO);
119 }
120 /* do we really need this? */
121 frag = size % BIOSDISK_SECSIZE;
122 if (frag) {
123 if (readsects(&d->ll, dblk + blks, 1, d->buf, 0)) {
124 if (rsize)
125 *rsize = blks * BIOSDISK_SECSIZE;
126 return (EIO);
127 }
128 bcopy(d->buf, buf + blks * BIOSDISK_SECSIZE, frag);
129 }
130 if (rsize)
131 *rsize = size;
132 return (0);
133 }
134
135 #ifdef COMPAT_OLDBOOT
136 int
137 biosdisk_gettype(f)
138 struct open_file *f;
139 {
140 struct biosdisk *d = f->f_devdata;
141 return (d->disktype);
142 }
143 #endif
144
145 int
146 biosdiskopen(struct open_file *f, ...)
147 /* file, biosdev, partition */
148 {
149 va_list ap;
150 struct biosdisk *d;
151 int partition;
152 #ifndef NO_DISKLABEL
153 struct dos_partition *dptr;
154 int sector, i;
155 struct disklabel *lp;
156 #endif
157 int error = 0;
158
159 d = (struct biosdisk *) alloc(sizeof(struct biosdisk));
160 if (!d) {
161 #ifdef DEBUG
162 printf("biosdiskopen: no memory\n");
163 #endif
164 return (ENOMEM);
165 }
166 va_start(ap, f);
167 bi_disk.biosdev = d->ll.dev = va_arg(ap, int);
168 if (set_geometry(&d->ll)) {
169 #ifdef DISK_DEBUG
170 printf("no geometry information\n");
171 #endif
172 error = ENXIO;
173 goto out;
174 }
175
176 d->boff = 0;
177 bi_disk.labelsector = -1;
178 bi_disk.partition = partition = va_arg(ap, int);
179
180 #ifndef NO_DISKLABEL
181 if (!(d->ll.dev & 0x80) /* floppy */
182 || partition == RAW_PART)
183 goto nolabel;
184
185 /*
186 * find NetBSD Partition in DOS partition table
187 * XXX check magic???
188 */
189 if (readsects(&d->ll, 0, 1, d->buf, 0)) {
190 #ifdef DISK_DEBUG
191 printf("error reading MBR\n");
192 #endif
193 error = EIO;
194 goto out;
195 }
196 dptr = (struct dos_partition *) & d->buf[DOSPARTOFF];
197 sector = -1;
198 for (i = 0; i < NDOSPART; i++, dptr++)
199 if (dptr->dp_typ == DOSPTYP_NETBSD) {
200 sector = dptr->dp_start;
201 break;
202 }
203 if (sector == -1) {
204 /*
205 * One of two things:
206 * 1. no MBR
207 * 2. no NetBSD partition in MBR
208 *
209 * We simply default to "start of disk" in this case and
210 * press on.
211 */
212 sector = 0;
213 }
214
215 /* find partition in NetBSD disklabel */
216 if (readsects(&d->ll, sector + LABELSECTOR, 1, d->buf, 0)) {
217 #ifdef DISK_DEBUG
218 printf("Error reading disklabel\n");
219 #endif
220 error = EIO;
221 goto out;
222 }
223 lp = (struct disklabel *) (d->buf + LABELOFFSET);
224 if (lp->d_magic != DISKMAGIC) {
225 #ifdef DISK_DEBUG
226 printf("warning: no disklabel\n");
227 #endif
228 d->boff = sector;
229 } else if (partition >= lp->d_npartitions ||
230 lp->d_partitions[partition].p_fstype == FS_UNUSED) {
231 #ifdef DISK_DEBUG
232 printf("illegal partition\n");
233 #endif
234 error = EPART;
235 goto out;
236 } else {
237 d->boff = lp->d_partitions[partition].p_offset;
238 bi_disk.labelsector = sector + LABELSECTOR;
239 #ifdef COMPAT_OLDBOOT
240 d->disktype =
241 #endif
242 bi_disk.label.type = lp->d_type;
243 bcopy(lp->d_packname, bi_disk.label.packname, 16);
244 bi_disk.label.checksum = lp->d_checksum;
245 }
246 nolabel:
247 #endif /* NO_DISKLABEL */
248
249 #ifdef DISK_DEBUG
250 printf("partition @%d\n", d->boff);
251 #endif
252
253 BI_ADD(&bi_disk, BTINFO_BOOTDISK, sizeof(bi_disk));
254
255 f->f_devdata = d;
256 out:
257 va_end(ap);
258 if (error)
259 free(d, sizeof(struct biosdisk));
260 return (error);
261 }
262
263 int
264 biosdiskclose(f)
265 struct open_file *f;
266 {
267 struct biosdisk *d = f->f_devdata;
268
269 if (!(d->ll.dev & 0x80))/* let the floppy drive go off */
270 delay(3000000); /* 2s is enough on all PCs I found */
271
272 free(d, sizeof(struct biosdisk));
273 f->f_devdata = NULL;
274 return (0);
275 }
276
277 int
278 biosdiskioctl(f, cmd, arg)
279 struct open_file *f;
280 u_long cmd;
281 void *arg;
282 {
283 return EIO;
284 }
285