version 1.3, 2009/03/20 15:14:01 |
version 1.9, 2009/07/27 12:02:49 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2009 Kristaps Dzonsons <kristaps@openbsd.org> |
* Copyright (c) 2009 Kristaps Dzonsons <kristaps@kth.se> |
* |
* |
* Permission to use, copy, modify, and distribute this software for any |
* Permission to use, copy, modify, and distribute this software for any |
* purpose with or without fee is hereby granted, provided that the |
* purpose with or without fee is hereby granted, provided that the above |
* above copyright notice and this permission notice appear in all |
* copyright notice and this permission notice appear in all copies. |
* copies. |
|
* |
* |
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL |
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES |
* WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED |
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF |
* WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE |
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR |
* AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL |
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES |
* DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR |
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN |
* PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER |
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
* PERFORMANCE OF THIS SOFTWARE. |
|
*/ |
*/ |
#include <assert.h> |
#include <assert.h> |
#include <err.h> |
#include <err.h> |
|
|
#define ASCII_PRINT_HI 126 |
#define ASCII_PRINT_HI 126 |
#define ASCII_PRINT_LO 32 |
#define ASCII_PRINT_LO 32 |
|
|
/* |
|
* Lookup and hashing routines for constructing the ASCII symbol table, |
|
* which should contain a significant portion of mdoc(7)'s special |
|
* symbols. |
|
*/ |
|
|
|
struct line { |
struct line { |
const char *code; |
const char *code; |
const char *out; |
const char *out; |
/* 32- and 64-bit alignment safe. */ |
|
size_t codesz; |
size_t codesz; |
size_t outsz; |
size_t outsz; |
|
int type; |
|
#define ASCII_CHAR (1 << 0) |
|
#define ASCII_STRING (1 << 1) |
|
#define ASCII_BOTH (0x03) |
}; |
}; |
|
|
struct linep { |
struct linep { |
|
|
struct linep *next; |
struct linep *next; |
}; |
}; |
|
|
#define LINE(w, x, y, z) \ |
#define CHAR(w, x, y, z) \ |
{ (w), (y), (x), (z) }, |
{ (w), (y), (x), (z), ASCII_CHAR }, |
|
#define STRING(w, x, y, z) \ |
|
{ (w), (y), (x), (z), ASCII_STRING }, |
|
#define BOTH(w, x, y, z) \ |
|
{ (w), (y), (x), (z), ASCII_BOTH }, |
static const struct line lines[] = { |
static const struct line lines[] = { |
#include "ascii.in" |
#include "ascii.in" |
}; |
}; |
Line 58 struct asciitab { |
|
Line 57 struct asciitab { |
|
|
|
|
|
static inline int match(const struct line *, |
static inline int match(const struct line *, |
const char *, size_t); |
const char *, size_t, int); |
|
static const char * lookup(struct asciitab *, const char *, |
|
size_t, size_t *, int); |
|
|
|
|
void |
void |
Line 92 term_ascii2htab(void) |
|
Line 93 term_ascii2htab(void) |
|
if (NULL == (tab = malloc(sizeof(struct asciitab)))) |
if (NULL == (tab = malloc(sizeof(struct asciitab)))) |
err(1, "malloc"); |
err(1, "malloc"); |
|
|
assert(0 == sizeof(lines) % sizeof(struct line)); |
|
len = sizeof(lines) / sizeof(struct line); |
len = sizeof(lines) / sizeof(struct line); |
|
|
if (NULL == (p = calloc((size_t)len, sizeof(struct linep)))) |
if (NULL == (p = calloc((size_t)len, sizeof(struct linep)))) |
Line 134 term_ascii2htab(void) |
|
Line 134 term_ascii2htab(void) |
|
const char * |
const char * |
term_a2ascii(void *arg, const char *p, size_t sz, size_t *rsz) |
term_a2ascii(void *arg, const char *p, size_t sz, size_t *rsz) |
{ |
{ |
struct asciitab *tab; |
|
|
return(lookup((struct asciitab *)arg, p, |
|
sz, rsz, ASCII_CHAR)); |
|
} |
|
|
|
|
|
const char * |
|
term_a2res(void *arg, const char *p, size_t sz, size_t *rsz) |
|
{ |
|
|
|
return(lookup((struct asciitab *)arg, p, |
|
sz, rsz, ASCII_STRING)); |
|
} |
|
|
|
|
|
static const char * |
|
lookup(struct asciitab *tab, const char *p, |
|
size_t sz, size_t *rsz, int type) |
|
{ |
struct linep *pp, *prev; |
struct linep *pp, *prev; |
void **htab; |
void **htab; |
int hash; |
int hash; |
|
|
tab = (struct asciitab *)arg; |
|
htab = tab->htab; |
|
|
|
assert(p); |
assert(p); |
assert(sz > 0); |
assert(sz > 0); |
assert(p[0] >= ASCII_PRINT_LO && p[0] <= ASCII_PRINT_HI); |
|
|
|
|
if (p[0] < ASCII_PRINT_LO || p[0] > ASCII_PRINT_HI) |
|
return(NULL); |
|
|
|
|
/* |
/* |
* Lookup the symbol in the symbol hash. See ascii2htab for the |
* Lookup the symbol in the symbol hash. See ascii2htab for the |
* hashtable specs. This dynamically re-orders the hash chain |
* hashtable specs. This dynamically re-orders the hash chain |
Line 153 term_a2ascii(void *arg, const char *p, size_t sz, size |
|
Line 171 term_a2ascii(void *arg, const char *p, size_t sz, size |
|
*/ |
*/ |
|
|
hash = (int)p[0] - ASCII_PRINT_LO; |
hash = (int)p[0] - ASCII_PRINT_LO; |
|
htab = tab->htab; |
|
|
if (NULL == (pp = ((struct linep **)htab)[hash])) |
if (NULL == (pp = ((struct linep **)htab)[hash])) |
return(NULL); |
return(NULL); |
|
|
if (NULL == pp->next) { |
if (NULL == pp->next) { |
if ( ! match(pp->line, p, sz)) |
if ( ! match(pp->line, p, sz, type)) |
return(NULL); |
return(NULL); |
*rsz = pp->line->outsz; |
*rsz = pp->line->outsz; |
return(pp->line->out); |
return(pp->line->out); |
} |
} |
|
|
for (prev = NULL; pp; pp = pp->next) { |
for (prev = NULL; pp; pp = pp->next) { |
if ( ! match(pp->line, p, sz)) { |
if ( ! match(pp->line, p, sz, type)) { |
prev = pp; |
prev = pp; |
continue; |
continue; |
} |
} |
Line 187 term_a2ascii(void *arg, const char *p, size_t sz, size |
|
Line 206 term_a2ascii(void *arg, const char *p, size_t sz, size |
|
|
|
|
|
static inline int |
static inline int |
match(const struct line *line, const char *p, size_t sz) |
match(const struct line *line, const char *p, size_t sz, int type) |
{ |
{ |
|
|
|
if ( ! (line->type & type)) |
|
return(0); |
if (line->codesz != sz) |
if (line->codesz != sz) |
return(0); |
return(0); |
return(0 == strncmp(line->code, p, sz)); |
return(0 == strncmp(line->code, p, sz)); |