![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to mptable.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Qemu by Fabrice Bellard] / qemu / roms / seabios / src|
Return to mptable.c CVS log | Up to [Qemu by Fabrice Bellard] / qemu / roms / seabios / src |
1.1 root 1: // MPTable generation (on emulators)
2: //
1.1.1.4 root 3: // Copyright (C) 2008-2010 Kevin O'Connor <[email protected]>
1.1 root 4: // Copyright (C) 2006 Fabrice Bellard
5: //
6: // This file may be distributed under the terms of the GNU LGPLv3 license.
7:
8: #include "util.h" // dprintf
9: #include "config.h" // CONFIG_*
10: #include "mptable.h" // MPTABLE_SIGNATURE
11: #include "paravirt.h" // qemu_cfg_irq0_override
1.1.1.2 root 12: #include "pci.h"
13: #include "pci_regs.h"
1.1 root 14:
15: void
16: mptable_init(void)
17: {
18: if (! CONFIG_MPTABLE)
19: return;
20:
21: dprintf(3, "init MPTable\n");
22:
1.1.1.2 root 23: // Config structure in temp area.
1.1.1.3 root 24: struct mptable_config_s *config = malloc_tmp(32*1024);
1.1.1.2 root 25: if (!config) {
1.1.1.3 root 26: warn_noalloc();
1.1 root 27: return;
28: }
29: memset(config, 0, sizeof(*config));
30: config->signature = MPCONFIG_SIGNATURE;
31: config->spec = 4;
32: memcpy(config->oemid, CONFIG_CPUNAME8, sizeof(config->oemid));
33: memcpy(config->productid, "0.1 ", sizeof(config->productid));
34: config->lapic = BUILD_APIC_ADDR;
35:
36: // Detect cpu info
37: u32 cpuid_signature, ebx, ecx, cpuid_features;
38: cpuid(1, &cpuid_signature, &ebx, &ecx, &cpuid_features);
1.1.1.3 root 39: if (! cpuid_signature) {
40: // Use default values.
41: cpuid_signature = 0x600;
42: cpuid_features = 0x201;
43: }
1.1 root 44: int pkgcpus = 1;
45: if (cpuid_features & (1 << 28)) {
46: /* Only populate the MPS tables with the first logical CPU in
47: each package */
48: pkgcpus = (ebx >> 16) & 0xff;
49: pkgcpus = 1 << (__fls(pkgcpus - 1) + 1); /* round up to power of 2 */
50: }
1.1.1.3 root 51: u8 apic_version = readl((u8*)BUILD_APIC_ADDR + 0x30) & 0xff;
1.1 root 52:
53: // CPU definitions.
54: struct mpt_cpu *cpus = (void*)&config[1], *cpu = cpus;
55: int i;
56: for (i = 0; i < MaxCountCPUs; i+=pkgcpus) {
57: memset(cpu, 0, sizeof(*cpu));
58: cpu->type = MPT_TYPE_CPU;
59: cpu->apicid = i;
1.1.1.3 root 60: cpu->apicver = apic_version;
1.1 root 61: /* cpu flags: enabled, bootstrap cpu */
1.1.1.4 root 62: cpu->cpuflag = ((i<CountCPUs) ? 0x01 : 0x00) | ((i==0) ? 0x02 : 0x00);
1.1.1.3 root 63: cpu->cpusignature = cpuid_signature;
64: cpu->featureflag = cpuid_features;
1.1 root 65: cpu++;
66: }
67: int entrycount = cpu - cpus;
68:
1.1.1.2 root 69: // PCI buses
1.1.1.3 root 70: struct mpt_bus *buses = (void*)cpu, *bus = buses;
1.1.1.5 root 71: int lastbus = -1;
72: struct pci_device *pci;
73: foreachpci(pci) {
74: int curbus = pci_bdf_to_bus(pci->bdf);
1.1.1.2 root 75: if (curbus == lastbus)
76: continue;
77: lastbus = curbus;
78: memset(bus, 0, sizeof(*bus));
79: bus->type = MPT_TYPE_BUS;
80: bus->busid = curbus;
81: memcpy(bus->bustype, "PCI ", sizeof(bus->bustype));
82: bus++;
83: }
84:
85: /* isa bus */
86: int isabusid;
1.1 root 87: memset(bus, 0, sizeof(*bus));
88: bus->type = MPT_TYPE_BUS;
1.1.1.2 root 89: isabusid = bus->busid = lastbus + 1;
1.1 root 90: memcpy(bus->bustype, "ISA ", sizeof(bus->bustype));
1.1.1.3 root 91: bus++;
92: entrycount += bus - buses;
1.1 root 93:
94: /* ioapic */
95: u8 ioapic_id = CountCPUs;
1.1.1.3 root 96: struct mpt_ioapic *ioapic = (void*)bus;
1.1 root 97: memset(ioapic, 0, sizeof(*ioapic));
98: ioapic->type = MPT_TYPE_IOAPIC;
99: ioapic->apicid = ioapic_id;
100: ioapic->apicver = 0x11;
101: ioapic->flags = 1; // enable
102: ioapic->apicaddr = BUILD_IOAPIC_ADDR;
103: entrycount++;
104:
105: /* irqs */
106: struct mpt_intsrc *intsrcs = (void*)&ioapic[1], *intsrc = intsrcs;
1.1.1.2 root 107: int dev = -1;
108: unsigned short mask = 0, pinmask = 0;
109:
1.1.1.5 root 110: foreachpci(pci) {
111: u16 bdf = pci->bdf;
1.1.1.2 root 112: int pin = pci_config_readb(bdf, PCI_INTERRUPT_PIN);
113: int irq = pci_config_readb(bdf, PCI_INTERRUPT_LINE);
114: if (pin == 0)
115: continue;
116: if (dev != pci_bdf_to_busdev(bdf)) {
117: dev = pci_bdf_to_busdev(bdf);
118: pinmask = 0;
119: }
120: if (pinmask & (1 << pin)) /* pin was seen already */
121: continue;
122: pinmask |= (1 << pin);
123: mask |= (1 << irq);
124: memset(intsrc, 0, sizeof(*intsrc));
125: intsrc->type = MPT_TYPE_INTSRC;
126: intsrc->irqtype = 0; /* INT */
127: intsrc->irqflag = 1; /* active high */
128: intsrc->srcbus = pci_bdf_to_bus(bdf); /* PCI bus */
129: intsrc->srcbusirq = (pci_bdf_to_dev(bdf) << 2) | (pin - 1);
130: intsrc->dstapic = ioapic_id;
131: intsrc->dstirq = irq;
132: intsrc++;
133: }
134:
1.1 root 135: for (i = 0; i < 16; i++) {
136: memset(intsrc, 0, sizeof(*intsrc));
1.1.1.2 root 137: if (mask & (1 << i))
138: continue;
1.1 root 139: intsrc->type = MPT_TYPE_INTSRC;
1.1.1.2 root 140: intsrc->irqtype = 0; /* INT */
141: intsrc->irqflag = 0; /* conform to bus spec */
142: intsrc->srcbus = isabusid; /* ISA bus */
1.1 root 143: intsrc->srcbusirq = i;
144: intsrc->dstapic = ioapic_id;
145: intsrc->dstirq = i;
146: if (qemu_cfg_irq0_override()) {
147: /* Destination 2 is covered by irq0->inti2 override (i ==
148: 0). Source IRQ 2 is unused */
149: if (i == 0)
150: intsrc->dstirq = 2;
151: else if (i == 2)
152: intsrc--;
153: }
154: intsrc++;
155: }
156:
157: /* Local interrupt assignment */
158: intsrc->type = MPT_TYPE_LOCAL_INT;
159: intsrc->irqtype = 3; /* ExtINT */
160: intsrc->irqflag = 0; /* PO, EL default */
1.1.1.2 root 161: intsrc->srcbus = isabusid; /* ISA */
1.1 root 162: intsrc->srcbusirq = 0;
163: intsrc->dstapic = 0; /* BSP == APIC #0 */
164: intsrc->dstirq = 0; /* LINTIN0 */
165: intsrc++;
166:
167: intsrc->type = MPT_TYPE_LOCAL_INT;
168: intsrc->irqtype = 1; /* NMI */
169: intsrc->irqflag = 0; /* PO, EL default */
1.1.1.2 root 170: intsrc->srcbus = isabusid; /* ISA */
1.1 root 171: intsrc->srcbusirq = 0;
1.1.1.6 ! root 172: intsrc->dstapic = 0xff; /* to all local APICs */
1.1 root 173: intsrc->dstirq = 1; /* LINTIN1 */
174: intsrc++;
1.1.1.3 root 175: entrycount += intsrc - intsrcs;
1.1 root 176:
177: // Finalize config structure.
1.1.1.2 root 178: int length = (void*)intsrc - (void*)config;
1.1 root 179: config->entrycount = entrycount;
1.1.1.2 root 180: config->length = length;
181: config->checksum -= checksum(config, length);
182:
183: // Allocate final memory locations. (In theory the config
184: // structure can go in high memory, but Linux kernels before
185: // v2.6.30 crash with that.)
186: struct mptable_config_s *finalconfig = malloc_fseg(length);
187: struct mptable_floating_s *floating = malloc_fseg(sizeof(*floating));
188: if (!finalconfig || !floating) {
1.1.1.3 root 189: warn_noalloc();
1.1.1.2 root 190: free(config);
191: free(finalconfig);
192: free(floating);
193: return;
194: }
195: memcpy(finalconfig, config, length);
196: free(config);
197:
198: /* floating pointer structure */
199: memset(floating, 0, sizeof(*floating));
200: floating->signature = MPTABLE_SIGNATURE;
201: floating->physaddr = (u32)finalconfig;
202: floating->length = 1;
203: floating->spec_rev = 4;
204: floating->checksum -= checksum(floating, sizeof(*floating));
1.1 root 205:
206: dprintf(1, "MP table addr=%p MPC table addr=%p size=%d\n",
1.1.1.2 root 207: floating, finalconfig, length);
1.1 root 208: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.