Merge master.kernel.org:/pub/scm/linux/kernel/git/lethal/sh-2.6
[linux-2.6] / 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         config_art_rwp_pio(drive, 5);
673
674         drive->init_speed = 0;
675
676         if (ide_use_dma(drive) && config_chipset_for_dma(drive))
677                 return 0;
678
679         if (ide_use_fast_pio(drive))
680                 sis5513_tune_drive(drive, 5);
681
682         return -1;
683 }
684
685 /* Chip detection and general config */
686 static unsigned int __devinit init_chipset_sis5513 (struct pci_dev *dev, const char *name)
687 {
688         struct pci_dev *host;
689         int i = 0;
690
691         chipset_family = 0;
692
693         for (i = 0; i < ARRAY_SIZE(SiSHostChipInfo) && !chipset_family; i++) {
694
695                 host = pci_get_device(PCI_VENDOR_ID_SI, SiSHostChipInfo[i].host_id, NULL);
696
697                 if (!host)
698                         continue;
699
700                 chipset_family = SiSHostChipInfo[i].chipset_family;
701
702                 /* Special case for SiS630 : 630S/ET is ATA_100a */
703                 if (SiSHostChipInfo[i].host_id == PCI_DEVICE_ID_SI_630) {
704                         u8 hostrev;
705                         pci_read_config_byte(host, PCI_REVISION_ID, &hostrev);
706                         if (hostrev >= 0x30)
707                                 chipset_family = ATA_100a;
708                 }
709                 pci_dev_put(host);
710         
711                 printk(KERN_INFO "SIS5513: %s %s controller\n",
712                          SiSHostChipInfo[i].name, chipset_capability[chipset_family]);
713         }
714
715         if (!chipset_family) { /* Belongs to pci-quirks */
716
717                         u32 idemisc;
718                         u16 trueid;
719
720                         /* Disable ID masking and register remapping */
721                         pci_read_config_dword(dev, 0x54, &idemisc);
722                         pci_write_config_dword(dev, 0x54, (idemisc & 0x7fffffff));
723                         pci_read_config_word(dev, PCI_DEVICE_ID, &trueid);
724                         pci_write_config_dword(dev, 0x54, idemisc);
725
726                         if (trueid == 0x5518) {
727                                 printk(KERN_INFO "SIS5513: SiS 962/963 MuTIOL IDE UDMA133 controller\n");
728                                 chipset_family = ATA_133;
729
730                                 /* Check for 5513 compability mapping
731                                  * We must use this, else the port enabled code will fail,
732                                  * as it expects the enablebits at 0x4a.
733                                  */
734                                 if ((idemisc & 0x40000000) == 0) {
735                                         pci_write_config_dword(dev, 0x54, idemisc | 0x40000000);
736                                         printk(KERN_INFO "SIS5513: Switching to 5513 register mapping\n");
737                                 }
738                         }
739         }
740
741         if (!chipset_family) { /* Belongs to pci-quirks */
742
743                         struct pci_dev *lpc_bridge;
744                         u16 trueid;
745                         u8 prefctl;
746                         u8 idecfg;
747                         u8 sbrev;
748
749                         pci_read_config_byte(dev, 0x4a, &idecfg);
750                         pci_write_config_byte(dev, 0x4a, idecfg | 0x10);
751                         pci_read_config_word(dev, PCI_DEVICE_ID, &trueid);
752                         pci_write_config_byte(dev, 0x4a, idecfg);
753
754                         if (trueid == 0x5517) { /* SiS 961/961B */
755
756                                 lpc_bridge = pci_get_slot(dev->bus, 0x10); /* Bus 0, Dev 2, Fn 0 */
757                                 pci_read_config_byte(lpc_bridge, PCI_REVISION_ID, &sbrev);
758                                 pci_read_config_byte(dev, 0x49, &prefctl);
759                                 pci_dev_put(lpc_bridge);
760
761                                 if (sbrev == 0x10 && (prefctl & 0x80)) {
762                                         printk(KERN_INFO "SIS5513: SiS 961B MuTIOL IDE UDMA133 controller\n");
763                                         chipset_family = ATA_133a;
764                                 } else {
765                                         printk(KERN_INFO "SIS5513: SiS 961 MuTIOL IDE UDMA100 controller\n");
766                                         chipset_family = ATA_100;
767                                 }
768                         }
769         }
770
771         if (!chipset_family)
772                 return -1;
773
774         /* Make general config ops here
775            1/ tell IDE channels to operate in Compatibility mode only
776            2/ tell old chips to allow per drive IDE timings */
777
778         {
779                 u8 reg;
780                 u16 regw;
781
782                 switch(chipset_family) {
783                         case ATA_133:
784                                 /* SiS962 operation mode */
785                                 pci_read_config_word(dev, 0x50, &regw);
786                                 if (regw & 0x08)
787                                         pci_write_config_word(dev, 0x50, regw&0xfff7);
788                                 pci_read_config_word(dev, 0x52, &regw);
789                                 if (regw & 0x08)
790                                         pci_write_config_word(dev, 0x52, regw&0xfff7);
791                                 break;
792                         case ATA_133a:
793                         case ATA_100:
794                                 /* Fixup latency */
795                                 pci_write_config_byte(dev, PCI_LATENCY_TIMER, 0x80);
796                                 /* Set compatibility bit */
797                                 pci_read_config_byte(dev, 0x49, &reg);
798                                 if (!(reg & 0x01)) {
799                                         pci_write_config_byte(dev, 0x49, reg|0x01);
800                                 }
801                                 break;
802                         case ATA_100a:
803                         case ATA_66:
804                                 /* Fixup latency */
805                                 pci_write_config_byte(dev, PCI_LATENCY_TIMER, 0x10);
806
807                                 /* On ATA_66 chips the bit was elsewhere */
808                                 pci_read_config_byte(dev, 0x52, &reg);
809                                 if (!(reg & 0x04)) {
810                                         pci_write_config_byte(dev, 0x52, reg|0x04);
811                                 }
812                                 break;
813                         case ATA_33:
814                                 /* On ATA_33 we didn't have a single bit to set */
815                                 pci_read_config_byte(dev, 0x09, &reg);
816                                 if ((reg & 0x0f) != 0x00) {
817                                         pci_write_config_byte(dev, 0x09, reg&0xf0);
818                                 }
819                         case ATA_16:
820                                 /* force per drive recovery and active timings
821                                    needed on ATA_33 and below chips */
822                                 pci_read_config_byte(dev, 0x52, &reg);
823                                 if (!(reg & 0x08)) {
824                                         pci_write_config_byte(dev, 0x52, reg|0x08);
825                                 }
826                                 break;
827                 }
828
829 #if defined(DISPLAY_SIS_TIMINGS) && defined(CONFIG_PROC_FS)
830                 if (!sis_proc) {
831                         sis_proc = 1;
832                         bmide_dev = dev;
833                         ide_pci_create_host_proc("sis", sis_get_info);
834                 }
835 #endif
836         }
837
838         return 0;
839 }
840
841 static unsigned int __devinit ata66_sis5513 (ide_hwif_t *hwif)
842 {
843         u8 ata66 = 0;
844
845         if (chipset_family >= ATA_133) {
846                 u16 regw = 0;
847                 u16 reg_addr = hwif->channel ? 0x52: 0x50;
848                 pci_read_config_word(hwif->pci_dev, reg_addr, &regw);
849                 ata66 = (regw & 0x8000) ? 0 : 1;
850         } else if (chipset_family >= ATA_66) {
851                 u8 reg48h = 0;
852                 u8 mask = hwif->channel ? 0x20 : 0x10;
853                 pci_read_config_byte(hwif->pci_dev, 0x48, &reg48h);
854                 ata66 = (reg48h & mask) ? 0 : 1;
855         }
856         return ata66;
857 }
858
859 static void __devinit init_hwif_sis5513 (ide_hwif_t *hwif)
860 {
861         hwif->autodma = 0;
862
863         if (!hwif->irq)
864                 hwif->irq = hwif->channel ? 15 : 14;
865
866         hwif->tuneproc = &sis5513_tune_drive;
867         hwif->speedproc = &sis5513_tune_chipset;
868
869         if (!(hwif->dma_base)) {
870                 hwif->drives[0].autotune = 1;
871                 hwif->drives[1].autotune = 1;
872                 return;
873         }
874
875         hwif->atapi_dma = 1;
876         hwif->ultra_mask = 0x7f;
877         hwif->mwdma_mask = 0x07;
878         hwif->swdma_mask = 0x07;
879
880         if (!chipset_family)
881                 return;
882
883         if (!(hwif->udma_four))
884                 hwif->udma_four = ata66_sis5513(hwif);
885
886         if (chipset_family > ATA_16) {
887                 hwif->ide_dma_check = &sis5513_config_xfer_rate;
888                 if (!noautodma)
889                         hwif->autodma = 1;
890         }
891         hwif->drives[0].autodma = hwif->autodma;
892         hwif->drives[1].autodma = hwif->autodma;
893         return;
894 }
895
896 static ide_pci_device_t sis5513_chipset __devinitdata = {
897         .name           = "SIS5513",
898         .init_chipset   = init_chipset_sis5513,
899         .init_hwif      = init_hwif_sis5513,
900         .channels       = 2,
901         .autodma        = NOAUTODMA,
902         .enablebits     = {{0x4a,0x02,0x02}, {0x4a,0x04,0x04}},
903         .bootable       = ON_BOARD,
904 };
905
906 static int __devinit sis5513_init_one(struct pci_dev *dev, const struct pci_device_id *id)
907 {
908         return ide_setup_pci_device(dev, &sis5513_chipset);
909 }
910
911 static struct pci_device_id sis5513_pci_tbl[] = {
912         { PCI_VENDOR_ID_SI, PCI_DEVICE_ID_SI_5513, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
913         { PCI_VENDOR_ID_SI, PCI_DEVICE_ID_SI_5518, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
914         { 0, },
915 };
916 MODULE_DEVICE_TABLE(pci, sis5513_pci_tbl);
917
918 static struct pci_driver driver = {
919         .name           = "SIS_IDE",
920         .id_table       = sis5513_pci_tbl,
921         .probe          = sis5513_init_one,
922 };
923
924 static int __init sis5513_ide_init(void)
925 {
926         return ide_pci_register_driver(&driver);
927 }
928
929 module_init(sis5513_ide_init);
930
931 MODULE_AUTHOR("Lionel Bouton, L C Chang, Andre Hedrick, Vojtech Pavlik");
932 MODULE_DESCRIPTION("PCI driver module for SIS IDE");
933 MODULE_LICENSE("GPL");
934
935 /*
936  * TODO:
937  *      - CLEANUP
938  *      - Use drivers/ide/ide-timing.h !
939  *      - More checks in the config registers (force values instead of
940  *        relying on the BIOS setting them correctly).
941  *      - Further optimisations ?
942  *        . for example ATA66+ regs 0x48 & 0x4A
943  */