Handle nested, recursive mathematical subexpressions. This is

[mandoc.git] / man_action.c

diff --git a/man_action.c b/man_action.c
index 838cd263f7199467b861f59d5089651ca109def7..474043bd09d1066e0fa01527b0c40e20738f1bca 100644 (file)
--- a/man_action.c
+++ b/man_action.c
@@ -1,6 +1,6 @@
-/*     $Id: man_action.c,v 1.22 2009/10/30 05:58:37 kristaps Exp $ */
+/*     $Id: man_action.c,v 1.41 2010/07/31 23:52:58 schwarze Exp $ */

 /*
 /*

- * 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
  * purpose with or without fee is hereby granted, provided that the above
  *
  * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above


@@ -14,13 +14,15 @@
  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  */
  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  * 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 <string.h>
 
 #include <stdlib.h>
 #include <string.h>
 

+#include "mandoc.h"

 #include "libman.h"
 #include "libmandoc.h"
 
 #include "libman.h"
 #include "libmandoc.h"
 


@@ -31,6 +33,8 @@ struct        actions {
 static int       post_TH(struct man *);
 static int       post_fi(struct man *);
 static int       post_nf(struct man *);
 static int       post_TH(struct man *);
 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] = {
        { NULL }, /* br */
 
 const  struct actions man_actions[MAN_MAX] = {
        { NULL }, /* br */


@@ -63,15 +67,15 @@ const       struct actions man_actions[MAN_MAX] = {
        { NULL }, /* RE */
        { NULL }, /* RS */
        { NULL }, /* DT */
        { NULL }, /* RE */
        { NULL }, /* RS */
        { NULL }, /* DT */

-       { NULL }, /* UC */
+       { post_UC }, /* UC */

        { NULL }, /* PD */
        { NULL }, /* PD */

+       { NULL }, /* Sp */
+       { post_nf }, /* Vb */
+       { post_fi }, /* Ve */
+       { post_AT }, /* AT */
+       { NULL }, /* in */

 };
 
 };
 

-static time_t    man_atotime(const char *);
-#ifdef __linux__
-extern char     *strptime(const char *, const char *, struct tm *);
-#endif
-

 
 int
 man_action_post(struct man *m)
 
 int
 man_action_post(struct man *m)


@@ -101,7 +105,7 @@ post_fi(struct man *m)
 {
 
        if ( ! (MAN_LITERAL & m->flags))
 {
 
        if ( ! (MAN_LITERAL & m->flags))

-               if ( ! man_nwarn(m, m->last, WNLITERAL))
+               if ( ! man_nmsg(m, m->last, MANDOCERR_NOSCOPE))

                        return(0);
        m->flags &= ~MAN_LITERAL;
        return(1);
                        return(0);
        m->flags &= ~MAN_LITERAL;
        return(1);


@@ -113,7 +117,7 @@ post_nf(struct man *m)
 {
 
        if (MAN_LITERAL & m->flags)
 {
 
        if (MAN_LITERAL & m->flags)

-               if ( ! man_nwarn(m, m->last, WOLITERAL))
+               if ( ! man_nmsg(m, m->last, MANDOCERR_SCOPEREP))

                        return(0);
        m->flags |= MAN_LITERAL;
        return(1);
                        return(0);
        m->flags |= MAN_LITERAL;
        return(1);


@@ -124,8 +128,6 @@ static int
 post_TH(struct man *m)
 {
        struct man_node *n;
 post_TH(struct man *m)
 {
        struct man_node *n;

-       char            *ep;
-       long             lval;

 
        if (m->meta.title)
                free(m->meta.title);
 
        if (m->meta.title)
                free(m->meta.title);


@@ -133,9 +135,13 @@ post_TH(struct man *m)
                free(m->meta.vol);
        if (m->meta.source)
                free(m->meta.source);
                free(m->meta.vol);
        if (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.msec = 0;
+       m->meta.title = m->meta.vol = m->meta.rawdate =
+               m->meta.msec = m->meta.source = NULL;

        m->meta.date = 0;
 
        /* ->TITLE<- MSEC DATE SOURCE VOL */
        m->meta.date = 0;
 
        /* ->TITLE<- MSEC DATE SOURCE VOL */


@@ -148,23 +154,28 @@ post_TH(struct man *m)
 
        n = n->next;
        assert(n);
 
        n = n->next;
        assert(n);

-
-       errno = 0;
-       lval = strtol(n->string, &ep, 10);
-       if (n->string[0] != '\0' && *ep == '\0')
-               m->meta.msec = (int)lval;
-       else if ( ! man_nwarn(m, n, WMSEC))
-               return(0);
+       m->meta.msec = mandoc_strdup(n->string);

 
        /* TITLE MSEC ->DATE<- SOURCE VOL */
 
 
        /* TITLE MSEC ->DATE<- SOURCE VOL */
 

-       if (NULL == (n = n->next))
-               m->meta.date = time(NULL);
-       else if (0 == (m->meta.date = man_atotime(n->string))) {
-               if ( ! man_nwarn(m, n, WDATE))
-                       return(0);
+       /*
+        * 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);

-       }

 
        /* TITLE MSEC DATE ->SOURCE<- VOL */
 
 
        /* TITLE MSEC DATE ->SOURCE<- VOL */
 


@@ -176,45 +187,95 @@ post_TH(struct man *m)
        if (n && (n = n->next))
                m->meta.vol = mandoc_strdup(n->string);
 
        if (n && (n = n->next))
                m->meta.vol = mandoc_strdup(n->string);
 

-       /* 
-        * The end document shouldn't have the prologue macros as part
-        * of the syntax tree (they encompass only meta-data).  
+       /*
+        * Remove the `TH' node after we've processed it for our
+        * meta-data.

         */
         */

+       man_node_delete(m, m->last);
+       return(1);
+}
+
+
+static int
+post_AT(struct man *m)
+{
+       static const char * const unix_versions[] = {
+           "7th Edition",
+           "System III",
+           "System V",
+           "System V Release 2",
+       };

 
 

-       if (m->last->parent->child == m->last) {
-               m->last->parent->child = NULL;
-               n = m->last;
-               m->last = m->last->parent;
-               m->next = MAN_NEXT_CHILD;
-       } else {
-               assert(m->last->prev);
-               m->last->prev->next = NULL;
-               n = m->last;
-               m->last = m->last->prev;
-               m->next = MAN_NEXT_SIBLING;
+       const char      *p, *s;
+       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
-man_atotime(const char *p)
+static int
+post_UC(struct man *m)

 {
 {

-       struct tm        tm;
-       char            *pp;
+       static const char * const bsd_versions[] = {
+           "3rd Berkeley Distribution",
+           "4th Berkeley Distribution",
+           "4.2 Berkeley Distribution",
+           "4.3 Berkeley Distribution",
+           "4.4 Berkeley Distribution",
+       };
+
+       const char      *p, *s;
+       struct man_node *n;
+
+       n = m->last->child;
+
+       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];
+       }

 
 

-       memset(&tm, 0, sizeof(struct tm));
+       if (m->meta.source)
+               free(m->meta.source);

 
 

-       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));
+       m->meta.source = mandoc_strdup(p);

 
 

-       return(0);
+       return(1);

 }
 }