version 1.1, 2009/02/20 11:04:23 |
version 1.2, 2009/02/20 23:35:36 |
|
|
* PERFORMANCE OF THIS SOFTWARE. |
* PERFORMANCE OF THIS SOFTWARE. |
*/ |
*/ |
#include <assert.h> |
#include <assert.h> |
|
#include <ctype.h> |
#include <curses.h> |
#include <curses.h> |
#include <err.h> |
#include <err.h> |
#include <stdlib.h> |
#include <stdlib.h> |
|
|
#include <term.h> |
#include <term.h> |
#include <unistd.h> |
#include <unistd.h> |
|
|
#include "mdoc.h" |
#include "private.h" |
|
|
|
|
static int termprint_r(size_t, size_t, |
enum termesc { |
|
ESC_CLEAR, |
|
ESC_BOLD, |
|
ESC_UNDERLINE |
|
}; |
|
|
|
struct termp { |
|
size_t maxvisible; |
|
size_t maxcols; |
|
size_t indent; |
|
size_t col; |
|
int flags; |
|
#define TERMP_BOLD (1 << 0) |
|
#define TERMP_UNDERLINE (1 << 1) |
|
#define TERMP_NOSPACE (1 << 2) |
|
char *buf; |
|
}; |
|
|
|
struct termact { |
|
int (*pre)(struct termp *, |
|
const struct mdoc_meta *, |
const struct mdoc_node *); |
const struct mdoc_node *); |
static void termprint_head(size_t, |
int (*post)(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
}; |
|
|
|
static void termprint_r(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static void termprint_header(struct termp *, |
const struct mdoc_meta *); |
const struct mdoc_meta *); |
static void termprint_tail(size_t, |
static void termprint_footer(struct termp *, |
const struct mdoc_meta *); |
const struct mdoc_meta *); |
|
|
static char *arch2a(enum mdoc_arch); |
static void newln(struct termp *); |
static char *vol2a(enum mdoc_vol); |
static void vspace(struct termp *); |
static char *msec2a(enum mdoc_msec); |
static void pword(struct termp *, const char *, size_t); |
|
static void word(struct termp *, const char *); |
|
|
static size_t ttitle2a(char *, enum mdoc_vol, enum mdoc_msec, |
static int termp_it_pre(struct termp *, |
enum mdoc_arch, size_t); |
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_ns_pre(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_pp_pre(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_fl_pre(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_op_pre(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_op_post(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_bl_post(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_sh_post(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_sh_pre(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_nd_pre(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_bold_pre(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_under_pre(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_bold_post(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
static int termp_under_post(struct termp *, |
|
const struct mdoc_meta *, |
|
const struct mdoc_node *); |
|
|
|
const struct termact termacts[MDOC_MAX] = { |
|
{ NULL, NULL }, /* \" */ |
|
{ NULL, NULL }, /* Dd */ |
|
{ NULL, NULL }, /* Dt */ |
|
{ NULL, NULL }, /* Os */ |
|
{ termp_sh_pre, termp_sh_post }, /* Sh */ |
|
{ NULL, NULL }, /* Ss */ |
|
{ termp_pp_pre, NULL }, /* Pp */ |
|
{ NULL, NULL }, /* D1 */ |
|
{ NULL, NULL }, /* Dl */ |
|
{ NULL, NULL }, /* Bd */ |
|
{ NULL, NULL }, /* Ed */ |
|
{ NULL, termp_bl_post }, /* Bl */ |
|
{ NULL, NULL }, /* El */ |
|
{ termp_it_pre, NULL }, /* It */ |
|
{ NULL, NULL }, /* Ad */ |
|
{ NULL, NULL }, /* An */ |
|
{ termp_under_pre, termp_under_post }, /* Ar */ |
|
{ NULL, NULL }, /* Cd */ |
|
{ NULL, NULL }, /* Cm */ |
|
{ NULL, NULL }, /* Dv */ |
|
{ NULL, NULL }, /* Er */ |
|
{ NULL, NULL }, /* Ev */ |
|
{ NULL, NULL }, /* Ex */ |
|
{ NULL, NULL }, /* Fa */ |
|
{ NULL, NULL }, /* Fd */ |
|
{ termp_fl_pre, termp_bold_post }, /* Fl */ |
|
{ NULL, NULL }, /* Fn */ |
|
{ NULL, NULL }, /* Ft */ |
|
{ NULL, NULL }, /* Ic */ |
|
{ NULL, NULL }, /* In */ |
|
{ NULL, NULL }, /* Li */ |
|
{ termp_nd_pre, NULL }, /* Nd */ |
|
{ termp_bold_pre, termp_bold_post }, /* Nm */ |
|
{ termp_op_pre, termp_op_post }, /* Op */ |
|
{ NULL, NULL }, /* Ot */ |
|
{ NULL, NULL }, /* Pa */ |
|
{ NULL, NULL }, /* Rv */ |
|
{ NULL, NULL }, /* St */ |
|
{ NULL, NULL }, /* Va */ |
|
{ NULL, NULL }, /* Vt */ |
|
{ NULL, NULL }, /* Xr */ |
|
{ NULL, NULL }, /* %A */ |
|
{ NULL, NULL }, /* %B */ |
|
{ NULL, NULL }, /* %D */ |
|
{ NULL, NULL }, /* %I */ |
|
{ NULL, NULL }, /* %J */ |
|
{ NULL, NULL }, /* %N */ |
|
{ NULL, NULL }, /* %O */ |
|
{ NULL, NULL }, /* %P */ |
|
{ NULL, NULL }, /* %R */ |
|
{ NULL, NULL }, /* %T */ |
|
{ NULL, NULL }, /* %V */ |
|
{ NULL, NULL }, /* Ac */ |
|
{ NULL, NULL }, /* Ao */ |
|
{ NULL, NULL }, /* Aq */ |
|
{ NULL, NULL }, /* At */ |
|
{ NULL, NULL }, /* Bc */ |
|
{ NULL, NULL }, /* Bf */ |
|
{ NULL, NULL }, /* Bo */ |
|
{ NULL, NULL }, /* Bq */ |
|
{ NULL, NULL }, /* Bsx */ |
|
{ NULL, NULL }, /* Bx */ |
|
{ NULL, NULL }, /* Db */ |
|
{ NULL, NULL }, /* Dc */ |
|
{ NULL, NULL }, /* Do */ |
|
{ NULL, NULL }, /* Dq */ |
|
{ NULL, NULL }, /* Ec */ |
|
{ NULL, NULL }, /* Ef */ |
|
{ NULL, NULL }, /* Em */ |
|
{ NULL, NULL }, /* Eo */ |
|
{ NULL, NULL }, /* Fx */ |
|
{ NULL, NULL }, /* Ms */ |
|
{ NULL, NULL }, /* No */ |
|
{ termp_ns_pre, NULL }, /* Ns */ |
|
{ NULL, NULL }, /* Nx */ |
|
{ NULL, NULL }, /* Ox */ |
|
{ NULL, NULL }, /* Pc */ |
|
{ NULL, NULL }, /* Pf */ |
|
{ NULL, NULL }, /* Po */ |
|
{ NULL, NULL }, /* Pq */ |
|
{ NULL, NULL }, /* Qc */ |
|
{ NULL, NULL }, /* Ql */ |
|
{ NULL, NULL }, /* Qo */ |
|
{ NULL, NULL }, /* Qq */ |
|
{ NULL, NULL }, /* Re */ |
|
{ NULL, NULL }, /* Rs */ |
|
{ NULL, NULL }, /* Sc */ |
|
{ NULL, NULL }, /* So */ |
|
{ NULL, NULL }, /* Sq */ |
|
{ NULL, NULL }, /* Sm */ |
|
{ NULL, NULL }, /* Sx */ |
|
{ NULL, NULL }, /* Sy */ |
|
{ NULL, NULL }, /* Tn */ |
|
{ NULL, NULL }, /* Ux */ |
|
{ NULL, NULL }, /* Xc */ |
|
{ NULL, NULL }, /* Xo */ |
|
{ NULL, NULL }, /* Fo */ |
|
{ NULL, NULL }, /* Fc */ |
|
{ NULL, NULL }, /* Oo */ |
|
{ NULL, NULL }, /* Oc */ |
|
{ NULL, NULL }, /* Bk */ |
|
{ NULL, NULL }, /* Ek */ |
|
{ NULL, NULL }, /* Bt */ |
|
{ NULL, NULL }, /* Hf */ |
|
{ NULL, NULL }, /* Fr */ |
|
{ NULL, NULL }, /* Ud */ |
|
}; |
|
|
static char * |
|
arch2a(enum mdoc_arch arch) |
static void |
|
flush(struct termp *p) |
{ |
{ |
|
size_t i, j, vsz, vis, maxvis; |
|
|
switch (arch) { |
maxvis = p->maxvisible - (p->indent * 4); |
case (ARCH_alpha): |
vis = 0; |
return("Alpha"); |
|
case (ARCH_amd64): |
for (j = 0; j < (p->indent * 4); j++) |
return("AMD64"); |
putchar(' '); |
case (ARCH_amiga): |
|
return("Amiga"); |
for (i = 0; i < p->col; i++) { |
case (ARCH_arc): |
for (j = i, vsz = 0; j < p->col; j++) { |
return("ARC"); |
if (isspace(p->buf[j])) |
case (ARCH_arm): |
break; |
return("ARM"); |
else if (27 == p->buf[j]) { |
case (ARCH_armish): |
assert(j + 4 <= p->col); |
return("ARMISH"); |
j += 3; |
case (ARCH_aviion): |
} else |
return("AViion"); |
vsz++; |
case (ARCH_hp300): |
} |
return("HP300"); |
assert(vsz > 0); |
case (ARCH_hppa): |
|
return("HPPA"); |
if (vis && vis + vsz >= maxvis) { |
case (ARCH_hppa64): |
putchar('\n'); |
return("HPPA64"); |
for (j = 0; j < (p->indent * 4); j++) |
case (ARCH_i386): |
putchar(' '); |
return("i386"); |
vis = 0; |
case (ARCH_landisk): |
} |
return("LANDISK"); |
|
case (ARCH_luna88k): |
for ( ; i < p->col; i++) { |
return("Luna88k"); |
if (isspace(p->buf[i])) |
case (ARCH_mac68k): |
break; |
return("Mac68k"); |
putchar(p->buf[i]); |
case (ARCH_macppc): |
} |
return("MacPPC"); |
vis += vsz; |
case (ARCH_mvme68k): |
if (i < p->col) { |
return("MVME68k"); |
putchar(' '); |
case (ARCH_mvme88k): |
vis++; |
return("MVME88k"); |
} |
case (ARCH_mvmeppc): |
} |
return("MVMEPPC"); |
|
case (ARCH_pmax): |
putchar('\n'); |
return("PMAX"); |
p->col = 0; |
case (ARCH_sgi): |
} |
return("SGI"); |
|
case (ARCH_socppc): |
|
return("SOCPPC"); |
static void |
case (ARCH_sparc): |
newln(struct termp *p) |
return("SPARC"); |
{ |
case (ARCH_sparc64): |
|
return("SPARC64"); |
p->flags |= TERMP_NOSPACE; |
case (ARCH_sun3): |
if (0 == p->col) |
return("Sun3"); |
return; |
case (ARCH_vax): |
flush(p); |
return("VAX"); |
} |
case (ARCH_zaurus): |
|
return("Zaurus"); |
|
default: |
static void |
|
vspace(struct termp *p) |
|
{ |
|
|
|
newln(p); |
|
putchar('\n'); |
|
} |
|
|
|
|
|
static void |
|
chara(struct termp *p, char c) |
|
{ |
|
|
|
if (p->col + 1 >= p->maxcols) |
|
errx(1, "line overrun"); |
|
|
|
p->buf[(p->col)++] = c; |
|
} |
|
|
|
|
|
static void |
|
escape(struct termp *p, enum termesc esc) |
|
{ |
|
|
|
if (p->col + 4 >= p->maxcols) |
|
errx(1, "line overrun"); |
|
|
|
p->buf[(p->col)++] = 27; |
|
p->buf[(p->col)++] = '['; |
|
switch (esc) { |
|
case (ESC_CLEAR): |
|
p->buf[(p->col)++] = '0'; |
break; |
break; |
|
case (ESC_BOLD): |
|
p->buf[(p->col)++] = '1'; |
|
break; |
|
case (ESC_UNDERLINE): |
|
p->buf[(p->col)++] = '4'; |
|
break; |
|
default: |
|
abort(); |
|
/* NOTREACHED */ |
} |
} |
|
p->buf[(p->col)++] = 'm'; |
|
} |
|
|
return(NULL); |
|
|
static void |
|
pword(struct termp *p, const char *word, size_t len) |
|
{ |
|
size_t i; |
|
|
|
assert(len > 0); |
|
|
|
if ( ! (p->flags & TERMP_NOSPACE)) |
|
chara(p, ' '); |
|
|
|
p->flags &= ~TERMP_NOSPACE; |
|
|
|
if (p->flags & TERMP_BOLD) |
|
escape(p, ESC_BOLD); |
|
if (p->flags & TERMP_UNDERLINE) |
|
escape(p, ESC_UNDERLINE); |
|
|
|
for (i = 0; i < len; i++) |
|
chara(p, word[i]); |
|
|
|
if (p->flags & TERMP_BOLD || |
|
p->flags & TERMP_UNDERLINE) |
|
escape(p, ESC_CLEAR); |
} |
} |
|
|
|
|
static char * |
static void |
vol2a(enum mdoc_vol vol) |
word(struct termp *p, const char *word) |
{ |
{ |
|
size_t i, j, len; |
|
|
switch (vol) { |
/* TODO: delimiters? */ |
case (VOL_AMD): |
|
return("OpenBSD Ancestral Manual Documents"); |
len = strlen(word); |
case (VOL_IND): |
assert(len > 0); |
return("OpenBSD Manual Master Index"); |
|
case (VOL_KM): |
for (j = i = 0; i < len; i++) { |
return("OpenBSD Kernel Manual"); |
if ( ! isspace(word[i])) { |
case (VOL_LOCAL): |
j++; |
return("OpenBSD Local Manual"); |
continue; |
case (VOL_PRM): |
} |
return("OpenBSD Programmer's Manual"); |
if (0 == j) |
case (VOL_PS1): |
continue; |
return("OpenBSD Programmer's Supplementary Documents"); |
assert(i >= j); |
case (VOL_SMM): |
pword(p, &word[i - j], j); |
return("OpenBSD System Manager's Manual"); |
j = 0; |
case (VOL_URM): |
} |
return("OpenBSD Reference Manual"); |
if (j > 0) { |
case (VOL_USD): |
assert(i >= j); |
return("OpenBSD User's Supplementary Documents"); |
pword(p, &word[i - j], j); |
|
} |
|
} |
|
|
|
|
|
static int |
|
termp_it_pre(struct termp *p, const struct mdoc_meta *meta, |
|
const struct mdoc_node *node) |
|
{ |
|
|
|
switch (node->type) { |
|
case (MDOC_HEAD): |
|
/* TODO: only print one, if compat. */ |
|
vspace(p); |
|
break; |
default: |
default: |
break; |
break; |
} |
} |
|
return(1); |
|
} |
|
|
return(NULL); |
|
|
static int |
|
termp_bold_post(struct termp *p, const struct mdoc_meta *meta, |
|
const struct mdoc_node *node) |
|
{ |
|
|
|
p->flags &= ~TERMP_BOLD; |
|
return(1); |
} |
} |
|
|
|
|
static char * |
static int |
msec2a(enum mdoc_msec msec) |
termp_under_pre(struct termp *p, const struct mdoc_meta *meta, |
|
const struct mdoc_node *node) |
{ |
{ |
|
|
switch (msec) { |
p->flags |= TERMP_UNDERLINE; |
case(MSEC_1): |
return(1); |
return("1"); |
} |
case(MSEC_2): |
|
return("2"); |
|
case(MSEC_3): |
static int |
return("3"); |
termp_bold_pre(struct termp *p, const struct mdoc_meta *meta, |
case(MSEC_3f): |
const struct mdoc_node *node) |
return("3f"); |
{ |
case(MSEC_3p): |
|
return("3p"); |
p->flags |= TERMP_BOLD; |
case(MSEC_4): |
return(1); |
return("4"); |
} |
case(MSEC_5): |
|
return("5"); |
|
case(MSEC_6): |
static int |
return("6"); |
termp_ns_pre(struct termp *p, const struct mdoc_meta *meta, |
case(MSEC_7): |
const struct mdoc_node *node) |
return("7"); |
{ |
case(MSEC_8): |
|
return("8"); |
p->flags |= TERMP_NOSPACE; |
case(MSEC_9): |
return(1); |
return("9"); |
} |
case(MSEC_X11): |
|
return("X11"); |
|
case(MSEC_X11R6): |
static int |
return("X11R6"); |
termp_pp_pre(struct termp *p, const struct mdoc_meta *meta, |
case(MSEC_local): |
const struct mdoc_node *node) |
return("local"); |
{ |
case(MSEC_n): |
|
return("n"); |
vspace(p); |
case(MSEC_unass): |
return(1); |
/* FALLTHROUGH */ |
} |
case(MSEC_draft): |
|
return("draft"); |
|
case(MSEC_paper): |
static int |
return("paper"); |
termp_under_post(struct termp *p, const struct mdoc_meta *meta, |
|
const struct mdoc_node *node) |
|
{ |
|
|
|
p->flags &= ~TERMP_UNDERLINE; |
|
return(1); |
|
} |
|
|
|
|
|
static int |
|
termp_nd_pre(struct termp *p, const struct mdoc_meta *meta, |
|
const struct mdoc_node *node) |
|
{ |
|
|
|
word(p, "-"); |
|
return(1); |
|
} |
|
|
|
|
|
static int |
|
termp_bl_post(struct termp *p, const struct mdoc_meta *meta, |
|
const struct mdoc_node *node) |
|
{ |
|
|
|
switch (node->type) { |
|
case (MDOC_BLOCK): |
|
newln(p); |
|
break; |
default: |
default: |
break; |
break; |
} |
} |
return(NULL); |
return(1); |
} |
} |
|
|
|
|
static size_t |
static int |
ttitle2a(char *dst, enum mdoc_vol vol, enum mdoc_msec msec, |
termp_op_post(struct termp *p, const struct mdoc_meta *meta, |
enum mdoc_arch arch, size_t sz) |
const struct mdoc_node *node) |
{ |
{ |
char *p; |
|
size_t ssz; |
|
|
|
if (NULL == (p = vol2a(vol))) |
switch (node->type) { |
switch (msec) { |
case (MDOC_BODY): |
case (MSEC_1): |
p->flags |= TERMP_NOSPACE; |
/* FALLTHROUGH */ |
word(p, "\\(rB"); |
case (MSEC_6): |
break; |
/* FALLTHROUGH */ |
default: |
case (MSEC_7): |
break; |
p = vol2a(VOL_URM); |
} |
break; |
return(1); |
case (MSEC_8): |
} |
p = vol2a(VOL_SMM); |
|
break; |
|
case (MSEC_2): |
|
/* FALLTHROUGH */ |
|
case (MSEC_3): |
|
/* FALLTHROUGH */ |
|
case (MSEC_4): |
|
/* FALLTHROUGH */ |
|
case (MSEC_5): |
|
p = vol2a(VOL_PRM); |
|
break; |
|
case (MSEC_9): |
|
p = vol2a(VOL_KM); |
|
break; |
|
default: |
|
/* FIXME: capitalise. */ |
|
if (NULL == (p = msec2a(msec))) |
|
p = msec2a(MSEC_local); |
|
break; |
|
} |
|
assert(p); |
|
|
|
if ((ssz = strlcpy(dst, p, sz)) >= sz) |
|
return(ssz); |
|
|
|
if ((p = arch2a(arch))) { |
static int |
if ((ssz = strlcat(dst, " (", sz)) >= sz) |
termp_sh_post(struct termp *p, const struct mdoc_meta *meta, |
return(ssz); |
const struct mdoc_node *node) |
if ((ssz = strlcat(dst, p, sz)) >= sz) |
{ |
return(ssz); |
|
if ((ssz = strlcat(dst, ")", sz)) >= sz) |
switch (node->type) { |
return(ssz); |
case (MDOC_HEAD): |
|
p->flags &= ~TERMP_BOLD; |
|
newln(p); |
|
break; |
|
case (MDOC_BODY): |
|
newln(p); |
|
(p->indent)--; |
|
break; |
|
default: |
|
break; |
} |
} |
|
return(1); |
|
} |
|
|
return(ssz); |
|
|
static int |
|
termp_sh_pre(struct termp *p, const struct mdoc_meta *meta, |
|
const struct mdoc_node *node) |
|
{ |
|
|
|
switch (node->type) { |
|
case (MDOC_HEAD): |
|
vspace(p); |
|
p->flags |= TERMP_BOLD; |
|
break; |
|
case (MDOC_BODY): |
|
(p->indent)++; |
|
break; |
|
default: |
|
break; |
|
} |
|
return(1); |
} |
} |
|
|
|
|
static int |
static int |
termprint_r(size_t cols, size_t indent, const struct mdoc_node *node) |
termp_op_pre(struct termp *p, const struct mdoc_meta *meta, |
|
const struct mdoc_node *node) |
{ |
{ |
|
|
|
switch (node->type) { |
|
case (MDOC_BODY): |
|
word(p, "\\(lB"); |
|
p->flags |= TERMP_NOSPACE; |
|
break; |
|
default: |
|
break; |
|
} |
return(1); |
return(1); |
} |
} |
|
|
|
|
|
static int |
|
termp_fl_pre(struct termp *p, const struct mdoc_meta *meta, |
|
const struct mdoc_node *node) |
|
{ |
|
|
|
p->flags |= TERMP_BOLD; |
|
word(p, "-"); |
|
p->flags |= TERMP_NOSPACE; |
|
return(1); |
|
} |
|
|
|
|
static void |
static void |
termprint_tail(size_t cols, const struct mdoc_meta *meta) |
termprint_r(struct termp *p, const struct mdoc_meta *meta, |
|
const struct mdoc_node *node) |
{ |
{ |
|
|
|
/* Pre-processing ----------------- */ |
|
|
|
if (MDOC_TEXT != node->type) { |
|
if (termacts[node->tok].pre) |
|
if ( ! (*termacts[node->tok].pre)(p, meta, node)) |
|
return; |
|
} else /* MDOC_TEXT == node->type */ |
|
word(p, node->data.text.string); |
|
|
|
/* Children ---------------------- */ |
|
|
|
if (NULL == node->child) { |
|
/* No-child processing. */ |
|
switch (node->type) { |
|
case (MDOC_ELEM): |
|
switch (node->tok) { |
|
case (MDOC_Nm): |
|
word(p, "progname"); /* TODO */ |
|
break; |
|
case (MDOC_Ar): |
|
word(p, "..."); |
|
break; |
|
default: |
|
break; |
|
} |
|
break; |
|
default: |
|
break; |
|
} |
|
} else |
|
termprint_r(p, meta, node->child); |
|
|
|
/* Post-processing --------------- */ |
|
|
|
if (MDOC_TEXT != node->type) { |
|
if (termacts[node->tok].post) |
|
if ( ! (*termacts[node->tok].post)(p, meta, node)) |
|
return; |
|
} |
|
|
|
/* Siblings ---------------------- */ |
|
|
|
if (node->next) |
|
termprint_r(p, meta, node->next); |
|
} |
|
|
|
|
|
static void |
|
termprint_footer(struct termp *p, const struct mdoc_meta *meta) |
|
{ |
struct tm *tm; |
struct tm *tm; |
char *buf, *os; |
char *buf, *os; |
size_t sz, osz, ssz, i; |
size_t sz, osz, ssz, i; |
|
|
if (NULL == (buf = malloc(cols))) |
if (NULL == (buf = malloc(p->maxvisible))) |
err(1, "malloc"); |
err(1, "malloc"); |
if (NULL == (os = malloc(cols))) |
if (NULL == (os = malloc(p->maxvisible))) |
err(1, "malloc"); |
err(1, "malloc"); |
|
|
tm = localtime(&meta->date); |
tm = localtime(&meta->date); |
if (NULL == strftime(buf, cols, "%B %d, %Y", tm)) |
if (NULL == strftime(buf, p->maxvisible, "%B %d, %Y", tm)) |
err(1, "strftime"); |
err(1, "strftime"); |
|
|
osz = strlcpy(os, meta->os, cols); |
osz = strlcpy(os, meta->os, p->maxvisible); |
|
|
sz = strlen(buf); |
sz = strlen(buf); |
ssz = sz + osz + 1; |
ssz = sz + osz + 1; |
|
|
if (ssz > cols) { |
if (ssz > p->maxvisible) { |
ssz -= cols; |
ssz -= p->maxvisible; |
assert(ssz <= osz); |
assert(ssz <= osz); |
os[osz - ssz] = 0; |
os[osz - ssz] = 0; |
ssz = 1; |
ssz = 1; |
} else |
} else |
ssz = cols - ssz + 1; |
ssz = p->maxvisible - ssz + 1; |
|
|
|
printf("\n"); |
printf("%s", os); |
printf("%s", os); |
for (i = 0; i < ssz; i++) |
for (i = 0; i < ssz; i++) |
printf(" "); |
printf(" "); |
|
|
printf("%s\n", buf); |
printf("%s\n", buf); |
|
fflush(stdout); |
|
|
free(buf); |
free(buf); |
free(os); |
free(os); |
Line 291 termprint_tail(size_t cols, const struct mdoc_meta *me |
|
Line 666 termprint_tail(size_t cols, const struct mdoc_meta *me |
|
|
|
|
|
static void |
static void |
termprint_head(size_t cols, const struct mdoc_meta *meta) |
termprint_header(struct termp *p, const struct mdoc_meta *meta) |
{ |
{ |
char *msec, *buf, *title; |
char *msec, *buf, *title, *pp; |
size_t ssz, tsz, ttsz, i; |
size_t ssz, tsz, ttsz, i;; |
|
|
if (NULL == (buf = malloc(cols))) |
if (NULL == (buf = malloc(p->maxvisible))) |
err(1, "malloc"); |
err(1, "malloc"); |
if (NULL == (title = malloc(cols))) |
if (NULL == (title = malloc(p->maxvisible))) |
err(1, "malloc"); |
err(1, "malloc"); |
|
|
/* Format the manual page header. */ |
if (NULL == (pp = mdoc_vol2a(meta->vol))) |
|
switch (meta->msec) { |
|
case (MSEC_1): |
|
/* FALLTHROUGH */ |
|
case (MSEC_6): |
|
/* FALLTHROUGH */ |
|
case (MSEC_7): |
|
pp = mdoc_vol2a(VOL_URM); |
|
break; |
|
case (MSEC_8): |
|
pp = mdoc_vol2a(VOL_SMM); |
|
break; |
|
case (MSEC_2): |
|
/* FALLTHROUGH */ |
|
case (MSEC_3): |
|
/* FALLTHROUGH */ |
|
case (MSEC_4): |
|
/* FALLTHROUGH */ |
|
case (MSEC_5): |
|
pp = mdoc_vol2a(VOL_PRM); |
|
break; |
|
case (MSEC_9): |
|
pp = mdoc_vol2a(VOL_KM); |
|
break; |
|
default: |
|
/* FIXME: capitalise. */ |
|
if (NULL == (pp = mdoc_msec2a(meta->msec))) |
|
pp = mdoc_msec2a(MSEC_local); |
|
break; |
|
} |
|
assert(pp); |
|
|
tsz = ttitle2a(buf, meta->vol, meta->msec, meta->arch, cols); |
tsz = strlcpy(buf, pp, p->maxvisible); |
ttsz = strlcpy(title, meta->title, cols); |
assert(tsz < p->maxvisible); |
|
|
if (NULL == (msec = msec2a(meta->msec))) |
if ((pp = mdoc_arch2a(meta->arch))) { |
|
tsz = strlcat(buf, " (", p->maxvisible); |
|
assert(tsz < p->maxvisible); |
|
tsz = strlcat(buf, pp, p->maxvisible); |
|
assert(tsz < p->maxvisible); |
|
tsz = strlcat(buf, ")", p->maxvisible); |
|
assert(tsz < p->maxvisible); |
|
} |
|
|
|
ttsz = strlcpy(title, meta->title, p->maxvisible); |
|
|
|
if (NULL == (msec = mdoc_msec2a(meta->msec))) |
msec = ""; |
msec = ""; |
|
|
ssz = (2 * (ttsz + 2 + strlen(msec))) + tsz + 2; |
ssz = (2 * (ttsz + 2 + strlen(msec))) + tsz + 2; |
|
|
if (ssz > cols) { |
if (ssz > p->maxvisible) { |
if ((ssz -= cols) % 2) |
if ((ssz -= p->maxvisible) % 2) |
ssz++; |
ssz++; |
ssz /= 2; |
ssz /= 2; |
|
|
Line 320 termprint_head(size_t cols, const struct mdoc_meta *me |
|
Line 736 termprint_head(size_t cols, const struct mdoc_meta *me |
|
title[ttsz - ssz] = 0; |
title[ttsz - ssz] = 0; |
ssz = 1; |
ssz = 1; |
} else |
} else |
ssz = ((cols - ssz) / 2) + 1; |
ssz = ((p->maxvisible - ssz) / 2) + 1; |
|
|
printf("%s(%s)", title, msec); |
printf("%s(%s)", title, msec); |
|
|
Line 332 termprint_head(size_t cols, const struct mdoc_meta *me |
|
Line 748 termprint_head(size_t cols, const struct mdoc_meta *me |
|
for (i = 0; i < ssz; i++) |
for (i = 0; i < ssz; i++) |
printf(" "); |
printf(" "); |
|
|
printf("%s(%s)\n\n", title, msec); |
printf("%s(%s)\n", title, msec); |
|
fflush(stdout); |
|
|
free(title); |
free(title); |
free(buf); |
free(buf); |
|
|
termprint(const struct mdoc_node *node, |
termprint(const struct mdoc_node *node, |
const struct mdoc_meta *meta) |
const struct mdoc_meta *meta) |
{ |
{ |
size_t cols; |
struct termp p; |
|
|
if (ERR == setupterm(NULL, STDOUT_FILENO, NULL)) |
if (ERR == setupterm(NULL, STDOUT_FILENO, NULL)) |
return(0); |
return(0); |
|
|
cols = columns < 60 ? 60 : (size_t)columns; |
p.maxvisible = columns < 60 ? 60 : (size_t)columns; |
|
p.maxcols = 1024; |
|
p.indent = p.col = 0; |
|
p.flags = TERMP_NOSPACE; |
|
|
termprint_head(cols, meta); |
if (NULL == (p.buf = malloc(p.maxcols))) |
if ( ! termprint_r(cols, 0, node)) |
err(1, "malloc"); |
return(0); |
|
termprint_tail(cols, meta); |
termprint_header(&p, meta); |
|
termprint_r(&p, meta, node); |
|
termprint_footer(&p, meta); |
|
|
|
free(p.buf); |
|
|
return(1); |
return(1); |
} |
} |
|
|