# HG changeset patch
# User John Tsiombikas <nuclear@member.fsf.org>
# Date 1450504809 -7200
# Node ID 8bf96e11ed1f4486fc8125d7db8579704da17e0c
# Parent  6e980fddbf3b962145d377cc9ce131dabc5175b6
curves file format parsing (untested)

diff -r 6e980fddbf3b -r 8bf96e11ed1f src/curvefile.cc
--- a/src/curvefile.cc	Fri Dec 18 07:07:19 2015 +0200
+++ b/src/curvefile.cc	Sat Dec 19 08:00:09 2015 +0200
@@ -1,4 +1,6 @@
 #include <stdlib.h>
+#include <ctype.h>
+#include <string>
 #include "curvefile.h"
 
 static bool save_curve(FILE *fp, const Curve *curve);
@@ -15,7 +17,7 @@
 
 bool save_curves(FILE *fp, const Curve * const *curves, int count)
 {
-	fprintf(stderr, "GCURVES\ncount %d\n", count);
+	fprintf(stderr, "GCURVES\n");
 
 	for(int i=0; i<count; i++) {
 		if(!save_curve(fp, curves[i])) {
@@ -53,7 +55,7 @@
 
 Curve **load_curves(const char *fname, int *countret)
 {
-	FILE *fp = fopen(fname, "rb");
+	FILE *fp = fopen(fname, "r");
 	if(!fp) return false;
 
 	Curve **res = load_curves(fp, countret);
@@ -61,8 +63,137 @@
 	return res;
 }
 
+static std::string next_token(FILE *fp)
+{
+	std::string s;
+	int c;
+	while((c = fgetc(fp)) != -1 && isspace(c));	// skip whitespace
+	if(feof(fp)) return s;
+	while((c = fgetc(fp)) != -1 && !isspace(c)) {
+		s.push_back(c);
+	}
+	return s;
+}
+
+static bool expect_str(FILE *fp, const char *s)
+{
+	std::string tok = next_token(fp);
+	if(tok != std::string(s)) {
+		if(!(tok.empty() && feof(fp))) {
+			fprintf(stderr, "expected: %s\n", s);
+		}
+		return false;
+	}
+	return true;
+}
+
+static bool expect_float(FILE *fp, float *ret)
+{
+	std::string tok = next_token(fp);
+	const char *cs = tok.c_str();
+	char *endp;
+	*ret = strtod(cs, &endp);
+	if(endp != cs + tok.length()) {
+		if(!(tok.empty() && feof(fp))) {
+			fprintf(stderr, "number expected\n");
+		}
+		return false;
+	}
+	return true;
+}
+
+static bool expect_int(FILE *fp, int *ret)
+{
+	std::string tok = next_token(fp);
+	const char *cs = tok.c_str();
+	char *endp;
+	*ret = strtol(cs, &endp, 0);
+	if(endp != cs + tok.length()) {
+		if(!(tok.empty() && feof(fp))) {
+			fprintf(stderr, "integer expected\n");
+		}
+		return false;
+	}
+	return true;
+}
+
+static Curve *curve_block(FILE *fp)
+{
+	if(!expect_str(fp, "curve") || !expect_str(fp, "{")) {
+		return 0;
+	}
+
+	Curve *curve = new Curve;
+	int cpcount = -1;
+	std::string tok;
+	while(!(tok = next_token(fp)).empty() && tok != "}") {
+		if(tok == "cpcount") {
+			if(cpcount != -1 || !expect_int(fp, &cpcount) || cpcount <= 0) {
+				goto err;
+			}
+		} else if(tok == "type") {
+			tok = next_token(fp);
+			if(tok == "polyline") {
+				curve->set_type(CURVE_LINEAR);
+			} else if(tok == "hermite") {
+				curve->set_type(CURVE_HERMITE);
+			} else if(tok == "bspline") {
+				curve->set_type(CURVE_BSPLINE);
+			} else {
+				goto err;
+			}
+		} else {
+			if(!expect_str(fp, "cp")) {
+				goto err;
+			}
+			Vector3 cp;
+			for(int i=0; i<3; i++) {
+				if(!expect_float(fp, &cp[i])) {
+					goto err;
+				}
+			}
+			curve->add_point(Vector2(cp.x, cp.y), cp.z);
+		}
+	}
+
+	if(curve->size() != cpcount) {
+		fprintf(stderr, "warning: curve cpcount was %d, but read %d control points\n", cpcount, curve->size());
+	}
+
+	return curve;
+err:
+	fprintf(stderr, "failed to parse curve block\n");
+	delete curve;
+	return 0;
+}
+
 Curve **load_curves(FILE *fp, int *countret)
 {
-	return 0;	// TODO
+	if(!expect_str(fp, "GCURVES")) {
+		fprintf(stderr, "load_curves: failed to load, invalid file format\n");
+		return 0;
+	}
+
+	std::vector<Curve*> curves;
+	Curve *curve;
+
+	while((curve = curve_block(fp))) {
+		curves.push_back(curve);
+	}
+
+	int ncurves = (int)curves.size();
+	if(!feof(fp)) {
+		for(int i=0; i<ncurves; i++) {
+			delete curves[i];
+		}
+		return 0;
+	}
+
+	Curve **carr = new Curve*[ncurves];
+	for(int i=0; i<ncurves; i++) {
+		carr[i] = curves[i];
+	}
+	*countret = ncurves;
+	return carr;
 }