FreeBSD/Linux Kernel Cross Reference
sys/isa/isa_common.c
1 /*-
2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD AND MIT
3 *
4 * Copyright (c) 1999 Doug Rabson
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28 /*
29 * Modifications for Intel architecture by Garrett A. Wollman.
30 * Copyright 1998 Massachusetts Institute of Technology
31 *
32 * Permission to use, copy, modify, and distribute this software and
33 * its documentation for any purpose and without fee is hereby
34 * granted, provided that both the above copyright notice and this
35 * permission notice appear in all copies, that both the above
36 * copyright notice and this permission notice appear in all
37 * supporting documentation, and that the name of M.I.T. not be used
38 * in advertising or publicity pertaining to distribution of the
39 * software without specific, written prior permission. M.I.T. makes
40 * no representations about the suitability of this software for any
41 * purpose. It is provided "as is" without express or implied
42 * warranty.
43 *
44 * THIS SOFTWARE IS PROVIDED BY M.I.T. ``AS IS''. M.I.T. DISCLAIMS
45 * ALL EXPRESS OR IMPLIED WARRANTIES WITH REGARD TO THIS SOFTWARE,
46 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
47 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT
48 * SHALL M.I.T. BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
49 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
50 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
51 * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
52 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
53 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
54 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
55 * SUCH DAMAGE.
56 */
57
58 /*
59 * Parts of the ISA bus implementation common to all architectures.
60 */
61
62 #include <sys/cdefs.h>
63 __FBSDID("$FreeBSD$");
64
65 #include "opt_isa.h"
66
67 #include <sys/param.h>
68 #include <sys/systm.h>
69 #include <sys/kernel.h>
70 #include <sys/bus.h>
71 #include <sys/endian.h>
72 #include <sys/malloc.h>
73 #include <sys/module.h>
74 #include <machine/bus.h>
75 #include <sys/rman.h>
76 #include <sys/sysctl.h>
77
78 #include <machine/resource.h>
79
80 #include <isa/isavar.h>
81 #include <isa/isa_common.h>
82
83 static int isa_print_child(device_t bus, device_t dev);
84
85 static MALLOC_DEFINE(M_ISADEV, "isadev", "ISA device");
86
87 static int isa_running;
88
89 /*
90 * At 'probe' time, we add all the devices which we know about to the
91 * bus. The generic attach routine will probe and attach them if they
92 * are alive.
93 */
94 static int
95 isa_probe(device_t dev)
96 {
97 device_set_desc(dev, "ISA bus");
98 isa_init(dev); /* Allow machdep code to initialise */
99 return (0);
100 }
101
102 extern device_t isa_bus_device;
103
104 static int
105 isa_attach(device_t dev)
106 {
107 /*
108 * Arrange for isa_probe_children(dev) to be called later. XXX
109 */
110 isa_bus_device = dev;
111 return (0);
112 }
113
114 /*
115 * Find a working set of memory regions for a child using the ranges
116 * in *config and return the regions in *result. Returns non-zero if
117 * a set of ranges was found.
118 */
119 static int
120 isa_find_memory(device_t child, struct isa_config *config,
121 struct isa_config *result)
122 {
123 int success, i;
124 struct resource *res[ISA_NMEM];
125
126 /*
127 * First clear out any existing resource definitions.
128 */
129 for (i = 0; i < ISA_NMEM; i++) {
130 bus_delete_resource(child, SYS_RES_MEMORY, i);
131 res[i] = NULL;
132 }
133
134 success = 1;
135 result->ic_nmem = config->ic_nmem;
136 for (i = 0; i < config->ic_nmem; i++) {
137 uint32_t start, end, size, align;
138
139 size = config->ic_mem[i].ir_size;
140
141 /* the PnP device may have a null resource as filler */
142 if (size == 0) {
143 result->ic_mem[i].ir_start = 0;
144 result->ic_mem[i].ir_end = 0;
145 result->ic_mem[i].ir_size = 0;
146 result->ic_mem[i].ir_align = 0;
147 continue;
148 }
149
150 for (start = config->ic_mem[i].ir_start,
151 end = config->ic_mem[i].ir_end,
152 align = config->ic_mem[i].ir_align;
153 start + size - 1 <= end && start + size > start;
154 start += MAX(align, 1)) {
155 bus_set_resource(child, SYS_RES_MEMORY, i,
156 start, size);
157 res[i] = bus_alloc_resource_any(child,
158 SYS_RES_MEMORY, &i,
159 rman_make_alignment_flags(align) /* !RF_ACTIVE */);
160 if (res[i]) {
161 result->ic_mem[i].ir_start = start;
162 result->ic_mem[i].ir_end = start + size - 1;
163 result->ic_mem[i].ir_size = size;
164 result->ic_mem[i].ir_align = align;
165 break;
166 }
167 }
168
169 /*
170 * If we didn't find a place for memory range i, then
171 * give up now.
172 */
173 if (!res[i]) {
174 success = 0;
175 break;
176 }
177 }
178
179 for (i = 0; i < ISA_NMEM; i++) {
180 if (res[i])
181 bus_release_resource(child, SYS_RES_MEMORY,
182 i, res[i]);
183 }
184
185 return (success);
186 }
187
188 /*
189 * Find a working set of port regions for a child using the ranges
190 * in *config and return the regions in *result. Returns non-zero if
191 * a set of ranges was found.
192 */
193 static int
194 isa_find_port(device_t child, struct isa_config *config,
195 struct isa_config *result)
196 {
197 int success, i;
198 struct resource *res[ISA_NPORT];
199
200 /*
201 * First clear out any existing resource definitions.
202 */
203 for (i = 0; i < ISA_NPORT; i++) {
204 bus_delete_resource(child, SYS_RES_IOPORT, i);
205 res[i] = NULL;
206 }
207
208 success = 1;
209 result->ic_nport = config->ic_nport;
210 for (i = 0; i < config->ic_nport; i++) {
211 uint32_t start, end, size, align;
212
213 size = config->ic_port[i].ir_size;
214
215 /* the PnP device may have a null resource as filler */
216 if (size == 0) {
217 result->ic_port[i].ir_start = 0;
218 result->ic_port[i].ir_end = 0;
219 result->ic_port[i].ir_size = 0;
220 result->ic_port[i].ir_align = 0;
221 continue;
222 }
223
224 for (start = config->ic_port[i].ir_start,
225 end = config->ic_port[i].ir_end,
226 align = config->ic_port[i].ir_align;
227 start + size - 1 <= end;
228 start += align) {
229 bus_set_resource(child, SYS_RES_IOPORT, i,
230 start, size);
231 res[i] = bus_alloc_resource_any(child,
232 SYS_RES_IOPORT, &i,
233 rman_make_alignment_flags(align) /* !RF_ACTIVE */);
234 if (res[i]) {
235 result->ic_port[i].ir_start = start;
236 result->ic_port[i].ir_end = start + size - 1;
237 result->ic_port[i].ir_size = size;
238 result->ic_port[i].ir_align = align;
239 break;
240 }
241 }
242
243 /*
244 * If we didn't find a place for port range i, then
245 * give up now.
246 */
247 if (!res[i]) {
248 success = 0;
249 break;
250 }
251 }
252
253 for (i = 0; i < ISA_NPORT; i++) {
254 if (res[i])
255 bus_release_resource(child, SYS_RES_IOPORT,
256 i, res[i]);
257 }
258
259 return success;
260 }
261
262 /*
263 * Return the index of the first bit in the mask (or -1 if mask is empty.
264 */
265 static int
266 find_first_bit(uint32_t mask)
267 {
268 return (ffs(mask) - 1);
269 }
270
271 /*
272 * Return the index of the next bit in the mask, or -1 if there are no more.
273 */
274 static int
275 find_next_bit(uint32_t mask, int bit)
276 {
277 bit++;
278 while (bit < 32 && !(mask & (1 << bit)))
279 bit++;
280 if (bit != 32)
281 return (bit);
282 return (-1);
283 }
284
285 /*
286 * Find a working set of irqs for a child using the masks in *config
287 * and return the regions in *result. Returns non-zero if a set of
288 * irqs was found.
289 */
290 static int
291 isa_find_irq(device_t child, struct isa_config *config,
292 struct isa_config *result)
293 {
294 int success, i;
295 struct resource *res[ISA_NIRQ];
296
297 /*
298 * First clear out any existing resource definitions.
299 */
300 for (i = 0; i < ISA_NIRQ; i++) {
301 bus_delete_resource(child, SYS_RES_IRQ, i);
302 res[i] = NULL;
303 }
304
305 success = 1;
306 result->ic_nirq = config->ic_nirq;
307 for (i = 0; i < config->ic_nirq; i++) {
308 uint32_t mask = config->ic_irqmask[i];
309 int irq;
310
311 /* the PnP device may have a null resource as filler */
312 if (mask == 0) {
313 result->ic_irqmask[i] = 0;
314 continue;
315 }
316
317 for (irq = find_first_bit(mask);
318 irq != -1;
319 irq = find_next_bit(mask, irq)) {
320 bus_set_resource(child, SYS_RES_IRQ, i,
321 irq, 1);
322 res[i] = bus_alloc_resource_any(child,
323 SYS_RES_IRQ, &i,
324 0 /* !RF_ACTIVE */ );
325 if (res[i]) {
326 result->ic_irqmask[i] = (1 << irq);
327 break;
328 }
329 }
330
331 /*
332 * If we didn't find a place for irq range i, then
333 * give up now.
334 */
335 if (!res[i]) {
336 success = 0;
337 break;
338 }
339 }
340
341 for (i = 0; i < ISA_NIRQ; i++) {
342 if (res[i])
343 bus_release_resource(child, SYS_RES_IRQ,
344 i, res[i]);
345 }
346
347 return (success);
348 }
349
350 /*
351 * Find a working set of drqs for a child using the masks in *config
352 * and return the regions in *result. Returns non-zero if a set of
353 * drqs was found.
354 */
355 static int
356 isa_find_drq(device_t child, struct isa_config *config,
357 struct isa_config *result)
358 {
359 int success, i;
360 struct resource *res[ISA_NDRQ];
361
362 /*
363 * First clear out any existing resource definitions.
364 */
365 for (i = 0; i < ISA_NDRQ; i++) {
366 bus_delete_resource(child, SYS_RES_DRQ, i);
367 res[i] = NULL;
368 }
369
370 success = 1;
371 result->ic_ndrq = config->ic_ndrq;
372 for (i = 0; i < config->ic_ndrq; i++) {
373 uint32_t mask = config->ic_drqmask[i];
374 int drq;
375
376 /* the PnP device may have a null resource as filler */
377 if (mask == 0) {
378 result->ic_drqmask[i] = 0;
379 continue;
380 }
381
382 for (drq = find_first_bit(mask);
383 drq != -1;
384 drq = find_next_bit(mask, drq)) {
385 bus_set_resource(child, SYS_RES_DRQ, i,
386 drq, 1);
387 res[i] = bus_alloc_resource_any(child,
388 SYS_RES_DRQ, &i,
389 0 /* !RF_ACTIVE */);
390 if (res[i]) {
391 result->ic_drqmask[i] = (1 << drq);
392 break;
393 }
394 }
395
396 /*
397 * If we didn't find a place for drq range i, then
398 * give up now.
399 */
400 if (!res[i]) {
401 success = 0;
402 break;
403 }
404 }
405
406 for (i = 0; i < ISA_NDRQ; i++) {
407 if (res[i])
408 bus_release_resource(child, SYS_RES_DRQ,
409 i, res[i]);
410 }
411
412 return (success);
413 }
414
415 /*
416 * Attempt to find a working set of resources for a device. Return
417 * non-zero if a working configuration is found.
418 */
419 static int
420 isa_assign_resources(device_t child)
421 {
422 struct isa_device *idev = DEVTOISA(child);
423 struct isa_config_entry *ice;
424 struct isa_config *cfg;
425 const char *reason;
426
427 reason = "Empty ISA id_configs";
428 cfg = malloc(sizeof(struct isa_config), M_TEMP, M_NOWAIT|M_ZERO);
429 if (cfg == NULL)
430 return(0);
431 TAILQ_FOREACH(ice, &idev->id_configs, ice_link) {
432 reason = "memory";
433 if (!isa_find_memory(child, &ice->ice_config, cfg))
434 continue;
435 reason = "port";
436 if (!isa_find_port(child, &ice->ice_config, cfg))
437 continue;
438 reason = "irq";
439 if (!isa_find_irq(child, &ice->ice_config, cfg))
440 continue;
441 reason = "drq";
442 if (!isa_find_drq(child, &ice->ice_config, cfg))
443 continue;
444
445 /*
446 * A working configuration was found enable the device
447 * with this configuration.
448 */
449 reason = "no callback";
450 if (idev->id_config_cb) {
451 idev->id_config_cb(idev->id_config_arg,
452 cfg, 1);
453 free(cfg, M_TEMP);
454 return (1);
455 }
456 }
457
458 /*
459 * Disable the device.
460 */
461 bus_print_child_header(device_get_parent(child), child);
462 printf(" can't assign resources (%s)\n", reason);
463 if (bootverbose)
464 isa_print_child(device_get_parent(child), child);
465 bzero(cfg, sizeof (*cfg));
466 if (idev->id_config_cb)
467 idev->id_config_cb(idev->id_config_arg, cfg, 0);
468 device_disable(child);
469
470 free(cfg, M_TEMP);
471 return (0);
472 }
473
474 /*
475 * Claim any unallocated resources to keep other devices from using
476 * them.
477 */
478 static void
479 isa_claim_resources(device_t dev, device_t child)
480 {
481 struct isa_device *idev = DEVTOISA(child);
482 struct resource_list *rl = &idev->id_resources;
483 struct resource_list_entry *rle;
484 int rid;
485
486 STAILQ_FOREACH(rle, rl, link) {
487 if (!rle->res) {
488 rid = rle->rid;
489 resource_list_alloc(rl, dev, child, rle->type, &rid,
490 0, ~0, 1, 0);
491 }
492 }
493 }
494
495 /*
496 * Called after other devices have initialised to probe for isa devices.
497 */
498 void
499 isa_probe_children(device_t dev)
500 {
501 struct isa_device *idev;
502 device_t *children, child;
503 struct isa_config *cfg;
504 int nchildren, i, err;
505
506 /*
507 * Create all the non-hinted children by calling drivers'
508 * identify methods.
509 */
510 bus_generic_probe(dev);
511
512 if (device_get_children(dev, &children, &nchildren))
513 return;
514
515 /*
516 * First disable all pnp devices so that they don't get
517 * matched by legacy probes.
518 */
519 if (bootverbose)
520 printf("isa_probe_children: disabling PnP devices\n");
521
522 cfg = malloc(sizeof(*cfg), M_TEMP, M_NOWAIT|M_ZERO);
523 if (cfg == NULL) {
524 free(children, M_TEMP);
525 return;
526 }
527
528 for (i = 0; i < nchildren; i++) {
529 idev = DEVTOISA(children[i]);
530
531 bzero(cfg, sizeof(*cfg));
532 if (idev->id_config_cb)
533 idev->id_config_cb(idev->id_config_arg, cfg, 0);
534 }
535
536 free(cfg, M_TEMP);
537
538 /*
539 * Next, probe all the PnP BIOS devices so they can subsume any
540 * hints.
541 */
542 for (i = 0; i < nchildren; i++) {
543 child = children[i];
544 idev = DEVTOISA(child);
545
546 if (idev->id_order > ISA_ORDER_PNPBIOS)
547 continue;
548 if (!TAILQ_EMPTY(&idev->id_configs) &&
549 !isa_assign_resources(child))
550 continue;
551
552 if (device_probe_and_attach(child) == 0)
553 isa_claim_resources(dev, child);
554 }
555 free(children, M_TEMP);
556
557 /*
558 * Next, enumerate hinted devices and probe all non-pnp devices so
559 * that they claim their resources first.
560 */
561 bus_enumerate_hinted_children(dev);
562 if (device_get_children(dev, &children, &nchildren))
563 return;
564 if (bootverbose)
565 printf("isa_probe_children: probing non-PnP devices\n");
566 for (i = 0; i < nchildren; i++) {
567 child = children[i];
568 idev = DEVTOISA(child);
569
570 if (device_is_attached(child) ||
571 !TAILQ_EMPTY(&idev->id_configs))
572 continue;
573
574 err = device_probe_and_attach(child);
575 if (err == 0 && idev->id_vendorid == 0 &&
576 strcmp(kern_ident, "GENERIC") == 0 &&
577 device_is_attached(child))
578 device_printf(child,
579 "non-PNP ISA device will be removed from GENERIC in FreeBSD 14.\n");
580 }
581
582 /*
583 * Finally assign resource to pnp devices and probe them.
584 */
585 if (bootverbose)
586 printf("isa_probe_children: probing PnP devices\n");
587 for (i = 0; i < nchildren; i++) {
588 child = children[i];
589 idev = DEVTOISA(child);
590
591 if (device_is_attached(child) || TAILQ_EMPTY(&idev->id_configs))
592 continue;
593
594 if (isa_assign_resources(child)) {
595 device_probe_and_attach(child);
596 isa_claim_resources(dev, child);
597 }
598 }
599
600 free(children, M_TEMP);
601
602 isa_running = 1;
603 }
604
605 /*
606 * Add a new child with default ivars.
607 */
608 static device_t
609 isa_add_child(device_t dev, u_int order, const char *name, int unit)
610 {
611 device_t child;
612 struct isa_device *idev;
613
614 child = device_add_child_ordered(dev, order, name, unit);
615 if (child == NULL)
616 return (child);
617
618 idev = malloc(sizeof(struct isa_device), M_ISADEV, M_NOWAIT | M_ZERO);
619 if (!idev)
620 return (0);
621
622 resource_list_init(&idev->id_resources);
623 TAILQ_INIT(&idev->id_configs);
624 idev->id_order = order;
625
626 device_set_ivars(child, idev);
627
628 return (child);
629 }
630
631 static int
632 isa_print_all_resources(device_t dev)
633 {
634 struct isa_device *idev = DEVTOISA(dev);
635 struct resource_list *rl = &idev->id_resources;
636 int retval = 0;
637
638 if (STAILQ_FIRST(rl) || device_get_flags(dev))
639 retval += printf(" at");
640
641 retval += resource_list_print_type(rl, "port", SYS_RES_IOPORT, "%#jx");
642 retval += resource_list_print_type(rl, "iomem", SYS_RES_MEMORY, "%#jx");
643 retval += resource_list_print_type(rl, "irq", SYS_RES_IRQ, "%jd");
644 retval += resource_list_print_type(rl, "drq", SYS_RES_DRQ, "%jd");
645 if (device_get_flags(dev))
646 retval += printf(" flags %#x", device_get_flags(dev));
647 if (idev->id_vendorid)
648 retval += printf(" pnpid %s", pnp_eisaformat(idev->id_vendorid));
649
650 return (retval);
651 }
652
653 static int
654 isa_print_child(device_t bus, device_t dev)
655 {
656 int retval = 0;
657
658 retval += bus_print_child_header(bus, dev);
659 retval += isa_print_all_resources(dev);
660 retval += bus_print_child_footer(bus, dev);
661
662 return (retval);
663 }
664
665 static void
666 isa_probe_nomatch(device_t dev, device_t child)
667 {
668 if (bootverbose) {
669 bus_print_child_header(dev, child);
670 printf(" failed to probe");
671 isa_print_all_resources(child);
672 bus_print_child_footer(dev, child);
673 }
674
675 return;
676 }
677
678 static int
679 isa_read_ivar(device_t bus, device_t dev, int index, uintptr_t * result)
680 {
681 struct isa_device* idev = DEVTOISA(dev);
682 struct resource_list *rl = &idev->id_resources;
683 struct resource_list_entry *rle;
684
685 switch (index) {
686 case ISA_IVAR_PORT_0:
687 rle = resource_list_find(rl, SYS_RES_IOPORT, 0);
688 if (rle)
689 *result = rle->start;
690 else
691 *result = -1;
692 break;
693
694 case ISA_IVAR_PORT_1:
695 rle = resource_list_find(rl, SYS_RES_IOPORT, 1);
696 if (rle)
697 *result = rle->start;
698 else
699 *result = -1;
700 break;
701
702 case ISA_IVAR_PORTSIZE_0:
703 rle = resource_list_find(rl, SYS_RES_IOPORT, 0);
704 if (rle)
705 *result = rle->count;
706 else
707 *result = 0;
708 break;
709
710 case ISA_IVAR_PORTSIZE_1:
711 rle = resource_list_find(rl, SYS_RES_IOPORT, 1);
712 if (rle)
713 *result = rle->count;
714 else
715 *result = 0;
716 break;
717
718 case ISA_IVAR_MADDR_0:
719 rle = resource_list_find(rl, SYS_RES_MEMORY, 0);
720 if (rle)
721 *result = rle->start;
722 else
723 *result = -1;
724 break;
725
726 case ISA_IVAR_MADDR_1:
727 rle = resource_list_find(rl, SYS_RES_MEMORY, 1);
728 if (rle)
729 *result = rle->start;
730 else
731 *result = -1;
732 break;
733
734 case ISA_IVAR_MEMSIZE_0:
735 rle = resource_list_find(rl, SYS_RES_MEMORY, 0);
736 if (rle)
737 *result = rle->count;
738 else
739 *result = 0;
740 break;
741
742 case ISA_IVAR_MEMSIZE_1:
743 rle = resource_list_find(rl, SYS_RES_MEMORY, 1);
744 if (rle)
745 *result = rle->count;
746 else
747 *result = 0;
748 break;
749
750 case ISA_IVAR_IRQ_0:
751 rle = resource_list_find(rl, SYS_RES_IRQ, 0);
752 if (rle)
753 *result = rle->start;
754 else
755 *result = -1;
756 break;
757
758 case ISA_IVAR_IRQ_1:
759 rle = resource_list_find(rl, SYS_RES_IRQ, 1);
760 if (rle)
761 *result = rle->start;
762 else
763 *result = -1;
764 break;
765
766 case ISA_IVAR_DRQ_0:
767 rle = resource_list_find(rl, SYS_RES_DRQ, 0);
768 if (rle)
769 *result = rle->start;
770 else
771 *result = -1;
772 break;
773
774 case ISA_IVAR_DRQ_1:
775 rle = resource_list_find(rl, SYS_RES_DRQ, 1);
776 if (rle)
777 *result = rle->start;
778 else
779 *result = -1;
780 break;
781
782 case ISA_IVAR_VENDORID:
783 *result = idev->id_vendorid;
784 break;
785
786 case ISA_IVAR_SERIAL:
787 *result = idev->id_serial;
788 break;
789
790 case ISA_IVAR_LOGICALID:
791 *result = idev->id_logicalid;
792 break;
793
794 case ISA_IVAR_COMPATID:
795 *result = idev->id_compatid;
796 break;
797
798 case ISA_IVAR_CONFIGATTR:
799 *result = idev->id_config_attr;
800 break;
801
802 case ISA_IVAR_PNP_CSN:
803 *result = idev->id_pnp_csn;
804 break;
805
806 case ISA_IVAR_PNP_LDN:
807 *result = idev->id_pnp_ldn;
808 break;
809
810 case ISA_IVAR_PNPBIOS_HANDLE:
811 *result = idev->id_pnpbios_handle;
812 break;
813
814 default:
815 return (ENOENT);
816 }
817
818 return (0);
819 }
820
821 static int
822 isa_write_ivar(device_t bus, device_t dev, int index, uintptr_t value)
823 {
824 struct isa_device* idev = DEVTOISA(dev);
825
826 switch (index) {
827 case ISA_IVAR_PORT_0:
828 case ISA_IVAR_PORT_1:
829 case ISA_IVAR_PORTSIZE_0:
830 case ISA_IVAR_PORTSIZE_1:
831 case ISA_IVAR_MADDR_0:
832 case ISA_IVAR_MADDR_1:
833 case ISA_IVAR_MEMSIZE_0:
834 case ISA_IVAR_MEMSIZE_1:
835 case ISA_IVAR_IRQ_0:
836 case ISA_IVAR_IRQ_1:
837 case ISA_IVAR_DRQ_0:
838 case ISA_IVAR_DRQ_1:
839 return (EINVAL);
840
841 case ISA_IVAR_VENDORID:
842 idev->id_vendorid = value;
843 break;
844
845 case ISA_IVAR_SERIAL:
846 idev->id_serial = value;
847 break;
848
849 case ISA_IVAR_LOGICALID:
850 idev->id_logicalid = value;
851 break;
852
853 case ISA_IVAR_COMPATID:
854 idev->id_compatid = value;
855 break;
856
857 case ISA_IVAR_CONFIGATTR:
858 idev->id_config_attr = value;
859 break;
860
861 default:
862 return (ENOENT);
863 }
864
865 return (0);
866 }
867
868 /*
869 * Free any resources which the driver missed or which we were holding for
870 * it (see isa_probe_children).
871 */
872 static void
873 isa_child_detached(device_t dev, device_t child)
874 {
875 struct isa_device* idev = DEVTOISA(child);
876
877 if (TAILQ_FIRST(&idev->id_configs))
878 isa_claim_resources(dev, child);
879 }
880
881 static void
882 isa_driver_added(device_t dev, driver_t *driver)
883 {
884 device_t *children;
885 int nchildren, i;
886
887 /*
888 * Don't do anything if drivers are dynamically
889 * added during autoconfiguration (cf. ymf724).
890 * since that would end up calling identify
891 * twice.
892 */
893 if (!isa_running)
894 return;
895
896 DEVICE_IDENTIFY(driver, dev);
897 if (device_get_children(dev, &children, &nchildren))
898 return;
899
900 for (i = 0; i < nchildren; i++) {
901 device_t child = children[i];
902 struct isa_device *idev = DEVTOISA(child);
903 struct resource_list *rl = &idev->id_resources;
904 struct resource_list_entry *rle;
905
906 if (device_get_state(child) != DS_NOTPRESENT)
907 continue;
908 if (!device_is_enabled(child))
909 continue;
910
911 /*
912 * Free resources which we were holding on behalf of
913 * the device.
914 */
915 STAILQ_FOREACH(rle, &idev->id_resources, link) {
916 if (rle->res)
917 resource_list_release(rl, dev, child,
918 rle->type,
919 rle->rid,
920 rle->res);
921 }
922
923 if (TAILQ_FIRST(&idev->id_configs))
924 if (!isa_assign_resources(child))
925 continue;
926
927 device_probe_and_attach(child);
928
929 if (TAILQ_FIRST(&idev->id_configs))
930 isa_claim_resources(dev, child);
931 }
932
933 free(children, M_TEMP);
934 }
935
936 static int
937 isa_set_resource(device_t dev, device_t child, int type, int rid,
938 rman_res_t start, rman_res_t count)
939 {
940 struct isa_device* idev = DEVTOISA(child);
941 struct resource_list *rl = &idev->id_resources;
942
943 if (type != SYS_RES_IOPORT && type != SYS_RES_MEMORY
944 && type != SYS_RES_IRQ && type != SYS_RES_DRQ)
945 return (EINVAL);
946 if (rid < 0)
947 return (EINVAL);
948 if (type == SYS_RES_IOPORT && rid >= ISA_NPORT)
949 return (EINVAL);
950 if (type == SYS_RES_MEMORY && rid >= ISA_NMEM)
951 return (EINVAL);
952 if (type == SYS_RES_IRQ && rid >= ISA_NIRQ)
953 return (EINVAL);
954 if (type == SYS_RES_DRQ && rid >= ISA_NDRQ)
955 return (EINVAL);
956
957 resource_list_add(rl, type, rid, start, start + count - 1, count);
958
959 return (0);
960 }
961
962 static struct resource_list *
963 isa_get_resource_list (device_t dev, device_t child)
964 {
965 struct isa_device* idev = DEVTOISA(child);
966 struct resource_list *rl = &idev->id_resources;
967
968 if (!rl)
969 return (NULL);
970
971 return (rl);
972 }
973
974 static int
975 isa_add_config(device_t dev, device_t child, int priority,
976 struct isa_config *config)
977 {
978 struct isa_device* idev = DEVTOISA(child);
979 struct isa_config_entry *newice, *ice;
980
981 newice = malloc(sizeof *ice, M_DEVBUF, M_NOWAIT);
982 if (!newice)
983 return (ENOMEM);
984
985 newice->ice_priority = priority;
986 newice->ice_config = *config;
987
988 TAILQ_FOREACH(ice, &idev->id_configs, ice_link) {
989 if (ice->ice_priority > priority)
990 break;
991 }
992 if (ice)
993 TAILQ_INSERT_BEFORE(ice, newice, ice_link);
994 else
995 TAILQ_INSERT_TAIL(&idev->id_configs, newice, ice_link);
996
997 return (0);
998 }
999
1000 static void
1001 isa_set_config_callback(device_t dev, device_t child, isa_config_cb *fn,
1002 void *arg)
1003 {
1004 struct isa_device* idev = DEVTOISA(child);
1005
1006 idev->id_config_cb = fn;
1007 idev->id_config_arg = arg;
1008 }
1009
1010 static int
1011 isa_pnp_probe(device_t dev, device_t child, struct isa_pnp_id *ids)
1012 {
1013 struct isa_device* idev = DEVTOISA(child);
1014
1015 if (!idev->id_vendorid)
1016 return (ENOENT);
1017
1018 while (ids && ids->ip_id) {
1019 /*
1020 * Really ought to support >1 compat id per device.
1021 */
1022 if (idev->id_logicalid == ids->ip_id
1023 || idev->id_compatid == ids->ip_id) {
1024 if (ids->ip_desc)
1025 device_set_desc(child, ids->ip_desc);
1026 return (0);
1027 }
1028 ids++;
1029 }
1030
1031 return (ENXIO);
1032 }
1033
1034 static int
1035 isa_child_pnpinfo_str(device_t bus, device_t child, char *buf,
1036 size_t buflen)
1037 {
1038 struct isa_device *idev = DEVTOISA(child);
1039
1040 if (idev->id_vendorid)
1041 snprintf(buf, buflen, "pnpid=%s",
1042 pnp_eisaformat(idev->id_vendorid));
1043 return (0);
1044 }
1045
1046 static int
1047 isa_child_location_str(device_t bus, device_t child, char *buf,
1048 size_t buflen)
1049 {
1050 #if 0
1051 /* id_pnphandle isn't there yet */
1052 struct isa_device *idev = DEVTOISA(child);
1053
1054 if (idev->id_vendorid)
1055 snprintf(buf, buflen, "pnphandle=%d", idev->id_pnphandle);
1056 #endif
1057 /* Nothing here yet */
1058 *buf = '\0';
1059 return (0);
1060 }
1061
1062 static device_method_t isa_methods[] = {
1063 /* Device interface */
1064 DEVMETHOD(device_probe, isa_probe),
1065 DEVMETHOD(device_attach, isa_attach),
1066 DEVMETHOD(device_detach, bus_generic_detach),
1067 DEVMETHOD(device_shutdown, bus_generic_shutdown),
1068 DEVMETHOD(device_suspend, bus_generic_suspend),
1069 DEVMETHOD(device_resume, bus_generic_resume),
1070
1071 /* Bus interface */
1072 DEVMETHOD(bus_add_child, isa_add_child),
1073 DEVMETHOD(bus_print_child, isa_print_child),
1074 DEVMETHOD(bus_probe_nomatch, isa_probe_nomatch),
1075 DEVMETHOD(bus_read_ivar, isa_read_ivar),
1076 DEVMETHOD(bus_write_ivar, isa_write_ivar),
1077 DEVMETHOD(bus_child_detached, isa_child_detached),
1078 DEVMETHOD(bus_driver_added, isa_driver_added),
1079 DEVMETHOD(bus_setup_intr, bus_generic_setup_intr),
1080 DEVMETHOD(bus_teardown_intr, bus_generic_teardown_intr),
1081
1082 DEVMETHOD(bus_get_resource_list,isa_get_resource_list),
1083 DEVMETHOD(bus_alloc_resource, isa_alloc_resource),
1084 DEVMETHOD(bus_release_resource, isa_release_resource),
1085 DEVMETHOD(bus_set_resource, isa_set_resource),
1086 DEVMETHOD(bus_get_resource, bus_generic_rl_get_resource),
1087 DEVMETHOD(bus_delete_resource, bus_generic_rl_delete_resource),
1088 DEVMETHOD(bus_activate_resource, bus_generic_activate_resource),
1089 DEVMETHOD(bus_deactivate_resource, bus_generic_deactivate_resource),
1090 DEVMETHOD(bus_child_pnpinfo_str, isa_child_pnpinfo_str),
1091 DEVMETHOD(bus_child_location_str, isa_child_location_str),
1092 DEVMETHOD(bus_hinted_child, isa_hinted_child),
1093 DEVMETHOD(bus_hint_device_unit, isa_hint_device_unit),
1094
1095 /* ISA interface */
1096 DEVMETHOD(isa_add_config, isa_add_config),
1097 DEVMETHOD(isa_set_config_callback, isa_set_config_callback),
1098 DEVMETHOD(isa_pnp_probe, isa_pnp_probe),
1099
1100 { 0, 0 }
1101 };
1102
1103 DEFINE_CLASS_0(isa, isa_driver, isa_methods, 0);
1104
1105 devclass_t isa_devclass;
1106
1107 /*
1108 * ISA can be attached to a PCI-ISA bridge, or other locations on some
1109 * platforms.
1110 */
1111 DRIVER_MODULE(isa, isab, isa_driver, isa_devclass, 0, 0);
1112 DRIVER_MODULE(isa, eisab, isa_driver, isa_devclass, 0, 0);
1113 MODULE_VERSION(isa, 1);
1114
1115 /*
1116 * Code common to ISA bridges.
1117 */
1118
1119 devclass_t isab_devclass;
1120
1121 int
1122 isab_attach(device_t dev)
1123 {
1124 device_t child;
1125
1126 child = device_add_child(dev, "isa", 0);
1127 if (child != NULL)
1128 return (bus_generic_attach(dev));
1129 return (ENXIO);
1130 }
1131
1132 char *
1133 pnp_eisaformat(uint32_t id)
1134 {
1135 uint8_t *data;
1136 static char idbuf[8];
1137 const char hextoascii[] = "0123456789abcdef";
1138
1139 id = htole32(id);
1140 data = (uint8_t *)&id;
1141 idbuf[0] = '@' + ((data[0] & 0x7c) >> 2);
1142 idbuf[1] = '@' + (((data[0] & 0x3) << 3) + ((data[1] & 0xe0) >> 5));
1143 idbuf[2] = '@' + (data[1] & 0x1f);
1144 idbuf[3] = hextoascii[(data[2] >> 4)];
1145 idbuf[4] = hextoascii[(data[2] & 0xf)];
1146 idbuf[5] = hextoascii[(data[3] >> 4)];
1147 idbuf[6] = hextoascii[(data[3] & 0xf)];
1148 idbuf[7] = 0;
1149 return(idbuf);
1150 }
Cache object: b25dcbeb00b3190d1f658c95f8647c22
|