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