[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.18

version 1.5, 2008/12/04 16:19:52 version 1.18, 2008/12/09 19:57:26
Line 27 
Line 27 
 #include <string.h>  #include <string.h>
 #include <unistd.h>  #include <unistd.h>
   
 #include "libmdocml.h"  
 #include "private.h"  #include "private.h"
 #include "ml.h"  #include "ml.h"
   
   #define TAG_HTML        "<html>"
   #define TAG_HTML_END    "</html>"
   #define TAG_BODY        "<body>"
   #define TAG_BODY_END    "</body>"
   #define TAG_DIV_MDOC    "<div class=\"mdoc\">"
   #define TAG_DIV_END     "</div>"
   #define TAG_STYLE_CSS   "<style type=\"text/css\"><!--"
   #define TAG_STYLE_END   "--></style>"
   #define TAG_HEAD        "<head>"
   #define TAG_HEAD_END    "</head>"
   #define TAG_TITLE       "<title>"
   #define TAG_TITLE_END   "</title>"
   #define TAG_LINK_CSS    "<link rel=\"stylesheet\" " \
                           "type=\"text/css\" href=\"%s\">"
   #define TAG_DOCTYPE     "<!DOCTYPE HTML PUBLIC " \
                           "\"-//W3C//DTD HTML 4.01//EN\" " \
                           "\"http://www.w3.org/TR/html4/strict.dtd\">"
   #define TAG_RESTYPE     "<meta name=\"resource-type\" " \
                           "content=\"document\">"
   #define TAG_CONTTYPE    "<meta http-equiv=\"Content-Type\" " \
                           "content=\"text/html;charset=utf-8\">"
   
   /* TODO: allow head/tail-less invocations (just "div" start). */
   
   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  int             html_loadcss(struct md_mbuf *, const char *);  static  int             html_loadcss(struct md_mbuf *, const char *);
   
 static  ssize_t         html_endtag(struct md_mbuf *,  static  int             html_alloc(void **);
   static  void            html_free(void *);
   static  ssize_t         html_endtag(struct md_mbuf *, void *,
                                 const struct md_args *,                                  const struct md_args *,
                                 enum md_ns, int);                                  enum md_ns, int);
 static  ssize_t         html_begintag(struct md_mbuf *,  static  ssize_t         html_beginstring(struct md_mbuf *,
                                 const struct md_args *,                                  const struct md_args *,
                                   const char *, size_t);
   static  ssize_t         html_beginhttp(struct md_mbuf *,
                                   const struct md_args *,
                                   const char *, size_t);
   static  ssize_t         html_endstring(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  ssize_t         html_begintag(struct md_mbuf *, void *,
                                   const struct md_args *,
                                 enum md_ns, int,                                  enum md_ns, int,
                                 const int *, const char **);                                  const int *, const char **);
 static  int             html_begin(struct md_mbuf *,  static  int             html_begin(struct md_mbuf *,
                                 const struct md_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, 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 *,  static  int             html_end(struct md_mbuf *,
                                 const struct md_args *);                                  const struct md_args *);
 static  ssize_t         html_blocktagname(struct md_mbuf *,  static  int             html_blocktagname(struct md_mbuf *,
                                 const struct md_args *, int);                                  const struct md_args *, int,
 static  ssize_t         html_blocktagargs(struct md_mbuf *,                                  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 *);
   
   
   /* 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;
   
           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(ml_nputs(mbuf, "div", 3, res));
                   case (ROFF_Tag):
                           /* FALLTHROUGH */
                   case (ROFF_Column):
                           return(ml_nputs(mbuf, "td", 2, res));
                   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;
   
           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(ml_nputs(mbuf, "div", 3, res));
                   case (ROFF_Tag):
                           /* FALLTHROUGH */
                   case (ROFF_Column):
                           return(ml_nputs(mbuf, "td", 2, res));
                   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(ml_nputs(mbuf, "ol", 2, 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(ml_nputs(mbuf, "ul", 2, res));
                   case (ROFF_Tag):
                           /* FALLTHROUGH */
                   case (ROFF_Column):
                           return(ml_nputs(mbuf, "table", 5, 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(ml_nputs(mbuf, "li", 2, res));
                   case (ROFF_Tag):
                           /* FALLTHROUGH */
                   case (ROFF_Column):
                           return(ml_nputs(mbuf, "tr", 2, 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 370  out:
 }  }
   
   
   static int
   html_putline(struct md_mbuf *mbuf, size_t indent,
                   const char *p, size_t *res)
   {
   
           /* FIXME: use INDENT macro for this. */
           if ( ! ml_putchars(mbuf, ' ', indent * 4, res))
                   return(0);
           if ( ! ml_puts(mbuf, p, res))
                   return(0);
           return(ml_nputs(mbuf, "\n", 1, res));
   }
   
   
   static int
   html_putlinestart(struct md_mbuf *mbuf, size_t indent,
                   const char *p, size_t *res)
   {
   
           if ( ! ml_putchars(mbuf, ' ', indent * 4, res))
                   return(0);
           return(ml_puts(mbuf, p, res));
   }
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static int  static int
 html_begin(struct md_mbuf *mbuf, const struct md_args *args,  html_begin(struct md_mbuf *mbuf, const struct md_args *args,
                 const struct tm *tm, const char *os,                  const struct tm *tm, const char *os,
                 const char *title, const char *section,                  const char *title, enum roffmsec section,
                 const char *vol)                  const char *vol)
 {  {
         const char      *preamble, *css, *trail;          char             mtitle[128], css[128];
         char             buf[512];          size_t           i;
         size_t           res;  
   
         preamble =          (void)snprintf(mtitle, sizeof(mtitle),
         "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01//EN\"\n"                          "Manual Page for %s(%s)",
         "    \"http://www.w3.org/TR/html4/strict.dtd\">\n"                          title, roff_msecname(section));
         "<html>\n"          (void)snprintf(css, sizeof(css),
         "<head>\n"                          TAG_LINK_CSS, args->params.html.css);
         "    <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 =          i = 0;
         "    <link rel=\"stylesheet\" type=\"text/css\"\n"  
         "         href=\"%s\">\n";  
         trail =  
         "</head>\n"  
         "<body>\n"  
         "<div class=\"mdoc\">\n";  
   
         res = 0;          if ( ! html_putline(mbuf, i, TAG_DOCTYPE, NULL))
   
         (void)snprintf(buf, sizeof(buf) - 1,  
                         preamble, title, section);  
   
         if ( ! ml_puts(mbuf, buf, &res))  
                 return(0);                  return(0);
           if ( ! html_putline(mbuf, i, TAG_HTML, NULL))
                   return(0);
           if ( ! html_putline(mbuf, i++, TAG_HEAD, NULL))
                   return(0);
           if ( ! html_putline(mbuf, i, TAG_CONTTYPE, NULL))
                   return(0);
           if ( ! html_putline(mbuf, i, TAG_RESTYPE, NULL))
                   return(0);
           if ( ! html_putlinestart(mbuf, i, TAG_TITLE, NULL))
                   return(0);
           if ( ! ml_putstring(mbuf, mtitle, NULL))
                   return(0);
           if ( ! html_putline(mbuf, i, TAG_TITLE_END, NULL))
                   return(0);
   
         assert(args->params.html.css);  
         if (HTML_CSS_EMBED & args->params.html.flags) {          if (HTML_CSS_EMBED & args->params.html.flags) {
                 if ( ! ml_puts(mbuf, "    <style type=\"text/css\"><!--\n", &res))                  if ( ! html_putline(mbuf, i, TAG_STYLE_CSS, NULL))
                         return(0);                          return(0);
                 if ( ! html_loadcss(mbuf, args->params.html.css))                  if ( ! html_loadcss(mbuf, args->params.html.css))
                         return(0);                          return(0);
                 if ( ! ml_puts(mbuf, "    --!></style>\n", &res))                  if ( ! html_putline(mbuf, i, TAG_STYLE_END, NULL))
                         return(0);                          return(0);
         } else {          } else if ( ! html_putline(mbuf, i, css, NULL))
                 (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(0);
   
           if ( ! html_putline(mbuf, --i, TAG_HEAD_END, NULL))
                   return(0);
           if ( ! html_putline(mbuf, i, TAG_BODY, NULL))
                   return(0);
           if ( ! html_putline(mbuf, i, TAG_DIV_MDOC, NULL))
                   return(0);
           if ( ! html_putline(mbuf, i++, "<table width=\"100%\">", NULL))
                   return(0);
           if ( ! html_putline(mbuf, i++, "<tr>", NULL))
                   return(0);
           if ( ! html_putline(mbuf, i++, "<td align=\"left\">", NULL))
                   return(0);
           if ( ! ml_putstring(mbuf, title, NULL))
                   return(0);
           if ( ! html_putline(mbuf, --i, "</td>", NULL))
                   return(0);
           if ( ! html_putline(mbuf, i++, "<td align=\"center\">", NULL))
                   return(0);
           if ( ! ml_putstring(mbuf, "Hello, world.", NULL))
                   return(0);
           if ( ! html_putline(mbuf, --i, "</td>", NULL))
                   return(0);
           if ( ! html_putline(mbuf, i++, "<td align=\"right\">", NULL))
                   return(0);
           if ( ! ml_putstring(mbuf, title, NULL))
                   return(0);
           if ( ! html_putline(mbuf, --i, "</td>", NULL))
                   return(0);
           if ( ! html_putline(mbuf, --i, "</tr>", NULL))
                   return(0);
           if ( ! html_putline(mbuf, --i, "</table>", NULL))
                   return(0);
         return(1);          return(1);
 }  }
   
Line 187  html_begin(struct md_mbuf *mbuf, const struct md_args 
Line 480  html_begin(struct md_mbuf *mbuf, const struct md_args 
 static int  static int
 html_end(struct md_mbuf *mbuf, const struct md_args *args)  html_end(struct md_mbuf *mbuf, const struct md_args *args)
 {  {
         size_t           res;  
   
         res = 0;          if ( ! html_putline(mbuf, 0, TAG_DIV_END, NULL))
         if ( ! ml_puts(mbuf, "</div></body>\n</html>", &res))  
                 return(0);                  return(0);
           if ( ! html_putline(mbuf, 0, TAG_BODY_END, NULL))
         return(1);                  return(0);
           return(html_putline(mbuf, 0, TAG_HTML_END, NULL));
 }  }
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static ssize_t  static int
 html_blockbodytagname(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(ml_nputs(mbuf, "span", 4, res));
           case (ROFF_It):
                   return(html_It_bodytagname(mbuf, q, argc, argv, res));
           case (ROFF_Oo):
                   return(ml_nputs(mbuf, "span", 4, res));
           default:
                   break;
           }
   
         return((ssize_t)res);          return(ml_puts(mbuf, "div", res));
 }  }
   
   
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static ssize_t  static int
 html_blockheadtagname(struct md_mbuf *mbuf,  html_headtagname(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_It):
                 return(-1);                  return(html_It_headtagname(mbuf, q, argc, argv, res));
           case (ROFF_Fo):
                   return(ml_nputs(mbuf, "span", 4, res));
           case (ROFF_Oo):
                   return(ml_nputs(mbuf, "span", 4, res));
           case (ROFF_Sh):
                   return(ml_nputs(mbuf, "h1", 2, res));
           case (ROFF_Ss):
                   return(ml_nputs(mbuf, "h2", 2, res));
           default:
                   break;
           }
   
         return((ssize_t)res);          return(ml_nputs(mbuf, "div", 3, res));
 }  }
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static ssize_t  static int
 html_blocktagname(struct md_mbuf *mbuf,  html_blocktagname(struct md_mbuf *mbuf, const struct md_args *args,
                 const struct md_args *args, int tok)                  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_Fo):
                 return(-1);                  return(ml_nputs(mbuf, "span", 4, res));
           case (ROFF_Oo):
                   return(ml_nputs(mbuf, "span", 4, res));
           case (ROFF_It):
                   return(html_It_blocktagname(mbuf, q, argc, argv, res));
           default:
                   break;
           }
   
         return((ssize_t)res);          return(ml_puts(mbuf, "div", res));
 }  }
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static ssize_t  static int
 html_blockheadtagargs(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;          if ( ! ml_puts(mbuf, " class=\"", res))
   
         if ( ! ml_puts(mbuf, " class=\"head-", &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_blockbodytagargs(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=\"body-", &res))  
                 return(0);  
         if ( ! ml_puts(mbuf, toknames[tok], &res))  
                 return(0);  
         if ( ! ml_puts(mbuf, "\"", &res))  
                 return(0);  
   
         switch (tok) {  /* ARGSUSED */
         default:  static int
                 break;  html_blocktagargs(struct md_mbuf *mbuf,
         }                  const struct md_args *args, int tok,
                   const int *argc, const char **argv, size_t *res)
   {
   
         return(res);          return(html_printargs(mbuf, tok, "block", argc, argv, res));
 }  }
   
   
 /* ARGSUSED */  /* ARGSUSED */
 static ssize_t  static int
 html_blocktagargs(struct md_mbuf *mbuf, const struct md_args *args,  html_inlinetagargs(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;          if ( ! html_printargs(mbuf, tok, "inline", argc, argv, res))
   
         if ( ! ml_puts(mbuf, " class=\"block-", &res))  
                 return(0);                  return(0);
         if ( ! ml_puts(mbuf, toknames[tok], &res))  
                 return(0);  
         if ( ! ml_puts(mbuf, "\"", &res))  
                 return(0);  
   
         switch (tok) {          switch (tok) {
           case (ROFF_Sx):
                   assert(*argv);
                   if ( ! ml_nputs(mbuf, " href=\"#", 8, 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_inlinetagargs(struct md_mbuf *mbuf, const struct md_args *args,  html_inlinetagname(struct md_mbuf *mbuf,
                 int tok, const int *argc, const char **argv)                  const struct md_args *args, int tok, size_t *res)
 {  {
         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) {          switch (tok) {
           case (ROFF_Pp):
                   return(ml_nputs(mbuf, "div", 3, res));
           case (ROFF_Sx):
                   return(ml_nputs(mbuf, "a", 1, res));
         default:          default:
                 break;                  break;
         }          }
   
         return(0);          return(ml_puts(mbuf, "span", res));
 }  }
   
   
 /* ARGSUSED */  static ssize_t
 static ssize_t  html_begintag(struct md_mbuf *mbuf, void *data,
 html_inlinetagname(struct md_mbuf *mbuf,                  const struct md_args *args, enum md_ns ns,
                 const struct md_args *args, int tok)                  int tok, const int *argc, const char **argv)
 {  {
         size_t           res;          size_t           res;
           struct htmlq    *q;
           struct htmlnode *node;
           int              i;
   
           assert(ns != MD_NS_DEFAULT);
         res = 0;          res = 0;
   
         switch (tok) {          assert(data);
         case (ROFF_Pp):          q = (struct htmlq *)data;
                 if ( ! ml_puts(mbuf, "div", &res))  
           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) {
           case (MD_NS_BLOCK):
                   if ( ! html_blocktagname(mbuf, args, tok,
                                           q, argc, argv, &res))
                         return(-1);                          return(-1);
                   if ( ! html_blocktagargs(mbuf, args, tok,
                                           argc, argv, &res))
                           return(-1);
                 break;                  break;
           case (MD_NS_BODY):
                   if ( ! html_bodytagname(mbuf, args, tok,
                                           q, argc, argv, &res))
                           return(-1);
                   if ( ! html_bodytagargs(mbuf, args, tok,
                                           argc, argv, &res))
                           return(-1);
                   break;
           case (MD_NS_HEAD):
                   if ( ! html_headtagname(mbuf, args, tok, q,
                                           argc, argv, &res))
                           return(-1);
                   if ( ! html_headtagargs(mbuf, args, tok,
                                           argc, argv, &res))
                           return(-1);
                   break;
         default:          default:
                 if ( ! ml_puts(mbuf, "span", &res))                  if ( ! html_inlinetagname(mbuf, args, tok, &res))
                         return(-1);                          return(-1);
                   if ( ! html_inlinetagargs(mbuf, args, tok,
                                           argc, argv, &res))
                           return(-1);
                 break;                  break;
         }          }
   
Line 370  html_inlinetagname(struct md_mbuf *mbuf, 
Line 737  html_inlinetagname(struct md_mbuf *mbuf, 
   
   
 static ssize_t  static ssize_t
 html_begintag(struct md_mbuf *mbuf, const struct md_args *args,  html_endtag(struct md_mbuf *mbuf, void *data,
                 enum md_ns ns, int tok,                  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);          assert(ns != MD_NS_DEFAULT);
           res = 0;
   
           assert(data);
           q = (struct htmlq *)data;
           node = q->last;
   
         switch (ns) {          switch (ns) {
         case (MD_NS_BLOCK):          case (MD_NS_BLOCK):
                 if ( ! html_blocktagname(mbuf, args, tok))                  if ( ! html_blocktagname(mbuf, args, tok,
                         return(0);                                          q, node->argc,
                 return(html_blocktagargs(mbuf, args,                                          (const char **)node->argv, &res))
                                         tok, argc, argv));                          return(-1);
                   break;
         case (MD_NS_BODY):          case (MD_NS_BODY):
                 if ( ! html_blockbodytagname(mbuf, args, tok))                  if ( ! html_bodytagname(mbuf, args, tok,
                         return(0);                                          q, node->argc,
                 return(html_blockbodytagargs(mbuf, args,                                          (const char **)node->argv, &res))
                                         tok, argc, argv));                          return(-1);
                   break;
         case (MD_NS_HEAD):          case (MD_NS_HEAD):
                 if ( ! html_blockheadtagname(mbuf, args, tok))                  if ( ! html_headtagname(mbuf, args, tok,
                         return(0);                                          q, node->argc,
                 return(html_blockheadtagargs(mbuf, args,                                          (const char **)node->argv, &res))
                                         tok, argc, argv));                          return(-1);
                   break;
         default:          default:
                   if ( ! html_inlinetagname(mbuf, args, tok, &res))
                           return(-1);
                 break;                  break;
         }          }
   
         if ( ! 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(0);
         return(html_inlinetagargs(mbuf, args, tok, argc, argv));          }
           return(1);
 }  }
   
   
 static ssize_t  static void
 html_endtag(struct md_mbuf *mbuf, const struct md_args *args,  html_free(void *p)
                 enum md_ns ns, int tok)  
 {  {
           struct htmlq    *q;
           struct htmlnode *n;
   
         assert(ns != MD_NS_DEFAULT);          assert(p);
         switch (ns) {          q = (struct htmlq *)p;
         case (MD_NS_BLOCK):  
                 return(html_blocktagname(mbuf, args, tok));          /* LINTED */
         case (MD_NS_BODY):          while ((n = q->last)) {
                 return(html_blockbodytagname(mbuf, args, tok));                  q->last = n->parent;
         case (MD_NS_HEAD):                  free(n);
                 return(html_blockheadtagname(mbuf, args, tok));  
         default:  
                 break;  
         }          }
   
         return(html_inlinetagname(mbuf, args, tok));          free(q);
 }  }
   
   
   static ssize_t
   html_beginhttp(struct md_mbuf *mbuf,
                   const struct md_args *args,
                   const char *buf, size_t sz)
   {
           size_t           res;
   
           res = 0;
   
           if ( ! ml_puts(mbuf, "<a href=\"", &res))
                   return(-1);
           if (1 != ml_nputstring(mbuf, buf, sz, &res))
                   return(-1);
           if ( ! ml_puts(mbuf, "\">", &res))
                   return(-1);
   
           return((ssize_t)res);
   }
   
   
   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 ( ! ml_puts(mbuf, "</a>", &res))
                   return(-1);
   
           return((ssize_t)res);
   }
   
   
   /* ARGSUSED */
   static ssize_t
   html_beginstring(struct md_mbuf *mbuf,
                   const struct md_args *args,
                   const char *buf, size_t sz)
   {
   
           if (0 == strncmp(buf, "http://", 7))
                   return(html_beginhttp(mbuf, args, buf, sz));
   
           return(0);
   }
   
   
   /* ARGSUSED */
   static ssize_t
   html_endstring(struct md_mbuf *mbuf,
                   const struct md_args *args,
                   const char *buf, size_t sz)
   {
   
           if (0 == strncmp(buf, "http://", 7))
                   return(html_endhttp(mbuf, 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 899  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.18
CVSweb