toaruos/kernel/devices/pci.c
2018-03-19 11:38:11 +09:00

115 lines
3.1 KiB
C

/* vim: tabstop=4 shiftwidth=4 noexpandtab
* This file is part of ToaruOS and is released under the terms
* of the NCSA / University of Illinois License - see LICENSE.md
* Copyright (C) 2011-2014 Kevin Lange
*
* ToAruOS PCI Initialization
*/
#include <kernel/system.h>
#include <kernel/pci.h>
#include "pci_list.h"
void pci_write_field(uint32_t device, int field, int size, uint32_t value) {
outportl(PCI_ADDRESS_PORT, pci_get_addr(device, field));
outportl(PCI_VALUE_PORT, value);
}
uint32_t pci_read_field(uint32_t device, int field, int size) {
outportl(PCI_ADDRESS_PORT, pci_get_addr(device, field));
if (size == 4) {
uint32_t t = inportl(PCI_VALUE_PORT);
return t;
} else if (size == 2) {
uint16_t t = inports(PCI_VALUE_PORT + (field & 2));
return t;
} else if (size == 1) {
uint8_t t = inportb(PCI_VALUE_PORT + (field & 3));
return t;
}
return 0xFFFF;
}
uint16_t pci_find_type(uint32_t dev) {
return (pci_read_field(dev, PCI_CLASS, 1) << 8) | pci_read_field(dev, PCI_SUBCLASS, 1);
}
const char * pci_vendor_lookup(unsigned short vendor_id) {
for (unsigned int i = 0; i < PCI_VENTABLE_LEN; ++i) {
if (PciVenTable[i].VenId == vendor_id) {
return PciVenTable[i].VenFull;
}
}
return "";
}
const char * pci_device_lookup(unsigned short vendor_id, unsigned short device_id) {
for (unsigned int i = 0; i < PCI_DEVTABLE_LEN; ++i) {
if (PciDevTable[i].VenId == vendor_id && PciDevTable[i].DevId == device_id) {
return PciDevTable[i].ChipDesc;
}
}
return "";
}
void pci_scan_hit(pci_func_t f, uint32_t dev, void * extra) {
int dev_vend = (int)pci_read_field(dev, PCI_VENDOR_ID, 2);
int dev_dvid = (int)pci_read_field(dev, PCI_DEVICE_ID, 2);
f(dev, dev_vend, dev_dvid, extra);
}
void pci_scan_func(pci_func_t f, int type, int bus, int slot, int func, void * extra) {
uint32_t dev = pci_box_device(bus, slot, func);
if (type == -1 || type == pci_find_type(dev)) {
pci_scan_hit(f, dev, extra);
}
if (pci_find_type(dev) == PCI_TYPE_BRIDGE) {
pci_scan_bus(f, type, pci_read_field(dev, PCI_SECONDARY_BUS, 1), extra);
}
}
void pci_scan_slot(pci_func_t f, int type, int bus, int slot, void * extra) {
uint32_t dev = pci_box_device(bus, slot, 0);
if (pci_read_field(dev, PCI_VENDOR_ID, 2) == PCI_NONE) {
return;
}
pci_scan_func(f, type, bus, slot, 0, extra);
if (!pci_read_field(dev, PCI_HEADER_TYPE, 1)) {
return;
}
for (int func = 1; func < 8; func++) {
uint32_t dev = pci_box_device(bus, slot, func);
if (pci_read_field(dev, PCI_VENDOR_ID, 2) != PCI_NONE) {
pci_scan_func(f, type, bus, slot, func, extra);
}
}
}
void pci_scan_bus(pci_func_t f, int type, int bus, void * extra) {
for (int slot = 0; slot < 32; ++slot) {
pci_scan_slot(f, type, bus, slot, extra);
}
}
void pci_scan(pci_func_t f, int type, void * extra) {
if ((pci_read_field(0, PCI_HEADER_TYPE, 1) & 0x80) == 0) {
pci_scan_bus(f,type,0,extra);
return;
}
for (int func = 0; func < 8; ++func) {
uint32_t dev = pci_box_device(0, 0, func);
if (pci_read_field(dev, PCI_VENDOR_ID, 2) != PCI_NONE) {
pci_scan_bus(f, type, func, extra);
} else {
break;
}
}
}