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