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 2008 Sun Microsystems, Inc. All rights reserved. 23 * Use is subject to license terms. 24 */ 25 26 27 /* 28 * Starcat PCI SBBC Nexus Driver. 29 * 30 * This source code's compiled binary runs on both a Starcat System 31 * Controller (SSC) and a Starcat Domain. One of the SBBC hardware 32 * registers is read during attach(9e) in order to determine which 33 * environment the driver is executing on. 34 * 35 * On both the SSC and the Domain, this driver provides nexus driver 36 * services to its Device Tree children. Note that the children in 37 * each environment are not necessarily the same. 38 * 39 * This driver allows one concurrent open(2) of its associated device 40 * (/dev/sbbc0). The client uses the file descriptor to issue 41 * ioctl(2)'s in order to read and write from the 2MB (PCI) space 42 * reserved for "SBBC Internal Registers". Among other things, 43 * these registers consist of command/control/status registers for 44 * devices such as Console Bus, I2C, EPLD, IOSRAM, and JTAG. The 2MB 45 * space is very sparse; EINVAL is returned if a reserved or unaligned 46 * address is specified in the ioctl(2). 47 * 48 * Note that the 2MB region reserved for SBBC Internal Registers is 49 * a subset of the 128MB of PCI address space addressable by the SBBC 50 * ASIC. Address space outside of the 2MB (such as the 64MB reserved 51 * for the Console Bus) is not accessible via this driver. 52 * 53 * Also, note that the SBBC Internal Registers are only read and 54 * written by the SSC; no process on the Domain accesses these 55 * registers. As a result, the registers are unmapped (when running 56 * on the Domain) near the end of attach(9e) processing. This conserves 57 * kernel virtual address space resources (as one instance of the driver 58 * is created for each Domain-side IO assembly). (To be complete, only 59 * one instance of the driver is created on the SSC). 60 */ 61 62 #include <sys/types.h> 63 64 #include <sys/conf.h> /* req. by dev_ops flags MTSAFE etc. */ 65 #include <sys/ddi.h> 66 #include <sys/sunddi.h> 67 #include <sys/ddi_impldefs.h> 68 #include <sys/ddi_subrdefs.h> 69 #include <sys/pci.h> 70 #include <sys/pci/pci_nexus.h> 71 #include <sys/autoconf.h> 72 #include <sys/cmn_err.h> 73 #include <sys/param.h> 74 #include <sys/errno.h> 75 #include <sys/kmem.h> 76 #include <sys/debug.h> 77 #include <sys/sysmacros.h> 78 #include <sys/machsystm.h> 79 #include <sys/modctl.h> 80 #include <sys/stat.h> 81 82 83 #include <sys/sbbcreg.h> /* hw description */ 84 #include <sys/sbbcvar.h> /* driver description */ 85 #include <sys/sbbcio.h> /* ioctl description */ 86 87 #define getprop(dip, name, addr, intp) \ 88 ddi_getlongprop(DDI_DEV_T_ANY, (dip), DDI_PROP_DONTPASS, \ 89 (name), (caddr_t)(addr), (intp)) 90 91 /* driver entry point fn definitions */ 92 static int sbbc_open(dev_t *, int, int, cred_t *); 93 static int sbbc_close(dev_t, int, int, cred_t *); 94 static int sbbc_ioctl(dev_t, int, intptr_t, int, cred_t *, int *); 95 96 /* configuration entry point fn definitions */ 97 static int sbbc_getinfo(dev_info_t *, ddi_info_cmd_t, void *, void **); 98 static int sbbc_attach(dev_info_t *, ddi_attach_cmd_t); 99 static int sbbc_detach(dev_info_t *, ddi_detach_cmd_t); 100 101 /* local utility routines */ 102 /* 103 * NOTE - sbbc_offset_valid contains detailed address information taken from 104 * the Serengeti Architecture Programmer's Reference Manual. If any 105 * changes are made to the SBBC registers, this routine may need to be 106 * updated. 107 */ 108 static int sbbc_offset_valid(uint32_t offset); 109 110 /* 111 * function prototypes for bus ops routines: 112 */ 113 static int sbbc_busmap(dev_info_t *dip, dev_info_t *rdip, ddi_map_req_t *mp, 114 off_t offset, off_t len, caddr_t *addrp); 115 static int sbbc_ctlops(dev_info_t *dip, dev_info_t *rdip, 116 ddi_ctl_enum_t op, void *arg, void *result); 117 118 static int sbbc_intr_ops(dev_info_t *dip, dev_info_t *rdip, 119 ddi_intr_op_t intr_op, ddi_intr_handle_impl_t *hdlp, void *result); 120 static int sbbc_add_intr_impl(dev_info_t *dip, dev_info_t *rdip, 121 ddi_intr_op_t intr_op, ddi_intr_handle_impl_t *hdlp, void *result); 122 static int sbbc_remove_intr_impl(dev_info_t *dip, dev_info_t *rdip, 123 ddi_intr_op_t intr_op, ddi_intr_handle_impl_t *hdlp, void *result); 124 static int sbbc_update_intr_state(dev_info_t *dip, dev_info_t *rdip, 125 ddi_intr_op_t intr_op, ddi_intr_handle_impl_t *hdlp, void *result); 126 127 static int sbbc_apply_range(struct sbbcsoft *sbbc_p, dev_info_t *rdip, 128 sbbc_child_regspec_t *child_rp, pci_regspec_t *rp); 129 130 static int sbbc_init(struct sbbcsoft *); 131 132 static uint_t sbbc_intr_wrapper(caddr_t arg); 133 134 static int sbbc_get_ranges(struct sbbcsoft *); 135 static int sbbc_config4pci(struct sbbcsoft *); 136 static int sbbc_initchild(dev_info_t *, dev_info_t *, dev_info_t *); 137 static int sbbc_uninitchild(dev_info_t *, dev_info_t *); 138 static void sbbc_remove_reg_maps(struct sbbcsoft *); 139 140 /* debugging functions */ 141 #ifdef DEBUG 142 uint32_t sbbc_dbg_flags = 0x0; 143 static void sbbc_dbg(uint32_t flag, dev_info_t *dip, char *fmt, 144 uintptr_t a1, uintptr_t a2, uintptr_t a3, uintptr_t a4, uintptr_t a5); 145 static void sbbc_dump_devid(dev_info_t *, struct sbbcsoft *, int instance); 146 #endif 147 148 /* 149 * For tracing, allocate space for the trace buffer 150 */ 151 #if defined(SBBC_TRACE) 152 struct sbbctrace sbbctrace_buffer[NSBBCTRACE+1]; 153 struct sbbctrace *sbbctrace_ptr; 154 int sbbctrace_count; 155 #endif 156 157 /* 158 * Local declarations and variables 159 */ 160 161 static void *sbbcsoft_statep; 162 163 /* Determines whether driver is executing on System Controller or Domain */ 164 int sbbc_scmode = FALSE; 165 166 /* 167 * ops stuff. 168 */ 169 static struct bus_ops sbbc_bus_ops = { 170 BUSO_REV, 171 sbbc_busmap, 172 0, 173 0, 174 0, 175 NULL, /* (*bus_map_fault)() */ 176 ddi_no_dma_map, 177 ddi_no_dma_allochdl, 178 ddi_no_dma_freehdl, /* (*bus_dma_freehdl)() */ 179 ddi_no_dma_bindhdl, /* (*bus_dma_bindhdl)() */ 180 ddi_no_dma_unbindhdl, /* (*bus_dma_unbindhdl)() */ 181 ddi_no_dma_flush, /* (*bus_dma_flush)() */ 182 ddi_no_dma_win, /* (*bus_dma_win)() */ 183 ddi_no_dma_mctl, /* (*bus_dma_ctl)() */ 184 sbbc_ctlops, 185 ddi_bus_prop_op, 186 0, /* (*bus_get_eventcookie)(); */ 187 0, /* (*bus_add_eventcall)(); */ 188 0, /* (*bus_remove_eventcall)(); */ 189 0, /* (*bus_post_event)(); */ 190 0, /* (*bus_intr_ctl)(); */ 191 0, /* (*bus_config)(); */ 192 0, /* (*bus_unconfig)(); */ 193 0, /* (*bus_fm_init)(); */ 194 0, /* (*bus_fm_fini)(); */ 195 0, /* (*bus_fm_access_enter)(); */ 196 0, /* (*bus_fm_access_exit)(); */ 197 0, /* (*bus_power)(); */ 198 sbbc_intr_ops /* (*bus_intr_op)(); */ 199 }; 200 201 /* 202 * cb_ops 203 */ 204 static struct cb_ops sbbc_cb_ops = { 205 sbbc_open, /* cb_open */ 206 sbbc_close, /* cb_close */ 207 nodev, /* cb_strategy */ 208 nodev, /* cb_print */ 209 nodev, /* cb_dump */ 210 nodev, /* cb_read */ 211 nodev, /* cb_write */ 212 sbbc_ioctl, /* cb_ioctl */ 213 nodev, /* cb_devmap */ 214 nodev, /* cb_mmap */ 215 nodev, /* cb_segmap */ 216 nochpoll, /* cb_chpoll */ 217 ddi_prop_op, /* cb_prop_op */ 218 NULL, /* cb_stream */ 219 (int)(D_NEW | D_MP) /* cb_flag */ 220 }; 221 222 /* 223 * Declare ops vectors for auto configuration. 224 */ 225 struct dev_ops sbbc_ops = { 226 DEVO_REV, /* devo_rev */ 227 0, /* devo_refcnt */ 228 sbbc_getinfo, /* devo_getinfo */ 229 nulldev, /* devo_identify */ 230 nulldev, /* devo_probe */ 231 sbbc_attach, /* devo_attach */ 232 sbbc_detach, /* devo_detach */ 233 nodev, /* devo_reset */ 234 &sbbc_cb_ops, /* devo_cb_ops */ 235 &sbbc_bus_ops, /* devo_bus_ops */ 236 nulldev, /* devo_power */ 237 ddi_quiesce_not_supported, /* devo_quiesce */ 238 }; 239 240 /* 241 * Loadable module support. 242 */ 243 extern struct mod_ops mod_driverops; 244 245 static struct modldrv sbbcmodldrv = { 246 &mod_driverops, /* type of module - driver */ 247 "PCI Sbbc Nexus Driver", 248 &sbbc_ops, 249 }; 250 251 static struct modlinkage sbbcmodlinkage = { 252 MODREV_1, 253 &sbbcmodldrv, 254 NULL 255 }; 256 257 int 258 _init(void) 259 { 260 int error; 261 262 if ((error = ddi_soft_state_init(&sbbcsoft_statep, 263 sizeof (struct sbbcsoft), 1)) != 0) 264 return (error); 265 if ((error = mod_install(&sbbcmodlinkage)) != 0) 266 ddi_soft_state_fini(&sbbcsoft_statep); 267 268 return (error); 269 } 270 271 int 272 _fini(void) 273 { 274 int error; 275 276 if ((error = mod_remove(&sbbcmodlinkage)) == 0) 277 ddi_soft_state_fini(&sbbcsoft_statep); 278 279 return (error); 280 } 281 282 int 283 _info(struct modinfo *modinfop) 284 { 285 return (mod_info(&sbbcmodlinkage, modinfop)); 286 } 287 288 static int 289 sbbc_attach(dev_info_t *dip, ddi_attach_cmd_t cmd) 290 { 291 int instance; 292 char name[32]; 293 struct sbbcsoft *sbbcsoftp; 294 struct ddi_device_acc_attr attr; 295 uint32_t sbbc_id_reg; 296 297 attr.devacc_attr_version = DDI_DEVICE_ATTR_V0; 298 attr.devacc_attr_dataorder = DDI_STRICTORDER_ACC; 299 attr.devacc_attr_endian_flags = DDI_NEVERSWAP_ACC; 300 301 /* initialize tracing */ 302 SBBCTRACEINIT(); 303 304 SBBC_DBG0(SBBC_DBG_ATTACH, dip, "Attaching\n"); 305 306 instance = ddi_get_instance(dip); 307 switch (cmd) { 308 case DDI_ATTACH: 309 break; 310 case DDI_RESUME: 311 if (!(sbbcsoftp = 312 ddi_get_soft_state(sbbcsoft_statep, instance))) { 313 cmn_err(CE_WARN, "sbbc_attach:resume: unable " 314 "to acquire sbbcsoftp for instance %d", 315 instance); 316 return (DDI_FAILURE); 317 } 318 mutex_enter(&sbbcsoftp->umutex); 319 if (!sbbcsoftp->suspended) { 320 mutex_exit(&sbbcsoftp->umutex); 321 return (DDI_FAILURE); 322 } 323 sbbcsoftp->suspended = 0; 324 mutex_exit(&sbbcsoftp->umutex); 325 return (DDI_SUCCESS); 326 327 default: 328 return (DDI_FAILURE); 329 } 330 331 if (ddi_soft_state_zalloc(sbbcsoft_statep, instance) != 0) { 332 cmn_err(CE_WARN, "sbbc_attach: Unable to allocate statep " 333 "for instance %d", instance); 334 return (DDI_FAILURE); 335 } 336 337 sbbcsoftp = ddi_get_soft_state(sbbcsoft_statep, instance); 338 339 if (sbbcsoftp == NULL) { 340 cmn_err(CE_WARN, "sbbc_attach: Unable to acquire " 341 "sbbcsoftp for instance %d", instance); 342 ddi_soft_state_free(sbbcsoft_statep, instance); 343 return (DDI_FAILURE); 344 } 345 346 sbbcsoftp->instance = instance; 347 sbbcsoftp->dip = dip; 348 sbbcsoftp->oflag = FALSE; 349 350 /* 351 * Read our ranges property from OBP to map children space. 352 * And setup the internal structure for a later use when 353 * a child gets initialized. 354 */ 355 if (sbbc_get_ranges(sbbcsoftp)) { 356 cmn_err(CE_WARN, "sbbc_attach: Unable to read sbbc " 357 "ranges from OBP %d", instance); 358 ddi_soft_state_free(sbbcsoft_statep, instance); 359 return (DDI_FAILURE); 360 } 361 362 if (sbbc_config4pci(sbbcsoftp)) { 363 cmn_err(CE_WARN, "sbbc_attach: Unable to configure " 364 "sbbc on PCI %d", instance); 365 kmem_free(sbbcsoftp->rangep, sbbcsoftp->range_len); 366 ddi_soft_state_free(sbbcsoft_statep, instance); 367 return (DDI_FAILURE); 368 } 369 370 mutex_init(&sbbcsoftp->umutex, NULL, MUTEX_DRIVER, (void *)NULL); 371 mutex_init(&sbbcsoftp->sbbc_intr_mutex, NULL, 372 MUTEX_DRIVER, (void *)NULL); 373 374 /* Map SBBC's Internal Registers */ 375 if (ddi_regs_map_setup(dip, 1, (caddr_t *)&sbbcsoftp->pci_sbbc_map, 376 offsetof(struct pci_sbbc, sbbc_internal_regs), 377 sizeof (struct sbbc_regs_map), &attr, 378 &sbbcsoftp->pci_sbbc_map_handle) != DDI_SUCCESS) { 379 cmn_err(CE_WARN, "(%d):sbbc_attach failed to map sbbc_reg", 380 instance); 381 goto failed; 382 } 383 384 SBBC_DBG1(SBBC_DBG_ATTACH, dip, "Mapped sbbc at %lx\n", 385 sbbcsoftp->pci_sbbc_map); 386 #ifdef DEBUG 387 sbbc_dump_devid(dip, sbbcsoftp, instance); 388 #endif 389 /* 390 * Read a hardware register to determine if we are executing on 391 * a Starcat System Controller or a Starcat Domain. 392 */ 393 sbbc_id_reg = ddi_get32(sbbcsoftp->pci_sbbc_map_handle, 394 &sbbcsoftp->pci_sbbc_map->device_conf); 395 396 if (sbbc_id_reg & SBBC_SC_MODE) { 397 sbbc_scmode = TRUE; 398 SBBC_DBG1(SBBC_DBG_ATTACH, dip, "SBBC(%d) nexus running " 399 "in System Controller Mode.\n", instance); 400 401 /* initialize SBBC ASIC */ 402 if (!sbbc_init(sbbcsoftp)) { 403 goto failed; 404 } 405 } else { 406 sbbc_scmode = FALSE; 407 SBBC_DBG1(SBBC_DBG_ATTACH, dip, "SBBC(%d) nexus " 408 "running in Domain Mode.\n", instance); 409 410 /* initialize SBBC ASIC before we unmap registers */ 411 if (!sbbc_init(sbbcsoftp)) { 412 goto failed; 413 } 414 415 /* 416 * Access to SBBC registers is no longer needed. Unmap 417 * the registers to conserve kernel virtual address space. 418 */ 419 SBBC_DBG1(SBBC_DBG_ATTACH, dip, "SBBC(%d): unmap " 420 "SBBC registers\n", instance); 421 sbbc_remove_reg_maps(sbbcsoftp); 422 sbbcsoftp->pci_sbbc_map = NULL; 423 } 424 425 (void) sprintf(name, "sbbc%d", instance); 426 427 if (ddi_create_minor_node(dip, name, S_IFCHR, instance, NULL, 428 NULL) == DDI_FAILURE) { 429 ddi_remove_minor_node(dip, NULL); 430 goto failed; 431 } 432 433 ddi_report_dev(dip); 434 435 SBBC_DBG0(SBBC_DBG_ATTACH, dip, "Attached successfully\n"); 436 437 return (DDI_SUCCESS); 438 439 failed: 440 mutex_destroy(&sbbcsoftp->sbbc_intr_mutex); 441 mutex_destroy(&sbbcsoftp->umutex); 442 443 sbbc_remove_reg_maps(sbbcsoftp); 444 kmem_free(sbbcsoftp->rangep, sbbcsoftp->range_len); 445 ddi_soft_state_free(sbbcsoft_statep, instance); 446 447 SBBC_DBG0(SBBC_DBG_ATTACH, dip, "Attach failed\n"); 448 449 return (DDI_FAILURE); 450 } 451 452 static int 453 sbbc_detach(dev_info_t *dip, ddi_detach_cmd_t cmd) 454 { 455 int instance; 456 struct sbbcsoft *sbbcsoftp; 457 458 SBBCTRACE(sbbc_detach, 'DETA', dip); 459 460 instance = ddi_get_instance(dip); 461 462 switch (cmd) { 463 case DDI_DETACH: 464 break; 465 466 case DDI_SUSPEND: 467 if (!(sbbcsoftp = 468 ddi_get_soft_state(sbbcsoft_statep, instance))) { 469 cmn_err(CE_WARN, 470 "sbbc_detach: unable to get softstate %p", 471 (void *)sbbcsoftp); 472 return (DDI_FAILURE); 473 } 474 mutex_enter(&sbbcsoftp->umutex); 475 if (sbbcsoftp->suspended) { 476 mutex_exit(&sbbcsoftp->umutex); 477 return (DDI_FAILURE); 478 } 479 sbbcsoftp->suspended = 1; 480 mutex_exit(&sbbcsoftp->umutex); 481 return (DDI_SUCCESS); 482 483 default: 484 return (DDI_FAILURE); 485 } 486 487 if (!(sbbcsoftp = ddi_get_soft_state(sbbcsoft_statep, instance))) { 488 cmn_err(CE_WARN, "sbbc_detach: unable to get softstate %p", 489 (void *)sbbcsoftp); 490 return (DDI_FAILURE); 491 } 492 493 ddi_remove_minor_node(dip, NULL); 494 495 mutex_destroy(&sbbcsoftp->sbbc_intr_mutex); 496 mutex_destroy(&sbbcsoftp->umutex); 497 498 sbbc_remove_reg_maps(sbbcsoftp); 499 kmem_free(sbbcsoftp->rangep, sbbcsoftp->range_len); 500 501 ddi_soft_state_free(sbbcsoft_statep, instance); 502 503 return (DDI_SUCCESS); 504 505 } 506 507 508 /* 509 * Translate child's address into parents. 510 */ 511 static int 512 sbbc_busmap(dev_info_t *dip, dev_info_t *rdip, ddi_map_req_t *mp, 513 off_t off, off_t len, caddr_t *addrp) 514 { 515 struct sbbcsoft *sbbcsoftp; 516 sbbc_child_regspec_t *child_rp, *child_regs; 517 pci_regspec_t pci_reg; 518 ddi_map_req_t p_map_request; 519 int rnumber, i, n; 520 int rval = DDI_SUCCESS; 521 int instance; 522 523 SBBC_DBG4(SBBC_DBG_BUSMAP, dip, 524 "mapping child %s, type %llx, off %llx, len %llx\n", 525 ddi_driver_name(rdip), mp->map_type, off, len); 526 527 SBBCTRACE(sbbc_busmap, 'BMAP', mp); 528 529 /* 530 * Handle the mapping according to its type. 531 */ 532 instance = ddi_get_instance(dip); 533 if (!(sbbcsoftp = ddi_get_soft_state(sbbcsoft_statep, instance))) 534 return (DDI_FAILURE); 535 536 switch (mp->map_type) { 537 case DDI_MT_REGSPEC: 538 539 /* 540 * We assume the register specification is in sbbc format. 541 * We must convert it into a PCI format regspec and pass 542 * the request to our parent. 543 */ 544 child_rp = (sbbc_child_regspec_t *)mp->map_obj.rp; 545 break; 546 547 case DDI_MT_RNUMBER: 548 549 /* 550 * map_type 0 551 * Get the "reg" property from the device node and convert 552 * it to our parent's format. 553 */ 554 rnumber = mp->map_obj.rnumber; 555 556 /* get the requester's reg property */ 557 if (ddi_getlongprop(DDI_DEV_T_ANY, rdip, DDI_PROP_DONTPASS, 558 "reg", (caddr_t)&child_regs, &i) != DDI_SUCCESS) { 559 cmn_err(CE_WARN, 560 "SBBC: couldn't get %s ranges property %d", 561 ddi_get_name(sbbcsoftp->dip), instance); 562 return (DDI_ME_RNUMBER_RANGE); 563 } 564 n = i / sizeof (sbbc_child_regspec_t); 565 566 if (rnumber < 0 || rnumber >= n) { 567 kmem_free(child_regs, i); 568 return (DDI_ME_RNUMBER_RANGE); 569 } 570 child_rp = &child_regs[rnumber]; 571 break; 572 573 default: 574 return (DDI_ME_INVAL); 575 576 } 577 578 /* Adjust our reg property with offset and length */ 579 child_rp->addr_low += off; 580 581 if (len) 582 child_rp->size = len; 583 584 /* 585 * Combine this reg prop. into our parents PCI address using the ranges 586 * property. 587 */ 588 rval = sbbc_apply_range(sbbcsoftp, rdip, child_rp, &pci_reg); 589 590 if (mp->map_type == DDI_MT_RNUMBER) 591 kmem_free(child_regs, i); 592 593 if (rval != DDI_SUCCESS) 594 return (rval); 595 596 p_map_request = *mp; 597 p_map_request.map_type = DDI_MT_REGSPEC; 598 p_map_request.map_obj.rp = (struct regspec *)&pci_reg; 599 600 /* Send it to PCI nexus to map into the PCI space */ 601 rval = ddi_map(dip, &p_map_request, 0, 0, addrp); 602 603 return (rval); 604 605 } 606 607 608 /* new intr_ops structure */ 609 static int 610 sbbc_intr_ops(dev_info_t *dip, dev_info_t *rdip, ddi_intr_op_t intr_op, 611 ddi_intr_handle_impl_t *hdlp, void *result) 612 { 613 int ret = DDI_SUCCESS; 614 615 switch (intr_op) { 616 case DDI_INTROP_GETCAP: 617 *(int *)result = DDI_INTR_FLAG_LEVEL; 618 break; 619 case DDI_INTROP_ALLOC: 620 *(int *)result = hdlp->ih_scratch1; 621 break; 622 case DDI_INTROP_FREE: 623 break; 624 case DDI_INTROP_GETPRI: 625 if (hdlp->ih_pri == 0) { 626 hdlp->ih_pri = 0x1; 627 628 cmn_err(CE_WARN, "%s%d assigning default interrupt " 629 "level %d for device %s%d", ddi_driver_name(dip), 630 ddi_get_instance(dip), hdlp->ih_pri, 631 ddi_driver_name(rdip), ddi_get_instance(rdip)); 632 } 633 634 *(int *)result = hdlp->ih_pri; 635 636 break; 637 case DDI_INTROP_ADDISR: 638 ret = sbbc_add_intr_impl(dip, rdip, intr_op, hdlp, result); 639 break; 640 case DDI_INTROP_REMISR: 641 ret = sbbc_remove_intr_impl(dip, rdip, intr_op, hdlp, result); 642 break; 643 case DDI_INTROP_ENABLE: 644 ret = sbbc_update_intr_state(dip, rdip, intr_op, hdlp, &result); 645 break; 646 case DDI_INTROP_DISABLE: 647 ret = sbbc_update_intr_state(dip, rdip, intr_op, hdlp, &result); 648 break; 649 case DDI_INTROP_NINTRS: 650 case DDI_INTROP_NAVAIL: 651 *(int *)result = i_ddi_get_intx_nintrs(rdip); 652 break; 653 case DDI_INTROP_SUPPORTED_TYPES: 654 /* PCI nexus driver supports only fixed interrupts */ 655 *(int *)result = i_ddi_get_intx_nintrs(rdip) ? 656 DDI_INTR_TYPE_FIXED : 0; 657 break; 658 default: 659 ret = DDI_ENOTSUP; 660 break; 661 } 662 663 return (ret); 664 } 665 666 667 static int 668 sbbc_add_intr_impl(dev_info_t *dip, dev_info_t *rdip, ddi_intr_op_t intr_op, 669 ddi_intr_handle_impl_t *hdlp, void *result) 670 { 671 sbbcsoft_t *sbbcsoftp; 672 sbbc_child_intr_t *childintr; 673 int instance, i, rval = DDI_SUCCESS; 674 675 SBBC_DBG2(SBBC_DBG_INTR, dip, 676 "add: rdip 0x%llx hdlp 0x%llx\n", rdip, hdlp); 677 678 /* insert the sbbc isr wrapper instead */ 679 instance = ddi_get_instance(dip); 680 if (!(sbbcsoftp = ddi_get_soft_state(sbbcsoft_statep, instance))) 681 return (DDI_FAILURE); 682 683 childintr = kmem_zalloc(sizeof (struct sbbc_child_intr), KM_SLEEP); 684 685 childintr->name = ddi_get_name(rdip); 686 childintr->inum = hdlp->ih_inum; 687 childintr->intr_handler = hdlp->ih_cb_func; 688 childintr->arg1 = hdlp->ih_cb_arg1; 689 childintr->arg2 = hdlp->ih_cb_arg2; 690 childintr->status = SBBC_INTR_STATE_DISABLE; 691 692 for (i = 0; i < MAX_SBBC_DEVICES; i++) { 693 if (sbbcsoftp->child_intr[i] == 0) { 694 sbbcsoftp->child_intr[i] = childintr; 695 break; 696 } 697 } 698 699 DDI_INTR_ASSIGN_HDLR_N_ARGS(hdlp, 700 (ddi_intr_handler_t *)sbbc_intr_wrapper, 701 (caddr_t)sbbcsoftp, NULL); 702 703 if ((rval = i_ddi_intr_ops(dip, rdip, intr_op, 704 hdlp, result)) != DDI_SUCCESS) { 705 cmn_err(CE_WARN, "sbbc%d: failed to add intr for %s", 706 instance, ddi_get_name(rdip)); 707 kmem_free(childintr, sizeof (struct sbbc_child_intr)); 708 sbbcsoftp->child_intr[i] = NULL; 709 } 710 711 /* 712 * Restore original interrupt handler 713 * and arguments in interrupt handle. 714 */ 715 DDI_INTR_ASSIGN_HDLR_N_ARGS(hdlp, childintr->intr_handler, 716 childintr->arg1, childintr->arg2); 717 718 return (rval); 719 } 720 721 static int 722 sbbc_remove_intr_impl(dev_info_t *dip, dev_info_t *rdip, ddi_intr_op_t intr_op, 723 ddi_intr_handle_impl_t *hdlp, void *result) 724 { 725 sbbcsoft_t *sbbcsoftp; 726 sbbc_child_intr_t *childintr; 727 int instance, i, rval = DDI_SUCCESS; 728 729 SBBC_DBG2(SBBC_DBG_INTR, dip, 730 "remove: rdip 0x%llx hdlp 0x%llx\n", rdip, hdlp); 731 732 instance = ddi_get_instance(dip); 733 if (!(sbbcsoftp = ddi_get_soft_state(sbbcsoft_statep, instance))) 734 return (DDI_FAILURE); 735 736 /* remove the sbbc isr wrapper instead */ 737 for (i = 0; i < MAX_SBBC_DEVICES; i++) { 738 if (sbbcsoftp->child_intr[i]) { 739 childintr = sbbcsoftp->child_intr[i]; 740 if (childintr->status == SBBC_INTR_STATE_DISABLE && 741 childintr->name == ddi_get_name(rdip)) { 742 /* put back child's inum */ 743 hdlp->ih_inum = childintr->inum; 744 break; 745 } 746 } 747 } 748 749 if (i >= MAX_SBBC_DEVICES) { 750 cmn_err(CE_WARN, "sbbc%d:obound failed to remove intr for %s", 751 instance, ddi_get_name(rdip)); 752 return (DDI_FAILURE); 753 } 754 755 if ((rval = i_ddi_intr_ops(dip, rdip, intr_op, 756 hdlp, result)) != DDI_SUCCESS) { 757 cmn_err(CE_WARN, "sbbc%d: failed to remove intr for %s", 758 instance, ddi_get_name(rdip)); 759 return (rval); 760 } 761 762 kmem_free(childintr, sizeof (struct sbbc_child_intr)); 763 sbbcsoftp->child_intr[i] = NULL; 764 765 return (rval); 766 } 767 768 769 static int 770 sbbc_update_intr_state(dev_info_t *dip, dev_info_t *rdip, ddi_intr_op_t intr_op, 771 ddi_intr_handle_impl_t *hdlp, void *result) 772 { 773 sbbcsoft_t *sbbcsoftp; 774 sbbc_child_intr_t *childintr; 775 int instance, i; 776 int ret = DDI_SUCCESS; 777 778 SBBC_DBG2(SBBC_DBG_INTR, dip, "sbbc_update_intr_state: " 779 "rdip 0x%llx hdlp 0x%llx state 0x%x\n", rdip, hdlp); 780 781 instance = ddi_get_instance(dip); 782 if (!(sbbcsoftp = ddi_get_soft_state(sbbcsoft_statep, instance))) 783 return (DDI_FAILURE); 784 785 for (i = 0; i < MAX_SBBC_DEVICES; i++) { 786 if (sbbcsoftp->child_intr[i]) { 787 childintr = sbbcsoftp->child_intr[i]; 788 if (childintr->name == ddi_get_name(rdip)) 789 break; 790 } 791 } 792 793 if (i >= MAX_SBBC_DEVICES) { 794 cmn_err(CE_WARN, "sbbc%d: failed to update intr state for %s", 795 instance, ddi_get_name(rdip)); 796 return (DDI_FAILURE); 797 } 798 799 if ((ret = i_ddi_intr_ops(dip, rdip, intr_op, 800 hdlp, result)) != DDI_SUCCESS) { 801 cmn_err(CE_WARN, "sbbc%d: failed to update intr state for %s", 802 instance, ddi_get_name(rdip)); 803 return (ret); 804 } 805 806 /* Update the interrupt state */ 807 childintr->status = (intr_op == DDI_INTROP_ENABLE) ? 808 SBBC_INTR_STATE_ENABLE : SBBC_INTR_STATE_DISABLE; 809 810 return (ret); 811 } 812 813 814 /* 815 * This entry point is called before a child's probe or attach is called. 816 * The arg pointer points to child's dev_info_t structure. 817 */ 818 static int 819 sbbc_ctlops(dev_info_t *dip, dev_info_t *rdip, ddi_ctl_enum_t op, 820 void *arg, void *result) 821 { 822 sbbc_child_regspec_t *child_rp; 823 int i, n; 824 825 SBBC_DBG3(SBBC_DBG_CTLOPS, dip, 826 "Initializing %s, arg %x, op %x\n", 827 ddi_driver_name(rdip), arg, op); 828 829 SBBCTRACE(sbbc_ctlops, 'CTLO', arg); 830 831 switch (op) { 832 case DDI_CTLOPS_INITCHILD: { 833 return (sbbc_initchild(dip, rdip, (dev_info_t *)arg)); 834 } 835 836 case DDI_CTLOPS_UNINITCHILD: { 837 return (sbbc_uninitchild(rdip, (dev_info_t *)arg)); 838 } 839 840 case DDI_CTLOPS_REPORTDEV: 841 842 cmn_err(CE_CONT, "?%s%d at %s%d: offset %s\n", 843 ddi_driver_name(rdip), ddi_get_instance(rdip), 844 ddi_driver_name(dip), ddi_get_instance(dip), 845 ddi_get_name_addr(rdip)); 846 return (DDI_SUCCESS); 847 848 case DDI_CTLOPS_REGSIZE: 849 850 if (getprop(rdip, "reg", &child_rp, &i) != DDI_SUCCESS) { 851 return (DDI_FAILURE); 852 } 853 n = i / sizeof (sbbc_child_regspec_t); 854 if (*(int *)arg < 0 || *(int *)arg >= n) { 855 kmem_free(child_rp, i); 856 return (DDI_FAILURE); 857 } 858 *((off_t *)result) = child_rp[*(int *)arg].size; 859 kmem_free(child_rp, i); 860 return (DDI_SUCCESS); 861 862 case DDI_CTLOPS_NREGS: 863 864 if (getprop(rdip, "reg", &child_rp, &i) != DDI_SUCCESS) { 865 return (DDI_FAILURE); 866 } 867 *((uint_t *)result) = i / sizeof (sbbc_child_regspec_t); 868 kmem_free(child_rp, i); 869 return (DDI_SUCCESS); 870 } 871 872 /* 873 * Now pass the request up to our parent. 874 */ 875 SBBC_DBG0(SBBC_DBG_CTLOPS, dip, "Calling ddi_ctlops\n"); 876 877 return (ddi_ctlops(dip, rdip, op, arg, result)); 878 } 879 880 881 /* 882 * The following routine uses ranges property, that was read earlier, and 883 * takes child's reg property, and computes the complete address and size 884 * for the PCI parent to map. 885 */ 886 static int 887 sbbc_apply_range(struct sbbcsoft *sbbc_p, dev_info_t *rdip, 888 sbbc_child_regspec_t *child_rp, pci_regspec_t *rp) 889 { 890 int b; 891 int rval = DDI_SUCCESS; 892 struct sbbc_pci_rangespec *rangep = sbbc_p->rangep; 893 int nrange = sbbc_p->range_cnt; 894 895 SBBC_DBG4(SBBC_DBG_MAPRANGES, rdip, 896 "Applying ranges for %s, rangep %llx, child_rp %llx, range %x\n", 897 ddi_driver_name(rdip), sbbc_p->rangep, child_rp, nrange); 898 899 SBBCTRACE(sbbc_apply_range, 'APPL', sbbc_p); 900 901 for (b = 0; b < nrange; ++b, ++rangep) { 902 903 /* Make sure the correct range is being mapped */ 904 if (child_rp->addr_hi == rangep->sbbc_phys_hi) 905 /* See if we fit in this range */ 906 if ((child_rp->addr_low >= 907 rangep->sbbc_phys_low) && 908 ((child_rp->addr_low + child_rp->size - 1) 909 <= (rangep->sbbc_phys_low + 910 rangep->rng_size - 1))) { 911 uint_t addr_offset = child_rp->addr_low - 912 rangep->sbbc_phys_low; 913 /* 914 * Use the range entry to translate 915 * the SBBC physical address into the 916 * parents PCI space. 917 */ 918 rp->pci_phys_hi = 919 rangep->pci_phys_hi; 920 rp->pci_phys_mid = rangep->pci_phys_mid; 921 rp->pci_phys_low = 922 rangep->pci_phys_low + addr_offset; 923 rp->pci_size_hi = 0; 924 rp->pci_size_low = 925 min(child_rp->size, (rangep->rng_size - 926 addr_offset)); 927 928 break; 929 } 930 } 931 932 if (b == nrange) { 933 cmn_err(CE_WARN, "out_of_range %s", ddi_get_name(rdip)); 934 return (DDI_ME_REGSPEC_RANGE); 935 } 936 937 return (rval); 938 } 939 940 941 /* 942 * The following routine reads sbbc's ranges property from OBP and sets up 943 * its soft structure with it. 944 */ 945 static int 946 sbbc_get_ranges(struct sbbcsoft *sbbcsoftp) 947 { 948 struct sbbc_pci_rangespec *rangep; 949 int range_len, nrange; 950 951 if (ddi_getlongprop(DDI_DEV_T_ANY, sbbcsoftp->dip, DDI_PROP_DONTPASS, 952 "ranges", (caddr_t)&rangep, &range_len) != DDI_SUCCESS) { 953 cmn_err(CE_WARN, "SBBC: couldn't get %s ranges property %d", 954 ddi_get_name(sbbcsoftp->dip), sbbcsoftp->instance); 955 return (DDI_ME_REGSPEC_RANGE); 956 } 957 958 nrange = range_len / sizeof (struct sbbc_pci_rangespec); 959 960 if (!nrange) { 961 kmem_free(rangep, range_len); 962 return (DDI_FAILURE); 963 } 964 965 /* setup the soft structure with ranges info. */ 966 sbbcsoftp->rangep = rangep; 967 sbbcsoftp->range_cnt = nrange; 968 sbbcsoftp->range_len = range_len; 969 970 return (DDI_SUCCESS); 971 } 972 973 974 /* 975 * Configure the SBBC for PCI 976 */ 977 static int 978 sbbc_config4pci(struct sbbcsoft *sbbcsoftp) 979 { 980 ddi_acc_handle_t conf_handle; 981 uint16_t comm, vendid, devid, stat; 982 uint8_t revid; 983 984 #ifdef DEBUG 985 if (sbbc_dbg_flags & SBBC_DBG_PCICONF) { 986 cmn_err(CE_CONT, 987 "sbbc_config4pci: sbbcsoftp %p\n", (void *)sbbcsoftp); 988 } 989 #endif 990 if (pci_config_setup(sbbcsoftp->dip, &conf_handle) != DDI_SUCCESS) 991 return (1); 992 993 vendid = pci_config_get16(conf_handle, PCI_CONF_VENID); 994 devid = pci_config_get16(conf_handle, PCI_CONF_DEVID); 995 comm = pci_config_get16(conf_handle, PCI_CONF_COMM); 996 stat = pci_config_get16(conf_handle, PCI_CONF_STAT); 997 revid = pci_config_get8(conf_handle, PCI_CONF_REVID); 998 999 #ifdef DEBUG 1000 if (sbbc_dbg_flags & SBBC_DBG_PCICONF) { 1001 cmn_err(CE_CONT, 1002 "SBBC vendid %x, devid %x, comm %x, stat %x, revid %x\n", 1003 vendid, devid, comm, stat, revid); 1004 } 1005 #endif 1006 comm = (PCI_COMM_ME | PCI_COMM_MAE | PCI_COMM_SERR_ENABLE | 1007 PCI_COMM_PARITY_DETECT); 1008 1009 pci_config_put16(conf_handle, PCI_CONF_COMM, comm); 1010 1011 comm = pci_config_get16(conf_handle, PCI_CONF_COMM); 1012 1013 #ifdef DEBUG 1014 if (sbbc_dbg_flags & SBBC_DBG_PCICONF) { 1015 cmn_err(CE_CONT, "comm %x\n", comm); 1016 } 1017 #endif 1018 pci_config_teardown(&conf_handle); 1019 1020 return (0); 1021 } 1022 1023 1024 /* ARGSUSED0 */ 1025 int 1026 sbbc_getinfo(dev_info_t *dip, ddi_info_cmd_t infocmd, void *arg, void **result) 1027 { 1028 dev_t dev = (dev_t)arg; 1029 struct sbbcsoft *sbbcsoftp; 1030 int instance, ret; 1031 1032 instance = getminor(dev); 1033 1034 SBBCTRACE(sbbc_getinfo, 'GINF', instance); 1035 1036 switch (infocmd) { 1037 case DDI_INFO_DEVT2DEVINFO: 1038 sbbcsoftp = (struct sbbcsoft *) 1039 ddi_get_soft_state(sbbcsoft_statep, instance); 1040 if (sbbcsoftp == NULL) { 1041 *result = (void *) NULL; 1042 ret = DDI_FAILURE; 1043 } else { 1044 *result = sbbcsoftp->dip; 1045 ret = DDI_SUCCESS; 1046 } 1047 break; 1048 case DDI_INFO_DEVT2INSTANCE: 1049 *result = (void *)(uintptr_t)instance; 1050 ret = DDI_SUCCESS; 1051 break; 1052 default: 1053 ret = DDI_FAILURE; 1054 break; 1055 } 1056 1057 return (ret); 1058 } 1059 1060 /*ARGSUSED1*/ 1061 static int 1062 sbbc_open(dev_t *dev, int flag, int otype, cred_t *credp) 1063 { 1064 struct sbbcsoft *sbbcsoftp; 1065 int instance; 1066 1067 /* check privilege of caller process */ 1068 if (drv_priv(credp)) { 1069 return (EPERM); 1070 } 1071 1072 instance = getminor(*dev); 1073 if (instance < 0) 1074 return (ENXIO); 1075 sbbcsoftp = (struct sbbcsoft *)ddi_get_soft_state(sbbcsoft_statep, 1076 instance); 1077 SBBCTRACE(sbbc_open, 'OPEN', sbbcsoftp); 1078 1079 if (sbbcsoftp == NULL) 1080 return (ENXIO); 1081 1082 mutex_enter(&sbbcsoftp->umutex); 1083 1084 /* check for exclusive access */ 1085 if ((sbbcsoftp->oflag == TRUE)) { 1086 mutex_exit(&sbbcsoftp->umutex); 1087 return (EBUSY); 1088 } 1089 sbbcsoftp->oflag = TRUE; 1090 1091 mutex_exit(&sbbcsoftp->umutex); 1092 1093 return (0); 1094 } 1095 1096 /*ARGSUSED1*/ 1097 static int 1098 sbbc_close(dev_t dev, int flag, int otype, cred_t *credp) 1099 { 1100 struct sbbcsoft *sbbcsoftp; 1101 int instance; 1102 1103 instance = getminor(dev); 1104 if (instance < 0) 1105 return (ENXIO); 1106 sbbcsoftp = (struct sbbcsoft *)ddi_get_soft_state(sbbcsoft_statep, 1107 instance); 1108 /* wait till all output activity has ceased */ 1109 1110 mutex_enter(&sbbcsoftp->umutex); 1111 1112 SBBCTRACE(sbbc_close, 'CLOS', sbbcsoftp); 1113 1114 sbbcsoftp->oflag = FALSE; 1115 1116 mutex_exit(&sbbcsoftp->umutex); 1117 1118 return (0); 1119 } 1120 1121 /*ARGSUSED2*/ 1122 static int 1123 sbbc_ioctl(dev_t dev, int cmd, intptr_t arg, int mode, cred_t *credp, 1124 int *rvalp) 1125 { 1126 struct sbbcsoft *sbbcsoftp; 1127 1128 SBBCTRACE(sbbc_ioctl, 'IOCT', arg); 1129 1130 sbbcsoftp = ddi_get_soft_state(sbbcsoft_statep, getminor(dev)); 1131 1132 if (sbbcsoftp == NULL) { 1133 return (ENXIO); 1134 } 1135 1136 switch (cmd) { 1137 case SBBC_SBBCREG_WR: 1138 { 1139 struct ssc_sbbc_regio sbbcregs; 1140 uint64_t offset; 1141 1142 if (sbbc_scmode == FALSE) { 1143 /* then we're executing on Domain; Writes not allowed */ 1144 return (EINVAL); 1145 } 1146 1147 if (arg == NULL) { 1148 return (ENXIO); 1149 } 1150 1151 if (ddi_copyin((caddr_t)arg, (caddr_t)&sbbcregs, 1152 sizeof (struct ssc_sbbc_regio), mode)) { 1153 cmn_err(CE_WARN, "sbbc_ioctl: copyin failed arg %p", 1154 (void *)arg); 1155 return (EFAULT); 1156 } 1157 1158 /* 1159 * Bug #4287186: SBBC driver on cp1500 doesn't check length for 1160 * reads or writes 1161 * Note that I've also added a check to make sure the offset is 1162 * valid, since misaligned (i.e. not on 16-byte boundary) 1163 * accesses or accesses to "Reserved" register offsets are 1164 * treated as unmapped by the SBBC. 1165 */ 1166 if ((sbbcregs.len != 4) || 1167 !sbbc_offset_valid(sbbcregs.offset)) { 1168 return (EINVAL); 1169 } 1170 1171 offset = (uint64_t)sbbcsoftp->pci_sbbc_map; 1172 offset += sbbcregs.offset; 1173 ddi_put32(sbbcsoftp->pci_sbbc_map_handle, (uint32_t *)offset, 1174 sbbcregs.value); 1175 } 1176 break; 1177 case SBBC_SBBCREG_RD: 1178 { 1179 struct ssc_sbbc_regio sbbcregs; 1180 uint64_t offset; 1181 1182 if (sbbc_scmode == FALSE) { 1183 /* then we're executing on Domain; Reads not allowed */ 1184 return (EINVAL); 1185 } 1186 1187 if (arg == NULL) { 1188 return (ENXIO); 1189 } 1190 1191 if (ddi_copyin((caddr_t)arg, (caddr_t)&sbbcregs, 1192 sizeof (struct ssc_sbbc_regio), mode)) { 1193 cmn_err(CE_WARN, "sbbc_ioctl: copyin failed arg %p", 1194 (void *)arg); 1195 return (EFAULT); 1196 } 1197 1198 /* 1199 * Bug #4287186: SBBC driver on cp1500 doesn't check length for 1200 * reads or writes 1201 * Note that I've also added a check to make sure the offset is 1202 * valid, since misaligned (i.e. not on 16-byte boundary) 1203 * accesses or accesses to "Reserved" register offsets are 1204 * treated as unmapped by the SBBC. 1205 */ 1206 if ((sbbcregs.len != 4) || 1207 !sbbc_offset_valid(sbbcregs.offset)) { 1208 return (EINVAL); 1209 } 1210 1211 offset = (uint64_t)sbbcsoftp->pci_sbbc_map; 1212 offset += sbbcregs.offset; 1213 1214 sbbcregs.value = ddi_get32(sbbcsoftp->pci_sbbc_map_handle, 1215 (uint32_t *)offset); 1216 1217 if (ddi_copyout((caddr_t)&sbbcregs.value, 1218 &((struct ssc_sbbc_regio *)arg)->value, 1219 sbbcregs.len, mode)) { 1220 cmn_err(CE_WARN, "sbbc_ioctl:copyout failed arg %p", 1221 (void *)arg); 1222 return (EFAULT); 1223 } 1224 } 1225 break; 1226 default: 1227 cmn_err(CE_WARN, "sbbc_ioctl:Illegal command 0x%08x", cmd); 1228 return (ENOTTY); 1229 } 1230 1231 return (DDI_SUCCESS); 1232 } 1233 1234 static void 1235 sbbc_remove_reg_maps(struct sbbcsoft *sbbcsoftp) 1236 { 1237 SBBCTRACE(sbbc_remove_reg_maps, 'RMAP', sbbcsoftp); 1238 if (sbbcsoftp->pci_sbbc_map_handle) 1239 ddi_regs_map_free(&sbbcsoftp->pci_sbbc_map_handle); 1240 } 1241 1242 1243 static int 1244 sbbc_init(struct sbbcsoft *sbbcsoftp) 1245 { 1246 /* Mask all the interrupts until we are ready. */ 1247 ddi_put32(sbbcsoftp->pci_sbbc_map_handle, 1248 &sbbcsoftp->pci_sbbc_map->sys_intr_enable, 1249 0x00000000); 1250 1251 return (1); 1252 } 1253 1254 /* 1255 * The following routine is a generic routine to initialize any child of 1256 * sbbc nexus driver information into parent private data structure. 1257 */ 1258 /* ARGSUSED0 */ 1259 static int 1260 sbbc_initchild(dev_info_t *dip, dev_info_t *rdip, dev_info_t *child) 1261 { 1262 sbbc_child_regspec_t *child_rp; 1263 int reglen, slot; 1264 char name[10]; 1265 1266 SBBC_DBG1(SBBC_DBG_INITCHILD, dip, "Initializing %s\n", 1267 ddi_driver_name(rdip)); 1268 1269 /* 1270 * Initialize a child 1271 * Set the address portion of the node name based on the 1272 * address/offset. 1273 */ 1274 if (ddi_getlongprop(DDI_DEV_T_ANY, child, DDI_PROP_DONTPASS, 1275 "reg", (caddr_t)&child_rp, ®len) != DDI_SUCCESS) { 1276 if (strcmp(ddi_node_name(child), "hotplug-controller") == 0) { 1277 slot = 1; 1278 (void) sprintf(name, "%x", slot); 1279 ddi_set_name_addr(child, name); 1280 return (DDI_SUCCESS); 1281 } 1282 return (DDI_FAILURE); 1283 } 1284 1285 SBBC_DBG3(SBBC_DBG_INITCHILD, dip, "hi 0x%x, low 0x%x, size 0x%x\n", 1286 child_rp->addr_hi, child_rp->addr_low, child_rp->size); 1287 1288 (void) sprintf(name, "%x,%x", child_rp->addr_hi, child_rp->addr_low); 1289 1290 /* 1291 * set child's addresses from the reg property into parent private 1292 * data structure. 1293 */ 1294 ddi_set_name_addr(child, name); 1295 kmem_free(child_rp, reglen); 1296 1297 ddi_set_parent_data(child, NULL); 1298 1299 return (DDI_SUCCESS); 1300 } 1301 1302 1303 /* ARGSUSED0 */ 1304 static int 1305 sbbc_uninitchild(dev_info_t *rdip, dev_info_t *child) 1306 { 1307 1308 SBBC_DBG1(SBBC_DBG_UNINITCHILD, rdip, "Uninitializing %s\n", 1309 ddi_driver_name(rdip)); 1310 1311 ddi_set_name_addr(child, NULL); 1312 ddi_remove_minor_node(child, NULL); 1313 impl_rem_dev_props(child); 1314 1315 return (DDI_SUCCESS); 1316 1317 } 1318 1319 1320 /* 1321 * The following routine is an interrupt service routine that is used 1322 * as a wrapper to all the children requiring interrupt services. 1323 */ 1324 static uint_t 1325 sbbc_intr_wrapper(caddr_t arg) 1326 { 1327 1328 struct sbbcsoft *sbbcsoftp = (struct sbbcsoft *)arg; 1329 int i, rval; 1330 1331 SBBC_DBG1(SBBC_DBG_INTR, sbbcsoftp->dip, "Isr arg 0x%llx\n", arg); 1332 1333 mutex_enter(&sbbcsoftp->sbbc_intr_mutex); 1334 1335 for (i = 0; i < MAX_SBBC_DEVICES; i++) { 1336 /* 1337 * Check the interrupt status reg. to determine the cause. 1338 */ 1339 /* 1340 * Check the error status reg. to determine the cause. 1341 */ 1342 if (sbbcsoftp->child_intr[i] && 1343 sbbcsoftp->child_intr[i]->status == 1344 SBBC_INTR_STATE_ENABLE) { 1345 /* 1346 * Dispatch the children interrupt service routines and 1347 * look for someone to claim. 1348 */ 1349 rval = sbbcsoftp->child_intr[i]->intr_handler( 1350 sbbcsoftp->child_intr[i]->arg1, 1351 sbbcsoftp->child_intr[i]->arg2); 1352 1353 if (rval == DDI_INTR_CLAIMED) { 1354 mutex_exit(&sbbcsoftp->sbbc_intr_mutex); 1355 return (rval); 1356 } 1357 } 1358 } 1359 1360 mutex_exit(&sbbcsoftp->sbbc_intr_mutex); 1361 1362 /* for now do not claim since we know its not enabled */ 1363 return (DDI_INTR_UNCLAIMED); 1364 } 1365 1366 1367 /* 1368 * This function checks an SBBC register offset to make sure that it is properly 1369 * aligned (i.e. on a 16-byte boundary) and that it corresponds to an accessible 1370 * register. Since the SBBC treates accesses to unaligned or reserved addresses 1371 * as unmapped, failing to check for these would leave a loophole that could be 1372 * used to crash the system. 1373 */ 1374 static int 1375 sbbc_offset_valid(uint32_t offset) { 1376 /* 1377 * Check for proper alignment first. 1378 */ 1379 if ((offset % 16) != 0) { 1380 return (0); 1381 } 1382 1383 /* 1384 * Now start checking for the various reserved ranges. 1385 * While sticking a bunch of constants in the code (rather than 1386 * #define'd values) is usually best avoided, it would probably 1387 * do more harm than good here. These values were taken from the 1388 * Serengeti Architecture Programmer's Reference Manual dated 1389 * August 10, 1999, pages 2-99 through 2-103. While there are 1390 * various "clever" ways this check could be performed that would 1391 * be slightly more efficient, arranging the code in this fashion 1392 * should maximize maintainability. 1393 */ 1394 if (((offset >= 0x001a0) && (offset <= 0x001ff)) || 1395 ((offset >= 0x002a0) && (offset <= 0x002ff)) || 1396 ((offset >= 0x00350) && (offset <= 0x003ff)) || 1397 ((offset >= 0x00500) && (offset <= 0x00fff)) || 1398 ((offset >= 0x01160) && (offset <= 0x011ff)) || 1399 ((offset >= 0x01210) && (offset <= 0x017ff)) || 1400 ((offset >= 0x01810) && (offset <= 0x01fff)) || 1401 ((offset >= 0x02030) && (offset <= 0x022ff)) || 1402 ((offset >= 0x02340) && (offset <= 0x03fff)) || 1403 ((offset >= 0x04030) && (offset <= 0x05fff)) || 1404 ((offset >= 0x060a0) && (offset <= 0x060ff)) || 1405 (offset == 0x06120) || 1406 ((offset >= 0x06190) && (offset <= 0x061ff)) || 1407 ((offset >= 0x06230) && (offset <= 0x062f0)) || 1408 (offset > 0x06320)) { 1409 return (0); 1410 } 1411 1412 return (1); 1413 } 1414 1415 #ifdef DEBUG 1416 void 1417 sbbc_dbg(uint32_t flag, dev_info_t *dip, char *fmt, 1418 uintptr_t a1, uintptr_t a2, uintptr_t a3, uintptr_t a4, uintptr_t a5) 1419 { 1420 char *s = NULL; 1421 1422 if (sbbc_dbg_flags && ((sbbc_dbg_flags & flag) == flag)) { 1423 switch (flag) { 1424 case SBBC_DBG_ATTACH: 1425 s = "attach"; 1426 break; 1427 case SBBC_DBG_DETACH: 1428 s = "detach"; 1429 break; 1430 case SBBC_DBG_CTLOPS: 1431 s = "ctlops"; 1432 break; 1433 case SBBC_DBG_INITCHILD: 1434 s = "initchild"; 1435 break; 1436 case SBBC_DBG_UNINITCHILD: 1437 s = "uninitchild"; 1438 break; 1439 case SBBC_DBG_BUSMAP: 1440 s = "busmap"; 1441 break; 1442 case SBBC_DBG_INTR: 1443 s = "intr"; 1444 break; 1445 case SBBC_DBG_INTROPS: 1446 s = "intr_ops"; 1447 break; 1448 case SBBC_DBG_PCICONF: 1449 s = "pciconfig"; 1450 break; 1451 case SBBC_DBG_MAPRANGES: 1452 s = "mapranges"; 1453 break; 1454 case SBBC_DBG_PROPERTIES: 1455 s = "properties"; 1456 break; 1457 case SBBC_DBG_OPEN: 1458 s = "open"; 1459 break; 1460 case SBBC_DBG_CLOSE: 1461 s = "close"; 1462 break; 1463 case SBBC_DBG_IOCTL: 1464 s = "ioctl"; 1465 break; 1466 default: 1467 s = "Unknown debug flag"; 1468 break; 1469 } 1470 1471 cmn_err(CE_CONT, "%s_%s(%d): ", ddi_driver_name(dip), s, 1472 ddi_get_instance(dip)); 1473 cmn_err(CE_CONT, fmt, a1, a2, a3, a4, a5); 1474 } 1475 } 1476 1477 /* 1478 * Dump the SBBC chip's Device ID Register 1479 */ 1480 static void sbbc_dump_devid(dev_info_t *dip, struct sbbcsoft *sbbcsoftp, 1481 int instance) 1482 { 1483 uint32_t sbbc_id_reg; 1484 uint16_t sbbc_id_reg_partid; 1485 uint16_t sbbc_id_reg_manfid; 1486 1487 sbbc_id_reg = ddi_get32(sbbcsoftp->pci_sbbc_map_handle, 1488 (uint32_t *)&sbbcsoftp->pci_sbbc_map->devid); 1489 1490 sbbc_id_reg_partid = ((sbbc_id_reg << 4) >> 16); 1491 sbbc_id_reg_manfid = ((sbbc_id_reg << 20) >> 21); 1492 1493 SBBC_DBG4(SBBC_DBG_ATTACH, dip, 1494 "FOUND SBBC(%d) Version %x, Partid %x, Manfid %x\n", 1495 instance, (sbbc_id_reg >> 28), sbbc_id_reg_partid, 1496 sbbc_id_reg_manfid); 1497 } 1498 1499 #endif /* DEBUG */ 1500