version 1.149, 2015/01/30 21:28:46 |
version 1.157, 2015/04/18 17:53:21 |
|
|
* 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 "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 49 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 struct roff_node *man_node_alloc(struct roff_man *, int, int, |
static void man_free1(struct man *); |
enum roff_type, int); |
static struct man_node *man_node_alloc(struct man *, int, int, |
static void man_node_append(struct roff_man *, |
enum man_type, enum mant); |
struct roff_node *); |
static void man_node_append(struct man *, struct man_node *); |
static void man_node_free(struct roff_node *); |
static void man_node_free(struct man_node *); |
static void man_node_unlink(struct roff_man *, |
static void man_node_unlink(struct man *, |
struct roff_node *); |
struct man_node *); |
static int man_ptext(struct roff_man *, int, char *, int); |
static int man_ptext(struct man *, int, char *, int); |
static int man_pmacro(struct roff_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 130 man_parseln(struct man *man, int ln, char *buf, int of |
|
Line 82 man_parseln(struct man *man, int ln, char *buf, int of |
|
} |
} |
|
|
static void |
static void |
man_free1(struct man *man) |
man_node_append(struct roff_man *man, struct roff_node *p) |
{ |
{ |
|
|
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->last); |
assert(man->first); |
assert(man->first); |
assert(p->type != MAN_ROOT); |
assert(p->type != ROFFT_ROOT); |
|
|
switch (man->next) { |
switch (man->next) { |
case MAN_NEXT_SIBLING: |
case ROFF_NEXT_SIBLING: |
man->last->next = p; |
man->last->next = p; |
p->prev = man->last; |
p->prev = man->last; |
p->parent = man->last->parent; |
p->parent = man->last->parent; |
break; |
break; |
case MAN_NEXT_CHILD: |
case ROFF_NEXT_CHILD: |
man->last->child = p; |
man->last->child = p; |
p->parent = man->last; |
p->parent = man->last; |
break; |
break; |
Line 183 man_node_append(struct man *man, struct man_node *p) |
|
Line 108 man_node_append(struct man *man, struct man_node *p) |
|
p->parent->nchild++; |
p->parent->nchild++; |
|
|
switch (p->type) { |
switch (p->type) { |
case MAN_BLOCK: |
case ROFFT_BLOCK: |
if (p->tok == MAN_SH || p->tok == MAN_SS) |
if (p->tok == MAN_SH || p->tok == MAN_SS) |
man->flags &= ~MAN_LITERAL; |
man->flags &= ~MAN_LITERAL; |
break; |
break; |
case MAN_HEAD: |
case ROFFT_HEAD: |
assert(p->parent->type == MAN_BLOCK); |
assert(p->parent->type == ROFFT_BLOCK); |
p->parent->head = p; |
p->parent->head = p; |
break; |
break; |
case MAN_BODY: |
case ROFFT_BODY: |
assert(p->parent->type == MAN_BLOCK); |
assert(p->parent->type == ROFFT_BLOCK); |
p->parent->body = p; |
p->parent->body = p; |
break; |
break; |
default: |
default: |
Line 202 man_node_append(struct man *man, struct man_node *p) |
|
Line 127 man_node_append(struct man *man, struct man_node *p) |
|
man->last = p; |
man->last = p; |
|
|
switch (p->type) { |
switch (p->type) { |
case MAN_TBL: |
case ROFFT_TBL: |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case MAN_TEXT: |
case ROFFT_TEXT: |
man_valid_post(man); |
man_valid_post(man); |
break; |
break; |
default: |
default: |
Line 212 man_node_append(struct man *man, struct man_node *p) |
|
Line 137 man_node_append(struct man *man, struct man_node *p) |
|
} |
} |
} |
} |
|
|
static struct man_node * |
static struct roff_node * |
man_node_alloc(struct man *man, int line, int pos, |
man_node_alloc(struct roff_man *man, int line, int pos, |
enum man_type type, enum mant tok) |
enum roff_type type, int tok) |
{ |
{ |
struct man_node *p; |
struct roff_node *p; |
|
|
p = mandoc_calloc(1, sizeof(struct man_node)); |
p = mandoc_calloc(1, sizeof(*p)); |
p->line = line; |
p->line = line; |
p->pos = pos; |
p->pos = pos; |
p->type = type; |
p->type = type; |
Line 231 man_node_alloc(struct man *man, int line, int pos, |
|
Line 156 man_node_alloc(struct man *man, int line, int pos, |
|
} |
} |
|
|
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 = man_node_alloc(man, line, pos, ROFFT_ELEM, tok); |
man_node_append(man, p); |
man_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_head_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 = man_node_alloc(man, line, pos, ROFFT_HEAD, tok); |
man_node_append(man, p); |
man_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_body_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_BODY, tok); |
p = man_node_alloc(man, line, pos, ROFFT_BODY, tok); |
man_node_append(man, p); |
man_node_append(man, p); |
man->next = MAN_NEXT_CHILD; |
man->next = ROFF_NEXT_CHILD; |
} |
} |
|
|
void |
void |
man_block_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_BLOCK, tok); |
p = man_node_alloc(man, line, pos, ROFFT_BLOCK, tok); |
man_node_append(man, p); |
man_node_append(man, p); |
man->next = MAN_NEXT_CHILD; |
man->next = ROFF_NEXT_CHILD; |
} |
} |
|
|
void |
void |
man_word_alloc(struct man *man, int line, int pos, const char *word) |
man_word_alloc(struct roff_man *man, int line, int pos, const char *word) |
{ |
{ |
struct man_node *n; |
struct roff_node *n; |
|
|
n = man_node_alloc(man, line, pos, MAN_TEXT, MAN_MAX); |
n = man_node_alloc(man, line, pos, ROFFT_TEXT, MAN_MAX); |
n->string = roff_strdup(man->roff, word); |
n->string = roff_strdup(man->roff, word); |
man_node_append(man, n); |
man_node_append(man, n); |
man->next = MAN_NEXT_SIBLING; |
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 218 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; |
} |
} |
|
|
/* |
/* |
Line 301 man_word_append(struct man *man, const char *word) |
|
Line 226 man_word_append(struct man *man, const char *word) |
|
* node from its context; for that, see man_node_unlink(). |
* node from its context; for that, see man_node_unlink(). |
*/ |
*/ |
static void |
static void |
man_node_free(struct man_node *p) |
man_node_free(struct roff_node *p) |
{ |
{ |
|
|
free(p->string); |
free(p->string); |
Line 309 man_node_free(struct man_node *p) |
|
Line 234 man_node_free(struct man_node *p) |
|
} |
} |
|
|
void |
void |
man_node_delete(struct man *man, struct man_node *p) |
man_node_delete(struct roff_man *man, struct roff_node *p) |
{ |
{ |
|
|
while (p->child) |
while (p->child) |
Line 320 man_node_delete(struct man *man, struct man_node *p) |
|
Line 245 man_node_delete(struct man *man, struct man_node *p) |
|
} |
} |
|
|
void |
void |
man_addeqn(struct man *man, const struct eqn *ep) |
man_addeqn(struct roff_man *man, const struct eqn *ep) |
{ |
{ |
struct man_node *n; |
struct roff_node *n; |
|
|
n = man_node_alloc(man, ep->ln, ep->pos, MAN_EQN, MAN_MAX); |
n = man_node_alloc(man, ep->ln, ep->pos, ROFFT_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); |
man_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 = man_node_alloc(man, sp->line, 0, ROFFT_TBL, MAN_MAX); |
n->span = sp; |
n->span = sp; |
man_node_append(man, n); |
man_node_append(man, n); |
man->next = MAN_NEXT_SIBLING; |
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 367 man_descope(struct man *man, int line, int offs) |
|
Line 292 man_descope(struct man *man, int line, int offs) |
|
} |
} |
|
|
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 317 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 360 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 436 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 535 man_pmacro(struct man *man, int ln, char *buf, int off |
|
Line 460 man_pmacro(struct man *man, int ln, char *buf, int off |
|
} |
} |
|
|
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 473 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 570 man_breakscope(struct man *man, enum mant tok) |
|
Line 495 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 595 man_breakscope(struct man *man, enum mant tok) |
|
Line 520 man_breakscope(struct man *man, enum mant tok) |
|
* point will also be adjusted accordingly. |
* point will also be adjusted accordingly. |
*/ |
*/ |
static void |
static void |
man_node_unlink(struct man *man, struct man_node *n) |
man_node_unlink(struct roff_man *man, struct roff_node *n) |
{ |
{ |
|
|
/* Adjust siblings. */ |
/* Adjust siblings. */ |
Line 620 man_node_unlink(struct man *man, struct man_node *n) |
|
Line 545 man_node_unlink(struct man *man, struct man_node *n) |
|
/*assert(NULL == n->next);*/ |
/*assert(NULL == n->next);*/ |
if (n->prev) { |
if (n->prev) { |
man->last = n->prev; |
man->last = n->prev; |
man->next = MAN_NEXT_SIBLING; |
man->next = ROFF_NEXT_SIBLING; |
} else { |
} else { |
man->last = n->parent; |
man->last = n->parent; |
man->next = MAN_NEXT_CHILD; |
man->next = ROFF_NEXT_CHILD; |
} |
} |
} |
} |
|
|
Line 632 man_node_unlink(struct man *man, struct man_node *n) |
|
Line 557 man_node_unlink(struct man *man, struct man_node *n) |
|
} |
} |
|
|
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 565 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; |