pata_hpt37x: use ATA_DMA_* constants
[safe/jmp/linux-2.6] / drivers / ata / pata_hpt37x.c
1 /*
2  * Libata driver for the highpoint 37x and 30x UDMA66 ATA controllers.
3  *
4  * This driver is heavily based upon:
5  *
6  * linux/drivers/ide/pci/hpt366.c               Version 0.36    April 25, 2003
7  *
8  * Copyright (C) 1999-2003              Andre Hedrick <andre@linux-ide.org>
9  * Portions Copyright (C) 2001          Sun Microsystems, Inc.
10  * Portions Copyright (C) 2003          Red Hat Inc
11  * Portions Copyright (C) 2005-2009     MontaVista Software, Inc.
12  *
13  * TODO
14  *      Look into engine reset on timeout errors. Should not be required.
15  */
16
17 #include <linux/kernel.h>
18 #include <linux/module.h>
19 #include <linux/pci.h>
20 #include <linux/init.h>
21 #include <linux/blkdev.h>
22 #include <linux/delay.h>
23 #include <scsi/scsi_host.h>
24 #include <linux/libata.h>
25
26 #define DRV_NAME        "pata_hpt37x"
27 #define DRV_VERSION     "0.6.14"
28
29 struct hpt_clock {
30         u8      xfer_speed;
31         u32     timing;
32 };
33
34 struct hpt_chip {
35         const char *name;
36         unsigned int base;
37         struct hpt_clock const *clocks[4];
38 };
39
40 /* key for bus clock timings
41  * bit
42  * 0:3    data_high_time. inactive time of DIOW_/DIOR_ for PIO and MW
43  *        DMA. cycles = value + 1
44  * 4:8    data_low_time. active time of DIOW_/DIOR_ for PIO and MW
45  *        DMA. cycles = value + 1
46  * 9:12   cmd_high_time. inactive time of DIOW_/DIOR_ during task file
47  *        register access.
48  * 13:17  cmd_low_time. active time of DIOW_/DIOR_ during task file
49  *        register access.
50  * 18:21  udma_cycle_time. clock freq and clock cycles for UDMA xfer.
51  *        during task file register access.
52  * 22:24  pre_high_time. time to initialize 1st cycle for PIO and MW DMA
53  *        xfer.
54  * 25:27  cmd_pre_high_time. time to initialize 1st PIO cycle for task
55  *        register access.
56  * 28     UDMA enable
57  * 29     DMA enable
58  * 30     PIO_MST enable. if set, the chip is in bus master mode during
59  *        PIO.
60  * 31     FIFO enable.
61  */
62
63 static struct hpt_clock hpt37x_timings_33[] = {
64         { XFER_UDMA_6,          0x12446231 },   /* 0x12646231 ?? */
65         { XFER_UDMA_5,          0x12446231 },
66         { XFER_UDMA_4,          0x12446231 },
67         { XFER_UDMA_3,          0x126c6231 },
68         { XFER_UDMA_2,          0x12486231 },
69         { XFER_UDMA_1,          0x124c6233 },
70         { XFER_UDMA_0,          0x12506297 },
71
72         { XFER_MW_DMA_2,        0x22406c31 },
73         { XFER_MW_DMA_1,        0x22406c33 },
74         { XFER_MW_DMA_0,        0x22406c97 },
75
76         { XFER_PIO_4,           0x06414e31 },
77         { XFER_PIO_3,           0x06414e42 },
78         { XFER_PIO_2,           0x06414e53 },
79         { XFER_PIO_1,           0x06814e93 },
80         { XFER_PIO_0,           0x06814ea7 }
81 };
82
83 static struct hpt_clock hpt37x_timings_50[] = {
84         { XFER_UDMA_6,          0x12848242 },
85         { XFER_UDMA_5,          0x12848242 },
86         { XFER_UDMA_4,          0x12ac8242 },
87         { XFER_UDMA_3,          0x128c8242 },
88         { XFER_UDMA_2,          0x120c8242 },
89         { XFER_UDMA_1,          0x12148254 },
90         { XFER_UDMA_0,          0x121882ea },
91
92         { XFER_MW_DMA_2,        0x22808242 },
93         { XFER_MW_DMA_1,        0x22808254 },
94         { XFER_MW_DMA_0,        0x228082ea },
95
96         { XFER_PIO_4,           0x0a81f442 },
97         { XFER_PIO_3,           0x0a81f443 },
98         { XFER_PIO_2,           0x0a81f454 },
99         { XFER_PIO_1,           0x0ac1f465 },
100         { XFER_PIO_0,           0x0ac1f48a }
101 };
102
103 static struct hpt_clock hpt37x_timings_66[] = {
104         { XFER_UDMA_6,          0x1c869c62 },
105         { XFER_UDMA_5,          0x1cae9c62 },   /* 0x1c8a9c62 */
106         { XFER_UDMA_4,          0x1c8a9c62 },
107         { XFER_UDMA_3,          0x1c8e9c62 },
108         { XFER_UDMA_2,          0x1c929c62 },
109         { XFER_UDMA_1,          0x1c9a9c62 },
110         { XFER_UDMA_0,          0x1c829c62 },
111
112         { XFER_MW_DMA_2,        0x2c829c62 },
113         { XFER_MW_DMA_1,        0x2c829c66 },
114         { XFER_MW_DMA_0,        0x2c829d2e },
115
116         { XFER_PIO_4,           0x0c829c62 },
117         { XFER_PIO_3,           0x0c829c84 },
118         { XFER_PIO_2,           0x0c829ca6 },
119         { XFER_PIO_1,           0x0d029d26 },
120         { XFER_PIO_0,           0x0d029d5e }
121 };
122
123
124 static const struct hpt_chip hpt370 = {
125         "HPT370",
126         48,
127         {
128                 hpt37x_timings_33,
129                 NULL,
130                 NULL,
131                 NULL
132         }
133 };
134
135 static const struct hpt_chip hpt370a = {
136         "HPT370A",
137         48,
138         {
139                 hpt37x_timings_33,
140                 NULL,
141                 hpt37x_timings_50,
142                 NULL
143         }
144 };
145
146 static const struct hpt_chip hpt372 = {
147         "HPT372",
148         55,
149         {
150                 hpt37x_timings_33,
151                 NULL,
152                 hpt37x_timings_50,
153                 hpt37x_timings_66
154         }
155 };
156
157 static const struct hpt_chip hpt302 = {
158         "HPT302",
159         66,
160         {
161                 hpt37x_timings_33,
162                 NULL,
163                 hpt37x_timings_50,
164                 hpt37x_timings_66
165         }
166 };
167
168 static const struct hpt_chip hpt371 = {
169         "HPT371",
170         66,
171         {
172                 hpt37x_timings_33,
173                 NULL,
174                 hpt37x_timings_50,
175                 hpt37x_timings_66
176         }
177 };
178
179 static const struct hpt_chip hpt372a = {
180         "HPT372A",
181         66,
182         {
183                 hpt37x_timings_33,
184                 NULL,
185                 hpt37x_timings_50,
186                 hpt37x_timings_66
187         }
188 };
189
190 static const struct hpt_chip hpt374 = {
191         "HPT374",
192         48,
193         {
194                 hpt37x_timings_33,
195                 NULL,
196                 NULL,
197                 NULL
198         }
199 };
200
201 /**
202  *      hpt37x_find_mode        -       reset the hpt37x bus
203  *      @ap: ATA port
204  *      @speed: transfer mode
205  *
206  *      Return the 32bit register programming information for this channel
207  *      that matches the speed provided.
208  */
209
210 static u32 hpt37x_find_mode(struct ata_port *ap, int speed)
211 {
212         struct hpt_clock *clocks = ap->host->private_data;
213
214         while(clocks->xfer_speed) {
215                 if (clocks->xfer_speed == speed)
216                         return clocks->timing;
217                 clocks++;
218         }
219         BUG();
220         return 0xffffffffU;     /* silence compiler warning */
221 }
222
223 static int hpt_dma_blacklisted(const struct ata_device *dev, char *modestr, const char *list[])
224 {
225         unsigned char model_num[ATA_ID_PROD_LEN + 1];
226         int i = 0;
227
228         ata_id_c_string(dev->id, model_num, ATA_ID_PROD, sizeof(model_num));
229
230         while (list[i] != NULL) {
231                 if (!strcmp(list[i], model_num)) {
232                         printk(KERN_WARNING DRV_NAME ": %s is not supported for %s.\n",
233                                 modestr, list[i]);
234                         return 1;
235                 }
236                 i++;
237         }
238         return 0;
239 }
240
241 static const char *bad_ata33[] = {
242         "Maxtor 92720U8", "Maxtor 92040U6", "Maxtor 91360U4", "Maxtor 91020U3", "Maxtor 90845U3", "Maxtor 90650U2",
243         "Maxtor 91360D8", "Maxtor 91190D7", "Maxtor 91020D6", "Maxtor 90845D5", "Maxtor 90680D4", "Maxtor 90510D3", "Maxtor 90340D2",
244         "Maxtor 91152D8", "Maxtor 91008D7", "Maxtor 90845D6", "Maxtor 90840D6", "Maxtor 90720D5", "Maxtor 90648D5", "Maxtor 90576D4",
245         "Maxtor 90510D4",
246         "Maxtor 90432D3", "Maxtor 90288D2", "Maxtor 90256D2",
247         "Maxtor 91000D8", "Maxtor 90910D8", "Maxtor 90875D7", "Maxtor 90840D7", "Maxtor 90750D6", "Maxtor 90625D5", "Maxtor 90500D4",
248         "Maxtor 91728D8", "Maxtor 91512D7", "Maxtor 91303D6", "Maxtor 91080D5", "Maxtor 90845D4", "Maxtor 90680D4", "Maxtor 90648D3", "Maxtor 90432D2",
249         NULL
250 };
251
252 static const char *bad_ata100_5[] = {
253         "IBM-DTLA-307075",
254         "IBM-DTLA-307060",
255         "IBM-DTLA-307045",
256         "IBM-DTLA-307030",
257         "IBM-DTLA-307020",
258         "IBM-DTLA-307015",
259         "IBM-DTLA-305040",
260         "IBM-DTLA-305030",
261         "IBM-DTLA-305020",
262         "IC35L010AVER07-0",
263         "IC35L020AVER07-0",
264         "IC35L030AVER07-0",
265         "IC35L040AVER07-0",
266         "IC35L060AVER07-0",
267         "WDC AC310200R",
268         NULL
269 };
270
271 /**
272  *      hpt370_filter   -       mode selection filter
273  *      @adev: ATA device
274  *
275  *      Block UDMA on devices that cause trouble with this controller.
276  */
277
278 static unsigned long hpt370_filter(struct ata_device *adev, unsigned long mask)
279 {
280         if (adev->class == ATA_DEV_ATA) {
281                 if (hpt_dma_blacklisted(adev, "UDMA", bad_ata33))
282                         mask &= ~ATA_MASK_UDMA;
283                 if (hpt_dma_blacklisted(adev, "UDMA100", bad_ata100_5))
284                         mask &= ~(0xE0 << ATA_SHIFT_UDMA);
285         }
286         return ata_bmdma_mode_filter(adev, mask);
287 }
288
289 /**
290  *      hpt370a_filter  -       mode selection filter
291  *      @adev: ATA device
292  *
293  *      Block UDMA on devices that cause trouble with this controller.
294  */
295
296 static unsigned long hpt370a_filter(struct ata_device *adev, unsigned long mask)
297 {
298         if (adev->class == ATA_DEV_ATA) {
299                 if (hpt_dma_blacklisted(adev, "UDMA100", bad_ata100_5))
300                         mask &= ~(0xE0 << ATA_SHIFT_UDMA);
301         }
302         return ata_bmdma_mode_filter(adev, mask);
303 }
304
305 /**
306  *      hpt37x_cable_detect     -       Detect the cable type
307  *      @ap: ATA port to detect on
308  *
309  *      Return the cable type attached to this port
310  */
311
312 static int hpt37x_cable_detect(struct ata_port *ap)
313 {
314         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
315         u8 scr2, ata66;
316
317         pci_read_config_byte(pdev, 0x5B, &scr2);
318         pci_write_config_byte(pdev, 0x5B, scr2 & ~0x01);
319
320         udelay(10); /* debounce */
321
322         /* Cable register now active */
323         pci_read_config_byte(pdev, 0x5A, &ata66);
324         /* Restore state */
325         pci_write_config_byte(pdev, 0x5B, scr2);
326
327         if (ata66 & (2 >> ap->port_no))
328                 return ATA_CBL_PATA40;
329         else
330                 return ATA_CBL_PATA80;
331 }
332
333 /**
334  *      hpt374_fn1_cable_detect -       Detect the cable type
335  *      @ap: ATA port to detect on
336  *
337  *      Return the cable type attached to this port
338  */
339
340 static int hpt374_fn1_cable_detect(struct ata_port *ap)
341 {
342         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
343         unsigned int mcrbase = 0x50 + 4 * ap->port_no;
344         u16 mcr3;
345         u8 ata66;
346
347         /* Do the extra channel work */
348         pci_read_config_word(pdev, mcrbase + 2, &mcr3);
349         /* Set bit 15 of 0x52 to enable TCBLID as input */
350         pci_write_config_word(pdev, mcrbase + 2, mcr3 | 0x8000);
351         pci_read_config_byte(pdev, 0x5A, &ata66);
352         /* Reset TCBLID/FCBLID to output */
353         pci_write_config_word(pdev, mcrbase + 2, mcr3);
354
355         if (ata66 & (2 >> ap->port_no))
356                 return ATA_CBL_PATA40;
357         else
358                 return ATA_CBL_PATA80;
359 }
360
361 /**
362  *      hpt37x_pre_reset        -       reset the hpt37x bus
363  *      @link: ATA link to reset
364  *      @deadline: deadline jiffies for the operation
365  *
366  *      Perform the initial reset handling for the HPT37x.
367  */
368
369 static int hpt37x_pre_reset(struct ata_link *link, unsigned long deadline)
370 {
371         struct ata_port *ap = link->ap;
372         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
373         static const struct pci_bits hpt37x_enable_bits[] = {
374                 { 0x50, 1, 0x04, 0x04 },
375                 { 0x54, 1, 0x04, 0x04 }
376         };
377         if (!pci_test_config_bits(pdev, &hpt37x_enable_bits[ap->port_no]))
378                 return -ENOENT;
379
380         /* Reset the state machine */
381         pci_write_config_byte(pdev, 0x50 + 4 * ap->port_no, 0x37);
382         udelay(100);
383
384         return ata_sff_prereset(link, deadline);
385 }
386
387 /**
388  *      hpt370_set_piomode              -       PIO setup
389  *      @ap: ATA interface
390  *      @adev: device on the interface
391  *
392  *      Perform PIO mode setup.
393  */
394
395 static void hpt370_set_piomode(struct ata_port *ap, struct ata_device *adev)
396 {
397         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
398         u32 addr1, addr2;
399         u32 reg;
400         u32 mode;
401         u8 fast;
402
403         addr1 = 0x40 + 4 * (adev->devno + 2 * ap->port_no);
404         addr2 = 0x51 + 4 * ap->port_no;
405
406         /* Fast interrupt prediction disable, hold off interrupt disable */
407         pci_read_config_byte(pdev, addr2, &fast);
408         fast &= ~0x02;
409         fast |= 0x01;
410         pci_write_config_byte(pdev, addr2, fast);
411
412         pci_read_config_dword(pdev, addr1, &reg);
413         mode = hpt37x_find_mode(ap, adev->pio_mode);
414         mode &= 0xCFC3FFFF;     /* Leave DMA bits alone */
415         reg &= ~0xCFC3FFFF;     /* Strip timing bits */
416         pci_write_config_dword(pdev, addr1, reg | mode);
417 }
418
419 /**
420  *      hpt370_set_dmamode              -       DMA timing setup
421  *      @ap: ATA interface
422  *      @adev: Device being configured
423  *
424  *      Set up the channel for MWDMA or UDMA modes. Much the same as with
425  *      PIO, load the mode number and then set MWDMA or UDMA flag.
426  */
427
428 static void hpt370_set_dmamode(struct ata_port *ap, struct ata_device *adev)
429 {
430         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
431         u32 addr1, addr2;
432         u32 reg, mode, mask;
433         u8 fast;
434
435         addr1 = 0x40 + 4 * (adev->devno + 2 * ap->port_no);
436         addr2 = 0x51 + 4 * ap->port_no;
437
438         /* Fast interrupt prediction disable, hold off interrupt disable */
439         pci_read_config_byte(pdev, addr2, &fast);
440         fast &= ~0x02;
441         fast |= 0x01;
442         pci_write_config_byte(pdev, addr2, fast);
443
444         mask = adev->dma_mode < XFER_UDMA_0 ? 0x31C001FF : 0x303C0000;
445
446         pci_read_config_dword(pdev, addr1, &reg);
447         mode = hpt37x_find_mode(ap, adev->dma_mode);
448         mode &= mask;
449         reg &= ~mask;
450         pci_write_config_dword(pdev, addr1, reg | mode);
451 }
452
453 /**
454  *      hpt370_bmdma_end                -       DMA engine stop
455  *      @qc: ATA command
456  *
457  *      Work around the HPT370 DMA engine.
458  */
459
460 static void hpt370_bmdma_stop(struct ata_queued_cmd *qc)
461 {
462         struct ata_port *ap = qc->ap;
463         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
464         void __iomem *bmdma = ap->ioaddr.bmdma_addr;
465         u8 dma_stat = ioread8(bmdma + ATA_DMA_STATUS);
466         u8 dma_cmd;
467
468         if (dma_stat & ATA_DMA_ACTIVE) {
469                 udelay(20);
470                 dma_stat = ioread8(bmdma + ATA_DMA_STATUS);
471         }
472         if (dma_stat & ATA_DMA_ACTIVE) {
473                 /* Clear the engine */
474                 pci_write_config_byte(pdev, 0x50 + 4 * ap->port_no, 0x37);
475                 udelay(10);
476                 /* Stop DMA */
477                 dma_cmd = ioread8(bmdma + ATA_DMA_CMD);
478                 iowrite8(dma_cmd & ~ATA_DMA_START, bmdma + ATA_DMA_CMD);
479                 /* Clear Error */
480                 dma_stat = ioread8(bmdma + ATA_DMA_STATUS);
481                 iowrite8(dma_stat | ATA_DMA_INTR | ATA_DMA_ERR,
482                          bmdma + ATA_DMA_STATUS);
483                 /* Clear the engine */
484                 pci_write_config_byte(pdev, 0x50 + 4 * ap->port_no, 0x37);
485                 udelay(10);
486         }
487         ata_bmdma_stop(qc);
488 }
489
490 /**
491  *      hpt372_set_piomode              -       PIO setup
492  *      @ap: ATA interface
493  *      @adev: device on the interface
494  *
495  *      Perform PIO mode setup.
496  */
497
498 static void hpt372_set_piomode(struct ata_port *ap, struct ata_device *adev)
499 {
500         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
501         u32 addr1, addr2;
502         u32 reg;
503         u32 mode;
504         u8 fast;
505
506         addr1 = 0x40 + 4 * (adev->devno + 2 * ap->port_no);
507         addr2 = 0x51 + 4 * ap->port_no;
508
509         /* Fast interrupt prediction disable, hold off interrupt disable */
510         pci_read_config_byte(pdev, addr2, &fast);
511         fast &= ~0x07;
512         pci_write_config_byte(pdev, addr2, fast);
513
514         pci_read_config_dword(pdev, addr1, &reg);
515         mode = hpt37x_find_mode(ap, adev->pio_mode);
516
517         printk("Find mode for %d reports %X\n", adev->pio_mode, mode);
518         mode &= 0xCFC3FFFF;     /* Leave DMA bits alone */
519         reg &= ~0xCFC3FFFF;     /* Strip timing bits */
520         pci_write_config_dword(pdev, addr1, reg | mode);
521 }
522
523 /**
524  *      hpt372_set_dmamode              -       DMA timing setup
525  *      @ap: ATA interface
526  *      @adev: Device being configured
527  *
528  *      Set up the channel for MWDMA or UDMA modes. Much the same as with
529  *      PIO, load the mode number and then set MWDMA or UDMA flag.
530  */
531
532 static void hpt372_set_dmamode(struct ata_port *ap, struct ata_device *adev)
533 {
534         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
535         u32 addr1, addr2;
536         u32 reg, mode, mask;
537         u8 fast;
538
539         addr1 = 0x40 + 4 * (adev->devno + 2 * ap->port_no);
540         addr2 = 0x51 + 4 * ap->port_no;
541
542         /* Fast interrupt prediction disable, hold off interrupt disable */
543         pci_read_config_byte(pdev, addr2, &fast);
544         fast &= ~0x07;
545         pci_write_config_byte(pdev, addr2, fast);
546
547         mask = adev->dma_mode < XFER_UDMA_0 ? 0x31C001FF : 0x303C0000;
548
549         pci_read_config_dword(pdev, addr1, &reg);
550         mode = hpt37x_find_mode(ap, adev->dma_mode);
551         printk("Find mode for DMA %d reports %X\n", adev->dma_mode, mode);
552         mode &= mask;
553         reg &= ~mask;
554         pci_write_config_dword(pdev, addr1, reg | mode);
555 }
556
557 /**
558  *      hpt37x_bmdma_end                -       DMA engine stop
559  *      @qc: ATA command
560  *
561  *      Clean up after the HPT372 and later DMA engine
562  */
563
564 static void hpt37x_bmdma_stop(struct ata_queued_cmd *qc)
565 {
566         struct ata_port *ap = qc->ap;
567         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
568         int mscreg = 0x50 + 4 * ap->port_no;
569         u8 bwsr_stat, msc_stat;
570
571         pci_read_config_byte(pdev, 0x6A, &bwsr_stat);
572         pci_read_config_byte(pdev, mscreg, &msc_stat);
573         if (bwsr_stat & (1 << ap->port_no))
574                 pci_write_config_byte(pdev, mscreg, msc_stat | 0x30);
575         ata_bmdma_stop(qc);
576 }
577
578
579 static struct scsi_host_template hpt37x_sht = {
580         ATA_BMDMA_SHT(DRV_NAME),
581 };
582
583 /*
584  *      Configuration for HPT370
585  */
586
587 static struct ata_port_operations hpt370_port_ops = {
588         .inherits       = &ata_bmdma_port_ops,
589
590         .bmdma_stop     = hpt370_bmdma_stop,
591
592         .mode_filter    = hpt370_filter,
593         .cable_detect   = hpt37x_cable_detect,
594         .set_piomode    = hpt370_set_piomode,
595         .set_dmamode    = hpt370_set_dmamode,
596         .prereset       = hpt37x_pre_reset,
597 };
598
599 /*
600  *      Configuration for HPT370A. Close to 370 but less filters
601  */
602
603 static struct ata_port_operations hpt370a_port_ops = {
604         .inherits       = &hpt370_port_ops,
605         .mode_filter    = hpt370a_filter,
606 };
607
608 /*
609  *      Configuration for HPT372, HPT371, HPT302. Slightly different PIO
610  *      and DMA mode setting functionality.
611  */
612
613 static struct ata_port_operations hpt372_port_ops = {
614         .inherits       = &ata_bmdma_port_ops,
615
616         .bmdma_stop     = hpt37x_bmdma_stop,
617
618         .cable_detect   = hpt37x_cable_detect,
619         .set_piomode    = hpt372_set_piomode,
620         .set_dmamode    = hpt372_set_dmamode,
621         .prereset       = hpt37x_pre_reset,
622 };
623
624 /*
625  *      Configuration for HPT374. Mode setting works like 372 and friends
626  *      but we have a different cable detection procedure for function 1.
627  */
628
629 static struct ata_port_operations hpt374_fn1_port_ops = {
630         .inherits       = &hpt372_port_ops,
631         .cable_detect   = hpt374_fn1_cable_detect,
632         .prereset       = hpt37x_pre_reset,
633 };
634
635 /**
636  *      hpt37x_clock_slot       -       Turn timing to PC clock entry
637  *      @freq: Reported frequency timing
638  *      @base: Base timing
639  *
640  *      Turn the timing data intoa clock slot (0 for 33, 1 for 40, 2 for 50
641  *      and 3 for 66Mhz)
642  */
643
644 static int hpt37x_clock_slot(unsigned int freq, unsigned int base)
645 {
646         unsigned int f = (base * freq) / 192;   /* Mhz */
647         if (f < 40)
648                 return 0;       /* 33Mhz slot */
649         if (f < 45)
650                 return 1;       /* 40Mhz slot */
651         if (f < 55)
652                 return 2;       /* 50Mhz slot */
653         return 3;               /* 60Mhz slot */
654 }
655
656 /**
657  *      hpt37x_calibrate_dpll           -       Calibrate the DPLL loop
658  *      @dev: PCI device
659  *
660  *      Perform a calibration cycle on the HPT37x DPLL. Returns 1 if this
661  *      succeeds
662  */
663
664 static int hpt37x_calibrate_dpll(struct pci_dev *dev)
665 {
666         u8 reg5b;
667         u32 reg5c;
668         int tries;
669
670         for(tries = 0; tries < 0x5000; tries++) {
671                 udelay(50);
672                 pci_read_config_byte(dev, 0x5b, &reg5b);
673                 if (reg5b & 0x80) {
674                         /* See if it stays set */
675                         for(tries = 0; tries < 0x1000; tries ++) {
676                                 pci_read_config_byte(dev, 0x5b, &reg5b);
677                                 /* Failed ? */
678                                 if ((reg5b & 0x80) == 0)
679                                         return 0;
680                         }
681                         /* Turn off tuning, we have the DPLL set */
682                         pci_read_config_dword(dev, 0x5c, &reg5c);
683                         pci_write_config_dword(dev, 0x5c, reg5c & ~ 0x100);
684                         return 1;
685                 }
686         }
687         /* Never went stable */
688         return 0;
689 }
690
691 static u32 hpt374_read_freq(struct pci_dev *pdev)
692 {
693         u32 freq;
694         unsigned long io_base = pci_resource_start(pdev, 4);
695         if (PCI_FUNC(pdev->devfn) & 1) {
696                 struct pci_dev *pdev_0;
697
698                 pdev_0 = pci_get_slot(pdev->bus, pdev->devfn - 1);
699                 /* Someone hot plugged the controller on us ? */
700                 if (pdev_0 == NULL)
701                         return 0;
702                 io_base = pci_resource_start(pdev_0, 4);
703                 freq = inl(io_base + 0x90);
704                 pci_dev_put(pdev_0);
705         } else
706                 freq = inl(io_base + 0x90);
707         return freq;
708 }
709
710 /**
711  *      hpt37x_init_one         -       Initialise an HPT37X/302
712  *      @dev: PCI device
713  *      @id: Entry in match table
714  *
715  *      Initialise an HPT37x device. There are some interesting complications
716  *      here. Firstly the chip may report 366 and be one of several variants.
717  *      Secondly all the timings depend on the clock for the chip which we must
718  *      detect and look up
719  *
720  *      This is the known chip mappings. It may be missing a couple of later
721  *      releases.
722  *
723  *      Chip version            PCI             Rev     Notes
724  *      HPT366                  4 (HPT366)      0       Other driver
725  *      HPT366                  4 (HPT366)      1       Other driver
726  *      HPT368                  4 (HPT366)      2       Other driver
727  *      HPT370                  4 (HPT366)      3       UDMA100
728  *      HPT370A                 4 (HPT366)      4       UDMA100
729  *      HPT372                  4 (HPT366)      5       UDMA133 (1)
730  *      HPT372N                 4 (HPT366)      6       Other driver
731  *      HPT372A                 5 (HPT372)      1       UDMA133 (1)
732  *      HPT372N                 5 (HPT372)      2       Other driver
733  *      HPT302                  6 (HPT302)      1       UDMA133
734  *      HPT302N                 6 (HPT302)      2       Other driver
735  *      HPT371                  7 (HPT371)      *       UDMA133
736  *      HPT374                  8 (HPT374)      *       UDMA133 4 channel
737  *      HPT372N                 9 (HPT372N)     *       Other driver
738  *
739  *      (1) UDMA133 support depends on the bus clock
740  */
741
742 static int hpt37x_init_one(struct pci_dev *dev, const struct pci_device_id *id)
743 {
744         /* HPT370 - UDMA100 */
745         static const struct ata_port_info info_hpt370 = {
746                 .flags = ATA_FLAG_SLAVE_POSS,
747                 .pio_mask = ATA_PIO4,
748                 .mwdma_mask = ATA_MWDMA2,
749                 .udma_mask = ATA_UDMA5,
750                 .port_ops = &hpt370_port_ops
751         };
752         /* HPT370A - UDMA100 */
753         static const struct ata_port_info info_hpt370a = {
754                 .flags = ATA_FLAG_SLAVE_POSS,
755                 .pio_mask = ATA_PIO4,
756                 .mwdma_mask = ATA_MWDMA2,
757                 .udma_mask = ATA_UDMA5,
758                 .port_ops = &hpt370a_port_ops
759         };
760         /* HPT370 - UDMA100 */
761         static const struct ata_port_info info_hpt370_33 = {
762                 .flags = ATA_FLAG_SLAVE_POSS,
763                 .pio_mask = ATA_PIO4,
764                 .mwdma_mask = ATA_MWDMA2,
765                 .udma_mask = ATA_UDMA5,
766                 .port_ops = &hpt370_port_ops
767         };
768         /* HPT370A - UDMA100 */
769         static const struct ata_port_info info_hpt370a_33 = {
770                 .flags = ATA_FLAG_SLAVE_POSS,
771                 .pio_mask = ATA_PIO4,
772                 .mwdma_mask = ATA_MWDMA2,
773                 .udma_mask = ATA_UDMA5,
774                 .port_ops = &hpt370a_port_ops
775         };
776         /* HPT371, 372 and friends - UDMA133 */
777         static const struct ata_port_info info_hpt372 = {
778                 .flags = ATA_FLAG_SLAVE_POSS,
779                 .pio_mask = ATA_PIO4,
780                 .mwdma_mask = ATA_MWDMA2,
781                 .udma_mask = ATA_UDMA6,
782                 .port_ops = &hpt372_port_ops
783         };
784         /* HPT374 - UDMA100, function 1 uses different prereset method */
785         static const struct ata_port_info info_hpt374_fn0 = {
786                 .flags = ATA_FLAG_SLAVE_POSS,
787                 .pio_mask = ATA_PIO4,
788                 .mwdma_mask = ATA_MWDMA2,
789                 .udma_mask = ATA_UDMA5,
790                 .port_ops = &hpt372_port_ops
791         };
792         static const struct ata_port_info info_hpt374_fn1 = {
793                 .flags = ATA_FLAG_SLAVE_POSS,
794                 .pio_mask = ATA_PIO4,
795                 .mwdma_mask = ATA_MWDMA2,
796                 .udma_mask = ATA_UDMA5,
797                 .port_ops = &hpt374_fn1_port_ops
798         };
799
800         static const int MHz[4] = { 33, 40, 50, 66 };
801         void *private_data = NULL;
802         const struct ata_port_info *ppi[] = { NULL, NULL };
803         u8 rev = dev->revision;
804         u8 irqmask;
805         u8 mcr1;
806         u32 freq;
807         int prefer_dpll = 1;
808
809         unsigned long iobase = pci_resource_start(dev, 4);
810
811         const struct hpt_chip *chip_table;
812         int clock_slot;
813         int rc;
814
815         rc = pcim_enable_device(dev);
816         if (rc)
817                 return rc;
818
819         if (dev->device == PCI_DEVICE_ID_TTI_HPT366) {
820                 /* May be a later chip in disguise. Check */
821                 /* Older chips are in the HPT366 driver. Ignore them */
822                 if (rev < 3)
823                         return -ENODEV;
824                 /* N series chips have their own driver. Ignore */
825                 if (rev == 6)
826                         return -ENODEV;
827
828                 switch(rev) {
829                         case 3:
830                                 ppi[0] = &info_hpt370;
831                                 chip_table = &hpt370;
832                                 prefer_dpll = 0;
833                                 break;
834                         case 4:
835                                 ppi[0] = &info_hpt370a;
836                                 chip_table = &hpt370a;
837                                 prefer_dpll = 0;
838                                 break;
839                         case 5:
840                                 ppi[0] = &info_hpt372;
841                                 chip_table = &hpt372;
842                                 break;
843                         default:
844                                 printk(KERN_ERR "pata_hpt37x: Unknown HPT366 "
845                                        "subtype, please report (%d).\n", rev);
846                                 return -ENODEV;
847                 }
848         } else {
849                 switch(dev->device) {
850                         case PCI_DEVICE_ID_TTI_HPT372:
851                                 /* 372N if rev >= 2*/
852                                 if (rev >= 2)
853                                         return -ENODEV;
854                                 ppi[0] = &info_hpt372;
855                                 chip_table = &hpt372a;
856                                 break;
857                         case PCI_DEVICE_ID_TTI_HPT302:
858                                 /* 302N if rev > 1 */
859                                 if (rev > 1)
860                                         return -ENODEV;
861                                 ppi[0] = &info_hpt372;
862                                 /* Check this */
863                                 chip_table = &hpt302;
864                                 break;
865                         case PCI_DEVICE_ID_TTI_HPT371:
866                                 if (rev > 1)
867                                         return -ENODEV;
868                                 ppi[0] = &info_hpt372;
869                                 chip_table = &hpt371;
870                                 /* Single channel device, master is not present
871                                    but the BIOS (or us for non x86) must mark it
872                                    absent */
873                                 pci_read_config_byte(dev, 0x50, &mcr1);
874                                 mcr1 &= ~0x04;
875                                 pci_write_config_byte(dev, 0x50, mcr1);
876                                 break;
877                         case PCI_DEVICE_ID_TTI_HPT374:
878                                 chip_table = &hpt374;
879                                 if (!(PCI_FUNC(dev->devfn) & 1))
880                                         *ppi = &info_hpt374_fn0;
881                                 else
882                                         *ppi = &info_hpt374_fn1;
883                                 break;
884                         default:
885                                 printk(KERN_ERR "pata_hpt37x: PCI table is bogus please report (%d).\n", dev->device);
886                                 return -ENODEV;
887                 }
888         }
889         /* Ok so this is a chip we support */
890
891         pci_write_config_byte(dev, PCI_CACHE_LINE_SIZE, (L1_CACHE_BYTES / 4));
892         pci_write_config_byte(dev, PCI_LATENCY_TIMER, 0x78);
893         pci_write_config_byte(dev, PCI_MIN_GNT, 0x08);
894         pci_write_config_byte(dev, PCI_MAX_LAT, 0x08);
895
896         pci_read_config_byte(dev, 0x5A, &irqmask);
897         irqmask &= ~0x10;
898         pci_write_config_byte(dev, 0x5a, irqmask);
899
900         /*
901          * default to pci clock. make sure MA15/16 are set to output
902          * to prevent drives having problems with 40-pin cables. Needed
903          * for some drives such as IBM-DTLA which will not enter ready
904          * state on reset when PDIAG is a input.
905          */
906
907         pci_write_config_byte(dev, 0x5b, 0x23);
908
909         /*
910          * HighPoint does this for HPT372A.
911          * NOTE: This register is only writeable via I/O space.
912          */
913         if (chip_table == &hpt372a)
914                 outb(0x0e, iobase + 0x9c);
915
916         /* Some devices do not let this value be accessed via PCI space
917            according to the old driver. In addition we must use the value
918            from FN 0 on the HPT374 */
919
920         if (chip_table == &hpt374) {
921                 freq = hpt374_read_freq(dev);
922                 if (freq == 0)
923                         return -ENODEV;
924         } else
925                 freq = inl(iobase + 0x90);
926
927         if ((freq >> 12) != 0xABCDE) {
928                 int i;
929                 u8 sr;
930                 u32 total = 0;
931
932                 printk(KERN_WARNING "pata_hpt37x: BIOS has not set timing clocks.\n");
933
934                 /* This is the process the HPT371 BIOS is reported to use */
935                 for(i = 0; i < 128; i++) {
936                         pci_read_config_byte(dev, 0x78, &sr);
937                         total += sr & 0x1FF;
938                         udelay(15);
939                 }
940                 freq = total / 128;
941         }
942         freq &= 0x1FF;
943
944         /*
945          *      Turn the frequency check into a band and then find a timing
946          *      table to match it.
947          */
948
949         clock_slot = hpt37x_clock_slot(freq, chip_table->base);
950         if (chip_table->clocks[clock_slot] == NULL || prefer_dpll) {
951                 /*
952                  *      We need to try PLL mode instead
953                  *
954                  *      For non UDMA133 capable devices we should
955                  *      use a 50MHz DPLL by choice
956                  */
957                 unsigned int f_low, f_high;
958                 int dpll, adjust;
959
960                 /* Compute DPLL */
961                 dpll = (ppi[0]->udma_mask & 0xC0) ? 3 : 2;
962
963                 f_low = (MHz[clock_slot] * 48) / MHz[dpll];
964                 f_high = f_low + 2;
965                 if (clock_slot > 1)
966                         f_high += 2;
967
968                 /* Select the DPLL clock. */
969                 pci_write_config_byte(dev, 0x5b, 0x21);
970                 pci_write_config_dword(dev, 0x5C, (f_high << 16) | f_low | 0x100);
971
972                 for(adjust = 0; adjust < 8; adjust++) {
973                         if (hpt37x_calibrate_dpll(dev))
974                                 break;
975                         /* See if it'll settle at a fractionally different clock */
976                         if (adjust & 1)
977                                 f_low -= adjust >> 1;
978                         else
979                                 f_high += adjust >> 1;
980                         pci_write_config_dword(dev, 0x5C, (f_high << 16) | f_low | 0x100);
981                 }
982                 if (adjust == 8) {
983                         printk(KERN_ERR "pata_hpt37x: DPLL did not stabilize!\n");
984                         return -ENODEV;
985                 }
986                 if (dpll == 3)
987                         private_data = (void *)hpt37x_timings_66;
988                 else
989                         private_data = (void *)hpt37x_timings_50;
990
991                 printk(KERN_INFO "pata_hpt37x: bus clock %dMHz, using %dMHz DPLL.\n",
992                        MHz[clock_slot], MHz[dpll]);
993         } else {
994                 private_data = (void *)chip_table->clocks[clock_slot];
995                 /*
996                  *      Perform a final fixup. Note that we will have used the
997                  *      DPLL on the HPT372 which means we don't have to worry
998                  *      about lack of UDMA133 support on lower clocks
999                  */
1000
1001                 if (clock_slot < 2 && ppi[0] == &info_hpt370)
1002                         ppi[0] = &info_hpt370_33;
1003                 if (clock_slot < 2 && ppi[0] == &info_hpt370a)
1004                         ppi[0] = &info_hpt370a_33;
1005                 printk(KERN_INFO "pata_hpt37x: %s using %dMHz bus clock.\n",
1006                        chip_table->name, MHz[clock_slot]);
1007         }
1008
1009         /* Now kick off ATA set up */
1010         return ata_pci_sff_init_one(dev, ppi, &hpt37x_sht, private_data);
1011 }
1012
1013 static const struct pci_device_id hpt37x[] = {
1014         { PCI_VDEVICE(TTI, PCI_DEVICE_ID_TTI_HPT366), },
1015         { PCI_VDEVICE(TTI, PCI_DEVICE_ID_TTI_HPT371), },
1016         { PCI_VDEVICE(TTI, PCI_DEVICE_ID_TTI_HPT372), },
1017         { PCI_VDEVICE(TTI, PCI_DEVICE_ID_TTI_HPT374), },
1018         { PCI_VDEVICE(TTI, PCI_DEVICE_ID_TTI_HPT302), },
1019
1020         { },
1021 };
1022
1023 static struct pci_driver hpt37x_pci_driver = {
1024         .name           = DRV_NAME,
1025         .id_table       = hpt37x,
1026         .probe          = hpt37x_init_one,
1027         .remove         = ata_pci_remove_one
1028 };
1029
1030 static int __init hpt37x_init(void)
1031 {
1032         return pci_register_driver(&hpt37x_pci_driver);
1033 }
1034
1035 static void __exit hpt37x_exit(void)
1036 {
1037         pci_unregister_driver(&hpt37x_pci_driver);
1038 }
1039
1040 MODULE_AUTHOR("Alan Cox");
1041 MODULE_DESCRIPTION("low-level driver for the Highpoint HPT37x/30x");
1042 MODULE_LICENSE("GPL");
1043 MODULE_DEVICE_TABLE(pci, hpt37x);
1044 MODULE_VERSION(DRV_VERSION);
1045
1046 module_init(hpt37x_init);
1047 module_exit(hpt37x_exit);