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