6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-12-28 06:30:16 +00:00
Code Issues Projects Releases Wiki Activity

Started to add config file

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@336 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz 2000-09-24 19:06:59 +00:00
parent 8bab228a52
commit b960e3ead3
13 changed files with 1337 additions and 297 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

241
src/da65/config.c Normal file
View File

@ -0,0 +1,241 @@
/*****************************************************************************/
/* */
/* config.c */
/* */
/* Disassembler configuration file handling */
/* */
/* */
/* */
/* (C) 2000 Ullrich von Bassewitz */
/* Wacholderweg 14 */
/* D-70597 Stuttgart */
/* EMail: uz@musoftware.de */
/* */
/* */
/* This software is provided 'as-is', without any expressed or implied */
/* warranty. In no event will the authors be held liable for any damages */
/* arising from the use of this software. */
/* */
/* Permission is granted to anyone to use this software for any purpose, */
/* including commercial applications, and to alter it and redistribute it */
/* freely, subject to the following restrictions: */
/* */
/* 1. The origin of this software must not be misrepresented; you must not */
/* claim that you wrote the original software. If you use this software */
/* in a product, an acknowledgment in the product documentation would be */
/* appreciated but is not required. */
/* 2. Altered source versions must be plainly marked as such, and must not */
/* be misrepresented as being the original software. */
/* 3. This notice may not be removed or altered from any source */
/* distribution. */
/* */
/*****************************************************************************/
#if defined(_MSC_VER)
/* Microsoft compiler */
# include <io.h>
#else
/* Anyone else */
# include <unistd.h>
#endif
/* common */
#include "xmalloc.h"
/* da65 */
#include "global.h"
#include "scanner.h"
#include "config.h"
/*****************************************************************************/
/* Code */
/*****************************************************************************/
static void GlobalSection (void)
/* Parse a global section */
{
static const IdentTok GlobalDefs[] = {
{ "INPUTNAME", CFGTOK_INPUTNAME },
{ "OUTPUTNAME", CFGTOK_OUTPUTNAME },
{ "PAGELENGTH", CFGTOK_PAGELENGTH },
};
/* Skip the token */
CfgNextTok ();
/* Expect the opening curly brace */
CfgConsumeLCurly ();
/* Look for section tokens */
while (CfgTok != CFGTOK_RCURLY) {
/* Convert to special token */
CfgSpecialToken (GlobalDefs, ENTRY_COUNT (GlobalDefs), "Global directive");
/* Look at the token */
switch (CfgTok) {
case CFGTOK_INPUTNAME:
CfgNextTok ();
CfgAssureStr ();
if (InFile) {
CfgError ("Input file name already given");
}
InFile = xstrdup (CfgSVal);
CfgNextTok ();
break;
case CFGTOK_OUTPUTNAME:
CfgNextTok ();
CfgAssureStr ();
if (OutFile) {
CfgError ("Output file name already given");
}
OutFile = xstrdup (CfgSVal);
CfgNextTok ();
break;
case CFGTOK_PAGELENGTH:
CfgNextTok ();
CfgAssureInt ();
if (CfgIVal != -1) {
CfgRangeCheck (MIN_PAGE_LEN, MAX_PAGE_LEN);
}
PageLength = CfgIVal;
CfgNextTok ();
break;
}
/* Directive is followed by a semicolon */
CfgConsumeSemi ();
}
/* Consume the closing brace */
CfgConsumeRCurly ();
}
static void RangeSection (void)
/* Parse a range section */
{
static const IdentTok RangeDefs[] = {
{ "START", CFGTOK_START },
{ "END", CFGTOK_END },
{ "TYPE", CFGTOK_TYPE },
};
/* Skip the token */
CfgNextTok ();
/* Expect the opening curly brace */
CfgConsumeLCurly ();
/* Look for section tokens */
while (CfgTok != CFGTOK_RCURLY) {
}
/* Consume the closing brace */
CfgConsumeRCurly ();
}
static void LabelSection (void)
/* Parse a label section */
{
static const IdentTok Globals[] = {
{ "INPUTNAMEL", CFGTOK_INPUTNAME },
{ "OUTPUTNAME", CFGTOK_OUTPUTNAME },
{ "PAGELENGTH", CFGTOK_PAGELENGTH },
};
/* Skip the token */
CfgNextTok ();
/* Expect the opening curly brace */
CfgConsumeLCurly ();
/* Look for section tokens */
while (CfgTok != CFGTOK_RCURLY) {
}
/* Consume the closing brace */
CfgConsumeRCurly ();
}
static void CfgParse (void)
/* Parse the config file */
{
static const IdentTok Globals[] = {
{ "GLOBAL", CFGTOK_GLOBAL },
{ "RANGE", CFGTOK_RANGE },
{ "LABEL", CFGTOK_LABEL },
};
while (CfgTok != CFGTOK_EOF) {
/* Convert an identifier into a token */
CfgSpecialToken (Globals, ENTRY_COUNT (Globals), "Config directive");
/* Check the token */
switch (CfgTok) {
case CFGTOK_GLOBAL:
GlobalSection ();
break;
case CFGTOK_RANGE:
RangeSection ();
break;
case CFGTOK_LABEL:
LabelSection ();
break;
}
/* Semicolon expected */
CfgConsumeSemi ();
}
}
void CfgRead (void)
/* Read the configuration if a configuration file exists */
{
/* Check if we have a config file given */
if (!CfgAvail() || access (CfgGetName(), 0) != 0) {
/* No name given or file not found */
return;
}
/* Open the config file */
CfgOpenInput ();
/* Parse the config file */
CfgParse ();
/* Close the file */
CfgCloseInput ();
}

