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

Diff for /mandoc/mdoc_validate.c between version 1.375 and 1.378

version 1.375, 2019/09/13 19:26:46 version 1.378, 2020/02/27 01:43:52
Line 1 
Line 1 
 /*      $Id$ */  /*      $Id$ */
 /*  /*
  * Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv>   * Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv>
  * Copyright (c) 2010-2019 Ingo Schwarze <schwarze@openbsd.org>   * Copyright (c) 2010-2020 Ingo Schwarze <schwarze@openbsd.org>
  * Copyright (c) 2010 Joerg Sonnenberger <joerg@netbsd.org>   * Copyright (c) 2010 Joerg Sonnenberger <joerg@netbsd.org>
  *   *
  * Permission to use, copy, modify, and distribute this software for any   * Permission to use, copy, modify, and distribute this software for any
Line 113  static void  post_sm(POST_ARGS);
Line 113  static void  post_sm(POST_ARGS);
 static  void     post_st(POST_ARGS);  static  void     post_st(POST_ARGS);
 static  void     post_std(POST_ARGS);  static  void     post_std(POST_ARGS);
 static  void     post_sx(POST_ARGS);  static  void     post_sx(POST_ARGS);
   static  void     post_tg(POST_ARGS);
 static  void     post_useless(POST_ARGS);  static  void     post_useless(POST_ARGS);
 static  void     post_xr(POST_ARGS);  static  void     post_xr(POST_ARGS);
 static  void     post_xx(POST_ARGS);  static  void     post_xx(POST_ARGS);
Line 238  static const v_post mdoc_valids[MDOC_MAX - MDOC_Dd] = 
Line 239  static const v_post mdoc_valids[MDOC_MAX - MDOC_Dd] = 
         NULL,           /* %Q */          NULL,           /* %Q */
         NULL,           /* %U */          NULL,           /* %U */
         NULL,           /* Ta */          NULL,           /* Ta */
           post_tg,        /* Tg */
 };  };
   
 #define RSORD_MAX 14 /* Number of `Rs' blocks. */  #define RSORD_MAX 14 /* Number of `Rs' blocks. */
