sys/dev/acpica/acpi_pcib.c

   1 /*-
   2  * Copyright (c) 2000 Michael Smith
   3  * Copyright (c) 2000 BSDi
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  25  * SUCH DAMAGE.
  26  *
  27  * $FreeBSD: src/sys/dev/acpica/acpi_pcib.c,v 1.60.8.1 2009/04/15 03:14:26 kensmith Exp $
  28  */
  29
  30 #include "opt_acpi.h"
  31 #include <sys/param.h>
  32 #include <sys/bus.h>
  33 #include <sys/malloc.h>
  34 #include <sys/kernel.h>
  35 #include <sys/machintr.h>
  36 #include <machine/smp.h>
  37
  38 #include "acpi.h"
  39 #include <dev/acpica/acpivar.h>
  40 #include <dev/acpica/acpi_pcibvar.h>
  41
  42 #include <bus/pci/pcivar.h>
  43 #include <bus/pci/pcireg.h>
  44 #include <bus/pci/pci_cfgreg.h>
  45 #include "pcib_if.h"
  46
  47 /* Hooks for the ACPICA debugging infrastructure. */
  48 #define _COMPONENT      ACPI_BUS
  49 ACPI_MODULE_NAME("PCI")
  50
  51 ACPI_SERIAL_DECL(pcib, "ACPI PCI bus methods");
  52
  53 /*
  54  * For locking, we assume the caller is not concurrent since this is
  55  * triggered by newbus methods.
  56  */
  57
  58 struct prt_lookup_request {
  59     ACPI_PCI_ROUTING_TABLE *pr_entry;
  60     u_int       pr_pin;
  61     u_int       pr_slot;
  62 };
  63
  64 typedef void prt_entry_handler(ACPI_PCI_ROUTING_TABLE *entry, void *arg);
  65
  66 static void     prt_attach_devices(ACPI_PCI_ROUTING_TABLE *entry, void *arg);
  67 static void     prt_lookup_device(ACPI_PCI_ROUTING_TABLE *entry, void *arg);
  68 static void     prt_walk_table(ACPI_BUFFER *prt, prt_entry_handler *handler,
  69                     void *arg);
  70
  71 static void
  72 prt_walk_table(ACPI_BUFFER *prt, prt_entry_handler *handler, void *arg)
  73 {
  74     ACPI_PCI_ROUTING_TABLE *entry;
  75     char *prtptr;
  76
  77     /* First check to see if there is a table to walk. */
  78     if (prt == NULL || prt->Pointer == NULL)
  79         return;
  80
  81     /* Walk the table executing the handler function for each entry. */
  82     prtptr = prt->Pointer;
  83     entry = (ACPI_PCI_ROUTING_TABLE *)prtptr;
  84     while (entry->Length != 0) {
  85         handler(entry, arg);
  86         prtptr += entry->Length;
  87         entry = (ACPI_PCI_ROUTING_TABLE *)prtptr;
  88     }
  89 }
  90
  91 static void
  92 prt_attach_devices(ACPI_PCI_ROUTING_TABLE *entry, void *arg)
  93 {
  94     ACPI_HANDLE handle;
  95     device_t child, pcib;
  96     int error;
  97
  98     /* We only care about entries that reference a link device. */
  99     if (entry->Source == NULL || entry->Source[0] == '\0')
 100         return;
 101
 102     /*
 103      * In practice, we only see SourceIndex's of 0 out in the wild.
 104      * When indices != 0 have been found, they've been bugs in the ASL.
 105      */
 106     if (entry->SourceIndex != 0)
 107         return;
 108
 109     /* Lookup the associated handle and device. */
 110     pcib = (device_t)arg;
 111     if (ACPI_FAILURE(AcpiGetHandle(ACPI_ROOT_OBJECT, entry->Source, &handle)))
 112         return;
 113     child = acpi_get_device(handle);
 114     if (child == NULL)
 115         return;
 116
 117     /* If the device hasn't been probed yet, force it to do so. */
 118     error = device_probe_and_attach(child);
 119     if (error != 0) {
 120         device_printf(pcib, "failed to force attach of %s\n",
 121             acpi_name(handle));
 122         return;
 123     }
 124
 125     /* Add a reference for a specific bus/device/pin tuple. */
 126     acpi_pci_link_add_reference(child, entry->SourceIndex, pcib,
 127         ACPI_ADR_PCI_SLOT(entry->Address), entry->Pin);
 128 }
 129
 130 int
 131 acpi_pcib_attach(device_t dev, ACPI_BUFFER *prt, int busno)
 132 {
 133     device_t                    child;
 134     ACPI_STATUS                 status;
 135
 136     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
 137
 138     if (!acpi_DeviceIsPresent(dev)) {
 139         /* Caller should already have checked it */
 140         panic("%s device is not present", __func__);
 141     }
 142
 143     ACPI_SERIAL_INIT(pcib);
 144
 145     /*
 146      * Get the PCI interrupt routing table for this bus.  If we can't
 147      * get it, this is not an error but may reduce functionality.  There
 148      * are several valid bridges in the field that do not have a _PRT, so
 149      * only warn about missing tables if bootverbose is set.
 150      */
 151     prt->Length = ACPI_ALLOCATE_BUFFER;
 152     status = AcpiGetIrqRoutingTable(acpi_get_handle(dev), prt);
 153     if (ACPI_FAILURE(status) && (bootverbose || status != AE_NOT_FOUND))
 154         device_printf(dev,
 155             "could not get PCI interrupt routing table for %s - %s\n",
 156             acpi_name(acpi_get_handle(dev)), AcpiFormatException(status));
 157
 158     /*
 159      * Attach the PCI bus proper.
 160      */
 161     if ((child = device_add_child(dev, "pci", busno)) == NULL) {
 162         device_printf(device_get_parent(dev), "couldn't attach pci bus\n");
 163         return_VALUE(ENXIO);
 164     }
 165
 166     /*
 167      * Now go scan the bus.
 168      */
 169     prt_walk_table(prt, prt_attach_devices, dev);
 170
 171     return_VALUE (bus_generic_attach(dev));
 172 }
 173
 174 int
 175 acpi_pcib_resume(device_t dev)
 176 {
 177
 178     return (bus_generic_resume(dev));
 179 }
 180
 181 static void
 182 prt_lookup_device(ACPI_PCI_ROUTING_TABLE *entry, void *arg)
 183 {
 184     struct prt_lookup_request *pr;
 185
 186     pr = (struct prt_lookup_request *)arg;
 187     if (pr->pr_entry != NULL)
 188         return;
 189
 190     /*
 191      * Compare the slot number (high word of Address) and pin number
 192      * (note that ACPI uses 0 for INTA) to check for a match.
 193      *
 194      * Note that the low word of the Address field (function number)
 195      * is required by the specification to be 0xffff.  We don't risk
 196      * checking it here.
 197      */
 198     if (ACPI_ADR_PCI_SLOT(entry->Address) == pr->pr_slot &&
 199         entry->Pin == pr->pr_pin)
 200             pr->pr_entry = entry;
 201 }
 202
 203 /*
 204  * Route an interrupt for a child of the bridge.
 205  */
 206 int
 207 acpi_pcib_route_interrupt(device_t pcib, device_t dev, int pin,
 208     ACPI_BUFFER *prtbuf)
 209 {
 210     ACPI_PCI_ROUTING_TABLE *prt;
 211     struct prt_lookup_request pr;
 212     ACPI_HANDLE lnkdev;
 213     int interrupt;
 214
 215     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
 216
 217     interrupt = PCI_INVALID_IRQ;
 218
 219     /* ACPI numbers pins 0-3, not 1-4 like the BIOS. */
 220     pin--;
 221
 222     ACPI_SERIAL_BEGIN(pcib);
 223
 224     /* Search for a matching entry in the routing table. */
 225     pr.pr_entry = NULL;
 226     pr.pr_pin = pin;
 227     pr.pr_slot = pci_get_slot(dev);
 228     prt_walk_table(prtbuf, prt_lookup_device, &pr);
 229     if (pr.pr_entry == NULL) {
 230         device_printf(pcib, "no PRT entry for %d.%d.INT%c\n", pci_get_bus(dev),
 231             pci_get_slot(dev), 'A' + pin);
 232         goto out;
 233     }
 234     prt = pr.pr_entry;
 235
 236     if (bootverbose) {
 237         device_printf(pcib, "matched entry for %d.%d.INT%c",
 238             pci_get_bus(dev), pci_get_slot(dev), 'A' + pin);
 239         if (prt->Source != NULL && prt->Source[0] != '\0')
 240                 kprintf(" (src %s:%u)", prt->Source, prt->SourceIndex);
 241         kprintf("\n");
 242     }
 243
 244     /*
 245      * If source is empty/NULL, the source index is a GSI and it's hardwired
 246      * so we're done.
 247      *
 248      * XXX: If the source index is non-zero, ignore the source device and
 249      * assume that this is a hardwired entry.
 250      */
 251     if (prt->Source == NULL || prt->Source[0] == '\0' ||
 252         prt->SourceIndex != 0) {
 253         if (prt->SourceIndex) {
 254             interrupt = machintr_legacy_intr_find_bygsi(prt->SourceIndex,
 255                 INTR_TRIGGER_LEVEL, INTR_POLARITY_LOW);
 256             if (interrupt < 0) {
 257                 device_printf(pcib, "slot %d INT%c hardwired to "
 258                     "invalid GSI %d\n", pci_get_slot(dev), 'A' + pin,
 259                     prt->SourceIndex);
 260                 interrupt = PCI_INVALID_IRQ;
 261                 goto out;
 262             }
 263             if (bootverbose) {
 264                 device_printf(pcib, "slot %d INT%c hardwired to "
 265                     "GSI %d, IRQ %d\n", pci_get_slot(dev), 'A' + pin,
 266                     prt->SourceIndex, interrupt);
 267             }
 268
 269             BUS_CONFIG_INTR(device_get_parent(dev), dev, interrupt,
 270                 INTR_TRIGGER_LEVEL, INTR_POLARITY_LOW);
 271         } else {
 272             device_printf(pcib, "invalid hardwired GSI 0\n");
 273         }
 274         goto out;
 275     }
 276
 277     /*
 278      * We have to find the source device (PCI interrupt link device).
 279      */
 280     if (ACPI_FAILURE(AcpiGetHandle(ACPI_ROOT_OBJECT, prt->Source, &lnkdev))) {
 281         device_printf(pcib, "couldn't find PCI interrupt link device %s\n",
 282             prt->Source);
 283         goto out;
 284     }
 285     interrupt = acpi_pci_link_route_interrupt(acpi_get_device(lnkdev),
 286         prt->SourceIndex);
 287
 288     if (bootverbose && PCI_INTERRUPT_VALID(interrupt)) {
 289         device_printf(pcib, "slot %d INT%c routed to irq %d via %s\n",
 290             pci_get_slot(dev), 'A' + pin, interrupt, acpi_name(lnkdev));
 291     }
 292
 293 out:
 294     ACPI_SERIAL_END(pcib);
 295
 296     return_VALUE (interrupt);
 297 }
 298
 299 int
 300 acpi_pcib_probe(device_t dev)
 301 {
 302     /*
 303      * Don't attach if we're not really there.
 304      *
 305      * XXX: This isn't entirely correct since we may be a PCI bus
 306      * on a hot-plug docking station, etc.
 307      */
 308     if (!acpi_DeviceIsPresent(dev))
 309         return ENXIO;
 310
 311     if (pci_cfgregopen() == 0)
 312         return ENXIO;
 313
 314     return 0;
 315 }