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

Diff for /mandoc/tbl_html.c between version 1.10 and 1.33

version 1.10, 2012/05/27 17:54:54 version 1.33, 2019/03/17 18:21:45
Line 1 
Line 1 
 /*      $Id$ */  /*      $Id$ */
 /*  /*
  * Copyright (c) 2011 Kristaps Dzonsons <kristaps@bsd.lv>   * Copyright (c) 2011 Kristaps Dzonsons <kristaps@bsd.lv>
    * Copyright (c) 2014, 2015, 2017, 2018 Ingo Schwarze <schwarze@openbsd.org>
  *   *
  * Permission to use, copy, modify, and distribute this software for any   * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above   * purpose with or without fee is hereby granted, provided that the above
Line 14 
Line 15 
  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF   * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.   * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  */   */
 #ifdef HAVE_CONFIG_H  
 #include "config.h"  #include "config.h"
 #endif  
   
   #include <sys/types.h>
   
 #include <assert.h>  #include <assert.h>
 #include <stdio.h>  #include <stdio.h>
 #include <stdlib.h>  #include <stdlib.h>
 #include <string.h>  #include <string.h>
   
 #include "mandoc.h"  #include "mandoc.h"
   #include "roff.h"
   #include "tbl.h"
 #include "out.h"  #include "out.h"
 #include "html.h"  #include "html.h"
   
 static  void     html_tblopen(struct html *, const struct tbl_span *);  static  void     html_tblopen(struct html *, const struct tbl_span *);
 static  size_t   html_tbl_len(size_t, void *);  static  size_t   html_tbl_len(size_t, void *);
 static  size_t   html_tbl_strlen(const char *, void *);  static  size_t   html_tbl_strlen(const char *, void *);
   static  size_t   html_tbl_sulen(const struct roffsu *, void *);
   
 /* ARGSUSED */  
 static size_t  static size_t
 html_tbl_len(size_t sz, void *arg)  html_tbl_len(size_t sz, void *arg)
 {  {
           return sz;
         return(sz);  
 }  }
   
 /* ARGSUSED */  
 static size_t  static size_t
 html_tbl_strlen(const char *p, void *arg)  html_tbl_strlen(const char *p, void *arg)
 {  {
           return strlen(p);
   }
   
         return(strlen(p));  static size_t
   html_tbl_sulen(const struct roffsu *su, void *arg)
   {
           if (su->scale < 0.0)
                   return 0;
   
           switch (su->unit) {
           case SCALE_FS:  /* 2^16 basic units */
                   return su->scale * 65536.0 / 24.0;
           case SCALE_IN:  /* 10 characters per inch */
                   return su->scale * 10.0;
           case SCALE_CM:  /* 2.54 cm per inch */
                   return su->scale * 10.0 / 2.54;
           case SCALE_PC:  /* 6 pica per inch */
           case SCALE_VS:
                   return su->scale * 10.0 / 6.0;
           case SCALE_EN:
           case SCALE_EM:
                   return su->scale;
           case SCALE_PT:  /* 12 points per pica */
                   return su->scale * 10.0 / 6.0 / 12.0;
           case SCALE_BU:  /* 24 basic units per character */
                   return su->scale / 24.0;
           case SCALE_MM:  /* 1/1000 inch */
                   return su->scale / 100.0;
           default:
                   abort();
           }
 }  }
   
 static void  static void
 html_tblopen(struct html *h, const struct tbl_span *sp)  html_tblopen(struct html *h, const struct tbl_span *sp)
 {  {
         const struct tbl_head *hp;          html_close_paragraph(h);
         struct htmlpair  tag;          if (h->tbl.cols == NULL) {
         struct roffsu    su;  
         struct roffcol  *col;  
   
         if (TBL_SPAN_FIRST & sp->flags) {  
                 h->tbl.len = html_tbl_len;                  h->tbl.len = html_tbl_len;
                 h->tbl.slen = html_tbl_strlen;                  h->tbl.slen = html_tbl_strlen;
                 tblcalc(&h->tbl, sp);                  h->tbl.sulen = html_tbl_sulen;
                   tblcalc(&h->tbl, sp, 0, 0);
         }          }
   
         assert(NULL == h->tblt);          assert(NULL == h->tblt);
         PAIR_CLASS_INIT(&tag, "tbl");          h->tblt = print_otag(h, TAG_TABLE, "c?ss", "tbl",
         h->tblt = print_otag(h, TAG_TABLE, 1, &tag);              "border",
                   sp->opts->opts & TBL_OPT_ALLBOX ? "1" : NULL,
         for (hp = sp->head; hp; hp = hp->next) {              "border-style",
                 bufinit(h);                  sp->opts->opts & TBL_OPT_DBOX ? "double" :
                 col = &h->tbl.cols[hp->ident];                  sp->opts->opts & TBL_OPT_BOX ? "solid" : NULL,
                 SCALE_HS_INIT(&su, col->width);              "border-top-style",
                 bufcat_su(h, "width", &su);                  sp->pos == TBL_SPAN_DHORIZ ? "double" :
                 PAIR_STYLE_INIT(&tag, h);                  sp->pos == TBL_SPAN_HORIZ ? "solid" : NULL);
                 print_otag(h, TAG_COL, 1, &tag);  
         }  
   
         print_otag(h, TAG_TBODY, 0, NULL);  
 }  }
   
 void  void
