Remove function calls to res() and so forth in term_word(). These were

[mandoc.git] / chars.c

diff --git a/chars.c b/chars.c
index 5edf947ae1f885e293f64a1e5b232b34ce2283e2..06a2a923f691958889c9142fdfbea4028c03c735 100644 (file)
--- a/chars.c
+++ b/chars.c
@@ -1,6 +1,7 @@
-/*     $Id: chars.c,v 1.31 2011/01/02 10:10:57 kristaps Exp $ */
+/*     $Id: chars.c,v 1.43 2011/05/15 22:29:50 kristaps Exp $ */
 /*
  * Copyright (c) 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv>
+ * Copyright (c) 2011 Ingo Schwarze <schwarze@openbsd.org>
  *
  * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above
@@ -19,12 +20,13 @@
 #endif
 
 #include <assert.h>
+#include <ctype.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
 
 #include "mandoc.h"
-#include "chars.h"
+#include "libmandoc.h"
 
 #define        PRINT_HI         126
 #define        PRINT_LO         32
@@ -40,7 +42,7 @@ struct        ln {
 #define CHARS_BOTH      (CHARS_CHAR | CHARS_STRING)
 };
 
-#define        LINES_MAX         351
+#define        LINES_MAX         353
 
 #define CHAR(in, ch, code) \
        { NULL, (in), (ch), (code), CHARS_CHAR },
@@ -54,32 +56,26 @@ struct      ln {
 
 #include "chars.in"
 
-struct ctab {
-       enum chars        type;
+struct mchars {
        struct ln       **htab;
 };
 
 static inline int        match(const struct ln *,
                                const char *, size_t, int);
-static const struct ln  *find(struct ctab *, const char *, size_t, int);
-
+static const struct ln  *find(struct mchars *, const char *, size_t, int);
 
 void
-chars_free(void *arg)
+mchars_free(struct mchars *arg)
 {
-       struct ctab     *tab;
-
-       tab = (struct ctab *)arg;
 
-       free(tab->htab);
-       free(tab);
+       free(arg->htab);
+       free(arg);
 }
 
-
-void *
-chars_init(enum chars type)
+struct mchars *
+mchars_alloc(void)
 {
-       struct ctab      *tab;
+       struct mchars    *tab;
        struct ln       **htab;
        struct ln        *pp;
        int               i, hash;
@@ -91,17 +87,8 @@ chars_init(enum chars type)
         * (they're in-line re-ordered during lookup).
         */
 
-       tab = malloc(sizeof(struct ctab));
-       if (NULL == tab) {
-               perror(NULL);
-               exit((int)MANDOCLEVEL_SYSERR);
-       }
-
-       htab = calloc(PRINT_HI - PRINT_LO + 1, sizeof(struct ln **));
-       if (NULL == htab) {
-               perror(NULL);
-               exit((int)MANDOCLEVEL_SYSERR);
-       }
+       tab = mandoc_malloc(sizeof(struct mchars));
+       htab = mandoc_calloc(PRINT_HI - PRINT_LO + 1, sizeof(struct ln **));
 
        for (i = 0; i < LINES_MAX; i++) {
                hash = (int)lines[i].code[0] - PRINT_LO;
@@ -117,7 +104,6 @@ chars_init(enum chars type)
        }
 
        tab->htab = htab;
-       tab->type = type;
        return(tab);
 }
 
@@ -126,11 +112,11 @@ chars_init(enum chars type)
  * Special character to Unicode codepoint.
  */
 int
-chars_spec2cp(void *arg, const char *p, size_t sz)
+mchars_spec2cp(struct mchars *arg, const char *p, size_t sz)
 {
        const struct ln *ln;
 
-       ln = find((struct ctab *)arg, p, sz, CHARS_CHAR);
+       ln = find(arg, p, sz, CHARS_CHAR);
        if (NULL == ln)
                return(-1);
        return(ln->unicode);
@@ -141,26 +127,43 @@ chars_spec2cp(void *arg, const char *p, size_t sz)
  * Reserved word to Unicode codepoint.
  */
 int
-chars_res2cp(void *arg, const char *p, size_t sz)
+mchars_res2cp(struct mchars *arg, const char *p, size_t sz)
 {
        const struct ln *ln;
 
-       ln = find((struct ctab *)arg, p, sz, CHARS_STRING);
+       ln = find(arg, p, sz, CHARS_STRING);
        if (NULL == ln)
                return(-1);
        return(ln->unicode);
 }
 
+/*
+ * Numbered character to literal character.
+ * This can only be a printable character (i.e., alnum, punct, space) so
+ * prevent the character from ruining our state (backspace, newline, and
+ * so on).
+ * If the character is illegal, returns '\0'.
+ */
+char
+mchars_num2char(const char *p, size_t sz)
+{
+       int               i;
+
+       if ((i = mandoc_strntou(p, sz, 10)) < 0)
+               return('\0');
+
+       return(isprint(i) ? i : '\0');
+}
 
 /* 
  * Special character to string array.
  */
 const char *
-chars_spec2str(void *arg, const char *p, size_t sz, size_t *rsz)
+mchars_spec2str(struct mchars *arg, const char *p, size_t sz, size_t *rsz)
 {
        const struct ln *ln;
 
-       ln = find((struct ctab *)arg, p, sz, CHARS_CHAR);
+       ln = find(arg, p, sz, CHARS_CHAR);
        if (NULL == ln)
                return(NULL);
 
@@ -168,16 +171,15 @@ chars_spec2str(void *arg, const char *p, size_t sz, size_t *rsz)
        return(ln->ascii);
 }
 
-
 /* 
  * Reserved word to string array.
  */
 const char *
-chars_res2str(void *arg, const char *p, size_t sz, size_t *rsz)
+mchars_res2str(struct mchars *arg, const char *p, size_t sz, size_t *rsz)
 {
        const struct ln *ln;
 
-       ln = find((struct ctab *)arg, p, sz, CHARS_STRING);
+       ln = find(arg, p, sz, CHARS_STRING);
        if (NULL == ln)
                return(NULL);
 
@@ -185,9 +187,8 @@ chars_res2str(void *arg, const char *p, size_t sz, size_t *rsz)
        return(ln->ascii);
 }
 
-
 static const struct ln *
-find(struct ctab *tab, const char *p, size_t sz, int type)
+find(struct mchars *tab, const char *p, size_t sz, int type)
 {
        struct ln        *pp, *prev;
        struct ln       **htab;
@@ -230,7 +231,6 @@ find(struct ctab *tab, const char *p, size_t sz, int type)
        return(NULL);
 }
 
-
 static inline int
 match(const struct ln *ln, const char *p, size_t sz, int type)
 {