---

/home/rdbrown/doxygen/cse125g1/src/modules/actor/Token.cpp

// token.cpp

#include "Token.h"
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <ctype.h>


Tokenizer::Tokenizer() {
        File=0;
        LineNum=0;
        strcpy(FileName,"");
}


Tokenizer::~Tokenizer() {
        if(File) {
                printf("ERROR: Tokenizer::~Tokenizer()- Closing file '%s'\n",FileName);
                fclose((FILE*)File);
        }
}


bool Tokenizer::Open(const char *fname) {
        File=(void*)fopen(fname,"r");
        LineNum=1;
        if(File==0) {
                printf("ERROR: crTokenzier::Open()- Can't open file '%s'\n",fname);
                return false;
        }
        strcpy(FileName,fname);
        return true;
}


bool Tokenizer::Close() {
        if(File) fclose((FILE*)File);
        else return false;

        File=0;
        return true;
}


bool Tokenizer::Abort(char *error) {
        printf("ERROR '%s' line %d: %s\n",FileName,LineNum,error);
        Close();
        return false;
}


char Tokenizer::GetChar() {
        char c=char(getc((FILE*)File));
        if(c=='\n') LineNum++;
        return c;
}


char Tokenizer::CheckChar() {
        int c=getc((FILE*)File);
        ungetc(c,(FILE*)File);
        return char(c);
}


int Tokenizer::GetInt() {
        SkipWhitespace();
        int pos=0;
        char temp[256];

        // Get first character ('-' or digit)
        char c=CheckChar();
        if(c=='-') {
                temp[pos++]=GetChar();
                c=CheckChar();
        }
        if(!isdigit(c)) {
                printf("ERROR: Tokenizer::GetInt()- Expecting int on line %d of '%s'\n",LineNum,FileName);
                return 0xFFFFFFFF;
        }
        temp[pos++]=GetChar();

        // Get integer potion
        while(isdigit(c=CheckChar())) temp[pos++]=GetChar();

        // Finish
        temp[pos++]='\0';
        return atoi(temp);
}


// BUG: can't parse ".2", "f", or "F"
// Uses: [-]I[.[I]][(e|E)[+|-]I]
// Should use: [+|-](I|I.|.I|I.I)[(e|E)[+|-]I][f|F]

float Tokenizer::GetFloat() {
        SkipWhitespace();
        int pos=0;
        char temp[256];

        // Get first character ('-' or digit)
        char c=CheckChar();
        if(c=='-') {
                temp[pos++]=GetChar();
                c=CheckChar();
        }
        if(!isdigit(c)) {
                printf("ERROR: Tokenizer::GetFloat()- Expecting float on line %d of '%s' '%c'\n",LineNum,FileName,c);
                return 0xFFFFFFFF;
        }
        temp[pos++]=GetChar();

        // Get integer potion of mantissa
        while(isdigit(c=CheckChar())) temp[pos++]=GetChar();

        // Get fraction component
        if(c=='.') {
                temp[pos++]=GetChar();
                while(isdigit(c=CheckChar())) temp[pos++]=GetChar();
        }

        // Get exponent
        if(c=='e' || c=='E') {
                temp[pos++]=GetChar();
                c=CheckChar();
                if(c=='+' || c=='-') {
                        temp[pos++]=GetChar();
                        c=CheckChar();
                }
                if(!isdigit(c)) {
                        printf("ERROR: Tokenizer::GetFloat()- Poorly formatted float exponent on line %d of '%s'\n",LineNum,FileName);
                        return 0.0f;
                }
                while(isdigit(c=CheckChar())) temp[pos++]=GetChar();
        }

        // Finish
        temp[pos++]='\0';
        return float(atof(temp));
}


bool Tokenizer::GetToken(char *str) {
        SkipWhitespace();

        int pos=0;
        char c=CheckChar();
        while(c!=' ' && c!='\n' && c!='\t' && c!='\r' && c!='(' && c!=')'
                         && !feof((FILE*)File)) {
                str[pos++]=GetChar();
                c=CheckChar();
        }
        str[pos]='\0';
        return true;
}


bool Tokenizer::FindToken(const char *tok) {
        int pos=0;
        while(tok[pos]!='\0') {
                if(feof((FILE*)File)) return false;
                char c=GetChar();
                if(c==tok[pos]) pos++;
                else pos=0;
        }
        return true;
}


bool Tokenizer::SkipWhitespace() {
        char c=CheckChar();
        bool white=false;
        while(isspace(c) || c=='(' || c==')') {
                GetChar();
                c=CheckChar();
                white=true;
        }
        return white;
}


bool Tokenizer::SkipLine() {
        char c=GetChar();
        while(c!='\n') {
                if(feof((FILE*)File)) return false;
                c=GetChar();
        }
        return true;
}


bool Tokenizer::Reset() {
        if(fseek((FILE*)File,0,SEEK_SET)) return false;
        return true;
}

---