X-Git-Url: http://git.mutantstargoat.com/user/nuclear/?a=blobdiff_plain;f=src%2F3dengfx%2Fsrc%2Fdsys%2Fscript.c;fp=src%2F3dengfx%2Fsrc%2Fdsys%2Fscript.c;h=c40daca6c15d2207bc7db429a098518c0e6ad1ff;hb=6e23259dbabaeb1711a2a5ca25b9cb421f693759;hp=0000000000000000000000000000000000000000;hpb=fe068fa879814784c45e0cb2e65dac489e8f5594;p=summerhack

diff --git a/src/3dengfx/src/dsys/script.c b/src/3dengfx/src/dsys/script.c
new file mode 100644
index 0000000..c40daca
--- /dev/null
+++ b/src/3dengfx/src/dsys/script.c
@@ -0,0 +1,190 @@
+/*
+This file is part of the 3dengfx demo system.
+
+Copyright (c) 2004, 2005 John Tsiombikas <nuclear@siggraph.org>
+
+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 demo 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+*/
+
+
+#include "3dengfx_config.h"
+
+#include <stdlib.h>
+#include <string.h>
+#include <limits.h>
+#include <ctype.h>
+#include <assert.h>
+#include "script.h"
+
+#define NEED_COMMAND_STRINGS
+#include "cmd.h"
+
+#define BUF_LEN		1024
+
+static char *cmd_symb[] = {COMMANDS, 0};
+
+DemoScript *open_script(const char *fname) {
+	DemoScript *script = malloc(sizeof(DemoScript));
+	
+	if(!(script->file = fopen(fname, "r"))) {
+		free(script);
+		return 0;
+	}		
+	script->fname = malloc(strlen(fname)+1);
+	strcpy(script->fname, fname);
+
+	script->line_buffer = malloc(BUF_LEN);
+	script->line_buffer[0] = 0;
+
+	script->line = 0;
+
+	return script;
+}
+
+void close_script(DemoScript *ds) {
+	fclose(ds->file);
+	free(ds->fname);
+	free(ds);
+}
+
+
+static char *skip_spaces(char *ptr) {
+	while(*ptr && *ptr != '\n' && isspace(*ptr)) ptr++;
+	return ptr;
+}
+
+int get_next_command(DemoScript *ds, DemoCommand *cmd, unsigned long time) {
+	char *ptr;
+	char *cmd_tok;
+	int i;
+	
+	/* get next line if one is available */
+	if(ds->line_buffer[0] == 0) {
+		if(!fgets(ds->line_buffer, BUF_LEN, ds->file)) {
+			return EOF;
+		}
+		ds->line++;
+	}
+
+	ptr = skip_spaces(ds->line_buffer);
+
+	/* skip comments and empty lines */
+	if(*ptr == '#' || *ptr == '\n') {
+		ds->line_buffer[0] = 0;
+		return get_next_command(ds, cmd, time);
+	}
+
+	/* retrieve command time */
+	cmd->time = atoi(ptr);
+	
+	/* skip timestamp and following whitespace */
+	while(*ptr && *ptr != '\n' && (isdigit(*ptr) || isspace(*ptr) || (isdigit(*(ptr-1)) && *ptr == 's'))) {
+		if(*ptr == 's') cmd->time *= 1000;
+		ptr++;
+	}
+	if(!*ptr || *ptr == '\n') {
+		fprintf(stderr, "Skipping invalid line %ld: %s\n", ds->line, ds->line_buffer);
+		ds->line_buffer[0] = 0;
+		return get_next_command(ds, cmd, time);
+	}
+	
+	if(cmd->time > time) {
+		return 1;	/* time is in the future */
+	}
+
+	/* seperate command name substring (cmd_tok), ptr keeps the rest */
+	cmd_tok = ptr;
+	while(*ptr && !isspace(*ptr)) ptr++;
+	*ptr++ = 0;
+
+	/* make the command name upper-case */
+	for(i=0; cmd_tok[i]; i++) {
+		cmd_tok[i] = toupper(cmd_tok[i]);
+	}
+
+	/* match the command string with the available commands */
+	cmd->type = (CommandType)UINT_MAX;
+	for(i=0; cmd_symb[i]; i++) {
+		if(!strcmp(cmd_tok, cmd_symb[i])) {
+			cmd->type = i;
+			break;
+		}
+	}
+	
+	if(cmd->type == (CommandType)UINT_MAX) {
+		fprintf(stderr, "Skipping invalid line %ld: Unrecognized command %s\n", ds->line, cmd_tok);
+		ds->line_buffer[0] = 0;
+		return get_next_command(ds, cmd, time);
+	}
+
+	/* tokenize the rest of the arguments and put them into argv */
+	cmd_tok = ptr = skip_spaces(ptr);
+	cmd->argc = *ptr ? 1 : 0;
+
+	while(*ptr && *ptr != '\n') {
+		if(isspace(*ptr)) {
+			ptr = skip_spaces(ptr);
+			if(*ptr && *ptr != '\n') cmd->argc++;
+		} else {
+			ptr++;
+		}
+	}
+	
+	cmd->argv = malloc((cmd->argc + 1) * sizeof(char*));
+	for(i=0; i<cmd->argc; i++) {
+		ptr = strtok(i ? 0 : cmd_tok, " \t\n");
+		assert(ptr);
+
+		cmd->argv[i] = malloc(strlen(ptr) + 1);
+		strcpy((char*)cmd->argv[i], ptr);
+	}
+	cmd->argv[i] = 0;
+	
+	/*
+	if(!*ptr || *ptr == '\n') {
+		cmd->args = 0;
+	} else {
+		unsigned int len = strlen(ptr);
+		cmd->args = malloc(len + 1);
+		strcpy(cmd->args, ptr);
+		if(cmd->args[len - 1] == '\n') {
+			cmd->args[len - 1] = 0;
+		}
+	}
+	*/
+	ds->line_buffer[0] = 0;
+	
+	return 0;
+}
+
+void free_command(DemoCommand *cmd) {
+	int i;
+	for(i=0; i<cmd->argc; i++) {
+		free((void*)cmd->argv[i]);
+	}
+	free(cmd->argv);
+}
+
+long str_to_time(const char *str) {
+	long time;
+	
+	if(!isdigit(*str)) return -1;
+
+	time = atol(str);
+
+	while(isdigit(*str)) str++;
+	
+	return *str == 's' ? time * 1000 : time;
+}