diff options
Diffstat (limited to 'util/getpir/getpir.c')
-rw-r--r-- | util/getpir/getpir.c | 189 |
1 files changed, 0 insertions, 189 deletions
diff --git a/util/getpir/getpir.c b/util/getpir/getpir.c deleted file mode 100644 index 9853d7ca94..0000000000 --- a/util/getpir/getpir.c +++ /dev/null @@ -1,189 +0,0 @@ -/* getpir.c : This software is released under GPL - * For coreboot use only - * Aug 26 2001 , Nikolai Vladychevski, <niko@isl.net.mx> - * 2007.04.09 Jeremy Jackson <jerj@coplanar.net> - * updated for amd64 and general 64 bit portability - * 2010.04.24 Marc Bertens <mbertens@xs4all.nl> - * Added functionality to read a image file for checking the checksum of the PIR - */ - -#include <stdio.h> -#include <stdlib.h> -#include <string.h> -#include <unistd.h> -#include <fcntl.h> -#include <sys/mman.h> -#include <sys/types.h> -#include <sys/stat.h> - -#include "pirq_routing.h" -#include "checksum.h" -#include "code_gen.h" - -#if defined (__sun) && (defined(__i386) || defined(__amd64)) -# define MEM_DEV "/dev/xsvc" -#else -# define MEM_DEV "/dev/mem" -#endif - -/** - * The probe_table() is now called with the pointer to the memory, - * this is to handle both the assessing memory and a file. - * - * This function now dumps the table found to the stdout, with - * descriptions, it is special handy when building a PIRQ table - * for a board to check the checksum. - */ -static struct irq_routing_table *probe_table(char* ptr) -{ - /** - * Signature to search for $PIR<2-byte-version> - * - * this is to be sure that we find the correct table. - */ - char signature[] = "$PIR\x00\x01"; - /** cast the pointer */ - struct irq_routing_table *rt = (struct irq_routing_table *)ptr; - int size = 16; - int checksum_result; - do { - /** find the PIRQ table */ - rt = (struct irq_routing_table *) memmem(ptr + size, 16, signature, 6); - if (rt != NULL) { - /** found the table */ - int i, ts = (rt->size - 32) / 16; - struct irq_info *se_arr; - se_arr = (struct irq_info *) ((char *) rt + 32); - /** Dump the table information to the stdout */ - printf("Found PCI IRQ routing table signature at %p.\n", (void *) ((char *) rt - ptr + 0xf0000)); - printf("SIGNATURE = %s\n", (char*)&rt->signature); - printf("VERSION = %04x\n", rt->version); - printf("SIZE = %i\n", rt->size); - printf("MAX_DEVICES_ON_BUS = 32 + 16 * %d\n", ts); - printf("INT_ROUTER_BUS = 0x%02x\n", rt->rtr_bus); - printf("INT_ROUTER DEVICE = (0x%02x << 3) | 0x%01x\n", rt->rtr_devfn >> 3, rt->rtr_devfn & 7); - printf("IRQ_DEVOTED_TO_PCI = %#x\n", rt->exclusive_irqs); - printf("VENDOR = %#x\n", rt->rtr_vendor); - printf("DEVICE = %#x\n", rt->rtr_device); - printf("MINIPORT = %#x\n", rt->miniport_data); - printf("CHECKSUM = %#x\n", rt->checksum); - printf("\tbus , dev | fn, {link, bitmap}, {link, bitmap}, {link, bitmap}, {link, bitmap}, slot, rfu\n"); - for (i = 0; i < ts; i++) { - printf("\t0x%02x, (0x%02x << 3) | 0x%01x, {{0x%02x, 0x%04x}, {0x%02x, 0x%04x}, {0x%02x, 0x%04x}, {0x%02x, 0x%04x}}, 0x%x, 0x%x},\n", - (se_arr+i)->bus, (se_arr+i)->devfn >> 3, - (se_arr+i)->devfn & 7, (se_arr+i)->irq[0].link, - (se_arr+i)->irq[0].bitmap, (se_arr+i)->irq[1].link, - (se_arr+i)->irq[1].bitmap, (se_arr+i)->irq[2].link, - (se_arr+i)->irq[2].bitmap, (se_arr+i)->irq[3].link, - (se_arr+i)->irq[3].bitmap, (se_arr+i)->slot, - (se_arr+i)->rfu); - } - /** A table should not be over 0x400 bytes */ - if (rt->size > 0x400) { - return NULL; - } - printf("Validating...\n"); - /** Calculate the checksum value */ - checksum_result = calc_checksum(rt); - /** Show the calculatedchecksum value */ - printf("CHECKSUM = %#x\n", 0x100-((checksum_result - rt->checksum) & 0xFF)); - /** and the result of the calculation */ - if (!checksum_result) { - printf("checksum is ok.\n"); - break; - } else { - printf("checksum is wrong.\n"); - } - } - size += 16; - } while (size < 0xFFFF); - if (size >= 0xFFFF) { - /** When the functions comes here there is no PIRQ table found. */ - printf("No PCI IRQ routing table signature found.\n"); - return NULL; - } - - return rt; -} - -int main(int argc, char* argv[]) -{ - char* ptr; - int fd_mem = -1; - struct irq_routing_table* rt = NULL; - void* bios_image = NULL; - if ( argc > 1 ) - { - /** there a paramater passed to the program, assume that it is a menory file */ - printf("Opening memory image file '%s'\n", argv[1]); - /** Open the file */ - fd_mem = open(argv[1], O_RDONLY); - if (fd_mem > 0) { - /** get tyhe size of the file */ - int file_size = lseek(fd_mem, 0, SEEK_END); - printf("Memory image '%i'\n", file_size); - /** get a memory block for it. */ - bios_image = malloc(file_size); - if (bios_image) { - /** Fill the created buffer */ - lseek(fd_mem, 0, SEEK_SET); - read(fd_mem, bios_image, file_size); - /** set the pointer for the probe function */ - ptr = (char*)bios_image; - } else { - /* no memory available ? */ - perror("Failed to open imagefile\n"); - return (-3); - } - } else { - /** An error occourd, just exit with a message */ - perror("Failed to open imagefile"); - return (-2); - } - } else { - /** No paramaters means that the program will access the system memory */ - printf("Accessing memory\n"); - if (getuid()) { - /** i'm not root message !!!! */ - fprintf(stderr, "Run me as root, I need access to " MEM_DEV ".\n"); - } - /** open the system memory */ - fd_mem = open(MEM_DEV, O_RDONLY); - if (fd_mem < 0) { - /** could not open the system memory, exit with a message */ - perror("Could not open " MEM_DEV ":"); - exit(1); - } - printf("Probing PIRQ table in memory.\n"); - ptr = mmap(0, 0x10000, PROT_READ, MAP_SHARED, fd_mem, (off_t)0xf0000); - if (ptr == MAP_FAILED) { - /** could not map the system memory, exit with a message */ - perror("Mapping system memory failed: "); - close(fd_mem); - return (1); - } - } - if (ptr) { - /** now do the actual probe function */ - rt = probe_table(ptr); - if (rt != NULL && bios_image == NULL) { - /** when probing system memory we write the 'irq_tables.c' code file */ - printf("Creating irq_tables.c ...\n"); - code_gen("irq_tables.c", rt); - printf("Done, you can move the file to the coreboot tree now.\n"); - } - } else { - printf("invalid memory pointer\n"); - } - if (bios_image) { - /** when we are reading from a file the memory must be released */ - free(bios_image); - } else { - /** when reading from the system memory, it must be unmapped */ - munmap(ptr, 0x10000); - } - /** Close the file handle */ - close(fd_mem); - /** return 0 as OK ) */ - return 0; -} |