version 1.61, 2015/02/03 18:37:59 |
version 1.76, 2017/07/07 19:39:30 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2008, 2009, 2011, 2014 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2008, 2009, 2011, 2014 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2013, 2014, 2015 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2013, 2014, 2015, 2017 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 |
* 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 <time.h> |
#include <time.h> |
|
|
#include "mandoc.h" |
#include "mandoc.h" |
|
#include "roff.h" |
#include "mdoc.h" |
#include "mdoc.h" |
#include "man.h" |
#include "man.h" |
#include "main.h" |
#include "main.h" |
|
|
static void print_box(const struct eqn_box *, int); |
static void print_box(const struct eqn_box *, int); |
static void print_man(const struct man_node *, int); |
static void print_man(const struct roff_node *, int); |
static void print_mdoc(const struct mdoc_node *, int); |
static void print_meta(const struct roff_meta *); |
|
static void print_mdoc(const struct roff_node *, int); |
static void print_span(const struct tbl_span *, int); |
static void print_span(const struct tbl_span *, int); |
|
|
|
|
void |
void |
tree_mdoc(void *arg, const struct mdoc *mdoc) |
tree_mdoc(void *arg, const struct roff_man *mdoc) |
{ |
{ |
|
print_meta(&mdoc->meta); |
print_mdoc(mdoc_node(mdoc)->child, 0); |
putchar('\n'); |
|
print_mdoc(mdoc->first->child, 0); |
} |
} |
|
|
void |
void |
tree_man(void *arg, const struct man *man) |
tree_man(void *arg, const struct roff_man *man) |
{ |
{ |
|
print_meta(&man->meta); |
|
if (man->meta.hasbody == 0) |
|
puts("body = empty"); |
|
putchar('\n'); |
|
print_man(man->first->child, 0); |
|
} |
|
|
print_man(man_node(man)->child, 0); |
static void |
|
print_meta(const struct roff_meta *meta) |
|
{ |
|
if (meta->title != NULL) |
|
printf("title = \"%s\"\n", meta->title); |
|
if (meta->name != NULL) |
|
printf("name = \"%s\"\n", meta->name); |
|
if (meta->msec != NULL) |
|
printf("sec = \"%s\"\n", meta->msec); |
|
if (meta->vol != NULL) |
|
printf("vol = \"%s\"\n", meta->vol); |
|
if (meta->arch != NULL) |
|
printf("arch = \"%s\"\n", meta->arch); |
|
if (meta->os != NULL) |
|
printf("os = \"%s\"\n", meta->os); |
|
if (meta->date != NULL) |
|
printf("date = \"%s\"\n", meta->date); |
} |
} |
|
|
static void |
static void |
print_mdoc(const struct mdoc_node *n, int indent) |
print_mdoc(const struct roff_node *n, int indent) |
{ |
{ |
const char *p, *t; |
const char *p, *t; |
int i, j; |
int i, j; |
Line 66 print_mdoc(const struct mdoc_node *n, int indent) |
|
Line 91 print_mdoc(const struct mdoc_node *n, int indent) |
|
t = p = NULL; |
t = p = NULL; |
|
|
switch (n->type) { |
switch (n->type) { |
case MDOC_ROOT: |
case ROFFT_ROOT: |
t = "root"; |
t = "root"; |
break; |
break; |
case MDOC_BLOCK: |
case ROFFT_BLOCK: |
t = "block"; |
t = "block"; |
break; |
break; |
case MDOC_HEAD: |
case ROFFT_HEAD: |
t = "block-head"; |
t = "head"; |
break; |
break; |
case MDOC_BODY: |
case ROFFT_BODY: |
if (n->end) |
if (n->end) |
t = "body-end"; |
t = "body-end"; |
else |
else |
t = "block-body"; |
t = "body"; |
break; |
break; |
case MDOC_TAIL: |
case ROFFT_TAIL: |
t = "block-tail"; |
t = "tail"; |
break; |
break; |
case MDOC_ELEM: |
case ROFFT_ELEM: |
t = "elem"; |
t = "elem"; |
break; |
break; |
case MDOC_TEXT: |
case ROFFT_TEXT: |
t = "text"; |
t = "text"; |
break; |
break; |
case MDOC_TBL: |
case ROFFT_TBL: |
break; |
break; |
case MDOC_EQN: |
case ROFFT_EQN: |
t = "eqn"; |
t = "eqn"; |
break; |
break; |
default: |
default: |
abort(); |
abort(); |
/* NOTREACHED */ |
|
} |
} |
|
|
switch (n->type) { |
switch (n->type) { |
case MDOC_TEXT: |
case ROFFT_TEXT: |
p = n->string; |
p = n->string; |
break; |
break; |
case MDOC_BODY: |
case ROFFT_BODY: |
p = mdoc_macronames[n->tok]; |
p = roff_name[n->tok]; |
break; |
break; |
case MDOC_HEAD: |
case ROFFT_HEAD: |
p = mdoc_macronames[n->tok]; |
p = roff_name[n->tok]; |
break; |
break; |
case MDOC_TAIL: |
case ROFFT_TAIL: |
p = mdoc_macronames[n->tok]; |
p = roff_name[n->tok]; |
break; |
break; |
case MDOC_ELEM: |
case ROFFT_ELEM: |
p = mdoc_macronames[n->tok]; |
p = roff_name[n->tok]; |
if (n->args) { |
if (n->args) { |
argv = n->args->argv; |
argv = n->args->argv; |
argc = n->args->argc; |
argc = n->args->argc; |
} |
} |
break; |
break; |
case MDOC_BLOCK: |
case ROFFT_BLOCK: |
p = mdoc_macronames[n->tok]; |
p = roff_name[n->tok]; |
if (n->args) { |
if (n->args) { |
argv = n->args->argv; |
argv = n->args->argv; |
argc = n->args->argc; |
argc = n->args->argc; |
} |
} |
break; |
break; |
case MDOC_TBL: |
case ROFFT_TBL: |
break; |
break; |
case MDOC_EQN: |
case ROFFT_EQN: |
p = "EQ"; |
p = "EQ"; |
break; |
break; |
case MDOC_ROOT: |
case ROFFT_ROOT: |
p = "root"; |
p = "root"; |
break; |
break; |
default: |
default: |
abort(); |
abort(); |
/* NOTREACHED */ |
|
} |
} |
|
|
if (n->span) { |
if (n->span) { |
Line 160 print_mdoc(const struct mdoc_node *n, int indent) |
|
Line 183 print_mdoc(const struct mdoc_node *n, int indent) |
|
} |
} |
|
|
putchar(' '); |
putchar(' '); |
if (MDOC_LINE & n->flags) |
if (NODE_DELIMO & n->flags) |
|
putchar('('); |
|
if (NODE_LINE & n->flags) |
putchar('*'); |
putchar('*'); |
printf("%d:%d", n->line, n->pos + 1); |
printf("%d:%d", n->line, n->pos + 1); |
if (n->lastline != n->line) |
if (NODE_DELIMC & n->flags) |
printf("-%d", n->lastline); |
putchar(')'); |
|
if (NODE_EOS & n->flags) |
|
putchar('.'); |
|
if (NODE_BROKEN & n->flags) |
|
printf(" BROKEN"); |
|
if (NODE_NOSRC & n->flags) |
|
printf(" NOSRC"); |
|
if (NODE_NOPRT & n->flags) |
|
printf(" NOPRT"); |
putchar('\n'); |
putchar('\n'); |
} |
} |
|
|
Line 172 print_mdoc(const struct mdoc_node *n, int indent) |
|
Line 205 print_mdoc(const struct mdoc_node *n, int indent) |
|
print_box(n->eqn->root->first, indent + 4); |
print_box(n->eqn->root->first, indent + 4); |
if (n->child) |
if (n->child) |
print_mdoc(n->child, indent + |
print_mdoc(n->child, indent + |
(n->type == MDOC_BLOCK ? 2 : 4)); |
(n->type == ROFFT_BLOCK ? 2 : 4)); |
if (n->next) |
if (n->next) |
print_mdoc(n->next, indent); |
print_mdoc(n->next, indent); |
} |
} |
|
|
static void |
static void |
print_man(const struct man_node *n, int indent) |
print_man(const struct roff_node *n, int indent) |
{ |
{ |
const char *p, *t; |
const char *p, *t; |
int i; |
int i; |
Line 189 print_man(const struct man_node *n, int indent) |
|
Line 222 print_man(const struct man_node *n, int indent) |
|
t = p = NULL; |
t = p = NULL; |
|
|
switch (n->type) { |
switch (n->type) { |
case MAN_ROOT: |
case ROFFT_ROOT: |
t = "root"; |
t = "root"; |
break; |
break; |
case MAN_ELEM: |
case ROFFT_ELEM: |
t = "elem"; |
t = "elem"; |
break; |
break; |
case MAN_TEXT: |
case ROFFT_TEXT: |
t = "text"; |
t = "text"; |
break; |
break; |
case MAN_BLOCK: |
case ROFFT_BLOCK: |
t = "block"; |
t = "block"; |
break; |
break; |
case MAN_HEAD: |
case ROFFT_HEAD: |
t = "block-head"; |
t = "head"; |
break; |
break; |
case MAN_BODY: |
case ROFFT_BODY: |
t = "block-body"; |
t = "body"; |
break; |
break; |
case MAN_TBL: |
case ROFFT_TBL: |
break; |
break; |
case MAN_EQN: |
case ROFFT_EQN: |
t = "eqn"; |
t = "eqn"; |
break; |
break; |
default: |
default: |
abort(); |
abort(); |
/* NOTREACHED */ |
|
} |
} |
|
|
switch (n->type) { |
switch (n->type) { |
case MAN_TEXT: |
case ROFFT_TEXT: |
p = n->string; |
p = n->string; |
break; |
break; |
case MAN_ELEM: |
case ROFFT_ELEM: |
/* FALLTHROUGH */ |
case ROFFT_BLOCK: |
case MAN_BLOCK: |
case ROFFT_HEAD: |
/* FALLTHROUGH */ |
case ROFFT_BODY: |
case MAN_HEAD: |
p = roff_name[n->tok]; |
/* FALLTHROUGH */ |
|
case MAN_BODY: |
|
p = man_macronames[n->tok]; |
|
break; |
break; |
case MAN_ROOT: |
case ROFFT_ROOT: |
p = "root"; |
p = "root"; |
break; |
break; |
case MAN_TBL: |
case ROFFT_TBL: |
break; |
break; |
case MAN_EQN: |
case ROFFT_EQN: |
p = "EQ"; |
p = "EQ"; |
break; |
break; |
default: |
default: |
abort(); |
abort(); |
/* NOTREACHED */ |
|
} |
} |
|
|
if (n->span) { |
if (n->span) { |
Line 250 print_man(const struct man_node *n, int indent) |
|
Line 278 print_man(const struct man_node *n, int indent) |
|
for (i = 0; i < indent; i++) |
for (i = 0; i < indent; i++) |
putchar(' '); |
putchar(' '); |
printf("%s (%s) ", p, t); |
printf("%s (%s) ", p, t); |
if (MAN_LINE & n->flags) |
if (NODE_LINE & n->flags) |
putchar('*'); |
putchar('*'); |
printf("%d:%d\n", n->line, n->pos + 1); |
printf("%d:%d", n->line, n->pos + 1); |
|
if (NODE_EOS & n->flags) |
|
putchar('.'); |
|
putchar('\n'); |
} |
} |
|
|
if (n->eqn) |
if (n->eqn) |
print_box(n->eqn->root->first, indent + 4); |
print_box(n->eqn->root->first, indent + 4); |
if (n->child) |
if (n->child) |
print_man(n->child, indent + |
print_man(n->child, indent + |
(n->type == MAN_BLOCK ? 2 : 4)); |
(n->type == ROFFT_BLOCK ? 2 : 4)); |
if (n->next) |
if (n->next) |
print_man(n->next, indent); |
print_man(n->next, indent); |
} |
} |
Line 282 print_box(const struct eqn_box *ep, int indent) |
|
Line 313 print_box(const struct eqn_box *ep, int indent) |
|
|
|
t = NULL; |
t = NULL; |
switch (ep->type) { |
switch (ep->type) { |
case EQN_ROOT: |
|
t = "eqn-root"; |
|
break; |
|
case EQN_LISTONE: |
|
case EQN_LIST: |
case EQN_LIST: |
t = "eqn-list"; |
t = "eqn-list"; |
break; |
break; |
Line 353 print_span(const struct tbl_span *sp, int indent) |
|
Line 380 print_span(const struct tbl_span *sp, int indent) |
|
for (dp = sp->first; dp; dp = dp->next) { |
for (dp = sp->first; dp; dp = dp->next) { |
switch (dp->pos) { |
switch (dp->pos) { |
case TBL_DATA_HORIZ: |
case TBL_DATA_HORIZ: |
/* FALLTHROUGH */ |
|
case TBL_DATA_NHORIZ: |
case TBL_DATA_NHORIZ: |
putchar('-'); |
putchar('-'); |
continue; |
continue; |
case TBL_DATA_DHORIZ: |
case TBL_DATA_DHORIZ: |
/* FALLTHROUGH */ |
|
case TBL_DATA_NDHORIZ: |
case TBL_DATA_NDHORIZ: |
putchar('='); |
putchar('='); |
continue; |
continue; |