]> git.cameronkatri.com Git - mandoc.git/blobdiff - html.c
Support .RE with an argument; needed for audio/pms(1).
[mandoc.git] / html.c
diff --git a/html.c b/html.c
index 26fe8cf094a5a1e6b95266fce5a285c8049ce820..487dacda947f931be42425df41f333e6dc435244 100644 (file)
--- a/html.c
+++ b/html.c
@@ -1,7 +1,7 @@
-/*     $Id: html.c,v 1.164 2014/09/27 08:54:34 kristaps Exp $ */
+/*     $Id: html.c,v 1.185 2015/01/21 20:33:25 schwarze Exp $ */
 /*
- * Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
- * Copyright (c) 2011, 2012, 2013, 2014 Ingo Schwarze <schwarze@openbsd.org>
+ * Copyright (c) 2008-2011, 2014 Kristaps Dzonsons <kristaps@bsd.lv>
+ * Copyright (c) 2011-2015 Ingo Schwarze <schwarze@openbsd.org>
  *
  * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above
@@ -30,7 +30,6 @@
 
 #include "mandoc.h"
 #include "mandoc_aux.h"
-#include "libmandoc.h"
 #include "out.h"
 #include "html.h"
 #include "main.h"
@@ -68,17 +67,31 @@ static      const struct htmldata htmltags[TAG_MAX] = {
        {"dt",          HTML_CLRLINE}, /* TAG_DT */
        {"dd",          HTML_CLRLINE}, /* TAG_DD */
        {"blockquote",  HTML_CLRLINE}, /* TAG_BLOCKQUOTE */
-       {"p",           HTML_CLRLINE | HTML_NOSTACK | HTML_AUTOCLOSE}, /* TAG_P */
        {"pre",         HTML_CLRLINE }, /* TAG_PRE */
        {"b",           0 }, /* TAG_B */
        {"i",           0 }, /* TAG_I */
        {"code",        0 }, /* TAG_CODE */
        {"small",       0 }, /* TAG_SMALL */
