version 1.32, 2011/01/10 14:40:30 |
version 1.45, 2011/07/22 09:57:04 |
|
|
#endif |
#endif |
|
|
#include <assert.h> |
#include <assert.h> |
|
#include <limits.h> |
#include <stdio.h> |
#include <stdio.h> |
#include <stdlib.h> |
#include <stdlib.h> |
#include <time.h> |
#include <time.h> |
|
|
#include "man.h" |
#include "man.h" |
#include "main.h" |
#include "main.h" |
|
|
static void print_mdoc(const struct mdoc_node *, 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 man_node *, int); |
|
static void print_mdoc(const struct mdoc_node *, int); |
static void print_span(const struct tbl_span *, int); |
static void print_span(const struct tbl_span *, int); |
|
|
|
|
Line 63 print_mdoc(const struct mdoc_node *n, int indent) |
|
Line 65 print_mdoc(const struct mdoc_node *n, int indent) |
|
argv = NULL; |
argv = NULL; |
argc = sz = 0; |
argc = sz = 0; |
params = NULL; |
params = NULL; |
|
t = p = NULL; |
|
|
switch (n->type) { |
switch (n->type) { |
case (MDOC_ROOT): |
case (MDOC_ROOT): |
Line 90 print_mdoc(const struct mdoc_node *n, int indent) |
|
Line 93 print_mdoc(const struct mdoc_node *n, int indent) |
|
t = "text"; |
t = "text"; |
break; |
break; |
case (MDOC_TBL): |
case (MDOC_TBL): |
t = "tbl"; |
/* FALLTHROUGH */ |
|
case (MDOC_EQN): |
break; |
break; |
default: |
default: |
abort(); |
abort(); |
/* NOTREACHED */ |
/* NOTREACHED */ |
} |
} |
|
|
p = NULL; |
|
|
|
switch (n->type) { |
switch (n->type) { |
case (MDOC_TEXT): |
case (MDOC_TEXT): |
p = n->string; |
p = n->string; |
Line 127 print_mdoc(const struct mdoc_node *n, int indent) |
|
Line 129 print_mdoc(const struct mdoc_node *n, int indent) |
|
} |
} |
break; |
break; |
case (MDOC_TBL): |
case (MDOC_TBL): |
|
/* FALLTHROUGH */ |
|
case (MDOC_EQN): |
break; |
break; |
case (MDOC_ROOT): |
case (MDOC_ROOT): |
p = "root"; |
p = "root"; |
Line 137 print_mdoc(const struct mdoc_node *n, int indent) |
|
Line 141 print_mdoc(const struct mdoc_node *n, int indent) |
|
} |
} |
|
|
if (n->span) { |
if (n->span) { |
assert(NULL == p); |
assert(NULL == p && NULL == t); |
print_span(n->span, indent); |
print_span(n->span, indent); |
|
} else if (n->eqn) { |
|
assert(NULL == p && NULL == t); |
|
print_box(n->eqn->root, indent); |
} else { |
} else { |
for (i = 0; i < indent; i++) |
for (i = 0; i < indent; i++) |
putchar('\t'); |
putchar('\t'); |
Line 158 print_mdoc(const struct mdoc_node *n, int indent) |
|
Line 165 print_mdoc(const struct mdoc_node *n, int indent) |
|
for (i = 0; i < (int)sz; i++) |
for (i = 0; i < (int)sz; i++) |
printf(" [%s]", params[i]); |
printf(" [%s]", params[i]); |
|
|
printf(" %d:%d", n->line, n->pos); |
printf(" %d:%d\n", n->line, n->pos); |
} |
} |
|
|
putchar('\n'); |
|
|
|
if (n->child) |
if (n->child) |
print_mdoc(n->child, indent + 1); |
print_mdoc(n->child, indent + 1); |
if (n->next) |
if (n->next) |
Line 176 print_man(const struct man_node *n, int indent) |
|
Line 181 print_man(const struct man_node *n, int indent) |
|
const char *p, *t; |
const char *p, *t; |
int i; |
int i; |
|
|
|
t = p = NULL; |
|
|
switch (n->type) { |
switch (n->type) { |
case (MAN_ROOT): |
case (MAN_ROOT): |
t = "root"; |
t = "root"; |
Line 195 print_man(const struct man_node *n, int indent) |
|
Line 202 print_man(const struct man_node *n, int indent) |
|
case (MAN_BODY): |
case (MAN_BODY): |
t = "block-body"; |
t = "block-body"; |
break; |
break; |
|
case (MAN_TAIL): |
|
t = "block-tail"; |
|
break; |
case (MAN_TBL): |
case (MAN_TBL): |
t = "tbl"; |
/* FALLTHROUGH */ |
|
case (MAN_EQN): |
break; |
break; |
default: |
default: |
abort(); |
abort(); |
/* NOTREACHED */ |
/* NOTREACHED */ |
} |
} |
|
|
p = NULL; |
|
|
|
switch (n->type) { |
switch (n->type) { |
case (MAN_TEXT): |
case (MAN_TEXT): |
p = n->string; |
p = n->string; |
Line 215 print_man(const struct man_node *n, int indent) |
|
Line 224 print_man(const struct man_node *n, int indent) |
|
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case (MAN_HEAD): |
case (MAN_HEAD): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
|
case (MAN_TAIL): |
|
/* FALLTHROUGH */ |
case (MAN_BODY): |
case (MAN_BODY): |
p = man_macronames[n->tok]; |
p = man_macronames[n->tok]; |
break; |
break; |
Line 222 print_man(const struct man_node *n, int indent) |
|
Line 233 print_man(const struct man_node *n, int indent) |
|
p = "root"; |
p = "root"; |
break; |
break; |
case (MAN_TBL): |
case (MAN_TBL): |
|
/* FALLTHROUGH */ |
|
case (MAN_EQN): |
break; |
break; |
default: |
default: |
abort(); |
abort(); |
Line 229 print_man(const struct man_node *n, int indent) |
|
Line 242 print_man(const struct man_node *n, int indent) |
|
} |
} |
|
|
if (n->span) { |
if (n->span) { |
assert(NULL == p); |
assert(NULL == p && NULL == t); |
print_span(n->span, indent); |
print_span(n->span, indent); |
|
} else if (n->eqn) { |
|
assert(NULL == p && NULL == t); |
|
print_box(n->eqn->root, indent); |
} else { |
} else { |
for (i = 0; i < indent; i++) |
for (i = 0; i < indent; i++) |
putchar('\t'); |
putchar('\t'); |
printf("%s (%s) %d:%d", p, t, n->line, n->pos); |
printf("%s (%s) %d:%d\n", p, t, n->line, n->pos); |
} |
} |
|
|
putchar('\n'); |
|
|
|
if (n->child) |
if (n->child) |
print_man(n->child, indent + 1); |
print_man(n->child, indent + 1); |
if (n->next) |
if (n->next) |
Line 246 print_man(const struct man_node *n, int indent) |
|
Line 260 print_man(const struct man_node *n, int indent) |
|
} |
} |
|
|
static void |
static void |
|
print_box(const struct eqn_box *ep, int indent) |
|
{ |
|
int i; |
|
|
|
if (NULL == ep) |
|
return; |
|
for (i = 0; i < indent; i++) |
|
putchar('\t'); |
|
|
|
switch (ep->type) { |
|
case (EQN_ROOT): |
|
printf("eqn-root(%d, %d, %d, %d)\n", |
|
EQN_DEFSIZE == ep->size ? 0 : ep->size, |
|
ep->pos, ep->font, ep->mark); |
|
print_box(ep->first, indent + 1); |
|
break; |
|
case (EQN_LIST): |
|
printf("eqn-list(%d, %d, %d, %d, %d, %d, \"%s\", \"%s\")\n", |
|
EQN_DEFSIZE == ep->size ? 0 : ep->size, |
|
ep->pos, ep->font, ep->mark, |
|
ep->pile, ep->above, |
|
ep->left ? ep->left : "", |
|
ep->right ? ep->right : ""); |
|
print_box(ep->first, indent + 1); |
|
break; |
|
case (EQN_SUBEXPR): |
|
printf("eqn-subxpr(%d, %d, %d, %d, %d, %d, \"%s\", \"%s\")\n", |
|
EQN_DEFSIZE == ep->size ? 0 : ep->size, |
|
ep->pos, ep->font, ep->mark, |
|
ep->pile, ep->above, |
|
ep->left ? ep->left : "", |
|
ep->right ? ep->right : ""); |
|
print_box(ep->first, indent + 1); |
|
break; |
|
case (EQN_TEXT): |
|
printf("eqn-text(%d, %d, %d, %d): [%s]\n", |
|
EQN_DEFSIZE == ep->size ? 0 : ep->size, |
|
ep->pos, ep->font, ep->mark, ep->text); |
|
break; |
|
default: |
|
break; |
|
} |
|
|
|
print_box(ep->next, indent); |
|
} |
|
|
|
static void |
print_span(const struct tbl_span *sp, int indent) |
print_span(const struct tbl_span *sp, int indent) |
{ |
{ |
const struct tbl_dat *dp; |
const struct tbl_dat *dp; |
Line 254 print_span(const struct tbl_span *sp, int indent) |
|
Line 315 print_span(const struct tbl_span *sp, int indent) |
|
for (i = 0; i < indent; i++) |
for (i = 0; i < indent; i++) |
putchar('\t'); |
putchar('\t'); |
|
|
printf("tbl: "); |
|
|
|
switch (sp->pos) { |
switch (sp->pos) { |
case (TBL_SPAN_HORIZ): |
case (TBL_SPAN_HORIZ): |
putchar('-'); |
putchar('-'); |
Line 288 print_span(const struct tbl_span *sp, int indent) |
|
Line 347 print_span(const struct tbl_span *sp, int indent) |
|
if (NULL == dp->layout) |
if (NULL == dp->layout) |
putchar('*'); |
putchar('*'); |
putchar(']'); |
putchar(']'); |
if (dp->next) |
putchar(' '); |
putchar(' '); |
|
} |
} |
|
|
|
printf("(tbl) %d:1\n", sp->line); |
} |
} |