Virtualization/openbios
1
0
Fork 0
mirror of https://gitlab.com/qemu-project/openbios.git synced 2024-02-13 08:34:06 +08:00
Code Issues Projects Releases Wiki Activity
Files
d80454d07ae01b9824e115932bc330007361b348
openbios/toke/dictionary.c
Stefan Reinauer 5c9eb9b45b initial import of openbios--main--1.0--patch-26 
git-svn-id: svn://coreboot.org/openbios/openbios-devel@1 f158a5a8-5612-0410-a976-696ce0be7e32
2006-04-26 15:08:19 +00:00

575 lines
17 KiB
C
Raw Blame History

/*
* OpenBIOS - free your system!
* ( FCode tokenizer )
*
* dictionary.c - dictionary initialization and functions.
*
* This program is part of a free implementation of the IEEE 1275-1994
* Standard for Boot (Initialization Configuration) Firmware.
*
* Copyright (C) 2001-2005 Stefan Reinauer, <stepan@openbios.org>
*
* 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>
#if defined(__linux__) && ! defined(__USE_BSD)
#define __USE_BSD
#endif
#include <string.h>
#include <errno.h>
#include "toke.h"
#include "dictionary.h"
typedef struct token {
u8 *name;
u16 fcode;
struct token *next;
} token_t;
static token_t *dictionary=NULL;
static token_t *forthwords=NULL;
static u16 lookup_token_dict(char *name, token_t *dict)
{
token_t *curr;
for (curr=dict; curr!=NULL; curr=curr->next)
if (!strcasecmp(name,(char *)curr->name))
break;
if (curr)
return curr->fcode;
#ifdef DEBUG_TOKE
printf("warning: token '%s' does not exist.\n", name);
#endif
return 0xffff;
}
u16 lookup_token(char *name)
{
return lookup_token_dict(name, dictionary);
}
u16 lookup_fword(char *name)
{
return lookup_token_dict(name, forthwords);
}
static int add_token_dict(u16 number, char *name, token_t **dict)
{
token_t *curr;
curr=malloc(sizeof(token_t));
if(!curr) {
printf("Out of memory while adding token.\n");
exit(-ENOMEM);
}
curr->next=*dict;
curr->fcode=number;
curr->name=(u8 *)name;
*dict=curr;
return 0;
}
int add_token(u16 number, char *name)
{
return add_token_dict(number, name, &dictionary);
}
static int add_special(u16 number, char *name)
{
return add_token_dict(number, name, &forthwords);
}
void init_dictionary(void)
{
add_token( 0x000, "end0" );
add_token( 0x010, "b(lit)" );
add_token( 0x011, "b(')" );
add_token( 0x012, "b(\")" );
add_token( 0x013, "bbranch" );
add_token( 0x014, "b?branch" );
add_token( 0x015, "b(loop)" );
add_token( 0x016, "b(+loop)" );
add_token( 0x017, "b(do)" );
add_token( 0x018, "b(?do)" );
add_token( 0x019, "i" );
add_token( 0x01a, "j" );
add_token( 0x01b, "b(leave)" );
add_token( 0x01c, "b(of)" );
add_token( 0x01d, "execute" );
add_token( 0x01e, "+" );
add_token( 0x01f, "-" );
add_token( 0x020, "*" );
add_token( 0x021, "/" );
add_token( 0x022, "mod" );
add_token( 0x023, "and" );
add_token( 0x024, "or" );
add_token( 0x025, "xor" );
add_token( 0x026, "invert" );
add_token( 0x027, "lshift" );
add_token( 0x028, "rshift" );
add_token( 0x029, ">>a" );
add_token( 0x02a, "/mod" );
add_token( 0x02b, "u/mod" );
add_token( 0x02c, "negate" );
add_token( 0x02d, "abs" );
add_token( 0x02e, "min" );
add_token( 0x02f, "max" );
add_token( 0x030, ">r" );
add_token( 0x031, "r>" );
add_token( 0x032, "r@" );
add_token( 0x033, "exit" );
add_token( 0x034, "0=" );
add_token( 0x035, "0<>" );
add_token( 0x036, "0<" );
add_token( 0x037, "0<=" );
add_token( 0x038, "0>" );
add_token( 0x039, "0>=" );
add_token( 0x03a, "<" );
add_token( 0x03b, ">" );
add_token( 0x03c, "=" );
add_token( 0x03d, "<>" );
add_token( 0x03e, "u>" );
add_token( 0x03f, "u<=" );
add_token( 0x040, "u<" );
add_token( 0x041, "u>=" );
add_token( 0x042, ">=" );
add_token( 0x043, "<=" );
add_token( 0x044, "between" );
add_token( 0x045, "within" );
add_token( 0x046, "drop" );
add_token( 0x047, "dup" );
add_token( 0x048, "over" );
add_token( 0x049, "swap" );
add_token( 0x04A, "rot" );
add_token( 0x04b, "-rot" );
add_token( 0x04c, "tuck" );
add_token( 0x04d, "nip" );
add_token( 0x04e, "pick" );
add_token( 0x04f, "roll" );
add_token( 0x050, "?dup" );
add_token( 0x051, "depth" );
add_token( 0x052, "2drop" );
add_token( 0x053, "2dup" );
add_token( 0x054, "2over" );
add_token( 0x055, "2swap" );
add_token( 0x056, "2rot" );
add_token( 0x057, "2/" );
add_token( 0x058, "u2/" );
add_token( 0x059, "2*" );
add_token( 0x05a, "/c" );
add_token( 0x05b, "/w" );
add_token( 0x05c, "/l" );
add_token( 0x05d, "/n" );
add_token( 0x05e, "ca+" );
add_token( 0x05f, "wa+" );
add_token( 0x060, "la+" );
add_token( 0x061, "na+" );
add_token( 0x062, "char+" );
add_token( 0x063, "wa1+" );
add_token( 0x064, "la1+" );
add_token( 0x065, "cell+" );
add_token( 0x066, "chars" );
add_token( 0x067, "/w*" );
add_token( 0x068, "/l*" );
add_token( 0x069, "cells" );
add_token( 0x06a, "on" );
add_token( 0x06b, "off" );
add_token( 0x06c, "+!" );
add_token( 0x06d, "@" );
add_token( 0x06e, "l@" );
add_token( 0x06f, "w@" );
add_token( 0x070, "<w@" );
add_token( 0x071, "c@" );
add_token( 0x072, "!" );
add_token( 0x073, "l!" );
add_token( 0x074, "w!" );
add_token( 0x075, "c!" );
add_token( 0x076, "2@" );
add_token( 0x077, "2!" );
add_token( 0x078, "move" );
add_token( 0x079, "fill" );
add_token( 0x07a, "comp" );
add_token( 0x07b, "noop" );
add_token( 0x07c, "lwsplit" );
add_token( 0x07d, "wljoin" );
add_token( 0x07e, "lbsplit" );
add_token( 0x07f, "bljoin" );
add_token( 0x080, "wbflip" );
add_token( 0x081, "upc" );
add_token( 0x082, "lcc" );
add_token( 0x083, "pack" );
add_token( 0x084, "count" );
add_token( 0x085, "body>" );
add_token( 0x086, ">body" );
add_token( 0x087, "fcode-revision" );
add_token( 0x088, "span" );
add_token( 0x089, "unloop" );
add_token( 0x08a, "expect" );
add_token( 0x08b, "alloc-mem" );
add_token( 0x08c, "free-mem" );
add_token( 0x08d, "key?" );
add_token( 0x08e, "key" );
add_token( 0x08f, "emit" );
add_token( 0x090, "type" );
add_token( 0x091, "(cr" );
add_token( 0x092, "cr" );
add_token( 0x093, "#out" );
add_token( 0x094, "#line" );
add_token( 0x095, "hold" );
add_token( 0x096, "<#" );
add_token( 0x097, "u#>" );
add_token( 0x098, "sign" );
add_token( 0x099, "u#" );
add_token( 0x09a, "u#s" );
add_token( 0x09b, "u." );
add_token( 0x09c, "u.r" );
add_token( 0x09d, "." );
add_token( 0x09e, ".r" );
add_token( 0x09f, ".s" );
add_token( 0x0a0, "base" );
add_token( 0x0a1, "convert" );
add_token( 0x0a2, "$number" );
add_token( 0x0a3, "digit" );
add_token( 0x0a4, "-1" );
add_token( 0x0a5, "0" );
add_token( 0x0a6, "1" );
add_token( 0x0a7, "2" );
add_token( 0x0a8, "3" );
add_token( 0x0a9, "bl" );
add_token( 0x0aa, "bs" );
add_token( 0x0ab, "bell" );
add_token( 0x0ac, "bounds" );
add_token( 0x0ad, "here" );
add_token( 0x0ae, "aligned" );
add_token( 0x0af, "wbsplit" );
add_token( 0x0b0, "bwjoin" );
add_token( 0x0b1, "b(<mark)" );
add_token( 0x0b2, "b(>resolve)" );
add_token( 0x0b3, "set-token-table" );
add_token( 0x0b4, "set-table" );
add_token( 0x0b5, "new-token" );
add_token( 0x0b6, "named-token" );
add_token( 0x0b7, "b(:)" );
add_token( 0x0b8, "b(value)" );
add_token( 0x0b9, "b(variable)" );
add_token( 0x0ba, "b(constant)" );
add_token( 0x0bb, "b(create)" );
add_token( 0x0bc, "b(defer)" );
add_token( 0x0bd, "b(buffer:)" );
add_token( 0x0be, "b(field)" );
add_token( 0x0bf, "b(code)" );
add_token( 0x0c0, "instance" );
add_token( 0x0c2, "b(;)" );
add_token( 0x0c3, "b(to)" );
add_token( 0x0c4, "b(case)" );
add_token( 0x0c5, "b(endcase)" );
add_token( 0x0c6, "b(endof)" );
add_token( 0x0c7, "#" );
add_token( 0x0c8, "#s" );
add_token( 0x0c9, "#>" );
add_token( 0x0ca, "external-token" );
add_token( 0x0cb, "$find" );
add_token( 0x0cc, "offset16" );
add_token( 0x0cd, "evaluate" );
add_token( 0x0d0, "c," );
add_token( 0x0d1, "w," );
add_token( 0x0d2, "l," );
add_token( 0x0d3, "," );
add_token( 0x0d4, "um*" );
add_token( 0x0d5, "um/mod" );
add_token( 0x0d8, "d+" );
add_token( 0x0d9, "d-" );
add_token( 0x0da, "get-token" );
add_token( 0x0db, "set-token" );
add_token( 0x0dc, "state" );
add_token( 0x0dd, "compile" );
add_token( 0x0de, "behavior" );
add_token( 0x0f0, "start0" );
add_token( 0x0f1, "start1" );
add_token( 0x0f2, "start2" );
add_token( 0x0f3, "start4" );
add_token( 0x0fc, "ferror" );
add_token( 0x0fd, "version1" );
add_token( 0x0fe, "4-byte-id" );
add_token( 0x0ff, "end1" );
add_token( 0x101, "dma-alloc" );
add_token( 0x102, "my-address" );
add_token( 0x103, "my-space" );
add_token( 0x104, "memmap" );
add_token( 0x105, "free-virtual" );
add_token( 0x106, ">physical" );
add_token( 0x10f, "my-params" );
add_token( 0x110, "property" );
add_token( 0x111, "encode-int" );
add_token( 0x112, "encode+" );
add_token( 0x113, "encode-phys" );
add_token( 0x114, "encode-string" );
add_token( 0x115, "encode-bytes" );
add_token( 0x116, "reg" );
add_token( 0x117, "intr" );
add_token( 0x118, "driver" );
add_token( 0x119, "model" );
add_token( 0x11a, "device-type" );
add_token( 0x11b, "parse-2int" );
add_token( 0x11c, "is-install" );
add_token( 0x11d, "is-remove" );
add_token( 0x11e, "is-selftest" );
add_token( 0x11f, "new-device" );
add_token( 0x120, "diagnostic-mode?" );
add_token( 0x121, "display-status" );
add_token( 0x122, "memory-test-issue" );
add_token( 0x123, "group-code" );
add_token( 0x124, "mask" );
add_token( 0x125, "get-msecs" );
add_token( 0x126, "ms" );
add_token( 0x127, "finish-device" );
add_token( 0x128, "decode-phys" );
add_token( 0x12b, "interpose" );
add_token( 0x130, "map-low" );
add_token( 0x131, "sbus-intr>cpu" );
add_token( 0x150, "#lines" );
add_token( 0x151, "#columns" );
add_token( 0x152, "line#" );
add_token( 0x153, "column#" );
add_token( 0x154, "inverse?" );
add_token( 0x155, "inverse-screen?" );
add_token( 0x156, "frame-buffer-busy?" );
add_token( 0x157, "draw-character" );
add_token( 0x158, "reset-screen" );
add_token( 0x159, "toggle-cursor" );
add_token( 0x15a, "erase-screen" );
add_token( 0x15b, "blink-screen" );
add_token( 0x15c, "invert-screen" );
add_token( 0x15d, "insert-characters" );
add_token( 0x15e, "delete-characters" );
add_token( 0x15f, "insert-lines" );
add_token( 0x160, "delete-lines" );
add_token( 0x161, "draw-logo" );
add_token( 0x162, "frame-buffer-adr" );
add_token( 0x163, "screen-height" );
add_token( 0x164, "screen-width" );
add_token( 0x165, "window-top" );
add_token( 0x166, "window-left" );
add_token( 0x16a, "default-font" );
add_token( 0x16b, "set-font" );
add_token( 0x16c, "char-height" );
add_token( 0x16d, "char-width" );
add_token( 0x16e, ">font" );
add_token( 0x16f, "fontbytes" );
add_token( 0x170, "fb1-draw-character" );
add_token( 0x171, "fb1-reset-screen" );
add_token( 0x172, "fb1-toggle-cursor" );
add_token( 0x173, "fb1-erase-screen" );
add_token( 0x174, "fb1-blink-screen" );
add_token( 0x175, "fb1-invert-screen" );
add_token( 0x176, "fb1-insert-characters" );
add_token( 0x177, "fb1-delete-characters" );
add_token( 0x178, "fb1-insert-lines" );
add_token( 0x179, "fb1-delete-lines" );
add_token( 0x17a, "fb1-draw-logo" );
add_token( 0x17b, "fb1-install" );
add_token( 0x17c, "fb1-slide-up" );
add_token( 0x180, "fb8-draw-character" );
add_token( 0x181, "fb8-reset-screen" );
add_token( 0x182, "fb8-toggle-cursor" );
add_token( 0x183, "fb8-erase-screen" );
add_token( 0x184, "fb8-blink-screen" );
add_token( 0x185, "fb8-invert-screen" );
add_token( 0x186, "fb8-insert-characters" );
add_token( 0x187, "fb8-delete-characters" );
add_token( 0x188, "fb8-insert-lines" );
add_token( 0x189, "fb8-delete-lines" );
add_token( 0x18a, "fb8-draw-logo" );
add_token( 0x18b, "fb8-install" );
add_token( 0x1a0, "return-buffer" );
add_token( 0x1a1, "xmit-packet" );
add_token( 0x1a2, "poll-packet" );
add_token( 0x1a4, "mac-address" );
add_token( 0x201, "device-name" );
add_token( 0x202, "my-args" );
add_token( 0x203, "my-self" );
add_token( 0x204, "find-package" );
add_token( 0x205, "open-package" );
add_token( 0x206, "close-package" );
add_token( 0x207, "find-method" );
add_token( 0x208, "call-package" );
add_token( 0x209, "$call-parent" );
add_token( 0x20a, "my-package" );
add_token( 0x20b, "ihandle>phandle" );
add_token( 0x20d, "my-unit" );
add_token( 0x20e, "$call-method" );
add_token( 0x20f, "$open-package" );
add_token( 0x210, "processor-type" );
add_token( 0x211, "firmware-version" );
add_token( 0x212, "fcode-version" );
add_token( 0x213, "alarm" );
add_token( 0x214, "(is-user-word)" );
add_token( 0x215, "suspend-fcode" );
add_token( 0x216, "abort" );
add_token( 0x217, "catch" );
add_token( 0x218, "throw" );
add_token( 0x219, "user-abort" );
add_token( 0x21a, "get-my-property" );
add_token( 0x21b, "decode-int" );
add_token( 0x21c, "decode-string" );
add_token( 0x21d, "get-inherited-property" );
add_token( 0x21e, "delete-property" );
add_token( 0x21f, "get-package-property" );
add_token( 0x220, "cpeek" );
add_token( 0x221, "wpeek" );
add_token( 0x222, "lpeek" );
add_token( 0x223, "cpoke" );
add_token( 0x224, "wpoke" );
add_token( 0x225, "lpoke" );
add_token( 0x226, "lwflip" );
add_token( 0x227, "lbflip" );
add_token( 0x228, "lbflips" );
add_token( 0x229, "adr-mask" );
add_token( 0x230, "rb@" );
add_token( 0x231, "rb!" );
add_token( 0x232, "rw@" );
add_token( 0x233, "rw!" );
add_token( 0x234, "rl@" );
add_token( 0x235, "rl!" );
add_token( 0x236, "wbflips" );
add_token( 0x237, "lwflips" );
add_token( 0x238, "probe" );
add_token( 0x239, "probe-virtual" );
add_token( 0x23b, "child" );
add_token( 0x23c, "peer" );
add_token( 0x23d, "next-property" );
add_token( 0x23e, "byte-load" );
add_token( 0x23f, "set-args" );
add_token( 0x240, "left-parse-string" );
/* FCodes from 64bit extension addendum */
add_token( 0x22e, "rx@" );
add_token( 0x22f, "rx!" );
add_token( 0x241, "bxjoin" );
add_token( 0x242, "<l@" );
add_token( 0x243, "lxjoin" );
add_token( 0x244, "wxjoin" );
add_token( 0x245, "x," );
add_token( 0x246, "x@" );
add_token( 0x247, "x!" );
add_token( 0x248, "/x" );
add_token( 0x249, "/x*" );
add_token( 0x24a, "xa+" );
add_token( 0x24b, "xa1+" );
add_token( 0x24c, "xbflip" );
add_token( 0x24d, "xbflips" );
add_token( 0x24e, "xbsplit" );
add_token( 0x24f, "xlflip" );
add_token( 0x250, "xlflips" );
add_token( 0x251, "xlsplit" );
add_token( 0x252, "xwflip" );
add_token( 0x253, "xwflips" );
add_token( 0x254, "xwsplit" );
add_special(COLON, ":");
add_special(SEMICOLON, ";");
add_special(TOKENIZE, "'");
add_special(AGAIN, "again");
add_special(ALIAS, "alias");
add_special(GETTOKEN, "[']");
add_special(ASCII, "ascii");
add_special(BEGIN, "begin");
add_special(BUFFER, "buffer:");
add_special(CASE, "case");
add_special(CONST, "constant");
add_special(CONTROL, "control");
add_special(CREATE, "create");
add_special(DECIMAL, "decimal");
add_special(DEFER, "defer");
add_special(CDO, "?do");
add_special(DO, "do");
add_special(ELSE, "else");
add_special(ENDCASE, "endcase");
add_special(ENDOF, "endof");
add_special(EXTERNAL, "external");
add_special(FIELD, "field");
add_special(HEADERLESS, "headerless");
add_special(HEADERS, "headers");
add_special(HEX, "hex");
add_special(IF, "if");
add_special(CLEAVE, "?leave");
add_special(LEAVE, "leave");
add_special(CLOOP, "+loop");
add_special(LOOP, "loop");
add_special(OCTAL, "octal");
add_special(OF, "of");
add_special(REPEAT, "repeat");
add_special(THEN, "then");
add_special(TO, "to");
add_special(UNTIL, "until");
add_special(VALUE, "value");
add_special(VARIABLE, "variable");
add_special(WHILE, "while");
add_special(OFFSET16, "offset16");
add_special(BEGINTOK, "tokenizer[");
add_special(EMITBYTE, "emit-byte");
add_special(ENDTOK, "]tokenizer");
add_special(FLOAD, "fload");
add_special(STRING, "\"");
add_special(PSTRING, ".\"");
add_special(PBSTRING, ".(");
add_special(SSTRING, "s\"");
add_special(RECURSIVE, "recursive");
add_special(NEXTFCODE, "next-fcode");
/* version1 is also an fcode word, but it
* needs to trigger some tokenizer internals */
add_special(VERSION1, "version1");
add_special(START0, "start0");
add_special(START1, "start1");
add_special(START2, "start2");
add_special(START4, "start4");
add_special(END0, "end0");
add_special(END1, "end1");
add_special(FCODE_V1, "fcode-version1");
add_special(FCODE_V2, "fcode-version2");
add_special(FCODE_V3, "fcode-version3");
add_special(FCODE_END, "fcode-end");
add_special(FCODE_DATE, "fcode-date");
add_special(FCODE_TIME, "fcode-time");
add_special(HEXVAL, "h#");
add_special(DECVAL, "d#");
add_special(OCTVAL, "o#");
add_special(CHAR, "char");
add_special(CCHAR, "[char]");
add_special(ABORTTXT, "abort\"");
add_special(ENCODEFILE, "encode-file");
/* pci header generation is done differently
* across the available tokenizers. We try to
* be compatible to all of them
*/
add_special(PCIHDR, "pci-header");
add_special(PCIEND, "pci-end"); /* SUN syntax */
add_special(PCIEND, "pci-header-end"); /* Firmworks syntax */
add_special(PCIREV, "pci-revision"); /* SUN syntax */
add_special(PCIREV, "pci-code-revision"); /* SUN syntax */
add_special(PCIREV, "set-rev-level"); /* Firmworks syntax */
add_special(NOTLAST, "not-last-image");
}
Reference in New Issue View Git Blame Copy Permalink