-/* $Id: man_action.c,v 1.1 2009/03/25 15:36:05 kristaps Exp $ */
+/* $Id: man_action.c,v 1.30 2010/03/27 10:04:56 kristaps Exp $ */
/*
- * 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
- * purpose with or without fee is hereby granted, provided that the
- * above copyright notice and this permission notice appear in all
- * copies.
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
*
- * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL
- * WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED
- * WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE
- * AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
- * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
- * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
- * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
- * PERFORMANCE OF THIS SOFTWARE.
+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ * 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 <err.h>
-#include <errno.h>
-#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "libman.h"
-
+#include "libmandoc.h"
struct actions {
int (*post)(struct man *);
};
+static int post_TH(struct man *);
+static int post_de(struct man *);
+static int post_fi(struct man *);
+static int post_nf(struct man *);
const struct actions man_actions[MAN_MAX] = {
- { NULL }, /* __ */
- { NULL }, /* TH */
+ { NULL }, /* br */
+ { post_TH }, /* TH */
{ NULL }, /* SH */
{ NULL }, /* SS */
{ NULL }, /* TP */
{ NULL }, /* B */
{ NULL }, /* I */
{ NULL }, /* IR */
+ { NULL }, /* RI */
+ { 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 */
+ { post_de }, /* de */
+ { post_de }, /* dei */
+ { post_de }, /* am */
+ { post_de }, /* ami */
+ { post_de }, /* ig */
+ { NULL }, /* . */
};
switch (m->last->type) {
case (MAN_TEXT):
- break;
+ /* FALLTHROUGH */
case (MAN_ROOT):
- break;
+ return(1);
default:
- if (NULL == man_actions[m->last->tok].post)
- break;
- return((*man_actions[m->last->tok].post)(m));
+ break;
}
+
+ 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);
}
-#if 0
+
+static int
+post_de(struct man *m)
+{
+
+ /*
+ * XXX: for the time being, we indiscriminately remove roff
+ * instructions from the parse stream.
+ */
+ if (MAN_BLOCK == m->last->type)
+ man_node_delete(m, m->last);
+ return(1);
+}
+
+
static int
-post_dt(POST_ARGS)
+post_nf(struct man *m)
{
- struct mdoc_node *n;
- const char *cp;
- char *ep;
- long lval;
+
+ 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)
+{
+ struct man_node *n;
+ char *ep;
+ long lval;
if (m->meta.title)
free(m->meta.title);
if (m->meta.vol)
free(m->meta.vol);
- if (m->meta.arch)
- free(m->meta.arch);
+ if (m->meta.source)
+ free(m->meta.source);
- m->meta.title = m->meta.vol = m->meta.arch = NULL;
+ m->meta.title = m->meta.vol = m->meta.source = NULL;
m->meta.msec = 0;
+ m->meta.date = 0;
- /* Handles: `.Dt'
- * --> title = unknown, volume = local, msec = 0, arch = NULL
- */
+ /* ->TITLE<- MSEC DATE SOURCE VOL */
- if (NULL == (n = m->last->child)) {
- m->meta.title = xstrdup("unknown");
- m->meta.vol = xstrdup("local");
- return(post_prol(m));
- }
-
- /* Handles: `.Dt TITLE'
- * --> title = TITLE, volume = local, msec = 0, arch = NULL
- */
+ n = m->last->child;
+ assert(n);
+ m->meta.title = mandoc_strdup(n->string);
- m->meta.title = xstrdup(n->string);
+ /* TITLE ->MSEC<- DATE SOURCE VOL */
- if (NULL == (n = n->next)) {
- m->meta.vol = xstrdup("local");
- return(post_prol(m));
- }
+ n = n->next;
+ assert(n);
- /* Handles: `.Dt TITLE SEC'
- * --> title = TITLE, volume = SEC is msec ?
- * format(msec) : SEC,
- * msec = SEC is msec ? atoi(msec) : 0,
- * arch = NULL
- */
+ 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);
- cp = mdoc_a2msec(n->string);
- if (cp) {
- m->meta.vol = xstrdup(cp);
- errno = 0;
- lval = strtol(n->string, &ep, 10);
- if (n->string[0] != '\0' && *ep == '\0')
- m->meta.msec = (int)lval;
- } else
- m->meta.vol = xstrdup(n->string);
-
- if (NULL == (n = n->next))
- return(post_prol(m));
-
- /* Handles: `.Dt TITLE SEC VOL'
- * --> title = TITLE, volume = VOL is vol ?
- * format(VOL) :
- * VOL is arch ? format(arch) :
- * VOL
- */
+ /* TITLE MSEC ->DATE<- SOURCE VOL */
- cp = mdoc_a2vol(n->string);
- if (cp) {
- free(m->meta.vol);
- m->meta.vol = xstrdup(cp);
- n = n->next;
- } else {
- cp = mdoc_a2arch(n->string);
- if (NULL == cp) {
- free(m->meta.vol);
- m->meta.vol = xstrdup(n->string);
- } else
- m->meta.arch = xstrdup(cp);
- }
-
- /* Ignore any subsequent parameters... */
-
- return(post_prol(m));
-}
+ n = n->next;
+ if (n) {
+ m->meta.date = mandoc_a2time
+ (MTIME_ISO_8601, n->string);
-static int
-post_prol(POST_ARGS)
-{
- struct mdoc_node *n;
+ if (0 == m->meta.date) {
+ if ( ! man_nwarn(m, n, WDATE))
+ return(0);
+ m->meta.date = time(NULL);
+ }
+ } else
+ m->meta.date = time(NULL);
- /*
- * The end document shouldn't have the prologue macros as part
- * of the syntax tree (they encompass only meta-data).
- */
+ /* TITLE MSEC DATE ->SOURCE<- VOL */
- if (m->last->parent->child == m->last)
- m->last->parent->child = m->last->prev;
- if (m->last->prev)
- m->last->prev->next = NULL;
+ if (n && (n = n->next))
+ m->meta.source = mandoc_strdup(n->string);
- n = m->last;
- assert(NULL == m->last->next);
+ /* TITLE MSEC DATE SOURCE ->VOL<- */
- if (m->last->prev) {
- m->last = m->last->prev;
- m->next = MDOC_NEXT_SIBLING;
- } else {
- m->last = m->last->parent;
- m->next = MDOC_NEXT_CHILD;
- }
+ if (n && (n = n->next))
+ m->meta.vol = mandoc_strdup(n->string);
- mdoc_node_freelist(n);
+ /*
+ * Remove the `TH' node after we've processed it for our
+ * meta-data.
+ */
+ man_node_delete(m, m->last);
return(1);
}
-#endif
git.ckatri.com / mandoc.git / blobdiff