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

Diff for /mandoc/roff.c between version 1.111 and 1.120

version 1.111, 2010/12/29 01:16:57 version 1.120, 2011/01/03 23:24:16
Line 1 
Line 1 
 /*      $Id$ */  /*      $Id$ */
 /*  /*
  * Copyright (c) 2010 Kristaps Dzonsons <kristaps@bsd.lv>   * Copyright (c) 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
  * Copyright (c) 2010 Ingo Schwarze <schwarze@openbsd.org>   * Copyright (c) 2010, 2011 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 59  enum rofft {
Line 59  enum rofft {
         ROFF_tr,          ROFF_tr,
         ROFF_TS,          ROFF_TS,
         ROFF_TE,          ROFF_TE,
           ROFF_T_,
         ROFF_cblock,          ROFF_cblock,
         ROFF_ccond, /* FIXME: remove this. */          ROFF_ccond, /* FIXME: remove this. */
         ROFF_USERDEF,          ROFF_USERDEF,
Line 85  struct roff {
Line 86  struct roff {
         struct regset   *regs; /* read/writable registers */          struct regset   *regs; /* read/writable registers */
         struct roffstr  *first_string; /* user-defined strings & macros */          struct roffstr  *first_string; /* user-defined strings & macros */
         const char      *current_string; /* value of last called user macro */          const char      *current_string; /* value of last called user macro */
         struct tbl      *tbl;          struct tbl_node *first_tbl; /* first table parsed */
           struct tbl_node *last_tbl; /* last table parsed */
           struct tbl_node *tbl; /* current table being parsed */
 };  };
   
 struct  roffnode {  struct  roffnode {
Line 143  static void   roff_setstr(struct roff *,
Line 146  static void   roff_setstr(struct roff *,
 static  enum rofferr     roff_so(ROFF_ARGS);  static  enum rofferr     roff_so(ROFF_ARGS);
 static  enum rofferr     roff_TE(ROFF_ARGS);  static  enum rofferr     roff_TE(ROFF_ARGS);
 static  enum rofferr     roff_TS(ROFF_ARGS);  static  enum rofferr     roff_TS(ROFF_ARGS);
   static  enum rofferr     roff_T_(ROFF_ARGS);
 static  enum rofferr     roff_userdef(ROFF_ARGS);  static  enum rofferr     roff_userdef(ROFF_ARGS);
   
 /* See roff_hash_find() */  /* See roff_hash_find() */
Line 175  static struct roffmac  roffs[ROFF_MAX] = {
Line 179  static struct roffmac  roffs[ROFF_MAX] = {
         { "tr", roff_line_ignore, NULL, NULL, 0, NULL },          { "tr", roff_line_ignore, NULL, NULL, 0, NULL },
         { "TS", roff_TS, NULL, NULL, 0, NULL },          { "TS", roff_TS, NULL, NULL, 0, NULL },
         { "TE", roff_TE, NULL, NULL, 0, NULL },          { "TE", roff_TE, NULL, NULL, 0, NULL },
           { "T&", roff_T_, NULL, NULL, 0, NULL },
         { ".", roff_cblock, NULL, NULL, 0, NULL },          { ".", roff_cblock, NULL, NULL, 0, NULL },
         { "\\}", roff_ccond, NULL, NULL, 0, NULL },          { "\\}", roff_ccond, NULL, NULL, 0, NULL },
         { NULL, roff_userdef, NULL, NULL, 0, NULL },          { NULL, roff_userdef, NULL, NULL, 0, NULL },
Line 296  roffnode_push(struct roff *r, enum rofft tok, const ch
Line 301  roffnode_push(struct roff *r, enum rofft tok, const ch
 static void  static void
 roff_free1(struct roff *r)  roff_free1(struct roff *r)
 {  {
           struct tbl_node *t;
   
         if (r->tbl) {          while (r->first_tbl) {
                 tbl_free(r->tbl);                  t = r->first_tbl;
                 r->tbl = NULL;                  r->first_tbl = t->next;
                   tbl_free(t);
         }          }
   
           r->first_tbl = r->last_tbl = r->tbl = NULL;
   
         while (r->last)          while (r->last)
                 roffnode_pop(r);                  roffnode_pop(r);
   
Line 506  roff_parseln(struct roff *r, int ln, char **bufp, 
Line 515  roff_parseln(struct roff *r, int ln, char **bufp, 
 }  }
   
   
 int  void
 roff_endparse(struct roff *r)  roff_endparse(struct roff *r)
 {  {
   
         /* FIXME: if r->tbl */  
         if (r->last)          if (r->last)
                 (*r->msg)(MANDOCERR_SCOPEEXIT, r->data,                  (*r->msg)(MANDOCERR_SCOPEEXIT, r->data,
                                 r->last->line, r->last->col, NULL);                                  r->last->line, r->last->col, NULL);
         return(1);  
           if (r->tbl) {
                   (*r->msg)(MANDOCERR_SCOPEEXIT, r->data,
                                   r->tbl->line, r->tbl->pos, NULL);
                   tbl_end(r->tbl);
                   r->tbl = NULL;
           }
 }  }
   
   
Line 1115  roff_TE(ROFF_ARGS)
Line 1129  roff_TE(ROFF_ARGS)
         if (NULL == r->tbl)          if (NULL == r->tbl)
                 (*r->msg)(MANDOCERR_NOSCOPE, r->data, ln, ppos, NULL);                  (*r->msg)(MANDOCERR_NOSCOPE, r->data, ln, ppos, NULL);
         else          else
                 tbl_free(r->tbl);                  tbl_end(r->tbl);
   
         r->tbl = NULL;          r->tbl = NULL;
         return(ROFF_IGN);          return(ROFF_IGN);
Line 1123  roff_TE(ROFF_ARGS)
Line 1137  roff_TE(ROFF_ARGS)
   
 /* ARGSUSED */  /* ARGSUSED */
 static enum rofferr  static enum rofferr
   roff_T_(ROFF_ARGS)
   {
   
           if (NULL == r->tbl)
                   (*r->msg)(MANDOCERR_NOSCOPE, r->data, ln, ppos, NULL);
           else
                   tbl_restart(ppos, ln, r->tbl);
   
           return(ROFF_IGN);
   }
   
   /* ARGSUSED */
   static enum rofferr
 roff_TS(ROFF_ARGS)  roff_TS(ROFF_ARGS)
 {  {
           struct tbl_node *t;
   
         if (r->tbl) {          if (r->tbl) {
                 (*r->msg)(MANDOCERR_SCOPEBROKEN, r->data, ln, ppos, NULL);                  (*r->msg)(MANDOCERR_SCOPEBROKEN, r->data, ln, ppos, NULL);
                 tbl_reset(r->tbl);                  tbl_end(r->tbl);
         } else          }
                 r->tbl = tbl_alloc(r->data, r->msg);  
   
           t = tbl_alloc(ppos, ln, r->data, r->msg);
   
           if (r->last_tbl)
                   r->last_tbl->next = t;
           else
                   r->first_tbl = r->last_tbl = t;
   
           r->tbl = r->last_tbl = t;
         return(ROFF_IGN);          return(ROFF_IGN);
 }  }
   
Line 1166  roff_userdef(ROFF_ARGS)
Line 1201  roff_userdef(ROFF_ARGS)
 {  {
         const char       *arg[9];          const char       *arg[9];
         char             *cp, *n1, *n2;          char             *cp, *n1, *n2;
         int               i, quoted, pairs;          int               i;
   
         /*          /*
          * Collect pointers to macro argument strings           * Collect pointers to macro argument strings
          * and null-terminate them.           * and null-terminate them.
          */           */
         cp = *bufp + pos;          cp = *bufp + pos;
         for (i = 0; i < 9; i++) {          for (i = 0; i < 9; i++)
                 /* Quoting can only start with a new word. */                  arg[i] = '\0' == *cp ? "" :
                 if ('"' == *cp) {                      mandoc_getarg(&cp, r->msg, r->data, ln, &pos);
                         quoted = 1;  
                         cp++;  
                 } else  
                         quoted = 0;  
                 arg[i] = cp;  
                 for (pairs = 0; '\0' != *cp; cp++) {  
                         /* Unquoted arguments end at blanks. */  
                         if (0 == quoted) {  
                                 if (' ' == *cp)  
                                         break;  
                                 continue;  
                         }  
                         /* After pairs of quotes, move left. */  
                         if (pairs)  
                                 cp[-pairs] = cp[0];  
                         /* Pairs of quotes do not end words, ... */  
                         if ('"' == cp[0] && '"' == cp[1]) {  
                                 pairs++;  
                                 cp++;  
                                 continue;  
                         }  
                         /* ... but solitary quotes do. */  
                         if ('"' != *cp)  
                                 continue;  
                         if (pairs)  
                                 cp[-pairs] = '\0';  
                         *cp = ' ';  
                         break;  
                 }  
                 /* Last argument; the remaining ones are empty strings. */  
                 if ('\0' == *cp)  
                         continue;  
                 /* Null-terminate argument and move to the next one. */  
                 *cp++ = '\0';  
                 while (' ' == *cp)  
                         cp++;  
         }  
   
         /*          /*
          * Expand macro arguments.           * Expand macro arguments.
Line 1348  roff_freestr(struct roff *r)
Line 1346  roff_freestr(struct roff *r)
         }          }
   
         r->first_string = NULL;          r->first_string = NULL;
   }
   
   const struct tbl_span *
   roff_span(const struct roff *r)
   {
   
           return(r->tbl ? tbl_span(r->tbl) : NULL);
 }  }
Legend:
Removed from v.1.111  
changed lines
  Added in v.1.120
CVSweb