1 files changed, 132 insertions, 0 deletions
diff --git a/rvs/wrapper/plugin-parse.c b/rvs/wrapper/plugin-parse.c
new file mode 100644
index 0000000..4a35586
--- /dev/null
+++ b/rvs/wrapper/plugin-parse.c
@@ -0,0 +1,132 @@
+/* wrapper/plugin-parse.c -- parse rvs plugin config files
+   system depends: <stdio.h> <string.h> <error.h>
+   Copyright (C) 2009 Luke Shumaker
+   
+   This file is part of rvs.
+   
+   rvs 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, or (at your
+   option) any later version.
+   
+   rvs 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 rvs; see the file COPYING.
+   If not, write to the Free Software Foundation,
+   59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+*/
+
+#include <stdio.h>
+#include <string.h>
+#include <error.h> /* only used in `plugin_parse_escape' for `error' */
+
+#include "rvs.h"
+#include "plugins.h"
+
+#include "plugin-parse.h"
+
+void
+plugin_parse_comment (FILE *file)
+{
+	char c;
+	while ( (c=getc(file)) != EOF ) {
+		if ( c == '\n' ) {
+			ungetc (c, file);
+			break;
+		}
+	}
+}
+
+char
+plugin_parse_escape(FILE *file)
+{
+	char c=getc(file);
+	switch (c) {
+		case 'n':
+			c = '\n';
+		case '\\':
+		case '#':
+		case ':':
+			break;
+		default:
+			error(EXIT_FAILURE,0,"syntax error");
+			break;
+	}
+	return c;
+}
+
+#define _parse_share(string) \
+	case '#':\
+		plugin_parse_comment(file);\
+		break;\
+	case '\\':\
+		c[0]=plugin_parse_escape(file);\
+	default:\
+		stradds(&nbytes,string,(char *)&c);\
+		break;
+
+char *
+plugin_parse_depend (FILE *file)
+{
+	size_t nbytes = 10;
+	char *string = (char *)xmalloc(nbytes);
+	string[0]='\0';
+	
+	char c[2] = " \0";
+	while ( (c[0]=getc(file)) != EOF ) {
+		switch (c[0]) {
+			case '\n':
+				ungetc (c[0], file);
+				return string;
+				break;
+			_parse_share(&string)
+		}
+	}
+	return string;
+}
+
+struct plugin_command *
+plugin_parse (struct plugin *plugin, FILE *file)
+{
+	struct plugin_command *command;
+	
+	char c[2] = " \0";
+	c[0]=getc(file);
+	
+	if (c[0]==EOF)
+		command=NULL;
+	else {
+		ungetc (c[0], file);
+		command=plugin_mk_command();
+		command->plugin=plugin;
+		
+		size_t nbytes = 10;
+		command->name = (char *)xmalloc(nbytes);
+		command->name[0]='\0';
+		
+		while ( (c[0]=getc(file)) != EOF ) {
+			switch (c[0]) {
+				case '\n':
+					/*if (strlen(command->name)==0) {*/
+					if (command->name[0]=='\0') {
+						plugin_free_command(command);
+						return plugin_parse(plugin,file);
+					} else
+						command->next=plugin_parse(
+							plugin,file);
+					break;
+				case ':':
+					command->depends=plugin_parse_depend(
+						file);
+					break;
+				_parse_share(&(command->name))
+			}
+		}
+	}
+	return command;
+}
+