4fff663a643209e56caafda2d71993abc6787af4
[linux-2.6-block.git] / drivers / ide / pci / sis5513.c
1 /*
2  * linux/drivers/ide/pci/sis5513.c      Version 0.16ac+vp       Jun 18, 2003
3  *
4  * Copyright (C) 1999-2000      Andre Hedrick <andre@linux-ide.org>
5  * Copyright (C) 2002           Lionel Bouton <Lionel.Bouton@inet6.fr>, Maintainer
6  * Copyright (C) 2003           Vojtech Pavlik <vojtech@suse.cz>
7  * May be copied or modified under the terms of the GNU General Public License
8  *
9  *
10  * Thanks :
11  *
12  * SiS Taiwan           : for direct support and hardware.
13  * Daniela Engert       : for initial ATA100 advices and numerous others.
14  * John Fremlin, Manfred Spraul, Dave Morgan, Peter Kjellerstedt        :
15  *                        for checking code correctness, providing patches.
16  *
17  *
18  * Original tests and design on the SiS620 chipset.
19  * ATA100 tests and design on the SiS735 chipset.
20  * ATA16/33 support from specs
21  * ATA133 support for SiS961/962 by L.C. Chang <lcchang@sis.com.tw>
22  * ATA133 961/962/963 fixes by Vojtech Pavlik <vojtech@suse.cz>
23  *
24  * Documentation:
25  *      SiS chipset documentation available under NDA to companies only
26  *      (not to individuals).
27  */
28
29 /*
30  * The original SiS5513 comes from a SiS5511/55112/5513 chipset. The original
31  * SiS5513 was also used in the SiS5596/5513 chipset. Thus if we see a SiS5511
32  * or SiS5596, we can assume we see the first MWDMA-16 capable SiS5513 chip.
33  *
34  * Later SiS chipsets integrated the 5513 functionality into the NorthBridge,
35  * starting with SiS5571 and up to SiS745. The PCI ID didn't change, though. We
36  * can figure out that we have a more modern and more capable 5513 by looking
37  * for the respective NorthBridge IDs.
38  *
39  * Even later (96x family) SiS chipsets use the MuTIOL link and place the 5513
40  * into the SouthBrige. Here we cannot rely on looking up the NorthBridge PCI
41  * ID, while the now ATA-133 capable 5513 still has the same PCI ID.
42  * Fortunately the 5513 can be 'unmasked' by fiddling with some config space
43  * bits, changing its device id to the true one - 5517 for 961 and 5518 for
44  * 962/963.
45  */
46
47 #include <linux/types.h>
48 #include <linux/module.h>
49 #include <linux/kernel.h>
50 #include <linux/delay.h>
51 #include <linux/timer.h>
52 #include <linux/mm.h>
53 #include <linux/ioport.h>
54 #include <linux/blkdev.h>
55 #include <linux/hdreg.h>
56
57 #include <linux/interrupt.h>
58 #include <linux/pci.h>
59 #include <linux/init.h>
60 #include <linux/ide.h>
61
62 #include <asm/irq.h>
63
64 #include "ide-timing.h"
65
66 #define DISPLAY_SIS_TIMINGS
67
68 /* registers layout and init values are chipset family dependant */
69
70 #define ATA_16          0x01
71 #define ATA_33          0x02
72 #define ATA_66          0x03
73 #define ATA_100a        0x04 // SiS730/SiS550 is ATA100 with ATA66 layout
74 #define ATA_100         0x05
75 #define ATA_133a        0x06 // SiS961b with 133 support
76 #define ATA_133         0x07 // SiS962/963
77
78 static u8 chipset_family;
79
80 /*
81  * Devices supported
82  */
83 static const struct {
84         const char *name;
85         u16 host_id;
86         u8 chipset_family;
87         u8 flags;
88 } SiSHostChipInfo[] = {
89         { "SiS968",     PCI_DEVICE_ID_SI_968,   ATA_133  },
90         { "SiS966",     PCI_DEVICE_ID_SI_966,   ATA_133  },
91         { "SiS965",     PCI_DEVICE_ID_SI_965,   ATA_133  },
92         { "SiS745",     PCI_DEVICE_ID_SI_745,   ATA_100  },
93         { "SiS735",     PCI_DEVICE_ID_SI_735,   ATA_100  },
94         { "SiS733",     PCI_DEVICE_ID_SI_733,   ATA_100  },
95         { "SiS635",     PCI_DEVICE_ID_SI_635,   ATA_100  },
96         { "SiS633",     PCI_DEVICE_ID_SI_633,   ATA_100  },
97
98         { "SiS730",     PCI_DEVICE_ID_SI_730,   ATA_100a },
99         { "SiS550",     PCI_DEVICE_ID_SI_550,   ATA_100a },
100
101         { "SiS640",     PCI_DEVICE_ID_SI_640,   ATA_66   },
102         { "SiS630",     PCI_DEVICE_ID_SI_630,   ATA_66   },
103         { "SiS620",     PCI_DEVICE_ID_SI_620,   ATA_66   },
104         { "SiS540",     PCI_DEVICE_ID_SI_540,   ATA_66   },
105         { "SiS530",     PCI_DEVICE_ID_SI_530,   ATA_66   },
106
107         { "SiS5600",    PCI_DEVICE_ID_SI_5600,  ATA_33   },
108         { "SiS5598",    PCI_DEVICE_ID_SI_5598,  ATA_33   },
109         { "SiS5597",    PCI_DEVICE_ID_SI_5597,  ATA_33   },
110         { "SiS5591/2",  PCI_DEVICE_ID_SI_5591,  ATA_33   },
111         { "SiS5582",    PCI_DEVICE_ID_SI_5582,  ATA_33   },
112         { "SiS5581",    PCI_DEVICE_ID_SI_5581,  ATA_33   },
113
114         { "SiS5596",    PCI_DEVICE_ID_SI_5596,  ATA_16   },
115         { "SiS5571",    PCI_DEVICE_ID_SI_5571,  ATA_16   },
116         { "SiS5517",    PCI_DEVICE_ID_SI_5517,  ATA_16   },
117         { "SiS551x",    PCI_DEVICE_ID_SI_5511,  ATA_16   },
118 };
119
120 /* Cycle time bits and values vary across chip dma capabilities
121    These three arrays hold the register layout and the values to set.
122    Indexed by chipset_family and (dma_mode - XFER_UDMA_0) */
123
124 /* {0, ATA_16, ATA_33, ATA_66, ATA_100a, ATA_100, ATA_133} */
125 static u8 cycle_time_offset[] = {0,0,5,4,4,0,0};
126 static u8 cycle_time_range[] = {0,0,2,3,3,4,4};
127 static u8 cycle_time_value[][XFER_UDMA_6 - XFER_UDMA_0 + 1] = {
128         {0,0,0,0,0,0,0}, /* no udma */
129         {0,0,0,0,0,0,0}, /* no udma */
130         {3,2,1,0,0,0,0}, /* ATA_33 */
131         {7,5,3,2,1,0,0}, /* ATA_66 */
132         {7,5,3,2,1,0,0}, /* ATA_100a (730 specific), differences are on cycle_time range and offset */
133         {11,7,5,4,2,1,0}, /* ATA_100 */
134         {15,10,7,5,3,2,1}, /* ATA_133a (earliest 691 southbridges) */
135         {15,10,7,5,3,2,1}, /* ATA_133 */
136 };
137 /* CRC Valid Setup Time vary across IDE clock setting 33/66/100/133
138    See SiS962 data sheet for more detail */
139 static u8 cvs_time_value[][XFER_UDMA_6 - XFER_UDMA_0 + 1] = {
140         {0,0,0,0,0,0,0}, /* no udma */
141         {0,0,0,0,0,0,0}, /* no udma */
142         {2,1,1,0,0,0,0},
143         {4,3,2,1,0,0,0},
144         {4,3,2,1,0,0,0},
145         {6,4,3,1,1,1,0},
146         {9,6,4,2,2,2,2},
147         {9,6,4,2,2,2,2},
148 };
149 /* Initialize time, Active time, Recovery time vary across
150    IDE clock settings. These 3 arrays hold the register value
151    for PIO0/1/2/3/4 and DMA0/1/2 mode in order */
152 static u8 ini_time_value[][8] = {
153         {0,0,0,0,0,0,0,0},
154         {0,0,0,0,0,0,0,0},
155         {2,1,0,0,0,1,0,0},
156         {4,3,1,1,1,3,1,1},
157         {4,3,1,1,1,3,1,1},
158         {6,4,2,2,2,4,2,2},
159         {9,6,3,3,3,6,3,3},
160         {9,6,3,3,3,6,3,3},
161 };
162 static u8 act_time_value[][8] = {
163         {0,0,0,0,0,0,0,0},
164         {0,0,0,0,0,0,0,0},
165         {9,9,9,2,2,7,2,2},
166         {19,19,19,5,4,14,5,4},
167         {19,19,19,5,4,14,5,4},
168         {28,28,28,7,6,21,7,6},
169         {38,38,38,10,9,28,10,9},
170         {38,38,38,10,9,28,10,9},
171 };
172 static u8 rco_time_value[][8] = {
173         {0,0,0,0,0,0,0,0},
174         {0,0,0,0,0,0,0,0},
175         {9,2,0,2,0,7,1,1},
176         {19,5,1,5,2,16,3,2},
177         {19,5,1,5,2,16,3,2},
178         {30,9,3,9,4,25,6,4},
179         {40,12,4,12,5,34,12,5},
180         {40,12,4,12,5,34,12,5},
181 };
182
183 /*
184  * Printing configuration
185  */
186 /* Used for chipset type printing at boot time */
187 static char* chipset_capability[] = {
188         "ATA", "ATA 16",
189         "ATA 33", "ATA 66",
190         "ATA 100 (1st gen)", "ATA 100 (2nd gen)",
191         "ATA 133 (1st gen)", "ATA 133 (2nd gen)"
192 };
193
194 #if defined(DISPLAY_SIS_TIMINGS) && defined(CONFIG_PROC_FS)
195 #include <linux/stat.h>
196 #include <linux/proc_fs.h>
197
198 static u8 sis_proc = 0;
199
200 static struct pci_dev *bmide_dev;
201
202 static char* cable_type[] = {
203         "80 pins",
204         "40 pins"
205 };
206
207 static char* recovery_time[] ={
208         "12 PCICLK", "1 PCICLK",
209         "2 PCICLK", "3 PCICLK",
210         "4 PCICLK", "5 PCICLCK",
211         "6 PCICLK", "7 PCICLCK",
212         "8 PCICLK", "9 PCICLCK",
213         "10 PCICLK", "11 PCICLK",
214         "13 PCICLK", "14 PCICLK",
215         "15 PCICLK", "15 PCICLK"
216 };
217
218 static char* active_time[] = {
219         "8 PCICLK", "1 PCICLCK",
220         "2 PCICLK", "3 PCICLK",
221         "4 PCICLK", "5 PCICLK",
222         "6 PCICLK", "12 PCICLK"
223 };
224
225 static char* cycle_time[] = {
226         "Reserved", "2 CLK",
227         "3 CLK", "4 CLK",
228         "5 CLK", "6 CLK",
229         "7 CLK", "8 CLK",
230         "9 CLK", "10 CLK",
231         "11 CLK", "12 CLK",
232         "13 CLK", "14 CLK",
233         "15 CLK", "16 CLK"
234 };
235
236 /* Generic add master or slave info function */
237 static char* get_drives_info (char *buffer, u8 pos)
238 {
239         u8 reg00, reg01, reg10, reg11; /* timing registers */
240         u32 regdw0, regdw1;
241         char* p = buffer;
242
243 /* Postwrite/Prefetch */
244         if (chipset_family < ATA_133) {
245                 pci_read_config_byte(bmide_dev, 0x4b, &reg00);
246                 p += sprintf(p, "Drive %d:        Postwrite %s \t \t Postwrite %s\n",
247                              pos, (reg00 & (0x10 << pos)) ? "Enabled" : "Disabled",
248                              (reg00 & (0x40 << pos)) ? "Enabled" : "Disabled");
249                 p += sprintf(p, "                Prefetch  %s \t \t Prefetch  %s\n",
250                              (reg00 & (0x01 << pos)) ? "Enabled" : "Disabled",
251                              (reg00 & (0x04 << pos)) ? "Enabled" : "Disabled");
252                 pci_read_config_byte(bmide_dev, 0x40+2*pos, &reg00);
253                 pci_read_config_byte(bmide_dev, 0x41+2*pos, &reg01);
254                 pci_read_config_byte(bmide_dev, 0x44+2*pos, &reg10);
255                 pci_read_config_byte(bmide_dev, 0x45+2*pos, &reg11);
256         } else {
257                 u32 reg54h;
258                 u8 drive_pci = 0x40;
259                 pci_read_config_dword(bmide_dev, 0x54, &reg54h);
260                 if (reg54h & 0x40000000) {
261                         // Configuration space remapped to 0x70
262                         drive_pci = 0x70;
263                 }
264                 pci_read_config_dword(bmide_dev, (unsigned long)drive_pci+4*pos, &regdw0);
265                 pci_read_config_dword(bmide_dev, (unsigned long)drive_pci+4*pos+8, &regdw1);
266
267                 p += sprintf(p, "Drive %d:\n", pos);
268         }
269
270
271 /* UDMA */
272         if (chipset_family >= ATA_133) {
273                 p += sprintf(p, "                UDMA %s \t \t \t UDMA %s\n",
274                              (regdw0 & 0x04) ? "Enabled" : "Disabled",
275                              (regdw1 & 0x04) ? "Enabled" : "Disabled");
276                 p += sprintf(p, "                UDMA Cycle Time    %s \t UDMA Cycle Time    %s\n",
277                              cycle_time[(regdw0 & 0xF0) >> 4],
278                              cycle_time[(regdw1 & 0xF0) >> 4]);
279         } else if (chipset_family >= ATA_33) {
280                 p += sprintf(p, "                UDMA %s \t \t \t UDMA %s\n",
281                              (reg01 & 0x80) ? "Enabled" : "Disabled",
282                              (reg11 & 0x80) ? "Enabled" : "Disabled");
283
284                 p += sprintf(p, "                UDMA Cycle Time    ");
285                 switch(chipset_family) {
286                         case ATA_33:    p += sprintf(p, cycle_time[(reg01 & 0x60) >> 5]); break;
287                         case ATA_66:
288                         case ATA_100a:  p += sprintf(p, cycle_time[(reg01 & 0x70) >> 4]); break;
289                         case ATA_100:
290                         case ATA_133a:  p += sprintf(p, cycle_time[reg01 & 0x0F]); break;
291                         default:        p += sprintf(p, "?"); break;
292                 }
293                 p += sprintf(p, " \t UDMA Cycle Time    ");
294                 switch(chipset_family) {
295                         case ATA_33:    p += sprintf(p, cycle_time[(reg11 & 0x60) >> 5]); break;
296                         case ATA_66:
297                         case ATA_100a:  p += sprintf(p, cycle_time[(reg11 & 0x70) >> 4]); break;
298                         case ATA_100:
299                         case ATA_133a:  p += sprintf(p, cycle_time[reg11 & 0x0F]); break;
300                         default:        p += sprintf(p, "?"); break;
301                 }
302                 p += sprintf(p, "\n");
303         }
304
305
306         if (chipset_family < ATA_133) { /* else case TODO */
307
308 /* Data Active */
309                 p += sprintf(p, "                Data Active Time   ");
310                 switch(chipset_family) {
311                         case ATA_16: /* confirmed */
312                         case ATA_33:
313                         case ATA_66:
314                         case ATA_100a: p += sprintf(p, active_time[reg01 & 0x07]); break;
315                         case ATA_100:
316                         case ATA_133a: p += sprintf(p, active_time[(reg00 & 0x70) >> 4]); break;
317                         default: p += sprintf(p, "?"); break;
318                 }
319                 p += sprintf(p, " \t Data Active Time   ");
320                 switch(chipset_family) {
321                         case ATA_16:
322                         case ATA_33:
323                         case ATA_66:
324                         case ATA_100a: p += sprintf(p, active_time[reg11 & 0x07]); break;
325                         case ATA_100:
326                         case ATA_133a: p += sprintf(p, active_time[(reg10 & 0x70) >> 4]); break;
327                         default: p += sprintf(p, "?"); break;
328                 }
329                 p += sprintf(p, "\n");
330
331 /* Data Recovery */
332         /* warning: may need (reg&0x07) for pre ATA66 chips */
333                 p += sprintf(p, "                Data Recovery Time %s \t Data Recovery Time %s\n",
334                              recovery_time[reg00 & 0x0f], recovery_time[reg10 & 0x0f]);
335         }
336
337         return p;
338 }
339
340 static char* get_masters_info(char* buffer)
341 {
342         return get_drives_info(buffer, 0);
343 }
344
345 static char* get_slaves_info(char* buffer)
346 {
347         return get_drives_info(buffer, 1);
348 }
349
350 /* Main get_info, called on /proc/ide/sis reads */
351 static int sis_get_info (char *buffer, char **addr, off_t offset, int count)
352 {
353         char *p = buffer;
354         int len;
355         u8 reg;
356         u16 reg2, reg3;
357
358         p += sprintf(p, "\nSiS 5513 ");
359         switch(chipset_family) {
360                 case ATA_16: p += sprintf(p, "DMA 16"); break;
361                 case ATA_33: p += sprintf(p, "Ultra 33"); break;
362                 case ATA_66: p += sprintf(p, "Ultra 66"); break;
363                 case ATA_100a:
364                 case ATA_100: p += sprintf(p, "Ultra 100"); break;
365                 case ATA_133a:
366                 case ATA_133: p += sprintf(p, "Ultra 133"); break;
367                 default: p+= sprintf(p, "Unknown???"); break;
368         }
369         p += sprintf(p, " chipset\n");
370         p += sprintf(p, "--------------- Primary Channel "
371                      "---------------- Secondary Channel "
372                      "-------------\n");
373
374 /* Status */
375         pci_read_config_byte(bmide_dev, 0x4a, &reg);
376         if (chipset_family == ATA_133) {
377                 pci_read_config_word(bmide_dev, 0x50, &reg2);
378                 pci_read_config_word(bmide_dev, 0x52, &reg3);
379         }
380         p += sprintf(p, "Channel Status: ");
381         if (chipset_family < ATA_66) {
382                 p += sprintf(p, "%s \t \t \t \t %s\n",
383                              (reg & 0x04) ? "On" : "Off",
384                              (reg & 0x02) ? "On" : "Off");
385         } else if (chipset_family < ATA_133) {
386                 p += sprintf(p, "%s \t \t \t \t %s \n",
387                              (reg & 0x02) ? "On" : "Off",
388                              (reg & 0x04) ? "On" : "Off");
389         } else { /* ATA_133 */
390                 p += sprintf(p, "%s \t \t \t \t %s \n",
391                              (reg2 & 0x02) ? "On" : "Off",
392                              (reg3 & 0x02) ? "On" : "Off");
393         }
394
395 /* Operation Mode */
396         pci_read_config_byte(bmide_dev, 0x09, &reg);
397         p += sprintf(p, "Operation Mode: %s \t \t \t %s \n",
398                      (reg & 0x01) ? "Native" : "Compatible",
399                      (reg & 0x04) ? "Native" : "Compatible");
400
401 /* 80-pin cable ? */
402         if (chipset_family >= ATA_133) {
403                 p += sprintf(p, "Cable Type:     %s \t \t \t %s\n",
404                              (reg2 & 0x01) ? cable_type[1] : cable_type[0],
405                              (reg3 & 0x01) ? cable_type[1] : cable_type[0]);
406         } else if (chipset_family > ATA_33) {
407                 pci_read_config_byte(bmide_dev, 0x48, &reg);
408                 p += sprintf(p, "Cable Type:     %s \t \t \t %s\n",
409                              (reg & 0x10) ? cable_type[1] : cable_type[0],
410                              (reg & 0x20) ? cable_type[1] : cable_type[0]);
411         }
412
413 /* Prefetch Count */
414         if (chipset_family < ATA_133) {
415                 pci_read_config_word(bmide_dev, 0x4c, &reg2);
416                 pci_read_config_word(bmide_dev, 0x4e, &reg3);
417                 p += sprintf(p, "Prefetch Count: %d \t \t \t \t %d\n",
418                              reg2, reg3);
419         }
420
421         p = get_masters_info(p);
422         p = get_slaves_info(p);
423
424         len = (p - buffer) - offset;
425         *addr = buffer + offset;
426
427         return len > count ? count : len;
428 }
429 #endif /* defined(DISPLAY_SIS_TIMINGS) && defined(CONFIG_PROC_FS) */
430
431 static u8 sis5513_ratemask (ide_drive_t *drive)
432 {
433         u8 rates[] = { 0, 0, 1, 2, 3, 3, 4, 4 };
434         u8 mode = rates[chipset_family];
435
436         if (!eighty_ninty_three(drive))
437                 mode = min(mode, (u8)1);
438         return mode;
439 }
440
441 /*
442  * Configuration functions
443  */
444 /* Enables per-drive prefetch and postwrite */
445 static void config_drive_art_rwp (ide_drive_t *drive)
446 {
447         ide_hwif_t *hwif        = HWIF(drive);
448         struct pci_dev *dev     = hwif->pci_dev;
449
450         u8 reg4bh               = 0;
451         u8 rw_prefetch          = (0x11 << drive->dn);
452
453         if (drive->media != ide_disk)
454                 return;
455         pci_read_config_byte(dev, 0x4b, &reg4bh);
456
457         if ((reg4bh & rw_prefetch) != rw_prefetch)
458                 pci_write_config_byte(dev, 0x4b, reg4bh|rw_prefetch);
459 }
460
461
462 /* Set per-drive active and recovery time */
463 static void config_art_rwp_pio (ide_drive_t *drive, u8 pio)
464 {
465         ide_hwif_t *hwif        = HWIF(drive);
466         struct pci_dev *dev     = hwif->pci_dev;
467
468         u8                      timing, drive_pci, test1, test2;
469
470         u16 eide_pio_timing[6] = {600, 390, 240, 180, 120, 90};
471         u16 xfer_pio = drive->id->eide_pio_modes;
472
473         config_drive_art_rwp(drive);
474         pio = ide_get_best_pio_mode(drive, 255, pio, NULL);
475
476         if (xfer_pio> 4)
477                 xfer_pio = 0;
478
479         if (drive->id->eide_pio_iordy > 0) {
480                 for (xfer_pio = 5;
481                         (xfer_pio > 0) &&
482                         (drive->id->eide_pio_iordy > eide_pio_timing[xfer_pio]);
483                         xfer_pio--);
484         } else {
485                 xfer_pio = (drive->id->eide_pio_modes & 4) ? 0x05 :
486                            (drive->id->eide_pio_modes & 2) ? 0x04 :
487                            (drive->id->eide_pio_modes & 1) ? 0x03 : xfer_pio;
488         }
489
490         timing = (xfer_pio >= pio) ? xfer_pio : pio;
491
492         /* In pre ATA_133 case, drives sit at 0x40 + 4*drive->dn */
493         drive_pci = 0x40;
494         /* In SiS962 case drives sit at (0x40 or 0x70) + 8*drive->dn) */
495         if (chipset_family >= ATA_133) {
496                 u32 reg54h;
497                 pci_read_config_dword(dev, 0x54, &reg54h);
498                 if (reg54h & 0x40000000) drive_pci = 0x70;
499                 drive_pci += ((drive->dn)*0x4);
500         } else {
501                 drive_pci += ((drive->dn)*0x2);
502         }
503
504         /* register layout changed with newer ATA100 chips */
505         if (chipset_family < ATA_100) {
506                 pci_read_config_byte(dev, drive_pci, &test1);
507                 pci_read_config_byte(dev, drive_pci+1, &test2);
508
509                 /* Clear active and recovery timings */
510                 test1 &= ~0x0F;
511                 test2 &= ~0x07;
512
513                 switch(timing) {
514                         case 4:         test1 |= 0x01; test2 |= 0x03; break;
515                         case 3:         test1 |= 0x03; test2 |= 0x03; break;
516                         case 2:         test1 |= 0x04; test2 |= 0x04; break;
517                         case 1:         test1 |= 0x07; test2 |= 0x06; break;
518                         default:        break;
519                 }
520                 pci_write_config_byte(dev, drive_pci, test1);
521                 pci_write_config_byte(dev, drive_pci+1, test2);
522         } else if (chipset_family < ATA_133) {
523                 switch(timing) { /*             active  recovery
524                                                   v     v */
525                         case 4:         test1 = 0x30|0x01; break;
526                         case 3:         test1 = 0x30|0x03; break;
527                         case 2:         test1 = 0x40|0x04; break;
528                         case 1:         test1 = 0x60|0x07; break;
529                         case 0:         test1 = 0x00; break;
530                         default:        break;
531                 }
532                 pci_write_config_byte(dev, drive_pci, test1);
533         } else { /* ATA_133 */
534                 u32 test3;
535                 pci_read_config_dword(dev, drive_pci, &test3);
536                 test3 &= 0xc0c00fff;
537                 if (test3 & 0x08) {
538                         test3 |= (unsigned long)ini_time_value[ATA_133][timing] << 12;
539                         test3 |= (unsigned long)act_time_value[ATA_133][timing] << 16;
540                         test3 |= (unsigned long)rco_time_value[ATA_133][timing] << 24;
541                 } else {
542                         test3 |= (unsigned long)ini_time_value[ATA_100][timing] << 12;
543                         test3 |= (unsigned long)act_time_value[ATA_100][timing] << 16;
544                         test3 |= (unsigned long)rco_time_value[ATA_100][timing] << 24;
545                 }
546                 pci_write_config_dword(dev, drive_pci, test3);
547         }
548 }
549
550 static int config_chipset_for_pio (ide_drive_t *drive, u8 pio)
551 {
552         if (pio == 255)
553                 pio = ide_find_best_mode(drive, XFER_PIO | XFER_EPIO) - XFER_PIO_0;
554         config_art_rwp_pio(drive, pio);
555         return ide_config_drive_speed(drive, XFER_PIO_0 + min_t(u8, pio, 4));
556 }
557
558 static int sis5513_tune_chipset (ide_drive_t *drive, u8 xferspeed)
559 {
560         ide_hwif_t *hwif        = HWIF(drive);
561         struct pci_dev *dev     = hwif->pci_dev;
562
563         u8 drive_pci, reg, speed;
564         u32 regdw;
565
566         speed = ide_rate_filter(sis5513_ratemask(drive), xferspeed);
567
568         /* See config_art_rwp_pio for drive pci config registers */
569         drive_pci = 0x40;
570         if (chipset_family >= ATA_133) {
571                 u32 reg54h;
572                 pci_read_config_dword(dev, 0x54, &reg54h);
573                 if (reg54h & 0x40000000) drive_pci = 0x70;
574                 drive_pci += ((drive->dn)*0x4);
575                 pci_read_config_dword(dev, (unsigned long)drive_pci, &regdw);
576                 /* Disable UDMA bit for non UDMA modes on UDMA chips */
577                 if (speed < XFER_UDMA_0) {
578                         regdw &= 0xfffffffb;
579                         pci_write_config_dword(dev, (unsigned long)drive_pci, regdw);
580                 }
581         
582         } else {
583                 drive_pci += ((drive->dn)*0x2);
584                 pci_read_config_byte(dev, drive_pci+1, &reg);
585                 /* Disable UDMA bit for non UDMA modes on UDMA chips */
586                 if ((speed < XFER_UDMA_0) && (chipset_family > ATA_16)) {
587                         reg &= 0x7F;
588                         pci_write_config_byte(dev, drive_pci+1, reg);
589                 }
590         }
591
592         /* Config chip for mode */
593         switch(speed) {
594                 case XFER_UDMA_6:
595                 case XFER_UDMA_5:
596                 case XFER_UDMA_4:
597                 case XFER_UDMA_3:
598                 case XFER_UDMA_2:
599                 case XFER_UDMA_1:
600                 case XFER_UDMA_0:
601                         if (chipset_family >= ATA_133) {
602                                 regdw |= 0x04;
603                                 regdw &= 0xfffff00f;
604                                 /* check if ATA133 enable */
605                                 if (regdw & 0x08) {
606                                         regdw |= (unsigned long)cycle_time_value[ATA_133][speed-XFER_UDMA_0] << 4;
607                                         regdw |= (unsigned long)cvs_time_value[ATA_133][speed-XFER_UDMA_0] << 8;
608                                 } else {
609                                 /* if ATA133 disable, we should not set speed above UDMA5 */
610                                         if (speed > XFER_UDMA_5)
611                                                 speed = XFER_UDMA_5;
612                                         regdw |= (unsigned long)cycle_time_value[ATA_100][speed-XFER_UDMA_0] << 4;
613                                         regdw |= (unsigned long)cvs_time_value[ATA_100][speed-XFER_UDMA_0] << 8;
614                                 }
615                                 pci_write_config_dword(dev, (unsigned long)drive_pci, regdw);
616                         } else {
617                                 /* Force the UDMA bit on if we want to use UDMA */
618                                 reg |= 0x80;
619                                 /* clean reg cycle time bits */
620                                 reg &= ~((0xFF >> (8 - cycle_time_range[chipset_family]))
621                                          << cycle_time_offset[chipset_family]);
622                                 /* set reg cycle time bits */
623                                 reg |= cycle_time_value[chipset_family][speed-XFER_UDMA_0]
624                                         << cycle_time_offset[chipset_family];
625                                 pci_write_config_byte(dev, drive_pci+1, reg);
626                         }
627                         break;
628                 case XFER_MW_DMA_2:
629                 case XFER_MW_DMA_1:
630                 case XFER_MW_DMA_0:
631                 case XFER_SW_DMA_2:
632                 case XFER_SW_DMA_1:
633                 case XFER_SW_DMA_0:
634                         break;
635                 case XFER_PIO_4: return((int) config_chipset_for_pio(drive, 4));
636                 case XFER_PIO_3: return((int) config_chipset_for_pio(drive, 3));
637                 case XFER_PIO_2: return((int) config_chipset_for_pio(drive, 2));
638                 case XFER_PIO_1: return((int) config_chipset_for_pio(drive, 1));
639                 case XFER_PIO_0:
640                 default:         return((int) config_chipset_for_pio(drive, 0));        
641         }
642
643         return ((int) ide_config_drive_speed(drive, speed));
644 }
645
646 static void sis5513_tune_drive (ide_drive_t *drive, u8 pio)
647 {
648         (void) config_chipset_for_pio(drive, pio);
649 }
650
651 /*
652  * ((id->hw_config & 0x4000|0x2000) && (HWIF(drive)->udma_four))
653  */
654 static int config_chipset_for_dma (ide_drive_t *drive)
655 {
656         u8 speed        = ide_dma_speed(drive, sis5513_ratemask(drive));
657
658 #ifdef DEBUG
659         printk("SIS5513: config_chipset_for_dma, drive %d, ultra %x\n",
660                drive->dn, drive->id->dma_ultra);
661 #endif
662
663         if (!(speed))
664                 return 0;
665
666         sis5513_tune_chipset(drive, speed);
667         return ide_dma_enable(drive);
668 }
669
670 static int sis5513_config_xfer_rate(ide_drive_t *drive)
671 {
672         ide_hwif_t *hwif        = HWIF(drive);
673
674         config_art_rwp_pio(drive, 5);
675
676         drive->init_speed = 0;
677
678         if (ide_use_dma(drive) && config_chipset_for_dma(drive))
679                 return hwif->ide_dma_on(drive);
680
681         if (ide_use_fast_pio(drive)) {
682                 sis5513_tune_drive(drive, 5);
683                 return hwif->ide_dma_off_quietly(drive);
684         }
685         /* IORDY not supported */
686         return 0;
687 }
688
689 /* Chip detection and general config */
690 static unsigned int __devinit init_chipset_sis5513 (struct pci_dev *dev, const char *name)
691 {
692         struct pci_dev *host;
693         int i = 0;
694
695         chipset_family = 0;
696
697         for (i = 0; i < ARRAY_SIZE(SiSHostChipInfo) && !chipset_family; i++) {
698
699                 host = pci_get_device(PCI_VENDOR_ID_SI, SiSHostChipInfo[i].host_id, NULL);
700
701                 if (!host)
702                         continue;
703
704                 chipset_family = SiSHostChipInfo[i].chipset_family;
705
706                 /* Special case for SiS630 : 630S/ET is ATA_100a */
707                 if (SiSHostChipInfo[i].host_id == PCI_DEVICE_ID_SI_630) {
708                         u8 hostrev;
709                         pci_read_config_byte(host, PCI_REVISION_ID, &hostrev);
710                         if (hostrev >= 0x30)
711                                 chipset_family = ATA_100a;
712                 }
713                 pci_dev_put(host);
714         
715                 printk(KERN_INFO "SIS5513: %s %s controller\n",
716                          SiSHostChipInfo[i].name, chipset_capability[chipset_family]);
717         }
718
719         if (!chipset_family) { /* Belongs to pci-quirks */
720
721                         u32 idemisc;
722                         u16 trueid;
723
724                         /* Disable ID masking and register remapping */
725                         pci_read_config_dword(dev, 0x54, &idemisc);
726                         pci_write_config_dword(dev, 0x54, (idemisc & 0x7fffffff));
727                         pci_read_config_word(dev, PCI_DEVICE_ID, &trueid);
728                         pci_write_config_dword(dev, 0x54, idemisc);
729
730                         if (trueid == 0x5518) {
731                                 printk(KERN_INFO "SIS5513: SiS 962/963 MuTIOL IDE UDMA133 controller\n");
732                                 chipset_family = ATA_133;
733
734                                 /* Check for 5513 compability mapping
735                                  * We must use this, else the port enabled code will fail,
736                                  * as it expects the enablebits at 0x4a.
737                                  */
738                                 if ((idemisc & 0x40000000) == 0) {
739                                         pci_write_config_dword(dev, 0x54, idemisc | 0x40000000);
740                                         printk(KERN_INFO "SIS5513: Switching to 5513 register mapping\n");
741                                 }
742                         }
743         }
744
745         if (!chipset_family) { /* Belongs to pci-quirks */
746
747                         struct pci_dev *lpc_bridge;
748                         u16 trueid;
749                         u8 prefctl;
750                         u8 idecfg;
751                         u8 sbrev;
752
753                         pci_read_config_byte(dev, 0x4a, &idecfg);
754                         pci_write_config_byte(dev, 0x4a, idecfg | 0x10);
755                         pci_read_config_word(dev, PCI_DEVICE_ID, &trueid);
756                         pci_write_config_byte(dev, 0x4a, idecfg);
757
758                         if (trueid == 0x5517) { /* SiS 961/961B */
759
760                                 lpc_bridge = pci_get_slot(dev->bus, 0x10); /* Bus 0, Dev 2, Fn 0 */
761                                 pci_read_config_byte(lpc_bridge, PCI_REVISION_ID, &sbrev);
762                                 pci_read_config_byte(dev, 0x49, &prefctl);
763                                 pci_dev_put(lpc_bridge);
764
765                                 if (sbrev == 0x10 && (prefctl & 0x80)) {
766                                         printk(KERN_INFO "SIS5513: SiS 961B MuTIOL IDE UDMA133 controller\n");
767                                         chipset_family = ATA_133a;
768                                 } else {
769                                         printk(KERN_INFO "SIS5513: SiS 961 MuTIOL IDE UDMA100 controller\n");
770                                         chipset_family = ATA_100;
771                                 }
772                         }
773         }
774
775         if (!chipset_family)
776                 return -1;
777
778         /* Make general config ops here
779            1/ tell IDE channels to operate in Compatibility mode only
780            2/ tell old chips to allow per drive IDE timings */
781
782         {
783                 u8 reg;
784                 u16 regw;
785
786                 switch(chipset_family) {
787                         case ATA_133:
788                                 /* SiS962 operation mode */
789                                 pci_read_config_word(dev, 0x50, &regw);
790                                 if (regw & 0x08)
791                                         pci_write_config_word(dev, 0x50, regw&0xfff7);
792                                 pci_read_config_word(dev, 0x52, &regw);
793                                 if (regw & 0x08)
794                                         pci_write_config_word(dev, 0x52, regw&0xfff7);
795                                 break;
796                         case ATA_133a:
797                         case ATA_100:
798                                 /* Fixup latency */
799                                 pci_write_config_byte(dev, PCI_LATENCY_TIMER, 0x80);
800                                 /* Set compatibility bit */
801                                 pci_read_config_byte(dev, 0x49, &reg);
802                                 if (!(reg & 0x01)) {
803                                         pci_write_config_byte(dev, 0x49, reg|0x01);
804                                 }
805                                 break;
806                         case ATA_100a:
807                         case ATA_66:
808                                 /* Fixup latency */
809                                 pci_write_config_byte(dev, PCI_LATENCY_TIMER, 0x10);
810
811                                 /* On ATA_66 chips the bit was elsewhere */
812                                 pci_read_config_byte(dev, 0x52, &reg);
813                                 if (!(reg & 0x04)) {
814                                         pci_write_config_byte(dev, 0x52, reg|0x04);
815                                 }
816                                 break;
817                         case ATA_33:
818                                 /* On ATA_33 we didn't have a single bit to set */
819                                 pci_read_config_byte(dev, 0x09, &reg);
820                                 if ((reg & 0x0f) != 0x00) {
821                                         pci_write_config_byte(dev, 0x09, reg&0xf0);
822                                 }
823                         case ATA_16:
824                                 /* force per drive recovery and active timings
825                                    needed on ATA_33 and below chips */
826                                 pci_read_config_byte(dev, 0x52, &reg);
827                                 if (!(reg & 0x08)) {
828                                         pci_write_config_byte(dev, 0x52, reg|0x08);
829                                 }
830                                 break;
831                 }
832
833 #if defined(DISPLAY_SIS_TIMINGS) && defined(CONFIG_PROC_FS)
834                 if (!sis_proc) {
835                         sis_proc = 1;
836                         bmide_dev = dev;
837                         ide_pci_create_host_proc("sis", sis_get_info);
838                 }
839 #endif
840         }
841
842         return 0;
843 }
844
845 static unsigned int __devinit ata66_sis5513 (ide_hwif_t *hwif)
846 {
847         u8 ata66 = 0;
848
849         if (chipset_family >= ATA_133) {
850                 u16 regw = 0;
851                 u16 reg_addr = hwif->channel ? 0x52: 0x50;
852                 pci_read_config_word(hwif->pci_dev, reg_addr, &regw);
853                 ata66 = (regw & 0x8000) ? 0 : 1;
854         } else if (chipset_family >= ATA_66) {
855                 u8 reg48h = 0;
856                 u8 mask = hwif->channel ? 0x20 : 0x10;
857                 pci_read_config_byte(hwif->pci_dev, 0x48, &reg48h);
858                 ata66 = (reg48h & mask) ? 0 : 1;
859         }
860         return ata66;
861 }
862
863 static void __devinit init_hwif_sis5513 (ide_hwif_t *hwif)
864 {
865         hwif->autodma = 0;
866
867         if (!hwif->irq)
868                 hwif->irq = hwif->channel ? 15 : 14;
869
870         hwif->tuneproc = &sis5513_tune_drive;
871         hwif->speedproc = &sis5513_tune_chipset;
872
873         if (!(hwif->dma_base)) {
874                 hwif->drives[0].autotune = 1;
875                 hwif->drives[1].autotune = 1;
876                 return;
877         }
878
879         hwif->atapi_dma = 1;
880         hwif->ultra_mask = 0x7f;
881         hwif->mwdma_mask = 0x07;
882         hwif->swdma_mask = 0x07;
883
884         if (!chipset_family)
885                 return;
886
887         if (!(hwif->udma_four))
888                 hwif->udma_four = ata66_sis5513(hwif);
889
890         if (chipset_family > ATA_16) {
891                 hwif->ide_dma_check = &sis5513_config_xfer_rate;
892                 if (!noautodma)
893                         hwif->autodma = 1;
894         }
895         hwif->drives[0].autodma = hwif->autodma;
896         hwif->drives[1].autodma = hwif->autodma;
897         return;
898 }
899
900 static ide_pci_device_t sis5513_chipset __devinitdata = {
901         .name           = "SIS5513",
902         .init_chipset   = init_chipset_sis5513,
903         .init_hwif      = init_hwif_sis5513,
904         .channels       = 2,
905         .autodma        = NOAUTODMA,
906         .enablebits     = {{0x4a,0x02,0x02}, {0x4a,0x04,0x04}},
907         .bootable       = ON_BOARD,
908 };
909
910 static int __devinit sis5513_init_one(struct pci_dev *dev, const struct pci_device_id *id)
911 {
912         return ide_setup_pci_device(dev, &sis5513_chipset);
913 }
914
915 static struct pci_device_id sis5513_pci_tbl[] = {
916         { PCI_VENDOR_ID_SI, PCI_DEVICE_ID_SI_5513, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
917         { PCI_VENDOR_ID_SI, PCI_DEVICE_ID_SI_5518, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
918         { 0, },
919 };
920 MODULE_DEVICE_TABLE(pci, sis5513_pci_tbl);
921
922 static struct pci_driver driver = {
923         .name           = "SIS_IDE",
924         .id_table       = sis5513_pci_tbl,
925         .probe          = sis5513_init_one,
926 };
927
928 static int __init sis5513_ide_init(void)
929 {
930         return ide_pci_register_driver(&driver);
931 }
932
933 module_init(sis5513_ide_init);
934
935 MODULE_AUTHOR("Lionel Bouton, L C Chang, Andre Hedrick, Vojtech Pavlik");
936 MODULE_DESCRIPTION("PCI driver module for SIS IDE");
937 MODULE_LICENSE("GPL");
938
939 /*
940  * TODO:
941  *      - CLEANUP
942  *      - Use drivers/ide/ide-timing.h !
943  *      - More checks in the config registers (force values instead of
944  *        relying on the BIOS setting them correctly).
945  *      - Further optimisations ?
946  *        . for example ATA66+ regs 0x48 & 0x4A
947  */