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