botc: comparison scriptreader.cxx

-:c349dca807f9
+:e4bbd540663b
 #include "string.h"
 #include "str.h"
 #include "common.h"
 #include "scriptreader.h"
+// ============================================================================
 ScriptReader::ScriptReader (str path) {
 	token = "";
 	prevtoken = "";
 	prevpos = 0;
 	fc = -1;
 	OpenFile (path);
 	commentmode = 0;
 }
+// ============================================================================
 ScriptReader::~ScriptReader () {
 	// If comment mode is 2 by the time the file ended, the
 	// comment was left unterminated. 1 is no problem, since
 	// it's terminated by newlines anyway.
 	if (commentmode == 2)
 			CloseFile (u);
 		}
 	}
 }
+// ============================================================================
 // Opens a file and pushes its pointer to stack
 void ScriptReader::OpenFile (str path) {
 	if (fc+1 >= MAX_FILESTACK)
 		ParserError ("supposed to open file `%s` but file stack is full! do you have recursive `#include` directives?",
 			path.chars());
 	curchar[fc] = 1;
 	pos[fc] = 0;
 	atnewline = 0;
 }
+// ============================================================================
+// Closes the current file
 void ScriptReader::CloseFile (unsigned int u) {
 	if (u >= MAX_FILESTACK)
 		u = fc;
 	if (!fp[u])
 		return;
 	fclose (fp[u]);
 	if (fc != -1)
 		fseek (fp[fc], savedpos[fc], SEEK_SET);
 }
+// ============================================================================
 char ScriptReader::ReadChar () {
 	if (feof (fp[fc]))
 		return 0;
 	char* c = (char*)malloc (sizeof (char));
 	curchar[fc]++;
 	return c[0];
 }
+// ============================================================================
+// Peeks the next character
 char ScriptReader::PeekChar (int offset) {
 	// Store current position
 	long curpos = ftell (fp[fc]);
 	// Forward by offset
 	fseek (fp[fc], curpos, SEEK_SET);
 	return c[0];
 }
+// ============================================================================
 // Read a token from the file buffer. Returns true if token was found, false if not.
 bool ScriptReader::Next (bool peek) {
 	prevpos = ftell (fp[fc]);
 	str tmp = "";
 	prevtoken = token;
 	token = tmp;
 	return true;
 }
-void ScriptReader::Prev () {
+// ============================================================================
-	if (!prevpos)
-		error ("ScriptReader::Prev: cannot go back twice!\n");
-	fseek (fp[fc], prevpos, SEEK_SET);
-	prevpos = 0;
-	token = prevtoken;
-}
 // Returns the next token without advancing the cursor.
 str ScriptReader::PeekNext (int offset) {
 	// Store current information
 	str storedtoken = token;
 	int cpos = ftell (fp[fc]);
 	pos[fc]--;
 	token = storedtoken;
 	return tmp;
 }
+// ============================================================================
 void ScriptReader::Seek (unsigned int n, int origin) {
 	switch (origin) {
 	case SEEK_SET:
 		fseek (fp[fc], 0, SEEK_SET);
 		pos[fc] = 0;
 	for (unsigned int i = 0; i < n+1; i++)
 		Next();
 }
+// ============================================================================
 void ScriptReader::MustNext (const char* c) {
 	if (!Next()) {
 		if (strlen (c))
 			ParserError ("expected `%s`, reached end of file instead\n", c);
 		else
 	if (strlen (c))
 		MustThis (c);
 }
+// ============================================================================
 void ScriptReader::MustThis (const char* c) {
 	if (token.compare (c) != 0)
 		ParserError ("expected `%s`, got `%s` instead", c, token.chars());
 }
+// ============================================================================
 void ScriptReader::ParserError (const char* message, ...) {
 	PERFORM_FORMAT (message, outmessage);
 	ParserMessage ("\nError: ", outmessage);
 	exit (1);
 }
+// ============================================================================
 void ScriptReader::ParserWarning (const char* message, ...) {
 	PERFORM_FORMAT (message, outmessage);
 	ParserMessage ("Warning: ", outmessage);
 }
+// ============================================================================
 void ScriptReader::ParserMessage (const char* header, char* message) {
 	if (fc >= 0 && fc < MAX_FILESTACK)
 		fprintf (stderr, "%sIn file %s, at line %u, col %u: %s\n",
 			header, filepath[fc], curline[fc], curchar[fc], message);
 	else
 		fprintf (stderr, "%s%s\n", header, message);
 }
+// ============================================================================
 // if gotquote == 1, the current token already holds the quotation mark.
 void ScriptReader::MustString (bool gotquote) {
 	if (gotquote)
 		MustThis ("\"");
 	else
 	}
 	token = string;
 }
+// ============================================================================
 void ScriptReader::MustNumber (bool fromthis) {
 	str num;
 	if (!fromthis)
 		MustNext ();
 	num += token;
 	if (!token.compare ("-")) {
 		MustNext ();
 		num += token;
 	}
-	// Result must be a number.
+	// "true" and "false" are valid numbers
-	if (!num.isnumber())
+	if (!token.icompare ("true"))
-		ParserError ("expected a number, got `%s`", num.chars());
+		token = "1";
+	else if (!token.icompare ("false"))
-	// Save the number into the token.
+		token = "0";
-	token = num;
+	else {
-}
+		if (!num.isnumber())
+			ParserError ("expected a number, got `%s`", num.chars());
-void ScriptReader::MustBool () {
+		token = num;
-	MustNext();
+	}
-	if (!token.compare ("0") || !token.compare ("1") ||
+}
-	    !token.compare ("true") || !token.compare ("false") ||
-	    !token.compare ("yes") || !token.compare ("no")) {
-			return;
-	}
-	ParserError ("expected a boolean value, got `%s`", token.chars());
-}
-bool ScriptReader::BoolValue () {
-	return (!token.compare ("1") || !token.compare ("true") || !token.compare ("yes"));
-}
-void ScriptReader::MustValue (int type) {
-	switch (type) {
-	case RETURNVAL_INT: MustNumber (); break;
-	case RETURNVAL_STRING: MustString (); break;
-	case RETURNVAL_BOOLEAN: MustBool (); break;
-	}
-}

Mercurial > botc / file comparison

comparison: scriptreader.cxx

scriptreader.cxx