ide: remove obsoleted "idex=noprobe" kernel parameter (take 2)
[safe/jmp/linux-2.6] / drivers / ide / setup-pci.c
1 /*
2  *  Copyright (C) 1998-2000  Andre Hedrick <andre@linux-ide.org>
3  *  Copyright (C) 1995-1998  Mark Lord
4  *  Copyright (C)      2007  Bartlomiej Zolnierkiewicz
5  *
6  *  May be copied or modified under the terms of the GNU General Public License
7  */
8
9 #include <linux/module.h>
10 #include <linux/types.h>
11 #include <linux/kernel.h>
12 #include <linux/pci.h>
13 #include <linux/init.h>
14 #include <linux/timer.h>
15 #include <linux/mm.h>
16 #include <linux/interrupt.h>
17 #include <linux/ide.h>
18 #include <linux/dma-mapping.h>
19
20 #include <asm/io.h>
21 #include <asm/irq.h>
22
23
24 /**
25  *      ide_match_hwif  -       match a PCI IDE against an ide_hwif
26  *      @io_base: I/O base of device
27  *      @bootable: set if its bootable
28  *      @name: name of device
29  *
30  *      Match a PCI IDE port against an entry in ide_hwifs[],
31  *      based on io_base port if possible. Return the matching hwif,
32  *      or a new hwif. If we find an error (clashing, out of devices, etc)
33  *      return NULL
34  *
35  *      FIXME: we need to handle mmio matches here too
36  */
37
38 static ide_hwif_t *ide_match_hwif(unsigned long io_base, u8 bootable, const char *name)
39 {
40         int h;
41         ide_hwif_t *hwif;
42
43         /*
44          * Look for a hwif with matching io_base default value.
45          * If chipset is "ide_unknown", then claim that hwif slot.
46          * Otherwise, some other chipset has already claimed it..  :(
47          */
48         for (h = 0; h < MAX_HWIFS; ++h) {
49                 hwif = &ide_hwifs[h];
50                 if (hwif->io_ports[IDE_DATA_OFFSET] == io_base) {
51                         if (hwif->chipset == ide_unknown)
52                                 return hwif; /* match */
53                         printk(KERN_ERR "%s: port 0x%04lx already claimed by %s\n",
54                                 name, io_base, hwif->name);
55                         return NULL;    /* already claimed */
56                 }
57         }
58         /*
59          * Okay, there is no hwif matching our io_base,
60          * so we'll just claim an unassigned slot.
61          * Give preference to claiming other slots before claiming ide0/ide1,
62          * just in case there's another interface yet-to-be-scanned
63          * which uses ports 1f0/170 (the ide0/ide1 defaults).
64          *
65          * Unless there is a bootable card that does not use the standard
66          * ports 1f0/170 (the ide0/ide1 defaults). The (bootable) flag.
67          */
68         if (bootable) {
69                 for (h = 0; h < MAX_HWIFS; ++h) {
70                         hwif = &ide_hwifs[h];
71                         if (hwif->chipset == ide_unknown)
72                                 return hwif;    /* pick an unused entry */
73                 }
74         } else {
75                 for (h = 2; h < MAX_HWIFS; ++h) {
76                         hwif = ide_hwifs + h;
77                         if (hwif->chipset == ide_unknown)
78                                 return hwif;    /* pick an unused entry */
79                 }
80         }
81         for (h = 0; h < 2 && h < MAX_HWIFS; ++h) {
82                 hwif = ide_hwifs + h;
83                 if (hwif->chipset == ide_unknown)
84                         return hwif;    /* pick an unused entry */
85         }
86         printk(KERN_ERR "%s: too many IDE interfaces, no room in table\n", name);
87         return NULL;
88 }
89
90 /**
91  *      ide_setup_pci_baseregs  -       place a PCI IDE controller native
92  *      @dev: PCI device of interface to switch native
93  *      @name: Name of interface
94  *
95  *      We attempt to place the PCI interface into PCI native mode. If
96  *      we succeed the BARs are ok and the controller is in PCI mode.
97  *      Returns 0 on success or an errno code. 
98  *
99  *      FIXME: if we program the interface and then fail to set the BARS
100  *      we don't switch it back to legacy mode. Do we actually care ??
101  */
102  
103 static int ide_setup_pci_baseregs (struct pci_dev *dev, const char *name)
104 {
105         u8 progif = 0;
106
107         /*
108          * Place both IDE interfaces into PCI "native" mode:
109          */
110         if (pci_read_config_byte(dev, PCI_CLASS_PROG, &progif) ||
111                          (progif & 5) != 5) {
112                 if ((progif & 0xa) != 0xa) {
113                         printk(KERN_INFO "%s: device not capable of full "
114                                 "native PCI mode\n", name);
115                         return -EOPNOTSUPP;
116                 }
117                 printk("%s: placing both ports into native PCI mode\n", name);
118                 (void) pci_write_config_byte(dev, PCI_CLASS_PROG, progif|5);
119                 if (pci_read_config_byte(dev, PCI_CLASS_PROG, &progif) ||
120                     (progif & 5) != 5) {
121                         printk(KERN_ERR "%s: rewrite of PROGIF failed, wanted "
122                                 "0x%04x, got 0x%04x\n",
123                                 name, progif|5, progif);
124                         return -EOPNOTSUPP;
125                 }
126         }
127         return 0;
128 }
129
130 #ifdef CONFIG_BLK_DEV_IDEDMA_PCI
131 static void ide_pci_clear_simplex(unsigned long dma_base, const char *name)
132 {
133         u8 dma_stat = inb(dma_base + 2);
134
135         outb(dma_stat & 0x60, dma_base + 2);
136         dma_stat = inb(dma_base + 2);
137         if (dma_stat & 0x80)
138                 printk(KERN_INFO "%s: simplex device: DMA forced\n", name);
139 }
140
141 /**
142  *      ide_get_or_set_dma_base         -       setup BMIBA
143  *      @d: IDE port info
144  *      @hwif: IDE interface
145  *
146  *      Fetch the DMA Bus-Master-I/O-Base-Address (BMIBA) from PCI space.
147  *      Where a device has a partner that is already in DMA mode we check
148  *      and enforce IDE simplex rules.
149  */
150
151 static unsigned long ide_get_or_set_dma_base(const struct ide_port_info *d, ide_hwif_t *hwif)
152 {
153         struct pci_dev *dev = to_pci_dev(hwif->dev);
154         unsigned long dma_base = 0;
155         u8 dma_stat = 0;
156
157         if (hwif->mmio)
158                 return hwif->dma_base;
159
160         if (hwif->mate && hwif->mate->dma_base) {
161                 dma_base = hwif->mate->dma_base - (hwif->channel ? 0 : 8);
162         } else {
163                 u8 baridx = (d->host_flags & IDE_HFLAG_CS5520) ? 2 : 4;
164
165                 dma_base = pci_resource_start(dev, baridx);
166
167                 if (dma_base == 0) {
168                         printk(KERN_ERR "%s: DMA base is invalid\n", d->name);
169                         return 0;
170                 }
171         }
172
173         if (hwif->channel)
174                 dma_base += 8;
175
176         if (d->host_flags & IDE_HFLAG_CS5520)
177                 goto out;
178
179         if (d->host_flags & IDE_HFLAG_CLEAR_SIMPLEX) {
180                 ide_pci_clear_simplex(dma_base, d->name);
181                 goto out;
182         }
183
184         /*
185          * If the device claims "simplex" DMA, this means that only one of
186          * the two interfaces can be trusted with DMA at any point in time
187          * (so we should enable DMA only on one of the two interfaces).
188          *
189          * FIXME: At this point we haven't probed the drives so we can't make
190          * the appropriate decision.  Really we should defer this problem until
191          * we tune the drive then try to grab DMA ownership if we want to be
192          * the DMA end.  This has to be become dynamic to handle hot-plug.
193          */
194         dma_stat = hwif->INB(dma_base + 2);
195         if ((dma_stat & 0x80) && hwif->mate && hwif->mate->dma_base) {
196                 printk(KERN_INFO "%s: simplex device: DMA disabled\n", d->name);
197                 dma_base = 0;
198         }
199 out:
200         return dma_base;
201 }
202 #endif /* CONFIG_BLK_DEV_IDEDMA_PCI */
203
204 void ide_setup_pci_noise(struct pci_dev *dev, const struct ide_port_info *d)
205 {
206         printk(KERN_INFO "%s: IDE controller (0x%04x:0x%04x rev 0x%02x) at "
207                          " PCI slot %s\n", d->name, dev->vendor, dev->device,
208                          dev->revision, pci_name(dev));
209 }
210
211 EXPORT_SYMBOL_GPL(ide_setup_pci_noise);
212
213
214 /**
215  *      ide_pci_enable  -       do PCI enables
216  *      @dev: PCI device
217  *      @d: IDE port info
218  *
219  *      Enable the IDE PCI device. We attempt to enable the device in full
220  *      but if that fails then we only need IO space. The PCI code should
221  *      have setup the proper resources for us already for controllers in
222  *      legacy mode.
223  *      
224  *      Returns zero on success or an error code
225  */
226
227 static int ide_pci_enable(struct pci_dev *dev, const struct ide_port_info *d)
228 {
229         int ret;
230
231         if (pci_enable_device(dev)) {
232                 ret = pci_enable_device_io(dev);
233                 if (ret < 0) {
234                         printk(KERN_WARNING "%s: (ide_setup_pci_device:) "
235                                 "Could not enable device.\n", d->name);
236                         goto out;
237                 }
238                 printk(KERN_WARNING "%s: BIOS configuration fixed.\n", d->name);
239         }
240
241         /*
242          * assume all devices can do 32-bit DMA for now, we can add
243          * a DMA mask field to the struct ide_port_info if we need it
244          * (or let lower level driver set the DMA mask)
245          */
246         ret = pci_set_dma_mask(dev, DMA_32BIT_MASK);
247         if (ret < 0) {
248                 printk(KERN_ERR "%s: can't set dma mask\n", d->name);
249                 goto out;
250         }
251
252         /* FIXME: Temporary - until we put in the hotplug interface logic
253            Check that the bits we want are not in use by someone else. */
254         ret = pci_request_region(dev, 4, "ide_tmp");
255         if (ret < 0)
256                 goto out;
257
258         pci_release_region(dev, 4);
259 out:
260         return ret;
261 }
262
263 /**
264  *      ide_pci_configure       -       configure an unconfigured device
265  *      @dev: PCI device
266  *      @d: IDE port info
267  *
268  *      Enable and configure the PCI device we have been passed.
269  *      Returns zero on success or an error code.
270  */
271
272 static int ide_pci_configure(struct pci_dev *dev, const struct ide_port_info *d)
273 {
274         u16 pcicmd = 0;
275         /*
276          * PnP BIOS was *supposed* to have setup this device, but we
277          * can do it ourselves, so long as the BIOS has assigned an IRQ
278          * (or possibly the device is using a "legacy header" for IRQs).
279          * Maybe the user deliberately *disabled* the device,
280          * but we'll eventually ignore it again if no drives respond.
281          */
282         if (ide_setup_pci_baseregs(dev, d->name) || pci_write_config_word(dev, PCI_COMMAND, pcicmd|PCI_COMMAND_IO)) 
283         {
284                 printk(KERN_INFO "%s: device disabled (BIOS)\n", d->name);
285                 return -ENODEV;
286         }
287         if (pci_read_config_word(dev, PCI_COMMAND, &pcicmd)) {
288                 printk(KERN_ERR "%s: error accessing PCI regs\n", d->name);
289                 return -EIO;
290         }
291         if (!(pcicmd & PCI_COMMAND_IO)) {
292                 printk(KERN_ERR "%s: unable to enable IDE controller\n", d->name);
293                 return -ENXIO;
294         }
295         return 0;
296 }
297
298 /**
299  *      ide_pci_check_iomem     -       check a register is I/O
300  *      @dev: PCI device
301  *      @d: IDE port info
302  *      @bar: BAR number
303  *
304  *      Checks if a BAR is configured and points to MMIO space. If so
305  *      print an error and return an error code. Otherwise return 0
306  */
307
308 static int ide_pci_check_iomem(struct pci_dev *dev, const struct ide_port_info *d, int bar)
309 {
310         ulong flags = pci_resource_flags(dev, bar);
311         
312         /* Unconfigured ? */
313         if (!flags || pci_resource_len(dev, bar) == 0)
314                 return 0;
315
316         /* I/O space */         
317         if(flags & PCI_BASE_ADDRESS_IO_MASK)
318                 return 0;
319                 
320         /* Bad */
321         printk(KERN_ERR "%s: IO baseregs (BIOS) are reported "
322                         "as MEM, report to "
323                         "<andre@linux-ide.org>.\n", d->name);
324         return -EINVAL;
325 }
326
327 /**
328  *      ide_hwif_configure      -       configure an IDE interface
329  *      @dev: PCI device holding interface
330  *      @d: IDE port info
331  *      @port: port number
332  *      @irq: PCI IRQ
333  *
334  *      Perform the initial set up for the hardware interface structure. This
335  *      is done per interface port rather than per PCI device. There may be
336  *      more than one port per device.
337  *
338  *      Returns the new hardware interface structure, or NULL on a failure
339  */
340
341 static ide_hwif_t *ide_hwif_configure(struct pci_dev *dev,
342                                       const struct ide_port_info *d,
343                                       unsigned int port, int irq)
344 {
345         unsigned long ctl = 0, base = 0;
346         ide_hwif_t *hwif;
347         u8 bootable = (d->host_flags & IDE_HFLAG_BOOTABLE) ? 1 : 0;
348         struct hw_regs_s hw;
349
350         if ((d->host_flags & IDE_HFLAG_ISA_PORTS) == 0) {
351                 /*  Possibly we should fail if these checks report true */
352                 ide_pci_check_iomem(dev, d, 2*port);
353                 ide_pci_check_iomem(dev, d, 2*port+1);
354  
355                 ctl  = pci_resource_start(dev, 2*port+1);
356                 base = pci_resource_start(dev, 2*port);
357                 if ((ctl && !base) || (base && !ctl)) {
358                         printk(KERN_ERR "%s: inconsistent baseregs (BIOS) "
359                                 "for port %d, skipping\n", d->name, port);
360                         return NULL;
361                 }
362         }
363         if (!ctl)
364         {
365                 /* Use default values */
366                 ctl = port ? 0x374 : 0x3f4;
367                 base = port ? 0x170 : 0x1f0;
368         }
369         if ((hwif = ide_match_hwif(base, bootable, d->name)) == NULL)
370                 return NULL;    /* no room in ide_hwifs[] */
371
372         memset(&hw, 0, sizeof(hw));
373         hw.irq = irq;
374         hw.dev = &dev->dev;
375         hw.chipset = d->chipset ? d->chipset : ide_pci;
376         ide_std_init_ports(&hw, base, ctl | 2);
377
378         ide_init_port_hw(hwif, &hw);
379
380         hwif->dev = &dev->dev;
381         hwif->cds = d;
382
383         return hwif;
384 }
385
386 #ifdef CONFIG_BLK_DEV_IDEDMA_PCI
387 /**
388  *      ide_hwif_setup_dma      -       configure DMA interface
389  *      @hwif: IDE interface
390  *      @d: IDE port info
391  *
392  *      Set up the DMA base for the interface. Enable the master bits as
393  *      necessary and attempt to bring the device DMA into a ready to use
394  *      state
395  */
396
397 void ide_hwif_setup_dma(ide_hwif_t *hwif, const struct ide_port_info *d)
398 {
399         struct pci_dev *dev = to_pci_dev(hwif->dev);
400         u16 pcicmd;
401
402         pci_read_config_word(dev, PCI_COMMAND, &pcicmd);
403
404         if ((d->host_flags & IDE_HFLAG_NO_AUTODMA) == 0 ||
405             ((dev->class >> 8) == PCI_CLASS_STORAGE_IDE &&
406              (dev->class & 0x80))) {
407                 unsigned long dma_base = ide_get_or_set_dma_base(d, hwif);
408                 if (dma_base && !(pcicmd & PCI_COMMAND_MASTER)) {
409                         /*
410                          * Set up BM-DMA capability
411                          * (PnP BIOS should have done this)
412                          */
413                         pci_set_master(dev);
414                         if (pci_read_config_word(dev, PCI_COMMAND, &pcicmd) || !(pcicmd & PCI_COMMAND_MASTER)) {
415                                 printk(KERN_ERR "%s: %s error updating PCICMD\n",
416                                         hwif->name, d->name);
417                                 dma_base = 0;
418                         }
419                 }
420                 if (dma_base) {
421                         if (d->init_dma) {
422                                 d->init_dma(hwif, dma_base);
423                         } else {
424                                 ide_setup_dma(hwif, dma_base);
425                         }
426                 } else {
427                         printk(KERN_INFO "%s: %s Bus-Master DMA disabled "
428                                 "(BIOS)\n", hwif->name, d->name);
429                 }
430         }
431 }
432 #endif /* CONFIG_BLK_DEV_IDEDMA_PCI */
433
434 /**
435  *      ide_setup_pci_controller        -       set up IDE PCI
436  *      @dev: PCI device
437  *      @d: IDE port info
438  *      @noisy: verbose flag
439  *      @config: returned as 1 if we configured the hardware
440  *
441  *      Set up the PCI and controller side of the IDE interface. This brings
442  *      up the PCI side of the device, checks that the device is enabled
443  *      and enables it if need be
444  */
445
446 static int ide_setup_pci_controller(struct pci_dev *dev, const struct ide_port_info *d, int noisy, int *config)
447 {
448         int ret;
449         u16 pcicmd;
450
451         if (noisy)
452                 ide_setup_pci_noise(dev, d);
453
454         ret = ide_pci_enable(dev, d);
455         if (ret < 0)
456                 goto out;
457
458         ret = pci_read_config_word(dev, PCI_COMMAND, &pcicmd);
459         if (ret < 0) {
460                 printk(KERN_ERR "%s: error accessing PCI regs\n", d->name);
461                 goto out;
462         }
463         if (!(pcicmd & PCI_COMMAND_IO)) {       /* is device disabled? */
464                 ret = ide_pci_configure(dev, d);
465                 if (ret < 0)
466                         goto out;
467                 *config = 1;
468                 printk(KERN_INFO "%s: device enabled (Linux)\n", d->name);
469         }
470
471 out:
472         return ret;
473 }
474
475 /**
476  *      ide_pci_setup_ports     -       configure ports/devices on PCI IDE
477  *      @dev: PCI device
478  *      @d: IDE port info
479  *      @pciirq: IRQ line
480  *      @idx: ATA index table to update
481  *
482  *      Scan the interfaces attached to this device and do any
483  *      necessary per port setup. Attach the devices and ask the
484  *      generic DMA layer to do its work for us.
485  *
486  *      Normally called automaticall from do_ide_pci_setup_device,
487  *      but is also used directly as a helper function by some controllers
488  *      where the chipset setup is not the default PCI IDE one.
489  */
490
491 void ide_pci_setup_ports(struct pci_dev *dev, const struct ide_port_info *d, int pciirq, u8 *idx)
492 {
493         int channels = (d->host_flags & IDE_HFLAG_SINGLE) ? 1 : 2, port;
494         ide_hwif_t *hwif;
495         u8 tmp;
496
497         /*
498          * Set up the IDE ports
499          */
500
501         for (port = 0; port < channels; ++port) {
502                 const ide_pci_enablebit_t *e = &(d->enablebits[port]);
503
504                 if (e->reg && (pci_read_config_byte(dev, e->reg, &tmp) ||
505                     (tmp & e->mask) != e->val)) {
506                         printk(KERN_INFO "%s: IDE port disabled\n", d->name);
507                         continue;       /* port not enabled */
508                 }
509
510                 hwif = ide_hwif_configure(dev, d, port, pciirq);
511                 if (hwif == NULL)
512                         continue;
513
514                 *(idx + port) = hwif->index;
515         }
516 }
517
518 EXPORT_SYMBOL_GPL(ide_pci_setup_ports);
519
520 /*
521  * ide_setup_pci_device() looks at the primary/secondary interfaces
522  * on a PCI IDE device and, if they are enabled, prepares the IDE driver
523  * for use with them.  This generic code works for most PCI chipsets.
524  *
525  * One thing that is not standardized is the location of the
526  * primary/secondary interface "enable/disable" bits.  For chipsets that
527  * we "know" about, this information is in the struct ide_port_info;
528  * for all other chipsets, we just assume both interfaces are enabled.
529  */
530 static int do_ide_setup_pci_device(struct pci_dev *dev,
531                                    const struct ide_port_info *d,
532                                    u8 *idx, u8 noisy)
533 {
534         int tried_config = 0;
535         int pciirq, ret;
536
537         ret = ide_setup_pci_controller(dev, d, noisy, &tried_config);
538         if (ret < 0)
539                 goto out;
540
541         /*
542          * Can we trust the reported IRQ?
543          */
544         pciirq = dev->irq;
545
546         /* Is it an "IDE storage" device in non-PCI mode? */
547         if ((dev->class >> 8) == PCI_CLASS_STORAGE_IDE && (dev->class & 5) != 5) {
548                 if (noisy)
549                         printk(KERN_INFO "%s: not 100%% native mode: "
550                                 "will probe irqs later\n", d->name);
551                 /*
552                  * This allows offboard ide-pci cards the enable a BIOS,
553                  * verify interrupt settings of split-mirror pci-config
554                  * space, place chipset into init-mode, and/or preserve
555                  * an interrupt if the card is not native ide support.
556                  */
557                 ret = d->init_chipset ? d->init_chipset(dev, d->name) : 0;
558                 if (ret < 0)
559                         goto out;
560                 pciirq = ret;
561         } else if (tried_config) {
562                 if (noisy)
563                         printk(KERN_INFO "%s: will probe irqs later\n", d->name);
564                 pciirq = 0;
565         } else if (!pciirq) {
566                 if (noisy)
567                         printk(KERN_WARNING "%s: bad irq (%d): will probe later\n",
568                                 d->name, pciirq);
569                 pciirq = 0;
570         } else {
571                 if (d->init_chipset) {
572                         ret = d->init_chipset(dev, d->name);
573                         if (ret < 0)
574                                 goto out;
575                 }
576                 if (noisy)
577                         printk(KERN_INFO "%s: 100%% native mode on irq %d\n",
578                                 d->name, pciirq);
579         }
580
581         /* FIXME: silent failure can happen */
582
583         ide_pci_setup_ports(dev, d, pciirq, idx);
584 out:
585         return ret;
586 }
587
588 int ide_setup_pci_device(struct pci_dev *dev, const struct ide_port_info *d)
589 {
590         u8 idx[4] = { 0xff, 0xff, 0xff, 0xff };
591         int ret;
592
593         ret = do_ide_setup_pci_device(dev, d, &idx[0], 1);
594
595         if (ret >= 0)
596                 ide_device_add(idx, d);
597
598         return ret;
599 }
600
601 EXPORT_SYMBOL_GPL(ide_setup_pci_device);
602
603 int ide_setup_pci_devices(struct pci_dev *dev1, struct pci_dev *dev2,
604                           const struct ide_port_info *d)
605 {
606         struct pci_dev *pdev[] = { dev1, dev2 };
607         int ret, i;
608         u8 idx[4] = { 0xff, 0xff, 0xff, 0xff };
609
610         for (i = 0; i < 2; i++) {
611                 ret = do_ide_setup_pci_device(pdev[i], d, &idx[i*2], !i);
612                 /*
613                  * FIXME: Mom, mom, they stole me the helper function to undo
614                  * do_ide_setup_pci_device() on the first device!
615                  */
616                 if (ret < 0)
617                         goto out;
618         }
619
620         ide_device_add(idx, d);
621 out:
622         return ret;
623 }
624
625 EXPORT_SYMBOL_GPL(ide_setup_pci_devices);