Manual Page for %s(%s)

=================================================================== RCS file: /cvs/mandoc/html.c,v retrieving revision 1.1 retrieving revision 1.8 diff -u -p -r1.1 -r1.8 --- mandoc/html.c 2008/12/03 14:39:59 1.1 +++ mandoc/html.c 2008/12/05 17:43:14 1.8 @@ -1,4 +1,4 @@ -/* $Id: html.c,v 1.1 2008/12/03 14:39:59 kristaps Exp $ */ +/* $Id: html.c,v 1.8 2008/12/05 17:43:14 kristaps Exp $ */ /* * Copyright (c) 2008 Kristaps Dzonsons * @@ -16,36 +16,479 @@ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR * PERFORMANCE OF THIS SOFTWARE. */ +#include +#include + #include +#include +#include #include +#include +#include +#include #include "libmdocml.h" #include "private.h" +#include "ml.h" +/* TODO: allow head/tail-less invocations (just "div" start). */ +/* FIXME: free htmlq. */ + +struct htmlnode { + int tok; + enum md_ns ns; + int *argc[ROFF_MAXLINEARG]; + char *argv[ROFF_MAXLINEARG]; + struct htmlnode *parent; +}; + + +struct htmlq { + struct htmlnode *last; +}; + + +static void htmlnode_free(struct htmlnode *); +static void htmlnode_free(struct htmlnode *); + +static int html_loadcss(struct md_mbuf *, const char *); + +static ssize_t html_endtag(struct md_mbuf *, void *, + const struct md_args *, + enum md_ns, int); +static ssize_t html_begintag(struct md_mbuf *, void *, + const struct md_args *, + enum md_ns, int, + const int *, const char **); +static int html_begin(struct md_mbuf *, + const struct md_args *, + const struct tm *, + const char *, const char *, + const char *, const char *); +static int html_printargs(struct md_mbuf *, int, + const char *, const int *, + const char **, size_t *); +static int html_end(struct md_mbuf *, + const struct md_args *); +static int html_blocktagname(struct md_mbuf *, + const struct md_args *, int, size_t *); +static int html_blocktagargs(struct md_mbuf *, + const struct md_args *, int, + const int *, const char **, size_t *); +static int html_blockheadtagname(struct md_mbuf *, + const struct md_args *, int, size_t *); +static int html_blockheadtagargs(struct md_mbuf *, + const struct md_args *, int, + const int *, const char **, size_t *); +static int html_blockbodytagname(struct md_mbuf *, + const struct md_args *, int, size_t *); +static int html_blockbodytagargs(struct md_mbuf *, + const struct md_args *, int, + const int *, const char **, size_t *); +static int html_inlinetagname(struct md_mbuf *, + const struct md_args *, int, size_t *); +static int html_inlinetagargs(struct md_mbuf *, + const struct md_args *, int, + const int *, const char **, size_t *); + + +static int +html_loadcss(struct md_mbuf *mbuf, const char *css) +{ + size_t res, bufsz; + char *buf; + struct stat st; + int fd, c; + ssize_t ssz; + + c = 0; + res = 0; + buf = NULL; + + if (-1 == (fd = open(css, O_RDONLY, 0))) { + warn("%s", css); + return(0); + } + + if (-1 == fstat(fd, &st)) { + warn("%s", css); + goto out; + } + + bufsz = MAX(st.st_blksize, BUFSIZ); + if (NULL == (buf = malloc(bufsz))) { + warn("malloc"); + goto out; + } + + for (;;) { + if (-1 == (ssz = read(fd, buf, bufsz))) { + warn("%s", css); + goto out; + } else if (0 == ssz) + break; + if ( ! ml_nputs(mbuf, buf, (size_t)ssz, &res)) + goto out; + } + + c = 1; + +out: + if (-1 == close(fd)) { + warn("%s", css); + c = 0; + } + + if (buf) + free(buf); + + return(c); +} + + /* ARGSUSED */ -int -md_line_html(void *data, char *buf) +static int +html_begin(struct md_mbuf *mbuf, const struct md_args *args, + const struct tm *tm, const char *os, + const char *title, const char *section, + const char *vol) { + const char *preamble, *css, *trail; + char buf[512]; + size_t res; + preamble = + "\n" + "\n" + "\n" + " \n" + " \n" + " Manual Page for %s(%s)\n"; + + css = + " \n"; + trail = + "\n" + "\n" + "

