/* $Id$ */ /* * Copyright (c) 2008 Kristaps Dzonsons * * Permission to use, copy, modify, and distribute this software for any * purpose with or without fee is hereby granted, provided that the * above copyright notice and this permission notice appear in all * copies. * * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL * WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED * WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE * AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER * 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" static int html_loadcss(struct md_mbuf *, const char *); static ssize_t html_endtag(struct md_mbuf *, const struct md_args *, enum md_ns, int); static ssize_t html_begintag(struct md_mbuf *, 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_end(struct md_mbuf *, const struct md_args *); static ssize_t html_blocktagname(struct md_mbuf *, const struct md_args *, int); static ssize_t html_blocktagargs(struct md_mbuf *, const struct md_args *, int, const int *, const char **); static ssize_t html_blockheadtagname(struct md_mbuf *, const struct md_args *, int); static ssize_t html_blockheadtagargs(struct md_mbuf *, const struct md_args *, int, const int *, const char **); static ssize_t html_blockbodytagname(struct md_mbuf *, const struct md_args *, int); static ssize_t html_blockbodytagargs(struct md_mbuf *, const struct md_args *, int, const int *, const char **); static ssize_t html_inlinetagname(struct md_mbuf *, const struct md_args *, int); static ssize_t html_inlinetagargs(struct md_mbuf *, const struct md_args *, int, const int *, const char **); 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 */ 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 */ 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 ssize_t html_blockbodytagname(struct md_mbuf *mbuf, const struct md_args *args, int tok) { size_t res; res = 0; if ( ! ml_puts(mbuf, "div", &res)) return(-1); return((ssize_t)res); } /* ARGSUSED */ static ssize_t html_blockheadtagname(struct md_mbuf *mbuf, const struct md_args *args, int tok) { size_t res; res = 0; if ( ! ml_puts(mbuf, "div", &res)) return(-1); return((ssize_t)res); } /* ARGSUSED */ static ssize_t html_blocktagname(struct md_mbuf *mbuf, const struct md_args *args, int tok) { size_t res; res = 0; if ( ! ml_puts(mbuf, "div", &res)) return(-1); return((ssize_t)res); } /* ARGSUSED */ static ssize_t html_blockheadtagargs(struct md_mbuf *mbuf, const struct md_args *args, int tok, const int *argc, const char **argv) { size_t res; res = 0; if ( ! ml_puts(mbuf, " class=\"head-", &res)) return(0); if ( ! ml_puts(mbuf, toknames[tok], &res)) return(0); if ( ! ml_puts(mbuf, "\"", &res)) return(0); switch (tok) { default: break; } return(0); } /* ARGSUSED */ static ssize_t html_blockbodytagargs(struct md_mbuf *mbuf, const struct md_args *args, int tok, const int *argc, const char **argv) { size_t res; res = 0; if ( ! ml_puts(mbuf, " class=\"body-", &res)) return(0); if ( ! ml_puts(mbuf, toknames[tok], &res)) return(0); if ( ! ml_puts(mbuf, "\"", &res)) return(0); switch (tok) { default: break; } return(res); } /* ARGSUSED */ static ssize_t html_blocktagargs(struct md_mbuf *mbuf, const struct md_args *args, int tok, const int *argc, const char **argv) { size_t res; res = 0; if ( ! ml_puts(mbuf, " class=\"block-", &res)) return(0); if ( ! ml_puts(mbuf, toknames[tok], &res)) return(0); if ( ! ml_puts(mbuf, "\"", &res)) return(0); switch (tok) { default: break; } return(0); } /* ARGSUSED */ static ssize_t html_inlinetagargs(struct md_mbuf *mbuf, const struct md_args *args, int tok, const int *argc, const char **argv) { size_t res; res = 0; if ( ! ml_puts(mbuf, " class=\"inline-", &res)) return(0); if ( ! ml_puts(mbuf, toknames[tok], &res)) return(0); if ( ! ml_puts(mbuf, "\"", &res)) return(0); switch (tok) { default: break; } return(0); } /* ARGSUSED */ static ssize_t html_inlinetagname(struct md_mbuf *mbuf, const struct md_args *args, int tok) { size_t res; res = 0; switch (tok) { case (ROFF_Pp): if ( ! ml_puts(mbuf, "div", &res)) return(-1); break; default: if ( ! ml_puts(mbuf, "span", &res)) return(-1); break; } return((ssize_t)res); } static ssize_t html_begintag(struct md_mbuf *mbuf, const struct md_args *args, enum md_ns ns, int tok, const int *argc, const char **argv) { assert(ns != MD_NS_DEFAULT); switch (ns) { case (MD_NS_BLOCK): if ( ! html_blocktagname(mbuf, args, tok)) return(0); if (NULL == argc || NULL == argv) return(1); assert(argc && argv); return(html_blocktagargs(mbuf, args, tok, argc, argv)); case (MD_NS_BODY): if ( ! html_blockbodytagname(mbuf, args, tok)) return(0); if (NULL == argc || NULL == argv) return(1); assert(argc && argv); return(html_blockbodytagargs(mbuf, args, tok, argc, argv)); case (MD_NS_HEAD): if ( ! html_blockheadtagname(mbuf, args, tok)) return(0); if (NULL == argc || NULL == argv) return(1); assert(argc && argv); return(html_blockheadtagargs(mbuf, args, tok, argc, argv)); default: break; } if ( ! html_inlinetagname(mbuf, args, tok)) return(0); if (NULL == argc || NULL == argv) return(1); assert(argc && argv); return(html_inlinetagargs(mbuf, args, tok, argc, argv)); } static ssize_t html_endtag(struct md_mbuf *mbuf, const struct md_args *args, enum md_ns ns, int tok) { assert(ns != MD_NS_DEFAULT); switch (ns) { case (MD_NS_BLOCK): return(html_blocktagname(mbuf, args, tok)); case (MD_NS_BODY): return(html_blockbodytagname(mbuf, args, tok)); case (MD_NS_HEAD): return(html_blockheadtagname(mbuf, args, tok)); default: break; } return(html_inlinetagname(mbuf, args, tok)); } 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) { return(mlg_alloc(args, rbuf, mbuf, html_begintag, html_endtag, html_begin, html_end)); }