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