1 files changed, 183 insertions, 0 deletions
diff --git a/plugins/ddb_input_uade2/uade-2.13/src/frontends/common/support.c b/plugins/ddb_input_uade2/uade-2.13/src/frontends/common/support.c
new file mode 100644
index 00000000..852d4c0e
--- /dev/null
+++ b/plugins/ddb_input_uade2/uade-2.13/src/frontends/common/support.c
@@ -0,0 +1,183 @@
+#include <stdlib.h>
+#include <stdio.h>
+#include <assert.h>
+#include <string.h>
+#include <ctype.h>
+
+#include "support.h"
+#include "ossupport.h"
+
+/* Zero terminate the current word. Returns -1 is *s == 0 or the next word
+   does not exist. Otherwise returns offset to the beginning of next word. */
+int skip_and_terminate_word(char *s, int i)
+{
+	i = skipnws(s, i);
+	if (i < 0)
+		return -1;
+
+	/* Zero terminate word */
+	s[i] = 0;
+
+	i = skipws(s, i + 1);
+	if (i < 0)
+		return -1;
+
+	return i;
+}
+
+char *xbasename(const char *s)
+{
+  char *t = strrchr(s, (int) '/');
+  if (t == NULL) {
+	  t = (char *) s;
+  } else {
+	  t++;
+  }
+  return t;
+}
+
+/*
+ * Split a string into 2 whitespace separated fields returned in "key" and
+ * "value". If more than 2 fields are found, they are cut off by zero
+ * terminating "key" and "value" inside the string. If "value" is not found,
+ * *value is set to NULL. If "key" is not found, *key is set to NULL.
+ * If something is found, both *key and *value become pointers inside the
+ * string s.
+ *
+ * Return values:
+ *  - 0 if neither "key" nor "value" is found
+ *  - 1 if only "key" is found
+ *  - 2 if both "key" and "value" are found
+ */
+int get_two_ws_separated_fields(char **key, char **value, char *s)
+{
+	int i;
+
+	*key = NULL;
+	*value = NULL;
+
+	i = skipws(s, 0);   /* Skip initial whitespace */
+
+	if (i < 0)
+		return 0;   /* We got nothing */
+
+	*key = s + i;
+
+	i = skip_and_terminate_word(s, i);
+
+	if (i < 0)
+		return 1;   /* We got a "key", but not a "value" */
+
+	*value = s + i;
+
+	skip_and_terminate_word(s, i);
+
+	return 2;           /* We got both a "key" and a "value" */
+}
+
+/*
+ * Skip whitespace characters in string starting from offset i. Returns offset
+ * j >= i as the next non-whitespace character offset, or -1 if non-whitespace
+ * are not found.
+ */
+int skipws(const char *s, int i)
+{
+	while (isspace(s[i]))
+		i++;
+
+	if (s[i] == 0)
+		return -1;
+
+	return i;
+}
+
+/*
+ * Skip non-whitespace characters in string starting from offset i. Returns
+ * offset j >= i as the next whitespace character offset, or -1 if no
+ * whitespace if found.
+ */
+int skipnws(const char *s, int i)
+{
+	while (!isspace(s[i]) && s[i] != 0)
+		i++;
+
+	if (s[i] == 0)
+		return -1;
+
+	return i;
+}
+
+
+/* Split line with respect to white space. */
+char **read_and_split_lines(size_t *nitems, size_t *lineno, FILE *f,
+			    const char *delim)
+{
+	char line[UADE_LINESIZE], templine[UADE_LINESIZE];
+	char **items = NULL;
+	size_t pos;
+	char *sp, *s;
+
+	*nitems = 0;
+
+	while (xfgets(line, sizeof line, f) != NULL) {
+
+		if (lineno != NULL)
+			(*lineno)++;
+
+		/* Skip, if a comment line */
+		if (line[0] == '#')
+			continue;
+
+		/* strsep() modifies line that it touches, so we make a copy
+		   of it, and then count the number of items on the line */
+		strlcpy(templine, line, sizeof(templine));
+		sp = templine;
+		while ((s = strsep(&sp, delim)) != NULL) {
+			if (*s == 0)
+				continue;
+			(*nitems)++;
+		}
+
+		if (*nitems > 0)
+			break;
+	}
+
+	if (*nitems == 0)
+		return NULL;
+
+	if ((items = malloc(sizeof(items[0]) * (*nitems + 1))) == NULL)
+		uadeerror("No memory for nws items.\n");
+
+	sp = line;
+	pos = 0;
+	while ((s = strsep(&sp, delim)) != NULL) {
+		if (*s == 0)
+			continue;
+
+		if ((items[pos] = strdup(s)) == NULL)
+			uadeerror("No memory for an nws item.\n");
+
+		pos++;
+	}
+	items[pos] = NULL;
+	assert(pos == *nitems);
+
+	return items;
+}
+
+
+char *xfgets(char *s, int size, FILE *stream)
+{
+	char *ret;
+
+	while (1) {
+		ret = fgets(s, size, stream);
+		if (ret != NULL)
+			break;
+
+		if (feof(stream))
+			break;
+	}
+
+	return ret;
+}