NetBSD/usr.bin/fgen/fgen.h

136 lines
2.9 KiB
C
Raw Permalink Normal View History

/* $NetBSD: fgen.h,v 1.9 2010/02/08 20:14:55 eeh Exp $ */
/*
* fgen.h -- stuff for the fcode tokenizer.
1998-11-02 01:27:11 +03:00
*
* Copyright (c) 1998 Eduardo Horvath.
* 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. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 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.
*/
/* Type of a Cell */
typedef int64_t Cell;
/* Token from the scanner. */
struct tok {
int type;
char *text;
};
#define TOKEN struct tok
2009-04-12 07:13:09 +04:00
#define YY_DECL TOKEN* yylex(void)
#define FCODE 0x000FC0DE
#define MACRO 0x0000F00D
/* Defined fcode and string. */
struct fcode {
const char *name;
long num;
int type;
struct fcode *l;
struct fcode *r;
};
/* macro instruction as separate words */
struct macro {
const char *name;
const char *equiv;
int type;
struct macro *l;
struct macro *r;
};
/*
* FCode header -- assumes big-endian machine,
* otherwise the bits need twiddling.
*/
struct fcode_header {
char header;
char format;
short checksum;
int length;
};
/* Tokenizer tokens */
enum toktypes {
TOK_OCTAL = 8,
TOK_DECIMAL = 10,
TOK_HEX = 16,
TOK_NUMBER,
TOK_STRING_LIT,
TOK_C_LIT,
TOK_PSTRING,
TOK_TOKENIZE,
TOK_COMMENT,
TOK_COLON,
TOK_SEMICOLON,
TOK_TOSTRING,
/* These are special */
TOK_ABORT_S,
TOK_AGAIN,
TOK_ALIAS,
TOK_GETTOKEN,
TOK_ASCII,
TOK_BEGIN,
TOK_BUFFER,
TOK_CASE,
TOK_CONSTANT,
TOK_CONTROL,
TOK_CREATE,
TOK_DEFER,
TOK_DO,
TOK_ELSE,
TOK_END0,
TOK_ENDCASE,
TOK_ENDOF,
TOK_EXTERNAL,
TOK_FCODE_VERSION2,
TOK_FCODE_END,
TOK_FIELD,
TOK_HEADERLESS,
TOK_HEADERS,
TOK_IF,
TOK_LEAVE,
TOK_LOOP,
TOK_OF,
TOK_OFFSET16,
TOK_REPEAT,
TOK_STARTX,
TOK_THEN,
TOK_TO,
TOK_UNTIL,
TOK_VALUE,
TOK_VARIABLE,
TOK_VERSION1,
TOK_WHILE,
/* Tokenizer directives */
TOK_BEGTOK,
TOK_EMIT_BYTE,
TOK_ENDTOK,
TOK_FLOAD,
TOK_OTHER
};