ed_mca.c revision 1.11.2.1 1 1.11.2.1 gehenna /* $NetBSD: ed_mca.c,v 1.11.2.1 2002/05/16 12:08:18 gehenna Exp $ */
2 1.1 jdolecek
3 1.1 jdolecek /*
4 1.1 jdolecek * Copyright (c) 2001 The NetBSD Foundation, Inc.
5 1.1 jdolecek *
6 1.1 jdolecek * This code is derived from software contributed to The NetBSD Foundation
7 1.1 jdolecek * by Jaromir Dolecek.
8 1.1 jdolecek *
9 1.1 jdolecek * Redistribution and use in source and binary forms, with or without
10 1.1 jdolecek * modification, are permitted provided that the following conditions
11 1.1 jdolecek * are met:
12 1.1 jdolecek * 1. Redistributions of source code must retain the above copyright
13 1.1 jdolecek * notice, this list of conditions and the following disclaimer.
14 1.1 jdolecek * 2. Redistributions in binary form must reproduce the above copyright
15 1.1 jdolecek * notice, this list of conditions and the following disclaimer in the
16 1.1 jdolecek * documentation and/or other materials provided with the distribution.
17 1.1 jdolecek * 3. All advertising materials mentioning features or use of this software
18 1.1 jdolecek * must display the following acknowledgement:
19 1.1 jdolecek * This product includes software developed by the NetBSD
20 1.1 jdolecek * Foundation, Inc. and its contributors.
21 1.1 jdolecek * 4. The name of the author may not be used to endorse or promote products
22 1.1 jdolecek * derived from this software without specific prior written permission.
23 1.1 jdolecek *
24 1.1 jdolecek * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
25 1.1 jdolecek * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
26 1.1 jdolecek * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
27 1.1 jdolecek * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
28 1.1 jdolecek * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
29 1.1 jdolecek * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
30 1.1 jdolecek * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
31 1.1 jdolecek * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
32 1.1 jdolecek * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
33 1.1 jdolecek * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 1.1 jdolecek */
35 1.1 jdolecek
36 1.1 jdolecek /*
37 1.10 jdolecek * Disk drive goo for MCA ESDI controller driver.
38 1.1 jdolecek */
39 1.9 lukem
40 1.9 lukem #include <sys/cdefs.h>
41 1.11.2.1 gehenna __KERNEL_RCSID(0, "$NetBSD: ed_mca.c,v 1.11.2.1 2002/05/16 12:08:18 gehenna Exp $");
42 1.1 jdolecek
43 1.1 jdolecek #include "rnd.h"
44 1.10 jdolecek #include "locators.h"
45 1.1 jdolecek
46 1.1 jdolecek #include <sys/param.h>
47 1.1 jdolecek #include <sys/systm.h>
48 1.1 jdolecek #include <sys/kernel.h>
49 1.1 jdolecek #include <sys/conf.h>
50 1.1 jdolecek #include <sys/file.h>
51 1.1 jdolecek #include <sys/stat.h>
52 1.1 jdolecek #include <sys/ioctl.h>
53 1.1 jdolecek #include <sys/buf.h>
54 1.1 jdolecek #include <sys/uio.h>
55 1.1 jdolecek #include <sys/malloc.h>
56 1.1 jdolecek #include <sys/device.h>
57 1.1 jdolecek #include <sys/disklabel.h>
58 1.1 jdolecek #include <sys/disk.h>
59 1.1 jdolecek #include <sys/syslog.h>
60 1.1 jdolecek #include <sys/proc.h>
61 1.1 jdolecek #include <sys/vnode.h>
62 1.1 jdolecek #if NRND > 0
63 1.1 jdolecek #include <sys/rnd.h>
64 1.1 jdolecek #endif
65 1.1 jdolecek
66 1.1 jdolecek #include <machine/intr.h>
67 1.1 jdolecek #include <machine/bus.h>
68 1.1 jdolecek
69 1.4 jdolecek #include <dev/mca/mcavar.h>
70 1.4 jdolecek
71 1.2 jdolecek #include <dev/mca/edcreg.h>
72 1.1 jdolecek #include <dev/mca/edvar.h>
73 1.2 jdolecek #include <dev/mca/edcvar.h>
74 1.1 jdolecek
75 1.1 jdolecek /* #define WDCDEBUG */
76 1.1 jdolecek
77 1.1 jdolecek #ifdef WDCDEBUG
78 1.1 jdolecek #define WDCDEBUG_PRINT(args, level) printf args
79 1.1 jdolecek #else
80 1.1 jdolecek #define WDCDEBUG_PRINT(args, level)
81 1.1 jdolecek #endif
82 1.1 jdolecek
83 1.1 jdolecek #define EDLABELDEV(dev) (MAKEDISKDEV(major(dev), DISKUNIT(dev), RAW_PART))
84 1.1 jdolecek
85 1.1 jdolecek static int ed_mca_probe __P((struct device *, struct cfdata *, void *));
86 1.1 jdolecek static void ed_mca_attach __P((struct device *, struct device *, void *));
87 1.1 jdolecek
88 1.1 jdolecek struct cfattach ed_mca_ca = {
89 1.1 jdolecek sizeof(struct ed_softc), ed_mca_probe, ed_mca_attach
90 1.1 jdolecek };
91 1.1 jdolecek
92 1.1 jdolecek extern struct cfdriver ed_cd;
93 1.1 jdolecek
94 1.10 jdolecek static int ed_get_params __P((struct ed_softc *, int *));
95 1.1 jdolecek static int ed_lock __P((struct ed_softc *));
96 1.1 jdolecek static void ed_unlock __P((struct ed_softc *));
97 1.10 jdolecek static void edgetdisklabel __P((dev_t, struct ed_softc *));
98 1.1 jdolecek static void edgetdefaultlabel __P((struct ed_softc *, struct disklabel *));
99 1.11.2.1 gehenna
100 1.11.2.1 gehenna dev_type_open(edmcaopen);
101 1.11.2.1 gehenna dev_type_close(edmcaclose);
102 1.11.2.1 gehenna dev_type_read(edmcaread);
103 1.11.2.1 gehenna dev_type_write(edmcawrite);
104 1.11.2.1 gehenna dev_type_ioctl(edmcaioctl);
105 1.11.2.1 gehenna dev_type_strategy(edmcastrategy);
106 1.11.2.1 gehenna dev_type_dump(edmcadump);
107 1.11.2.1 gehenna dev_type_size(edmcasize);
108 1.11.2.1 gehenna
109 1.11.2.1 gehenna const struct bdevsw ed_bdevsw = {
110 1.11.2.1 gehenna edmcaopen, edmcaclose, edmcastrategy, edmcaioctl,
111 1.11.2.1 gehenna edmcadump, edmcasize, D_DISK
112 1.11.2.1 gehenna };
113 1.11.2.1 gehenna
114 1.11.2.1 gehenna const struct cdevsw ed_cdevsw = {
115 1.11.2.1 gehenna edmcaopen, edmcaclose, edmcaread, edmcawrite, edmcaioctl,
116 1.11.2.1 gehenna nostop, notty, nopoll, nommap, D_DISK
117 1.11.2.1 gehenna };
118 1.1 jdolecek
119 1.1 jdolecek static struct dkdriver eddkdriver = { edmcastrategy };
120 1.1 jdolecek
121 1.1 jdolecek /*
122 1.1 jdolecek * Just check if it's possible to identify the disk.
123 1.1 jdolecek */
124 1.1 jdolecek static int
125 1.10 jdolecek ed_mca_probe(parent, cf, aux)
126 1.1 jdolecek struct device *parent;
127 1.10 jdolecek struct cfdata *cf;
128 1.1 jdolecek void *aux;
129 1.1 jdolecek {
130 1.1 jdolecek u_int16_t cmd_args[2];
131 1.2 jdolecek struct edc_mca_softc *sc = (void *) parent;
132 1.10 jdolecek struct ed_attach_args *eda = (struct ed_attach_args *) aux;
133 1.6 jdolecek int found = 1;
134 1.1 jdolecek
135 1.1 jdolecek /*
136 1.10 jdolecek * Check we match hardwired config.
137 1.10 jdolecek */
138 1.10 jdolecek if (cf->edccf_unit != EDCCF_DRIVE_DEFAULT &&
139 1.10 jdolecek cf->edccf_unit != eda->edc_drive)
140 1.10 jdolecek return (0);
141 1.10 jdolecek
142 1.10 jdolecek /*
143 1.1 jdolecek * Get Device Configuration (09).
144 1.1 jdolecek */
145 1.6 jdolecek cmd_args[0] = 14; /* Options: 00s110, s: 0=Physical 1=Pseudo */
146 1.1 jdolecek cmd_args[1] = 0;
147 1.10 jdolecek if (edc_run_cmd(sc, CMD_GET_DEV_CONF, eda->edc_drive, cmd_args, 2, 1))
148 1.6 jdolecek found = 0;
149 1.1 jdolecek
150 1.6 jdolecek return (found);
151 1.1 jdolecek }
152 1.1 jdolecek
153 1.1 jdolecek static void
154 1.1 jdolecek ed_mca_attach(parent, self, aux)
155 1.1 jdolecek struct device *parent, *self;
156 1.1 jdolecek void *aux;
157 1.1 jdolecek {
158 1.1 jdolecek struct ed_softc *ed = (void *) self;
159 1.2 jdolecek struct edc_mca_softc *sc = (void *) parent;
160 1.10 jdolecek struct ed_attach_args *eda = (struct ed_attach_args *) aux;
161 1.10 jdolecek char pbuf[8], lckname[10];
162 1.10 jdolecek int drv_flags;
163 1.1 jdolecek
164 1.2 jdolecek ed->edc_softc = sc;
165 1.10 jdolecek ed->sc_devno = eda->edc_drive;
166 1.10 jdolecek edc_add_disk(sc, ed);
167 1.1 jdolecek
168 1.1 jdolecek BUFQ_INIT(&ed->sc_q);
169 1.8 sommerfe simple_lock_init(&ed->sc_q_lock);
170 1.10 jdolecek snprintf(lckname, sizeof(lckname), "%slck", ed->sc_dev.dv_xname);
171 1.10 jdolecek lockinit(&ed->sc_lock, PRIBIO | PCATCH, lckname, 0, 0);
172 1.1 jdolecek
173 1.10 jdolecek if (ed_get_params(ed, &drv_flags)) {
174 1.1 jdolecek printf(": IDENTIFY failed, no disk found\n");
175 1.1 jdolecek return;
176 1.1 jdolecek }
177 1.1 jdolecek
178 1.1 jdolecek format_bytes(pbuf, sizeof(pbuf),
179 1.1 jdolecek (u_int64_t) ed->sc_capacity * DEV_BSIZE);
180 1.1 jdolecek printf(": %s, %u cyl, %u head, %u sec, 512 bytes/sect x %u sectors\n",
181 1.1 jdolecek pbuf,
182 1.1 jdolecek ed->cyl, ed->heads, ed->sectors,
183 1.1 jdolecek ed->sc_capacity);
184 1.1 jdolecek
185 1.6 jdolecek printf("%s: %u spares/cyl, %s, %s, %s, %s, %s\n",
186 1.1 jdolecek ed->sc_dev.dv_xname, ed->spares,
187 1.10 jdolecek (drv_flags & (1 << 0)) ? "NoRetries" : "Retries",
188 1.10 jdolecek (drv_flags & (1 << 1)) ? "Removable" : "Fixed",
189 1.10 jdolecek (drv_flags & (1 << 2)) ? "SkewedFormat" : "NoSkew",
190 1.10 jdolecek (drv_flags & (1 << 3)) ? "ZeroDefect" : "Defects",
191 1.10 jdolecek (drv_flags & (1 << 4)) ? "InvalidSecondary" : "SecondaryOK"
192 1.1 jdolecek );
193 1.8 sommerfe
194 1.1 jdolecek /*
195 1.1 jdolecek * Initialize and attach the disk structure.
196 1.1 jdolecek */
197 1.1 jdolecek ed->sc_dk.dk_driver = &eddkdriver;
198 1.1 jdolecek ed->sc_dk.dk_name = ed->sc_dev.dv_xname;
199 1.1 jdolecek disk_attach(&ed->sc_dk);
200 1.1 jdolecek #if NRND > 0
201 1.1 jdolecek rnd_attach_source(&ed->rnd_source, ed->sc_dev.dv_xname,
202 1.1 jdolecek RND_TYPE_DISK, 0);
203 1.1 jdolecek #endif
204 1.1 jdolecek
205 1.6 jdolecek ed->sc_flags |= EDF_INIT;
206 1.1 jdolecek }
207 1.1 jdolecek
208 1.1 jdolecek /*
209 1.1 jdolecek * Read/write routine for a buffer. Validates the arguments and schedules the
210 1.1 jdolecek * transfer. Does not wait for the transfer to complete.
211 1.1 jdolecek */
212 1.1 jdolecek void
213 1.1 jdolecek edmcastrategy(bp)
214 1.1 jdolecek struct buf *bp;
215 1.1 jdolecek {
216 1.10 jdolecek struct ed_softc *ed = device_lookup(&ed_cd, DISKUNIT(bp->b_dev));
217 1.10 jdolecek struct disklabel *lp = ed->sc_dk.dk_label;
218 1.1 jdolecek daddr_t blkno;
219 1.1 jdolecek
220 1.10 jdolecek WDCDEBUG_PRINT(("edmcastrategy (%s)\n", ed->sc_dev.dv_xname),
221 1.1 jdolecek DEBUG_XFERS);
222 1.8 sommerfe
223 1.1 jdolecek /* Valid request? */
224 1.1 jdolecek if (bp->b_blkno < 0 ||
225 1.1 jdolecek (bp->b_bcount % lp->d_secsize) != 0 ||
226 1.1 jdolecek (bp->b_bcount / lp->d_secsize) >= (1 << NBBY)) {
227 1.1 jdolecek bp->b_error = EINVAL;
228 1.1 jdolecek goto bad;
229 1.1 jdolecek }
230 1.8 sommerfe
231 1.1 jdolecek /* If device invalidated (e.g. media change, door open), error. */
232 1.10 jdolecek if ((ed->sc_flags & WDF_LOADED) == 0) {
233 1.1 jdolecek bp->b_error = EIO;
234 1.1 jdolecek goto bad;
235 1.1 jdolecek }
236 1.1 jdolecek
237 1.1 jdolecek /* If it's a null transfer, return immediately. */
238 1.1 jdolecek if (bp->b_bcount == 0)
239 1.1 jdolecek goto done;
240 1.1 jdolecek
241 1.1 jdolecek /*
242 1.1 jdolecek * Do bounds checking, adjust transfer. if error, process.
243 1.1 jdolecek * If end of partition, just return.
244 1.1 jdolecek */
245 1.1 jdolecek if (DISKPART(bp->b_dev) != RAW_PART &&
246 1.10 jdolecek bounds_check_with_label(bp, ed->sc_dk.dk_label,
247 1.10 jdolecek (ed->sc_flags & (WDF_WLABEL|WDF_LABELLING)) != 0) <= 0)
248 1.1 jdolecek goto done;
249 1.1 jdolecek
250 1.1 jdolecek /*
251 1.1 jdolecek * Now convert the block number to absolute and put it in
252 1.1 jdolecek * terms of the device's logical block size.
253 1.1 jdolecek */
254 1.1 jdolecek if (lp->d_secsize >= DEV_BSIZE)
255 1.1 jdolecek blkno = bp->b_blkno / (lp->d_secsize / DEV_BSIZE);
256 1.1 jdolecek else
257 1.1 jdolecek blkno = bp->b_blkno * (DEV_BSIZE / lp->d_secsize);
258 1.1 jdolecek
259 1.1 jdolecek if (DISKPART(bp->b_dev) != RAW_PART)
260 1.1 jdolecek blkno += lp->d_partitions[DISKPART(bp->b_dev)].p_offset;
261 1.1 jdolecek
262 1.1 jdolecek bp->b_rawblkno = blkno;
263 1.1 jdolecek
264 1.1 jdolecek /* Queue transfer on drive, activate drive and controller if idle. */
265 1.10 jdolecek simple_lock(&ed->sc_q_lock);
266 1.10 jdolecek disksort_blkno(&ed->sc_q, bp);
267 1.10 jdolecek simple_unlock(&ed->sc_q_lock);
268 1.1 jdolecek
269 1.1 jdolecek /* Ring the worker thread */
270 1.10 jdolecek wakeup_one(ed->edc_softc);
271 1.1 jdolecek
272 1.1 jdolecek return;
273 1.1 jdolecek bad:
274 1.1 jdolecek bp->b_flags |= B_ERROR;
275 1.1 jdolecek done:
276 1.1 jdolecek /* Toss transfer; we're done early. */
277 1.1 jdolecek bp->b_resid = bp->b_bcount;
278 1.1 jdolecek biodone(bp);
279 1.1 jdolecek }
280 1.1 jdolecek
281 1.1 jdolecek int
282 1.1 jdolecek edmcaread(dev, uio, flags)
283 1.1 jdolecek dev_t dev;
284 1.1 jdolecek struct uio *uio;
285 1.1 jdolecek int flags;
286 1.1 jdolecek {
287 1.1 jdolecek WDCDEBUG_PRINT(("edread\n"), DEBUG_XFERS);
288 1.1 jdolecek return (physio(edmcastrategy, NULL, dev, B_READ, minphys, uio));
289 1.1 jdolecek }
290 1.1 jdolecek
291 1.1 jdolecek int
292 1.1 jdolecek edmcawrite(dev, uio, flags)
293 1.1 jdolecek dev_t dev;
294 1.1 jdolecek struct uio *uio;
295 1.1 jdolecek int flags;
296 1.1 jdolecek {
297 1.1 jdolecek WDCDEBUG_PRINT(("edwrite\n"), DEBUG_XFERS);
298 1.1 jdolecek return (physio(edmcastrategy, NULL, dev, B_WRITE, minphys, uio));
299 1.1 jdolecek }
300 1.1 jdolecek
301 1.1 jdolecek /*
302 1.1 jdolecek * Wait interruptibly for an exclusive lock.
303 1.1 jdolecek */
304 1.1 jdolecek static int
305 1.3 jdolecek ed_lock(ed)
306 1.3 jdolecek struct ed_softc *ed;
307 1.1 jdolecek {
308 1.1 jdolecek int error;
309 1.1 jdolecek int s;
310 1.1 jdolecek
311 1.1 jdolecek WDCDEBUG_PRINT(("ed_lock\n"), DEBUG_FUNCS);
312 1.1 jdolecek
313 1.1 jdolecek s = splbio();
314 1.3 jdolecek error = lockmgr(&ed->sc_lock, LK_EXCLUSIVE, NULL);
315 1.3 jdolecek splx(s);
316 1.1 jdolecek
317 1.3 jdolecek return (error);
318 1.1 jdolecek }
319 1.1 jdolecek
320 1.1 jdolecek /*
321 1.1 jdolecek * Unlock and wake up any waiters.
322 1.1 jdolecek */
323 1.1 jdolecek static void
324 1.3 jdolecek ed_unlock(ed)
325 1.3 jdolecek struct ed_softc *ed;
326 1.1 jdolecek {
327 1.1 jdolecek WDCDEBUG_PRINT(("ed_unlock\n"), DEBUG_FUNCS);
328 1.1 jdolecek
329 1.3 jdolecek (void) lockmgr(&ed->sc_lock, LK_RELEASE, NULL);
330 1.1 jdolecek }
331 1.1 jdolecek
332 1.1 jdolecek int
333 1.1 jdolecek edmcaopen(dev, flag, fmt, p)
334 1.1 jdolecek dev_t dev;
335 1.1 jdolecek int flag, fmt;
336 1.1 jdolecek struct proc *p;
337 1.1 jdolecek {
338 1.1 jdolecek struct ed_softc *wd;
339 1.1 jdolecek int part, error;
340 1.1 jdolecek
341 1.1 jdolecek WDCDEBUG_PRINT(("edopen\n"), DEBUG_FUNCS);
342 1.1 jdolecek wd = device_lookup(&ed_cd, DISKUNIT(dev));
343 1.6 jdolecek if (wd == NULL || (wd->sc_flags & EDF_INIT) == 0)
344 1.1 jdolecek return (ENXIO);
345 1.1 jdolecek
346 1.1 jdolecek if ((error = ed_lock(wd)) != 0)
347 1.1 jdolecek goto bad4;
348 1.1 jdolecek
349 1.1 jdolecek if (wd->sc_dk.dk_openmask != 0) {
350 1.1 jdolecek /*
351 1.1 jdolecek * If any partition is open, but the disk has been invalidated,
352 1.1 jdolecek * disallow further opens.
353 1.1 jdolecek */
354 1.1 jdolecek if ((wd->sc_flags & WDF_LOADED) == 0) {
355 1.1 jdolecek error = EIO;
356 1.1 jdolecek goto bad3;
357 1.1 jdolecek }
358 1.1 jdolecek } else {
359 1.1 jdolecek if ((wd->sc_flags & WDF_LOADED) == 0) {
360 1.10 jdolecek int s;
361 1.10 jdolecek
362 1.1 jdolecek wd->sc_flags |= WDF_LOADED;
363 1.1 jdolecek
364 1.1 jdolecek /* Load the physical device parameters. */
365 1.10 jdolecek s = splbio();
366 1.10 jdolecek ed_get_params(wd, NULL);
367 1.10 jdolecek splx(s);
368 1.1 jdolecek
369 1.1 jdolecek /* Load the partition info if not already loaded. */
370 1.10 jdolecek edgetdisklabel(dev, wd);
371 1.1 jdolecek }
372 1.1 jdolecek }
373 1.1 jdolecek
374 1.1 jdolecek part = DISKPART(dev);
375 1.1 jdolecek
376 1.1 jdolecek /* Check that the partition exists. */
377 1.1 jdolecek if (part != RAW_PART &&
378 1.1 jdolecek (part >= wd->sc_dk.dk_label->d_npartitions ||
379 1.1 jdolecek wd->sc_dk.dk_label->d_partitions[part].p_fstype == FS_UNUSED)) {
380 1.1 jdolecek error = ENXIO;
381 1.1 jdolecek goto bad;
382 1.1 jdolecek }
383 1.8 sommerfe
384 1.1 jdolecek /* Insure only one open at a time. */
385 1.1 jdolecek switch (fmt) {
386 1.1 jdolecek case S_IFCHR:
387 1.1 jdolecek wd->sc_dk.dk_copenmask |= (1 << part);
388 1.1 jdolecek break;
389 1.1 jdolecek case S_IFBLK:
390 1.1 jdolecek wd->sc_dk.dk_bopenmask |= (1 << part);
391 1.1 jdolecek break;
392 1.1 jdolecek }
393 1.1 jdolecek wd->sc_dk.dk_openmask =
394 1.1 jdolecek wd->sc_dk.dk_copenmask | wd->sc_dk.dk_bopenmask;
395 1.1 jdolecek
396 1.1 jdolecek ed_unlock(wd);
397 1.1 jdolecek return 0;
398 1.1 jdolecek
399 1.1 jdolecek bad:
400 1.1 jdolecek if (wd->sc_dk.dk_openmask == 0) {
401 1.1 jdolecek }
402 1.1 jdolecek
403 1.1 jdolecek bad3:
404 1.1 jdolecek ed_unlock(wd);
405 1.1 jdolecek bad4:
406 1.1 jdolecek return (error);
407 1.1 jdolecek }
408 1.1 jdolecek
409 1.1 jdolecek int
410 1.1 jdolecek edmcaclose(dev, flag, fmt, p)
411 1.1 jdolecek dev_t dev;
412 1.1 jdolecek int flag, fmt;
413 1.1 jdolecek struct proc *p;
414 1.1 jdolecek {
415 1.1 jdolecek struct ed_softc *wd = device_lookup(&ed_cd, DISKUNIT(dev));
416 1.1 jdolecek int part = DISKPART(dev);
417 1.1 jdolecek int error;
418 1.8 sommerfe
419 1.1 jdolecek WDCDEBUG_PRINT(("edmcaclose\n"), DEBUG_FUNCS);
420 1.1 jdolecek if ((error = ed_lock(wd)) != 0)
421 1.1 jdolecek return error;
422 1.1 jdolecek
423 1.1 jdolecek switch (fmt) {
424 1.1 jdolecek case S_IFCHR:
425 1.1 jdolecek wd->sc_dk.dk_copenmask &= ~(1 << part);
426 1.1 jdolecek break;
427 1.1 jdolecek case S_IFBLK:
428 1.1 jdolecek wd->sc_dk.dk_bopenmask &= ~(1 << part);
429 1.1 jdolecek break;
430 1.1 jdolecek }
431 1.1 jdolecek wd->sc_dk.dk_openmask =
432 1.1 jdolecek wd->sc_dk.dk_copenmask | wd->sc_dk.dk_bopenmask;
433 1.1 jdolecek
434 1.1 jdolecek if (wd->sc_dk.dk_openmask == 0) {
435 1.1 jdolecek #if 0
436 1.1 jdolecek wd_flushcache(wd, AT_WAIT);
437 1.1 jdolecek #endif
438 1.1 jdolecek /* XXXX Must wait for I/O to complete! */
439 1.1 jdolecek
440 1.1 jdolecek if (! (wd->sc_flags & WDF_KLABEL))
441 1.1 jdolecek wd->sc_flags &= ~WDF_LOADED;
442 1.1 jdolecek }
443 1.1 jdolecek
444 1.1 jdolecek ed_unlock(wd);
445 1.1 jdolecek
446 1.1 jdolecek return 0;
447 1.1 jdolecek }
448 1.1 jdolecek
449 1.1 jdolecek static void
450 1.10 jdolecek edgetdefaultlabel(ed, lp)
451 1.10 jdolecek struct ed_softc *ed;
452 1.1 jdolecek struct disklabel *lp;
453 1.1 jdolecek {
454 1.1 jdolecek WDCDEBUG_PRINT(("edgetdefaultlabel\n"), DEBUG_FUNCS);
455 1.1 jdolecek memset(lp, 0, sizeof(struct disklabel));
456 1.1 jdolecek
457 1.1 jdolecek lp->d_secsize = DEV_BSIZE;
458 1.10 jdolecek lp->d_ntracks = ed->heads;
459 1.10 jdolecek lp->d_nsectors = ed->sectors;
460 1.10 jdolecek lp->d_ncylinders = ed->cyl;
461 1.1 jdolecek lp->d_secpercyl = lp->d_ntracks * lp->d_nsectors;
462 1.1 jdolecek
463 1.1 jdolecek lp->d_type = DTYPE_ESDI;
464 1.1 jdolecek
465 1.1 jdolecek strncpy(lp->d_typename, "ESDI", 16);
466 1.1 jdolecek strncpy(lp->d_packname, "fictitious", 16);
467 1.10 jdolecek lp->d_secperunit = ed->sc_capacity;
468 1.1 jdolecek lp->d_rpm = 3600;
469 1.1 jdolecek lp->d_interleave = 1;
470 1.1 jdolecek lp->d_flags = 0;
471 1.1 jdolecek
472 1.1 jdolecek lp->d_partitions[RAW_PART].p_offset = 0;
473 1.1 jdolecek lp->d_partitions[RAW_PART].p_size =
474 1.1 jdolecek lp->d_secperunit * (lp->d_secsize / DEV_BSIZE);
475 1.1 jdolecek lp->d_partitions[RAW_PART].p_fstype = FS_UNUSED;
476 1.1 jdolecek lp->d_npartitions = RAW_PART + 1;
477 1.1 jdolecek
478 1.1 jdolecek lp->d_magic = DISKMAGIC;
479 1.1 jdolecek lp->d_magic2 = DISKMAGIC;
480 1.1 jdolecek lp->d_checksum = dkcksum(lp);
481 1.1 jdolecek }
482 1.1 jdolecek
483 1.1 jdolecek /*
484 1.1 jdolecek * Fabricate a default disk label, and try to read the correct one.
485 1.1 jdolecek */
486 1.1 jdolecek static void
487 1.10 jdolecek edgetdisklabel(dev, ed)
488 1.10 jdolecek dev_t dev;
489 1.10 jdolecek struct ed_softc *ed;
490 1.1 jdolecek {
491 1.10 jdolecek struct disklabel *lp = ed->sc_dk.dk_label;
492 1.1 jdolecek char *errstring;
493 1.1 jdolecek
494 1.1 jdolecek WDCDEBUG_PRINT(("edgetdisklabel\n"), DEBUG_FUNCS);
495 1.1 jdolecek
496 1.10 jdolecek memset(ed->sc_dk.dk_cpulabel, 0, sizeof(struct cpu_disklabel));
497 1.1 jdolecek
498 1.10 jdolecek edgetdefaultlabel(ed, lp);
499 1.1 jdolecek
500 1.10 jdolecek errstring = readdisklabel(
501 1.10 jdolecek EDLABELDEV(dev), edmcastrategy, lp, ed->sc_dk.dk_cpulabel);
502 1.1 jdolecek if (errstring) {
503 1.1 jdolecek /*
504 1.1 jdolecek * This probably happened because the drive's default
505 1.1 jdolecek * geometry doesn't match the DOS geometry. We
506 1.1 jdolecek * assume the DOS geometry is now in the label and try
507 1.1 jdolecek * again. XXX This is a kluge.
508 1.1 jdolecek */
509 1.1 jdolecek #if 0
510 1.1 jdolecek if (wd->drvp->state > RECAL)
511 1.1 jdolecek wd->drvp->drive_flags |= DRIVE_RESET;
512 1.1 jdolecek #endif
513 1.10 jdolecek errstring = readdisklabel(EDLABELDEV(dev),
514 1.10 jdolecek edmcastrategy, lp, ed->sc_dk.dk_cpulabel);
515 1.1 jdolecek }
516 1.1 jdolecek if (errstring) {
517 1.10 jdolecek printf("%s: %s\n", ed->sc_dev.dv_xname, errstring);
518 1.1 jdolecek return;
519 1.1 jdolecek }
520 1.1 jdolecek }
521 1.1 jdolecek
522 1.1 jdolecek int
523 1.1 jdolecek edmcaioctl(dev, xfer, addr, flag, p)
524 1.1 jdolecek dev_t dev;
525 1.1 jdolecek u_long xfer;
526 1.1 jdolecek caddr_t addr;
527 1.1 jdolecek int flag;
528 1.1 jdolecek struct proc *p;
529 1.1 jdolecek {
530 1.10 jdolecek struct ed_softc *ed = device_lookup(&ed_cd, DISKUNIT(dev));
531 1.1 jdolecek int error;
532 1.1 jdolecek
533 1.3 jdolecek WDCDEBUG_PRINT(("edioctl\n"), DEBUG_FUNCS);
534 1.1 jdolecek
535 1.10 jdolecek if ((ed->sc_flags & WDF_LOADED) == 0)
536 1.1 jdolecek return EIO;
537 1.1 jdolecek
538 1.1 jdolecek switch (xfer) {
539 1.1 jdolecek case DIOCGDINFO:
540 1.10 jdolecek *(struct disklabel *)addr = *(ed->sc_dk.dk_label);
541 1.1 jdolecek return 0;
542 1.1 jdolecek
543 1.1 jdolecek case DIOCGPART:
544 1.10 jdolecek ((struct partinfo *)addr)->disklab = ed->sc_dk.dk_label;
545 1.1 jdolecek ((struct partinfo *)addr)->part =
546 1.10 jdolecek &ed->sc_dk.dk_label->d_partitions[DISKPART(dev)];
547 1.1 jdolecek return 0;
548 1.8 sommerfe
549 1.1 jdolecek case DIOCWDINFO:
550 1.1 jdolecek case DIOCSDINFO:
551 1.1 jdolecek {
552 1.1 jdolecek struct disklabel *lp;
553 1.1 jdolecek
554 1.1 jdolecek lp = (struct disklabel *)addr;
555 1.1 jdolecek
556 1.1 jdolecek if ((flag & FWRITE) == 0)
557 1.1 jdolecek return EBADF;
558 1.1 jdolecek
559 1.10 jdolecek if ((error = ed_lock(ed)) != 0)
560 1.1 jdolecek return error;
561 1.10 jdolecek ed->sc_flags |= WDF_LABELLING;
562 1.1 jdolecek
563 1.10 jdolecek error = setdisklabel(ed->sc_dk.dk_label,
564 1.1 jdolecek lp, /*wd->sc_dk.dk_openmask : */0,
565 1.10 jdolecek ed->sc_dk.dk_cpulabel);
566 1.1 jdolecek if (error == 0) {
567 1.1 jdolecek #if 0
568 1.1 jdolecek if (wd->drvp->state > RECAL)
569 1.1 jdolecek wd->drvp->drive_flags |= DRIVE_RESET;
570 1.1 jdolecek #endif
571 1.10 jdolecek if (xfer == DIOCWDINFO)
572 1.1 jdolecek error = writedisklabel(EDLABELDEV(dev),
573 1.10 jdolecek edmcastrategy, ed->sc_dk.dk_label,
574 1.10 jdolecek ed->sc_dk.dk_cpulabel);
575 1.1 jdolecek }
576 1.1 jdolecek
577 1.10 jdolecek ed->sc_flags &= ~WDF_LABELLING;
578 1.10 jdolecek ed_unlock(ed);
579 1.10 jdolecek return (error);
580 1.1 jdolecek }
581 1.1 jdolecek
582 1.1 jdolecek case DIOCKLABEL:
583 1.1 jdolecek if (*(int *)addr)
584 1.10 jdolecek ed->sc_flags |= WDF_KLABEL;
585 1.1 jdolecek else
586 1.10 jdolecek ed->sc_flags &= ~WDF_KLABEL;
587 1.1 jdolecek return 0;
588 1.8 sommerfe
589 1.1 jdolecek case DIOCWLABEL:
590 1.1 jdolecek if ((flag & FWRITE) == 0)
591 1.1 jdolecek return EBADF;
592 1.1 jdolecek if (*(int *)addr)
593 1.10 jdolecek ed->sc_flags |= WDF_WLABEL;
594 1.1 jdolecek else
595 1.10 jdolecek ed->sc_flags &= ~WDF_WLABEL;
596 1.1 jdolecek return 0;
597 1.1 jdolecek
598 1.1 jdolecek case DIOCGDEFLABEL:
599 1.10 jdolecek edgetdefaultlabel(ed, (struct disklabel *)addr);
600 1.1 jdolecek return 0;
601 1.1 jdolecek
602 1.10 jdolecek #if 0
603 1.1 jdolecek case DIOCWFORMAT:
604 1.1 jdolecek if ((flag & FWRITE) == 0)
605 1.1 jdolecek return EBADF;
606 1.1 jdolecek {
607 1.1 jdolecek register struct format_op *fop;
608 1.1 jdolecek struct iovec aiov;
609 1.1 jdolecek struct uio auio;
610 1.8 sommerfe
611 1.1 jdolecek fop = (struct format_op *)addr;
612 1.1 jdolecek aiov.iov_base = fop->df_buf;
613 1.1 jdolecek aiov.iov_len = fop->df_count;
614 1.1 jdolecek auio.uio_iov = &aiov;
615 1.1 jdolecek auio.uio_iovcnt = 1;
616 1.1 jdolecek auio.uio_resid = fop->df_count;
617 1.1 jdolecek auio.uio_segflg = 0;
618 1.1 jdolecek auio.uio_offset =
619 1.1 jdolecek fop->df_startblk * wd->sc_dk.dk_label->d_secsize;
620 1.1 jdolecek auio.uio_procp = p;
621 1.1 jdolecek error = physio(wdformat, NULL, dev, B_WRITE, minphys,
622 1.1 jdolecek &auio);
623 1.1 jdolecek fop->df_count -= auio.uio_resid;
624 1.1 jdolecek fop->df_reg[0] = wdc->sc_status;
625 1.1 jdolecek fop->df_reg[1] = wdc->sc_error;
626 1.1 jdolecek return error;
627 1.1 jdolecek }
628 1.1 jdolecek #endif
629 1.1 jdolecek
630 1.1 jdolecek default:
631 1.1 jdolecek return ENOTTY;
632 1.1 jdolecek }
633 1.1 jdolecek
634 1.1 jdolecek #ifdef DIAGNOSTIC
635 1.3 jdolecek panic("edioctl: impossible");
636 1.1 jdolecek #endif
637 1.1 jdolecek }
638 1.1 jdolecek
639 1.1 jdolecek int
640 1.1 jdolecek edmcasize(dev)
641 1.1 jdolecek dev_t dev;
642 1.1 jdolecek {
643 1.1 jdolecek struct ed_softc *wd;
644 1.1 jdolecek int part, omask;
645 1.1 jdolecek int size;
646 1.1 jdolecek
647 1.1 jdolecek WDCDEBUG_PRINT(("edsize\n"), DEBUG_FUNCS);
648 1.1 jdolecek
649 1.1 jdolecek wd = device_lookup(&ed_cd, DISKUNIT(dev));
650 1.1 jdolecek if (wd == NULL)
651 1.1 jdolecek return (-1);
652 1.1 jdolecek
653 1.1 jdolecek part = DISKPART(dev);
654 1.1 jdolecek omask = wd->sc_dk.dk_openmask & (1 << part);
655 1.1 jdolecek
656 1.1 jdolecek if (omask == 0 && edmcaopen(dev, 0, S_IFBLK, NULL) != 0)
657 1.1 jdolecek return (-1);
658 1.1 jdolecek if (wd->sc_dk.dk_label->d_partitions[part].p_fstype != FS_SWAP)
659 1.1 jdolecek size = -1;
660 1.1 jdolecek else
661 1.1 jdolecek size = wd->sc_dk.dk_label->d_partitions[part].p_size *
662 1.1 jdolecek (wd->sc_dk.dk_label->d_secsize / DEV_BSIZE);
663 1.1 jdolecek if (omask == 0 && edmcaclose(dev, 0, S_IFBLK, NULL) != 0)
664 1.1 jdolecek return (-1);
665 1.1 jdolecek return (size);
666 1.1 jdolecek }
667 1.1 jdolecek
668 1.1 jdolecek /* #define WD_DUMP_NOT_TRUSTED if you just want to watch */
669 1.6 jdolecek static int eddoingadump = 0;
670 1.6 jdolecek static int eddumprecalibrated = 0;
671 1.6 jdolecek static int eddumpmulti = 1;
672 1.1 jdolecek
673 1.1 jdolecek /*
674 1.1 jdolecek * Dump core after a system crash.
675 1.1 jdolecek */
676 1.1 jdolecek int
677 1.1 jdolecek edmcadump(dev, blkno, va, size)
678 1.1 jdolecek dev_t dev;
679 1.1 jdolecek daddr_t blkno;
680 1.1 jdolecek caddr_t va;
681 1.1 jdolecek size_t size;
682 1.1 jdolecek {
683 1.6 jdolecek struct ed_softc *ed; /* disk unit to do the I/O */
684 1.1 jdolecek struct disklabel *lp; /* disk's disklabel */
685 1.7 jdolecek int part;
686 1.1 jdolecek int nblks; /* total number of sectors left to write */
687 1.10 jdolecek int error;
688 1.1 jdolecek
689 1.1 jdolecek /* Check if recursive dump; if so, punt. */
690 1.6 jdolecek if (eddoingadump)
691 1.1 jdolecek return EFAULT;
692 1.6 jdolecek eddoingadump = 1;
693 1.1 jdolecek
694 1.6 jdolecek ed = device_lookup(&ed_cd, DISKUNIT(dev));
695 1.6 jdolecek if (ed == NULL)
696 1.1 jdolecek return (ENXIO);
697 1.1 jdolecek
698 1.1 jdolecek part = DISKPART(dev);
699 1.1 jdolecek
700 1.1 jdolecek /* Make sure it was initialized. */
701 1.6 jdolecek if ((ed->sc_flags & EDF_INIT) == 0)
702 1.1 jdolecek return ENXIO;
703 1.1 jdolecek
704 1.1 jdolecek /* Convert to disk sectors. Request must be a multiple of size. */
705 1.6 jdolecek lp = ed->sc_dk.dk_label;
706 1.1 jdolecek if ((size % lp->d_secsize) != 0)
707 1.1 jdolecek return EFAULT;
708 1.1 jdolecek nblks = size / lp->d_secsize;
709 1.1 jdolecek blkno = blkno / (lp->d_secsize / DEV_BSIZE);
710 1.1 jdolecek
711 1.1 jdolecek /* Check transfer bounds against partition size. */
712 1.1 jdolecek if ((blkno < 0) || ((blkno + nblks) > lp->d_partitions[part].p_size))
713 1.8 sommerfe return EINVAL;
714 1.1 jdolecek
715 1.1 jdolecek /* Offset block number to start of partition. */
716 1.1 jdolecek blkno += lp->d_partitions[part].p_offset;
717 1.1 jdolecek
718 1.1 jdolecek /* Recalibrate, if first dump transfer. */
719 1.6 jdolecek if (eddumprecalibrated == 0) {
720 1.6 jdolecek eddumprecalibrated = 1;
721 1.6 jdolecek eddumpmulti = 8;
722 1.1 jdolecek #if 0
723 1.1 jdolecek wd->drvp->state = RESET;
724 1.1 jdolecek #endif
725 1.1 jdolecek }
726 1.8 sommerfe
727 1.1 jdolecek while (nblks > 0) {
728 1.10 jdolecek error = edc_bio(ed->edc_softc, ed, va, blkno,
729 1.10 jdolecek min(nblks, eddumpmulti) * lp->d_secsize, 0, 1);
730 1.10 jdolecek if (error)
731 1.10 jdolecek return (error);
732 1.1 jdolecek
733 1.1 jdolecek /* update block count */
734 1.6 jdolecek nblks -= min(nblks, eddumpmulti);
735 1.6 jdolecek blkno += min(nblks, eddumpmulti);
736 1.6 jdolecek va += min(nblks, eddumpmulti) * lp->d_secsize;
737 1.1 jdolecek }
738 1.1 jdolecek
739 1.6 jdolecek eddoingadump = 0;
740 1.6 jdolecek return (0);
741 1.1 jdolecek }
742 1.1 jdolecek
743 1.1 jdolecek static int
744 1.10 jdolecek ed_get_params(ed, drv_flags)
745 1.1 jdolecek struct ed_softc *ed;
746 1.10 jdolecek int *drv_flags;
747 1.1 jdolecek {
748 1.1 jdolecek u_int16_t cmd_args[2];
749 1.1 jdolecek
750 1.1 jdolecek /*
751 1.1 jdolecek * Get Device Configuration (09).
752 1.1 jdolecek */
753 1.5 jdolecek cmd_args[0] = 14; /* Options: 00s110, s: 0=Physical 1=Pseudo */
754 1.1 jdolecek cmd_args[1] = 0;
755 1.6 jdolecek if (edc_run_cmd(ed->edc_softc, CMD_GET_DEV_CONF, ed->sc_devno,
756 1.10 jdolecek cmd_args, 2, 1))
757 1.1 jdolecek return (1);
758 1.1 jdolecek
759 1.10 jdolecek ed->spares = ed->sense_data[1] >> 8;
760 1.10 jdolecek if (drv_flags)
761 1.10 jdolecek *drv_flags = ed->sense_data[1] & 0x1f;
762 1.10 jdolecek ed->rba = ed->sense_data[2] | (ed->sense_data[3] << 16);
763 1.1 jdolecek /* Instead of using:
764 1.10 jdolecek ed->cyl = ed->sense_data[4];
765 1.10 jdolecek ed->heads = ed->sense_data[5] & 0xff;
766 1.10 jdolecek ed->sectors = ed->sense_data[5] >> 8;
767 1.1 jdolecek * we fabricate the numbers from RBA count, so that
768 1.1 jdolecek * number of sectors is 32 and heads 64. This seems
769 1.1 jdolecek * to be necessary for integrated ESDI controller.
770 1.1 jdolecek */
771 1.1 jdolecek ed->sectors = 32;
772 1.1 jdolecek ed->heads = 64;
773 1.1 jdolecek ed->cyl = ed->rba / (ed->heads * ed->sectors);
774 1.1 jdolecek ed->sc_capacity = ed->rba;
775 1.1 jdolecek
776 1.1 jdolecek return (0);
777 1.1 jdolecek }
778