version 1.3, 2009/04/12 19:45:26 |
version 1.26, 2011/03/17 09:16:38 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2008 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 |
* Permission to use, copy, modify, and distribute this software for any |
* purpose with or without fee is hereby granted, provided that the above |
* purpose with or without fee is hereby granted, provided that the above |
|
|
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
*/ |
*/ |
|
#ifdef HAVE_CONFIG_H |
|
#include "config.h" |
|
#endif |
|
|
#include <sys/types.h> |
#include <sys/types.h> |
|
|
#include <assert.h> |
#include <assert.h> |
#include <ctype.h> |
|
#include <stdlib.h> |
#include <stdlib.h> |
#include <stdio.h> |
#include <stdio.h> |
#include <string.h> |
#include <string.h> |
|
#include <time.h> |
|
|
|
#include "mandoc.h" |
#include "libmdoc.h" |
#include "libmdoc.h" |
|
|
/* |
static const char * const secnames[SEC__MAX] = { |
* Various string-literal operations: converting scalars to and from |
NULL, |
* strings, etc. |
"NAME", |
*/ |
"LIBRARY", |
|
"SYNOPSIS", |
struct mdoc_secname { |
"DESCRIPTION", |
const char *name; |
"IMPLEMENTATION NOTES", |
int flag; |
"RETURN VALUES", |
#define MSECNAME_META (1 << 0) |
"ENVIRONMENT", |
|
"FILES", |
|
"EXIT STATUS", |
|
"EXAMPLES", |
|
"DIAGNOSTICS", |
|
"COMPATIBILITY", |
|
"ERRORS", |
|
"SEE ALSO", |
|
"STANDARDS", |
|
"HISTORY", |
|
"AUTHORS", |
|
"CAVEATS", |
|
"BUGS", |
|
"SECURITY CONSIDERATIONS", |
|
NULL |
}; |
}; |
|
|
/* Section names corresponding to mdoc_sec. */ |
|
|
|
static const struct mdoc_secname secnames[] = { |
|
{ "PROLOGUE", MSECNAME_META }, |
|
{ "BODY", MSECNAME_META }, |
|
{ "NAME", 0 }, |
|
{ "LIBRARY", 0 }, |
|
{ "SYNOPSIS", 0 }, |
|
{ "DESCRIPTION", 0 }, |
|
{ "IMPLEMENTATION NOTES", 0 }, |
|
{ "RETURN VALUES", 0 }, |
|
{ "ENVIRONMENT", 0 }, |
|
{ "FILES", 0 }, |
|
{ "EXAMPLES", 0 }, |
|
{ "DIAGNOSTICS", 0 }, |
|
{ "COMPATIBILITY", 0 }, |
|
{ "ERRORS", 0 }, |
|
{ "SEE ALSO", 0 }, |
|
{ "STANDARDS", 0 }, |
|
{ "HISTORY", 0 }, |
|
{ "AUTHORS", 0 }, |
|
{ "CAVEATS", 0 }, |
|
{ "BUGS", 0 }, |
|
{ NULL, 0 } |
|
}; |
|
|
|
#ifdef __linux__ |
|
extern char *strptime(const char *, const char *, struct tm *); |
|
#endif |
|
|
|
|
|
size_t |
|
mdoc_isescape(const char *p) |
|
{ |
|
size_t c; |
|
|
|
if ('\\' != *p++) |
|
return(0); |
|
|
|
switch (*p) { |
|
case ('\\'): |
|
/* FALLTHROUGH */ |
|
case ('\''): |
|
/* FALLTHROUGH */ |
|
case ('`'): |
|
/* FALLTHROUGH */ |
|
case ('q'): |
|
/* FALLTHROUGH */ |
|
case ('-'): |
|
/* FALLTHROUGH */ |
|
case ('~'): |
|
/* FALLTHROUGH */ |
|
case ('^'): |
|
/* FALLTHROUGH */ |
|
case ('%'): |
|
/* FALLTHROUGH */ |
|
case ('0'): |
|
/* FALLTHROUGH */ |
|
case (' '): |
|
/* FALLTHROUGH */ |
|
case ('|'): |
|
/* FALLTHROUGH */ |
|
case ('&'): |
|
/* FALLTHROUGH */ |
|
case ('.'): |
|
/* FALLTHROUGH */ |
|
case (':'): |
|
/* FALLTHROUGH */ |
|
case ('e'): |
|
return(2); |
|
case ('*'): |
|
if (0 == *++p || ! isgraph((u_char)*p)) |
|
return(0); |
|
switch (*p) { |
|
case ('('): |
|
if (0 == *++p || ! isgraph((u_char)*p)) |
|
return(0); |
|
return(4); |
|
case ('['): |
|
for (c = 3, p++; *p && ']' != *p; p++, c++) |
|
if ( ! isgraph((u_char)*p)) |
|
break; |
|
return(*p == ']' ? c : 0); |
|
default: |
|
break; |
|
} |
|
return(3); |
|
case ('('): |
|
if (0 == *++p || ! isgraph((u_char)*p)) |
|
return(0); |
|
if (0 == *++p || ! isgraph((u_char)*p)) |
|
return(0); |
|
return(4); |
|
case ('['): |
|
break; |
|
default: |
|
return(0); |
|
} |
|
|
|
for (c = 3, p++; *p && ']' != *p; p++, c++) |
|
if ( ! isgraph((u_char)*p)) |
|
break; |
|
|
|
return(*p == ']' ? c : 0); |
|
} |
|
|
|
|
|
int |
|
mdoc_iscdelim(char p) |
|
{ |
|
|
|
switch (p) { |
|
case('.'): |
|
/* FALLTHROUGH */ |
|
case(','): |
|
/* FALLTHROUGH */ |
|
case(';'): |
|
/* FALLTHROUGH */ |
|
case(':'): |
|
/* FALLTHROUGH */ |
|
case('?'): |
|
/* FALLTHROUGH */ |
|
case('!'): |
|
/* FALLTHROUGH */ |
|
case('('): |
|
/* FALLTHROUGH */ |
|
case(')'): |
|
/* FALLTHROUGH */ |
|
case('['): |
|
/* FALLTHROUGH */ |
|
case(']'): |
|
/* FALLTHROUGH */ |
|
case('{'): |
|
/* FALLTHROUGH */ |
|
case('}'): |
|
return(1); |
|
default: |
|
break; |
|
} |
|
|
|
return(0); |
|
} |
|
|
|
|
|
int |
|
mdoc_isdelim(const char *p) |
|
{ |
|
|
|
if (0 == *p) |
|
return(0); |
|
if (0 != *(p + 1)) |
|
return(0); |
|
return(mdoc_iscdelim(*p)); |
|
} |
|
|
|
|
|
enum mdoc_sec |
enum mdoc_sec |
mdoc_atosec(const char *p) |
mdoc_str2sec(const char *p) |
{ |
{ |
const struct mdoc_secname *n; |
int i; |
int i; |
|
|
|
for (i = 0, n = secnames; n->name; n++, i++) |
for (i = 0; i < (int)SEC__MAX; i++) |
if ( ! (n->flag & MSECNAME_META)) |
if (secnames[i] && 0 == strcmp(p, secnames[i])) |
if (0 == strcmp(p, n->name)) |
return((enum mdoc_sec)i); |
return((enum mdoc_sec)i); |
|
|
|
return(SEC_CUSTOM); |
return(SEC_CUSTOM); |
} |
} |
|
|
|
|
time_t |
/* FIXME: move this into an editable .in file. */ |
mdoc_atotime(const char *p) |
|
{ |
|
struct tm tm; |
|
char *pp; |
|
|
|
(void)memset(&tm, 0, sizeof(struct tm)); |
|
|
|
if (0 == strcmp(p, "$Mdocdate$")) |
|
return(time(NULL)); |
|
if ((pp = strptime(p, "$Mdocdate$", &tm)) && 0 == *pp) |
|
return(mktime(&tm)); |
|
/* XXX - this matches "June 1999", which is wrong. */ |
|
if ((pp = strptime(p, "%b %d %Y", &tm)) && 0 == *pp) |
|
return(mktime(&tm)); |
|
if ((pp = strptime(p, "%b %d, %Y", &tm)) && 0 == *pp) |
|
return(mktime(&tm)); |
|
|
|
return(0); |
|
} |
|
|
|
|
|
size_t |
size_t |
mdoc_macro2len(int macro) |
mdoc_macro2len(enum mdoct macro) |
{ |
{ |
|
|
switch (macro) { |
switch (macro) { |
Line 262 mdoc_macro2len(int macro) |
|
Line 102 mdoc_macro2len(int macro) |
|
case(MDOC_Em): |
case(MDOC_Em): |
return(10); |
return(10); |
case(MDOC_Er): |
case(MDOC_Er): |
return(12); |
return(17); |
case(MDOC_Ev): |
case(MDOC_Ev): |
return(15); |
return(15); |
case(MDOC_Fa): |
case(MDOC_Fa): |