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); 457