version 1.193, 2011/05/17 14:38:34 |
version 1.198, 2011/09/18 14:14:15 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2008, 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2010, 2011 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2010, 2011 Ingo Schwarze <schwarze@openbsd.org> |
* |
* |
* Permission to use, copy, modify, and distribute this software for any |
* Permission to use, copy, modify, and distribute this software for any |
|
|
static void adjbuf(struct termp *p, int); |
static void adjbuf(struct termp *p, int); |
static void bufferc(struct termp *, char); |
static void bufferc(struct termp *, char); |
static void encode(struct termp *, const char *, size_t); |
static void encode(struct termp *, const char *, size_t); |
|
static void encode1(struct termp *, int); |
|
|
void |
void |
term_free(struct termp *p) |
term_free(struct termp *p) |
Line 403 term_word(struct termp *p, const char *word) |
|
Line 404 term_word(struct termp *p, const char *word) |
|
{ |
{ |
const char *seq, *cp; |
const char *seq, *cp; |
char c; |
char c; |
int sz; |
int sz, uc; |
size_t ssz; |
size_t ssz; |
enum mandoc_esc esc; |
enum mandoc_esc esc; |
|
|
Line 438 term_word(struct termp *p, const char *word) |
|
Line 439 term_word(struct termp *p, const char *word) |
|
if (ESCAPE_ERROR == esc) |
if (ESCAPE_ERROR == esc) |
break; |
break; |
|
|
|
if (TERMENC_ASCII != p->enc) |
|
switch (esc) { |
|
case (ESCAPE_UNICODE): |
|
uc = mchars_num2uc(seq + 1, sz - 1); |
|
if ('\0' == uc) |
|
break; |
|
encode1(p, uc); |
|
continue; |
|
case (ESCAPE_SPECIAL): |
|
uc = mchars_spec2cp(p->symtab, seq, sz); |
|
if (uc <= 0) |
|
break; |
|
encode1(p, uc); |
|
continue; |
|
default: |
|
break; |
|
} |
|
|
switch (esc) { |
switch (esc) { |
case (ESCAPE_UNICODE): |
case (ESCAPE_UNICODE): |
encode(p, "?", 1); |
encode1(p, '?'); |
break; |
break; |
case (ESCAPE_NUMBERED): |
case (ESCAPE_NUMBERED): |
if ('\0' != (c = mchars_num2char(seq, sz))) |
c = mchars_num2char(seq, sz); |
|
if ('\0' != c) |
encode(p, &c, 1); |
encode(p, &c, 1); |
break; |
break; |
case (ESCAPE_PREDEF): |
|
cp = mchars_res2str(p->symtab, seq, sz, &ssz); |
|
if (NULL != cp) |
|
encode(p, cp, ssz); |
|
break; |
|
case (ESCAPE_SPECIAL): |
case (ESCAPE_SPECIAL): |
cp = mchars_spec2str(p->symtab, seq, sz, &ssz); |
cp = mchars_spec2str(p->symtab, seq, sz, &ssz); |
if (NULL != cp) |
if (NULL != cp) |
Line 464 term_word(struct termp *p, const char *word) |
|
Line 479 term_word(struct termp *p, const char *word) |
|
case (ESCAPE_FONTITALIC): |
case (ESCAPE_FONTITALIC): |
term_fontrepl(p, TERMFONT_UNDER); |
term_fontrepl(p, TERMFONT_UNDER); |
break; |
break; |
|
case (ESCAPE_FONT): |
|
/* FALLTHROUGH */ |
case (ESCAPE_FONTROMAN): |
case (ESCAPE_FONTROMAN): |
term_fontrepl(p, TERMFONT_NONE); |
term_fontrepl(p, TERMFONT_NONE); |
break; |
break; |
Line 503 bufferc(struct termp *p, char c) |
|
Line 520 bufferc(struct termp *p, char c) |
|
p->buf[p->col++] = c; |
p->buf[p->col++] = c; |
} |
} |
|
|
|
/* |
|
* See encode(). |
|
* Do this for a single (probably unicode) value. |
|
* Does not check for non-decorated glyphs. |
|
*/ |
static void |
static void |
|
encode1(struct termp *p, int c) |
|
{ |
|
enum termfont f; |
|
|
|
if (p->col + 4 >= p->maxcols) |
|
adjbuf(p, p->col + 4); |
|
|
|
f = term_fonttop(p); |
|
|
|
if (TERMFONT_NONE == f) { |
|
p->buf[p->col++] = c; |
|
return; |
|
} else if (TERMFONT_UNDER == f) { |
|
p->buf[p->col++] = '_'; |
|
} else |
|
p->buf[p->col++] = c; |
|
|
|
p->buf[p->col++] = 8; |
|
p->buf[p->col++] = c; |
|
} |
|
|
|
static void |
encode(struct termp *p, const char *word, size_t sz) |
encode(struct termp *p, const char *word, size_t sz) |
{ |
{ |
enum termfont f; |
enum termfont f; |
Line 561 term_strlen(const struct termp *p, const char *cp) |
|
Line 605 term_strlen(const struct termp *p, const char *cp) |
|
size_t sz, rsz, i; |
size_t sz, rsz, i; |
int ssz, c; |
int ssz, c; |
const char *seq, *rhs; |
const char *seq, *rhs; |
|
enum mandoc_esc esc; |
static const char rej[] = { '\\', ASCII_HYPH, ASCII_NBRSP, '\0' }; |
static const char rej[] = { '\\', ASCII_HYPH, ASCII_NBRSP, '\0' }; |
|
|
/* |
/* |
Line 579 term_strlen(const struct termp *p, const char *cp) |
|
Line 624 term_strlen(const struct termp *p, const char *cp) |
|
switch (*cp) { |
switch (*cp) { |
case ('\\'): |
case ('\\'): |
cp++; |
cp++; |
rhs = NULL; |
esc = mandoc_escape(&cp, &seq, &ssz); |
switch (mandoc_escape(&cp, &seq, &ssz)) { |
if (ESCAPE_ERROR == esc) |
case (ESCAPE_ERROR): |
|
return(sz); |
return(sz); |
|
|
|
if (TERMENC_ASCII != p->enc) |
|
switch (esc) { |
|
case (ESCAPE_UNICODE): |
|
c = mchars_num2uc |
|
(seq + 1, ssz - 1); |
|
if ('\0' == c) |
|
break; |
|
sz += (*p->width)(p, c); |
|
continue; |
|
case (ESCAPE_SPECIAL): |
|
c = mchars_spec2cp |
|
(p->symtab, seq, ssz); |
|
if (c <= 0) |
|
break; |
|
sz += (*p->width)(p, c); |
|
continue; |
|
default: |
|
break; |
|
} |
|
|
|
rhs = NULL; |
|
|
|
switch (esc) { |
case (ESCAPE_UNICODE): |
case (ESCAPE_UNICODE): |
c = '?'; |
sz += (*p->width)(p, '?'); |
/* FALLTHROUGH */ |
break; |
case (ESCAPE_NUMBERED): |
case (ESCAPE_NUMBERED): |
|
c = mchars_num2char(seq, ssz); |
if ('\0' != c) |
if ('\0' != c) |
c = mchars_num2char(seq, ssz); |
|
if ('\0' != c) |
|
sz += (*p->width)(p, c); |
sz += (*p->width)(p, c); |
break; |
|
case (ESCAPE_PREDEF): |
|
rhs = mchars_res2str |
|
(p->symtab, seq, ssz, &rsz); |
|
break; |
break; |
case (ESCAPE_SPECIAL): |
case (ESCAPE_SPECIAL): |
rhs = mchars_spec2str |
rhs = mchars_spec2str |