123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142 |
- #include "qe3.h"
- char token[MAXTOKEN];
- qboolean unget;
- char *script_p;
- int scriptline;
- void StartTokenParsing (char *data)
- {
- scriptline = 1;
- script_p = data;
- unget = false;
- }
- qboolean GetToken (qboolean crossline)
- {
- char *token_p;
- if (unget)
- return true;
- skipspace:
- while (*script_p <= 32)
- {
- if (!*script_p)
- {
- if (!crossline)
- Error ("Line %i is incomplete",scriptline);
- return false;
- }
- if (*script_p++ == '\n')
- {
- if (!crossline)
- Error ("Line %i is incomplete",scriptline);
- scriptline++;
- }
- }
- if (script_p[0] == '/' && script_p[1] == '/')
- {
- if (!crossline)
- Error ("Line %i is incomplete\n",scriptline);
- while (*script_p++ != '\n')
- if (!*script_p)
- {
- if (!crossline)
- Error ("Line %i is incomplete",scriptline);
- return false;
- }
- goto skipspace;
- }
- token_p = token;
- if (*script_p == '"')
- {
- script_p++;
- while ( *script_p != '"' )
- {
- if (!*script_p)
- Error ("EOF inside quoted token");
- *token_p++ = *script_p++;
- if (token_p == &token[MAXTOKEN])
- Error ("Token too large on line %i",scriptline);
- }
- script_p++;
- }
- else while ( *script_p > 32 )
- {
- *token_p++ = *script_p++;
- if (token_p == &token[MAXTOKEN])
- Error ("Token too large on line %i",scriptline);
- }
- *token_p = 0;
- return true;
- }
- void UngetToken (void)
- {
- unget = true;
- }
- qboolean TokenAvailable (void)
- {
- char *search_p;
- search_p = script_p;
- while ( *search_p <= 32)
- {
- if (*search_p == '\n')
- return false;
- if (*search_p == 0)
- return false;
- search_p++;
- }
- if (*search_p == ';')
- return false;
- return true;
- }
|