===================================================================
RCS file: /cvs/mandoc/Attic/strings.c,v
retrieving revision 1.9
retrieving revision 1.19
diff -u -p -r1.9 -r1.19
--- mandoc/Attic/strings.c	2009/01/17 16:15:27	1.9
+++ mandoc/Attic/strings.c	2009/02/25 12:32:50	1.19
@@ -1,4 +1,4 @@
-/* $Id: strings.c,v 1.9 2009/01/17 16:15:27 kristaps Exp $ */
+/* $Id: strings.c,v 1.19 2009/02/25 12:32:50 kristaps Exp $ */
 /*
  * Copyright (c) 2008 Kristaps Dzonsons <kristaps@kth.se>
  *
@@ -21,16 +21,66 @@
 #include <stdlib.h>
 #include <stdio.h>
 #include <string.h>
-#ifdef __linux__
+#ifndef __OpenBSD__
 #include <time.h>
 #endif
 
+/*
+ * Convert scalars to and from string format.
+ */
+
 #include "private.h"
 
 #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 ('-'):
+		/* FALLTHROUGH */
+	case (' '):
+		/* FALLTHROUGH */
+	case ('&'):
+		/* FALLTHROUGH */
+	case ('.'):
+		/* FALLTHROUGH */
+	case ('e'):
+		return(2);
+	case ('('):
+		if (0 == *++p || ! isgraph((int)*p))
+			return(0);
+		if (0 == *++p || ! isgraph((int)*p))
+			return(0);
+		return(4);
+	case ('['):
+		break;
+	default:
+		return(0);
+	}
+
+	for (c = 3, p++; *p && ']' != *p; p++, c++)
+		if ( ! isgraph((int)*p))
+			break;
+
+	return(*p == ']' ? c : 0);
+}
+
+
 int
 mdoc_iscdelim(char p)
 {
@@ -124,13 +174,19 @@ time_t
 mdoc_atotime(const char *p)
 {
 	struct tm	 tm;
+	char		*pp;
 
 	(void)memset(&tm, 0, sizeof(struct tm));
 
-	if (0 == strptime(p, "%b %d %Y", &tm))
+	if (xstrcmp(p, "$Mdocdate: February 25 2009 $"))
+		return(time(NULL));
+	if ((pp = strptime(p, "$Mdocdate: February 25 2009 $", &tm)) && 0 == *pp)
 		return(mktime(&tm));
-	if (0 == strptime(p, "%b %d, %Y", &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);
 }
@@ -327,4 +383,346 @@ mdoc_type2a(enum mdoc_type type)
 
 	abort();
 	/* NOTREACHED */
+}
+
+
+const char *
+mdoc_arch2a(enum mdoc_arch arch)
+{
+
+	switch (arch) {
+	case (ARCH_alpha):
+		return("Alpha");
+	case (ARCH_amd64):
+		return("AMD64");
+	case (ARCH_amiga):
+		return("Amiga");
+	case (ARCH_arc):
+		return("ARC");
+	case (ARCH_arm):
+		return("ARM");
+	case (ARCH_armish):
+		return("ARMISH");
+	case (ARCH_aviion):
+		return("AViion");
+	case (ARCH_hp300):
+		return("HP300");
+	case (ARCH_hppa):
+		return("HPPA");
+	case (ARCH_hppa64):
+		return("HPPA64");
+	case (ARCH_i386):
+		return("i386");
+	case (ARCH_landisk):
+		return("LANDISK");
+	case (ARCH_luna88k):
+		return("Luna88k");
+	case (ARCH_mac68k):
+		return("Mac68k");
+	case (ARCH_macppc):
+		return("MacPPC");
+	case (ARCH_mvme68k):
+		return("MVME68k");
+	case (ARCH_mvme88k):
+		return("MVME88k");
+	case (ARCH_mvmeppc):
+		return("MVMEPPC");
+	case (ARCH_pmax):
+		return("PMAX");
+	case (ARCH_sgi):
+		return("SGI");
+	case (ARCH_socppc):
+		return("SOCPPC");
+	case (ARCH_sparc):
+		return("SPARC");
+	case (ARCH_sparc64):
+		return("SPARC64");
+	case (ARCH_sun3):
+		return("Sun3");
+	case (ARCH_vax):
+		return("VAX");
+	case (ARCH_zaurus):
+		return("Zaurus");
+	case (ARCH_DEFAULT):
+		return(NULL);
+	default:
+		break;
+	}
+
+	abort();
+	/* NOTREACHED */
+}
+
+
+const char *
+mdoc_vol2a(enum mdoc_vol vol)
+{
+
+	switch (vol) {
+	case (VOL_AMD):
+		return("OpenBSD Ancestral Manual Documents");
+	case (VOL_IND):
+		return("OpenBSD Manual Master Index");
+	case (VOL_KM):
+		return("OpenBSD Kernel Manual");
+	case (VOL_LOCAL):
+		return("OpenBSD Local Manual");
+	case (VOL_PRM):
+		return("OpenBSD Programmer's Manual");
+	case (VOL_PS1):
+		return("OpenBSD Programmer's Supplementary Documents");
+	case (VOL_SMM):
+		return("OpenBSD System Manager's Manual");
+	case (VOL_URM):
+		return("OpenBSD Reference Manual");
+	case (VOL_USD):
+		return("OpenBSD User's Supplementary Documents");
+	case (VOL_DEFAULT):
+		return(NULL);
+	default:
+		break;
+	}
+
+	abort();
+	/* NOTREACHED */
+}
+
+
+const char *
+mdoc_msec2a(enum mdoc_msec msec)
+{
+
+	switch (msec) {
+	case(MSEC_1):
+		return("1");
+	case(MSEC_2):
+		return("2");
+	case(MSEC_3):
+		return("3");
+	case(MSEC_3f):
+		return("3f");
+	case(MSEC_3p):
+		return("3p");
+	case(MSEC_4):
+		return("4");
+	case(MSEC_5):
+		return("5");
+	case(MSEC_6):
+		return("6");
+	case(MSEC_7):
+		return("7");
+	case(MSEC_8):
+		return("8");
+	case(MSEC_9):
+		return("9");
+	case(MSEC_X11):
+		return("X11");
+	case(MSEC_X11R6):
+		return("X11R6");
+	case(MSEC_local):
+		return("local");
+	case(MSEC_n):
+		return("n");
+	case(MSEC_unass):
+		/* FALLTHROUGH */
+	case(MSEC_draft):
+		return("draft");
+	case(MSEC_paper):
+		return("paper");
+	case(MSEC_DEFAULT):
+		return(NULL);
+	default:
+		break;
+	}
+
+	abort();
+	/* NOTREACHED */
+}
+
+
+const char *
+mdoc_st2a(int c)
+{
+	char		 *p;
+
+	switch (c) {
+	case(MDOC_p1003_1_88):
+		p = "IEEE Std 1003.1-1988 (\\(lqPOSIX\\(rq)";
+		break;
+	case(MDOC_p1003_1_90):
+		p = "IEEE Std 1003.1-1990 (\\(lqPOSIX\\(rq)";
+		break;
+	case(MDOC_p1003_1_96):
+		p = "ISO/IEC 9945-1:1996 (\\(lqPOSIX\\(rq)";
+		break;
+	case(MDOC_p1003_1_2001):
+		p = "IEEE Std 1003.1-2001 (\\(lqPOSIX\\(rq)";
+		break;
+	case(MDOC_p1003_1_2004):
+		p = "IEEE Std 1003.1-2004 (\\(lqPOSIX\\(rq)";
+		break;
+	case(MDOC_p1003_1):
+		p = "IEEE Std 1003.1 (\\(lqPOSIX\\(rq)";
+		break;
+	case(MDOC_p1003_1b):
+		p = "IEEE Std 1003.1b (\\(lqPOSIX\\(rq)";
+		break;
+	case(MDOC_p1003_1b_93):
+		p = "IEEE Std 1003.1b-1993 (\\(lqPOSIX\\(rq)";
+		break;
+	case(MDOC_p1003_1c_95):
+		p = "IEEE Std 1003.1c-1995 (\\(lqPOSIX\\(rq)";
+		break;
+	case(MDOC_p1003_1g_2000):
+		p = "IEEE Std 1003.1g-2000 (\\(lqPOSIX\\(rq)";
+		break;
+	case(MDOC_p1003_2_92):
+		p = "IEEE Std 1003.2-1992 (\\(lqPOSIX.2\\(rq)";
+		break;
+	case(MDOC_p1387_2_95):
+		p = "IEEE Std 1387.2-1995 (\\(lqPOSIX.7.2\\(rq)";
+		break;
+	case(MDOC_p1003_2):
+		p = "IEEE Std 1003.2 (\\(lqPOSIX.2\\(rq)";
+		break;
+	case(MDOC_p1387_2):
+		p = "IEEE Std 1387.2 (\\(lqPOSIX.7.2\\(rq)";
+		break;
+	case(MDOC_isoC_90):
+		p = "ISO/IEC 9899:1990 (\\(lqISO C90\\(rq)";
+		break;
+	case(MDOC_isoC_amd1):
+		p = "ISO/IEC 9899/AMD1:1995 (\\(lqISO C90\\(rq)";
+		break;
+	case(MDOC_isoC_tcor1):
+		p = "ISO/IEC 9899/TCOR1:1994 (\\(lqISO C90\\(rq)";
+		break;
+	case(MDOC_isoC_tcor2):
+		p = "ISO/IEC 9899/TCOR2:1995 (\\(lqISO C90\\(rq)";
+		break;
+	case(MDOC_isoC_99):
+		p = "ISO/IEC 9899:1999 (\\(lqISO C99\\(rq)";
+		break;
+	case(MDOC_ansiC):
+		p = "ANSI X3.159-1989 (\\(lqANSI C\\(rq)";
+		break;
+	case(MDOC_ansiC_89):
+		p = "ANSI X3.159-1989 (\\(lqANSI C\\(rq)";
+		break;
+	case(MDOC_ansiC_99):
+		p = "ANSI/ISO/IEC 9899-1999 (\\(lqANSI C99\\(rq)";
+		break;
+	case(MDOC_ieee754):
+		p = "IEEE Std 754-1985";
+		break;
+	case(MDOC_iso8802_3):
+		p = "ISO 8802-3: 1989";
+		break;
+	case(MDOC_xpg3):
+		p = "X/Open Portability Guide Issue 3 "
+			"(\\(lqXPG3\\(rq)";
+		break;
+	case(MDOC_xpg4):
+		p = "X/Open Portability Guide Issue 4 "
+			"(\\(lqXPG4\\(rq)";
+		break;
+	case(MDOC_xpg4_2):
+		p = "X/Open Portability Guide Issue 4.2 "
+			"(\\(lqXPG4.2\\(rq)";
+		break;
+	case(MDOC_xpg4_3):
+		p = "X/Open Portability Guide Issue 4.3 "
+			"(\\(lqXPG4.3\\(rq)";
+		break;
+	case(MDOC_xbd5):
+		p = "X/Open System Interface Definitions Issue 5 "
+			"(\\(lqXBD5\\(rq)";
+		break;
+	case(MDOC_xcu5):
+		p = "X/Open Commands and Utilities Issue 5 "
+			"(\\(lqXCU5\\(rq)";
+		break;
+	case(MDOC_xsh5):
+		p = "X/Open System Interfaces and Headers Issue 5 "
+			"(\\(lqXSH5\\(rq)";
+		break;
+	case(MDOC_xns5):
+		p = "X/Open Networking Services Issue 5 "
+			"(\\(lqXNS5\\(rq)";
+		break;
+	case(MDOC_xns5_2d2_0):
+		p = "X/Open Networking Services Issue 5.2 Draft 2.0 "
+			"(\\(lqXNS5.2D2.0\\(rq)";
+		break;
+	case(MDOC_xcurses4_2):
+		p = "X/Open Curses Issue 4 Version 2 "
+			"(\\(lqXCURSES4.2\\(rq)";
+		break;
+	case(MDOC_susv2):
+		p = "Version 2 of the Single UNIX Specification";
+		break;
+	case(MDOC_susv3):
+		p = "Version 3 of the Single UNIX Specification";
+		break;
+	case(MDOC_svid4):
+		p = "System V Interface Definition, Fourth Edition "
+			"(\\(lqSVID4\\(rq)";
+		break;
+	default:
+		p = NULL;
+		break;
+	}
+
+	return(p);
+}
+
+
+const char *
+mdoc_att2a(enum mdoc_att c)
+{
+	char		*p;
+	
+	switch (c) {
+	case(ATT_v1):
+		p = "Version 1 AT&T UNIX";
+		break;
+	case(ATT_v2):
+		p = "Version 2 AT&T UNIX";
+		break;
+	case(ATT_v3):
+		p = "Version 3 AT&T UNIX";
+		break;
+	case(ATT_v4):
+		p = "Version 4 AT&T UNIX";
+		break;
+	case(ATT_v5):
+		p = "Version 5 AT&T UNIX";
+		break;
+	case(ATT_v6):
+		p = "Version 6 AT&T UNIX";
+		break;
+	case(ATT_v7):
+		p = "Version 7 AT&T UNIX";
+		break;
+	case(ATT_32v):
+		p = "Version 32V AT&T UNIX";
+		break;
+	case(ATT_V1):
+		p = "AT&T System V.1 UNIX";
+		break;
+	case(ATT_V2):
+		p = "AT&T System V.2 UNIX";
+		break;
+	case(ATT_V3):
+		p = "AT&T System V.3 UNIX";
+		break;
+	case(ATT_V4):
+		p = "AT&T System V.4 UNIX";
+		break;
+	default:
+		p = "AT&T UNIX";
+		break;
+	}
+
+	return(p);
 }