+       {"style",       HTML_CLRLINE}, /* TAG_STYLE */
+       {"math",        HTML_CLRLINE}, /* TAG_MATH */
+       {"mrow",        0}, /* TAG_MROW */
+       {"mi",          0}, /* TAG_MI */
+       {"mo",          0}, /* TAG_MO */
+       {"msup",        0}, /* TAG_MSUP */
+       {"msub",        0}, /* TAG_MSUB */
+       {"msubsup",     0}, /* TAG_MSUBSUP */
+       {"mfrac",       0}, /* TAG_MFRAC */
+       {"msqrt",       0}, /* TAG_MSQRT */
+       {"mfenced",     0}, /* TAG_MFENCED */
+       {"mtable",      0}, /* TAG_MTABLE */
+       {"mtr",         0}, /* TAG_MTR */
+       {"mtd",         0}, /* TAG_MTD */
+       {"munderover",  0}, /* TAG_MUNDEROVER */
+       {"munder",      0}, /* TAG_MUNDER*/
+       {"mover",       0}, /* TAG_MOVER*/
 };
 
 static const char      *const htmlattrs[ATTR_MAX] = {
-       "http-equiv", /* ATTR_HTTPEQUIV */
-       "content", /* ATTR_CONTENT */
        "name", /* ATTR_NAME */
        "rel", /* ATTR_REL */
        "href", /* ATTR_HREF */
@@ -86,12 +99,12 @@ static      const char      *const htmlattrs[ATTR_MAX] = {
        "media", /* ATTR_MEDIA */
        "class", /* ATTR_CLASS */
        "style", /* ATTR_STYLE */
-       "width", /* ATTR_WIDTH */
        "id", /* ATTR_ID */
-       "summary", /* ATTR_SUMMARY */
-       "align", /* ATTR_ALIGN */
        "colspan", /* ATTR_COLSPAN */
        "charset", /* ATTR_CHARSET */
+       "open", /* ATTR_OPEN */
+       "close", /* ATTR_CLOSE */
+       "mathvariant", /* ATTR_MATHVARIANT */
 };
 
 static const char      *const roffscales[SCALE_MAX] = {
@@ -108,16 +121,15 @@ static    const char      *const roffscales[SCALE_MAX] = {
 };
 
 static void     bufncat(struct html *, const char *, size_t);
-static void     print_ctag(struct html *, enum htmltag);
+static void     print_ctag(struct html *, struct tag *);
 static int      print_escape(char);
 static int      print_encode(struct html *, const char *, int);
 static void     print_metaf(struct html *, enum mandoc_esc);
 static void     print_attr(struct html *, const char *, const char *);
-static void     *ml_alloc(char *, enum htmltype);
 
 
-static void *
-ml_alloc(char *outopts, enum htmltype type)
+void *
+html_alloc(const struct mchars *mchars, char *outopts)
 {
        struct html     *h;
        const char      *toks[5];
@@ -131,9 +143,8 @@ ml_alloc(char *outopts, enum htmltype type)
 
        h = mandoc_calloc(1, sizeof(struct html));
 
-       h->type = type;
        h->tags.head = NULL;
-       h->symtab = mchars_alloc();
+       h->symtab = mchars;
 
        while (outopts && *outopts)
                switch (getsubopt(&outopts, UNCONST(toks), &v)) {
@@ -156,20 +167,6 @@ ml_alloc(char *outopts, enum htmltype type)
        return(h);
 }
 
-void *
-html_alloc(char *outopts)
-{
-
-       return(ml_alloc(outopts, HTML_HTML_4_01_STRICT));
-}
-
-void *
-xhtml_alloc(char *outopts)
-{
-
-       return(ml_alloc(outopts, HTML_XHTML_1_0_STRICT));
-}
-
 void
 html_free(void *p)
 {
@@ -183,9 +180,6 @@ html_free(void *p)
                free(tag);
        }
 
-       if (h->symtab)
-               mchars_free(h->symtab);
-
        free(h);
 }
 
@@ -193,11 +187,24 @@ void
 print_gen_head(struct html *h)
 {
        struct htmlpair  tag[4];
+       struct tag      *t;
 
        tag[0].key = ATTR_CHARSET;
        tag[0].val = "utf-8";
        print_otag(h, TAG_META, 1, tag);
 
+       /*
+        * Print a default style-sheet.
+        */
+       t = print_otag(h, TAG_STYLE, 0, NULL);
+       print_text(h, "table.head, table.foot { width: 100%; }\n"
+             "td.head-rtitle, td.foot-os { text-align: right; }\n"
+             "td.head-vol { text-align: center; }\n"
+             "table.foot td { width: 50%; }\n"
+             "table.head td { width: 33%; }\n"
+             "div.spacer { margin: 1em 0; }\n");
+       print_tagq(h, t);
+
        if (h->style) {
                tag[0].key = ATTR_REL;
                tag[0].val = "stylesheet";
@@ -300,6 +307,8 @@ html_strlen(const char *cp)
                case ESCAPE_NUMBERED:
                        /* FALLTHROUGH */
                case ESCAPE_SPECIAL:
+                       /* FALLTHROUGH */
+               case ESCAPE_OVERSTRIKE:
                        if (skip)
                                skip = 0;
                        else
@@ -411,29 +420,36 @@ print_encode(struct html *h, const char *p, int norecurse)
                case ESCAPE_UNICODE:
                        /* Skip past "u" header. */
                        c = mchars_num2uc(seq + 1, len - 1);
-                       if ('\0' != c)
-                               printf("&#x%x;", c);
                        break;
                case ESCAPE_NUMBERED:
                        c = mchars_num2char(seq, len);
-                       if ( ! ('\0' == c || print_escape(c)))
-                               putchar(c);
+                       if (c < 0)
+                               continue;
                        break;
                case ESCAPE_SPECIAL:
                        c = mchars_spec2cp(h->symtab, seq, len);
-                       if (c > 0)
-                               printf("&#%d;", c);
-                       else if (-1 == c && 1 == len &&
-                           !print_escape(*seq))
-                               putchar((int)*seq);
+                       if (c <= 0)
+                               continue;
                        break;
                case ESCAPE_NOSPACE:
                        if ('\0' == *p)
                                nospace = 1;
+                       continue;
+               case ESCAPE_OVERSTRIKE:
+                       if (len == 0)
+                               continue;
+                       c = seq[len - 1];
                        break;
                default:
-                       break;
+                       continue;
                }
+               if ((c < 0x20 && c != 0x09) ||
+                   (c > 0x7E && c < 0xA0))
+                       c = 0xFFFD;
+               if (c > 0x7E)
+                       printf("&#%d;", c);
+               else if ( ! print_escape(c))
+                       putchar(c);
        }
 
        return(nospace);
@@ -486,16 +502,10 @@ print_otag(struct html *h, enum htmltag tag,
        for (i = 0; i < sz; i++)
                print_attr(h, htmlattrs[p[i].key], p[i].val);
 
-       /* Accommodate for XML "well-formed" singleton escaping. */
+       /* Accommodate for "well-formed" singleton escaping. */
 
        if (HTML_AUTOCLOSE & htmltags[tag].flags)
-               switch (h->type) {
-               case HTML_XHTML_1_0_STRICT:
-                       putchar('/');
-                       break;
-               default:
-                       break;
-               }
+               putchar('/');
 
        putchar('>');
 
@@ -508,14 +518,26 @@ print_otag(struct html *h, enum htmltag tag,
 }
 
 static void
-print_ctag(struct html *h, enum htmltag tag)
+print_ctag(struct html *h, struct tag *tag)
 {
 
-       printf("</%s>", htmltags[tag].name);
-       if (HTML_CLRLINE & htmltags[tag].flags) {
+       /*
+        * Remember to close out and nullify the current
+        * meta-font and table, if applicable.
+        */
+       if (tag == h->metaf)
+               h->metaf = NULL;
+       if (tag == h->tblt)
+               h->tblt = NULL;
+
+       printf("</%s>", htmltags[tag->tag].name);
+       if (HTML_CLRLINE & htmltags[tag->tag].flags) {
                h->flags |= HTML_NOSPACE;
                putchar('\n');
        }
+
+       h->tags.head = tag->next;
+       free(tag);
 }
 
 void
@@ -559,8 +581,9 @@ print_text(struct html *h, const char *word)
        if ( ! print_encode(h, word, 0)) {
                if ( ! (h->flags & HTML_NONOSPACE))
                        h->flags &= ~HTML_NOSPACE;
+               h->flags &= ~HTML_NONEWLINE;
        } else
-               h->flags |= HTML_NOSPACE;
+               h->flags |= HTML_NOSPACE | HTML_NONEWLINE;
 
        if (h->metaf) {
                print_tagq(h, h->metaf);
@@ -576,17 +599,7 @@ print_tagq(struct html *h, const struct tag *until)
        struct tag      *tag;
 
        while ((tag = h->tags.head) != NULL) {
-               /*
-                * Remember to close out and nullify the current
-                * meta-font and table, if applicable.
-                */
-               if (tag == h->metaf)
-                       h->metaf = NULL;
-               if (tag == h->tblt)
-                       h->tblt = NULL;
-               print_ctag(h, tag->tag);
-               h->tags.head = tag->next;
-               free(tag);
+               print_ctag(h, tag);
                if (until && tag == until)
                        return;
        }
@@ -600,20 +613,22 @@ print_stagq(struct html *h, const struct tag *suntil)
        while ((tag = h->tags.head) != NULL) {
                if (suntil && tag == suntil)
                        return;
-               /*
-                * Remember to close out and nullify the current
-                * meta-font and table, if applicable.
-                */
-               if (tag == h->metaf)
-                       h->metaf = NULL;
-               if (tag == h->tblt)
-                       h->tblt = NULL;
-               print_ctag(h, tag->tag);
-               h->tags.head = tag->next;
-               free(tag);
+               print_ctag(h, tag);
        }
 }
 
+void
+print_paragraph(struct html *h)
+{
+       struct tag      *t;
+       struct htmlpair  tag;
+
+       PAIR_CLASS_INIT(&tag, "spacer");
+       t = print_otag(h, TAG_DIV, 1, &tag);
+       print_tagq(h, t);
+}
+
+
 void
 bufinit(struct html *h)
 {