Initial import of Parallaction engine

svn-id: r25083

engines/parallaction/parser.cpp

@@ -0,0 +1,151 @@
+/* ScummVM - Scumm Interpreter
+ * Copyright (C) 2006 The ScummVM project
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+ *
+ * $URL$
+ * $Id$
+ *
+ */
+
+#include "parallaction/defs.h"
+#include "parallaction/parser.h"
+
+
+namespace Parallaction {
+
+char			_tokens[20][40];
+static char    *_src = NULL;
+
+
+
+void parseInit(char *s) {
+	_src = s;
+}
+
+char *parseNextLine(char *s, uint16 count) {
+
+	uint16 _si;
+	char v2 = 0;
+	for ( _si = 0; _si<count; _si++) {
+
+		v2 = *_src++;
+		if (v2 == 0xA || v2 == -1) break;
+		if (v2 != -1 && _si < count) s[_si] = v2;
+	}
+
+	if (_si == 0 && v2 == -1)
+		return 0;
+
+	s[_si] = 0xA;
+	s[_si+1] = '\0';
+
+	return s;
+}
+
+//
+//	a comment can appear both at location and Zone levels
+//	comments are displayed into rectangles on the screen
+//
+char *parseComment(ArchivedFile *file) {
+
+	char			_tmp_comment[1000] = "\0";
+	char *v194;
+
+	do {
+		char v190[400];
+		v194 = parseNextLine(v190, 400);
+
+		v194[strlen(v194)-1] = '\0';
+		if (!scumm_stricmp(v194, "endtext")) break;
+
+		strcat(_tmp_comment, v194);
+		strcat(_tmp_comment, " ");
+	} while (true);
+
+	v194 = (char*)memAlloc(strlen(_tmp_comment)+1);
+	strcpy(v194, _tmp_comment);
+	_tmp_comment[0] = '\0';
+
+	return v194;
+}
+
+uint16 parseFillBuffers() {
+
+	char tmp[200];
+
+	uint16 _si;
+	for (_si = 0; _si < 20; _si++) _tokens[_si][0] = '\0';
+
+	char *v4;
+	do {
+		v4 = parseNextLine(tmp, 200);
+		if (v4 == NULL) {
+			puts("non ho letto ");
+			exit(0);
+		}
+		v4 = skip_whitespace(v4);
+	} while (strlen(v4) == 0 || v4[0] == '#');
+
+	_si = 0;
+	while (_si < 20 && strlen(v4) > 0) {
+		v4 = parseNextToken(v4, _tokens[_si], 40, " \t\n");
+		if (_tokens[_si][0] == '"' && _tokens[_si][strlen(_tokens[_si]) - 1] != '"') {
+
+			v4 = parseNextToken(v4, _tokens[_si+1], 40, "\"\"\"");
+			strcat(_tokens[_si], _tokens[_si+1]);
+			_tokens[_si][0] = ' ';
+			v4++;
+
+		}
+
+		v4 = skip_whitespace(v4);
+		_si++;
+	}
+
+	return _si;
+}
+
+//	looks for next token in a string
+//
+//	scans 's' until one of the stop-chars in 'brk' is found
+//	builds a token and return the part of the string which hasn't been parsed
+
+char *parseNextToken(char *s, char *tok, uint16 count, const char *brk) {
+
+	while (*s != '\0') {
+
+		if (brk[0] == *s) break;
+		if (brk[1] == *s) break;
+		if (brk[2] == *s) break;
+
+		*tok++ = *s++;
+	}
+
+	*tok = '\0';
+	return s;
+}
+
+
+char *skip_whitespace(char *s) {
+
+	while (*s == 0x20 || *s == 0xA || *s == 0x9) s++;
+
+	return s;
+}
+
+
+
+} // namespace Parallaction