1/*-
2 * Copyright (c) 1998,1999,2000,2001,2002 S�ren Schmidt <sos@FreeBSD.org>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer,
10 * without modification, immediately at the beginning of the file.
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 * 3. The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 *
28 * $FreeBSD: head/sys/dev/ata/ata-pci.c 100380 2002-07-19 22:14:54Z jhb $
29 */
30
31#include "opt_ata.h"
32#include <sys/param.h>
33#include <sys/systm.h>
34#include <sys/kernel.h>
35#include <sys/disk.h>
36#include <sys/module.h>
37#include <sys/bus.h>
38#include <sys/bio.h>
39#include <sys/malloc.h>
40#include <sys/devicestat.h>
41#include <sys/sysctl.h>
42#include <machine/stdarg.h>
43#include <machine/resource.h>
44#include <machine/bus.h>
45#ifdef __alpha__
46#include <machine/md_var.h>
47#endif
48#include <sys/rman.h>
49#include <pci/pcivar.h>
50#include <pci/pcireg.h>
51#include <dev/ata/ata-all.h>
52
53/* device structures */
54struct ata_pci_controller {
55 struct resource *bmio;
56 int bmaddr;
57 struct resource *irq;
58 int irqcnt;
59};
60
61/* misc defines */
62#define IOMASK 0xfffffffc
63#define GRANDPARENT(dev) device_get_parent(device_get_parent(dev))
64#define ATA_MASTERDEV(dev) ((pci_get_progif(dev) & 0x80) && \
65 (pci_get_progif(dev) & 0x05) != 0x05)
66
67int
68ata_find_dev(device_t dev, u_int32_t devid, u_int32_t revid)
69{
70 device_t *children;
71 int nchildren, i;
72
73 if (device_get_children(device_get_parent(dev), &children, &nchildren))
74 return 0;
75
76 for (i = 0; i < nchildren; i++) {
77 if (pci_get_devid(children[i]) == devid &&
78 pci_get_revid(children[i]) >= revid) {
79 free(children, M_TEMP);
80 return 1;
81 }
82 }
83 free(children, M_TEMP);
84 return 0;
85}
86
87static void
88ata_via_southbridge_fixup(device_t dev)
89{
90 device_t *children;
91 int nchildren, i;
92
93 if (device_get_children(device_get_parent(dev), &children, &nchildren))
94 return;
95
96 for (i = 0; i < nchildren; i++) {
97 if (pci_get_devid(children[i]) == 0x03051106 || /* VIA VT8363 */
98 pci_get_devid(children[i]) == 0x03911106 || /* VIA VT8371 */
99 pci_get_devid(children[i]) == 0x31021106 || /* VIA VT8662 */
100 pci_get_devid(children[i]) == 0x31121106) { /* VIA VT8361 */
101 u_int8_t reg76 = pci_read_config(children[i], 0x76, 1);
102
103 if ((reg76 & 0xf0) != 0xd0) {
104 device_printf(dev,
105 "Correcting VIA config for southbridge data corruption bug\n");
106 pci_write_config(children[i], 0x75, 0x80, 1);
107 pci_write_config(children[i], 0x76, (reg76 & 0x0f) | 0xd0, 1);
108 }
109 break;
110 }
111 }
112 free(children, M_TEMP);
113}
114
115static const char *
116ata_pci_match(device_t dev)
117{
118 if (pci_get_class(dev) != PCIC_STORAGE)
119 return NULL;
120
121 switch (pci_get_devid(dev)) {
122 /* supported chipsets */
123 case 0x12308086:
124 return "Intel PIIX ATA controller";
125
126 case 0x70108086:
127 return "Intel PIIX3 ATA controller";
128
129 case 0x71118086:
130 case 0x71998086:
131 case 0x84ca8086:
132 return "Intel PIIX4 ATA33 controller";
133
134 case 0x24218086:
135 return "Intel ICH0 ATA33 controller";
136
137 case 0x24118086:
138 case 0x76018086:
139 return "Intel ICH ATA66 controller";
140
141 case 0x244a8086:
142 case 0x244b8086:
143 return "Intel ICH2 ATA100 controller";
144
145 case 0x248a8086:
146 case 0x248b8086:
147 return "Intel ICH3 ATA100 controller";
148
149 case 0x24cb8086:
150 return "Intel ICH4 ATA100 controller";
151
152 case 0x522910b9:
153 if (pci_get_revid(dev) >= 0xc4)
154 return "AcerLabs Aladdin ATA100 controller";
155 else if (pci_get_revid(dev) >= 0xc2)
156 return "AcerLabs Aladdin ATA66 controller";
157 else if (pci_get_revid(dev) >= 0x20)
158 return "AcerLabs Aladdin ATA33 controller";
159 else
160 return "AcerLabs Aladdin ATA controller";
161
162 case 0x05711106:
163 if (ata_find_dev(dev, 0x05861106, 0x02))
164 return "VIA 82C586 ATA33 controller";
165 if (ata_find_dev(dev, 0x05861106, 0))
166 return "VIA 82C586 ATA controller";
167 if (ata_find_dev(dev, 0x05961106, 0x12))
168 return "VIA 82C596 ATA66 controller";
169 if (ata_find_dev(dev, 0x05961106, 0))
170 return "VIA 82C596 ATA33 controller";
171 if (ata_find_dev(dev, 0x06861106, 0x40))
172 return "VIA 82C686 ATA100 controller";
173 if (ata_find_dev(dev, 0x06861106, 0x10))
174 return "VIA 82C686 ATA66 controller";
175 if (ata_find_dev(dev, 0x06861106, 0))
176 return "VIA 82C686 ATA33 controller";
177 if (ata_find_dev(dev, 0x82311106, 0))
178 return "VIA 8231 ATA100 controller";
179 if (ata_find_dev(dev, 0x30741106, 0) ||
180 ata_find_dev(dev, 0x31091106, 0))
181 return "VIA 8233 ATA100 controller";
182 if (ata_find_dev(dev, 0x31471106, 0))
183 return "VIA 8233 ATA133 controller";
184 return "VIA Apollo ATA controller";
185
186 case 0x55131039:
187 if (ata_find_dev(dev, 0x06301039, 0x30) ||
188 ata_find_dev(dev, 0x06331039, 0) ||
189 ata_find_dev(dev, 0x06351039, 0) ||
190 ata_find_dev(dev, 0x06401039, 0) ||
191 ata_find_dev(dev, 0x06451039, 0) ||
192 ata_find_dev(dev, 0x06501039, 0) ||
193 ata_find_dev(dev, 0x07301039, 0) ||
194 ata_find_dev(dev, 0x07331039, 0) ||
195 ata_find_dev(dev, 0x07351039, 0) ||
196 ata_find_dev(dev, 0x07401039, 0) ||
197 ata_find_dev(dev, 0x07451039, 0) ||
198 ata_find_dev(dev, 0x07501039, 0))
199 return "SiS 5591 ATA100 controller";
200 else if (ata_find_dev(dev, 0x05301039, 0) ||
201 ata_find_dev(dev, 0x05401039, 0) ||
202 ata_find_dev(dev, 0x06201039, 0) ||
203 ata_find_dev(dev, 0x06301039, 0))
204 return "SiS 5591 ATA66 controller";
205 else
206 return "SiS 5591 ATA33 controller";
207
208 case 0x06491095:
209 return "CMD 649 ATA100 controller";
210
211 case 0x06481095:
212 return "CMD 648 ATA66 controller";
213
214 case 0x06461095:
215 return "CMD 646 ATA controller";
216
217 case 0xc6931080:
218 if (pci_get_subclass(dev) == PCIS_STORAGE_IDE)
219 return "Cypress 82C693 ATA controller";
220 return NULL;
221
222 case 0x01021078:
223 return "Cyrix 5530 ATA33 controller";
224
225 case 0x74091022:
226 return "AMD 756 ATA66 controller";
227
228 case 0x74111022:
229 return "AMD 766 ATA100 controller";
230
231 case 0x74411022:
232 return "AMD 768 ATA100 controller";
233
234 case 0x01bc10de:
235 return "nVIDIA nForce ATA100 controller";
236
237 case 0x02111166:
238 return "ServerWorks ROSB4 ATA33 controller";
239
240 case 0x02121166:
241 if (pci_get_revid(dev) >= 0x92)
242 return "ServerWorks CSB5 ATA100 controller";
243 else
244 return "ServerWorks CSB5 ATA66 controller";
245
246 case 0x4d33105a:
247 return "Promise ATA33 controller";
248
249 case 0x0d38105a:
250 case 0x4d38105a:
251 return "Promise ATA66 controller";
252
253 case 0x0d30105a:
254 case 0x4d30105a:
255 return "Promise ATA100 controller";
256
257 case 0x4d68105a:
258 case 0x6268105a:
259 if (pci_get_devid(GRANDPARENT(dev)) == 0x00221011 &&
260 pci_get_class(GRANDPARENT(dev)) == PCIC_BRIDGE) {
261 static long start = 0, end = 0;
262
263 /* we belive we are on a TX4, now do our (simple) magic */
264 if (pci_get_slot(dev) == 1) {
265 bus_get_resource(dev, SYS_RES_IRQ, 0, &start, &end);
266 return "Promise TX4 ATA100 controller (channel 0+1)";
267 }
268 else if (pci_get_slot(dev) == 2 && start && end) {
269 bus_set_resource(dev, SYS_RES_IRQ, 0, start, end);
270 start = end = 0;
271 return "Promise TX4 ATA100 controller (channel 2+3)";
272 }
273 else
274 start = end = 0;
275 }
276 return "Promise TX2 ATA100 controller";
277
278 case 0x4d69105a:
279 case 0x5275105a:
280 case 0x6269105a:
281 return "Promise TX2 ATA133 controller";
282
283 case 0x00041103:
284 switch (pci_get_revid(dev)) {
285 case 0x00:
286 case 0x01:
287 return "HighPoint HPT366 ATA66 controller";
288 case 0x02:
289 return "HighPoint HPT368 ATA66 controller";
290 case 0x03:
291 case 0x04:
292 return "HighPoint HPT370 ATA100 controller";
293 case 0x05:
294 return "HighPoint HPT372 ATA133 controller";
295 }
296 return NULL;
297
298 case 0x00051103:
299 switch (pci_get_revid(dev)) {
300 case 0x01:
301 return "HighPoint HPT372 ATA133 controller";
302 }
303 return NULL;
304
305 case 0x00081103:
306 switch (pci_get_revid(dev)) {
307 case 0x07:
308 return "HighPoint HPT374 ATA133 controller";
309 }
310 return NULL;
311
312 case 0x000116ca:
313 return "Cenatek Rocket Drive controller";
314
315 /* unsupported but known chipsets, generic DMA only */
316 case 0x10001042:
317 case 0x10011042:
318 return "RZ 100? ATA controller !WARNING! buggy chip data loss possible";
319
320 case 0x06401095:
321 return "CMD 640 ATA controller !WARNING! buggy chip data loss possible";
322
323 /* unknown chipsets, try generic DMA if it seems possible */
324 default:
325 if (pci_get_class(dev) == PCIC_STORAGE &&
326 (pci_get_subclass(dev) == PCIS_STORAGE_IDE))
327 return "Generic PCI ATA controller";
328 }
329 return NULL;
330}
331
332static int
333ata_pci_probe(device_t dev)
334{
335 const char *desc = ata_pci_match(dev);
336
337 if (desc) {
338 device_set_desc(dev, desc);
339 return 0;
340 }
341 else
342 return ENXIO;
343}
344
345static int
346ata_pci_add_child(device_t dev, int unit)
347{
348 device_t child;
349
350 /* check if this is located at one of the std addresses */
351 if (ATA_MASTERDEV(dev)) {
352 if (!(child = device_add_child(dev, "ata", unit)))
353 return ENOMEM;
354 }
355 else {
356 if (!(child =
357 device_add_child(dev, "ata",
358 devclass_find_free_unit(ata_devclass, 2))))
359 return ENOMEM;
360 }
361 return 0;
362}
363
364static int
365ata_pci_attach(device_t dev)
366{
367 struct ata_pci_controller *controller = device_get_softc(dev);
368 u_int8_t class, subclass;
369 u_int32_t type, cmd;
370 int rid;
371
372 /* set up vendor-specific stuff */
373 type = pci_get_devid(dev);
374 class = pci_get_class(dev);
375 subclass = pci_get_subclass(dev);
376 cmd = pci_read_config(dev, PCIR_COMMAND, 2);
377
378 if (!(cmd & PCIM_CMD_PORTEN)) {
379 device_printf(dev, "ATA channel disabled by BIOS\n");
380 return 0;
381 }
382
383#ifdef __sparc64__
384 if (!(cmd & PCIM_CMD_BUSMASTEREN)) {
385 pci_write_config(dev, PCIR_COMMAND, cmd | PCIM_CMD_BUSMASTEREN, 2);
386 cmd = pci_read_config(dev, PCIR_COMMAND, 2);
387 }
388#endif
389 /* is busmastering supported ? */
390 if ((cmd & (PCIM_CMD_PORTEN | PCIM_CMD_BUSMASTEREN)) ==
391 (PCIM_CMD_PORTEN | PCIM_CMD_BUSMASTEREN)) {
392
393 /* is there a valid port range to connect to ? */
394 rid = 0x20;
395 controller->bmio = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid,
396 0, ~0, 1, RF_ACTIVE);
397 if (!controller->bmio)
398 device_printf(dev, "Busmastering DMA not configured\n");
399 }
400 else
401 device_printf(dev, "Busmastering DMA not supported\n");
402
403 /* do extra chipset specific setups */
404 switch (type) {
405
406 case 0x522910b9: /* AcerLabs Aladdin need to activate the ATAPI FIFO */
407 pci_write_config(dev, 0x53,
408 (pci_read_config(dev, 0x53, 1) & ~0x01) | 0x02, 1);
409 break;
410
411 case 0x0d30105a: /* Promise 66 & 100 (before TX2) need the clock changed */
412 case 0x4d30105a:
413 case 0x0d38105a:
414 case 0x4d38105a:
415 ATA_OUTB(controller->bmio, 0x11, ATA_INB(controller->bmio, 0x11)|0x0a);
416 /* FALLTHROUGH */
417
418 case 0x4d33105a: /* Promise (before TX2) need burst mode turned on */
419 ATA_OUTB(controller->bmio, 0x1f, ATA_INB(controller->bmio, 0x1f)|0x01);
420 break;
421
422 case 0x00041103: /* HighPoint HPT366/368/370/372 default setup */
423 if (pci_get_revid(dev) < 2) { /* HPT366 */
424 /* turn off interrupt prediction */
425 pci_write_config(dev, 0x51,
426 (pci_read_config(dev, 0x51, 1) & ~0x80), 1);
427 break;
428 }
429 if (pci_get_revid(dev) < 5) { /* HPT368/370 */
430 /* turn off interrupt prediction */
431 pci_write_config(dev, 0x51,
432 (pci_read_config(dev, 0x51, 1) & ~0x03), 1);
433 pci_write_config(dev, 0x55,
434 (pci_read_config(dev, 0x55, 1) & ~0x03), 1);
435
436 /* turn on interrupts */
437 pci_write_config(dev, 0x5a,
438 (pci_read_config(dev, 0x5a, 1) & ~0x10), 1);
439
440 /* set clocks etc */
441 pci_write_config(dev, 0x5b, 0x22, 1);
442 break;
443 }
444 /* FALLTHROUGH */
445
446 case 0x00051103: /* HighPoint HPT372 default setup */
447 case 0x00081103: /* HighPoint HPT374 default setup */
448 /* turn off interrupt prediction */
449 pci_write_config(dev, 0x51, (pci_read_config(dev, 0x51, 1) & ~0x03), 1);
450 pci_write_config(dev, 0x55, (pci_read_config(dev, 0x55, 1) & ~0x03), 1);
451
452 /* turn on interrupts */
453 pci_write_config(dev, 0x5a, (pci_read_config(dev, 0x5a, 1) & ~0x10), 1);
454
455 /* set clocks etc */
456 pci_write_config(dev, 0x5b,
457 (pci_read_config(dev, 0x5b, 1) & 0x01) | 0x20, 1);
458 break;
459
460 case 0x05711106: /* VIA 82C586, '596, '686 default setup */
461 /* prepare for ATA-66 on the 82C686a and 82C596b */
462 if ((ata_find_dev(dev, 0x06861106, 0x10) &&
463 !ata_find_dev(dev, 0x06861106, 0x40)) ||
464 ata_find_dev(dev, 0x05961106, 0x12))
465 pci_write_config(dev, 0x50, 0x030b030b, 4);
466
467 /* the southbridge might need the data corruption fix */
468 if (ata_find_dev(dev, 0x06861106, 0x40) ||
469 ata_find_dev(dev, 0x82311106, 0x10))
470 ata_via_southbridge_fixup(dev);
471 /* FALLTHROUGH */
472
473 case 0x74091022: /* AMD 756 default setup */
474 case 0x74111022: /* AMD 766 default setup */
475 case 0x74411022: /* AMD 768 default setup */
476 case 0x01bc10de: /* nVIDIA nForce default setup */
477 /* set prefetch, postwrite */
478 pci_write_config(dev, 0x41, pci_read_config(dev, 0x41, 1) | 0xf0, 1);
479
480 /* set fifo configuration half'n'half */
481 pci_write_config(dev, 0x43,
482 (pci_read_config(dev, 0x43, 1) & 0x90) | 0x2a, 1);
483
484 /* set status register read retry */
485 pci_write_config(dev, 0x44, pci_read_config(dev, 0x44, 1) | 0x08, 1);
486
487 /* set DMA read & end-of-sector fifo flush */
488 pci_write_config(dev, 0x46,
489 (pci_read_config(dev, 0x46, 1) & 0x0c) | 0xf0, 1);
490
491 /* set sector size */
492 pci_write_config(dev, 0x60, DEV_BSIZE, 2);
493 pci_write_config(dev, 0x68, DEV_BSIZE, 2);
494 break;
495
496 case 0x02111166: /* ServerWorks ROSB4 enable UDMA33 */
497 pci_write_config(dev, 0x64,
498 (pci_read_config(dev, 0x64, 4) & ~0x00002000) |
499 0x00004000, 4);
500 break;
501
502 case 0x02121166: /* ServerWorks CSB5 enable UDMA66/100 depending on rev */
503 pci_write_config(dev, 0x5a,
504 (pci_read_config(dev, 0x5a, 1) & ~0x40) |
505 (pci_get_revid(dev) >= 0x92) ? 0x03 : 0x02, 1);
506 break;
507
508 case 0x06461095: /* CMD 646 enable interrupts, set DMA read mode */
509 pci_write_config(dev, 0x71, 0x01, 1);
510 break;
511
512 case 0x10001042: /* RZ 100? known bad, no DMA */
513 case 0x10011042:
514 case 0x06401095: /* CMD 640 known bad, no DMA */
515 controller->bmio = NULL;
516 device_printf(dev, "Busmastering DMA disabled\n");
517 }
518
519 if (controller->bmio) {
520 controller->bmaddr = rman_get_start(controller->bmio);
521 BUS_RELEASE_RESOURCE(device_get_parent(dev), dev,
522 SYS_RES_IOPORT, rid, controller->bmio);
523 controller->bmio = NULL;
524 }
525
526 /*
527 * the Cypress chip is a mess, it contains two ATA functions, but
528 * both channels are visible on the first one.
529 * simply ignore the second function for now, as the right
530 * solution (ignoring the second channel on the first function)
531 * doesn't work with the crappy ATA interrupt setup on the alpha.
532 */
533 if (pci_get_devid(dev) == 0xc6931080 && pci_get_function(dev) > 1)
534 return 0;
535
536 ata_pci_add_child(dev, 0);
537
538 if (ATA_MASTERDEV(dev) || pci_read_config(dev, 0x18, 4) & IOMASK)
539 ata_pci_add_child(dev, 1);
540
541 return bus_generic_attach(dev);
542}
543
544static int
545ata_pci_intr(struct ata_channel *ch)
546{
547 u_int8_t dmastat;
548
549 /*
550 * since we might share the IRQ with another device, and in some
551 * cases with our twin channel, we only want to process interrupts
552 * that we know this channel generated.
553 */
554 switch (ch->chiptype) {
555 case 0x00041103: /* HighPoint HPT366/368/370/372 */
556 case 0x00051103: /* HighPoint HPT372 */
557 case 0x00081103: /* HighPoint HPT374 */
558 if (((dmastat = ata_dmastatus(ch)) &
559 (ATA_BMSTAT_ACTIVE | ATA_BMSTAT_INTERRUPT)) != ATA_BMSTAT_INTERRUPT)
560 return 1;
561 ATA_OUTB(ch->r_bmio, ATA_BMSTAT_PORT, dmastat | ATA_BMSTAT_INTERRUPT);
562 DELAY(1);
563 return 0;
564
565 case 0x06481095: /* CMD 648 */
566 case 0x06491095: /* CMD 649 */
567 if (!(pci_read_config(device_get_parent(ch->dev), 0x71, 1) &
568 (ch->unit ? 0x08 : 0x04)))
569 return 1;
570 break;
571
572 case 0x4d33105a: /* Promise Ultra/Fasttrak 33 */
573 case 0x0d38105a: /* Promise Fasttrak 66 */
574 case 0x4d38105a: /* Promise Ultra/Fasttrak 66 */
575 case 0x0d30105a: /* Promise OEM ATA100 */
576 case 0x4d30105a: /* Promise Ultra/Fasttrak 100 */
577 if (!(ATA_INL(ch->r_bmio, (ch->unit ? 0x14 : 0x1c)) &
578 (ch->unit ? 0x00004000 : 0x00000400)))
579 return 1;
580 break;
581
582 case 0x4d68105a: /* Promise TX2 ATA100 */
583 case 0x6268105a: /* Promise TX2 ATA100 */
584 case 0x4d69105a: /* Promise TX2 ATA133 */
585 case 0x5275105a: /* Promise TX2 ATA133 */
586 case 0x6269105a: /* Promise TX2 ATA133 */
587 ATA_OUTB(ch->r_bmio, ATA_BMDEVSPEC_0, 0x0b);
588 if (!(ATA_INB(ch->r_bmio, ATA_BMDEVSPEC_1) & 0x20))
589 return 1;
590 break;
591 }
592
593 if (ch->flags & ATA_DMA_ACTIVE) {
594 if (!((dmastat = ata_dmastatus(ch)) & ATA_BMSTAT_INTERRUPT))
595 return 1;
596 ATA_OUTB(ch->r_bmio, ATA_BMSTAT_PORT, dmastat | ATA_BMSTAT_INTERRUPT);
597 DELAY(1);
598 }
599 return 0;
600}
601
602static int
603ata_pci_print_child(device_t dev, device_t child)
604{
605 struct ata_channel *ch = device_get_softc(child);
606 int retval = 0;
607
608 retval += bus_print_child_header(dev, child);
609 retval += printf(": at 0x%lx", rman_get_start(ch->r_io));
610
611 if (ATA_MASTERDEV(dev))
612 retval += printf(" irq %d", 14 + ch->unit);
613
614 retval += bus_print_child_footer(dev, child);
615
616 return retval;
617}
618
619static struct resource *
620ata_pci_alloc_resource(device_t dev, device_t child, int type, int *rid,
621 u_long start, u_long end, u_long count, u_int flags)
622{
623 struct ata_pci_controller *controller = device_get_softc(dev);
624 struct resource *res = NULL;
625 int unit = ((struct ata_channel *)device_get_softc(child))->unit;
626 int myrid;
627
628 if (type == SYS_RES_IOPORT) {
629 switch (*rid) {
630 case ATA_IOADDR_RID:
631 if (ATA_MASTERDEV(dev)) {
632 myrid = 0;
633 start = (unit ? ATA_SECONDARY : ATA_PRIMARY);
634 end = start + ATA_IOSIZE - 1;
635 count = ATA_IOSIZE;
636 res = BUS_ALLOC_RESOURCE(device_get_parent(dev), child,
637 SYS_RES_IOPORT, &myrid,
638 start, end, count, flags);
639 }
640 else {
641 myrid = 0x10 + 8 * unit;
642 res = BUS_ALLOC_RESOURCE(device_get_parent(dev), dev,
643 SYS_RES_IOPORT, &myrid,
644 start, end, count, flags);
645 }
646 break;
647
648 case ATA_ALTADDR_RID:
649 if (ATA_MASTERDEV(dev)) {
650 myrid = 0;
651 start = (unit ? ATA_SECONDARY : ATA_PRIMARY) + ATA_ALTOFFSET;
652 end = start + ATA_ALTIOSIZE - 1;
653 count = ATA_ALTIOSIZE;
654 res = BUS_ALLOC_RESOURCE(device_get_parent(dev), child,
655 SYS_RES_IOPORT, &myrid,
656 start, end, count, flags);
657 }
658 else {
659 myrid = 0x14 + 8 * unit;
660 res = BUS_ALLOC_RESOURCE(device_get_parent(dev), dev,
661 SYS_RES_IOPORT, &myrid,
662 start, end, count, flags);
663 if (res) {
664 start = rman_get_start(res) + 2;
665 end = start + ATA_ALTIOSIZE - 1;
666 count = ATA_ALTIOSIZE;
667 BUS_RELEASE_RESOURCE(device_get_parent(dev), dev,
668 SYS_RES_IOPORT, myrid, res);
669 res = BUS_ALLOC_RESOURCE(device_get_parent(dev), dev,
670 SYS_RES_IOPORT, &myrid,
671 start, end, count, flags);
672 }
673 }
674 break;
675
676 case ATA_BMADDR_RID:
677 if (controller->bmaddr) {
678 myrid = 0x20;
679 start = (unit == 0 ?
680 controller->bmaddr : controller->bmaddr+ATA_BMIOSIZE);
681 end = start + ATA_BMIOSIZE - 1;
682 count = ATA_BMIOSIZE;
683 res = BUS_ALLOC_RESOURCE(device_get_parent(dev), child,
684 SYS_RES_IOPORT, &myrid,
685 start, end, count, flags);
686 }
687 }
688 return res;
689 }
690
691 if (type == SYS_RES_IRQ && *rid == ATA_IRQ_RID) {
692 if (ATA_MASTERDEV(dev)) {
693#ifdef __alpha__
694 return alpha_platform_alloc_ide_intr(unit);
695#else
696 int irq = (unit == 0 ? 14 : 15);
697
698 return BUS_ALLOC_RESOURCE(device_get_parent(dev), child,
699 SYS_RES_IRQ, rid, irq, irq, 1, flags);
700#endif
701 }
702 else {
703 /* primary and secondary channels share interrupt, keep track */
704 if (!controller->irq)
705 controller->irq = BUS_ALLOC_RESOURCE(device_get_parent(dev),
706 dev, SYS_RES_IRQ,
707 rid, 0, ~0, 1, flags);
708 controller->irqcnt++;
709 return controller->irq;
710 }
711 }
712 return 0;
713}
714
715static int
716ata_pci_release_resource(device_t dev, device_t child, int type, int rid,
717 struct resource *r)
718{
719 struct ata_pci_controller *controller = device_get_softc(dev);
720 int unit = ((struct ata_channel *)device_get_softc(child))->unit;
721
722 if (type == SYS_RES_IOPORT) {
723 switch (rid) {
724 case ATA_IOADDR_RID:
725 if (ATA_MASTERDEV(dev))
726 return BUS_RELEASE_RESOURCE(device_get_parent(dev), child,
727 SYS_RES_IOPORT, 0x0, r);
728 else
729 return BUS_RELEASE_RESOURCE(device_get_parent(dev), dev,
730 SYS_RES_IOPORT, 0x10 + 8 * unit, r);
731 break;
732
733 case ATA_ALTADDR_RID:
734 if (ATA_MASTERDEV(dev))
735 return BUS_RELEASE_RESOURCE(device_get_parent(dev), child,
736 SYS_RES_IOPORT, 0x0, r);
737 else
738 return BUS_RELEASE_RESOURCE(device_get_parent(dev), dev,
739 SYS_RES_IOPORT, 0x14 + 8 * unit, r);
740 break;
741
742 case ATA_BMADDR_RID:
743 return BUS_RELEASE_RESOURCE(device_get_parent(dev), child,
744 SYS_RES_IOPORT, 0x20, r);
745 default:
746 return ENOENT;
747 }
748 }
749 if (type == SYS_RES_IRQ) {
750 if (rid != ATA_IRQ_RID)
751 return ENOENT;
752
753 if (ATA_MASTERDEV(dev)) {
754#ifdef __alpha__
755 return alpha_platform_release_ide_intr(unit, r);
756#else
757 return BUS_RELEASE_RESOURCE(device_get_parent(dev), child,
758 SYS_RES_IRQ, rid, r);
759#endif
760 }
761 else {
762 /* primary and secondary channels share interrupt, keep track */
763 if (--controller->irqcnt)
764 return 0;
765 controller->irq = NULL;
766 return BUS_RELEASE_RESOURCE(device_get_parent(dev), dev,
767 SYS_RES_IRQ, rid, r);
768 }
769 }
770 return EINVAL;
771}
772
773static int
774ata_pci_setup_intr(device_t dev, device_t child, struct resource *irq,
775 int flags, driver_intr_t *intr, void *arg,
776 void **cookiep)
777{
778 if (ATA_MASTERDEV(dev)) {
779#ifdef __alpha__
780 return alpha_platform_setup_ide_intr(child, irq, intr, arg, cookiep);
781#else
782 return BUS_SETUP_INTR(device_get_parent(dev), child, irq,
783 flags, intr, arg, cookiep);
784#endif
785 }
786 else
787 return BUS_SETUP_INTR(device_get_parent(dev), dev, irq,
788 flags, intr, arg, cookiep);
789}
790
791static int
792ata_pci_teardown_intr(device_t dev, device_t child, struct resource *irq,
793 void *cookie)
794{
795 if (ATA_MASTERDEV(dev)) {
796#ifdef __alpha__
797 return alpha_platform_teardown_ide_intr(child, irq, cookie);
798#else
799 return BUS_TEARDOWN_INTR(device_get_parent(dev), child, irq, cookie);
800#endif
801 }
802 else
803 return BUS_TEARDOWN_INTR(device_get_parent(dev), dev, irq, cookie);
804}
805
806static device_method_t ata_pci_methods[] = {
807 /* device interface */
808 DEVMETHOD(device_probe, ata_pci_probe),
809 DEVMETHOD(device_attach, ata_pci_attach),
810 DEVMETHOD(device_shutdown, bus_generic_shutdown),
811 DEVMETHOD(device_suspend, bus_generic_suspend),
812 DEVMETHOD(device_resume, bus_generic_resume),
813
814 /* bus methods */
815 DEVMETHOD(bus_print_child, ata_pci_print_child),
816 DEVMETHOD(bus_alloc_resource, ata_pci_alloc_resource),
817 DEVMETHOD(bus_release_resource, ata_pci_release_resource),
818 DEVMETHOD(bus_activate_resource, bus_generic_activate_resource),
819 DEVMETHOD(bus_deactivate_resource, bus_generic_deactivate_resource),
820 DEVMETHOD(bus_setup_intr, ata_pci_setup_intr),
821 DEVMETHOD(bus_teardown_intr, ata_pci_teardown_intr),
822 { 0, 0 }
823};
824
825static driver_t ata_pci_driver = {
826 "atapci",
827 ata_pci_methods,
828 sizeof(struct ata_pci_controller),
829};
830
831static devclass_t ata_pci_devclass;
832
833DRIVER_MODULE(atapci, pci, ata_pci_driver, ata_pci_devclass, 0, 0);
834
835static int
836ata_pcisub_probe(device_t dev)
837{
838 struct ata_channel *ch = device_get_softc(dev);
839 device_t *children;
840 int count, i;
841
842 /* find channel number on this controller */
843 device_get_children(device_get_parent(dev), &children, &count);
844 for (i = 0; i < count; i++) {
845 if (children[i] == dev)
846 ch->unit = i;
847 }
848 free(children, M_TEMP);
849 ch->chiptype = pci_get_devid(device_get_parent(dev));
850 ch->intr_func = ata_pci_intr;
851 return ata_probe(dev);
852}
853
854static device_method_t ata_pcisub_methods[] = {
855 /* device interface */
856 DEVMETHOD(device_probe, ata_pcisub_probe),
857 DEVMETHOD(device_attach, ata_attach),
858 DEVMETHOD(device_detach, ata_detach),
859 DEVMETHOD(device_resume, ata_resume),
860 { 0, 0 }
861};
862
863static driver_t ata_pcisub_driver = {
864 "ata",
865 ata_pcisub_methods,
866 sizeof(struct ata_channel),
867};
868
869DRIVER_MODULE(ata, atapci, ata_pcisub_driver, ata_devclass, 0, 0);
2 * Copyright (c) 1998,1999,2000,2001,2002 S�ren Schmidt <sos@FreeBSD.org>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer,
10 * without modification, immediately at the beginning of the file.
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 * 3. The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 *
28 * $FreeBSD: head/sys/dev/ata/ata-pci.c 100380 2002-07-19 22:14:54Z jhb $
29 */
30
31#include "opt_ata.h"
32#include <sys/param.h>
33#include <sys/systm.h>
34#include <sys/kernel.h>
35#include <sys/disk.h>
36#include <sys/module.h>
37#include <sys/bus.h>
38#include <sys/bio.h>
39#include <sys/malloc.h>
40#include <sys/devicestat.h>
41#include <sys/sysctl.h>
42#include <machine/stdarg.h>
43#include <machine/resource.h>
44#include <machine/bus.h>
45#ifdef __alpha__
46#include <machine/md_var.h>
47#endif
48#include <sys/rman.h>
49#include <pci/pcivar.h>
50#include <pci/pcireg.h>
51#include <dev/ata/ata-all.h>
52
53/* device structures */
54struct ata_pci_controller {
55 struct resource *bmio;
56 int bmaddr;
57 struct resource *irq;
58 int irqcnt;
59};
60
61/* misc defines */
62#define IOMASK 0xfffffffc
63#define GRANDPARENT(dev) device_get_parent(device_get_parent(dev))
64#define ATA_MASTERDEV(dev) ((pci_get_progif(dev) & 0x80) && \
65 (pci_get_progif(dev) & 0x05) != 0x05)
66
67int
68ata_find_dev(device_t dev, u_int32_t devid, u_int32_t revid)
69{
70 device_t *children;
71 int nchildren, i;
72
73 if (device_get_children(device_get_parent(dev), &children, &nchildren))
74 return 0;
75
76 for (i = 0; i < nchildren; i++) {
77 if (pci_get_devid(children[i]) == devid &&
78 pci_get_revid(children[i]) >= revid) {
79 free(children, M_TEMP);
80 return 1;
81 }
82 }
83 free(children, M_TEMP);
84 return 0;
85}
86
87static void
88ata_via_southbridge_fixup(device_t dev)
89{
90 device_t *children;
91 int nchildren, i;
92
93 if (device_get_children(device_get_parent(dev), &children, &nchildren))
94 return;
95
96 for (i = 0; i < nchildren; i++) {
97 if (pci_get_devid(children[i]) == 0x03051106 || /* VIA VT8363 */
98 pci_get_devid(children[i]) == 0x03911106 || /* VIA VT8371 */
99 pci_get_devid(children[i]) == 0x31021106 || /* VIA VT8662 */
100 pci_get_devid(children[i]) == 0x31121106) { /* VIA VT8361 */
101 u_int8_t reg76 = pci_read_config(children[i], 0x76, 1);
102
103 if ((reg76 & 0xf0) != 0xd0) {
104 device_printf(dev,
105 "Correcting VIA config for southbridge data corruption bug\n");
106 pci_write_config(children[i], 0x75, 0x80, 1);
107 pci_write_config(children[i], 0x76, (reg76 & 0x0f) | 0xd0, 1);
108 }
109 break;
110 }
111 }
112 free(children, M_TEMP);
113}
114
115static const char *
116ata_pci_match(device_t dev)
117{
118 if (pci_get_class(dev) != PCIC_STORAGE)
119 return NULL;
120
121 switch (pci_get_devid(dev)) {
122 /* supported chipsets */
123 case 0x12308086:
124 return "Intel PIIX ATA controller";
125
126 case 0x70108086:
127 return "Intel PIIX3 ATA controller";
128
129 case 0x71118086:
130 case 0x71998086:
131 case 0x84ca8086:
132 return "Intel PIIX4 ATA33 controller";
133
134 case 0x24218086:
135 return "Intel ICH0 ATA33 controller";
136
137 case 0x24118086:
138 case 0x76018086:
139 return "Intel ICH ATA66 controller";
140
141 case 0x244a8086:
142 case 0x244b8086:
143 return "Intel ICH2 ATA100 controller";
144
145 case 0x248a8086:
146 case 0x248b8086:
147 return "Intel ICH3 ATA100 controller";
148
149 case 0x24cb8086:
150 return "Intel ICH4 ATA100 controller";
151
152 case 0x522910b9:
153 if (pci_get_revid(dev) >= 0xc4)
154 return "AcerLabs Aladdin ATA100 controller";
155 else if (pci_get_revid(dev) >= 0xc2)
156 return "AcerLabs Aladdin ATA66 controller";
157 else if (pci_get_revid(dev) >= 0x20)
158 return "AcerLabs Aladdin ATA33 controller";
159 else
160 return "AcerLabs Aladdin ATA controller";
161
162 case 0x05711106:
163 if (ata_find_dev(dev, 0x05861106, 0x02))
164 return "VIA 82C586 ATA33 controller";
165 if (ata_find_dev(dev, 0x05861106, 0))
166 return "VIA 82C586 ATA controller";
167 if (ata_find_dev(dev, 0x05961106, 0x12))
168 return "VIA 82C596 ATA66 controller";
169 if (ata_find_dev(dev, 0x05961106, 0))
170 return "VIA 82C596 ATA33 controller";
171 if (ata_find_dev(dev, 0x06861106, 0x40))
172 return "VIA 82C686 ATA100 controller";
173 if (ata_find_dev(dev, 0x06861106, 0x10))
174 return "VIA 82C686 ATA66 controller";
175 if (ata_find_dev(dev, 0x06861106, 0))
176 return "VIA 82C686 ATA33 controller";
177 if (ata_find_dev(dev, 0x82311106, 0))
178 return "VIA 8231 ATA100 controller";
179 if (ata_find_dev(dev, 0x30741106, 0) ||
180 ata_find_dev(dev, 0x31091106, 0))
181 return "VIA 8233 ATA100 controller";
182 if (ata_find_dev(dev, 0x31471106, 0))
183 return "VIA 8233 ATA133 controller";
184 return "VIA Apollo ATA controller";
185
186 case 0x55131039:
187 if (ata_find_dev(dev, 0x06301039, 0x30) ||
188 ata_find_dev(dev, 0x06331039, 0) ||
189 ata_find_dev(dev, 0x06351039, 0) ||
190 ata_find_dev(dev, 0x06401039, 0) ||
191 ata_find_dev(dev, 0x06451039, 0) ||
192 ata_find_dev(dev, 0x06501039, 0) ||
193 ata_find_dev(dev, 0x07301039, 0) ||
194 ata_find_dev(dev, 0x07331039, 0) ||
195 ata_find_dev(dev, 0x07351039, 0) ||
196 ata_find_dev(dev, 0x07401039, 0) ||
197 ata_find_dev(dev, 0x07451039, 0) ||
198 ata_find_dev(dev, 0x07501039, 0))
199 return "SiS 5591 ATA100 controller";
200 else if (ata_find_dev(dev, 0x05301039, 0) ||
201 ata_find_dev(dev, 0x05401039, 0) ||
202 ata_find_dev(dev, 0x06201039, 0) ||
203 ata_find_dev(dev, 0x06301039, 0))
204 return "SiS 5591 ATA66 controller";
205 else
206 return "SiS 5591 ATA33 controller";
207
208 case 0x06491095:
209 return "CMD 649 ATA100 controller";
210
211 case 0x06481095:
212 return "CMD 648 ATA66 controller";
213
214 case 0x06461095:
215 return "CMD 646 ATA controller";
216
217 case 0xc6931080:
218 if (pci_get_subclass(dev) == PCIS_STORAGE_IDE)
219 return "Cypress 82C693 ATA controller";
220 return NULL;
221
222 case 0x01021078:
223 return "Cyrix 5530 ATA33 controller";
224
225 case 0x74091022:
226 return "AMD 756 ATA66 controller";
227
228 case 0x74111022:
229 return "AMD 766 ATA100 controller";
230
231 case 0x74411022:
232 return "AMD 768 ATA100 controller";
233
234 case 0x01bc10de:
235 return "nVIDIA nForce ATA100 controller";
236
237 case 0x02111166:
238 return "ServerWorks ROSB4 ATA33 controller";
239
240 case 0x02121166:
241 if (pci_get_revid(dev) >= 0x92)
242 return "ServerWorks CSB5 ATA100 controller";
243 else
244 return "ServerWorks CSB5 ATA66 controller";
245
246 case 0x4d33105a:
247 return "Promise ATA33 controller";
248
249 case 0x0d38105a:
250 case 0x4d38105a:
251 return "Promise ATA66 controller";
252
253 case 0x0d30105a:
254 case 0x4d30105a:
255 return "Promise ATA100 controller";
256
257 case 0x4d68105a:
258 case 0x6268105a:
259 if (pci_get_devid(GRANDPARENT(dev)) == 0x00221011 &&
260 pci_get_class(GRANDPARENT(dev)) == PCIC_BRIDGE) {
261 static long start = 0, end = 0;
262
263 /* we belive we are on a TX4, now do our (simple) magic */
264 if (pci_get_slot(dev) == 1) {
265 bus_get_resource(dev, SYS_RES_IRQ, 0, &start, &end);
266 return "Promise TX4 ATA100 controller (channel 0+1)";
267 }
268 else if (pci_get_slot(dev) == 2 && start && end) {
269 bus_set_resource(dev, SYS_RES_IRQ, 0, start, end);
270 start = end = 0;
271 return "Promise TX4 ATA100 controller (channel 2+3)";
272 }
273 else
274 start = end = 0;
275 }
276 return "Promise TX2 ATA100 controller";
277
278 case 0x4d69105a:
279 case 0x5275105a:
280 case 0x6269105a:
281 return "Promise TX2 ATA133 controller";
282
283 case 0x00041103:
284 switch (pci_get_revid(dev)) {
285 case 0x00:
286 case 0x01:
287 return "HighPoint HPT366 ATA66 controller";
288 case 0x02:
289 return "HighPoint HPT368 ATA66 controller";
290 case 0x03:
291 case 0x04:
292 return "HighPoint HPT370 ATA100 controller";
293 case 0x05:
294 return "HighPoint HPT372 ATA133 controller";
295 }
296 return NULL;
297
298 case 0x00051103:
299 switch (pci_get_revid(dev)) {
300 case 0x01:
301 return "HighPoint HPT372 ATA133 controller";
302 }
303 return NULL;
304
305 case 0x00081103:
306 switch (pci_get_revid(dev)) {
307 case 0x07:
308 return "HighPoint HPT374 ATA133 controller";
309 }
310 return NULL;
311
312 case 0x000116ca:
313 return "Cenatek Rocket Drive controller";
314
315 /* unsupported but known chipsets, generic DMA only */
316 case 0x10001042:
317 case 0x10011042:
318 return "RZ 100? ATA controller !WARNING! buggy chip data loss possible";
319
320 case 0x06401095:
321 return "CMD 640 ATA controller !WARNING! buggy chip data loss possible";
322
323 /* unknown chipsets, try generic DMA if it seems possible */
324 default:
325 if (pci_get_class(dev) == PCIC_STORAGE &&
326 (pci_get_subclass(dev) == PCIS_STORAGE_IDE))
327 return "Generic PCI ATA controller";
328 }
329 return NULL;
330}
331
332static int
333ata_pci_probe(device_t dev)
334{
335 const char *desc = ata_pci_match(dev);
336
337 if (desc) {
338 device_set_desc(dev, desc);
339 return 0;
340 }
341 else
342 return ENXIO;
343}
344
345static int
346ata_pci_add_child(device_t dev, int unit)
347{
348 device_t child;
349
350 /* check if this is located at one of the std addresses */
351 if (ATA_MASTERDEV(dev)) {
352 if (!(child = device_add_child(dev, "ata", unit)))
353 return ENOMEM;
354 }
355 else {
356 if (!(child =
357 device_add_child(dev, "ata",
358 devclass_find_free_unit(ata_devclass, 2))))
359 return ENOMEM;
360 }
361 return 0;
362}
363
364static int
365ata_pci_attach(device_t dev)
366{
367 struct ata_pci_controller *controller = device_get_softc(dev);
368 u_int8_t class, subclass;
369 u_int32_t type, cmd;
370 int rid;
371
372 /* set up vendor-specific stuff */
373 type = pci_get_devid(dev);
374 class = pci_get_class(dev);
375 subclass = pci_get_subclass(dev);
376 cmd = pci_read_config(dev, PCIR_COMMAND, 2);
377
378 if (!(cmd & PCIM_CMD_PORTEN)) {
379 device_printf(dev, "ATA channel disabled by BIOS\n");
380 return 0;
381 }
382
383#ifdef __sparc64__
384 if (!(cmd & PCIM_CMD_BUSMASTEREN)) {
385 pci_write_config(dev, PCIR_COMMAND, cmd | PCIM_CMD_BUSMASTEREN, 2);
386 cmd = pci_read_config(dev, PCIR_COMMAND, 2);
387 }
388#endif
389 /* is busmastering supported ? */
390 if ((cmd & (PCIM_CMD_PORTEN | PCIM_CMD_BUSMASTEREN)) ==
391 (PCIM_CMD_PORTEN | PCIM_CMD_BUSMASTEREN)) {
392
393 /* is there a valid port range to connect to ? */
394 rid = 0x20;
395 controller->bmio = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid,
396 0, ~0, 1, RF_ACTIVE);
397 if (!controller->bmio)
398 device_printf(dev, "Busmastering DMA not configured\n");
399 }
400 else
401 device_printf(dev, "Busmastering DMA not supported\n");
402
403 /* do extra chipset specific setups */
404 switch (type) {
405
406 case 0x522910b9: /* AcerLabs Aladdin need to activate the ATAPI FIFO */
407 pci_write_config(dev, 0x53,
408 (pci_read_config(dev, 0x53, 1) & ~0x01) | 0x02, 1);
409 break;
410
411 case 0x0d30105a: /* Promise 66 & 100 (before TX2) need the clock changed */
412 case 0x4d30105a:
413 case 0x0d38105a:
414 case 0x4d38105a:
415 ATA_OUTB(controller->bmio, 0x11, ATA_INB(controller->bmio, 0x11)|0x0a);
416 /* FALLTHROUGH */
417
418 case 0x4d33105a: /* Promise (before TX2) need burst mode turned on */
419 ATA_OUTB(controller->bmio, 0x1f, ATA_INB(controller->bmio, 0x1f)|0x01);
420 break;
421
422 case 0x00041103: /* HighPoint HPT366/368/370/372 default setup */
423 if (pci_get_revid(dev) < 2) { /* HPT366 */
424 /* turn off interrupt prediction */
425 pci_write_config(dev, 0x51,
426 (pci_read_config(dev, 0x51, 1) & ~0x80), 1);
427 break;
428 }
429 if (pci_get_revid(dev) < 5) { /* HPT368/370 */
430 /* turn off interrupt prediction */
431 pci_write_config(dev, 0x51,
432 (pci_read_config(dev, 0x51, 1) & ~0x03), 1);
433 pci_write_config(dev, 0x55,
434 (pci_read_config(dev, 0x55, 1) & ~0x03), 1);
435
436 /* turn on interrupts */
437 pci_write_config(dev, 0x5a,
438 (pci_read_config(dev, 0x5a, 1) & ~0x10), 1);
439
440 /* set clocks etc */
441 pci_write_config(dev, 0x5b, 0x22, 1);
442 break;
443 }
444 /* FALLTHROUGH */
445
446 case 0x00051103: /* HighPoint HPT372 default setup */
447 case 0x00081103: /* HighPoint HPT374 default setup */
448 /* turn off interrupt prediction */
449 pci_write_config(dev, 0x51, (pci_read_config(dev, 0x51, 1) & ~0x03), 1);
450 pci_write_config(dev, 0x55, (pci_read_config(dev, 0x55, 1) & ~0x03), 1);
451
452 /* turn on interrupts */
453 pci_write_config(dev, 0x5a, (pci_read_config(dev, 0x5a, 1) & ~0x10), 1);
454
455 /* set clocks etc */
456 pci_write_config(dev, 0x5b,
457 (pci_read_config(dev, 0x5b, 1) & 0x01) | 0x20, 1);
458 break;
459
460 case 0x05711106: /* VIA 82C586, '596, '686 default setup */
461 /* prepare for ATA-66 on the 82C686a and 82C596b */
462 if ((ata_find_dev(dev, 0x06861106, 0x10) &&
463 !ata_find_dev(dev, 0x06861106, 0x40)) ||
464 ata_find_dev(dev, 0x05961106, 0x12))
465 pci_write_config(dev, 0x50, 0x030b030b, 4);
466
467 /* the southbridge might need the data corruption fix */
468 if (ata_find_dev(dev, 0x06861106, 0x40) ||
469 ata_find_dev(dev, 0x82311106, 0x10))
470 ata_via_southbridge_fixup(dev);
471 /* FALLTHROUGH */
472
473 case 0x74091022: /* AMD 756 default setup */
474 case 0x74111022: /* AMD 766 default setup */
475 case 0x74411022: /* AMD 768 default setup */
476 case 0x01bc10de: /* nVIDIA nForce default setup */
477 /* set prefetch, postwrite */
478 pci_write_config(dev, 0x41, pci_read_config(dev, 0x41, 1) | 0xf0, 1);
479
480 /* set fifo configuration half'n'half */
481 pci_write_config(dev, 0x43,
482 (pci_read_config(dev, 0x43, 1) & 0x90) | 0x2a, 1);
483
484 /* set status register read retry */
485 pci_write_config(dev, 0x44, pci_read_config(dev, 0x44, 1) | 0x08, 1);
486
487 /* set DMA read & end-of-sector fifo flush */
488 pci_write_config(dev, 0x46,
489 (pci_read_config(dev, 0x46, 1) & 0x0c) | 0xf0, 1);
490
491 /* set sector size */
492 pci_write_config(dev, 0x60, DEV_BSIZE, 2);
493 pci_write_config(dev, 0x68, DEV_BSIZE, 2);
494 break;
495
496 case 0x02111166: /* ServerWorks ROSB4 enable UDMA33 */
497 pci_write_config(dev, 0x64,
498 (pci_read_config(dev, 0x64, 4) & ~0x00002000) |
499 0x00004000, 4);
500 break;
501
502 case 0x02121166: /* ServerWorks CSB5 enable UDMA66/100 depending on rev */
503 pci_write_config(dev, 0x5a,
504 (pci_read_config(dev, 0x5a, 1) & ~0x40) |
505 (pci_get_revid(dev) >= 0x92) ? 0x03 : 0x02, 1);
506 break;
507
508 case 0x06461095: /* CMD 646 enable interrupts, set DMA read mode */
509 pci_write_config(dev, 0x71, 0x01, 1);
510 break;
511
512 case 0x10001042: /* RZ 100? known bad, no DMA */
513 case 0x10011042:
514 case 0x06401095: /* CMD 640 known bad, no DMA */
515 controller->bmio = NULL;
516 device_printf(dev, "Busmastering DMA disabled\n");
517 }
518
519 if (controller->bmio) {
520 controller->bmaddr = rman_get_start(controller->bmio);
521 BUS_RELEASE_RESOURCE(device_get_parent(dev), dev,
522 SYS_RES_IOPORT, rid, controller->bmio);
523 controller->bmio = NULL;
524 }
525
526 /*
527 * the Cypress chip is a mess, it contains two ATA functions, but
528 * both channels are visible on the first one.
529 * simply ignore the second function for now, as the right
530 * solution (ignoring the second channel on the first function)
531 * doesn't work with the crappy ATA interrupt setup on the alpha.
532 */
533 if (pci_get_devid(dev) == 0xc6931080 && pci_get_function(dev) > 1)
534 return 0;
535
536 ata_pci_add_child(dev, 0);
537
538 if (ATA_MASTERDEV(dev) || pci_read_config(dev, 0x18, 4) & IOMASK)
539 ata_pci_add_child(dev, 1);
540
541 return bus_generic_attach(dev);
542}
543
544static int
545ata_pci_intr(struct ata_channel *ch)
546{
547 u_int8_t dmastat;
548
549 /*
550 * since we might share the IRQ with another device, and in some
551 * cases with our twin channel, we only want to process interrupts
552 * that we know this channel generated.
553 */
554 switch (ch->chiptype) {
555 case 0x00041103: /* HighPoint HPT366/368/370/372 */
556 case 0x00051103: /* HighPoint HPT372 */
557 case 0x00081103: /* HighPoint HPT374 */
558 if (((dmastat = ata_dmastatus(ch)) &
559 (ATA_BMSTAT_ACTIVE | ATA_BMSTAT_INTERRUPT)) != ATA_BMSTAT_INTERRUPT)
560 return 1;
561 ATA_OUTB(ch->r_bmio, ATA_BMSTAT_PORT, dmastat | ATA_BMSTAT_INTERRUPT);
562 DELAY(1);
563 return 0;
564
565 case 0x06481095: /* CMD 648 */
566 case 0x06491095: /* CMD 649 */
567 if (!(pci_read_config(device_get_parent(ch->dev), 0x71, 1) &
568 (ch->unit ? 0x08 : 0x04)))
569 return 1;
570 break;
571
572 case 0x4d33105a: /* Promise Ultra/Fasttrak 33 */
573 case 0x0d38105a: /* Promise Fasttrak 66 */
574 case 0x4d38105a: /* Promise Ultra/Fasttrak 66 */
575 case 0x0d30105a: /* Promise OEM ATA100 */
576 case 0x4d30105a: /* Promise Ultra/Fasttrak 100 */
577 if (!(ATA_INL(ch->r_bmio, (ch->unit ? 0x14 : 0x1c)) &
578 (ch->unit ? 0x00004000 : 0x00000400)))
579 return 1;
580 break;
581
582 case 0x4d68105a: /* Promise TX2 ATA100 */
583 case 0x6268105a: /* Promise TX2 ATA100 */
584 case 0x4d69105a: /* Promise TX2 ATA133 */
585 case 0x5275105a: /* Promise TX2 ATA133 */
586 case 0x6269105a: /* Promise TX2 ATA133 */
587 ATA_OUTB(ch->r_bmio, ATA_BMDEVSPEC_0, 0x0b);
588 if (!(ATA_INB(ch->r_bmio, ATA_BMDEVSPEC_1) & 0x20))
589 return 1;
590 break;
591 }
592
593 if (ch->flags & ATA_DMA_ACTIVE) {
594 if (!((dmastat = ata_dmastatus(ch)) & ATA_BMSTAT_INTERRUPT))
595 return 1;
596 ATA_OUTB(ch->r_bmio, ATA_BMSTAT_PORT, dmastat | ATA_BMSTAT_INTERRUPT);
597 DELAY(1);
598 }
599 return 0;
600}
601
602static int
603ata_pci_print_child(device_t dev, device_t child)
604{
605 struct ata_channel *ch = device_get_softc(child);
606 int retval = 0;
607
608 retval += bus_print_child_header(dev, child);
609 retval += printf(": at 0x%lx", rman_get_start(ch->r_io));
610
611 if (ATA_MASTERDEV(dev))
612 retval += printf(" irq %d", 14 + ch->unit);
613
614 retval += bus_print_child_footer(dev, child);
615
616 return retval;
617}
618
619static struct resource *
620ata_pci_alloc_resource(device_t dev, device_t child, int type, int *rid,
621 u_long start, u_long end, u_long count, u_int flags)
622{
623 struct ata_pci_controller *controller = device_get_softc(dev);
624 struct resource *res = NULL;
625 int unit = ((struct ata_channel *)device_get_softc(child))->unit;
626 int myrid;
627
628 if (type == SYS_RES_IOPORT) {
629 switch (*rid) {
630 case ATA_IOADDR_RID:
631 if (ATA_MASTERDEV(dev)) {
632 myrid = 0;
633 start = (unit ? ATA_SECONDARY : ATA_PRIMARY);
634 end = start + ATA_IOSIZE - 1;
635 count = ATA_IOSIZE;
636 res = BUS_ALLOC_RESOURCE(device_get_parent(dev), child,
637 SYS_RES_IOPORT, &myrid,
638 start, end, count, flags);
639 }
640 else {
641 myrid = 0x10 + 8 * unit;
642 res = BUS_ALLOC_RESOURCE(device_get_parent(dev), dev,
643 SYS_RES_IOPORT, &myrid,
644 start, end, count, flags);
645 }
646 break;
647
648 case ATA_ALTADDR_RID:
649 if (ATA_MASTERDEV(dev)) {
650 myrid = 0;
651 start = (unit ? ATA_SECONDARY : ATA_PRIMARY) + ATA_ALTOFFSET;
652 end = start + ATA_ALTIOSIZE - 1;
653 count = ATA_ALTIOSIZE;
654 res = BUS_ALLOC_RESOURCE(device_get_parent(dev), child,
655 SYS_RES_IOPORT, &myrid,
656 start, end, count, flags);
657 }
658 else {
659 myrid = 0x14 + 8 * unit;
660 res = BUS_ALLOC_RESOURCE(device_get_parent(dev), dev,
661 SYS_RES_IOPORT, &myrid,
662 start, end, count, flags);
663 if (res) {
664 start = rman_get_start(res) + 2;
665 end = start + ATA_ALTIOSIZE - 1;
666 count = ATA_ALTIOSIZE;
667 BUS_RELEASE_RESOURCE(device_get_parent(dev), dev,
668 SYS_RES_IOPORT, myrid, res);
669 res = BUS_ALLOC_RESOURCE(device_get_parent(dev), dev,
670 SYS_RES_IOPORT, &myrid,
671 start, end, count, flags);
672 }
673 }
674 break;
675
676 case ATA_BMADDR_RID:
677 if (controller->bmaddr) {
678 myrid = 0x20;
679 start = (unit == 0 ?
680 controller->bmaddr : controller->bmaddr+ATA_BMIOSIZE);
681 end = start + ATA_BMIOSIZE - 1;
682 count = ATA_BMIOSIZE;
683 res = BUS_ALLOC_RESOURCE(device_get_parent(dev), child,
684 SYS_RES_IOPORT, &myrid,
685 start, end, count, flags);
686 }
687 }
688 return res;
689 }
690
691 if (type == SYS_RES_IRQ && *rid == ATA_IRQ_RID) {
692 if (ATA_MASTERDEV(dev)) {
693#ifdef __alpha__
694 return alpha_platform_alloc_ide_intr(unit);
695#else
696 int irq = (unit == 0 ? 14 : 15);
697
698 return BUS_ALLOC_RESOURCE(device_get_parent(dev), child,
699 SYS_RES_IRQ, rid, irq, irq, 1, flags);
700#endif
701 }
702 else {
703 /* primary and secondary channels share interrupt, keep track */
704 if (!controller->irq)
705 controller->irq = BUS_ALLOC_RESOURCE(device_get_parent(dev),
706 dev, SYS_RES_IRQ,
707 rid, 0, ~0, 1, flags);
708 controller->irqcnt++;
709 return controller->irq;
710 }
711 }
712 return 0;
713}
714
715static int
716ata_pci_release_resource(device_t dev, device_t child, int type, int rid,
717 struct resource *r)
718{
719 struct ata_pci_controller *controller = device_get_softc(dev);
720 int unit = ((struct ata_channel *)device_get_softc(child))->unit;
721
722 if (type == SYS_RES_IOPORT) {
723 switch (rid) {
724 case ATA_IOADDR_RID:
725 if (ATA_MASTERDEV(dev))
726 return BUS_RELEASE_RESOURCE(device_get_parent(dev), child,
727 SYS_RES_IOPORT, 0x0, r);
728 else
729 return BUS_RELEASE_RESOURCE(device_get_parent(dev), dev,
730 SYS_RES_IOPORT, 0x10 + 8 * unit, r);
731 break;
732
733 case ATA_ALTADDR_RID:
734 if (ATA_MASTERDEV(dev))
735 return BUS_RELEASE_RESOURCE(device_get_parent(dev), child,
736 SYS_RES_IOPORT, 0x0, r);
737 else
738 return BUS_RELEASE_RESOURCE(device_get_parent(dev), dev,
739 SYS_RES_IOPORT, 0x14 + 8 * unit, r);
740 break;
741
742 case ATA_BMADDR_RID:
743 return BUS_RELEASE_RESOURCE(device_get_parent(dev), child,
744 SYS_RES_IOPORT, 0x20, r);
745 default:
746 return ENOENT;
747 }
748 }
749 if (type == SYS_RES_IRQ) {
750 if (rid != ATA_IRQ_RID)
751 return ENOENT;
752
753 if (ATA_MASTERDEV(dev)) {
754#ifdef __alpha__
755 return alpha_platform_release_ide_intr(unit, r);
756#else
757 return BUS_RELEASE_RESOURCE(device_get_parent(dev), child,
758 SYS_RES_IRQ, rid, r);
759#endif
760 }
761 else {
762 /* primary and secondary channels share interrupt, keep track */
763 if (--controller->irqcnt)
764 return 0;
765 controller->irq = NULL;
766 return BUS_RELEASE_RESOURCE(device_get_parent(dev), dev,
767 SYS_RES_IRQ, rid, r);
768 }
769 }
770 return EINVAL;
771}
772
773static int
774ata_pci_setup_intr(device_t dev, device_t child, struct resource *irq,
775 int flags, driver_intr_t *intr, void *arg,
776 void **cookiep)
777{
778 if (ATA_MASTERDEV(dev)) {
779#ifdef __alpha__
780 return alpha_platform_setup_ide_intr(child, irq, intr, arg, cookiep);
781#else
782 return BUS_SETUP_INTR(device_get_parent(dev), child, irq,
783 flags, intr, arg, cookiep);
784#endif
785 }
786 else
787 return BUS_SETUP_INTR(device_get_parent(dev), dev, irq,
788 flags, intr, arg, cookiep);
789}
790
791static int
792ata_pci_teardown_intr(device_t dev, device_t child, struct resource *irq,
793 void *cookie)
794{
795 if (ATA_MASTERDEV(dev)) {
796#ifdef __alpha__
797 return alpha_platform_teardown_ide_intr(child, irq, cookie);
798#else
799 return BUS_TEARDOWN_INTR(device_get_parent(dev), child, irq, cookie);
800#endif
801 }
802 else
803 return BUS_TEARDOWN_INTR(device_get_parent(dev), dev, irq, cookie);
804}
805
806static device_method_t ata_pci_methods[] = {
807 /* device interface */
808 DEVMETHOD(device_probe, ata_pci_probe),
809 DEVMETHOD(device_attach, ata_pci_attach),
810 DEVMETHOD(device_shutdown, bus_generic_shutdown),
811 DEVMETHOD(device_suspend, bus_generic_suspend),
812 DEVMETHOD(device_resume, bus_generic_resume),
813
814 /* bus methods */
815 DEVMETHOD(bus_print_child, ata_pci_print_child),
816 DEVMETHOD(bus_alloc_resource, ata_pci_alloc_resource),
817 DEVMETHOD(bus_release_resource, ata_pci_release_resource),
818 DEVMETHOD(bus_activate_resource, bus_generic_activate_resource),
819 DEVMETHOD(bus_deactivate_resource, bus_generic_deactivate_resource),
820 DEVMETHOD(bus_setup_intr, ata_pci_setup_intr),
821 DEVMETHOD(bus_teardown_intr, ata_pci_teardown_intr),
822 { 0, 0 }
823};
824
825static driver_t ata_pci_driver = {
826 "atapci",
827 ata_pci_methods,
828 sizeof(struct ata_pci_controller),
829};
830
831static devclass_t ata_pci_devclass;
832
833DRIVER_MODULE(atapci, pci, ata_pci_driver, ata_pci_devclass, 0, 0);
834
835static int
836ata_pcisub_probe(device_t dev)
837{
838 struct ata_channel *ch = device_get_softc(dev);
839 device_t *children;
840 int count, i;
841
842 /* find channel number on this controller */
843 device_get_children(device_get_parent(dev), &children, &count);
844 for (i = 0; i < count; i++) {
845 if (children[i] == dev)
846 ch->unit = i;
847 }
848 free(children, M_TEMP);
849 ch->chiptype = pci_get_devid(device_get_parent(dev));
850 ch->intr_func = ata_pci_intr;
851 return ata_probe(dev);
852}
853
854static device_method_t ata_pcisub_methods[] = {
855 /* device interface */
856 DEVMETHOD(device_probe, ata_pcisub_probe),
857 DEVMETHOD(device_attach, ata_attach),
858 DEVMETHOD(device_detach, ata_detach),
859 DEVMETHOD(device_resume, ata_resume),
860 { 0, 0 }
861};
862
863static driver_t ata_pcisub_driver = {
864 "ata",
865 ata_pcisub_methods,
866 sizeof(struct ata_channel),
867};
868
869DRIVER_MODULE(ata, atapci, ata_pcisub_driver, ata_devclass, 0, 0);