56
src/da65/config.h Normal file
View File

@ -0,0 +1,56 @@
/*****************************************************************************/
/* */
/* config.h */
/* */
/* Disassembler configuration file handling */
/* */
/* */
/* */
/* (C) 2000 Ullrich von Bassewitz */
/* Wacholderweg 14 */
/* D-70597 Stuttgart */
/* EMail: uz@musoftware.de */
/* */
/* */
/* This software is provided 'as-is', without any expressed or implied */
/* warranty. In no event will the authors be held liable for any damages */
/* arising from the use of this software. */
/* */
/* Permission is granted to anyone to use this software for any purpose, */
/* including commercial applications, and to alter it and redistribute it */
/* freely, subject to the following restrictions: */
/* */
/* 1. The origin of this software must not be misrepresented; you must not */
/* claim that you wrote the original software. If you use this software */
/* in a product, an acknowledgment in the product documentation would be */
/* appreciated but is not required. */
/* 2. Altered source versions must be plainly marked as such, and must not */
/* be misrepresented as being the original software. */
/* 3. This notice may not be removed or altered from any source */
/* distribution. */
/* */
/*****************************************************************************/
#ifndef CONFIG_H
#define CONFIG_H
/*****************************************************************************/
/* Code */
/*****************************************************************************/
void CfgRead (void);
/* Read the configuration if a configuration file exists */
/* End of config.h */
#endif

7
src/da65/cpu.h
View File

@ -46,9 +46,10 @@
/* Supported CPUs */ /* Supported CPUs */
typedef enum CPUType { typedef enum CPUType {
CPU_6502, CPU_6502 = 0x01,
CPU_65C02, CPU_65C02 = 0x02,
CPU_65816 CPU_65816 = 0x04,
CPU_ALL = 0x07
} CPUType; } CPUType;
/* Current CPU */ /* Current CPU */

6
src/da65/global.c
View File

@ -48,11 +48,11 @@ const char* InFile = 0; /* Name of input file */
const char* OutFile = 0; /* Name of output file */ const char* OutFile = 0; /* Name of output file */
/* Default extensions */ /* Default extensions */
const char ObjExt[] = ".o"; /* Default object extension */ const char OutExt[] = ".dis"; /* Output file extension */
const char ListExt[] = ".lst"; /* Default listing extension */ const char CfgExt[] = ".cfg"; /* Config file extension */
/* Flags and other command line stuff */ /* Flags and other command line stuff */
unsigned char Verbose = 2; /* Verbosity of the output file */ unsigned char Verbosity = 2; /* Verbosity of the output file */
/* Stuff needed by many routines */ /* Stuff needed by many routines */
unsigned Pass = 0; /* Disassembler pass */ unsigned Pass = 0; /* Disassembler pass */

6
src/da65/global.h
View File

