Annotation of src/usr.bin/mandoc/mandoc.c, Revision 1.5
1.5 ! schwarze 1: /* $Id: mandoc.c,v 1.4 2009/12/22 23:58:00 schwarze Exp $ */
1.1 schwarze 2: /*
3: * Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@kth.se>
4: *
5: * Permission to use, copy, modify, and distribute this software for any
6: * purpose with or without fee is hereby granted, provided that the above
7: * copyright notice and this permission notice appear in all copies.
8: *
9: * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10: * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11: * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12: * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13: * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14: * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15: * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16: */
1.2 schwarze 17: #include <sys/types.h>
18:
1.1 schwarze 19: #include <assert.h>
20: #include <ctype.h>
21: #include <stdlib.h>
1.4 schwarze 22: #include <stdio.h>
23: #include <string.h>
1.5 ! schwarze 24: #include <time.h>
1.1 schwarze 25:
26: #include "libmandoc.h"
27:
1.5 ! schwarze 28: static int a2time(time_t *, const char *, const char *);
! 29:
! 30:
1.1 schwarze 31: int
32: mandoc_special(const char *p)
33: {
34: int c;
35:
36: if ('\\' != *p++)
37: return(0);
38:
39: switch (*p) {
40: case ('\\'):
41: /* FALLTHROUGH */
42: case ('\''):
43: /* FALLTHROUGH */
44: case ('`'):
45: /* FALLTHROUGH */
46: case ('q'):
47: /* FALLTHROUGH */
48: case ('-'):
49: /* FALLTHROUGH */
50: case ('~'):
51: /* FALLTHROUGH */
52: case ('^'):
53: /* FALLTHROUGH */
54: case ('%'):
55: /* FALLTHROUGH */
56: case ('0'):
57: /* FALLTHROUGH */
58: case (' '):
59: /* FALLTHROUGH */
60: case ('|'):
61: /* FALLTHROUGH */
62: case ('&'):
63: /* FALLTHROUGH */
64: case ('.'):
65: /* FALLTHROUGH */
66: case (':'):
67: /* FALLTHROUGH */
1.3 schwarze 68: case ('c'):
69: return(2);
1.1 schwarze 70: case ('e'):
71: return(2);
72: case ('f'):
73: if (0 == *++p || ! isgraph((u_char)*p))
74: return(0);
75: return(3);
76: case ('*'):
77: if (0 == *++p || ! isgraph((u_char)*p))
78: return(0);
79: switch (*p) {
80: case ('('):
81: if (0 == *++p || ! isgraph((u_char)*p))
82: return(0);
83: return(4);
84: case ('['):
85: for (c = 3, p++; *p && ']' != *p; p++, c++)
86: if ( ! isgraph((u_char)*p))
87: break;
88: return(*p == ']' ? c : 0);
89: default:
90: break;
91: }
92: return(3);
93: case ('('):
94: if (0 == *++p || ! isgraph((u_char)*p))
95: return(0);
96: if (0 == *++p || ! isgraph((u_char)*p))
97: return(0);
98: return(4);
99: case ('['):
100: break;
101: default:
102: return(0);
103: }
104:
105: for (c = 3, p++; *p && ']' != *p; p++, c++)
106: if ( ! isgraph((u_char)*p))
107: break;
108:
109: return(*p == ']' ? c : 0);
110: }
111:
1.4 schwarze 112:
113: void *
114: mandoc_calloc(size_t num, size_t size)
115: {
116: void *ptr;
117:
118: ptr = calloc(num, size);
119: if (NULL == ptr) {
120: perror(NULL);
121: exit(EXIT_FAILURE);
122: }
123:
124: return(ptr);
125: }
126:
127:
128: void *
129: mandoc_malloc(size_t size)
130: {
131: void *ptr;
132:
133: ptr = malloc(size);
134: if (NULL == ptr) {
135: perror(NULL);
136: exit(EXIT_FAILURE);
137: }
138:
139: return(ptr);
140: }
141:
142:
143: void *
144: mandoc_realloc(void *ptr, size_t size)
145: {
146:
147: ptr = realloc(ptr, size);
148: if (NULL == ptr) {
149: perror(NULL);
150: exit(EXIT_FAILURE);
151: }
152:
153: return(ptr);
154: }
155:
156:
157: char *
158: mandoc_strdup(const char *ptr)
159: {
160: char *p;
161:
162: p = strdup(ptr);
163: if (NULL == p) {
164: perror(NULL);
165: exit(EXIT_FAILURE);
166: }
167:
168: return(p);
169: }
1.5 ! schwarze 170:
! 171:
! 172: static int
! 173: a2time(time_t *t, const char *fmt, const char *p)
! 174: {
! 175: struct tm tm;
! 176: char *pp;
! 177:
! 178: memset(&tm, 0, sizeof(struct tm));
! 179:
! 180: pp = strptime(p, fmt, &tm);
! 181: if (NULL != pp && '\0' == *pp) {
! 182: *t = mktime(&tm);
! 183: return(1);
! 184: }
! 185:
! 186: return(0);
! 187: }
! 188:
! 189:
! 190: /*
! 191: * Convert from a manual date string (see mdoc(7) and man(7)) into a
! 192: * date according to the stipulated date type.
! 193: */
! 194: time_t
! 195: mandoc_a2time(int flags, const char *p)
! 196: {
! 197: time_t t;
! 198:
! 199: if (MTIME_MDOCDATE & flags) {
! 200: if (0 == strcmp(p, "$" "Mdocdate$"))
! 201: return(time(NULL));
! 202: if (a2time(&t, "$" "Mdocdate: %b %d %Y $", p))
! 203: return(t);
! 204: }
! 205:
! 206: if (MTIME_CANONICAL & flags || MTIME_REDUCED & flags)
! 207: if (a2time(&t, "%b %d, %Y", p))
! 208: return(t);
! 209:
! 210: if (MTIME_ISO_8601 & flags)
! 211: if (a2time(&t, "%Y-%m-%d", p))
! 212: return(t);
! 213:
! 214: if (MTIME_REDUCED & flags) {
! 215: if (a2time(&t, "%d, %Y", p))
! 216: return(t);
! 217: if (a2time(&t, "%Y", p))
! 218: return(t);
! 219: }
! 220:
! 221: return(0);
! 222: }
! 223: