1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21 /*
22 * Copyright (c) 2012 Gary Mills
23 * Copyright (c) 1992, 2010, Oracle and/or its affiliates. All rights reserved.
24 * Copyright 2012 Garrett D'Amore <garrett@damore.org>. All rights reserved.
25 */
26
27 /*
28 * ISA bus nexus driver
29 */
30
31 #include <sys/types.h>
32 #include <sys/cmn_err.h>
33 #include <sys/conf.h>
34 #include <sys/modctl.h>
35 #include <sys/autoconf.h>
36 #include <sys/errno.h>
37 #include <sys/debug.h>
38 #include <sys/kmem.h>
39 #include <sys/psm.h>
40 #include <sys/ddidmareq.h>
41 #include <sys/ddi_impldefs.h>
42 #include <sys/ddi_subrdefs.h>
43 #include <sys/dma_engine.h>
44 #include <sys/ddi.h>
45 #include <sys/sunddi.h>
46 #include <sys/sunndi.h>
47 #include <sys/acpi/acpi_enum.h>
48 #include <sys/mach_intr.h>
49 #include <sys/pci.h>
50 #include <sys/note.h>
51 #include <sys/boot_console.h>
52 #include <sys/apic.h>
53 #if defined(__xpv)
54 #include <sys/hypervisor.h>
55 #include <sys/evtchn_impl.h>
56
57 extern int console_hypervisor_dev_type(int *);
58 #endif
59
60
61 extern int pseudo_isa;
62 extern int isa_resource_setup(void);
63 extern int (*psm_intr_ops)(dev_info_t *, ddi_intr_handle_impl_t *,
64 psm_intr_op_t, int *);
65 extern void pci_register_isa_resources(int, uint32_t, uint32_t);
66 static void isa_enumerate(int);
67 static void enumerate_BIOS_serial(dev_info_t *);
68 static void adjust_prtsz(dev_info_t *isa_dip);
69 static void isa_create_ranges_prop(dev_info_t *);
70
71 #define USED_RESOURCES "used-resources"
72
73 /*
74 * The following typedef is used to represent an entry in the "ranges"
75 * property of a pci-isa bridge device node.
76 */
77 typedef struct {
78 uint32_t child_high;
79 uint32_t child_low;
80 uint32_t parent_high;
81 uint32_t parent_mid;
82 uint32_t parent_low;
83 uint32_t size;
84 } pib_ranges_t;
85
86 typedef struct {
87 uint32_t base;
88 uint32_t len;
89 } used_ranges_t;
90
91 #define USED_CELL_SIZE 2 /* 1 byte addr, 1 byte size */
92 #define ISA_ADDR_IO 1 /* IO address space */
93 #define ISA_ADDR_MEM 0 /* memory adress space */
94
95 /*
96 * #define ISA_DEBUG 1
97 */
98
99 #define num_BIOS_serial 4 /* number of BIOS serial ports to look at */
100 #define min_BIOS_serial 2 /* minimum number of BIOS serial ports */
101 #define COM_ISR 2 /* 16550 intr status register */
102 #define COM_SCR 7 /* 16550 scratch register */
103
104 /*
105 * For serial ports not enumerated by ACPI, and parallel ports with
106 * illegal size. Typically, a system can have as many as 4 serial
107 * ports and 3 parallel ports.
108 */
109 #define MAX_EXTRA_RESOURCE 7
110 static struct regspec isa_extra_resource[MAX_EXTRA_RESOURCE];
111 static int isa_extra_count = 0;
112
113 /* Register definitions for COM1 to COM4. */
114 static struct regspec asy_regs[] = {
115 {1, 0x3f8, 0x8},
116 {1, 0x2f8, 0x8},
117 {1, 0x3e8, 0x8},
118 {1, 0x2e8, 0x8}
119 };
120
121 /* Serial port interrupt vectors for COM1 to COM4. */
122 static int asy_intrs[] = {0x4, 0x3, 0x4, 0x3};
123 /* Bitfield indicating which interrupts are overridden by eeprom config */
124 static uchar_t asy_intr_override = 0;
125
126 /*
127 * Local data
128 */
129 static ddi_dma_lim_t ISA_dma_limits = {
130 0, /* address low */
131 0x00ffffff, /* address high */
132 0, /* counter max */
133 1, /* burstsize */
134 DMA_UNIT_8, /* minimum xfer */
135 0, /* dma speed */
136 (uint_t)DMALIM_VER0, /* version */
137 0x0000ffff, /* address register */
138 0x0000ffff, /* counter register */
139 1, /* sector size */
140 0x00000001, /* scatter/gather list length */
141 (uint_t)0xffffffff /* request size */
142 };
143
144 static ddi_dma_attr_t ISA_dma_attr = {
145 DMA_ATTR_V0,
146 (unsigned long long)0,
147 (unsigned long long)0x00ffffff,
148 0x0000ffff,
149 1,
150 1,
151 1,
152 (unsigned long long)0xffffffff,
153 (unsigned long long)0x0000ffff,
154 1,
155 1,
156 0
157 };
158
159
160 /*
161 * Config information
162 */
163
164 static int
165 isa_bus_map(dev_info_t *dip, dev_info_t *rdip, ddi_map_req_t *mp,
166 off_t offset, off_t len, caddr_t *vaddrp);
167
168 static int
169 isa_dma_allochdl(dev_info_t *, dev_info_t *, ddi_dma_attr_t *,
170 int (*waitfp)(caddr_t), caddr_t arg, ddi_dma_handle_t *);
171
172 static int
173 isa_dma_mctl(dev_info_t *, dev_info_t *, ddi_dma_handle_t, enum ddi_dma_ctlops,
174 off_t *, size_t *, caddr_t *, uint_t);
175
176 static int
177 isa_ctlops(dev_info_t *, dev_info_t *, ddi_ctl_enum_t, void *, void *);
178
179 static int
180 isa_intr_ops(dev_info_t *pdip, dev_info_t *rdip, ddi_intr_op_t intr_op,
181 ddi_intr_handle_impl_t *hdlp, void *result);
182 static int isa_alloc_intr_fixed(dev_info_t *, ddi_intr_handle_impl_t *, void *);
183 static int isa_free_intr_fixed(dev_info_t *, ddi_intr_handle_impl_t *);
184
185 struct bus_ops isa_bus_ops = {
186 BUSO_REV,
187 isa_bus_map,
188 NULL,
189 NULL,
190 NULL,
191 i_ddi_map_fault,
192 NULL,
193 isa_dma_allochdl,
194 ddi_dma_freehdl,
195 ddi_dma_bindhdl,
196 ddi_dma_unbindhdl,
197 ddi_dma_flush,
198 ddi_dma_win,
199 isa_dma_mctl,
200 isa_ctlops,
201 ddi_bus_prop_op,
202 NULL, /* (*bus_get_eventcookie)(); */
203 NULL, /* (*bus_add_eventcall)(); */
204 NULL, /* (*bus_remove_eventcall)(); */
205 NULL, /* (*bus_post_event)(); */
206 NULL, /* (*bus_intr_ctl)(); */
207 NULL, /* (*bus_config)(); */
208 NULL, /* (*bus_unconfig)(); */
209 NULL, /* (*bus_fm_init)(); */
210 NULL, /* (*bus_fm_fini)(); */
211 NULL, /* (*bus_fm_access_enter)(); */
212 NULL, /* (*bus_fm_access_exit)(); */
213 NULL, /* (*bus_power)(); */
214 isa_intr_ops /* (*bus_intr_op)(); */
215 };
216
217
218 static int isa_attach(dev_info_t *devi, ddi_attach_cmd_t cmd);
219
220 /*
221 * Internal isa ctlops support routines
222 */
223 static int isa_initchild(dev_info_t *child);
224
225 struct dev_ops isa_ops = {
226 DEVO_REV, /* devo_rev, */
227 0, /* refcnt */
228 ddi_no_info, /* info */
229 nulldev, /* identify */
230 nulldev, /* probe */
231 isa_attach, /* attach */
232 nulldev, /* detach */
233 nodev, /* reset */
234 (struct cb_ops *)0, /* driver operations */
235 &isa_bus_ops, /* bus operations */
236 NULL, /* power */
237 ddi_quiesce_not_needed, /* quiesce */
238 };
239
240 /*
241 * Module linkage information for the kernel.
242 */
243
244 static struct modldrv modldrv = {
245 &mod_driverops, /* Type of module. This is ISA bus driver */
246 "isa nexus driver for 'ISA'",
247 &isa_ops, /* driver ops */
248 };
249
250 static struct modlinkage modlinkage = {
251 MODREV_1,
252 &modldrv,
253 NULL
254 };
255
256 int
257 _init(void)
258 {
259 int err;
260 char tty_irq_param[9] = "ttyX-irq";
261 char *tty_irq;
262 int i;
263
264 if ((err = mod_install(&modlinkage)) != 0)
265 return (err);
266
267 /* Check if any tty irqs are overridden by eeprom config */
268 for (i = 0; i < num_BIOS_serial; i++) {
269 tty_irq_param[3] = 'a' + i;
270 if (ddi_prop_lookup_string(DDI_DEV_T_ANY, ddi_root_node(),
271 DDI_PROP_DONTPASS, tty_irq_param, &tty_irq)
272 == DDI_PROP_SUCCESS) {
273 long data;
274
275 if (ddi_strtol(tty_irq, NULL, 0, &data) == 0) {
276 asy_intrs[i] = (int)data;
277 asy_intr_override |= 1<<i;
278 }
279
280 ddi_prop_free(tty_irq);
281 }
282 }
283
284 impl_bus_add_probe(isa_enumerate);
285 return (0);
286 }
287
288 int
289 _fini(void)
290 {
291 int err;
292
293 impl_bus_delete_probe(isa_enumerate);
294
295 if ((err = mod_remove(&modlinkage)) != 0)
296 return (err);
297
298 return (0);
299 }
300
301 int
302 _info(struct modinfo *modinfop)
303 {
304 return (mod_info(&modlinkage, modinfop));
305 }
306
307 static int
308 isa_attach(dev_info_t *devi, ddi_attach_cmd_t cmd)
309 {
310 int rval;
311
312 #if defined(__xpv)
313 /*
314 * don't allow isa to attach in domU. this can happen if someone sets
315 * the console wrong, etc. ISA devices assume the H/W is there and
316 * will cause the domU to panic.
317 */
318 if (!DOMAIN_IS_INITDOMAIN(xen_info)) {
319 return (DDI_FAILURE);
320 }
321 #endif
322
323 switch (cmd) {
324 case DDI_ATTACH:
325 break;
326 case DDI_RESUME:
327 return (DDI_SUCCESS);
328 default:
329 return (DDI_FAILURE);
330 }
331
332 if ((rval = i_dmae_init(devi)) == DDI_SUCCESS)
333 ddi_report_dev(devi);
334
335 return (rval);
336 }
337
338 #define SET_RNGS(rng_p, used_p, ctyp, ptyp) do { \
339 (rng_p)->child_high = (ctyp); \
340 (rng_p)->child_low = (rng_p)->parent_low = (used_p)->base; \
341 (rng_p)->parent_high = (ptyp); \
342 (rng_p)->parent_mid = 0; \
343 (rng_p)->size = (used_p)->len; \
344 _NOTE(CONSTCOND) } while (0)
345 static uint_t
346 isa_used_to_ranges(int ctype, int *array, uint_t size, pib_ranges_t *ranges)
347 {
348 used_ranges_t *used_p;
349 pib_ranges_t *rng_p = ranges;
350 uint_t i, ptype;
351
352 ptype = (ctype == ISA_ADDR_IO) ? PCI_ADDR_IO : PCI_ADDR_MEM32;
353 ptype |= PCI_REG_REL_M;
354 size /= USED_CELL_SIZE;
355 used_p = (used_ranges_t *)array;
356 SET_RNGS(rng_p, used_p, ctype, ptype);
357 for (i = 1, used_p++; i < size; i++, used_p++) {
358 /* merge ranges record if applicable */
359 if (rng_p->child_low + rng_p->size == used_p->base)
360 rng_p->size += used_p->len;
361 else {
362 rng_p++;
363 SET_RNGS(rng_p, used_p, ctype, ptype);
364 }
365 }
366 return (rng_p - ranges + 1);
367 }
368
369 void
370 isa_remove_res_from_pci(int type, int *array, uint_t size)
371 {
372 int i;
373 used_ranges_t *used_p;
374
375 size /= USED_CELL_SIZE;
376 used_p = (used_ranges_t *)array;
377 for (i = 0; i < size; i++, used_p++)
378 pci_register_isa_resources(type, used_p->base, used_p->len);
379 }
380
381 static void
382 isa_create_ranges_prop(dev_info_t *dip)
383 {
384 dev_info_t *used;
385 int *ioarray, *memarray, status;
386 uint_t nio = 0, nmem = 0, nrng = 0, n;
387 pib_ranges_t *ranges;
388
389 used = ddi_find_devinfo(USED_RESOURCES, -1, 0);
390 if (used == NULL) {
391 cmn_err(CE_WARN, "Failed to find used-resources <%s>\n",
392 ddi_get_name(dip));
393 return;
394 }
395 status = ddi_prop_lookup_int_array(DDI_DEV_T_ANY, used,
396 DDI_PROP_DONTPASS, "io-space", &ioarray, &nio);
397 if (status != DDI_PROP_SUCCESS && status != DDI_PROP_NOT_FOUND) {
398 cmn_err(CE_WARN, "io-space property failure for %s (%x)\n",
399 ddi_get_name(used), status);
400 return;
401 }
402 status = ddi_prop_lookup_int_array(DDI_DEV_T_ANY, used,
403 DDI_PROP_DONTPASS, "device-memory", &memarray, &nmem);
404 if (status != DDI_PROP_SUCCESS && status != DDI_PROP_NOT_FOUND) {
405 cmn_err(CE_WARN, "device-memory property failure for %s (%x)\n",
406 ddi_get_name(used), status);
407 return;
408 }
409 n = (nio + nmem) / USED_CELL_SIZE;
410 ranges = (pib_ranges_t *)kmem_zalloc(sizeof (pib_ranges_t) * n,
411 KM_SLEEP);
412
413 if (nio != 0) {
414 nrng = isa_used_to_ranges(ISA_ADDR_IO, ioarray, nio, ranges);
415 isa_remove_res_from_pci(ISA_ADDR_IO, ioarray, nio);
416 ddi_prop_free(ioarray);
417 }
418 if (nmem != 0) {
419 nrng += isa_used_to_ranges(ISA_ADDR_MEM, memarray, nmem,
420 ranges + nrng);
421 isa_remove_res_from_pci(ISA_ADDR_MEM, memarray, nmem);
422 ddi_prop_free(memarray);
423 }
424
425 if (!pseudo_isa)
426 (void) ndi_prop_update_int_array(DDI_DEV_T_NONE, dip, "ranges",
427 (int *)ranges, nrng * sizeof (pib_ranges_t) / sizeof (int));
428 kmem_free(ranges, sizeof (pib_ranges_t) * n);
429 }
430
431 /*ARGSUSED*/
432 static int
433 isa_apply_range(dev_info_t *dip, struct regspec *isa_reg_p,
434 pci_regspec_t *pci_reg_p)
435 {
436 pib_ranges_t *ranges, *rng_p;
437 int len, i, offset, nrange;
438
439 if (ddi_getlongprop(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS,
440 "ranges", (caddr_t)&ranges, &len) != DDI_SUCCESS) {
441 cmn_err(CE_WARN, "Can't get %s ranges property",
442 ddi_get_name(dip));
443 return (DDI_ME_REGSPEC_RANGE);
444 }
445 nrange = len / sizeof (pib_ranges_t);
446 rng_p = ranges;
447 for (i = 0; i < nrange; i++, rng_p++) {
448 /* Check for correct space */
449 if (isa_reg_p->regspec_bustype != rng_p->child_high)
450 continue;
451
452 /* Detect whether request entirely fits within a range */
453 if (isa_reg_p->regspec_addr < rng_p->child_low)
454 continue;
455 if ((isa_reg_p->regspec_addr + isa_reg_p->regspec_size - 1) >
456 (rng_p->child_low + rng_p->size - 1))
457 continue;
458
459 offset = isa_reg_p->regspec_addr - rng_p->child_low;
460
461 pci_reg_p->pci_phys_hi = rng_p->parent_high;
462 pci_reg_p->pci_phys_mid = 0;
463 pci_reg_p->pci_phys_low = rng_p->parent_low + offset;
464 pci_reg_p->pci_size_hi = 0;
465 pci_reg_p->pci_size_low = isa_reg_p->regspec_size;
466
467 break;
468 }
469 kmem_free(ranges, len);
470
471 if (i < nrange)
472 return (DDI_SUCCESS);
473
474 /*
475 * Check extra resource range specially for serial and parallel
476 * devices, which are treated differently from all other ISA
477 * devices. On some machines, serial ports are not enumerated
478 * by ACPI but by BIOS, with io base addresses noted in legacy
479 * BIOS data area. Parallel port on some machines comes with
480 * illegal size.
481 */
482 if (isa_reg_p->regspec_bustype != ISA_ADDR_IO) {
483 cmn_err(CE_WARN, "Bus type not ISA I/O\n");
484 return (DDI_ME_REGSPEC_RANGE);
485 }
486
487 for (i = 0; i < isa_extra_count; i++) {
488 struct regspec *reg_p = &isa_extra_resource[i];
489
490 if (isa_reg_p->regspec_addr < reg_p->regspec_addr)
491 continue;
492 if ((isa_reg_p->regspec_addr + isa_reg_p->regspec_size) >
493 (reg_p->regspec_addr + reg_p->regspec_size))
494 continue;
495
496 pci_reg_p->pci_phys_hi = PCI_ADDR_IO | PCI_REG_REL_M;
497 pci_reg_p->pci_phys_mid = 0;
498 pci_reg_p->pci_phys_low = isa_reg_p->regspec_addr;
499 pci_reg_p->pci_size_hi = 0;
500 pci_reg_p->pci_size_low = isa_reg_p->regspec_size;
501 break;
502 }
503 if (i < isa_extra_count)
504 return (DDI_SUCCESS);
505
506 cmn_err(CE_WARN, "isa_apply_range: Out of range base <0x%x>, size <%d>",
507 isa_reg_p->regspec_addr, isa_reg_p->regspec_size);
508 return (DDI_ME_REGSPEC_RANGE);
509 }
510
511 static int
512 isa_bus_map(dev_info_t *dip, dev_info_t *rdip, ddi_map_req_t *mp,
513 off_t offset, off_t len, caddr_t *vaddrp)
514 {
515 struct regspec tmp_reg, *rp;
516 pci_regspec_t vreg;
517 ddi_map_req_t mr = *mp; /* Get private copy of request */
518 int error;
519
520 if (pseudo_isa)
521 return (i_ddi_bus_map(dip, rdip, mp, offset, len, vaddrp));
522
523 mp = &mr;
524
525 /*
526 * First, if given an rnumber, convert it to a regspec...
527 */
528 if (mp->map_type == DDI_MT_RNUMBER) {
529
530 int rnumber = mp->map_obj.rnumber;
531
532 rp = i_ddi_rnumber_to_regspec(rdip, rnumber);
533 if (rp == (struct regspec *)0)
534 return (DDI_ME_RNUMBER_RANGE);
535
536 /*
537 * Convert the given ddi_map_req_t from rnumber to regspec...
538 */
539 mp->map_type = DDI_MT_REGSPEC;
540 mp->map_obj.rp = rp;
541 }
542
543 /*
544 * Adjust offset and length correspnding to called values...
545 * XXX: A non-zero length means override the one in the regspec.
546 * XXX: (Regardless of what's in the parent's range)
547 */
548
549 tmp_reg = *(mp->map_obj.rp); /* Preserve underlying data */
550 rp = mp->map_obj.rp = &tmp_reg; /* Use tmp_reg in request */
551
552 rp->regspec_addr += (uint_t)offset;
553 if (len != 0)
554 rp->regspec_size = (uint_t)len;
555
556 if ((error = isa_apply_range(dip, rp, &vreg)) != 0)
557 return (error);
558 mp->map_obj.rp = (struct regspec *)&vreg;
559
560 /*
561 * Call my parents bus_map function with modified values...
562 */
563
564 return (ddi_map(dip, mp, (off_t)0, (off_t)0, vaddrp));
565 }
566
567 static int
568 isa_dma_allochdl(dev_info_t *dip, dev_info_t *rdip, ddi_dma_attr_t *dma_attr,
569 int (*waitfp)(caddr_t), caddr_t arg, ddi_dma_handle_t *handlep)
570 {
571 ddi_dma_attr_merge(dma_attr, &ISA_dma_attr);
572 return (ddi_dma_allochdl(dip, rdip, dma_attr, waitfp, arg, handlep));
573 }
574
575 static int
576 isa_dma_mctl(dev_info_t *dip, dev_info_t *rdip,
577 ddi_dma_handle_t handle, enum ddi_dma_ctlops request,
578 off_t *offp, size_t *lenp, caddr_t *objp, uint_t flags)
579 {
580 int rval;
581 ddi_dma_lim_t defalt;
582 int arg = (int)(uintptr_t)objp;
583
584 switch (request) {
585
586 case DDI_DMA_E_PROG:
587 return (i_dmae_prog(rdip, (struct ddi_dmae_req *)offp,
588 (ddi_dma_cookie_t *)lenp, arg));
589
590 case DDI_DMA_E_ACQUIRE:
591 return (i_dmae_acquire(rdip, arg, (int(*)(caddr_t))offp,
592 (caddr_t)lenp));
593
594 case DDI_DMA_E_FREE:
595 return (i_dmae_free(rdip, arg));
596
597 case DDI_DMA_E_STOP:
598 i_dmae_stop(rdip, arg);
599 return (DDI_SUCCESS);
600
601 case DDI_DMA_E_ENABLE:
602 i_dmae_enable(rdip, arg);
603 return (DDI_SUCCESS);
604
605 case DDI_DMA_E_DISABLE:
606 i_dmae_disable(rdip, arg);
607 return (DDI_SUCCESS);
608
609 case DDI_DMA_E_GETCNT:
610 i_dmae_get_chan_stat(rdip, arg, NULL, (int *)lenp);
611 return (DDI_SUCCESS);
612
613 case DDI_DMA_E_SWSETUP:
614 return (i_dmae_swsetup(rdip, (struct ddi_dmae_req *)offp,
615 (ddi_dma_cookie_t *)lenp, arg));
616
617 case DDI_DMA_E_SWSTART:
618 i_dmae_swstart(rdip, arg);
619 return (DDI_SUCCESS);
620
621 case DDI_DMA_E_GETLIM:
622 bcopy(&ISA_dma_limits, objp, sizeof (ddi_dma_lim_t));
623 return (DDI_SUCCESS);
624
625 case DDI_DMA_E_GETATTR:
626 bcopy(&ISA_dma_attr, objp, sizeof (ddi_dma_attr_t));
627 return (DDI_SUCCESS);
628
629 case DDI_DMA_E_1STPTY:
630 {
631 struct ddi_dmae_req req1stpty =
632 { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
633 if (arg == 0) {
634 req1stpty.der_command = DMAE_CMD_TRAN;
635 req1stpty.der_trans = DMAE_TRANS_DMND;
636 } else {
637 req1stpty.der_trans = DMAE_TRANS_CSCD;
638 }
639 return (i_dmae_prog(rdip, &req1stpty, NULL, arg));
640 }
641
642 case DDI_DMA_IOPB_ALLOC: /* get contiguous DMA-able memory */
643 case DDI_DMA_SMEM_ALLOC:
644 if (!offp) {
645 defalt = ISA_dma_limits;
646 offp = (off_t *)&defalt;
647 }
648 /*FALLTHROUGH*/
649 default:
650 rval = ddi_dma_mctl(dip, rdip, handle, request, offp,
651 lenp, objp, flags);
652 }
653 return (rval);
654 }
655
656 /*
657 * Check if driver should be treated as an old pre 2.6 driver
658 */
659 static int
660 old_driver(dev_info_t *dip)
661 {
662 extern int ignore_hardware_nodes; /* force flag from ddi_impl.c */
663
664 if (ndi_dev_is_persistent_node(dip)) {
665 if (ignore_hardware_nodes)
666 return (1);
667 if (ddi_getprop(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS,
668 "ignore-hardware-nodes", -1) != -1)
669 return (1);
670 }
671 return (0);
672 }
673
674 typedef struct {
675 uint32_t phys_hi;
676 uint32_t phys_lo;
677 uint32_t size;
678 } isa_regs_t;
679
680 /*
681 * Return non-zero if device in tree is a PnP isa device
682 */
683 static int
684 is_pnpisa(dev_info_t *dip)
685 {
686 isa_regs_t *isa_regs;
687 int proplen, pnpisa;
688
689 if (ddi_getlongprop(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS, "reg",
690 (caddr_t)&isa_regs, &proplen) != DDI_PROP_SUCCESS) {
691 return (0);
692 }
693 pnpisa = isa_regs[0].phys_hi & 0x80000000;
694 /*
695 * free the memory allocated by ddi_getlongprop().
696 */
697 kmem_free(isa_regs, proplen);
698 if (pnpisa)
699 return (1);
700 else
701 return (0);
702 }
703
704 /*ARGSUSED*/
705 static int
706 isa_ctlops(dev_info_t *dip, dev_info_t *rdip,
707 ddi_ctl_enum_t ctlop, void *arg, void *result)
708 {
709 int rn;
710 struct ddi_parent_private_data *pdp;
711
712 switch (ctlop) {
713 case DDI_CTLOPS_REPORTDEV:
714 if (rdip == (dev_info_t *)0)
715 return (DDI_FAILURE);
716 cmn_err(CE_CONT, "?ISA-device: %s%d\n",
717 ddi_driver_name(rdip), ddi_get_instance(rdip));
718 return (DDI_SUCCESS);
719
720 case DDI_CTLOPS_INITCHILD:
721 /*
722 * older drivers aren't expecting the "standard" device
723 * node format used by the hardware nodes. these drivers
724 * only expect their own properties set in their driver.conf
725 * files. so they tell us not to call them with hardware
726 * nodes by setting the property "ignore-hardware-nodes".
727 */
728 if (old_driver((dev_info_t *)arg)) {
729 return (DDI_NOT_WELL_FORMED);
730 }
731
732 return (isa_initchild((dev_info_t *)arg));
733
734 case DDI_CTLOPS_UNINITCHILD:
735 impl_ddi_sunbus_removechild((dev_info_t *)arg);
736 return (DDI_SUCCESS);
737
738 case DDI_CTLOPS_SIDDEV:
739 if (ndi_dev_is_persistent_node(rdip))
740 return (DDI_SUCCESS);
741 /*
742 * All ISA devices need to do confirming probes
743 * unless they are PnP ISA.
744 */
745 if (is_pnpisa(rdip))
746 return (DDI_SUCCESS);
747 else
748 return (DDI_FAILURE);
749
750 case DDI_CTLOPS_REGSIZE:
751 case DDI_CTLOPS_NREGS:
752 if (rdip == (dev_info_t *)0)
753 return (DDI_FAILURE);
754
755 if ((pdp = ddi_get_parent_data(rdip)) == NULL)
756 return (DDI_FAILURE);
757
758 if (ctlop == DDI_CTLOPS_NREGS) {
759 *(int *)result = pdp->par_nreg;
760 } else {
761 rn = *(int *)arg;
762 if (rn >= pdp->par_nreg)
763 return (DDI_FAILURE);
764 *(off_t *)result = (off_t)pdp->par_reg[rn].regspec_size;
765 }
766 return (DDI_SUCCESS);
767
768 case DDI_CTLOPS_ATTACH:
769 case DDI_CTLOPS_DETACH:
770 case DDI_CTLOPS_PEEK:
771 case DDI_CTLOPS_POKE:
772 return (DDI_FAILURE);
773
774 default:
775 return (ddi_ctlops(dip, rdip, ctlop, arg, result));
776 }
777 }
778
779 static struct intrspec *
780 isa_get_ispec(dev_info_t *rdip, int inum)
781 {
782 struct ddi_parent_private_data *pdp = ddi_get_parent_data(rdip);
783
784 /* Validate the interrupt number */
785 if (inum >= pdp->par_nintr)
786 return (NULL);
787
788 /* Get the interrupt structure pointer and return that */
789 return ((struct intrspec *)&pdp->par_intr[inum]);
790 }
791
792 static int
793 isa_intr_ops(dev_info_t *pdip, dev_info_t *rdip, ddi_intr_op_t intr_op,
794 ddi_intr_handle_impl_t *hdlp, void *result)
795 {
796 struct intrspec *ispec;
797 #if defined(__xpv)
798 int cons, ttyn;
799
800 cons = console_hypervisor_dev_type(&ttyn);
801 #endif
802 if (pseudo_isa)
803 return (i_ddi_intr_ops(pdip, rdip, intr_op, hdlp, result));
804
805
806 /* Process the interrupt operation */
807 switch (intr_op) {
808 case DDI_INTROP_GETCAP:
809 /* First check with pcplusmp */
810 if (psm_intr_ops == NULL)
811 return (DDI_FAILURE);
812
813 if ((*psm_intr_ops)(rdip, hdlp, PSM_INTR_OP_GET_CAP, result)) {
814 *(int *)result = 0;
815 return (DDI_FAILURE);
816 }
817 break;
818 case DDI_INTROP_SETCAP:
819 if (psm_intr_ops == NULL)
820 return (DDI_FAILURE);
821
822 if ((*psm_intr_ops)(rdip, hdlp, PSM_INTR_OP_SET_CAP, result))
823 return (DDI_FAILURE);
824 break;
825 case DDI_INTROP_ALLOC:
826 ASSERT(hdlp->ih_type == DDI_INTR_TYPE_FIXED);
827 return (isa_alloc_intr_fixed(rdip, hdlp, result));
828 case DDI_INTROP_FREE:
829 ASSERT(hdlp->ih_type == DDI_INTR_TYPE_FIXED);
830 return (isa_free_intr_fixed(rdip, hdlp));
831 case DDI_INTROP_GETPRI:
832 if ((ispec = isa_get_ispec(rdip, hdlp->ih_inum)) == NULL)
833 return (DDI_FAILURE);
834 *(int *)result = ispec->intrspec_pri;
835 break;
836 case DDI_INTROP_SETPRI:
837 /* Validate the interrupt priority passed to us */
838 if (*(int *)result > LOCK_LEVEL)
839 return (DDI_FAILURE);
840
841 /* Ensure that PSM is all initialized and ispec is ok */
842 if ((psm_intr_ops == NULL) ||
843 ((ispec = isa_get_ispec(rdip, hdlp->ih_inum)) == NULL))
844 return (DDI_FAILURE);
845
846 /* update the ispec with the new priority */
847 ispec->intrspec_pri = *(int *)result;
848 break;
849 case DDI_INTROP_ADDISR:
850 if ((ispec = isa_get_ispec(rdip, hdlp->ih_inum)) == NULL)
851 return (DDI_FAILURE);
852 ispec->intrspec_func = hdlp->ih_cb_func;
853 break;
854 case DDI_INTROP_REMISR:
855 if (hdlp->ih_type != DDI_INTR_TYPE_FIXED)
856 return (DDI_FAILURE);
857 if ((ispec = isa_get_ispec(rdip, hdlp->ih_inum)) == NULL)
858 return (DDI_FAILURE);
859 ispec->intrspec_func = (uint_t (*)()) 0;
860 break;
861 case DDI_INTROP_ENABLE:
862 if ((ispec = isa_get_ispec(rdip, hdlp->ih_inum)) == NULL)
863 return (DDI_FAILURE);
864
865 /* Call psmi to translate irq with the dip */
866 if (psm_intr_ops == NULL)
867 return (DDI_FAILURE);
868
869 #if defined(__xpv)
870 /*
871 * if the hypervisor is using an isa serial port for the
872 * console, make sure we don't try to use that interrupt as
873 * it will cause us to panic when xen_bind_pirq() fails.
874 */
875 if (cons == CONS_TTY && ispec->intrspec_vec == asy_intrs[ttyn])
876 return (DDI_FAILURE);
877 #endif
878 ((ihdl_plat_t *)hdlp->ih_private)->ip_ispecp = ispec;
879 if ((*psm_intr_ops)(rdip, hdlp, PSM_INTR_OP_XLATE_VECTOR,
880 (int *)&hdlp->ih_vector) == PSM_FAILURE)
881 return (DDI_FAILURE);
882
883 /* Add the interrupt handler */
884 if (!add_avintr((void *)hdlp, ispec->intrspec_pri,
885 hdlp->ih_cb_func, DEVI(rdip)->devi_name, hdlp->ih_vector,
886 hdlp->ih_cb_arg1, hdlp->ih_cb_arg2, NULL, rdip))
887 return (DDI_FAILURE);
888 break;
889 case DDI_INTROP_DISABLE:
890 if ((ispec = isa_get_ispec(rdip, hdlp->ih_inum)) == NULL)
891 return (DDI_FAILURE);
892
893 /* Call psm_ops() to translate irq with the dip */
894 if (psm_intr_ops == NULL)
895 return (DDI_FAILURE);
896
897 ((ihdl_plat_t *)hdlp->ih_private)->ip_ispecp = ispec;
898 (void) (*psm_intr_ops)(rdip, hdlp,
899 PSM_INTR_OP_XLATE_VECTOR, (int *)&hdlp->ih_vector);
900
901 /* Remove the interrupt handler */
902 rem_avintr((void *)hdlp, ispec->intrspec_pri,
903 hdlp->ih_cb_func, hdlp->ih_vector);
904 break;
905 case DDI_INTROP_SETMASK:
906 if (psm_intr_ops == NULL)
907 return (DDI_FAILURE);
908
909 if ((*psm_intr_ops)(rdip, hdlp, PSM_INTR_OP_SET_MASK, NULL))
910 return (DDI_FAILURE);
911 break;
912 case DDI_INTROP_CLRMASK:
913 if (psm_intr_ops == NULL)
914 return (DDI_FAILURE);
915
916 if ((*psm_intr_ops)(rdip, hdlp, PSM_INTR_OP_CLEAR_MASK, NULL))
917 return (DDI_FAILURE);
918 break;
919 case DDI_INTROP_GETPENDING:
920 if (psm_intr_ops == NULL)
921 return (DDI_FAILURE);
922
923 if ((*psm_intr_ops)(rdip, hdlp, PSM_INTR_OP_GET_PENDING,
924 result)) {
925 *(int *)result = 0;
926 return (DDI_FAILURE);
927 }
928 break;
929 case DDI_INTROP_NAVAIL:
930 case DDI_INTROP_NINTRS:
931 *(int *)result = i_ddi_get_intx_nintrs(rdip);
932 if (*(int *)result == 0) {
933 return (DDI_FAILURE);
934 }
935 break;
936 case DDI_INTROP_SUPPORTED_TYPES:
937 *(int *)result = DDI_INTR_TYPE_FIXED; /* Always ... */
938 break;
939 default:
940 return (DDI_FAILURE);
941 }
942
943 return (DDI_SUCCESS);
944 }
945
946 /*
947 * Allocate interrupt vector for FIXED (legacy) type.
948 */
949 static int
950 isa_alloc_intr_fixed(dev_info_t *rdip, ddi_intr_handle_impl_t *hdlp,
951 void *result)
952 {
953 struct intrspec *ispec;
954 ddi_intr_handle_impl_t info_hdl;
955 int ret;
956 int free_phdl = 0;
957 apic_get_type_t type_info;
958
959 if (psm_intr_ops == NULL)
960 return (DDI_FAILURE);
961
962 if ((ispec = isa_get_ispec(rdip, hdlp->ih_inum)) == NULL)
963 return (DDI_FAILURE);
964
965 /*
966 * If the PSM module is "APIX" then pass the request for it
967 * to allocate the vector now.
968 */
969 bzero(&info_hdl, sizeof (ddi_intr_handle_impl_t));
970 info_hdl.ih_private = &type_info;
971 if ((*psm_intr_ops)(NULL, &info_hdl, PSM_INTR_OP_APIC_TYPE, NULL) ==
972 PSM_SUCCESS && strcmp(type_info.avgi_type, APIC_APIX_NAME) == 0) {
973 if (hdlp->ih_private == NULL) { /* allocate phdl structure */
974 free_phdl = 1;
975 i_ddi_alloc_intr_phdl(hdlp);
976 }
977 ((ihdl_plat_t *)hdlp->ih_private)->ip_ispecp = ispec;
978 ret = (*psm_intr_ops)(rdip, hdlp,
979 PSM_INTR_OP_ALLOC_VECTORS, result);
980 if (free_phdl) { /* free up the phdl structure */
981 free_phdl = 0;
982 i_ddi_free_intr_phdl(hdlp);
983 hdlp->ih_private = NULL;
984 }
985 } else {
986 /*
987 * No APIX module; fall back to the old scheme where the
988 * interrupt vector is allocated during ddi_enable_intr() call.
989 */
990 hdlp->ih_pri = ispec->intrspec_pri;
991 *(int *)result = hdlp->ih_scratch1;
992 ret = DDI_SUCCESS;
993 }
994
995 return (ret);
996 }
997
998 /*
999 * Free up interrupt vector for FIXED (legacy) type.
1000 */
1001 static int
1002 isa_free_intr_fixed(dev_info_t *rdip, ddi_intr_handle_impl_t *hdlp)
1003 {
1004 struct intrspec *ispec;
1005 ddi_intr_handle_impl_t info_hdl;
1006 int ret;
1007 apic_get_type_t type_info;
1008
1009 if (psm_intr_ops == NULL)
1010 return (DDI_FAILURE);
1011
1012 /*
1013 * If the PSM module is "APIX" then pass the request for it
1014 * to free up the vector now.
1015 */
1016 bzero(&info_hdl, sizeof (ddi_intr_handle_impl_t));
1017 info_hdl.ih_private = &type_info;
1018 if ((*psm_intr_ops)(NULL, &info_hdl, PSM_INTR_OP_APIC_TYPE, NULL) ==
1019 PSM_SUCCESS && strcmp(type_info.avgi_type, APIC_APIX_NAME) == 0) {
1020 if ((ispec = isa_get_ispec(rdip, hdlp->ih_inum)) == NULL)
1021 return (DDI_FAILURE);
1022 ((ihdl_plat_t *)hdlp->ih_private)->ip_ispecp = ispec;
1023 ret = (*psm_intr_ops)(rdip, hdlp,
1024 PSM_INTR_OP_FREE_VECTORS, NULL);
1025 } else {
1026 /*
1027 * No APIX module; fall back to the old scheme where
1028 * the interrupt vector was already freed during
1029 * ddi_disable_intr() call.
1030 */
1031 ret = DDI_SUCCESS;
1032 }
1033
1034 return (ret);
1035 }
1036
1037 static void
1038 isa_vendor(uint32_t id, char *vendor)
1039 {
1040 vendor[0] = '@' + ((id >> 26) & 0x1f);
1041 vendor[1] = '@' + ((id >> 21) & 0x1f);
1042 vendor[2] = '@' + ((id >> 16) & 0x1f);
1043 vendor[3] = 0;
1044 }
1045
1046 /*
1047 * Name a child
1048 */
1049 static int
1050 isa_name_child(dev_info_t *child, char *name, int namelen)
1051 {
1052 char vendor[8];
1053 int device;
1054 uint32_t serial;
1055 int func;
1056 int bustype;
1057 uint32_t base;
1058 int proplen;
1059 int pnpisa = 0;
1060 isa_regs_t *isa_regs;
1061
1062 void make_ddi_ppd(dev_info_t *, struct ddi_parent_private_data **);
1063
1064 /*
1065 * older drivers aren't expecting the "standard" device
1066 * node format used by the hardware nodes. these drivers
1067 * only expect their own properties set in their driver.conf
1068 * files. so they tell us not to call them with hardware
1069 * nodes by setting the property "ignore-hardware-nodes".
1070 */
1071 if (old_driver(child))
1072 return (DDI_FAILURE);
1073
1074 /*
1075 * Fill in parent-private data
1076 */
1077 if (ddi_get_parent_data(child) == NULL) {
1078 struct ddi_parent_private_data *pdptr;
1079 make_ddi_ppd(child, &pdptr);
1080 ddi_set_parent_data(child, pdptr);
1081 }
1082
1083 if (ndi_dev_is_persistent_node(child) == 0) {
1084 /*
1085 * For .conf nodes, generate name from parent private data
1086 */
1087 name[0] = '\0';
1088 if (sparc_pd_getnreg(child) > 0) {
1089 (void) snprintf(name, namelen, "%x,%x",
1090 (uint_t)sparc_pd_getreg(child, 0)->regspec_bustype,
1091 (uint_t)sparc_pd_getreg(child, 0)->regspec_addr);
1092 }
1093 return (DDI_SUCCESS);
1094 }
1095
1096 /*
1097 * For hw nodes, look up "reg" property
1098 */
1099 if (ddi_getlongprop(DDI_DEV_T_ANY, child, DDI_PROP_DONTPASS, "reg",
1100 (caddr_t)&isa_regs, &proplen) != DDI_PROP_SUCCESS) {
1101 return (DDI_FAILURE);
1102 }
1103
1104 /*
1105 * extract the device identifications
1106 */
1107 pnpisa = isa_regs[0].phys_hi & 0x80000000;
1108 if (pnpisa) {
1109 isa_vendor(isa_regs[0].phys_hi, vendor);
1110 device = isa_regs[0].phys_hi & 0xffff;
1111 serial = isa_regs[0].phys_lo;
1112 func = (isa_regs[0].size >> 24) & 0xff;
1113 if (func != 0)
1114 (void) snprintf(name, namelen, "pnp%s,%04x,%x,%x",
1115 vendor, device, serial, func);
1116 else
1117 (void) snprintf(name, namelen, "pnp%s,%04x,%x",
1118 vendor, device, serial);
1119 } else {
1120 bustype = isa_regs[0].phys_hi;
1121 base = isa_regs[0].phys_lo;
1122 (void) sprintf(name, "%x,%x", bustype, base);
1123 }
1124
1125 /*
1126 * free the memory allocated by ddi_getlongprop().
1127 */
1128 kmem_free(isa_regs, proplen);
1129
1130 return (DDI_SUCCESS);
1131 }
1132
1133 static int
1134 isa_initchild(dev_info_t *child)
1135 {
1136 char name[80];
1137
1138 if (isa_name_child(child, name, 80) != DDI_SUCCESS)
1139 return (DDI_FAILURE);
1140 ddi_set_name_addr(child, name);
1141
1142 if (ndi_dev_is_persistent_node(child) != 0)
1143 return (DDI_SUCCESS);
1144
1145 /*
1146 * This is a .conf node, try merge properties onto a
1147 * hw node with the same name.
1148 */
1149 if (ndi_merge_node(child, isa_name_child) == DDI_SUCCESS) {
1150 /*
1151 * Return failure to remove node
1152 */
1153 impl_ddi_sunbus_removechild(child);
1154 return (DDI_FAILURE);
1155 }
1156 /*
1157 * Cannot merge node, permit pseudo children
1158 */
1159 return (DDI_SUCCESS);
1160 }
1161
1162 /*
1163 * called when ACPI enumeration is not used
1164 */
1165 static void
1166 add_known_used_resources(void)
1167 {
1168 /* needs to be in increasing order */
1169 int intr[] = {0x1, 0x3, 0x4, 0x6, 0x7, 0xc};
1170 int dma[] = {0x2};
1171 int io[] = {0x60, 0x1, 0x64, 0x1, 0x2f8, 0x8, 0x378, 0x8, 0x3f0, 0x10,
1172 0x778, 0x4};
1173 dev_info_t *usedrdip;
1174
1175 usedrdip = ddi_find_devinfo(USED_RESOURCES, -1, 0);
1176
1177 if (usedrdip == NULL) {
1178 (void) ndi_devi_alloc_sleep(ddi_root_node(), USED_RESOURCES,
1179 (pnode_t)DEVI_SID_NODEID, &usedrdip);
1180 }
1181
1182 (void) ndi_prop_update_int_array(DDI_DEV_T_NONE, usedrdip,
1183 "interrupts", (int *)intr, (int)(sizeof (intr) / sizeof (int)));
1184 (void) ndi_prop_update_int_array(DDI_DEV_T_NONE, usedrdip,
1185 "io-space", (int *)io, (int)(sizeof (io) / sizeof (int)));
1186 (void) ndi_prop_update_int_array(DDI_DEV_T_NONE, usedrdip,
1187 "dma-channels", (int *)dma, (int)(sizeof (dma) / sizeof (int)));
1188 (void) ndi_devi_bind_driver(usedrdip, 0);
1189
1190 }
1191
1192 /*
1193 * Return non-zero if UART device exists.
1194 */
1195 static int
1196 uart_exists(ushort_t port)
1197 {
1198 outb(port + COM_SCR, (char)0x5a);
1199 outb(port + COM_ISR, (char)0x00);
1200 return (inb(port + COM_SCR) == (char)0x5a);
1201 }
1202
1203 static void
1204 isa_enumerate(int reprogram)
1205 {
1206 int circ, i;
1207 dev_info_t *xdip;
1208 dev_info_t *isa_dip = ddi_find_devinfo("isa", -1, 0);
1209
1210 struct regspec i8042_regs[] = {
1211 {1, 0x60, 0x1},
1212 {1, 0x64, 0x1}
1213 };
1214 int i8042_intrs[] = {0x1, 0xc};
1215 char *acpi_prop;
1216 int acpi_enum = 1; /* ACPI is default to be on */
1217 #if defined(__xpv)
1218 int cons, ttyn;
1219
1220 cons = console_hypervisor_dev_type(&ttyn);
1221 #endif
1222 if (reprogram || !isa_dip)
1223 return;
1224
1225 bzero(isa_extra_resource, MAX_EXTRA_RESOURCE * sizeof (struct regspec));
1226
1227 ndi_devi_enter(isa_dip, &circ);
1228
1229 if (ddi_prop_lookup_string(DDI_DEV_T_ANY, ddi_root_node(),
1230 DDI_PROP_DONTPASS, "acpi-enum", &acpi_prop) == DDI_PROP_SUCCESS) {
1231 acpi_enum = strcmp("off", acpi_prop);
1232 ddi_prop_free(acpi_prop);
1233 }
1234
1235 if (acpi_enum) {
1236 if (acpi_isa_device_enum(isa_dip)) {
1237 ndi_devi_exit(isa_dip, circ);
1238 if (isa_resource_setup() != NDI_SUCCESS) {
1239 cmn_err(CE_WARN, "isa nexus: isa "
1240 "resource setup failed");
1241 }
1242
1243 /* serial ports? */
1244 enumerate_BIOS_serial(isa_dip);
1245
1246 /* adjust parallel port size */
1247 adjust_prtsz(isa_dip);
1248
1249 isa_create_ranges_prop(isa_dip);
1250 return;
1251 }
1252 cmn_err(CE_NOTE, "!Solaris did not detect ACPI BIOS");
1253 }
1254 cmn_err(CE_NOTE, "!ACPI is off");
1255
1256 /* serial ports */
1257 for (i = 0; i < min_BIOS_serial; i++) {
1258 ushort_t addr = asy_regs[i].regspec_addr;
1259 if (!uart_exists(addr))
1260 continue;
1261 #if defined(__xpv)
1262 if (cons == CONS_TTY && ttyn == i)
1263 continue;
1264 #endif
1265 ndi_devi_alloc_sleep(isa_dip, "asy",
1266 (pnode_t)DEVI_SID_NODEID, &xdip);
1267 (void) ndi_prop_update_string(DDI_DEV_T_NONE, xdip,
1268 "compatible", "PNP0500");
1269 /* This should be gotten from master file: */
1270 (void) ndi_prop_update_string(DDI_DEV_T_NONE, xdip,
1271 "model", "Standard PC COM port");
1272 (void) ndi_prop_update_int_array(DDI_DEV_T_NONE, xdip,
1273 "reg", (int *)&asy_regs[i], 3);
1274 (void) ndi_prop_update_int(DDI_DEV_T_NONE, xdip,
1275 "interrupts", asy_intrs[i]);
1276 (void) ndi_devi_bind_driver(xdip, 0);
1277 /* Adjusting isa_extra here causes a kernel dump later. */
1278 }
1279
1280 /* i8042 node */
1281 ndi_devi_alloc_sleep(isa_dip, "i8042",
1282 (pnode_t)DEVI_SID_NODEID, &xdip);
1283 (void) ndi_prop_update_int_array(DDI_DEV_T_NONE, xdip,
1284 "reg", (int *)i8042_regs, 6);
1285 (void) ndi_prop_update_int_array(DDI_DEV_T_NONE, xdip,
1286 "interrupts", (int *)i8042_intrs, 2);
1287 (void) ndi_prop_update_string(DDI_DEV_T_NONE, xdip,
1288 "unit-address", "1,60");
1289 (void) ndi_devi_bind_driver(xdip, 0);
1290
1291 add_known_used_resources();
1292
1293 ndi_devi_exit(isa_dip, circ);
1294
1295 isa_create_ranges_prop(isa_dip);
1296 }
1297
1298 /*
1299 * On some machines, serial port 2 isn't listed in the ACPI table.
1300 * This function goes through the base I/O addresses and makes sure all
1301 * the serial ports there are in the dev_info tree. If any are missing,
1302 * this function will add them.
1303 */
1304
1305 static void
1306 enumerate_BIOS_serial(dev_info_t *isa_dip)
1307 {
1308 int i;
1309 dev_info_t *xdip;
1310 int found;
1311 int ret;
1312 struct regspec *tmpregs;
1313 int tmpregs_len;
1314 #if defined(__xpv)
1315 int cons, ttyn;
1316
1317 cons = console_hypervisor_dev_type(&ttyn);
1318 #endif
1319
1320 /*
1321 * Scan the base I/O addresses of the first four serial ports.
1322 */
1323 for (i = 0; i < num_BIOS_serial; i++) {
1324 ushort_t addr = asy_regs[i].regspec_addr;
1325
1326 /* Look for it in the dev_info tree */
1327 found = 0;
1328 for (xdip = ddi_get_child(isa_dip); xdip != NULL;
1329 xdip = ddi_get_next_sibling(xdip)) {
1330 if (strncmp(ddi_node_name(xdip), "asy", 3) != 0) {
1331 /* skip non asy */
1332 continue;
1333 }
1334
1335 /* Match by addr */
1336 ret = ddi_prop_lookup_int_array(DDI_DEV_T_ANY, xdip,
1337 DDI_PROP_DONTPASS, "reg", (int **)&tmpregs,
1338 (uint_t *)&tmpregs_len);
1339 if (ret != DDI_PROP_SUCCESS) {
1340 /* error */
1341 continue;
1342 }
1343
1344 if (tmpregs->regspec_addr == addr)
1345 found = 1;
1346
1347 /*
1348 * Free the memory allocated by
1349 * ddi_prop_lookup_int_array().
1350 */
1351 ddi_prop_free(tmpregs);
1352
1353 if (found) {
1354 if (asy_intr_override & 1<<i) {
1355 (void) ndi_prop_update_int(
1356 DDI_DEV_T_NONE, xdip,
1357 "interrupts", asy_intrs[i]);
1358 }
1359
1360 break;
1361 }
1362 }
1363
1364 /* If not found, then add it */
1365 if (!found && uart_exists(addr)) {
1366 ndi_devi_alloc_sleep(isa_dip, "asy",
1367 (pnode_t)DEVI_SID_NODEID, &xdip);
1368 (void) ndi_prop_update_string(DDI_DEV_T_NONE, xdip,
1369 "compatible", "PNP0500");
1370 /* This should be gotten from master file: */
1371 (void) ndi_prop_update_string(DDI_DEV_T_NONE, xdip,
1372 "model", "Standard PC COM port");
1373 (void) ndi_prop_update_int_array(DDI_DEV_T_NONE, xdip,
1374 "reg", (int *)&asy_regs[i], 3);
1375 (void) ndi_prop_update_int(DDI_DEV_T_NONE, xdip,
1376 "interrupts", asy_intrs[i]);
1377 (void) ndi_devi_bind_driver(xdip, 0);
1378
1379 ASSERT(isa_extra_count < MAX_EXTRA_RESOURCE);
1380 bcopy(&asy_regs[i],
1381 isa_extra_resource + isa_extra_count,
1382 sizeof (struct regspec));
1383 isa_extra_count++;
1384 }
1385 }
1386
1387 /*
1388 * An asy node may have been attached via ACPI enumeration, or
1389 * directly from this file. Check each serial port to see if it
1390 * is in use by the hypervisor. If it is in use, then remove
1391 * the node from the device tree.
1392 */
1393 #if defined(__xpv)
1394 i = 0;
1395
1396 for (xdip = ddi_get_child(isa_dip); xdip != NULL; ) {
1397 dev_info_t *curdip;
1398
1399 curdip = xdip;
1400 xdip = ddi_get_next_sibling(xdip);
1401
1402 if (strncmp(ddi_node_name(curdip), "asy", 3) != 0)
1403 continue;
1404
1405 if (cons == CONS_TTY && ttyn == i) {
1406 ret = ndi_devi_free(curdip);
1407 if (ret != DDI_SUCCESS) {
1408 cmn_err(CE_WARN,
1409 "could not remove asy%d node", i);
1410 }
1411
1412 cmn_err(CE_NOTE, "!asy%d unavailable, reserved"
1413 " to hypervisor", i);
1414 }
1415
1416 i++;
1417 }
1418 #endif
1419
1420 }
1421
1422 /*
1423 * Some machine comes with an illegal parallel port size of 3
1424 * bytes in ACPI, even parallel port mode is ECP.
1425 */
1426 #define DEFAULT_PRT_SIZE 8
1427 static void
1428 adjust_prtsz(dev_info_t *isa_dip)
1429 {
1430 dev_info_t *cdip;
1431 struct regspec *regs_p, *extreg_p;
1432 int regs_len, nreg, i;
1433 char *name;
1434
1435 for (cdip = ddi_get_child(isa_dip); cdip != NULL;
1436 cdip = ddi_get_next_sibling(cdip)) {
1437 name = ddi_node_name(cdip);
1438 if ((strncmp(name, "lp", 2) != 0) || (strnlen(name, 3) != 2))
1439 continue; /* skip non parallel */
1440
1441 if (ddi_prop_lookup_int_array(DDI_DEV_T_ANY, cdip,
1442 DDI_PROP_DONTPASS, "reg", (int **)®s_p,
1443 (uint_t *)®s_len) != DDI_PROP_SUCCESS)
1444 continue;
1445
1446 nreg = regs_len / (sizeof (struct regspec) / sizeof (int));
1447 for (i = 0; i < nreg; i++) {
1448 if (regs_p[i].regspec_size == DEFAULT_PRT_SIZE)
1449 continue;
1450
1451 ASSERT(isa_extra_count < MAX_EXTRA_RESOURCE);
1452 extreg_p = &isa_extra_resource[isa_extra_count++];
1453 extreg_p->regspec_bustype = ISA_ADDR_IO;
1454 extreg_p->regspec_addr = regs_p[i].regspec_addr;
1455 extreg_p->regspec_size = DEFAULT_PRT_SIZE;
1456 }
1457
1458 ddi_prop_free(regs_p);
1459 }
1460 }