new command line/config file parser

git-svn-id: svn://svn.mplayerhq.hu/mplayer/trunk@148 b3059339-0415-0410-9bf9-f77b7e298cf2

1 files changed, 365 insertions, 0 deletions

diff --git a/cfgparser.c b/cfgparser.c
new file mode 100644
index 0000000000..0577322304
--- /dev/null
+++ b/cfgparser.c
@@ -0,0 +1,365 @@
+/*
+ * command line and config file parser
+ */
+
+//#define DEBUG
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <ctype.h>
+#include <unistd.h>
+#include <fcntl.h>
+#include <string.h>
+
+#define ERR_NOT_AN_OPTION	-1
+#define ERR_MISSING_PARAM	-2
+#define ERR_OUT_OF_RANGE	-3
+
+#define COMMAND_LINE		0
+#define CONFIG_FILE		1
+
+#ifdef DEBUG
+#include <assert.h>
+#endif
+
+#include "cfgparser.h"
+#include "version.h"
+#include "help_mp.h"
+
+static struct config *config;
+static int nr_options;		/* number of options in 'conf' */
+static int parser_mode;		/* COMMAND_LINE or CONFIG_FILE */
+
+static int init_conf(struct config *conf, int mode)
+{
+#ifdef DEBUG
+	assert(conf != NULL);
+#endif
+
+	/* calculate the number of options in 'conf' */
+	for (nr_options = 0; conf[nr_options].name != NULL; nr_options++)
+		/* NOTHING */;
+
+	config = conf;
+#ifdef DEBUG
+	if (mode != COMMAND_LINE && mode != CONFIG_FILE) {
+		printf("init_conf: wrong flag!\n");
+		return -1;
+	}
+#endif
+	parser_mode = mode;
+	return 1;
+}
+
+static int read_option(char *opt, char *param)
+{
+	int i;
+	int need_param = -1;
+	int tmp_int;
+	float tmp_float;
+
+	for (i = 0; i < nr_options; i++) {
+		if (!strcasecmp(opt, config[i].name))
+			break;
+	}
+	if (i == nr_options)
+		return ERR_NOT_AN_OPTION;
+
+	switch (config[i].type) {
+		case CONF_TYPE_FLAG:
+			/* flags need a parameter in config file */
+			if (parser_mode == CONFIG_FILE) {
+				if (!strcasecmp(param, "yes") ||	/* any other language? */
+				    !strcasecmp(param, "ja") ||
+				    !strcasecmp(param, "igen") ||
+				    !strcasecmp(param, "y") ||
+				    !strcasecmp(param, "i") ||
+				    !strcmp(param, "1"))
+					*((int *) config[i].p) = config[i].max;
+				if (!strcasecmp(param, "no") ||
+				    !strcasecmp(param, "nein") ||
+				    !strcasecmp(param, "nicht") ||
+				    !strcasecmp(param, "nem") ||
+				    !strcasecmp(param, "n") ||
+				    !strcmp(param, "0"))
+					*((int *) config[i].p) = config[i].min;
+				need_param = 1;
+			} else {	/* parser_mode == COMMAND_LINE */
+				*((int *) config[i].p) = config[i].max;
+				need_param = 0;
+			}
+			break;
+		case CONF_TYPE_INT:
+			if (param == NULL)
+				return ERR_MISSING_PARAM;
+			if (!isdigit(*param))
+				return ERR_MISSING_PARAM;
+
+			tmp_int = atoi(param);
+
+			if (config[i].flags & CONF_CHK_MIN)
+				if (tmp_int < config[i].min)
+					return ERR_OUT_OF_RANGE;
+
+			if (config[i].flags & CONF_CHK_MAX)
+				if (tmp_int > config[i].max)
+					return ERR_OUT_OF_RANGE;
+
+			*((int *) config[i].p) = tmp_int;
+			need_param = 1;
+			break;
+		case CONF_TYPE_FLOAT:
+			if (param == NULL)
+				return ERR_MISSING_PARAM;
+			if (!isdigit(*param))
+				return ERR_MISSING_PARAM;
+
+			tmp_float = atof(param);
+
+			if (config[i].flags & CONF_CHK_MIN)
+				if (tmp_float < config[i].min)
+					return ERR_OUT_OF_RANGE;
+
+			if (config[i].flags & CONF_CHK_MAX)
+				if (tmp_float > config[i].max)
+					return ERR_OUT_OF_RANGE;
+
+			*((float *) config[i].p) = tmp_float;
+			need_param = 1;
+			break;
+		case CONF_TYPE_STRING:
+			if (param == NULL)
+				return ERR_MISSING_PARAM;
+
+			if (config[i].flags & CONF_CHK_MIN)
+				if (strlen(param) < config[i].min)
+					return ERR_OUT_OF_RANGE;
+
+			if (config[i].flags & CONF_CHK_MAX)
+				if (strlen(param) > config[i].max)
+					return ERR_OUT_OF_RANGE;
+
+			*((char **) config[i].p) = strdup(param);
+			need_param = 1;
+			break;
+		default:
+			printf("picsaba\n");
+			break;
+	}
+	return need_param;
+}
+
+int parse_config_file(struct config *conf, char *conffile)
+{
+#define PRINT_LINENUM	printf("%s(%d): ", conffile, line_num)
+#define MAX_LINE_LEN	1000
+#define MAX_OPT_LEN	100
+#define MAX_PARAM_LEN	100
+	FILE *fp;
+	char *line;
+	char opt[MAX_OPT_LEN];
+	char param[MAX_PARAM_LEN];
+	int tmp;
+	int line_num = 0;
+	int line_pos;	/* line pos */
+	int opt_pos;	/* opt pos */
+	int param_pos;	/* param pos */
+	int ret = 1;
+
+#ifdef DEBUG
+	assert(conffile != NULL);
+#endif
+	printf("Reading config file: %s\n", conffile);
+
+	if (init_conf(conf, CONFIG_FILE) == -1)
+		return -1;
+
+	if ((line = (char *) malloc(MAX_LINE_LEN)) == NULL) {
+		perror("parse_config_file: can't get memory for 'line'");
+		return -1;
+	}
+
+	if ((fp = fopen(conffile, "r")) == NULL) {
+		perror("parse_config_file: can't open filename");
+		free(line);
+		return 0;
+	}
+
+	while (fgets(line, MAX_LINE_LEN, fp)) {
+		line_num++;
+		line_pos = 0;
+
+		/* skip whitespaces */
+		while (isspace(line[line_pos]))
+			++line_pos;
+
+		/* EOL / comment */
+		if (line[line_pos] == '\0' || line[line_pos] == '#')
+			continue;
+
+		/* read option. accept char if isalnum(char) */
+		for (opt_pos = 0; isalnum(line[line_pos]); /* NOTHING */) {
+			opt[opt_pos++] = line[line_pos++];
+			if (opt_pos >= MAX_OPT_LEN) {
+				PRINT_LINENUM;
+				printf("too long option\n");
+				ret = -1;
+				continue;
+			}
+		}
+		if (opt_pos == 0) {
+			PRINT_LINENUM;
+			printf("parse error\n");
+			ret = -1;
+			continue;
+		}
+		opt[opt_pos] = '\0';
+#ifdef DEBUG
+		PRINT_LINENUM;
+		printf("option: %s\n", opt);
+#endif
+
+		/* skip whitespaces */
+		while (isspace(line[line_pos]))
+			++line_pos;
+
+		/* check '=' */
+		if (line[line_pos++] != '=') {
+			PRINT_LINENUM;
+			printf("option without parameter\n");
+			ret = -1;
+			continue;
+		}
+
+		/* whitespaces... */
+		while (isspace(line[line_pos]))
+			++line_pos;
+
+		/* read the parameter */
+		for (param_pos = 0; isalnum(line[line_pos]); /* NOTHING */) {
+			param[param_pos++] = line[line_pos++];
+			if (param_pos >= MAX_PARAM_LEN) {
+				PRINT_LINENUM;
+				printf("too long parameter\n");
+				ret = -1;
+				continue;
+			}
+		}
+		param[param_pos] = '\0';
+
+		/* did we read a parameter? */
+		if (param_pos == 0) {
+			PRINT_LINENUM;
+			printf("option without parameter\n");
+			ret = -1;
+			continue;
+		}
+#ifdef DEBUG
+		PRINT_LINENUM;
+		printf("parameter: %s\n", param);
+#endif
+		/* now, check if we have some more chars on the line */
+		/* whitespace... */
+		while (isspace(line[line_pos]))
+			++line_pos;
+
+		/* EOL / comment */
+		if (line[line_pos] != '\0' && line[line_pos] != '#') {
+			PRINT_LINENUM;
+			printf("extra characters on line: %s\n", line+line_pos);
+			ret = -1;
+		}
+
+		tmp = read_option(opt, param);
+		switch (tmp) {
+		case ERR_NOT_AN_OPTION:
+			PRINT_LINENUM;
+			printf("invalid option: %s\n", opt);
+			ret = -1;
+			continue;
+			/* break; */
+		case ERR_MISSING_PARAM:
+			PRINT_LINENUM;
+			printf("missing parameter: %s\n", opt);
+			ret = -1;
+			continue;
+			/* break; */
+		case ERR_OUT_OF_RANGE:
+			PRINT_LINENUM;
+			printf("parameter of %s out of range\n", opt);
+			ret = -1;
+			continue;
+			/* break; */
+		}	
+	}
+
+	free(line);
+	fclose(fp);
+	return ret;
+}
+
+int parse_command_line(struct config *conf, int argc, char **argv, char **envp, char **filename)
+{
+	int i;
+	int found_filename = 0;
+	int tmp;
+	char *opt;
+
+#ifdef DEBUG
+	assert(argv != NULL);
+	assert(envp != NULL);
+	assert(argc >= 1);
+#endif
+
+	if (init_conf(conf, COMMAND_LINE) == -1)
+		return -1;
+
+	for (i = 1; i < argc; i++) {
+		opt = argv[i];
+		if (*opt != '-')
+			goto not_an_option;
+
+		/* remove trailing '-' */
+		opt++;
+
+		/* check for --help, -h, and --version */
+		if (!strcasecmp(opt, "-help") || !strcasecmp(opt, "h")) {
+			printf("%s%s", banner_text, help_text);
+			continue;
+		}
+		if (!strcasecmp(opt, "-version")) {
+			printf("%s", banner_text);
+			continue;
+		}
+
+		tmp = read_option(opt, argv[i + 1]);
+
+		switch (tmp) {
+		case ERR_NOT_AN_OPTION:
+not_an_option:
+			/* opt is not an option -> treat it as a filename */
+			if (found_filename) {
+				/* we already have a filename */
+				printf("parse_command_line: invalid option: %s\n", argv[i]);
+				return -1;
+			} else {
+				found_filename = 1;
+				*filename = argv[i];
+				printf("parse_command_line: found filename: %s\n", *filename);
+				continue;	/* next option */
+			}
+			break;
+		case ERR_MISSING_PARAM:
+			printf("parse_command_line: missing parameter: %s\n", argv[i]);
+			return -1;
+			/* break; */
+		case ERR_OUT_OF_RANGE:
+			printf("parse_command_line: parameter of '%s' is out of range\n", argv[i]);
+			return -1;
+			/* break; */
+		}
+
+		i += tmp;	/* we already processed the params (if there was any) */
+	}
+	return found_filename;
+}