summaryrefslogtreecommitdiff
path: root/util/options/build_opt_tbl.c
diff options
context:
space:
mode:
Diffstat (limited to 'util/options/build_opt_tbl.c')
-rw-r--r--util/options/build_opt_tbl.c684
1 files changed, 0 insertions, 684 deletions
diff --git a/util/options/build_opt_tbl.c b/util/options/build_opt_tbl.c
deleted file mode 100644
index b89bb4f1d5..0000000000
--- a/util/options/build_opt_tbl.c
+++ /dev/null
@@ -1,684 +0,0 @@
-/*
- * This file is part of the coreboot project.
- *
- * Copyright (C) 2003 Eric Biederman (ebiederm@xmission.com)
- * Copyright (C) 2007-2010 coresystems GmbH
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; version 2 of the License.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA, 02110-1301 USA
- */
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <unistd.h>
-#include <ctype.h>
-#include <errno.h>
-#include <libgen.h>
-#define UTIL_BUILD_OPTION_TABLE
-#include "../../src/include/pc80/mc146818rtc.h"
-#include "../../src/include/boot/coreboot_tables.h"
-
-#define CMOS_IMAGE_BUFFER_SIZE 256
-#define INPUT_LINE_MAX 256
-#define MAX_VALUE_BYTE_LENGTH 64
-
-#define TMPFILE_LEN 25600
-#define TMPFILE_TEMPLATE "/build_opt_tbl_XXXXXX"
-
-static unsigned char cmos_table[4096];
-
-/* This array is used to isolate bits that are to be changed in a byte */
-static unsigned char clip[9]={0,1,3,7,0x0f,0x1f,0x3f,0x7f,0xff};
-
-#ifdef WIN32
-#include <fcntl.h>
-char *mkstemp(char* name)
-{
- static char val='0';
- char *c=name;
- while (*c!='X') c++;
- *c=val++;
- return open(name,O_CREAT | O_RDWR);
-}
-#define UNLINK_IF_NECESSARY(x) unlink(x)
-#else
-#define UNLINK_IF_NECESSARY(x)
-#endif
-
-/**
- * This routine loops through the entried and tests if any of the fields
- * overlap.
- * If there is an overlap, the routine exits, otherwise it returns.
- *
- * @param entry_start memory pointer to the start of the entries.
- * @param entry_end memory pointer to the byte past the entries.
- */
-static void test_for_entry_overlaps(void *entry_start, void *entry_end)
-{
- int ptr;
- char *cptr;
- int buffer_bit_size;
- int offset;
- int byte;
- int byte_length;
- struct cmos_entries *ce;
- unsigned char test[CMOS_IMAGE_BUFFER_SIZE];
- unsigned char set;
-
- /* calculate the size of the cmos buffer in bits */
- buffer_bit_size=(CMOS_IMAGE_BUFFER_SIZE*8);
- /* clear the temporary test buffer */
- for(ptr=0; ptr < CMOS_IMAGE_BUFFER_SIZE; ptr++)
- test[ptr]=0;
-
- /* loop through each entry in the table testing for errors */
- for(cptr = entry_start; cptr < (char *)entry_end; cptr += ce->size) {
- ce=(struct cmos_entries *)cptr;
- /* test if entry goes past the end of the buffer */
- if((int)(ce->bit+ce->length) > buffer_bit_size) {
- printf("Error - Entry %s start bit + length must be less than %d\n",
- ce->name,buffer_bit_size);
- exit(1);
- }
- byte=ce->bit/8;
- offset=ce->bit%8;
- byte_length=ce->length/8;
- if(byte_length) { /* entry is 8 bits long or more */
- if(offset) { /* if 8 bits or more long, it must be byte aligned */
- printf("Error - Entry %s length over 8 must be byte aligned\n",
- ce->name);
- exit(1);
- }
- /* test if entries 8 or more in length are even bytes */
- if(ce->length%8){
- printf("Error - Entry %s length over 8 must be a multiple of 8\n",
- ce->name);
- exit(1);
- }
- /* test if any of the bits have been previously used */
- for(;byte_length;byte_length--,byte++) {
- if(test[byte]) {
- printf("Error - Entry %s uses same bits previously used\n",
- ce->name);
- exit(1);
- }
- test[byte]=clip[8]; /* set the bits defined in test */
- }
- } else {
- /* test if bits overlap byte boundaries */
- if((int)ce->length > (8-offset)) {
- printf("Error - Entry %s length overlaps a byte boundry\n",
- ce->name);
- exit(1);
- }
- /* test for bits previously used */
- set=(clip[ce->length]<<offset);
- if(test[byte]&set) {
- printf("Error - Entry %s uses same bits previously used\n",
- ce->name);
- exit(1);
- }
- test[byte]|=set; /* set the bits defined in test */
- }
- }
- return;
-}
-
-/* This routine displays the usage options */
-static void display_usage(char *name)
-{
- printf("Usage: %s [--config filename]\n", name);
- printf(" [--option filename]\n");
- printf(" [--header filename]\n\n");
- printf("--config = Build the definitions table from the given file.\n");
- printf("--binary = Output a binary file with the definitions.\n");
- printf("--option = Output a C source file with the definitions.\n");
- printf("--header = Output a C header file with the definitions.\n");
- exit(1);
-}
-
-static void skip_spaces(char *line, char **ptr)
-{
- if (!isspace(**ptr)) {
- printf("Error missing whitespace in line\n%s\n", line);
- exit(1);
- }
- while(isspace(**ptr)) {
- (*ptr)++;
- }
- return;
-}
-
-static unsigned long get_number(char *line, char **ptr, int base)
-{
- unsigned long value;
- char *ptr2;
- value = strtoul(*ptr, &ptr2, base);
- if (ptr2 == *ptr) {
- printf("Error missing digits at: \n%s\n in line:\n%s\n",
- *ptr, line);
- exit(1);
- }
- *ptr = ptr2;
- return value;
-}
-
-static int is_ident_digit(int c)
-{
- int result;
- switch(c) {
- case '0': case '1': case '2': case '3':
- case '4': case '5': case '6': case '7':
- case '8': case '9':
- result = 1;
- break;
- default:
- result = 0;
- break;
- }
- return result;
-}
-
-static int is_ident_nondigit(int c)
-{
- int result;
- switch(c) {
- case 'A': case 'B': case 'C': case 'D':
- case 'E': case 'F': case 'G': case 'H':
- case 'I': case 'J': case 'K': case 'L':
- case 'M': case 'N': case 'O': case 'P':
- case 'Q': case 'R': case 'S': case 'T':
- case 'U': case 'V': case 'W': case 'X':
- case 'Y': case 'Z':
- case 'a': case 'b': case 'c': case 'd':
- case 'e': case 'f': case 'g': case 'h':
- case 'i': case 'j': case 'k': case 'l':
- case 'm': case 'n': case 'o': case 'p':
- case 'q': case 'r': case 's': case 't':
- case 'u': case 'v': case 'w': case 'x':
- case 'y': case 'z':
- case '_':
- result = 1;
- break;
- default:
- result = 0;
- break;
- }
- return result;
-}
-
-static int is_ident(char *str)
-{
- int result;
- int ch;
- ch = *str;
- result = 0;
- if (is_ident_nondigit(ch)) {
- do {
- str++;
- ch = *str;
- } while(ch && (is_ident_nondigit(ch) || (is_ident_digit(ch))));
- result = (ch == '\0');
- }
- return result;
-}
-
-/**
- * This routine builds the cmos definition table from the cmos layout file
- *
- * The input comes from the configuration file which contains two parts
- * entries and enumerations. Each section is started with the key words
- * entries and enumerations. Records then follow in their respective
- * formats.
- *
- * The output of this program is the cmos definitions table. It is stored
- * in the cmos_table array. If this module is called, and the global
- * table_file has been implimented by the user, the table is also written
- * to the specified file.
- *
- * This program exits with a return code of 1 on error. It returns 0 on
- * successful completion
- */
-int main(int argc, char **argv)
-{
- int i;
- char *config=0;
- char *binary=0;
- char *option=0;
- char *header=0;
- FILE *fp;
- int tempfile;
- char tempfilename[TMPFILE_LEN];
- struct cmos_option_table *ct;
- struct cmos_entries *ce;
- struct cmos_enums *c_enums, *c_enums_start;
- struct cmos_checksum *cs, *new_cs;
- char line[INPUT_LINE_MAX];
- unsigned char uc;
- int entry_mode=0;
- int enum_mode=0;
- int checksum_mode=0;
- int cnt;
- char *cptr;
- void *entry_start, *entry_end;
- int entries_length;
- int enum_length;
- int len;
- char buf[16];
- char val;
-
- for(i=1;i<argc;i++) {
- if(argv[i][0]!='-') {
- display_usage(argv[0]);
- }
- switch(argv[i][1]) {
- case '-': /* data is requested from a file */
- switch(argv[i][2]) {
- case 'c': /* use a configuration file */
- if(strcmp(&argv[i][2],"config")) {
- display_usage(argv[0]);
- }
- config=argv[++i];
- break;
- case 'b': /* Emit a binary file */
- if(strcmp(&argv[i][2],"binary")) {
- display_usage(argv[0]);
- }
- binary=argv[++i];
- break;
- case 'o': /* use a cmos definitions table file */
- if(strcmp(&argv[i][2],"option")) {
- display_usage(argv[0]);
- }
- option=argv[++i];
- break;
- case 'h': /* Output a header file */
- if (strcmp(&argv[i][2], "header") != 0) {
- display_usage(argv[0]);
- }
- header=argv[++i];
- break;
- default:
- display_usage(argv[0]);
- break;
- }
- break;
-
- default:
- display_usage(argv[0]);
- break;
- }
- }
-
-
- /* Has the user specified a configuration file */
- if(config) { /* if yes, open it */
- if((fp=fopen(config,"r"))==NULL){
- fprintf(stderr, "Error - Can not open config file %s\n",config);
- exit(1); /* exit if it can not be opened */
- }
- }
- else { /* no configuration file specified, so try the default */
- if((fp=fopen("cmos.layout","r"))==NULL){
- fprintf(stderr, "Error - Can not open cmos.layout\n");
- exit(1); /* end of no configuration file is found */
- }
- }
- /* type cast a pointer, so we can us the structure */
- ct=(struct cmos_option_table*)cmos_table;
- /* start the table with the type signature */
- ct->tag = LB_TAG_CMOS_OPTION_TABLE;
- /* put in the header length */
- ct->header_length=sizeof(*ct);
-
- /* Get the entry records */
- ce=(struct cmos_entries*)(cmos_table+(ct->header_length));
- cptr = (char*)ce;
- for(;;){ /* this section loops through the entry records */
- if(fgets(line,INPUT_LINE_MAX,fp)==NULL)
- break; /* end if no more input */
- // FIXME mode should be a single enum.
- if(!entry_mode) { /* skip input until the entries key word */
- if (strstr(line,"entries") != 0) {
- entry_mode=1;
- enum_mode=0;
- checksum_mode=0;
- continue;
- }
- } else { /* Test if we are done with entries and starting enumerations */
- if (strstr(line,"enumerations") != 0){
- entry_mode=0;
- enum_mode=1;
- checksum_mode=0;
- break;
- }
- if (strstr(line, "checksums") != 0) {
- entry_mode=0;
- enum_mode=0;
- checksum_mode=1;
- break;
- }
- }
-
- /* skip commented and blank lines */
- val = line[strspn(line," ")];
- /* takes care of *nix, Mac and Windows line ending formats */
- if (val=='#' || val=='\n' || val=='\r') continue;
- /* scan in the input data */
- sscanf(line,"%d %d %c %d %s",
- &ce->bit,&ce->length,&uc,&ce->config_id,&ce->name[0]);
- ce->config=(int)uc;
- /* check bit and length ranges */
- if(ce->bit>(CMOS_IMAGE_BUFFER_SIZE*8)) {
- fprintf(stderr, "Error - bit is to big in line \n%s\n",line);
- exit(1);
- }
- if((ce->length>(MAX_VALUE_BYTE_LENGTH*8))&&(uc!='r')) {
- fprintf(stderr, "Error - Length is to long in line \n%s\n",line);
- exit(1);
- }
- if (!is_ident((char *)ce->name)) {
- fprintf(stderr,
- "Error - Name %s is an invalid identifier in line\n %s\n",
- ce->name, line);
- exit(1);
- }
- /* put in the record type */
- ce->tag=LB_TAG_OPTION;
- /* calculate and save the record length */
- len=strlen((char *)ce->name)+1;
- /* make the record int aligned */
- if(len%4)
- len+=(4-(len%4));
- ce->size=sizeof(struct cmos_entries)-32+len;
- cptr = (char*)ce;
- cptr += ce->size; /* increment to the next table position */
- ce = (struct cmos_entries*) cptr;
- }
-
- /* put the length of the entries into the header section */
- entries_length = (cptr - (char *)&cmos_table) - ct->header_length;
-
- /* compute the start of the enumerations section */
- entry_start = ((char*)&cmos_table) + ct->header_length;
- entry_end = ((char *)entry_start) + entries_length;
- c_enums_start = c_enums = (struct cmos_enums*)entry_end;
- /* test for overlaps in the entry records */
- test_for_entry_overlaps(entry_start, entry_end);
-
- for(;enum_mode;){ /* loop to build the enumerations section */
- long ptr;
- if(fgets(line,INPUT_LINE_MAX,fp)==NULL)
- break; /* go till end of input */
-
- if (strstr(line, "checksums") != 0) {
- enum_mode=0;
- checksum_mode=1;
- break;
- }
-
- /* skip commented and blank lines */
- if(line[0]=='#') continue;
- if(line[strspn(line," ")]=='\n') continue;
-
- /* scan in the data */
- for(ptr=0;(line[ptr]==' ')||(line[ptr]=='\t');ptr++);
- c_enums->config_id=strtol(&line[ptr],(char**)NULL,10);
- for(;(line[ptr]!=' ')&&(line[ptr]!='\t');ptr++);
- for(;(line[ptr]==' ')||(line[ptr]=='\t');ptr++);
- c_enums->value=strtol(&line[ptr],(char**)NULL,10);
- for(;(line[ptr]!=' ')&&(line[ptr]!='\t');ptr++);
- for(;(line[ptr]==' ')||(line[ptr]=='\t');ptr++);
- for(cnt=0;(line[ptr]!='\n')&&(cnt<31);ptr++,cnt++)
- c_enums->text[cnt]=line[ptr];
- c_enums->text[cnt]=0;
-
- /* make the record int aligned */
- cnt++;
- if(cnt%4)
- cnt+=4-(cnt%4);
- /* store the record length */
- c_enums->size=((char *)&c_enums->text[cnt]) - (char *)c_enums;
- /* store the record type */
- c_enums->tag=LB_TAG_OPTION_ENUM;
- /* increment to the next record */
- c_enums=(struct cmos_enums*)&c_enums->text[cnt];
- }
- /* save the enumerations length */
- enum_length= (char *)c_enums - (char *)c_enums_start;
- ct->size=ct->header_length+enum_length+entries_length;
-
- /* Get the checksum records */
- new_cs = (struct cmos_checksum *)(cmos_table+(ct->size));
- for(;checksum_mode;) { /* This section finds the checksums */
- char *ptr;
- if(fgets(line, INPUT_LINE_MAX,fp)==NULL)
- break; /* end if no more input */
-
- /* skip commented and blank lines */
- if (line[0]=='#') continue;
- if (line[strspn(line, " ")]=='\n') continue;
- if (memcmp(line, "checksum", 8) != 0) continue;
-
- /* We actually found a new cmos checksum entry */
- cs = new_cs;
-
- /* get the information */
- ptr = line + 8;
- skip_spaces(line, &ptr);
- cs->range_start = get_number(line, &ptr, 10);
-
- skip_spaces(line, &ptr);
- cs->range_end = get_number(line, &ptr, 10);
-
- skip_spaces(line, &ptr);
- cs->location = get_number(line, &ptr, 10);
-
- /* Make certain there are spaces until the end of the line */
- skip_spaces(line, &ptr);
-
- if ((cs->range_start%8) != 0) {
- fprintf(stderr, "Error - range start is not byte aligned in line\n%s\n", line);
- exit(1);
- }
- if (cs->range_start >= (CMOS_IMAGE_BUFFER_SIZE*8)) {
- fprintf(stderr, "Error - range start is to big in line\n%s\n", line);
- exit(1);
- }
- if ((cs->range_end%8) != 7) {
- fprintf(stderr, "Error - range end is not byte aligned in line\n%s\n", line);
- exit(1);
- }
- if ((cs->range_end) >= (CMOS_IMAGE_BUFFER_SIZE*8)) {
- fprintf(stderr, "Error - range end is to long in line\n%s\n", line);
- exit(1);
- }
- if ((cs->location%8) != 0) {
- fprintf(stderr, "Error - location is not byte aligned in line\n%s\n", line);
- exit(1);
- }
- if ((cs->location >= (CMOS_IMAGE_BUFFER_SIZE*8)) ||
- ((cs->location + 16) > (CMOS_IMAGE_BUFFER_SIZE*8)))
- {
- fprintf(stderr, "Error - location is to big in line\n%s\n", line);
- exit(1);
- }
-
- cs->tag = LB_TAG_OPTION_CHECKSUM;
- cs->size = sizeof(*cs);
- cs->type = CHECKSUM_PCBIOS;
-
- cptr = (char *)cs;
- cptr += cs->size;
- new_cs = (struct cmos_checksum *)cptr;
- }
- ct->size += (cptr - (char *)(cmos_table + ct->size));
- fclose(fp);
-
- /* See if we want to output a C source file */
- if(option) {
- int err=0;
- snprintf(tempfilename, TMPFILE_LEN, "%s%s", dirname(strdup(option)), TMPFILE_TEMPLATE);
- tempfile = mkstemp(tempfilename);
- if(tempfile == -1) {
- perror("Error - Could not create temporary file");
- exit(1);
- }
-
- if((fp=fdopen(tempfile,"w"))==NULL){
- perror("Error - Could not open temporary file");
- unlink(tempfilename);
- exit(1);
- }
-
- /* write the header */
- if(fwrite("unsigned char option_table[] = {",1,32,fp) != 32) {
- perror("Error - Could not write image file");
- fclose(fp);
- unlink(tempfilename);
- exit(1);
- }
- /* write the array values */
- for(i=0; i<(int)(ct->size-1); i++) {
- if(!(i%10) && !err) err=(fwrite("\n\t",1,2,fp) != 2);
- sprintf(buf,"0x%02x,",cmos_table[i]);
- if(!err) err=(fwrite(buf,1,5,fp) != 5);
- }
- /* write the end */
- sprintf(buf,"0x%02x\n",cmos_table[i]);
- if(!err) err=(fwrite(buf,1,4,fp) != 4);
- if(fwrite("};\n",1,3,fp) != 3) {
- perror("Error - Could not write image file");
- fclose(fp);
- unlink(tempfilename);
- exit(1);
- }
-
- fclose(fp);
- UNLINK_IF_NECESSARY(option);
- if (rename(tempfilename, option)) {
- fprintf(stderr, "Error - Could not write %s: ", option);
- perror(NULL);
- unlink(tempfilename);
- exit(1);
- }
- }
-
- /* See if we also want to output a binary file */
- if(binary) {
- int err=0;
- snprintf(tempfilename, TMPFILE_LEN, "%s%s", dirname(strdup(binary)), TMPFILE_TEMPLATE);
- tempfile = mkstemp(tempfilename);
- if(tempfile == -1) {
- perror("Error - Could not create temporary file");
- exit(1);
- }
-
- if((fp=fdopen(tempfile,"wb"))==NULL){
- perror("Error - Could not open temporary file");
- unlink(tempfilename);
- exit(1);
- }
-
- /* write the array values */
- if(fwrite(cmos_table, (int)(ct->size-1), 1, fp) != 1) {
- perror("Error - Could not write image file");
- fclose(fp);
- unlink(tempfilename);
- exit(1);
- }
-
- fclose(fp);
- UNLINK_IF_NECESSARY(binary);
- if (rename(tempfilename, binary)) {
- fprintf(stderr, "Error - Could not write %s: ", binary);
- perror(NULL);
- unlink(tempfilename);
- exit(1);
- }
- }
-
- /* See if we also want to output a C header file */
- if (header) {
- struct cmos_option_table *hdr;
- struct lb_record *ptr, *end;
-
- snprintf(tempfilename, TMPFILE_LEN, "%s%s", dirname(strdup(header)), TMPFILE_TEMPLATE);
- tempfile = mkstemp(tempfilename);
- if(tempfile == -1) {
- perror("Error - Could not create temporary file");
- exit(1);
- }
-
- fp = fdopen(tempfile, "w");
- if (!fp) {
- perror("Error - Could not open temporary file");
- unlink(tempfilename);
- exit(1);
- }
-
- /* Get the cmos table header */
- hdr = (struct cmos_option_table *)cmos_table;
- /* Walk through the entry records */
- ptr = (struct lb_record *)(cmos_table + hdr->header_length);
- end = (struct lb_record *)(cmos_table + hdr->size);
- fprintf(fp, "/* This file is autogenerated.\n"
- " * See mainboard's cmos.layout file.\n */\n\n"
- "#ifndef __OPTION_TABLE_H\n#define __OPTION_TABLE_H\n\n");
-
- for(;ptr < end; ptr = (struct lb_record *)(((char *)ptr) + ptr->size)) {
- if (ptr->tag != LB_TAG_OPTION) {
- continue;
- }
- ce = (struct cmos_entries *)ptr;
-
- if (!is_ident((char *)ce->name)) {
- fprintf(stderr, "Invalid identifier: %s\n",
- ce->name);
- fclose(fp);
- unlink(tempfilename);
- exit(1);
- }
- fprintf(fp, "#define CMOS_VSTART_%s %d\n",
- ce->name, ce->bit);
- fprintf(fp, "#define CMOS_VLEN_%s %d\n",
- ce->name, ce->length);
- }
-
- if (cs != NULL) {
- fprintf(fp, "\n#define LB_CKS_RANGE_START %d\n", cs->range_start / 8);
- fprintf(fp, "#define LB_CKS_RANGE_END %d\n", cs->range_end / 8);
- fprintf(fp, "#define LB_CKS_LOC %d\n", cs->location / 8);
- } else {
- fprintf(stderr, "Error - No checksums defined.\n");
- fclose(fp);
- unlink(tempfilename);
- exit(1);
- }
- fprintf(fp, "\n#endif // __OPTION_TABLE_H\n");
- fclose(fp);
-
- UNLINK_IF_NECESSARY(header);
- if (rename(tempfilename, header)) {
- fprintf(stderr, "Error - Could not write %s: ", header);
- perror(NULL);
- unlink(tempfilename);
- exit(1);
- }
- }
-
- return 0;
-}
-
-
generated by cgit v1.2.3 (git 2.25.1) at 2024-11-16 04:11:19 +0000