Line 1090  post_st(POST_ARGS)
Line 1092  post_st(POST_ARGS)
 }  }
   
 static void  static void
   post_tg(POST_ARGS)
   {
           struct roff_node        *n, *nch;
           size_t                  len;
   
           n = mdoc->last;
           nch = n->child;
           if (nch == NULL && n->next != NULL &&
               n->next->child->type == ROFFT_TEXT) {
                   mdoc->next = ROFF_NEXT_CHILD;
                   roff_word_alloc(mdoc, n->line, n->pos, n->next->child->string);
                   nch = mdoc->last;
                   nch->flags |= NODE_NOSRC;
                   mdoc->last = n;
           }
           if (nch == NULL || *nch->string == '\0') {
                   mandoc_msg(MANDOCERR_MACRO_EMPTY, n->line, n->pos, "Tg");
                   roff_node_delete(mdoc, n);
                   return;
           }
           len = strcspn(nch->string, " \t");
           if (nch->string[len] != '\0')
                   mandoc_msg(MANDOCERR_TG_SPC, nch->line, nch->pos + len + 1,
                       "Tg %s", nch->string);
           if (nch->next != NULL) {
                   mandoc_msg(MANDOCERR_ARG_EXCESS, nch->next->line,
                       nch->next->pos, "Tg ... %s", nch->next->string);
                   while (nch->next != NULL)
                           roff_node_delete(mdoc, nch->next);
           }
           if (nch->string[len] != '\0')
                   roff_node_delete(mdoc, n);
   }
   
   static void
 post_obsolete(POST_ARGS)  post_obsolete(POST_ARGS)
 {  {
         struct roff_node *n;          struct roff_node *n;
Line 1723  post_bl_head(POST_ARGS)
Line 1760  post_bl_head(POST_ARGS)
 static void  static void
 post_bl(POST_ARGS)  post_bl(POST_ARGS)
 {  {
         struct roff_node        *nparent, *nprev; /* of the Bl block */          struct roff_node        *nbody;           /* of the Bl */
         struct roff_node        *nblock, *nbody;  /* of the Bl */  
         struct roff_node        *nchild, *nnext;  /* of the Bl body */          struct roff_node        *nchild, *nnext;  /* of the Bl body */
         const char              *prev_Er;          const char              *prev_Er;
         int                      order;          int                      order;
Line 1745  post_bl(POST_ARGS)
Line 1781  post_bl(POST_ARGS)
         if (nbody->end != ENDBODY_NOT)          if (nbody->end != ENDBODY_NOT)
                 return;                  return;
   
         nchild = nbody->child;          /*
         if (nchild == NULL) {           * Up to the first item, move nodes before the list,
                 mandoc_msg(MANDOCERR_BLK_EMPTY,           * but leave transparent nodes where they are
                     nbody->line, nbody->pos, "Bl");           * if they precede an item.
                 return;           * The next non-transparent node is kept in nchild.
            * It only needs to be updated after a non-transparent
            * node was moved out, and at the very beginning
            * when no node at all was moved yet.
            */
   
           nchild = mdoc->last;
           for (;;) {
                   if (nchild == mdoc->last)
                           nchild = roff_node_child(nbody);
                   if (nchild == NULL) {
                           mdoc->last = nbody;
                           mandoc_msg(MANDOCERR_BLK_EMPTY,
                               nbody->line, nbody->pos, "Bl");
                           return;
                   }
                   if (nchild->tok == MDOC_It) {
                           mdoc->last = nbody;
                           break;
                   }
                   mandoc_msg(MANDOCERR_BL_MOVE, nbody->child->line,
                       nbody->child->pos, "%s", roff_name[nbody->child->tok]);
                   if (nbody->parent->prev == NULL) {
                           mdoc->last = nbody->parent->parent;
                           mdoc->next = ROFF_NEXT_CHILD;
                   } else {
                           mdoc->last = nbody->parent->prev;
                           mdoc->next = ROFF_NEXT_SIBLING;
                   }
                   roff_node_relink(mdoc, nbody->child);
         }          }
   
           /*
            * We have reached the first item,
            * so moving nodes out is no longer possible.
            * But in .Bl -column, the first rows may be implicit,
            * that is, they may not start with .It macros.
            * Such rows may be followed by nodes generated on the
            * roff level, for example .TS.
            * Wrap such roff nodes into an implicit row.
            */
   
         while (nchild != NULL) {          while (nchild != NULL) {
                 nnext = nchild->next;                  if (nchild->tok == MDOC_It) {
                 if (nchild->tok == MDOC_It ||                          nchild = roff_node_next(nchild);
                     (nchild->tok == MDOC_Sm &&  
                      nnext != NULL && nnext->tok == MDOC_It)) {  
                         nchild = nnext;  
                         continue;                          continue;
                 }                  }
                   nnext = nchild->next;
                 /*                  mdoc->last = nchild->prev;
                  * In .Bl -column, the first rows may be implicit,                  mdoc->next = ROFF_NEXT_SIBLING;
                  * that is, they may not start with .It macros.                  roff_block_alloc(mdoc, nchild->line, nchild->pos, MDOC_It);
                  * Such rows may be followed by nodes generated on the                  roff_head_alloc(mdoc, nchild->line, nchild->pos, MDOC_It);
                  * roff level, for example .TS, which cannot be moved                  mdoc->next = ROFF_NEXT_SIBLING;
                  * out of the list.  In that case, wrap such roff nodes                  roff_body_alloc(mdoc, nchild->line, nchild->pos, MDOC_It);
                  * into an implicit row.                  while (nchild->tok != MDOC_It) {
                  */                          roff_node_relink(mdoc, nchild);
                           if (nnext == NULL)
                 if (nchild->prev != NULL) {                                  break;
                         mdoc->last = nchild;                          nchild = nnext;
                           nnext = nchild->next;
                         mdoc->next = ROFF_NEXT_SIBLING;                          mdoc->next = ROFF_NEXT_SIBLING;
                         roff_block_alloc(mdoc, nchild->line,  
                             nchild->pos, MDOC_It);  
                         roff_head_alloc(mdoc, nchild->line,  
                             nchild->pos, MDOC_It);  
                         mdoc->next = ROFF_NEXT_SIBLING;  
                         roff_body_alloc(mdoc, nchild->line,  
                             nchild->pos, MDOC_It);  
                         while (nchild->tok != MDOC_It) {  
                                 roff_node_relink(mdoc, nchild);  
                                 if ((nchild = nnext) == NULL)  
                                         break;  
                                 nnext = nchild->next;  
                                 mdoc->next = ROFF_NEXT_SIBLING;  
                         }  
                         mdoc->last = nbody;  
                         continue;  
                 }                  }
                   mdoc->last = nbody;
                 mandoc_msg(MANDOCERR_BL_MOVE, nchild->line, nchild->pos,  
                     "%s", roff_name[nchild->tok]);  
   
                 /*  
                  * Move the node out of the Bl block.  
                  * First, collect all required node pointers.  
                  */  
   
                 nblock  = nbody->parent;  
                 nprev   = nblock->prev;  
                 nparent = nblock->parent;  
   
                 /*  
                  * Unlink this child.  
                  */  
   
                 nbody->child = nnext;  
                 if (nnext == NULL)  
                         nbody->last  = NULL;  
                 else  
                         nnext->prev = NULL;  
   
                 /*  
                  * Relink this child.  
                  */  
   
                 nchild->parent = nparent;  
                 nchild->prev   = nprev;  
                 nchild->next   = nblock;  
   
                 nblock->prev = nchild;  
                 if (nprev == NULL)  
                         nparent->child = nchild;  
                 else  
                         nprev->next = nchild;  
   
                 nchild = nnext;  
         }          }
   
         if (mdoc->meta.os_e != MANDOC_OS_NETBSD)          if (mdoc->meta.os_e != MANDOC_OS_NETBSD)
Line 1909  post_root(POST_ARGS)
Line 1930  post_root(POST_ARGS)
         /* Add missing prologue data. */          /* Add missing prologue data. */
   
         if (mdoc->meta.date == NULL)          if (mdoc->meta.date == NULL)
                 mdoc->meta.date = mandoc_normdate(mdoc, NULL, 0, 0);                  mdoc->meta.date = mandoc_normdate(NULL, NULL);
   
         if (mdoc->meta.title == NULL) {          if (mdoc->meta.title == NULL) {
                 mandoc_msg(MANDOCERR_DT_NOTITLE, 0, 0, "EOF");                  mandoc_msg(MANDOCERR_DT_NOTITLE, 0, 0, "EOF");
Line 2463  post_ignpar(POST_ARGS)
Line 2484  post_ignpar(POST_ARGS)
 static void  static void
 post_prevpar(POST_ARGS)  post_prevpar(POST_ARGS)
 {  {
         struct roff_node *n;          struct roff_node *n, *np;
   
         n = mdoc->last;          n = mdoc->last;
         if (NULL == n->prev)  
                 return;  
         if (n->type != ROFFT_ELEM && n->type != ROFFT_BLOCK)          if (n->type != ROFFT_ELEM && n->type != ROFFT_BLOCK)
                 return;                  return;
           if ((np = roff_node_prev(n)) == NULL)
                   return;
   
         /*          /*
          * Don't allow `Pp' prior to a paragraph-type           * Don't allow `Pp' prior to a paragraph-type
          * block: `Pp' or non-compact `Bd' or `Bl'.           * block: `Pp' or non-compact `Bd' or `Bl'.
          */           */
   
         if (n->prev->tok != MDOC_Pp && n->prev->tok != ROFF_br)          if (np->tok != MDOC_Pp && np->tok != ROFF_br)
                 return;                  return;
         if (n->tok == MDOC_Bl && n->norm->Bl.comp)          if (n->tok == MDOC_Bl && n->norm->Bl.comp)
                 return;                  return;
Line 2485  post_prevpar(POST_ARGS)
Line 2506  post_prevpar(POST_ARGS)
         if (n->tok == MDOC_It && n->parent->norm->Bl.comp)          if (n->tok == MDOC_It && n->parent->norm->Bl.comp)
                 return;                  return;
   
         mandoc_msg(MANDOCERR_PAR_SKIP, n->prev->line, n->prev->pos,          mandoc_msg(MANDOCERR_PAR_SKIP, np->line, np->pos,
             "%s before %s", roff_name[n->prev->tok], roff_name[n->tok]);              "%s before %s", roff_name[np->tok], roff_name[n->tok]);
         roff_node_delete(mdoc, n->prev);          roff_node_delete(mdoc, np);
 }  }
   
 static void  static void
Line 2507  static void
Line 2528  static void
 post_dd(POST_ARGS)  post_dd(POST_ARGS)
 {  {
         struct roff_node *n;          struct roff_node *n;
         char             *datestr;  
   
         n = mdoc->last;          n = mdoc->last;
         n->flags |= NODE_NOPRT;          n->flags |= NODE_NOPRT;
Line 2524  post_dd(POST_ARGS)
Line 2544  post_dd(POST_ARGS)
                 mandoc_msg(MANDOCERR_PROLOG_ORDER,                  mandoc_msg(MANDOCERR_PROLOG_ORDER,
                     n->line, n->pos, "Dd after Os");                      n->line, n->pos, "Dd after Os");
   
         datestr = NULL;          if (mdoc->quick && n != NULL)
         deroff(&datestr, n);                  mdoc->meta.date = mandoc_strdup("");
         mdoc->meta.date = mandoc_normdate(mdoc, datestr, n->line, n->pos);          else
         free(datestr);                  mdoc->meta.date = mandoc_normdate(n->child, n);
 }  }
   
 static void  static void
Legend:
Removed from v.1.375  
changed lines
  Added in v.1.378
CVSweb