\n"; + + res = 0; + + (void)snprintf(buf, sizeof(buf) - 1, + preamble, title, section); + + if ( ! ml_puts(mbuf, buf, &res)) + return(0); + + assert(args->params.html.css); + if (HTML_CSS_EMBED & args->params.html.flags) { + if ( ! ml_puts(mbuf, " \n", &res)) + return(0); + } else { + (void)snprintf(buf, sizeof(buf) - 1, css, + args->params.html.css); + if ( ! ml_puts(mbuf, buf, &res)) + return(0); + } + + if ( ! ml_puts(mbuf, trail, &res)) + return(0); + return(1); } /* ARGSUSED */ -int -md_exit_html(void *data, int flush) +static int +html_end(struct md_mbuf *mbuf, const struct md_args *args) { + size_t res; + res = 0; + if ( ! ml_puts(mbuf, "

\n", &res)) + return(0); + return(1); } /* ARGSUSED */ +static int +html_blockbodytagname(struct md_mbuf *mbuf, + const struct md_args *args, int tok, size_t *res) +{ + + return(ml_puts(mbuf, "div", res)); +} + + + + +/* ARGSUSED */ +static int +html_blockheadtagname(struct md_mbuf *mbuf, + const struct md_args *args, int tok, size_t *res) +{ + + return(ml_puts(mbuf, "div", res)); +} + + +/* ARGSUSED */ +static int +html_blocktagname(struct md_mbuf *mbuf, + const struct md_args *args, int tok, size_t *res) +{ + + return(ml_puts(mbuf, "div", res)); +} + + +static int +html_printargs(struct md_mbuf *mbuf, int tok, const char *ns, + const int *argc, const char **argv, size_t *res) +{ + int i, c; + + if ( ! ml_puts(mbuf, " class=\"", res)) + return(0); + if ( ! ml_puts(mbuf, ns, res)) + return(0); + if ( ! ml_puts(mbuf, "-", res)) + return(0); + if ( ! ml_puts(mbuf, toknames[tok], res)) + return(0); + if ( ! ml_puts(mbuf, "\"", res)) + return(0); + + if (NULL == argv || NULL == argc) + return(1); + assert(argv && argc); + + /* FIXME: ignores values. */ + + for (i = 0; ROFF_ARGMAX != (c = argc[i]); i++) { + if (argv[i]) + continue; + if ( ! ml_puts(mbuf, " class=\"", res)) + return(0); + if ( ! ml_puts(mbuf, ns, res)) + return(0); + if ( ! ml_puts(mbuf, "-", res)) + return(0); + if ( ! ml_puts(mbuf, toknames[tok], res)) + return(0); + if ( ! ml_puts(mbuf, "-", res)) + return(0); + if ( ! ml_puts(mbuf, tokargnames[c], res)) + return(0); + if ( ! ml_puts(mbuf, "\"", res)) + return(0); + } + + return(1); +} + + +/* ARGSUSED */ +static int +html_blockheadtagargs(struct md_mbuf *mbuf, + const struct md_args *args, int tok, + const int *argc, const char **argv, size_t *res) +{ + + return(html_printargs(mbuf, tok, "head", argc, argv, res)); +} + + +/* ARGSUSED */ +static int +html_blockbodytagargs(struct md_mbuf *mbuf, + const struct md_args *args, int tok, + const int *argc, const char **argv, size_t *res) +{ + + return(html_printargs(mbuf, tok, "body", argc, argv, res)); +} + + +/* ARGSUSED */ +static int +html_blocktagargs(struct md_mbuf *mbuf, + const struct md_args *args, int tok, + const int *argc, const char **argv, size_t *res) +{ + + return(html_printargs(mbuf, tok, "block", argc, argv, res)); +} + + +/* ARGSUSED */ +static int +html_inlinetagargs(struct md_mbuf *mbuf, + const struct md_args *args, int tok, + const int *argc, const char **argv, size_t *res) +{ + + return(html_printargs(mbuf, tok, "inline", argc, argv, res)); +} + + +/* ARGSUSED */ +static int +html_inlinetagname(struct md_mbuf *mbuf, + const struct md_args *args, int tok, size_t *res) +{ + + switch (tok) { + case (ROFF_Pp): + return(ml_puts(mbuf, "div", res)); + default: + return(ml_puts(mbuf, "span", res)); + } + return(1); +} + + +static ssize_t +html_begintag(struct md_mbuf *mbuf, void *data, + const struct md_args *args, enum md_ns ns, + int tok, const int *argc, const char **argv) +{ + size_t res; + struct htmlq *q; + struct htmlnode *node; + + assert(ns != MD_NS_DEFAULT); + res = 0; + + assert(data); + q = (struct htmlq *)data; + + if (NULL == (node = calloc(1, sizeof(struct htmlnode)))) { + warn("calloc"); + return(-1); + } + + node->parent = q->last; + node->tok = tok; + node->ns = ns; + + q->last = node; + + switch (ns) { + case (MD_NS_BLOCK): + if ( ! html_blocktagname(mbuf, args, tok, &res)) + return(-1); + if ( ! html_blocktagargs(mbuf, args, tok, + argc, argv, &res)) + return(-1); + break; + case (MD_NS_BODY): + if ( ! html_blockbodytagname(mbuf, args, tok, &res)) + return(-1); + if ( ! html_blockbodytagargs(mbuf, args, tok, + argc, argv, &res)) + return(-1); + break; + case (MD_NS_HEAD): + if ( ! html_blockheadtagname(mbuf, args, tok, &res)) + return(-1); + if ( ! html_blockheadtagargs(mbuf, args, tok, + argc, argv, &res)) + return(-1); + break; + default: + if ( ! html_inlinetagname(mbuf, args, tok, &res)) + return(-1); + if ( ! html_inlinetagargs(mbuf, args, tok, + argc, argv, &res)) + return(-1); + break; + } + + return((ssize_t)res); +} + + +static ssize_t +html_endtag(struct md_mbuf *mbuf, void *data, + const struct md_args *args, enum md_ns ns, int tok) +{ + size_t res; + struct htmlq *q; + struct htmlnode *node; + + assert(ns != MD_NS_DEFAULT); + res = 0; + + assert(data); + q = (struct htmlq *)data; + + switch (ns) { + case (MD_NS_BLOCK): + if ( ! html_blocktagname(mbuf, args, tok, &res)) + return(-1); + break; + case (MD_NS_BODY): + if ( ! html_blockbodytagname(mbuf, args, tok, &res)) + return(-1); + break; + case (MD_NS_HEAD): + if ( ! html_blockheadtagname(mbuf, args, tok, &res)) + return(-1); + break; + default: + if ( ! html_inlinetagname(mbuf, args, tok, &res)) + return(-1); + break; + } + + node = q->last; + q->last = node->parent; + + htmlnode_free(node); + + return((ssize_t)res); +} + + +int +md_line_html(void *data, char *buf) +{ + + return(mlg_line((struct md_mlg *)data, buf)); +} + + +int +md_exit_html(void *data, int flush) +{ + + return(mlg_exit((struct md_mlg *)data, flush)); +} + + void * md_init_html(const struct md_args *args, struct md_mbuf *mbuf, const struct md_rbuf *rbuf) { + struct htmlq *q; - return(NULL); + if (NULL == (q = calloc(1, sizeof(struct htmlq)))) { + warn("calloc"); + return(NULL); + } + + return(mlg_alloc(args, q, rbuf, mbuf, html_begintag, + html_endtag, html_begin, html_end)); } +