summaryrefslogtreecommitdiff
path: root/util/mptable/mptable.c
diff options
context:
space:
mode:
Diffstat (limited to 'util/mptable/mptable.c')
-rw-r--r--util/mptable/mptable.c1258
1 files changed, 0 insertions, 1258 deletions
diff --git a/util/mptable/mptable.c b/util/mptable/mptable.c
deleted file mode 100644
index 5b8a59d66f..0000000000
--- a/util/mptable/mptable.c
+++ /dev/null
@@ -1,1258 +0,0 @@
-/*
- * Copyright (c) 1996, by Steve Passe
- * All rights reserved.
- *
- * 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. The name of the developer 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.
- */
-
-/*
- * mptable.c
- */
-
-#define VMAJOR 2
-#define VMINOR 0
-#define VDELTA 15
-
-/*
- * this will cause the raw mp table to be dumped to /tmp/mpdump
- *
-#define RAW_DUMP
- */
-
-#define MP_SIG 0x5f504d5f /* _MP_ */
-#define EXTENDED_PROCESSING_READY
-#define OEM_PROCESSING_READY_NOT
-
-#include <sys/types.h>
-#include <err.h>
-#include <fcntl.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <unistd.h>
-#include <stdint.h>
-
-#define ARRAY_SIZE(_x) (sizeof(_x) / sizeof(_x[0]))
-#define SEP_LINE \
-"\n-------------------------------------------------------------------------------\n"
-
-#define SEP_LINE2 \
-"\n===============================================================================\n"
-
-/* EBDA is @ 40:0e in real-mode terms */
-#define EBDA_POINTER 0x040e /* location of EBDA pointer */
-
-/* CMOS 'top of mem' is @ 40:13 in real-mode terms */
-#define TOPOFMEM_POINTER 0x0413 /* BIOS: base memory size */
-
-#define DEFAULT_TOPOFMEM 0xa0000
-
-#define BIOS_BASE 0xf0000
-#define BIOS_BASE2 0xe0000
-#define BIOS_SIZE 0x10000
-#define ONE_KBYTE 1024
-
-#define GROPE_AREA1 0x80000
-#define GROPE_AREA2 0x90000
-#define GROPE_SIZE 0x10000
-
-#define PROCENTRY_FLAG_EN 0x01
-#define PROCENTRY_FLAG_BP 0x02
-#define IOAPICENTRY_FLAG_EN 0x01
-
-#define MAXPNSTR 132
-
-#define COREBOOT_MP_TABLE 0
-
-enum busTypes {
- CBUS = 1,
- CBUSII = 2,
- EISA = 3,
- ISA = 6,
- PCI = 13,
- XPRESS = 18,
- MAX_BUSTYPE = 18,
- UNKNOWN_BUSTYPE = 0xff
-};
-
-typedef struct BUSTYPENAME {
- uint8_t type;
- char name[7];
-} busTypeName;
-
-static busTypeName busTypeTable[] = {
- {CBUS, "CBUS"},
- {CBUSII, "CBUSII"},
- {EISA, "EISA"},
- {UNKNOWN_BUSTYPE, "---"},
- {UNKNOWN_BUSTYPE, "---"},
- {ISA, "ISA"},
- {UNKNOWN_BUSTYPE, "---"},
- {UNKNOWN_BUSTYPE, "---"},
- {UNKNOWN_BUSTYPE, "---"},
- {UNKNOWN_BUSTYPE, "---"},
- {UNKNOWN_BUSTYPE, "---"},
- {UNKNOWN_BUSTYPE, "---"},
- {PCI, "PCI"},
- {UNKNOWN_BUSTYPE, "---"},
- {UNKNOWN_BUSTYPE, "---"},
- {UNKNOWN_BUSTYPE, "---"},
- {UNKNOWN_BUSTYPE, "---"},
- {UNKNOWN_BUSTYPE, "---"},
- {UNKNOWN_BUSTYPE, "---"}
-};
-
-char *whereStrings[] = {
- "Extended BIOS Data Area",
- "BIOS top of memory",
- "Default top of memory",
- "BIOS",
- "Extended BIOS",
- "GROPE AREA #1",
- "GROPE AREA #2"
-};
-
-typedef struct TABLE_ENTRY {
- uint8_t type;
- uint8_t length;
- char name[32];
-} tableEntry;
-
-tableEntry basetableEntryTypes[] = {
- {0, 20, "Processor"},
- {1, 8, "Bus"},
- {2, 8, "I/O APIC"},
- {3, 8, "I/O INT"},
- {4, 8, "Local INT"}
-};
-
-tableEntry extendedtableEntryTypes[] = {
- {128, 20, "System Address Space"},
- {129, 8, "Bus Heirarchy"},
- {130, 8, "Compatibility Bus Address"}
-};
-
-/* MP Floating Pointer Structure */
-typedef struct MPFPS {
- uint8_t signature[4];
- uint32_t pap;
- uint8_t length;
- uint8_t spec_rev;
- uint8_t checksum;
- uint8_t mpfb1;
- uint8_t mpfb2;
- uint8_t mpfb3;
- uint8_t mpfb4;
- uint8_t mpfb5;
-} mpfps_t;
-
-/* MP Configuration Table Header */
-typedef struct MPCTH {
- uint8_t signature[4];
- uint16_t base_table_length;
- uint8_t spec_rev;
- uint8_t checksum;
- uint8_t oem_id[8];
- uint8_t product_id[12];
- uint32_t oem_table_pointer;
- uint16_t oem_table_size;
- uint16_t entry_count;
- uint32_t apic_address;
- uint16_t extended_table_length;
- uint8_t extended_table_checksum;
- uint8_t reserved;
-} mpcth_t;
-
-typedef struct PROCENTRY {
- uint8_t type;
- uint8_t apicID;
- uint8_t apicVersion;
- uint8_t cpuFlags;
- uint32_t cpuSignature;
- uint32_t featureFlags;
- uint32_t reserved1;
- uint32_t reserved2;
-} ProcEntry;
-
-typedef struct BUSENTRY {
- uint8_t type;
- uint8_t busID;
- uint8_t busType[6];
-} BusEntry;
-
-typedef struct IOAPICENTRY {
- uint8_t type;
- uint8_t apicID;
- uint8_t apicVersion;
- uint8_t apicFlags;
- uint32_t apicAddress;
-} IOApicEntry;
-
-typedef struct INTENTRY {
- uint8_t type;
- uint8_t intType;
- uint16_t intFlags;
- uint8_t srcBusID;
- uint8_t srcBusIRQ;
- uint8_t dstApicID;
- uint8_t dstApicINT;
-} IntEntry;
-
-/*
- * extended entry type structures
- */
-
-typedef struct SASENTRY {
- uint8_t type;
- uint8_t length;
- uint8_t busID;
- uint8_t addressType;
- uint64_t addressBase;
- uint64_t addressLength;
-} SasEntry;
-
-typedef struct BHDENTRY {
- uint8_t type;
- uint8_t length;
- uint8_t busID;
- uint8_t busInfo;
- uint8_t busParent;
- uint8_t reserved[3];
-} BhdEntry;
-
-typedef struct CBASMENTRY {
- uint8_t type;
- uint8_t length;
- uint8_t busID;
- uint8_t addressMod;
- uint32_t predefinedRange;
-} CbasmEntry;
-
-typedef uint32_t vm_offset_t;
-
-static void apic_probe(vm_offset_t * paddr, int *where);
-
-static void MPConfigDefault(int featureByte);
-
-static void MPFloatingPointer(vm_offset_t paddr, int where, mpfps_t * mpfps);
-static void MPConfigTableHeader(uint32_t pap);
-
-static int readType(void);
-static void seekEntry(vm_offset_t addr);
-static void readEntry(void *entry, int size);
-
-static void processorEntry(void);
-static void busEntry(void);
-static void ioApicEntry(void);
-static void intEntry(void);
-static void lintEntry(void);
-
-static void sasEntry(void);
-static void bhdEntry(void);
-static void cbasmEntry(void);
-
-static void doOptionList(void);
-static void doDmesg(void);
-static void pnstr(uint8_t * s, int c);
-
-/* global data */
-int pfd; /* physical /dev/mem fd */
-
-int busses[32];
-int apics[16];
-
-int ncpu;
-int nbus;
-int napic;
-int nintr;
-
-int dmesg = 0;
-int grope = 0;
-int verbose = 0;
-int noisy = 0;
-/* preamble to the mptable. This is fixed for all coreboots */
-
-char *preamble[] = {
- "#include <console/console.h>",
- "#include <arch/smp/mpspec.h>",
- "#include <arch/ioapic.h>",
- "#include <device/pci.h>",
- "#include <string.h>",
- "#include <stdint.h>",
- "",
- "#define INTA 0x00",
- "#define INTB 0x01",
- "#define INTC 0x02",
- "#define INTD 0x03",
- "",
- "static void *smp_write_config_table(void *v)",
- "{",
- " struct mp_config_table *mc;",
- "",
- " mc = (void *)(((char *)v) + SMP_FLOATING_TABLE_LEN);",
- "",
- " mptable_init(mc, \"TODO \", LOCAL_APIC_ADDR);",
- "",
- " smp_write_processors(mc);",
- "",
- 0
-};
-
-char *postamble[] = {
- " /* Compute the checksums. */",
- " mc->mpe_checksum = smp_compute_checksum(smp_next_mpc_entry(mc), mc->mpe_length);",
- " mc->mpc_checksum = smp_compute_checksum(mc, mc->mpc_length);",
- " printk(BIOS_DEBUG, \"Wrote the mp table end at: %p - %p\\n\",",
- " mc, smp_next_mpe_entry(mc));",
- " return smp_next_mpe_entry(mc);",
- "}",
- "",
- "unsigned long write_smp_table(unsigned long addr)",
- "{",
- " void *v;",
- " v = smp_write_floating_table(addr);",
- " return (unsigned long)smp_write_config_table(v);",
- "}",
- 0
-};
-
-static void usage(void)
-{
- fprintf(stderr,
- "usage: mptable [-dmesg] [-verbose] [-grope] [-help]\n");
- exit(0);
-}
-
-void write_code(char **code)
-{
- while (*code)
- printf("%s\n", *code++);
-}
-
-/*
- *
- */
-int main(int argc, char *argv[])
-{
- vm_offset_t paddr;
- int where;
- mpfps_t mpfps;
- int defaultConfig;
-
- /* announce ourselves */
-
- if (verbose)
- puts(SEP_LINE2);
-
- printf("/* generated by MPTable, version %d.%d.%d*/\n", VMAJOR, VMINOR,
- VDELTA);
- printf("/* as modified by RGM for coreboot */\n");
- write_code(preamble);
-
- /* Ron hates getopt() */
-
- for (argc--, argv++; argc; argc--, argv++) {
- if (strcmp(argv[0], "-dmesg") == 0) {
- dmesg = 1;
- } else if (strcmp(argv[0], "-help") == 0) {
- usage();
- } else if (strcmp(argv[0], "-grope") == 0) {
- grope = 1;
- } else if (strcmp(argv[0], "-verbose") == 0)
- verbose = 1;
- else if (strcmp(argv[0], "-noisy") == 0)
- noisy = 1;
- else
- usage();
- }
-
- /* open physical memory for access to MP structures */
- if ((pfd = open("/dev/mem", O_RDONLY)) < 0)
- err(1, "mem open");
-
- /* probe for MP structures */
- apic_probe(&paddr, &where);
- if (where <= 0) {
- fprintf(stderr, "\n MP FPS NOT found,\n");
- fprintf(stderr, " suggest trying -grope option!!!\n\n");
- return 1;
- }
-
- if (verbose)
- printf("\n MP FPS found in %s @ physical addr: 0x%08x\n",
- whereStrings[where - 1], paddr);
-
- if (verbose)
- puts(SEP_LINE);
-
- /* analyze the MP Floating Pointer Structure */
- MPFloatingPointer(paddr, where, &mpfps);
-
- if (verbose)
- puts(SEP_LINE);
-
- /* check whether an MP config table exists */
- if ((defaultConfig = mpfps.mpfb1))
- MPConfigDefault(defaultConfig);
- else
- MPConfigTableHeader(mpfps.pap);
-
- /* build "options" entries for the kernel config file */
- if (noisy)
- doOptionList();
-
- write_code(postamble);
- /* do a dmesg output */
- if (dmesg)
- doDmesg();
-
- if (verbose)
- puts(SEP_LINE2);
-
- return 0;
-}
-
-/*
- * set PHYSICAL address of MP floating pointer structure
- */
-#define NEXT(X) ((X) += 4)
-static void apic_probe(vm_offset_t * paddr, int *where)
-{
- /*
- * c rewrite of apic_probe() by Jack F. Vogel
- */
-
- int x;
- u_short segment;
- vm_offset_t target;
- u_int buffer[BIOS_SIZE / sizeof(int)];
-
- if (verbose)
- printf("\n");
-
- /* search Extended Bios Data Area, if present */
- if (verbose)
- printf(" looking for EBDA pointer @ 0x%04x, ", EBDA_POINTER);
- seekEntry((vm_offset_t) EBDA_POINTER);
- readEntry(&segment, 2);
- if (segment) { /* search EBDA */
- target = (vm_offset_t) segment << 4;
- if (verbose)
- printf("found, searching EBDA @ 0x%08x\n", target);
- seekEntry(target);
- readEntry(buffer, ONE_KBYTE);
-
- for (x = 0; x < ONE_KBYTE / sizeof(unsigned int); NEXT(x)) {
- if (buffer[x] == MP_SIG) {
- *where = 1;
- *paddr = (x * sizeof(unsigned int)) + target;
- return;
- }
- }
- } else {
- if (verbose)
- printf("NOT found\n");
- }
-
- target = 0;
- segment = 0;
- if (verbose)
- printf(" searching for coreboot MP table @ 0x%08x (%dK)\n",
- target, segment);
- seekEntry(target);
- readEntry(buffer, ONE_KBYTE);
-
- for (x = 0; x < ONE_KBYTE / sizeof(unsigned int); NEXT(x)) {
- if (buffer[x] == MP_SIG) {
- *where = 2;
- *paddr = (x * sizeof(unsigned int)) + target;
- return;
- }
- }
-
- /* read CMOS for real top of mem */
- seekEntry((vm_offset_t) TOPOFMEM_POINTER);
- readEntry(&segment, 2);
- --segment; /* less ONE_KBYTE */
- target = segment * 1024;
- if (verbose)
- printf(" searching CMOS 'top of mem' @ 0x%08x (%dK)\n",
- target, segment);
- seekEntry(target);
- readEntry(buffer, ONE_KBYTE);
-
- for (x = 0; x < ONE_KBYTE / sizeof(unsigned int); NEXT(x)) {
- if (buffer[x] == MP_SIG) {
- *where = 2;
- *paddr = (x * sizeof(unsigned int)) + target;
- return;
- }
- }
-
- /* we don't necessarily believe CMOS, check base of the last 1K of 640K */
- if (target != (DEFAULT_TOPOFMEM - 1024)) {
- target = (DEFAULT_TOPOFMEM - 1024);
- if (verbose)
- printf
- (" searching default 'top of mem' @ 0x%08x (%dK)\n",
- target, (target / 1024));
- seekEntry(target);
- readEntry(buffer, ONE_KBYTE);
-
- for (x = 0; x < ONE_KBYTE / sizeof(unsigned int); NEXT(x)) {
- if (buffer[x] == MP_SIG) {
- *where = 3;
- *paddr = (x * sizeof(unsigned int)) + target;
- return;
- }
- }
- }
-
- /* search the BIOS */
- if (verbose)
- printf(" searching BIOS @ 0x%08x\n", BIOS_BASE);
- seekEntry(BIOS_BASE);
- readEntry(buffer, BIOS_SIZE);
-
- for (x = 0; x < BIOS_SIZE / sizeof(unsigned int); NEXT(x)) {
- if (buffer[x] == MP_SIG) {
- *where = 4;
- *paddr = (x * sizeof(unsigned int)) + BIOS_BASE;
- return;
- }
- }
-
- /* search the extended BIOS */
- if (verbose)
- printf(" searching extended BIOS @ 0x%08x\n", BIOS_BASE2);
- seekEntry(BIOS_BASE2);
- readEntry(buffer, BIOS_SIZE);
-
- for (x = 0; x < BIOS_SIZE / sizeof(unsigned int); NEXT(x)) {
- if (buffer[x] == MP_SIG) {
- *where = 5;
- *paddr = (x * sizeof(unsigned int)) + BIOS_BASE2;
- return;
- }
- }
-
- if (grope) {
- /* search additional memory */
- target = GROPE_AREA1;
- if (verbose)
- printf(" groping memory @ 0x%08x\n", target);
- seekEntry(target);
- readEntry(buffer, GROPE_SIZE);
-
- for (x = 0; x < GROPE_SIZE / sizeof(unsigned int); NEXT(x)) {
- if (buffer[x] == MP_SIG) {
- *where = 6;
- *paddr =
- (x * sizeof(unsigned int)) + GROPE_AREA1;
- return;
- }
- }
-
- target = GROPE_AREA2;
- if (verbose)
- printf(" groping memory @ 0x%08x\n", target);
- seekEntry(target);
- readEntry(buffer, GROPE_SIZE);
-
- for (x = 0; x < GROPE_SIZE / sizeof(unsigned int); NEXT(x)) {
- if (buffer[x] == MP_SIG) {
- *where = 7;
- *paddr =
- (x * sizeof(unsigned int)) + GROPE_AREA2;
- return;
- }
- }
- }
-
- *where = 0;
- *paddr = (vm_offset_t) 0;
-}
-
-/*
- *
- */
-static void MPFloatingPointer(vm_offset_t paddr, int where, mpfps_t * mpfps)
-{
-
- /* read in mpfps structure */
- seekEntry(paddr);
- readEntry(mpfps, sizeof(mpfps_t));
-
- /* show its contents */
- if (verbose) {
- printf("MP Floating Pointer Structure:\n\n");
-
- printf(" location:\t\t\t");
- switch (where) {
- case 1:
- printf("EBDA\n");
- break;
- case 2:
- printf("BIOS base memory\n");
- break;
- case 3:
- printf("DEFAULT base memory (639K)\n");
- break;
- case 4:
- printf("BIOS\n");
- break;
- case 5:
- printf("Extended BIOS\n");
- break;
-
- case 0:
- printf("NOT found!\n");
- exit(1);
- default:
- printf("BOGUS!\n");
- exit(1);
- }
- printf(" physical address:\t\t0x%08x\n", paddr);
-
- printf(" signature:\t\t\t'");
- pnstr(mpfps->signature, 4);
- printf("'\n");
-
- printf(" length:\t\t\t%d bytes\n", mpfps->length * 16);
- printf(" version:\t\t\t1.%1d\n", mpfps->spec_rev);
- printf(" checksum:\t\t\t0x%02x\n", mpfps->checksum);
-
- /* bits 0:6 are RESERVED */
- if (mpfps->mpfb2 & 0x7f) {
- printf(" warning, MP feature byte 2: 0x%02x\n",
- mpfps->mpfb2);
- }
-
- /* bit 7 is IMCRP */
- printf(" mode:\t\t\t\t%s\n", (mpfps->mpfb2 & 0x80) ?
- "PIC" : "Virtual Wire");
-
- /* MP feature bytes 3-5 are expected to be ZERO */
- if (mpfps->mpfb3)
- printf(" warning, MP feature byte 3 NONZERO!\n");
- if (mpfps->mpfb4)
- printf(" warning, MP feature byte 4 NONZERO!\n");
- if (mpfps->mpfb5)
- printf(" warning, MP feature byte 5 NONZERO!\n");
- }
-}
-
-/*
- *
- */
-static void MPConfigDefault(int featureByte)
-{
- printf(" MP default config type: %d\n\n", featureByte);
- switch (featureByte) {
- case 1:
- printf(" bus: ISA, APIC: 82489DX\n");
- break;
- case 2:
- printf(" bus: EISA, APIC: 82489DX\n");
- break;
- case 3:
- printf(" bus: EISA, APIC: 82489DX\n");
- break;
- case 4:
- printf(" bus: MCA, APIC: 82489DX\n");
- break;
- case 5:
- printf(" bus: ISA+PCI, APIC: Integrated\n");
- break;
- case 6:
- printf(" bus: EISA+PCI, APIC: Integrated\n");
- break;
- case 7:
- printf(" bus: MCA+PCI, APIC: Integrated\n");
- break;
- default:
- printf(" future type\n");
- break;
- }
-
- switch (featureByte) {
- case 1:
- case 2:
- case 3:
- case 4:
- nbus = 1;
- break;
- case 5:
- case 6:
- case 7:
- nbus = 2;
- break;
- default:
- printf(" future type\n");
- break;
- }
-
- ncpu = 2;
- napic = 1;
- nintr = 16;
-}
-
-/*
- *
- */
-static void MPConfigTableHeader(uint32_t pap)
-{
- vm_offset_t paddr;
- mpcth_t cth;
- int x;
- int totalSize;
- int count, c;
- int type;
-
- if (pap == 0) {
- printf("MP Configuration Table Header MISSING!\n");
- exit(1);
- }
-
- /* convert physical address to virtual address */
- paddr = (vm_offset_t) pap;
-
- /* read in cth structure */
- seekEntry(paddr);
- readEntry(&cth, sizeof(cth));
-
- if (verbose) {
- printf("MP Config Table Header:\n\n");
-
- printf(" physical address:\t\t0x%08x\n", pap);
-
- printf(" signature:\t\t\t'");
- pnstr(cth.signature, 4);
- printf("'\n");
-
- printf(" base table length:\t\t%d\n", cth.base_table_length);
-
- printf(" version:\t\t\t1.%1d\n", cth.spec_rev);
- printf(" checksum:\t\t\t0x%02x\n", cth.checksum);
-
- printf(" OEM ID:\t\t\t'");
- pnstr(cth.oem_id, 8);
- printf("'\n");
-
- printf(" Product ID:\t\t\t'");
- pnstr(cth.product_id, 12);
- printf("'\n");
-
- printf(" OEM table pointer:\t\t0x%08x\n",
- cth.oem_table_pointer);
- printf(" OEM table size:\t\t%d\n", cth.oem_table_size);
-
- printf(" entry count:\t\t\t%d\n", cth.entry_count);
-
- printf(" local APIC address:\t\t0x%08x\n", cth.apic_address);
-
- printf(" extended table length:\t%d\n",
- cth.extended_table_length);
- printf(" extended table checksum:\t%d\n",
- cth.extended_table_checksum);
- }
-
- totalSize = cth.base_table_length - sizeof(struct MPCTH);
- count = cth.entry_count;
-
- if (verbose) {
- if (verbose)
- puts(SEP_LINE);
-
- printf("MP Config Base Table Entries:\n\n");
- }
-
- /* initialze tables */
- for(x = 0; x < ARRAY_SIZE(busses); x++)
- busses[x] = UNKNOWN_BUSTYPE;
- for(x = 0; x < ARRAY_SIZE(apics); x++)
- apics[x] = 0xff;
-
- ncpu = 0;
- nbus = 0;
- napic = 0;
- nintr = 0;
-
- /* process all the CPUs */
- if (verbose) {
- printf("--\nProcessors:\tAPIC ID\tVersion\tState"
- "\t\tFamily\tModel\tStep\tFlags\n");
- }
- for (c = count; c; c--) {
- if (readType() == 0)
- processorEntry();
- totalSize -= basetableEntryTypes[0].length;
- }
-
- /* process all the busses */
- printf("\t/* Bus: Bus ID Type */\n");
- for (c = count; c; c--) {
- if (readType() == 1)
- busEntry();
- totalSize -= basetableEntryTypes[1].length;
- }
-
- /* process all the apics */
- printf("\t/* I/O APICs: APIC ID Version State Address */\n");
- for (c = count; c; c--) {
- if (readType() == 2)
- ioApicEntry();
- totalSize -= basetableEntryTypes[2].length;
- }
-
- /* process all the I/O Ints */
- printf("\t/* I/O Ints: Type Polarity Trigger Bus ID IRQ APIC ID PIN#*/ \n");
- for (c = count; c; c--) {
- if (readType() == 3)
- intEntry();
- totalSize -= basetableEntryTypes[3].length;
- }
-
- /* process all the Local Ints */
- printf
- ("\t/* Local Ints: Type Polarity Trigger Bus ID IRQ APIC ID PIN# */\n");
- for (c = count; c; c--) {
- if (readType() == 4)
- lintEntry();
- totalSize -= basetableEntryTypes[4].length;
- }
-
-#if defined( EXTENDED_PROCESSING_READY )
- /* process any extended data */
- if ((totalSize = cth.extended_table_length)) {
- if (verbose)
- puts(SEP_LINE);
-
- printf("MP Config Extended Table Entries:\n\n");
-
- while (totalSize > 0) {
- switch (type = readType()) {
- case 128:
- sasEntry();
- break;
- case 129:
- bhdEntry();
- break;
- case 130:
- cbasmEntry();
- break;
- default:
- printf("Extended Table HOSED!\n");
- exit(1);
- }
-
- totalSize -= extendedtableEntryTypes[type - 128].length;
- }
- }
-#endif /* EXTENDED_PROCESSING_READY */
-
- /* process any OEM data */
- if (cth.oem_table_pointer && (cth.oem_table_size > 0)) {
-#if defined( OEM_PROCESSING_READY )
-#error your on your own here!
- /* convert OEM table pointer to virtual address */
- poemtp = (vm_offset_t) cth.oem_table_pointer;
-
- /* read in oem table structure */
- if ((oemdata = (void *)malloc(cth.oem_table_size)) == NULL)
- err(1, "oem malloc");
-
- seekEntry(poemtp);
- readEntry(oemdata, cth.oem_table_size);
-
- /** process it */
-
- free(oemdata);
-#else
- printf
- ("\nyou need to modify the source to handle OEM data!\n\n");
-#endif /* OEM_PROCESSING_READY */
- }
-
- fflush(stdout);
-
-#if defined( RAW_DUMP )
- {
- int ofd;
- u_char dumpbuf[4096];
-
- ofd = open("/tmp/mpdump", O_CREAT | O_RDWR);
- seekEntry(paddr);
- readEntry(dumpbuf, 1024);
- write(ofd, dumpbuf, 1024);
- close(ofd);
- }
-#endif /* RAW_DUMP */
-}
-
-/*
- *
- */
-static int readType(void)
-{
- u_char type;
-
- if (read(pfd, &type, sizeof(u_char)) != sizeof(u_char))
- err(1, "type read; pfd: %d", pfd);
-
- if (lseek(pfd, -1, SEEK_CUR) < 0)
- err(1, "type seek");
-
- return (int)type;
-}
-
-/*
- *
- */
-static void seekEntry(vm_offset_t addr)
-{
- if (lseek(pfd, (off_t) addr, SEEK_SET) < 0)
- err(1, "/dev/mem seek");
-}
-
-/*
- *
- */
-static void readEntry(void *entry, int size)
-{
- if (read(pfd, entry, size) != size)
- err(1, "readEntry");
-}
-
-static void processorEntry(void)
-{
- ProcEntry entry;
-
- /* read it into local memory */
- readEntry(&entry, sizeof(entry));
-
- /* count it */
- ++ncpu;
- if (noisy) {
- printf("\t\t%2d", entry.apicID);
- printf("\t 0x%2x", entry.apicVersion);
-
- printf("\t %s, %s",
- (entry.cpuFlags & PROCENTRY_FLAG_BP) ? "BSP" : "AP",
- (entry.
- cpuFlags & PROCENTRY_FLAG_EN) ? "usable" : "unusable");
-
- printf("\t %d\t %d\t %d",
- (entry.cpuSignature >> 8) & 0x0f,
- (entry.cpuSignature >> 4) & 0x0f,
- entry.cpuSignature & 0x0f);
-
- printf("\t 0x%04x\n", entry.featureFlags);
- }
-}
-
-/*
- *
- */
-static int lookupBusType(char *name)
-{
- int x;
-
- for (x = 0; x < MAX_BUSTYPE; ++x)
- if (strcmp(busTypeTable[x].name, name) == 0)
- return busTypeTable[x].type;
-
- return UNKNOWN_BUSTYPE;
-}
-
-static void busEntry(void)
-{
- char name[8];
- BusEntry entry;
- int i;
- /* read it into local memory */
- readEntry(&entry, sizeof(entry));
-
- /* count it */
- ++nbus;
-
- if (verbose) {
- printf("\t\t%2d", entry.busID);
- printf("\t ");
- pnstr(entry.busType, 6);
- printf("\n");
- }
-
- memset(name, '\0', sizeof(name));
- for(i = 0; i < 6; i++) {
- switch(entry.busType[i]) {
- case ' ':
- case '\0':
- break;
- default:
- name[i] = entry.busType[i];
- break;
- }
- }
-
- if (entry.busID > ARRAY_SIZE(busses)) {
- fprintf(stderr, "busses array to small!\n");
- exit(1);
- }
-
- busses[entry.busID] = lookupBusType(name);
- printf("\tsmp_write_bus(mc, %d, \"", entry.busID);
- pnstr(entry.busType, 6);
- printf("\");\n");
-}
-
-static void ioApicEntry(void)
-{
- IOApicEntry entry;
-
- /* read it into local memory */
- readEntry(&entry, sizeof(entry));
-
- /* count it */
- ++napic;
-
- if (noisy) {
- printf("\t\t%2d", entry.apicID);
- printf("\t 0x%02x", entry.apicVersion);
- printf("\t %s",
- (entry.
- apicFlags & IOAPICENTRY_FLAG_EN) ? "usable" :
- "unusable");
- printf("\t\t 0x%x\n", entry.apicAddress);
- }
-
- apics[entry.apicID] = entry.apicID;
-
- if (entry.apicFlags & IOAPICENTRY_FLAG_EN)
- printf("\tsmp_write_ioapic(mc, 0x%x, 0x%x, 0x%x);\n",
- entry.apicID, entry.apicVersion, entry.apicAddress);
-}
-
-char *intTypes[] = {
- "mp_INT", "mp_NMI", "mp_SMI", "mp_ExtINT"
-};
-
-char *polarityMode[] = {
- "MP_IRQ_POLARITY_DEFAULT", "MP_IRQ_POLARITY_HIGH", "reserved",
- "MP_IRQ_POLARITY_LOW"
-};
-
-char *triggerMode[] = {
- "MP_IRQ_TRIGGER_DEFAULT", "MP_IRQ_TRIGGER_EDGE", "reserved",
- "MP_IRQ_TRIGGER_LEVEL"
-};
-
-static void intEntry(void)
-{
- IntEntry entry;
-
- /* read it into local memory */
- readEntry(&entry, sizeof(entry));
-
- /* count it */
- if ((int)entry.type == 3)
- ++nintr;
-
- if (noisy) {
- printf("\n\t\t%s", intTypes[(int)entry.intType]);
-
- printf("\t%9s", polarityMode[(int)entry.intFlags & 0x03]);
- printf("%12s", triggerMode[((int)entry.intFlags >> 2) & 0x03]);
-
- printf("\t %5d", (int)entry.srcBusID);
- if (busses[(int)entry.srcBusID] == PCI)
- printf("\t%2d:%c",
- ((int)entry.srcBusIRQ >> 2) & 0x1f,
- ((int)entry.srcBusIRQ & 0x03) + 'A');
- else
- printf("\t 0x%x:0x%x(0x%x)",
- (int)entry.srcBusIRQ >> 2,
- (int)entry.srcBusIRQ & 3, (int)entry.srcBusIRQ);
- printf("\t %6d", (int)entry.dstApicID);
- printf("\t %3d\n", (int)entry.dstApicINT);
- }
-
- if (busses[(int)entry.srcBusID] == PCI) {
- printf("\tsmp_write_intsrc(mc, %s, %s|%s, 0x%x, (0x%02x << 2) | INT%c, 0x%x, 0x%x);\n",
- intTypes[(int)entry.intType],
- triggerMode[((int)entry.intFlags >> 2) & 0x03],
- polarityMode[(int)entry.intFlags & 0x03],
- (int)entry.srcBusID,
- (int)entry.srcBusIRQ >> 2,
- ((int)entry.srcBusIRQ & 3) + 'A',
- (int)entry.dstApicID, (int)entry.dstApicINT);
- } else {
- printf("\tsmp_write_intsrc(mc, %s, %s|%s, 0x%x, 0x%x, 0x%x, 0x%x);\n",
- intTypes[(int)entry.intType],
- triggerMode[((int)entry.intFlags >> 2) & 0x03],
- polarityMode[(int)entry.intFlags & 0x03],
- (int)entry.srcBusID,
- (int)entry.srcBusIRQ,
- (int)entry.dstApicID, (int)entry.dstApicINT);
- }
-}
-
-static void lintEntry(void)
-{
- IntEntry entry;
-
- /* read it into local memory */
- readEntry(&entry, sizeof(entry));
-
- /* count it */
- if ((int)entry.type == 3)
- ++nintr;
-
- if (noisy) {
- printf("\t\t%s", intTypes[(int)entry.intType]);
-
- printf("\t%9s", polarityMode[(int)entry.intFlags & 0x03]);
- printf("%12s", triggerMode[((int)entry.intFlags >> 2) & 0x03]);
-
- printf("\t %5d", (int)entry.srcBusID);
- if (busses[(int)entry.srcBusID] == PCI)
- printf("\t%2d:%c",
- ((int)entry.srcBusIRQ >> 2) & 0x1f,
- ((int)entry.srcBusIRQ & 0x03) + 'A');
- else
- printf("\t %3d", (int)entry.srcBusIRQ);
- printf("\t %6d", (int)entry.dstApicID);
- printf("\t %3d\n", (int)entry.dstApicINT);
- }
- printf
- ("\tsmp_write_lintsrc(mc, %s, %s|%s, 0x%x, 0x%x, MP_APIC_ALL, 0x%x);\n",
- intTypes[(int)entry.intType],
- triggerMode[((int)entry.intFlags >> 2) & 0x03],
- polarityMode[(int)entry.intFlags & 0x03], (int)entry.srcBusID,
- (int)entry.srcBusIRQ, (int)entry.dstApicINT);
-
-}
-
-static void sasEntry(void)
-{
- SasEntry entry;
-
- /* read it into local memory */
- readEntry(&entry, sizeof(entry));
-
- printf("--\n%s\n", extendedtableEntryTypes[entry.type - 128].name);
- printf(" bus ID: %d", entry.busID);
- printf(" address type: ");
- switch (entry.addressType) {
- case 0:
- printf("I/O address\n");
- break;
- case 1:
- printf("memory address\n");
- break;
- case 2:
- printf("prefetch address\n");
- break;
- default:
- printf("UNKNOWN type\n");
- break;
- }
-
- printf(" address base: 0x%lx\n", entry.addressBase);
- printf(" address range: 0x%lx\n", entry.addressLength);
-}
-
-static void bhdEntry(void)
-{
- BhdEntry entry;
-
- /* read it into local memory */
- readEntry(&entry, sizeof(entry));
-
- printf("--\n%s\n", extendedtableEntryTypes[entry.type - 128].name);
- printf(" bus ID: %d", entry.busID);
- printf(" bus info: 0x%02x", entry.busInfo);
- printf(" parent bus ID: %d", entry.busParent);
-}
-
-static void cbasmEntry(void)
-{
- CbasmEntry entry;
-
- /* read it into local memory */
- readEntry(&entry, sizeof(entry));
-
- printf("--\n%s\n", extendedtableEntryTypes[entry.type - 128].name);
- printf(" bus ID: %d", entry.busID);
- printf(" address modifier: %s\n", (entry.addressMod & 0x01) ?
- "subtract" : "add");
- printf(" predefined range: 0x%08x", entry.predefinedRange);
-}
-
-/*
- * do a dmesg output
- */
-static void doDmesg(void)
-{
- if (verbose)
- puts(SEP_LINE);
-
- printf("dmesg output:\n\n");
- fflush(stdout);
- system("dmesg");
-}
-
-/*
- * build "options" entries for the kernel config file
- */
-static void doOptionList(void)
-{
- if (verbose)
- puts(SEP_LINE);
-
- printf("# SMP kernel config file options:\n\n");
- printf("\n# Required:\n");
- printf("options SMP\t\t\t# Symmetric MultiProcessor Kernel\n");
- printf("options APIC_IO\t\t\t# Symmetric (APIC) I/O\n");
-
- printf("\n# Optional (built-in defaults will work in most cases):\n");
- printf("#options NCPU=%d\t\t\t# number of CPUs\n", ncpu);
- printf("#options NBUS=%d\t\t\t# number of busses\n",
- nbus);
- printf("#options NAPIC=%d\t\t\t# number of IO APICs\n",
- napic);
- printf("#options NINTR=%d\t\t# number of INTs\n",
- (nintr < 24) ? 24 : nintr);
-}
-
-/*
- *
- */
-static void pnstr(uint8_t * s, int c)
-{
- uint8_t string[MAXPNSTR + 1];
-
- if (c > MAXPNSTR)
- c = MAXPNSTR;
- strncpy((char *)string, (char *)s, c);
- string[c] = '\0';
- printf("%s", string);
-}