version 1.153, 2015/04/18 16:06:40 |
version 1.160, 2015/04/19 14:25:41 |
|
|
#include "roff.h" |
#include "roff.h" |
#include "man.h" |
#include "man.h" |
#include "libmandoc.h" |
#include "libmandoc.h" |
|
#include "roff_int.h" |
#include "libman.h" |
#include "libman.h" |
|
|
const char *const __man_macronames[MAN_MAX] = { |
const char *const __man_macronames[MAN_MAX] = { |
Line 49 const char *const __man_macronames[MAN_MAX] = { |
|
Line 50 const char *const __man_macronames[MAN_MAX] = { |
|
|
|
const char * const *man_macronames = __man_macronames; |
const char * const *man_macronames = __man_macronames; |
|
|
static void man_alloc1(struct roff_man *); |
|
static void man_breakscope(struct roff_man *, int); |
|
static void man_descope(struct roff_man *, int, int); |
static void man_descope(struct roff_man *, int, int); |
static void man_free1(struct roff_man *); |
|
static struct roff_node *man_node_alloc(struct roff_man *, int, int, |
|
enum roff_type, int); |
|
static void man_node_append(struct roff_man *, |
|
struct roff_node *); |
|
static void man_node_free(struct roff_node *); |
|
static void man_node_unlink(struct roff_man *, |
|
struct roff_node *); |
|
static int man_ptext(struct roff_man *, int, char *, int); |
static int man_ptext(struct roff_man *, int, char *, int); |
static int man_pmacro(struct roff_man *, int, char *, int); |
static int man_pmacro(struct roff_man *, int, char *, int); |
|
|
|
|
const struct roff_node * |
|
man_node(const struct roff_man *man) |
|
{ |
|
|
|
return(man->first); |
|
} |
|
|
|
const struct roff_meta * |
|
man_meta(const struct roff_man *man) |
|
{ |
|
|
|
return(&man->meta); |
|
} |
|
|
|
void |
void |
man_reset(struct roff_man *man) |
|
{ |
|
|
|
man_free1(man); |
|
man_alloc1(man); |
|
} |
|
|
|
void |
|
man_free(struct roff_man *man) |
|
{ |
|
|
|
man_free1(man); |
|
free(man); |
|
} |
|
|
|
struct roff_man * |
|
man_alloc(struct roff *roff, struct mparse *parse, |
|
const char *defos, int quick) |
|
{ |
|
struct roff_man *p; |
|
|
|
p = mandoc_calloc(1, sizeof(*p)); |
|
|
|
man_hash_init(); |
|
p->parse = parse; |
|
p->defos = defos; |
|
p->quick = quick; |
|
p->roff = roff; |
|
|
|
man_alloc1(p); |
|
return(p); |
|
} |
|
|
|
void |
|
man_endparse(struct roff_man *man) |
man_endparse(struct roff_man *man) |
{ |
{ |
|
|
Line 131 man_parseln(struct roff_man *man, int ln, char *buf, i |
|
Line 74 man_parseln(struct roff_man *man, int ln, char *buf, i |
|
man_ptext(man, ln, buf, offs)); |
man_ptext(man, ln, buf, offs)); |
} |
} |
|
|
static void |
|
man_free1(struct roff_man *man) |
|
{ |
|
|
|
if (man->first) |
|
man_node_delete(man, man->first); |
|
free(man->meta.title); |
|
free(man->meta.os); |
|
free(man->meta.date); |
|
free(man->meta.vol); |
|
free(man->meta.msec); |
|
} |
|
|
|
static void |
|
man_alloc1(struct roff_man *man) |
|
{ |
|
|
|
memset(&man->meta, 0, sizeof(man->meta)); |
|
man->flags = 0; |
|
man->last = mandoc_calloc(1, sizeof(*man->last)); |
|
man->first = man->last; |
|
man->last->type = ROFFT_ROOT; |
|
man->last->tok = MAN_MAX; |
|
man->next = ROFF_NEXT_CHILD; |
|
} |
|
|
|
|
|
static void |
|
man_node_append(struct roff_man *man, struct roff_node *p) |
|
{ |
|
|
|
assert(man->last); |
|
assert(man->first); |
|
assert(p->type != ROFFT_ROOT); |
|
|
|
switch (man->next) { |
|
case ROFF_NEXT_SIBLING: |
|
man->last->next = p; |
|
p->prev = man->last; |
|
p->parent = man->last->parent; |
|
break; |
|
case ROFF_NEXT_CHILD: |
|
man->last->child = p; |
|
p->parent = man->last; |
|
break; |
|
default: |
|
abort(); |
|
/* NOTREACHED */ |
|
} |
|
|
|
assert(p->parent); |
|
p->parent->nchild++; |
|
|
|
switch (p->type) { |
|
case ROFFT_BLOCK: |
|
if (p->tok == MAN_SH || p->tok == MAN_SS) |
|
man->flags &= ~MAN_LITERAL; |
|
break; |
|
case ROFFT_HEAD: |
|
assert(p->parent->type == ROFFT_BLOCK); |
|
p->parent->head = p; |
|
break; |
|
case ROFFT_BODY: |
|
assert(p->parent->type == ROFFT_BLOCK); |
|
p->parent->body = p; |
|
break; |
|
default: |
|
break; |
|
} |
|
|
|
man->last = p; |
|
|
|
switch (p->type) { |
|
case ROFFT_TBL: |
|
/* FALLTHROUGH */ |
|
case ROFFT_TEXT: |
|
man_valid_post(man); |
|
break; |
|
default: |
|
break; |
|
} |
|
} |
|
|
|
static struct roff_node * |
|
man_node_alloc(struct roff_man *man, int line, int pos, |
|
enum roff_type type, int tok) |
|
{ |
|
struct roff_node *p; |
|
|
|
p = mandoc_calloc(1, sizeof(*p)); |
|
p->line = line; |
|
p->pos = pos; |
|
p->type = type; |
|
p->tok = tok; |
|
|
|
if (man->flags & MAN_NEWLINE) |
|
p->flags |= MAN_LINE; |
|
man->flags &= ~MAN_NEWLINE; |
|
return(p); |
|
} |
|
|
|
void |
void |
man_elem_alloc(struct roff_man *man, int line, int pos, int tok) |
man_elem_alloc(struct roff_man *man, int line, int pos, int tok) |
{ |
{ |
struct roff_node *p; |
struct roff_node *p; |
|
|
p = man_node_alloc(man, line, pos, ROFFT_ELEM, tok); |
p = roff_node_alloc(man, line, pos, ROFFT_ELEM, tok); |
man_node_append(man, p); |
roff_node_append(man, p); |
man->next = ROFF_NEXT_CHILD; |
man->next = ROFF_NEXT_CHILD; |
} |
} |
|
|
void |
void |
man_head_alloc(struct roff_man *man, int line, int pos, int tok) |
|
{ |
|
struct roff_node *p; |
|
|
|
p = man_node_alloc(man, line, pos, ROFFT_HEAD, tok); |
|
man_node_append(man, p); |
|
man->next = ROFF_NEXT_CHILD; |
|
} |
|
|
|
void |
|
man_body_alloc(struct roff_man *man, int line, int pos, int tok) |
|
{ |
|
struct roff_node *p; |
|
|
|
p = man_node_alloc(man, line, pos, ROFFT_BODY, tok); |
|
man_node_append(man, p); |
|
man->next = ROFF_NEXT_CHILD; |
|
} |
|
|
|
void |
|
man_block_alloc(struct roff_man *man, int line, int pos, int tok) |
man_block_alloc(struct roff_man *man, int line, int pos, int tok) |
{ |
{ |
struct roff_node *p; |
struct roff_node *p; |
|
|
p = man_node_alloc(man, line, pos, ROFFT_BLOCK, tok); |
p = roff_node_alloc(man, line, pos, ROFFT_BLOCK, tok); |
man_node_append(man, p); |
roff_node_append(man, p); |
man->next = ROFF_NEXT_CHILD; |
man->next = ROFF_NEXT_CHILD; |
} |
} |
|
|
void |
|
man_word_alloc(struct roff_man *man, int line, int pos, const char *word) |
|
{ |
|
struct roff_node *n; |
|
|
|
n = man_node_alloc(man, line, pos, ROFFT_TEXT, MAN_MAX); |
|
n->string = roff_strdup(man->roff, word); |
|
man_node_append(man, n); |
|
man->next = ROFF_NEXT_SIBLING; |
|
} |
|
|
|
void |
|
man_word_append(struct roff_man *man, const char *word) |
|
{ |
|
struct roff_node *n; |
|
char *addstr, *newstr; |
|
|
|
n = man->last; |
|
addstr = roff_strdup(man->roff, word); |
|
mandoc_asprintf(&newstr, "%s %s", n->string, addstr); |
|
free(addstr); |
|
free(n->string); |
|
n->string = newstr; |
|
man->next = ROFF_NEXT_SIBLING; |
|
} |
|
|
|
/* |
|
* Free all of the resources held by a node. This does NOT unlink a |
|
* node from its context; for that, see man_node_unlink(). |
|
*/ |
|
static void |
static void |
man_node_free(struct roff_node *p) |
|
{ |
|
|
|
free(p->string); |
|
free(p); |
|
} |
|
|
|
void |
|
man_node_delete(struct roff_man *man, struct roff_node *p) |
|
{ |
|
|
|
while (p->child) |
|
man_node_delete(man, p->child); |
|
|
|
man_node_unlink(man, p); |
|
man_node_free(p); |
|
} |
|
|
|
void |
|
man_addeqn(struct roff_man *man, const struct eqn *ep) |
|
{ |
|
struct roff_node *n; |
|
|
|
n = man_node_alloc(man, ep->ln, ep->pos, ROFFT_EQN, MAN_MAX); |
|
n->eqn = ep; |
|
if (ep->ln > man->last->line) |
|
n->flags |= MAN_LINE; |
|
man_node_append(man, n); |
|
man->next = ROFF_NEXT_SIBLING; |
|
man_descope(man, ep->ln, ep->pos); |
|
} |
|
|
|
void |
|
man_addspan(struct roff_man *man, const struct tbl_span *sp) |
|
{ |
|
struct roff_node *n; |
|
|
|
man_breakscope(man, MAN_MAX); |
|
n = man_node_alloc(man, sp->line, 0, ROFFT_TBL, MAN_MAX); |
|
n->span = sp; |
|
man_node_append(man, n); |
|
man->next = ROFF_NEXT_SIBLING; |
|
man_descope(man, sp->line, 0); |
|
} |
|
|
|
static void |
|
man_descope(struct roff_man *man, int line, int offs) |
man_descope(struct roff_man *man, int line, int offs) |
{ |
{ |
/* |
/* |
Line 365 man_descope(struct roff_man *man, int line, int offs) |
|
Line 111 man_descope(struct roff_man *man, int line, int offs) |
|
return; |
return; |
man->flags &= ~MAN_BLINE; |
man->flags &= ~MAN_BLINE; |
man_unscope(man, man->last->parent); |
man_unscope(man, man->last->parent); |
man_body_alloc(man, line, offs, man->last->tok); |
roff_body_alloc(man, line, offs, man->last->tok); |
} |
} |
|
|
static int |
static int |
Line 376 man_ptext(struct roff_man *man, int line, char *buf, i |
|
Line 122 man_ptext(struct roff_man *man, int line, char *buf, i |
|
/* Literal free-form text whitespace is preserved. */ |
/* Literal free-form text whitespace is preserved. */ |
|
|
if (man->flags & MAN_LITERAL) { |
if (man->flags & MAN_LITERAL) { |
man_word_alloc(man, line, offs, buf + offs); |
roff_word_alloc(man, line, offs, buf + offs); |
man_descope(man, line, offs); |
man_descope(man, line, offs); |
return(1); |
return(1); |
} |
} |
Line 420 man_ptext(struct roff_man *man, int line, char *buf, i |
|
Line 166 man_ptext(struct roff_man *man, int line, char *buf, i |
|
|
|
buf[i] = '\0'; |
buf[i] = '\0'; |
} |
} |
man_word_alloc(man, line, offs, buf + offs); |
roff_word_alloc(man, line, offs, buf + offs); |
|
|
/* |
/* |
* End-of-sentence check. If the last character is an unescaped |
* End-of-sentence check. If the last character is an unescaped |
Line 459 man_pmacro(struct roff_man *man, int ln, char *buf, in |
|
Line 205 man_pmacro(struct roff_man *man, int ln, char *buf, in |
|
|
|
mac[i] = '\0'; |
mac[i] = '\0'; |
|
|
tok = (i > 0 && i < 4) ? man_hash_find(mac) : MAN_MAX; |
tok = (i > 0 && i < 4) ? man_hash_find(mac) : TOKEN_NONE; |
|
|
if (tok == MAN_MAX) { |
if (tok == TOKEN_NONE) { |
mandoc_msg(MANDOCERR_MACRO, man->parse, |
mandoc_msg(MANDOCERR_MACRO, man->parse, |
ln, ppos, buf + ppos - 1); |
ln, ppos, buf + ppos - 1); |
return(1); |
return(1); |
Line 532 man_pmacro(struct roff_man *man, int ln, char *buf, in |
|
Line 278 man_pmacro(struct roff_man *man, int ln, char *buf, in |
|
man->flags &= ~MAN_BLINE; |
man->flags &= ~MAN_BLINE; |
|
|
man_unscope(man, man->last->parent); |
man_unscope(man, man->last->parent); |
man_body_alloc(man, ln, ppos, man->last->tok); |
roff_body_alloc(man, ln, ppos, man->last->tok); |
return(1); |
return(1); |
} |
} |
|
|
Line 547 man_breakscope(struct roff_man *man, int tok) |
|
Line 293 man_breakscope(struct roff_man *man, int tok) |
|
* Delete the element that is being broken. |
* Delete the element that is being broken. |
*/ |
*/ |
|
|
if (man->flags & MAN_ELINE && (tok == MAN_MAX || |
if (man->flags & MAN_ELINE && (tok == TOKEN_NONE || |
! (man_macros[tok].flags & MAN_NSCOPED))) { |
! (man_macros[tok].flags & MAN_NSCOPED))) { |
n = man->last; |
n = man->last; |
assert(n->type != ROFFT_TEXT); |
assert(n->type != ROFFT_TEXT); |
Line 556 man_breakscope(struct roff_man *man, int tok) |
|
Line 302 man_breakscope(struct roff_man *man, int tok) |
|
|
|
mandoc_vmsg(MANDOCERR_BLK_LINE, man->parse, |
mandoc_vmsg(MANDOCERR_BLK_LINE, man->parse, |
n->line, n->pos, "%s breaks %s", |
n->line, n->pos, "%s breaks %s", |
tok == MAN_MAX ? "TS" : man_macronames[tok], |
tok == TOKEN_NONE ? "TS" : man_macronames[tok], |
man_macronames[n->tok]); |
man_macronames[n->tok]); |
|
|
man_node_delete(man, n); |
roff_node_delete(man, n); |
man->flags &= ~MAN_ELINE; |
man->flags &= ~MAN_ELINE; |
} |
} |
|
|
Line 569 man_breakscope(struct roff_man *man, int tok) |
|
Line 315 man_breakscope(struct roff_man *man, int tok) |
|
* Delete the block that is being broken. |
* Delete the block that is being broken. |
*/ |
*/ |
|
|
if (man->flags & MAN_BLINE && (tok == MAN_MAX || |
if (man->flags & MAN_BLINE && (tok == TOKEN_NONE || |
man_macros[tok].flags & MAN_BSCOPE)) { |
man_macros[tok].flags & MAN_BSCOPE)) { |
n = man->last; |
n = man->last; |
if (n->type == ROFFT_TEXT) |
if (n->type == ROFFT_TEXT) |
Line 584 man_breakscope(struct roff_man *man, int tok) |
|
Line 330 man_breakscope(struct roff_man *man, int tok) |
|
|
|
mandoc_vmsg(MANDOCERR_BLK_LINE, man->parse, |
mandoc_vmsg(MANDOCERR_BLK_LINE, man->parse, |
n->line, n->pos, "%s breaks %s", |
n->line, n->pos, "%s breaks %s", |
tok == MAN_MAX ? "TS" : man_macronames[tok], |
tok == TOKEN_NONE ? "TS" : man_macronames[tok], |
man_macronames[n->tok]); |
man_macronames[n->tok]); |
|
|
man_node_delete(man, n); |
roff_node_delete(man, n); |
man->flags &= ~MAN_BLINE; |
man->flags &= ~MAN_BLINE; |
} |
} |
} |
|
|
|
/* |
|
* Unlink a node from its context. If "man" is provided, the last parse |
|
* point will also be adjusted accordingly. |
|
*/ |
|
static void |
|
man_node_unlink(struct roff_man *man, struct roff_node *n) |
|
{ |
|
|
|
/* Adjust siblings. */ |
|
|
|
if (n->prev) |
|
n->prev->next = n->next; |
|
if (n->next) |
|
n->next->prev = n->prev; |
|
|
|
/* Adjust parent. */ |
|
|
|
if (n->parent) { |
|
n->parent->nchild--; |
|
if (n->parent->child == n) |
|
n->parent->child = n->prev ? n->prev : n->next; |
|
} |
|
|
|
/* Adjust parse point, if applicable. */ |
|
|
|
if (man && man->last == n) { |
|
/*XXX: this can occur when bailing from validation. */ |
|
/*assert(NULL == n->next);*/ |
|
if (n->prev) { |
|
man->last = n->prev; |
|
man->next = ROFF_NEXT_SIBLING; |
|
} else { |
|
man->last = n->parent; |
|
man->next = ROFF_NEXT_CHILD; |
|
} |
|
} |
|
|
|
if (man && man->first == n) |
|
man->first = NULL; |
|
} |
} |
|
|
const struct mparse * |
const struct mparse * |