md_root.c revision 1.2 1 /* $NetBSD: md_root.c,v 1.2 1996/03/27 10:13:09 leo Exp $ */
2
3 /*
4 * Copyright (c) 1996 Leo Weppelman.
5 * 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 by Leo Weppelman.
18 * 4. The name of the author may not be used to endorse or promote products
19 * derived from this software without specific prior written permission
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 */
32
33 #include <sys/param.h>
34 #include <sys/systm.h>
35 #include <sys/kernel.h>
36 #include <sys/malloc.h>
37 #include <sys/buf.h>
38 #include <sys/proc.h>
39 #include <sys/device.h>
40 #include <sys/ioctl.h>
41 #include <sys/fcntl.h>
42 #include <sys/conf.h>
43 #include <sys/disklabel.h>
44 #include <sys/disk.h>
45 #include <sys/dkbad.h>
46
47 #include <dev/ramdisk.h>
48
49 /*
50 * Misc. defines:
51 */
52 #define RAMD_CHUNK (9 * 512) /* Chunk-size for auto-load */
53 #define RAMD_NDEV 2 /* Number of devices configured */
54
55 struct ramd_info {
56 u_long ramd_size; /* Size of disk in bytes */
57 u_long ramd_flag; /* see defs below */
58 dev_t ramd_dev; /* device to load from */
59 };
60
61 /*
62 * ramd_flag:
63 */
64 #define RAMD_LOAD 0x01 /* Auto load when first opened */
65 #define RAMD_LCOMP 0x02 /* Input is compressed */
66
67 struct ramd_info rd_info[RAMD_NDEV] = {
68 {
69 1105920, /* 1Mb in 2160 sectors */
70 RAMD_LOAD, /* auto-load this device */
71 MAKEDISKDEV(2, 0, 1), /* XXX: This is crap! (720Kb flop) */
72 },
73 {
74 1474560, /* 1.44Mb in 2880 sectors */
75 RAMD_LOAD, /* auto-load this device */
76 MAKEDISKDEV(2, 0, 1), /* XXX: This is crap! (720Kb flop) */
77 }
78 };
79
80 struct read_info {
81 struct buf *bp; /* buffer for strategy function */
82 long nbytes; /* total number of bytes to read */
83 long offset; /* offset in input medium */
84 caddr_t bufp; /* current output buffer */
85 caddr_t ebufp; /* absolute maximum for bufp */
86 int chunk; /* chunk size on input medium */
87 int media_sz; /* size of input medium */
88 void (*strat)(struct buf *); /* strategy function for read */
89 };
90
91
92 static int loaddisk __P((struct rd_conf *, dev_t ld_dev, struct proc *));
93 static int ramd_norm_read __P((struct read_info *));
94 static int cpy_uncompressed __P((caddr_t, int, struct read_info *));
95 static int rd_compressed __P((caddr_t, int, struct read_info *));
96
97 /*
98 * This is called during autoconfig.
99 */
100 void
101 rd_attach_hook(unit, rd)
102 int unit;
103 struct rd_conf *rd;
104 {
105 extern int atari_realconfig;
106
107 if (atari_realconfig && (unit < RAMD_NDEV) && rd_info[unit].ramd_flag) {
108 printf ("rd%d:%sauto-load on open. Size %ld bytes.\n", unit,
109 rd_info[unit].ramd_flag & RAMD_LCOMP ? " decompress/" : "",
110 rd_info[unit].ramd_size);
111 rd->rd_type = RD_UNCONFIGURED; /* Paranoia... */
112 }
113 }
114
115 void
116 rd_open_hook(unit, rd)
117 int unit;
118 struct rd_conf *rd;
119 {
120 struct ramd_info *ri;
121
122 if(unit >= RAMD_NDEV)
123 return;
124
125 ri = &rd_info[unit];
126 if (rd->rd_type != RD_UNCONFIGURED)
127 return; /* Only configure once */
128 rd->rd_addr = malloc(ri->ramd_size, M_DEVBUF, M_WAITOK);
129 rd->rd_size = ri->ramd_size;
130 if(rd->rd_addr == NULL)
131 return;
132 if(ri->ramd_flag & RAMD_LOAD) {
133 if (loaddisk(rd, ri->ramd_dev, curproc)) {
134 free(rd->rd_addr, M_DEVBUF);
135 rd->rd_addr = NULL;
136 return;
137 }
138 }
139 rd->rd_type = RD_KMEM_ALLOCATED;
140 }
141
142 static int
143 loaddisk(rd, ld_dev, proc)
144 struct rd_conf *rd;
145 dev_t ld_dev;
146 struct proc *proc;
147 {
148 struct buf buf;
149 int error;
150 struct bdevsw *bdp = &bdevsw[major(ld_dev)];
151 struct disklabel dl;
152 struct read_info rs;
153
154 /*
155 * Initialize our buffer header:
156 */
157 buf.b_actf = NULL;
158 buf.b_rcred = buf.b_wcred = proc->p_ucred;
159 buf.b_vnbufs.le_next = NOLIST;
160 buf.b_flags = B_BUSY;
161 buf.b_dev = ld_dev;
162 buf.b_error = 0;
163 buf.b_proc = proc;
164
165 /*
166 * Setup read_info:
167 */
168 rs.bp = &buf;
169 rs.nbytes = rd->rd_size;
170 rs.offset = 0;
171 rs.bufp = rd->rd_addr;
172 rs.ebufp = rd->rd_addr + rd->rd_size;
173 rs.chunk = RAMD_CHUNK;
174 rs.media_sz = rd->rd_size;
175 rs.strat = bdp->d_strategy;
176
177 /*
178 * Open device and try to get some statistics.
179 */
180 if(error = bdp->d_open(ld_dev, FREAD | FNONBLOCK, 0, proc))
181 return(error);
182 if(bdp->d_ioctl(ld_dev, DIOCGDINFO, (caddr_t)&dl, FREAD, proc) == 0) {
183 /* Read on a cylinder basis */
184 rs.chunk = dl.d_secsize * dl.d_secpercyl;
185 rs.media_sz = dl.d_secperunit * dl.d_secsize;
186 }
187
188 #ifdef support_compression
189 if(ri->ramd_flag & RAMD_LCOMP)
190 error = decompress(cpy_uncompressed, rd_compressed, &rs);
191 else
192 #endif /* support_compression */
193 error = ramd_norm_read(&rs);
194
195 bdp->d_close(ld_dev,FREAD | FNONBLOCK, 0, proc);
196 return(error);
197 }
198
199 static int
200 ramd_norm_read(rsp)
201 struct read_info *rsp;
202 {
203 long bytes_left;
204 int done, error;
205 struct buf *bp;
206 int s;
207 int dotc = 0;
208
209 bytes_left = rsp->nbytes;
210 bp = rsp->bp;
211 error = 0;
212
213 while(bytes_left > 0) {
214 s = splbio();
215 bp->b_flags = B_BUSY | B_PHYS | B_READ;
216 splx(s);
217 bp->b_blkno = btodb(rsp->offset);
218 bp->b_bcount = rsp->chunk;
219 bp->b_data = rsp->bufp;
220
221 /* Initiate read */
222 (*rsp->strat)(bp);
223
224 /* Wait for results */
225 s = splbio();
226 while ((bp->b_flags & B_DONE) == 0)
227 tsleep((caddr_t) bp, PRIBIO + 1, "ramd_norm_read", 0);
228 if (bp->b_flags & B_ERROR)
229 error = (bp->b_error ? bp->b_error : EIO);
230 splx(s);
231
232 /* Dot counter */
233 printf(".");
234 if(!(++dotc % 40))
235 printf("\n");
236
237 done = bp->b_bcount - bp->b_resid;
238 bytes_left -= done;
239 rsp->offset += done;
240 rsp->bufp += done;
241
242 if(error || !done)
243 break;
244
245 if((rsp->offset == rsp->media_sz) && (bytes_left != 0)) {
246 printf("\nInsert next media and hit any key...");
247 cngetc();
248 printf("\n");
249 rsp->offset = 0;
250 }
251 }
252 printf("\n");
253 return(error);
254 }
255
256 #ifdef support_compression
257 /*
258 * Functions supporting uncompression:
259 */
260 /*
261 * Copy from the uncompression buffer to the ramdisk
262 */
263 static int
264 cpy_uncompressed(buf, nbyte, rsp)
265 caddr_t buf;
266 struct read_info *rsp;
267 int nbyte;
268 {
269 if((rsp->bufp + nbyte) >= rsp->ebufp)
270 return(0);
271 bcopy(buf, rsp->bufp, nbyte);
272 rsp->bufp += nbyte;
273 return(0);
274 }
275
276 /*
277 * Read a maximum of 'nbyte' bytes into 'buf'.
278 */
279 static int
280 rd_compressed(buf, nbyte, rsp)
281 caddr_t buf;
282 struct read_info *rsp;
283 int nbyte;
284 {
285 static int dotc = 0;
286 struct buf *bp;
287 int nread = 0;
288 int s;
289 int done, error;
290
291
292 error = 0;
293 bp = rsp->bp;
294 nbyte &= ~(DEV_BSIZE - 1);
295
296 while(nbyte > 0) {
297 s = splbio();
298 bp->b_flags = B_BUSY | B_PHYS | B_READ;
299 splx(s);
300 bp->b_blkno = btodb(rsp->offset);
301 bp->b_bcount = min(rsp->chunk, nbyte);
302 bp->b_data = buf;
303
304 /* Initiate read */
305 (*rsp->strat)(bp);
306
307 /* Wait for results */
308 s = splbio();
309 while ((bp->b_flags & B_DONE) == 0)
310 tsleep((caddr_t) bp, PRIBIO + 1, "ramd_norm_read", 0);
311 if (bp->b_flags & B_ERROR)
312 error = (bp->b_error ? bp->b_error : EIO);
313 splx(s);
314
315 /* Dot counter */
316 printf(".");
317 if(!(++dotc % 40))
318 printf("\n");
319
320 done = bp->b_bcount - bp->b_resid;
321 nbyte -= done;
322 nread += done;
323 rsp->offset += done;
324
325 if(error || !done)
326 break;
327
328 if((rsp->offset == rsp->media_sz) && (nbyte != 0)) {
329 if(rsp->offset == rsp->media_sz) {
330 printf("\nInsert next media and hit any key...");
331 if(cngetc() != '\n')
332 printf("\n");
333 rsp->offset = 0;
334 }
335 }
336 s = splbio();
337 splx(s);
338 return(nread);
339 }
340 #endif /* support_compression */
341