version 1.149, 2015/01/30 21:28:46 |
version 1.158, 2015/04/19 13:50:25 |
|
|
* purpose with or without fee is hereby granted, provided that the above |
* purpose with or without fee is hereby granted, provided that the above |
* copyright notice and this permission notice appear in all copies. |
* copyright notice and this permission notice appear in all copies. |
* |
* |
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES |
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHORS DISCLAIM ALL WARRANTIES |
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF |
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF |
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR |
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR |
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES |
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES |
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN |
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN |
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
|
|
#include <stdio.h> |
#include <stdio.h> |
#include <string.h> |
#include <string.h> |
|
|
#include "man.h" |
|
#include "mandoc.h" |
|
#include "mandoc_aux.h" |
#include "mandoc_aux.h" |
#include "libman.h" |
#include "mandoc.h" |
|
#include "roff.h" |
|
#include "man.h" |
#include "libmandoc.h" |
#include "libmandoc.h" |
|
#include "roff_int.h" |
|
#include "libman.h" |
|
|
const char *const __man_macronames[MAN_MAX] = { |
const char *const __man_macronames[MAN_MAX] = { |
"br", "TH", "SH", "SS", |
"br", "TH", "SH", "SS", |
Line 48 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 man *); |
static void man_breakscope(struct roff_man *, int); |
static void man_breakscope(struct man *, enum mant); |
static void man_descope(struct roff_man *, int, int); |
static void man_descope(struct man *, int, int); |
static int man_ptext(struct roff_man *, int, char *, int); |
static void man_free1(struct man *); |
static int man_pmacro(struct roff_man *, int, char *, int); |
static struct man_node *man_node_alloc(struct man *, int, int, |
|
enum man_type, enum mant); |
|
static void man_node_append(struct man *, struct man_node *); |
|
static void man_node_free(struct man_node *); |
|
static void man_node_unlink(struct man *, |
|
struct man_node *); |
|
static int man_ptext(struct man *, int, char *, int); |
|
static int man_pmacro(struct man *, int, char *, int); |
|
|
|
|
|
const struct man_node * |
|
man_node(const struct man *man) |
|
{ |
|
|
|
return(man->first); |
|
} |
|
|
|
const struct man_meta * |
|
man_meta(const struct man *man) |
|
{ |
|
|
|
return(&man->meta); |
|
} |
|
|
|
void |
void |
man_reset(struct man *man) |
man_endparse(struct roff_man *man) |
{ |
{ |
|
|
man_free1(man); |
|
man_alloc1(man); |
|
} |
|
|
|
void |
|
man_free(struct man *man) |
|
{ |
|
|
|
man_free1(man); |
|
free(man); |
|
} |
|
|
|
struct man * |
|
man_alloc(struct roff *roff, struct mparse *parse, |
|
const char *defos, int quick) |
|
{ |
|
struct man *p; |
|
|
|
p = mandoc_calloc(1, sizeof(struct man)); |
|
|
|
man_hash_init(); |
|
p->parse = parse; |
|
p->defos = defos; |
|
p->quick = quick; |
|
p->roff = roff; |
|
|
|
man_alloc1(p); |
|
return(p); |
|
} |
|
|
|
void |
|
man_endparse(struct man *man) |
|
{ |
|
|
|
man_macroend(man); |
man_macroend(man); |
} |
} |
|
|
int |
int |
man_parseln(struct man *man, int ln, char *buf, int offs) |
man_parseln(struct roff_man *man, int ln, char *buf, int offs) |
{ |
{ |
|
|
if (man->last->type != MAN_EQN || ln > man->last->line) |
if (man->last->type != ROFFT_EQN || ln > man->last->line) |
man->flags |= MAN_NEWLINE; |
man->flags |= MAN_NEWLINE; |
|
|
return (roff_getcontrol(man->roff, buf, &offs) ? |
return (roff_getcontrol(man->roff, buf, &offs) ? |
Line 129 man_parseln(struct man *man, int ln, char *buf, int of |
|
Line 75 man_parseln(struct man *man, int ln, char *buf, int of |
|
man_ptext(man, ln, buf, offs)); |
man_ptext(man, ln, buf, offs)); |
} |
} |
|
|
static void |
|
man_free1(struct man *man) |
|
{ |
|
|
|
if (man->first) |
|
man_node_delete(man, man->first); |
|
free(man->meta.title); |
|
free(man->meta.source); |
|
free(man->meta.date); |
|
free(man->meta.vol); |
|
free(man->meta.msec); |
|
} |
|
|
|
static void |
|
man_alloc1(struct man *man) |
|
{ |
|
|
|
memset(&man->meta, 0, sizeof(struct man_meta)); |
|
man->flags = 0; |
|
man->last = mandoc_calloc(1, sizeof(struct man_node)); |
|
man->first = man->last; |
|
man->last->type = MAN_ROOT; |
|
man->last->tok = MAN_MAX; |
|
man->next = MAN_NEXT_CHILD; |
|
} |
|
|
|
|
|
static void |
|
man_node_append(struct man *man, struct man_node *p) |
|
{ |
|
|
|
assert(man->last); |
|
assert(man->first); |
|
assert(p->type != MAN_ROOT); |
|
|
|
switch (man->next) { |
|
case MAN_NEXT_SIBLING: |
|
man->last->next = p; |
|
p->prev = man->last; |
|
p->parent = man->last->parent; |
|
break; |
|
case MAN_NEXT_CHILD: |
|
man->last->child = p; |
|
p->parent = man->last; |
|
break; |
|
default: |
|
abort(); |
|
/* NOTREACHED */ |
|
} |
|
|
|
assert(p->parent); |
|
p->parent->nchild++; |
|
|
|
switch (p->type) { |
|
case MAN_BLOCK: |
|
if (p->tok == MAN_SH || p->tok == MAN_SS) |
|
man->flags &= ~MAN_LITERAL; |
|
break; |
|
case MAN_HEAD: |
|
assert(p->parent->type == MAN_BLOCK); |
|
p->parent->head = p; |
|
break; |
|
case MAN_BODY: |
|
assert(p->parent->type == MAN_BLOCK); |
|
p->parent->body = p; |
|
break; |
|
default: |
|
break; |
|
} |
|
|
|
man->last = p; |
|
|
|
switch (p->type) { |
|
case MAN_TBL: |
|
/* FALLTHROUGH */ |
|
case MAN_TEXT: |
|
man_valid_post(man); |
|
break; |
|
default: |
|
break; |
|
} |
|
} |
|
|
|
static struct man_node * |
|
man_node_alloc(struct man *man, int line, int pos, |
|
enum man_type type, enum mant tok) |
|
{ |
|
struct man_node *p; |
|
|
|
p = mandoc_calloc(1, sizeof(struct man_node)); |
|
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 man *man, int line, int pos, enum mant tok) |
man_elem_alloc(struct roff_man *man, int line, int pos, int tok) |
{ |
{ |
struct man_node *p; |
struct roff_node *p; |
|
|
p = man_node_alloc(man, line, pos, MAN_ELEM, tok); |
p = roff_node_alloc(man, line, pos, ROFFT_ELEM, tok); |
man_node_append(man, p); |
roff_node_append(man, p); |
man->next = MAN_NEXT_CHILD; |
man->next = ROFF_NEXT_CHILD; |
} |
} |
|
|
void |
void |
man_head_alloc(struct man *man, int line, int pos, enum mant tok) |
man_block_alloc(struct roff_man *man, int line, int pos, int tok) |
{ |
{ |
struct man_node *p; |
struct roff_node *p; |
|
|
p = man_node_alloc(man, line, pos, MAN_HEAD, tok); |
p = roff_node_alloc(man, line, pos, ROFFT_BLOCK, tok); |
man_node_append(man, p); |
roff_node_append(man, p); |
man->next = MAN_NEXT_CHILD; |
man->next = ROFF_NEXT_CHILD; |
} |
} |
|
|
void |
void |
man_body_alloc(struct man *man, int line, int pos, enum mant tok) |
man_word_alloc(struct roff_man *man, int line, int pos, const char *word) |
{ |
{ |
struct man_node *p; |
struct roff_node *n; |
|
|
p = man_node_alloc(man, line, pos, MAN_BODY, tok); |
n = roff_node_alloc(man, line, pos, ROFFT_TEXT, MAN_MAX); |
man_node_append(man, p); |
|
man->next = MAN_NEXT_CHILD; |
|
} |
|
|
|
void |
|
man_block_alloc(struct man *man, int line, int pos, enum mant tok) |
|
{ |
|
struct man_node *p; |
|
|
|
p = man_node_alloc(man, line, pos, MAN_BLOCK, tok); |
|
man_node_append(man, p); |
|
man->next = MAN_NEXT_CHILD; |
|
} |
|
|
|
void |
|
man_word_alloc(struct man *man, int line, int pos, const char *word) |
|
{ |
|
struct man_node *n; |
|
|
|
n = man_node_alloc(man, line, pos, MAN_TEXT, MAN_MAX); |
|
n->string = roff_strdup(man->roff, word); |
n->string = roff_strdup(man->roff, word); |
man_node_append(man, n); |
roff_node_append(man, n); |
man->next = MAN_NEXT_SIBLING; |
man_valid_post(man); |
|
man->next = ROFF_NEXT_SIBLING; |
} |
} |
|
|
void |
void |
man_word_append(struct man *man, const char *word) |
man_word_append(struct roff_man *man, const char *word) |
{ |
{ |
struct man_node *n; |
struct roff_node *n; |
char *addstr, *newstr; |
char *addstr, *newstr; |
|
|
n = man->last; |
n = man->last; |
Line 293 man_word_append(struct man *man, const char *word) |
|
Line 119 man_word_append(struct man *man, const char *word) |
|
free(addstr); |
free(addstr); |
free(n->string); |
free(n->string); |
n->string = newstr; |
n->string = newstr; |
man->next = MAN_NEXT_SIBLING; |
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 |
|
man_node_free(struct man_node *p) |
|
{ |
|
|
|
free(p->string); |
|
free(p); |
|
} |
|
|
|
void |
void |
man_node_delete(struct man *man, struct man_node *p) |
man_addeqn(struct roff_man *man, const struct eqn *ep) |
{ |
{ |
|
struct roff_node *n; |
|
|
while (p->child) |
n = roff_node_alloc(man, ep->ln, ep->pos, ROFFT_EQN, MAN_MAX); |
man_node_delete(man, p->child); |
|
|
|
man_node_unlink(man, p); |
|
man_node_free(p); |
|
} |
|
|
|
void |
|
man_addeqn(struct man *man, const struct eqn *ep) |
|
{ |
|
struct man_node *n; |
|
|
|
n = man_node_alloc(man, ep->ln, ep->pos, MAN_EQN, MAN_MAX); |
|
n->eqn = ep; |
n->eqn = ep; |
if (ep->ln > man->last->line) |
if (ep->ln > man->last->line) |
n->flags |= MAN_LINE; |
n->flags |= MAN_LINE; |
man_node_append(man, n); |
roff_node_append(man, n); |
man->next = MAN_NEXT_SIBLING; |
man->next = ROFF_NEXT_SIBLING; |
man_descope(man, ep->ln, ep->pos); |
man_descope(man, ep->ln, ep->pos); |
} |
} |
|
|
void |
void |
man_addspan(struct man *man, const struct tbl_span *sp) |
man_addspan(struct roff_man *man, const struct tbl_span *sp) |
{ |
{ |
struct man_node *n; |
struct roff_node *n; |
|
|
man_breakscope(man, MAN_MAX); |
man_breakscope(man, MAN_MAX); |
n = man_node_alloc(man, sp->line, 0, MAN_TBL, MAN_MAX); |
n = roff_node_alloc(man, sp->line, 0, ROFFT_TBL, MAN_MAX); |
n->span = sp; |
n->span = sp; |
man_node_append(man, n); |
roff_node_append(man, n); |
man->next = MAN_NEXT_SIBLING; |
man_valid_post(man); |
|
man->next = ROFF_NEXT_SIBLING; |
man_descope(man, sp->line, 0); |
man_descope(man, sp->line, 0); |
} |
} |
|
|
static void |
static void |
man_descope(struct man *man, int line, int offs) |
man_descope(struct roff_man *man, int line, int offs) |
{ |
{ |
/* |
/* |
* Co-ordinate what happens with having a next-line scope open: |
* Co-ordinate what happens with having a next-line scope open: |
Line 363 man_descope(struct man *man, int line, int offs) |
|
Line 167 man_descope(struct 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 |
man_ptext(struct man *man, int line, char *buf, int offs) |
man_ptext(struct roff_man *man, int line, char *buf, int offs) |
{ |
{ |
int i; |
int i; |
|
|
Line 392 man_ptext(struct man *man, int line, char *buf, int of |
|
Line 196 man_ptext(struct man *man, int line, char *buf, int of |
|
if (man->last->tok != MAN_SH && |
if (man->last->tok != MAN_SH && |
man->last->tok != MAN_SS) { |
man->last->tok != MAN_SS) { |
man_elem_alloc(man, line, offs, MAN_sp); |
man_elem_alloc(man, line, offs, MAN_sp); |
man->next = MAN_NEXT_SIBLING; |
man->next = ROFF_NEXT_SIBLING; |
} |
} |
return(1); |
return(1); |
} |
} |
Line 435 man_ptext(struct man *man, int line, char *buf, int of |
|
Line 239 man_ptext(struct man *man, int line, char *buf, int of |
|
} |
} |
|
|
static int |
static int |
man_pmacro(struct man *man, int ln, char *buf, int offs) |
man_pmacro(struct roff_man *man, int ln, char *buf, int offs) |
{ |
{ |
struct man_node *n; |
struct roff_node *n; |
const char *cp; |
const char *cp; |
enum mant tok; |
int tok; |
int i, ppos; |
int i, ppos; |
int bline; |
int bline; |
char mac[5]; |
char mac[5]; |
Line 511 man_pmacro(struct man *man, int ln, char *buf, int off |
|
Line 315 man_pmacro(struct man *man, int ln, char *buf, int off |
|
|
|
if (man->quick && tok == MAN_SH) { |
if (man->quick && tok == MAN_SH) { |
n = man->last; |
n = man->last; |
if (n->type == MAN_BODY && |
if (n->type == ROFFT_BODY && |
strcmp(n->prev->child->string, "NAME")) |
strcmp(n->prev->child->string, "NAME")) |
return(2); |
return(2); |
} |
} |
Line 530 man_pmacro(struct man *man, int ln, char *buf, int off |
|
Line 334 man_pmacro(struct man *man, int ln, char *buf, int off |
|
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); |
} |
} |
|
|
void |
void |
man_breakscope(struct man *man, enum mant tok) |
man_breakscope(struct roff_man *man, int tok) |
{ |
{ |
struct man_node *n; |
struct roff_node *n; |
|
|
/* |
/* |
* An element next line scope is open, |
* An element next line scope is open, |
Line 548 man_breakscope(struct man *man, enum mant tok) |
|
Line 352 man_breakscope(struct man *man, enum mant tok) |
|
if (man->flags & MAN_ELINE && (tok == MAN_MAX || |
if (man->flags & MAN_ELINE && (tok == MAN_MAX || |
! (man_macros[tok].flags & MAN_NSCOPED))) { |
! (man_macros[tok].flags & MAN_NSCOPED))) { |
n = man->last; |
n = man->last; |
assert(n->type != MAN_TEXT); |
assert(n->type != ROFFT_TEXT); |
if (man_macros[n->tok].flags & MAN_NSCOPED) |
if (man_macros[n->tok].flags & MAN_NSCOPED) |
n = n->parent; |
n = n->parent; |
|
|
Line 557 man_breakscope(struct man *man, enum mant tok) |
|
Line 361 man_breakscope(struct man *man, enum mant tok) |
|
tok == MAN_MAX ? "TS" : man_macronames[tok], |
tok == MAN_MAX ? "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 570 man_breakscope(struct man *man, enum mant tok) |
|
Line 374 man_breakscope(struct man *man, enum mant tok) |
|
if (man->flags & MAN_BLINE && (tok == MAN_MAX || |
if (man->flags & MAN_BLINE && (tok == MAN_MAX || |
man_macros[tok].flags & MAN_BSCOPE)) { |
man_macros[tok].flags & MAN_BSCOPE)) { |
n = man->last; |
n = man->last; |
if (n->type == MAN_TEXT) |
if (n->type == ROFFT_TEXT) |
n = n->parent; |
n = n->parent; |
if ( ! (man_macros[n->tok].flags & MAN_BSCOPE)) |
if ( ! (man_macros[n->tok].flags & MAN_BSCOPE)) |
n = n->parent; |
n = n->parent; |
|
|
assert(n->type == MAN_HEAD); |
assert(n->type == ROFFT_HEAD); |
n = n->parent; |
n = n->parent; |
assert(n->type == MAN_BLOCK); |
assert(n->type == ROFFT_BLOCK); |
assert(man_macros[n->tok].flags & MAN_SCOPED); |
assert(man_macros[n->tok].flags & MAN_SCOPED); |
|
|
mandoc_vmsg(MANDOCERR_BLK_LINE, man->parse, |
mandoc_vmsg(MANDOCERR_BLK_LINE, man->parse, |
Line 585 man_breakscope(struct man *man, enum mant tok) |
|
Line 389 man_breakscope(struct man *man, enum mant tok) |
|
tok == MAN_MAX ? "TS" : man_macronames[tok], |
tok == MAN_MAX ? "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 man *man, struct man_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 = MAN_NEXT_SIBLING; |
|
} else { |
|
man->last = n->parent; |
|
man->next = MAN_NEXT_CHILD; |
|
} |
|
} |
|
|
|
if (man && man->first == n) |
|
man->first = NULL; |
|
} |
|
|
|
const struct mparse * |
const struct mparse * |
man_mparse(const struct man *man) |
man_mparse(const struct roff_man *man) |
{ |
{ |
|
|
assert(man && man->parse); |
assert(man && man->parse); |
Line 640 man_mparse(const struct man *man) |
|
Line 403 man_mparse(const struct man *man) |
|
} |
} |
|
|
void |
void |
man_deroff(char **dest, const struct man_node *n) |
man_deroff(char **dest, const struct roff_node *n) |
{ |
{ |
char *cp; |
char *cp; |
size_t sz; |
size_t sz; |
|
|
if (n->type != MAN_TEXT) { |
if (n->type != ROFFT_TEXT) { |
for (n = n->child; n; n = n->next) |
for (n = n->child; n; n = n->next) |
man_deroff(dest, n); |
man_deroff(dest, n); |
return; |
return; |