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

Diff for /mandoc/Attic/mdoc_action.c between version 1.66 and 1.78

version 1.66, 2010/06/12 10:09:19 version 1.78, 2010/07/30 17:14:09
Line 1 
Line 1 
 /*      $Id$ */  /*      $Id$ */
 /*  /*
  * Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@kth.se>   * Copyright (c) 2008, 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv>
  *   *
  * 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 
 #include "libmdoc.h"  #include "libmdoc.h"
 #include "libmandoc.h"  #include "libmandoc.h"
   
   /*
    * FIXME: this file is deprecated.  All future "actions" should be
    * pushed into mdoc_validate.c.
    */
   
 #define POST_ARGS struct mdoc *m, struct mdoc_node *n  #define POST_ARGS struct mdoc *m, struct mdoc_node *n
 #define PRE_ARGS  struct mdoc *m, struct mdoc_node *n  #define PRE_ARGS  struct mdoc *m, struct mdoc_node *n
   
Line 68  static int   post_st(POST_ARGS);
Line 73  static int   post_st(POST_ARGS);
 static  int       post_std(POST_ARGS);  static  int       post_std(POST_ARGS);
   
 static  int       pre_bd(PRE_ARGS);  static  int       pre_bd(PRE_ARGS);
 static  int       pre_bl(PRE_ARGS);  
 static  int       pre_dl(PRE_ARGS);  static  int       pre_dl(PRE_ARGS);
 static  int       pre_offset(PRE_ARGS);  
   
 static  const struct actions mdoc_actions[MDOC_MAX] = {  static  const struct actions mdoc_actions[MDOC_MAX] = {
         { NULL, NULL }, /* Ap */          { NULL, NULL }, /* Ap */
Line 84  static const struct actions mdoc_actions[MDOC_MAX] = {
Line 87  static const struct actions mdoc_actions[MDOC_MAX] = {
         { pre_dl, post_display }, /* Dl */          { pre_dl, post_display }, /* Dl */
         { pre_bd, post_display }, /* Bd */          { pre_bd, post_display }, /* Bd */
         { NULL, NULL }, /* Ed */          { NULL, NULL }, /* Ed */
         { pre_bl, post_bl }, /* Bl */          { NULL, post_bl }, /* Bl */
         { NULL, NULL }, /* El */          { NULL, NULL }, /* El */
         { NULL, NULL }, /* It */          { NULL, NULL }, /* It */
         { NULL, NULL }, /* Ad */          { NULL, NULL }, /* Ad */
Line 454  post_sh(POST_ARGS)
Line 457  post_sh(POST_ARGS)
         if (SEC_NONE == m->lastnamed || SEC_CUSTOM != sec)          if (SEC_NONE == m->lastnamed || SEC_CUSTOM != sec)
                 m->lastnamed = sec;                  m->lastnamed = sec;
   
           /*
            * Switch the parser's SYNOPSIS mode, to be copied
            * into individual nodes when creating them.
            * Note that this mode can also be set and unset
            * using the roff nS register.
            */
           if (SEC_SYNOPSIS == sec)
                   m->flags |= MDOC_SYNOPSIS;
           else
                   m->flags &= ~MDOC_SYNOPSIS;
   
         /* Some sections only live in certain manual sections. */          /* Some sections only live in certain manual sections. */
   
         switch ((m->lastsec = sec)) {          switch ((m->lastsec = sec)) {
Line 633  static int
Line 647  static int
 post_bl_tagwidth(POST_ARGS)  post_bl_tagwidth(POST_ARGS)
 {  {
         struct mdoc_node *nn;          struct mdoc_node *nn;
         size_t            sz;          size_t            sz, ssz;
         int               i;          int               i;
         char              buf[NUMSIZ];          char              buf[NUMSIZ];
   
         /* Defaults to ten ens. */          sz = 10;
   
         sz = 10; /* XXX: make this a macro value. */  
   
         for (nn = n->body->child; nn; nn = nn->next) {          for (nn = n->body->child; nn; nn = nn->next) {
                 if (MDOC_It == nn->tok)                  if (MDOC_It != nn->tok)
                         break;                          continue;
         }  
   
         if (nn) {  
                 assert(MDOC_BLOCK == nn->type);                  assert(MDOC_BLOCK == nn->type);
                 nn = nn->head->child;                  nn = nn->head->child;
                 if (MDOC_TEXT != nn->type) {  
                         sz = mdoc_macro2len(nn->tok);                  if (nn == NULL) {
                         if (sz == 0) {                          /* No -width for .Bl and first .It is emtpy */
                                 if ( ! mdoc_nmsg(m, n, MANDOCERR_NOWIDTHARG))                          if ( ! mdoc_nmsg(m, n, MANDOCERR_NOWIDTHARG))
                                         return(0);                                  return(0);
                                 sz = 10;                          break;
                         }                  }
                 } else  
                   if (MDOC_TEXT == nn->type) {
                         sz = strlen(nn->string) + 1;                          sz = strlen(nn->string) + 1;
                           break;
                   }
   
                   if (0 != (ssz = mdoc_macro2len(nn->tok)))
                           sz = ssz;
                   else if ( ! mdoc_nmsg(m, n, MANDOCERR_NOWIDTHARG))
                           return(0);
   
                   break;
         }          }
   
           /* Defaults to ten ens. */
   
         snprintf(buf, NUMSIZ, "%zun", sz);          snprintf(buf, NUMSIZ, "%zun", sz);
   
         /*          /*
Line 667  post_bl_tagwidth(POST_ARGS)
Line 689  post_bl_tagwidth(POST_ARGS)
          * We're guaranteed that a MDOC_Width doesn't already exist.           * We're guaranteed that a MDOC_Width doesn't already exist.
          */           */
   
         nn = n;          assert(n->args);
         assert(nn->args);          i = (int)(n->args->argc)++;
         i = (int)(nn->args->argc)++;  
   
         nn->args->argv = mandoc_realloc(nn->args->argv,          n->args->argv = mandoc_realloc(n->args->argv,
                         nn->args->argc * sizeof(struct mdoc_argv));                          n->args->argc * sizeof(struct mdoc_argv));
   
         nn->args->argv[i].arg = MDOC_Width;          n->args->argv[i].arg = MDOC_Width;
         nn->args->argv[i].line = n->line;          n->args->argv[i].line = n->line;
         nn->args->argv[i].pos = n->pos;          n->args->argv[i].pos = n->pos;
         nn->args->argv[i].sz = 1;          n->args->argv[i].sz = 1;
         nn->args->argv[i].value = mandoc_malloc(sizeof(char *));          n->args->argv[i].value = mandoc_malloc(sizeof(char *));
         nn->args->argv[i].value[0] = mandoc_strdup(buf);          n->args->argv[i].value[0] = mandoc_strdup(buf);
   
           /* Set our width! */
           n->data.Bl->width = n->args->argv[i].value[0];
         return(1);          return(1);
 }  }
   
Line 696  post_bl_width(POST_ARGS)
Line 720  post_bl_width(POST_ARGS)
         int               i;          int               i;
         enum mdoct        tok;          enum mdoct        tok;
         char              buf[NUMSIZ];          char              buf[NUMSIZ];
         char             *p;  
   
         if (NULL == n->args)  
                 return(1);  
   
         for (i = 0; i < (int)n->args->argc; i++)  
                 if (MDOC_Width == n->args->argv[i].arg)  
                         break;  
   
         if (i == (int)n->args->argc)  
                 return(1);  
         p = n->args->argv[i].value[0];  
   
         /*          /*
          * If the value to -width is a macro, then we re-write it to be           * If the value to -width is a macro, then we re-write it to be
          * the macro's width as set in share/tmac/mdoc/doc-common.           * the macro's width as set in share/tmac/mdoc/doc-common.
          */           */
   
         if (0 == strcmp(p, "Ds"))          if (0 == strcmp(n->data.Bl->width, "Ds"))
                 width = 6;                  width = 6;
         else if (MDOC_MAX == (tok = mdoc_hash_find(p)))          else if (MDOC_MAX == (tok = mdoc_hash_find(n->data.Bl->width)))
                 return(1);                  return(1);
         else if (0 == (width = mdoc_macro2len(tok)))          else if (0 == (width = mdoc_macro2len(tok)))
                 return(mdoc_nmsg(m, n, MANDOCERR_BADWIDTH));                  return(mdoc_nmsg(m, n, MANDOCERR_BADWIDTH));
   
         /* The value already exists: free and reallocate it. */          /* The value already exists: free and reallocate it. */
   
           assert(n->args);
   
           for (i = 0; i < (int)n->args->argc; i++)
                   if (MDOC_Width == n->args->argv[i].arg)
                           break;
   
           assert(i < (int)n->args->argc);
   
         snprintf(buf, NUMSIZ, "%zun", width);          snprintf(buf, NUMSIZ, "%zun", width);
         free(n->args->argv[i].value[0]);          free(n->args->argv[i].value[0]);
         n->args->argv[i].value[0] = mandoc_strdup(buf);          n->args->argv[i].value[0] = mandoc_strdup(buf);
   
           /* Set our width! */
           n->data.Bl->width = n->args->argv[i].value[0];
         return(1);          return(1);
 }  }
   
Line 741  post_bl_head(POST_ARGS)
Line 764  post_bl_head(POST_ARGS)
         int                      i, c;          int                      i, c;
         struct mdoc_node        *np, *nn, *nnp;          struct mdoc_node        *np, *nn, *nnp;
   
         if (NULL == n->child)          if (LIST_column != n->data.Bl->type)
                 return(1);                  return(1);
           else if (NULL == n->child)
                   return(1);
   
         np = n->parent;          np = n->parent;
         assert(np->args);          assert(np->args);
Line 751  post_bl_head(POST_ARGS)
Line 776  post_bl_head(POST_ARGS)
                 if (MDOC_Column == np->args->argv[c].arg)                  if (MDOC_Column == np->args->argv[c].arg)
                         break;                          break;
   
         if (c == (int)np->args->argc)          assert(c < (int)np->args->argc);
                 return(1);  
         assert(0 == np->args->argv[c].sz);          assert(0 == np->args->argv[c].sz);
   
         /*          /*
Line 765  post_bl_head(POST_ARGS)
Line 789  post_bl_head(POST_ARGS)
         np->args->argv[c].value = mandoc_malloc          np->args->argv[c].value = mandoc_malloc
                 ((size_t)n->nchild * sizeof(char *));                  ((size_t)n->nchild * sizeof(char *));
   
           n->data.Bl->ncols = np->args->argv[c].sz;
           n->data.Bl->cols = (const char **)np->args->argv[c].value;
   
         for (i = 0, nn = n->child; nn; i++) {          for (i = 0, nn = n->child; nn; i++) {
                 np->args->argv[c].value[i] = nn->string;                  np->args->argv[c].value[i] = nn->string;
                 nn->string = NULL;                  nn->string = NULL;
Line 782  post_bl_head(POST_ARGS)
Line 809  post_bl_head(POST_ARGS)
 static int  static int
 post_bl(POST_ARGS)  post_bl(POST_ARGS)
 {  {
         int               i, r, len;  
   
         if (MDOC_HEAD == n->type)          if (MDOC_HEAD == n->type)
                 return(post_bl_head(m, n));                  return(post_bl_head(m, n));
Line 797  post_bl(POST_ARGS)
Line 823  post_bl(POST_ARGS)
          * rewritten into real lengths).           * rewritten into real lengths).
          */           */
   
         len = (int)(n->args ? n->args->argc : 0);          if (LIST_tag == n->data.Bl->type && NULL == n->data.Bl->width) {
   
         for (r = i = 0; i < len; i++) {  
                 if (MDOC_Tag == n->args->argv[i].arg)  
                         r |= 1 << 0;  
                 if (MDOC_Width == n->args->argv[i].arg)  
                         r |= 1 << 1;  
         }  
   
         if (r & (1 << 0) && ! (r & (1 << 1))) {  
                 if ( ! post_bl_tagwidth(m, n))                  if ( ! post_bl_tagwidth(m, n))
                         return(0);                          return(0);
         } else if (r & (1 << 1))          } else if (NULL != n->data.Bl->width) {
                 if ( ! post_bl_width(m, n))                  if ( ! post_bl_width(m, n))
                         return(0);                          return(0);
           } else
                   return(1);
   
           assert(n->data.Bl->width);
         return(1);          return(1);
 }  }
   
Line 831  post_pa(POST_ARGS)
Line 851  post_pa(POST_ARGS)
   
         np = n;          np = n;
         m->next = MDOC_NEXT_CHILD;          m->next = MDOC_NEXT_CHILD;
         /* XXX: make into macro value. */  
         if ( ! mdoc_word_alloc(m, n->line, n->pos, "~"))          if ( ! mdoc_word_alloc(m, n->line, n->pos, "~"))
                 return(0);                  return(0);
         m->last = np;          m->last = np;
Line 892  post_dd(POST_ARGS)
Line 911  post_dd(POST_ARGS)
 {  {
         char            buf[DATESIZ];          char            buf[DATESIZ];
   
           if (NULL == n->child) {
                   m->meta.date = time(NULL);
                   return(post_prol(m, n));
           }
   
         if ( ! concat(m, buf, n->child, DATESIZ))          if ( ! concat(m, buf, n->child, DATESIZ))
                 return(0);                  return(0);
   
Line 937  pre_dl(PRE_ARGS)
Line 961  pre_dl(PRE_ARGS)
 }  }
   
   
 /* ARGSUSED */  
 static int  static int
 pre_offset(PRE_ARGS)  
 {  
         int              i;  
   
         /*  
          * Make sure that an empty offset produces an 8n length space as  
          * stipulated by mdoc.samples.  
          */  
   
         for (i = 0; n->args && i < (int)n->args->argc; i++) {  
                 if (MDOC_Offset != n->args->argv[i].arg)  
                         continue;  
                 if (n->args->argv[i].sz)  
                         break;  
                 assert(1 == n->args->refcnt);  
                 /* If no value set, length of <string>. */  
                 n->args->argv[i].sz++;  
                 n->args->argv[i].value = mandoc_malloc(sizeof(char *));  
                 n->args->argv[i].value[0] = mandoc_strdup("8n");  
                 break;  
         }  
   
         return(1);  
 }  
   
   
 static int  
 pre_bl(PRE_ARGS)  
 {  
   
         if (MDOC_BLOCK == n->type)  
                 return(pre_offset(m, n));  
         return(1);  
 }  
   
   
 static int  
 pre_bd(PRE_ARGS)  pre_bd(PRE_ARGS)
 {  {
   
         if (MDOC_BLOCK == n->type)  
                 return(pre_offset(m, n));  
         if (MDOC_BODY != n->type)          if (MDOC_BODY != n->type)
                 return(1);                  return(1);
   
         if (DISP_literal == n->data.disp)          assert(n->data.Bd);
           if (DISP_literal == n->data.Bd->type)
                 m->flags |= MDOC_LITERAL;                  m->flags |= MDOC_LITERAL;
         if (DISP_unfilled == n->data.disp)          if (DISP_unfilled == n->data.Bd->type)
                 m->flags |= MDOC_LITERAL;                  m->flags |= MDOC_LITERAL;
   
         return(1);          return(1);
Legend:
Removed from v.1.66  
changed lines
  Added in v.1.78
CVSweb