--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/tool/readspec.c	Wed Jun 03 07:40:00 2015 +0000
@@ -0,0 +1,126 @@
+/*
+ * This module contains the code that reads and parses the patch
+ * description or specification ASCII text file.
+ */
+
+#include <sys/types.h>
+#include <ctype.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <strings.h>
+#include "patchinfo.h"
+#include "globals.h"
+
+static int lineno;
+static struct patch_module_desc **module_add_ptr = &patch_module_list;
+static struct patch_desc **patch_add_ptr;
+
+static void
+set_module(name)
+	char *name;
+{
+	int len;
+	char *buf;
+	struct patch_module_desc *newmod;
+
+	len = sizeof(struct patch_module_desc) + strlen(name) + 1;
+	buf = malloc(len);
+	if (!buf) {
+		perror("malloc");
+		exit(1);
+	}
+	newmod = (struct patch_module_desc *) buf;
+	newmod->member_name = buf + sizeof(struct patch_module_desc);
+	strcpy(newmod->member_name, name);
+	newmod->patches = 0;
+	newmod->next = 0;
+	*module_add_ptr = newmod;
+	module_add_ptr = &newmod->next;
+	patch_add_ptr = &newmod->patches;
+}
+
+static void
+add_patch(argline)
+	char *argline;
+{
+	char *cp, *args[3];
+	int i, len;
+	char *buf;
+	struct patch_desc *rec;
+
+	for (cp = argline, i = 0; i < 3; i++) {
+		while (isspace(*cp))
+			cp++;
+		if (!*cp) {
+			fprintf(stderr, "%s line %d: too few fields\n",
+				patch_desc_filename, lineno);
+			exit(1);
+		}
+		args[i] = cp;
+		while (*cp && !isspace(*cp))
+			cp++;
+		if (*cp)
+			*cp++ = '\0';
+	}
+	while (isspace(*cp))
+		cp++;
+	if (*cp) {
+		fprintf(stderr, "%s line %d: too many fields\n",
+			patch_desc_filename, lineno);
+		exit(1);
+	}
+	if (!patch_add_ptr) {
+		fprintf(stderr,
+			"error: patch given before module (%s line %d)\n",
+			patch_desc_filename, lineno);
+		exit(1);
+	}
+	len = sizeof(struct patch_desc) + strlen(args[0]) + 1;
+	buf = malloc(len);
+	if (!buf) {
+		perror("malloc");
+		exit(1);
+	}
+	rec = (struct patch_desc *) buf;
+	rec->section = buf + sizeof(struct patch_desc);
+	strcpy(rec->section, args[0]);
+	rec->offset = strtoul(args[1], 0, 16);
+	rec->new_byte = strtoul(args[2], 0, 16);
+	rec->next = 0;
+	*patch_add_ptr = rec;
+	patch_add_ptr = &rec->next;
+}
+
+read_spec_file()
+{
+	FILE *f;
+	char linebuf[128], *cp, *np;
+
+	f = fopen(patch_desc_filename, "r");
+	if (!f) {
+		perror(patch_desc_filename);
+		exit(1);
+	}
+	for (lineno = 1; fgets(linebuf, sizeof linebuf, f); lineno++) {
+		for (cp = linebuf; isspace(*cp); cp++)
+			;
+		if (!*cp || *cp == '#')
+			continue;
+		if (*cp == '[') {
+			np = ++cp;
+			cp = index(cp, ']');
+			if (!cp) {
+				fprintf(stderr,
+					"%s line %d: unmatched bracket\n",
+					patch_desc_filename, lineno);
+				exit(1);
+			}
+			*cp = '\0';
+			set_module(np);
+		} else
+			add_patch(cp);
+	}
+	fclose(f);
+	return(0);
+}