version 1.267, 2017/06/07 20:01:19 |
version 1.275, 2018/08/16 13:54:06 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2010-2017 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2010-2018 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 |
* purpose with or without fee is hereby granted, provided that the above |
* purpose with or without fee is hereby granted, provided that the above |
Line 40 static void endline(struct termp *); |
|
Line 40 static void endline(struct termp *); |
|
|
|
|
|
void |
void |
|
term_setcol(struct termp *p, size_t maxtcol) |
|
{ |
|
if (maxtcol > p->maxtcol) { |
|
p->tcols = mandoc_recallocarray(p->tcols, |
|
p->maxtcol, maxtcol, sizeof(*p->tcols)); |
|
p->maxtcol = maxtcol; |
|
} |
|
p->lasttcol = maxtcol - 1; |
|
p->tcol = p->tcols; |
|
} |
|
|
|
void |
term_free(struct termp *p) |
term_free(struct termp *p) |
{ |
{ |
for (p->tcol = p->tcols; p->tcol < p->tcols + p->maxtcol; p->tcol++) |
for (p->tcol = p->tcols; p->tcol < p->tcols + p->maxtcol; p->tcol++) |
Line 104 term_flushln(struct termp *p) |
|
Line 116 term_flushln(struct termp *p) |
|
size_t jhy; /* last hyph before overflow w/r/t j */ |
size_t jhy; /* last hyph before overflow w/r/t j */ |
size_t maxvis; /* output position of visible boundary */ |
size_t maxvis; /* output position of visible boundary */ |
int ntab; /* number of tabs to prepend */ |
int ntab; /* number of tabs to prepend */ |
|
int breakline; /* after this word */ |
|
|
vbl = (p->flags & TERMP_NOPAD) || p->tcol->offset < p->viscol ? |
vbl = (p->flags & TERMP_NOPAD) || p->tcol->offset < p->viscol ? |
0 : p->tcol->offset - p->viscol; |
0 : p->tcol->offset - p->viscol; |
Line 116 term_flushln(struct termp *p) |
|
Line 129 term_flushln(struct termp *p) |
|
p->maxrmargin - p->viscol - vbl : 0; |
p->maxrmargin - p->viscol - vbl : 0; |
vis = vend = 0; |
vis = vend = 0; |
|
|
if (p->lasttcol == 0) |
if ((p->flags & TERMP_MULTICOL) == 0) |
p->tcol->col = 0; |
p->tcol->col = 0; |
while (p->tcol->col < p->lastcol) { |
while (p->tcol->col < p->tcol->lastcol) { |
|
|
/* |
/* |
* Handle literal tab characters: collapse all |
* Handle literal tab characters: collapse all |
Line 126 term_flushln(struct termp *p) |
|
Line 139 term_flushln(struct termp *p) |
|
*/ |
*/ |
|
|
ntab = 0; |
ntab = 0; |
while (p->tcol->col < p->lastcol && |
while (p->tcol->col < p->tcol->lastcol && |
p->tcol->buf[p->tcol->col] == '\t') { |
p->tcol->buf[p->tcol->col] == '\t') { |
vend = term_tab_next(vis); |
vend = term_tab_next(vis); |
vbl += vend - vis; |
vbl += vend - vis; |
Line 143 term_flushln(struct termp *p) |
|
Line 156 term_flushln(struct termp *p) |
|
*/ |
*/ |
|
|
jhy = 0; |
jhy = 0; |
for (j = p->tcol->col; j < p->lastcol; j++) { |
breakline = 0; |
|
for (j = p->tcol->col; j < p->tcol->lastcol; j++) { |
|
if (p->tcol->buf[j] == '\n') { |
|
if ((p->flags & TERMP_BRIND) == 0) |
|
breakline = 1; |
|
continue; |
|
} |
if (p->tcol->buf[j] == ' ' || p->tcol->buf[j] == '\t') |
if (p->tcol->buf[j] == ' ' || p->tcol->buf[j] == '\t') |
break; |
break; |
|
|
Line 178 term_flushln(struct termp *p) |
|
Line 197 term_flushln(struct termp *p) |
|
|
|
if (vend > bp && jhy == 0 && vis > 0 && |
if (vend > bp && jhy == 0 && vis > 0 && |
(p->flags & TERMP_BRNEVER) == 0) { |
(p->flags & TERMP_BRNEVER) == 0) { |
if (p->lasttcol) |
if (p->flags & TERMP_MULTICOL) |
return; |
return; |
|
|
endline(p); |
endline(p); |
Line 206 term_flushln(struct termp *p) |
|
Line 225 term_flushln(struct termp *p) |
|
* Write out the rest of the word. |
* Write out the rest of the word. |
*/ |
*/ |
|
|
for ( ; p->tcol->col < p->lastcol; p->tcol->col++) { |
for ( ; p->tcol->col < p->tcol->lastcol; p->tcol->col++) { |
if (vend > bp && jhy > 0 && p->tcol->col > jhy) |
if (vend > bp && jhy > 0 && p->tcol->col > jhy) |
break; |
break; |
|
if (p->tcol->buf[p->tcol->col] == '\n') |
|
continue; |
if (p->tcol->buf[p->tcol->col] == '\t') |
if (p->tcol->buf[p->tcol->col] == '\t') |
break; |
break; |
if (p->tcol->buf[p->tcol->col] == ' ') { |
if (p->tcol->buf[p->tcol->col] == ' ') { |
j = p->tcol->col; |
j = p->tcol->col; |
while (p->tcol->col < p->lastcol && |
while (p->tcol->col < p->tcol->lastcol && |
p->tcol->buf[p->tcol->col] == ' ') |
p->tcol->buf[p->tcol->col] == ' ') |
p->tcol->col++; |
p->tcol->col++; |
dv = (p->tcol->col - j) * (*p->width)(p, ' '); |
dv = (p->tcol->col - j) * (*p->width)(p, ' '); |
Line 248 term_flushln(struct termp *p) |
|
Line 269 term_flushln(struct termp *p) |
|
p->tcol->buf[p->tcol->col]); |
p->tcol->buf[p->tcol->col]); |
} |
} |
vis = vend; |
vis = vend; |
|
|
|
if (breakline == 0) |
|
continue; |
|
|
|
/* Explicitly requested output line break. */ |
|
|
|
if (p->flags & TERMP_MULTICOL) |
|
return; |
|
|
|
endline(p); |
|
breakline = 0; |
|
vis = vend = 0; |
|
|
|
/* Re-establish indentation. */ |
|
|
|
vbl = p->tcol->offset; |
|
maxvis = p->tcol->rmargin > vbl ? |
|
p->tcol->rmargin - vbl : 0; |
|
bp = !(p->flags & TERMP_NOBREAK) ? maxvis : |
|
p->maxrmargin > vbl ? p->maxrmargin - vbl : 0; |
} |
} |
|
|
/* |
/* |
Line 260 term_flushln(struct termp *p) |
|
Line 301 term_flushln(struct termp *p) |
|
else |
else |
vis = 0; |
vis = 0; |
|
|
p->col = p->lastcol = 0; |
p->col = p->tcol->col = p->tcol->lastcol = 0; |
p->minbl = p->trailspace; |
p->minbl = p->trailspace; |
p->flags &= ~(TERMP_BACKAFTER | TERMP_BACKBEFORE | TERMP_NOPAD); |
p->flags &= ~(TERMP_BACKAFTER | TERMP_BACKBEFORE | TERMP_NOPAD); |
|
|
|
if (p->flags & TERMP_MULTICOL) |
|
return; |
|
|
/* Trailing whitespace is significant in some columns. */ |
/* Trailing whitespace is significant in some columns. */ |
|
|
if (vis && vbl && (TERMP_BRTRSP & p->flags)) |
if (vis && vbl && (TERMP_BRTRSP & p->flags)) |
Line 305 term_newln(struct termp *p) |
|
Line 349 term_newln(struct termp *p) |
|
{ |
{ |
|
|
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
if (p->lastcol || p->viscol) |
if (p->tcol->lastcol || p->viscol) |
term_flushln(p); |
term_flushln(p); |
} |
} |
|
|
Line 472 term_word(struct termp *p, const char *word) |
|
Line 516 term_word(struct termp *p, const char *word) |
|
case ESCAPE_FONTPREV: |
case ESCAPE_FONTPREV: |
term_fontlast(p); |
term_fontlast(p); |
continue; |
continue; |
|
case ESCAPE_BREAK: |
|
bufferc(p, '\n'); |
|
continue; |
case ESCAPE_NOSPACE: |
case ESCAPE_NOSPACE: |
if (p->flags & TERMP_BACKAFTER) |
if (p->flags & TERMP_BACKAFTER) |
p->flags &= ~TERMP_BACKAFTER; |
p->flags &= ~TERMP_BACKAFTER; |
else if (*word == '\0') |
else if (*word == '\0') |
p->flags |= (TERMP_NOSPACE | TERMP_NONEWLINE); |
p->flags |= (TERMP_NOSPACE | TERMP_NONEWLINE); |
continue; |
continue; |
|
case ESCAPE_DEVICE: |
|
if (p->type == TERMTYPE_PDF) |
|
encode(p, "pdf", 3); |
|
else if (p->type == TERMTYPE_PS) |
|
encode(p, "ps", 2); |
|
else if (p->enc == TERMENC_ASCII) |
|
encode(p, "ascii", 5); |
|
else |
|
encode(p, "utf8", 4); |
|
continue; |
case ESCAPE_HORIZ: |
case ESCAPE_HORIZ: |
if (a2roffsu(seq, &su, SCALE_EM) == 0) |
if (*seq == '|') { |
|
seq++; |
|
uc = -p->col; |
|
} else |
|
uc = 0; |
|
if (a2roffsu(seq, &su, SCALE_EM) == NULL) |
continue; |
continue; |
uc = term_hspan(p, &su) / 24; |
uc += term_hen(p, &su); |
if (uc > 0) |
if (uc > 0) |
while (uc-- > 0) |
while (uc-- > 0) |
bufferc(p, ASCII_NBRSP); |
bufferc(p, ASCII_NBRSP); |
Line 500 term_word(struct termp *p, const char *word) |
|
Line 562 term_word(struct termp *p, const char *word) |
|
} |
} |
continue; |
continue; |
case ESCAPE_HLINE: |
case ESCAPE_HLINE: |
if (a2roffsu(seq, &su, SCALE_EM) == 0) |
if ((cp = a2roffsu(seq, &su, SCALE_EM)) == NULL) |
continue; |
continue; |
uc = term_hspan(p, &su) / 24; |
uc = term_hen(p, &su); |
if (uc <= 0) { |
if (uc <= 0) { |
if (p->tcol->rmargin <= p->tcol->offset) |
if (p->tcol->rmargin <= p->tcol->offset) |
continue; |
continue; |
lsz = p->tcol->rmargin - p->tcol->offset; |
lsz = p->tcol->rmargin - p->tcol->offset; |
} else |
} else |
lsz = uc; |
lsz = uc; |
while (sz && |
if (*cp == seq[-1]) |
strchr(" %&()*+-./0123456789:<=>", *seq)) { |
|
seq++; |
|
sz--; |
|
} |
|
if (sz && strchr("cifMmnPpuv", *seq)) { |
|
seq++; |
|
sz--; |
|
} |
|
if (sz == 0) |
|
uc = -1; |
uc = -1; |
else if (*seq == '\\') { |
else if (*cp == '\\') { |
seq++; |
seq = cp + 1; |
esc = mandoc_escape(&seq, &cp, &sz); |
esc = mandoc_escape(&seq, &cp, &sz); |
switch (esc) { |
switch (esc) { |
case ESCAPE_UNICODE: |
case ESCAPE_UNICODE: |
Line 538 term_word(struct termp *p, const char *word) |
|
Line 591 term_word(struct termp *p, const char *word) |
|
break; |
break; |
} |
} |
} else |
} else |
uc = *seq; |
uc = *cp; |
if (uc < 0x20 || (uc > 0x7E && uc < 0xA0)) |
if (uc < 0x20 || (uc > 0x7E && uc < 0xA0)) |
uc = '_'; |
uc = '_'; |
if (p->enc == TERMENC_ASCII) { |
if (p->enc == TERMENC_ASCII) { |
Line 574 term_word(struct termp *p, const char *word) |
|
Line 627 term_word(struct termp *p, const char *word) |
|
} |
} |
} |
} |
/* Trim trailing backspace/blank pair. */ |
/* Trim trailing backspace/blank pair. */ |
if (p->lastcol > 2 && |
if (p->tcol->lastcol > 2 && |
(p->tcol->buf[p->lastcol - 1] == ' ' || |
(p->tcol->buf[p->tcol->lastcol - 1] == ' ' || |
p->tcol->buf[p->lastcol - 1] == '\t')) |
p->tcol->buf[p->tcol->lastcol - 1] == '\t')) |
p->lastcol -= 2; |
p->tcol->lastcol -= 2; |
if (p->col > p->lastcol) |
if (p->col > p->tcol->lastcol) |
p->col = p->lastcol; |
p->col = p->tcol->lastcol; |
continue; |
continue; |
default: |
default: |
continue; |
continue; |
Line 622 bufferc(struct termp *p, char c) |
|
Line 675 bufferc(struct termp *p, char c) |
|
} |
} |
if (p->col + 1 >= p->tcol->maxcols) |
if (p->col + 1 >= p->tcol->maxcols) |
adjbuf(p->tcol, p->col + 1); |
adjbuf(p->tcol, p->col + 1); |
if (p->lastcol <= p->col || (c != ' ' && c != ASCII_NBRSP)) |
if (p->tcol->lastcol <= p->col || (c != ' ' && c != ASCII_NBRSP)) |
p->tcol->buf[p->col] = c; |
p->tcol->buf[p->col] = c; |
if (p->lastcol < ++p->col) |
if (p->tcol->lastcol < ++p->col) |
p->lastcol = p->col; |
p->tcol->lastcol = p->col; |
} |
} |
|
|
/* |
/* |
Line 668 encode1(struct termp *p, int c) |
|
Line 721 encode1(struct termp *p, int c) |
|
p->tcol->buf[p->col++] = c; |
p->tcol->buf[p->col++] = c; |
p->tcol->buf[p->col++] = '\b'; |
p->tcol->buf[p->col++] = '\b'; |
} |
} |
if (p->lastcol <= p->col || (c != ' ' && c != ASCII_NBRSP)) |
if (p->tcol->lastcol <= p->col || (c != ' ' && c != ASCII_NBRSP)) |
p->tcol->buf[p->col] = c; |
p->tcol->buf[p->col] = c; |
if (p->lastcol < ++p->col) |
if (p->tcol->lastcol < ++p->col) |
p->lastcol = p->col; |
p->tcol->lastcol = p->col; |
if (p->flags & TERMP_BACKAFTER) { |
if (p->flags & TERMP_BACKAFTER) { |
p->flags |= TERMP_BACKBEFORE; |
p->flags |= TERMP_BACKBEFORE; |
p->flags &= ~TERMP_BACKAFTER; |
p->flags &= ~TERMP_BACKAFTER; |
Line 697 encode(struct termp *p, const char *word, size_t sz) |
|
Line 750 encode(struct termp *p, const char *word, size_t sz) |
|
isgraph((unsigned char)word[i])) |
isgraph((unsigned char)word[i])) |
encode1(p, word[i]); |
encode1(p, word[i]); |
else { |
else { |
if (p->lastcol <= p->col || |
if (p->tcol->lastcol <= p->col || |
(word[i] != ' ' && word[i] != ASCII_NBRSP)) |
(word[i] != ' ' && word[i] != ASCII_NBRSP)) |
p->tcol->buf[p->col] = word[i]; |
p->tcol->buf[p->col] = word[i]; |
p->col++; |
p->col++; |
Line 714 encode(struct termp *p, const char *word, size_t sz) |
|
Line 767 encode(struct termp *p, const char *word, size_t sz) |
|
} |
} |
} |
} |
} |
} |
if (p->lastcol < p->col) |
if (p->tcol->lastcol < p->col) |
p->lastcol = p->col; |
p->tcol->lastcol = p->col; |
} |
} |
|
|
void |
void |
Line 739 term_setwidth(struct termp *p, const char *wstr) |
|
Line 792 term_setwidth(struct termp *p, const char *wstr) |
|
default: |
default: |
break; |
break; |
} |
} |
if (a2roffsu(wstr, &su, SCALE_MAX)) |
if (a2roffsu(wstr, &su, SCALE_MAX) != NULL) |
width = term_hspan(p, &su); |
width = term_hspan(p, &su); |
else |
else |
iop = 0; |
iop = 0; |
Line 817 term_strlen(const struct termp *p, const char *cp) |
|
Line 870 term_strlen(const struct termp *p, const char *cp) |
|
sz += cond_width(p, uc, &skip); |
sz += cond_width(p, uc, &skip); |
} |
} |
continue; |
continue; |
|
case ESCAPE_DEVICE: |
|
if (p->type == TERMTYPE_PDF) { |
|
rhs = "pdf"; |
|
rsz = 3; |
|
} else if (p->type == TERMTYPE_PS) { |
|
rhs = "ps"; |
|
rsz = 2; |
|
} else if (p->enc == TERMENC_ASCII) { |
|
rhs = "ascii"; |
|
rsz = 5; |
|
} else { |
|
rhs = "utf8"; |
|
rsz = 4; |
|
} |
|
break; |
case ESCAPE_SKIPCHAR: |
case ESCAPE_SKIPCHAR: |
skip = 1; |
skip = 1; |
continue; |
continue; |
Line 928 term_vspan(const struct termp *p, const struct roffsu |
|
Line 996 term_vspan(const struct termp *p, const struct roffsu |
|
} |
} |
|
|
/* |
/* |
* Convert a scaling width to basic units, rounding down. |
* Convert a scaling width to basic units, rounding towards 0. |
*/ |
*/ |
int |
int |
term_hspan(const struct termp *p, const struct roffsu *su) |
term_hspan(const struct termp *p, const struct roffsu *su) |
{ |
{ |
|
|
return (*p->hspan)(p, su); |
return (*p->hspan)(p, su); |
|
} |
|
|
|
/* |
|
* Convert a scaling width to basic units, rounding to closest. |
|
*/ |
|
int |
|
term_hen(const struct termp *p, const struct roffsu *su) |
|
{ |
|
int bu; |
|
|
|
if ((bu = (*p->hspan)(p, su)) >= 0) |
|
return (bu + 11) / 24; |
|
else |
|
return -((-bu + 11) / 24); |
} |
} |