@ -49,11 +49,11 @@ extern const char* InFile; /* Name of input file */
extern const char* OutFile; /* Name of output file */ extern const char* OutFile; /* Name of output file */
/* Default extensions */ /* Default extensions */
extern const char ObjExt[]; /* Default object extension */ extern const char OutExt[]; /* Output file extension */
extern const char ListExt[]; /* Default listing extension */ extern const char CfgExt[]; /* Config file extension */
/* Flags and other command line stuff */ /* Flags and other command line stuff */
extern unsigned char Verbose; /* Verbosity of the output file */ extern unsigned char Verbosity; /* Verbosity of the output file */
/* Stuff needed by many routines */ /* Stuff needed by many routines */
extern unsigned Pass; /* Disassembler pass */ extern unsigned Pass; /* Disassembler pass */

55
src/da65/main.c
View File

@ -48,10 +48,12 @@
/* da65 */ /* da65 */
#include "attrtab.h" #include "attrtab.h"
#include "code.h" #include "code.h"
#include "config.h"
#include "cpu.h" #include "cpu.h"
#include "global.h" #include "global.h"
#include "opctable.h" #include "opctable.h"
#include "output.h" #include "output.h"
#include "scanner.h"
@ -151,7 +153,7 @@ static void OptPageLength (const char* Opt, const char* Arg)
static void OptVerbose (const char* Opt, const char* Arg) static void OptVerbose (const char* Opt, const char* Arg)
/* Increase verbosity */ /* Increase verbosity */
{ {
++Verbose; ++Verbosity;
} }
@ -172,9 +174,6 @@ static void OneOpcode (unsigned RemainingBytes)
/* Get the current PC */ /* Get the current PC */
unsigned PC = GetPC (); unsigned PC = GetPC ();
/* Get the attribute for the current address */
unsigned char Style = GetStyle (PC);
/* Get the opcode from the current address */ /* Get the opcode from the current address */
unsigned char OPC = PeekCodeByte (); unsigned char OPC = PeekCodeByte ();
@ -187,20 +186,42 @@ static void OneOpcode (unsigned RemainingBytes)
DefLabel (Label); DefLabel (Label);
} }
/* Check if we have enough bytes remaining for the code at this address. */ /* Check...
* - ...if we have enough bytes remaining for the code at this address.
* - ...if the current instruction is valid for the given CPU.
* - ...if there is no label somewhere between the instruction bytes.
* If any of these conditions is true, switch to data mode.
*/
if (GetStyle (PC) == atDefault) {
if (D->Size > RemainingBytes) { if (D->Size > RemainingBytes) {
OneDataByte (); MarkAddr (PC, atIllegal);
return; } else if ((D->CPU & CPU) != CPU) {
MarkAddr (PC, atIllegal);
} else {
unsigned I;
for (I = 1; I < D->Size; ++I) {
if (HaveLabel (PC+I)) {
MarkAddr (PC, atIllegal);
break;
}
}
}
} }
/* Also check if there are any labels that point into this instruction.
* If so, disassemble one byte as data.
*/
/* ### */
/* Disassemble the line */ /* Disassemble the line */
switch (GetStyle (PC)) {
case atDefault:
case atCode:
GetCodeByte (); GetCodeByte ();
D->Handler (D); D->Handler (D);
break;
default:
OneDataByte ();
break;
}
} }
@ -309,9 +330,17 @@ int main (int argc, char* argv [])
AbEnd ("No input file"); AbEnd ("No input file");
} }
/* Make the config file name from the input file if none was given */
if (!CfgAvail ()) {
CfgSetName (MakeFilename (InFile, CfgExt));
}
/* Try to read the configuration file */
CfgRead ();
/* Make the output file name from the input file name if none was given */ /* Make the output file name from the input file name if none was given */
if (OutFile == 0) { if (OutFile == 0) {
OutFile = MakeFilename (InFile, ".dis"); OutFile = MakeFilename (InFile, OutExt);
} }
/* Load the input file */ /* Load the input file */

4
src/da65/make/gcc.mak
View File

