mandoc/mdoc_html.c - diff

Return to mdoc_html.c CVS log

Up to [cvsweb.bsd.lv] / mandoc

Diff for /mandoc/mdoc_html.c between version 1.26 and 1.113

version 1.26, 2009/10/07 15:06:03

version 1.113, 2010/11/29 13:02:47

Line 1

/* $Id$ */

* Permission to use, copy, modify, and distribute this software for any

* purpose with or without fee is hereby granted, provided that the above

Line 14

* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF

* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.

#ifdef HAVE_CONFIG_H

#include "config.h"

#endif

#include <sys/types.h>

#include <sys/param.h>

#include <sys/queue.h>

#include <assert.h>

#include <ctype.h>

#include <err.h>

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <unistd.h>

#include "mandoc.h"

#include "out.h"

#include "html.h"

#include "mdoc.h"

#include "main.h"

#define INDENT 5

#define HALFINDENT 3

Line 37

Line 40

const struct mdoc_node *n, \

struct html *h

#ifndef MIN

#define MIN(a,b) ((/*CONSTCOND*/(a)<(b))?(a):(b))

#endif

struct htmlmdoc {

int (*pre)(MDOC_ARGS);

void (*post)(MDOC_ARGS);

Line 46 static void print_mdoc(MDOC_ARGS);

Line 53 static void print_mdoc(MDOC_ARGS);

static void print_mdoc_head(MDOC_ARGS);

static void print_mdoc_node(MDOC_ARGS);

static void print_mdoc_nodelist(MDOC_ARGS);

static void synopsis_pre(struct html *,

const struct mdoc_node *);

static void a2width(const char *, struct roffsu *);

static void a2offs(const char *, struct roffsu *);

static int a2list(const struct mdoc_node *);

static void mdoc_root_post(MDOC_ARGS);

static int mdoc_root_pre(MDOC_ARGS);

static int mdoc_it_block_pre(MDOC_ARGS, int,

struct roffsu *, int,

struct roffsu *);

static int mdoc_it_head_pre(MDOC_ARGS, int,

struct roffsu *);

static int mdoc_it_body_pre(MDOC_ARGS, int);

static void mdoc__x_post(MDOC_ARGS);

static int mdoc__x_pre(MDOC_ARGS);

static int mdoc_ad_pre(MDOC_ARGS);

static int mdoc_an_pre(MDOC_ARGS);

static int mdoc_ap_pre(MDOC_ARGS);

static void mdoc_aq_post(MDOC_ARGS);

static int mdoc_aq_pre(MDOC_ARGS);

static int mdoc_ar_pre(MDOC_ARGS);

static int mdoc_bd_pre(MDOC_ARGS);

static int mdoc_bf_pre(MDOC_ARGS);

static void mdoc_bk_post(MDOC_ARGS);

static int mdoc_bk_pre(MDOC_ARGS);

static void mdoc_bl_post(MDOC_ARGS);

static int mdoc_bl_pre(MDOC_ARGS);

static void mdoc_bq_post(MDOC_ARGS);

static int mdoc_bq_pre(MDOC_ARGS);

static void mdoc_brq_post(MDOC_ARGS);

static int mdoc_brq_pre(MDOC_ARGS);

static int mdoc_bt_pre(MDOC_ARGS);

static int mdoc_bx_pre(MDOC_ARGS);

static int mdoc_cd_pre(MDOC_ARGS);

static int mdoc_d1_pre(MDOC_ARGS);

static void mdoc_dq_post(MDOC_ARGS);

static int mdoc_dq_pre(MDOC_ARGS);

static int mdoc_dv_pre(MDOC_ARGS);

static int mdoc_fa_pre(MDOC_ARGS);

static int mdoc_fd_pre(MDOC_ARGS);

Line 95 static int mdoc_ex_pre(MDOC_ARGS);

Line 91 static int mdoc_ex_pre(MDOC_ARGS);

static void mdoc_fo_post(MDOC_ARGS);

static int mdoc_fo_pre(MDOC_ARGS);

static int mdoc_ic_pre(MDOC_ARGS);

static int mdoc_igndelim_pre(MDOC_ARGS);

static int mdoc_in_pre(MDOC_ARGS);

static int mdoc_it_block_pre(MDOC_ARGS, enum mdoc_list,

int, struct roffsu *, struct roffsu *);

static int mdoc_it_head_pre(MDOC_ARGS, enum mdoc_list,

struct roffsu *);

static int mdoc_it_body_pre(MDOC_ARGS, enum mdoc_list,

struct roffsu *);

static int mdoc_it_pre(MDOC_ARGS);

static int mdoc_lb_pre(MDOC_ARGS);

static int mdoc_li_pre(MDOC_ARGS);

Line 105 static int mdoc_ms_pre(MDOC_ARGS);

Line 108 static int mdoc_ms_pre(MDOC_ARGS);

static int mdoc_nd_pre(MDOC_ARGS);

static int mdoc_nm_pre(MDOC_ARGS);

static int mdoc_ns_pre(MDOC_ARGS);

static void mdoc_op_post(MDOC_ARGS);

static int mdoc_op_pre(MDOC_ARGS);

static int mdoc_pa_pre(MDOC_ARGS);

static void mdoc_pf_post(MDOC_ARGS);

static int mdoc_pf_pre(MDOC_ARGS);

static void mdoc_quote_post(MDOC_ARGS);

static void mdoc_pq_post(MDOC_ARGS);

static int mdoc_quote_pre(MDOC_ARGS);

static int mdoc_pq_pre(MDOC_ARGS);

static int mdoc_rs_pre(MDOC_ARGS);

static int mdoc_rv_pre(MDOC_ARGS);

static int mdoc_sh_pre(MDOC_ARGS);

static int mdoc_sm_pre(MDOC_ARGS);

static int mdoc_sp_pre(MDOC_ARGS);

static void mdoc_sq_post(MDOC_ARGS);

static int mdoc_sq_pre(MDOC_ARGS);

static int mdoc_ss_pre(MDOC_ARGS);

static int mdoc_sx_pre(MDOC_ARGS);

static int mdoc_sy_pre(MDOC_ARGS);

Line 127 static int mdoc_vt_pre(MDOC_ARGS);

Line 126 static int mdoc_vt_pre(MDOC_ARGS);

static int mdoc_xr_pre(MDOC_ARGS);

static int mdoc_xx_pre(MDOC_ARGS);

#ifdef __linux__

extern size_t strlcpy(char *, const char *, size_t);

extern size_t strlcat(char *, const char *, size_t);

#endif

static const struct htmlmdoc mdocs[MDOC_MAX] = {

{mdoc_ap_pre, NULL}, /* Ap */

{NULL, NULL}, /* Dd */

Line 166 static const struct htmlmdoc mdocs[MDOC_MAX] = {

Line 160 static const struct htmlmdoc mdocs[MDOC_MAX] = {

{mdoc_li_pre, NULL}, /* Li */

{mdoc_nd_pre, NULL}, /* Nd */

{mdoc_nm_pre, NULL}, /* Nm */

{mdoc_op_pre, mdoc_op_post}, /* Op */

{mdoc_quote_pre, mdoc_quote_post}, /* Op */

{NULL, NULL}, /* Ot */

{mdoc_pa_pre, NULL}, /* Pa */

{mdoc_rv_pre, NULL}, /* Rv */

Line 186 static const struct htmlmdoc mdocs[MDOC_MAX] = {

Line 180 static const struct htmlmdoc mdocs[MDOC_MAX] = {

{mdoc__x_pre, mdoc__x_post}, /* %T */

{mdoc__x_pre, mdoc__x_post}, /* %V */

{NULL, NULL}, /* Ac */

{mdoc_aq_pre, mdoc_aq_post}, /* Ao */

{mdoc_quote_pre, mdoc_quote_post}, /* Ao */

{mdoc_aq_pre, mdoc_aq_post}, /* Aq */

{mdoc_quote_pre, mdoc_quote_post}, /* Aq */

{NULL, NULL}, /* At */

{NULL, NULL}, /* Bc */

{mdoc_bf_pre, NULL}, /* Bf */

{mdoc_bq_pre, mdoc_bq_post}, /* Bo */

{mdoc_quote_pre, mdoc_quote_post}, /* Bo */

{mdoc_bq_pre, mdoc_bq_post}, /* Bq */

{mdoc_quote_pre, mdoc_quote_post}, /* Bq */

{mdoc_xx_pre, NULL}, /* Bsx */

{mdoc_bx_pre, NULL}, /* Bx */

{NULL, NULL}, /* Db */

{NULL, NULL}, /* Dc */

{mdoc_dq_pre, mdoc_dq_post}, /* Do */

{mdoc_quote_pre, mdoc_quote_post}, /* Do */

{mdoc_dq_pre, mdoc_dq_post}, /* Dq */

{mdoc_quote_pre, mdoc_quote_post}, /* Dq */

{NULL, NULL}, /* Ec */

{NULL, NULL}, /* Ec */ /* FIXME: no space */

{NULL, NULL}, /* Ef */

{mdoc_em_pre, NULL}, /* Em */

{NULL, NULL}, /* Eo */

{mdoc_xx_pre, NULL}, /* Fx */

{mdoc_ms_pre, NULL}, /* Ms */ /* FIXME: convert to symbol? */

{mdoc_ms_pre, NULL}, /* Ms */

{NULL, NULL}, /* No */

{mdoc_igndelim_pre, NULL}, /* No */

{mdoc_ns_pre, NULL}, /* Ns */

{mdoc_xx_pre, NULL}, /* Nx */

{mdoc_xx_pre, NULL}, /* Ox */

{NULL, NULL}, /* Pc */

{mdoc_pf_pre, mdoc_pf_post}, /* Pf */

{mdoc_igndelim_pre, mdoc_pf_post}, /* Pf */

{mdoc_pq_pre, mdoc_pq_post}, /* Po */

{mdoc_quote_pre, mdoc_quote_post}, /* Po */

{mdoc_pq_pre, mdoc_pq_post}, /* Pq */

{mdoc_quote_pre, mdoc_quote_post}, /* Pq */

{NULL, NULL}, /* Qc */

{mdoc_sq_pre, mdoc_sq_post}, /* Ql */

{mdoc_quote_pre, mdoc_quote_post}, /* Ql */

{mdoc_dq_pre, mdoc_dq_post}, /* Qo */

{mdoc_quote_pre, mdoc_quote_post}, /* Qo */

{mdoc_dq_pre, mdoc_dq_post}, /* Qq */

{mdoc_quote_pre, mdoc_quote_post}, /* Qq */

{NULL, NULL}, /* Re */

{mdoc_rs_pre, NULL}, /* Rs */

{NULL, NULL}, /* Sc */

{mdoc_sq_pre, mdoc_sq_post}, /* So */

{mdoc_quote_pre, mdoc_quote_post}, /* So */

{mdoc_sq_pre, mdoc_sq_post}, /* Sq */

{mdoc_quote_pre, mdoc_quote_post}, /* Sq */

{NULL, NULL}, /* Sm */ /* FIXME - no idea. */

{mdoc_sm_pre, NULL}, /* Sm */

{mdoc_sx_pre, NULL}, /* Sx */

{mdoc_sy_pre, NULL}, /* Sy */

{NULL, NULL}, /* Tn */

Line 231 static const struct htmlmdoc mdocs[MDOC_MAX] = {

Line 225 static const struct htmlmdoc mdocs[MDOC_MAX] = {

{NULL, NULL}, /* Xo */

{mdoc_fo_pre, mdoc_fo_post}, /* Fo */

{NULL, NULL}, /* Fc */

{mdoc_op_pre, mdoc_op_post}, /* Oo */

{mdoc_quote_pre, mdoc_quote_post}, /* Oo */

{NULL, NULL}, /* Oc */

{NULL, NULL}, /* Bk */

{mdoc_bk_pre, mdoc_bk_post}, /* Bk */

{NULL, NULL}, /* Ek */

{mdoc_bt_pre, NULL}, /* Bt */

{NULL, NULL}, /* Hf */

Line 243 static const struct htmlmdoc mdocs[MDOC_MAX] = {

Line 237 static const struct htmlmdoc mdocs[MDOC_MAX] = {

{mdoc_sp_pre, NULL}, /* Lp */

{mdoc_lk_pre, NULL}, /* Lk */

{mdoc_mt_pre, NULL}, /* Mt */

{mdoc_brq_pre, mdoc_brq_post}, /* Brq */

{mdoc_quote_pre, mdoc_quote_post}, /* Brq */

{mdoc_brq_pre, mdoc_brq_post}, /* Bro */

{mdoc_quote_pre, mdoc_quote_post}, /* Bro */

{NULL, NULL}, /* Brc */

{mdoc__x_pre, mdoc__x_post}, /* %C */

{NULL, NULL}, /* Es */ /* TODO */

Line 253 static const struct htmlmdoc mdocs[MDOC_MAX] = {

Line 247 static const struct htmlmdoc mdocs[MDOC_MAX] = {

{mdoc__x_pre, mdoc__x_post}, /* %Q */

{mdoc_sp_pre, NULL}, /* br */

{mdoc_sp_pre, NULL}, /* sp */

{mdoc__x_pre, mdoc__x_post}, /* %U */

{NULL, NULL}, /* Ta */

};

Line 264 html_mdoc(void *arg, const struct mdoc *m)

Line 260 html_mdoc(void *arg, const struct mdoc *m)

h = (struct html *)arg;

print_gen_doctype(h);

print_gen_decls(h);

t = print_otag(h, TAG_HTML, 0, NULL);

print_mdoc(mdoc_meta(m), mdoc_node(m), h);

print_tagq(h, t);

Line 274 html_mdoc(void *arg, const struct mdoc *m)

Line 270 html_mdoc(void *arg, const struct mdoc *m)

* Return the list type for `Bl', e.g., `Bl -column' returns

* Calculate the scaling unit passed in a `-width' argument. This uses

* MDOC_Column. This can ONLY be run for lists; it will abort() if no

* either a native scaling unit (e.g., 1i, 2m) or the string length of

* list type is found.

* the value.

static int

static void

a2list(const struct mdoc_node *n)

a2width(const char *p, struct roffsu *su)

{

int i;

assert(n->args);

if ( ! a2roffsu(p, su, SCALE_MAX)) {

for (i = 0; i < (int)n->args->argc; i++)

su->unit = SCALE_EM;

switch (n->args->argv[i].arg) {

su->scale = (int)strlen(p);

case (MDOC_Enum):

}

/* FALLTHROUGH */

case (MDOC_Dash):

/* FALLTHROUGH */

case (MDOC_Hyphen):

/* FALLTHROUGH */

case (MDOC_Bullet):

/* FALLTHROUGH */

case (MDOC_Tag):

/* FALLTHROUGH */

case (MDOC_Hang):

/* FALLTHROUGH */

case (MDOC_Inset):

/* FALLTHROUGH */

case (MDOC_Diag):

/* FALLTHROUGH */

case (MDOC_Item):

/* FALLTHROUGH */

case (MDOC_Column):

/* FALLTHROUGH */

case (MDOC_Ohang):

return(n->args->argv[i].arg);

default:

break;

}

abort();

/* NOTREACHED */

}

* Calculate the scaling unit passed in a `-width' argument. This uses

* See the same function in mdoc_term.c for documentation.

* either a native scaling unit (e.g., 1i, 2m) or the string length of

* the value.

static void

a2width(const char *p, struct roffsu *su)

synopsis_pre(struct html *h, const struct mdoc_node *n)

{

struct roffsu su;

struct htmlpair tag;

if (a2roffsu(p, su))

if (NULL == n->prev || ! (MDOC_SYNPRETTY & n->flags))

return;

su->unit = SCALE_EM;

su->scale = (int)strlen(p);

SCALE_VS_INIT(&su, 1);

bufcat_su(h, "margin-top", &su);

PAIR_STYLE_INIT(&tag, h);

if (n->prev->tok == n->tok &&

MDOC_Fo != n->tok &&

MDOC_Ft != n->tok &&

MDOC_Fn != n->tok) {

print_otag(h, TAG_DIV, 0, NULL);

return;

}

switch (n->prev->tok) {

case (MDOC_Fd):

/* FALLTHROUGH */

case (MDOC_Fn):

/* FALLTHROUGH */

case (MDOC_Fo):

/* FALLTHROUGH */

case (MDOC_In):

/* FALLTHROUGH */

case (MDOC_Vt):

print_otag(h, TAG_DIV, 1, &tag);

break;

case (MDOC_Ft):

if (MDOC_Fn != n->tok && MDOC_Fo != n->tok) {

print_otag(h, TAG_DIV, 1, &tag);

break;

}

/* FALLTHROUGH */

default:

print_otag(h, TAG_DIV, 0, NULL);

break;

}

Line 342 static void

Line 343 static void

a2offs(const char *p, struct roffsu *su)

{

/* FIXME: "right"? */

if (0 == strcmp(p, "left"))

SCALE_HS_INIT(su, 0);

else if (0 == strcmp(p, "indent"))

SCALE_HS_INIT(su, INDENT);

else if (0 == strcmp(p, "indent-two"))

SCALE_HS_INIT(su, INDENT * 2);

else if ( ! a2roffsu(p, su)) {

else if ( ! a2roffsu(p, su, SCALE_MAX)) {

su->unit = SCALE_EM;

su->scale = (int)strlen(p);

}

Line 383 print_mdoc_head(MDOC_ARGS)

Line 386 print_mdoc_head(MDOC_ARGS)

print_gen_head(h);

bufinit(h);

buffmt(h, "%s(%d)", m->title, m->msec);

buffmt(h, "%s(%s)", m->title, m->msec);

if (m->arch) {

bufcat(h, " (");

Line 413 print_mdoc_node(MDOC_ARGS)

Line 416 print_mdoc_node(MDOC_ARGS)

struct tag *t;

child = 1;

t = SLIST_FIRST(&h->tags);

t = h->tags.head;

bufinit(h);

switch (n->type) {

Line 422 print_mdoc_node(MDOC_ARGS)

Line 425 print_mdoc_node(MDOC_ARGS)

break;

case (MDOC_TEXT):

print_text(h, n->string);

break;

return;

default:

if (mdocs[n->tok].pre)

if (mdocs[n->tok].pre && ENDBODY_NOT == n->end)

child = (*mdocs[n->tok].pre)(m, n, h);

break;

}

if (HTML_KEEP & h->flags) {

if (n->prev && n->prev->line != n->line) {

h->flags &= ~HTML_KEEP;

h->flags |= HTML_PREKEEP;

} else if (NULL == n->prev) {

if (n->parent && n->parent->line != n->line) {

h->flags &= ~HTML_KEEP;

h->flags |= HTML_PREKEEP;

}

if (child && n->child)

print_mdoc_nodelist(m, n->child, h);

Line 439 print_mdoc_node(MDOC_ARGS)

Line 454 print_mdoc_node(MDOC_ARGS)

case (MDOC_ROOT):

mdoc_root_post(m, n, h);

break;

case (MDOC_TEXT):

break;

default:

if (mdocs[n->tok].post)

if (mdocs[n->tok].post && ENDBODY_NOT == n->end)

(*mdocs[n->tok].post)(m, n, h);

break;

}

Line 453 print_mdoc_node(MDOC_ARGS)

Line 466 print_mdoc_node(MDOC_ARGS)

static void

mdoc_root_post(MDOC_ARGS)

{

struct tm tm;

struct htmlpair tag[3];

struct htmlpair tag[2];

struct tag *t, *tt;

char b[BUFSIZ];

char b[DATESIZ];

time2a(m->date, b, DATESIZ);

* XXX: this should use divs, but in Firefox, divs with nested

* divs for some reason puke when trying to put a border line

* below. So I use tables, instead.

(void)localtime_r(&m->date, &tm);

if (0 == strftime(b, BUFSIZ - 1, "%B %e, %Y", &tm))

err(EXIT_FAILURE, "strftime");

PAIR_CLASS_INIT(&tag[0], "footer");

bufcat_style(h, "width", "100%");

PAIR_STYLE_INIT(&tag[1], h);

t = print_otag(h, TAG_TABLE, 2, tag);

PAIR_SUMMARY_INIT(&tag[2], "footer");

t = print_otag(h, TAG_TABLE, 3, tag);

tt = print_otag(h, TAG_TR, 0, NULL);

bufinit(h);

Line 496 mdoc_root_post(MDOC_ARGS)

Line 507 mdoc_root_post(MDOC_ARGS)

static int

mdoc_root_pre(MDOC_ARGS)

{

struct htmlpair tag[2];

struct htmlpair tag[3];

struct tag *t, *tt;

char b[BUFSIZ], title[BUFSIZ];

Line 509 mdoc_root_pre(MDOC_ARGS)

Line 520 mdoc_root_pre(MDOC_ARGS)

}

(void)snprintf(title, BUFSIZ - 1,

"%s(%d)", m->title, m->msec);

"%s(%s)", m->title, m->msec);

/* XXX: see note in mdoc_root_post() about divs. */

PAIR_CLASS_INIT(&tag[0], "header");

bufcat_style(h, "width", "100%");

PAIR_STYLE_INIT(&tag[1], h);

t = print_otag(h, TAG_TABLE, 2, tag);

PAIR_SUMMARY_INIT(&tag[2], "header");

t = print_otag(h, TAG_TABLE, 3, tag);

tt = print_otag(h, TAG_TR, 0, NULL);

bufinit(h);

Line 552 mdoc_sh_pre(MDOC_ARGS)

Line 566 mdoc_sh_pre(MDOC_ARGS)

{

struct htmlpair tag[2];

const struct mdoc_node *nn;

char lbuf[BUFSIZ];

char buf[BUFSIZ];

struct roffsu su;

if (MDOC_BODY == n->type) {

Line 579 mdoc_sh_pre(MDOC_ARGS)

Line 593 mdoc_sh_pre(MDOC_ARGS)

return(1);

}

lbuf[0] = 0;

buf[0] = '\0';

for (nn = n->child; nn; nn = nn->next) {

(void)strlcat(lbuf, nn->string, BUFSIZ);

html_idcat(buf, nn->string, BUFSIZ);

if (nn->next)

(void)strlcat(lbuf, "_", BUFSIZ);

html_idcat(buf, " ", BUFSIZ);

}

* TODO: make sure there are no duplicates, as HTML does not

* allow for multiple `id' tags of the same name.

PAIR_CLASS_INIT(&tag[0], "sec-head");

tag[1].key = ATTR_ID;

PAIR_ID_INIT(&tag[1], buf);

tag[1].val = lbuf;

print_otag(h, TAG_DIV, 2, tag);

return(1);

}

Line 605 mdoc_ss_pre(MDOC_ARGS)

Line 614 mdoc_ss_pre(MDOC_ARGS)

{

struct htmlpair tag[3];

const struct mdoc_node *nn;

char lbuf[BUFSIZ];

char buf[BUFSIZ];

struct roffsu su;

SCALE_VS_INIT(&su, 1);

Line 632 mdoc_ss_pre(MDOC_ARGS)

Line 641 mdoc_ss_pre(MDOC_ARGS)

/* TODO: see note in mdoc_sh_pre() about duplicates. */

lbuf[0] = 0;

buf[0] = '\0';

for (nn = n->child; nn; nn = nn->next) {

(void)strlcat(lbuf, nn->string, BUFSIZ);

html_idcat(buf, nn->string, BUFSIZ);

if (nn->next)

(void)strlcat(lbuf, "_", BUFSIZ);

html_idcat(buf, " ", BUFSIZ);

}

SCALE_HS_INIT(&su, INDENT - HALFINDENT);

Line 645 mdoc_ss_pre(MDOC_ARGS)

Line 654 mdoc_ss_pre(MDOC_ARGS)

PAIR_CLASS_INIT(&tag[0], "ssec-head");

PAIR_STYLE_INIT(&tag[1], h);

tag[2].key = ATTR_ID;

PAIR_ID_INIT(&tag[2], buf);

tag[2].val = lbuf;

print_otag(h, TAG_DIV, 3, tag);

return(1);

}

Line 660 mdoc_fl_pre(MDOC_ARGS)

Line 669 mdoc_fl_pre(MDOC_ARGS)

PAIR_CLASS_INIT(&tag, "flag");

print_otag(h, TAG_SPAN, 1, &tag);

if (MDOC_Fl == n->tok) {

print_text(h, "\\-");

/* `Cm' has no leading hyphen. */

if (MDOC_Cm == n->tok)

return(1);

print_text(h, "\\-");

if (n->child)

h->flags |= HTML_NOSPACE;

}

else if (n->next && n->next->line == n->line)

h->flags |= HTML_NOSPACE;

return(1);

}

Line 686 mdoc_nd_pre(MDOC_ARGS)

Line 704 mdoc_nd_pre(MDOC_ARGS)

}

/* ARGSUSED */

static int

mdoc_op_pre(MDOC_ARGS)

mdoc_nm_pre(MDOC_ARGS)

{

struct htmlpair tag;

struct roffsu su;

const char *cp;

if (MDOC_BODY != n->type)

return(1);

* Accomodate for `Nm' being both an element (which may have

* NULL children AND no m->name) and a block.

/* XXX: this tag in theory can contain block elements. */

cp = NULL;

print_text(h, "\\(lB");

if (MDOC_ELEM == n->type) {

h->flags |= HTML_NOSPACE;

if (NULL == n->child && NULL == m->name)

PAIR_CLASS_INIT(&tag, "opt");

return(1);

print_otag(h, TAG_SPAN, 1, &tag);

synopsis_pre(h, n);

return(1);

PAIR_CLASS_INIT(&tag, "name");

}

print_otag(h, TAG_SPAN, 1, &tag);

if (NULL == n->child)

print_text(h, m->name);

} else if (MDOC_BLOCK == n->type) {

synopsis_pre(h, n);

bufcat_style(h, "clear", "both");

if (n->head->child || m->name) {

if (n->head->child && MDOC_TEXT ==

n->head->child->type)

cp = n->head->child->string;

if (NULL == cp || '\0' == *cp)

cp = m->name;

/* ARGSUSED */

SCALE_HS_INIT(&su, (double)strlen(cp));

static void

bufcat_su(h, "padding-left", &su);

mdoc_op_post(MDOC_ARGS)

}

{

if (MDOC_BODY != n->type)

PAIR_STYLE_INIT(&tag, h);

return;

print_otag(h, TAG_DIV, 1, &tag);

h->flags |= HTML_NOSPACE;

} else if (MDOC_HEAD == n->type) {

print_text(h, "\\(rB");

if (NULL == n->child && NULL == m->name)

}

return(1);

if (n->child && MDOC_TEXT == n->child->type)

cp = n->child->string;

if (NULL == cp || '\0' == *cp)

cp = m->name;

static int

SCALE_HS_INIT(&su, (double)strlen(cp));

mdoc_nm_pre(MDOC_ARGS)

{

struct htmlpair tag;

if ( ! (HTML_NEWLINE & h->flags))

bufcat_style(h, "float", "left");

if (SEC_SYNOPSIS == n->sec) {

bufcat_su(h, "min-width", &su);

bufcat_style(h, "clear", "both");

SCALE_INVERT(&su);

PAIR_STYLE_INIT(&tag, h);

bufcat_su(h, "margin-left", &su);

print_otag(h, TAG_BR, 1, &tag);

}

PAIR_CLASS_INIT(&tag, "name");

PAIR_STYLE_INIT(&tag, h);

print_otag(h, TAG_SPAN, 1, &tag);

print_otag(h, TAG_DIV, 1, &tag);

if (NULL == n->child)

print_text(h, m->name);

if (NULL == n->child)

print_text(h, m->name);

} else if (MDOC_BODY == n->type) {

SCALE_HS_INIT(&su, 2);

bufcat_su(h, "margin-left", &su);

PAIR_STYLE_INIT(&tag, h);

print_otag(h, TAG_DIV, 1, &tag);

}

return(1);

}

Line 745 mdoc_xr_pre(MDOC_ARGS)

Line 782 mdoc_xr_pre(MDOC_ARGS)

struct htmlpair tag[2];

const struct mdoc_node *nn;

if (NULL == n->child)

return(0);

PAIR_CLASS_INIT(&tag[0], "link-man");

if (h->base_man) {

buffmt_man(h, n->child->string,

n->child->next ?

n->child->next->string : NULL);

tag[1].key = ATTR_HREF;

PAIR_HREF_INIT(&tag[1], h->buf);

tag[1].val = h->buf;

print_otag(h, TAG_A, 2, tag);

} else

print_otag(h, TAG_A, 1, tag);

Line 804 mdoc_xx_pre(MDOC_ARGS)

Line 843 mdoc_xx_pre(MDOC_ARGS)

switch (n->tok) {

case (MDOC_Bsx):

pp = "BSDI BSD/OS";

pp = "BSD/OS";

break;

case (MDOC_Dx):

pp = "DragonFlyBSD";

pp = "DragonFly";

break;

case (MDOC_Fx):

pp = "FreeBSD";

Line 855 mdoc_bx_pre(MDOC_ARGS)

Line 894 mdoc_bx_pre(MDOC_ARGS)

/* ARGSUSED */

static int

mdoc_it_block_pre(MDOC_ARGS, int type, struct roffsu *offs,

mdoc_it_block_pre(MDOC_ARGS, enum mdoc_list type, int comp,

int comp, struct roffsu *width)

struct roffsu *offs, struct roffsu *width)

{

struct htmlpair tag;

const struct mdoc_node *nn;

struct roffsu su;

nn = n->parent->parent;

assert(nn->args);

/* XXX: see notes in mdoc_it_pre(). */

if (MDOC_Column == type) {

if (LIST_column == type) {

/* Don't width-pad on the left. */

SCALE_HS_INIT(width, 0);

/* Also disallow non-compact. */

comp = 1;

}

if (MDOC_Diag == type)

if (LIST_diag == type)

/* Mandate non-compact with empty prior. */

if (n->prev && NULL == n->prev->body->child)

comp = 1;

Line 910 mdoc_it_block_pre(MDOC_ARGS, int type, struct roffsu *

Line 948 mdoc_it_block_pre(MDOC_ARGS, int type, struct roffsu *

/* ARGSUSED */

static int

mdoc_it_body_pre(MDOC_ARGS, int type)

mdoc_it_body_pre(MDOC_ARGS, enum mdoc_list type, struct roffsu *width)

{

struct htmlpair tag;

struct roffsu su;

switch (type) {

case (MDOC_Item):

case (LIST_item):

/* FALLTHROUGH */

case (MDOC_Ohang):

case (LIST_ohang):

/* FALLTHROUGH */

case (MDOC_Column):

case (LIST_column):

bufcat_su(h, "min-width", width);

bufcat_style(h, "clear", "none");

if (n->next)

bufcat_style(h, "float", "left");

PAIR_STYLE_INIT(&tag, h);

print_otag(h, TAG_DIV, 1, &tag);

break;

default:

Line 940 mdoc_it_body_pre(MDOC_ARGS, int type)

Line 984 mdoc_it_body_pre(MDOC_ARGS, int type)

/* ARGSUSED */

static int

mdoc_it_head_pre(MDOC_ARGS, int type, struct roffsu *width)

mdoc_it_head_pre(MDOC_ARGS, enum mdoc_list type, struct roffsu *width)

{

struct htmlpair tag;

struct ord *ord;

char nbuf[BUFSIZ];

switch (type) {

case (MDOC_Item):

case (LIST_item):

/* FALLTHROUGH */

return(0);

case (MDOC_Ohang):

case (LIST_ohang):

print_otag(h, TAG_DIV, 0, NULL);

print_otag(h, TAG_DIV, 0, &tag);

return(1);

case (LIST_column):

break;

case (MDOC_Column):

bufcat_su(h, "min-width", width);

bufcat_style(h, "clear", "none");

if (n->next && MDOC_HEAD == n->next->type)

bufcat_style(h, "float", "left");

PAIR_STYLE_INIT(&tag, h);

print_otag(h, TAG_DIV, 1, &tag);

break;

default:

bufcat_su(h, "min-width", width);

SCALE_INVERT(width);

Line 976 mdoc_it_head_pre(MDOC_ARGS, int type, struct roffsu *w

Line 1014 mdoc_it_head_pre(MDOC_ARGS, int type, struct roffsu *w

}

switch (type) {

case (MDOC_Diag):

case (LIST_diag):

PAIR_CLASS_INIT(&tag, "diag");

print_otag(h, TAG_SPAN, 1, &tag);

break;

case (MDOC_Enum):

case (LIST_enum):

ord = SLIST_FIRST(&h->ords);

ord = h->ords.head;

assert(ord);

nbuf[BUFSIZ - 1] = 0;

(void)snprintf(nbuf, BUFSIZ - 1, "%d.", ord->pos++);

print_text(h, nbuf);

return(0);

case (MDOC_Dash):

case (LIST_dash):

print_text(h, "\\(en");

return(0);

case (MDOC_Hyphen):

case (LIST_hyphen):

print_text(h, "\\(hy");

return(0);

case (MDOC_Bullet):

case (LIST_bullet):

print_text(h, "\\(bu");

return(0);

default:

Line 1007 mdoc_it_head_pre(MDOC_ARGS, int type, struct roffsu *w

Line 1045 mdoc_it_head_pre(MDOC_ARGS, int type, struct roffsu *w

static int

mdoc_it_pre(MDOC_ARGS)

{

int i, type, wp, comp;

int i, comp;

const struct mdoc_node *bl, *nn;

struct roffsu width, offs;

enum mdoc_list type;

* XXX: be very careful in changing anything, here. Lists in

Line 1021 mdoc_it_pre(MDOC_ARGS)

Line 1060 mdoc_it_pre(MDOC_ARGS)

if (MDOC_BLOCK != n->type)

bl = bl->parent;

type = a2list(bl);

SCALE_HS_INIT(&offs, 0);

/* Set default width and offset. */

assert(bl->data.Bl);

type = bl->data.Bl->type;

comp = bl->data.Bl->comp;

SCALE_HS_INIT(&offs, 0);

if (bl->data.Bl->offs)

a2offs(bl->data.Bl->offs, &offs);

switch (type) {

case (MDOC_Enum):

case (LIST_enum):

/* FALLTHROUGH */

case (MDOC_Dash):

case (LIST_dash):

/* FALLTHROUGH */

case (MDOC_Hyphen):

case (LIST_hyphen):

/* FALLTHROUGH */

case (MDOC_Bullet):

case (LIST_bullet):

SCALE_HS_INIT(&width, 2);

break;

default:

Line 1042 mdoc_it_pre(MDOC_ARGS)

Line 1084 mdoc_it_pre(MDOC_ARGS)

break;

}

/* Get width, offset, and compact arguments. */

if (bl->data.Bl->width)

a2width(bl->data.Bl->width, &width);

for (wp = -1, comp = i = 0; i < (int)bl->args->argc; i++)

switch (bl->args->argv[i].arg) {

case (MDOC_Column):

wp = i; /* Save for later. */

break;

case (MDOC_Width):

a2width(bl->args->argv[i].value[0], &width);

break;

case (MDOC_Offset):

a2offs(bl->args->argv[i].value[0], &offs);

break;

case (MDOC_Compact):

comp = 1;

break;

default:

break;

}

/* Override width in some cases. */

switch (type) {

case (MDOC_Inset):

case (LIST_ohang):

/* FALLTHROUGH */

case (MDOC_Diag):

case (LIST_item):

/* FALLTHROUGH */

case (LIST_inset):

/* FALLTHROUGH */

case (LIST_diag):

SCALE_HS_INIT(&width, 0);

break;

default:

Line 1076 mdoc_it_pre(MDOC_ARGS)

Line 1105 mdoc_it_pre(MDOC_ARGS)

break;

}

/* Flip to body/block processing. */

if (LIST_column == type && MDOC_BODY == n->type) {

if (MDOC_BODY == n->type)

return(mdoc_it_body_pre(m, n, h, type));

if (MDOC_BLOCK == n->type)

return(mdoc_it_block_pre(m, n, h, type,

&offs, comp, &width));

/* Override column widths. */

if (MDOC_Column == type) {

nn = n->parent->child;

for (i = 0; nn && nn != n; nn = nn->next, i++)

for (i = 0; nn && nn != n; nn = nn->next)

/* Counter... */ ;

if (MDOC_BODY == nn->type)

if (i < (int)bl->args->argv[wp].sz)

i++;

a2width(bl->args->argv[wp].value[i], &width);

if (i < (int)bl->data.Bl->ncols)

a2width(bl->data.Bl->cols[i], &width);

}

return(mdoc_it_head_pre(m, n, h, type, &width));

if (MDOC_HEAD == n->type)

return(mdoc_it_head_pre(m, n, h, type, &width));

else if (MDOC_BODY == n->type)

return(mdoc_it_body_pre(m, n, h, type, &width));

return(mdoc_it_block_pre(m, n, h, type, comp, &offs, &width));

}

Line 1104 mdoc_bl_pre(MDOC_ARGS)

Line 1129 mdoc_bl_pre(MDOC_ARGS)

{

struct ord *ord;

if (MDOC_HEAD == n->type)

return(0);

if (MDOC_BLOCK != n->type)

return(1);

if (MDOC_Enum != a2list(n))

assert(n->data.Bl);

if (LIST_enum != n->data.Bl->type)

return(1);

ord = malloc(sizeof(struct ord));

if (NULL == ord)

if (NULL == ord) {

err(EXIT_FAILURE, "malloc");

perror(NULL);

exit((int)MANDOCLEVEL_SYSERR);

}

ord->cookie = n;

ord->pos = 1;

SLIST_INSERT_HEAD(&h->ords, ord, entry);

ord->next = h->ords.head;

h->ords.head = ord;

return(1);

}

Line 1127 mdoc_bl_post(MDOC_ARGS)

Line 1158 mdoc_bl_post(MDOC_ARGS)

if (MDOC_BLOCK != n->type)

return;

if (MDOC_Enum != a2list(n))

if (LIST_enum != n->data.Bl->type)

return;

ord = SLIST_FIRST(&h->ords);

ord = h->ords.head;

assert(ord);

SLIST_REMOVE_HEAD(&h->ords, entry);

h->ords.head = ord->next;

free(ord);

}

Line 1163 mdoc_ex_pre(MDOC_ARGS)

Line 1194 mdoc_ex_pre(MDOC_ARGS)

h->flags &= ~HTML_NOSPACE;

}

if (n->child->next)

if (n->child && n->child->next)

print_text(h, "utilities exit");

else

print_text(h, "utility exits");

Line 1175 mdoc_ex_pre(MDOC_ARGS)

Line 1206 mdoc_ex_pre(MDOC_ARGS)

/* ARGSUSED */

static int

mdoc_dq_pre(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return(1);

print_text(h, "\\(lq");

h->flags |= HTML_NOSPACE;

return(1);

}

/* ARGSUSED */

static void

mdoc_dq_post(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return;

h->flags |= HTML_NOSPACE;

print_text(h, "\\(rq");

}

/* ARGSUSED */

static int

mdoc_pq_pre(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return(1);

print_text(h, "\\&(");

h->flags |= HTML_NOSPACE;

return(1);

}

/* ARGSUSED */

static void

mdoc_pq_post(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return;

print_text(h, ")");

}

/* ARGSUSED */

static int

mdoc_sq_pre(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return(1);

print_text(h, "\\(oq");

h->flags |= HTML_NOSPACE;

return(1);

}

/* ARGSUSED */

static void

mdoc_sq_post(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return;

h->flags |= HTML_NOSPACE;

print_text(h, "\\(aq");

}

/* ARGSUSED */

static int

mdoc_em_pre(MDOC_ARGS)

{

struct htmlpair tag;

Line 1269 mdoc_d1_pre(MDOC_ARGS)

Line 1226 mdoc_d1_pre(MDOC_ARGS)

if (MDOC_BLOCK != n->type)

return(1);

/* FIXME: D1 shouldn't be literal. */

SCALE_VS_INIT(&su, INDENT - 2);

bufcat_su(h, "margin-left", &su);

PAIR_CLASS_INIT(&tag[0], "lit");

Line 1284 mdoc_sx_pre(MDOC_ARGS)

Line 1243 mdoc_sx_pre(MDOC_ARGS)

{

struct htmlpair tag[2];

const struct mdoc_node *nn;

char lbuf[BUFSIZ];

char buf[BUFSIZ];

/* FIXME: duplicates? */

strlcpy(buf, "#", BUFSIZ);

(void)strlcpy(lbuf, "#", BUFSIZ);

for (nn = n->child; nn; nn = nn->next) {

(void)strlcat(lbuf, nn->string, BUFSIZ);

html_idcat(buf, nn->string, BUFSIZ);

if (nn->next)

(void)strlcat(lbuf, "_", BUFSIZ);

html_idcat(buf, " ", BUFSIZ);

}

PAIR_CLASS_INIT(&tag[0], "link-sec");

tag[1].key = ATTR_HREF;

PAIR_HREF_INIT(&tag[1], buf);

tag[1].val = lbuf;

print_otag(h, TAG_A, 2, tag);

return(1);

Line 1306 mdoc_sx_pre(MDOC_ARGS)

Line 1262 mdoc_sx_pre(MDOC_ARGS)

/* ARGSUSED */

static int

mdoc_aq_pre(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return(1);

print_text(h, "\\(la");

h->flags |= HTML_NOSPACE;

return(1);

}

/* ARGSUSED */

static void

mdoc_aq_post(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return;

h->flags |= HTML_NOSPACE;

print_text(h, "\\(ra");

}

/* ARGSUSED */

static int

mdoc_bd_pre(MDOC_ARGS)

{

struct htmlpair tag[2];

int type, comp, i;

int comp;

const struct mdoc_node *bl, *nn;

const struct mdoc_node *nn;

struct roffsu su;

if (MDOC_BLOCK == n->type)

if (MDOC_HEAD == n->type)

bl = n;

else if (MDOC_HEAD == n->type)

return(0);

else

bl = n->parent;

SCALE_VS_INIT(&su, 0);

type = comp = 0;

assert(n->data.Bd);

for (i = 0; i < (int)bl->args->argc; i++)

if (n->data.Bd->offs)

switch (bl->args->argv[i].arg) {

a2offs(n->data.Bd->offs, &su);

case (MDOC_Offset):

a2offs(bl->args->argv[i].value[0], &su);

break;

case (MDOC_Compact):

comp = 1;

break;

case (MDOC_Ragged):

/* FALLTHROUGH */

case (MDOC_Filled):

/* FALLTHROUGH */

case (MDOC_Unfilled):

/* FALLTHROUGH */

case (MDOC_Literal):

type = bl->args->argv[i].arg;

break;

}

comp = n->data.Bd->comp;

/* FIXME: -centered, etc. formatting. */

/* FIXME: does not respect -offset ??? */

if (MDOC_BLOCK == n->type) {

bufcat_su(h, "margin-left", &su);

for (nn = n; nn && ! comp; nn = nn->parent) {

Line 1378 mdoc_bd_pre(MDOC_ARGS)

Line 1294 mdoc_bd_pre(MDOC_ARGS)

break;

}

if (comp) {

print_otag(h, TAG_DIV, 0, tag);

PAIR_STYLE_INIT(&tag[0], h);

print_otag(h, TAG_DIV, 1, tag);

return(1);

}

SCALE_VS_INIT(&su, 1);

Line 1388 mdoc_bd_pre(MDOC_ARGS)

Line 1305 mdoc_bd_pre(MDOC_ARGS)

return(1);

}

if (MDOC_Unfilled != type && MDOC_Literal != type)

if (DISP_unfilled != n->data.Bd->type &&

DISP_literal != n->data.Bd->type)

return(1);

PAIR_CLASS_INIT(&tag[0], "lit");

Line 1397 mdoc_bd_pre(MDOC_ARGS)

Line 1315 mdoc_bd_pre(MDOC_ARGS)

print_otag(h, TAG_DIV, 2, tag);

for (nn = n->child; nn; nn = nn->next) {

h->flags |= HTML_NOSPACE;

print_mdoc_node(m, nn, h);

if (NULL == nn->next)

* If the printed node flushes its own line, then we

* needn't do it here as well. This is hacky, but the

* notion of selective eoln whitespace is pretty dumb

* anyway, so don't sweat it.

switch (nn->tok) {

case (MDOC_Sm):

/* FALLTHROUGH */

case (MDOC_br):

/* FALLTHROUGH */

case (MDOC_sp):

/* FALLTHROUGH */

case (MDOC_Bl):

/* FALLTHROUGH */

case (MDOC_Lp):

/* FALLTHROUGH */

case (MDOC_Pp):

continue;

if (nn->prev && nn->prev->line < nn->line)

default:

print_text(h, "\n");

break;

else if (NULL == nn->prev)

}

print_text(h, "\n");

if (nn->next && nn->next->line == nn->line)

continue;

print_text(h, "\n");

h->flags |= HTML_NOSPACE;

}

return(0);

Line 1455 mdoc_cd_pre(MDOC_ARGS)

Line 1392 mdoc_cd_pre(MDOC_ARGS)

{

struct htmlpair tag;

synopsis_pre(h, n);

PAIR_CLASS_INIT(&tag, "config");

print_otag(h, TAG_SPAN, 1, &tag);

return(1);

Line 1531 static int

Line 1469 static int

mdoc_fd_pre(MDOC_ARGS)

{

struct htmlpair tag;

struct roffsu su;

if (SEC_SYNOPSIS == n->sec) {

synopsis_pre(h, n);

if (n->next && MDOC_Fd != n->next->tok) {

SCALE_VS_INIT(&su, 1);

bufcat_su(h, "margin-bottom", &su);

PAIR_STYLE_INIT(&tag, h);

print_otag(h, TAG_DIV, 1, &tag);

} else

print_otag(h, TAG_DIV, 0, NULL);

}

PAIR_CLASS_INIT(&tag, "macro");

print_otag(h, TAG_SPAN, 1, &tag);

Line 1554 static int

Line 1483 static int

mdoc_vt_pre(MDOC_ARGS)

{

struct htmlpair tag;

struct roffsu su;

if (SEC_SYNOPSIS == n->sec) {

if (MDOC_BLOCK == n->type) {

if (n->next && MDOC_Vt != n->next->tok) {

synopsis_pre(h, n);

SCALE_VS_INIT(&su, 1);

return(1);

bufcat_su(h, "margin-bottom", &su);

} else if (MDOC_ELEM == n->type) {

PAIR_STYLE_INIT(&tag, h);

synopsis_pre(h, n);

print_otag(h, TAG_DIV, 1, &tag);

} else if (MDOC_HEAD == n->type)

} else

return(0);

print_otag(h, TAG_DIV, 0, NULL);

}

PAIR_CLASS_INIT(&tag, "type");

print_otag(h, TAG_SPAN, 1, &tag);

Line 1577 static int

Line 1503 static int

mdoc_ft_pre(MDOC_ARGS)

{

struct htmlpair tag;

struct roffsu su;

if (SEC_SYNOPSIS == n->sec) {

synopsis_pre(h, n);

if (n->prev && MDOC_Fo == n->prev->tok) {

SCALE_VS_INIT(&su, 1);

bufcat_su(h, "margin-top", &su);

PAIR_STYLE_INIT(&tag, h);

print_otag(h, TAG_DIV, 1, &tag);

} else

print_otag(h, TAG_DIV, 0, NULL);

}

PAIR_CLASS_INIT(&tag, "ftype");

print_otag(h, TAG_SPAN, 1, &tag);

return(1);

Line 1605 mdoc_fn_pre(MDOC_ARGS)

Line 1521 mdoc_fn_pre(MDOC_ARGS)

char nbuf[BUFSIZ];

const char *sp, *ep;

int sz, i;

struct roffsu su;

if (SEC_SYNOPSIS == n->sec) {

synopsis_pre(h, n);

SCALE_HS_INIT(&su, INDENT);

bufcat_su(h, "margin-left", &su);

su.scale = -su.scale;

bufcat_su(h, "text-indent", &su);

if (n->next) {

SCALE_VS_INIT(&su, 1);

bufcat_su(h, "margin-bottom", &su);

}

PAIR_STYLE_INIT(&tag[0], h);

print_otag(h, TAG_DIV, 1, tag);

}

/* Split apart into type and name. */

assert(n->child->string);

Line 1641 mdoc_fn_pre(MDOC_ARGS)

Line 1545 mdoc_fn_pre(MDOC_ARGS)

}

PAIR_CLASS_INIT(&tag[0], "fname");

* FIXME: only refer to IDs that we know exist.

#if 0

if (MDOC_SYNPRETTY & n->flags) {

nbuf[0] = '\0';

html_idcat(nbuf, sp, BUFSIZ);

PAIR_ID_INIT(&tag[1], nbuf);

} else {

strlcpy(nbuf, "#", BUFSIZ);

html_idcat(nbuf, sp, BUFSIZ);

PAIR_HREF_INIT(&tag[1], nbuf);

}

#endif

t = print_otag(h, TAG_SPAN, 1, tag);

if (sp) {

(void)strlcpy(nbuf, sp, BUFSIZ);

strlcpy(nbuf, sp, BUFSIZ);

print_text(h, nbuf);

}

Line 1660 mdoc_fn_pre(MDOC_ARGS)

Line 1581 mdoc_fn_pre(MDOC_ARGS)

for (nn = n->child->next; nn; nn = nn->next) {

i = 1;

if (SEC_SYNOPSIS == n->sec)

if (MDOC_SYNPRETTY & n->flags)

i = 2;

t = print_otag(h, TAG_SPAN, i, tag);

print_text(h, nn->string);

Line 1670 mdoc_fn_pre(MDOC_ARGS)

Line 1591 mdoc_fn_pre(MDOC_ARGS)

}

print_text(h, ")");

if (SEC_SYNOPSIS == n->sec)

if (MDOC_SYNPRETTY & n->flags)

print_text(h, ";");

return(0);

Line 1679 mdoc_fn_pre(MDOC_ARGS)

Line 1600 mdoc_fn_pre(MDOC_ARGS)

/* ARGSUSED */

static int

mdoc_sm_pre(MDOC_ARGS)

{

assert(n->child && MDOC_TEXT == n->child->type);

if (0 == strcmp("on", n->child->string)) {

* FIXME: no p->col to check. Thus, if we have

* .Bd -literal

* .Sm off

* 1 2

* .Sm on

* 3

* .Ed

* the "3" is preceded by a space.

h->flags &= ~HTML_NOSPACE;

h->flags &= ~HTML_NONOSPACE;

} else

h->flags |= HTML_NONOSPACE;

return(0);

}

/* ARGSUSED */

static int

mdoc_sp_pre(MDOC_ARGS)

{

int len;

Line 1694 mdoc_sp_pre(MDOC_ARGS)

Line 1641 mdoc_sp_pre(MDOC_ARGS)

len = 0;

break;

default:

assert(n->parent);

if ((NULL == n->next || NULL == n->prev) &&

(MDOC_Ss == n->parent->tok ||

MDOC_Sh == n->parent->tok))

return(0);

len = 1;

break;

}

Line 1702 mdoc_sp_pre(MDOC_ARGS)

Line 1654 mdoc_sp_pre(MDOC_ARGS)

bufcat_su(h, "height", &su);

PAIR_STYLE_INIT(&tag, h);

print_otag(h, TAG_DIV, 1, &tag);

return(1);

/* So the div isn't empty: */

print_text(h, "\\~");

}

return(0);

/* ARGSUSED */

static int

mdoc_brq_pre(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return(1);

print_text(h, "\\(lC");

h->flags |= HTML_NOSPACE;

return(1);

}

/* ARGSUSED */

static void

mdoc_brq_post(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return;

h->flags |= HTML_NOSPACE;

print_text(h, "\\(rC");

}

/* ARGSUSED */

static int

mdoc_lk_pre(MDOC_ARGS)

{

Line 1742 mdoc_lk_pre(MDOC_ARGS)

Line 1672 mdoc_lk_pre(MDOC_ARGS)

nn = n->child;

PAIR_CLASS_INIT(&tag[0], "link-ext");

tag[1].key = ATTR_HREF;

PAIR_HREF_INIT(&tag[1], nn->string);

tag[1].val = nn->string;

print_otag(h, TAG_A, 2, tag);

if (NULL == nn || NULL == nn->next)

return(1);

for (nn = nn->next; nn; nn = nn->next)

print_text(h, nn->string);

Line 1767 mdoc_mt_pre(MDOC_ARGS)

Line 1699 mdoc_mt_pre(MDOC_ARGS)

bufinit(h);

bufcat(h, "mailto:");

bufcat(h, nn->string);

PAIR_STYLE_INIT(&tag[1], h);

PAIR_HREF_INIT(&tag[1], h->buf);

t = print_otag(h, TAG_A, 2, tag);

print_text(h, nn->string);

print_tagq(h, t);

Line 1781 mdoc_mt_pre(MDOC_ARGS)

Line 1713 mdoc_mt_pre(MDOC_ARGS)

static int

mdoc_fo_pre(MDOC_ARGS)

{

struct htmlpair tag;

struct tag *t;

if (MDOC_BODY == n->type) {

h->flags |= HTML_NOSPACE;

print_text(h, "(");

h->flags |= HTML_NOSPACE;

return(1);

} else if (MDOC_BLOCK == n->type)

} else if (MDOC_BLOCK == n->type) {

synopsis_pre(h, n);

return(1);

}

/* XXX: we drop non-initial arguments as per groff. */

assert(n->child);

assert(n->child->string);

PAIR_CLASS_INIT(&tag, "fname");

print_otag(h, TAG_SPAN, 1, &tag);

t = print_otag(h, TAG_SPAN, 1, &tag);

return(1);

print_text(h, n->child->string);

print_tagq(h, t);

return(0);

}

Line 1801 mdoc_fo_pre(MDOC_ARGS)

Line 1743 mdoc_fo_pre(MDOC_ARGS)

static void

mdoc_fo_post(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return;

h->flags |= HTML_NOSPACE;

print_text(h, ")");

h->flags |= HTML_NOSPACE;

print_text(h, ";");

}

Line 1818 mdoc_in_pre(MDOC_ARGS)

Line 1759 mdoc_in_pre(MDOC_ARGS)

struct tag *t;

struct htmlpair tag[2];

int i;

struct roffsu su;

if (SEC_SYNOPSIS == n->sec) {

synopsis_pre(h, n);

if (n->next && MDOC_In != n->next->tok) {

SCALE_VS_INIT(&su, 1);

bufcat_su(h, "margin-bottom", &su);

PAIR_STYLE_INIT(&tag[0], h);

print_otag(h, TAG_DIV, 1, tag);

} else

print_otag(h, TAG_DIV, 0, NULL);

}

PAIR_CLASS_INIT(&tag[0], "includes");

print_otag(h, TAG_SPAN, 1, tag);

if (SEC_SYNOPSIS == n->sec)

if (MDOC_SYNPRETTY & n->flags && MDOC_LINE & n->flags)

print_text(h, "#include");

print_text(h, "<");

h->flags |= HTML_NOSPACE;

/* XXX -- see warning in termp_in_post(). */

for (nn = n->child; nn; nn = nn->next) {

PAIR_CLASS_INIT(&tag[0], "link-includes");

i = 1;

bufinit(h);

if (h->base_includes) {

buffmt_includes(h, nn->string);

tag[i].key = ATTR_HREF;

PAIR_HREF_INIT(&tag[i], h->buf);

tag[i++].val = h->buf;

i++;

}

t = print_otag(h, TAG_A, i, tag);

print_mdoc_node(m, nn, h);

Line 1899 mdoc_rv_pre(MDOC_ARGS)

Line 1830 mdoc_rv_pre(MDOC_ARGS)

print_text(h, "()");

}

if (n->child->next)

if (n->child && n->child->next)

print_text(h, "functions return");

else

print_text(h, "function returns");

Line 1930 mdoc_va_pre(MDOC_ARGS)

Line 1861 mdoc_va_pre(MDOC_ARGS)

/* ARGSUSED */

static int

mdoc_bq_pre(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return(1);

print_text(h, "\\(lB");

h->flags |= HTML_NOSPACE;

return(1);

}

/* ARGSUSED */

static void

mdoc_bq_post(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return;

h->flags |= HTML_NOSPACE;

print_text(h, "\\(rB");

}

/* ARGSUSED */

static int

mdoc_ap_pre(MDOC_ARGS)

{

Line 1969 mdoc_ap_pre(MDOC_ARGS)

Line 1875 mdoc_ap_pre(MDOC_ARGS)

static int

mdoc_bf_pre(MDOC_ARGS)

{

int i;

struct htmlpair tag[2];

struct roffsu su;

if (MDOC_HEAD == n->type)

return(0);

else if (MDOC_BLOCK != n->type)

else if (MDOC_BODY != n->type)

return(1);

PAIR_CLASS_INIT(&tag[0], "lit");

assert(n->data.Bf);

if (n->head->child) {

if (FONT_Em == n->data.Bf->font)

if ( ! strcmp("Em", n->head->child->string))

PAIR_CLASS_INIT(&tag[0], "emph");

else if (FONT_Sy == n->data.Bf->font)

else if ( ! strcmp("Sy", n->head->child->string))

PAIR_CLASS_INIT(&tag[0], "symb");

else if (FONT_Li == n->data.Bf->font)

else if ( ! strcmp("Li", n->head->child->string))

PAIR_CLASS_INIT(&tag[0], "lit");

else

} else {

PAIR_CLASS_INIT(&tag[0], "none");

assert(n->args);

for (i = 0; i < (int)n->args->argc; i++)

switch (n->args->argv[i].arg) {

case (MDOC_Symbolic):

PAIR_CLASS_INIT(&tag[0], "symb");

break;

case (MDOC_Literal):

PAIR_CLASS_INIT(&tag[0], "lit");

break;

case (MDOC_Emphasis):

PAIR_CLASS_INIT(&tag[0], "emph");

break;

default:

break;

}

/* FIXME: div's have spaces stripped--we want them. */

* We want this to be inline-formatted, but needs to be div to

* accept block children.

bufcat_style(h, "display", "inline");

SCALE_HS_INIT(&su, 1);

bufcat_su(h, "margin-right", &su);

/* Needs a left-margin for spacing. */

bufcat_su(h, "margin-left", &su);

PAIR_STYLE_INIT(&tag[1], h);

print_otag(h, TAG_DIV, 2, tag);

return(1);

Line 2030 mdoc_ms_pre(MDOC_ARGS)

Line 1922 mdoc_ms_pre(MDOC_ARGS)

/* ARGSUSED */

static int

mdoc_pf_pre(MDOC_ARGS)

mdoc_igndelim_pre(MDOC_ARGS)

{

h->flags |= HTML_IGNDELIM;

Line 2043 static void

Line 1935 static void

mdoc_pf_post(MDOC_ARGS)

{

h->flags &= ~HTML_IGNDELIM;

h->flags |= HTML_NOSPACE;

}

Line 2053 static int

Line 1944 static int

mdoc_rs_pre(MDOC_ARGS)

{

struct htmlpair tag;

struct roffsu su;

if (MDOC_BLOCK != n->type)

return(1);

if (n->prev && SEC_SEE_ALSO == n->sec) {

SCALE_VS_INIT(&su, 1);

print_otag(h, TAG_BR, 0, NULL);

bufcat_su(h, "margin-top", &su);

print_otag(h, TAG_BR, 0, NULL);

PAIR_STYLE_INIT(&tag, h);

}

print_otag(h, TAG_DIV, 1, &tag);

}

PAIR_CLASS_INIT(&tag, "ref");

print_otag(h, TAG_SPAN, 1, &tag);

Line 2122 mdoc_lb_pre(MDOC_ARGS)

Line 2010 mdoc_lb_pre(MDOC_ARGS)

{

struct htmlpair tag;

if (SEC_SYNOPSIS == n->sec)

if (SEC_LIBRARY == n->sec && MDOC_LINE & n->flags)

print_otag(h, TAG_DIV, 0, NULL);

PAIR_CLASS_INIT(&tag, "lib");

print_otag(h, TAG_SPAN, 1, &tag);

Line 2134 mdoc_lb_pre(MDOC_ARGS)

Line 2022 mdoc_lb_pre(MDOC_ARGS)

static int

mdoc__x_pre(MDOC_ARGS)

{

struct htmlpair tag;

struct htmlpair tag[2];

switch (n->tok) {

case(MDOC__A):

PAIR_CLASS_INIT(&tag, "ref-auth");

PAIR_CLASS_INIT(&tag[0], "ref-auth");

if (n->prev && MDOC__A == n->prev->tok)

if (NULL == n->next || MDOC__A != n->next->tok)

print_text(h, "and");

break;

case(MDOC__B):

PAIR_CLASS_INIT(&tag, "ref-book");

PAIR_CLASS_INIT(&tag[0], "ref-book");

break;

case(MDOC__C):

PAIR_CLASS_INIT(&tag, "ref-city");

PAIR_CLASS_INIT(&tag[0], "ref-city");

break;

case(MDOC__D):

PAIR_CLASS_INIT(&tag, "ref-date");

PAIR_CLASS_INIT(&tag[0], "ref-date");

break;

case(MDOC__I):

PAIR_CLASS_INIT(&tag, "ref-issue");

PAIR_CLASS_INIT(&tag[0], "ref-issue");

break;

case(MDOC__J):

PAIR_CLASS_INIT(&tag, "ref-jrnl");

PAIR_CLASS_INIT(&tag[0], "ref-jrnl");

break;

case(MDOC__N):

PAIR_CLASS_INIT(&tag, "ref-num");

PAIR_CLASS_INIT(&tag[0], "ref-num");

break;

case(MDOC__O):

PAIR_CLASS_INIT(&tag, "ref-opt");

PAIR_CLASS_INIT(&tag[0], "ref-opt");

break;

case(MDOC__P):

PAIR_CLASS_INIT(&tag, "ref-page");

PAIR_CLASS_INIT(&tag[0], "ref-page");

break;

case(MDOC__Q):

PAIR_CLASS_INIT(&tag, "ref-corp");

PAIR_CLASS_INIT(&tag[0], "ref-corp");

break;

case(MDOC__R):

PAIR_CLASS_INIT(&tag, "ref-rep");

PAIR_CLASS_INIT(&tag[0], "ref-rep");

break;

case(MDOC__T):

PAIR_CLASS_INIT(&tag, "ref-title");

PAIR_CLASS_INIT(&tag[0], "ref-title");

print_text(h, "\\(lq");

h->flags |= HTML_NOSPACE;

break;

case(MDOC__U):

PAIR_CLASS_INIT(&tag[0], "link-ref");

break;

case(MDOC__V):

PAIR_CLASS_INIT(&tag, "ref-vol");

PAIR_CLASS_INIT(&tag[0], "ref-vol");

break;

default:

abort();

/* NOTREACHED */

}

print_otag(h, TAG_SPAN, 1, &tag);

if (MDOC__U != n->tok) {

print_otag(h, TAG_SPAN, 1, tag);

return(1);

}

PAIR_HREF_INIT(&tag[1], n->child->string);

print_otag(h, TAG_A, 2, tag);

return(1);

}

Line 2193 static void

Line 2092 static void

mdoc__x_post(MDOC_ARGS)

{

h->flags |= HTML_NOSPACE;

if (MDOC__A == n->tok && n->next && MDOC__A == n->next->tok)

if (NULL == n->next->next || MDOC__A != n->next->next->tok)

if (NULL == n->prev || MDOC__A != n->prev->tok)

return;

/* TODO: %U */

if (NULL == n->parent || MDOC_Rs != n->parent->tok)

return;

print_text(h, n->next ? "," : ".");

}

/* ARGSUSED */

static int

mdoc_bk_pre(MDOC_ARGS)

{

switch (n->type) {

case (MDOC_BLOCK):

break;

case (MDOC_HEAD):

return(0);

case (MDOC_BODY):

h->flags |= HTML_PREKEEP;

break;

default:

abort();

/* NOTREACHED */

}

return(1);

}

/* ARGSUSED */

static void

mdoc_bk_post(MDOC_ARGS)

{

if (MDOC_BODY == n->type)

h->flags &= ~(HTML_KEEP | HTML_PREKEEP);

}

/* ARGSUSED */

static int

mdoc_quote_pre(MDOC_ARGS)

{

struct htmlpair tag;

if (MDOC_BODY != n->type)

return(1);

switch (n->tok) {

case (MDOC__T):

case (MDOC_Ao):

print_text(h, "\\(rq");

/* FALLTHROUGH */

case (MDOC_Aq):

print_text(h, "\\(la");

break;

case (MDOC_Bro):

/* FALLTHROUGH */

case (MDOC_Brq):

print_text(h, "\\(lC");

break;

case (MDOC_Bo):

/* FALLTHROUGH */

case (MDOC_Bq):

print_text(h, "\\(lB");

break;

case (MDOC_Oo):

/* FALLTHROUGH */

case (MDOC_Op):

print_text(h, "\\(lB");

h->flags |= HTML_NOSPACE;

PAIR_CLASS_INIT(&tag, "opt");

print_otag(h, TAG_SPAN, 1, &tag);

break;

case (MDOC_Do):

/* FALLTHROUGH */

case (MDOC_Dq):

/* FALLTHROUGH */

case (MDOC_Qo):

/* FALLTHROUGH */

case (MDOC_Qq):

print_text(h, "\\(lq");

break;

case (MDOC_Po):

/* FALLTHROUGH */

case (MDOC_Pq):

print_text(h, "(");

break;

case (MDOC_Ql):

/* FALLTHROUGH */

case (MDOC_So):

/* FALLTHROUGH */

case (MDOC_Sq):

print_text(h, "\\(oq");

break;

default:

abort();

/* NOTREACHED */

}

h->flags |= HTML_NOSPACE;

return(1);

}

/* ARGSUSED */

static void

mdoc_quote_post(MDOC_ARGS)

{

if (MDOC_BODY != n->type)

return;

h->flags |= HTML_NOSPACE;

switch (n->tok) {

case (MDOC_Ao):

/* FALLTHROUGH */

case (MDOC_Aq):

print_text(h, "\\(ra");

break;

case (MDOC_Bro):

/* FALLTHROUGH */

case (MDOC_Brq):

print_text(h, "\\(rC");

break;

case (MDOC_Oo):

/* FALLTHROUGH */

case (MDOC_Op):

/* FALLTHROUGH */

case (MDOC_Bo):

/* FALLTHROUGH */

case (MDOC_Bq):

print_text(h, "\\(rB");

break;

case (MDOC_Qo):

/* FALLTHROUGH */

case (MDOC_Qq):

/* FALLTHROUGH */

case (MDOC_Do):

/* FALLTHROUGH */

case (MDOC_Dq):

print_text(h, "\\(rq");

break;

case (MDOC_Po):

/* FALLTHROUGH */

case (MDOC_Pq):

print_text(h, ")");

break;

case (MDOC_Ql):

/* FALLTHROUGH */

case (MDOC_So):

/* FALLTHROUGH */

case (MDOC_Sq):

print_text(h, "\\(aq");

break;

default:

abort();

/* NOTREACHED */

}

print_text(h, n->next ? "," : ".");

}

CVSweb