Chameleon

Chameleon Svn Source Tree

Root/branches/ErmaC/Enoch_Modules/i386/libsaio/pci.c

1/*␊
2 *␊
3 * Copyright 2008 by Islam M. Ahmed Zaid. All rights reserved.␊
4 *␊
5 */␊
6␊
7#include "libsaio.h"␊
8#include "bootstruct.h"␊
9#include "pci.h"␊
10#include "pci_root.h"␊
11␊
12#ifndef DEBUG_PCI␊
13#define DEBUG_PCI 0␊
14#endif␊
15␊
16#if DEBUG_PCI␊
17#define DBG(x...)␉␉printf(x)␊
18#else␊
19#define DBG(x...)␊
20#endif␊
21␊
22pci_dt_t␉*root_pci_dev;␊
23␊
24␊
25uint8_t pci_config_read8(uint32_t pci_addr, uint8_t reg)␊
26{␊
27␉pci_addr |= reg & ~3;␊
28␉outl(PCI_ADDR_REG, pci_addr);␊
29␉return inb(PCI_DATA_REG + (reg & 3));␊
30}␊
31␊
32uint16_t pci_config_read16(uint32_t pci_addr, uint8_t reg)␊
33{␊
34␉pci_addr |= reg & ~3;␊
35␉outl(PCI_ADDR_REG, pci_addr);␊
36␉return inw(PCI_DATA_REG + (reg & 2));␊
37}␊
38␊
39uint32_t pci_config_read32(uint32_t pci_addr, uint8_t reg)␊
40{␊
41␉pci_addr |= reg & ~3;␊
42␉outl(PCI_ADDR_REG, pci_addr);␊
43␉return inl(PCI_DATA_REG);␊
44}␊
45␊
46void pci_config_write8(uint32_t pci_addr, uint8_t reg, uint8_t data)␊
47{␊
48␉pci_addr |= reg & ~3;␊
49␉outl(PCI_ADDR_REG, pci_addr);␊
50␉outb(PCI_DATA_REG + (reg & 3), data);␊
51}␊
52␊
53void pci_config_write16(uint32_t pci_addr, uint8_t reg, uint16_t data)␊
54{␊
55␉pci_addr |= reg & ~3;␊
56␉outl(PCI_ADDR_REG, pci_addr);␊
57␉outw(PCI_DATA_REG + (reg & 2), data);␊
58}␊
59␊
60void pci_config_write32(uint32_t pci_addr, uint8_t reg, uint32_t data)␊
61{␊
62␉pci_addr |= reg & ~3;␊
63␉outl(PCI_ADDR_REG, pci_addr);␊
64␉outl(PCI_DATA_REG, data);␊
65}␊
66␊
67void scan_pci_bus(pci_dt_t *start, uint8_t bus)␊
68{␊
69␉pci_dt_t␉*new;␊
70␉pci_dt_t␉**current = &start->children;␊
71␉uint32_t␉id;␊
72␉uint32_t␉pci_addr;␊
73␉uint8_t␉␉dev = 0;␊
74␉uint8_t␉␉func = 0;␊
75␉uint8_t␉␉secondary_bus;␊
76␉uint8_t␉␉header_type;␊
77␊
78␉for (dev = 0; dev < 32; dev++)␊
79␉{␊
80␉␉for (func = 0; func < 8; func++)␊
81␉␉{␊
82␉␉␉pci_addr = PCIADDR(bus, dev, func);␊
83␉␉␉id = pci_config_read32(pci_addr, PCI_VENDOR_ID);␊
84␉␉␉if (!id || id == 0xfffffffful)␊
85␉␉␉{␊
86␉␉␉␉continue;␊
87␉␉␉}␊
88␉␉␉new = (pci_dt_t*)malloc(sizeof(pci_dt_t));␊
89␉␉␉if (!new)␊
90␉␉␉{␊
91␉␉␉␉continue;␊
92␉␉␉}␊
93␉␉␉bzero(new, sizeof(pci_dt_t));␊
94␊
95␉␉␉new->dev.addr␉␉␉␉= pci_addr;␊
96␉␉␉new->vendor_id␉␉␉␉= id & 0xffff;␊
97␉␉␉new->device_id␉␉␉␉= (id >> 16) & 0xffff;␊
98␉␉␉new->progif = pci_config_read8(pci_addr, PCI_CLASS_PROG);␊
99␉␉␉new->revision_id␉␉␉= pci_config_read8(pci_addr, PCI_CLASS_REVISION);␊
100␉␉␉new->subsys_id.subsys_id = pci_config_read32(pci_addr, PCI_SUBSYSTEM_VENDOR_ID);␊
101␉␉␉new->class_id␉␉␉␉= pci_config_read16(pci_addr, PCI_CLASS_DEVICE);␊
102␉␉␉//new->subclass_id␉␉␉= pci_config_read16(pci_addr, PCI_SUBCLASS_DEVICE);␊
103␉␉␉new->parent␉= start;␊
104␊
105␉␉␉header_type = pci_config_read8(pci_addr, PCI_HEADER_TYPE);␊
106␉␉␉switch (header_type & 0x7f)␊
107␉␉␉{␊
108␉␉␉case PCI_HEADER_TYPE_BRIDGE:␊
109␉␉␉case PCI_HEADER_TYPE_CARDBUS:␊
110␉␉␉␉secondary_bus = pci_config_read8(pci_addr, PCI_SECONDARY_BUS);␊
111␉␉␉␉if (secondary_bus != 0)␊
112␉␉␉␉{␊
113␉␉␉␉␉scan_pci_bus(new, secondary_bus);␊
114␉␉␉␉}␊
115␉␉␉␉break;␊
116␉␉␉␉default:␊
117␉␉␉␉␉break;␊
118␉␉␉}␊
119␉␉␉*current = new;␊
120␉␉␉current = &new->next;␊
121␊
122␉␉␉if ((func == 0) && ((header_type & 0x80) == 0))␊
123␉␉␉{␊
124␉␉␉␉break;␊
125␉␉␉}␊
126␉␉}␊
127␉}␊
128}␊
129␊
130void enable_pci_devs(void)␊
131{␊
132␉uint16_t id;␊
133␉uint32_t rcba, *fd;␊
134␊
135␉id = pci_config_read16(PCIADDR(0, 0x00, 0), 0x00);␊
136␉/* make sure we're on Intel chipset */␊
137␉if (id != 0x8086)␊
138␉{␊
139␉␉return;␊
140␉}␊
141␉rcba = pci_config_read32(PCIADDR(0, 0x1f, 0), 0xf0) & ~1; //this is LPC host␊
142␉fd = (uint32_t *)(rcba + 0x3418);␊
143␉/* set SMBus Disable (SD) to 0 */␊
144␉*fd &= ~0x8;␊
145␉/* and all devices? */␊
146␉//*fd = 0x1;␊
147}␊
148␊
149␊
150void build_pci_dt(void)␊
151{␊
152␉root_pci_dev = malloc(sizeof(pci_dt_t));␊
153␊
154␉if (!root_pci_dev)␊
155␉{␊
156␉␉return;␊
157␉}␊
158␊
159␉//gRootPCIDev = (void*)root_pci_dev;␊
160␊
161␉bzero(root_pci_dev, sizeof(pci_dt_t));␊
162␉enable_pci_devs();␊
163␉scan_pci_bus(root_pci_dev, 0);␊
164␊
165#if DEBUG_PCI␊
166␉dump_pci_dt(root_pci_dev->children);␊
167␉pause();␊
168#endif␊
169}␊
170␊
171static char dev_path[256];␊
172char *get_pci_dev_path(pci_dt_t *pci_dt)␊
173{␊
174␉pci_dt_t␉*current;␊
175␉pci_dt_t␉*end;␊
176␉char␉␉tmp[64];␊
177␊
178␉dev_path[0] = 0;␊
179␉end = root_pci_dev;␊
180␉␊
181␉int uid = getPciRootUID();␊
182␉while (end != pci_dt)␊
183␉{␊
184␉␉current = pci_dt;␊
185␉␉while (current->parent != end)␊
186␉␉␉current = current->parent;␉␉␉␊
187␉␉end = current;␊
188␉␉if (current->parent == root_pci_dev)␊
189␉␉{␊
190␉␉␉sprintf(tmp, "PciRoot(0x%x)/Pci(0x%x,0x%x)", uid, ␊
191␉␉␉␉current->dev.bits.dev, current->dev.bits.func);␊
192␉␉}␊
193␉␉else␊
194␉␉{␊
195␉␉␉sprintf(tmp, "/Pci(0x%x,0x%x)", ␊
196␉␉␉␉current->dev.bits.dev, current->dev.bits.func);␊
197␉␉}␊
198␉␉strcat(dev_path, tmp);␊
199␉}␊
200␉return dev_path;␊
201}␊
202␊
203void dump_pci_dt(pci_dt_t *pci_dt)␊
204{␊
205␉pci_dt_t␉*current;␊
206␊
207␉current = pci_dt;␊
208␉while (current)␊
209␉{␊
210␉␉printf("%02x:%02x.%x [%04x%02x] [%04x:%04x] (subsys [%04x:%04x]):: %s\n", ␊
211␉␉␉current->dev.bits.bus, current->dev.bits.dev, current->dev.bits.func, ␊
212␉␉␉current->class_id, current->vendor_id, current->device_id, ␊
213␉␉␉current->subsys_id.subsys.vendor_id, current->subsys_id.subsys.device_id, ␊
214␉␉␉get_pci_dev_path(current));␊
215␉␉dump_pci_dt(current->children);␊
216␉␉current = current->next;␊
217␉}␊
218}␊
219

Archive Download this file

Revision: 2238