diff options
Diffstat (limited to 'payloads/libpayload/libpci/libpci.c')
-rw-r--r-- | payloads/libpayload/libpci/libpci.c | 216 |
1 files changed, 216 insertions, 0 deletions
diff --git a/payloads/libpayload/libpci/libpci.c b/payloads/libpayload/libpci/libpci.c new file mode 100644 index 0000000000..09b51e5133 --- /dev/null +++ b/payloads/libpayload/libpci/libpci.c @@ -0,0 +1,216 @@ +/* + * This file is part of the libpayload project. + * + * Copyright (C) 2010 coresystems GmbH + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. The name of the author may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + */ + +#include <libpayload.h> +#include <pci.h> +#include <pci/pci.h> + +/* libpci shim */ +static pcidev_t libpci_to_lb(struct pci_dev *dev) +{ + return PCI_DEV(dev->bus, dev->dev, dev->func); +} + +/* libpci interface */ +u8 pci_read_byte(struct pci_dev *dev, int pos) +{ + return pci_read_config8(libpci_to_lb(dev), pos); +} + +u16 pci_read_word(struct pci_dev *dev, int pos) +{ + return pci_read_config16(libpci_to_lb(dev), pos); +} + +u32 pci_read_long(struct pci_dev *dev, int pos) +{ + return pci_read_config32(libpci_to_lb(dev), pos); +} + +int pci_write_byte(struct pci_dev *dev, int pos, u8 data) +{ + pci_write_config8(libpci_to_lb(dev), pos, data); + return 1; /* success */ +} + +int pci_write_word(struct pci_dev *dev, int pos, u16 data) +{ + pci_write_config16(libpci_to_lb(dev), pos, data); + return 1; /* success */ +} + +int pci_write_long(struct pci_dev *dev, int pos, u32 data) +{ + pci_write_config32(libpci_to_lb(dev), pos, data); + return 1; /* success */ +} + +struct pci_access *pci_alloc(void) +{ + struct pci_access *pacc = malloc(sizeof(*pacc)); + return pacc; +} + +void pci_init(struct pci_access* pacc) +{ + memset(pacc, 0, sizeof(*pacc)); +} + +void pci_filter_init(struct pci_access* pacc, struct pci_filter* pf) +{ + pf->domain = -1; + pf->bus = -1; + pf->dev = -1; + pf->func = -1; + pf->vendor = -1; + pf->device = -1; +} + +/* parse domain:bus:dev.func (with all components but "dev" optional) + * into filter. + * Returns NULL on success, a string pointer to the error message otherwise. + */ +char *pci_filter_parse_slot(struct pci_filter* filter, const char* id) +{ + char *endptr; + + filter->func = filter->dev = filter->bus = filter->domain = -1; + + char *funcp = strrchr(id, '.'); + if (funcp) { + filter->func = strtoul(funcp+1, &endptr, 0); + if (endptr[0] != '\0') return "invalid pci device string"; + } + + char *devp = strrchr(id, ':'); + if (!devp) { + filter->dev = strtoul(id, &endptr, 0); + } else { + filter->dev = strtoul(devp+1, &endptr, 0); + } + if (endptr != funcp) return "invalid pci device string"; + if (!devp) return NULL; + + char *busp = strchr(id, ':'); + if (busp == devp) { + filter->bus = strtoul(id, &endptr, 0); + } else { + filter->bus = strtoul(busp+1, &endptr, 0); + } + if (endptr != funcp) return "invalid pci device string"; + if (busp == devp) return NULL; + + filter->domain = strtoul(id, &endptr, 0); + if (endptr != busp) return "invalid pci device string"; + + return NULL; +} + +int pci_filter_match(struct pci_filter* pf, struct pci_dev* dev) +{ + if ((pf->domain > -1) && (pf->domain != dev->domain)) + return 0; + if ((pf->bus > -1) && (pf->bus != dev->bus)) + return 0; + if ((pf->dev > -1) && (pf->dev != dev->dev)) + return 0; + if ((pf->func > -1) && (pf->func != dev->func)) + return 0; + if ((pf->vendor > -1) && (pf->vendor != dev->vendor_id)) + return 0; + if ((pf->device > -1) && (pf->device != dev->device_id)) + return 0; + return 1; +} + +static struct pci_dev *pci_scan_single_bus(struct pci_dev *dev, int bus) +{ + int devfn; + u32 val; + unsigned char hdr; + + for (devfn = 0; devfn < 0x100; devfn++) { + int func = devfn & 0x7; + int slot = (devfn >> 3) & 0x1f; + + val = pci_read_config32(PCI_DEV(bus, slot, func), + REG_VENDOR_ID); + + if (val == 0xffffffff || val == 0x00000000 || + val == 0x0000ffff || val == 0xffff0000) + continue; + + dev->next = malloc(sizeof(struct pci_dev)); + dev = dev->next; + dev->domain = 0; + dev->bus = bus; + dev->dev = slot; + dev->func = func; + dev->vendor_id = val & 0xffff; + dev->device_id = val >> 16; + dev->next = 0; + + hdr = pci_read_config8(PCI_DEV(bus, slot, func), + REG_HEADER_TYPE); + hdr &= 0x7F; + + if (hdr == HEADER_TYPE_BRIDGE || hdr == HEADER_TYPE_CARDBUS) { + unsigned int busses; + busses = pci_read_config32(PCI_DEV(bus, slot, func), + REG_PRIMARY_BUS); + busses = (busses >> 8) & 0xFF; + + /* Avoid recursion if the new bus is the same as + * the old bus (insert lame The Who joke here) */ + + if (busses != bus) + dev = pci_scan_single_bus(dev, busses); + } + } + + return dev; +} + +void pci_scan_bus(struct pci_access* pacc) +{ + struct pci_dev rootdev; + pci_scan_single_bus(&rootdev, 0); + pacc->devices = rootdev.next; +} + +struct pci_dev *pci_get_dev(struct pci_access* pacc, u16 domain, u8 bus, u8 dev, u8 func) +{ + struct pci_dev *cur = malloc(sizeof(*cur)); + cur->domain = domain; + cur->bus = bus; + cur->dev = dev; + cur->func = func; + return cur; +} + |