ahcisata_core.c revision 1.56 1 /* $NetBSD: ahcisata_core.c,v 1.56 2016/05/02 19:18:29 christos Exp $ */
2
3 /*
4 * Copyright (c) 2006 Manuel Bouyer.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25 *
26 */
27
28 #include <sys/cdefs.h>
29 __KERNEL_RCSID(0, "$NetBSD: ahcisata_core.c,v 1.56 2016/05/02 19:18:29 christos Exp $");
30
31 #include <sys/types.h>
32 #include <sys/malloc.h>
33 #include <sys/param.h>
34 #include <sys/kernel.h>
35 #include <sys/systm.h>
36 #include <sys/disklabel.h>
37 #include <sys/proc.h>
38 #include <sys/buf.h>
39
40 #include <dev/ata/atareg.h>
41 #include <dev/ata/satavar.h>
42 #include <dev/ata/satareg.h>
43 #include <dev/ata/satafisvar.h>
44 #include <dev/ata/satafisreg.h>
45 #include <dev/ata/satapmpreg.h>
46 #include <dev/ic/ahcisatavar.h>
47 #include <dev/ic/wdcreg.h>
48
49 #include <dev/scsipi/scsi_all.h> /* for SCSI status */
50
51 #include "atapibus.h"
52
53 #ifdef AHCI_DEBUG
54 int ahcidebug_mask = 0;
55 #endif
56
57 static void ahci_probe_drive(struct ata_channel *);
58 static void ahci_setup_channel(struct ata_channel *);
59
60 static int ahci_ata_bio(struct ata_drive_datas *, struct ata_bio *);
61 static int ahci_do_reset_drive(struct ata_channel *, int, int, uint32_t *);
62 static void ahci_reset_drive(struct ata_drive_datas *, int, uint32_t *);
63 static void ahci_reset_channel(struct ata_channel *, int);
64 static int ahci_exec_command(struct ata_drive_datas *, struct ata_command *);
65 static int ahci_ata_addref(struct ata_drive_datas *);
66 static void ahci_ata_delref(struct ata_drive_datas *);
67 static void ahci_killpending(struct ata_drive_datas *);
68
69 static void ahci_cmd_start(struct ata_channel *, struct ata_xfer *);
70 static int ahci_cmd_complete(struct ata_channel *, struct ata_xfer *, int);
71 static void ahci_cmd_done(struct ata_channel *, struct ata_xfer *, int);
72 static void ahci_cmd_kill_xfer(struct ata_channel *, struct ata_xfer *, int) ;
73 static void ahci_bio_start(struct ata_channel *, struct ata_xfer *);
74 static int ahci_bio_complete(struct ata_channel *, struct ata_xfer *, int);
75 static void ahci_bio_kill_xfer(struct ata_channel *, struct ata_xfer *, int) ;
76 static void ahci_channel_stop(struct ahci_softc *, struct ata_channel *, int);
77 static void ahci_channel_start(struct ahci_softc *, struct ata_channel *,
78 int, int);
79 static void ahci_timeout(void *);
80 static int ahci_dma_setup(struct ata_channel *, int, void *, size_t, int);
81
82 #if NATAPIBUS > 0
83 static void ahci_atapibus_attach(struct atabus_softc *);
84 static void ahci_atapi_kill_pending(struct scsipi_periph *);
85 static void ahci_atapi_minphys(struct buf *);
86 static void ahci_atapi_scsipi_request(struct scsipi_channel *,
87 scsipi_adapter_req_t, void *);
88 static void ahci_atapi_start(struct ata_channel *, struct ata_xfer *);
89 static int ahci_atapi_complete(struct ata_channel *, struct ata_xfer *, int);
90 static void ahci_atapi_kill_xfer(struct ata_channel *, struct ata_xfer *, int);
91 static void ahci_atapi_probe_device(struct atapibus_softc *, int);
92
93 static const struct scsipi_bustype ahci_atapi_bustype = {
94 SCSIPI_BUSTYPE_ATAPI,
95 atapi_scsipi_cmd,
96 atapi_interpret_sense,
97 atapi_print_addr,
98 ahci_atapi_kill_pending,
99 NULL,
100 };
101 #endif /* NATAPIBUS */
102
103 #define ATA_DELAY 10000 /* 10s for a drive I/O */
104 #define ATA_RESET_DELAY 31000 /* 31s for a drive reset */
105 #define AHCI_RST_WAIT (ATA_RESET_DELAY / 10)
106
107 const struct ata_bustype ahci_ata_bustype = {
108 SCSIPI_BUSTYPE_ATA,
109 ahci_ata_bio,
110 ahci_reset_drive,
111 ahci_reset_channel,
112 ahci_exec_command,
113 ata_get_params,
114 ahci_ata_addref,
115 ahci_ata_delref,
116 ahci_killpending
117 };
118
119 static void ahci_intr_port(struct ahci_softc *, struct ahci_channel *);
120 static void ahci_setup_port(struct ahci_softc *sc, int i);
121
122 static void
123 ahci_enable(struct ahci_softc *sc)
124 {
125 uint32_t ghc;
126
127 ghc = AHCI_READ(sc, AHCI_GHC);
128 if (!(ghc & AHCI_GHC_AE)) {
129 ghc |= AHCI_GHC_AE;
130 AHCI_WRITE(sc, AHCI_GHC, ghc);
131 }
132 }
133
134 static int
135 ahci_reset(struct ahci_softc *sc)
136 {
137 int i;
138
139 /* reset controller */
140 AHCI_WRITE(sc, AHCI_GHC, AHCI_GHC_HR);
141 /* wait up to 1s for reset to complete */
142 for (i = 0; i < 1000; i++) {
143 delay(1000);
144 if ((AHCI_READ(sc, AHCI_GHC) & AHCI_GHC_HR) == 0)
145 break;
146 }
147 if ((AHCI_READ(sc, AHCI_GHC) & AHCI_GHC_HR)) {
148 aprint_error("%s: reset failed\n", AHCINAME(sc));
149 return -1;
150 }
151 /* enable ahci mode */
152 ahci_enable(sc);
153
154 if (sc->sc_save_init_data) {
155 AHCI_WRITE(sc, AHCI_CAP, sc->sc_init_data.cap);
156 if (sc->sc_init_data.cap2)
157 AHCI_WRITE(sc, AHCI_CAP2, sc->sc_init_data.cap2);
158 AHCI_WRITE(sc, AHCI_PI, sc->sc_init_data.ports);
159 }
160
161 return 0;
162 }
163
164 static void
165 ahci_setup_ports(struct ahci_softc *sc)
166 {
167 int i, port;
168
169 for (i = 0, port = 0; i < AHCI_MAX_PORTS; i++) {
170 if ((sc->sc_ahci_ports & (1 << i)) == 0)
171 continue;
172 if (port >= sc->sc_atac.atac_nchannels) {
173 aprint_error("%s: more ports than announced\n",
174 AHCINAME(sc));
175 break;
176 }
177 ahci_setup_port(sc, i);
178 }
179 }
180
181 static void
182 ahci_reprobe_drives(struct ahci_softc *sc)
183 {
184 int i, port;
185 struct ahci_channel *achp;
186 struct ata_channel *chp;
187
188 for (i = 0, port = 0; i < AHCI_MAX_PORTS; i++) {
189 if ((sc->sc_ahci_ports & (1 << i)) == 0)
190 continue;
191 if (port >= sc->sc_atac.atac_nchannels) {
192 aprint_error("%s: more ports than announced\n",
193 AHCINAME(sc));
194 break;
195 }
196 achp = &sc->sc_channels[i];
197 chp = &achp->ata_channel;
198
199 ahci_probe_drive(chp);
200 }
201 }
202
203 static void
204 ahci_setup_port(struct ahci_softc *sc, int i)
205 {
206 struct ahci_channel *achp;
207
208 achp = &sc->sc_channels[i];
209
210 AHCI_WRITE(sc, AHCI_P_CLB(i), achp->ahcic_bus_cmdh);
211 AHCI_WRITE(sc, AHCI_P_CLBU(i), (uint64_t)achp->ahcic_bus_cmdh>>32);
212 AHCI_WRITE(sc, AHCI_P_FB(i), achp->ahcic_bus_rfis);
213 AHCI_WRITE(sc, AHCI_P_FBU(i), (uint64_t)achp->ahcic_bus_rfis>>32);
214 }
215
216 static void
217 ahci_enable_intrs(struct ahci_softc *sc)
218 {
219
220 /* clear interrupts */
221 AHCI_WRITE(sc, AHCI_IS, AHCI_READ(sc, AHCI_IS));
222 /* enable interrupts */
223 AHCI_WRITE(sc, AHCI_GHC, AHCI_READ(sc, AHCI_GHC) | AHCI_GHC_IE);
224 }
225
226 void
227 ahci_attach(struct ahci_softc *sc)
228 {
229 uint32_t ahci_rev;
230 int i, j, port;
231 struct ahci_channel *achp;
232 struct ata_channel *chp;
233 int error;
234 int dmasize;
235 char buf[128];
236 void *cmdhp;
237 void *cmdtblp;
238
239 if (sc->sc_save_init_data) {
240 ahci_enable(sc);
241
242 sc->sc_init_data.cap = AHCI_READ(sc, AHCI_CAP);
243 sc->sc_init_data.ports = AHCI_READ(sc, AHCI_PI);
244
245 ahci_rev = AHCI_READ(sc, AHCI_VS);
246 if (AHCI_VS_MJR(ahci_rev) > 1 ||
247 (AHCI_VS_MJR(ahci_rev) == 1 && AHCI_VS_MNR(ahci_rev) >= 20)) {
248 sc->sc_init_data.cap2 = AHCI_READ(sc, AHCI_CAP2);
249 } else {
250 sc->sc_init_data.cap2 = 0;
251 }
252 if (sc->sc_init_data.ports == 0) {
253 sc->sc_init_data.ports = sc->sc_ahci_ports;
254 }
255 }
256
257 if (ahci_reset(sc) != 0)
258 return;
259
260 sc->sc_ahci_cap = AHCI_READ(sc, AHCI_CAP);
261 if (sc->sc_ahci_quirks & AHCI_QUIRK_BADPMP) {
262 aprint_verbose_dev(sc->sc_atac.atac_dev,
263 "ignoring broken port multiplier support\n");
264 sc->sc_ahci_cap &= ~AHCI_CAP_SPM;
265 }
266 sc->sc_atac.atac_nchannels = (sc->sc_ahci_cap & AHCI_CAP_NPMASK) + 1;
267 sc->sc_ncmds = ((sc->sc_ahci_cap & AHCI_CAP_NCS) >> 8) + 1;
268 ahci_rev = AHCI_READ(sc, AHCI_VS);
269 snprintb(buf, sizeof(buf), "\177\020"
270 /* "f\000\005NP\0" */
271 "b\005SXS\0"
272 "b\006EMS\0"
273 "b\007CCCS\0"
274 /* "f\010\005NCS\0" */
275 "b\015PSC\0"
276 "b\016SSC\0"
277 "b\017PMD\0"
278 "b\020FBSS\0"
279 "b\021SPM\0"
280 "b\022SAM\0"
281 "b\023SNZO\0"
282 "f\024\003ISS\0"
283 "=\001Gen1\0"
284 "=\002Gen2\0"
285 "=\003Gen3\0"
286 "b\030SCLO\0"
287 "b\031SAL\0"
288 "b\032SALP\0"
289 "b\033SSS\0"
290 "b\034SMPS\0"
291 "b\035SSNTF\0"
292 "b\036SNCQ\0"
293 "b\037S64A\0"
294 "\0", sc->sc_ahci_cap);
295 aprint_normal_dev(sc->sc_atac.atac_dev, "AHCI revision %u.%u"
296 ", %d port%s, %d slot%s, CAP %s\n",
297 AHCI_VS_MJR(ahci_rev), AHCI_VS_MNR(ahci_rev),
298 sc->sc_atac.atac_nchannels,
299 (sc->sc_atac.atac_nchannels == 1 ? "" : "s"),
300 sc->sc_ncmds, (sc->sc_ncmds == 1 ? "" : "s"), buf);
301
302 sc->sc_atac.atac_cap = ATAC_CAP_DATA16 | ATAC_CAP_DMA | ATAC_CAP_UDMA;
303 sc->sc_atac.atac_cap |= sc->sc_atac_capflags;
304 sc->sc_atac.atac_pio_cap = 4;
305 sc->sc_atac.atac_dma_cap = 2;
306 sc->sc_atac.atac_udma_cap = 6;
307 sc->sc_atac.atac_channels = sc->sc_chanarray;
308 sc->sc_atac.atac_probe = ahci_probe_drive;
309 sc->sc_atac.atac_bustype_ata = &ahci_ata_bustype;
310 sc->sc_atac.atac_set_modes = ahci_setup_channel;
311 #if NATAPIBUS > 0
312 sc->sc_atac.atac_atapibus_attach = ahci_atapibus_attach;
313 #endif
314
315 dmasize =
316 (AHCI_RFIS_SIZE + AHCI_CMDH_SIZE) * sc->sc_atac.atac_nchannels;
317 error = bus_dmamem_alloc(sc->sc_dmat, dmasize, PAGE_SIZE, 0,
318 &sc->sc_cmd_hdr_seg, 1, &sc->sc_cmd_hdr_nseg, BUS_DMA_NOWAIT);
319 if (error) {
320 aprint_error("%s: unable to allocate command header memory"
321 ", error=%d\n", AHCINAME(sc), error);
322 return;
323 }
324 error = bus_dmamem_map(sc->sc_dmat, &sc->sc_cmd_hdr_seg,
325 sc->sc_cmd_hdr_nseg, dmasize,
326 &cmdhp, BUS_DMA_NOWAIT|BUS_DMA_COHERENT);
327 if (error) {
328 aprint_error("%s: unable to map command header memory"
329 ", error=%d\n", AHCINAME(sc), error);
330 return;
331 }
332 error = bus_dmamap_create(sc->sc_dmat, dmasize, 1, dmasize, 0,
333 BUS_DMA_NOWAIT, &sc->sc_cmd_hdrd);
334 if (error) {
335 aprint_error("%s: unable to create command header map"
336 ", error=%d\n", AHCINAME(sc), error);
337 return;
338 }
339 error = bus_dmamap_load(sc->sc_dmat, sc->sc_cmd_hdrd,
340 cmdhp, dmasize, NULL, BUS_DMA_NOWAIT);
341 if (error) {
342 aprint_error("%s: unable to load command header map"
343 ", error=%d\n", AHCINAME(sc), error);
344 return;
345 }
346 sc->sc_cmd_hdr = cmdhp;
347
348 ahci_enable_intrs(sc);
349
350 if (sc->sc_ahci_ports == 0) {
351 sc->sc_ahci_ports = AHCI_READ(sc, AHCI_PI);
352 AHCIDEBUG_PRINT(("active ports %#x\n", sc->sc_ahci_ports),
353 DEBUG_PROBE);
354 }
355 for (i = 0, port = 0; i < AHCI_MAX_PORTS; i++) {
356 if ((sc->sc_ahci_ports & (1 << i)) == 0)
357 continue;
358 if (port >= sc->sc_atac.atac_nchannels) {
359 aprint_error("%s: more ports than announced\n",
360 AHCINAME(sc));
361 break;
362 }
363 achp = &sc->sc_channels[i];
364 chp = &achp->ata_channel;
365 sc->sc_chanarray[i] = chp;
366 chp->ch_channel = i;
367 chp->ch_atac = &sc->sc_atac;
368 chp->ch_queue = malloc(sizeof(struct ata_queue),
369 M_DEVBUF, M_NOWAIT|M_ZERO);
370 if (chp->ch_queue == NULL) {
371 aprint_error("%s port %d: can't allocate memory for "
372 "command queue", AHCINAME(sc), i);
373 break;
374 }
375 dmasize = AHCI_CMDTBL_SIZE * sc->sc_ncmds;
376 error = bus_dmamem_alloc(sc->sc_dmat, dmasize, PAGE_SIZE, 0,
377 &achp->ahcic_cmd_tbl_seg, 1, &achp->ahcic_cmd_tbl_nseg,
378 BUS_DMA_NOWAIT);
379 if (error) {
380 aprint_error("%s: unable to allocate command table "
381 "memory, error=%d\n", AHCINAME(sc), error);
382 break;
383 }
384 error = bus_dmamem_map(sc->sc_dmat, &achp->ahcic_cmd_tbl_seg,
385 achp->ahcic_cmd_tbl_nseg, dmasize,
386 &cmdtblp, BUS_DMA_NOWAIT|BUS_DMA_COHERENT);
387 if (error) {
388 aprint_error("%s: unable to map command table memory"
389 ", error=%d\n", AHCINAME(sc), error);
390 break;
391 }
392 error = bus_dmamap_create(sc->sc_dmat, dmasize, 1, dmasize, 0,
393 BUS_DMA_NOWAIT, &achp->ahcic_cmd_tbld);
394 if (error) {
395 aprint_error("%s: unable to create command table map"
396 ", error=%d\n", AHCINAME(sc), error);
397 break;
398 }
399 error = bus_dmamap_load(sc->sc_dmat, achp->ahcic_cmd_tbld,
400 cmdtblp, dmasize, NULL, BUS_DMA_NOWAIT);
401 if (error) {
402 aprint_error("%s: unable to load command table map"
403 ", error=%d\n", AHCINAME(sc), error);
404 break;
405 }
406 achp->ahcic_cmdh = (struct ahci_cmd_header *)
407 ((char *)cmdhp + AHCI_CMDH_SIZE * port);
408 achp->ahcic_bus_cmdh = sc->sc_cmd_hdrd->dm_segs[0].ds_addr +
409 AHCI_CMDH_SIZE * port;
410 achp->ahcic_rfis = (struct ahci_r_fis *)
411 ((char *)cmdhp +
412 AHCI_CMDH_SIZE * sc->sc_atac.atac_nchannels +
413 AHCI_RFIS_SIZE * port);
414 achp->ahcic_bus_rfis = sc->sc_cmd_hdrd->dm_segs[0].ds_addr +
415 AHCI_CMDH_SIZE * sc->sc_atac.atac_nchannels +
416 AHCI_RFIS_SIZE * port;
417 AHCIDEBUG_PRINT(("port %d cmdh %p (0x%" PRIx64 ") "
418 "rfis %p (0x%" PRIx64 ")\n", i,
419 achp->ahcic_cmdh, (uint64_t)achp->ahcic_bus_cmdh,
420 achp->ahcic_rfis, (uint64_t)achp->ahcic_bus_rfis),
421 DEBUG_PROBE);
422
423 for (j = 0; j < sc->sc_ncmds; j++) {
424 achp->ahcic_cmd_tbl[j] = (struct ahci_cmd_tbl *)
425 ((char *)cmdtblp + AHCI_CMDTBL_SIZE * j);
426 achp->ahcic_bus_cmd_tbl[j] =
427 achp->ahcic_cmd_tbld->dm_segs[0].ds_addr +
428 AHCI_CMDTBL_SIZE * j;
429 achp->ahcic_cmdh[j].cmdh_cmdtba =
430 htole64(achp->ahcic_bus_cmd_tbl[j]);
431 AHCIDEBUG_PRINT(("port %d/%d tbl %p (0x%" PRIx64 ")\n", i, j,
432 achp->ahcic_cmd_tbl[j],
433 (uint64_t)achp->ahcic_bus_cmd_tbl[j]), DEBUG_PROBE);
434 /* The xfer DMA map */
435 error = bus_dmamap_create(sc->sc_dmat, MAXPHYS,
436 AHCI_NPRD, 0x400000 /* 4MB */, 0,
437 BUS_DMA_NOWAIT | BUS_DMA_ALLOCNOW,
438 &achp->ahcic_datad[j]);
439 if (error) {
440 aprint_error("%s: couldn't alloc xfer DMA map, "
441 "error=%d\n", AHCINAME(sc), error);
442 goto end;
443 }
444 }
445 ahci_setup_port(sc, i);
446 if (bus_space_subregion(sc->sc_ahcit, sc->sc_ahcih,
447 AHCI_P_SSTS(i), 4, &achp->ahcic_sstatus) != 0) {
448 aprint_error("%s: couldn't map channel %d "
449 "sata_status regs\n", AHCINAME(sc), i);
450 break;
451 }
452 if (bus_space_subregion(sc->sc_ahcit, sc->sc_ahcih,
453 AHCI_P_SCTL(i), 4, &achp->ahcic_scontrol) != 0) {
454 aprint_error("%s: couldn't map channel %d "
455 "sata_control regs\n", AHCINAME(sc), i);
456 break;
457 }
458 if (bus_space_subregion(sc->sc_ahcit, sc->sc_ahcih,
459 AHCI_P_SERR(i), 4, &achp->ahcic_serror) != 0) {
460 aprint_error("%s: couldn't map channel %d "
461 "sata_error regs\n", AHCINAME(sc), i);
462 break;
463 }
464 ata_channel_attach(chp);
465 port++;
466 end:
467 continue;
468 }
469 }
470
471 int
472 ahci_detach(struct ahci_softc *sc, int flags)
473 {
474 struct atac_softc *atac;
475 struct ahci_channel *achp;
476 struct ata_channel *chp;
477 struct scsipi_adapter *adapt;
478 int i, j;
479 int error;
480
481 atac = &sc->sc_atac;
482 adapt = &atac->atac_atapi_adapter._generic;
483
484 for (i = 0; i < AHCI_MAX_PORTS; i++) {
485 achp = &sc->sc_channels[i];
486 chp = &achp->ata_channel;
487
488 if ((sc->sc_ahci_ports & (1 << i)) == 0)
489 continue;
490 if (i >= sc->sc_atac.atac_nchannels) {
491 aprint_error("%s: more ports than announced\n",
492 AHCINAME(sc));
493 break;
494 }
495
496 if (chp->atabus == NULL)
497 continue;
498 if ((error = config_detach(chp->atabus, flags)) != 0)
499 return error;
500
501 for (j = 0; j < sc->sc_ncmds; j++)
502 bus_dmamap_destroy(sc->sc_dmat, achp->ahcic_datad[j]);
503
504 bus_dmamap_unload(sc->sc_dmat, achp->ahcic_cmd_tbld);
505 bus_dmamap_destroy(sc->sc_dmat, achp->ahcic_cmd_tbld);
506 bus_dmamem_unmap(sc->sc_dmat, achp->ahcic_cmd_tbl[0],
507 AHCI_CMDTBL_SIZE * sc->sc_ncmds);
508 bus_dmamem_free(sc->sc_dmat, &achp->ahcic_cmd_tbl_seg,
509 achp->ahcic_cmd_tbl_nseg);
510
511 free(chp->ch_queue, M_DEVBUF);
512 chp->atabus = NULL;
513 }
514
515 bus_dmamap_unload(sc->sc_dmat, sc->sc_cmd_hdrd);
516 bus_dmamap_destroy(sc->sc_dmat, sc->sc_cmd_hdrd);
517 bus_dmamem_unmap(sc->sc_dmat, sc->sc_cmd_hdr,
518 (AHCI_RFIS_SIZE + AHCI_CMDH_SIZE) * sc->sc_atac.atac_nchannels);
519 bus_dmamem_free(sc->sc_dmat, &sc->sc_cmd_hdr_seg, sc->sc_cmd_hdr_nseg);
520
521 if (adapt->adapt_refcnt != 0)
522 return EBUSY;
523
524 return 0;
525 }
526
527 void
528 ahci_resume(struct ahci_softc *sc)
529 {
530 ahci_reset(sc);
531 ahci_setup_ports(sc);
532 ahci_reprobe_drives(sc);
533 ahci_enable_intrs(sc);
534 }
535
536 int
537 ahci_intr(void *v)
538 {
539 struct ahci_softc *sc = v;
540 uint32_t is;
541 int i, r = 0;
542
543 while ((is = AHCI_READ(sc, AHCI_IS))) {
544 AHCIDEBUG_PRINT(("%s ahci_intr 0x%x\n", AHCINAME(sc), is),
545 DEBUG_INTR);
546 r = 1;
547 AHCI_WRITE(sc, AHCI_IS, is);
548 for (i = 0; i < AHCI_MAX_PORTS; i++)
549 if (is & (1 << i))
550 ahci_intr_port(sc, &sc->sc_channels[i]);
551 }
552 return r;
553 }
554
555 static void
556 ahci_intr_port(struct ahci_softc *sc, struct ahci_channel *achp)
557 {
558 uint32_t is, tfd;
559 struct ata_channel *chp = &achp->ata_channel;
560 struct ata_xfer *xfer = chp->ch_queue->active_xfer;
561 int slot;
562
563 is = AHCI_READ(sc, AHCI_P_IS(chp->ch_channel));
564 AHCI_WRITE(sc, AHCI_P_IS(chp->ch_channel), is);
565 AHCIDEBUG_PRINT(("ahci_intr_port %s port %d is 0x%x CI 0x%x\n", AHCINAME(sc),
566 chp->ch_channel, is, AHCI_READ(sc, AHCI_P_CI(chp->ch_channel))),
567 DEBUG_INTR);
568
569 if (is & (AHCI_P_IX_TFES | AHCI_P_IX_HBFS | AHCI_P_IX_IFS |
570 AHCI_P_IX_OFS | AHCI_P_IX_UFS)) {
571 slot = (AHCI_READ(sc, AHCI_P_CMD(chp->ch_channel))
572 & AHCI_P_CMD_CCS_MASK) >> AHCI_P_CMD_CCS_SHIFT;
573 if ((achp->ahcic_cmds_active & (1 << slot)) == 0)
574 return;
575 /* stop channel */
576 ahci_channel_stop(sc, chp, 0);
577 if (slot != 0) {
578 printf("ahci_intr_port: slot %d\n", slot);
579 panic("ahci_intr_port");
580 }
581 if (is & AHCI_P_IX_TFES) {
582 tfd = AHCI_READ(sc, AHCI_P_TFD(chp->ch_channel));
583 chp->ch_error =
584 (tfd & AHCI_P_TFD_ERR_MASK) >> AHCI_P_TFD_ERR_SHIFT;
585 chp->ch_status = (tfd & 0xff);
586 } else {
587 /* emulate a CRC error */
588 chp->ch_error = WDCE_CRC;
589 chp->ch_status = WDCS_ERR;
590 }
591 if (is & AHCI_P_IX_IFS) {
592 aprint_error("%s port %d: SERR 0x%x\n",
593 AHCINAME(sc), chp->ch_channel,
594 AHCI_READ(sc, AHCI_P_SERR(chp->ch_channel)));
595 }
596 xfer->c_intr(chp, xfer, is);
597 /* if channel has not been restarted, do it now */
598 if ((AHCI_READ(sc, AHCI_P_CMD(chp->ch_channel)) & AHCI_P_CMD_CR)
599 == 0)
600 ahci_channel_start(sc, chp, 0, 0);
601 } else {
602 slot = 0; /* XXX */
603 is = AHCI_READ(sc, AHCI_P_IS(chp->ch_channel));
604 AHCIDEBUG_PRINT(("ahci_intr_port port %d is 0x%x act 0x%x CI 0x%x\n",
605 chp->ch_channel, is, achp->ahcic_cmds_active,
606 AHCI_READ(sc, AHCI_P_CI(chp->ch_channel))), DEBUG_INTR);
607 if ((achp->ahcic_cmds_active & (1 << slot)) == 0)
608 return;
609 if ((AHCI_READ(sc, AHCI_P_CI(chp->ch_channel)) & (1 << slot))
610 == 0) {
611 xfer->c_intr(chp, xfer, 0);
612 }
613 }
614 }
615
616 static void
617 ahci_reset_drive(struct ata_drive_datas *drvp, int flags, uint32_t *sigp)
618 {
619 struct ata_channel *chp = drvp->chnl_softc;
620 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
621 AHCI_WRITE(sc, AHCI_GHC,
622 AHCI_READ(sc, AHCI_GHC) & ~AHCI_GHC_IE);
623 ahci_channel_stop(sc, chp, flags);
624 if (ahci_do_reset_drive(chp, drvp->drive, flags, sigp) != 0)
625 ata_reset_channel(chp, flags);
626 AHCI_WRITE(sc, AHCI_GHC, AHCI_READ(sc, AHCI_GHC) | AHCI_GHC_IE);
627 return;
628 }
629
630 /* return error code from ata_bio */
631 static int
632 ahci_exec_fis(struct ata_channel *chp, int timeout, int flags)
633 {
634 struct ahci_channel *achp = (struct ahci_channel *)chp;
635 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
636 int i;
637 uint32_t is;
638
639 /*
640 * Base timeout is specified in ms.
641 * If we are allowed to sleep, wait a tick each round.
642 * Otherwise delay for 10ms on each round.
643 */
644 if (flags & AT_WAIT)
645 timeout = MAX(1, mstohz(timeout));
646 else
647 timeout = timeout / 10;
648
649 AHCI_CMDH_SYNC(sc, achp, 0, BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
650 /* start command */
651 AHCI_WRITE(sc, AHCI_P_CI(chp->ch_channel), 1 << 0);
652 for (i = 0; i < timeout; i++) {
653 if ((AHCI_READ(sc, AHCI_P_CI(chp->ch_channel)) & 1 << 0) == 0)
654 return 0;
655 is = AHCI_READ(sc, AHCI_P_IS(chp->ch_channel));
656 if (is & (AHCI_P_IX_TFES | AHCI_P_IX_HBFS | AHCI_P_IX_IFS |
657 AHCI_P_IX_OFS | AHCI_P_IX_UFS)) {
658 if ((is & (AHCI_P_IX_DHRS|AHCI_P_IX_TFES)) ==
659 (AHCI_P_IX_DHRS|AHCI_P_IX_TFES)) {
660 /*
661 * we got the D2H FIS anyway,
662 * assume sig is valid.
663 * channel is restarted later
664 */
665 return ERROR;
666 }
667 aprint_debug("%s channel %d: error 0x%x sending FIS\n",
668 AHCINAME(sc), chp->ch_channel, is);
669 return ERR_DF;
670 }
671 if (flags & AT_WAIT)
672 tsleep(&sc, PRIBIO, "ahcifis", 1);
673 else
674 delay(10000);
675 }
676
677 aprint_debug("%s channel %d: timeout sending FIS\n",
678 AHCINAME(sc), chp->ch_channel);
679 return TIMEOUT;
680 }
681
682 static int
683 ahci_do_reset_drive(struct ata_channel *chp, int drive, int flags,
684 uint32_t *sigp)
685 {
686 struct ahci_channel *achp = (struct ahci_channel *)chp;
687 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
688 struct ahci_cmd_tbl *cmd_tbl;
689 struct ahci_cmd_header *cmd_h;
690 int i;
691 uint32_t sig;
692
693 KASSERT((AHCI_READ(sc, AHCI_P_CMD(chp->ch_channel)) & AHCI_P_CMD_CR) == 0);
694 again:
695 /* clear port interrupt register */
696 AHCI_WRITE(sc, AHCI_P_IS(chp->ch_channel), 0xffffffff);
697 /* clear SErrors and start operations */
698 if ((sc->sc_ahci_cap & AHCI_CAP_CLO) == AHCI_CAP_CLO) {
699 /*
700 * issue a command list override to clear BSY.
701 * This is needed if there's a PMP with no drive
702 * on port 0
703 */
704 ahci_channel_start(sc, chp, flags, 1);
705 } else {
706 ahci_channel_start(sc, chp, flags, 0);
707 }
708 if (drive > 0) {
709 KASSERT(sc->sc_ahci_cap & AHCI_CAP_SPM);
710 }
711
712 if (sc->sc_ahci_quirks & AHCI_QUIRK_SKIP_RESET)
713 goto skip_reset;
714
715 /* polled command, assume interrupts are disabled */
716 /* use slot 0 to send reset, the channel is idle */
717 cmd_h = &achp->ahcic_cmdh[0];
718 cmd_tbl = achp->ahcic_cmd_tbl[0];
719 cmd_h->cmdh_flags = htole16(AHCI_CMDH_F_RST | AHCI_CMDH_F_CBSY |
720 RHD_FISLEN / 4 | (drive << AHCI_CMDH_F_PMP_SHIFT));
721 cmd_h->cmdh_prdbc = 0;
722 memset(cmd_tbl->cmdt_cfis, 0, 64);
723 cmd_tbl->cmdt_cfis[fis_type] = RHD_FISTYPE;
724 cmd_tbl->cmdt_cfis[rhd_c] = drive;
725 cmd_tbl->cmdt_cfis[rhd_control] = WDCTL_RST;
726 switch(ahci_exec_fis(chp, 100, flags)) {
727 case ERR_DF:
728 case TIMEOUT:
729 aprint_error("%s channel %d: setting WDCTL_RST failed "
730 "for drive %d\n", AHCINAME(sc), chp->ch_channel, drive);
731 if (sigp)
732 *sigp = 0xffffffff;
733 goto end;
734 default:
735 break;
736 }
737 cmd_h->cmdh_flags = htole16(RHD_FISLEN / 4 |
738 (drive << AHCI_CMDH_F_PMP_SHIFT));
739 cmd_h->cmdh_prdbc = 0;
740 memset(cmd_tbl->cmdt_cfis, 0, 64);
741 cmd_tbl->cmdt_cfis[fis_type] = RHD_FISTYPE;
742 cmd_tbl->cmdt_cfis[rhd_c] = drive;
743 cmd_tbl->cmdt_cfis[rhd_control] = 0;
744 switch(ahci_exec_fis(chp, 310, flags)) {
745 case ERR_DF:
746 case TIMEOUT:
747 if ((sc->sc_ahci_quirks & AHCI_QUIRK_BADPMPRESET) != 0 &&
748 drive == PMP_PORT_CTL) {
749 /*
750 * some controllers fails to reset when
751 * targeting a PMP but a single drive is attached.
752 * try again with port 0
753 */
754 drive = 0;
755 ahci_channel_stop(sc, chp, flags);
756 goto again;
757 }
758 aprint_error("%s channel %d: clearing WDCTL_RST failed "
759 "for drive %d\n", AHCINAME(sc), chp->ch_channel, drive);
760 if (sigp)
761 *sigp = 0xffffffff;
762 goto end;
763 default:
764 break;
765 }
766
767 skip_reset:
768 /*
769 * wait 31s for BSY to clear
770 * This should not be needed, but some controllers clear the
771 * command slot before receiving the D2H FIS ...
772 */
773 for (i = 0; i < AHCI_RST_WAIT; i++) {
774 sig = AHCI_READ(sc, AHCI_P_TFD(chp->ch_channel));
775 if ((__SHIFTOUT(sig, AHCI_P_TFD_ST) & WDCS_BSY) == 0)
776 break;
777 if (flags & AT_WAIT)
778 tsleep(&sc, PRIBIO, "ahcid2h", mstohz(10));
779 else
780 delay(10000);
781 }
782 if (i == AHCI_RST_WAIT) {
783 aprint_error("%s: BSY never cleared, TD 0x%x\n",
784 AHCINAME(sc), sig);
785 if (sigp)
786 *sigp = 0xffffffff;
787 goto end;
788 }
789 AHCIDEBUG_PRINT(("%s: BSY took %d ms\n", AHCINAME(sc), i * 10),
790 DEBUG_PROBE);
791 sig = AHCI_READ(sc, AHCI_P_SIG(chp->ch_channel));
792 if (sigp)
793 *sigp = sig;
794 AHCIDEBUG_PRINT(("%s: port %d: sig=0x%x CMD=0x%x\n",
795 AHCINAME(sc), chp->ch_channel, sig,
796 AHCI_READ(sc, AHCI_P_CMD(chp->ch_channel))), DEBUG_PROBE);
797 end:
798 ahci_channel_stop(sc, chp, flags);
799 if (flags & AT_WAIT)
800 tsleep(&sc, PRIBIO, "ahcirst", mstohz(500));
801 else
802 delay(500000);
803 /* clear port interrupt register */
804 AHCI_WRITE(sc, AHCI_P_IS(chp->ch_channel), 0xffffffff);
805 ahci_channel_start(sc, chp, flags,
806 (sc->sc_ahci_cap & AHCI_CAP_CLO) ? 1 : 0);
807 return 0;
808 }
809
810 static void
811 ahci_reset_channel(struct ata_channel *chp, int flags)
812 {
813 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
814 struct ahci_channel *achp = (struct ahci_channel *)chp;
815 int i, tfd;
816
817 ahci_channel_stop(sc, chp, flags);
818 if (sata_reset_interface(chp, sc->sc_ahcit, achp->ahcic_scontrol,
819 achp->ahcic_sstatus, flags) != SStatus_DET_DEV) {
820 printf("%s: port %d reset failed\n", AHCINAME(sc), chp->ch_channel);
821 /* XXX and then ? */
822 }
823 if (chp->ch_queue->active_xfer) {
824 chp->ch_queue->active_xfer->c_kill_xfer(chp,
825 chp->ch_queue->active_xfer, KILL_RESET);
826 }
827 ata_delay(500, "ahcirst", flags);
828 /* clear port interrupt register */
829 AHCI_WRITE(sc, AHCI_P_IS(chp->ch_channel), 0xffffffff);
830 /* clear SErrors and start operations */
831 ahci_channel_start(sc, chp, flags, 1);
832 /* wait 31s for BSY to clear */
833 for (i = 0; i <AHCI_RST_WAIT; i++) {
834 tfd = AHCI_READ(sc, AHCI_P_TFD(chp->ch_channel));
835 if ((((tfd & AHCI_P_TFD_ST) >> AHCI_P_TFD_ST_SHIFT)
836 & WDCS_BSY) == 0)
837 break;
838 ata_delay(10, "ahcid2h", flags);
839 }
840 if (i == AHCI_RST_WAIT)
841 aprint_error("%s: BSY never cleared, TD 0x%x\n",
842 AHCINAME(sc), tfd);
843 AHCIDEBUG_PRINT(("%s: BSY took %d ms\n", AHCINAME(sc), i * 10),
844 DEBUG_PROBE);
845 /* clear port interrupt register */
846 AHCI_WRITE(sc, AHCI_P_IS(chp->ch_channel), 0xffffffff);
847
848 return;
849 }
850
851 static int
852 ahci_ata_addref(struct ata_drive_datas *drvp)
853 {
854 return 0;
855 }
856
857 static void
858 ahci_ata_delref(struct ata_drive_datas *drvp)
859 {
860 return;
861 }
862
863 static void
864 ahci_killpending(struct ata_drive_datas *drvp)
865 {
866 return;
867 }
868
869 static void
870 ahci_probe_drive(struct ata_channel *chp)
871 {
872 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
873 struct ahci_channel *achp = (struct ahci_channel *)chp;
874 uint32_t sig;
875
876 /* bring interface up, accept FISs, power up and spin up device */
877 AHCI_WRITE(sc, AHCI_P_CMD(chp->ch_channel),
878 AHCI_P_CMD_ICC_AC | AHCI_P_CMD_FRE |
879 AHCI_P_CMD_POD | AHCI_P_CMD_SUD);
880 /* reset the PHY and bring online */
881 switch (sata_reset_interface(chp, sc->sc_ahcit, achp->ahcic_scontrol,
882 achp->ahcic_sstatus, AT_WAIT)) {
883 case SStatus_DET_DEV:
884 tsleep(&sc, PRIBIO, "ahcidv", mstohz(500));
885 if (sc->sc_ahci_cap & AHCI_CAP_SPM) {
886 ahci_do_reset_drive(chp, PMP_PORT_CTL, AT_WAIT, &sig);
887 } else {
888 ahci_do_reset_drive(chp, 0, AT_WAIT, &sig);
889 }
890 sata_interpret_sig(chp, 0, sig);
891 /* if we have a PMP attached, inform the controller */
892 if (chp->ch_ndrives > PMP_PORT_CTL &&
893 chp->ch_drive[PMP_PORT_CTL].drive_type == ATA_DRIVET_PM) {
894 AHCI_WRITE(sc, AHCI_P_CMD(chp->ch_channel),
895 AHCI_READ(sc, AHCI_P_CMD(chp->ch_channel)) |
896 AHCI_P_CMD_PMA);
897 }
898 /* clear port interrupt register */
899 AHCI_WRITE(sc, AHCI_P_IS(chp->ch_channel), 0xffffffff);
900
901 /* and enable interrupts */
902 AHCI_WRITE(sc, AHCI_P_IE(chp->ch_channel),
903 AHCI_P_IX_TFES | AHCI_P_IX_HBFS | AHCI_P_IX_IFS |
904 AHCI_P_IX_OFS | AHCI_P_IX_DPS | AHCI_P_IX_UFS |
905 AHCI_P_IX_PSS | AHCI_P_IX_DHRS);
906 /* wait 500ms before actually starting operations */
907 tsleep(&sc, PRIBIO, "ahciprb", mstohz(500));
908 break;
909
910 default:
911 break;
912 }
913 }
914
915 static void
916 ahci_setup_channel(struct ata_channel *chp)
917 {
918 return;
919 }
920
921 static int
922 ahci_exec_command(struct ata_drive_datas *drvp, struct ata_command *ata_c)
923 {
924 struct ata_channel *chp = drvp->chnl_softc;
925 struct ata_xfer *xfer;
926 int ret;
927 int s;
928
929 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
930 AHCIDEBUG_PRINT(("ahci_exec_command port %d CI 0x%x\n",
931 chp->ch_channel, AHCI_READ(sc, AHCI_P_CI(chp->ch_channel))),
932 DEBUG_XFERS);
933 xfer = ata_get_xfer(ata_c->flags & AT_WAIT ? ATAXF_CANSLEEP :
934 ATAXF_NOSLEEP);
935 if (xfer == NULL) {
936 return ATACMD_TRY_AGAIN;
937 }
938 if (ata_c->flags & AT_POLL)
939 xfer->c_flags |= C_POLL;
940 if (ata_c->flags & AT_WAIT)
941 xfer->c_flags |= C_WAIT;
942 xfer->c_drive = drvp->drive;
943 xfer->c_databuf = ata_c->data;
944 xfer->c_bcount = ata_c->bcount;
945 xfer->c_cmd = ata_c;
946 xfer->c_start = ahci_cmd_start;
947 xfer->c_intr = ahci_cmd_complete;
948 xfer->c_kill_xfer = ahci_cmd_kill_xfer;
949 s = splbio();
950 ata_exec_xfer(chp, xfer);
951 #ifdef DIAGNOSTIC
952 if ((ata_c->flags & AT_POLL) != 0 &&
953 (ata_c->flags & AT_DONE) == 0)
954 panic("ahci_exec_command: polled command not done");
955 #endif
956 if (ata_c->flags & AT_DONE) {
957 ret = ATACMD_COMPLETE;
958 } else {
959 if (ata_c->flags & AT_WAIT) {
960 while ((ata_c->flags & AT_DONE) == 0) {
961 tsleep(ata_c, PRIBIO, "ahcicmd", 0);
962 }
963 ret = ATACMD_COMPLETE;
964 } else {
965 ret = ATACMD_QUEUED;
966 }
967 }
968 splx(s);
969 return ret;
970 }
971
972 static void
973 ahci_cmd_start(struct ata_channel *chp, struct ata_xfer *xfer)
974 {
975 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
976 struct ahci_channel *achp = (struct ahci_channel *)chp;
977 struct ata_command *ata_c = xfer->c_cmd;
978 int slot = 0 /* XXX slot */;
979 struct ahci_cmd_tbl *cmd_tbl;
980 struct ahci_cmd_header *cmd_h;
981 int i;
982 int channel = chp->ch_channel;
983
984 AHCIDEBUG_PRINT(("ahci_cmd_start CI 0x%x timo %d\n",
985 AHCI_READ(sc, AHCI_P_CI(chp->ch_channel)), ata_c->timeout),
986 DEBUG_XFERS);
987
988 cmd_tbl = achp->ahcic_cmd_tbl[slot];
989 AHCIDEBUG_PRINT(("%s port %d tbl %p\n", AHCINAME(sc), chp->ch_channel,
990 cmd_tbl), DEBUG_XFERS);
991
992 satafis_rhd_construct_cmd(ata_c, cmd_tbl->cmdt_cfis);
993 cmd_tbl->cmdt_cfis[rhd_c] |= xfer->c_drive;
994
995 cmd_h = &achp->ahcic_cmdh[slot];
996 AHCIDEBUG_PRINT(("%s port %d header %p\n", AHCINAME(sc),
997 chp->ch_channel, cmd_h), DEBUG_XFERS);
998 if (ahci_dma_setup(chp, slot,
999 (ata_c->flags & (AT_READ|AT_WRITE) && ata_c->bcount > 0) ?
1000 ata_c->data : NULL,
1001 ata_c->bcount,
1002 (ata_c->flags & AT_READ) ? BUS_DMA_READ : BUS_DMA_WRITE)) {
1003 ata_c->flags |= AT_DF;
1004 ahci_cmd_complete(chp, xfer, slot);
1005 return;
1006 }
1007 cmd_h->cmdh_flags = htole16(
1008 ((ata_c->flags & AT_WRITE) ? AHCI_CMDH_F_WR : 0) |
1009 RHD_FISLEN / 4 | (xfer->c_drive << AHCI_CMDH_F_PMP_SHIFT));
1010 cmd_h->cmdh_prdbc = 0;
1011 AHCI_CMDH_SYNC(sc, achp, slot,
1012 BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
1013
1014 if (ata_c->flags & AT_POLL) {
1015 /* polled command, disable interrupts */
1016 AHCI_WRITE(sc, AHCI_GHC,
1017 AHCI_READ(sc, AHCI_GHC) & ~AHCI_GHC_IE);
1018 }
1019 chp->ch_flags |= ATACH_IRQ_WAIT;
1020 chp->ch_status = 0;
1021 /* start command */
1022 AHCI_WRITE(sc, AHCI_P_CI(chp->ch_channel), 1 << slot);
1023 /* and says we started this command */
1024 achp->ahcic_cmds_active |= 1 << slot;
1025
1026 if ((ata_c->flags & AT_POLL) == 0) {
1027 chp->ch_flags |= ATACH_IRQ_WAIT; /* wait for interrupt */
1028 callout_reset(&chp->ch_callout, mstohz(ata_c->timeout),
1029 ahci_timeout, chp);
1030 return;
1031 }
1032 /*
1033 * Polled command.
1034 */
1035 for (i = 0; i < ata_c->timeout / 10; i++) {
1036 if (ata_c->flags & AT_DONE)
1037 break;
1038 ahci_intr_port(sc, achp);
1039 if (ata_c->flags & AT_WAIT)
1040 tsleep(&xfer, PRIBIO, "ahcipl", mstohz(10));
1041 else
1042 delay(10000);
1043 }
1044 AHCIDEBUG_PRINT(("%s port %d poll end GHC 0x%x IS 0x%x list 0x%x%x fis 0x%x%x CMD 0x%x CI 0x%x\n", AHCINAME(sc), channel,
1045 AHCI_READ(sc, AHCI_GHC), AHCI_READ(sc, AHCI_IS),
1046 AHCI_READ(sc, AHCI_P_CLBU(channel)), AHCI_READ(sc, AHCI_P_CLB(channel)),
1047 AHCI_READ(sc, AHCI_P_FBU(channel)), AHCI_READ(sc, AHCI_P_FB(channel)),
1048 AHCI_READ(sc, AHCI_P_CMD(channel)), AHCI_READ(sc, AHCI_P_CI(channel))),
1049 DEBUG_XFERS);
1050 if ((ata_c->flags & AT_DONE) == 0) {
1051 ata_c->flags |= AT_TIMEOU;
1052 ahci_cmd_complete(chp, xfer, slot);
1053 }
1054 /* reenable interrupts */
1055 AHCI_WRITE(sc, AHCI_GHC, AHCI_READ(sc, AHCI_GHC) | AHCI_GHC_IE);
1056 }
1057
1058 static void
1059 ahci_cmd_kill_xfer(struct ata_channel *chp, struct ata_xfer *xfer, int reason)
1060 {
1061 struct ata_command *ata_c = xfer->c_cmd;
1062 AHCIDEBUG_PRINT(("ahci_cmd_kill_xfer channel %d\n", chp->ch_channel),
1063 DEBUG_FUNCS);
1064
1065 switch (reason) {
1066 case KILL_GONE:
1067 ata_c->flags |= AT_GONE;
1068 break;
1069 case KILL_RESET:
1070 ata_c->flags |= AT_RESET;
1071 break;
1072 default:
1073 printf("ahci_cmd_kill_xfer: unknown reason %d\n", reason);
1074 panic("ahci_cmd_kill_xfer");
1075 }
1076 ahci_cmd_done(chp, xfer, 0 /* XXX slot */);
1077 }
1078
1079 static int
1080 ahci_cmd_complete(struct ata_channel *chp, struct ata_xfer *xfer, int is)
1081 {
1082 int slot = 0; /* XXX slot */
1083 struct ata_command *ata_c = xfer->c_cmd;
1084 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
1085 struct ahci_channel *achp = (struct ahci_channel *)chp;
1086
1087 AHCIDEBUG_PRINT(("ahci_cmd_complete channel %d CMD 0x%x CI 0x%x\n",
1088 chp->ch_channel, AHCI_READ(sc, AHCI_P_CMD(chp->ch_channel)),
1089 AHCI_READ(sc, AHCI_P_CI(chp->ch_channel))),
1090 DEBUG_FUNCS);
1091 chp->ch_flags &= ~ATACH_IRQ_WAIT;
1092 if (xfer->c_flags & C_TIMEOU) {
1093 ata_c->flags |= AT_TIMEOU;
1094 } else
1095 callout_stop(&chp->ch_callout);
1096
1097 chp->ch_queue->active_xfer = NULL;
1098
1099 if (chp->ch_drive[xfer->c_drive].drive_flags & ATA_DRIVE_WAITDRAIN) {
1100 ahci_cmd_kill_xfer(chp, xfer, KILL_GONE);
1101 chp->ch_drive[xfer->c_drive].drive_flags &= ~ATA_DRIVE_WAITDRAIN;
1102 wakeup(&chp->ch_queue->active_xfer);
1103 return 0;
1104 }
1105
1106 if (chp->ch_status & WDCS_BSY) {
1107 ata_c->flags |= AT_TIMEOU;
1108 } else if (chp->ch_status & WDCS_ERR) {
1109 ata_c->r_error = chp->ch_error;
1110 ata_c->flags |= AT_ERROR;
1111 }
1112
1113 if (ata_c->flags & AT_READREG)
1114 satafis_rdh_cmd_readreg(ata_c, achp->ahcic_rfis->rfis_rfis);
1115
1116 ahci_cmd_done(chp, xfer, slot);
1117 return 0;
1118 }
1119
1120 static void
1121 ahci_cmd_done(struct ata_channel *chp, struct ata_xfer *xfer, int slot)
1122 {
1123 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
1124 struct ahci_channel *achp = (struct ahci_channel *)chp;
1125 struct ata_command *ata_c = xfer->c_cmd;
1126 uint16_t *idwordbuf;
1127 int i;
1128
1129 AHCIDEBUG_PRINT(("ahci_cmd_done channel %d (status %#x) flags %#x/%#x\n",
1130 chp->ch_channel, chp->ch_status, xfer->c_flags, ata_c->flags), DEBUG_FUNCS);
1131
1132 /* this comamnd is not active any more */
1133 achp->ahcic_cmds_active &= ~(1 << slot);
1134
1135 if (ata_c->flags & (AT_READ|AT_WRITE) && ata_c->bcount > 0) {
1136 bus_dmamap_t map = achp->ahcic_datad[slot];
1137 bus_dmamap_sync(sc->sc_dmat, map, 0, map->dm_mapsize,
1138 (ata_c->flags & AT_READ) ? BUS_DMASYNC_POSTREAD :
1139 BUS_DMASYNC_POSTWRITE);
1140 bus_dmamap_unload(sc->sc_dmat, map);
1141 }
1142
1143 AHCI_CMDH_SYNC(sc, achp, slot,
1144 BUS_DMASYNC_POSTREAD | BUS_DMASYNC_POSTWRITE);
1145
1146 /* ata(4) expects IDENTIFY data to be in host endianess */
1147 if (ata_c->r_command == WDCC_IDENTIFY ||
1148 ata_c->r_command == ATAPI_IDENTIFY_DEVICE) {
1149 idwordbuf = xfer->c_databuf;
1150 for (i = 0; i < (xfer->c_bcount / sizeof(*idwordbuf)); i++) {
1151 idwordbuf[i] = le16toh(idwordbuf[i]);
1152 }
1153 }
1154
1155 ata_c->flags |= AT_DONE;
1156 if (achp->ahcic_cmdh[slot].cmdh_prdbc)
1157 ata_c->flags |= AT_XFDONE;
1158
1159 ata_free_xfer(chp, xfer);
1160 if (ata_c->flags & AT_WAIT)
1161 wakeup(ata_c);
1162 else if (ata_c->callback)
1163 ata_c->callback(ata_c->callback_arg);
1164 atastart(chp);
1165 return;
1166 }
1167
1168 static int
1169 ahci_ata_bio(struct ata_drive_datas *drvp, struct ata_bio *ata_bio)
1170 {
1171 struct ata_channel *chp = drvp->chnl_softc;
1172 struct ata_xfer *xfer;
1173
1174 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
1175 AHCIDEBUG_PRINT(("ahci_ata_bio port %d CI 0x%x\n",
1176 chp->ch_channel, AHCI_READ(sc, AHCI_P_CI(chp->ch_channel))),
1177 DEBUG_XFERS);
1178 xfer = ata_get_xfer(ATAXF_NOSLEEP);
1179 if (xfer == NULL) {
1180 return ATACMD_TRY_AGAIN;
1181 }
1182 if (ata_bio->flags & ATA_POLL)
1183 xfer->c_flags |= C_POLL;
1184 xfer->c_drive = drvp->drive;
1185 xfer->c_cmd = ata_bio;
1186 xfer->c_databuf = ata_bio->databuf;
1187 xfer->c_bcount = ata_bio->bcount;
1188 xfer->c_start = ahci_bio_start;
1189 xfer->c_intr = ahci_bio_complete;
1190 xfer->c_kill_xfer = ahci_bio_kill_xfer;
1191 ata_exec_xfer(chp, xfer);
1192 return (ata_bio->flags & ATA_ITSDONE) ? ATACMD_COMPLETE : ATACMD_QUEUED;
1193 }
1194
1195 static void
1196 ahci_bio_start(struct ata_channel *chp, struct ata_xfer *xfer)
1197 {
1198 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
1199 struct ahci_channel *achp = (struct ahci_channel *)chp;
1200 struct ata_bio *ata_bio = xfer->c_cmd;
1201 int slot = 0 /* XXX slot */;
1202 struct ahci_cmd_tbl *cmd_tbl;
1203 struct ahci_cmd_header *cmd_h;
1204 int i;
1205 int channel = chp->ch_channel;
1206
1207 AHCIDEBUG_PRINT(("ahci_bio_start CI 0x%x\n",
1208 AHCI_READ(sc, AHCI_P_CI(chp->ch_channel))), DEBUG_XFERS);
1209
1210 cmd_tbl = achp->ahcic_cmd_tbl[slot];
1211 AHCIDEBUG_PRINT(("%s port %d tbl %p\n", AHCINAME(sc), chp->ch_channel,
1212 cmd_tbl), DEBUG_XFERS);
1213
1214 satafis_rhd_construct_bio(xfer, cmd_tbl->cmdt_cfis);
1215 cmd_tbl->cmdt_cfis[rhd_c] |= xfer->c_drive;
1216
1217 cmd_h = &achp->ahcic_cmdh[slot];
1218 AHCIDEBUG_PRINT(("%s port %d header %p\n", AHCINAME(sc),
1219 chp->ch_channel, cmd_h), DEBUG_XFERS);
1220 if (ahci_dma_setup(chp, slot, ata_bio->databuf, ata_bio->bcount,
1221 (ata_bio->flags & ATA_READ) ? BUS_DMA_READ : BUS_DMA_WRITE)) {
1222 ata_bio->error = ERR_DMA;
1223 ata_bio->r_error = 0;
1224 ahci_bio_complete(chp, xfer, slot);
1225 return;
1226 }
1227 cmd_h->cmdh_flags = htole16(
1228 ((ata_bio->flags & ATA_READ) ? 0 : AHCI_CMDH_F_WR) |
1229 RHD_FISLEN / 4 | (xfer->c_drive << AHCI_CMDH_F_PMP_SHIFT));
1230 cmd_h->cmdh_prdbc = 0;
1231 AHCI_CMDH_SYNC(sc, achp, slot,
1232 BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
1233
1234 if (xfer->c_flags & C_POLL) {
1235 /* polled command, disable interrupts */
1236 AHCI_WRITE(sc, AHCI_GHC,
1237 AHCI_READ(sc, AHCI_GHC) & ~AHCI_GHC_IE);
1238 }
1239 chp->ch_flags |= ATACH_IRQ_WAIT;
1240 chp->ch_status = 0;
1241 /* start command */
1242 AHCI_WRITE(sc, AHCI_P_CI(chp->ch_channel), 1 << slot);
1243 /* and says we started this command */
1244 achp->ahcic_cmds_active |= 1 << slot;
1245
1246 if ((xfer->c_flags & C_POLL) == 0) {
1247 chp->ch_flags |= ATACH_IRQ_WAIT; /* wait for interrupt */
1248 callout_reset(&chp->ch_callout, mstohz(ATA_DELAY),
1249 ahci_timeout, chp);
1250 return;
1251 }
1252 /*
1253 * Polled command.
1254 */
1255 for (i = 0; i < ATA_DELAY * 10; i++) {
1256 if (ata_bio->flags & ATA_ITSDONE)
1257 break;
1258 ahci_intr_port(sc, achp);
1259 delay(100);
1260 }
1261 AHCIDEBUG_PRINT(("%s port %d poll end GHC 0x%x IS 0x%x list 0x%x%x fis 0x%x%x CMD 0x%x CI 0x%x\n", AHCINAME(sc), channel,
1262 AHCI_READ(sc, AHCI_GHC), AHCI_READ(sc, AHCI_IS),
1263 AHCI_READ(sc, AHCI_P_CLBU(channel)), AHCI_READ(sc, AHCI_P_CLB(channel)),
1264 AHCI_READ(sc, AHCI_P_FBU(channel)), AHCI_READ(sc, AHCI_P_FB(channel)),
1265 AHCI_READ(sc, AHCI_P_CMD(channel)), AHCI_READ(sc, AHCI_P_CI(channel))),
1266 DEBUG_XFERS);
1267 if ((ata_bio->flags & ATA_ITSDONE) == 0) {
1268 ata_bio->error = TIMEOUT;
1269 ahci_bio_complete(chp, xfer, slot);
1270 }
1271 /* reenable interrupts */
1272 AHCI_WRITE(sc, AHCI_GHC, AHCI_READ(sc, AHCI_GHC) | AHCI_GHC_IE);
1273 }
1274
1275 static void
1276 ahci_bio_kill_xfer(struct ata_channel *chp, struct ata_xfer *xfer, int reason)
1277 {
1278 int slot = 0; /* XXX slot */
1279 int drive = xfer->c_drive;
1280 struct ata_bio *ata_bio = xfer->c_cmd;
1281 struct ahci_channel *achp = (struct ahci_channel *)chp;
1282 AHCIDEBUG_PRINT(("ahci_bio_kill_xfer channel %d\n", chp->ch_channel),
1283 DEBUG_FUNCS);
1284
1285 achp->ahcic_cmds_active &= ~(1 << slot);
1286 ata_free_xfer(chp, xfer);
1287 ata_bio->flags |= ATA_ITSDONE;
1288 switch (reason) {
1289 case KILL_GONE:
1290 ata_bio->error = ERR_NODEV;
1291 break;
1292 case KILL_RESET:
1293 ata_bio->error = ERR_RESET;
1294 break;
1295 default:
1296 printf("ahci_bio_kill_xfer: unknown reason %d\n", reason);
1297 panic("ahci_bio_kill_xfer");
1298 }
1299 ata_bio->r_error = WDCE_ABRT;
1300 (*chp->ch_drive[drive].drv_done)(chp->ch_drive[drive].drv_softc);
1301 }
1302
1303 static int
1304 ahci_bio_complete(struct ata_channel *chp, struct ata_xfer *xfer, int is)
1305 {
1306 int slot = 0; /* XXX slot */
1307 struct ata_bio *ata_bio = xfer->c_cmd;
1308 int drive = xfer->c_drive;
1309 struct ahci_channel *achp = (struct ahci_channel *)chp;
1310 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
1311
1312 AHCIDEBUG_PRINT(("ahci_bio_complete channel %d\n", chp->ch_channel),
1313 DEBUG_FUNCS);
1314
1315 achp->ahcic_cmds_active &= ~(1 << slot);
1316 chp->ch_flags &= ~ATACH_IRQ_WAIT;
1317 if (xfer->c_flags & C_TIMEOU) {
1318 ata_bio->error = TIMEOUT;
1319 } else {
1320 callout_stop(&chp->ch_callout);
1321 ata_bio->error = NOERROR;
1322 }
1323
1324 chp->ch_queue->active_xfer = NULL;
1325 bus_dmamap_sync(sc->sc_dmat, achp->ahcic_datad[slot], 0,
1326 achp->ahcic_datad[slot]->dm_mapsize,
1327 (ata_bio->flags & ATA_READ) ? BUS_DMASYNC_POSTREAD :
1328 BUS_DMASYNC_POSTWRITE);
1329 bus_dmamap_unload(sc->sc_dmat, achp->ahcic_datad[slot]);
1330
1331 if (chp->ch_drive[xfer->c_drive].drive_flags & ATA_DRIVE_WAITDRAIN) {
1332 ahci_bio_kill_xfer(chp, xfer, KILL_GONE);
1333 chp->ch_drive[xfer->c_drive].drive_flags &= ~ATA_DRIVE_WAITDRAIN;
1334 wakeup(&chp->ch_queue->active_xfer);
1335 return 0;
1336 }
1337 ata_free_xfer(chp, xfer);
1338 ata_bio->flags |= ATA_ITSDONE;
1339 if (chp->ch_status & WDCS_DWF) {
1340 ata_bio->error = ERR_DF;
1341 } else if (chp->ch_status & WDCS_ERR) {
1342 ata_bio->error = ERROR;
1343 ata_bio->r_error = chp->ch_error;
1344 } else if (chp->ch_status & WDCS_CORR)
1345 ata_bio->flags |= ATA_CORR;
1346
1347 AHCI_CMDH_SYNC(sc, achp, slot,
1348 BUS_DMASYNC_POSTREAD | BUS_DMASYNC_POSTWRITE);
1349 AHCIDEBUG_PRINT(("ahci_bio_complete bcount %ld",
1350 ata_bio->bcount), DEBUG_XFERS);
1351 /*
1352 * if it was a write, complete data buffer may have been transfered
1353 * before error detection; in this case don't use cmdh_prdbc
1354 * as it won't reflect what was written to media. Assume nothing
1355 * was transfered and leave bcount as-is.
1356 */
1357 if ((ata_bio->flags & ATA_READ) || ata_bio->error == NOERROR)
1358 ata_bio->bcount -= le32toh(achp->ahcic_cmdh[slot].cmdh_prdbc);
1359 AHCIDEBUG_PRINT((" now %ld\n", ata_bio->bcount), DEBUG_XFERS);
1360 (*chp->ch_drive[drive].drv_done)(chp->ch_drive[drive].drv_softc);
1361 atastart(chp);
1362 return 0;
1363 }
1364
1365 static void
1366 ahci_channel_stop(struct ahci_softc *sc, struct ata_channel *chp, int flags)
1367 {
1368 int i;
1369 /* stop channel */
1370 AHCI_WRITE(sc, AHCI_P_CMD(chp->ch_channel),
1371 AHCI_READ(sc, AHCI_P_CMD(chp->ch_channel)) & ~AHCI_P_CMD_ST);
1372 /* wait 1s for channel to stop */
1373 for (i = 0; i <100; i++) {
1374 if ((AHCI_READ(sc, AHCI_P_CMD(chp->ch_channel)) & AHCI_P_CMD_CR)
1375 == 0)
1376 break;
1377 if (flags & AT_WAIT)
1378 tsleep(&sc, PRIBIO, "ahcistop", mstohz(10));
1379 else
1380 delay(10000);
1381 }
1382 if (AHCI_READ(sc, AHCI_P_CMD(chp->ch_channel)) & AHCI_P_CMD_CR) {
1383 printf("%s: channel wouldn't stop\n", AHCINAME(sc));
1384 /* XXX controller reset ? */
1385 return;
1386 }
1387
1388 if (sc->sc_channel_stop)
1389 sc->sc_channel_stop(sc, chp);
1390 }
1391
1392 static void
1393 ahci_channel_start(struct ahci_softc *sc, struct ata_channel *chp,
1394 int flags, int clo)
1395 {
1396 int i;
1397 uint32_t p_cmd;
1398 /* clear error */
1399 AHCI_WRITE(sc, AHCI_P_SERR(chp->ch_channel),
1400 AHCI_READ(sc, AHCI_P_SERR(chp->ch_channel)));
1401
1402 if (clo) {
1403 /* issue command list override */
1404 KASSERT(sc->sc_ahci_cap & AHCI_CAP_CLO);
1405 AHCI_WRITE(sc, AHCI_P_CMD(chp->ch_channel),
1406 AHCI_READ(sc, AHCI_P_CMD(chp->ch_channel)) | AHCI_P_CMD_CLO);
1407 /* wait 1s for AHCI_CAP_CLO to clear */
1408 for (i = 0; i <100; i++) {
1409 if ((AHCI_READ(sc, AHCI_P_CMD(chp->ch_channel)) &
1410 AHCI_P_CMD_CLO) == 0)
1411 break;
1412 if (flags & AT_WAIT)
1413 tsleep(&sc, PRIBIO, "ahciclo", mstohz(10));
1414 else
1415 delay(10000);
1416 }
1417 if (AHCI_READ(sc, AHCI_P_CMD(chp->ch_channel)) & AHCI_P_CMD_CLO) {
1418 printf("%s: channel wouldn't CLO\n", AHCINAME(sc));
1419 /* XXX controller reset ? */
1420 return;
1421 }
1422 }
1423
1424 if (sc->sc_channel_start)
1425 sc->sc_channel_start(sc, chp);
1426
1427 /* and start controller */
1428 p_cmd = AHCI_P_CMD_ICC_AC | AHCI_P_CMD_POD | AHCI_P_CMD_SUD |
1429 AHCI_P_CMD_FRE | AHCI_P_CMD_ST;
1430 if (chp->ch_ndrives > PMP_PORT_CTL &&
1431 chp->ch_drive[PMP_PORT_CTL].drive_type == ATA_DRIVET_PM) {
1432 p_cmd |= AHCI_P_CMD_PMA;
1433 }
1434 AHCI_WRITE(sc, AHCI_P_CMD(chp->ch_channel), p_cmd);
1435 }
1436
1437 static void
1438 ahci_timeout(void *v)
1439 {
1440 struct ata_channel *chp = (struct ata_channel *)v;
1441 struct ata_xfer *xfer = chp->ch_queue->active_xfer;
1442 #ifdef AHCI_DEBUG
1443 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
1444 #endif
1445 int s = splbio();
1446 AHCIDEBUG_PRINT(("ahci_timeout xfer %p intr %#x ghc %08x is %08x\n", xfer, AHCI_READ(sc, AHCI_P_IS(chp->ch_channel)), AHCI_READ(sc, AHCI_GHC), AHCI_READ(sc, AHCI_IS)), DEBUG_INTR);
1447
1448 if ((chp->ch_flags & ATACH_IRQ_WAIT) != 0) {
1449 xfer->c_flags |= C_TIMEOU;
1450 xfer->c_intr(chp, xfer, 0);
1451 }
1452 splx(s);
1453 }
1454
1455 static int
1456 ahci_dma_setup(struct ata_channel *chp, int slot, void *data,
1457 size_t count, int op)
1458 {
1459 int error, seg;
1460 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
1461 struct ahci_channel *achp = (struct ahci_channel *)chp;
1462 struct ahci_cmd_tbl *cmd_tbl;
1463 struct ahci_cmd_header *cmd_h;
1464
1465 cmd_h = &achp->ahcic_cmdh[slot];
1466 cmd_tbl = achp->ahcic_cmd_tbl[slot];
1467
1468 if (data == NULL) {
1469 cmd_h->cmdh_prdtl = 0;
1470 goto end;
1471 }
1472
1473 error = bus_dmamap_load(sc->sc_dmat, achp->ahcic_datad[slot],
1474 data, count, NULL,
1475 BUS_DMA_NOWAIT | BUS_DMA_STREAMING | op);
1476 if (error) {
1477 printf("%s port %d: failed to load xfer: %d\n",
1478 AHCINAME(sc), chp->ch_channel, error);
1479 return error;
1480 }
1481 bus_dmamap_sync(sc->sc_dmat, achp->ahcic_datad[slot], 0,
1482 achp->ahcic_datad[slot]->dm_mapsize,
1483 (op == BUS_DMA_READ) ? BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE);
1484 for (seg = 0; seg < achp->ahcic_datad[slot]->dm_nsegs; seg++) {
1485 cmd_tbl->cmdt_prd[seg].prd_dba = htole64(
1486 achp->ahcic_datad[slot]->dm_segs[seg].ds_addr);
1487 cmd_tbl->cmdt_prd[seg].prd_dbc = htole32(
1488 achp->ahcic_datad[slot]->dm_segs[seg].ds_len - 1);
1489 }
1490 cmd_tbl->cmdt_prd[seg - 1].prd_dbc |= htole32(AHCI_PRD_DBC_IPC);
1491 cmd_h->cmdh_prdtl = htole16(achp->ahcic_datad[slot]->dm_nsegs);
1492 end:
1493 AHCI_CMDTBL_SYNC(sc, achp, slot, BUS_DMASYNC_PREWRITE);
1494 return 0;
1495 }
1496
1497 #if NATAPIBUS > 0
1498 static void
1499 ahci_atapibus_attach(struct atabus_softc * ata_sc)
1500 {
1501 struct ata_channel *chp = ata_sc->sc_chan;
1502 struct atac_softc *atac = chp->ch_atac;
1503 struct scsipi_adapter *adapt = &atac->atac_atapi_adapter._generic;
1504 struct scsipi_channel *chan = &chp->ch_atapi_channel;
1505 /*
1506 * Fill in the scsipi_adapter.
1507 */
1508 adapt->adapt_dev = atac->atac_dev;
1509 adapt->adapt_nchannels = atac->atac_nchannels;
1510 adapt->adapt_request = ahci_atapi_scsipi_request;
1511 adapt->adapt_minphys = ahci_atapi_minphys;
1512 atac->atac_atapi_adapter.atapi_probe_device = ahci_atapi_probe_device;
1513
1514 /*
1515 * Fill in the scsipi_channel.
1516 */
1517 memset(chan, 0, sizeof(*chan));
1518 chan->chan_adapter = adapt;
1519 chan->chan_bustype = &ahci_atapi_bustype;
1520 chan->chan_channel = chp->ch_channel;
1521 chan->chan_flags = SCSIPI_CHAN_OPENINGS;
1522 chan->chan_openings = 1;
1523 chan->chan_max_periph = 1;
1524 chan->chan_ntargets = 1;
1525 chan->chan_nluns = 1;
1526 chp->atapibus = config_found_ia(ata_sc->sc_dev, "atapi", chan,
1527 atapiprint);
1528 }
1529
1530 static void
1531 ahci_atapi_minphys(struct buf *bp)
1532 {
1533 if (bp->b_bcount > MAXPHYS)
1534 bp->b_bcount = MAXPHYS;
1535 minphys(bp);
1536 }
1537
1538 /*
1539 * Kill off all pending xfers for a periph.
1540 *
1541 * Must be called at splbio().
1542 */
1543 static void
1544 ahci_atapi_kill_pending(struct scsipi_periph *periph)
1545 {
1546 struct atac_softc *atac =
1547 device_private(periph->periph_channel->chan_adapter->adapt_dev);
1548 struct ata_channel *chp =
1549 atac->atac_channels[periph->periph_channel->chan_channel];
1550
1551 ata_kill_pending(&chp->ch_drive[periph->periph_target]);
1552 }
1553
1554 static void
1555 ahci_atapi_scsipi_request(struct scsipi_channel *chan,
1556 scsipi_adapter_req_t req, void *arg)
1557 {
1558 struct scsipi_adapter *adapt = chan->chan_adapter;
1559 struct scsipi_periph *periph;
1560 struct scsipi_xfer *sc_xfer;
1561 struct ahci_softc *sc = device_private(adapt->adapt_dev);
1562 struct atac_softc *atac = &sc->sc_atac;
1563 struct ata_xfer *xfer;
1564 int channel = chan->chan_channel;
1565 int drive, s;
1566
1567 switch (req) {
1568 case ADAPTER_REQ_RUN_XFER:
1569 sc_xfer = arg;
1570 periph = sc_xfer->xs_periph;
1571 drive = periph->periph_target;
1572 if (!device_is_active(atac->atac_dev)) {
1573 sc_xfer->error = XS_DRIVER_STUFFUP;
1574 scsipi_done(sc_xfer);
1575 return;
1576 }
1577 xfer = ata_get_xfer(ATAXF_NOSLEEP);
1578 if (xfer == NULL) {
1579 sc_xfer->error = XS_RESOURCE_SHORTAGE;
1580 scsipi_done(sc_xfer);
1581 return;
1582 }
1583
1584 if (sc_xfer->xs_control & XS_CTL_POLL)
1585 xfer->c_flags |= C_POLL;
1586 xfer->c_drive = drive;
1587 xfer->c_flags |= C_ATAPI;
1588 xfer->c_cmd = sc_xfer;
1589 xfer->c_databuf = sc_xfer->data;
1590 xfer->c_bcount = sc_xfer->datalen;
1591 xfer->c_start = ahci_atapi_start;
1592 xfer->c_intr = ahci_atapi_complete;
1593 xfer->c_kill_xfer = ahci_atapi_kill_xfer;
1594 xfer->c_dscpoll = 0;
1595 s = splbio();
1596 ata_exec_xfer(atac->atac_channels[channel], xfer);
1597 #ifdef DIAGNOSTIC
1598 if ((sc_xfer->xs_control & XS_CTL_POLL) != 0 &&
1599 (sc_xfer->xs_status & XS_STS_DONE) == 0)
1600 panic("ahci_atapi_scsipi_request: polled command "
1601 "not done");
1602 #endif
1603 splx(s);
1604 return;
1605 default:
1606 /* Not supported, nothing to do. */
1607 ;
1608 }
1609 }
1610
1611 static void
1612 ahci_atapi_start(struct ata_channel *chp, struct ata_xfer *xfer)
1613 {
1614 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
1615 struct ahci_channel *achp = (struct ahci_channel *)chp;
1616 struct scsipi_xfer *sc_xfer = xfer->c_cmd;
1617 int slot = 0 /* XXX slot */;
1618 struct ahci_cmd_tbl *cmd_tbl;
1619 struct ahci_cmd_header *cmd_h;
1620 int i;
1621 int channel = chp->ch_channel;
1622
1623 AHCIDEBUG_PRINT(("ahci_atapi_start CI 0x%x\n",
1624 AHCI_READ(sc, AHCI_P_CI(chp->ch_channel))), DEBUG_XFERS);
1625
1626 cmd_tbl = achp->ahcic_cmd_tbl[slot];
1627 AHCIDEBUG_PRINT(("%s port %d tbl %p\n", AHCINAME(sc), chp->ch_channel,
1628 cmd_tbl), DEBUG_XFERS);
1629
1630 satafis_rhd_construct_atapi(xfer, cmd_tbl->cmdt_cfis);
1631 cmd_tbl->cmdt_cfis[rhd_c] |= xfer->c_drive;
1632 memset(&cmd_tbl->cmdt_acmd, 0, sizeof(cmd_tbl->cmdt_acmd));
1633 memcpy(cmd_tbl->cmdt_acmd, sc_xfer->cmd, sc_xfer->cmdlen);
1634
1635 cmd_h = &achp->ahcic_cmdh[slot];
1636 AHCIDEBUG_PRINT(("%s port %d header %p\n", AHCINAME(sc),
1637 chp->ch_channel, cmd_h), DEBUG_XFERS);
1638 if (ahci_dma_setup(chp, slot, sc_xfer->datalen ? sc_xfer->data : NULL,
1639 sc_xfer->datalen,
1640 (sc_xfer->xs_control & XS_CTL_DATA_IN) ?
1641 BUS_DMA_READ : BUS_DMA_WRITE)) {
1642 sc_xfer->error = XS_DRIVER_STUFFUP;
1643 ahci_atapi_complete(chp, xfer, slot);
1644 return;
1645 }
1646 cmd_h->cmdh_flags = htole16(
1647 ((sc_xfer->xs_control & XS_CTL_DATA_OUT) ? AHCI_CMDH_F_WR : 0) |
1648 RHD_FISLEN / 4 | AHCI_CMDH_F_A |
1649 (xfer->c_drive << AHCI_CMDH_F_PMP_SHIFT));
1650 cmd_h->cmdh_prdbc = 0;
1651 AHCI_CMDH_SYNC(sc, achp, slot,
1652 BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
1653
1654 if (xfer->c_flags & C_POLL) {
1655 /* polled command, disable interrupts */
1656 AHCI_WRITE(sc, AHCI_GHC,
1657 AHCI_READ(sc, AHCI_GHC) & ~AHCI_GHC_IE);
1658 }
1659 chp->ch_flags |= ATACH_IRQ_WAIT;
1660 chp->ch_status = 0;
1661 /* start command */
1662 AHCI_WRITE(sc, AHCI_P_CI(chp->ch_channel), 1 << slot);
1663 /* and says we started this command */
1664 achp->ahcic_cmds_active |= 1 << slot;
1665
1666 if ((xfer->c_flags & C_POLL) == 0) {
1667 chp->ch_flags |= ATACH_IRQ_WAIT; /* wait for interrupt */
1668 callout_reset(&chp->ch_callout, mstohz(sc_xfer->timeout),
1669 ahci_timeout, chp);
1670 return;
1671 }
1672 /*
1673 * Polled command.
1674 */
1675 for (i = 0; i < ATA_DELAY / 10; i++) {
1676 if (sc_xfer->xs_status & XS_STS_DONE)
1677 break;
1678 ahci_intr_port(sc, achp);
1679 delay(10000);
1680 }
1681 AHCIDEBUG_PRINT(("%s port %d poll end GHC 0x%x IS 0x%x list 0x%x%x fis 0x%x%x CMD 0x%x CI 0x%x\n", AHCINAME(sc), channel,
1682 AHCI_READ(sc, AHCI_GHC), AHCI_READ(sc, AHCI_IS),
1683 AHCI_READ(sc, AHCI_P_CLBU(channel)), AHCI_READ(sc, AHCI_P_CLB(channel)),
1684 AHCI_READ(sc, AHCI_P_FBU(channel)), AHCI_READ(sc, AHCI_P_FB(channel)),
1685 AHCI_READ(sc, AHCI_P_CMD(channel)), AHCI_READ(sc, AHCI_P_CI(channel))),
1686 DEBUG_XFERS);
1687 if ((sc_xfer->xs_status & XS_STS_DONE) == 0) {
1688 sc_xfer->error = XS_TIMEOUT;
1689 ahci_atapi_complete(chp, xfer, slot);
1690 }
1691 /* reenable interrupts */
1692 AHCI_WRITE(sc, AHCI_GHC, AHCI_READ(sc, AHCI_GHC) | AHCI_GHC_IE);
1693 }
1694
1695 static int
1696 ahci_atapi_complete(struct ata_channel *chp, struct ata_xfer *xfer, int irq)
1697 {
1698 int slot = 0; /* XXX slot */
1699 struct scsipi_xfer *sc_xfer = xfer->c_cmd;
1700 int drive = xfer->c_drive;
1701 struct ahci_channel *achp = (struct ahci_channel *)chp;
1702 struct ahci_softc *sc = (struct ahci_softc *)chp->ch_atac;
1703
1704 AHCIDEBUG_PRINT(("ahci_atapi_complete channel %d\n", chp->ch_channel),
1705 DEBUG_FUNCS);
1706
1707 achp->ahcic_cmds_active &= ~(1 << slot);
1708 chp->ch_flags &= ~ATACH_IRQ_WAIT;
1709 if (xfer->c_flags & C_TIMEOU) {
1710 sc_xfer->error = XS_TIMEOUT;
1711 } else {
1712 callout_stop(&chp->ch_callout);
1713 sc_xfer->error = 0;
1714 }
1715
1716 chp->ch_queue->active_xfer = NULL;
1717 if (xfer->c_bcount > 0) {
1718 bus_dmamap_sync(sc->sc_dmat, achp->ahcic_datad[slot], 0,
1719 achp->ahcic_datad[slot]->dm_mapsize,
1720 (sc_xfer->xs_control & XS_CTL_DATA_IN) ?
1721 BUS_DMASYNC_POSTREAD : BUS_DMASYNC_POSTWRITE);
1722 bus_dmamap_unload(sc->sc_dmat, achp->ahcic_datad[slot]);
1723 }
1724
1725 if (chp->ch_drive[drive].drive_flags & ATA_DRIVE_WAITDRAIN) {
1726 ahci_atapi_kill_xfer(chp, xfer, KILL_GONE);
1727 chp->ch_drive[drive].drive_flags &= ~ATA_DRIVE_WAITDRAIN;
1728 wakeup(&chp->ch_queue->active_xfer);
1729 return 0;
1730 }
1731 ata_free_xfer(chp, xfer);
1732
1733 AHCI_CMDH_SYNC(sc, achp, slot,
1734 BUS_DMASYNC_POSTREAD | BUS_DMASYNC_POSTWRITE);
1735 sc_xfer->resid = sc_xfer->datalen;
1736 sc_xfer->resid -= le32toh(achp->ahcic_cmdh[slot].cmdh_prdbc);
1737 AHCIDEBUG_PRINT(("ahci_atapi_complete datalen %d resid %d\n",
1738 sc_xfer->datalen, sc_xfer->resid), DEBUG_XFERS);
1739 if (chp->ch_status & WDCS_ERR &&
1740 ((sc_xfer->xs_control & XS_CTL_REQSENSE) == 0 ||
1741 sc_xfer->resid == sc_xfer->datalen)) {
1742 sc_xfer->error = XS_SHORTSENSE;
1743 sc_xfer->sense.atapi_sense = chp->ch_error;
1744 if ((sc_xfer->xs_periph->periph_quirks &
1745 PQUIRK_NOSENSE) == 0) {
1746 /* ask scsipi to send a REQUEST_SENSE */
1747 sc_xfer->error = XS_BUSY;
1748 sc_xfer->status = SCSI_CHECK;
1749 }
1750 }
1751 scsipi_done(sc_xfer);
1752 atastart(chp);
1753 return 0;
1754 }
1755
1756 static void
1757 ahci_atapi_kill_xfer(struct ata_channel *chp, struct ata_xfer *xfer, int reason)
1758 {
1759 struct scsipi_xfer *sc_xfer = xfer->c_cmd;
1760 struct ahci_channel *achp = (struct ahci_channel *)chp;
1761 int slot = 0; /* XXX slot */
1762
1763 achp->ahcic_cmds_active &= ~(1 << slot);
1764
1765 /* remove this command from xfer queue */
1766 switch (reason) {
1767 case KILL_GONE:
1768 sc_xfer->error = XS_DRIVER_STUFFUP;
1769 break;
1770 case KILL_RESET:
1771 sc_xfer->error = XS_RESET;
1772 break;
1773 default:
1774 printf("ahci_ata_atapi_kill_xfer: unknown reason %d\n", reason);
1775 panic("ahci_ata_atapi_kill_xfer");
1776 }
1777 ata_free_xfer(chp, xfer);
1778 scsipi_done(sc_xfer);
1779 }
1780
1781 static void
1782 ahci_atapi_probe_device(struct atapibus_softc *sc, int target)
1783 {
1784 struct scsipi_channel *chan = sc->sc_channel;
1785 struct scsipi_periph *periph;
1786 struct ataparams ids;
1787 struct ataparams *id = &ids;
1788 struct ahci_softc *ahcic =
1789 device_private(chan->chan_adapter->adapt_dev);
1790 struct atac_softc *atac = &ahcic->sc_atac;
1791 struct ata_channel *chp = atac->atac_channels[chan->chan_channel];
1792 struct ata_drive_datas *drvp = &chp->ch_drive[target];
1793 struct scsipibus_attach_args sa;
1794 char serial_number[21], model[41], firmware_revision[9];
1795 int s;
1796
1797 /* skip if already attached */
1798 if (scsipi_lookup_periph(chan, target, 0) != NULL)
1799 return;
1800
1801 /* if no ATAPI device detected at attach time, skip */
1802 if (drvp->drive_type != ATA_DRIVET_ATAPI) {
1803 AHCIDEBUG_PRINT(("ahci_atapi_probe_device: drive %d "
1804 "not present\n", target), DEBUG_PROBE);
1805 return;
1806 }
1807
1808 /* Some ATAPI devices need a bit more time after software reset. */
1809 delay(5000);
1810 if (ata_get_params(drvp, AT_WAIT, id) == 0) {
1811 #ifdef ATAPI_DEBUG_PROBE
1812 printf("%s drive %d: cmdsz 0x%x drqtype 0x%x\n",
1813 AHCINAME(ahcic), target,
1814 id->atap_config & ATAPI_CFG_CMD_MASK,
1815 id->atap_config & ATAPI_CFG_DRQ_MASK);
1816 #endif
1817 periph = scsipi_alloc_periph(M_NOWAIT);
1818 if (periph == NULL) {
1819 aprint_error_dev(sc->sc_dev,
1820 "unable to allocate periph for drive %d\n",
1821 target);
1822 return;
1823 }
1824 periph->periph_dev = NULL;
1825 periph->periph_channel = chan;
1826 periph->periph_switch = &atapi_probe_periphsw;
1827 periph->periph_target = target;
1828 periph->periph_lun = 0;
1829 periph->periph_quirks = PQUIRK_ONLYBIG;
1830
1831 #ifdef SCSIPI_DEBUG
1832 if (SCSIPI_DEBUG_TYPE == SCSIPI_BUSTYPE_ATAPI &&
1833 SCSIPI_DEBUG_TARGET == target)
1834 periph->periph_dbflags |= SCSIPI_DEBUG_FLAGS;
1835 #endif
1836 periph->periph_type = ATAPI_CFG_TYPE(id->atap_config);
1837 if (id->atap_config & ATAPI_CFG_REMOV)
1838 periph->periph_flags |= PERIPH_REMOVABLE;
1839 if (periph->periph_type == T_SEQUENTIAL) {
1840 s = splbio();
1841 drvp->drive_flags |= ATA_DRIVE_ATAPIDSCW;
1842 splx(s);
1843 }
1844
1845 sa.sa_periph = periph;
1846 sa.sa_inqbuf.type = ATAPI_CFG_TYPE(id->atap_config);
1847 sa.sa_inqbuf.removable = id->atap_config & ATAPI_CFG_REMOV ?
1848 T_REMOV : T_FIXED;
1849 strnvisx(model, sizeof(model), id->atap_model, 40,
1850 VIS_TRIM|VIS_SAFE|VIS_OCTAL);
1851 strnvisx(serial_number, sizeof(serial_number), id->atap_serial,
1852 20, VIS_TRIM|VIS_SAFE|VIS_OCTAL);
1853 strnvisx(firmware_revision, sizeof(firmware_revision),
1854 id->atap_revision, 8, VIS_TRIM|VIS_SAFE|VIS_OCTAL);
1855 sa.sa_inqbuf.vendor = model;
1856 sa.sa_inqbuf.product = serial_number;
1857 sa.sa_inqbuf.revision = firmware_revision;
1858
1859 /*
1860 * Determine the operating mode capabilities of the device.
1861 */
1862 if ((id->atap_config & ATAPI_CFG_CMD_MASK) == ATAPI_CFG_CMD_16)
1863 periph->periph_cap |= PERIPH_CAP_CMD16;
1864 /* XXX This is gross. */
1865 periph->periph_cap |= (id->atap_config & ATAPI_CFG_DRQ_MASK);
1866
1867 drvp->drv_softc = atapi_probe_device(sc, target, periph, &sa);
1868
1869 if (drvp->drv_softc)
1870 ata_probe_caps(drvp);
1871 else {
1872 s = splbio();
1873 drvp->drive_type = ATA_DRIVET_NONE;
1874 splx(s);
1875 }
1876 } else {
1877 AHCIDEBUG_PRINT(("ahci_atapi_get_params: ATAPI_IDENTIFY_DEVICE "
1878 "failed for drive %s:%d:%d: error 0x%x\n",
1879 AHCINAME(ahcic), chp->ch_channel, target,
1880 chp->ch_error), DEBUG_PROBE);
1881 s = splbio();
1882 drvp->drive_type = ATA_DRIVET_NONE;
1883 splx(s);
1884 }
1885 }
1886 #endif /* NATAPIBUS */
1887