Merge branch 'for-linus' of git://git390.osdl.marist.edu/pub/scm/linux-2.6
[pandora-kernel.git] / drivers / eisa / eisa-bus.c
1 /*
2  * EISA bus support functions for sysfs.
3  *
4  * (C) 2002, 2003 Marc Zyngier <maz@wild-wind.fr.eu.org>
5  *
6  * This code is released under the GPL version 2.
7  */
8
9 #include <linux/kernel.h>
10 #include <linux/device.h>
11 #include <linux/eisa.h>
12 #include <linux/module.h>
13 #include <linux/moduleparam.h>
14 #include <linux/init.h>
15 #include <linux/slab.h>
16 #include <linux/ioport.h>
17 #include <asm/io.h>
18
19 #define SLOT_ADDRESS(r,n) (r->bus_base_addr + (0x1000 * n))
20
21 #define EISA_DEVINFO(i,s) { .id = { .sig = i }, .name = s }
22
23 struct eisa_device_info {
24         struct eisa_device_id id;
25         char name[DEVICE_NAME_SIZE];
26 };
27
28 #ifdef CONFIG_EISA_NAMES
29 static struct eisa_device_info __initdata eisa_table[] = {
30 #include "devlist.h"
31 };
32 #define EISA_INFOS (sizeof (eisa_table) / (sizeof (struct eisa_device_info)))
33 #endif
34
35 #define EISA_MAX_FORCED_DEV 16
36
37 static int enable_dev[EISA_MAX_FORCED_DEV];
38 static int enable_dev_count;
39 static int disable_dev[EISA_MAX_FORCED_DEV];
40 static int disable_dev_count;
41
42 static int is_forced_dev (int *forced_tab,
43                           int forced_count,
44                           struct eisa_root_device *root,
45                           struct eisa_device *edev)
46 {
47         int i, x;
48
49         for (i = 0; i < forced_count; i++) {
50                 x = (root->bus_nr << 8) | edev->slot;
51                 if (forced_tab[i] == x)
52                         return 1;
53         }
54
55         return 0;
56 }
57
58 static void __init eisa_name_device (struct eisa_device *edev)
59 {
60 #ifdef CONFIG_EISA_NAMES
61         int i;
62         for (i = 0; i < EISA_INFOS; i++) {
63                 if (!strcmp (edev->id.sig, eisa_table[i].id.sig)) {
64                         strlcpy (edev->pretty_name,
65                                  eisa_table[i].name,
66                                  DEVICE_NAME_SIZE);
67                         return;
68                 }
69         }
70
71         /* No name was found */
72         sprintf (edev->pretty_name, "EISA device %.7s", edev->id.sig);
73 #endif
74 }
75
76 static char __init *decode_eisa_sig(unsigned long addr)
77 {
78         static char sig_str[EISA_SIG_LEN];
79         u8 sig[4];
80         u16 rev;
81         int i;
82
83         for (i = 0; i < 4; i++) {
84 #ifdef CONFIG_EISA_VLB_PRIMING
85                 /*
86                  * This ugly stuff is used to wake up VL-bus cards
87                  * (AHA-284x is the only known example), so we can
88                  * read the EISA id.
89                  *
90                  * Thankfully, this only exists on x86...
91                  */
92                 outb(0x80 + i, addr);
93 #endif
94                 sig[i] = inb (addr + i);
95
96                 if (!i && (sig[0] & 0x80))
97                         return NULL;
98         }
99         
100         sig_str[0] = ((sig[0] >> 2) & 0x1f) + ('A' - 1);
101         sig_str[1] = (((sig[0] & 3) << 3) | (sig[1] >> 5)) + ('A' - 1);
102         sig_str[2] = (sig[1] & 0x1f) + ('A' - 1);
103         rev = (sig[2] << 8) | sig[3];
104         sprintf(sig_str + 3, "%04X", rev);
105
106         return sig_str;
107 }
108
109 static int eisa_bus_match (struct device *dev, struct device_driver *drv)
110 {
111         struct eisa_device *edev = to_eisa_device (dev);
112         struct eisa_driver *edrv = to_eisa_driver (drv);
113         const struct eisa_device_id *eids = edrv->id_table;
114
115         if (!eids)
116                 return 0;
117
118         while (strlen (eids->sig)) {
119                 if (!strcmp (eids->sig, edev->id.sig) &&
120                     edev->state & EISA_CONFIG_ENABLED) {
121                         edev->id.driver_data = eids->driver_data;
122                         return 1;
123                 }
124
125                 eids++;
126         }
127
128         return 0;
129 }
130
131 static int eisa_bus_uevent(struct device *dev, char **envp, int num_envp,
132                            char *buffer, int buffer_size)
133 {
134         struct eisa_device *edev = to_eisa_device(dev);
135         int i = 0;
136         int length = 0;
137
138         add_uevent_var(envp, num_envp, &i, buffer, buffer_size, &length,
139                        "MODALIAS=" EISA_DEVICE_MODALIAS_FMT, edev->id.sig);
140         envp[i] = NULL;
141         return 0;
142 }
143
144 struct bus_type eisa_bus_type = {
145         .name  = "eisa",
146         .match = eisa_bus_match,
147         .uevent = eisa_bus_uevent,
148 };
149
150 int eisa_driver_register (struct eisa_driver *edrv)
151 {
152         edrv->driver.bus = &eisa_bus_type;
153         return driver_register (&edrv->driver);
154 }
155
156 void eisa_driver_unregister (struct eisa_driver *edrv)
157 {
158         driver_unregister (&edrv->driver);
159 }
160
161 static ssize_t eisa_show_sig (struct device *dev, struct device_attribute *attr, char *buf)
162 {
163         struct eisa_device *edev = to_eisa_device (dev);
164         return sprintf (buf,"%s\n", edev->id.sig);
165 }
166
167 static DEVICE_ATTR(signature, S_IRUGO, eisa_show_sig, NULL);
168
169 static ssize_t eisa_show_state (struct device *dev, struct device_attribute *attr, char *buf)
170 {
171         struct eisa_device *edev = to_eisa_device (dev);
172         return sprintf (buf,"%d\n", edev->state & EISA_CONFIG_ENABLED);
173 }
174
175 static DEVICE_ATTR(enabled, S_IRUGO, eisa_show_state, NULL);
176
177 static ssize_t eisa_show_modalias (struct device *dev, struct device_attribute *attr, char *buf)
178 {
179         struct eisa_device *edev = to_eisa_device (dev);
180         return sprintf (buf, EISA_DEVICE_MODALIAS_FMT "\n", edev->id.sig);
181 }
182
183 static DEVICE_ATTR(modalias, S_IRUGO, eisa_show_modalias, NULL);
184
185 static int __init eisa_init_device (struct eisa_root_device *root,
186                                     struct eisa_device *edev,
187                                     int slot)
188 {
189         char *sig;
190         unsigned long sig_addr;
191         int i;
192
193         sig_addr = SLOT_ADDRESS (root, slot) + EISA_VENDOR_ID_OFFSET;
194
195         if (!(sig = decode_eisa_sig (sig_addr)))
196                 return -1;      /* No EISA device here */
197         
198         memcpy (edev->id.sig, sig, EISA_SIG_LEN);
199         edev->slot = slot;
200         edev->state = inb (SLOT_ADDRESS (root, slot) + EISA_CONFIG_OFFSET) & EISA_CONFIG_ENABLED;
201         edev->base_addr = SLOT_ADDRESS (root, slot);
202         edev->dma_mask = root->dma_mask; /* Default DMA mask */
203         eisa_name_device (edev);
204         edev->dev.parent = root->dev;
205         edev->dev.bus = &eisa_bus_type;
206         edev->dev.dma_mask = &edev->dma_mask;
207         edev->dev.coherent_dma_mask = edev->dma_mask;
208         sprintf (edev->dev.bus_id, "%02X:%02X", root->bus_nr, slot);
209
210         for (i = 0; i < EISA_MAX_RESOURCES; i++) {
211 #ifdef CONFIG_EISA_NAMES
212                 edev->res[i].name = edev->pretty_name;
213 #else
214                 edev->res[i].name = edev->id.sig;
215 #endif
216         }
217
218         if (is_forced_dev (enable_dev, enable_dev_count, root, edev))
219                 edev->state = EISA_CONFIG_ENABLED | EISA_CONFIG_FORCED;
220         
221         if (is_forced_dev (disable_dev, disable_dev_count, root, edev))
222                 edev->state = EISA_CONFIG_FORCED;
223
224         return 0;
225 }
226
227 static int __init eisa_register_device (struct eisa_device *edev)
228 {
229         int rc = device_register (&edev->dev);
230         if (rc)
231                 return rc;
232
233         rc = device_create_file (&edev->dev, &dev_attr_signature);
234         if (rc) goto err_devreg;
235         rc = device_create_file (&edev->dev, &dev_attr_enabled);
236         if (rc) goto err_sig;
237         rc = device_create_file (&edev->dev, &dev_attr_modalias);
238         if (rc) goto err_enab;
239
240         return 0;
241
242 err_enab:
243         device_remove_file (&edev->dev, &dev_attr_enabled);
244 err_sig:
245         device_remove_file (&edev->dev, &dev_attr_signature);
246 err_devreg:
247         device_unregister(&edev->dev);
248         return rc;
249 }
250
251 static int __init eisa_request_resources (struct eisa_root_device *root,
252                                           struct eisa_device *edev,
253                                           int slot)
254 {
255         int i;
256
257         for (i = 0; i < EISA_MAX_RESOURCES; i++) {
258                 /* Don't register resource for slot 0, since this is
259                  * very likely to fail... :-( Instead, grab the EISA
260                  * id, now we can display something in /proc/ioports.
261                  */
262
263                 /* Only one region for mainboard */
264                 if (!slot && i > 0) {
265                         edev->res[i].start = edev->res[i].end = 0;
266                         continue;
267                 }
268                 
269                 if (slot) {
270                         edev->res[i].name  = NULL;
271                         edev->res[i].start = SLOT_ADDRESS (root, slot) + (i * 0x400);
272                         edev->res[i].end   = edev->res[i].start + 0xff;
273                         edev->res[i].flags = IORESOURCE_IO;
274                 } else {
275                         edev->res[i].name  = NULL;
276                         edev->res[i].start = SLOT_ADDRESS (root, slot) + EISA_VENDOR_ID_OFFSET;
277                         edev->res[i].end   = edev->res[i].start + 3;
278                         edev->res[i].flags = IORESOURCE_BUSY;
279                 }
280
281                 if (request_resource (root->res, &edev->res[i]))
282                         goto failed;
283         }
284
285         return 0;
286         
287  failed:
288         while (--i >= 0)
289                 release_resource (&edev->res[i]);
290
291         return -1;
292 }
293
294 static void __init eisa_release_resources (struct eisa_device *edev)
295 {
296         int i;
297
298         for (i = 0; i < EISA_MAX_RESOURCES; i++)
299                 if (edev->res[i].start || edev->res[i].end)
300                         release_resource (&edev->res[i]);
301 }
302
303 static int __init eisa_probe (struct eisa_root_device *root)
304 {
305         int i, c;
306         struct eisa_device *edev;
307
308         printk (KERN_INFO "EISA: Probing bus %d at %s\n",
309                 root->bus_nr, root->dev->bus_id);
310
311         /* First try to get hold of slot 0. If there is no device
312          * here, simply fail, unless root->force_probe is set. */
313         
314         if (!(edev = kzalloc (sizeof (*edev), GFP_KERNEL))) {
315                 printk (KERN_ERR "EISA: Couldn't allocate mainboard slot\n");
316                 return -ENOMEM;
317         }
318                 
319         if (eisa_request_resources (root, edev, 0)) {
320                 printk (KERN_WARNING \
321                         "EISA: Cannot allocate resource for mainboard\n");
322                 kfree (edev);
323                 if (!root->force_probe)
324                         return -EBUSY;
325                 goto force_probe;
326         }
327
328         if (eisa_init_device (root, edev, 0)) {
329                 eisa_release_resources (edev);
330                 kfree (edev);
331                 if (!root->force_probe)
332                         return -ENODEV;
333                 goto force_probe;
334         }
335
336         printk (KERN_INFO "EISA: Mainboard %s detected.\n", edev->id.sig);
337
338         if (eisa_register_device (edev)) {
339                 printk (KERN_ERR "EISA: Failed to register %s\n",
340                         edev->id.sig);
341                 eisa_release_resources (edev);
342                 kfree (edev);
343         }
344         
345  force_probe:
346         
347         for (c = 0, i = 1; i <= root->slots; i++) {
348                 if (!(edev = kzalloc (sizeof (*edev), GFP_KERNEL))) {
349                         printk (KERN_ERR "EISA: Out of memory for slot %d\n",
350                                 i);
351                         continue;
352                 }
353
354                 if (eisa_request_resources (root, edev, i)) {
355                         printk (KERN_WARNING \
356                                 "Cannot allocate resource for EISA slot %d\n",
357                                 i);
358                         kfree (edev);
359                         continue;
360                 }
361
362                 if (eisa_init_device (root, edev, i)) {
363                         eisa_release_resources (edev);
364                         kfree (edev);
365                         continue;
366                 }
367                 
368                 printk (KERN_INFO "EISA: slot %d : %s detected",
369                         i, edev->id.sig);
370                         
371                 switch (edev->state) {
372                 case EISA_CONFIG_ENABLED | EISA_CONFIG_FORCED:
373                         printk (" (forced enabled)");
374                         break;
375
376                 case EISA_CONFIG_FORCED:
377                         printk (" (forced disabled)");
378                         break;
379
380                 case 0:
381                         printk (" (disabled)");
382                         break;
383                 }
384                         
385                 printk (".\n");
386
387                 c++;
388
389                 if (eisa_register_device (edev)) {
390                         printk (KERN_ERR "EISA: Failed to register %s\n",
391                                 edev->id.sig);
392                         eisa_release_resources (edev);
393                         kfree (edev);
394                 }
395         }
396
397         printk (KERN_INFO "EISA: Detected %d card%s.\n", c, c == 1 ? "" : "s");
398
399         return 0;
400 }
401
402 static struct resource eisa_root_res = {
403         .name  = "EISA root resource",
404         .start = 0,
405         .end   = 0xffffffff,
406         .flags = IORESOURCE_IO,
407 };
408
409 static int eisa_bus_count;
410
411 int __init eisa_root_register (struct eisa_root_device *root)
412 {
413         int err;
414
415         /* Use our own resources to check if this bus base address has
416          * been already registered. This prevents the virtual root
417          * device from registering after the real one has, for
418          * example... */
419         
420         root->eisa_root_res.name  = eisa_root_res.name;
421         root->eisa_root_res.start = root->res->start;
422         root->eisa_root_res.end   = root->res->end;
423         root->eisa_root_res.flags = IORESOURCE_BUSY;
424
425         if ((err = request_resource (&eisa_root_res, &root->eisa_root_res)))
426                 return err;
427         
428         root->bus_nr = eisa_bus_count++;
429
430         if ((err = eisa_probe (root)))
431                 release_resource (&root->eisa_root_res);
432
433         return err;
434 }
435
436 static int __init eisa_init (void)
437 {
438         int r;
439         
440         if ((r = bus_register (&eisa_bus_type)))
441                 return r;
442
443         printk (KERN_INFO "EISA bus registered\n");
444         return 0;
445 }
446
447 module_param_array(enable_dev, int, &enable_dev_count, 0444);
448 module_param_array(disable_dev, int, &disable_dev_count, 0444);
449
450 postcore_initcall (eisa_init);
451
452 int EISA_bus;           /* for legacy drivers */
453 EXPORT_SYMBOL (EISA_bus);
454 EXPORT_SYMBOL (eisa_bus_type);
455 EXPORT_SYMBOL (eisa_driver_register);
456 EXPORT_SYMBOL (eisa_driver_unregister);