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

Diff for /mandoc/Attic/man_action.c between version 1.12 and 1.42

version 1.12, 2009/06/16 19:55:28 version 1.42, 2010/10/11 15:45:36
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 14 
Line 14 
  * 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.
  */   */
 #include <sys/utsname.h>  #ifdef HAVE_CONFIG_H
   #include "config.h"
   #endif
   
 #include <assert.h>  #include <assert.h>
 #include <errno.h>  
 #include <stdlib.h>  #include <stdlib.h>
 #include <string.h>  #include <string.h>
   #include <time.h>
   
   #include "mandoc.h"
 #include "libman.h"  #include "libman.h"
   #include "libmandoc.h"
   
 #ifdef __linux__  
 extern  char            *strptime(const char *, const char *, struct tm *);  
 #endif  
   
 struct  actions {  struct  actions {
         int     (*post)(struct man *);          int     (*post)(struct man *);
 };  };
   
   
 static  int       post_TH(struct man *);  static  int       post_TH(struct man *);
 static  time_t    man_atotime(const char *);  static  int       post_fi(struct man *);
   static  int       post_nf(struct man *);
   static  int       post_AT(struct man *);
   static  int       post_UC(struct man *);
   
 const   struct actions man_actions[MAN_MAX] = {  const   struct actions man_actions[MAN_MAX] = {
         { NULL }, /* br */          { NULL }, /* br */
Line 59  const struct actions man_actions[MAN_MAX] = {
Line 61  const struct actions man_actions[MAN_MAX] = {
         { NULL }, /* RI */          { NULL }, /* RI */
         { NULL }, /* na */          { NULL }, /* na */
         { NULL }, /* i */          { NULL }, /* i */
           { NULL }, /* sp */
           { post_nf }, /* nf */
           { post_fi }, /* fi */
           { NULL }, /* r */
           { NULL }, /* RE */
           { NULL }, /* RS */
           { NULL }, /* DT */
           { post_UC }, /* UC */
           { NULL }, /* PD */
           { NULL }, /* Sp */
           { post_nf }, /* Vb */
           { post_fi }, /* Ve */
           { post_AT }, /* AT */
           { NULL }, /* in */
 };  };
   
   
Line 72  man_action_post(struct man *m)
Line 88  man_action_post(struct man *m)
   
         switch (m->last->type) {          switch (m->last->type) {
         case (MAN_TEXT):          case (MAN_TEXT):
                 break;                  /* FALLTHROUGH */
         case (MAN_ROOT):          case (MAN_ROOT):
                 break;                  return(1);
         default:          default:
                 if (NULL == man_actions[m->last->tok].post)                  break;
                         break;  
                 return((*man_actions[m->last->tok].post)(m));  
         }          }
   
           if (NULL == man_actions[m->last->tok].post)
                   return(1);
           return((*man_actions[m->last->tok].post)(m));
   }
   
   
   static int
   post_fi(struct man *m)
   {
   
           if ( ! (MAN_LITERAL & m->flags))
                   if ( ! man_nmsg(m, m->last, MANDOCERR_NOSCOPE))
                           return(0);
           m->flags &= ~MAN_LITERAL;
         return(1);          return(1);
 }  }
   
   
 static int  static int
   post_nf(struct man *m)
   {
   
           if (MAN_LITERAL & m->flags)
                   if ( ! man_nmsg(m, m->last, MANDOCERR_SCOPEREP))
                           return(0);
           m->flags |= MAN_LITERAL;
           return(1);
   }
   
   
   static int
 post_TH(struct man *m)  post_TH(struct man *m)
 {  {
         struct man_node *n;          struct man_node *n;
         char            *ep;  
         long             lval;  
   
         if (m->meta.title)          if (m->meta.title)
                 free(m->meta.title);                  free(m->meta.title);
Line 97  post_TH(struct man *m)
Line 136  post_TH(struct man *m)
                 free(m->meta.vol);                  free(m->meta.vol);
         if (m->meta.source)          if (m->meta.source)
                 free(m->meta.source);                  free(m->meta.source);
           if (m->meta.msec)
                   free(m->meta.msec);
           if (m->meta.rawdate)
                   free(m->meta.rawdate);
   
         m->meta.title = m->meta.vol = m->meta.source = NULL;          m->meta.title = m->meta.vol = m->meta.rawdate =
         m->meta.msec = 0;                  m->meta.msec = m->meta.source = NULL;
         m->meta.date = 0;          m->meta.date = 0;
   
         /* ->TITLE<- MSEC DATE SOURCE VOL */          /* ->TITLE<- MSEC DATE SOURCE VOL */
   
         n = m->last->child;          n = m->last->child;
         assert(n);          assert(n);
           m->meta.title = mandoc_strdup(n->string);
   
         if (NULL == (m->meta.title = strdup(n->string)))  
                 return(man_verr(m, n->line, n->pos,  
                                         "memory exhausted"));  
   
         /* TITLE ->MSEC<- DATE SOURCE VOL */          /* TITLE ->MSEC<- DATE SOURCE VOL */
   
         n = n->next;          n = n->next;
         assert(n);          assert(n);
           m->meta.msec = mandoc_strdup(n->string);
   
         errno = 0;  
         lval = strtol(n->string, &ep, 10);  
         if (n->string[0] != '\0' && *ep == '\0')  
                 m->meta.msec = (int)lval;  
         else if ( ! man_vwarn(m, n->line, n->pos, "invalid section"))  
                 return(0);  
   
         /* TITLE MSEC ->DATE<- SOURCE VOL */          /* TITLE MSEC ->DATE<- SOURCE VOL */
   
         if (NULL == (n = n->next))          /*
            * Try to parse the date.  If this works, stash the epoch (this
            * is optimal because we can reformat it in the canonical form).
            * If it doesn't parse, isn't specified at all, or is an empty
            * string, then use the current date.
            */
   
           n = n->next;
           if (n && n->string && *n->string) {
                   m->meta.date = mandoc_a2time
                           (MTIME_ISO_8601, n->string);
                   if (0 == m->meta.date) {
                           if ( ! man_nmsg(m, n, MANDOCERR_BADDATE))
                                   return(0);
                           m->meta.rawdate = mandoc_strdup(n->string);
                   }
           } else
                 m->meta.date = time(NULL);                  m->meta.date = time(NULL);
         else if (0 == (m->meta.date = man_atotime(n->string))) {  
                 if ( ! man_vwarn(m, n->line, n->pos, "invalid date"))  
                         return(0);  
                 m->meta.date = time(NULL);  
         }  
   
         /* TITLE MSEC DATE ->SOURCE<- VOL */          /* TITLE MSEC DATE ->SOURCE<- VOL */
   
         if (n && (n = n->next))          if (n && (n = n->next))
                 if (NULL == (m->meta.source = strdup(n->string)))                  m->meta.source = mandoc_strdup(n->string);
                         return(man_verr(m, n->line, n->pos,  
                                                 "memory exhausted"));  
   
         /* TITLE MSEC DATE SOURCE ->VOL<- */          /* TITLE MSEC DATE SOURCE ->VOL<- */
   
         if (n && (n = n->next))          if (n && (n = n->next))
                 if (NULL == (m->meta.vol = strdup(n->string)))                  m->meta.vol = mandoc_strdup(n->string);
                         return(man_verr(m, n->line, n->pos,  
                                                 "memory exhausted"));  
   
         /*          /*
          * The end document shouldn't have the prologue macros as part           * Remove the `TH' node after we've processed it for our
          * of the syntax tree (they encompass only meta-data).           * meta-data.
          */           */
           man_node_delete(m, m->last);
           return(1);
   }
   
         if (m->last->parent->child == m->last) {  
                 assert(MAN_ROOT == m->last->parent->type);  static int
                 m->last->parent->child = NULL;  post_AT(struct man *m)
                 n = m->last;  {
                 m->last = m->last->parent;          static const char * const unix_versions[] = {
                 m->next = MAN_NEXT_CHILD;              "7th Edition",
                 assert(m->last == m->first);              "System III",
         } else {              "System V",
                 assert(m->last->prev);              "System V Release 2",
                 m->last->prev->next = NULL;          };
                 n = m->last;  
                 m->last = m->last->prev;          const char      *p, *s;
                 m->next = MAN_NEXT_SIBLING;          struct man_node *n, *nn;
   
           n = m->last->child;
   
           if (NULL == n || MAN_TEXT != n->type)
                   p = unix_versions[0];
           else {
                   s = n->string;
                   if (0 == strcmp(s, "3"))
                           p = unix_versions[0];
                   else if (0 == strcmp(s, "4"))
                           p = unix_versions[1];
                   else if (0 == strcmp(s, "5")) {
                           nn = n->next;
                           if (nn && MAN_TEXT == nn->type && nn->string[0])
                                   p = unix_versions[3];
                           else
                                   p = unix_versions[2];
                   } else
                           p = unix_versions[0];
         }          }
   
         man_node_freelist(n);          if (m->meta.source)
                   free(m->meta.source);
   
           m->meta.source = mandoc_strdup(p);
   
         return(1);          return(1);
 }  }
   
   
 static time_t  static int
 man_atotime(const char *p)  post_UC(struct man *m)
 {  {
         struct tm        tm;          static const char * const bsd_versions[] = {
         char            *pp;              "3rd Berkeley Distribution",
               "4th Berkeley Distribution",
               "4.2 Berkeley Distribution",
               "4.3 Berkeley Distribution",
               "4.4 Berkeley Distribution",
           };
   
         (void)memset(&tm, 0, sizeof(struct tm));          const char      *p, *s;
           struct man_node *n;
   
         if ((pp = strptime(p, "%b %d %Y", &tm)) && 0 == *pp)          n = m->last->child;
                 return(mktime(&tm));  
         if ((pp = strptime(p, "%d %b %Y", &tm)) && 0 == *pp)  
                 return(mktime(&tm));  
         if ((pp = strptime(p, "%b %d, %Y", &tm)) && 0 == *pp)  
                 return(mktime(&tm));  
         if ((pp = strptime(p, "%b %Y", &tm)) && 0 == *pp)  
                 return(mktime(&tm));  
   
         return(0);          if (NULL == n || MAN_TEXT != n->type)
                   p = bsd_versions[0];
           else {
                   s = n->string;
                   if (0 == strcmp(s, "3"))
                           p = bsd_versions[0];
                   else if (0 == strcmp(s, "4"))
                           p = bsd_versions[1];
                   else if (0 == strcmp(s, "5"))
                           p = bsd_versions[2];
                   else if (0 == strcmp(s, "6"))
                           p = bsd_versions[3];
                   else if (0 == strcmp(s, "7"))
                           p = bsd_versions[4];
                   else
                           p = bsd_versions[0];
           }
   
           if (m->meta.source)
                   free(m->meta.source);
   
           m->meta.source = mandoc_strdup(p);
   
           return(1);
 }  }

Legend:
Removed from v.1.12  
changed lines
  Added in v.1.42

CVSweb