|
|
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.2 root 71: int bdf, max, lastbus = -1;
72: foreachpci(bdf, max) {
73: int curbus = pci_bdf_to_bus(bdf);
74: if (curbus == lastbus)
75: continue;
76: lastbus = curbus;
77: memset(bus, 0, sizeof(*bus));
78: bus->type = MPT_TYPE_BUS;
79: bus->busid = curbus;
80: memcpy(bus->bustype, "PCI ", sizeof(bus->bustype));
81: bus++;
82: }
83:
84: /* isa bus */
85: int isabusid;
1.1 root 86: memset(bus, 0, sizeof(*bus));
87: bus->type = MPT_TYPE_BUS;
1.1.1.2 root 88: isabusid = bus->busid = lastbus + 1;
1.1 root 89: memcpy(bus->bustype, "ISA ", sizeof(bus->bustype));
1.1.1.3 root 90: bus++;
91: entrycount += bus - buses;
1.1 root 92:
93: /* ioapic */
94: u8 ioapic_id = CountCPUs;
1.1.1.3 root 95: struct mpt_ioapic *ioapic = (void*)bus;
1.1 root 96: memset(ioapic, 0, sizeof(*ioapic));
97: ioapic->type = MPT_TYPE_IOAPIC;
98: ioapic->apicid = ioapic_id;
99: ioapic->apicver = 0x11;
100: ioapic->flags = 1; // enable
101: ioapic->apicaddr = BUILD_IOAPIC_ADDR;
102: entrycount++;
103:
104: /* irqs */
105: struct mpt_intsrc *intsrcs = (void*)&ioapic[1], *intsrc = intsrcs;
1.1.1.2 root 106: int dev = -1;
107: unsigned short mask = 0, pinmask = 0;
108:
109: foreachpci(bdf, max) {
110: int pin = pci_config_readb(bdf, PCI_INTERRUPT_PIN);
111: int irq = pci_config_readb(bdf, PCI_INTERRUPT_LINE);
112: if (pin == 0)
113: continue;
114: if (dev != pci_bdf_to_busdev(bdf)) {
115: dev = pci_bdf_to_busdev(bdf);
116: pinmask = 0;
117: }
118: if (pinmask & (1 << pin)) /* pin was seen already */
119: continue;
120: pinmask |= (1 << pin);
121: mask |= (1 << irq);
122: memset(intsrc, 0, sizeof(*intsrc));
123: intsrc->type = MPT_TYPE_INTSRC;
124: intsrc->irqtype = 0; /* INT */
125: intsrc->irqflag = 1; /* active high */
126: intsrc->srcbus = pci_bdf_to_bus(bdf); /* PCI bus */
127: intsrc->srcbusirq = (pci_bdf_to_dev(bdf) << 2) | (pin - 1);
128: intsrc->dstapic = ioapic_id;
129: intsrc->dstirq = irq;
130: intsrc++;
131: }
132:
1.1 root 133: for (i = 0; i < 16; i++) {
134: memset(intsrc, 0, sizeof(*intsrc));
1.1.1.2 root 135: if (mask & (1 << i))
136: continue;
1.1 root 137: intsrc->type = MPT_TYPE_INTSRC;
1.1.1.2 root 138: intsrc->irqtype = 0; /* INT */
139: intsrc->irqflag = 0; /* conform to bus spec */
140: intsrc->srcbus = isabusid; /* ISA bus */
1.1 root 141: intsrc->srcbusirq = i;
142: intsrc->dstapic = ioapic_id;
143: intsrc->dstirq = i;
144: if (qemu_cfg_irq0_override()) {
145: /* Destination 2 is covered by irq0->inti2 override (i ==
146: 0). Source IRQ 2 is unused */
147: if (i == 0)
148: intsrc->dstirq = 2;
149: else if (i == 2)
150: intsrc--;
151: }
152: intsrc++;
153: }
154:
155: /* Local interrupt assignment */
156: intsrc->type = MPT_TYPE_LOCAL_INT;
157: intsrc->irqtype = 3; /* ExtINT */
158: intsrc->irqflag = 0; /* PO, EL default */
1.1.1.2 root 159: intsrc->srcbus = isabusid; /* ISA */
1.1 root 160: intsrc->srcbusirq = 0;
161: intsrc->dstapic = 0; /* BSP == APIC #0 */
162: intsrc->dstirq = 0; /* LINTIN0 */
163: intsrc++;
164:
165: intsrc->type = MPT_TYPE_LOCAL_INT;
166: intsrc->irqtype = 1; /* NMI */
167: intsrc->irqflag = 0; /* PO, EL default */
1.1.1.2 root 168: intsrc->srcbus = isabusid; /* ISA */
1.1 root 169: intsrc->srcbusirq = 0;
170: intsrc->dstapic = 0; /* BSP == APIC #0 */
171: intsrc->dstirq = 1; /* LINTIN1 */
172: intsrc++;
1.1.1.3 root 173: entrycount += intsrc - intsrcs;
1.1 root 174:
175: // Finalize config structure.
1.1.1.2 root 176: int length = (void*)intsrc - (void*)config;
1.1 root 177: config->entrycount = entrycount;
1.1.1.2 root 178: config->length = length;
179: config->checksum -= checksum(config, length);
180:
181: // Allocate final memory locations. (In theory the config
182: // structure can go in high memory, but Linux kernels before
183: // v2.6.30 crash with that.)
184: struct mptable_config_s *finalconfig = malloc_fseg(length);
185: struct mptable_floating_s *floating = malloc_fseg(sizeof(*floating));
186: if (!finalconfig || !floating) {
1.1.1.3 root 187: warn_noalloc();
1.1.1.2 root 188: free(config);
189: free(finalconfig);
190: free(floating);
191: return;
192: }
193: memcpy(finalconfig, config, length);
194: free(config);
195:
196: /* floating pointer structure */
197: memset(floating, 0, sizeof(*floating));
198: floating->signature = MPTABLE_SIGNATURE;
199: floating->physaddr = (u32)finalconfig;
200: floating->length = 1;
201: floating->spec_rev = 4;
202: floating->checksum -= checksum(floating, sizeof(*floating));
1.1 root 203:
204: dprintf(1, "MP table addr=%p MPC table addr=%p size=%d\n",
1.1.1.2 root 205: floating, finalconfig, length);
1.1 root 206: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.