1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD 3 * 4 * Copyright (c) 2013-2015 The FreeBSD Foundation 5 * 6 * This software was developed by Konstantin Belousov <kib@FreeBSD.org> 7 * under sponsorship from the FreeBSD Foundation. 8 * 9 * Redistribution and use in source and binary forms, with or without 10 * modification, are permitted provided that the following conditions 11 * are met: 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 2. Redistributions in binary form must reproduce the above copyright 15 * notice, this list of conditions and the following disclaimer in the 16 * documentation and/or other materials provided with the distribution. 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 21 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 28 * SUCH DAMAGE. 29 */ 30 31 #include <sys/cdefs.h> 32 __FBSDID("$FreeBSD$"); 33 34 #include "opt_acpi.h" 35 #if defined(__amd64__) 36 #define DEV_APIC 37 #else 38 #include "opt_apic.h" 39 #endif 40 #include "opt_ddb.h" 41 42 #include <sys/param.h> 43 #include <sys/bus.h> 44 #include <sys/kernel.h> 45 #include <sys/lock.h> 46 #include <sys/malloc.h> 47 #include <sys/memdesc.h> 48 #include <sys/module.h> 49 #include <sys/mutex.h> 50 #include <sys/rman.h> 51 #include <sys/rwlock.h> 52 #include <sys/smp.h> 53 #include <sys/taskqueue.h> 54 #include <sys/tree.h> 55 #include <sys/vmem.h> 56 #include <vm/vm.h> 57 #include <vm/vm_extern.h> 58 #include <vm/vm_kern.h> 59 #include <vm/vm_object.h> 60 #include <vm/vm_page.h> 61 #include <vm/vm_pager.h> 62 #include <vm/vm_map.h> 63 #include <contrib/dev/acpica/include/acpi.h> 64 #include <contrib/dev/acpica/include/accommon.h> 65 #include <dev/acpica/acpivar.h> 66 #include <dev/pci/pcireg.h> 67 #include <dev/pci/pcivar.h> 68 #include <machine/bus.h> 69 #include <machine/pci_cfgreg.h> 70 #include <x86/include/busdma_impl.h> 71 #include <dev/iommu/busdma_iommu.h> 72 #include <x86/iommu/intel_reg.h> 73 #include <x86/iommu/intel_dmar.h> 74 75 #ifdef DEV_APIC 76 #include "pcib_if.h" 77 #include <machine/intr_machdep.h> 78 #include <x86/apicreg.h> 79 #include <x86/apicvar.h> 80 #endif 81 82 #define DMAR_FAULT_IRQ_RID 0 83 #define DMAR_QI_IRQ_RID 1 84 #define DMAR_REG_RID 2 85 86 static devclass_t dmar_devclass; 87 static device_t *dmar_devs; 88 static int dmar_devcnt; 89 90 typedef int (*dmar_iter_t)(ACPI_DMAR_HEADER *, void *); 91 92 static void 93 dmar_iterate_tbl(dmar_iter_t iter, void *arg) 94 { 95 ACPI_TABLE_DMAR *dmartbl; 96 ACPI_DMAR_HEADER *dmarh; 97 char *ptr, *ptrend; 98 ACPI_STATUS status; 99 100 status = AcpiGetTable(ACPI_SIG_DMAR, 1, (ACPI_TABLE_HEADER **)&dmartbl); 101 if (ACPI_FAILURE(status)) 102 return; 103 ptr = (char *)dmartbl + sizeof(*dmartbl); 104 ptrend = (char *)dmartbl + dmartbl->Header.Length; 105 for (;;) { 106 if (ptr >= ptrend) 107 break; 108 dmarh = (ACPI_DMAR_HEADER *)ptr; 109 if (dmarh->Length <= 0) { 110 printf("dmar_identify: corrupted DMAR table, l %d\n", 111 dmarh->Length); 112 break; 113 } 114 ptr += dmarh->Length; 115 if (!iter(dmarh, arg)) 116 break; 117 } 118 AcpiPutTable((ACPI_TABLE_HEADER *)dmartbl); 119 } 120 121 struct find_iter_args { 122 int i; 123 ACPI_DMAR_HARDWARE_UNIT *res; 124 }; 125 126 static int 127 dmar_find_iter(ACPI_DMAR_HEADER *dmarh, void *arg) 128 { 129 struct find_iter_args *fia; 130 131 if (dmarh->Type != ACPI_DMAR_TYPE_HARDWARE_UNIT) 132 return (1); 133 134 fia = arg; 135 if (fia->i == 0) { 136 fia->res = (ACPI_DMAR_HARDWARE_UNIT *)dmarh; 137 return (0); 138 } 139 fia->i--; 140 return (1); 141 } 142 143 static ACPI_DMAR_HARDWARE_UNIT * 144 dmar_find_by_index(int idx) 145 { 146 struct find_iter_args fia; 147 148 fia.i = idx; 149 fia.res = NULL; 150 dmar_iterate_tbl(dmar_find_iter, &fia); 151 return (fia.res); 152 } 153 154 static int 155 dmar_count_iter(ACPI_DMAR_HEADER *dmarh, void *arg) 156 { 157 158 if (dmarh->Type == ACPI_DMAR_TYPE_HARDWARE_UNIT) 159 dmar_devcnt++; 160 return (1); 161 } 162 163 static int dmar_enable = 0; 164 static void 165 dmar_identify(driver_t *driver, device_t parent) 166 { 167 ACPI_TABLE_DMAR *dmartbl; 168 ACPI_DMAR_HARDWARE_UNIT *dmarh; 169 ACPI_STATUS status; 170 int i, error; 171 172 if (acpi_disabled("dmar")) 173 return; 174 TUNABLE_INT_FETCH("hw.dmar.enable", &dmar_enable); 175 if (!dmar_enable) 176 return; 177 status = AcpiGetTable(ACPI_SIG_DMAR, 1, (ACPI_TABLE_HEADER **)&dmartbl); 178 if (ACPI_FAILURE(status)) 179 return; 180 haw = dmartbl->Width + 1; 181 if ((1ULL << (haw + 1)) > BUS_SPACE_MAXADDR) 182 dmar_high = BUS_SPACE_MAXADDR; 183 else 184 dmar_high = 1ULL << (haw + 1); 185 if (bootverbose) { 186 printf("DMAR HAW=%d flags=<%b>\n", dmartbl->Width, 187 (unsigned)dmartbl->Flags, 188 "\020\001INTR_REMAP\002X2APIC_OPT_OUT"); 189 } 190 AcpiPutTable((ACPI_TABLE_HEADER *)dmartbl); 191 192 dmar_iterate_tbl(dmar_count_iter, NULL); 193 if (dmar_devcnt == 0) 194 return; 195 dmar_devs = malloc(sizeof(device_t) * dmar_devcnt, M_DEVBUF, 196 M_WAITOK | M_ZERO); 197 for (i = 0; i < dmar_devcnt; i++) { 198 dmarh = dmar_find_by_index(i); 199 if (dmarh == NULL) { 200 printf("dmar_identify: cannot find HWUNIT %d\n", i); 201 continue; 202 } 203 dmar_devs[i] = BUS_ADD_CHILD(parent, 1, "dmar", i); 204 if (dmar_devs[i] == NULL) { 205 printf("dmar_identify: cannot create instance %d\n", i); 206 continue; 207 } 208 error = bus_set_resource(dmar_devs[i], SYS_RES_MEMORY, 209 DMAR_REG_RID, dmarh->Address, PAGE_SIZE); 210 if (error != 0) { 211 printf( 212 "dmar%d: unable to alloc register window at 0x%08jx: error %d\n", 213 i, (uintmax_t)dmarh->Address, error); 214 device_delete_child(parent, dmar_devs[i]); 215 dmar_devs[i] = NULL; 216 } 217 } 218 } 219 220 static int 221 dmar_probe(device_t dev) 222 { 223 224 if (acpi_get_handle(dev) != NULL) 225 return (ENXIO); 226 device_set_desc(dev, "DMA remap"); 227 return (BUS_PROBE_NOWILDCARD); 228 } 229 230 static void 231 dmar_release_intr(device_t dev, struct dmar_unit *unit, int idx) 232 { 233 struct dmar_msi_data *dmd; 234 235 dmd = &unit->intrs[idx]; 236 if (dmd->irq == -1) 237 return; 238 bus_teardown_intr(dev, dmd->irq_res, dmd->intr_handle); 239 bus_release_resource(dev, SYS_RES_IRQ, dmd->irq_rid, dmd->irq_res); 240 bus_delete_resource(dev, SYS_RES_IRQ, dmd->irq_rid); 241 PCIB_RELEASE_MSIX(device_get_parent(device_get_parent(dev)), 242 dev, dmd->irq); 243 dmd->irq = -1; 244 } 245 246 static void 247 dmar_release_resources(device_t dev, struct dmar_unit *unit) 248 { 249 int i; 250 251 iommu_fini_busdma(&unit->iommu); 252 dmar_fini_irt(unit); 253 dmar_fini_qi(unit); 254 dmar_fini_fault_log(unit); 255 for (i = 0; i < DMAR_INTR_TOTAL; i++) 256 dmar_release_intr(dev, unit, i); 257 if (unit->regs != NULL) { 258 bus_deactivate_resource(dev, SYS_RES_MEMORY, unit->reg_rid, 259 unit->regs); 260 bus_release_resource(dev, SYS_RES_MEMORY, unit->reg_rid, 261 unit->regs); 262 unit->regs = NULL; 263 } 264 if (unit->domids != NULL) { 265 delete_unrhdr(unit->domids); 266 unit->domids = NULL; 267 } 268 if (unit->ctx_obj != NULL) { 269 vm_object_deallocate(unit->ctx_obj); 270 unit->ctx_obj = NULL; 271 } 272 } 273 274 static int 275 dmar_alloc_irq(device_t dev, struct dmar_unit *unit, int idx) 276 { 277 device_t pcib; 278 struct dmar_msi_data *dmd; 279 uint64_t msi_addr; 280 uint32_t msi_data; 281 int error; 282 283 dmd = &unit->intrs[idx]; 284 pcib = device_get_parent(device_get_parent(dev)); /* Really not pcib */ 285 error = PCIB_ALLOC_MSIX(pcib, dev, &dmd->irq); 286 if (error != 0) { 287 device_printf(dev, "cannot allocate %s interrupt, %d\n", 288 dmd->name, error); 289 goto err1; 290 } 291 error = bus_set_resource(dev, SYS_RES_IRQ, dmd->irq_rid, 292 dmd->irq, 1); 293 if (error != 0) { 294 device_printf(dev, "cannot set %s interrupt resource, %d\n", 295 dmd->name, error); 296 goto err2; 297 } 298 dmd->irq_res = bus_alloc_resource_any(dev, SYS_RES_IRQ, 299 &dmd->irq_rid, RF_ACTIVE); 300 if (dmd->irq_res == NULL) { 301 device_printf(dev, 302 "cannot allocate resource for %s interrupt\n", dmd->name); 303 error = ENXIO; 304 goto err3; 305 } 306 error = bus_setup_intr(dev, dmd->irq_res, INTR_TYPE_MISC, 307 dmd->handler, NULL, unit, &dmd->intr_handle); 308 if (error != 0) { 309 device_printf(dev, "cannot setup %s interrupt, %d\n", 310 dmd->name, error); 311 goto err4; 312 } 313 bus_describe_intr(dev, dmd->irq_res, dmd->intr_handle, "%s", dmd->name); 314 error = PCIB_MAP_MSI(pcib, dev, dmd->irq, &msi_addr, &msi_data); 315 if (error != 0) { 316 device_printf(dev, "cannot map %s interrupt, %d\n", 317 dmd->name, error); 318 goto err5; 319 } 320 dmar_write4(unit, dmd->msi_data_reg, msi_data); 321 dmar_write4(unit, dmd->msi_addr_reg, msi_addr); 322 /* Only for xAPIC mode */ 323 dmar_write4(unit, dmd->msi_uaddr_reg, msi_addr >> 32); 324 return (0); 325 326 err5: 327 bus_teardown_intr(dev, dmd->irq_res, dmd->intr_handle); 328 err4: 329 bus_release_resource(dev, SYS_RES_IRQ, dmd->irq_rid, dmd->irq_res); 330 err3: 331 bus_delete_resource(dev, SYS_RES_IRQ, dmd->irq_rid); 332 err2: 333 PCIB_RELEASE_MSIX(pcib, dev, dmd->irq); 334 dmd->irq = -1; 335 err1: 336 return (error); 337 } 338 339 #ifdef DEV_APIC 340 static int 341 dmar_remap_intr(device_t dev, device_t child, u_int irq) 342 { 343 struct dmar_unit *unit; 344 struct dmar_msi_data *dmd; 345 uint64_t msi_addr; 346 uint32_t msi_data; 347 int i, error; 348 349 unit = device_get_softc(dev); 350 for (i = 0; i < DMAR_INTR_TOTAL; i++) { 351 dmd = &unit->intrs[i]; 352 if (irq == dmd->irq) { 353 error = PCIB_MAP_MSI(device_get_parent( 354 device_get_parent(dev)), 355 dev, irq, &msi_addr, &msi_data); 356 if (error != 0) 357 return (error); 358 DMAR_LOCK(unit); 359 (dmd->disable_intr)(unit); 360 dmar_write4(unit, dmd->msi_data_reg, msi_data); 361 dmar_write4(unit, dmd->msi_addr_reg, msi_addr); 362 dmar_write4(unit, dmd->msi_uaddr_reg, msi_addr >> 32); 363 (dmd->enable_intr)(unit); 364 DMAR_UNLOCK(unit); 365 return (0); 366 } 367 } 368 return (ENOENT); 369 } 370 #endif 371 372 static void 373 dmar_print_caps(device_t dev, struct dmar_unit *unit, 374 ACPI_DMAR_HARDWARE_UNIT *dmaru) 375 { 376 uint32_t caphi, ecaphi; 377 378 device_printf(dev, "regs@0x%08jx, ver=%d.%d, seg=%d, flags=<%b>\n", 379 (uintmax_t)dmaru->Address, DMAR_MAJOR_VER(unit->hw_ver), 380 DMAR_MINOR_VER(unit->hw_ver), dmaru->Segment, 381 dmaru->Flags, "\020\001INCLUDE_ALL_PCI"); 382 caphi = unit->hw_cap >> 32; 383 device_printf(dev, "cap=%b,", (u_int)unit->hw_cap, 384 "\020\004AFL\005WBF\006PLMR\007PHMR\010CM\027ZLR\030ISOCH"); 385 printf("%b, ", caphi, "\020\010PSI\027DWD\030DRD\031FL1GP\034PSI"); 386 printf("ndoms=%d, sagaw=%d, mgaw=%d, fro=%d, nfr=%d, superp=%d", 387 DMAR_CAP_ND(unit->hw_cap), DMAR_CAP_SAGAW(unit->hw_cap), 388 DMAR_CAP_MGAW(unit->hw_cap), DMAR_CAP_FRO(unit->hw_cap), 389 DMAR_CAP_NFR(unit->hw_cap), DMAR_CAP_SPS(unit->hw_cap)); 390 if ((unit->hw_cap & DMAR_CAP_PSI) != 0) 391 printf(", mamv=%d", DMAR_CAP_MAMV(unit->hw_cap)); 392 printf("\n"); 393 ecaphi = unit->hw_ecap >> 32; 394 device_printf(dev, "ecap=%b,", (u_int)unit->hw_ecap, 395 "\020\001C\002QI\003DI\004IR\005EIM\007PT\010SC\031ECS\032MTS" 396 "\033NEST\034DIS\035PASID\036PRS\037ERS\040SRS"); 397 printf("%b, ", ecaphi, "\020\002NWFS\003EAFS"); 398 printf("mhmw=%d, iro=%d\n", DMAR_ECAP_MHMV(unit->hw_ecap), 399 DMAR_ECAP_IRO(unit->hw_ecap)); 400 } 401 402 static int 403 dmar_attach(device_t dev) 404 { 405 struct dmar_unit *unit; 406 ACPI_DMAR_HARDWARE_UNIT *dmaru; 407 uint64_t timeout; 408 int i, error; 409 410 unit = device_get_softc(dev); 411 unit->dev = dev; 412 unit->iommu.unit = device_get_unit(dev); 413 unit->iommu.dev = dev; 414 dmaru = dmar_find_by_index(unit->iommu.unit); 415 if (dmaru == NULL) 416 return (EINVAL); 417 unit->segment = dmaru->Segment; 418 unit->base = dmaru->Address; 419 unit->reg_rid = DMAR_REG_RID; 420 unit->regs = bus_alloc_resource_any(dev, SYS_RES_MEMORY, 421 &unit->reg_rid, RF_ACTIVE); 422 if (unit->regs == NULL) { 423 device_printf(dev, "cannot allocate register window\n"); 424 return (ENOMEM); 425 } 426 unit->hw_ver = dmar_read4(unit, DMAR_VER_REG); 427 unit->hw_cap = dmar_read8(unit, DMAR_CAP_REG); 428 unit->hw_ecap = dmar_read8(unit, DMAR_ECAP_REG); 429 if (bootverbose) 430 dmar_print_caps(dev, unit, dmaru); 431 dmar_quirks_post_ident(unit); 432 433 timeout = dmar_get_timeout(); 434 TUNABLE_UINT64_FETCH("hw.dmar.timeout", &timeout); 435 dmar_update_timeout(timeout); 436 437 for (i = 0; i < DMAR_INTR_TOTAL; i++) 438 unit->intrs[i].irq = -1; 439 440 unit->intrs[DMAR_INTR_FAULT].name = "fault"; 441 unit->intrs[DMAR_INTR_FAULT].irq_rid = DMAR_FAULT_IRQ_RID; 442 unit->intrs[DMAR_INTR_FAULT].handler = dmar_fault_intr; 443 unit->intrs[DMAR_INTR_FAULT].msi_data_reg = DMAR_FEDATA_REG; 444 unit->intrs[DMAR_INTR_FAULT].msi_addr_reg = DMAR_FEADDR_REG; 445 unit->intrs[DMAR_INTR_FAULT].msi_uaddr_reg = DMAR_FEUADDR_REG; 446 unit->intrs[DMAR_INTR_FAULT].enable_intr = dmar_enable_fault_intr; 447 unit->intrs[DMAR_INTR_FAULT].disable_intr = dmar_disable_fault_intr; 448 error = dmar_alloc_irq(dev, unit, DMAR_INTR_FAULT); 449 if (error != 0) { 450 dmar_release_resources(dev, unit); 451 return (error); 452 } 453 if (DMAR_HAS_QI(unit)) { 454 unit->intrs[DMAR_INTR_QI].name = "qi"; 455 unit->intrs[DMAR_INTR_QI].irq_rid = DMAR_QI_IRQ_RID; 456 unit->intrs[DMAR_INTR_QI].handler = dmar_qi_intr; 457 unit->intrs[DMAR_INTR_QI].msi_data_reg = DMAR_IEDATA_REG; 458 unit->intrs[DMAR_INTR_QI].msi_addr_reg = DMAR_IEADDR_REG; 459 unit->intrs[DMAR_INTR_QI].msi_uaddr_reg = DMAR_IEUADDR_REG; 460 unit->intrs[DMAR_INTR_QI].enable_intr = dmar_enable_qi_intr; 461 unit->intrs[DMAR_INTR_QI].disable_intr = dmar_disable_qi_intr; 462 error = dmar_alloc_irq(dev, unit, DMAR_INTR_QI); 463 if (error != 0) { 464 dmar_release_resources(dev, unit); 465 return (error); 466 } 467 } 468 469 mtx_init(&unit->iommu.lock, "dmarhw", NULL, MTX_DEF); 470 unit->domids = new_unrhdr(0, dmar_nd2mask(DMAR_CAP_ND(unit->hw_cap)), 471 &unit->iommu.lock); 472 LIST_INIT(&unit->domains); 473 474 /* 475 * 9.2 "Context Entry": 476 * When Caching Mode (CM) field is reported as Set, the 477 * domain-id value of zero is architecturally reserved. 478 * Software must not use domain-id value of zero 479 * when CM is Set. 480 */ 481 if ((unit->hw_cap & DMAR_CAP_CM) != 0) 482 alloc_unr_specific(unit->domids, 0); 483 484 unit->ctx_obj = vm_pager_allocate(OBJT_PHYS, NULL, IDX_TO_OFF(1 + 485 DMAR_CTX_CNT), 0, 0, NULL); 486 487 /* 488 * Allocate and load the root entry table pointer. Enable the 489 * address translation after the required invalidations are 490 * done. 491 */ 492 dmar_pgalloc(unit->ctx_obj, 0, IOMMU_PGF_WAITOK | IOMMU_PGF_ZERO); 493 DMAR_LOCK(unit); 494 error = dmar_load_root_entry_ptr(unit); 495 if (error != 0) { 496 DMAR_UNLOCK(unit); 497 dmar_release_resources(dev, unit); 498 return (error); 499 } 500 error = dmar_inv_ctx_glob(unit); 501 if (error != 0) { 502 DMAR_UNLOCK(unit); 503 dmar_release_resources(dev, unit); 504 return (error); 505 } 506 if ((unit->hw_ecap & DMAR_ECAP_DI) != 0) { 507 error = dmar_inv_iotlb_glob(unit); 508 if (error != 0) { 509 DMAR_UNLOCK(unit); 510 dmar_release_resources(dev, unit); 511 return (error); 512 } 513 } 514 515 DMAR_UNLOCK(unit); 516 error = dmar_init_fault_log(unit); 517 if (error != 0) { 518 dmar_release_resources(dev, unit); 519 return (error); 520 } 521 error = dmar_init_qi(unit); 522 if (error != 0) { 523 dmar_release_resources(dev, unit); 524 return (error); 525 } 526 error = dmar_init_irt(unit); 527 if (error != 0) { 528 dmar_release_resources(dev, unit); 529 return (error); 530 } 531 error = iommu_init_busdma(&unit->iommu); 532 if (error != 0) { 533 dmar_release_resources(dev, unit); 534 return (error); 535 } 536 537 #ifdef NOTYET 538 DMAR_LOCK(unit); 539 error = dmar_enable_translation(unit); 540 if (error != 0) { 541 DMAR_UNLOCK(unit); 542 dmar_release_resources(dev, unit); 543 return (error); 544 } 545 DMAR_UNLOCK(unit); 546 #endif 547 548 return (0); 549 } 550 551 static int 552 dmar_detach(device_t dev) 553 { 554 555 return (EBUSY); 556 } 557 558 static int 559 dmar_suspend(device_t dev) 560 { 561 562 return (0); 563 } 564 565 static int 566 dmar_resume(device_t dev) 567 { 568 569 /* XXXKIB */ 570 return (0); 571 } 572 573 static device_method_t dmar_methods[] = { 574 DEVMETHOD(device_identify, dmar_identify), 575 DEVMETHOD(device_probe, dmar_probe), 576 DEVMETHOD(device_attach, dmar_attach), 577 DEVMETHOD(device_detach, dmar_detach), 578 DEVMETHOD(device_suspend, dmar_suspend), 579 DEVMETHOD(device_resume, dmar_resume), 580 #ifdef DEV_APIC 581 DEVMETHOD(bus_remap_intr, dmar_remap_intr), 582 #endif 583 DEVMETHOD_END 584 }; 585 586 static driver_t dmar_driver = { 587 "dmar", 588 dmar_methods, 589 sizeof(struct dmar_unit), 590 }; 591 592 DRIVER_MODULE(dmar, acpi, dmar_driver, dmar_devclass, 0, 0); 593 MODULE_DEPEND(dmar, acpi, 1, 1, 1); 594 595 static void 596 dmar_print_path(int busno, int depth, const ACPI_DMAR_PCI_PATH *path) 597 { 598 int i; 599 600 printf("[%d, ", busno); 601 for (i = 0; i < depth; i++) { 602 if (i != 0) 603 printf(", "); 604 printf("(%d, %d)", path[i].Device, path[i].Function); 605 } 606 printf("]"); 607 } 608 609 int 610 dmar_dev_depth(device_t child) 611 { 612 devclass_t pci_class; 613 device_t bus, pcib; 614 int depth; 615 616 pci_class = devclass_find("pci"); 617 for (depth = 1; ; depth++) { 618 bus = device_get_parent(child); 619 pcib = device_get_parent(bus); 620 if (device_get_devclass(device_get_parent(pcib)) != 621 pci_class) 622 return (depth); 623 child = pcib; 624 } 625 } 626 627 void 628 dmar_dev_path(device_t child, int *busno, void *path1, int depth) 629 { 630 devclass_t pci_class; 631 device_t bus, pcib; 632 ACPI_DMAR_PCI_PATH *path; 633 634 pci_class = devclass_find("pci"); 635 path = path1; 636 for (depth--; depth != -1; depth--) { 637 path[depth].Device = pci_get_slot(child); 638 path[depth].Function = pci_get_function(child); 639 bus = device_get_parent(child); 640 pcib = device_get_parent(bus); 641 if (device_get_devclass(device_get_parent(pcib)) != 642 pci_class) { 643 /* reached a host bridge */ 644 *busno = pcib_get_bus(bus); 645 return; 646 } 647 child = pcib; 648 } 649 panic("wrong depth"); 650 } 651 652 static int 653 dmar_match_pathes(int busno1, const ACPI_DMAR_PCI_PATH *path1, int depth1, 654 int busno2, const ACPI_DMAR_PCI_PATH *path2, int depth2, 655 enum AcpiDmarScopeType scope_type) 656 { 657 int i, depth; 658 659 if (busno1 != busno2) 660 return (0); 661 if (scope_type == ACPI_DMAR_SCOPE_TYPE_ENDPOINT && depth1 != depth2) 662 return (0); 663 depth = depth1; 664 if (depth2 < depth) 665 depth = depth2; 666 for (i = 0; i < depth; i++) { 667 if (path1[i].Device != path2[i].Device || 668 path1[i].Function != path2[i].Function) 669 return (0); 670 } 671 return (1); 672 } 673 674 static int 675 dmar_match_devscope(ACPI_DMAR_DEVICE_SCOPE *devscope, int dev_busno, 676 const ACPI_DMAR_PCI_PATH *dev_path, int dev_path_len) 677 { 678 ACPI_DMAR_PCI_PATH *path; 679 int path_len; 680 681 if (devscope->Length < sizeof(*devscope)) { 682 printf("dmar_match_devscope: corrupted DMAR table, dl %d\n", 683 devscope->Length); 684 return (-1); 685 } 686 if (devscope->EntryType != ACPI_DMAR_SCOPE_TYPE_ENDPOINT && 687 devscope->EntryType != ACPI_DMAR_SCOPE_TYPE_BRIDGE) 688 return (0); 689 path_len = devscope->Length - sizeof(*devscope); 690 if (path_len % 2 != 0) { 691 printf("dmar_match_devscope: corrupted DMAR table, dl %d\n", 692 devscope->Length); 693 return (-1); 694 } 695 path_len /= 2; 696 path = (ACPI_DMAR_PCI_PATH *)(devscope + 1); 697 if (path_len == 0) { 698 printf("dmar_match_devscope: corrupted DMAR table, dl %d\n", 699 devscope->Length); 700 return (-1); 701 } 702 703 return (dmar_match_pathes(devscope->Bus, path, path_len, dev_busno, 704 dev_path, dev_path_len, devscope->EntryType)); 705 } 706 707 static bool 708 dmar_match_by_path(struct dmar_unit *unit, int dev_domain, int dev_busno, 709 const ACPI_DMAR_PCI_PATH *dev_path, int dev_path_len, const char **banner) 710 { 711 ACPI_DMAR_HARDWARE_UNIT *dmarh; 712 ACPI_DMAR_DEVICE_SCOPE *devscope; 713 char *ptr, *ptrend; 714 int match; 715 716 dmarh = dmar_find_by_index(unit->iommu.unit); 717 if (dmarh == NULL) 718 return (false); 719 if (dmarh->Segment != dev_domain) 720 return (false); 721 if ((dmarh->Flags & ACPI_DMAR_INCLUDE_ALL) != 0) { 722 if (banner != NULL) 723 *banner = "INCLUDE_ALL"; 724 return (true); 725 } 726 ptr = (char *)dmarh + sizeof(*dmarh); 727 ptrend = (char *)dmarh + dmarh->Header.Length; 728 while (ptr < ptrend) { 729 devscope = (ACPI_DMAR_DEVICE_SCOPE *)ptr; 730 ptr += devscope->Length; 731 match = dmar_match_devscope(devscope, dev_busno, dev_path, 732 dev_path_len); 733 if (match == -1) 734 return (false); 735 if (match == 1) { 736 if (banner != NULL) 737 *banner = "specific match"; 738 return (true); 739 } 740 } 741 return (false); 742 } 743 744 static struct dmar_unit * 745 dmar_find_by_scope(int dev_domain, int dev_busno, 746 const ACPI_DMAR_PCI_PATH *dev_path, int dev_path_len) 747 { 748 struct dmar_unit *unit; 749 int i; 750 751 for (i = 0; i < dmar_devcnt; i++) { 752 if (dmar_devs[i] == NULL) 753 continue; 754 unit = device_get_softc(dmar_devs[i]); 755 if (dmar_match_by_path(unit, dev_domain, dev_busno, dev_path, 756 dev_path_len, NULL)) 757 return (unit); 758 } 759 return (NULL); 760 } 761 762 struct dmar_unit * 763 dmar_find(device_t dev, bool verbose) 764 { 765 device_t dmar_dev; 766 struct dmar_unit *unit; 767 const char *banner; 768 int i, dev_domain, dev_busno, dev_path_len; 769 770 /* 771 * This function can only handle PCI(e) devices. 772 */ 773 if (device_get_devclass(device_get_parent(dev)) != 774 devclass_find("pci")) 775 return (NULL); 776 777 dmar_dev = NULL; 778 dev_domain = pci_get_domain(dev); 779 dev_path_len = dmar_dev_depth(dev); 780 ACPI_DMAR_PCI_PATH dev_path[dev_path_len]; 781 dmar_dev_path(dev, &dev_busno, dev_path, dev_path_len); 782 banner = ""; 783 784 for (i = 0; i < dmar_devcnt; i++) { 785 if (dmar_devs[i] == NULL) 786 continue; 787 unit = device_get_softc(dmar_devs[i]); 788 if (dmar_match_by_path(unit, dev_domain, dev_busno, 789 dev_path, dev_path_len, &banner)) 790 break; 791 } 792 if (i == dmar_devcnt) 793 return (NULL); 794 795 if (verbose) { 796 device_printf(dev, "pci%d:%d:%d:%d matched dmar%d by %s", 797 dev_domain, pci_get_bus(dev), pci_get_slot(dev), 798 pci_get_function(dev), unit->iommu.unit, banner); 799 printf(" scope path "); 800 dmar_print_path(dev_busno, dev_path_len, dev_path); 801 printf("\n"); 802 } 803 return (unit); 804 } 805 806 static struct dmar_unit * 807 dmar_find_nonpci(u_int id, u_int entry_type, uint16_t *rid) 808 { 809 device_t dmar_dev; 810 struct dmar_unit *unit; 811 ACPI_DMAR_HARDWARE_UNIT *dmarh; 812 ACPI_DMAR_DEVICE_SCOPE *devscope; 813 ACPI_DMAR_PCI_PATH *path; 814 char *ptr, *ptrend; 815 #ifdef DEV_APIC 816 int error; 817 #endif 818 int i; 819 820 for (i = 0; i < dmar_devcnt; i++) { 821 dmar_dev = dmar_devs[i]; 822 if (dmar_dev == NULL) 823 continue; 824 unit = (struct dmar_unit *)device_get_softc(dmar_dev); 825 dmarh = dmar_find_by_index(i); 826 if (dmarh == NULL) 827 continue; 828 ptr = (char *)dmarh + sizeof(*dmarh); 829 ptrend = (char *)dmarh + dmarh->Header.Length; 830 for (;;) { 831 if (ptr >= ptrend) 832 break; 833 devscope = (ACPI_DMAR_DEVICE_SCOPE *)ptr; 834 ptr += devscope->Length; 835 if (devscope->EntryType != entry_type) 836 continue; 837 if (devscope->EnumerationId != id) 838 continue; 839 #ifdef DEV_APIC 840 if (entry_type == ACPI_DMAR_SCOPE_TYPE_IOAPIC) { 841 error = ioapic_get_rid(id, rid); 842 /* 843 * If our IOAPIC has PCI bindings then 844 * use the PCI device rid. 845 */ 846 if (error == 0) 847 return (unit); 848 } 849 #endif 850 if (devscope->Length - sizeof(ACPI_DMAR_DEVICE_SCOPE) 851 == 2) { 852 if (rid != NULL) { 853 path = (ACPI_DMAR_PCI_PATH *) 854 (devscope + 1); 855 *rid = PCI_RID(devscope->Bus, 856 path->Device, path->Function); 857 } 858 return (unit); 859 } 860 printf( 861 "dmar_find_nonpci: id %d type %d path length != 2\n", 862 id, entry_type); 863 break; 864 } 865 } 866 return (NULL); 867 } 868 869 struct dmar_unit * 870 dmar_find_hpet(device_t dev, uint16_t *rid) 871 { 872 873 return (dmar_find_nonpci(hpet_get_uid(dev), ACPI_DMAR_SCOPE_TYPE_HPET, 874 rid)); 875 } 876 877 struct dmar_unit * 878 dmar_find_ioapic(u_int apic_id, uint16_t *rid) 879 { 880 881 return (dmar_find_nonpci(apic_id, ACPI_DMAR_SCOPE_TYPE_IOAPIC, rid)); 882 } 883 884 struct rmrr_iter_args { 885 struct dmar_domain *domain; 886 int dev_domain; 887 int dev_busno; 888 const ACPI_DMAR_PCI_PATH *dev_path; 889 int dev_path_len; 890 struct iommu_map_entries_tailq *rmrr_entries; 891 }; 892 893 static int 894 dmar_rmrr_iter(ACPI_DMAR_HEADER *dmarh, void *arg) 895 { 896 struct rmrr_iter_args *ria; 897 ACPI_DMAR_RESERVED_MEMORY *resmem; 898 ACPI_DMAR_DEVICE_SCOPE *devscope; 899 struct iommu_map_entry *entry; 900 char *ptr, *ptrend; 901 int match; 902 903 if (dmarh->Type != ACPI_DMAR_TYPE_RESERVED_MEMORY) 904 return (1); 905 906 ria = arg; 907 resmem = (ACPI_DMAR_RESERVED_MEMORY *)dmarh; 908 if (resmem->Segment != ria->dev_domain) 909 return (1); 910 911 ptr = (char *)resmem + sizeof(*resmem); 912 ptrend = (char *)resmem + resmem->Header.Length; 913 for (;;) { 914 if (ptr >= ptrend) 915 break; 916 devscope = (ACPI_DMAR_DEVICE_SCOPE *)ptr; 917 ptr += devscope->Length; 918 match = dmar_match_devscope(devscope, ria->dev_busno, 919 ria->dev_path, ria->dev_path_len); 920 if (match == 1) { 921 entry = iommu_gas_alloc_entry(DOM2IODOM(ria->domain), 922 IOMMU_PGF_WAITOK); 923 entry->start = resmem->BaseAddress; 924 /* The RMRR entry end address is inclusive. */ 925 entry->end = resmem->EndAddress; 926 TAILQ_INSERT_TAIL(ria->rmrr_entries, entry, 927 unroll_link); 928 } 929 } 930 931 return (1); 932 } 933 934 void 935 dmar_dev_parse_rmrr(struct dmar_domain *domain, int dev_domain, int dev_busno, 936 const void *dev_path, int dev_path_len, 937 struct iommu_map_entries_tailq *rmrr_entries) 938 { 939 struct rmrr_iter_args ria; 940 941 ria.domain = domain; 942 ria.dev_domain = dev_domain; 943 ria.dev_busno = dev_busno; 944 ria.dev_path = (const ACPI_DMAR_PCI_PATH *)dev_path; 945 ria.dev_path_len = dev_path_len; 946 ria.rmrr_entries = rmrr_entries; 947 dmar_iterate_tbl(dmar_rmrr_iter, &ria); 948 } 949 950 struct inst_rmrr_iter_args { 951 struct dmar_unit *dmar; 952 }; 953 954 static device_t 955 dmar_path_dev(int segment, int path_len, int busno, 956 const ACPI_DMAR_PCI_PATH *path, uint16_t *rid) 957 { 958 device_t dev; 959 int i; 960 961 dev = NULL; 962 for (i = 0; i < path_len; i++) { 963 dev = pci_find_dbsf(segment, busno, path->Device, 964 path->Function); 965 if (i != path_len - 1) { 966 busno = pci_cfgregread(busno, path->Device, 967 path->Function, PCIR_SECBUS_1, 1); 968 path++; 969 } 970 } 971 *rid = PCI_RID(busno, path->Device, path->Function); 972 return (dev); 973 } 974 975 static int 976 dmar_inst_rmrr_iter(ACPI_DMAR_HEADER *dmarh, void *arg) 977 { 978 const ACPI_DMAR_RESERVED_MEMORY *resmem; 979 const ACPI_DMAR_DEVICE_SCOPE *devscope; 980 struct inst_rmrr_iter_args *iria; 981 const char *ptr, *ptrend; 982 device_t dev; 983 struct dmar_unit *unit; 984 int dev_path_len; 985 uint16_t rid; 986 987 iria = arg; 988 989 if (dmarh->Type != ACPI_DMAR_TYPE_RESERVED_MEMORY) 990 return (1); 991 992 resmem = (ACPI_DMAR_RESERVED_MEMORY *)dmarh; 993 if (resmem->Segment != iria->dmar->segment) 994 return (1); 995 996 ptr = (const char *)resmem + sizeof(*resmem); 997 ptrend = (const char *)resmem + resmem->Header.Length; 998 for (;;) { 999 if (ptr >= ptrend) 1000 break; 1001 devscope = (const ACPI_DMAR_DEVICE_SCOPE *)ptr; 1002 ptr += devscope->Length; 1003 /* XXXKIB bridge */ 1004 if (devscope->EntryType != ACPI_DMAR_SCOPE_TYPE_ENDPOINT) 1005 continue; 1006 rid = 0; 1007 dev_path_len = (devscope->Length - 1008 sizeof(ACPI_DMAR_DEVICE_SCOPE)) / 2; 1009 dev = dmar_path_dev(resmem->Segment, dev_path_len, 1010 devscope->Bus, 1011 (const ACPI_DMAR_PCI_PATH *)(devscope + 1), &rid); 1012 if (dev == NULL) { 1013 if (bootverbose) { 1014 printf("dmar%d no dev found for RMRR " 1015 "[%#jx, %#jx] rid %#x scope path ", 1016 iria->dmar->iommu.unit, 1017 (uintmax_t)resmem->BaseAddress, 1018 (uintmax_t)resmem->EndAddress, 1019 rid); 1020 dmar_print_path(devscope->Bus, dev_path_len, 1021 (const ACPI_DMAR_PCI_PATH *)(devscope + 1)); 1022 printf("\n"); 1023 } 1024 unit = dmar_find_by_scope(resmem->Segment, 1025 devscope->Bus, 1026 (const ACPI_DMAR_PCI_PATH *)(devscope + 1), 1027 dev_path_len); 1028 if (iria->dmar != unit) 1029 continue; 1030 dmar_get_ctx_for_devpath(iria->dmar, rid, 1031 resmem->Segment, devscope->Bus, 1032 (const ACPI_DMAR_PCI_PATH *)(devscope + 1), 1033 dev_path_len, false, true); 1034 } else { 1035 unit = dmar_find(dev, false); 1036 if (iria->dmar != unit) 1037 continue; 1038 iommu_instantiate_ctx(&(iria)->dmar->iommu, 1039 dev, true); 1040 } 1041 } 1042 1043 return (1); 1044 1045 } 1046 1047 /* 1048 * Pre-create all contexts for the DMAR which have RMRR entries. 1049 */ 1050 int 1051 dmar_instantiate_rmrr_ctxs(struct iommu_unit *unit) 1052 { 1053 struct dmar_unit *dmar; 1054 struct inst_rmrr_iter_args iria; 1055 int error; 1056 1057 dmar = IOMMU2DMAR(unit); 1058 1059 if (!dmar_barrier_enter(dmar, DMAR_BARRIER_RMRR)) 1060 return (0); 1061 1062 error = 0; 1063 iria.dmar = dmar; 1064 dmar_iterate_tbl(dmar_inst_rmrr_iter, &iria); 1065 DMAR_LOCK(dmar); 1066 if (!LIST_EMPTY(&dmar->domains)) { 1067 KASSERT((dmar->hw_gcmd & DMAR_GCMD_TE) == 0, 1068 ("dmar%d: RMRR not handled but translation is already enabled", 1069 dmar->iommu.unit)); 1070 error = dmar_enable_translation(dmar); 1071 if (bootverbose) { 1072 if (error == 0) { 1073 printf("dmar%d: enabled translation\n", 1074 dmar->iommu.unit); 1075 } else { 1076 printf("dmar%d: enabling translation failed, " 1077 "error %d\n", dmar->iommu.unit, error); 1078 } 1079 } 1080 } 1081 dmar_barrier_exit(dmar, DMAR_BARRIER_RMRR); 1082 return (error); 1083 } 1084 1085 #ifdef DDB 1086 #include <ddb/ddb.h> 1087 #include <ddb/db_lex.h> 1088 1089 static void 1090 dmar_print_domain_entry(const struct iommu_map_entry *entry) 1091 { 1092 struct iommu_map_entry *l, *r; 1093 1094 db_printf( 1095 " start %jx end %jx first %jx last %jx free_down %jx flags %x ", 1096 entry->start, entry->end, entry->first, entry->last, 1097 entry->free_down, entry->flags); 1098 db_printf("left "); 1099 l = RB_LEFT(entry, rb_entry); 1100 if (l == NULL) 1101 db_printf("NULL "); 1102 else 1103 db_printf("%jx ", l->start); 1104 db_printf("right "); 1105 r = RB_RIGHT(entry, rb_entry); 1106 if (r == NULL) 1107 db_printf("NULL"); 1108 else 1109 db_printf("%jx", r->start); 1110 db_printf("\n"); 1111 } 1112 1113 static void 1114 dmar_print_ctx(struct dmar_ctx *ctx) 1115 { 1116 1117 db_printf( 1118 " @%p pci%d:%d:%d refs %d flags %x loads %lu unloads %lu\n", 1119 ctx, pci_get_bus(ctx->context.tag->owner), 1120 pci_get_slot(ctx->context.tag->owner), 1121 pci_get_function(ctx->context.tag->owner), ctx->refs, 1122 ctx->context.flags, ctx->context.loads, ctx->context.unloads); 1123 } 1124 1125 static void 1126 dmar_print_domain(struct dmar_domain *domain, bool show_mappings) 1127 { 1128 struct iommu_domain *iodom; 1129 struct iommu_map_entry *entry; 1130 struct dmar_ctx *ctx; 1131 1132 iodom = DOM2IODOM(domain); 1133 1134 db_printf( 1135 " @%p dom %d mgaw %d agaw %d pglvl %d end %jx refs %d\n" 1136 " ctx_cnt %d flags %x pgobj %p map_ents %u\n", 1137 domain, domain->domain, domain->mgaw, domain->agaw, domain->pglvl, 1138 (uintmax_t)domain->iodom.end, domain->refs, domain->ctx_cnt, 1139 domain->iodom.flags, domain->pgtbl_obj, domain->iodom.entries_cnt); 1140 if (!LIST_EMPTY(&domain->contexts)) { 1141 db_printf(" Contexts:\n"); 1142 LIST_FOREACH(ctx, &domain->contexts, link) 1143 dmar_print_ctx(ctx); 1144 } 1145 if (!show_mappings) 1146 return; 1147 db_printf(" mapped:\n"); 1148 RB_FOREACH(entry, iommu_gas_entries_tree, &iodom->rb_root) { 1149 dmar_print_domain_entry(entry); 1150 if (db_pager_quit) 1151 break; 1152 } 1153 if (db_pager_quit) 1154 return; 1155 db_printf(" unloading:\n"); 1156 TAILQ_FOREACH(entry, &domain->iodom.unload_entries, dmamap_link) { 1157 dmar_print_domain_entry(entry); 1158 if (db_pager_quit) 1159 break; 1160 } 1161 } 1162 1163 DB_FUNC(dmar_domain, db_dmar_print_domain, db_show_table, CS_OWN, NULL) 1164 { 1165 struct dmar_unit *unit; 1166 struct dmar_domain *domain; 1167 struct dmar_ctx *ctx; 1168 bool show_mappings, valid; 1169 int pci_domain, bus, device, function, i, t; 1170 db_expr_t radix; 1171 1172 valid = false; 1173 radix = db_radix; 1174 db_radix = 10; 1175 t = db_read_token(); 1176 if (t == tSLASH) { 1177 t = db_read_token(); 1178 if (t != tIDENT) { 1179 db_printf("Bad modifier\n"); 1180 db_radix = radix; 1181 db_skip_to_eol(); 1182 return; 1183 } 1184 show_mappings = strchr(db_tok_string, 'm') != NULL; 1185 t = db_read_token(); 1186 } else { 1187 show_mappings = false; 1188 } 1189 if (t == tNUMBER) { 1190 pci_domain = db_tok_number; 1191 t = db_read_token(); 1192 if (t == tNUMBER) { 1193 bus = db_tok_number; 1194 t = db_read_token(); 1195 if (t == tNUMBER) { 1196 device = db_tok_number; 1197 t = db_read_token(); 1198 if (t == tNUMBER) { 1199 function = db_tok_number; 1200 valid = true; 1201 } 1202 } 1203 } 1204 } 1205 db_radix = radix; 1206 db_skip_to_eol(); 1207 if (!valid) { 1208 db_printf("usage: show dmar_domain [/m] " 1209 "<domain> <bus> <device> <func>\n"); 1210 return; 1211 } 1212 for (i = 0; i < dmar_devcnt; i++) { 1213 unit = device_get_softc(dmar_devs[i]); 1214 LIST_FOREACH(domain, &unit->domains, link) { 1215 LIST_FOREACH(ctx, &domain->contexts, link) { 1216 if (pci_domain == unit->segment && 1217 bus == pci_get_bus(ctx->context.tag->owner) && 1218 device == 1219 pci_get_slot(ctx->context.tag->owner) && 1220 function == 1221 pci_get_function(ctx->context.tag->owner)) { 1222 dmar_print_domain(domain, 1223 show_mappings); 1224 goto out; 1225 } 1226 } 1227 } 1228 } 1229 out:; 1230 } 1231 1232 static void 1233 dmar_print_one(int idx, bool show_domains, bool show_mappings) 1234 { 1235 struct dmar_unit *unit; 1236 struct dmar_domain *domain; 1237 int i, frir; 1238 1239 unit = device_get_softc(dmar_devs[idx]); 1240 db_printf("dmar%d at %p, root at 0x%jx, ver 0x%x\n", unit->iommu.unit, 1241 unit, dmar_read8(unit, DMAR_RTADDR_REG), 1242 dmar_read4(unit, DMAR_VER_REG)); 1243 db_printf("cap 0x%jx ecap 0x%jx gsts 0x%x fsts 0x%x fectl 0x%x\n", 1244 (uintmax_t)dmar_read8(unit, DMAR_CAP_REG), 1245 (uintmax_t)dmar_read8(unit, DMAR_ECAP_REG), 1246 dmar_read4(unit, DMAR_GSTS_REG), 1247 dmar_read4(unit, DMAR_FSTS_REG), 1248 dmar_read4(unit, DMAR_FECTL_REG)); 1249 if (unit->ir_enabled) { 1250 db_printf("ir is enabled; IRT @%p phys 0x%jx maxcnt %d\n", 1251 unit->irt, (uintmax_t)unit->irt_phys, unit->irte_cnt); 1252 } 1253 db_printf("fed 0x%x fea 0x%x feua 0x%x\n", 1254 dmar_read4(unit, DMAR_FEDATA_REG), 1255 dmar_read4(unit, DMAR_FEADDR_REG), 1256 dmar_read4(unit, DMAR_FEUADDR_REG)); 1257 db_printf("primary fault log:\n"); 1258 for (i = 0; i < DMAR_CAP_NFR(unit->hw_cap); i++) { 1259 frir = (DMAR_CAP_FRO(unit->hw_cap) + i) * 16; 1260 db_printf(" %d at 0x%x: %jx %jx\n", i, frir, 1261 (uintmax_t)dmar_read8(unit, frir), 1262 (uintmax_t)dmar_read8(unit, frir + 8)); 1263 } 1264 if (DMAR_HAS_QI(unit)) { 1265 db_printf("ied 0x%x iea 0x%x ieua 0x%x\n", 1266 dmar_read4(unit, DMAR_IEDATA_REG), 1267 dmar_read4(unit, DMAR_IEADDR_REG), 1268 dmar_read4(unit, DMAR_IEUADDR_REG)); 1269 if (unit->qi_enabled) { 1270 db_printf("qi is enabled: queue @0x%jx (IQA 0x%jx) " 1271 "size 0x%jx\n" 1272 " head 0x%x tail 0x%x avail 0x%x status 0x%x ctrl 0x%x\n" 1273 " hw compl 0x%x@%p/phys@%jx next seq 0x%x gen 0x%x\n", 1274 (uintmax_t)unit->inv_queue, 1275 (uintmax_t)dmar_read8(unit, DMAR_IQA_REG), 1276 (uintmax_t)unit->inv_queue_size, 1277 dmar_read4(unit, DMAR_IQH_REG), 1278 dmar_read4(unit, DMAR_IQT_REG), 1279 unit->inv_queue_avail, 1280 dmar_read4(unit, DMAR_ICS_REG), 1281 dmar_read4(unit, DMAR_IECTL_REG), 1282 unit->inv_waitd_seq_hw, 1283 &unit->inv_waitd_seq_hw, 1284 (uintmax_t)unit->inv_waitd_seq_hw_phys, 1285 unit->inv_waitd_seq, 1286 unit->inv_waitd_gen); 1287 } else { 1288 db_printf("qi is disabled\n"); 1289 } 1290 } 1291 if (show_domains) { 1292 db_printf("domains:\n"); 1293 LIST_FOREACH(domain, &unit->domains, link) { 1294 dmar_print_domain(domain, show_mappings); 1295 if (db_pager_quit) 1296 break; 1297 } 1298 } 1299 } 1300 1301 DB_SHOW_COMMAND(dmar, db_dmar_print) 1302 { 1303 bool show_domains, show_mappings; 1304 1305 show_domains = strchr(modif, 'd') != NULL; 1306 show_mappings = strchr(modif, 'm') != NULL; 1307 if (!have_addr) { 1308 db_printf("usage: show dmar [/d] [/m] index\n"); 1309 return; 1310 } 1311 dmar_print_one((int)addr, show_domains, show_mappings); 1312 } 1313 1314 DB_SHOW_ALL_COMMAND(dmars, db_show_all_dmars) 1315 { 1316 int i; 1317 bool show_domains, show_mappings; 1318 1319 show_domains = strchr(modif, 'd') != NULL; 1320 show_mappings = strchr(modif, 'm') != NULL; 1321 1322 for (i = 0; i < dmar_devcnt; i++) { 1323 dmar_print_one(i, show_domains, show_mappings); 1324 if (db_pager_quit) 1325 break; 1326 } 1327 } 1328 #endif 1329 1330 struct iommu_unit * 1331 iommu_find(device_t dev, bool verbose) 1332 { 1333 struct dmar_unit *dmar; 1334 1335 dmar = dmar_find(dev, verbose); 1336 1337 return (&dmar->iommu); 1338 } 1339