version 1.2, 2009/03/25 16:07:36 |
version 1.22, 2009/10/30 05:58:37 |
|
|
/* $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. |
|
*/ |
*/ |
#include <sys/utsname.h> |
#include <sys/utsname.h> |
|
|
#include <assert.h> |
#include <assert.h> |
#include <err.h> |
|
#include <errno.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" |
|
|
|
|
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 53 const struct actions man_actions[MAN_MAX] = { |
|
{ NULL }, /* B */ |
{ NULL }, /* B */ |
{ NULL }, /* I */ |
{ NULL }, /* I */ |
{ NULL }, /* IR */ |
{ 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 */ |
}; |
}; |
|
|
|
static time_t man_atotime(const char *); |
|
#ifdef __linux__ |
|
extern char *strptime(const char *, const char *, struct tm *); |
|
#endif |
|
|
|
|
int |
int |
man_action_post(struct man *m) |
man_action_post(struct man *m) |
{ |
{ |
Line 70 man_action_post(struct man *m) |
|
Line 83 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 104 post_TH(struct man *m) |
|
Line 142 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; |
Line 117 post_TH(struct man *m) |
|
Line 153 post_TH(struct man *m) |
|
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)) { |
if (NULL == (n = n->next)) |
m->meta.date = time(NULL); |
m->meta.date = time(NULL); |
return(1); |
else if (0 == (m->meta.date = man_atotime(n->string))) { |
} |
if ( ! man_nwarn(m, n, WDATE)) |
|
|
if (0 == (m->meta.date = man_atotime(n->string))) { |
|
if ( ! man_vwarn(m, n->line, n->pos, "invalid date")) |
|
return(0); |
return(0); |
m->meta.date = time(NULL); |
m->meta.date = time(NULL); |
} |
} |
|
|
/* TITLE MSEC DATE ->SOURCE<- VOL */ |
/* TITLE MSEC DATE ->SOURCE<- VOL */ |
|
|
if ((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->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")); |
|
|
|
/* |
/* |
* The end document shouldn't have the prologue macros as part |
* The end document shouldn't have the prologue macros as part |
* of the syntax tree (they encompass only meta-data). |
* of the syntax tree (they encompass only meta-data). |
*/ |
*/ |
|
|
assert(MAN_ROOT == m->last->parent->type); |
if (m->last->parent->child == m->last) { |
m->last->parent->child = NULL; |
m->last->parent->child = NULL; |
n = m->last; |
n = m->last; |
m->last = m->last->parent; |
m->last = m->last->parent; |
m->next = MAN_NEXT_CHILD; |
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); |
Line 168 man_atotime(const char *p) |
|
Line 205 man_atotime(const char *p) |
|
struct tm tm; |
struct tm tm; |
char *pp; |
char *pp; |
|
|
(void)memset(&tm, 0, sizeof(struct tm)); |
memset(&tm, 0, sizeof(struct tm)); |
|
|
if ((pp = strptime(p, "%b %d %Y", &tm)) && 0 == *pp) |
if ((pp = strptime(p, "%b %d %Y", &tm)) && 0 == *pp) |
return(mktime(&tm)); |
return(mktime(&tm)); |