]> err.no Git - linux-2.6/blob - drivers/pnp/isapnp/core.c
Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/ieee1394...
[linux-2.6] / drivers / pnp / isapnp / core.c
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->card = card;
420         dev->capabilities |= PNP_CONFIGURABLE;
421         dev->capabilities |= PNP_READ;
422         dev->capabilities |= PNP_WRITE;
423         dev->capabilities |= PNP_DISABLE;
424         pnp_init_resources(dev);
425         return dev;
426 }
427
428 /*
429  *  Add IRQ resource to resources list.
430  */
431 static void __init isapnp_parse_irq_resource(struct pnp_dev *dev,
432                                              struct pnp_option *option,
433                                              int size)
434 {
435         unsigned char tmp[3];
436         struct pnp_irq *irq;
437         unsigned long bits;
438
439         isapnp_peek(tmp, size);
440         irq = kzalloc(sizeof(struct pnp_irq), GFP_KERNEL);
441         if (!irq)
442                 return;
443         bits = (tmp[1] << 8) | tmp[0];
444         bitmap_copy(irq->map, &bits, 16);
445         if (size > 2)
446                 irq->flags = tmp[2];
447         else
448                 irq->flags = IORESOURCE_IRQ_HIGHEDGE;
449         pnp_register_irq_resource(dev, option, irq);
450 }
451
452 /*
453  *  Add DMA resource to resources list.
454  */
455 static void __init isapnp_parse_dma_resource(struct pnp_dev *dev,
456                                              struct pnp_option *option,
457                                              int size)
458 {
459         unsigned char tmp[2];
460         struct pnp_dma *dma;
461
462         isapnp_peek(tmp, size);
463         dma = kzalloc(sizeof(struct pnp_dma), GFP_KERNEL);
464         if (!dma)
465                 return;
466         dma->map = tmp[0];
467         dma->flags = tmp[1];
468         pnp_register_dma_resource(dev, option, dma);
469 }
470
471 /*
472  *  Add port resource to resources list.
473  */
474 static void __init isapnp_parse_port_resource(struct pnp_dev *dev,
475                                               struct pnp_option *option,
476                                               int size)
477 {
478         unsigned char tmp[7];
479         struct pnp_port *port;
480
481         isapnp_peek(tmp, size);
482         port = kzalloc(sizeof(struct pnp_port), GFP_KERNEL);
483         if (!port)
484                 return;
485         port->min = (tmp[2] << 8) | tmp[1];
486         port->max = (tmp[4] << 8) | tmp[3];
487         port->align = tmp[5];
488         port->size = tmp[6];
489         port->flags = tmp[0] ? PNP_PORT_FLAG_16BITADDR : 0;
490         pnp_register_port_resource(dev, option, port);
491 }
492
493 /*
494  *  Add fixed port resource to resources list.
495  */
496 static void __init isapnp_parse_fixed_port_resource(struct pnp_dev *dev,
497                                                     struct pnp_option *option,
498                                                     int size)
499 {
500         unsigned char tmp[3];
501         struct pnp_port *port;
502
503         isapnp_peek(tmp, size);
504         port = kzalloc(sizeof(struct pnp_port), GFP_KERNEL);
505         if (!port)
506                 return;
507         port->min = port->max = (tmp[1] << 8) | tmp[0];
508         port->size = tmp[2];
509         port->align = 0;
510         port->flags = PNP_PORT_FLAG_FIXED;
511         pnp_register_port_resource(dev, option, port);
512 }
513
514 /*
515  *  Add memory resource to resources list.
516  */
517 static void __init isapnp_parse_mem_resource(struct pnp_dev *dev,
518                                              struct pnp_option *option,
519                                              int size)
520 {
521         unsigned char tmp[9];
522         struct pnp_mem *mem;
523
524         isapnp_peek(tmp, size);
525         mem = kzalloc(sizeof(struct pnp_mem), GFP_KERNEL);
526         if (!mem)
527                 return;
528         mem->min = ((tmp[2] << 8) | tmp[1]) << 8;
529         mem->max = ((tmp[4] << 8) | tmp[3]) << 8;
530         mem->align = (tmp[6] << 8) | tmp[5];
531         mem->size = ((tmp[8] << 8) | tmp[7]) << 8;
532         mem->flags = tmp[0];
533         pnp_register_mem_resource(dev, option, mem);
534 }
535
536 /*
537  *  Add 32-bit memory resource to resources list.
538  */
539 static void __init isapnp_parse_mem32_resource(struct pnp_dev *dev,
540                                                struct pnp_option *option,
541                                                int size)
542 {
543         unsigned char tmp[17];
544         struct pnp_mem *mem;
545
546         isapnp_peek(tmp, size);
547         mem = kzalloc(sizeof(struct pnp_mem), GFP_KERNEL);
548         if (!mem)
549                 return;
550         mem->min = (tmp[4] << 24) | (tmp[3] << 16) | (tmp[2] << 8) | tmp[1];
551         mem->max = (tmp[8] << 24) | (tmp[7] << 16) | (tmp[6] << 8) | tmp[5];
552         mem->align =
553             (tmp[12] << 24) | (tmp[11] << 16) | (tmp[10] << 8) | tmp[9];
554         mem->size =
555             (tmp[16] << 24) | (tmp[15] << 16) | (tmp[14] << 8) | tmp[13];
556         mem->flags = tmp[0];
557         pnp_register_mem_resource(dev, option, mem);
558 }
559
560 /*
561  *  Add 32-bit fixed memory resource to resources list.
562  */
563 static void __init isapnp_parse_fixed_mem32_resource(struct pnp_dev *dev,
564                                                      struct pnp_option *option,
565                                                      int size)
566 {
567         unsigned char tmp[9];
568         struct pnp_mem *mem;
569
570         isapnp_peek(tmp, size);
571         mem = kzalloc(sizeof(struct pnp_mem), GFP_KERNEL);
572         if (!mem)
573                 return;
574         mem->min = mem->max =
575             (tmp[4] << 24) | (tmp[3] << 16) | (tmp[2] << 8) | tmp[1];
576         mem->size = (tmp[8] << 24) | (tmp[7] << 16) | (tmp[6] << 8) | tmp[5];
577         mem->align = 0;
578         mem->flags = tmp[0];
579         pnp_register_mem_resource(dev, option, mem);
580 }
581
582 /*
583  *  Parse card name for ISA PnP device.
584  */
585 static void __init
586 isapnp_parse_name(char *name, unsigned int name_max, unsigned short *size)
587 {
588         if (name[0] == '\0') {
589                 unsigned short size1 =
590                     *size >= name_max ? (name_max - 1) : *size;
591                 isapnp_peek(name, size1);
592                 name[size1] = '\0';
593                 *size -= size1;
594
595                 /* clean whitespace from end of string */
596                 while (size1 > 0 && name[--size1] == ' ')
597                         name[size1] = '\0';
598         }
599 }
600
601 /*
602  *  Parse resource map for logical device.
603  */
604 static int __init isapnp_create_device(struct pnp_card *card,
605                                        unsigned short size)
606 {
607         int number = 0, skip = 0, priority = 0, compat = 0;
608         unsigned char type, tmp[17];
609         struct pnp_option *option;
610         struct pnp_dev *dev;
611         u32 eisa_id;
612         char id[8];
613
614         if ((dev = isapnp_parse_device(card, size, number++)) == NULL)
615                 return 1;
616         option = pnp_register_independent_option(dev);
617         if (!option) {
618                 kfree(dev);
619                 return 1;
620         }
621         pnp_add_card_device(card, dev);
622
623         while (1) {
624                 if (isapnp_read_tag(&type, &size) < 0)
625                         return 1;
626                 if (skip && type != _STAG_LOGDEVID && type != _STAG_END)
627                         goto __skip;
628                 switch (type) {
629                 case _STAG_LOGDEVID:
630                         if (size >= 5 && size <= 6) {
631                                 if ((dev =
632                                      isapnp_parse_device(card, size,
633                                                          number++)) == NULL)
634                                         return 1;
635                                 size = 0;
636                                 skip = 0;
637                                 option = pnp_register_independent_option(dev);
638                                 if (!option) {
639                                         kfree(dev);
640                                         return 1;
641                                 }
642                                 pnp_add_card_device(card, dev);
643                         } else {
644                                 skip = 1;
645                         }
646                         priority = 0;
647                         compat = 0;
648                         break;
649                 case _STAG_COMPATDEVID:
650                         if (size == 4 && compat < DEVICE_COUNT_COMPATIBLE) {
651                                 isapnp_peek(tmp, 4);
652                                 eisa_id = tmp[0] | tmp[1] << 8 |
653                                           tmp[2] << 16 | tmp[3] << 24;
654                                 pnp_eisa_id_to_string(eisa_id, id);
655                                 pnp_add_id(dev, id);
656                                 compat++;
657                                 size = 0;
658                         }
659                         break;
660                 case _STAG_IRQ:
661                         if (size < 2 || size > 3)
662                                 goto __skip;
663                         isapnp_parse_irq_resource(dev, option, size);
664                         size = 0;
665                         break;
666                 case _STAG_DMA:
667                         if (size != 2)
668                                 goto __skip;
669                         isapnp_parse_dma_resource(dev, option, size);
670                         size = 0;
671                         break;
672                 case _STAG_STARTDEP:
673                         if (size > 1)
674                                 goto __skip;
675                         priority = 0x100 | PNP_RES_PRIORITY_ACCEPTABLE;
676                         if (size > 0) {
677                                 isapnp_peek(tmp, size);
678                                 priority = 0x100 | tmp[0];
679                                 size = 0;
680                         }
681                         option = pnp_register_dependent_option(dev, priority);
682                         if (!option)
683                                 return 1;
684                         break;
685                 case _STAG_ENDDEP:
686                         if (size != 0)
687                                 goto __skip;
688                         priority = 0;
689                         dev_dbg(&dev->dev, "end dependent options\n");
690                         break;
691                 case _STAG_IOPORT:
692                         if (size != 7)
693                                 goto __skip;
694                         isapnp_parse_port_resource(dev, option, size);
695                         size = 0;
696                         break;
697                 case _STAG_FIXEDIO:
698                         if (size != 3)
699                                 goto __skip;
700                         isapnp_parse_fixed_port_resource(dev, option, size);
701                         size = 0;
702                         break;
703                 case _STAG_VENDOR:
704                         break;
705                 case _LTAG_MEMRANGE:
706                         if (size != 9)
707                                 goto __skip;
708                         isapnp_parse_mem_resource(dev, option, size);
709                         size = 0;
710                         break;
711                 case _LTAG_ANSISTR:
712                         isapnp_parse_name(dev->name, sizeof(dev->name), &size);
713                         break;
714                 case _LTAG_UNICODESTR:
715                         /* silently ignore */
716                         /* who use unicode for hardware identification? */
717                         break;
718                 case _LTAG_VENDOR:
719                         break;
720                 case _LTAG_MEM32RANGE:
721                         if (size != 17)
722                                 goto __skip;
723                         isapnp_parse_mem32_resource(dev, option, size);
724                         size = 0;
725                         break;
726                 case _LTAG_FIXEDMEM32RANGE:
727                         if (size != 9)
728                                 goto __skip;
729                         isapnp_parse_fixed_mem32_resource(dev, option, size);
730                         size = 0;
731                         break;
732                 case _STAG_END:
733                         if (size > 0)
734                                 isapnp_skip_bytes(size);
735                         return 1;
736                 default:
737                         dev_err(&dev->dev, "unknown tag %#x (card %i), "
738                                 "ignored\n", type, card->number);
739                 }
740 __skip:
741                 if (size > 0)
742                         isapnp_skip_bytes(size);
743         }
744         return 0;
745 }
746
747 /*
748  *  Parse resource map for ISA PnP card.
749  */
750 static void __init isapnp_parse_resource_map(struct pnp_card *card)
751 {
752         unsigned char type, tmp[17];
753         unsigned short size;
754
755         while (1) {
756                 if (isapnp_read_tag(&type, &size) < 0)
757                         return;
758                 switch (type) {
759                 case _STAG_PNPVERNO:
760                         if (size != 2)
761                                 goto __skip;
762                         isapnp_peek(tmp, 2);
763                         card->pnpver = tmp[0];
764                         card->productver = tmp[1];
765                         size = 0;
766                         break;
767                 case _STAG_LOGDEVID:
768                         if (size >= 5 && size <= 6) {
769                                 if (isapnp_create_device(card, size) == 1)
770                                         return;
771                                 size = 0;
772                         }
773                         break;
774                 case _STAG_VENDOR:
775                         break;
776                 case _LTAG_ANSISTR:
777                         isapnp_parse_name(card->name, sizeof(card->name),
778                                           &size);
779                         break;
780                 case _LTAG_UNICODESTR:
781                         /* silently ignore */
782                         /* who use unicode for hardware identification? */
783                         break;
784                 case _LTAG_VENDOR:
785                         break;
786                 case _STAG_END:
787                         if (size > 0)
788                                 isapnp_skip_bytes(size);
789                         return;
790                 default:
791                         dev_err(&card->dev, "unknown tag %#x, ignored\n",
792                                type);
793                 }
794 __skip:
795                 if (size > 0)
796                         isapnp_skip_bytes(size);
797         }
798 }
799
800 /*
801  *  Compute ISA PnP checksum for first eight bytes.
802  */
803 static unsigned char __init isapnp_checksum(unsigned char *data)
804 {
805         int i, j;
806         unsigned char checksum = 0x6a, bit, b;
807
808         for (i = 0; i < 8; i++) {
809                 b = data[i];
810                 for (j = 0; j < 8; j++) {
811                         bit = 0;
812                         if (b & (1 << j))
813                                 bit = 1;
814                         checksum =
815                             ((((checksum ^ (checksum >> 1)) & 0x01) ^ bit) << 7)
816                             | (checksum >> 1);
817                 }
818         }
819         return checksum;
820 }
821
822 /*
823  *  Build device list for all present ISA PnP devices.
824  */
825 static int __init isapnp_build_device_list(void)
826 {
827         int csn;
828         unsigned char header[9], checksum;
829         struct pnp_card *card;
830         u32 eisa_id;
831         char id[8];
832
833         isapnp_wait();
834         isapnp_key();
835         for (csn = 1; csn <= isapnp_csn_count; csn++) {
836                 isapnp_wake(csn);
837                 isapnp_peek(header, 9);
838                 checksum = isapnp_checksum(header);
839                 eisa_id = header[0] | header[1] << 8 |
840                           header[2] << 16 | header[3] << 24;
841                 pnp_eisa_id_to_string(eisa_id, id);
842                 card = pnp_alloc_card(&isapnp_protocol, csn, id);
843                 if (!card)
844                         continue;
845
846 #if 0
847                 dev_info(&card->dev,
848                        "vendor: %02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x\n",
849                        header[0], header[1], header[2], header[3], header[4],
850                        header[5], header[6], header[7], header[8]);
851                 dev_info(&card->dev, "checksum = %#x\n", checksum);
852 #endif
853                 INIT_LIST_HEAD(&card->devices);
854                 card->serial =
855                     (header[7] << 24) | (header[6] << 16) | (header[5] << 8) |
856                     header[4];
857                 isapnp_checksum_value = 0x00;
858                 isapnp_parse_resource_map(card);
859                 if (isapnp_checksum_value != 0x00)
860                         dev_err(&card->dev, "invalid checksum %#x\n",
861                                 isapnp_checksum_value);
862                 card->checksum = isapnp_checksum_value;
863
864                 pnp_add_card(card);
865         }
866         isapnp_wait();
867         return 0;
868 }
869
870 /*
871  *  Basic configuration routines.
872  */
873
874 int isapnp_present(void)
875 {
876         struct pnp_card *card;
877
878         pnp_for_each_card(card) {
879                 if (card->protocol == &isapnp_protocol)
880                         return 1;
881         }
882         return 0;
883 }
884
885 int isapnp_cfg_begin(int csn, int logdev)
886 {
887         if (csn < 1 || csn > isapnp_csn_count || logdev > 10)
888                 return -EINVAL;
889         mutex_lock(&isapnp_cfg_mutex);
890         isapnp_wait();
891         isapnp_key();
892         isapnp_wake(csn);
893 #if 0
894         /* to avoid malfunction when the isapnptools package is used */
895         /* we must set RDP to our value again */
896         /* it is possible to set RDP only in the isolation phase */
897         /*   Jens Thoms Toerring <Jens.Toerring@physik.fu-berlin.de> */
898         isapnp_write_byte(0x02, 0x04);  /* clear CSN of card */
899         mdelay(2);              /* is this necessary? */
900         isapnp_wake(csn);       /* bring card into sleep state */
901         isapnp_wake(0);         /* bring card into isolation state */
902         isapnp_set_rdp();       /* reset the RDP port */
903         udelay(1000);           /* delay 1000us */
904         isapnp_write_byte(0x06, csn);   /* reset CSN to previous value */
905         udelay(250);            /* is this necessary? */
906 #endif
907         if (logdev >= 0)
908                 isapnp_device(logdev);
909         return 0;
910 }
911
912 int isapnp_cfg_end(void)
913 {
914         isapnp_wait();
915         mutex_unlock(&isapnp_cfg_mutex);
916         return 0;
917 }
918
919 /*
920  *  Initialization.
921  */
922
923 EXPORT_SYMBOL(isapnp_protocol);
924 EXPORT_SYMBOL(isapnp_present);
925 EXPORT_SYMBOL(isapnp_cfg_begin);
926 EXPORT_SYMBOL(isapnp_cfg_end);
927 EXPORT_SYMBOL(isapnp_write_byte);
928
929 static int isapnp_get_resources(struct pnp_dev *dev)
930 {
931         struct pnp_resource *pnp_res;
932         int i, ret;
933
934         dev_dbg(&dev->dev, "get resources\n");
935         pnp_init_resources(dev);
936         isapnp_cfg_begin(dev->card->number, dev->number);
937         dev->active = isapnp_read_byte(ISAPNP_CFG_ACTIVATE);
938         if (!dev->active)
939                 goto __end;
940
941         for (i = 0; i < ISAPNP_MAX_PORT; i++) {
942                 ret = isapnp_read_word(ISAPNP_CFG_PORT + (i << 1));
943                 if (ret) {
944                         pnp_res = pnp_add_io_resource(dev, ret, ret, 0);
945                         if (pnp_res)
946                                 pnp_res->index = i;
947                 }
948         }
949         for (i = 0; i < ISAPNP_MAX_MEM; i++) {
950                 ret = isapnp_read_word(ISAPNP_CFG_MEM + (i << 3)) << 8;
951                 if (ret) {
952                         pnp_res = pnp_add_mem_resource(dev, ret, ret, 0);
953                         if (pnp_res)
954                                 pnp_res->index = i;
955                 }
956         }
957         for (i = 0; i < ISAPNP_MAX_IRQ; i++) {
958                 ret = isapnp_read_word(ISAPNP_CFG_IRQ + (i << 1)) >> 8;
959                 if (ret) {
960                         pnp_res = pnp_add_irq_resource(dev, ret, 0);
961                         if (pnp_res)
962                                 pnp_res->index = i;
963                 }
964         }
965         for (i = 0; i < ISAPNP_MAX_DMA; i++) {
966                 ret = isapnp_read_byte(ISAPNP_CFG_DMA + i);
967                 if (ret != 4) {
968                         pnp_res = pnp_add_dma_resource(dev, ret, 0);
969                         if  (pnp_res)
970                                 pnp_res->index = i;
971                 }
972         }
973
974 __end:
975         isapnp_cfg_end();
976         return 0;
977 }
978
979 static int isapnp_set_resources(struct pnp_dev *dev)
980 {
981         struct pnp_resource *pnp_res;
982         struct resource *res;
983         int tmp, index;
984
985         dev_dbg(&dev->dev, "set resources\n");
986         isapnp_cfg_begin(dev->card->number, dev->number);
987         dev->active = 1;
988         for (tmp = 0; tmp < ISAPNP_MAX_PORT; tmp++) {
989                 pnp_res = pnp_get_pnp_resource(dev, IORESOURCE_IO, tmp);
990                 if (!pnp_res)
991                         continue;
992                 res = &pnp_res->res;
993                 if (pnp_resource_valid(res)) {
994                         index = pnp_res->index;
995                         dev_dbg(&dev->dev, "  set io  %d to %#llx\n",
996                                 index, (unsigned long long) res->start);
997                         isapnp_write_word(ISAPNP_CFG_PORT + (index << 1),
998                                           res->start);
999                 }
1000         }
1001         for (tmp = 0; tmp < ISAPNP_MAX_IRQ; tmp++) {
1002                 pnp_res = pnp_get_pnp_resource(dev, IORESOURCE_IRQ, tmp);
1003                 if (!pnp_res)
1004                         continue;
1005                 res = &pnp_res->res;
1006                 if (pnp_resource_valid(res)) {
1007                         int irq = res->start;
1008                         if (irq == 2)
1009                                 irq = 9;
1010                         index = pnp_res->index;
1011                         dev_dbg(&dev->dev, "  set irq %d to %d\n", index, irq);
1012                         isapnp_write_byte(ISAPNP_CFG_IRQ + (index << 1), irq);
1013                 }
1014         }
1015         for (tmp = 0; tmp < ISAPNP_MAX_DMA; tmp++) {
1016                 pnp_res = pnp_get_pnp_resource(dev, IORESOURCE_DMA, tmp);
1017                 if (!pnp_res)
1018                         continue;
1019                 res = &pnp_res->res;
1020                 if (pnp_resource_valid(res)) {
1021                         index = pnp_res->index;
1022                         dev_dbg(&dev->dev, "  set dma %d to %lld\n",
1023                                 index, (unsigned long long) res->start);
1024                         isapnp_write_byte(ISAPNP_CFG_DMA + index, res->start);
1025                 }
1026         }
1027         for (tmp = 0; tmp < ISAPNP_MAX_MEM; tmp++) {
1028                 pnp_res = pnp_get_pnp_resource(dev, IORESOURCE_MEM, tmp);
1029                 if (!pnp_res)
1030                         continue;
1031                 res = &pnp_res->res;
1032                 if (pnp_resource_valid(res)) {
1033                         index = pnp_res->index;
1034                         dev_dbg(&dev->dev, "  set mem %d to %#llx\n",
1035                                 index, (unsigned long long) res->start);
1036                         isapnp_write_word(ISAPNP_CFG_MEM + (index << 3),
1037                                           (res->start >> 8) & 0xffff);
1038                 }
1039         }
1040         /* FIXME: We aren't handling 32bit mems properly here */
1041         isapnp_activate(dev->number);
1042         isapnp_cfg_end();
1043         return 0;
1044 }
1045
1046 static int isapnp_disable_resources(struct pnp_dev *dev)
1047 {
1048         if (!dev->active)
1049                 return -EINVAL;
1050         isapnp_cfg_begin(dev->card->number, dev->number);
1051         isapnp_deactivate(dev->number);
1052         dev->active = 0;
1053         isapnp_cfg_end();
1054         return 0;
1055 }
1056
1057 struct pnp_protocol isapnp_protocol = {
1058         .name = "ISA Plug and Play",
1059         .get = isapnp_get_resources,
1060         .set = isapnp_set_resources,
1061         .disable = isapnp_disable_resources,
1062 };
1063
1064 static int __init isapnp_init(void)
1065 {
1066         int cards;
1067         struct pnp_card *card;
1068         struct pnp_dev *dev;
1069
1070         if (isapnp_disable) {
1071                 printk(KERN_INFO "isapnp: ISA Plug & Play support disabled\n");
1072                 return 0;
1073         }
1074 #ifdef CONFIG_PPC_MERGE
1075         if (check_legacy_ioport(_PIDXR) || check_legacy_ioport(_PNPWRP))
1076                 return -EINVAL;
1077 #endif
1078 #ifdef ISAPNP_REGION_OK
1079         if (!request_region(_PIDXR, 1, "isapnp index")) {
1080                 printk(KERN_ERR "isapnp: Index Register 0x%x already used\n",
1081                        _PIDXR);
1082                 return -EBUSY;
1083         }
1084 #endif
1085         if (!request_region(_PNPWRP, 1, "isapnp write")) {
1086                 printk(KERN_ERR
1087                        "isapnp: Write Data Register 0x%x already used\n",
1088                        _PNPWRP);
1089 #ifdef ISAPNP_REGION_OK
1090                 release_region(_PIDXR, 1);
1091 #endif
1092                 return -EBUSY;
1093         }
1094
1095         if (pnp_register_protocol(&isapnp_protocol) < 0)
1096                 return -EBUSY;
1097
1098         /*
1099          *      Print a message. The existing ISAPnP code is hanging machines
1100          *      so let the user know where.
1101          */
1102
1103         printk(KERN_INFO "isapnp: Scanning for PnP cards...\n");
1104         if (isapnp_rdp >= 0x203 && isapnp_rdp <= 0x3ff) {
1105                 isapnp_rdp |= 3;
1106                 if (!request_region(isapnp_rdp, 1, "isapnp read")) {
1107                         printk(KERN_ERR
1108                                "isapnp: Read Data Register 0x%x already used\n",
1109                                isapnp_rdp);
1110 #ifdef ISAPNP_REGION_OK
1111                         release_region(_PIDXR, 1);
1112 #endif
1113                         release_region(_PNPWRP, 1);
1114                         return -EBUSY;
1115                 }
1116                 isapnp_set_rdp();
1117         }
1118         if (isapnp_rdp < 0x203 || isapnp_rdp > 0x3ff) {
1119                 cards = isapnp_isolate();
1120                 if (cards < 0 || (isapnp_rdp < 0x203 || isapnp_rdp > 0x3ff)) {
1121 #ifdef ISAPNP_REGION_OK
1122                         release_region(_PIDXR, 1);
1123 #endif
1124                         release_region(_PNPWRP, 1);
1125                         printk(KERN_INFO
1126                                "isapnp: No Plug & Play device found\n");
1127                         return 0;
1128                 }
1129                 request_region(isapnp_rdp, 1, "isapnp read");
1130         }
1131         isapnp_build_device_list();
1132         cards = 0;
1133
1134         protocol_for_each_card(&isapnp_protocol, card) {
1135                 cards++;
1136                 if (isapnp_verbose) {
1137                         dev_info(&card->dev, "card '%s'\n",
1138                                card->name[0] ? card->name : "unknown");
1139                         if (isapnp_verbose < 2)
1140                                 continue;
1141                         card_for_each_dev(card, dev) {
1142                                 dev_info(&card->dev, "device '%s'\n",
1143                                        dev->name[0] ? dev->name : "unknown");
1144                         }
1145                 }
1146         }
1147         if (cards)
1148                 printk(KERN_INFO
1149                        "isapnp: %i Plug & Play card%s detected total\n", cards,
1150                        cards > 1 ? "s" : "");
1151         else
1152                 printk(KERN_INFO "isapnp: No Plug & Play card found\n");
1153
1154         isapnp_proc_init();
1155         return 0;
1156 }
1157
1158 device_initcall(isapnp_init);
1159
1160 /* format is: noisapnp */
1161
1162 static int __init isapnp_setup_disable(char *str)
1163 {
1164         isapnp_disable = 1;
1165         return 1;
1166 }
1167
1168 __setup("noisapnp", isapnp_setup_disable);
1169
1170 /* format is: isapnp=rdp,reset,skip_pci_scan,verbose */
1171
1172 static int __init isapnp_setup_isapnp(char *str)
1173 {
1174         (void)((get_option(&str, &isapnp_rdp) == 2) &&
1175                (get_option(&str, &isapnp_reset) == 2) &&
1176                (get_option(&str, &isapnp_verbose) == 2));
1177         return 1;
1178 }
1179
1180 __setup("isapnp=", isapnp_setup_isapnp);