Starmap image generator, preview 1

git-svn-id: svn://svn.code.sf.net/p/sc2/code/trunk@2254 8092fc87-c524-0410-9efc-e669fe64eaf9

tools/map/scriptlib.c

@@ -0,0 +1,253 @@
+/*  Copyright (c) 2005 Michael C. Martin */
+
+/*
+ *  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 thta it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  Se 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 <stdlib.h>
+#include <string.h>
+#include <ctype.h>
+#include "scriptlib.h"
+#include "alist.h"
+#include "stringbank.h"
+
+static alist *map = NULL;
+
+static void
+check_map_init (void)
+{
+	if (map == NULL) {
+		map = Alist_New ();
+	}
+}
+
+void
+scr_ClearTables (void)
+{
+	if (map != NULL) {
+		Alist_Free (map);
+		map = NULL;
+	}
+}
+
+/* Type conversion routines. */
+static const char *
+bool2str (bool b)
+{
+	return b ? "yes" : "no";
+}
+
+static const char *
+int2str (int i) {
+	char buf[20];
+	sprintf (buf, "%d", i);
+	return StringBank_AddOrFindString (buf);
+}
+
+static int
+str2int (const char *s) {
+	return atoi(s);
+}
+
+static float
+str2float (const char *s) {
+	return (float) atof(s);
+}
+
+static bool
+str2bool (const char *s) {
+	if (!stricmp (s, "yes") ||
+	    !stricmp (s, "true") ||
+	    !stricmp (s, "1") )
+		return true;
+	return false;
+}
+
+void
+scr_LoadFile (FILE *s)
+{
+	alist *d;
+	check_map_init ();
+	
+	d = Alist_New_FromFile (s);
+	if (d) {
+		Alist_PutAll (map, d);
+		Alist_Free (d);
+	}
+}
+
+void
+scr_LoadFilename (const char *fname)
+{
+	alist *d;
+	check_map_init ();
+	
+	d = Alist_New_FromFilename (fname);
+	if (d) {
+		Alist_PutAll (map, d);
+		Alist_Free (d);
+	}
+}
+
+void
+scr_SaveFile (FILE *f, const char *root)
+{
+	check_map_init ();
+	Alist_Dump (map, f, root);
+}
+
+void
+scr_SaveFilename (const char *fname, const char *root)
+{
+	FILE *f;
+	
+	check_map_init ();
+	f = fopen (fname, "wt");
+	if (f) {
+		scr_SaveFile (f, root);
+		fclose (f);
+	}
+}
+
+bool
+scr_IsBoolean (const char *key)
+{
+	const char *d;
+	check_map_init ();
+
+	d = scr_GetString (key);
+	if (!d) return 0;
+		
+	return !stricmp (d, "yes") ||
+	       !stricmp (d, "no") ||
+	       !stricmp (d, "true") ||
+	       !stricmp (d, "false") ||
+	       !stricmp (d, "0") ||
+	       !stricmp (d, "1") ||
+	       !stricmp (d, "");
+}
+
+bool
+scr_IsInteger (const char *key)
+{
+	const char *d;
+	check_map_init ();
+
+	d = scr_GetString (key);
+	while (*d) {
+		if (!isdigit (*d))
+			return 0;
+		d++;
+	}
+	return 1;
+}
+
+const char *
+scr_GetString (const char *key)
+{
+	check_map_init ();
+	return Alist_GetString (map, key);
+}
+
+const char *
+scr_GetStringDef (const char *key, const char *def)
+{
+	const char *v;
+	check_map_init ();
+	
+	v = scr_GetString (key);
+	if (!v)
+		v = def;
+	return v;
+}
+
+void
+scr_PutString (const char *key, const char *value)
+{
+	check_map_init ();
+	Alist_PutString (map, key, value);
+}
+
+int
+scr_GetInteger (const char *key)
+{
+	check_map_init ();
+	return str2int (scr_GetString (key));
+}
+
+int
+scr_GetIntegerDef (const char *key, int def)
+{
+	const char *v;
+	check_map_init ();
+	
+	v = scr_GetString (key);
+	return v ? str2int (v) : def;
+}
+
+void
+scr_PutInteger (const char *key, int value)
+{
+	check_map_init ();
+	scr_PutString (key, int2str(value));
+}
+
+float
+scr_GetFloat (const char *key)
+{
+	check_map_init ();
+	return str2float (scr_GetString (key));
+}
+
+float
+scr_GetFloatDef (const char *key, float def)
+{
+	const char *v;
+	check_map_init ();
+	
+	v = scr_GetString (key);
+	return v ? str2float (v) : def;
+}
+
+bool
+scr_GetBoolean (const char *key)
+{
+	check_map_init ();
+	return str2bool (scr_GetString (key));
+}
+
+bool
+scr_GetBooleanDef (const char *key, bool def)
+{
+	const char *v;
+	check_map_init ();
+	
+	v = scr_GetString (key);
+	return v ? str2bool (v) : def;
+}
+
+void
+scr_PutBoolean (const char *key, bool value)
+{
+	check_map_init ();
+	scr_PutString (key, bool2str(value));
+}
+
+bool
+scr_HasKey (const char *key)
+{
+	check_map_init ();
+	return (scr_GetString (key) != NULL);
+}