===================================================================
RCS file: /cvs/mandoc/chars.c,v
retrieving revision 1.15
retrieving revision 1.31
diff -u -p -r1.15 -r1.31
--- mandoc/chars.c	2010/01/05 19:51:10	1.15
+++ mandoc/chars.c	2011/01/02 10:10:57	1.31
@@ -1,6 +1,6 @@
-/*	$Id: chars.c,v 1.15 2010/01/05 19:51:10 kristaps Exp $ */
+/*	$Id: chars.c,v 1.31 2011/01/02 10:10:57 kristaps Exp $ */
 /*
- * Copyright (c) 2009 Kristaps Dzonsons <kristaps@kth.se>
+ * Copyright (c) 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv>
  *
  * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above
@@ -23,6 +23,7 @@
 #include <stdlib.h>
 #include <string.h>
 
+#include "mandoc.h"
 #include "chars.h"
 
 #define	PRINT_HI	 126
@@ -32,47 +33,43 @@ struct	ln {
 	struct ln	 *next;
 	const char	 *code;
 	const char	 *ascii;
-	const char	 *html;
-	size_t		  codesz;
-	size_t		  asciisz;
-	size_t		  htmlsz;
+	int		  unicode;
 	int		  type;
 #define	CHARS_CHAR	 (1 << 0)
 #define	CHARS_STRING	 (1 << 1)
 #define CHARS_BOTH	 (CHARS_CHAR | CHARS_STRING)
 };
 
-#define	LINES_MAX	  350
+#define	LINES_MAX	  351
 
-#define CHAR(w, x, y, z, a, b) \
-	{ NULL, (w), (y), (a), (x), (z), (b), CHARS_CHAR },
-#define STRING(w, x, y, z, a, b) \
-	{ NULL, (w), (y), (a), (x), (z), (b), CHARS_STRING },
-#define BOTH(w, x, y, z, a, b) \
-	{ NULL, (w), (y), (a), (x), (z), (b), CHARS_BOTH },
+#define CHAR(in, ch, code) \
+	{ NULL, (in), (ch), (code), CHARS_CHAR },
+#define STRING(in, ch, code) \
+	{ NULL, (in), (ch), (code), CHARS_STRING },
+#define BOTH(in, ch, code) \
+	{ NULL, (in), (ch), (code), CHARS_BOTH },
 
 #define	CHAR_TBL_START	  static struct ln lines[LINES_MAX] = {
 #define	CHAR_TBL_END	  };
 
 #include "chars.in"
 
-struct	tbl {
+struct	ctab {
 	enum chars	  type;
 	struct ln	**htab;
 };
 
 static	inline int	  match(const struct ln *,
 				const char *, size_t, int);
-static	const char	 *find(struct tbl *, const char *, 
-				size_t, size_t *, int);
+static	const struct ln	 *find(struct ctab *, const char *, size_t, int);
 
 
 void
 chars_free(void *arg)
 {
-	struct tbl	*tab;
+	struct ctab	*tab;
 
-	tab = (struct tbl *)arg;
+	tab = (struct ctab *)arg;
 
 	free(tab->htab);
 	free(tab);
@@ -82,7 +79,7 @@ chars_free(void *arg)
 void *
 chars_init(enum chars type)
 {
-	struct tbl	 *tab;
+	struct ctab	 *tab;
 	struct ln	**htab;
 	struct ln	 *pp;
 	int		  i, hash;
@@ -94,16 +91,16 @@ chars_init(enum chars type)
 	 * (they're in-line re-ordered during lookup).
 	 */
 
-	tab = malloc(sizeof(struct tbl));
+	tab = malloc(sizeof(struct ctab));
 	if (NULL == tab) {
 		perror(NULL);
-		exit(EXIT_FAILURE);
+		exit((int)MANDOCLEVEL_SYSERR);
 	}
 
 	htab = calloc(PRINT_HI - PRINT_LO + 1, sizeof(struct ln **));
 	if (NULL == htab) {
 		perror(NULL);
-		exit(EXIT_FAILURE);
+		exit((int)MANDOCLEVEL_SYSERR);
 	}
 
 	for (i = 0; i < LINES_MAX; i++) {
@@ -125,31 +122,80 @@ chars_init(enum chars type)
 }
 
 
