[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.11 and 1.34

version 1.11, 2009/06/10 20:18:43 version 1.34, 2010/05/15 22:44:04
Line 1 
Line 1 
 /*      $Id$ */  /*      $Id$ */
 /*  /*
  * Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@kth.se>   * Copyright (c) 2008, 2009 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 "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 *);
   
 const   struct actions man_actions[MAN_MAX] = {  const   struct actions man_actions[MAN_MAX] = {
         { NULL }, /* __ */          { NULL }, /* br */
         { post_TH }, /* TH */          { post_TH }, /* TH */
         { NULL }, /* SH */          { NULL }, /* SH */
         { NULL }, /* SS */          { NULL }, /* SS */
Line 57  const struct actions man_actions[MAN_MAX] = {
Line 55  const struct actions man_actions[MAN_MAX] = {
         { NULL }, /* I */          { NULL }, /* I */
         { NULL }, /* IR */          { NULL }, /* IR */
         { NULL }, /* RI */          { NULL }, /* RI */
         { NULL }, /* br */  
         { NULL }, /* na */          { NULL }, /* na */
         { NULL }, /* i */          { NULL }, /* i */
           { NULL }, /* sp */
           { post_nf }, /* nf */
           { post_fi }, /* fi */
           { NULL }, /* r */
           { NULL }, /* RE */
           { NULL }, /* RS */
           { NULL }, /* DT */
           { NULL }, /* UC */
           { NULL }, /* PD */
           { NULL }, /* Sp */
           { post_nf }, /* Vb */
           { post_fi }, /* Ve */
 };  };
   
   
Line 73  man_action_post(struct man *m)
Line 82  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_nwarn(m, m->last, WNLITERAL))
                           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_nwarn(m, m->last, WOLITERAL))
                           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 98  post_TH(struct man *m)
Line 130  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);
   
         m->meta.title = m->meta.vol = m->meta.source = NULL;          m->meta.title = m->meta.vol =
         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))          n = n->next;
           if (n) {
                   m->meta.date = mandoc_a2time
                           (MTIME_ISO_8601, n->string);
                   if (0 == m->meta.date) {
                           if ( ! man_nwarn(m, n, WDATE))
                                   return(0);
                           m->meta.date = time(NULL);
                   }
           } 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);
         if (m->last->parent->child == m->last) {  
                 assert(MAN_ROOT == m->last->parent->type);  
                 m->last->parent->child = NULL;  
                 n = m->last;  
                 m->last = m->last->parent;  
                 m->next = MAN_NEXT_CHILD;  
                 assert(m->last == m->first);  
         } else {  
                 assert(m->last->prev);  
                 m->last->prev->next = NULL;  
                 n = m->last;  
                 m->last = m->last->prev;  
                 m->next = MAN_NEXT_SIBLING;  
         }  
   
         man_node_freelist(n);  
         return(1);          return(1);
 }  
   
   
 static time_t  
 man_atotime(const char *p)  
 {  
         struct tm        tm;  
         char            *pp;  
   
         (void)memset(&tm, 0, sizeof(struct tm));  
   
         if ((pp = strptime(p, "%b %d %Y", &tm)) && 0 == *pp)  
                 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);  
 }  }
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.34
CVSweb