[BACK]Return to html.c CVS log [TXT][DIR] Up to [cvsweb.bsd.lv] / mandoc

Diff for /mandoc/html.c between version 1.5 and 1.26

version 1.5, 2008/12/04 16:19:52 version 1.26, 2008/12/10 17:40:56
Line 27 
Line 27 
 #include <string.h>  #include <string.h>
 #include <unistd.h>  #include <unistd.h>
   
 #include "libmdocml.h"  #include "html.h"
 #include "private.h"  
 #include "ml.h"  #include "ml.h"
   
   /* TODO: allow head/tail-less invocations (just "div" start). */
   
 static  int             html_loadcss(struct md_mbuf *, const char *);  struct  htmlnode {
           int              tok;
           enum md_ns       ns;
           int              argc[ROFF_MAXLINEARG];
           char            *argv[ROFF_MAXLINEARG];
           struct htmlnode *parent;
   };
   
 static  ssize_t         html_endtag(struct md_mbuf *,  struct  htmlq {
                                 const struct md_args *,          struct htmlnode *last;
   };
   
   
   static  int             html_loadcss(struct md_mbuf *,
                                   const char *);
   static  int             html_alloc(void **);
   static  void            html_free(void *);
   static  ssize_t         html_endtag(struct ml_args *,
                                 enum md_ns, int);                                  enum md_ns, int);
 static  ssize_t         html_begintag(struct md_mbuf *,  static  ssize_t         html_beginstring(struct ml_args *,
                                 const struct md_args *,                                  const char *, size_t);
                                 enum md_ns, int,  static  ssize_t         html_endstring(struct ml_args *,
                                   const char *, size_t);
   static  ssize_t         html_begintag(struct ml_args *,
                                   enum md_ns, int,
                                 const int *, const char **);                                  const int *, const char **);
 static  int             html_begin(struct md_mbuf *,  static  int             html_begin(struct ml_args *,
                                 const struct md_args *,  
                                 const struct tm *,                                  const struct tm *,
                                 const char *, const char *,                                  const char *, const char *,
                                 const char *, const char *);                                  enum roffmsec, enum roffvol);
 static  int             html_end(struct md_mbuf *,  static  int             html_end(struct ml_args *,
                                 const struct md_args *);                                  const struct tm *,
 static  ssize_t         html_blocktagname(struct md_mbuf *,                                  const char *, const char *,
                                 const struct md_args *, int);                                  enum roffmsec, enum roffvol);
 static  ssize_t         html_blocktagargs(struct md_mbuf *,  static  int             html_printargs(struct md_mbuf *, int,
                                   const char *, const int *,
                                   const char **, size_t *);
   static  ssize_t         html_beginhttp(struct md_mbuf *,
                                   const struct md_args *,
                                   const char *, size_t);
   static  ssize_t         html_endhttp(struct md_mbuf *,
                                   const struct md_args *,
                                   const char *, size_t);
   static  int             html_blocktagname(struct md_mbuf *,
                                   const struct md_args *, int,
                                   struct htmlq *, const int *,
                                   const char **, size_t *);
   static  int             html_blocktagargs(struct md_mbuf *,
                                 const struct md_args *, int,                                  const struct md_args *, int,
                                 const int *, const char **);                                  const int *, const char **, size_t *);
 static  ssize_t         html_blockheadtagname(struct md_mbuf *,  static  int             html_headtagname(struct md_mbuf *,
                                 const struct md_args *, int);                                  const struct md_args *, int,
 static  ssize_t         html_blockheadtagargs(struct md_mbuf *,                                  struct htmlq *, const int *,
                                   const char **, size_t *);
   static  int             html_headtagargs(struct md_mbuf *,
                                 const struct md_args *, int,                                  const struct md_args *, int,
                                 const int *, const char **);                                  const int *, const char **, size_t *);
 static  ssize_t         html_blockbodytagname(struct md_mbuf *,  static  int             html_bodytagname(struct md_mbuf *,
                                 const struct md_args *, int);                                  const struct md_args *,
 static  ssize_t         html_blockbodytagargs(struct md_mbuf *,                                  int, struct htmlq *, const int *,
                                   const char **, size_t *);
   static  int             html_bodytagargs(struct md_mbuf *,
                                 const struct md_args *, int,                                  const struct md_args *, int,
                                 const int *, const char **);                                  const int *, const char **, size_t *);
 static  ssize_t         html_inlinetagname(struct md_mbuf *,  static  int             html_inlinetagname(struct md_mbuf *,
                                 const struct md_args *, int);                                  const struct md_args *, int, size_t *);
 static  ssize_t         html_inlinetagargs(struct md_mbuf *,  static  int             html_inlinetagargs(struct md_mbuf *,
                                 const struct md_args *, int,                                  const struct md_args *, int,
                                 const int *, const char **);                                  const int *, const char **, size_t *);
   static  int             html_Bl_bodytagname(struct md_mbuf *,
                                   struct htmlq *, const int *,
                                   const char **, size_t *);
   static  int             html_It_blocktagname(struct md_mbuf *,
                                   struct htmlq *, const int *,
                                   const char **, size_t *);
   static  int             html_It_headtagname(struct md_mbuf *,
                                   struct htmlq *, const int *,
                                   const char **, size_t *);
   static  int             html_It_bodytagname(struct md_mbuf *,
                                   struct htmlq *, const int *,
                                   const char **, size_t *);
   static  int             html_tputln(struct md_mbuf *,
                                   enum ml_scope, int, enum html_tag);
   static  int             html_aputln(struct md_mbuf *, enum ml_scope,
                                   int, enum html_tag,
                                   int, const struct html_pair *);
   
   
   /* ARGSUSED */
 static int  static int
   html_It_headtagname(struct md_mbuf *mbuf, struct htmlq *q,
                   const int *argc, const char **argv, size_t *res)
   {
           struct htmlnode *n;
           int              i;
           struct html_pair attr[2];
   
           for (n = q->last; n; n = n->parent)
                   if (n->tok == ROFF_Bl)
                           break;
   
           assert(n);
   
           /* LINTED */
           for (i = 0; ROFF_ARGMAX != n->argc[i] &&
                           i < ROFF_MAXLINEARG; i++) {
                   switch (n->argc[i]) {
                   case (ROFF_Ohang):
                           return(html_stput(mbuf, HTML_TAG_DIV, res));
                   case (ROFF_Tag):
                           attr[0].attr = HTML_ATTR_VALIGN;
                           attr[0].val = "top";
                           attr[1].attr = HTML_ATTR_NOWRAP;
                           attr[1].val = "true";
                           return(html_saput(mbuf, HTML_TAG_TD,
                                                   res, 2, attr));
                   case (ROFF_Column):
                           attr[0].attr = HTML_ATTR_VALIGN;
                           attr[0].val = "top";
                           return(html_saput(mbuf, HTML_TAG_TD,
                                                   res, 1, attr));
                   default:
                           break;
                   }
           }
   
           return(0);
   }
   
   
   /* ARGSUSED */
   static int
   html_It_bodytagname(struct md_mbuf *mbuf, struct htmlq *q,
                   const int *argc, const char **argv, size_t *res)
   {
           struct htmlnode *n;
           int              i;
           struct html_pair attr[1];
   
           for (n = q->last; n; n = n->parent)
                   if (n->tok == ROFF_Bl)
                           break;
   
           assert(n);
   
           /* LINTED */
           for (i = 0; ROFF_ARGMAX != n->argc[i] &&
                           i < ROFF_MAXLINEARG; i++) {
                   switch (n->argc[i]) {
                   case (ROFF_Enum):
                           /* FALLTHROUGH */
                   case (ROFF_Bullet):
                           /* FALLTHROUGH */
                   case (ROFF_Dash):
                           /* FALLTHROUGH */
                   case (ROFF_Hyphen):
                           /* FALLTHROUGH */
                   case (ROFF_Item):
                           /* FALLTHROUGH */
                   case (ROFF_Diag):
                           /* FALLTHROUGH */
                   case (ROFF_Hang):
                           /* FALLTHROUGH */
                   case (ROFF_Ohang):
                           /* FALLTHROUGH */
                   case (ROFF_Inset):
                           return(html_stput(mbuf, HTML_TAG_DIV, res));
                   case (ROFF_Tag):
                           /* FALLTHROUGH */
                   case (ROFF_Column):
                           attr[0].attr = HTML_ATTR_VALIGN;
                           attr[0].val = "top";
                           return(html_saput(mbuf, HTML_TAG_TD,
                                                   res, 1, attr));
                   default:
                           break;
                   }
           }
   
           assert(i != ROFF_MAXLINEARG);
           return(0);
   }
   
   
   /* ARGSUSED */
   static int
   html_Bl_bodytagname(struct md_mbuf *mbuf, struct htmlq *q,
                   const int *argc, const char **argv, size_t *res)
   {
           int              i;
   
           for (i = 0; ROFF_ARGMAX != argc[i]
                           && i < ROFF_MAXLINEARG; i++) {
                   switch (argc[i]) {
                   case (ROFF_Enum):
                           return(html_stput(mbuf, HTML_TAG_OL, res));
                   case (ROFF_Bullet):
                           /* FALLTHROUGH */
                   case (ROFF_Dash):
                           /* FALLTHROUGH */
                   case (ROFF_Hyphen):
                           /* FALLTHROUGH */
                   case (ROFF_Item):
                           /* FALLTHROUGH */
                   case (ROFF_Diag):
                           /* FALLTHROUGH */
                   case (ROFF_Hang):
                           /* FALLTHROUGH */
                   case (ROFF_Ohang):
                           /* FALLTHROUGH */
                   case (ROFF_Inset):
                           return(html_stput(mbuf, HTML_TAG_UL, res));
                   case (ROFF_Tag):
                           /* FALLTHROUGH */
                   case (ROFF_Column):
                           return(html_stput(mbuf, HTML_TAG_TABLE, res));
                   default:
                           break;
                   }
           }
   
           assert(i != ROFF_MAXLINEARG);
           return(0);
   }
   
   
   /* ARGSUSED */
   static int
   html_It_blocktagname(struct md_mbuf *mbuf, struct htmlq *q,
                   const int *argc, const char **argv, size_t *res)
   {
           struct htmlnode *n;
           int              i;
   
           for (n = q->last; n; n = n->parent)
                   if (n->tok == ROFF_Bl)
                           break;
   
           assert(n);
   
           /* LINTED */
           for (i = 0; ROFF_ARGMAX != n->argc[i] &&
                           i < ROFF_MAXLINEARG; i++) {
                   switch (n->argc[i]) {
                   case (ROFF_Enum):
                           /* FALLTHROUGH */
                   case (ROFF_Bullet):
                           /* FALLTHROUGH */
                   case (ROFF_Dash):
                           /* FALLTHROUGH */
                   case (ROFF_Hyphen):
                           /* FALLTHROUGH */
                   case (ROFF_Item):
                           /* FALLTHROUGH */
                   case (ROFF_Diag):
                           /* FALLTHROUGH */
                   case (ROFF_Hang):
                           /* FALLTHROUGH */
                   case (ROFF_Ohang):
                           /* FALLTHROUGH */
                   case (ROFF_Inset):
                           return(html_stput(mbuf, HTML_TAG_LI, res));
                   case (ROFF_Tag):
                           /* FALLTHROUGH */
                   case (ROFF_Column):
                           return(html_stput(mbuf, HTML_TAG_TR, res));
                   default:
                           break;
                   }
           }
   
           assert(i != ROFF_MAXLINEARG);
           return(0);
   }
   
   
   static int
 html_loadcss(struct md_mbuf *mbuf, const char *css)  html_loadcss(struct md_mbuf *mbuf, const char *css)
 {  {
         size_t           res, bufsz;          size_t           res, bufsz;
Line 124  out:
Line 362  out:
 }  }
   
   
   static int
   html_tputln(struct md_mbuf *mbuf, enum ml_scope scope,
                   int i, enum html_tag tag)
   {
   
           if ( ! ml_putchars(mbuf, ' ', INDENT(i) * INDENT_SZ, NULL))
                   return(0);
           if ( ! html_tput(mbuf, scope, tag, NULL))
                   return(0);
           return(ml_nputs(mbuf, "\n", 1, NULL));
   }
   
   
   static int
   html_aputln(struct md_mbuf *mbuf, enum ml_scope scope, int i,
                   enum html_tag tag, int sz, const struct html_pair *p)
   {
   
           if ( ! ml_putchars(mbuf, ' ', INDENT(i) * INDENT_SZ, NULL))
                   return(0);
           if ( ! html_aput(mbuf, scope, tag, NULL, sz, p))
                   return(0);
           return(ml_nputs(mbuf, "\n", 1, NULL));
   }
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static int  static int
 html_begin(struct md_mbuf *mbuf, const struct md_args *args,  html_begin(struct ml_args *p, const struct tm *tm, const char *os,
                 const struct tm *tm, const char *os,                  const char *name, enum roffmsec msec, enum roffvol vol)
                 const char *title, const char *section,  
                 const char *vol)  
 {  {
         const char      *preamble, *css, *trail;          enum roffvol     bvol;
         char             buf[512];          struct html_pair attr[4];
         size_t           res;          char             ts[32], title[64];
           int              i;
   
         preamble =          (void)snprintf(ts, sizeof(ts), "%s(%s)",
         "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01//EN\"\n"                          name, roff_msecname(msec));
         "    \"http://www.w3.org/TR/html4/strict.dtd\">\n"  
         "<html>\n"  
         "<head>\n"  
         "    <meta http-equiv=\"Content-Type\"\n"  
         "         content=\"text/html;charset=utf-8\">\n"  
         "    <meta name=\"resource-type\" content=\"document\">\n"  
         "    <title>Manual Page for %s(%s)</title>\n";  
   
         css =          if (vol >= ROFF_ARCH_START) {
         "    <link rel=\"stylesheet\" type=\"text/css\"\n"                  switch (msec) {
         "         href=\"%s\">\n";                  case(ROFF_MSEC_1):
         trail =                          /* FALLTHROUGH */
         "</head>\n"                  case(ROFF_MSEC_6):
         "<body>\n"                          /* FALLTHROUGH */
         "<div class=\"mdoc\">\n";                  case(ROFF_MSEC_7):
                           bvol = ROFF_VOL_URM;
                           break;
                   case(ROFF_MSEC_2):
                           /* FALLTHROUGH */
                   case(ROFF_MSEC_3):
                           /* FALLTHROUGH */
                   case(ROFF_MSEC_3p):
                           /* FALLTHROUGH */
                   case(ROFF_MSEC_4):
                           /* FALLTHROUGH */
                   case(ROFF_MSEC_5):
                           bvol = ROFF_VOL_PRM;
                           break;
                   case(ROFF_MSEC_8):
                           bvol = ROFF_VOL_PRM;
                           break;
                   case(ROFF_MSEC_9):
                           bvol = ROFF_VOL_KM;
                           break;
                   case(ROFF_MSEC_UNASS):
                           /* FALLTHROUGH */
                   case(ROFF_MSEC_DRAFT):
                           /* FALLTHROUGH */
                   case(ROFF_MSEC_PAPER):
                           bvol = ROFF_VOL_NONE;
                           break;
                   default:
                           abort();
                           /* NOTREACHED */
                   }
   
         res = 0;                  (void)snprintf(title, sizeof(title), "%s (%s)",
                                   roff_volname(bvol), roff_volname(vol));
           } else
                   (void)snprintf(title, sizeof(title), "%s", roff_volname(vol));
   
         (void)snprintf(buf, sizeof(buf) - 1,  
                         preamble, title, section);  
   
         if ( ! ml_puts(mbuf, buf, &res))          i = 0;
   
           if ( ! html_typeput(p->mbuf, HTML_TYPE_4_01_STRICT, NULL))
                 return(0);                  return(0);
           if ( ! html_tputln(p->mbuf, ML_OPEN, i, HTML_TAG_HTML))
                   return(0);
           if ( ! html_tputln(p->mbuf, ML_OPEN, i++, HTML_TAG_HEAD))
                   return(0);
   
         assert(args->params.html.css);          attr[0].attr = HTML_ATTR_HTTP_EQUIV;
         if (HTML_CSS_EMBED & args->params.html.flags) {          attr[0].val = "content-type";
                 if ( ! ml_puts(mbuf, "    <style type=\"text/css\"><!--\n", &res))          attr[1].attr = HTML_ATTR_CONTENT;
           attr[1].val = "text/html;charset=utf-8";
   
           if ( ! html_aputln(p->mbuf, ML_OPEN, i, HTML_TAG_META, 2, attr))
                   return(0);
   
           attr[0].attr = HTML_ATTR_NAME;
           attr[0].val = "resource-type";
           attr[1].attr = HTML_ATTR_CONTENT;
           attr[1].val = "document";
   
           if ( ! html_aputln(p->mbuf, ML_OPEN, i, HTML_TAG_META, 2, attr))
                   return(0);
   
           if ( ! html_tputln(p->mbuf, ML_OPEN, i, HTML_TAG_TITLE))
                   return(0);
           if ( ! ml_putstring(p->mbuf, ts, NULL))
                   return(0);
           if ( ! html_tputln(p->mbuf, ML_CLOSE, i, HTML_TAG_TITLE))
                   return(0);
   
           if (HTML_CSS_EMBED & p->args->params.html.flags) {
                   attr[0].attr = HTML_ATTR_TYPE;
                   attr[0].val = "text/css";
   
                   if ( ! html_aputln(p->mbuf, ML_OPEN, i,
                                           HTML_TAG_STYLE, 1, attr))
                         return(0);                          return(0);
                 if ( ! html_loadcss(mbuf, args->params.html.css))                  if ( ! html_commentput(p->mbuf, ML_OPEN, NULL))
                         return(0);                          return(0);
                 if ( ! ml_puts(mbuf, "    --!></style>\n", &res))  
                   if ( ! html_loadcss(p->mbuf, p->args->params.html.css))
                         return(0);                          return(0);
   
                   if ( ! html_commentput(p->mbuf, ML_CLOSE, NULL))
                           return(0);
                   if ( ! html_tputln(p->mbuf, ML_CLOSE, i, HTML_TAG_STYLE))
                           return(0);
         } else {          } else {
                 (void)snprintf(buf, sizeof(buf) - 1, css,                  attr[0].attr = HTML_ATTR_REL;
                                 args->params.html.css);                  attr[0].val = "stylesheet";
                 if ( ! ml_puts(mbuf, buf, &res))                  attr[1].attr = HTML_ATTR_TYPE;
                   attr[1].val = "text/css";
                   attr[2].attr = HTML_ATTR_HREF;
                   attr[2].val = p->args->params.html.css;
   
                   if ( ! html_aputln(p->mbuf, ML_OPEN, i,
                                           HTML_TAG_LINK, 3, attr))
                         return(0);                          return(0);
         }          }
   
         if ( ! ml_puts(mbuf, trail, &res))          if ( ! html_tputln(p->mbuf, ML_CLOSE, --i, HTML_TAG_HEAD))
                 return(0);                  return(0);
           if ( ! html_tputln(p->mbuf, ML_OPEN, i, HTML_TAG_BODY))
                   return(0);
   
         return(1);          attr[0].attr = HTML_ATTR_CLASS;
 }          attr[0].val = "mdoc";
   
           if ( ! html_aputln(p->mbuf, ML_OPEN, i, HTML_TAG_DIV, 1, attr))
                   return(0);
   
 /* ARGSUSED */          attr[0].attr = HTML_ATTR_WIDTH;
 static int          attr[0].val = "100%";
 html_end(struct md_mbuf *mbuf, const struct md_args *args)          attr[1].attr = HTML_ATTR_CLASS;
 {          attr[1].val = "header-table";
         size_t           res;  
   
         res = 0;          if ( ! html_aputln(p->mbuf, ML_OPEN, i++, HTML_TAG_TABLE, 2, attr))
         if ( ! ml_puts(mbuf, "</div></body>\n</html>", &res))  
                 return(0);                  return(0);
           if ( ! html_tputln(p->mbuf, ML_OPEN, i++, HTML_TAG_TR))
                   return(0);
   
         return(1);          attr[0].attr = HTML_ATTR_ALIGN;
           attr[0].val = "left";
           attr[1].attr = HTML_ATTR_CLASS;
           attr[1].val = "header-section";
   
           if ( ! html_aputln(p->mbuf, ML_OPEN, i, HTML_TAG_TD, 2, attr))
                   return(0);
           if ( ! ml_putstring(p->mbuf, ts, NULL))
                   return(0);
           if ( ! html_tputln(p->mbuf, ML_CLOSE, i, HTML_TAG_TD))
                   return(0);
   
           attr[0].attr = HTML_ATTR_ALIGN;
           attr[0].val = "center";
           attr[1].attr = HTML_ATTR_CLASS;
           attr[1].val = "header-volume";
   
           if ( ! html_aputln(p->mbuf, ML_OPEN, i, HTML_TAG_TD, 2, attr))
                   return(0);
           if ( ! ml_putstring(p->mbuf, title, NULL))
                   return(0);
           if ( ! html_tputln(p->mbuf, ML_CLOSE, i, HTML_TAG_TD))
                   return(0);
   
           attr[0].attr = HTML_ATTR_ALIGN;
           attr[0].val = "right";
           attr[1].attr = HTML_ATTR_CLASS;
           attr[1].val = "header-section";
   
           if ( ! html_aputln(p->mbuf, ML_OPEN, i, HTML_TAG_TD, 2, attr))
                   return(0);
           if ( ! ml_putstring(p->mbuf, ts, NULL))
                   return(0);
           if ( ! html_tputln(p->mbuf, ML_CLOSE, i, HTML_TAG_TD))
                   return(0);
   
           if ( ! html_tputln(p->mbuf, ML_CLOSE, --i, HTML_TAG_TR))
                   return(0);
           return(html_tputln(p->mbuf, ML_CLOSE, --i, HTML_TAG_TABLE));
 }  }
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static ssize_t  static int
 html_blockbodytagname(struct md_mbuf *mbuf,  html_end(struct ml_args *p, const struct tm *tm, const char *os,
                 const struct md_args *args, int tok)                  const char *name, enum roffmsec msec, enum roffvol vol)
 {  {
         size_t           res;          struct html_pair attr[4];
           int              i;
           char             ts[64];
   
         res = 0;          if (0 == strftime(ts, sizeof(ts), "%B %d, %Y", tm)) {
         if ( ! ml_puts(mbuf, "div", &res))                  warn("strftime");
                 return(-1);                  return(0);
           }
   
         return((ssize_t)res);          i = 0;
 }  
   
           attr[0].attr = HTML_ATTR_WIDTH;
           attr[0].val = "100%";
           attr[1].attr = HTML_ATTR_CLASS;
           attr[1].val = "header-footer";
   
           if ( ! html_aputln(p->mbuf, ML_OPEN, i++, HTML_TAG_TABLE, 2, attr))
                   return(0);
           if ( ! html_tputln(p->mbuf, ML_OPEN, i++, HTML_TAG_TR))
                   return(0);
   
           attr[0].attr = HTML_ATTR_ALIGN;
           attr[0].val = "left";
           attr[1].attr = HTML_ATTR_CLASS;
           attr[1].val = "footer-os";
   
 /* ARGSUSED */          if ( ! html_aputln(p->mbuf, ML_OPEN, i, HTML_TAG_TD, 2, attr))
 static ssize_t                  return(0);
 html_blockheadtagname(struct md_mbuf *mbuf,          if ( ! ml_putstring(p->mbuf, os, NULL))
                 const struct md_args *args, int tok)                  return(0);
 {          if ( ! html_tputln(p->mbuf, ML_CLOSE, i, HTML_TAG_TD))
         size_t           res;                  return(0);
   
         res = 0;          attr[0].attr = HTML_ATTR_ALIGN;
         if ( ! ml_puts(mbuf, "div", &res))          attr[0].val = "right";
                 return(-1);          attr[1].attr = HTML_ATTR_CLASS;
           attr[1].val = "footer-date";
   
         return((ssize_t)res);          if ( ! html_aputln(p->mbuf, ML_OPEN, i, HTML_TAG_TD, 2, attr))
                   return(0);
           if ( ! ml_putstring(p->mbuf, ts, NULL))
                   return(0);
           if ( ! html_tputln(p->mbuf, ML_CLOSE, i, HTML_TAG_TD))
                   return(0);
   
           if ( ! html_tputln(p->mbuf, ML_CLOSE, --i, HTML_TAG_TR))
                   return(0);
           if ( ! html_tputln(p->mbuf, ML_CLOSE, --i, HTML_TAG_TABLE))
                   return(0);
   
           if ( ! html_tputln(p->mbuf, ML_CLOSE, 0, HTML_TAG_DIV))
                   return(0);
           if ( ! html_tputln(p->mbuf, ML_CLOSE, 0, HTML_TAG_BODY))
                   return(0);
           return(html_tputln(p->mbuf, ML_CLOSE, 0, HTML_TAG_HTML));
 }  }
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static ssize_t  static int
 html_blocktagname(struct md_mbuf *mbuf,  html_bodytagname(struct md_mbuf *mbuf,
                 const struct md_args *args, int tok)                  const struct md_args *args, int tok, struct htmlq *q,
                   const int *argc, const char **argv, size_t *res)
 {  {
         size_t           res;  
   
         res = 0;          switch (tok) {
         if ( ! ml_puts(mbuf, "div", &res))          case (ROFF_Bl):
                 return(-1);                  return(html_Bl_bodytagname(mbuf, q, argc, argv, res));
           case (ROFF_Fo):
                   return(html_stput(mbuf, HTML_TAG_SPAN, res));
           case (ROFF_It):
                   return(html_It_bodytagname(mbuf, q, argc, argv, res));
           case (ROFF_Oo):
                   return(html_stput(mbuf, HTML_TAG_SPAN, res));
           default:
                   break;
           }
   
         return((ssize_t)res);          return(html_stput(mbuf, HTML_TAG_DIV, res));
 }  }
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static ssize_t  static int
 html_blockheadtagargs(struct md_mbuf *mbuf, const struct md_args *args,  html_headtagname(struct md_mbuf *mbuf,
                 int tok, const int *argc, const char **argv)                  const struct md_args *args, int tok, struct htmlq *q,
                   const int *argc, const char **argv, size_t *res)
 {  {
         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) {          switch (tok) {
           case (ROFF_It):
                   return(html_It_headtagname(mbuf, q, argc, argv, res));
           case (ROFF_Fo):
                   /* FALLTHROUGH */
           case (ROFF_Oo):
                   return(html_stput(mbuf, HTML_TAG_SPAN, res));
           case (ROFF_Sh):
                   return(html_stput(mbuf, HTML_TAG_H1, res));
           case (ROFF_Ss):
                   return(html_stput(mbuf, HTML_TAG_H2, res));
         default:          default:
                 break;                  break;
         }          }
   
         return(0);          return(html_stput(mbuf, HTML_TAG_DIV, res));
 }  }
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static ssize_t  static int
 html_blockbodytagargs(struct md_mbuf *mbuf, const struct md_args *args,  html_blocktagname(struct md_mbuf *mbuf, const struct md_args *args,
                 int tok, const int *argc, const char **argv)                  int tok, struct htmlq *q, const int *argc,
                   const char **argv, size_t *res)
 {  {
         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) {          switch (tok) {
           case (ROFF_Fo):
                   /* FALLTHROUGH */
           case (ROFF_Oo):
                   return(html_stput(mbuf, HTML_TAG_SPAN, res));
           case (ROFF_It):
                   return(html_It_blocktagname(mbuf, q, argc, argv, res));
         default:          default:
                 break;                  break;
         }          }
   
         return(res);          return(html_stput(mbuf, HTML_TAG_DIV, res));
 }  }
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static ssize_t  static int
 html_blocktagargs(struct md_mbuf *mbuf, const struct md_args *args,  html_printargs(struct md_mbuf *mbuf, int tok, const char *ns,
                 int tok, const int *argc, const char **argv)                  const int *argc, const char **argv, size_t *res)
 {  {
         size_t           res;  
   
         res = 0;          /* FIXME: use API in ml.h. */
   
         if ( ! ml_puts(mbuf, " class=\"block-", &res))          if ( ! ml_puts(mbuf, " class=\"", res))
                 return(0);                  return(0);
         if ( ! ml_puts(mbuf, toknames[tok], &res))          if ( ! ml_puts(mbuf, ns, res))
                 return(0);                  return(0);
         if ( ! ml_puts(mbuf, "\"", &res))          if ( ! ml_puts(mbuf, "-", res))
                 return(0);                  return(0);
           if ( ! ml_puts(mbuf, toknames[tok], res))
                   return(0);
           return(ml_puts(mbuf, "\"", res));
   }
   
         switch (tok) {  
         default:  
                 break;  
         }  
   
         return(0);  /* ARGSUSED */
   static int
   html_headtagargs(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 */  /* ARGSUSED */
 static ssize_t  static int
 html_inlinetagargs(struct md_mbuf *mbuf, const struct md_args *args,  html_bodytagargs(struct md_mbuf *mbuf,
                 int tok, const int *argc, const char **argv)                  const struct md_args *args, int tok,
                   const int *argc, const char **argv, size_t *res)
 {  {
         size_t           res;  
   
         res = 0;          return(html_printargs(mbuf, tok, "body", argc, argv, res));
   }
   
         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);  
   
   /* 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)
   {
   
           if ( ! html_printargs(mbuf, tok, "inline", argc, argv, res))
                   return(0);
   
         switch (tok) {          switch (tok) {
           case (ROFF_Sh):
   
                   /* FIXME: use API in ml.h. */
   
                   assert(*argv);
                   if ( ! ml_nputs(mbuf, " name=\"", 7, res))
                           return(0);
                   if ( ! ml_putstring(mbuf, *argv++, res))
                           return(0);
                   while (*argv) {
                           if ( ! ml_putstring(mbuf, "_", res))
                                   return(0);
                           if ( ! ml_putstring(mbuf, *argv++, res))
                                   return(0);
                   }
                   if ( ! ml_nputs(mbuf, "\"", 1, res))
                           return(0);
                   break;
   
           case (ROFF_Sx):
   
                   /* FIXME: use API in ml.h. */
   
                   assert(*argv);
                   if ( ! ml_nputs(mbuf, " href=\"#", 8, res))
                           return(0);
                   if ( ! ml_putstring(mbuf, *argv++, res))
                           return(0);
                   while (*argv) {
                           if ( ! ml_putstring(mbuf, "_", res))
                                   return(0);
                           if ( ! ml_putstring(mbuf, *argv++, res))
                                   return(0);
                   }
                   if ( ! ml_nputs(mbuf, "\"", 1, res))
                           return(0);
   
                   break;
         default:          default:
                 break;                  break;
         }          }
   
         return(0);          return(1);
 }  }
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static ssize_t  static int
 html_inlinetagname(struct md_mbuf *mbuf,  html_inlinetagname(struct md_mbuf *mbuf,
                 const struct md_args *args, int tok)                  const struct md_args *args, int tok, size_t *res)
 {  {
         size_t           res;  
   
         res = 0;  
   
         switch (tok) {          switch (tok) {
           case (ROFF_Sh):
                   return(html_stput(mbuf, HTML_TAG_A, res));
         case (ROFF_Pp):          case (ROFF_Pp):
                 if ( ! ml_puts(mbuf, "div", &res))                  return(html_stput(mbuf, HTML_TAG_DIV, res));
                         return(-1);          case (ROFF_Sx):
                 break;                  return(html_stput(mbuf, HTML_TAG_A, res));
         default:          default:
                 if ( ! ml_puts(mbuf, "span", &res))  
                         return(-1);  
                 break;                  break;
         }          }
   
         return((ssize_t)res);          return(html_stput(mbuf, HTML_TAG_SPAN, res));
 }  }
   
   
 static ssize_t  static ssize_t
 html_begintag(struct md_mbuf *mbuf, const struct md_args *args,  html_begintag(struct ml_args *p, enum md_ns ns,
                 enum md_ns ns, int tok,                  int tok, const int *argc, const char **argv)
                 const int *argc, const char **argv)  
 {  {
           size_t           res;
           struct htmlq    *q;
           struct htmlnode *node;
           int              i;
   
         assert(ns != MD_NS_DEFAULT);          assert(ns != MD_NS_DEFAULT);
           res = 0;
   
           q = (struct htmlq *)p->data;
   
           if (NULL == (node = calloc(1, sizeof(struct htmlnode)))) {
                   warn("calloc");
                   return(-1);
           }
   
           node->parent = q->last;
           node->tok = tok;
           node->ns = ns;
   
           if (argc)  {
                   /* TODO: argv. */
   
                   assert(argv);
                   /* LINTED */
                   for (i = 0; ROFF_ARGMAX != argc[i]
                                   && i < ROFF_MAXLINEARG; i++)
                           node->argc[i] = argc[i];
                   assert(i != ROFF_MAXLINEARG);
           }
   
   
           q->last = node;
   
         switch (ns) {          switch (ns) {
         case (MD_NS_BLOCK):          case (MD_NS_BLOCK):
                 if ( ! html_blocktagname(mbuf, args, tok))                  if ( ! html_blocktagname(p->mbuf, p->args, tok,
                         return(0);                                          q, argc, argv, &res))
                 return(html_blocktagargs(mbuf, args,                          return(-1);
                                         tok, argc, argv));                  if ( ! html_blocktagargs(p->mbuf, p->args, tok,
                                           argc, argv, &res))
                           return(-1);
                   break;
         case (MD_NS_BODY):          case (MD_NS_BODY):
                 if ( ! html_blockbodytagname(mbuf, args, tok))                  if ( ! html_bodytagname(p->mbuf, p->args, tok,
                         return(0);                                          q, argc, argv, &res))
                 return(html_blockbodytagargs(mbuf, args,                          return(-1);
                                         tok, argc, argv));                  if ( ! html_bodytagargs(p->mbuf, p->args, tok,
                                           argc, argv, &res))
                           return(-1);
                   break;
         case (MD_NS_HEAD):          case (MD_NS_HEAD):
                 if ( ! html_blockheadtagname(mbuf, args, tok))                  if ( ! html_headtagname(p->mbuf, p->args, tok, q,
                         return(0);                                          argc, argv, &res))
                 return(html_blockheadtagargs(mbuf, args,                          return(-1);
                                         tok, argc, argv));                  if ( ! html_headtagargs(p->mbuf, p->args, tok,
                                           argc, argv, &res))
                           return(-1);
                   break;
         default:          default:
                   if ( ! html_inlinetagname(p->mbuf, p->args, tok, &res))
                           return(-1);
                   if ( ! html_inlinetagargs(p->mbuf, p->args, tok,
                                           argc, argv, &res))
                           return(-1);
                 break;                  break;
         }          }
   
         if ( ! html_inlinetagname(mbuf, args, tok))          return((ssize_t)res);
                 return(0);  
         return(html_inlinetagargs(mbuf, args, tok, argc, argv));  
 }  }
   
   
 static ssize_t  static ssize_t
 html_endtag(struct md_mbuf *mbuf, const struct md_args *args,  html_endtag(struct ml_args *p, enum md_ns ns, int tok)
                 enum md_ns ns, int tok)  
 {  {
           size_t           res;
           struct htmlq    *q;
           struct htmlnode *node;
   
         assert(ns != MD_NS_DEFAULT);          assert(ns != MD_NS_DEFAULT);
           res = 0;
   
           q = (struct htmlq *)p->data;
           node = q->last;
   
         switch (ns) {          switch (ns) {
         case (MD_NS_BLOCK):          case (MD_NS_BLOCK):
                 return(html_blocktagname(mbuf, args, tok));                  if ( ! html_blocktagname(p->mbuf, p->args, tok,
                                           q, node->argc,
                                           (const char **)node->argv, &res))
                           return(-1);
                   break;
         case (MD_NS_BODY):          case (MD_NS_BODY):
                 return(html_blockbodytagname(mbuf, args, tok));                  if ( ! html_bodytagname(p->mbuf, p->args, tok,
                                           q, node->argc,
                                           (const char **)node->argv, &res))
                           return(-1);
                   break;
         case (MD_NS_HEAD):          case (MD_NS_HEAD):
                 return(html_blockheadtagname(mbuf, args, tok));                  if ( ! html_headtagname(p->mbuf, p->args, tok,
                                           q, node->argc,
                                           (const char **)node->argv, &res))
                           return(-1);
                   break;
         default:          default:
                   if ( ! html_inlinetagname(p->mbuf, p->args, tok, &res))
                           return(-1);
                 break;                  break;
         }          }
   
         return(html_inlinetagname(mbuf, args, tok));          q->last = node->parent;
   
           free(node);
   
           return((ssize_t)res);
 }  }
   
   
   static int
   html_alloc(void **p)
   {
   
           if (NULL == (*p = calloc(1, sizeof(struct htmlq)))) {
                   warn("calloc");
                   return(0);
           }
           return(1);
   }
   
   
   static void
   html_free(void *p)
   {
           struct htmlq    *q;
           struct htmlnode *n;
   
           assert(p);
           q = (struct htmlq *)p;
   
           /* LINTED */
           while ((n = q->last)) {
                   q->last = n->parent;
                   free(n);
           }
   
           free(q);
   }
   
   
   /* ARGSUSED */
   static ssize_t
   html_beginhttp(struct md_mbuf *mbuf,
                   const struct md_args *args,
                   const char *buf, size_t sz)
   {
           size_t           res;
           struct html_pair pair;
   
           res = 0;
           pair.attr = HTML_ATTR_HREF;
           pair.val = (char *)buf;
   
           if ( ! html_aput(mbuf, ML_OPEN, HTML_TAG_A, &res, 1, &pair))
                   return(-1);
           return((ssize_t)res);
   }
   
   
   /* ARGSUSED */
   static ssize_t
   html_endhttp(struct md_mbuf *mbuf,
                   const struct md_args *args,
                   const char *buf, size_t sz)
   {
           size_t           res;
   
           res = 0;
           if ( ! html_tput(mbuf, ML_CLOSE, HTML_TAG_A, &res))
                   return(-1);
           return((ssize_t)res);
   }
   
   
   /* ARGSUSED */
   static ssize_t
   html_beginstring(struct ml_args *p, const char *buf, size_t sz)
   {
   
           if (0 == strncmp(buf, "http://", 7))
                   return(html_beginhttp(p->mbuf, p->args, buf, sz));
   
           return(0);
   }
   
   
   /* ARGSUSED */
   static ssize_t
   html_endstring(struct ml_args *p, const char *buf, size_t sz)
   {
   
           if (0 == strncmp(buf, "http://", 7))
                   return(html_endhttp(p->mbuf, p->args, buf, sz));
   
           return(0);
   }
   
   
 int  int
 md_line_html(void *data, char *buf)  md_line_html(void *data, char *buf)
 {  {
Line 443  void *
Line 1066  void *
 md_init_html(const struct md_args *args,  md_init_html(const struct md_args *args,
                 struct md_mbuf *mbuf, const struct md_rbuf *rbuf)                  struct md_mbuf *mbuf, const struct md_rbuf *rbuf)
 {  {
           struct ml_cbs    cbs;
   
         return(mlg_alloc(args, rbuf, mbuf, html_begintag,          cbs.ml_alloc = html_alloc;
                                 html_endtag, html_begin, html_end));          cbs.ml_free = html_free;
 }          cbs.ml_begintag = html_begintag;
           cbs.ml_endtag = html_endtag;
           cbs.ml_begin = html_begin;
           cbs.ml_end = html_end;
           cbs.ml_beginstring = html_beginstring;
           cbs.ml_endstring = html_endstring;
   
           return(mlg_alloc(args, rbuf, mbuf, &cbs));
   }

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.26

CVSweb