version 1.5, 2019/03/28 12:21:10 |
version 1.8, 2019/04/02 13:11:09 |
|
|
*/ |
*/ |
#include <assert.h> |
#include <assert.h> |
#include <ctype.h> |
#include <ctype.h> |
|
#include <stdarg.h> |
#include <stdio.h> |
#include <stdio.h> |
#include <stdlib.h> |
#include <stdlib.h> |
#include <string.h> |
#include <string.h> |
Line 72 static const struct element elements[] = { |
|
Line 73 static const struct element elements[] = { |
|
{ "colspec", NODE_COLSPEC }, |
{ "colspec", NODE_COLSPEC }, |
{ "command", NODE_COMMAND }, |
{ "command", NODE_COMMAND }, |
{ "constant", NODE_CONSTANT }, |
{ "constant", NODE_CONSTANT }, |
|
{ "contrib", NODE_CONTRIB }, |
{ "copyright", NODE_COPYRIGHT }, |
{ "copyright", NODE_COPYRIGHT }, |
{ "date", NODE_DATE }, |
{ "date", NODE_DATE }, |
{ "editor", NODE_EDITOR }, |
{ "editor", NODE_EDITOR }, |
Line 81 static const struct element elements[] = { |
|
Line 83 static const struct element elements[] = { |
|
{ "envar", NODE_ENVAR }, |
{ "envar", NODE_ENVAR }, |
{ "fieldsynopsis", NODE_FIELDSYNOPSIS }, |
{ "fieldsynopsis", NODE_FIELDSYNOPSIS }, |
{ "filename", NODE_FILENAME }, |
{ "filename", NODE_FILENAME }, |
{ "firstname", NODE_IGNORE }, |
{ "firstname", NODE_PERSONNAME }, |
{ "firstterm", NODE_FIRSTTERM }, |
{ "firstterm", NODE_FIRSTTERM }, |
{ "footnote", NODE_FOOTNOTE }, |
{ "footnote", NODE_FOOTNOTE }, |
{ "funcdef", NODE_FUNCDEF }, |
{ "funcdef", NODE_FUNCDEF }, |
Line 121 static const struct element elements[] = { |
|
Line 123 static const struct element elements[] = { |
|
{ "option", NODE_OPTION }, |
{ "option", NODE_OPTION }, |
{ "orderedlist", NODE_ORDEREDLIST }, |
{ "orderedlist", NODE_ORDEREDLIST }, |
{ "orgname", NODE_ORGNAME }, |
{ "orgname", NODE_ORGNAME }, |
{ "othername", NODE_IGNORE }, |
{ "othername", NODE_PERSONNAME }, |
{ "para", NODE_PARA }, |
{ "para", NODE_PARA }, |
{ "paramdef", NODE_PARAMDEF }, |
{ "paramdef", NODE_PARAMDEF }, |
{ "parameter", NODE_PARAMETER }, |
{ "parameter", NODE_PARAMETER }, |
Line 163 static const struct element elements[] = { |
|
Line 165 static const struct element elements[] = { |
|
{ "spanspec", NODE_SPANSPEC }, |
{ "spanspec", NODE_SPANSPEC }, |
{ "structname", NODE_STRUCTNAME }, |
{ "structname", NODE_STRUCTNAME }, |
{ "subtitle", NODE_SUBTITLE }, |
{ "subtitle", NODE_SUBTITLE }, |
{ "surname", NODE_IGNORE }, |
{ "surname", NODE_PERSONNAME }, |
{ "synopsis", NODE_SYNOPSIS }, |
{ "synopsis", NODE_SYNOPSIS }, |
{ "table", NODE_TABLE }, |
{ "table", NODE_TABLE }, |
{ "tbody", NODE_TBODY }, |
{ "tbody", NODE_TBODY }, |
Line 187 static const struct element elements[] = { |
|
Line 189 static const struct element elements[] = { |
|
{ NULL, NODE_IGNORE } |
{ NULL, NODE_IGNORE } |
}; |
}; |
|
|
|
static void |
|
error_msg(struct parse *p, const char *fmt, ...) |
|
{ |
|
va_list ap; |
|
|
|
fprintf(stderr, "%s:%d:%d: ", p->fname, p->line, p->col); |
|
va_start(ap, fmt); |
|
vfprintf(stderr, fmt, ap); |
|
va_end(ap); |
|
fputc('\n', stderr); |
|
p->tree->flags |= TREE_FAIL; |
|
} |
|
|
|
static void |
|
warn_msg(struct parse *p, const char *fmt, ...) |
|
{ |
|
va_list ap; |
|
|
|
if (p->warn == 0) |
|
return; |
|
|
|
fprintf(stderr, "%s:%d:%d: warning: ", p->fname, p->line, p->col); |
|
va_start(ap, fmt); |
|
vfprintf(stderr, fmt, ap); |
|
va_end(ap); |
|
fputc('\n', stderr); |
|
} |
|
|
/* |
/* |
* Process a string of characters. |
* Process a string of characters. |
* If a text node is already open, append to it. |
* If a text node is already open, append to it. |
Line 201 xml_char(struct parse *ps, const char *p, int sz) |
|
Line 231 xml_char(struct parse *ps, const char *p, int sz) |
|
return; |
return; |
|
|
if (ps->cur == NULL) { |
if (ps->cur == NULL) { |
fprintf(stderr, "%s:%d:%d: discarding text before docum" |
error_msg(ps, "discarding text before document: %.*s", sz, p); |
"ent: %.*s\n", ps->fname, ps->line, ps->col, sz, p); |
|
ps->tree->flags |= TREE_FAIL; |
|
return; |
return; |
} |
} |
|
|
Line 221 xml_char(struct parse *ps, const char *p, int sz) |
|
Line 249 xml_char(struct parse *ps, const char *p, int sz) |
|
} |
} |
|
|
if (ps->tree->flags & TREE_CLOSED && |
if (ps->tree->flags & TREE_CLOSED && |
ps->cur->parent == ps->tree->root && ps->warn) |
ps->cur->parent == ps->tree->root) |
fprintf(stderr, "%s:%d:%d: warning: " |
warn_msg(ps, "text after end of document: %.*s", sz, p); |
"text after end of document: %.*s\n", |
|
ps->fname, ps->line, ps->col, sz, p); |
|
|
|
/* Append to the current text node. */ |
/* Append to the current text node. */ |
|
|
Line 280 xml_elem_start(struct parse *ps, const char *name) |
|
Line 306 xml_elem_start(struct parse *ps, const char *name) |
|
if (strcmp(elem->name, name) == 0) |
if (strcmp(elem->name, name) == 0) |
break; |
break; |
|
|
if (elem->name == NULL) { |
if (elem->name == NULL) |
fprintf(stderr, "%s:%d:%d: unknown element <%s>\n", |
error_msg(ps, "unknown element <%s>", name); |
ps->fname, ps->line, ps->col, name); |
|
ps->tree->flags |= TREE_FAIL; |
|
} |
|
ps->ncur = elem->node; |
ps->ncur = elem->node; |
|
|
switch (ps->ncur) { |
switch (ps->ncur) { |
case NODE_DELETE_WARN: |
case NODE_DELETE_WARN: |
if (ps->warn) |
warn_msg(ps, "skipping element <%s>", name); |
fprintf(stderr, "%s:%d:%d: warning: " |
|
"skipping element <%s>\n", |
|
ps->fname, ps->line, ps->col, name); |
|
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case NODE_DELETE: |
case NODE_DELETE: |
ps->del = 1; |
ps->del = 1; |
Line 306 xml_elem_start(struct parse *ps, const char *name) |
|
Line 327 xml_elem_start(struct parse *ps, const char *name) |
|
break; |
break; |
} |
} |
|
|
if (ps->tree->flags & TREE_CLOSED && |
if (ps->tree->flags & TREE_CLOSED && ps->cur->parent == NULL) |
ps->cur->parent == NULL && ps->warn) |
warn_msg(ps, "element after end of document: <%s>", name); |
fprintf(stderr, "%s:%d:%d: warning: " |
|
"element after end of document: %s\n", |
|
ps->fname, ps->line, ps->col, name); |
|
|
|
if ((dat = calloc(1, sizeof(*dat))) == NULL) { |
if ((dat = calloc(1, sizeof(*dat))) == NULL) { |
perror(NULL); |
perror(NULL); |
Line 338 xml_attrkey(struct parse *ps, const char *name) |
|
Line 356 xml_attrkey(struct parse *ps, const char *name) |
|
if (ps->del > 0 || *name == '\0') |
if (ps->del > 0 || *name == '\0') |
return; |
return; |
if ((key = attrkey_parse(name)) == ATTRKEY__MAX) { |
if ((key = attrkey_parse(name)) == ATTRKEY__MAX) { |
if (ps->warn) |
|
fprintf(stderr, "%s:%d:%d: warning: " |
|
"unknown attribute \"%s\"\n", |
|
ps->fname, ps->line, ps->col, name); |
|
ps->attr = 0; |
ps->attr = 0; |
return; |
return; |
} |
} |
Line 415 xml_elem_end(struct parse *ps, const char *name) |
|
Line 429 xml_elem_end(struct parse *ps, const char *name) |
|
break; |
break; |
default: |
default: |
if (ps->cur == NULL || node != ps->cur->node) { |
if (ps->cur == NULL || node != ps->cur->node) { |
if (ps->warn) |
warn_msg(ps, "element not open: </%s>", name); |
fprintf(stderr, "%s:%d:%d: warning: " |
|
"element not open: </%s>\n", |
|
ps->fname, ps->line, ps->col, name); |
|
break; |
break; |
} |
} |
|
|
|
|
parse_file(struct parse *p, int fd, const char *fname) |
parse_file(struct parse *p, int fd, const char *fname) |
{ |
{ |
char b[4096]; |
char b[4096]; |
|
char *cp; |
ssize_t rsz; /* Return value from read(2). */ |
ssize_t rsz; /* Return value from read(2). */ |
size_t rlen; /* Number of bytes in b[]. */ |
size_t rlen; /* Number of bytes in b[]. */ |
size_t poff; /* Parse offset in b[]. */ |
size_t poff; /* Parse offset in b[]. */ |
Line 636 parse_file(struct parse *p, int fd, const char *fname) |
|
Line 648 parse_file(struct parse *p, int fd, const char *fname) |
|
if (advance(p, b, rlen, &pend, " >") && |
if (advance(p, b, rlen, &pend, " >") && |
rsz > 0) |
rsz > 0) |
break; |
break; |
|
if (pend > poff + 3 && |
|
strncmp(b + poff, "<!--", 4) == 0) { |
|
|
|
/* Skip a comment. */ |
|
|
|
cp = strstr(b + pend - 2, "-->"); |
|
if (cp == NULL) { |
|
if (rsz > 0) { |
|
pend = rlen; |
|
break; |
|
} |
|
cp = b + rlen; |
|
} else |
|
cp += 3; |
|
while (b + pend < cp) { |
|
if (b[++pend] == '\n') { |
|
p->nline++; |
|
p->ncol = 1; |
|
} else |
|
p->ncol++; |
|
} |
|
continue; |
|
} |
elem_end = 0; |
elem_end = 0; |
if (b[pend] != '>') |
if (b[pend] != '>') |
in_tag = 1; |
in_tag = 1; |
Line 677 parse_file(struct parse *p, int fd, const char *fname) |
|
Line 712 parse_file(struct parse *p, int fd, const char *fname) |
|
pnode_trim(p->cur); |
pnode_trim(p->cur); |
p->cur = p->cur->parent; |
p->cur = p->cur->parent; |
} |
} |
if ((p->tree->flags & TREE_CLOSED) == 0 && p->warn) |
if ((p->tree->flags & TREE_CLOSED) == 0) |
fprintf(stderr, "%s:%d:%d: warning: document not closed\n", |
warn_msg(p, "document not closed"); |
p->fname, p->line, p->col); |
|
return p->tree; |
return p->tree; |
} |
} |