wdc.c revision 1.238 1 1.238 itohy /* $NetBSD: wdc.c,v 1.238 2006/09/30 15:56:17 itohy Exp $ */
2 1.31 bouyer
3 1.31 bouyer /*
4 1.137 bouyer * Copyright (c) 1998, 2001, 2003 Manuel Bouyer. All rights reserved.
5 1.31 bouyer *
6 1.31 bouyer * Redistribution and use in source and binary forms, with or without
7 1.31 bouyer * modification, are permitted provided that the following conditions
8 1.31 bouyer * are met:
9 1.31 bouyer * 1. Redistributions of source code must retain the above copyright
10 1.31 bouyer * notice, this list of conditions and the following disclaimer.
11 1.31 bouyer * 2. Redistributions in binary form must reproduce the above copyright
12 1.31 bouyer * notice, this list of conditions and the following disclaimer in the
13 1.31 bouyer * documentation and/or other materials provided with the distribution.
14 1.31 bouyer * 3. All advertising materials mentioning features or use of this software
15 1.31 bouyer * must display the following acknowledgement:
16 1.31 bouyer * This product includes software developed by Manuel Bouyer.
17 1.31 bouyer * 4. The name of the author may not be used to endorse or promote products
18 1.31 bouyer * derived from this software without specific prior written permission.
19 1.31 bouyer *
20 1.31 bouyer * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
21 1.31 bouyer * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22 1.31 bouyer * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23 1.31 bouyer * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
24 1.31 bouyer * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 1.31 bouyer * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
26 1.31 bouyer * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
27 1.31 bouyer * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
28 1.31 bouyer * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
29 1.31 bouyer * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30 1.31 bouyer */
31 1.2 bouyer
32 1.27 mycroft /*-
33 1.220 mycroft * Copyright (c) 1998, 2003, 2004 The NetBSD Foundation, Inc.
34 1.27 mycroft * All rights reserved.
35 1.2 bouyer *
36 1.27 mycroft * This code is derived from software contributed to The NetBSD Foundation
37 1.27 mycroft * by Charles M. Hannum, by Onno van der Linden and by Manuel Bouyer.
38 1.12 cgd *
39 1.2 bouyer * Redistribution and use in source and binary forms, with or without
40 1.2 bouyer * modification, are permitted provided that the following conditions
41 1.2 bouyer * are met:
42 1.2 bouyer * 1. Redistributions of source code must retain the above copyright
43 1.2 bouyer * notice, this list of conditions and the following disclaimer.
44 1.2 bouyer * 2. Redistributions in binary form must reproduce the above copyright
45 1.2 bouyer * notice, this list of conditions and the following disclaimer in the
46 1.2 bouyer * documentation and/or other materials provided with the distribution.
47 1.2 bouyer * 3. All advertising materials mentioning features or use of this software
48 1.2 bouyer * must display the following acknowledgement:
49 1.27 mycroft * This product includes software developed by the NetBSD
50 1.27 mycroft * Foundation, Inc. and its contributors.
51 1.27 mycroft * 4. Neither the name of The NetBSD Foundation nor the names of its
52 1.27 mycroft * contributors may be used to endorse or promote products derived
53 1.27 mycroft * from this software without specific prior written permission.
54 1.2 bouyer *
55 1.27 mycroft * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
56 1.27 mycroft * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
57 1.27 mycroft * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
58 1.27 mycroft * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
59 1.27 mycroft * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
60 1.27 mycroft * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
61 1.27 mycroft * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
62 1.27 mycroft * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
63 1.27 mycroft * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
64 1.27 mycroft * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
65 1.27 mycroft * POSSIBILITY OF SUCH DAMAGE.
66 1.2 bouyer */
67 1.2 bouyer
68 1.12 cgd /*
69 1.12 cgd * CODE UNTESTED IN THE CURRENT REVISION:
70 1.12 cgd */
71 1.100 lukem
72 1.100 lukem #include <sys/cdefs.h>
73 1.238 itohy __KERNEL_RCSID(0, "$NetBSD: wdc.c,v 1.238 2006/09/30 15:56:17 itohy Exp $");
74 1.12 cgd
75 1.204 thorpej #ifndef ATADEBUG
76 1.204 thorpej #define ATADEBUG
77 1.204 thorpej #endif /* ATADEBUG */
78 1.31 bouyer
79 1.2 bouyer #include <sys/param.h>
80 1.2 bouyer #include <sys/systm.h>
81 1.2 bouyer #include <sys/kernel.h>
82 1.2 bouyer #include <sys/conf.h>
83 1.2 bouyer #include <sys/buf.h>
84 1.31 bouyer #include <sys/device.h>
85 1.2 bouyer #include <sys/malloc.h>
86 1.2 bouyer #include <sys/syslog.h>
87 1.2 bouyer #include <sys/proc.h>
88 1.2 bouyer
89 1.2 bouyer #include <machine/intr.h>
90 1.2 bouyer #include <machine/bus.h>
91 1.2 bouyer
92 1.17 sakamoto #ifndef __BUS_SPACE_HAS_STREAM_METHODS
93 1.31 bouyer #define bus_space_write_multi_stream_2 bus_space_write_multi_2
94 1.31 bouyer #define bus_space_write_multi_stream_4 bus_space_write_multi_4
95 1.31 bouyer #define bus_space_read_multi_stream_2 bus_space_read_multi_2
96 1.31 bouyer #define bus_space_read_multi_stream_4 bus_space_read_multi_4
97 1.17 sakamoto #endif /* __BUS_SPACE_HAS_STREAM_METHODS */
98 1.16 sakamoto
99 1.103 bouyer #include <dev/ata/atavar.h>
100 1.31 bouyer #include <dev/ata/atareg.h>
101 1.12 cgd #include <dev/ic/wdcreg.h>
102 1.12 cgd #include <dev/ic/wdcvar.h>
103 1.31 bouyer
104 1.137 bouyer #include "locators.h"
105 1.137 bouyer
106 1.2 bouyer #include "atapibus.h"
107 1.106 bouyer #include "wd.h"
108 1.2 bouyer
109 1.31 bouyer #define WDCDELAY 100 /* 100 microseconds */
110 1.31 bouyer #define WDCNDELAY_RST (WDC_RESET_WAIT * 1000 / WDCDELAY)
111 1.2 bouyer #if 0
112 1.31 bouyer /* If you enable this, it will report any delays more than WDCDELAY * N long. */
113 1.2 bouyer #define WDCNDELAY_DEBUG 50
114 1.2 bouyer #endif
115 1.2 bouyer
116 1.137 bouyer /* When polling wait that much and then tsleep for 1/hz seconds */
117 1.219 perry #define WDCDELAY_POLL 1 /* ms */
118 1.137 bouyer
119 1.137 bouyer /* timeout for the control commands */
120 1.137 bouyer #define WDC_CTRL_DELAY 10000 /* 10s, for the recall command */
121 1.137 bouyer
122 1.224 bouyer /*
123 1.224 bouyer * timeout when waiting for BSY to deassert when probing.
124 1.224 bouyer * set to 5s. From the standards this could be up to 31, but we can't
125 1.224 bouyer * wait that much at boot time, and 5s seems to be enouth.
126 1.224 bouyer */
127 1.224 bouyer #define WDC_PROBE_WAIT 5
128 1.224 bouyer
129 1.224 bouyer
130 1.106 bouyer #if NWD > 0
131 1.103 bouyer extern const struct ata_bustype wdc_ata_bustype; /* in ata_wdc.c */
132 1.106 bouyer #else
133 1.106 bouyer /* A fake one, the autoconfig will print "wd at foo ... not configured */
134 1.106 bouyer const struct ata_bustype wdc_ata_bustype = {
135 1.106 bouyer SCSIPI_BUSTYPE_ATA,
136 1.214 enami NULL, /* wdc_ata_bio */
137 1.214 enami NULL, /* wdc_reset_drive */
138 1.214 enami wdc_reset_channel,
139 1.214 enami wdc_exec_command,
140 1.214 enami NULL, /* ata_get_params */
141 1.214 enami NULL, /* wdc_ata_addref */
142 1.214 enami NULL, /* wdc_ata_delref */
143 1.214 enami NULL /* ata_kill_pending */
144 1.106 bouyer };
145 1.106 bouyer #endif
146 1.102 bouyer
147 1.213 thorpej /* Flags to wdcreset(). */
148 1.213 thorpej #define RESET_POLL 1
149 1.213 thorpej #define RESET_SLEEP 0 /* wdcreset() will use tsleep() */
150 1.213 thorpej
151 1.213 thorpej static int wdcprobe1(struct ata_channel *, int);
152 1.213 thorpej static int wdcreset(struct ata_channel *, int);
153 1.222 christos static void __wdcerror(struct ata_channel *, const char *);
154 1.205 thorpej static int __wdcwait_reset(struct ata_channel *, int, int);
155 1.205 thorpej static void __wdccommand_done(struct ata_channel *, struct ata_xfer *);
156 1.205 thorpej static void __wdccommand_done_end(struct ata_channel *, struct ata_xfer *);
157 1.205 thorpej static void __wdccommand_kill_xfer(struct ata_channel *,
158 1.182 bouyer struct ata_xfer *, int);
159 1.205 thorpej static void __wdccommand_start(struct ata_channel *, struct ata_xfer *);
160 1.205 thorpej static int __wdccommand_intr(struct ata_channel *, struct ata_xfer *, int);
161 1.205 thorpej static int __wdcwait(struct ata_channel *, int, int, int);
162 1.31 bouyer
163 1.213 thorpej static void wdc_datain_pio(struct ata_channel *, int, void *, size_t);
164 1.213 thorpej static void wdc_dataout_pio(struct ata_channel *, int, void *, size_t);
165 1.213 thorpej
166 1.31 bouyer #define DEBUG_INTR 0x01
167 1.31 bouyer #define DEBUG_XFERS 0x02
168 1.31 bouyer #define DEBUG_STATUS 0x04
169 1.31 bouyer #define DEBUG_FUNCS 0x08
170 1.31 bouyer #define DEBUG_PROBE 0x10
171 1.74 enami #define DEBUG_DETACH 0x20
172 1.87 bouyer #define DEBUG_DELAY 0x40
173 1.204 thorpej #ifdef ATADEBUG
174 1.204 thorpej extern int atadebug_mask; /* init'ed in ata.c */
175 1.31 bouyer int wdc_nxfer = 0;
176 1.204 thorpej #define ATADEBUG_PRINT(args, level) if (atadebug_mask & (level)) printf args
177 1.2 bouyer #else
178 1.204 thorpej #define ATADEBUG_PRINT(args, level)
179 1.2 bouyer #endif
180 1.2 bouyer
181 1.162 thorpej /*
182 1.176 thorpej * Initialize the "shadow register" handles for a standard wdc controller.
183 1.176 thorpej */
184 1.176 thorpej void
185 1.205 thorpej wdc_init_shadow_regs(struct ata_channel *chp)
186 1.176 thorpej {
187 1.206 thorpej struct wdc_regs *wdr = CHAN_TO_WDC_REGS(chp);
188 1.176 thorpej
189 1.205 thorpej wdr->cmd_iohs[wd_status] = wdr->cmd_iohs[wd_command];
190 1.205 thorpej wdr->cmd_iohs[wd_features] = wdr->cmd_iohs[wd_error];
191 1.205 thorpej }
192 1.205 thorpej
193 1.205 thorpej /*
194 1.205 thorpej * Allocate a wdc_regs array, based on the number of channels.
195 1.205 thorpej */
196 1.205 thorpej void
197 1.205 thorpej wdc_allocate_regs(struct wdc_softc *wdc)
198 1.205 thorpej {
199 1.205 thorpej
200 1.207 thorpej wdc->regs = malloc(wdc->sc_atac.atac_nchannels *
201 1.207 thorpej sizeof(struct wdc_regs), M_DEVBUF, M_WAITOK);
202 1.176 thorpej }
203 1.176 thorpej
204 1.162 thorpej /* Test to see controller with at last one attached drive is there.
205 1.162 thorpej * Returns a bit for each possible drive found (0x01 for drive 0,
206 1.162 thorpej * 0x02 for drive 1).
207 1.162 thorpej * Logic:
208 1.162 thorpej * - If a status register is at 0xff, assume there is no drive here
209 1.162 thorpej * (ISA has pull-up resistors). Similarly if the status register has
210 1.162 thorpej * the value we last wrote to the bus (for IDE interfaces without pullups).
211 1.162 thorpej * If no drive at all -> return.
212 1.162 thorpej * - reset the controller, wait for it to complete (may take up to 31s !).
213 1.162 thorpej * If timeout -> return.
214 1.162 thorpej * - test ATA/ATAPI signatures. If at last one drive found -> return.
215 1.162 thorpej * - try an ATA command on the master.
216 1.162 thorpej */
217 1.137 bouyer
218 1.164 thorpej static void
219 1.205 thorpej wdc_drvprobe(struct ata_channel *chp)
220 1.137 bouyer {
221 1.137 bouyer struct ataparams params;
222 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
223 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
224 1.205 thorpej struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
225 1.145 christos u_int8_t st0 = 0, st1 = 0;
226 1.232 bouyer int i, j, error, s;
227 1.137 bouyer
228 1.164 thorpej if (wdcprobe1(chp, 0) == 0) {
229 1.164 thorpej /* No drives, abort the attach here. */
230 1.164 thorpej return;
231 1.161 thorpej }
232 1.137 bouyer
233 1.137 bouyer /* for ATA/OLD drives, wait for DRDY, 3s timeout */
234 1.137 bouyer for (i = 0; i < mstohz(3000); i++) {
235 1.174 bouyer if (chp->ch_drive[0].drive_flags & (DRIVE_ATA|DRIVE_OLD)) {
236 1.207 thorpej if (wdc->select)
237 1.174 bouyer wdc->select(chp,0);
238 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh],
239 1.174 bouyer 0, WDSD_IBM);
240 1.174 bouyer delay(10); /* 400ns delay */
241 1.205 thorpej st0 = bus_space_read_1(wdr->cmd_iot,
242 1.205 thorpej wdr->cmd_iohs[wd_status], 0);
243 1.174 bouyer }
244 1.219 perry
245 1.174 bouyer if (chp->ch_drive[1].drive_flags & (DRIVE_ATA|DRIVE_OLD)) {
246 1.207 thorpej if (wdc->select)
247 1.174 bouyer wdc->select(chp,1);
248 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh],
249 1.174 bouyer 0, WDSD_IBM | 0x10);
250 1.174 bouyer delay(10); /* 400ns delay */
251 1.205 thorpej st1 = bus_space_read_1(wdr->cmd_iot,
252 1.205 thorpej wdr->cmd_iohs[wd_status], 0);
253 1.174 bouyer }
254 1.219 perry
255 1.137 bouyer if (((chp->ch_drive[0].drive_flags & (DRIVE_ATA|DRIVE_OLD))
256 1.137 bouyer == 0 ||
257 1.137 bouyer (st0 & WDCS_DRDY)) &&
258 1.137 bouyer ((chp->ch_drive[1].drive_flags & (DRIVE_ATA|DRIVE_OLD))
259 1.137 bouyer == 0 ||
260 1.137 bouyer (st1 & WDCS_DRDY)))
261 1.137 bouyer break;
262 1.164 thorpej tsleep(¶ms, PRIBIO, "atadrdy", 1);
263 1.137 bouyer }
264 1.212 thorpej s = splbio();
265 1.137 bouyer if ((st0 & WDCS_DRDY) == 0)
266 1.137 bouyer chp->ch_drive[0].drive_flags &= ~(DRIVE_ATA|DRIVE_OLD);
267 1.137 bouyer if ((st1 & WDCS_DRDY) == 0)
268 1.137 bouyer chp->ch_drive[1].drive_flags &= ~(DRIVE_ATA|DRIVE_OLD);
269 1.212 thorpej splx(s);
270 1.137 bouyer
271 1.204 thorpej ATADEBUG_PRINT(("%s:%d: wait DRDY st0 0x%x st1 0x%x\n",
272 1.207 thorpej atac->atac_dev.dv_xname,
273 1.169 thorpej chp->ch_channel, st0, st1), DEBUG_PROBE);
274 1.137 bouyer
275 1.137 bouyer /* Wait a bit, some devices are weird just after a reset. */
276 1.137 bouyer delay(5000);
277 1.137 bouyer
278 1.232 bouyer for (i = 0; i < chp->ch_ndrive; i++) {
279 1.171 thorpej /* XXX This should be done by other code. */
280 1.137 bouyer chp->ch_drive[i].chnl_softc = chp;
281 1.137 bouyer chp->ch_drive[i].drive = i;
282 1.171 thorpej
283 1.238 itohy #if NATA_DMA
284 1.137 bouyer /*
285 1.137 bouyer * Init error counter so that an error withing the first xfers
286 1.137 bouyer * will trigger a downgrade
287 1.137 bouyer */
288 1.137 bouyer chp->ch_drive[i].n_dmaerrs = NERRS_MAX-1;
289 1.238 itohy #endif
290 1.137 bouyer
291 1.137 bouyer /* If controller can't do 16bit flag the drives as 32bit */
292 1.207 thorpej if ((atac->atac_cap &
293 1.212 thorpej (ATAC_CAP_DATA16 | ATAC_CAP_DATA32)) == ATAC_CAP_DATA32) {
294 1.212 thorpej s = splbio();
295 1.137 bouyer chp->ch_drive[i].drive_flags |= DRIVE_CAP32;
296 1.212 thorpej splx(s);
297 1.212 thorpej }
298 1.137 bouyer if ((chp->ch_drive[i].drive_flags & DRIVE) == 0)
299 1.137 bouyer continue;
300 1.137 bouyer
301 1.144 briggs /* Shortcut in case we've been shutdown */
302 1.205 thorpej if (chp->ch_flags & ATACH_SHUTDOWN)
303 1.164 thorpej return;
304 1.144 briggs
305 1.216 bouyer /*
306 1.216 bouyer * Issue an identify, to try to detect ghosts.
307 1.216 bouyer * Note that we can't use interrupts here, because if there
308 1.216 bouyer * is no devices, we will get a command aborted without
309 1.216 bouyer * interrupts.
310 1.216 bouyer */
311 1.216 bouyer error = ata_get_params(&chp->ch_drive[i],
312 1.216 bouyer AT_WAIT | AT_POLL, ¶ms);
313 1.137 bouyer if (error != CMD_OK) {
314 1.164 thorpej tsleep(¶ms, PRIBIO, "atacnf", mstohz(1000));
315 1.144 briggs
316 1.144 briggs /* Shortcut in case we've been shutdown */
317 1.205 thorpej if (chp->ch_flags & ATACH_SHUTDOWN)
318 1.164 thorpej return;
319 1.144 briggs
320 1.137 bouyer error = ata_get_params(&chp->ch_drive[i],
321 1.216 bouyer AT_WAIT | AT_POLL, ¶ms);
322 1.137 bouyer }
323 1.137 bouyer if (error == CMD_OK) {
324 1.152 wiz /* If IDENTIFY succeeded, this is not an OLD ctrl */
325 1.212 thorpej s = splbio();
326 1.232 bouyer for (j = 0; j < chp->ch_ndrive; j++)
327 1.232 bouyer chp->ch_drive[j].drive_flags &= ~DRIVE_OLD;
328 1.212 thorpej splx(s);
329 1.137 bouyer } else {
330 1.212 thorpej s = splbio();
331 1.155 bouyer chp->ch_drive[i].drive_flags &=
332 1.137 bouyer ~(DRIVE_ATA | DRIVE_ATAPI);
333 1.212 thorpej splx(s);
334 1.204 thorpej ATADEBUG_PRINT(("%s:%d:%d: IDENTIFY failed (%d)\n",
335 1.207 thorpej atac->atac_dev.dv_xname,
336 1.169 thorpej chp->ch_channel, i, error), DEBUG_PROBE);
337 1.137 bouyer if ((chp->ch_drive[i].drive_flags & DRIVE_OLD) == 0)
338 1.137 bouyer continue;
339 1.137 bouyer /*
340 1.137 bouyer * Pre-ATA drive ?
341 1.137 bouyer * Test registers writability (Error register not
342 1.137 bouyer * writable, but cyllo is), then try an ATA command.
343 1.137 bouyer */
344 1.203 thorpej if (wdc->select)
345 1.169 thorpej wdc->select(chp,i);
346 1.205 thorpej bus_space_write_1(wdr->cmd_iot,
347 1.205 thorpej wdr->cmd_iohs[wd_sdh], 0, WDSD_IBM | (i << 4));
348 1.137 bouyer delay(10); /* 400ns delay */
349 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_error],
350 1.157 fvdl 0, 0x58);
351 1.205 thorpej bus_space_write_1(wdr->cmd_iot,
352 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0, 0xa5);
353 1.205 thorpej if (bus_space_read_1(wdr->cmd_iot,
354 1.205 thorpej wdr->cmd_iohs[wd_error], 0) == 0x58 ||
355 1.205 thorpej bus_space_read_1(wdr->cmd_iot,
356 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0) != 0xa5) {
357 1.204 thorpej ATADEBUG_PRINT(("%s:%d:%d: register "
358 1.137 bouyer "writability failed\n",
359 1.207 thorpej atac->atac_dev.dv_xname,
360 1.169 thorpej chp->ch_channel, i), DEBUG_PROBE);
361 1.212 thorpej s = splbio();
362 1.137 bouyer chp->ch_drive[i].drive_flags &= ~DRIVE_OLD;
363 1.212 thorpej splx(s);
364 1.155 bouyer continue;
365 1.137 bouyer }
366 1.166 thorpej if (wdc_wait_for_ready(chp, 10000, 0) == WDCWAIT_TOUT) {
367 1.204 thorpej ATADEBUG_PRINT(("%s:%d:%d: not ready\n",
368 1.207 thorpej atac->atac_dev.dv_xname,
369 1.169 thorpej chp->ch_channel, i), DEBUG_PROBE);
370 1.212 thorpej s = splbio();
371 1.137 bouyer chp->ch_drive[i].drive_flags &= ~DRIVE_OLD;
372 1.212 thorpej splx(s);
373 1.137 bouyer continue;
374 1.137 bouyer }
375 1.205 thorpej bus_space_write_1(wdr->cmd_iot,
376 1.205 thorpej wdr->cmd_iohs[wd_command], 0, WDCC_RECAL);
377 1.137 bouyer delay(10); /* 400ns delay */
378 1.166 thorpej if (wdc_wait_for_ready(chp, 10000, 0) == WDCWAIT_TOUT) {
379 1.204 thorpej ATADEBUG_PRINT(("%s:%d:%d: WDCC_RECAL failed\n",
380 1.207 thorpej atac->atac_dev.dv_xname,
381 1.169 thorpej chp->ch_channel, i), DEBUG_PROBE);
382 1.212 thorpej s = splbio();
383 1.137 bouyer chp->ch_drive[i].drive_flags &= ~DRIVE_OLD;
384 1.212 thorpej splx(s);
385 1.155 bouyer } else {
386 1.212 thorpej s = splbio();
387 1.232 bouyer for (j = 0; j < chp->ch_ndrive; j++)
388 1.232 bouyer chp->ch_drive[j].drive_flags &=
389 1.232 bouyer ~(DRIVE_ATA | DRIVE_ATAPI);
390 1.212 thorpej splx(s);
391 1.137 bouyer }
392 1.137 bouyer }
393 1.137 bouyer }
394 1.164 thorpej }
395 1.164 thorpej
396 1.2 bouyer int
397 1.205 thorpej wdcprobe(struct ata_channel *chp)
398 1.12 cgd {
399 1.228 bouyer struct wdc_softc *wdc = CHAN_TO_WDC(chp);
400 1.227 bouyer /* default reset method */
401 1.227 bouyer if (wdc->reset == NULL)
402 1.227 bouyer wdc->reset = wdc_do_reset;
403 1.163 thorpej
404 1.163 thorpej return (wdcprobe1(chp, 1));
405 1.137 bouyer }
406 1.137 bouyer
407 1.167 thorpej static int
408 1.205 thorpej wdcprobe1(struct ata_channel *chp, int poll)
409 1.137 bouyer {
410 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
411 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
412 1.205 thorpej struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
413 1.224 bouyer u_int8_t st0 = 0, st1 = 0, sc, sn, cl, ch;
414 1.31 bouyer u_int8_t ret_value = 0x03;
415 1.31 bouyer u_int8_t drive;
416 1.156 bouyer int s;
417 1.224 bouyer int wdc_probe_count =
418 1.224 bouyer poll ? (WDC_PROBE_WAIT / WDCDELAY) : (WDC_PROBE_WAIT * hz);
419 1.31 bouyer
420 1.31 bouyer /*
421 1.31 bouyer * Sanity check to see if the wdc channel responds at all.
422 1.31 bouyer */
423 1.31 bouyer
424 1.174 bouyer s = splbio();
425 1.207 thorpej if ((wdc->cap & WDC_CAPABILITY_NO_EXTRA_RESETS) == 0) {
426 1.224 bouyer while (wdc_probe_count-- > 0) {
427 1.224 bouyer if (wdc->select)
428 1.224 bouyer wdc->select(chp,0);
429 1.107 dbj
430 1.224 bouyer bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh],
431 1.224 bouyer 0, WDSD_IBM);
432 1.224 bouyer delay(10); /* 400ns delay */
433 1.224 bouyer st0 = bus_space_read_1(wdr->cmd_iot,
434 1.224 bouyer wdr->cmd_iohs[wd_status], 0);
435 1.137 bouyer
436 1.224 bouyer if (wdc->select)
437 1.224 bouyer wdc->select(chp,1);
438 1.219 perry
439 1.224 bouyer bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh],
440 1.224 bouyer 0, WDSD_IBM | 0x10);
441 1.224 bouyer delay(10); /* 400ns delay */
442 1.224 bouyer st1 = bus_space_read_1(wdr->cmd_iot,
443 1.224 bouyer wdr->cmd_iohs[wd_status], 0);
444 1.224 bouyer if ((st0 & WDCS_BSY) == 0)
445 1.224 bouyer break;
446 1.224 bouyer }
447 1.43 kenh
448 1.204 thorpej ATADEBUG_PRINT(("%s:%d: before reset, st0=0x%x, st1=0x%x\n",
449 1.207 thorpej atac->atac_dev.dv_xname,
450 1.169 thorpej chp->ch_channel, st0, st1), DEBUG_PROBE);
451 1.43 kenh
452 1.142 bouyer if (st0 == 0xff || st0 == WDSD_IBM)
453 1.43 kenh ret_value &= ~0x01;
454 1.142 bouyer if (st1 == 0xff || st1 == (WDSD_IBM | 0x10))
455 1.43 kenh ret_value &= ~0x02;
456 1.125 mycroft /* Register writability test, drive 0. */
457 1.125 mycroft if (ret_value & 0x01) {
458 1.207 thorpej if (wdc->select)
459 1.169 thorpej wdc->select(chp,0);
460 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh],
461 1.157 fvdl 0, WDSD_IBM);
462 1.205 thorpej bus_space_write_1(wdr->cmd_iot,
463 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0, 0x02);
464 1.205 thorpej cl = bus_space_read_1(wdr->cmd_iot,
465 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0);
466 1.174 bouyer if (cl != 0x02) {
467 1.204 thorpej ATADEBUG_PRINT(("%s:%d drive 0 wd_cyl_lo: "
468 1.174 bouyer "got 0x%x != 0x02\n",
469 1.207 thorpej atac->atac_dev.dv_xname,
470 1.174 bouyer chp->ch_channel, cl),
471 1.174 bouyer DEBUG_PROBE);
472 1.125 mycroft ret_value &= ~0x01;
473 1.174 bouyer }
474 1.205 thorpej bus_space_write_1(wdr->cmd_iot,
475 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0, 0x01);
476 1.205 thorpej cl = bus_space_read_1(wdr->cmd_iot,
477 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0);
478 1.174 bouyer if (cl != 0x01) {
479 1.204 thorpej ATADEBUG_PRINT(("%s:%d drive 0 wd_cyl_lo: "
480 1.174 bouyer "got 0x%x != 0x01\n",
481 1.207 thorpej atac->atac_dev.dv_xname,
482 1.174 bouyer chp->ch_channel, cl),
483 1.174 bouyer DEBUG_PROBE);
484 1.125 mycroft ret_value &= ~0x01;
485 1.174 bouyer }
486 1.205 thorpej bus_space_write_1(wdr->cmd_iot,
487 1.205 thorpej wdr->cmd_iohs[wd_sector], 0, 0x01);
488 1.205 thorpej cl = bus_space_read_1(wdr->cmd_iot,
489 1.205 thorpej wdr->cmd_iohs[wd_sector], 0);
490 1.174 bouyer if (cl != 0x01) {
491 1.204 thorpej ATADEBUG_PRINT(("%s:%d drive 0 wd_sector: "
492 1.174 bouyer "got 0x%x != 0x01\n",
493 1.207 thorpej atac->atac_dev.dv_xname,
494 1.174 bouyer chp->ch_channel, cl),
495 1.174 bouyer DEBUG_PROBE);
496 1.125 mycroft ret_value &= ~0x01;
497 1.174 bouyer }
498 1.205 thorpej bus_space_write_1(wdr->cmd_iot,
499 1.205 thorpej wdr->cmd_iohs[wd_sector], 0, 0x02);
500 1.205 thorpej cl = bus_space_read_1(wdr->cmd_iot,
501 1.205 thorpej wdr->cmd_iohs[wd_sector], 0);
502 1.174 bouyer if (cl != 0x02) {
503 1.204 thorpej ATADEBUG_PRINT(("%s:%d drive 0 wd_sector: "
504 1.174 bouyer "got 0x%x != 0x02\n",
505 1.207 thorpej atac->atac_dev.dv_xname,
506 1.174 bouyer chp->ch_channel, cl),
507 1.174 bouyer DEBUG_PROBE);
508 1.125 mycroft ret_value &= ~0x01;
509 1.174 bouyer }
510 1.205 thorpej cl = bus_space_read_1(wdr->cmd_iot,
511 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0);
512 1.174 bouyer if (cl != 0x01) {
513 1.204 thorpej ATADEBUG_PRINT(("%s:%d drive 0 wd_cyl_lo(2): "
514 1.174 bouyer "got 0x%x != 0x01\n",
515 1.207 thorpej atac->atac_dev.dv_xname,
516 1.174 bouyer chp->ch_channel, cl),
517 1.174 bouyer DEBUG_PROBE);
518 1.131 mycroft ret_value &= ~0x01;
519 1.174 bouyer }
520 1.125 mycroft }
521 1.125 mycroft /* Register writability test, drive 1. */
522 1.125 mycroft if (ret_value & 0x02) {
523 1.207 thorpej if (wdc->select)
524 1.169 thorpej wdc->select(chp,1);
525 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh],
526 1.157 fvdl 0, WDSD_IBM | 0x10);
527 1.205 thorpej bus_space_write_1(wdr->cmd_iot,
528 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0, 0x02);
529 1.205 thorpej cl = bus_space_read_1(wdr->cmd_iot,
530 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0);
531 1.174 bouyer if (cl != 0x02) {
532 1.204 thorpej ATADEBUG_PRINT(("%s:%d drive 1 wd_cyl_lo: "
533 1.174 bouyer "got 0x%x != 0x02\n",
534 1.207 thorpej atac->atac_dev.dv_xname,
535 1.174 bouyer chp->ch_channel, cl),
536 1.174 bouyer DEBUG_PROBE);
537 1.125 mycroft ret_value &= ~0x02;
538 1.174 bouyer }
539 1.205 thorpej bus_space_write_1(wdr->cmd_iot,
540 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0, 0x01);
541 1.205 thorpej cl = bus_space_read_1(wdr->cmd_iot,
542 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0);
543 1.174 bouyer if (cl != 0x01) {
544 1.204 thorpej ATADEBUG_PRINT(("%s:%d drive 1 wd_cyl_lo: "
545 1.174 bouyer "got 0x%x != 0x01\n",
546 1.207 thorpej atac->atac_dev.dv_xname,
547 1.174 bouyer chp->ch_channel, cl),
548 1.174 bouyer DEBUG_PROBE);
549 1.125 mycroft ret_value &= ~0x02;
550 1.174 bouyer }
551 1.205 thorpej bus_space_write_1(wdr->cmd_iot,
552 1.205 thorpej wdr->cmd_iohs[wd_sector], 0, 0x01);
553 1.205 thorpej cl = bus_space_read_1(wdr->cmd_iot,
554 1.205 thorpej wdr->cmd_iohs[wd_sector], 0);
555 1.174 bouyer if (cl != 0x01) {
556 1.204 thorpej ATADEBUG_PRINT(("%s:%d drive 1 wd_sector: "
557 1.174 bouyer "got 0x%x != 0x01\n",
558 1.207 thorpej atac->atac_dev.dv_xname,
559 1.174 bouyer chp->ch_channel, cl),
560 1.174 bouyer DEBUG_PROBE);
561 1.125 mycroft ret_value &= ~0x02;
562 1.174 bouyer }
563 1.205 thorpej bus_space_write_1(wdr->cmd_iot,
564 1.205 thorpej wdr->cmd_iohs[wd_sector], 0, 0x02);
565 1.205 thorpej cl = bus_space_read_1(wdr->cmd_iot,
566 1.205 thorpej wdr->cmd_iohs[wd_sector], 0);
567 1.174 bouyer if (cl != 0x02) {
568 1.204 thorpej ATADEBUG_PRINT(("%s:%d drive 1 wd_sector: "
569 1.174 bouyer "got 0x%x != 0x02\n",
570 1.207 thorpej atac->atac_dev.dv_xname,
571 1.174 bouyer chp->ch_channel, cl),
572 1.174 bouyer DEBUG_PROBE);
573 1.125 mycroft ret_value &= ~0x02;
574 1.174 bouyer }
575 1.205 thorpej cl = bus_space_read_1(wdr->cmd_iot,
576 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0);
577 1.174 bouyer if (cl != 0x01) {
578 1.204 thorpej ATADEBUG_PRINT(("%s:%d drive 1 wd_cyl_lo(2): "
579 1.174 bouyer "got 0x%x != 0x01\n",
580 1.207 thorpej atac->atac_dev.dv_xname,
581 1.174 bouyer chp->ch_channel, cl),
582 1.174 bouyer DEBUG_PROBE);
583 1.131 mycroft ret_value &= ~0x02;
584 1.174 bouyer }
585 1.125 mycroft }
586 1.137 bouyer
587 1.174 bouyer if (ret_value == 0) {
588 1.174 bouyer splx(s);
589 1.137 bouyer return 0;
590 1.174 bouyer }
591 1.62 bouyer }
592 1.31 bouyer
593 1.174 bouyer
594 1.181 bouyer #if 0 /* XXX this break some ATA or ATAPI devices */
595 1.174 bouyer /*
596 1.174 bouyer * reset bus. Also send an ATAPI_RESET to devices, in case there are
597 1.174 bouyer * ATAPI device out there which don't react to the bus reset
598 1.174 bouyer */
599 1.174 bouyer if (ret_value & 0x01) {
600 1.207 thorpej if (wdc->select)
601 1.174 bouyer wdc->select(chp,0);
602 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh],
603 1.174 bouyer 0, WDSD_IBM);
604 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_command], 0,
605 1.174 bouyer ATAPI_SOFT_RESET);
606 1.174 bouyer }
607 1.174 bouyer if (ret_value & 0x02) {
608 1.207 thorpej if (wdc->select)
609 1.174 bouyer wdc->select(chp,0);
610 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh],
611 1.174 bouyer 0, WDSD_IBM | 0x10);
612 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_command], 0,
613 1.174 bouyer ATAPI_SOFT_RESET);
614 1.174 bouyer }
615 1.156 bouyer
616 1.175 bouyer delay(5000);
617 1.181 bouyer #endif
618 1.175 bouyer
619 1.225 bouyer wdc->reset(chp, RESET_POLL);
620 1.137 bouyer DELAY(2000);
621 1.205 thorpej (void) bus_space_read_1(wdr->cmd_iot, wdr->cmd_iohs[wd_error], 0);
622 1.205 thorpej bus_space_write_1(wdr->ctl_iot, wdr->ctl_ioh, wd_aux_ctlr, WDCTL_4BIT);
623 1.156 bouyer splx(s);
624 1.137 bouyer
625 1.137 bouyer ret_value = __wdcwait_reset(chp, ret_value, poll);
626 1.204 thorpej ATADEBUG_PRINT(("%s:%d: after reset, ret_value=0x%d\n",
627 1.207 thorpej atac->atac_dev.dv_xname, chp->ch_channel,
628 1.137 bouyer ret_value), DEBUG_PROBE);
629 1.12 cgd
630 1.137 bouyer /* if reset failed, there's nothing here */
631 1.137 bouyer if (ret_value == 0)
632 1.137 bouyer return 0;
633 1.67 bouyer
634 1.12 cgd /*
635 1.167 thorpej * Test presence of drives. First test register signatures looking
636 1.167 thorpej * for ATAPI devices. If it's not an ATAPI and reset said there may
637 1.167 thorpej * be something here assume it's ATA or OLD. Ghost will be killed
638 1.167 thorpej * later in attach routine.
639 1.12 cgd */
640 1.232 bouyer for (drive = 0; drive < chp->ch_ndrive; drive++) {
641 1.137 bouyer if ((ret_value & (0x01 << drive)) == 0)
642 1.137 bouyer continue;
643 1.207 thorpej if (wdc->select)
644 1.169 thorpej wdc->select(chp,drive);
645 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh], 0,
646 1.137 bouyer WDSD_IBM | (drive << 4));
647 1.137 bouyer delay(10); /* 400ns delay */
648 1.137 bouyer /* Save registers contents */
649 1.205 thorpej sc = bus_space_read_1(wdr->cmd_iot,
650 1.205 thorpej wdr->cmd_iohs[wd_seccnt], 0);
651 1.205 thorpej sn = bus_space_read_1(wdr->cmd_iot,
652 1.205 thorpej wdr->cmd_iohs[wd_sector], 0);
653 1.205 thorpej cl = bus_space_read_1(wdr->cmd_iot,
654 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0);
655 1.205 thorpej ch = bus_space_read_1(wdr->cmd_iot,
656 1.205 thorpej wdr->cmd_iohs[wd_cyl_hi], 0);
657 1.137 bouyer
658 1.204 thorpej ATADEBUG_PRINT(("%s:%d:%d: after reset, sc=0x%x sn=0x%x "
659 1.137 bouyer "cl=0x%x ch=0x%x\n",
660 1.207 thorpej atac->atac_dev.dv_xname,
661 1.169 thorpej chp->ch_channel, drive, sc, sn, cl, ch), DEBUG_PROBE);
662 1.31 bouyer /*
663 1.137 bouyer * sc & sn are supposted to be 0x1 for ATAPI but in some cases
664 1.137 bouyer * we get wrong values here, so ignore it.
665 1.31 bouyer */
666 1.212 thorpej s = splbio();
667 1.137 bouyer if (cl == 0x14 && ch == 0xeb) {
668 1.137 bouyer chp->ch_drive[drive].drive_flags |= DRIVE_ATAPI;
669 1.137 bouyer } else {
670 1.137 bouyer chp->ch_drive[drive].drive_flags |= DRIVE_ATA;
671 1.223 bouyer if ((wdc->cap & WDC_CAPABILITY_PREATA) != 0)
672 1.137 bouyer chp->ch_drive[drive].drive_flags |= DRIVE_OLD;
673 1.137 bouyer }
674 1.212 thorpej splx(s);
675 1.31 bouyer }
676 1.219 perry return (ret_value);
677 1.137 bouyer }
678 1.31 bouyer
679 1.137 bouyer void
680 1.205 thorpej wdcattach(struct ata_channel *chp)
681 1.137 bouyer {
682 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
683 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
684 1.32 bouyer
685 1.232 bouyer KASSERT(chp->ch_ndrive > 0 && chp->ch_ndrive < 3);
686 1.205 thorpej
687 1.191 mycroft /* default data transfer methods */
688 1.210 thorpej if (wdc->datain_pio == NULL)
689 1.191 mycroft wdc->datain_pio = wdc_datain_pio;
690 1.210 thorpej if (wdc->dataout_pio == NULL)
691 1.191 mycroft wdc->dataout_pio = wdc_dataout_pio;
692 1.225 bouyer /* default reset method */
693 1.225 bouyer if (wdc->reset == NULL)
694 1.225 bouyer wdc->reset = wdc_do_reset;
695 1.191 mycroft
696 1.137 bouyer /* initialise global data */
697 1.208 thorpej if (atac->atac_bustype_ata == NULL)
698 1.208 thorpej atac->atac_bustype_ata = &wdc_ata_bustype;
699 1.207 thorpej if (atac->atac_probe == NULL)
700 1.207 thorpej atac->atac_probe = wdc_drvprobe;
701 1.208 thorpej #if NATAPIBUS > 0
702 1.208 thorpej if (atac->atac_atapibus_attach == NULL)
703 1.208 thorpej atac->atac_atapibus_attach = wdc_atapibus_attach;
704 1.208 thorpej #endif
705 1.198 thorpej
706 1.210 thorpej ata_channel_attach(chp);
707 1.74 enami }
708 1.74 enami
709 1.163 thorpej int
710 1.163 thorpej wdcactivate(struct device *self, enum devact act)
711 1.137 bouyer {
712 1.207 thorpej struct atac_softc *atac = (struct atac_softc *) self;
713 1.137 bouyer int s, i, error = 0;
714 1.137 bouyer
715 1.137 bouyer s = splbio();
716 1.137 bouyer switch (act) {
717 1.137 bouyer case DVACT_ACTIVATE:
718 1.137 bouyer error = EOPNOTSUPP;
719 1.137 bouyer break;
720 1.137 bouyer
721 1.137 bouyer case DVACT_DEACTIVATE:
722 1.207 thorpej for (i = 0; i < atac->atac_nchannels; i++) {
723 1.207 thorpej error =
724 1.207 thorpej config_deactivate(atac->atac_channels[i]->atabus);
725 1.137 bouyer if (error)
726 1.137 bouyer break;
727 1.137 bouyer }
728 1.137 bouyer break;
729 1.137 bouyer }
730 1.137 bouyer splx(s);
731 1.137 bouyer return (error);
732 1.137 bouyer }
733 1.219 perry
734 1.137 bouyer int
735 1.163 thorpej wdcdetach(struct device *self, int flags)
736 1.137 bouyer {
737 1.207 thorpej struct atac_softc *atac = (struct atac_softc *) self;
738 1.205 thorpej struct ata_channel *chp;
739 1.207 thorpej struct scsipi_adapter *adapt = &atac->atac_atapi_adapter._generic;
740 1.137 bouyer int i, error = 0;
741 1.137 bouyer
742 1.207 thorpej for (i = 0; i < atac->atac_nchannels; i++) {
743 1.207 thorpej chp = atac->atac_channels[i];
744 1.204 thorpej ATADEBUG_PRINT(("wdcdetach: %s: detaching %s\n",
745 1.207 thorpej atac->atac_dev.dv_xname, chp->atabus->dv_xname),
746 1.207 thorpej DEBUG_DETACH);
747 1.137 bouyer error = config_detach(chp->atabus, flags);
748 1.137 bouyer if (error)
749 1.137 bouyer break;
750 1.137 bouyer }
751 1.188 mycroft if (adapt->adapt_refcnt != 0) {
752 1.188 mycroft #ifdef DIAGNOSTIC
753 1.188 mycroft printf("wdcdetach: refcnt should be 0 here??\n");
754 1.188 mycroft #endif
755 1.207 thorpej (void) (*adapt->adapt_enable)(&atac->atac_dev, 0);
756 1.188 mycroft }
757 1.137 bouyer return (error);
758 1.137 bouyer }
759 1.137 bouyer
760 1.31 bouyer /* restart an interrupted I/O */
761 1.31 bouyer void
762 1.163 thorpej wdcrestart(void *v)
763 1.31 bouyer {
764 1.205 thorpej struct ata_channel *chp = v;
765 1.31 bouyer int s;
766 1.2 bouyer
767 1.31 bouyer s = splbio();
768 1.202 thorpej atastart(chp);
769 1.31 bouyer splx(s);
770 1.2 bouyer }
771 1.219 perry
772 1.2 bouyer
773 1.31 bouyer /*
774 1.31 bouyer * Interrupt routine for the controller. Acknowledge the interrupt, check for
775 1.31 bouyer * errors on the current operation, mark it done if necessary, and start the
776 1.31 bouyer * next request. Also check for a partially done transfer, and continue with
777 1.31 bouyer * the next chunk if so.
778 1.31 bouyer */
779 1.12 cgd int
780 1.163 thorpej wdcintr(void *arg)
781 1.12 cgd {
782 1.205 thorpej struct ata_channel *chp = arg;
783 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
784 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
785 1.205 thorpej struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
786 1.165 thorpej struct ata_xfer *xfer;
787 1.76 bouyer int ret;
788 1.12 cgd
789 1.235 thorpej if (!device_is_active(&atac->atac_dev)) {
790 1.204 thorpej ATADEBUG_PRINT(("wdcintr: deactivated controller\n"),
791 1.80 enami DEBUG_INTR);
792 1.80 enami return (0);
793 1.80 enami }
794 1.205 thorpej if ((chp->ch_flags & ATACH_IRQ_WAIT) == 0) {
795 1.204 thorpej ATADEBUG_PRINT(("wdcintr: inactive controller\n"), DEBUG_INTR);
796 1.113 bouyer /* try to clear the pending interrupt anyway */
797 1.205 thorpej (void)bus_space_read_1(wdr->cmd_iot,
798 1.205 thorpej wdr->cmd_iohs[wd_status], 0);
799 1.80 enami return (0);
800 1.31 bouyer }
801 1.12 cgd
802 1.204 thorpej ATADEBUG_PRINT(("wdcintr\n"), DEBUG_INTR);
803 1.186 bouyer xfer = chp->ch_queue->active_xfer;
804 1.186 bouyer #ifdef DIAGNOSTIC
805 1.186 bouyer if (xfer == NULL)
806 1.186 bouyer panic("wdcintr: no xfer");
807 1.233 bouyer if (xfer->c_chp != chp) {
808 1.233 bouyer printf("channel %d expected %d\n", xfer->c_chp->ch_channel,
809 1.233 bouyer chp->ch_channel);
810 1.233 bouyer panic("wdcintr: wrong channel");
811 1.233 bouyer }
812 1.186 bouyer #endif
813 1.238 itohy #if NATA_DMA || NATA_PIOBM
814 1.205 thorpej if (chp->ch_flags & ATACH_DMA_WAIT) {
815 1.169 thorpej wdc->dma_status =
816 1.169 thorpej (*wdc->dma_finish)(wdc->dma_arg, chp->ch_channel,
817 1.185 bouyer xfer->c_drive, WDC_DMAEND_END);
818 1.169 thorpej if (wdc->dma_status & WDC_DMAST_NOIRQ) {
819 1.84 bouyer /* IRQ not for us, not detected by DMA engine */
820 1.84 bouyer return 0;
821 1.84 bouyer }
822 1.205 thorpej chp->ch_flags &= ~ATACH_DMA_WAIT;
823 1.84 bouyer }
824 1.238 itohy #endif
825 1.205 thorpej chp->ch_flags &= ~ATACH_IRQ_WAIT;
826 1.76 bouyer ret = xfer->c_intr(chp, xfer, 1);
827 1.76 bouyer if (ret == 0) /* irq was not for us, still waiting for irq */
828 1.205 thorpej chp->ch_flags |= ATACH_IRQ_WAIT;
829 1.76 bouyer return (ret);
830 1.12 cgd }
831 1.12 cgd
832 1.31 bouyer /* Put all disk in RESET state */
833 1.125 mycroft void
834 1.183 bouyer wdc_reset_drive(struct ata_drive_datas *drvp, int flags)
835 1.2 bouyer {
836 1.205 thorpej struct ata_channel *chp = drvp->chnl_softc;
837 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
838 1.207 thorpej
839 1.211 thorpej ATADEBUG_PRINT(("wdc_reset_drive %s:%d for drive %d\n",
840 1.207 thorpej atac->atac_dev.dv_xname, chp->ch_channel, drvp->drive),
841 1.34 bouyer DEBUG_FUNCS);
842 1.182 bouyer
843 1.211 thorpej ata_reset_channel(chp, flags);
844 1.182 bouyer }
845 1.182 bouyer
846 1.183 bouyer void
847 1.205 thorpej wdc_reset_channel(struct ata_channel *chp, int flags)
848 1.182 bouyer {
849 1.186 bouyer TAILQ_HEAD(, ata_xfer) reset_xfer;
850 1.183 bouyer struct ata_xfer *xfer, *next_xfer;
851 1.238 itohy #if NATA_DMA || NATA_PIOBM
852 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
853 1.238 itohy #endif
854 1.182 bouyer
855 1.186 bouyer TAILQ_INIT(&reset_xfer);
856 1.184 bouyer
857 1.211 thorpej chp->ch_flags &= ~ATACH_IRQ_WAIT;
858 1.184 bouyer
859 1.186 bouyer /*
860 1.186 bouyer * if the current command if on an ATAPI device, issue a
861 1.186 bouyer * ATAPI_SOFT_RESET
862 1.186 bouyer */
863 1.186 bouyer xfer = chp->ch_queue->active_xfer;
864 1.186 bouyer if (xfer && xfer->c_chp == chp && (xfer->c_flags & C_ATAPI)) {
865 1.186 bouyer wdccommandshort(chp, xfer->c_drive, ATAPI_SOFT_RESET);
866 1.186 bouyer if (flags & AT_WAIT)
867 1.186 bouyer tsleep(&flags, PRIBIO, "atardl", mstohz(1) + 1);
868 1.219 perry else
869 1.186 bouyer delay(1000);
870 1.186 bouyer }
871 1.186 bouyer
872 1.184 bouyer /* reset the channel */
873 1.186 bouyer if (flags & AT_WAIT)
874 1.186 bouyer (void) wdcreset(chp, RESET_SLEEP);
875 1.186 bouyer else
876 1.184 bouyer (void) wdcreset(chp, RESET_POLL);
877 1.184 bouyer
878 1.184 bouyer /*
879 1.186 bouyer * wait a bit after reset; in case the DMA engines needs some time
880 1.184 bouyer * to recover.
881 1.184 bouyer */
882 1.184 bouyer if (flags & AT_WAIT)
883 1.186 bouyer tsleep(&flags, PRIBIO, "atardl", mstohz(1) + 1);
884 1.219 perry else
885 1.184 bouyer delay(1000);
886 1.182 bouyer /*
887 1.182 bouyer * look for pending xfers. If we have a shared queue, we'll also reset
888 1.182 bouyer * the other channel if the current xfer is running on it.
889 1.184 bouyer * Then we'll dequeue only the xfers for this channel.
890 1.182 bouyer */
891 1.182 bouyer if ((flags & AT_RST_NOCMD) == 0) {
892 1.186 bouyer /*
893 1.186 bouyer * move all xfers queued for this channel to the reset queue,
894 1.186 bouyer * and then process the current xfer and then the reset queue.
895 1.186 bouyer * We have to use a temporary queue because c_kill_xfer()
896 1.186 bouyer * may requeue commands.
897 1.186 bouyer */
898 1.186 bouyer for (xfer = TAILQ_FIRST(&chp->ch_queue->queue_xfer);
899 1.186 bouyer xfer != NULL; xfer = next_xfer) {
900 1.186 bouyer next_xfer = TAILQ_NEXT(xfer, c_xferchain);
901 1.186 bouyer if (xfer->c_chp != chp)
902 1.186 bouyer continue;
903 1.186 bouyer TAILQ_REMOVE(&chp->ch_queue->queue_xfer,
904 1.186 bouyer xfer, c_xferchain);
905 1.186 bouyer TAILQ_INSERT_TAIL(&reset_xfer, xfer, c_xferchain);
906 1.186 bouyer }
907 1.186 bouyer xfer = chp->ch_queue->active_xfer;
908 1.184 bouyer if (xfer) {
909 1.184 bouyer if (xfer->c_chp != chp)
910 1.211 thorpej ata_reset_channel(xfer->c_chp, flags);
911 1.184 bouyer else {
912 1.186 bouyer callout_stop(&chp->ch_callout);
913 1.238 itohy #if NATA_DMA || NATA_PIOBM
914 1.184 bouyer /*
915 1.184 bouyer * If we're waiting for DMA, stop the
916 1.184 bouyer * DMA engine
917 1.184 bouyer */
918 1.205 thorpej if (chp->ch_flags & ATACH_DMA_WAIT) {
919 1.207 thorpej (*wdc->dma_finish)(
920 1.207 thorpej wdc->dma_arg,
921 1.184 bouyer chp->ch_channel,
922 1.184 bouyer xfer->c_drive,
923 1.185 bouyer WDC_DMAEND_ABRT_QUIET);
924 1.205 thorpej chp->ch_flags &= ~ATACH_DMA_WAIT;
925 1.184 bouyer }
926 1.238 itohy #endif
927 1.186 bouyer chp->ch_queue->active_xfer = NULL;
928 1.186 bouyer if ((flags & AT_RST_EMERG) == 0)
929 1.186 bouyer xfer->c_kill_xfer(
930 1.186 bouyer chp, xfer, KILL_RESET);
931 1.184 bouyer }
932 1.184 bouyer }
933 1.186 bouyer
934 1.186 bouyer for (xfer = TAILQ_FIRST(&reset_xfer);
935 1.183 bouyer xfer != NULL; xfer = next_xfer) {
936 1.183 bouyer next_xfer = TAILQ_NEXT(xfer, c_xferchain);
937 1.186 bouyer TAILQ_REMOVE(&reset_xfer, xfer, c_xferchain);
938 1.182 bouyer if ((flags & AT_RST_EMERG) == 0)
939 1.182 bouyer xfer->c_kill_xfer(chp, xfer, KILL_RESET);
940 1.182 bouyer }
941 1.182 bouyer }
942 1.31 bouyer }
943 1.12 cgd
944 1.213 thorpej static int
945 1.205 thorpej wdcreset(struct ata_channel *chp, int poll)
946 1.31 bouyer {
947 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
948 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
949 1.205 thorpej struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
950 1.31 bouyer int drv_mask1, drv_mask2;
951 1.225 bouyer
952 1.225 bouyer wdc->reset(chp, poll);
953 1.225 bouyer
954 1.225 bouyer drv_mask1 = (chp->ch_drive[0].drive_flags & DRIVE) ? 0x01:0x00;
955 1.225 bouyer drv_mask1 |= (chp->ch_drive[1].drive_flags & DRIVE) ? 0x02:0x00;
956 1.225 bouyer drv_mask2 = __wdcwait_reset(chp, drv_mask1,
957 1.225 bouyer (poll == RESET_SLEEP) ? 0 : 1);
958 1.225 bouyer if (drv_mask2 != drv_mask1) {
959 1.225 bouyer printf("%s channel %d: reset failed for",
960 1.225 bouyer atac->atac_dev.dv_xname, chp->ch_channel);
961 1.225 bouyer if ((drv_mask1 & 0x01) != 0 && (drv_mask2 & 0x01) == 0)
962 1.225 bouyer printf(" drive 0");
963 1.225 bouyer if ((drv_mask1 & 0x02) != 0 && (drv_mask2 & 0x02) == 0)
964 1.225 bouyer printf(" drive 1");
965 1.225 bouyer printf("\n");
966 1.225 bouyer }
967 1.225 bouyer bus_space_write_1(wdr->ctl_iot, wdr->ctl_ioh, wd_aux_ctlr, WDCTL_4BIT);
968 1.225 bouyer return (drv_mask1 != drv_mask2) ? 1 : 0;
969 1.225 bouyer }
970 1.225 bouyer
971 1.225 bouyer void
972 1.225 bouyer wdc_do_reset(struct ata_channel *chp, int poll)
973 1.225 bouyer {
974 1.225 bouyer struct wdc_softc *wdc = CHAN_TO_WDC(chp);
975 1.225 bouyer struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
976 1.156 bouyer int s = 0;
977 1.2 bouyer
978 1.225 bouyer if (poll != RESET_SLEEP)
979 1.225 bouyer s = splbio();
980 1.203 thorpej if (wdc->select)
981 1.169 thorpej wdc->select(chp,0);
982 1.157 fvdl /* master */
983 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh], 0, WDSD_IBM);
984 1.131 mycroft delay(10); /* 400ns delay */
985 1.225 bouyer /* assert SRST, wait for reset to complete */
986 1.205 thorpej bus_space_write_1(wdr->ctl_iot, wdr->ctl_ioh, wd_aux_ctlr,
987 1.131 mycroft WDCTL_RST | WDCTL_IDS | WDCTL_4BIT);
988 1.131 mycroft delay(2000);
989 1.205 thorpej (void) bus_space_read_1(wdr->cmd_iot, wdr->cmd_iohs[wd_error], 0);
990 1.205 thorpej bus_space_write_1(wdr->ctl_iot, wdr->ctl_ioh, wd_aux_ctlr,
991 1.137 bouyer WDCTL_4BIT | WDCTL_IDS);
992 1.131 mycroft delay(10); /* 400ns delay */
993 1.156 bouyer if (poll != RESET_SLEEP) {
994 1.233 bouyer /* ACK interrupt in case there is one pending left */
995 1.203 thorpej if (wdc->irqack)
996 1.169 thorpej wdc->irqack(chp);
997 1.156 bouyer splx(s);
998 1.156 bouyer }
999 1.31 bouyer }
1000 1.31 bouyer
1001 1.31 bouyer static int
1002 1.205 thorpej __wdcwait_reset(struct ata_channel *chp, int drv_mask, int poll)
1003 1.31 bouyer {
1004 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
1005 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
1006 1.205 thorpej struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
1007 1.137 bouyer int timeout, nloop;
1008 1.149 bouyer u_int8_t st0 = 0, st1 = 0;
1009 1.204 thorpej #ifdef ATADEBUG
1010 1.146 christos u_int8_t sc0 = 0, sn0 = 0, cl0 = 0, ch0 = 0;
1011 1.146 christos u_int8_t sc1 = 0, sn1 = 0, cl1 = 0, ch1 = 0;
1012 1.70 bouyer #endif
1013 1.137 bouyer
1014 1.137 bouyer if (poll)
1015 1.137 bouyer nloop = WDCNDELAY_RST;
1016 1.137 bouyer else
1017 1.137 bouyer nloop = WDC_RESET_WAIT * hz / 1000;
1018 1.31 bouyer /* wait for BSY to deassert */
1019 1.137 bouyer for (timeout = 0; timeout < nloop; timeout++) {
1020 1.174 bouyer if ((drv_mask & 0x01) != 0) {
1021 1.236 bouyer if (wdc->select)
1022 1.174 bouyer wdc->select(chp,0);
1023 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh],
1024 1.174 bouyer 0, WDSD_IBM); /* master */
1025 1.174 bouyer delay(10);
1026 1.205 thorpej st0 = bus_space_read_1(wdr->cmd_iot,
1027 1.205 thorpej wdr->cmd_iohs[wd_status], 0);
1028 1.204 thorpej #ifdef ATADEBUG
1029 1.205 thorpej sc0 = bus_space_read_1(wdr->cmd_iot,
1030 1.205 thorpej wdr->cmd_iohs[wd_seccnt], 0);
1031 1.205 thorpej sn0 = bus_space_read_1(wdr->cmd_iot,
1032 1.205 thorpej wdr->cmd_iohs[wd_sector], 0);
1033 1.205 thorpej cl0 = bus_space_read_1(wdr->cmd_iot,
1034 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0);
1035 1.205 thorpej ch0 = bus_space_read_1(wdr->cmd_iot,
1036 1.205 thorpej wdr->cmd_iohs[wd_cyl_hi], 0);
1037 1.70 bouyer #endif
1038 1.174 bouyer }
1039 1.174 bouyer if ((drv_mask & 0x02) != 0) {
1040 1.236 bouyer if (wdc->select)
1041 1.174 bouyer wdc->select(chp,1);
1042 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh],
1043 1.174 bouyer 0, WDSD_IBM | 0x10); /* slave */
1044 1.174 bouyer delay(10);
1045 1.205 thorpej st1 = bus_space_read_1(wdr->cmd_iot,
1046 1.205 thorpej wdr->cmd_iohs[wd_status], 0);
1047 1.204 thorpej #ifdef ATADEBUG
1048 1.205 thorpej sc1 = bus_space_read_1(wdr->cmd_iot,
1049 1.205 thorpej wdr->cmd_iohs[wd_seccnt], 0);
1050 1.205 thorpej sn1 = bus_space_read_1(wdr->cmd_iot,
1051 1.205 thorpej wdr->cmd_iohs[wd_sector], 0);
1052 1.205 thorpej cl1 = bus_space_read_1(wdr->cmd_iot,
1053 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0);
1054 1.205 thorpej ch1 = bus_space_read_1(wdr->cmd_iot,
1055 1.205 thorpej wdr->cmd_iohs[wd_cyl_hi], 0);
1056 1.70 bouyer #endif
1057 1.174 bouyer }
1058 1.31 bouyer
1059 1.31 bouyer if ((drv_mask & 0x01) == 0) {
1060 1.31 bouyer /* no master */
1061 1.31 bouyer if ((drv_mask & 0x02) != 0 && (st1 & WDCS_BSY) == 0) {
1062 1.31 bouyer /* No master, slave is ready, it's done */
1063 1.65 bouyer goto end;
1064 1.31 bouyer }
1065 1.231 bouyer if ((drv_mask & 0x02) == 0) {
1066 1.231 bouyer /* No master, no slave: it's done */
1067 1.231 bouyer goto end;
1068 1.231 bouyer }
1069 1.31 bouyer } else if ((drv_mask & 0x02) == 0) {
1070 1.31 bouyer /* no slave */
1071 1.31 bouyer if ((drv_mask & 0x01) != 0 && (st0 & WDCS_BSY) == 0) {
1072 1.31 bouyer /* No slave, master is ready, it's done */
1073 1.65 bouyer goto end;
1074 1.31 bouyer }
1075 1.2 bouyer } else {
1076 1.31 bouyer /* Wait for both master and slave to be ready */
1077 1.31 bouyer if ((st0 & WDCS_BSY) == 0 && (st1 & WDCS_BSY) == 0) {
1078 1.65 bouyer goto end;
1079 1.2 bouyer }
1080 1.2 bouyer }
1081 1.137 bouyer if (poll)
1082 1.137 bouyer delay(WDCDELAY);
1083 1.137 bouyer else
1084 1.137 bouyer tsleep(&nloop, PRIBIO, "atarst", 1);
1085 1.2 bouyer }
1086 1.116 wiz /* Reset timed out. Maybe it's because drv_mask was not right */
1087 1.31 bouyer if (st0 & WDCS_BSY)
1088 1.31 bouyer drv_mask &= ~0x01;
1089 1.31 bouyer if (st1 & WDCS_BSY)
1090 1.31 bouyer drv_mask &= ~0x02;
1091 1.65 bouyer end:
1092 1.204 thorpej ATADEBUG_PRINT(("%s:%d:0: after reset, sc=0x%x sn=0x%x "
1093 1.70 bouyer "cl=0x%x ch=0x%x\n",
1094 1.207 thorpej atac->atac_dev.dv_xname,
1095 1.169 thorpej chp->ch_channel, sc0, sn0, cl0, ch0), DEBUG_PROBE);
1096 1.204 thorpej ATADEBUG_PRINT(("%s:%d:1: after reset, sc=0x%x sn=0x%x "
1097 1.70 bouyer "cl=0x%x ch=0x%x\n",
1098 1.207 thorpej atac->atac_dev.dv_xname,
1099 1.169 thorpej chp->ch_channel, sc1, sn1, cl1, ch1), DEBUG_PROBE);
1100 1.70 bouyer
1101 1.204 thorpej ATADEBUG_PRINT(("%s:%d: wdcwait_reset() end, st0=0x%x st1=0x%x\n",
1102 1.207 thorpej atac->atac_dev.dv_xname, chp->ch_channel,
1103 1.149 bouyer st0, st1), DEBUG_PROBE);
1104 1.65 bouyer
1105 1.31 bouyer return drv_mask;
1106 1.2 bouyer }
1107 1.2 bouyer
1108 1.2 bouyer /*
1109 1.31 bouyer * Wait for a drive to be !BSY, and have mask in its status register.
1110 1.31 bouyer * return -1 for a timeout after "timeout" ms.
1111 1.2 bouyer */
1112 1.167 thorpej static int
1113 1.205 thorpej __wdcwait(struct ata_channel *chp, int mask, int bits, int timeout)
1114 1.2 bouyer {
1115 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
1116 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
1117 1.205 thorpej struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
1118 1.31 bouyer u_char status;
1119 1.222 christos int xtime = 0;
1120 1.60 abs
1121 1.207 thorpej ATADEBUG_PRINT(("__wdcwait %s:%d\n",
1122 1.207 thorpej atac->atac_dev.dv_xname,
1123 1.169 thorpej chp->ch_channel), DEBUG_STATUS);
1124 1.31 bouyer chp->ch_error = 0;
1125 1.31 bouyer
1126 1.31 bouyer timeout = timeout * 1000 / WDCDELAY; /* delay uses microseconds */
1127 1.2 bouyer
1128 1.31 bouyer for (;;) {
1129 1.31 bouyer chp->ch_status = status =
1130 1.205 thorpej bus_space_read_1(wdr->cmd_iot, wdr->cmd_iohs[wd_status], 0);
1131 1.131 mycroft if ((status & (WDCS_BSY | mask)) == bits)
1132 1.31 bouyer break;
1133 1.222 christos if (++xtime > timeout) {
1134 1.204 thorpej ATADEBUG_PRINT(("__wdcwait: timeout (time=%d), "
1135 1.87 bouyer "status %x error %x (mask 0x%x bits 0x%x)\n",
1136 1.222 christos xtime, status,
1137 1.205 thorpej bus_space_read_1(wdr->cmd_iot,
1138 1.205 thorpej wdr->cmd_iohs[wd_error], 0), mask, bits),
1139 1.87 bouyer DEBUG_STATUS | DEBUG_PROBE | DEBUG_DELAY);
1140 1.137 bouyer return(WDCWAIT_TOUT);
1141 1.31 bouyer }
1142 1.31 bouyer delay(WDCDELAY);
1143 1.2 bouyer }
1144 1.204 thorpej #ifdef ATADEBUG
1145 1.222 christos if (xtime > 0 && (atadebug_mask & DEBUG_DELAY))
1146 1.222 christos printf("__wdcwait: did busy-wait, time=%d\n", xtime);
1147 1.87 bouyer #endif
1148 1.31 bouyer if (status & WDCS_ERR)
1149 1.205 thorpej chp->ch_error = bus_space_read_1(wdr->cmd_iot,
1150 1.205 thorpej wdr->cmd_iohs[wd_error], 0);
1151 1.31 bouyer #ifdef WDCNDELAY_DEBUG
1152 1.31 bouyer /* After autoconfig, there should be no long delays. */
1153 1.222 christos if (!cold && xtime > WDCNDELAY_DEBUG) {
1154 1.186 bouyer struct ata_xfer *xfer = chp->ch_queue->active_xfer;
1155 1.31 bouyer if (xfer == NULL)
1156 1.31 bouyer printf("%s channel %d: warning: busy-wait took %dus\n",
1157 1.207 thorpej atac->atac_dev.dv_xname, chp->ch_channel,
1158 1.222 christos WDCDELAY * xtime);
1159 1.219 perry else
1160 1.31 bouyer printf("%s:%d:%d: warning: busy-wait took %dus\n",
1161 1.207 thorpej atac->atac_dev.dv_xname, chp->ch_channel,
1162 1.237 christos xfer->c_drive,
1163 1.222 christos WDCDELAY * xtime);
1164 1.2 bouyer }
1165 1.2 bouyer #endif
1166 1.137 bouyer return(WDCWAIT_OK);
1167 1.137 bouyer }
1168 1.137 bouyer
1169 1.137 bouyer /*
1170 1.137 bouyer * Call __wdcwait(), polling using tsleep() or waking up the kernel
1171 1.137 bouyer * thread if possible
1172 1.137 bouyer */
1173 1.137 bouyer int
1174 1.205 thorpej wdcwait(struct ata_channel *chp, int mask, int bits, int timeout, int flags)
1175 1.137 bouyer {
1176 1.137 bouyer int error, i, timeout_hz = mstohz(timeout);
1177 1.137 bouyer
1178 1.137 bouyer if (timeout_hz == 0 ||
1179 1.137 bouyer (flags & (AT_WAIT | AT_POLL)) == AT_POLL)
1180 1.137 bouyer error = __wdcwait(chp, mask, bits, timeout);
1181 1.137 bouyer else {
1182 1.137 bouyer error = __wdcwait(chp, mask, bits, WDCDELAY_POLL);
1183 1.137 bouyer if (error != 0) {
1184 1.205 thorpej if ((chp->ch_flags & ATACH_TH_RUN) ||
1185 1.147 bouyer (flags & AT_WAIT)) {
1186 1.137 bouyer /*
1187 1.147 bouyer * we're running in the channel thread
1188 1.147 bouyer * or some userland thread context
1189 1.137 bouyer */
1190 1.137 bouyer for (i = 0; i < timeout_hz; i++) {
1191 1.137 bouyer if (__wdcwait(chp, mask, bits,
1192 1.137 bouyer WDCDELAY_POLL) == 0) {
1193 1.137 bouyer error = 0;
1194 1.137 bouyer break;
1195 1.137 bouyer }
1196 1.137 bouyer tsleep(&chp, PRIBIO, "atapoll", 1);
1197 1.137 bouyer }
1198 1.137 bouyer } else {
1199 1.137 bouyer /*
1200 1.137 bouyer * we're probably in interrupt context,
1201 1.137 bouyer * ask the thread to come back here
1202 1.137 bouyer */
1203 1.147 bouyer #ifdef DIAGNOSTIC
1204 1.148 bouyer if (chp->ch_queue->queue_freeze > 0)
1205 1.148 bouyer panic("wdcwait: queue_freeze");
1206 1.147 bouyer #endif
1207 1.148 bouyer chp->ch_queue->queue_freeze++;
1208 1.170 thorpej wakeup(&chp->ch_thread);
1209 1.137 bouyer return(WDCWAIT_THR);
1210 1.137 bouyer }
1211 1.137 bouyer }
1212 1.137 bouyer }
1213 1.163 thorpej return (error);
1214 1.2 bouyer }
1215 1.2 bouyer
1216 1.137 bouyer
1217 1.238 itohy #if NATA_DMA
1218 1.84 bouyer /*
1219 1.84 bouyer * Busy-wait for DMA to complete
1220 1.84 bouyer */
1221 1.84 bouyer int
1222 1.205 thorpej wdc_dmawait(struct ata_channel *chp, struct ata_xfer *xfer, int timeout)
1223 1.84 bouyer {
1224 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
1225 1.222 christos int xtime;
1226 1.169 thorpej
1227 1.222 christos for (xtime = 0; xtime < timeout * 1000 / WDCDELAY; xtime++) {
1228 1.169 thorpej wdc->dma_status =
1229 1.169 thorpej (*wdc->dma_finish)(wdc->dma_arg,
1230 1.185 bouyer chp->ch_channel, xfer->c_drive, WDC_DMAEND_END);
1231 1.169 thorpej if ((wdc->dma_status & WDC_DMAST_NOIRQ) == 0)
1232 1.84 bouyer return 0;
1233 1.84 bouyer delay(WDCDELAY);
1234 1.84 bouyer }
1235 1.84 bouyer /* timeout, force a DMA halt */
1236 1.169 thorpej wdc->dma_status = (*wdc->dma_finish)(wdc->dma_arg,
1237 1.185 bouyer chp->ch_channel, xfer->c_drive, WDC_DMAEND_ABRT);
1238 1.84 bouyer return 1;
1239 1.84 bouyer }
1240 1.238 itohy #endif
1241 1.84 bouyer
1242 1.31 bouyer void
1243 1.163 thorpej wdctimeout(void *arg)
1244 1.2 bouyer {
1245 1.205 thorpej struct ata_channel *chp = (struct ata_channel *)arg;
1246 1.238 itohy #if NATA_DMA || NATA_PIOBM
1247 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
1248 1.238 itohy #endif
1249 1.186 bouyer struct ata_xfer *xfer = chp->ch_queue->active_xfer;
1250 1.31 bouyer int s;
1251 1.2 bouyer
1252 1.204 thorpej ATADEBUG_PRINT(("wdctimeout\n"), DEBUG_FUNCS);
1253 1.31 bouyer
1254 1.31 bouyer s = splbio();
1255 1.205 thorpej if ((chp->ch_flags & ATACH_IRQ_WAIT) != 0) {
1256 1.31 bouyer __wdcerror(chp, "lost interrupt");
1257 1.88 mrg printf("\ttype: %s tc_bcount: %d tc_skip: %d\n",
1258 1.88 mrg (xfer->c_flags & C_ATAPI) ? "atapi" : "ata",
1259 1.88 mrg xfer->c_bcount,
1260 1.88 mrg xfer->c_skip);
1261 1.238 itohy #if NATA_DMA || NATA_PIOBM
1262 1.205 thorpej if (chp->ch_flags & ATACH_DMA_WAIT) {
1263 1.169 thorpej wdc->dma_status =
1264 1.169 thorpej (*wdc->dma_finish)(wdc->dma_arg,
1265 1.185 bouyer chp->ch_channel, xfer->c_drive,
1266 1.185 bouyer WDC_DMAEND_ABRT);
1267 1.205 thorpej chp->ch_flags &= ~ATACH_DMA_WAIT;
1268 1.84 bouyer }
1269 1.238 itohy #endif
1270 1.31 bouyer /*
1271 1.119 drochner * Call the interrupt routine. If we just missed an interrupt,
1272 1.31 bouyer * it will do what's needed. Else, it will take the needed
1273 1.31 bouyer * action (reset the device).
1274 1.70 bouyer * Before that we need to reinstall the timeout callback,
1275 1.70 bouyer * in case it will miss another irq while in this transfer
1276 1.70 bouyer * We arbitray chose it to be 1s
1277 1.31 bouyer */
1278 1.81 thorpej callout_reset(&chp->ch_callout, hz, wdctimeout, chp);
1279 1.31 bouyer xfer->c_flags |= C_TIMEOU;
1280 1.205 thorpej chp->ch_flags &= ~ATACH_IRQ_WAIT;
1281 1.66 bouyer xfer->c_intr(chp, xfer, 1);
1282 1.31 bouyer } else
1283 1.31 bouyer __wdcerror(chp, "missing untimeout");
1284 1.31 bouyer splx(s);
1285 1.2 bouyer }
1286 1.2 bouyer
1287 1.2 bouyer int
1288 1.192 thorpej wdc_exec_command(struct ata_drive_datas *drvp, struct ata_command *ata_c)
1289 1.31 bouyer {
1290 1.205 thorpej struct ata_channel *chp = drvp->chnl_softc;
1291 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
1292 1.165 thorpej struct ata_xfer *xfer;
1293 1.31 bouyer int s, ret;
1294 1.2 bouyer
1295 1.204 thorpej ATADEBUG_PRINT(("wdc_exec_command %s:%d:%d\n",
1296 1.207 thorpej atac->atac_dev.dv_xname, chp->ch_channel, drvp->drive),
1297 1.34 bouyer DEBUG_FUNCS);
1298 1.2 bouyer
1299 1.31 bouyer /* set up an xfer and queue. Wait for completion */
1300 1.198 thorpej xfer = ata_get_xfer(ata_c->flags & AT_WAIT ? ATAXF_CANSLEEP :
1301 1.198 thorpej ATAXF_NOSLEEP);
1302 1.31 bouyer if (xfer == NULL) {
1303 1.193 thorpej return ATACMD_TRY_AGAIN;
1304 1.31 bouyer }
1305 1.2 bouyer
1306 1.207 thorpej if (atac->atac_cap & ATAC_CAP_NOIRQ)
1307 1.192 thorpej ata_c->flags |= AT_POLL;
1308 1.192 thorpej if (ata_c->flags & AT_POLL)
1309 1.31 bouyer xfer->c_flags |= C_POLL;
1310 1.217 bouyer if (ata_c->flags & AT_WAIT)
1311 1.217 bouyer xfer->c_flags |= C_WAIT;
1312 1.165 thorpej xfer->c_drive = drvp->drive;
1313 1.192 thorpej xfer->c_databuf = ata_c->data;
1314 1.192 thorpej xfer->c_bcount = ata_c->bcount;
1315 1.192 thorpej xfer->c_cmd = ata_c;
1316 1.31 bouyer xfer->c_start = __wdccommand_start;
1317 1.31 bouyer xfer->c_intr = __wdccommand_intr;
1318 1.182 bouyer xfer->c_kill_xfer = __wdccommand_kill_xfer;
1319 1.2 bouyer
1320 1.31 bouyer s = splbio();
1321 1.201 thorpej ata_exec_xfer(chp, xfer);
1322 1.31 bouyer #ifdef DIAGNOSTIC
1323 1.192 thorpej if ((ata_c->flags & AT_POLL) != 0 &&
1324 1.192 thorpej (ata_c->flags & AT_DONE) == 0)
1325 1.118 provos panic("wdc_exec_command: polled command not done");
1326 1.2 bouyer #endif
1327 1.192 thorpej if (ata_c->flags & AT_DONE) {
1328 1.193 thorpej ret = ATACMD_COMPLETE;
1329 1.31 bouyer } else {
1330 1.192 thorpej if (ata_c->flags & AT_WAIT) {
1331 1.192 thorpej while ((ata_c->flags & AT_DONE) == 0) {
1332 1.192 thorpej tsleep(ata_c, PRIBIO, "wdccmd", 0);
1333 1.69 bouyer }
1334 1.193 thorpej ret = ATACMD_COMPLETE;
1335 1.31 bouyer } else {
1336 1.193 thorpej ret = ATACMD_QUEUED;
1337 1.2 bouyer }
1338 1.2 bouyer }
1339 1.31 bouyer splx(s);
1340 1.31 bouyer return ret;
1341 1.2 bouyer }
1342 1.2 bouyer
1343 1.167 thorpej static void
1344 1.205 thorpej __wdccommand_start(struct ata_channel *chp, struct ata_xfer *xfer)
1345 1.219 perry {
1346 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
1347 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
1348 1.205 thorpej struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
1349 1.165 thorpej int drive = xfer->c_drive;
1350 1.230 bouyer int wait_flags = (xfer->c_flags & C_POLL) ? AT_POLL : 0;
1351 1.192 thorpej struct ata_command *ata_c = xfer->c_cmd;
1352 1.31 bouyer
1353 1.204 thorpej ATADEBUG_PRINT(("__wdccommand_start %s:%d:%d\n",
1354 1.207 thorpej atac->atac_dev.dv_xname, chp->ch_channel, xfer->c_drive),
1355 1.34 bouyer DEBUG_FUNCS);
1356 1.31 bouyer
1357 1.203 thorpej if (wdc->select)
1358 1.169 thorpej wdc->select(chp,drive);
1359 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh], 0,
1360 1.31 bouyer WDSD_IBM | (drive << 4));
1361 1.192 thorpej switch(wdcwait(chp, ata_c->r_st_bmask | WDCS_DRQ,
1362 1.230 bouyer ata_c->r_st_bmask, ata_c->timeout, wait_flags)) {
1363 1.137 bouyer case WDCWAIT_OK:
1364 1.137 bouyer break;
1365 1.137 bouyer case WDCWAIT_TOUT:
1366 1.192 thorpej ata_c->flags |= AT_TIMEOU;
1367 1.31 bouyer __wdccommand_done(chp, xfer);
1368 1.53 bouyer return;
1369 1.137 bouyer case WDCWAIT_THR:
1370 1.137 bouyer return;
1371 1.31 bouyer }
1372 1.192 thorpej if (ata_c->flags & AT_POLL) {
1373 1.135 bouyer /* polled command, disable interrupts */
1374 1.205 thorpej bus_space_write_1(wdr->ctl_iot, wdr->ctl_ioh, wd_aux_ctlr,
1375 1.135 bouyer WDCTL_4BIT | WDCTL_IDS);
1376 1.135 bouyer }
1377 1.192 thorpej wdccommand(chp, drive, ata_c->r_command, ata_c->r_cyl, ata_c->r_head,
1378 1.192 thorpej ata_c->r_sector, ata_c->r_count, ata_c->r_features);
1379 1.139 bouyer
1380 1.192 thorpej if ((ata_c->flags & AT_POLL) == 0) {
1381 1.205 thorpej chp->ch_flags |= ATACH_IRQ_WAIT; /* wait for interrupt */
1382 1.192 thorpej callout_reset(&chp->ch_callout, ata_c->timeout / 1000 * hz,
1383 1.81 thorpej wdctimeout, chp);
1384 1.31 bouyer return;
1385 1.2 bouyer }
1386 1.2 bouyer /*
1387 1.31 bouyer * Polled command. Wait for drive ready or drq. Done in intr().
1388 1.31 bouyer * Wait for at last 400ns for status bit to be valid.
1389 1.2 bouyer */
1390 1.134 mycroft delay(10); /* 400ns delay */
1391 1.66 bouyer __wdccommand_intr(chp, xfer, 0);
1392 1.2 bouyer }
1393 1.2 bouyer
1394 1.167 thorpej static int
1395 1.205 thorpej __wdccommand_intr(struct ata_channel *chp, struct ata_xfer *xfer, int irq)
1396 1.2 bouyer {
1397 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
1398 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
1399 1.205 thorpej struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
1400 1.192 thorpej struct ata_command *ata_c = xfer->c_cmd;
1401 1.192 thorpej int bcount = ata_c->bcount;
1402 1.192 thorpej char *data = ata_c->data;
1403 1.137 bouyer int wflags;
1404 1.226 bouyer int drive_flags;
1405 1.226 bouyer
1406 1.226 bouyer if (ata_c->r_command == WDCC_IDENTIFY ||
1407 1.226 bouyer ata_c->r_command == ATAPI_IDENTIFY_DEVICE) {
1408 1.226 bouyer /*
1409 1.226 bouyer * The IDENTIFY data has been designed as an array of
1410 1.226 bouyer * u_int16_t, so we can byteswap it on the fly.
1411 1.226 bouyer * Historically it's what we have always done so keeping it
1412 1.226 bouyer * here ensure binary backward compatibility.
1413 1.226 bouyer */
1414 1.229 tacha drive_flags = DRIVE_NOSTREAM |
1415 1.229 tacha chp->ch_drive[xfer->c_drive].drive_flags;
1416 1.226 bouyer } else {
1417 1.226 bouyer /*
1418 1.226 bouyer * Other data structure are opaque and should be transfered
1419 1.226 bouyer * as is.
1420 1.226 bouyer */
1421 1.226 bouyer drive_flags = chp->ch_drive[xfer->c_drive].drive_flags;
1422 1.226 bouyer }
1423 1.137 bouyer
1424 1.192 thorpej if ((ata_c->flags & (AT_WAIT | AT_POLL)) == (AT_WAIT | AT_POLL)) {
1425 1.137 bouyer /* both wait and poll, we can tsleep here */
1426 1.147 bouyer wflags = AT_WAIT | AT_POLL;
1427 1.137 bouyer } else {
1428 1.137 bouyer wflags = AT_POLL;
1429 1.137 bouyer }
1430 1.31 bouyer
1431 1.163 thorpej again:
1432 1.204 thorpej ATADEBUG_PRINT(("__wdccommand_intr %s:%d:%d\n",
1433 1.207 thorpej atac->atac_dev.dv_xname, chp->ch_channel, xfer->c_drive),
1434 1.165 thorpej DEBUG_INTR);
1435 1.137 bouyer /*
1436 1.137 bouyer * after a ATAPI_SOFT_RESET, the device will have released the bus.
1437 1.137 bouyer * Reselect again, it doesn't hurt for others commands, and the time
1438 1.137 bouyer * penalty for the extra regiter write is acceptable,
1439 1.137 bouyer * wdc_exec_command() isn't called often (mosly for autoconfig)
1440 1.137 bouyer */
1441 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh], 0,
1442 1.165 thorpej WDSD_IBM | (xfer->c_drive << 4));
1443 1.192 thorpej if ((ata_c->flags & AT_XFDONE) != 0) {
1444 1.114 bouyer /*
1445 1.114 bouyer * We have completed a data xfer. The drive should now be
1446 1.114 bouyer * in its initial state
1447 1.114 bouyer */
1448 1.192 thorpej if (wdcwait(chp, ata_c->r_st_bmask | WDCS_DRQ,
1449 1.192 thorpej ata_c->r_st_bmask, (irq == 0) ? ata_c->timeout : 0,
1450 1.137 bouyer wflags) == WDCWAIT_TOUT) {
1451 1.219 perry if (irq && (xfer->c_flags & C_TIMEOU) == 0)
1452 1.114 bouyer return 0; /* IRQ was not for us */
1453 1.192 thorpej ata_c->flags |= AT_TIMEOU;
1454 1.114 bouyer }
1455 1.131 mycroft goto out;
1456 1.114 bouyer }
1457 1.192 thorpej if (wdcwait(chp, ata_c->r_st_pmask, ata_c->r_st_pmask,
1458 1.192 thorpej (irq == 0) ? ata_c->timeout : 0, wflags) == WDCWAIT_TOUT) {
1459 1.219 perry if (irq && (xfer->c_flags & C_TIMEOU) == 0)
1460 1.63 bouyer return 0; /* IRQ was not for us */
1461 1.192 thorpej ata_c->flags |= AT_TIMEOU;
1462 1.131 mycroft goto out;
1463 1.2 bouyer }
1464 1.203 thorpej if (wdc->irqack)
1465 1.169 thorpej wdc->irqack(chp);
1466 1.192 thorpej if (ata_c->flags & AT_READ) {
1467 1.131 mycroft if ((chp->ch_status & WDCS_DRQ) == 0) {
1468 1.192 thorpej ata_c->flags |= AT_TIMEOU;
1469 1.131 mycroft goto out;
1470 1.131 mycroft }
1471 1.226 bouyer wdc->datain_pio(chp, drive_flags, data, bcount);
1472 1.114 bouyer /* at this point the drive should be in its initial state */
1473 1.192 thorpej ata_c->flags |= AT_XFDONE;
1474 1.234 bouyer /*
1475 1.234 bouyer * XXX checking the status register again here cause some
1476 1.234 bouyer * hardware to timeout.
1477 1.234 bouyer */
1478 1.192 thorpej } else if (ata_c->flags & AT_WRITE) {
1479 1.131 mycroft if ((chp->ch_status & WDCS_DRQ) == 0) {
1480 1.192 thorpej ata_c->flags |= AT_TIMEOU;
1481 1.131 mycroft goto out;
1482 1.131 mycroft }
1483 1.226 bouyer wdc->dataout_pio(chp, drive_flags, data, bcount);
1484 1.192 thorpej ata_c->flags |= AT_XFDONE;
1485 1.192 thorpej if ((ata_c->flags & AT_POLL) == 0) {
1486 1.205 thorpej chp->ch_flags |= ATACH_IRQ_WAIT; /* wait for interrupt */
1487 1.114 bouyer callout_reset(&chp->ch_callout,
1488 1.192 thorpej ata_c->timeout / 1000 * hz, wdctimeout, chp);
1489 1.114 bouyer return 1;
1490 1.114 bouyer } else {
1491 1.114 bouyer goto again;
1492 1.114 bouyer }
1493 1.2 bouyer }
1494 1.163 thorpej out:
1495 1.31 bouyer __wdccommand_done(chp, xfer);
1496 1.31 bouyer return 1;
1497 1.2 bouyer }
1498 1.2 bouyer
1499 1.167 thorpej static void
1500 1.205 thorpej __wdccommand_done(struct ata_channel *chp, struct ata_xfer *xfer)
1501 1.2 bouyer {
1502 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
1503 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
1504 1.205 thorpej struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
1505 1.192 thorpej struct ata_command *ata_c = xfer->c_cmd;
1506 1.2 bouyer
1507 1.233 bouyer ATADEBUG_PRINT(("__wdccommand_done %s:%d:%d flags 0x%x\n",
1508 1.233 bouyer atac->atac_dev.dv_xname, chp->ch_channel, xfer->c_drive,
1509 1.233 bouyer ata_c->flags), DEBUG_FUNCS);
1510 1.70 bouyer
1511 1.70 bouyer
1512 1.31 bouyer if (chp->ch_status & WDCS_DWF)
1513 1.192 thorpej ata_c->flags |= AT_DF;
1514 1.31 bouyer if (chp->ch_status & WDCS_ERR) {
1515 1.192 thorpej ata_c->flags |= AT_ERROR;
1516 1.192 thorpej ata_c->r_error = chp->ch_error;
1517 1.31 bouyer }
1518 1.192 thorpej if ((ata_c->flags & AT_READREG) != 0 &&
1519 1.235 thorpej device_is_active(&atac->atac_dev) &&
1520 1.192 thorpej (ata_c->flags & (AT_ERROR | AT_DF)) == 0) {
1521 1.205 thorpej ata_c->r_head = bus_space_read_1(wdr->cmd_iot,
1522 1.205 thorpej wdr->cmd_iohs[wd_sdh], 0);
1523 1.205 thorpej ata_c->r_count = bus_space_read_1(wdr->cmd_iot,
1524 1.205 thorpej wdr->cmd_iohs[wd_seccnt], 0);
1525 1.205 thorpej ata_c->r_sector = bus_space_read_1(wdr->cmd_iot,
1526 1.205 thorpej wdr->cmd_iohs[wd_sector], 0);
1527 1.221 fvdl ata_c->r_cyl = bus_space_read_1(wdr->cmd_iot,
1528 1.221 fvdl wdr->cmd_iohs[wd_cyl_hi], 0) << 8;
1529 1.205 thorpej ata_c->r_cyl |= bus_space_read_1(wdr->cmd_iot,
1530 1.205 thorpej wdr->cmd_iohs[wd_cyl_lo], 0);
1531 1.205 thorpej ata_c->r_error = bus_space_read_1(wdr->cmd_iot,
1532 1.205 thorpej wdr->cmd_iohs[wd_error], 0);
1533 1.205 thorpej ata_c->r_features = bus_space_read_1(wdr->cmd_iot,
1534 1.205 thorpej wdr->cmd_iohs[wd_features], 0);
1535 1.135 bouyer }
1536 1.186 bouyer callout_stop(&chp->ch_callout);
1537 1.187 bouyer chp->ch_queue->active_xfer = NULL;
1538 1.192 thorpej if (ata_c->flags & AT_POLL) {
1539 1.187 bouyer /* enable interrupts */
1540 1.205 thorpej bus_space_write_1(wdr->ctl_iot, wdr->ctl_ioh, wd_aux_ctlr,
1541 1.187 bouyer WDCTL_4BIT);
1542 1.187 bouyer delay(10); /* some drives need a little delay here */
1543 1.187 bouyer }
1544 1.187 bouyer if (chp->ch_drive[xfer->c_drive].drive_flags & DRIVE_WAITDRAIN) {
1545 1.187 bouyer __wdccommand_kill_xfer(chp, xfer, KILL_GONE);
1546 1.187 bouyer chp->ch_drive[xfer->c_drive].drive_flags &= ~DRIVE_WAITDRAIN;
1547 1.187 bouyer wakeup(&chp->ch_queue->active_xfer);
1548 1.219 perry } else
1549 1.187 bouyer __wdccommand_done_end(chp, xfer);
1550 1.182 bouyer }
1551 1.219 perry
1552 1.182 bouyer static void
1553 1.205 thorpej __wdccommand_done_end(struct ata_channel *chp, struct ata_xfer *xfer)
1554 1.182 bouyer {
1555 1.192 thorpej struct ata_command *ata_c = xfer->c_cmd;
1556 1.182 bouyer
1557 1.192 thorpej ata_c->flags |= AT_DONE;
1558 1.198 thorpej ata_free_xfer(chp, xfer);
1559 1.192 thorpej if (ata_c->flags & AT_WAIT)
1560 1.192 thorpej wakeup(ata_c);
1561 1.192 thorpej else if (ata_c->callback)
1562 1.192 thorpej ata_c->callback(ata_c->callback_arg);
1563 1.202 thorpej atastart(chp);
1564 1.31 bouyer return;
1565 1.2 bouyer }
1566 1.2 bouyer
1567 1.182 bouyer static void
1568 1.205 thorpej __wdccommand_kill_xfer(struct ata_channel *chp, struct ata_xfer *xfer,
1569 1.182 bouyer int reason)
1570 1.182 bouyer {
1571 1.192 thorpej struct ata_command *ata_c = xfer->c_cmd;
1572 1.182 bouyer
1573 1.182 bouyer switch (reason) {
1574 1.182 bouyer case KILL_GONE:
1575 1.192 thorpej ata_c->flags |= AT_GONE;
1576 1.219 perry break;
1577 1.182 bouyer case KILL_RESET:
1578 1.192 thorpej ata_c->flags |= AT_RESET;
1579 1.182 bouyer break;
1580 1.182 bouyer default:
1581 1.182 bouyer printf("__wdccommand_kill_xfer: unknown reason %d\n",
1582 1.182 bouyer reason);
1583 1.182 bouyer panic("__wdccommand_kill_xfer");
1584 1.182 bouyer }
1585 1.182 bouyer __wdccommand_done_end(chp, xfer);
1586 1.182 bouyer }
1587 1.182 bouyer
1588 1.2 bouyer /*
1589 1.31 bouyer * Send a command. The drive should be ready.
1590 1.2 bouyer * Assumes interrupts are blocked.
1591 1.2 bouyer */
1592 1.31 bouyer void
1593 1.205 thorpej wdccommand(struct ata_channel *chp, u_int8_t drive, u_int8_t command,
1594 1.163 thorpej u_int16_t cylin, u_int8_t head, u_int8_t sector, u_int8_t count,
1595 1.178 thorpej u_int8_t features)
1596 1.31 bouyer {
1597 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
1598 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
1599 1.205 thorpej struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
1600 1.163 thorpej
1601 1.204 thorpej ATADEBUG_PRINT(("wdccommand %s:%d:%d: command=0x%x cylin=%d head=%d "
1602 1.207 thorpej "sector=%d count=%d features=%d\n", atac->atac_dev.dv_xname,
1603 1.169 thorpej chp->ch_channel, drive, command, cylin, head, sector, count,
1604 1.178 thorpej features), DEBUG_FUNCS);
1605 1.31 bouyer
1606 1.203 thorpej if (wdc->select)
1607 1.169 thorpej wdc->select(chp,drive);
1608 1.107 dbj
1609 1.31 bouyer /* Select drive, head, and addressing mode. */
1610 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh], 0,
1611 1.31 bouyer WDSD_IBM | (drive << 4) | head);
1612 1.177 thorpej /* Load parameters into the wd_features register. */
1613 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_features], 0,
1614 1.178 thorpej features);
1615 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_seccnt], 0, count);
1616 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sector], 0, sector);
1617 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_cyl_lo], 0, cylin);
1618 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_cyl_hi],
1619 1.157 fvdl 0, cylin >> 8);
1620 1.108 christos
1621 1.108 christos /* Send command. */
1622 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_command], 0, command);
1623 1.108 christos return;
1624 1.108 christos }
1625 1.108 christos
1626 1.108 christos /*
1627 1.108 christos * Send a 48-bit addressing command. The drive should be ready.
1628 1.108 christos * Assumes interrupts are blocked.
1629 1.108 christos */
1630 1.108 christos void
1631 1.205 thorpej wdccommandext(struct ata_channel *chp, u_int8_t drive, u_int8_t command,
1632 1.163 thorpej u_int64_t blkno, u_int16_t count)
1633 1.108 christos {
1634 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
1635 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
1636 1.205 thorpej struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
1637 1.163 thorpej
1638 1.204 thorpej ATADEBUG_PRINT(("wdccommandext %s:%d:%d: command=0x%x blkno=%d "
1639 1.207 thorpej "count=%d\n", atac->atac_dev.dv_xname,
1640 1.169 thorpej chp->ch_channel, drive, command, (u_int32_t) blkno, count),
1641 1.108 christos DEBUG_FUNCS);
1642 1.108 christos
1643 1.203 thorpej if (wdc->select)
1644 1.169 thorpej wdc->select(chp,drive);
1645 1.108 christos
1646 1.108 christos /* Select drive, head, and addressing mode. */
1647 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh], 0,
1648 1.108 christos (drive << 4) | WDSD_LBA);
1649 1.108 christos
1650 1.218 rearnsha if (wdc->cap & WDC_CAPABILITY_WIDEREGS) {
1651 1.218 rearnsha bus_space_write_2(wdr->cmd_iot, wdr->cmd_iohs[wd_features], 0,
1652 1.218 rearnsha 0);
1653 1.218 rearnsha bus_space_write_2(wdr->cmd_iot, wdr->cmd_iohs[wd_seccnt],
1654 1.218 rearnsha 0, count);
1655 1.218 rearnsha bus_space_write_2(wdr->cmd_iot, wdr->cmd_iohs[wd_lba_lo],
1656 1.218 rearnsha 0, (((blkno >> 16) & 0xff00) | (blkno & 0x00ff)));
1657 1.218 rearnsha bus_space_write_2(wdr->cmd_iot, wdr->cmd_iohs[wd_lba_mi],
1658 1.218 rearnsha 0, (((blkno >> 24) & 0xff00) | ((blkno >> 8) & 0x00ff)));
1659 1.218 rearnsha bus_space_write_2(wdr->cmd_iot, wdr->cmd_iohs[wd_lba_hi],
1660 1.218 rearnsha 0, (((blkno >> 32) & 0xff00) | ((blkno >> 16) & 0x00ff)));
1661 1.218 rearnsha } else {
1662 1.218 rearnsha /* previous */
1663 1.218 rearnsha bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_features], 0,
1664 1.218 rearnsha 0);
1665 1.218 rearnsha bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_seccnt],
1666 1.218 rearnsha 0, count >> 8);
1667 1.218 rearnsha bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_lba_lo],
1668 1.218 rearnsha 0, blkno >> 24);
1669 1.218 rearnsha bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_lba_mi],
1670 1.218 rearnsha 0, blkno >> 32);
1671 1.218 rearnsha bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_lba_hi],
1672 1.218 rearnsha 0, blkno >> 40);
1673 1.218 rearnsha
1674 1.218 rearnsha /* current */
1675 1.218 rearnsha bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_features], 0,
1676 1.218 rearnsha 0);
1677 1.218 rearnsha bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_seccnt], 0,
1678 1.218 rearnsha count);
1679 1.218 rearnsha bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_lba_lo], 0,
1680 1.218 rearnsha blkno);
1681 1.218 rearnsha bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_lba_mi],
1682 1.218 rearnsha 0, blkno >> 8);
1683 1.218 rearnsha bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_lba_hi],
1684 1.218 rearnsha 0, blkno >> 16);
1685 1.218 rearnsha }
1686 1.2 bouyer
1687 1.31 bouyer /* Send command. */
1688 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_command], 0, command);
1689 1.31 bouyer return;
1690 1.2 bouyer }
1691 1.2 bouyer
1692 1.2 bouyer /*
1693 1.31 bouyer * Simplified version of wdccommand(). Unbusy/ready/drq must be
1694 1.31 bouyer * tested by the caller.
1695 1.2 bouyer */
1696 1.31 bouyer void
1697 1.205 thorpej wdccommandshort(struct ata_channel *chp, int drive, int command)
1698 1.2 bouyer {
1699 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
1700 1.207 thorpej struct wdc_softc *wdc = CHAN_TO_WDC(chp);
1701 1.205 thorpej struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
1702 1.2 bouyer
1703 1.204 thorpej ATADEBUG_PRINT(("wdccommandshort %s:%d:%d command 0x%x\n",
1704 1.207 thorpej atac->atac_dev.dv_xname, chp->ch_channel, drive, command),
1705 1.31 bouyer DEBUG_FUNCS);
1706 1.107 dbj
1707 1.203 thorpej if (wdc->select)
1708 1.169 thorpej wdc->select(chp,drive);
1709 1.2 bouyer
1710 1.31 bouyer /* Select drive. */
1711 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh], 0,
1712 1.31 bouyer WDSD_IBM | (drive << 4));
1713 1.2 bouyer
1714 1.205 thorpej bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_command], 0, command);
1715 1.31 bouyer }
1716 1.2 bouyer
1717 1.31 bouyer static void
1718 1.222 christos __wdcerror(struct ata_channel *chp, const char *msg)
1719 1.2 bouyer {
1720 1.207 thorpej struct atac_softc *atac = chp->ch_atac;
1721 1.217 bouyer struct ata_xfer *xfer = chp->ch_queue->active_xfer;
1722 1.88 mrg
1723 1.2 bouyer if (xfer == NULL)
1724 1.207 thorpej printf("%s:%d: %s\n", atac->atac_dev.dv_xname, chp->ch_channel,
1725 1.31 bouyer msg);
1726 1.2 bouyer else
1727 1.207 thorpej printf("%s:%d:%d: %s\n", atac->atac_dev.dv_xname,
1728 1.169 thorpej chp->ch_channel, xfer->c_drive, msg);
1729 1.2 bouyer }
1730 1.2 bouyer
1731 1.219 perry /*
1732 1.2 bouyer * the bit bucket
1733 1.2 bouyer */
1734 1.2 bouyer void
1735 1.205 thorpej wdcbit_bucket(struct ata_channel *chp, int size)
1736 1.2 bouyer {
1737 1.207 thorpej struct wdc_regs *wdr = CHAN_TO_WDC_REGS(chp);
1738 1.2 bouyer
1739 1.12 cgd for (; size >= 2; size -= 2)
1740 1.205 thorpej (void)bus_space_read_2(wdr->cmd_iot, wdr->cmd_iohs[wd_data], 0);
1741 1.12 cgd if (size)
1742 1.205 thorpej (void)bus_space_read_1(wdr->cmd_iot, wdr->cmd_iohs[wd_data], 0);
1743 1.44 thorpej }
1744 1.44 thorpej
1745 1.213 thorpej static void
1746 1.222 christos wdc_datain_pio(struct ata_channel *chp, int flags, void *bf, size_t len)
1747 1.190 mycroft {
1748 1.207 thorpej struct wdc_regs *wdr = CHAN_TO_WDC_REGS(chp);
1749 1.190 mycroft
1750 1.190 mycroft if (flags & DRIVE_NOSTREAM) {
1751 1.190 mycroft if (flags & DRIVE_CAP32) {
1752 1.205 thorpej bus_space_read_multi_4(wdr->data32iot,
1753 1.222 christos wdr->data32ioh, 0, bf, len >> 2);
1754 1.222 christos bf = (char *)bf + (len & ~3);
1755 1.190 mycroft len &= 3;
1756 1.190 mycroft }
1757 1.190 mycroft if (len) {
1758 1.205 thorpej bus_space_read_multi_2(wdr->cmd_iot,
1759 1.222 christos wdr->cmd_iohs[wd_data], 0, bf, len >> 1);
1760 1.190 mycroft }
1761 1.190 mycroft } else {
1762 1.190 mycroft if (flags & DRIVE_CAP32) {
1763 1.205 thorpej bus_space_read_multi_stream_4(wdr->data32iot,
1764 1.222 christos wdr->data32ioh, 0, bf, len >> 2);
1765 1.222 christos bf = (char *)bf + (len & ~3);
1766 1.190 mycroft len &= 3;
1767 1.190 mycroft }
1768 1.190 mycroft if (len) {
1769 1.205 thorpej bus_space_read_multi_stream_2(wdr->cmd_iot,
1770 1.222 christos wdr->cmd_iohs[wd_data], 0, bf, len >> 1);
1771 1.190 mycroft }
1772 1.190 mycroft }
1773 1.190 mycroft }
1774 1.190 mycroft
1775 1.213 thorpej static void
1776 1.222 christos wdc_dataout_pio(struct ata_channel *chp, int flags, void *bf, size_t len)
1777 1.190 mycroft {
1778 1.207 thorpej struct wdc_regs *wdr = CHAN_TO_WDC_REGS(chp);
1779 1.190 mycroft
1780 1.190 mycroft if (flags & DRIVE_NOSTREAM) {
1781 1.190 mycroft if (flags & DRIVE_CAP32) {
1782 1.205 thorpej bus_space_write_multi_4(wdr->data32iot,
1783 1.222 christos wdr->data32ioh, 0, bf, len >> 2);
1784 1.222 christos bf = (char *)bf + (len & ~3);
1785 1.190 mycroft len &= 3;
1786 1.190 mycroft }
1787 1.190 mycroft if (len) {
1788 1.205 thorpej bus_space_write_multi_2(wdr->cmd_iot,
1789 1.222 christos wdr->cmd_iohs[wd_data], 0, bf, len >> 1);
1790 1.190 mycroft }
1791 1.190 mycroft } else {
1792 1.190 mycroft if (flags & DRIVE_CAP32) {
1793 1.205 thorpej bus_space_write_multi_stream_4(wdr->data32iot,
1794 1.222 christos wdr->data32ioh, 0, bf, len >> 2);
1795 1.222 christos bf = (char *)bf + (len & ~3);
1796 1.190 mycroft len &= 3;
1797 1.190 mycroft }
1798 1.190 mycroft if (len) {
1799 1.205 thorpej bus_space_write_multi_stream_2(wdr->cmd_iot,
1800 1.222 christos wdr->cmd_iohs[wd_data], 0, bf, len >> 1);
1801 1.190 mycroft }
1802 1.190 mycroft }
1803 1.190 mycroft }
1804