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