+/* 
+ * Special character to Unicode codepoint.
+ */
+int
+chars_spec2cp(void *arg, const char *p, size_t sz)
+{
+	const struct ln	*ln;
+
+	ln = find((struct ctab *)arg, p, sz, CHARS_CHAR);
+	if (NULL == ln)
+		return(-1);
+	return(ln->unicode);
+}
+
+
+/* 
+ * Reserved word to Unicode codepoint.
+ */
+int
+chars_res2cp(void *arg, const char *p, size_t sz)
+{
+	const struct ln	*ln;
+
+	ln = find((struct ctab *)arg, p, sz, CHARS_STRING);
+	if (NULL == ln)
+		return(-1);
+	return(ln->unicode);
+}
+
+
+/* 
+ * Special character to string array.
+ */
 const char *
-chars_a2ascii(void *arg, const char *p, size_t sz, size_t *rsz)
+chars_spec2str(void *arg, const char *p, size_t sz, size_t *rsz)
 {
+	const struct ln	*ln;
 
-	return(find((struct tbl *)arg, p, sz, rsz, CHARS_CHAR));
+	ln = find((struct ctab *)arg, p, sz, CHARS_CHAR);
+	if (NULL == ln)
+		return(NULL);
+
+	*rsz = strlen(ln->ascii);
+	return(ln->ascii);
 }
 
 
+/* 
+ * Reserved word to string array.
+ */
 const char *
-chars_a2res(void *arg, const char *p, size_t sz, size_t *rsz)
+chars_res2str(void *arg, const char *p, size_t sz, size_t *rsz)
 {
+	const struct ln	*ln;
 
-	return(find((struct tbl *)arg, p, sz, rsz, CHARS_STRING));
+	ln = find((struct ctab *)arg, p, sz, CHARS_STRING);
+	if (NULL == ln)
+		return(NULL);
+
+	*rsz = strlen(ln->ascii);
+	return(ln->ascii);
 }
 
 
-static const char *
-find(struct tbl *tab, const char *p, size_t sz, size_t *rsz, int type)
+static const struct ln *
+find(struct ctab *tab, const char *p, size_t sz, int type)
 {
 	struct ln	 *pp, *prev;
 	struct ln	**htab;
 	int		  hash;
 
 	assert(p);
-	assert(sz > 0);
+	if (0 == sz)
+		return(NULL);
 
 	if (p[0] < PRINT_LO || p[0] > PRINT_HI)
 		return(NULL);
@@ -166,18 +212,6 @@ find(struct tbl *tab, const char *p, size_t sz, size_t
 	if (NULL == (pp = htab[hash]))
 		return(NULL);
 
-	if (NULL == pp->next) {
-		if ( ! match(pp, p, sz, type)) 
-			return(NULL);
-
-		if (CHARS_HTML == tab->type) {
-			*rsz = pp->htmlsz;
-			return(pp->html);
-		}
-		*rsz = pp->asciisz;
-		return(pp->ascii);
-	}
-
 	for (prev = NULL; pp; pp = pp->next) {
 		if ( ! match(pp, p, sz, type)) {
 			prev = pp;
@@ -190,12 +224,7 @@ find(struct tbl *tab, const char *p, size_t sz, size_t
 			htab[hash] = pp;
 		}
 
-		if (CHARS_HTML == tab->type) {
-			*rsz = pp->htmlsz;
-			return(pp->html);
-		}
-		*rsz = pp->asciisz;
-		return(pp->ascii);
+		return(pp);
 	}
 
 	return(NULL);
@@ -208,7 +237,7 @@ match(const struct ln *ln, const char *p, size_t sz, i
 
 	if ( ! (ln->type & type))
 		return(0);
-	if (ln->codesz != sz)
+	if (strncmp(ln->code, p, sz))
 		return(0);
-	return(0 == strncmp(ln->code, p, sz));
+	return('\0' == ln->code[(int)sz]);
 }