version 1.35, 2009/10/08 23:00:15 |
version 1.39, 2009/10/18 13:34:16 |
|
|
#include <stdlib.h> |
#include <stdlib.h> |
#include <string.h> |
#include <string.h> |
|
|
#include "term.h" |
|
#include "man.h" |
#include "man.h" |
|
#include "term.h" |
|
#include "chars.h" |
|
#include "main.h" |
|
|
#define INDENT 7 |
#define INDENT 7 |
#define HALFINDENT 3 |
#define HALFINDENT 3 |
|
|
void (*post)(DECL_ARGS); |
void (*post)(DECL_ARGS); |
}; |
}; |
|
|
|
#ifdef __linux__ |
|
extern size_t strlcpy(char *, const char *, size_t); |
|
extern size_t strlcat(char *, const char *, size_t); |
|
#endif |
|
|
|
static int arg2width(const struct man_node *); |
|
static int arg2height(const struct man_node *); |
|
|
|
static void print_head(struct termp *, |
|
const struct man_meta *); |
|
static void print_body(DECL_ARGS); |
|
static void print_node(DECL_ARGS); |
|
static void print_foot(struct termp *, |
|
const struct man_meta *); |
|
static void print_bvspace(struct termp *, |
|
const struct man_node *); |
|
|
static int pre_B(DECL_ARGS); |
static int pre_B(DECL_ARGS); |
static int pre_BI(DECL_ARGS); |
static int pre_BI(DECL_ARGS); |
static int pre_HP(DECL_ARGS); |
static int pre_HP(DECL_ARGS); |
Line 123 static const struct termact termacts[MAN_MAX] = { |
|
Line 142 static const struct termact termacts[MAN_MAX] = { |
|
{ pre_ign, NULL }, /* UC */ |
{ pre_ign, NULL }, /* UC */ |
}; |
}; |
|
|
#ifdef __linux__ |
|
extern size_t strlcpy(char *, const char *, size_t); |
|
extern size_t strlcat(char *, const char *, size_t); |
|
#endif |
|
|
|
static void print_head(struct termp *, |
|
const struct man_meta *); |
|
static void print_body(DECL_ARGS); |
|
static void print_node(DECL_ARGS); |
|
static void print_foot(struct termp *, |
|
const struct man_meta *); |
|
static void fmt_block_vspace(struct termp *, |
|
const struct man_node *); |
|
static int arg_width(const struct man_node *); |
|
|
|
|
|
void |
void |
man_run(struct termp *p, const struct man *m) |
terminal_man(void *arg, const struct man *man) |
{ |
{ |
struct mtermp mt; |
struct termp *p; |
|
const struct man_node *n; |
|
const struct man_meta *m; |
|
struct mtermp mt; |
|
|
print_head(p, man_meta(m)); |
p = (struct termp *)arg; |
|
|
|
if (NULL == p->symtab) |
|
switch (p->enc) { |
|
case (TERMENC_ASCII): |
|
p->symtab = chars_init(CHARS_ASCII); |
|
break; |
|
default: |
|
abort(); |
|
/* NOTREACHED */ |
|
} |
|
|
|
n = man_node(man); |
|
m = man_meta(man); |
|
|
|
print_head(p, m); |
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
|
|
mt.fl = 0; |
mt.fl = 0; |
mt.lmargin = INDENT; |
mt.lmargin = INDENT; |
mt.offset = INDENT; |
mt.offset = INDENT; |
|
|
if (man_node(m)->child) |
if (n->child) |
print_body(p, &mt, man_node(m)->child, man_meta(m)); |
print_body(p, &mt, n->child, m); |
print_foot(p, man_meta(m)); |
print_foot(p, m); |
} |
} |
|
|
|
|
static void |
static int |
fmt_block_vspace(struct termp *p, const struct man_node *n) |
arg2height(const struct man_node *n) |
{ |
{ |
term_newln(p); |
int r; |
|
|
if (NULL == n->prev) |
assert(MAN_TEXT == n->type); |
return; |
assert(n->string); |
|
|
if (MAN_SS == n->prev->tok) |
if ((r = a2height(n->string)) < 0) |
return; |
return(1); |
if (MAN_SH == n->prev->tok) |
|
return; |
|
|
|
term_vspace(p); |
return(r); |
} |
} |
|
|
|
|
static int |
static int |
arg_width(const struct man_node *n) |
arg2width(const struct man_node *n) |
{ |
{ |
int i, len; |
|
const char *p; |
|
|
|
assert(MAN_TEXT == n->type); |
assert(MAN_TEXT == n->type); |
assert(n->string); |
assert(n->string); |
|
return(a2width(n->string)); |
|
} |
|
|
p = n->string; |
|
|
|
if (0 == (len = (int)strlen(p))) |
static void |
return(-1); |
print_bvspace(struct termp *p, const struct man_node *n) |
|
{ |
|
term_newln(p); |
|
|
for (i = 0; i < len; i++) |
if (NULL == n->prev) |
if ( ! isdigit((u_char)p[i])) |
return; |
break; |
|
|
|
if (i == len - 1) { |
if (MAN_SS == n->prev->tok) |
if ('n' == p[len - 1] || 'm' == p[len - 1]) |
return; |
return(atoi(p)); |
if (MAN_SH == n->prev->tok) |
} else if (i == len) |
return; |
return(atoi(p)); |
|
|
|
return(-1); |
term_vspace(p); |
} |
} |
|
|
|
|
Line 397 pre_sp(DECL_ARGS) |
|
Line 417 pre_sp(DECL_ARGS) |
|
{ |
{ |
int i, len; |
int i, len; |
|
|
if (NULL == n->child) { |
len = n->child ? arg2height(n->child) : 1; |
term_vspace(p); |
|
return(0); |
|
} |
|
|
|
len = atoi(n->child->string); |
|
if (0 == len) |
if (0 == len) |
term_newln(p); |
term_newln(p); |
for (i = 0; i < len; i++) |
for (i = 0; i < len; i++) |
Line 432 pre_HP(DECL_ARGS) |
|
Line 448 pre_HP(DECL_ARGS) |
|
|
|
switch (n->type) { |
switch (n->type) { |
case (MAN_BLOCK): |
case (MAN_BLOCK): |
fmt_block_vspace(p, n); |
print_bvspace(p, n); |
return(1); |
return(1); |
case (MAN_BODY): |
case (MAN_BODY): |
p->flags |= TERMP_NOBREAK; |
p->flags |= TERMP_NOBREAK; |
Line 448 pre_HP(DECL_ARGS) |
|
Line 464 pre_HP(DECL_ARGS) |
|
/* Calculate offset. */ |
/* Calculate offset. */ |
|
|
if (NULL != (nn = n->parent->head->child)) |
if (NULL != (nn = n->parent->head->child)) |
if ((ival = arg_width(nn)) >= 0) |
if ((ival = arg2width(nn)) >= 0) |
len = (size_t)ival; |
len = (size_t)ival; |
|
|
if (0 == len) |
if (0 == len) |
Line 494 pre_PP(DECL_ARGS) |
|
Line 510 pre_PP(DECL_ARGS) |
|
switch (n->type) { |
switch (n->type) { |
case (MAN_BLOCK): |
case (MAN_BLOCK): |
mt->lmargin = INDENT; |
mt->lmargin = INDENT; |
fmt_block_vspace(p, n); |
print_bvspace(p, n); |
break; |
break; |
default: |
default: |
p->offset = mt->offset; |
p->offset = mt->offset; |
Line 523 pre_IP(DECL_ARGS) |
|
Line 539 pre_IP(DECL_ARGS) |
|
p->flags |= TERMP_TWOSPACE; |
p->flags |= TERMP_TWOSPACE; |
break; |
break; |
case (MAN_BLOCK): |
case (MAN_BLOCK): |
fmt_block_vspace(p, n); |
print_bvspace(p, n); |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
default: |
default: |
return(1); |
return(1); |
Line 538 pre_IP(DECL_ARGS) |
|
Line 554 pre_IP(DECL_ARGS) |
|
if (NULL != (nn = nn->next)) { |
if (NULL != (nn = nn->next)) { |
for ( ; nn->next; nn = nn->next) |
for ( ; nn->next; nn = nn->next) |
/* Do nothing. */ ; |
/* Do nothing. */ ; |
if ((ival = arg_width(nn)) >= 0) |
if ((ival = arg2width(nn)) >= 0) |
len = (size_t)ival; |
len = (size_t)ival; |
} |
} |
|
|
Line 612 pre_TP(DECL_ARGS) |
|
Line 628 pre_TP(DECL_ARGS) |
|
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
break; |
break; |
case (MAN_BLOCK): |
case (MAN_BLOCK): |
fmt_block_vspace(p, n); |
print_bvspace(p, n); |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
default: |
default: |
return(1); |
return(1); |
Line 625 pre_TP(DECL_ARGS) |
|
Line 641 pre_TP(DECL_ARGS) |
|
|
|
if (NULL != (nn = n->parent->head->child)) |
if (NULL != (nn = n->parent->head->child)) |
if (NULL != nn->next) |
if (NULL != nn->next) |
if ((ival = arg_width(nn)) >= 0) |
if ((ival = arg2width(nn)) >= 0) |
len = (size_t)ival; |
len = (size_t)ival; |
|
|
switch (n->type) { |
switch (n->type) { |
Line 803 pre_RS(DECL_ARGS) |
|
Line 819 pre_RS(DECL_ARGS) |
|
return(1); |
return(1); |
} |
} |
|
|
if ((ival = arg_width(nn)) < 0) |
if ((ival = arg2width(nn)) < 0) |
return(1); |
return(1); |
|
|
mt->offset = INDENT + (size_t)ival; |
mt->offset = INDENT + (size_t)ival; |