version 1.8, 2009/04/02 06:51:44 |
version 1.43, 2010/11/30 15:24:27 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@openbsd.org> |
* 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 |
* 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. |
|
*/ |
*/ |
#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 time_t man_atotime(const char *); |
|
|
|
const struct actions man_actions[MAN_MAX] = { |
const struct actions man_actions[MAN_MAX] = { |
{ NULL }, /* __ */ |
{ NULL }, /* br */ |
{ post_TH }, /* TH */ |
{ NULL }, /* TH */ |
{ NULL }, /* SH */ |
{ NULL }, /* SH */ |
{ NULL }, /* SS */ |
{ NULL }, /* SS */ |
{ NULL }, /* TP */ |
{ NULL }, /* TP */ |
Line 59 const struct actions man_actions[MAN_MAX] = { |
|
Line 53 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 }, /* sp */ |
|
{ NULL }, /* nf */ |
|
{ NULL }, /* fi */ |
|
{ NULL }, /* r */ |
|
{ NULL }, /* RE */ |
|
{ NULL }, /* RS */ |
|
{ NULL }, /* DT */ |
|
{ NULL }, /* UC */ |
|
{ NULL }, /* PD */ |
|
{ NULL }, /* Sp */ |
|
{ NULL }, /* Vb */ |
|
{ NULL }, /* Ve */ |
|
{ NULL }, /* AT */ |
|
{ NULL }, /* in */ |
}; |
}; |
|
|
|
|
Line 74 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)); |
|
} |
} |
return(1); |
|
} |
|
|
|
|
if (NULL == man_actions[m->last->tok].post) |
static int |
return(1); |
post_TH(struct man *m) |
return((*man_actions[m->last->tok].post)(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.source) |
|
free(m->meta.source); |
|
|
|
m->meta.title = m->meta.vol = m->meta.source = NULL; |
|
m->meta.msec = 0; |
|
m->meta.date = 0; |
|
|
|
/* ->TITLE<- MSEC DATE SOURCE VOL */ |
|
|
|
n = m->last->child; |
|
assert(n); |
|
|
|
if (NULL == (m->meta.title = strdup(n->string))) |
|
return(man_verr(m, n->line, n->pos, |
|
"memory exhausted")); |
|
|
|
/* TITLE ->MSEC<- DATE SOURCE VOL */ |
|
|
|
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_vwarn(m, n->line, n->pos, "invalid section")) |
|
return(0); |
|
|
|
/* 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_vwarn(m, n->line, n->pos, "invalid date")) |
|
return(0); |
|
m->meta.date = time(NULL); |
|
} |
|
|
|
/* TITLE MSEC DATE ->SOURCE<- VOL */ |
|
|
|
if (n && (n = n->next)) |
|
if (NULL == (m->meta.source = strdup(n->string))) |
|
return(man_verr(m, n->line, n->pos, |
|
"memory exhausted")); |
|
|
|
/* TITLE MSEC DATE SOURCE ->VOL<- */ |
|
|
|
if (n && (n = n->next)) |
|
if (NULL == (m->meta.vol = strdup(n->string))) |
|
return(man_verr(m, n->line, n->pos, |
|
"memory exhausted")); |
|
|
|
/* |
|
* The end document shouldn't have the prologue macros as part |
|
* 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); |
|
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); |
|
} |
|