IB/ehca: Serialize hypervisor calls in ehca_register_mr()
[linux-2.6] / drivers / ata / pata_sil680.c
1 /*
2  * pata_sil680.c        - SIL680 PATA for new ATA layer
3  *                        (C) 2005 Red Hat Inc
4  *                        Alan Cox <alan@redhat.com>
5  *
6  * based upon
7  *
8  * linux/drivers/ide/pci/siimage.c              Version 1.07    Nov 30, 2003
9  *
10  * Copyright (C) 2001-2002      Andre Hedrick <andre@linux-ide.org>
11  * Copyright (C) 2003           Red Hat <alan@redhat.com>
12  *
13  *  May be copied or modified under the terms of the GNU General Public License
14  *
15  *  Documentation publically available.
16  *
17  *      If you have strange problems with nVidia chipset systems please
18  *      see the SI support documentation and update your system BIOS
19  *      if neccessary
20  *
21  * TODO
22  *      If we know all our devices are LBA28 (or LBA28 sized)  we could use
23  *      the command fifo mode.
24  */
25
26 #include <linux/kernel.h>
27 #include <linux/module.h>
28 #include <linux/pci.h>
29 #include <linux/init.h>
30 #include <linux/blkdev.h>
31 #include <linux/delay.h>
32 #include <scsi/scsi_host.h>
33 #include <linux/libata.h>
34
35 #define DRV_NAME "pata_sil680"
36 #define DRV_VERSION "0.4.6"
37
38 /**
39  *      sil680_selreg           -       return register base
40  *      @hwif: interface
41  *      @r: config offset
42  *
43  *      Turn a config register offset into the right address in either
44  *      PCI space or MMIO space to access the control register in question
45  *      Thankfully this is a configuration operation so isnt performance
46  *      criticial.
47  */
48
49 static unsigned long sil680_selreg(struct ata_port *ap, int r)
50 {
51         unsigned long base = 0xA0 + r;
52         base += (ap->port_no << 4);
53         return base;
54 }
55
56 /**
57  *      sil680_seldev           -       return register base
58  *      @hwif: interface
59  *      @r: config offset
60  *
61  *      Turn a config register offset into the right address in either
62  *      PCI space or MMIO space to access the control register in question
63  *      including accounting for the unit shift.
64  */
65
66 static unsigned long sil680_seldev(struct ata_port *ap, struct ata_device *adev, int r)
67 {
68         unsigned long base = 0xA0 + r;
69         base += (ap->port_no << 4);
70         base |= adev->devno ? 2 : 0;
71         return base;
72 }
73
74
75 /**
76  *      sil680_cable_detect     -       cable detection
77  *      @ap: ATA port
78  *
79  *      Perform cable detection. The SIL680 stores this in PCI config
80  *      space for us.
81  */
82
83 static int sil680_cable_detect(struct ata_port *ap) {
84         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
85         unsigned long addr = sil680_selreg(ap, 0);
86         u8 ata66;
87         pci_read_config_byte(pdev, addr, &ata66);
88         if (ata66 & 1)
89                 return ATA_CBL_PATA80;
90         else
91                 return ATA_CBL_PATA40;
92 }
93
94 /**
95  *      sil680_bus_reset        -       reset the SIL680 bus
96  *      @ap: ATA port to reset
97  *      @deadline: deadline jiffies for the operation
98  *
99  *      Perform the SIL680 housekeeping when doing an ATA bus reset
100  */
101
102 static int sil680_bus_reset(struct ata_port *ap,unsigned int *classes,
103                             unsigned long deadline)
104 {
105         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
106         unsigned long addr = sil680_selreg(ap, 0);
107         u8 reset;
108
109         pci_read_config_byte(pdev, addr, &reset);
110         pci_write_config_byte(pdev, addr, reset | 0x03);
111         udelay(25);
112         pci_write_config_byte(pdev, addr, reset);
113         return ata_std_softreset(ap, classes, deadline);
114 }
115
116 static void sil680_error_handler(struct ata_port *ap)
117 {
118         ata_bmdma_drive_eh(ap, ata_std_prereset, sil680_bus_reset, NULL, ata_std_postreset);
119 }
120
121 /**
122  *      sil680_set_piomode      -       set initial PIO mode data
123  *      @ap: ATA interface
124  *      @adev: ATA device
125  *
126  *      Program the SIL680 registers for PIO mode. Note that the task speed
127  *      registers are shared between the devices so we must pick the lowest
128  *      mode for command work.
129  */
130
131 static void sil680_set_piomode(struct ata_port *ap, struct ata_device *adev)
132 {
133         static u16 speed_p[5] = { 0x328A, 0x2283, 0x1104, 0x10C3, 0x10C1 };
134         static u16 speed_t[5] = { 0x328A, 0x2283, 0x1281, 0x10C3, 0x10C1 };
135
136         unsigned long tfaddr = sil680_selreg(ap, 0x02);
137         unsigned long addr = sil680_seldev(ap, adev, 0x04);
138         unsigned long addr_mask = 0x80 + 4 * ap->port_no;
139         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
140         int pio = adev->pio_mode - XFER_PIO_0;
141         int lowest_pio = pio;
142         int port_shift = 4 * adev->devno;
143         u16 reg;
144         u8 mode;
145
146         struct ata_device *pair = ata_dev_pair(adev);
147
148         if (pair != NULL && adev->pio_mode > pair->pio_mode)
149                 lowest_pio = pair->pio_mode - XFER_PIO_0;
150
151         pci_write_config_word(pdev, addr, speed_p[pio]);
152         pci_write_config_word(pdev, tfaddr, speed_t[lowest_pio]);
153
154         pci_read_config_word(pdev, tfaddr-2, &reg);
155         pci_read_config_byte(pdev, addr_mask, &mode);
156
157         reg &= ~0x0200;                 /* Clear IORDY */
158         mode &= ~(3 << port_shift);     /* Clear IORDY and DMA bits */
159
160         if (ata_pio_need_iordy(adev)) {
161                 reg |= 0x0200;          /* Enable IORDY */
162                 mode |= 1 << port_shift;
163         }
164         pci_write_config_word(pdev, tfaddr-2, reg);
165         pci_write_config_byte(pdev, addr_mask, mode);
166 }
167
168 /**
169  *      sil680_set_dmamode      -       set initial DMA mode data
170  *      @ap: ATA interface
171  *      @adev: ATA device
172  *
173  *      Program the MWDMA/UDMA modes for the sil680 k
174  *      chipset. The MWDMA mode values are pulled from a lookup table
175  *      while the chipset uses mode number for UDMA.
176  */
177
178 static void sil680_set_dmamode(struct ata_port *ap, struct ata_device *adev)
179 {
180         static u8 ultra_table[2][7] = {
181                 { 0x0C, 0x07, 0x05, 0x04, 0x02, 0x01, 0xFF },   /* 100MHz */
182                 { 0x0F, 0x0B, 0x07, 0x05, 0x03, 0x02, 0x01 },   /* 133Mhz */
183         };
184         static u16 dma_table[3] = { 0x2208, 0x10C2, 0x10C1 };
185
186         struct pci_dev *pdev = to_pci_dev(ap->host->dev);
187         unsigned long ma = sil680_seldev(ap, adev, 0x08);
188         unsigned long ua = sil680_seldev(ap, adev, 0x0C);
189         unsigned long addr_mask = 0x80 + 4 * ap->port_no;
190         int port_shift = adev->devno * 4;
191         u8 scsc, mode;
192         u16 multi, ultra;
193
194         pci_read_config_byte(pdev, 0x8A, &scsc);
195         pci_read_config_byte(pdev, addr_mask, &mode);
196         pci_read_config_word(pdev, ma, &multi);
197         pci_read_config_word(pdev, ua, &ultra);
198
199         /* Mask timing bits */
200         ultra &= ~0x3F;
201         mode &= ~(0x03 << port_shift);
202
203         /* Extract scsc */
204         scsc = (scsc & 0x30) ? 1: 0;
205
206         if (adev->dma_mode >= XFER_UDMA_0) {
207                 multi = 0x10C1;
208                 ultra |= ultra_table[scsc][adev->dma_mode - XFER_UDMA_0];
209                 mode |= (0x03 << port_shift);
210         } else {
211                 multi = dma_table[adev->dma_mode - XFER_MW_DMA_0];
212                 mode |= (0x02 << port_shift);
213         }
214         pci_write_config_byte(pdev, addr_mask, mode);
215         pci_write_config_word(pdev, ma, multi);
216         pci_write_config_word(pdev, ua, ultra);
217 }
218
219 static struct scsi_host_template sil680_sht = {
220         .module                 = THIS_MODULE,
221         .name                   = DRV_NAME,
222         .ioctl                  = ata_scsi_ioctl,
223         .queuecommand           = ata_scsi_queuecmd,
224         .can_queue              = ATA_DEF_QUEUE,
225         .this_id                = ATA_SHT_THIS_ID,
226         .sg_tablesize           = LIBATA_MAX_PRD,
227         .cmd_per_lun            = ATA_SHT_CMD_PER_LUN,
228         .emulated               = ATA_SHT_EMULATED,
229         .use_clustering         = ATA_SHT_USE_CLUSTERING,
230         .proc_name              = DRV_NAME,
231         .dma_boundary           = ATA_DMA_BOUNDARY,
232         .slave_configure        = ata_scsi_slave_config,
233         .slave_destroy          = ata_scsi_slave_destroy,
234         .bios_param             = ata_std_bios_param,
235 #ifdef CONFIG_PM
236         .suspend                = ata_scsi_device_suspend,
237         .resume                 = ata_scsi_device_resume,
238 #endif
239 };
240
241 static struct ata_port_operations sil680_port_ops = {
242         .port_disable   = ata_port_disable,
243         .set_piomode    = sil680_set_piomode,
244         .set_dmamode    = sil680_set_dmamode,
245         .mode_filter    = ata_pci_default_filter,
246         .tf_load        = ata_tf_load,
247         .tf_read        = ata_tf_read,
248         .check_status   = ata_check_status,
249         .exec_command   = ata_exec_command,
250         .dev_select     = ata_std_dev_select,
251
252         .freeze         = ata_bmdma_freeze,
253         .thaw           = ata_bmdma_thaw,
254         .error_handler  = sil680_error_handler,
255         .post_internal_cmd = ata_bmdma_post_internal_cmd,
256         .cable_detect   = sil680_cable_detect,
257
258         .bmdma_setup    = ata_bmdma_setup,
259         .bmdma_start    = ata_bmdma_start,
260         .bmdma_stop     = ata_bmdma_stop,
261         .bmdma_status   = ata_bmdma_status,
262
263         .qc_prep        = ata_qc_prep,
264         .qc_issue       = ata_qc_issue_prot,
265
266         .data_xfer      = ata_data_xfer,
267
268         .irq_handler    = ata_interrupt,
269         .irq_clear      = ata_bmdma_irq_clear,
270         .irq_on         = ata_irq_on,
271         .irq_ack        = ata_irq_ack,
272
273         .port_start     = ata_port_start,
274 };
275
276 /**
277  *      sil680_init_chip                -       chip setup
278  *      @pdev: PCI device
279  *
280  *      Perform all the chip setup which must be done both when the device
281  *      is powered up on boot and when we resume in case we resumed from RAM.
282  *      Returns the final clock settings.
283  */
284
285 static u8 sil680_init_chip(struct pci_dev *pdev)
286 {
287         u32 class_rev   = 0;
288         u8 tmpbyte      = 0;
289
290         pci_read_config_dword(pdev, PCI_CLASS_REVISION, &class_rev);
291         class_rev &= 0xff;
292         /* FIXME: double check */
293         pci_write_config_byte(pdev, PCI_CACHE_LINE_SIZE, (class_rev) ? 1 : 255);
294
295         pci_write_config_byte(pdev, 0x80, 0x00);
296         pci_write_config_byte(pdev, 0x84, 0x00);
297
298         pci_read_config_byte(pdev, 0x8A, &tmpbyte);
299
300         printk(KERN_INFO "sil680: BA5_EN = %d clock = %02X\n",
301                         tmpbyte & 1, tmpbyte & 0x30);
302
303         switch(tmpbyte & 0x30) {
304                 case 0x00:
305                         /* 133 clock attempt to force it on */
306                         pci_write_config_byte(pdev, 0x8A, tmpbyte|0x10);
307                         break;
308                 case 0x30:
309                         /* if clocking is disabled */
310                         /* 133 clock attempt to force it on */
311                         pci_write_config_byte(pdev, 0x8A, tmpbyte & ~0x20);
312                         break;
313                 case 0x10:
314                         /* 133 already */
315                         break;
316                 case 0x20:
317                         /* BIOS set PCI x2 clocking */
318                         break;
319         }
320
321         pci_read_config_byte(pdev,   0x8A, &tmpbyte);
322         printk(KERN_INFO "sil680: BA5_EN = %d clock = %02X\n",
323                         tmpbyte & 1, tmpbyte & 0x30);
324
325         pci_write_config_byte(pdev,  0xA1, 0x72);
326         pci_write_config_word(pdev,  0xA2, 0x328A);
327         pci_write_config_dword(pdev, 0xA4, 0x62DD62DD);
328         pci_write_config_dword(pdev, 0xA8, 0x43924392);
329         pci_write_config_dword(pdev, 0xAC, 0x40094009);
330         pci_write_config_byte(pdev,  0xB1, 0x72);
331         pci_write_config_word(pdev,  0xB2, 0x328A);
332         pci_write_config_dword(pdev, 0xB4, 0x62DD62DD);
333         pci_write_config_dword(pdev, 0xB8, 0x43924392);
334         pci_write_config_dword(pdev, 0xBC, 0x40094009);
335
336         switch(tmpbyte & 0x30) {
337                 case 0x00: printk(KERN_INFO "sil680: 100MHz clock.\n");break;
338                 case 0x10: printk(KERN_INFO "sil680: 133MHz clock.\n");break;
339                 case 0x20: printk(KERN_INFO "sil680: Using PCI clock.\n");break;
340                 /* This last case is _NOT_ ok */
341                 case 0x30: printk(KERN_ERR "sil680: Clock disabled ?\n");
342         }
343         return tmpbyte & 0x30;
344 }
345
346 static int sil680_init_one(struct pci_dev *pdev, const struct pci_device_id *id)
347 {
348         static struct ata_port_info info = {
349                 .sht = &sil680_sht,
350                 .flags = ATA_FLAG_SLAVE_POSS | ATA_FLAG_SRST,
351                 .pio_mask = 0x1f,
352                 .mwdma_mask = 0x07,
353                 .udma_mask = 0x7f,
354                 .port_ops = &sil680_port_ops
355         };
356         static struct ata_port_info info_slow = {
357                 .sht = &sil680_sht,
358                 .flags = ATA_FLAG_SLAVE_POSS | ATA_FLAG_SRST,
359                 .pio_mask = 0x1f,
360                 .mwdma_mask = 0x07,
361                 .udma_mask = 0x3f,
362                 .port_ops = &sil680_port_ops
363         };
364         static struct ata_port_info *port_info[2] = {&info, &info};
365         static int printed_version;
366
367         if (!printed_version++)
368                 dev_printk(KERN_DEBUG, &pdev->dev, "version " DRV_VERSION "\n");
369
370         switch(sil680_init_chip(pdev))
371         {
372                 case 0:
373                         port_info[0] = port_info[1] = &info_slow;
374                         break;
375                 case 0x30:
376                         return -ENODEV;
377         }
378         return ata_pci_init_one(pdev, port_info, 2);
379 }
380
381 #ifdef CONFIG_PM
382 static int sil680_reinit_one(struct pci_dev *pdev)
383 {
384         sil680_init_chip(pdev);
385         return ata_pci_device_resume(pdev);
386 }
387 #endif
388
389 static const struct pci_device_id sil680[] = {
390         { PCI_VDEVICE(CMD, PCI_DEVICE_ID_SII_680), },
391
392         { },
393 };
394
395 static struct pci_driver sil680_pci_driver = {
396         .name           = DRV_NAME,
397         .id_table       = sil680,
398         .probe          = sil680_init_one,
399         .remove         = ata_pci_remove_one,
400 #ifdef CONFIG_PM
401         .suspend        = ata_pci_device_suspend,
402         .resume         = sil680_reinit_one,
403 #endif
404 };
405
406 static int __init sil680_init(void)
407 {
408         return pci_register_driver(&sil680_pci_driver);
409 }
410
411 static void __exit sil680_exit(void)
412 {
413         pci_unregister_driver(&sil680_pci_driver);
414 }
415
416 MODULE_AUTHOR("Alan Cox");
417 MODULE_DESCRIPTION("low-level driver for SI680 PATA");
418 MODULE_LICENSE("GPL");
419 MODULE_DEVICE_TABLE(pci, sil680);
420 MODULE_VERSION(DRV_VERSION);
421
422 module_init(sil680_init);
423 module_exit(sil680_exit);