[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.6 and 1.27

version 1.6, 2009/03/27 14:56:15 version 1.27, 2010/03/23 11:30:48
Line 1 
Line 1 
 /* $Id$ */  /*      $Id$ */
 /*  /*
  * Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@openbsd.org>   * Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@kth.se>
  *   *
  * 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   * purpose with or without fee is hereby granted, provided that the above
  * above copyright notice and this permission notice appear in all   * copyright notice and this permission notice appear in all copies.
  * copies.  
  *   *
  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL   * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  * WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED   * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  * WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE   * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  * AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL   * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR   * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER   * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR   * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  * PERFORMANCE OF THIS SOFTWARE.  
  */   */
   #ifdef HAVE_CONFIG_H
   #include "config.h"
   #endif
   
 #include <sys/utsname.h>  #include <sys/utsname.h>
   
 #include <assert.h>  #include <assert.h>
 #include <err.h>  
 #include <errno.h>  
 #include <stdio.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 61  const struct actions man_actions[MAN_MAX] = {
Line 57  const struct actions man_actions[MAN_MAX] = {
         { NULL }, /* I */          { NULL }, /* I */
         { NULL }, /* IR */          { NULL }, /* IR */
         { NULL }, /* RI */          { NULL }, /* RI */
         { NULL }, /* br */          { NULL }, /* na */
           { 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 75  man_action_post(struct man *m)
Line 84  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;
Line 109  post_TH(struct man *m)
Line 143  post_TH(struct man *m)
   
         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, "malloc"));  
   
         /* TITLE ->MSEC<- DATE SOURCE VOL */          /* TITLE ->MSEC<- DATE SOURCE VOL */
   
         n = n->next;          n = n->next;
         assert(n);          assert(n);
   
         errno = 0;  
         lval = strtol(n->string, &ep, 10);          lval = strtol(n->string, &ep, 10);
         if (n->string[0] != '\0' && *ep == '\0')          if (n->string[0] != '\0' && *ep == '\0')
                 m->meta.msec = (int)lval;                  m->meta.msec = (int)lval;
         else if ( ! man_vwarn(m, n->line, n->pos, "invalid section"))          else if ( ! man_nwarn(m, n, WMSEC))
                 return(0);                  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, "malloc"));  
   
         /* 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, "malloc"));  
   
         /*          n = m->last;
          * The end document shouldn't have the prologue macros as part          man_node_unlink(m, n);
          * of the syntax tree (they encompass only meta-data).  
          */  
   
         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);          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.6  
changed lines
  Added in v.1.27
CVSweb