version 1.177, 2011/01/03 11:27:33 |
version 1.186, 2011/03/22 14:05:45 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2008, 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2010 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2010 Ingo Schwarze <schwarze@openbsd.org> |
* |
* |
* Permission to use, copy, modify, and distribute this software for any |
* Permission to use, copy, modify, and distribute this software for any |
Line 98 static int node_append(struct mdoc *, |
|
Line 98 static int node_append(struct mdoc *, |
|
struct mdoc_node *); |
struct mdoc_node *); |
static int mdoc_ptext(struct mdoc *, int, char *, int); |
static int mdoc_ptext(struct mdoc *, int, char *, int); |
static int mdoc_pmacro(struct mdoc *, int, char *, int); |
static int mdoc_pmacro(struct mdoc *, int, char *, int); |
static int mdoc_span_alloc(struct mdoc *, |
|
const struct tbl_span *); |
|
|
|
|
|
const struct mdoc_node * |
const struct mdoc_node * |
mdoc_node(const struct mdoc *m) |
mdoc_node(const struct mdoc *m) |
{ |
{ |
Line 141 mdoc_free1(struct mdoc *mdoc) |
|
Line 138 mdoc_free1(struct mdoc *mdoc) |
|
free(mdoc->meta.vol); |
free(mdoc->meta.vol); |
if (mdoc->meta.msec) |
if (mdoc->meta.msec) |
free(mdoc->meta.msec); |
free(mdoc->meta.msec); |
|
if (mdoc->meta.date) |
|
free(mdoc->meta.date); |
} |
} |
|
|
|
|
Line 193 mdoc_free(struct mdoc *mdoc) |
|
Line 192 mdoc_free(struct mdoc *mdoc) |
|
* Allocate volatile and non-volatile parse resources. |
* Allocate volatile and non-volatile parse resources. |
*/ |
*/ |
struct mdoc * |
struct mdoc * |
mdoc_alloc(struct regset *regs, void *data, mandocmsg msg) |
mdoc_alloc(struct regset *regs, struct mparse *parse) |
{ |
{ |
struct mdoc *p; |
struct mdoc *p; |
|
|
p = mandoc_calloc(1, sizeof(struct mdoc)); |
p = mandoc_calloc(1, sizeof(struct mdoc)); |
|
|
p->msg = msg; |
p->parse = parse; |
p->data = data; |
|
p->regs = regs; |
p->regs = regs; |
|
|
mdoc_hash_init(); |
mdoc_hash_init(); |
Line 225 mdoc_endparse(struct mdoc *m) |
|
Line 223 mdoc_endparse(struct mdoc *m) |
|
} |
} |
|
|
int |
int |
|
mdoc_addeqn(struct mdoc *m, const struct eqn *ep) |
|
{ |
|
struct mdoc_node *n; |
|
|
|
assert( ! (MDOC_HALT & m->flags)); |
|
|
|
/* No text before an initial macro. */ |
|
|
|
if (SEC_NONE == m->lastnamed) { |
|
mdoc_pmsg(m, ep->line, ep->pos, MANDOCERR_NOTEXT); |
|
return(1); |
|
} |
|
|
|
n = node_alloc(m, ep->line, ep->pos, MDOC_MAX, MDOC_EQN); |
|
n->eqn = ep; |
|
|
|
if ( ! node_append(m, n)) |
|
return(0); |
|
|
|
m->next = MDOC_NEXT_SIBLING; |
|
return(1); |
|
} |
|
|
|
int |
mdoc_addspan(struct mdoc *m, const struct tbl_span *sp) |
mdoc_addspan(struct mdoc *m, const struct tbl_span *sp) |
{ |
{ |
|
struct mdoc_node *n; |
|
|
assert( ! (MDOC_HALT & m->flags)); |
assert( ! (MDOC_HALT & m->flags)); |
|
|
/* No text before an initial macro. */ |
/* No text before an initial macro. */ |
|
|
if (SEC_NONE == m->lastnamed) { |
if (SEC_NONE == m->lastnamed) { |
/* FIXME: grab from span. */ |
mdoc_pmsg(m, sp->line, 0, MANDOCERR_NOTEXT); |
mdoc_pmsg(m, 0, 0, MANDOCERR_NOTEXT); |
|
return(1); |
return(1); |
} |
} |
|
|
return(mdoc_span_alloc(m, sp)); |
n = node_alloc(m, sp->line, 0, MDOC_MAX, MDOC_TBL); |
|
n->span = sp; |
|
|
|
if ( ! node_append(m, n)) |
|
return(0); |
|
|
|
m->next = MDOC_NEXT_SIBLING; |
|
return(1); |
} |
} |
|
|
|
|
Line 272 mdoc_parseln(struct mdoc *m, int ln, char *buf, int of |
|
Line 301 mdoc_parseln(struct mdoc *m, int ln, char *buf, int of |
|
mdoc_ptext(m, ln, buf, offs)); |
mdoc_ptext(m, ln, buf, offs)); |
} |
} |
|
|
|
|
int |
int |
mdoc_vmsg(struct mdoc *mdoc, enum mandocerr t, |
|
int ln, int pos, const char *fmt, ...) |
|
{ |
|
char buf[256]; |
|
va_list ap; |
|
|
|
va_start(ap, fmt); |
|
vsnprintf(buf, sizeof(buf) - 1, fmt, ap); |
|
va_end(ap); |
|
|
|
return((*mdoc->msg)(t, mdoc->data, ln, pos, buf)); |
|
} |
|
|
|
|
|
int |
|
mdoc_macro(MACRO_PROT_ARGS) |
mdoc_macro(MACRO_PROT_ARGS) |
{ |
{ |
assert(tok < MDOC_MAX); |
assert(tok < MDOC_MAX); |
Line 314 mdoc_macro(MACRO_PROT_ARGS) |
|
Line 327 mdoc_macro(MACRO_PROT_ARGS) |
|
m->meta.vol = mandoc_strdup("LOCAL"); |
m->meta.vol = mandoc_strdup("LOCAL"); |
if (NULL == m->meta.os) |
if (NULL == m->meta.os) |
m->meta.os = mandoc_strdup("LOCAL"); |
m->meta.os = mandoc_strdup("LOCAL"); |
if (0 == m->meta.date) |
if (NULL == m->meta.date) |
m->meta.date = time(NULL); |
m->meta.date = mandoc_normdate |
|
(m->parse, NULL, line, ppos); |
m->flags |= MDOC_PBODY; |
m->flags |= MDOC_PBODY; |
} |
} |
|
|
Line 546 mdoc_elem_alloc(struct mdoc *m, int line, int pos, |
|
Line 560 mdoc_elem_alloc(struct mdoc *m, int line, int pos, |
|
return(1); |
return(1); |
} |
} |
|
|
static int |
|
mdoc_span_alloc(struct mdoc *m, const struct tbl_span *sp) |
|
{ |
|
struct mdoc_node *n; |
|
|
|
/* FIXME: grab from tbl_span. */ |
|
n = node_alloc(m, 0, 0, MDOC_MAX, MDOC_TBL); |
|
n->span = sp; |
|
|
|
if ( ! node_append(m, n)) |
|
return(0); |
|
|
|
m->next = MDOC_NEXT_SIBLING; |
|
return(1); |
|
} |
|
|
|
|
|
int |
int |
mdoc_word_alloc(struct mdoc *m, int line, int pos, const char *p) |
mdoc_word_alloc(struct mdoc *m, int line, int pos, const char *p) |
{ |
{ |
Line 835 mdoc_pmacro(struct mdoc *m, int ln, char *buf, int off |
|
Line 832 mdoc_pmacro(struct mdoc *m, int ln, char *buf, int off |
|
|
|
tok = (j > 1 || j < 4) ? mdoc_hash_find(mac) : MDOC_MAX; |
tok = (j > 1 || j < 4) ? mdoc_hash_find(mac) : MDOC_MAX; |
if (MDOC_MAX == tok) { |
if (MDOC_MAX == tok) { |
mdoc_vmsg(m, MANDOCERR_MACRO, ln, sv, "%s", buf + sv - 1); |
mandoc_vmsg(MANDOCERR_MACRO, m->parse, |
|
ln, sv, "%s", buf + sv - 1); |
return(1); |
return(1); |
} |
} |
|
|
Line 913 err: /* Error out. */ |
|
Line 911 err: /* Error out. */ |
|
return(0); |
return(0); |
} |
} |
|
|
|
enum mdelim |
|
mdoc_isdelim(const char *p) |
|
{ |
|
|
|
if ('\0' == p[0]) |
|
return(DELIM_NONE); |
|
|
|
if ('\0' == p[1]) |
|
switch (p[0]) { |
|
case('('): |
|
/* FALLTHROUGH */ |
|
case('['): |
|
return(DELIM_OPEN); |
|
case('|'): |
|
return(DELIM_MIDDLE); |
|
case('.'): |
|
/* FALLTHROUGH */ |
|
case(','): |
|
/* FALLTHROUGH */ |
|
case(';'): |
|
/* FALLTHROUGH */ |
|
case(':'): |
|
/* FALLTHROUGH */ |
|
case('?'): |
|
/* FALLTHROUGH */ |
|
case('!'): |
|
/* FALLTHROUGH */ |
|
case(')'): |
|
/* FALLTHROUGH */ |
|
case(']'): |
|
return(DELIM_CLOSE); |
|
default: |
|
return(DELIM_NONE); |
|
} |
|
|
|
if ('\\' != p[0]) |
|
return(DELIM_NONE); |
|
|
|
if (0 == strcmp(p + 1, ".")) |
|
return(DELIM_CLOSE); |
|
if (0 == strcmp(p + 1, "*(Ba")) |
|
return(DELIM_MIDDLE); |
|
|
|
return(DELIM_NONE); |
|
} |