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

Diff for /mandoc/tbl.c between version 1.30 and 1.36

version 1.30, 2014/08/10 23:54:41 version 1.36, 2015/01/28 17:32:07
Line 1 
Line 1 
 /*      $Id$ */  /*      $Id$ */
 /*  /*
  * Copyright (c) 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>   * Copyright (c) 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
  * Copyright (c) 2011 Ingo Schwarze <schwarze@openbsd.org>   * Copyright (c) 2011, 2015 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 32 
Line 32 
   
   
 enum rofferr  enum rofferr
 tbl_read(struct tbl_node *tbl, int ln, const char *p, int offs)  tbl_read(struct tbl_node *tbl, int ln, const char *p, int pos)
 {  {
         int              len;  
         const char      *cp;          const char      *cp;
           int              active;
   
         cp = &p[offs];  
         len = (int)strlen(cp);  
   
         /*          /*
          * If we're in the options section and we don't have a           * In the options section, proceed to the layout section
          * terminating semicolon, assume we've moved directly into the           * after a semicolon, or right away if there is no semicolon.
          * layout section.  No need to report a warning: this is,           * Ignore semicolons in arguments.
          * apparently, standard behaviour.  
          */           */
   
         if (TBL_PART_OPTS == tbl->part && len)          if (tbl->part == TBL_PART_OPTS) {
                 if (';' != cp[len - 1])                  tbl->part = TBL_PART_LAYOUT;
                         tbl->part = TBL_PART_LAYOUT;                  active = 1;
                   for (cp = p + pos; *cp != '\0'; cp++) {
                           switch (*cp) {
                           case '(':
                                   active = 0;
                                   continue;
                           case ')':
                                   active = 1;
                                   continue;
                           case ';':
                                   if (active)
                                           break;
                                   continue;
                           default:
                                   continue;
                           }
                           break;
                   }
                   if (*cp == ';') {
                           tbl_option(tbl, ln, p, &pos);
                           if (p[pos] == '\0')
                                   return(ROFF_IGN);
                   }
           }
   
         /* Now process each logical section of the table.  */          /* Process the other section types.  */
   
         switch (tbl->part) {          switch (tbl->part) {
         case TBL_PART_OPTS:  
                 return(tbl_option(tbl, ln, p) ? ROFF_IGN : ROFF_ERR);  
         case TBL_PART_LAYOUT:          case TBL_PART_LAYOUT:
                 return(tbl_layout(tbl, ln, p) ? ROFF_IGN : ROFF_ERR);                  tbl_layout(tbl, ln, p, pos);
                   return(ROFF_IGN);
         case TBL_PART_CDATA:          case TBL_PART_CDATA:
                 return(tbl_cdata(tbl, ln, p) ? ROFF_TBL : ROFF_IGN);                  return(tbl_cdata(tbl, ln, p, pos) ? ROFF_TBL : ROFF_IGN);
         default:          default:
                 break;                  break;
         }          }
   
         /*          tbl_data(tbl, ln, p, pos);
          * This only returns zero if the line is empty, so we ignore it          return(ROFF_TBL);
          * and continue on.  
          */  
         return(tbl_data(tbl, ln, p) ? ROFF_TBL : ROFF_IGN);  
 }  }
   
 struct tbl_node *  struct tbl_node *
Line 82  tbl_alloc(int pos, int line, struct mparse *parse)
Line 97  tbl_alloc(int pos, int line, struct mparse *parse)
         tbl->parse = parse;          tbl->parse = parse;
         tbl->part = TBL_PART_OPTS;          tbl->part = TBL_PART_OPTS;
         tbl->opts.tab = '\t';          tbl->opts.tab = '\t';
         tbl->opts.linesize = 12;  
         tbl->opts.decimal = '.';          tbl->opts.decimal = '.';
         return(tbl);          return(tbl);
 }  }
Line 129  tbl_free(struct tbl_node *tbl)
Line 143  tbl_free(struct tbl_node *tbl)
 void  void
 tbl_restart(int line, int pos, struct tbl_node *tbl)  tbl_restart(int line, int pos, struct tbl_node *tbl)
 {  {
         if (TBL_PART_CDATA == tbl->part)          if (tbl->part == TBL_PART_CDATA)
                 mandoc_msg(MANDOCERR_TBLBLOCK, tbl->parse,                  mandoc_msg(MANDOCERR_TBLDATA_BLK, tbl->parse,
                     tbl->line, tbl->pos, NULL);                      line, pos, "T&");
   
         tbl->part = TBL_PART_LAYOUT;          tbl->part = TBL_PART_LAYOUT;
         tbl->line = line;          tbl->line = line;
         tbl->pos = pos;          tbl->pos = pos;
   
         if (NULL == tbl->first_span || NULL == tbl->first_span->first)  
                 mandoc_msg(MANDOCERR_TBLNODATA, tbl->parse,  
                     tbl->line, tbl->pos, NULL);  
 }  }
   
 const struct tbl_span *  const struct tbl_span *
Line 155  tbl_span(struct tbl_node *tbl)
Line 165  tbl_span(struct tbl_node *tbl)
         return(span);          return(span);
 }  }
   
 void  int
 tbl_end(struct tbl_node **tblp)  tbl_end(struct tbl_node **tblp)
 {  {
         struct tbl_node *tbl;          struct tbl_node *tbl;
           struct tbl_span *sp;
   
         tbl = *tblp;          tbl = *tblp;
         *tblp = NULL;          *tblp = NULL;
   
         if (NULL == tbl->first_span || NULL == tbl->first_span->first)          if (tbl->part == TBL_PART_CDATA)
                 mandoc_msg(MANDOCERR_TBLNODATA, tbl->parse,                  mandoc_msg(MANDOCERR_TBLDATA_BLK, tbl->parse,
                       tbl->line, tbl->pos, "TE");
   
           sp = tbl->first_span;
           while (sp != NULL && sp->first == NULL)
                   sp = sp->next;
           if (sp == NULL) {
                   mandoc_msg(MANDOCERR_TBLDATA_NONE, tbl->parse,
                     tbl->line, tbl->pos, NULL);                      tbl->line, tbl->pos, NULL);
                   return(0);
           }
   
         if (tbl->last_span)          if (tbl->last_span != NULL)
                 tbl->last_span->flags |= TBL_SPAN_LAST;                  tbl->last_span->flags |= TBL_SPAN_LAST;
   
         if (TBL_PART_CDATA == tbl->part)          return(1);
                 mandoc_msg(MANDOCERR_TBLBLOCK, tbl->parse,  
                     tbl->line, tbl->pos, NULL);  
 }  }
Legend:
Removed from v.1.30  
changed lines
  Added in v.1.36
CVSweb