Merge git://git.kernel.org/pub/scm/linux/kernel/git/paulus/powerpc
[linux-2.6] / drivers / ide / pci / cmd64x.c
1 /* $Id: cmd64x.c,v 1.21 2000/01/30 23:23:16
2  *
3  * linux/drivers/ide/pci/cmd64x.c               Version 1.30    Sept 10, 2002
4  *
5  * cmd64x.c: Enable interrupts at initialization time on Ultra/PCI machines.
6  *           Note, this driver is not used at all on other systems because
7  *           there the "BIOS" has done all of the following already.
8  *           Due to massive hardware bugs, UltraDMA is only supported
9  *           on the 646U2 and not on the 646U.
10  *
11  * Copyright (C) 1998           Eddie C. Dost  (ecd@skynet.be)
12  * Copyright (C) 1998           David S. Miller (davem@redhat.com)
13  *
14  * Copyright (C) 1999-2002      Andre Hedrick <andre@linux-ide.org>
15  */
16
17 #include <linux/config.h>
18 #include <linux/module.h>
19 #include <linux/types.h>
20 #include <linux/pci.h>
21 #include <linux/delay.h>
22 #include <linux/hdreg.h>
23 #include <linux/ide.h>
24 #include <linux/init.h>
25
26 #include <asm/io.h>
27
28 #define DISPLAY_CMD64X_TIMINGS
29
30 #define CMD_DEBUG 0
31
32 #if CMD_DEBUG
33 #define cmdprintk(x...) printk(x)
34 #else
35 #define cmdprintk(x...)
36 #endif
37
38 /*
39  * CMD64x specific registers definition.
40  */
41 #define CFR             0x50
42 #define   CFR_INTR_CH0          0x02
43 #define CNTRL           0x51
44 #define   CNTRL_DIS_RA0         0x40
45 #define   CNTRL_DIS_RA1         0x80
46 #define   CNTRL_ENA_2ND         0x08
47
48 #define CMDTIM          0x52
49 #define ARTTIM0         0x53
50 #define DRWTIM0         0x54
51 #define ARTTIM1         0x55
52 #define DRWTIM1         0x56
53 #define ARTTIM23        0x57
54 #define   ARTTIM23_DIS_RA2      0x04
55 #define   ARTTIM23_DIS_RA3      0x08
56 #define   ARTTIM23_INTR_CH1     0x10
57 #define ARTTIM2         0x57
58 #define ARTTIM3         0x57
59 #define DRWTIM23        0x58
60 #define DRWTIM2         0x58
61 #define BRST            0x59
62 #define DRWTIM3         0x5b
63
64 #define BMIDECR0        0x70
65 #define MRDMODE         0x71
66 #define   MRDMODE_INTR_CH0      0x04
67 #define   MRDMODE_INTR_CH1      0x08
68 #define   MRDMODE_BLK_CH0       0x10
69 #define   MRDMODE_BLK_CH1       0x20
70 #define BMIDESR0        0x72
71 #define UDIDETCR0       0x73
72 #define DTPR0           0x74
73 #define BMIDECR1        0x78
74 #define BMIDECSR        0x79
75 #define BMIDESR1        0x7A
76 #define UDIDETCR1       0x7B
77 #define DTPR1           0x7C
78
79 #if defined(DISPLAY_CMD64X_TIMINGS) && defined(CONFIG_PROC_FS)
80 #include <linux/stat.h>
81 #include <linux/proc_fs.h>
82
83 static u8 cmd64x_proc = 0;
84
85 #define CMD_MAX_DEVS            5
86
87 static struct pci_dev *cmd_devs[CMD_MAX_DEVS];
88 static int n_cmd_devs;
89
90 static char * print_cmd64x_get_info (char *buf, struct pci_dev *dev, int index)
91 {
92         char *p = buf;
93
94         u8 reg53 = 0, reg54 = 0, reg55 = 0, reg56 = 0;  /* primary */
95         u8 reg57 = 0, reg58 = 0, reg5b;                 /* secondary */
96         u8 reg72 = 0, reg73 = 0;                        /* primary */
97         u8 reg7a = 0, reg7b = 0;                        /* secondary */
98         u8 reg50 = 0, reg71 = 0;                        /* extra */
99
100         p += sprintf(p, "\nController: %d\n", index);
101         p += sprintf(p, "CMD%x Chipset.\n", dev->device);
102         (void) pci_read_config_byte(dev, CFR,       &reg50);
103         (void) pci_read_config_byte(dev, ARTTIM0,   &reg53);
104         (void) pci_read_config_byte(dev, DRWTIM0,   &reg54);
105         (void) pci_read_config_byte(dev, ARTTIM1,   &reg55);
106         (void) pci_read_config_byte(dev, DRWTIM1,   &reg56);
107         (void) pci_read_config_byte(dev, ARTTIM2,   &reg57);
108         (void) pci_read_config_byte(dev, DRWTIM2,   &reg58);
109         (void) pci_read_config_byte(dev, DRWTIM3,   &reg5b);
110         (void) pci_read_config_byte(dev, MRDMODE,   &reg71);
111         (void) pci_read_config_byte(dev, BMIDESR0,  &reg72);
112         (void) pci_read_config_byte(dev, UDIDETCR0, &reg73);
113         (void) pci_read_config_byte(dev, BMIDESR1,  &reg7a);
114         (void) pci_read_config_byte(dev, UDIDETCR1, &reg7b);
115
116         p += sprintf(p, "--------------- Primary Channel "
117                         "---------------- Secondary Channel "
118                         "-------------\n");
119         p += sprintf(p, "                %sabled           "
120                         "              %sabled\n",
121                 (reg72&0x80)?"dis":" en",
122                 (reg7a&0x80)?"dis":" en");
123         p += sprintf(p, "--------------- drive0 "
124                 "--------- drive1 -------- drive0 "
125                 "---------- drive1 ------\n");
126         p += sprintf(p, "DMA enabled:    %s              %s"
127                         "             %s               %s\n",
128                 (reg72&0x20)?"yes":"no ", (reg72&0x40)?"yes":"no ",
129                 (reg7a&0x20)?"yes":"no ", (reg7a&0x40)?"yes":"no ");
130
131         p += sprintf(p, "DMA Mode:       %s(%s)          %s(%s)",
132                 (reg72&0x20)?((reg73&0x01)?"UDMA":" DMA"):" PIO",
133                 (reg72&0x20)?(
134                         ((reg73&0x30)==0x30)?(((reg73&0x35)==0x35)?"3":"0"):
135                         ((reg73&0x20)==0x20)?(((reg73&0x25)==0x25)?"3":"1"):
136                         ((reg73&0x10)==0x10)?(((reg73&0x15)==0x15)?"4":"2"):
137                         ((reg73&0x00)==0x00)?(((reg73&0x05)==0x05)?"5":"2"):
138                         "X"):"?",
139                 (reg72&0x40)?((reg73&0x02)?"UDMA":" DMA"):" PIO",
140                 (reg72&0x40)?(
141                         ((reg73&0xC0)==0xC0)?(((reg73&0xC5)==0xC5)?"3":"0"):
142                         ((reg73&0x80)==0x80)?(((reg73&0x85)==0x85)?"3":"1"):
143                         ((reg73&0x40)==0x40)?(((reg73&0x4A)==0x4A)?"4":"2"):
144                         ((reg73&0x00)==0x00)?(((reg73&0x0A)==0x0A)?"5":"2"):
145                         "X"):"?");
146         p += sprintf(p, "         %s(%s)           %s(%s)\n",
147                 (reg7a&0x20)?((reg7b&0x01)?"UDMA":" DMA"):" PIO",
148                 (reg7a&0x20)?(
149                         ((reg7b&0x30)==0x30)?(((reg7b&0x35)==0x35)?"3":"0"):
150                         ((reg7b&0x20)==0x20)?(((reg7b&0x25)==0x25)?"3":"1"):
151                         ((reg7b&0x10)==0x10)?(((reg7b&0x15)==0x15)?"4":"2"):
152                         ((reg7b&0x00)==0x00)?(((reg7b&0x05)==0x05)?"5":"2"):
153                         "X"):"?",
154                 (reg7a&0x40)?((reg7b&0x02)?"UDMA":" DMA"):" PIO",
155                 (reg7a&0x40)?(
156                         ((reg7b&0xC0)==0xC0)?(((reg7b&0xC5)==0xC5)?"3":"0"):
157                         ((reg7b&0x80)==0x80)?(((reg7b&0x85)==0x85)?"3":"1"):
158                         ((reg7b&0x40)==0x40)?(((reg7b&0x4A)==0x4A)?"4":"2"):
159                         ((reg7b&0x00)==0x00)?(((reg7b&0x0A)==0x0A)?"5":"2"):
160                         "X"):"?" );
161         p += sprintf(p, "PIO Mode:       %s                %s"
162                         "               %s                 %s\n",
163                         "?", "?", "?", "?");
164         p += sprintf(p, "                %s                     %s\n",
165                 (reg50 & CFR_INTR_CH0) ? "interrupting" : "polling     ",
166                 (reg57 & ARTTIM23_INTR_CH1) ? "interrupting" : "polling");
167         p += sprintf(p, "                %s                          %s\n",
168                 (reg71 & MRDMODE_INTR_CH0) ? "pending" : "clear  ",
169                 (reg71 & MRDMODE_INTR_CH1) ? "pending" : "clear");
170         p += sprintf(p, "                %s                          %s\n",
171                 (reg71 & MRDMODE_BLK_CH0) ? "blocked" : "enabled",
172                 (reg71 & MRDMODE_BLK_CH1) ? "blocked" : "enabled");
173
174         return (char *)p;
175 }
176
177 static int cmd64x_get_info (char *buffer, char **addr, off_t offset, int count)
178 {
179         char *p = buffer;
180         int i;
181
182         p += sprintf(p, "\n");
183         for (i = 0; i < n_cmd_devs; i++) {
184                 struct pci_dev *dev     = cmd_devs[i];
185                 p = print_cmd64x_get_info(p, dev, i);
186         }
187         return p-buffer;        /* => must be less than 4k! */
188 }
189
190 #endif  /* defined(DISPLAY_CMD64X_TIMINGS) && defined(CONFIG_PROC_FS) */
191
192 /*
193  * This routine writes the prepared setup/active/recovery counts
194  * for a drive into the cmd646 chipset registers to active them.
195  */
196 static void program_drive_counts (ide_drive_t *drive, int setup_count, int active_count, int recovery_count)
197 {
198         unsigned long flags;
199         struct pci_dev *dev = HWIF(drive)->pci_dev;
200         ide_drive_t *drives = HWIF(drive)->drives;
201         u8 temp_b;
202         static const u8 setup_counts[] = {0x40, 0x40, 0x40, 0x80, 0, 0xc0};
203         static const u8 recovery_counts[] =
204                 {15, 15, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 0};
205         static const u8 arttim_regs[2][2] = {
206                         { ARTTIM0, ARTTIM1 },
207                         { ARTTIM23, ARTTIM23 }
208                 };
209         static const u8 drwtim_regs[2][2] = {
210                         { DRWTIM0, DRWTIM1 },
211                         { DRWTIM2, DRWTIM3 }
212                 };
213         int channel = (int) HWIF(drive)->channel;
214         int slave = (drives != drive);  /* Is this really the best way to determine this?? */
215
216         cmdprintk("program_drive_count parameters = s(%d),a(%d),r(%d),p(%d)\n",
217                 setup_count, active_count, recovery_count, drive->present);
218         /*
219          * Set up address setup count registers.
220          * Primary interface has individual count/timing registers for
221          * each drive.  Secondary interface has one common set of registers,
222          * for address setup so we merge these timings, using the slowest
223          * value.
224          */
225         if (channel) {
226                 drive->drive_data = setup_count;
227                 setup_count = max(drives[0].drive_data,
228                                         drives[1].drive_data);
229                 cmdprintk("Secondary interface, setup_count = %d\n",
230                                         setup_count);
231         }
232
233         /*
234          * Convert values to internal chipset representation
235          */
236         setup_count = (setup_count > 5) ? 0xc0 : (int) setup_counts[setup_count];
237         active_count &= 0xf; /* Remember, max value is 16 */
238         recovery_count = (int) recovery_counts[recovery_count];
239
240         cmdprintk("Final values = %d,%d,%d\n",
241                 setup_count, active_count, recovery_count);
242
243         /*
244          * Now that everything is ready, program the new timings
245          */
246         local_irq_save(flags);
247         /*
248          * Program the address_setup clocks into ARTTIM reg,
249          * and then the active/recovery counts into the DRWTIM reg
250          */
251         (void) pci_read_config_byte(dev, arttim_regs[channel][slave], &temp_b);
252         (void) pci_write_config_byte(dev, arttim_regs[channel][slave],
253                 ((u8) setup_count) | (temp_b & 0x3f));
254         (void) pci_write_config_byte(dev, drwtim_regs[channel][slave],
255                 (u8) ((active_count << 4) | recovery_count));
256         cmdprintk ("Write %x to %x\n",
257                 ((u8) setup_count) | (temp_b & 0x3f),
258                 arttim_regs[channel][slave]);
259         cmdprintk ("Write %x to %x\n",
260                 (u8) ((active_count << 4) | recovery_count),
261                 drwtim_regs[channel][slave]);
262         local_irq_restore(flags);
263 }
264
265 /*
266  * Attempts to set the interface PIO mode.
267  * The preferred method of selecting PIO modes (e.g. mode 4) is 
268  * "echo 'piomode:4' > /proc/ide/hdx/settings".  Special cases are
269  * 8: prefetch off, 9: prefetch on, 255: auto-select best mode.
270  * Called with 255 at boot time.
271  */
272
273 static void cmd64x_tuneproc (ide_drive_t *drive, u8 mode_wanted)
274 {
275         int setup_time, active_time, recovery_time;
276         int clock_time, pio_mode, cycle_time;
277         u8 recovery_count2, cycle_count;
278         int setup_count, active_count, recovery_count;
279         int bus_speed = system_bus_clock();
280         /*byte b;*/
281         ide_pio_data_t  d;
282
283         switch (mode_wanted) {
284                 case 8: /* set prefetch off */
285                 case 9: /* set prefetch on */
286                         mode_wanted &= 1;
287                         /*set_prefetch_mode(index, mode_wanted);*/
288                         cmdprintk("%s: %sabled cmd640 prefetch\n",
289                                 drive->name, mode_wanted ? "en" : "dis");
290                         return;
291         }
292
293         mode_wanted = ide_get_best_pio_mode (drive, mode_wanted, 5, &d);
294         pio_mode = d.pio_mode;
295         cycle_time = d.cycle_time;
296
297         /*
298          * I copied all this complicated stuff from cmd640.c and made a few
299          * minor changes.  For now I am just going to pray that it is correct.
300          */
301         if (pio_mode > 5)
302                 pio_mode = 5;
303         setup_time  = ide_pio_timings[pio_mode].setup_time;
304         active_time = ide_pio_timings[pio_mode].active_time;
305         recovery_time = cycle_time - (setup_time + active_time);
306         clock_time = 1000 / bus_speed;
307         cycle_count = (cycle_time + clock_time - 1) / clock_time;
308
309         setup_count = (setup_time + clock_time - 1) / clock_time;
310
311         active_count = (active_time + clock_time - 1) / clock_time;
312
313         recovery_count = (recovery_time + clock_time - 1) / clock_time;
314         recovery_count2 = cycle_count - (setup_count + active_count);
315         if (recovery_count2 > recovery_count)
316                 recovery_count = recovery_count2;
317         if (recovery_count > 16) {
318                 active_count += recovery_count - 16;
319                 recovery_count = 16;
320         }
321         if (active_count > 16)
322                 active_count = 16; /* maximum allowed by cmd646 */
323
324         /*
325          * In a perfect world, we might set the drive pio mode here
326          * (using WIN_SETFEATURE) before continuing.
327          *
328          * But we do not, because:
329          *      1) this is the wrong place to do it
330          *              (proper is do_special() in ide.c)
331          *      2) in practice this is rarely, if ever, necessary
332          */
333         program_drive_counts (drive, setup_count, active_count, recovery_count);
334
335         cmdprintk("%s: selected cmd646 PIO mode%d : %d (%dns)%s, "
336                 "clocks=%d/%d/%d\n",
337                 drive->name, pio_mode, mode_wanted, cycle_time,
338                 d.overridden ? " (overriding vendor mode)" : "",
339                 setup_count, active_count, recovery_count);
340 }
341
342 static u8 cmd64x_ratemask (ide_drive_t *drive)
343 {
344         struct pci_dev *dev     = HWIF(drive)->pci_dev;
345         u8 mode = 0;
346
347         switch(dev->device) {
348                 case PCI_DEVICE_ID_CMD_649:
349                         mode = 3;
350                         break;
351                 case PCI_DEVICE_ID_CMD_648:
352                         mode = 2;
353                         break;
354                 case PCI_DEVICE_ID_CMD_643:
355                         return 0;
356
357                 case PCI_DEVICE_ID_CMD_646:
358                 {
359                         unsigned int class_rev  = 0;
360                         pci_read_config_dword(dev,
361                                 PCI_CLASS_REVISION, &class_rev);
362                         class_rev &= 0xff;
363                 /*
364                  * UltraDMA only supported on PCI646U and PCI646U2, which
365                  * correspond to revisions 0x03, 0x05 and 0x07 respectively.
366                  * Actually, although the CMD tech support people won't
367                  * tell me the details, the 0x03 revision cannot support
368                  * UDMA correctly without hardware modifications, and even
369                  * then it only works with Quantum disks due to some
370                  * hold time assumptions in the 646U part which are fixed
371                  * in the 646U2.
372                  *
373                  * So we only do UltraDMA on revision 0x05 and 0x07 chipsets.
374                  */
375                         switch(class_rev) {
376                                 case 0x07:
377                                 case 0x05:
378                                         return 1;
379                                 case 0x03:
380                                 case 0x01:
381                                 default:
382                                         return 0;
383                         }
384                 }
385         }
386         if (!eighty_ninty_three(drive))
387                 mode = min(mode, (u8)1);
388         return mode;
389 }
390
391 static void config_cmd64x_chipset_for_pio (ide_drive_t *drive, u8 set_speed)
392 {
393         u8 speed        = 0x00;
394         u8 set_pio      = ide_get_best_pio_mode(drive, 4, 5, NULL);
395
396         cmd64x_tuneproc(drive, set_pio);
397         speed = XFER_PIO_0 + set_pio;
398         if (set_speed)
399                 (void) ide_config_drive_speed(drive, speed);
400 }
401
402 static void config_chipset_for_pio (ide_drive_t *drive, u8 set_speed)
403 {
404         config_cmd64x_chipset_for_pio(drive, set_speed);
405 }
406
407 static int cmd64x_tune_chipset (ide_drive_t *drive, u8 xferspeed)
408 {
409         ide_hwif_t *hwif        = HWIF(drive);
410         struct pci_dev *dev     = hwif->pci_dev;
411
412         u8 unit                 = (drive->select.b.unit & 0x01);
413         u8 regU = 0, pciU       = (hwif->channel) ? UDIDETCR1 : UDIDETCR0;
414         u8 regD = 0, pciD       = (hwif->channel) ? BMIDESR1 : BMIDESR0;
415
416         u8 speed        = ide_rate_filter(cmd64x_ratemask(drive), xferspeed);
417
418         if (speed > XFER_PIO_4) {
419                 (void) pci_read_config_byte(dev, pciD, &regD);
420                 (void) pci_read_config_byte(dev, pciU, &regU);
421                 regD &= ~(unit ? 0x40 : 0x20);
422                 regU &= ~(unit ? 0xCA : 0x35);
423                 (void) pci_write_config_byte(dev, pciD, regD);
424                 (void) pci_write_config_byte(dev, pciU, regU);
425                 (void) pci_read_config_byte(dev, pciD, &regD);
426                 (void) pci_read_config_byte(dev, pciU, &regU);
427         }
428
429         switch(speed) {
430                 case XFER_UDMA_5:       regU |= (unit ? 0x0A : 0x05); break;
431                 case XFER_UDMA_4:       regU |= (unit ? 0x4A : 0x15); break;
432                 case XFER_UDMA_3:       regU |= (unit ? 0x8A : 0x25); break;
433                 case XFER_UDMA_2:       regU |= (unit ? 0x42 : 0x11); break;
434                 case XFER_UDMA_1:       regU |= (unit ? 0x82 : 0x21); break;
435                 case XFER_UDMA_0:       regU |= (unit ? 0xC2 : 0x31); break;
436                 case XFER_MW_DMA_2:     regD |= (unit ? 0x40 : 0x10); break;
437                 case XFER_MW_DMA_1:     regD |= (unit ? 0x80 : 0x20); break;
438                 case XFER_MW_DMA_0:     regD |= (unit ? 0xC0 : 0x30); break;
439                 case XFER_SW_DMA_2:     regD |= (unit ? 0x40 : 0x10); break;
440                 case XFER_SW_DMA_1:     regD |= (unit ? 0x80 : 0x20); break;
441                 case XFER_SW_DMA_0:     regD |= (unit ? 0xC0 : 0x30); break;
442                 case XFER_PIO_4:        cmd64x_tuneproc(drive, 4); break;
443                 case XFER_PIO_3:        cmd64x_tuneproc(drive, 3); break;
444                 case XFER_PIO_2:        cmd64x_tuneproc(drive, 2); break;
445                 case XFER_PIO_1:        cmd64x_tuneproc(drive, 1); break;
446                 case XFER_PIO_0:        cmd64x_tuneproc(drive, 0); break;
447
448                 default:
449                         return 1;
450         }
451
452         if (speed > XFER_PIO_4) {
453                 (void) pci_write_config_byte(dev, pciU, regU);
454                 regD |= (unit ? 0x40 : 0x20);
455                 (void) pci_write_config_byte(dev, pciD, regD);
456         }
457
458         return (ide_config_drive_speed(drive, speed));
459 }
460
461 static int config_chipset_for_dma (ide_drive_t *drive)
462 {
463         u8 speed        = ide_dma_speed(drive, cmd64x_ratemask(drive));
464
465         config_chipset_for_pio(drive, !speed);
466
467         if (!speed)
468                 return 0;
469
470         if(ide_set_xfer_rate(drive, speed))
471                 return 0; 
472
473         if (!drive->init_speed)
474                 drive->init_speed = speed;
475
476         return ide_dma_enable(drive);
477 }
478
479 static int cmd64x_config_drive_for_dma (ide_drive_t *drive)
480 {
481         ide_hwif_t *hwif        = HWIF(drive);
482         struct hd_driveid *id   = drive->id;
483
484         if ((id != NULL) && ((id->capability & 1) != 0) && drive->autodma) {
485
486                 if (ide_use_dma(drive)) {
487                         if (config_chipset_for_dma(drive))
488                                 return hwif->ide_dma_on(drive);
489                 }
490
491                 goto fast_ata_pio;
492
493         } else if ((id->capability & 8) || (id->field_valid & 2)) {
494 fast_ata_pio:
495                 config_chipset_for_pio(drive, 1);
496                 return hwif->ide_dma_off_quietly(drive);
497         }
498         /* IORDY not supported */
499         return 0;
500 }
501
502 static int cmd64x_alt_dma_status (struct pci_dev *dev)
503 {
504         switch(dev->device) {
505                 case PCI_DEVICE_ID_CMD_648:
506                 case PCI_DEVICE_ID_CMD_649:
507                         return 1;
508                 default:
509                         break;
510         }
511         return 0;
512 }
513
514 static int cmd64x_ide_dma_end (ide_drive_t *drive)
515 {
516         u8 dma_stat = 0, dma_cmd = 0;
517         ide_hwif_t *hwif        = HWIF(drive);
518         struct pci_dev *dev     = hwif->pci_dev;
519
520         drive->waiting_for_dma = 0;
521         /* read DMA command state */
522         dma_cmd = hwif->INB(hwif->dma_command);
523         /* stop DMA */
524         hwif->OUTB((dma_cmd & ~1), hwif->dma_command);
525         /* get DMA status */
526         dma_stat = hwif->INB(hwif->dma_status);
527         /* clear the INTR & ERROR bits */
528         hwif->OUTB(dma_stat|6, hwif->dma_status);
529         if (cmd64x_alt_dma_status(dev)) {
530                 u8 dma_intr     = 0;
531                 u8 dma_mask     = (hwif->channel) ? ARTTIM23_INTR_CH1 :
532                                                     CFR_INTR_CH0;
533                 u8 dma_reg      = (hwif->channel) ? ARTTIM2 : CFR;
534                 (void) pci_read_config_byte(dev, dma_reg, &dma_intr);
535                 /* clear the INTR bit */
536                 (void) pci_write_config_byte(dev, dma_reg, dma_intr|dma_mask);
537         }
538         /* purge DMA mappings */
539         ide_destroy_dmatable(drive);
540         /* verify good DMA status */
541         return (dma_stat & 7) != 4;
542 }
543
544 static int cmd64x_ide_dma_test_irq (ide_drive_t *drive)
545 {
546         ide_hwif_t *hwif                = HWIF(drive);
547         struct pci_dev *dev             = hwif->pci_dev;
548         u8 dma_alt_stat = 0, mask       = (hwif->channel) ? MRDMODE_INTR_CH1 :
549                                                             MRDMODE_INTR_CH0;
550         u8 dma_stat = hwif->INB(hwif->dma_status);
551
552         (void) pci_read_config_byte(dev, MRDMODE, &dma_alt_stat);
553 #ifdef DEBUG
554         printk("%s: dma_stat: 0x%02x dma_alt_stat: "
555                 "0x%02x mask: 0x%02x\n", drive->name,
556                 dma_stat, dma_alt_stat, mask);
557 #endif
558         if (!(dma_alt_stat & mask))
559                 return 0;
560
561         /* return 1 if INTR asserted */
562         if ((dma_stat & 4) == 4)
563                 return 1;
564
565         return 0;
566 }
567
568 /*
569  * ASUS P55T2P4D with CMD646 chipset revision 0x01 requires the old
570  * event order for DMA transfers.
571  */
572
573 static int cmd646_1_ide_dma_end (ide_drive_t *drive)
574 {
575         ide_hwif_t *hwif = HWIF(drive);
576         u8 dma_stat = 0, dma_cmd = 0;
577
578         drive->waiting_for_dma = 0;
579         /* get DMA status */
580         dma_stat = hwif->INB(hwif->dma_status);
581         /* read DMA command state */
582         dma_cmd = hwif->INB(hwif->dma_command);
583         /* stop DMA */
584         hwif->OUTB((dma_cmd & ~1), hwif->dma_command);
585         /* clear the INTR & ERROR bits */
586         hwif->OUTB(dma_stat|6, hwif->dma_status);
587         /* and free any DMA resources */
588         ide_destroy_dmatable(drive);
589         /* verify good DMA status */
590         return (dma_stat & 7) != 4;
591 }
592
593 static unsigned int __devinit init_chipset_cmd64x(struct pci_dev *dev, const char *name)
594 {
595         u32 class_rev = 0;
596         u8 mrdmode = 0;
597
598         pci_read_config_dword(dev, PCI_CLASS_REVISION, &class_rev);
599         class_rev &= 0xff;
600
601         switch(dev->device) {
602                 case PCI_DEVICE_ID_CMD_643:
603                         break;
604                 case PCI_DEVICE_ID_CMD_646:
605                         printk(KERN_INFO "%s: chipset revision 0x%02X, ", name, class_rev);
606                         switch(class_rev) {
607                                 case 0x07:
608                                 case 0x05:
609                                         printk("UltraDMA Capable");
610                                         break;
611                                 case 0x03:
612                                         printk("MultiWord DMA Force Limited");
613                                         break;
614                                 case 0x01:
615                                 default:
616                                         printk("MultiWord DMA Limited, IRQ workaround enabled");
617                                         break;
618                                 }
619                         printk("\n");
620                         break;
621                 case PCI_DEVICE_ID_CMD_648:
622                 case PCI_DEVICE_ID_CMD_649:
623                         break;
624                 default:
625                         break;
626         }
627
628         /* Set a good latency timer and cache line size value. */
629         (void) pci_write_config_byte(dev, PCI_LATENCY_TIMER, 64);
630         /* FIXME: pci_set_master() to ensure a good latency timer value */
631
632         /* Setup interrupts. */
633         (void) pci_read_config_byte(dev, MRDMODE, &mrdmode);
634         mrdmode &= ~(0x30);
635         (void) pci_write_config_byte(dev, MRDMODE, mrdmode);
636
637         /* Use MEMORY READ LINE for reads.
638          * NOTE: Although not mentioned in the PCI0646U specs,
639          *       these bits are write only and won't be read
640          *       back as set or not.  The PCI0646U2 specs clarify
641          *       this point.
642          */
643         (void) pci_write_config_byte(dev, MRDMODE, mrdmode | 0x02);
644
645         /* Set reasonable active/recovery/address-setup values. */
646         (void) pci_write_config_byte(dev, ARTTIM0,  0x40);
647         (void) pci_write_config_byte(dev, DRWTIM0,  0x3f);
648         (void) pci_write_config_byte(dev, ARTTIM1,  0x40);
649         (void) pci_write_config_byte(dev, DRWTIM1,  0x3f);
650 #ifdef __i386__
651         (void) pci_write_config_byte(dev, ARTTIM23, 0x1c);
652 #else
653         (void) pci_write_config_byte(dev, ARTTIM23, 0x5c);
654 #endif
655         (void) pci_write_config_byte(dev, DRWTIM23, 0x3f);
656         (void) pci_write_config_byte(dev, DRWTIM3,  0x3f);
657 #ifdef CONFIG_PPC
658         (void) pci_write_config_byte(dev, UDIDETCR0, 0xf0);
659 #endif /* CONFIG_PPC */
660
661 #if defined(DISPLAY_CMD64X_TIMINGS) && defined(CONFIG_PROC_FS)
662
663         cmd_devs[n_cmd_devs++] = dev;
664
665         if (!cmd64x_proc) {
666                 cmd64x_proc = 1;
667                 ide_pci_create_host_proc("cmd64x", cmd64x_get_info);
668         }
669 #endif /* DISPLAY_CMD64X_TIMINGS && CONFIG_PROC_FS */
670
671         return 0;
672 }
673
674 static unsigned int __devinit ata66_cmd64x(ide_hwif_t *hwif)
675 {
676         u8 ata66 = 0, mask = (hwif->channel) ? 0x02 : 0x01;
677
678         switch(hwif->pci_dev->device) {
679                 case PCI_DEVICE_ID_CMD_643:
680                 case PCI_DEVICE_ID_CMD_646:
681                         return ata66;
682                 default:
683                         break;
684         }
685         pci_read_config_byte(hwif->pci_dev, BMIDECSR, &ata66);
686         return (ata66 & mask) ? 1 : 0;
687 }
688
689 static void __devinit init_hwif_cmd64x(ide_hwif_t *hwif)
690 {
691         struct pci_dev *dev     = hwif->pci_dev;
692         unsigned int class_rev;
693
694         hwif->autodma = 0;
695         pci_read_config_dword(dev, PCI_CLASS_REVISION, &class_rev);
696         class_rev &= 0xff;
697
698         hwif->tuneproc  = &cmd64x_tuneproc;
699         hwif->speedproc = &cmd64x_tune_chipset;
700
701         if (!hwif->dma_base) {
702                 hwif->drives[0].autotune = 1;
703                 hwif->drives[1].autotune = 1;
704                 return;
705         }
706
707         hwif->atapi_dma = 1;
708
709         hwif->ultra_mask = 0x3f;
710         hwif->mwdma_mask = 0x07;
711         hwif->swdma_mask = 0x07;
712
713         if (dev->device == PCI_DEVICE_ID_CMD_643)
714                 hwif->ultra_mask = 0x80;
715         if (dev->device == PCI_DEVICE_ID_CMD_646)
716                 hwif->ultra_mask = (class_rev > 0x04) ? 0x07 : 0x80;
717         if (dev->device == PCI_DEVICE_ID_CMD_648)
718                 hwif->ultra_mask = 0x1f;
719
720         hwif->ide_dma_check = &cmd64x_config_drive_for_dma;
721         if (!(hwif->udma_four))
722                 hwif->udma_four = ata66_cmd64x(hwif);
723
724         if (dev->device == PCI_DEVICE_ID_CMD_646) {
725                 hwif->chipset = ide_cmd646;
726                 if (class_rev == 0x01) {
727                         hwif->ide_dma_end = &cmd646_1_ide_dma_end;
728                 } else {
729                         hwif->ide_dma_end = &cmd64x_ide_dma_end;
730                         hwif->ide_dma_test_irq = &cmd64x_ide_dma_test_irq;
731                 }
732         } else {
733                 hwif->ide_dma_end = &cmd64x_ide_dma_end;
734                 hwif->ide_dma_test_irq = &cmd64x_ide_dma_test_irq;
735         }
736
737
738         if (!noautodma)
739                 hwif->autodma = 1;
740         hwif->drives[0].autodma = hwif->autodma;
741         hwif->drives[1].autodma = hwif->autodma;
742 }
743
744 static ide_pci_device_t cmd64x_chipsets[] __devinitdata = {
745         {       /* 0 */
746                 .name           = "CMD643",
747                 .init_chipset   = init_chipset_cmd64x,
748                 .init_hwif      = init_hwif_cmd64x,
749                 .channels       = 2,
750                 .autodma        = AUTODMA,
751                 .bootable       = ON_BOARD,
752         },{     /* 1 */
753                 .name           = "CMD646",
754                 .init_chipset   = init_chipset_cmd64x,
755                 .init_hwif      = init_hwif_cmd64x,
756                 .channels       = 2,
757                 .autodma        = AUTODMA,
758                 .enablebits     = {{0x00,0x00,0x00}, {0x51,0x80,0x80}},
759                 .bootable       = ON_BOARD,
760         },{     /* 2 */
761                 .name           = "CMD648",
762                 .init_chipset   = init_chipset_cmd64x,
763                 .init_hwif      = init_hwif_cmd64x,
764                 .channels       = 2,
765                 .autodma        = AUTODMA,
766                 .bootable       = ON_BOARD,
767         },{     /* 3 */
768                 .name           = "CMD649",
769                 .init_chipset   = init_chipset_cmd64x,
770                 .init_hwif      = init_hwif_cmd64x,
771                 .channels       = 2,
772                 .autodma        = AUTODMA,
773                 .bootable       = ON_BOARD,
774         }
775 };
776
777 static int __devinit cmd64x_init_one(struct pci_dev *dev, const struct pci_device_id *id)
778 {
779         return ide_setup_pci_device(dev, &cmd64x_chipsets[id->driver_data]);
780 }
781
782 static struct pci_device_id cmd64x_pci_tbl[] = {
783         { PCI_VENDOR_ID_CMD, PCI_DEVICE_ID_CMD_643, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
784         { PCI_VENDOR_ID_CMD, PCI_DEVICE_ID_CMD_646, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 1},
785         { PCI_VENDOR_ID_CMD, PCI_DEVICE_ID_CMD_648, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 2},
786         { PCI_VENDOR_ID_CMD, PCI_DEVICE_ID_CMD_649, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 3},
787         { 0, },
788 };
789 MODULE_DEVICE_TABLE(pci, cmd64x_pci_tbl);
790
791 static struct pci_driver driver = {
792         .name           = "CMD64x_IDE",
793         .id_table       = cmd64x_pci_tbl,
794         .probe          = cmd64x_init_one,
795 };
796
797 static int cmd64x_ide_init(void)
798 {
799         return ide_pci_register_driver(&driver);
800 }
801
802 module_init(cmd64x_ide_init);
803
804 MODULE_AUTHOR("Eddie Dost, David Miller, Andre Hedrick");
805 MODULE_DESCRIPTION("PCI driver module for CMD64x IDE");
806 MODULE_LICENSE("GPL");