drivers/pnp/isapnp/core.c

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