Changeset 3455

Timestamp:

08/09/07 15:10:50 (1 year ago)

Author:

tg

Message:

finish the parser (hopefully), add a dumper

Files:

• branches/common-nfo/tools/nfotiser/nfotiser.h (modified) (1 diff)
• branches/common-nfo/tools/nfotiser/parser.c (modified) (3 diffs)

branches/common-nfo/tools/nfotiser/nfotiser.h

@@ -55 +55 @@
-const char *category(const char *);
-/* parser.c */
-
+
+
+
+
-__END_DECLS
-

branches/common-nfo/tools/nfotiser/parser.c

@@ -88 +88 @@
-        struct parser_result *res;
-        struct parser_res *entry;
-
+
+
-        size_t len, n;
-        struct stat sb;
+        char *entry_multi;
+        unsigned entry_iter;
-
-        res = xmalloc(sizeof (struct parser_result));
@@ -120 +123 @@
-        /* get a line and add it to line buffer */
-        if (*buf == '\0')
-
+loop_
-        if (*buf == '\n') {
-                ++buf;
@@ -135 +138 @@
-                            " got trail line!");
-                t = ++buf;
-
-
-
-
-
+
-        }
-        if (cp != NULL)
-                goto process_line;
-        if ((*buf >= 'A' && *buf <= 'Z') ||
- {
+
-                t = buf;
-
-
-
+
+
+
+
+
+
+
- loop_addline:
+        if (cp != NULL) {
+                if (*(tp = cp + strlen(cp) - 2) == '\\')
+                        *tp = '\0';
+        }
+        tp = str_add(cp, t);
+        if (cp != NULL)
+                free(cp);
+        free(t);
+        cp = tp;
+        goto loop_getline;
+ process_line:
+        /* cp points to <line>[<nl><line>…][\]<nl> */
+        /* buf points to first byte of next line */
+        if (*(tp = cp + strlen(cp) - 2) == '\\')
+                errx(1, "syntax error: expected trail line,"
+                    " got lead line!");
+ process_lastline:
+        /* cut off final newline */
+        *++tp = '\0';
+
+        /* parse the meat out of there */
+        if ((tp = strchr(cp, '\t')) == NULL)
+                errx(1, "syntax error: expected keyword +"
+                    " tab + value!");
+        *tp++ = '\0';
+        /* cp points to keyword, tp points to value */
+        entry_multi = NULL;
+        entry_iter = 0;
+        for (kwp = kws; kwp->kwprefix != NULL; ++kwp) {
+                char *np;
+
+                /* exact match? */
+                if (!strcasecmp(cp, kwp->kwprefix))
+                        /* yepp */ break;
+                /* prefix match allowed? */
+                if (kwp->kwtype == KWT_NORMAL)
+                        /* nope */ continue;
+                /* prefix match? */
+                if (strncasecmp(cp, kwp->kwprefix, n = strlen(kwp->kwprefix)))
+                        /* nope */ continue;
+                if (cp[n] != '_')
+                        /* same */ continue;
+                /* okay, we got a prefix match, get args */
+                np = cp + n + 1;
+                if (kwp->kwtype == KWT_ITERATED ||
+                    kwp->kwtype == KWT_MULTITER) {
+                        char *zp = np;
+
+                        if (zp[0] == '0' && (zp[1] == 'x' || zp[1] == 'X'))
+                                zp += 2;
+                        while (*zp >= '0' && *zp <= '9')
+                                ++zp;
+                        if (zp == np)
+                                errx(1, "syntax error: iterator expected");
+                        if (*zp != kwp->kwtype == KWT_ITERATED ? '\0' : '_')
+                                errx(1, "syntax error: %s expected,"
+                                    " got 0x%02X", kwp->kwtype == KWT_ITERATED ?
+                                    "tab" : "underscore", *zp);
+                        *zp++ = '\0';
+                        entry_iter = (unsigned)strtoul(np, NULL, 0);
+                        np = zp;
+                }
+                if (kwp->kwtype == KWT_MULTI ||
+                    kwp->kwtype == KWT_MULTITER)
+                        entry_multi = str_save(np);
+                /* values filled out */
+                break;
+        }
+        if (kwp->kwprefix == NULL)
+                errx(1, "unknown keyword '%s'", cp);
+        entry = xmalloc(sizeof (struct parser_res));
+        bzero(entry, sizeof (struct parser_res));
+        entry->keyword = kwp->kwnum;
+        entry->kw_multi = entry_multi;
+        entry->kw_iter = entry_iter;
+        entry->value = str_save(tp);
+        CIRCLEQ_INSERT_TAIL(res, entry, e);
+        free(cp);
+        goto loop_newline;
+ loop_eof:
+        if (cp != NULL) {
+                if (*(tp = cp + strlen(cp) - 2) == '\\')
+                        errx(1, "syntax error: expected trail line,"
+                            " read end of file!");
+                goto process_lastline;
+        }
+        free(buf_base);
+        return (res);
+}
+
+const struct parser_keywords *
+parser_getkwbynum(parser_kwords num, const struct parser_keywords *kws)
+{
+        const struct parser_keywords *kwp;
+
+        for (kwp = kws; kwp->kwprefix != NULL; ++kwp)
+                if (kwp->kwnum == num)
+                        break;
+
+        return (kwp->kwprefix == NULL ? NULL : kwp);
+}
+
+void
+nfo_parser_dump(struct parser_res *entry, const struct parser_keywords *kws)
+{
+        const struct parser_keywords *kwp;
+
+        printf("keyword %s (type %s)",
+            (kwp = parser_getkwbynum(entry->keyword, kws)) == NULL ?
+            "<unknown>" : kwp->kwprefix,
+            kwp == NULL ? "invalid" :
+            kwp->kwtype == KWT_NORMAL ? "normal" :
+            kwp->kwtype == KWT_MULTI ? "multi" :
+            kwp->kwtype == KWT_ITERATED ? "iterated" :
+            kwp->kwtype == KWT_MULTITER ? "multiter" : "unknown");
+        if (kwp) {
+                if (kwp->kwtype == KWT_ITERATED ||
+                    kwp->kwtype == KWT_MULTITER)
+                        printf(", iterator %u", entry->kw_iter);
+                if (kwp->kwtype == KWT_MULTI ||
+                    kwp->kwtype == KWT_MULTITER)
+                        printf(", multival '%s'", entry->kw_multi);
+        }
+        putchar('\n');
+}