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