Annotation of mandoc/strings.c, Revision 1.12
1.12 ! kristaps 1: /* $Id: strings.c,v 1.11 2009/01/20 22:55:46 kristaps Exp $ */
1.1 kristaps 2: /*
3: * Copyright (c) 2008 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
7: * above copyright notice and this permission notice appear in all
8: * copies.
9: *
10: * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL
11: * WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED
12: * WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE
13: * AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
14: * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
15: * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
16: * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
17: * PERFORMANCE OF THIS SOFTWARE.
18: */
19: #include <assert.h>
20: #include <ctype.h>
21: #include <stdlib.h>
22: #include <stdio.h>
1.2 kristaps 23: #include <string.h>
1.10 kristaps 24: #ifndef __OpenBSD__
1.4 kristaps 25: #include <time.h>
26: #endif
1.1 kristaps 27:
28: #include "private.h"
29:
1.4 kristaps 30: #ifdef __linux__
31: extern char *strptime(const char *, const char *, struct tm *);
32: #endif
33:
1.1 kristaps 34: int
1.3 kristaps 35: mdoc_iscdelim(char p)
1.1 kristaps 36: {
37:
1.3 kristaps 38: switch (p) {
1.1 kristaps 39: case('.'):
40: /* FALLTHROUGH */
41: case(','):
42: /* FALLTHROUGH */
43: case(';'):
44: /* FALLTHROUGH */
45: case(':'):
46: /* FALLTHROUGH */
47: case('?'):
48: /* FALLTHROUGH */
49: case('!'):
50: /* FALLTHROUGH */
51: case('('):
52: /* FALLTHROUGH */
53: case(')'):
54: /* FALLTHROUGH */
55: case('['):
56: /* FALLTHROUGH */
57: case(']'):
58: /* FALLTHROUGH */
1.7 kristaps 59: case('{'):
60: /* FALLTHROUGH */
1.1 kristaps 61: case('}'):
62: return(1);
63: default:
64: break;
65: }
66:
67: return(0);
68: }
69:
1.2 kristaps 70:
1.3 kristaps 71: int
72: mdoc_isdelim(const char *p)
73: {
74:
75: if (0 == *p)
76: return(0);
77: if (0 != *(p + 1))
78: return(0);
79: return(mdoc_iscdelim(*p));
80: }
81:
82:
1.2 kristaps 83: enum mdoc_sec
1.9 kristaps 84: mdoc_atosec(const char *p)
1.2 kristaps 85: {
86:
1.9 kristaps 87: assert(p);
88: if (0 == strcmp(p, "NAME"))
1.2 kristaps 89: return(SEC_NAME);
1.9 kristaps 90: else if (0 == strcmp(p, "RETURN VALUES"))
91: return(SEC_RETURN_VALUES);
92: else if (0 == strcmp(p, "SEE ALSO"))
93: return(SEC_SEE_ALSO);
94: else if (0 == strcmp(p, "SYNOPSIS"))
1.2 kristaps 95: return(SEC_SYNOPSIS);
1.9 kristaps 96: else if (0 == strcmp(p, "DESCRIPTION"))
1.2 kristaps 97: return(SEC_DESCRIPTION);
1.9 kristaps 98: else if (0 == strcmp(p, "ENVIRONMENT"))
1.2 kristaps 99: return(SEC_ENVIRONMENT);
1.9 kristaps 100: else if (0 == strcmp(p, "FILES"))
1.2 kristaps 101: return(SEC_FILES);
1.9 kristaps 102: else if (0 == strcmp(p, "EXAMPLES"))
1.2 kristaps 103: return(SEC_EXAMPLES);
1.9 kristaps 104: else if (0 == strcmp(p, "DIAGNOSTICS"))
1.2 kristaps 105: return(SEC_DIAGNOSTICS);
1.9 kristaps 106: else if (0 == strcmp(p, "ERRORS"))
1.2 kristaps 107: return(SEC_ERRORS);
1.9 kristaps 108: else if (0 == strcmp(p, "STANDARDS"))
1.2 kristaps 109: return(SEC_STANDARDS);
1.9 kristaps 110: else if (0 == strcmp(p, "HISTORY"))
1.2 kristaps 111: return(SEC_HISTORY);
1.9 kristaps 112: else if (0 == strcmp(p, "AUTHORS"))
1.2 kristaps 113: return(SEC_AUTHORS);
1.9 kristaps 114: else if (0 == strcmp(p, "CAVEATS"))
1.2 kristaps 115: return(SEC_CAVEATS);
1.9 kristaps 116: else if (0 == strcmp(p, "BUGS"))
1.2 kristaps 117: return(SEC_BUGS);
118:
119: return(SEC_CUSTOM);
120: }
121:
122:
123: time_t
124: mdoc_atotime(const char *p)
125: {
126: struct tm tm;
1.11 kristaps 127: char *pp;
1.2 kristaps 128:
1.5 kristaps 129: (void)memset(&tm, 0, sizeof(struct tm));
130:
1.11 kristaps 131: if (xstrcmp(p, "$Mdocdate$"))
132: return(time(NULL));
133: if ((pp = strptime(p, "$Mdocdate: %b %d %Y $", &tm)) && 0 == *pp)
1.2 kristaps 134: return(mktime(&tm));
1.11 kristaps 135: /* XXX - this matches "June 1999", which is wrong. */
136: if ((pp = strptime(p, "%b %d %Y", &tm)) && 0 == *pp)
137: return(mktime(&tm));
138: if ((pp = strptime(p, "%b %d, %Y", &tm)) && 0 == *pp)
1.2 kristaps 139: return(mktime(&tm));
140:
141: return(0);
142: }
143:
144:
145: enum mdoc_msec
146: mdoc_atomsec(const char *p)
147: {
148:
149: if (0 == strcmp(p, "1"))
150: return(MSEC_1);
151: else if (0 == strcmp(p, "2"))
152: return(MSEC_2);
153: else if (0 == strcmp(p, "3"))
154: return(MSEC_3);
155: else if (0 == strcmp(p, "3f"))
156: return(MSEC_3f);
157: else if (0 == strcmp(p, "3p"))
158: return(MSEC_3p);
159: else if (0 == strcmp(p, "4"))
160: return(MSEC_4);
161: else if (0 == strcmp(p, "5"))
162: return(MSEC_5);
163: else if (0 == strcmp(p, "6"))
164: return(MSEC_6);
165: else if (0 == strcmp(p, "7"))
166: return(MSEC_7);
167: else if (0 == strcmp(p, "8"))
168: return(MSEC_8);
169: else if (0 == strcmp(p, "9"))
170: return(MSEC_9);
171: else if (0 == strcmp(p, "X11"))
172: return(MSEC_X11);
173: else if (0 == strcmp(p, "X11R6"))
174: return(MSEC_X11R6);
175: else if (0 == strcmp(p, "local"))
176: return(MSEC_local);
177: else if (0 == strcmp(p, "n"))
178: return(MSEC_n);
179: else if (0 == strcmp(p, "unass"))
180: return(MSEC_unass);
181: else if (0 == strcmp(p, "draft"))
182: return(MSEC_draft);
183: else if (0 == strcmp(p, "paper"))
184: return(MSEC_paper);
185:
186: return(MSEC_DEFAULT);
187: }
188:
189:
190: enum mdoc_vol
191: mdoc_atovol(const char *p)
192: {
193:
194: if (0 == strcmp(p, "AMD"))
195: return(VOL_AMD);
196: else if (0 == strcmp(p, "IND"))
197: return(VOL_IND);
198: else if (0 == strcmp(p, "KM"))
199: return(VOL_KM);
200: else if (0 == strcmp(p, "LOCAL"))
201: return(VOL_LOCAL);
202: else if (0 == strcmp(p, "PRM"))
203: return(VOL_PRM);
204: else if (0 == strcmp(p, "PS1"))
205: return(VOL_PS1);
206: else if (0 == strcmp(p, "SMM"))
207: return(VOL_SMM);
208: else if (0 == strcmp(p, "URM"))
209: return(VOL_URM);
210: else if (0 == strcmp(p, "USD"))
211: return(VOL_USD);
212:
213: return(VOL_DEFAULT);
214: }
215:
216:
217: enum mdoc_arch
218: mdoc_atoarch(const char *p)
219: {
220:
221: if (0 == strcmp(p, "alpha"))
222: return(ARCH_alpha);
223: else if (0 == strcmp(p, "amd64"))
224: return(ARCH_amd64);
225: else if (0 == strcmp(p, "amiga"))
226: return(ARCH_amiga);
227: else if (0 == strcmp(p, "arc"))
228: return(ARCH_arc);
1.8 kristaps 229: else if (0 == strcmp(p, "arm"))
230: return(ARCH_arm);
1.2 kristaps 231: else if (0 == strcmp(p, "armish"))
232: return(ARCH_armish);
233: else if (0 == strcmp(p, "aviion"))
234: return(ARCH_aviion);
235: else if (0 == strcmp(p, "hp300"))
236: return(ARCH_hp300);
237: else if (0 == strcmp(p, "hppa"))
238: return(ARCH_hppa);
239: else if (0 == strcmp(p, "hppa64"))
240: return(ARCH_hppa64);
241: else if (0 == strcmp(p, "i386"))
242: return(ARCH_i386);
243: else if (0 == strcmp(p, "landisk"))
244: return(ARCH_landisk);
245: else if (0 == strcmp(p, "luna88k"))
246: return(ARCH_luna88k);
247: else if (0 == strcmp(p, "mac68k"))
248: return(ARCH_mac68k);
249: else if (0 == strcmp(p, "macppc"))
250: return(ARCH_macppc);
251: else if (0 == strcmp(p, "mvme68k"))
252: return(ARCH_mvme68k);
253: else if (0 == strcmp(p, "mvme88k"))
254: return(ARCH_mvme88k);
255: else if (0 == strcmp(p, "mvmeppc"))
256: return(ARCH_mvmeppc);
257: else if (0 == strcmp(p, "pmax"))
258: return(ARCH_pmax);
259: else if (0 == strcmp(p, "sgi"))
260: return(ARCH_sgi);
261: else if (0 == strcmp(p, "socppc"))
262: return(ARCH_socppc);
263: else if (0 == strcmp(p, "sparc"))
264: return(ARCH_sparc);
265: else if (0 == strcmp(p, "sparc64"))
266: return(ARCH_sparc64);
267: else if (0 == strcmp(p, "sun3"))
268: return(ARCH_sun3);
269: else if (0 == strcmp(p, "vax"))
270: return(ARCH_vax);
271: else if (0 == strcmp(p, "zaurus"))
272: return(ARCH_zaurus);
273:
274: return(ARCH_DEFAULT);
275: }
1.4 kristaps 276:
277:
278: enum mdoc_att
279: mdoc_atoatt(const char *p)
280: {
281:
282: assert(p);
283: if (0 == strcmp(p, "v1"))
284: return(ATT_v1);
285: else if (0 == strcmp(p, "v2"))
286: return(ATT_v2);
287: else if (0 == strcmp(p, "v3"))
288: return(ATT_v3);
289: else if (0 == strcmp(p, "v4"))
290: return(ATT_v4);
291: else if (0 == strcmp(p, "v5"))
292: return(ATT_v5);
293: else if (0 == strcmp(p, "v6"))
294: return(ATT_v6);
295: else if (0 == strcmp(p, "v7"))
296: return(ATT_v7);
297: else if (0 == strcmp(p, "32v"))
298: return(ATT_32v);
299: else if (0 == strcmp(p, "V.1"))
300: return(ATT_V1);
301: else if (0 == strcmp(p, "V.2"))
302: return(ATT_V2);
303: else if (0 == strcmp(p, "V.3"))
304: return(ATT_V3);
305: else if (0 == strcmp(p, "V.4"))
306: return(ATT_V4);
307:
308: return(ATT_DEFAULT);
309: }
1.6 kristaps 310:
311:
312: char *
313: mdoc_type2a(enum mdoc_type type)
314: {
315: switch (type) {
316: case (MDOC_ROOT):
317: return("root");
318: case (MDOC_BLOCK):
319: return("block");
320: case (MDOC_HEAD):
321: return("block-head");
322: case (MDOC_BODY):
323: return("block-body");
324: case (MDOC_TAIL):
325: return("block-tail");
326: case (MDOC_ELEM):
327: return("elem");
328: case (MDOC_TEXT):
329: return("text");
330: default:
331: break;
332: }
333:
334: abort();
335: /* NOTREACHED */
336: }
1.12 ! kristaps 337:
! 338:
! 339: char *
! 340: mdoc_arch2a(enum mdoc_arch arch)
! 341: {
! 342:
! 343: switch (arch) {
! 344: case (ARCH_alpha):
! 345: return("Alpha");
! 346: case (ARCH_amd64):
! 347: return("AMD64");
! 348: case (ARCH_amiga):
! 349: return("Amiga");
! 350: case (ARCH_arc):
! 351: return("ARC");
! 352: case (ARCH_arm):
! 353: return("ARM");
! 354: case (ARCH_armish):
! 355: return("ARMISH");
! 356: case (ARCH_aviion):
! 357: return("AViion");
! 358: case (ARCH_hp300):
! 359: return("HP300");
! 360: case (ARCH_hppa):
! 361: return("HPPA");
! 362: case (ARCH_hppa64):
! 363: return("HPPA64");
! 364: case (ARCH_i386):
! 365: return("i386");
! 366: case (ARCH_landisk):
! 367: return("LANDISK");
! 368: case (ARCH_luna88k):
! 369: return("Luna88k");
! 370: case (ARCH_mac68k):
! 371: return("Mac68k");
! 372: case (ARCH_macppc):
! 373: return("MacPPC");
! 374: case (ARCH_mvme68k):
! 375: return("MVME68k");
! 376: case (ARCH_mvme88k):
! 377: return("MVME88k");
! 378: case (ARCH_mvmeppc):
! 379: return("MVMEPPC");
! 380: case (ARCH_pmax):
! 381: return("PMAX");
! 382: case (ARCH_sgi):
! 383: return("SGI");
! 384: case (ARCH_socppc):
! 385: return("SOCPPC");
! 386: case (ARCH_sparc):
! 387: return("SPARC");
! 388: case (ARCH_sparc64):
! 389: return("SPARC64");
! 390: case (ARCH_sun3):
! 391: return("Sun3");
! 392: case (ARCH_vax):
! 393: return("VAX");
! 394: case (ARCH_zaurus):
! 395: return("Zaurus");
! 396: case (ARCH_DEFAULT):
! 397: return(NULL);
! 398: default:
! 399: break;
! 400: }
! 401:
! 402: abort();
! 403: /* NOTREACHED */
! 404: }
! 405:
! 406:
! 407: char *
! 408: mdoc_vol2a(enum mdoc_vol vol)
! 409: {
! 410:
! 411: switch (vol) {
! 412: case (VOL_AMD):
! 413: return("OpenBSD Ancestral Manual Documents");
! 414: case (VOL_IND):
! 415: return("OpenBSD Manual Master Index");
! 416: case (VOL_KM):
! 417: return("OpenBSD Kernel Manual");
! 418: case (VOL_LOCAL):
! 419: return("OpenBSD Local Manual");
! 420: case (VOL_PRM):
! 421: return("OpenBSD Programmer's Manual");
! 422: case (VOL_PS1):
! 423: return("OpenBSD Programmer's Supplementary Documents");
! 424: case (VOL_SMM):
! 425: return("OpenBSD System Manager's Manual");
! 426: case (VOL_URM):
! 427: return("OpenBSD Reference Manual");
! 428: case (VOL_USD):
! 429: return("OpenBSD User's Supplementary Documents");
! 430: case (VOL_DEFAULT):
! 431: return(NULL);
! 432: default:
! 433: break;
! 434: }
! 435:
! 436: abort();
! 437: /* NOTREACHED */
! 438: }
! 439:
! 440:
! 441: char *
! 442: mdoc_msec2a(enum mdoc_msec msec)
! 443: {
! 444:
! 445: switch (msec) {
! 446: case(MSEC_1):
! 447: return("1");
! 448: case(MSEC_2):
! 449: return("2");
! 450: case(MSEC_3):
! 451: return("3");
! 452: case(MSEC_3f):
! 453: return("3f");
! 454: case(MSEC_3p):
! 455: return("3p");
! 456: case(MSEC_4):
! 457: return("4");
! 458: case(MSEC_5):
! 459: return("5");
! 460: case(MSEC_6):
! 461: return("6");
! 462: case(MSEC_7):
! 463: return("7");
! 464: case(MSEC_8):
! 465: return("8");
! 466: case(MSEC_9):
! 467: return("9");
! 468: case(MSEC_X11):
! 469: return("X11");
! 470: case(MSEC_X11R6):
! 471: return("X11R6");
! 472: case(MSEC_local):
! 473: return("local");
! 474: case(MSEC_n):
! 475: return("n");
! 476: case(MSEC_unass):
! 477: /* FALLTHROUGH */
! 478: case(MSEC_draft):
! 479: return("draft");
! 480: case(MSEC_paper):
! 481: return("paper");
! 482: case(MSEC_DEFAULT):
! 483: return(NULL);
! 484: default:
! 485: break;
! 486: }
! 487:
! 488: abort();
! 489: /* NOTREACHED */
! 490: }
! 491:
CVSweb