@ -11,13 +11,15 @@ LDFLAGS=
OBJS = attrtab.o \ OBJS = attrtab.o \
code.o \ code.o \
config.o \
cpu.o \ cpu.o \
error.o \ error.o \
global.o \ global.o \
handler.o \ handler.o \
main.o \ main.o \
opctable.o \ opctable.o \
output.o output.o \
scanner.o
LIBS = $(COMMON)/common.a LIBS = $(COMMON)/common.a

514
src/da65/opctable.c
View File

File diff suppressed because it is too large Load Diff

8
src/da65/opctable.h
View File

@ -52,14 +52,6 @@ enum {
lfLabel = lfUseLabel|lfGenLabel /* Generate and use a label */ lfLabel = lfUseLabel|lfGenLabel /* Generate and use a label */
}; };
/* Constants for the CPU type */
enum {
cpu6502 = 0x01,
cpu65C02 = 0x02,
cpu65816 = 0x04,
cpuAll = 0x07,
};
/* Forward/typedef for struct OpcDesc */ /* Forward/typedef for struct OpcDesc */
typedef struct OpcDesc OpcDesc; typedef struct OpcDesc OpcDesc;

5
src/da65/output.c
View File

@ -133,11 +133,13 @@ void DefLabel (const char* Name)
void OneDataByte (void) void OneDataByte (void)
/* Output a .byte line with the current code byte */ /* Output a .byte line with the current code byte */
{ {
unsigned char B = GetCodeByte ();
if (Pass > 1) { if (Pass > 1) {
Indent (MIndent); Indent (MIndent);
Output (".byte"); Output (".byte");
Indent (AIndent); Indent (AIndent);
Output ("$%02X", GetCodeByte()); Output ("$%02X", B);
LineFeed (); LineFeed ();
} }
} }
@ -153,3 +155,4 @@ void SeparatorLine (void)

528
src/da65/scanner.c Normal file
View File

@ -0,0 +1,528 @@
/*****************************************************************************/
/* */
/* scanner.c */
/* */
/* Configuration file scanner for the da65 disassembler */
/* */
/* */
/* */
/* (C) 2000 Ullrich von Bassewitz */
/* Wacholderweg 14 */
/* D-70597 Stuttgart */
/* EMail: uz@musoftware.de */
/* */
/* */
/* This software is provided 'as-is', without any expressed or implied */
/* warranty. In no event will the authors be held liable for any damages */
/* arising from the use of this software. */
/* */
/* Permission is granted to anyone to use this software for any purpose, */
/* including commercial applications, and to alter it and redistribute it */
/* freely, subject to the following restrictions: */
/* */
/* 1. The origin of this software must not be misrepresented; you must not */
/* claim that you wrote the original software. If you use this software */
/* in a product, an acknowledgment in the product documentation would be */
/* appreciated but is not required. */
/* 2. Altered source versions must be plainly marked as such, and must not */
/* be misrepresented as being the original software. */
/* 3. This notice may not be removed or altered from any source */
/* distribution. */
/* */
/*****************************************************************************/
#include <stdarg.h>
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <ctype.h>
/* common */
#include "xsprintf.h"
/* ld65 */
#include "global.h"
#include "error.h"
#include "scanner.h"
/*****************************************************************************/
/* Data */
/*****************************************************************************/
/* Current token and attributes */
unsigned CfgTok;
char CfgSVal [CFG_MAX_IDENT_LEN+1];
unsigned long CfgIVal;
/* Error location */
unsigned CfgErrorLine;
unsigned CfgErrorCol;
/* Input sources for the configuration */
static const char* CfgFile = 0;
static const char* CfgBuf = 0;
/* Other input stuff */
static int C = ' ';
static unsigned InputLine = 1;
static unsigned InputCol = 0;
static FILE* InputFile = 0;
/*****************************************************************************/
/* Error handling */
/*****************************************************************************/
void CfgWarning (const char* Format, ...)
/* Print a warning message adding file name and line number of the config file */
{
char Buf [512];
va_list ap;
va_start (ap, Format);
xvsprintf (Buf, sizeof (Buf), Format, ap);
va_end (ap);
Warning ("%s(%u): %s", CfgFile, CfgErrorLine, Buf);
}
void CfgError (const char* Format, ...)
/* Print an error message adding file name and line number of the config file */
{
char Buf [512];
va_list ap;
va_start (ap, Format);
xvsprintf (Buf, sizeof (Buf), Format, ap);
va_end (ap);
Error ("%s(%u): %s", CfgFile, CfgErrorLine, Buf);
}
/*****************************************************************************/
/* Code */
/*****************************************************************************/
static void NextChar (void)
/* Read the next character from the input file */
{
if (CfgBuf) {
/* Read from buffer */
C = (unsigned char)(*CfgBuf);
if (C == 0) {
C = EOF;
} else {
++CfgBuf;
}
} else {
/* Read from the file */
C = getc (InputFile);
}
/* Count columns */
if (C != EOF) {
++InputCol;
}
/* Count lines */
if (C == '\n') {
++InputLine;
InputCol = 0;
}
}
static unsigned DigitVal (int C)
/* Return the value for a numeric digit */
{
if (isdigit (C)) {
return C - '0';
} else {
return toupper (C) - 'A' + 10;
}
}
void CfgNextTok (void)
/* Read the next token from the input stream */
{
unsigned I;
Again:
/* Skip whitespace */
while (isspace (C)) {
NextChar ();
}
/* Remember the current position */
CfgErrorLine = InputLine;
CfgErrorCol = InputCol;
/* Identifier? */
if (C == '_' || isalpha (C)) {
/* Read the identifier */
I = 0;
while (C == '_' || isalnum (C)) {
if (I < CFG_MAX_IDENT_LEN) {
CfgSVal [I++] = C;
}
NextChar ();
}
CfgSVal [I] = '\0';
CfgTok = CFGTOK_IDENT;
return;
}
/* Hex number? */
if (C == '$') {
NextChar ();
if (!isxdigit (C)) {
CfgError ("Hex digit expected");
}
CfgIVal = 0;
while (isxdigit (C)) {
CfgIVal = CfgIVal * 16 + DigitVal (C);
NextChar ();
}
CfgTok = CFGTOK_INTCON;
return;
}
/* Decimal number? */
if (isdigit (C)) {
CfgIVal = 0;
while (isdigit (C)) {
CfgIVal = CfgIVal * 10 + DigitVal (C);
NextChar ();
}
CfgTok = CFGTOK_INTCON;
return;
}
/* Other characters */
switch (C) {
case '{':
NextChar ();
CfgTok = CFGTOK_LCURLY;
break;
case '}':
NextChar ();
CfgTok = CFGTOK_RCURLY;
break;
case ';':
NextChar ();
CfgTok = CFGTOK_SEMI;
break;
case '.':
NextChar ();
CfgTok = CFGTOK_DOT;
break;
case ',':
NextChar ();
CfgTok = CFGTOK_COMMA;
break;
case '=':
NextChar ();
CfgTok = CFGTOK_EQ;
break;
case ':':
NextChar ();
CfgTok = CFGTOK_COLON;
break;
case '\"':
NextChar ();
I = 0;
while (C != '\"') {
if (C == EOF || C == '\n') {
CfgError ("Unterminated string");
}
if (I < CFG_MAX_IDENT_LEN) {
CfgSVal [I++] = C;
}
NextChar ();
}
NextChar ();
CfgSVal [I] = '\0';
CfgTok = CFGTOK_STRCON;
break;
case '#':
/* Comment */
while (C != '\n' && C != EOF) {
NextChar ();
}
if (C != EOF) {
goto Again;
}
CfgTok = CFGTOK_EOF;
break;
case EOF:
CfgTok = CFGTOK_EOF;
break;
default:
CfgError ("Invalid character `%c'", C);
}
}
void CfgConsume (unsigned T, const char* Msg)
/* Skip a token, print an error message if not found */
{
if (CfgTok != T) {
CfgError (Msg);
}
CfgNextTok ();
}
void CfgConsumeLCurly (void)
/* Consume a left curly brace */
{
CfgConsume (CFGTOK_LCURLY, "`{' expected");
}
void CfgConsumeRCurly (void)
/* Consume a right curly brace */
{
CfgConsume (CFGTOK_RCURLY, "`}' expected");
}
void CfgConsumeSemi (void)
/* Consume a semicolon */
{
CfgConsume (CFGTOK_SEMI, "`;' expected");
}
void CfgConsumeColon (void)
/* Consume a colon */
{
CfgConsume (CFGTOK_COLON, "`:' expected");
}
void CfgOptionalComma (void)
/* Consume a comma if there is one */
{
if (CfgTok == CFGTOK_COMMA) {
CfgNextTok ();
}
}
void CfgOptionalAssign (void)
/* Consume an equal sign if there is one */
{
if (CfgTok == CFGTOK_EQ) {
CfgNextTok ();
}
}
void CfgAssureInt (void)
/* Make sure the next token is an integer */
{
if (CfgTok != CFGTOK_INTCON) {
CfgError ("Integer constant expected");
}
}
void CfgAssureStr (void)
/* Make sure the next token is a string constant */
{
if (CfgTok != CFGTOK_STRCON) {
CfgError ("String constant expected");
}
}
void CfgAssureIdent (void)
/* Make sure the next token is an identifier */
{
if (CfgTok != CFGTOK_IDENT) {
CfgError ("Identifier expected");
}
}
void CfgRangeCheck (unsigned long Lo, unsigned long Hi)
/* Check the range of CfgIVal */
{
if (CfgIVal < Lo || CfgIVal > Hi) {
CfgError ("Range error");
}
}
void CfgSpecialToken (const IdentTok* Table, unsigned Size, const char* Name)
/* Map an identifier to one of the special tokens in the table */
{
unsigned I;
/* We need an identifier */
if (CfgTok == CFGTOK_IDENT) {
/* Make it upper case */
I = 0;
while (CfgSVal [I]) {
CfgSVal [I] = toupper (CfgSVal [I]);
++I;
}
/* Linear search */
for (I = 0; I < Size; ++I) {
if (strcmp (CfgSVal, Table [I].Ident) == 0) {
CfgTok = Table [I].Tok;
return;
}
}
}
/* Not found or no identifier */
CfgError ("%s expected", Name);
}
void CfgBoolToken (void)
/* Map an identifier or integer to a boolean token */
{
static const IdentTok Booleans [] = {
{ "YES", CFGTOK_TRUE },
{ "NO", CFGTOK_FALSE },
{ "TRUE", CFGTOK_TRUE },
{ "FALSE", CFGTOK_FALSE },
};
/* If we have an identifier, map it to a boolean token */
if (CfgTok == CFGTOK_IDENT) {
CfgSpecialToken (Booleans, ENTRY_COUNT (Booleans), "Boolean");
} else {
/* We expected an integer here */
if (CfgTok != CFGTOK_INTCON) {
CfgError ("Boolean value expected");
}
CfgTok = (CfgIVal == 0)? CFGTOK_FALSE : CFGTOK_TRUE;
}
}
void CfgSetName (const char* Name)
/* Set a name for a config file */
{
CfgFile = Name;
}
const char* CfgGetName (void)
/* Get the name of the config file */
{
return CfgFile? CfgFile : "";
}
void CfgSetBuf (const char* Buf)
/* Set a memory buffer for the config */
{
CfgBuf = Buf;
}
int CfgAvail (void)
/* Return true if we have a configuration available */
{
return CfgFile != 0 || CfgBuf != 0;
}
void CfgOpenInput (void)
/* Open the input file if we have one */
{
/* If we have a config name given, open the file, otherwise we will read
* from a buffer.
*/
if (!CfgBuf) {
/* Open the file */
InputFile = fopen (CfgFile, "r");
if (InputFile == 0) {
Error ("Cannot open `%s': %s", CfgFile, strerror (errno));
}
}
/* Initialize variables */
C = ' ';
InputLine = 1;
InputCol = 0;
/* Start the ball rolling ... */
CfgNextTok ();
}
void CfgCloseInput (void)
/* Close the input file if we have one */
{
/* Close the input file if we had one */
if (InputFile) {
(void) fclose (InputFile);
InputFile = 0;
}
}

