1 /* 2 * ISA Plug & Play support 3 * Copyright (c) by Jaroslav Kysela <perex@perex.cz> 4 * 5 * 6 * This program is free software; you can redistribute it and/or modify 7 * it under the terms of the GNU General Public License as published by 8 * the Free Software Foundation; either version 2 of the License, or 9 * (at your option) any later version. 10 * 11 * This program is distributed in the hope that it will be useful, 12 * but WITHOUT ANY WARRANTY; without even the implied warranty of 13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 * GNU General Public License for more details. 15 * 16 * You should have received a copy of the GNU General Public License 17 * along with this program; if not, write to the Free Software 18 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 19 * 20 * Changelog: 21 * 2000-01-01 Added quirks handling for buggy hardware 22 * Peter Denison <peterd@pnd-pc.demon.co.uk> 23 * 2000-06-14 Added isapnp_probe_devs() and isapnp_activate_dev() 24 * Christoph Hellwig <hch@infradead.org> 25 * 2001-06-03 Added release_region calls to correspond with 26 * request_region calls when a failure occurs. Also 27 * added KERN_* constants to printk() calls. 28 * 2001-11-07 Added isapnp_{,un}register_driver calls along the lines 29 * of the pci driver interface 30 * Kai Germaschewski <kai.germaschewski@gmx.de> 31 * 2002-06-06 Made the use of dma channel 0 configurable 32 * Gerald Teschl <gerald.teschl@univie.ac.at> 33 * 2002-10-06 Ported to PnP Layer - Adam Belay <ambx1@neo.rr.com> 34 * 2003-08-11 Resource Management Updates - Adam Belay <ambx1@neo.rr.com> 35 */ 36 37 #include <linux/module.h> 38 #include <linux/kernel.h> 39 #include <linux/errno.h> 40 #include <linux/slab.h> 41 #include <linux/delay.h> 42 #include <linux/init.h> 43 #include <linux/isapnp.h> 44 #include <linux/mutex.h> 45 #include <asm/io.h> 46 47 #include "../base.h" 48 49 #if 0 50 #define ISAPNP_REGION_OK 51 #endif 52 53 int isapnp_disable; /* Disable ISA PnP */ 54 static int isapnp_rdp; /* Read Data Port */ 55 static int isapnp_reset = 1; /* reset all PnP cards (deactivate) */ 56 static int isapnp_verbose = 1; /* verbose mode */ 57 58 MODULE_AUTHOR("Jaroslav Kysela <perex@perex.cz>"); 59 MODULE_DESCRIPTION("Generic ISA Plug & Play support"); 60 module_param(isapnp_disable, int, 0); 61 MODULE_PARM_DESC(isapnp_disable, "ISA Plug & Play disable"); 62 module_param(isapnp_rdp, int, 0); 63 MODULE_PARM_DESC(isapnp_rdp, "ISA Plug & Play read data port"); 64 module_param(isapnp_reset, int, 0); 65 MODULE_PARM_DESC(isapnp_reset, "ISA Plug & Play reset all cards"); 66 module_param(isapnp_verbose, int, 0); 67 MODULE_PARM_DESC(isapnp_verbose, "ISA Plug & Play verbose mode"); 68 MODULE_LICENSE("GPL"); 69 70 #define _PIDXR 0x279 71 #define _PNPWRP 0xa79 72 73 /* short tags */ 74 #define _STAG_PNPVERNO 0x01 75 #define _STAG_LOGDEVID 0x02 76 #define _STAG_COMPATDEVID 0x03 77 #define _STAG_IRQ 0x04 78 #define _STAG_DMA 0x05 79 #define _STAG_STARTDEP 0x06 80 #define _STAG_ENDDEP 0x07 81 #define _STAG_IOPORT 0x08 82 #define _STAG_FIXEDIO 0x09 83 #define _STAG_VENDOR 0x0e 84 #define _STAG_END 0x0f 85 /* long tags */ 86 #define _LTAG_MEMRANGE 0x81 87 #define _LTAG_ANSISTR 0x82 88 #define _LTAG_UNICODESTR 0x83 89 #define _LTAG_VENDOR 0x84 90 #define _LTAG_MEM32RANGE 0x85 91 #define _LTAG_FIXEDMEM32RANGE 0x86 92 93 /* Logical device control and configuration registers */ 94 95 #define ISAPNP_CFG_ACTIVATE 0x30 /* byte */ 96 #define ISAPNP_CFG_MEM 0x40 /* 4 * dword */ 97 #define ISAPNP_CFG_PORT 0x60 /* 8 * word */ 98 #define ISAPNP_CFG_IRQ 0x70 /* 2 * word */ 99 #define ISAPNP_CFG_DMA 0x74 /* 2 * byte */ 100 101 /* 102 * Sizes of ISAPNP logical device configuration register sets. 103 * See PNP-ISA-v1.0a.pdf, Appendix A. 104 */ 105 #define ISAPNP_MAX_MEM 4 106 #define ISAPNP_MAX_PORT 8 107 #define ISAPNP_MAX_IRQ 2 108 #define ISAPNP_MAX_DMA 2 109 110 static unsigned char isapnp_checksum_value; 111 static DEFINE_MUTEX(isapnp_cfg_mutex); 112 static int isapnp_csn_count; 113 114 /* some prototypes */ 115 116 static inline void write_data(unsigned char x) 117 { 118 outb(x, _PNPWRP); 119 } 120 121 static inline void write_address(unsigned char x) 122 { 123 outb(x, _PIDXR); 124 udelay(20); 125 } 126 127 static inline unsigned char read_data(void) 128 { 129 unsigned char val = inb(isapnp_rdp); 130 return val; 131 } 132 133 unsigned char isapnp_read_byte(unsigned char idx) 134 { 135 write_address(idx); 136 return read_data(); 137 } 138 139 static unsigned short isapnp_read_word(unsigned char idx) 140 { 141 unsigned short val; 142 143 val = isapnp_read_byte(idx); 144 val = (val << 8) + isapnp_read_byte(idx + 1); 145 return val; 146 } 147 148 void isapnp_write_byte(unsigned char idx, unsigned char val) 149 { 150 write_address(idx); 151 write_data(val); 152 } 153 154 static void isapnp_write_word(unsigned char idx, unsigned short val) 155 { 156 isapnp_write_byte(idx, val >> 8); 157 isapnp_write_byte(idx + 1, val); 158 } 159 160 static void isapnp_key(void) 161 { 162 unsigned char code = 0x6a, msb; 163 int i; 164 165 mdelay(1); 166 write_address(0x00); 167 write_address(0x00); 168 169 write_address(code); 170 171 for (i = 1; i < 32; i++) { 172 msb = ((code & 0x01) ^ ((code & 0x02) >> 1)) << 7; 173 code = (code >> 1) | msb; 174 write_address(code); 175 } 176 } 177 178 /* place all pnp cards in wait-for-key state */ 179 static void isapnp_wait(void) 180 { 181 isapnp_write_byte(0x02, 0x02); 182 } 183 184 static void isapnp_wake(unsigned char csn) 185 { 186 isapnp_write_byte(0x03, csn); 187 } 188 189 static void isapnp_device(unsigned char logdev) 190 { 191 isapnp_write_byte(0x07, logdev); 192 } 193 194 static void isapnp_activate(unsigned char logdev) 195 { 196 isapnp_device(logdev); 197 isapnp_write_byte(ISAPNP_CFG_ACTIVATE, 1); 198 udelay(250); 199 } 200 201 static void isapnp_deactivate(unsigned char logdev) 202 { 203 isapnp_device(logdev); 204 isapnp_write_byte(ISAPNP_CFG_ACTIVATE, 0); 205 udelay(500); 206 } 207 208 static void __init isapnp_peek(unsigned char *data, int bytes) 209 { 210 int i, j; 211 unsigned char d = 0; 212 213 for (i = 1; i <= bytes; i++) { 214 for (j = 0; j < 20; j++) { 215 d = isapnp_read_byte(0x05); 216 if (d & 1) 217 break; 218 udelay(100); 219 } 220 if (!(d & 1)) { 221 if (data != NULL) 222 *data++ = 0xff; 223 continue; 224 } 225 d = isapnp_read_byte(0x04); /* PRESDI */ 226 isapnp_checksum_value += d; 227 if (data != NULL) 228 *data++ = d; 229 } 230 } 231 232 #define RDP_STEP 32 /* minimum is 4 */ 233 234 static int isapnp_next_rdp(void) 235 { 236 int rdp = isapnp_rdp; 237 static int old_rdp = 0; 238 239 if (old_rdp) { 240 release_region(old_rdp, 1); 241 old_rdp = 0; 242 } 243 while (rdp <= 0x3ff) { 244 /* 245 * We cannot use NE2000 probe spaces for ISAPnP or we 246 * will lock up machines. 247 */ 248 if ((rdp < 0x280 || rdp > 0x380) 249 && request_region(rdp, 1, "ISAPnP")) { 250 isapnp_rdp = rdp; 251 old_rdp = rdp; 252 return 0; 253 } 254 rdp += RDP_STEP; 255 } 256 return -1; 257 } 258 259 /* Set read port address */ 260 static inline void isapnp_set_rdp(void) 261 { 262 isapnp_write_byte(0x00, isapnp_rdp >> 2); 263 udelay(100); 264 } 265 266 /* 267 * Perform an isolation. The port selection code now tries to avoid 268 * "dangerous to read" ports. 269 */ 270 static int __init isapnp_isolate_rdp_select(void) 271 { 272 isapnp_wait(); 273 isapnp_key(); 274 275 /* Control: reset CSN and conditionally everything else too */ 276 isapnp_write_byte(0x02, isapnp_reset ? 0x05 : 0x04); 277 mdelay(2); 278 279 isapnp_wait(); 280 isapnp_key(); 281 isapnp_wake(0x00); 282 283 if (isapnp_next_rdp() < 0) { 284 isapnp_wait(); 285 return -1; 286 } 287 288 isapnp_set_rdp(); 289 udelay(1000); 290 write_address(0x01); 291 udelay(1000); 292 return 0; 293 } 294 295 /* 296 * Isolate (assign uniqued CSN) to all ISA PnP devices. 297 */ 298 static int __init isapnp_isolate(void) 299 { 300 unsigned char checksum = 0x6a; 301 unsigned char chksum = 0x00; 302 unsigned char bit = 0x00; 303 int data; 304 int csn = 0; 305 int i; 306 int iteration = 1; 307 308 isapnp_rdp = 0x213; 309 if (isapnp_isolate_rdp_select() < 0) 310 return -1; 311 312 while (1) { 313 for (i = 1; i <= 64; i++) { 314 data = read_data() << 8; 315 udelay(250); 316 data = data | read_data(); 317 udelay(250); 318 if (data == 0x55aa) 319 bit = 0x01; 320 checksum = 321 ((((checksum ^ (checksum >> 1)) & 0x01) ^ bit) << 7) 322 | (checksum >> 1); 323 bit = 0x00; 324 } 325 for (i = 65; i <= 72; i++) { 326 data = read_data() << 8; 327 udelay(250); 328 data = data | read_data(); 329 udelay(250); 330 if (data == 0x55aa) 331 chksum |= (1 << (i - 65)); 332 } 333 if (checksum != 0x00 && checksum == chksum) { 334 csn++; 335 336 isapnp_write_byte(0x06, csn); 337 udelay(250); 338 iteration++; 339 isapnp_wake(0x00); 340 isapnp_set_rdp(); 341 udelay(1000); 342 write_address(0x01); 343 udelay(1000); 344 goto __next; 345 } 346 if (iteration == 1) { 347 isapnp_rdp += RDP_STEP; 348 if (isapnp_isolate_rdp_select() < 0) 349 return -1; 350 } else if (iteration > 1) { 351 break; 352 } 353 __next: 354 if (csn == 255) 355 break; 356 checksum = 0x6a; 357 chksum = 0x00; 358 bit = 0x00; 359 } 360 isapnp_wait(); 361 isapnp_csn_count = csn; 362 return csn; 363 } 364 365 /* 366 * Read one tag from stream. 367 */ 368 static int __init isapnp_read_tag(unsigned char *type, unsigned short *size) 369 { 370 unsigned char tag, tmp[2]; 371 372 isapnp_peek(&tag, 1); 373 if (tag == 0) /* invalid tag */ 374 return -1; 375 if (tag & 0x80) { /* large item */ 376 *type = tag; 377 isapnp_peek(tmp, 2); 378 *size = (tmp[1] << 8) | tmp[0]; 379 } else { 380 *type = (tag >> 3) & 0x0f; 381 *size = tag & 0x07; 382 } 383 #if 0 384 printk(KERN_DEBUG "tag = 0x%x, type = 0x%x, size = %i\n", tag, *type, 385 *size); 386 #endif 387 if (*type == 0xff && *size == 0xffff) /* probably invalid data */ 388 return -1; 389 return 0; 390 } 391 392 /* 393 * Skip specified number of bytes from stream. 394 */ 395 static void __init isapnp_skip_bytes(int count) 396 { 397 isapnp_peek(NULL, count); 398 } 399 400 /* 401 * Parse logical device tag. 402 */ 403 static struct pnp_dev *__init isapnp_parse_device(struct pnp_card *card, 404 int size, int number) 405 { 406 unsigned char tmp[6]; 407 struct pnp_dev *dev; 408 u32 eisa_id; 409 char id[8]; 410 411 isapnp_peek(tmp, size); 412 eisa_id = tmp[0] | tmp[1] << 8 | tmp[2] << 16 | tmp[3] << 24; 413 pnp_eisa_id_to_string(eisa_id, id); 414 415 dev = pnp_alloc_dev(&isapnp_protocol, number, id); 416 if (!dev) 417 return NULL; 418 419 dev->regs = tmp[4]; 420 dev->card = card; 421 if (size > 5) 422 dev->regs |= tmp[5] << 8; 423 dev->capabilities |= PNP_CONFIGURABLE; 424 dev->capabilities |= PNP_READ; 425 dev->capabilities |= PNP_WRITE; 426 dev->capabilities |= PNP_DISABLE; 427 pnp_init_resource_table(&dev->res); 428 return dev; 429 } 430 431 /* 432 * Add IRQ resource to resources list. 433 */ 434 static void __init isapnp_parse_irq_resource(struct pnp_dev *dev, 435 struct pnp_option *option, 436 int size) 437 { 438 unsigned char tmp[3]; 439 struct pnp_irq *irq; 440 unsigned long bits; 441 442 isapnp_peek(tmp, size); 443 irq = kzalloc(sizeof(struct pnp_irq), GFP_KERNEL); 444 if (!irq) 445 return; 446 bits = (tmp[1] << 8) | tmp[0]; 447 bitmap_copy(irq->map, &bits, 16); 448 if (size > 2) 449 irq->flags = tmp[2]; 450 else 451 irq->flags = IORESOURCE_IRQ_HIGHEDGE; 452 pnp_register_irq_resource(dev, option, irq); 453 } 454 455 /* 456 * Add DMA resource to resources list. 457 */ 458 static void __init isapnp_parse_dma_resource(struct pnp_dev *dev, 459 struct pnp_option *option, 460 int size) 461 { 462 unsigned char tmp[2]; 463 struct pnp_dma *dma; 464 465 isapnp_peek(tmp, size); 466 dma = kzalloc(sizeof(struct pnp_dma), GFP_KERNEL); 467 if (!dma) 468 return; 469 dma->map = tmp[0]; 470 dma->flags = tmp[1]; 471 pnp_register_dma_resource(dev, option, dma); 472 } 473 474 /* 475 * Add port resource to resources list. 476 */ 477 static void __init isapnp_parse_port_resource(struct pnp_dev *dev, 478 struct pnp_option *option, 479 int size) 480 { 481 unsigned char tmp[7]; 482 struct pnp_port *port; 483 484 isapnp_peek(tmp, size); 485 port = kzalloc(sizeof(struct pnp_port), GFP_KERNEL); 486 if (!port) 487 return; 488 port->min = (tmp[2] << 8) | tmp[1]; 489 port->max = (tmp[4] << 8) | tmp[3]; 490 port->align = tmp[5]; 491 port->size = tmp[6]; 492 port->flags = tmp[0] ? PNP_PORT_FLAG_16BITADDR : 0; 493 pnp_register_port_resource(dev, option, port); 494 } 495 496 /* 497 * Add fixed port resource to resources list. 498 */ 499 static void __init isapnp_parse_fixed_port_resource(struct pnp_dev *dev, 500 struct pnp_option *option, 501 int size) 502 { 503 unsigned char tmp[3]; 504 struct pnp_port *port; 505 506 isapnp_peek(tmp, size); 507 port = kzalloc(sizeof(struct pnp_port), GFP_KERNEL); 508 if (!port) 509 return; 510 port->min = port->max = (tmp[1] << 8) | tmp[0]; 511 port->size = tmp[2]; 512 port->align = 0; 513 port->flags = PNP_PORT_FLAG_FIXED; 514 pnp_register_port_resource(dev, option, port); 515 } 516 517 /* 518 * Add memory resource to resources list. 519 */ 520 static void __init isapnp_parse_mem_resource(struct pnp_dev *dev, 521 struct pnp_option *option, 522 int size) 523 { 524 unsigned char tmp[9]; 525 struct pnp_mem *mem; 526 527 isapnp_peek(tmp, size); 528 mem = kzalloc(sizeof(struct pnp_mem), GFP_KERNEL); 529 if (!mem) 530 return; 531 mem->min = ((tmp[2] << 8) | tmp[1]) << 8; 532 mem->max = ((tmp[4] << 8) | tmp[3]) << 8; 533 mem->align = (tmp[6] << 8) | tmp[5]; 534 mem->size = ((tmp[8] << 8) | tmp[7]) << 8; 535 mem->flags = tmp[0]; 536 pnp_register_mem_resource(dev, option, mem); 537 } 538 539 /* 540 * Add 32-bit memory resource to resources list. 541 */ 542 static void __init isapnp_parse_mem32_resource(struct pnp_dev *dev, 543 struct pnp_option *option, 544 int size) 545 { 546 unsigned char tmp[17]; 547 struct pnp_mem *mem; 548 549 isapnp_peek(tmp, size); 550 mem = kzalloc(sizeof(struct pnp_mem), GFP_KERNEL); 551 if (!mem) 552 return; 553 mem->min = (tmp[4] << 24) | (tmp[3] << 16) | (tmp[2] << 8) | tmp[1]; 554 mem->max = (tmp[8] << 24) | (tmp[7] << 16) | (tmp[6] << 8) | tmp[5]; 555 mem->align = 556 (tmp[12] << 24) | (tmp[11] << 16) | (tmp[10] << 8) | tmp[9]; 557 mem->size = 558 (tmp[16] << 24) | (tmp[15] << 16) | (tmp[14] << 8) | tmp[13]; 559 mem->flags = tmp[0]; 560 pnp_register_mem_resource(dev, option, mem); 561 } 562 563 /* 564 * Add 32-bit fixed memory resource to resources list. 565 */ 566 static void __init isapnp_parse_fixed_mem32_resource(struct pnp_dev *dev, 567 struct pnp_option *option, 568 int size) 569 { 570 unsigned char tmp[9]; 571 struct pnp_mem *mem; 572 573 isapnp_peek(tmp, size); 574 mem = kzalloc(sizeof(struct pnp_mem), GFP_KERNEL); 575 if (!mem) 576 return; 577 mem->min = mem->max = 578 (tmp[4] << 24) | (tmp[3] << 16) | (tmp[2] << 8) | tmp[1]; 579 mem->size = (tmp[8] << 24) | (tmp[7] << 16) | (tmp[6] << 8) | tmp[5]; 580 mem->align = 0; 581 mem->flags = tmp[0]; 582 pnp_register_mem_resource(dev, option, mem); 583 } 584 585 /* 586 * Parse card name for ISA PnP device. 587 */ 588 static void __init 589 isapnp_parse_name(char *name, unsigned int name_max, unsigned short *size) 590 { 591 if (name[0] == '\0') { 592 unsigned short size1 = 593 *size >= name_max ? (name_max - 1) : *size; 594 isapnp_peek(name, size1); 595 name[size1] = '\0'; 596 *size -= size1; 597 598 /* clean whitespace from end of string */ 599 while (size1 > 0 && name[--size1] == ' ') 600 name[size1] = '\0'; 601 } 602 } 603 604 /* 605 * Parse resource map for logical device. 606 */ 607 static int __init isapnp_create_device(struct pnp_card *card, 608 unsigned short size) 609 { 610 int number = 0, skip = 0, priority = 0, compat = 0; 611 unsigned char type, tmp[17]; 612 struct pnp_option *option; 613 struct pnp_dev *dev; 614 u32 eisa_id; 615 char id[8]; 616 617 if ((dev = isapnp_parse_device(card, size, number++)) == NULL) 618 return 1; 619 option = pnp_register_independent_option(dev); 620 if (!option) { 621 kfree(dev); 622 return 1; 623 } 624 pnp_add_card_device(card, dev); 625 626 while (1) { 627 if (isapnp_read_tag(&type, &size) < 0) 628 return 1; 629 if (skip && type != _STAG_LOGDEVID && type != _STAG_END) 630 goto __skip; 631 switch (type) { 632 case _STAG_LOGDEVID: 633 if (size >= 5 && size <= 6) { 634 if ((dev = 635 isapnp_parse_device(card, size, 636 number++)) == NULL) 637 return 1; 638 size = 0; 639 skip = 0; 640 option = pnp_register_independent_option(dev); 641 if (!option) { 642 kfree(dev); 643 return 1; 644 } 645 pnp_add_card_device(card, dev); 646 } else { 647 skip = 1; 648 } 649 priority = 0; 650 compat = 0; 651 break; 652 case _STAG_COMPATDEVID: 653 if (size == 4 && compat < DEVICE_COUNT_COMPATIBLE) { 654 isapnp_peek(tmp, 4); 655 eisa_id = tmp[0] | tmp[1] << 8 | 656 tmp[2] << 16 | tmp[3] << 24; 657 pnp_eisa_id_to_string(eisa_id, id); 658 pnp_add_id(dev, id); 659 compat++; 660 size = 0; 661 } 662 break; 663 case _STAG_IRQ: 664 if (size < 2 || size > 3) 665 goto __skip; 666 isapnp_parse_irq_resource(dev, option, size); 667 size = 0; 668 break; 669 case _STAG_DMA: 670 if (size != 2) 671 goto __skip; 672 isapnp_parse_dma_resource(dev, option, size); 673 size = 0; 674 break; 675 case _STAG_STARTDEP: 676 if (size > 1) 677 goto __skip; 678 priority = 0x100 | PNP_RES_PRIORITY_ACCEPTABLE; 679 if (size > 0) { 680 isapnp_peek(tmp, size); 681 priority = 0x100 | tmp[0]; 682 size = 0; 683 } 684 option = pnp_register_dependent_option(dev, priority); 685 if (!option) 686 return 1; 687 break; 688 case _STAG_ENDDEP: 689 if (size != 0) 690 goto __skip; 691 priority = 0; 692 dev_dbg(&dev->dev, "end dependent options\n"); 693 break; 694 case _STAG_IOPORT: 695 if (size != 7) 696 goto __skip; 697 isapnp_parse_port_resource(dev, option, size); 698 size = 0; 699 break; 700 case _STAG_FIXEDIO: 701 if (size != 3) 702 goto __skip; 703 isapnp_parse_fixed_port_resource(dev, option, size); 704 size = 0; 705 break; 706 case _STAG_VENDOR: 707 break; 708 case _LTAG_MEMRANGE: 709 if (size != 9) 710 goto __skip; 711 isapnp_parse_mem_resource(dev, option, size); 712 size = 0; 713 break; 714 case _LTAG_ANSISTR: 715 isapnp_parse_name(dev->name, sizeof(dev->name), &size); 716 break; 717 case _LTAG_UNICODESTR: 718 /* silently ignore */ 719 /* who use unicode for hardware identification? */ 720 break; 721 case _LTAG_VENDOR: 722 break; 723 case _LTAG_MEM32RANGE: 724 if (size != 17) 725 goto __skip; 726 isapnp_parse_mem32_resource(dev, option, size); 727 size = 0; 728 break; 729 case _LTAG_FIXEDMEM32RANGE: 730 if (size != 9) 731 goto __skip; 732 isapnp_parse_fixed_mem32_resource(dev, option, size); 733 size = 0; 734 break; 735 case _STAG_END: 736 if (size > 0) 737 isapnp_skip_bytes(size); 738 return 1; 739 default: 740 printk(KERN_ERR 741 "isapnp: unexpected or unknown tag type 0x%x for logical device %i (device %i), ignored\n", 742 type, dev->number, card->number); 743 } 744 __skip: 745 if (size > 0) 746 isapnp_skip_bytes(size); 747 } 748 return 0; 749 } 750 751 /* 752 * Parse resource map for ISA PnP card. 753 */ 754 static void __init isapnp_parse_resource_map(struct pnp_card *card) 755 { 756 unsigned char type, tmp[17]; 757 unsigned short size; 758 759 while (1) { 760 if (isapnp_read_tag(&type, &size) < 0) 761 return; 762 switch (type) { 763 case _STAG_PNPVERNO: 764 if (size != 2) 765 goto __skip; 766 isapnp_peek(tmp, 2); 767 card->pnpver = tmp[0]; 768 card->productver = tmp[1]; 769 size = 0; 770 break; 771 case _STAG_LOGDEVID: 772 if (size >= 5 && size <= 6) { 773 if (isapnp_create_device(card, size) == 1) 774 return; 775 size = 0; 776 } 777 break; 778 case _STAG_VENDOR: 779 break; 780 case _LTAG_ANSISTR: 781 isapnp_parse_name(card->name, sizeof(card->name), 782 &size); 783 break; 784 case _LTAG_UNICODESTR: 785 /* silently ignore */ 786 /* who use unicode for hardware identification? */ 787 break; 788 case _LTAG_VENDOR: 789 break; 790 case _STAG_END: 791 if (size > 0) 792 isapnp_skip_bytes(size); 793 return; 794 default: 795 printk(KERN_ERR 796 "isapnp: unexpected or unknown tag type 0x%x for device %i, ignored\n", 797 type, card->number); 798 } 799 __skip: 800 if (size > 0) 801 isapnp_skip_bytes(size); 802 } 803 } 804 805 /* 806 * Compute ISA PnP checksum for first eight bytes. 807 */ 808 static unsigned char __init isapnp_checksum(unsigned char *data) 809 { 810 int i, j; 811 unsigned char checksum = 0x6a, bit, b; 812 813 for (i = 0; i < 8; i++) { 814 b = data[i]; 815 for (j = 0; j < 8; j++) { 816 bit = 0; 817 if (b & (1 << j)) 818 bit = 1; 819 checksum = 820 ((((checksum ^ (checksum >> 1)) & 0x01) ^ bit) << 7) 821 | (checksum >> 1); 822 } 823 } 824 return checksum; 825 } 826 827 /* 828 * Build device list for all present ISA PnP devices. 829 */ 830 static int __init isapnp_build_device_list(void) 831 { 832 int csn; 833 unsigned char header[9], checksum; 834 struct pnp_card *card; 835 u32 eisa_id; 836 char id[8]; 837 838 isapnp_wait(); 839 isapnp_key(); 840 for (csn = 1; csn <= isapnp_csn_count; csn++) { 841 isapnp_wake(csn); 842 isapnp_peek(header, 9); 843 checksum = isapnp_checksum(header); 844 #if 0 845 printk(KERN_DEBUG 846 "vendor: %02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x\n", 847 header[0], header[1], header[2], header[3], header[4], 848 header[5], header[6], header[7], header[8]); 849 printk(KERN_DEBUG "checksum = 0x%x\n", checksum); 850 #endif 851 eisa_id = header[0] | header[1] << 8 | 852 header[2] << 16 | header[3] << 24; 853 pnp_eisa_id_to_string(eisa_id, id); 854 card = pnp_alloc_card(&isapnp_protocol, csn, id); 855 if (!card) 856 continue; 857 858 INIT_LIST_HEAD(&card->devices); 859 card->serial = 860 (header[7] << 24) | (header[6] << 16) | (header[5] << 8) | 861 header[4]; 862 isapnp_checksum_value = 0x00; 863 isapnp_parse_resource_map(card); 864 if (isapnp_checksum_value != 0x00) 865 printk(KERN_ERR 866 "isapnp: checksum for device %i is not valid (0x%x)\n", 867 csn, isapnp_checksum_value); 868 card->checksum = isapnp_checksum_value; 869 870 pnp_add_card(card); 871 } 872 isapnp_wait(); 873 return 0; 874 } 875 876 /* 877 * Basic configuration routines. 878 */ 879 880 int isapnp_present(void) 881 { 882 struct pnp_card *card; 883 884 pnp_for_each_card(card) { 885 if (card->protocol == &isapnp_protocol) 886 return 1; 887 } 888 return 0; 889 } 890 891 int isapnp_cfg_begin(int csn, int logdev) 892 { 893 if (csn < 1 || csn > isapnp_csn_count || logdev > 10) 894 return -EINVAL; 895 mutex_lock(&isapnp_cfg_mutex); 896 isapnp_wait(); 897 isapnp_key(); 898 isapnp_wake(csn); 899 #if 0 900 /* to avoid malfunction when the isapnptools package is used */ 901 /* we must set RDP to our value again */ 902 /* it is possible to set RDP only in the isolation phase */ 903 /* Jens Thoms Toerring <Jens.Toerring@physik.fu-berlin.de> */ 904 isapnp_write_byte(0x02, 0x04); /* clear CSN of card */ 905 mdelay(2); /* is this necessary? */ 906 isapnp_wake(csn); /* bring card into sleep state */ 907 isapnp_wake(0); /* bring card into isolation state */ 908 isapnp_set_rdp(); /* reset the RDP port */ 909 udelay(1000); /* delay 1000us */ 910 isapnp_write_byte(0x06, csn); /* reset CSN to previous value */ 911 udelay(250); /* is this necessary? */ 912 #endif 913 if (logdev >= 0) 914 isapnp_device(logdev); 915 return 0; 916 } 917 918 int isapnp_cfg_end(void) 919 { 920 isapnp_wait(); 921 mutex_unlock(&isapnp_cfg_mutex); 922 return 0; 923 } 924 925 /* 926 * Initialization. 927 */ 928 929 EXPORT_SYMBOL(isapnp_protocol); 930 EXPORT_SYMBOL(isapnp_present); 931 EXPORT_SYMBOL(isapnp_cfg_begin); 932 EXPORT_SYMBOL(isapnp_cfg_end); 933 EXPORT_SYMBOL(isapnp_write_byte); 934 935 static int isapnp_read_resources(struct pnp_dev *dev) 936 { 937 struct pnp_resource_table *res = &dev->res; 938 int tmp, ret; 939 940 dev->active = isapnp_read_byte(ISAPNP_CFG_ACTIVATE); 941 if (dev->active) { 942 for (tmp = 0; tmp < ISAPNP_MAX_PORT; tmp++) { 943 ret = isapnp_read_word(ISAPNP_CFG_PORT + (tmp << 1)); 944 if (!ret) 945 continue; 946 res->port_resource[tmp].start = ret; 947 res->port_resource[tmp].flags = IORESOURCE_IO; 948 } 949 for (tmp = 0; tmp < ISAPNP_MAX_MEM; tmp++) { 950 ret = 951 isapnp_read_word(ISAPNP_CFG_MEM + (tmp << 3)) << 8; 952 if (!ret) 953 continue; 954 res->mem_resource[tmp].start = ret; 955 res->mem_resource[tmp].flags = IORESOURCE_MEM; 956 } 957 for (tmp = 0; tmp < ISAPNP_MAX_IRQ; tmp++) { 958 ret = 959 (isapnp_read_word(ISAPNP_CFG_IRQ + (tmp << 1)) >> 960 8); 961 if (!ret) 962 continue; 963 res->irq_resource[tmp].start = 964 res->irq_resource[tmp].end = ret; 965 res->irq_resource[tmp].flags = IORESOURCE_IRQ; 966 } 967 for (tmp = 0; tmp < ISAPNP_MAX_DMA; tmp++) { 968 ret = isapnp_read_byte(ISAPNP_CFG_DMA + tmp); 969 if (ret == 4) 970 continue; 971 res->dma_resource[tmp].start = 972 res->dma_resource[tmp].end = ret; 973 res->dma_resource[tmp].flags = IORESOURCE_DMA; 974 } 975 } 976 return 0; 977 } 978 979 static int isapnp_get_resources(struct pnp_dev *dev) 980 { 981 int ret; 982 983 pnp_init_resource_table(&dev->res); 984 isapnp_cfg_begin(dev->card->number, dev->number); 985 ret = isapnp_read_resources(dev); 986 isapnp_cfg_end(); 987 return ret; 988 } 989 990 static int isapnp_set_resources(struct pnp_dev *dev) 991 { 992 struct pnp_resource_table *res = &dev->res; 993 int tmp; 994 995 isapnp_cfg_begin(dev->card->number, dev->number); 996 dev->active = 1; 997 for (tmp = 0; 998 tmp < ISAPNP_MAX_PORT 999 && (res->port_resource[tmp]. 1000 flags & (IORESOURCE_IO | IORESOURCE_UNSET)) == IORESOURCE_IO; 1001 tmp++) 1002 isapnp_write_word(ISAPNP_CFG_PORT + (tmp << 1), 1003 res->port_resource[tmp].start); 1004 for (tmp = 0; 1005 tmp < ISAPNP_MAX_IRQ 1006 && (res->irq_resource[tmp]. 1007 flags & (IORESOURCE_IRQ | IORESOURCE_UNSET)) == IORESOURCE_IRQ; 1008 tmp++) { 1009 int irq = res->irq_resource[tmp].start; 1010 if (irq == 2) 1011 irq = 9; 1012 isapnp_write_byte(ISAPNP_CFG_IRQ + (tmp << 1), irq); 1013 } 1014 for (tmp = 0; 1015 tmp < ISAPNP_MAX_DMA 1016 && (res->dma_resource[tmp]. 1017 flags & (IORESOURCE_DMA | IORESOURCE_UNSET)) == IORESOURCE_DMA; 1018 tmp++) 1019 isapnp_write_byte(ISAPNP_CFG_DMA + tmp, 1020 res->dma_resource[tmp].start); 1021 for (tmp = 0; 1022 tmp < ISAPNP_MAX_MEM 1023 && (res->mem_resource[tmp]. 1024 flags & (IORESOURCE_MEM | IORESOURCE_UNSET)) == IORESOURCE_MEM; 1025 tmp++) 1026 isapnp_write_word(ISAPNP_CFG_MEM + (tmp << 3), 1027 (res->mem_resource[tmp].start >> 8) & 0xffff); 1028 /* FIXME: We aren't handling 32bit mems properly here */ 1029 isapnp_activate(dev->number); 1030 isapnp_cfg_end(); 1031 return 0; 1032 } 1033 1034 static int isapnp_disable_resources(struct pnp_dev *dev) 1035 { 1036 if (!dev->active) 1037 return -EINVAL; 1038 isapnp_cfg_begin(dev->card->number, dev->number); 1039 isapnp_deactivate(dev->number); 1040 dev->active = 0; 1041 isapnp_cfg_end(); 1042 return 0; 1043 } 1044 1045 struct pnp_protocol isapnp_protocol = { 1046 .name = "ISA Plug and Play", 1047 .get = isapnp_get_resources, 1048 .set = isapnp_set_resources, 1049 .disable = isapnp_disable_resources, 1050 }; 1051 1052 static int __init isapnp_init(void) 1053 { 1054 int cards; 1055 struct pnp_card *card; 1056 struct pnp_dev *dev; 1057 1058 if (isapnp_disable) { 1059 printk(KERN_INFO "isapnp: ISA Plug & Play support disabled\n"); 1060 return 0; 1061 } 1062 #ifdef CONFIG_PPC_MERGE 1063 if (check_legacy_ioport(_PIDXR) || check_legacy_ioport(_PNPWRP)) 1064 return -EINVAL; 1065 #endif 1066 #ifdef ISAPNP_REGION_OK 1067 if (!request_region(_PIDXR, 1, "isapnp index")) { 1068 printk(KERN_ERR "isapnp: Index Register 0x%x already used\n", 1069 _PIDXR); 1070 return -EBUSY; 1071 } 1072 #endif 1073 if (!request_region(_PNPWRP, 1, "isapnp write")) { 1074 printk(KERN_ERR 1075 "isapnp: Write Data Register 0x%x already used\n", 1076 _PNPWRP); 1077 #ifdef ISAPNP_REGION_OK 1078 release_region(_PIDXR, 1); 1079 #endif 1080 return -EBUSY; 1081 } 1082 1083 if (pnp_register_protocol(&isapnp_protocol) < 0) 1084 return -EBUSY; 1085 1086 /* 1087 * Print a message. The existing ISAPnP code is hanging machines 1088 * so let the user know where. 1089 */ 1090 1091 printk(KERN_INFO "isapnp: Scanning for PnP cards...\n"); 1092 if (isapnp_rdp >= 0x203 && isapnp_rdp <= 0x3ff) { 1093 isapnp_rdp |= 3; 1094 if (!request_region(isapnp_rdp, 1, "isapnp read")) { 1095 printk(KERN_ERR 1096 "isapnp: Read Data Register 0x%x already used\n", 1097 isapnp_rdp); 1098 #ifdef ISAPNP_REGION_OK 1099 release_region(_PIDXR, 1); 1100 #endif 1101 release_region(_PNPWRP, 1); 1102 return -EBUSY; 1103 } 1104 isapnp_set_rdp(); 1105 } 1106 if (isapnp_rdp < 0x203 || isapnp_rdp > 0x3ff) { 1107 cards = isapnp_isolate(); 1108 if (cards < 0 || (isapnp_rdp < 0x203 || isapnp_rdp > 0x3ff)) { 1109 #ifdef ISAPNP_REGION_OK 1110 release_region(_PIDXR, 1); 1111 #endif 1112 release_region(_PNPWRP, 1); 1113 printk(KERN_INFO 1114 "isapnp: No Plug & Play device found\n"); 1115 return 0; 1116 } 1117 request_region(isapnp_rdp, 1, "isapnp read"); 1118 } 1119 isapnp_build_device_list(); 1120 cards = 0; 1121 1122 protocol_for_each_card(&isapnp_protocol, card) { 1123 cards++; 1124 if (isapnp_verbose) { 1125 printk(KERN_INFO "isapnp: Card '%s'\n", 1126 card->name[0] ? card->name : "Unknown"); 1127 if (isapnp_verbose < 2) 1128 continue; 1129 card_for_each_dev(card, dev) { 1130 printk(KERN_INFO "isapnp: Device '%s'\n", 1131 dev->name[0] ? dev->name : "Unknown"); 1132 } 1133 } 1134 } 1135 if (cards) 1136 printk(KERN_INFO 1137 "isapnp: %i Plug & Play card%s detected total\n", cards, 1138 cards > 1 ? "s" : ""); 1139 else 1140 printk(KERN_INFO "isapnp: No Plug & Play card found\n"); 1141 1142 isapnp_proc_init(); 1143 return 0; 1144 } 1145 1146 device_initcall(isapnp_init); 1147 1148 /* format is: noisapnp */ 1149 1150 static int __init isapnp_setup_disable(char *str) 1151 { 1152 isapnp_disable = 1; 1153 return 1; 1154 } 1155 1156 __setup("noisapnp", isapnp_setup_disable); 1157 1158 /* format is: isapnp=rdp,reset,skip_pci_scan,verbose */ 1159 1160 static int __init isapnp_setup_isapnp(char *str) 1161 { 1162 (void)((get_option(&str, &isapnp_rdp) == 2) && 1163 (get_option(&str, &isapnp_reset) == 2) && 1164 (get_option(&str, &isapnp_verbose) == 2)); 1165 return 1; 1166 } 1167 1168 __setup("isapnp=", isapnp_setup_isapnp); 1169