Line 89  print_tblclose(struct html *h)
Line 112  print_tblclose(struct html *h)
 void  void
 print_tbl(struct html *h, const struct tbl_span *sp)  print_tbl(struct html *h, const struct tbl_span *sp)
 {  {
         const struct tbl_head *hp;          const struct tbl_dat    *dp;
         const struct tbl_dat *dp;          const struct tbl_cell   *cp;
         struct htmlpair  tag;          const struct tbl_span   *psp;
         struct tag      *tt;          struct tag              *tt;
           const char              *hspans, *vspans, *halign, *valign;
           const char              *bborder, *lborder, *rborder;
           char                     hbuf[4], vbuf[4];
           int                      i;
   
         /* Inhibit printing of spaces: we do padding ourselves. */          if (h->tblt == NULL)
   
         if (NULL == h->tblt)  
                 html_tblopen(h, sp);                  html_tblopen(h, sp);
   
         assert(h->tblt);          /*
            * Horizontal lines spanning the whole table
            * are handled by previous or following table rows.
            */
   
           if (sp->pos != TBL_SPAN_DATA)
                   return;
   
           /* Inhibit printing of spaces: we do padding ourselves. */
   
         h->flags |= HTML_NONOSPACE;          h->flags |= HTML_NONOSPACE;
         h->flags |= HTML_NOSPACE;          h->flags |= HTML_NOSPACE;
   
         tt = print_otag(h, TAG_TR, 0, NULL);          /* Draw a vertical line left of this row? */
   
         switch (sp->pos) {          switch (sp->layout->vert) {
         case (TBL_SPAN_HORIZ):          case 2:
                 /* FALLTHROUGH */                  lborder = "double";
         case (TBL_SPAN_DHORIZ):  
                 PAIR_INIT(&tag, ATTR_COLSPAN, "0");  
                 print_otag(h, TAG_TD, 1, &tag);  
                 break;                  break;
           case 1:
                   lborder = "solid";
                   break;
         default:          default:
                 dp = sp->first;                  lborder = NULL;
                 for (hp = sp->head; hp; hp = hp->next) {                  break;
                         print_stagq(h, tt);          }
                         print_otag(h, TAG_TD, 0, NULL);  
   
                         if (NULL == dp)          /* Draw a horizontal line below this row? */
                                 break;  
                         if (TBL_CELL_DOWN != dp->layout->pos)          bborder = NULL;
                                 if (dp->string)          if ((psp = sp->next) != NULL) {
                                         print_text(h, dp->string);                  switch (psp->pos) {
                         dp = dp->next;                  case TBL_SPAN_DHORIZ:
                           bborder = "double";
                           break;
                   case TBL_SPAN_HORIZ:
                           bborder = "solid";
                           break;
                   default:
                           break;
                 }                  }
                 break;  
         }          }
   
           tt = print_otag(h, TAG_TR, "ss",
               "border-left-style", lborder,
               "border-bottom-style", bborder);
   
           for (dp = sp->first; dp != NULL; dp = dp->next) {
                   print_stagq(h, tt);
   
                   /*
                    * Do not generate <td> elements for continuations
                    * of spanned cells.  Larger <td> elements covering
                    * this space were already generated earlier.
                    */
   
                   cp = dp->layout;
                   if (cp->pos == TBL_CELL_SPAN || cp->pos == TBL_CELL_DOWN ||
                       (dp->string != NULL && strcmp(dp->string, "\\^") == 0))
                           continue;
   
                   /* Determine the attribute values. */
   
                   if (dp->hspans > 0) {
                           (void)snprintf(hbuf, sizeof(hbuf),
                               "%d", dp->hspans + 1);
                           hspans = hbuf;
                   } else
                           hspans = NULL;
                   if (dp->vspans > 0) {
                           (void)snprintf(vbuf, sizeof(vbuf),
                               "%d", dp->vspans + 1);
                           vspans = vbuf;
                   } else
                           vspans = NULL;
   
                   switch (cp->pos) {
                   case TBL_CELL_CENTRE:
                           halign = "center";
                           break;
                   case TBL_CELL_RIGHT:
                   case TBL_CELL_NUMBER:
                           halign = "right";
                           break;
                   default:
                           halign = NULL;
                           break;
                   }
                   if (cp->flags & TBL_CELL_TALIGN)
                           valign = "top";
                   else if (cp->flags & TBL_CELL_BALIGN)
                           valign = "bottom";
                   else
                           valign = NULL;
   
                   for (i = dp->hspans; i > 0; i--)
                           cp = cp->next;
                   switch (cp->vert) {
                   case 2:
                           rborder = "double";
                           break;
                   case 1:
                           rborder = "solid";
                           break;
                   default:
                           rborder = NULL;
                           break;
                   }
   
                   /* Print the element and the attributes. */
   
                   print_otag(h, TAG_TD, "??sss",
                       "colspan", hspans, "rowspan", vspans,
                       "vertical-align", valign,
                       "text-align", halign,
                       "border-right-style", rborder);
                   if (dp->string != NULL)
                           print_text(h, dp->string);
           }
   
         print_tagq(h, tt);          print_tagq(h, tt);
   
         h->flags &= ~HTML_NONOSPACE;          h->flags &= ~HTML_NONOSPACE;
   
         if (TBL_SPAN_LAST & sp->flags) {          if (sp->next == NULL) {
                 assert(h->tbl.cols);                  assert(h->tbl.cols);
                 free(h->tbl.cols);                  free(h->tbl.cols);
                 h->tbl.cols = NULL;                  h->tbl.cols = NULL;
                 print_tblclose(h);                  print_tblclose(h);
         }          }
   
 }  }

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.33

CVSweb