186
src/da65/scanner.h Normal file
View File

@ -0,0 +1,186 @@
/*****************************************************************************/
/* */
/* scanner.h */
/* */
/* Configuration file scanner for the da65 disassembler */
/* */
/* */
/* */
/* (C) 2000 Ullrich von Bassewitz */
/* Wacholderweg 14 */
/* D-70597 Stuttgart */
/* EMail: uz@musoftware.de */
/* */
/* */
/* This software is provided 'as-is', without any expressed or implied */
/* warranty. In no event will the authors be held liable for any damages */
/* arising from the use of this software. */
/* */
/* Permission is granted to anyone to use this software for any purpose, */
/* including commercial applications, and to alter it and redistribute it */
/* freely, subject to the following restrictions: */
/* */
/* 1. The origin of this software must not be misrepresented; you must not */
/* claim that you wrote the original software. If you use this software */
/* in a product, an acknowledgment in the product documentation would be */
/* appreciated but is not required. */
/* 2. Altered source versions must be plainly marked as such, and must not */
/* be misrepresented as being the original software. */
/* 3. This notice may not be removed or altered from any source */
/* distribution. */
/* */
/*****************************************************************************/
#ifndef SCANNER_H
#define SCANNER_H
/*****************************************************************************/
/* Data */
/*****************************************************************************/
/* Config file tokens */
typedef enum token_t {
CFGTOK_NONE,
CFGTOK_INTCON,
CFGTOK_STRCON,
CFGTOK_IDENT,
CFGTOK_LCURLY,
CFGTOK_RCURLY,
CFGTOK_SEMI,
CFGTOK_COMMA,
CFGTOK_EQ,
CFGTOK_COLON,
CFGTOK_DOT,
CFGTOK_EOF,
/* Special tokens */
CFGTOK_GLOBAL,
CFGTOK_RANGE,
CFGTOK_LABEL,
/* Global section */
CFGTOK_INPUTNAME,
CFGTOK_OUTPUTNAME,
CFGTOK_PAGELENGTH,
/* Range section */
CFGTOK_START,
CFGTOK_END,
CFGTOK_TYPE,
/* Label section */
/* */
CFGTOK_TRUE,
CFGTOK_FALSE
} token_t;
/* Mapping table entry, special identifier --> token */
typedef struct IdentTok_ IdentTok;
struct IdentTok_ {
const char* Ident; /* Identifier */
token_t Tok; /* Token for identifier */
};
#define ENTRY_COUNT(s) (sizeof (s) / sizeof (s [0]))
/* Current token and attributes */
#define CFG_MAX_IDENT_LEN 255
extern unsigned CfgTok;
extern char CfgSVal [CFG_MAX_IDENT_LEN+1];
extern unsigned long CfgIVal;
/* Error location */
extern unsigned CfgErrorLine;
extern unsigned CfgErrorCol;
/*****************************************************************************/
/* Code */
/*****************************************************************************/
void CfgWarning (const char* Format, ...);
/* Print a warning message adding file name and line number of the config file */
void CfgError (const char* Format, ...);
/* Print an error message adding file name and line number of the config file */
void CfgNextTok (void);
/* Read the next token from the input stream */
void CfgConsume (unsigned T, const char* Msg);
/* Skip a token, print an error message if not found */
void CfgConsumeLCurly (void);
/* Consume a left curly brace */
void CfgConsumeRCurly (void);
/* Consume a right curly brace */
void CfgConsumeSemi (void);
/* Consume a semicolon */
void CfgConsumeColon (void);
/* Consume a colon */
void CfgOptionalComma (void);
/* Consume a comma if there is one */
void CfgOptionalAssign (void);
/* Consume an equal sign if there is one */
void CfgAssureInt (void);
/* Make sure the next token is an integer */
void CfgAssureStr (void);
/* Make sure the next token is a string constant */
void CfgAssureIdent (void);
/* Make sure the next token is an identifier */
void CfgRangeCheck (unsigned long Lo, unsigned long Hi);
/* Check the range of CfgIVal */
void CfgSpecialToken (const IdentTok* Table, unsigned Size, const char* Name);
/* Map an identifier to one of the special tokens in the table */
void CfgBoolToken (void);
/* Map an identifier or integer to a boolean token */
void CfgSetName (const char* Name);
/* Set a name for a config file */
const char* CfgGetName (void);
/* Get the name of the config file */
void CfgSetBuf (const char* Buf);
/* Set a memory buffer for the config */
int CfgAvail (void);
/* Return true if we have a configuration available */
void CfgOpenInput (void);
/* Open the input file if we have one */
void CfgCloseInput (void);
/* Close the input file if we have one */
/* End of scanner.h */
#endif