=================================================================== RCS file: /cvs/mandoc/tbl_term.c,v retrieving revision 1.61 retrieving revision 1.62 diff -u -p -r1.61 -r1.62 --- mandoc/tbl_term.c 2018/11/25 19:24:20 1.61 +++ mandoc/tbl_term.c 2018/11/28 04:47:51 1.62 @@ -1,4 +1,4 @@ -/* $Id: tbl_term.c,v 1.61 2018/11/25 19:24:20 schwarze Exp $ */ +/* $Id: tbl_term.c,v 1.62 2018/11/28 04:47:51 schwarze Exp $ */ /* * Copyright (c) 2009, 2011 Kristaps Dzonsons * Copyright (c) 2011-2018 Ingo Schwarze @@ -32,23 +32,114 @@ #define IS_HORIZ(cp) ((cp)->pos == TBL_CELL_HORIZ || \ (cp)->pos == TBL_CELL_DHORIZ) +/* Flags for tbl_hrule(). */ +#define HRULE_DBOX (1 << 0) /* Top and bottom, ASCII mode only. */ +#define HRULE_DATA (1 << 1) /* In the middle of the table. */ +#define HRULE_DOWN (1 << 2) /* Allow downward branches. */ +#define HRULE_UP (1 << 3) /* Allow upward branches. */ +#define HRULE_ENDS (1 << 4) /* Also generate left and right ends. */ + + static size_t term_tbl_len(size_t, void *); static size_t term_tbl_strlen(const char *, void *); static size_t term_tbl_sulen(const struct roffsu *, void *); -static void tbl_char(struct termp *, char, size_t); static void tbl_data(struct termp *, const struct tbl_opts *, const struct tbl_cell *, const struct tbl_dat *, const struct roffcol *); +static void tbl_direct_border(struct termp *, int, size_t); +static void tbl_fill_border(struct termp *, int, size_t); +static void tbl_fill_char(struct termp *, char, size_t); +static void tbl_fill_string(struct termp *, const char *, size_t); +static void tbl_hrule(struct termp *, const struct tbl_span *, int); static void tbl_literal(struct termp *, const struct tbl_dat *, const struct roffcol *); static void tbl_number(struct termp *, const struct tbl_opts *, const struct tbl_dat *, const struct roffcol *); -static void tbl_hrule(struct termp *, const struct tbl_span *, int); static void tbl_word(struct termp *, const struct tbl_dat *); +/* + * The following border-character tables are indexed + * by ternary (3-based) numbers, as opposed to binary or decimal. + * Each ternary digit describes the line width in one direction: + * 0 means no line, 1 single or light line, 2 double or heavy line. + */ + +/* Positional values of the four directions. */ +#define BRIGHT 1 +#define BDOWN 3 +#define BLEFT (3 * 3) +#define BUP (3 * 3 * 3) +#define BHORIZ (BLEFT + BRIGHT) + +/* Code points to use for each combination of widths. */ +static const int borders_utf8[81] = { + 0x0020, 0x2576, 0x257a, /* 000 right */ + 0x2577, 0x250c, 0x250d, /* 001 down */ + 0x257b, 0x250e, 0x250f, /* 002 */ + 0x2574, 0x2500, 0x257c, /* 010 left */ + 0x2510, 0x252c, 0x252e, /* 011 left down */ + 0x2512, 0x2530, 0x2532, /* 012 */ + 0x2578, 0x257e, 0x2501, /* 020 left */ + 0x2511, 0x252d, 0x252f, /* 021 left down */ + 0x2513, 0x2531, 0x2533, /* 022 */ + 0x2575, 0x2514, 0x2515, /* 100 up */ + 0x2502, 0x251c, 0x251d, /* 101 up down */ + 0x257d, 0x251f, 0x2522, /* 102 */ + 0x2518, 0x2534, 0x2536, /* 110 up left */ + 0x2524, 0x253c, 0x253e, /* 111 all */ + 0x2527, 0x2541, 0x2546, /* 112 */ + 0x2519, 0x2535, 0x2537, /* 120 up left */ + 0x2525, 0x253d, 0x253f, /* 121 all */ + 0x252a, 0x2545, 0x2548, /* 122 */ + 0x2579, 0x2516, 0x2517, /* 200 up */ + 0x257f, 0x251e, 0x2521, /* 201 up down */ + 0x2503, 0x2520, 0x2523, /* 202 */ + 0x251a, 0x2538, 0x253a, /* 210 up left */ + 0x2526, 0x2540, 0x2544, /* 211 all */ + 0x2528, 0x2542, 0x254a, /* 212 */ + 0x251b, 0x2539, 0x253b, /* 220 up left */ + 0x2529, 0x2543, 0x2547, /* 221 all */ + 0x252b, 0x2549, 0x254b, /* 222 */ +}; + +/* ASCII approximations for these code points, compatible with groff. */ +static const int borders_ascii[81] = { + ' ', '-', '=', /* 000 right */ + '|', '+', '+', /* 001 down */ + '|', '+', '+', /* 002 */ + '-', '-', '=', /* 010 left */ + '+', '+', '+', /* 011 left down */ + '+', '+', '+', /* 012 */ + '=', '=', '=', /* 020 left */ + '+', '+', '+', /* 021 left down */ + '+', '+', '+', /* 022 */ + '|', '+', '+', /* 100 up */ + '|', '+', '+', /* 101 up down */ + '|', '+', '+', /* 102 */ + '+', '+', '+', /* 110 up left */ + '+', '+', '+', /* 111 all */ + '+', '+', '+', /* 112 */ + '+', '+', '+', /* 120 up left */ + '+', '+', '+', /* 121 all */ + '+', '+', '+', /* 122 */ + '|', '+', '+', /* 200 up */ + '|', '+', '+', /* 201 up down */ + '|', '+', '+', /* 202 */ + '+', '+', '+', /* 210 up left */ + '+', '+', '+', /* 211 all */ + '+', '+', '+', /* 212 */ + '+', '+', '+', /* 220 up left */ + '+', '+', '+', /* 221 all */ + '+', '+', '+', /* 222 */ +}; + +/* Either of the above according to the selected output encoding. */ +static const int *borders_locale; + + static size_t term_tbl_sulen(const struct roffsu *su, void *arg) { @@ -70,15 +161,16 @@ term_tbl_len(size_t sz, void *arg) return term_len((const struct termp *)arg, sz); } + void term_tbl(struct termp *tp, const struct tbl_span *sp) { - const struct tbl_cell *cp, *cpn, *cpp; + const struct tbl_cell *cp, *cpn, *cpp, *cps; const struct tbl_dat *dp; static size_t offset; size_t coloff, tsz; - int ic, horiz, hspans, vert, more; - char fc; + int hspans, ic, more; + int dvert, fc, horiz, line, uvert; /* Inhibit printing of spaces: we do padding ourselves. */ @@ -90,6 +182,9 @@ term_tbl(struct termp *tp, const struct tbl_span *sp) */ if (tp->tbl.cols == NULL) { + borders_locale = tp->enc == TERMENC_UTF8 ? + borders_utf8 : borders_ascii; + tp->tbl.len = term_tbl_len; tp->tbl.slen = term_tbl_strlen; tp->tbl.sulen = term_tbl_sulen; @@ -127,10 +222,11 @@ term_tbl(struct termp *tp, const struct tbl_span *sp) /* Horizontal frame at the start of boxed tables. */ - if (sp->opts->opts & TBL_OPT_DBOX) - tbl_hrule(tp, sp, 3); + if (tp->enc == TERMENC_ASCII && + sp->opts->opts & TBL_OPT_DBOX) + tbl_hrule(tp, sp, HRULE_DBOX | HRULE_ENDS); if (sp->opts->opts & (TBL_OPT_DBOX | TBL_OPT_BOX)) - tbl_hrule(tp, sp, 2); + tbl_hrule(tp, sp, HRULE_DOWN | HRULE_ENDS); } /* Set up the columns. */ @@ -219,30 +315,34 @@ term_tbl(struct termp *tp, const struct tbl_span *sp) /* Print the vertical frame at the start of each row. */ tp->tcol = tp->tcols; - fc = '\0'; - if (sp->layout->vert || - (sp->next != NULL && sp->next->layout->vert && - sp->next->pos == TBL_SPAN_DATA) || - (sp->prev != NULL && sp->prev->layout->vert && - (horiz || (IS_HORIZ(sp->layout->first) && - !IS_HORIZ(sp->prev->layout->first)))) || - sp->opts->opts & (TBL_OPT_BOX | TBL_OPT_DBOX)) - fc = horiz || IS_HORIZ(sp->layout->first) ? '+' : '|'; - else if (horiz && sp->opts->lvert) - fc = '-'; - if (fc != '\0') { + uvert = dvert = sp->opts->opts & TBL_OPT_DBOX ? 2 : + sp->opts->opts & TBL_OPT_BOX ? 1 : 0; + if (sp->pos == TBL_SPAN_DATA && uvert < sp->layout->vert) + uvert = dvert = sp->layout->vert; + if (sp->next != NULL && sp->next->pos == TBL_SPAN_DATA && + dvert < sp->next->layout->vert) + dvert = sp->next->layout->vert; + if (sp->prev != NULL && uvert < sp->prev->layout->vert && + (horiz || (IS_HORIZ(sp->layout->first) && + !IS_HORIZ(sp->prev->layout->first)))) + uvert = sp->prev->layout->vert; + line = sp->pos == TBL_SPAN_DHORIZ || + sp->layout->first->pos == TBL_CELL_DHORIZ ? 2 : + sp->pos == TBL_SPAN_HORIZ || + sp->layout->first->pos == TBL_CELL_HORIZ ? 1 : 0; + fc = BUP * uvert + BDOWN * dvert + BRIGHT * line; + if (uvert > 0 || dvert > 0 || (horiz && sp->opts->lvert)) { (*tp->advance)(tp, tp->tcols->offset); - (*tp->letter)(tp, fc); - tp->viscol = tp->tcol->offset + 1; + tp->viscol = tp->tcol->offset; + tbl_direct_border(tp, fc, 1); } /* Print the data cells. */ more = 0; - if (horiz) { - tbl_hrule(tp, sp, 0); - term_flushln(tp); - } else { + if (horiz) + tbl_hrule(tp, sp, HRULE_DATA | HRULE_DOWN | HRULE_UP); + else { cp = sp->layout->first; cpn = sp->next == NULL ? NULL : sp->next->layout->first; @@ -258,25 +358,27 @@ term_tbl(struct termp *tp, const struct tbl_span *sp) * and advance to next layout cell. */ + uvert = dvert = fc = 0; if (cp != NULL) { - vert = cp->vert; + cps = cp; + while (cps->next != NULL && + cps->next->pos == TBL_CELL_SPAN) + cps = cps->next; + if (sp->pos == TBL_SPAN_DATA) + uvert = dvert = cps->vert; switch (cp->pos) { case TBL_CELL_HORIZ: - fc = '-'; + fc = BHORIZ; break; case TBL_CELL_DHORIZ: - fc = '='; + fc = BHORIZ * 2; break; default: - fc = ' '; break; } - } else { - vert = 0; - fc = ' '; } if (cpp != NULL) { - if (vert == 0 && + if (uvert < cpp->vert && cp != NULL && ((IS_HORIZ(cp) && !IS_HORIZ(cpp)) || @@ -284,19 +386,22 @@ term_tbl(struct termp *tp, const struct tbl_span *sp) cpp->next != NULL && IS_HORIZ(cp->next) && !IS_HORIZ(cpp->next)))) - vert = cpp->vert; + uvert = cpp->vert; cpp = cpp->next; } - if (vert == 0 && - sp->opts->opts & TBL_OPT_ALLBOX) - vert = 1; + if (sp->opts->opts & TBL_OPT_ALLBOX) { + if (uvert == 0) + uvert = 1; + if (dvert == 0) + dvert = 1; + } if (cpn != NULL) { - if (vert == 0) - vert = cpn->vert; + if (dvert == 0 || + (dvert < cpn->vert && + tp->enc == TERMENC_UTF8)) + dvert = cpn->vert; cpn = cpn->next; } - if (cp != NULL) - cp = cp->next; /* * Skip later cells in a span, @@ -306,6 +411,7 @@ term_tbl(struct termp *tp, const struct tbl_span *sp) if (hspans) { hspans--; + cp = cp->next; continue; } if (dp != NULL) { @@ -331,10 +437,13 @@ term_tbl(struct termp *tp, const struct tbl_span *sp) * but not after the last column. */ - if (fc == ' ' && ((vert == 0 && - (cp == NULL || !IS_HORIZ(cp))) || - tp->tcol + 1 == tp->tcols + tp->lasttcol)) + if (fc == 0 && ((uvert == 0 && dvert == 0 && + (cp->next == NULL || + !IS_HORIZ(cp->next))) || + tp->tcol + 1 == tp->tcols + tp->lasttcol)) { + cp = cp->next; continue; + } if (tp->viscol < tp->tcol->rmargin) { (*tp->advance)(tp, tp->tcol->rmargin @@ -342,69 +451,89 @@ term_tbl(struct termp *tp, const struct tbl_span *sp) tp->viscol = tp->tcol->rmargin; } while (tp->viscol < tp->tcol->rmargin + - tp->tbl.cols[ic].spacing / 2) { - (*tp->letter)(tp, fc); - tp->viscol++; - } + tp->tbl.cols[ic].spacing / 2) + tbl_direct_border(tp, fc, 1); if (tp->tcol + 1 == tp->tcols + tp->lasttcol) continue; - if (fc == ' ' && cp != NULL) { + if (cp != NULL) { switch (cp->pos) { case TBL_CELL_HORIZ: - fc = '-'; + fc = BLEFT; break; case TBL_CELL_DHORIZ: - fc = '='; + fc = BLEFT * 2; break; default: + fc = 0; break; } + cp = cp->next; } - if (tp->tbl.cols[ic].spacing) { - (*tp->letter)(tp, fc == ' ' ? '|' : - vert ? '+' : fc); - tp->viscol++; + if (cp != NULL) { + switch (cp->pos) { + case TBL_CELL_HORIZ: + fc += BRIGHT; + break; + case TBL_CELL_DHORIZ: + fc += BRIGHT * 2; + break; + default: + break; + } } + if (tp->tbl.cols[ic].spacing) + tbl_direct_border(tp, fc + + BUP * uvert + BDOWN * dvert, 1); - if (fc != ' ') { + if (tp->enc == TERMENC_UTF8) + uvert = dvert = 0; + + if (fc != 0) { if (cp != NULL && cp->pos == TBL_CELL_HORIZ) - fc = '-'; + fc = BHORIZ; else if (cp != NULL && cp->pos == TBL_CELL_DHORIZ) - fc = '='; + fc = BHORIZ * 2; else - fc = ' '; + fc = 0; } if (tp->tbl.cols[ic].spacing > 2 && - (vert > 1 || fc != ' ')) { - (*tp->letter)(tp, fc == ' ' ? '|' : - vert > 1 ? '+' : fc); - tp->viscol++; - } + (uvert > 1 || dvert > 1 || fc != 0)) + tbl_direct_border(tp, fc + + BUP * (uvert > 1) + + BDOWN * (dvert > 1), 1); } } /* Print the vertical frame at the end of each row. */ - fc = '\0'; - if ((sp->layout->last->vert && - sp->layout->last->col + 1 == sp->opts->cols) || - (sp->next != NULL && - sp->next->layout->last->vert && - sp->next->layout->last->col + 1 == sp->opts->cols) || - (sp->prev != NULL && - sp->prev->layout->last->vert && - sp->prev->layout->last->col + 1 == sp->opts->cols && - (horiz || (IS_HORIZ(sp->layout->last) && - !IS_HORIZ(sp->prev->layout->last)))) || - (sp->opts->opts & (TBL_OPT_BOX | TBL_OPT_DBOX))) - fc = horiz || IS_HORIZ(sp->layout->last) ? '+' : '|'; - else if (horiz && sp->opts->rvert) - fc = '-'; - if (fc != '\0') { + uvert = dvert = sp->opts->opts & TBL_OPT_DBOX ? 2 : + sp->opts->opts & TBL_OPT_BOX ? 1 : 0; + if (sp->pos == TBL_SPAN_DATA && + uvert < sp->layout->last->vert && + sp->layout->last->col + 1 == sp->opts->cols) + uvert = dvert = sp->layout->last->vert; + if (sp->next != NULL && + dvert < sp->next->layout->last->vert && + sp->next->layout->last->col + 1 == sp->opts->cols) + dvert = sp->next->layout->last->vert; + if (sp->prev != NULL && + uvert < sp->prev->layout->last->vert && + sp->prev->layout->last->col + 1 == sp->opts->cols && + (horiz || (IS_HORIZ(sp->layout->last) && + !IS_HORIZ(sp->prev->layout->last)))) + uvert = sp->prev->layout->last->vert; + line = sp->pos == TBL_SPAN_DHORIZ || + (sp->layout->last->pos == TBL_CELL_DHORIZ && + sp->layout->last->col + 1 == sp->opts->cols) ? 2 : + sp->pos == TBL_SPAN_HORIZ || + (sp->layout->last->pos == TBL_CELL_HORIZ && + sp->layout->last->col + 1 == sp->opts->cols) ? 1 : 0; + fc = BUP * uvert + BDOWN * dvert + BLEFT * line; + if (uvert > 0 || dvert > 0 || (horiz && sp->opts->rvert)) { if (horiz == 0 && (IS_HORIZ(sp->layout->last) == 0 || sp->layout->last->col + 1 < sp->opts->cols)) { tp->tcol++; @@ -412,7 +541,7 @@ term_tbl(struct termp *tp, const struct tbl_span *sp) tp->tcol->offset > tp->viscol ? tp->tcol->offset - tp->viscol : 1); } - (*tp->letter)(tp, fc); + tbl_direct_border(tp, fc, 1); } (*tp->endline)(tp); tp->viscol = 0; @@ -429,11 +558,12 @@ term_tbl(struct termp *tp, const struct tbl_span *sp) tp->tcol->rmargin = tp->maxrmargin; if (sp->next == NULL) { if (sp->opts->opts & (TBL_OPT_DBOX | TBL_OPT_BOX)) { - tbl_hrule(tp, sp, 2); + tbl_hrule(tp, sp, HRULE_UP | HRULE_ENDS); tp->skipvsp = 1; } - if (sp->opts->opts & TBL_OPT_DBOX) { - tbl_hrule(tp, sp, 3); + if (tp->enc == TERMENC_ASCII && + sp->opts->opts & TBL_OPT_DBOX) { + tbl_hrule(tp, sp, HRULE_DBOX | HRULE_ENDS); tp->skipvsp = 2; } assert(tp->tbl.cols); @@ -443,80 +573,87 @@ term_tbl(struct termp *tp, const struct tbl_span *sp) } else if (horiz == 0 && sp->opts->opts & TBL_OPT_ALLBOX && (sp->next == NULL || sp->next->pos == TBL_SPAN_DATA || sp->next->next != NULL)) - tbl_hrule(tp, sp, 1); + tbl_hrule(tp, sp, + HRULE_DATA | HRULE_DOWN | HRULE_UP | HRULE_ENDS); tp->flags &= ~TERMP_NONOSPACE; } -/* - * Kinds of horizontal rulers: - * 0: inside the table (single or double line with crossings) - * 1: inside the table (single or double line with crossings and ends) - * 2: inner frame (single line with crossings and ends) - * 3: outer frame (single line without crossings with ends) - */ static void -tbl_hrule(struct termp *tp, const struct tbl_span *sp, int kind) +tbl_hrule(struct termp *tp, const struct tbl_span *sp, int flags) { const struct tbl_cell *cp, *cpn, *cpp; const struct roffcol *col; - int vert; - char cross, line, stdcross, stdline; + int cross, dvert, line, linewidth, uvert; - stdline = (kind < 2 && TBL_SPAN_DHORIZ == sp->pos) ? '=' : '-'; - stdcross = (kind < 3) ? '+' : '-'; - cp = sp->layout->first; - cpp = kind || sp->prev == NULL ? NULL : sp->prev->layout->first; - if (cpp == cp) - cpp = NULL; - cpn = kind > 1 || sp->next == NULL ? NULL : sp->next->layout->first; - if (cpn == cp) - cpn = NULL; - if (kind) - term_word(tp, - cpn == NULL || cpn->pos != TBL_CELL_DOWN ? "+" : "|"); + cpn = cpp = NULL; + if (flags & HRULE_DATA) { + linewidth = sp->pos == TBL_SPAN_DHORIZ ? 2 : 1; + cpn = sp->next == NULL ? NULL : sp->next->layout->first; + if (cpn == cp) + cpn = NULL; + } else + linewidth = tp->enc == TERMENC_UTF8 && + sp->opts->opts & TBL_OPT_DBOX ? 2 : 1; + if (tp->viscol == 0) { + (*tp->advance)(tp, tp->tcols->offset); + tp->viscol = tp->tcols->offset; + } + if (flags & HRULE_ENDS) + tbl_direct_border(tp, linewidth * (BRIGHT + + (flags & (HRULE_UP | HRULE_DBOX) ? BUP : 0) + + (flags & (HRULE_DOWN | HRULE_DBOX) ? BDOWN : 0)), 1); + else { + cpp = sp->prev == NULL ? NULL : sp->prev->layout->first; + if (cpp == cp) + cpp = NULL; + } for (;;) { col = tp->tbl.cols + cp->col; - if (cpn == NULL || cpn->pos != TBL_CELL_DOWN) { - line = stdline; - cross = stdcross; - } else { - line = ' '; - cross = (kind < 3) ? '|' : ' '; - } - tbl_char(tp, line, col->width + col->spacing / 2); - vert = cp->vert; + line = cpn == NULL || cpn->pos != TBL_CELL_DOWN ? + BHORIZ * linewidth : 0; + tbl_direct_border(tp, line, col->width + col->spacing / 2); + uvert = dvert = 0; + if (flags & HRULE_UP && + (tp->enc == TERMENC_ASCII || sp->pos == TBL_SPAN_DATA || + (sp->prev != NULL && sp->prev->layout == sp->layout))) + uvert = cp->vert; + if (flags & HRULE_DOWN) + dvert = cp->vert; if ((cp = cp->next) == NULL) - break; + break; if (cpp != NULL) { - if (vert < cpp->vert) - vert = cpp->vert; + if (uvert < cpp->vert) + uvert = cpp->vert; cpp = cpp->next; } if (cpn != NULL) { - if (vert < cpn->vert) - vert = cpn->vert; + if (dvert < cpn->vert) + dvert = cpn->vert; cpn = cpn->next; } - if (cpn == NULL || cpn->pos != TBL_CELL_DOWN) { - line = stdline; - cross = stdcross; - } else - line = ' '; - if (sp->opts->opts & TBL_OPT_ALLBOX && !vert) - vert = 1; + if (sp->opts->opts & TBL_OPT_ALLBOX) { + if (flags & HRULE_UP && uvert == 0) + uvert = 1; + if (flags & HRULE_DOWN && dvert == 0) + dvert = 1; + } + cross = BHORIZ * linewidth + BUP * uvert + BDOWN * dvert; if (col->spacing) - tbl_char(tp, vert ? cross : line, 1); + tbl_direct_border(tp, cross, 1); if (col->spacing > 2) - tbl_char(tp, vert > 1 ? cross : line, 1); + tbl_direct_border(tp, tp->enc == TERMENC_ASCII && + (uvert > 1 || dvert > 1) ? cross : line, 1); if (col->spacing > 4) - tbl_char(tp, line, (col->spacing - 3) / 2); + tbl_direct_border(tp, line, (col->spacing - 3) / 2); } - if (kind) { - term_word(tp, - cpn == NULL || cpn->pos != TBL_CELL_DOWN ? "+" : "|"); - term_flushln(tp); + if (flags & HRULE_ENDS) { + tbl_direct_border(tp, linewidth * (BLEFT + + (flags & (HRULE_UP | HRULE_DBOX) ? BUP : 0) + + (flags & (HRULE_DOWN | HRULE_DBOX) ? BDOWN : 0)), 1); + (*tp->endline)(tp); + tp->viscol = 0; } } @@ -527,10 +664,10 @@ tbl_data(struct termp *tp, const struct tbl_opts *opts { switch (cp->pos) { case TBL_CELL_HORIZ: - tbl_char(tp, '-', col->width); + tbl_fill_border(tp, BHORIZ, col->width); return; case TBL_CELL_DHORIZ: - tbl_char(tp, '=', col->width); + tbl_fill_border(tp, BHORIZ * 2, col->width); return; default: break; @@ -544,11 +681,11 @@ tbl_data(struct termp *tp, const struct tbl_opts *opts return; case TBL_DATA_HORIZ: case TBL_DATA_NHORIZ: - tbl_char(tp, '-', col->width); + tbl_fill_border(tp, BHORIZ, col->width); return; case TBL_DATA_NDHORIZ: case TBL_DATA_DHORIZ: - tbl_char(tp, '=', col->width); + tbl_fill_border(tp, BHORIZ * 2, col->width); return; default: break; @@ -573,21 +710,51 @@ tbl_data(struct termp *tp, const struct tbl_opts *opts } static void -tbl_char(struct termp *tp, char c, size_t len) +tbl_fill_string(struct termp *tp, const char *cp, size_t len) { - size_t i, sz; - char cp[2]; + size_t i, sz; + sz = term_strlen(tp, cp); + for (i = 0; i < len; i += sz) + term_word(tp, cp); +} + +static void +tbl_fill_char(struct termp *tp, char c, size_t len) +{ + char cp[2]; + cp[0] = c; cp[1] = '\0'; + tbl_fill_string(tp, cp, len); +} - sz = term_strlen(tp, cp); +static void +tbl_fill_border(struct termp *tp, int c, size_t len) +{ + char buf[12]; - for (i = 0; i < len; i += sz) - term_word(tp, cp); + if ((c = borders_locale[c]) > 127) { + (void)snprintf(buf, sizeof(buf), "\\[u%04x]", c); + tbl_fill_string(tp, buf, len); + } else + tbl_fill_char(tp, c, len); } static void +tbl_direct_border(struct termp *tp, int c, size_t len) +{ + size_t i, sz; + + c = borders_locale[c]; + sz = (*tp->width)(tp, c); + for (i = 0; i < len; i += sz) { + (*tp->letter)(tp, c); + tp->viscol += sz; + } +} + +static void tbl_literal(struct termp *tp, const struct tbl_dat *dp, const struct roffcol *col) { @@ -624,9 +791,9 @@ tbl_literal(struct termp *tp, const struct tbl_dat *dp break; } - tbl_char(tp, ASCII_NBRSP, padl); + tbl_fill_char(tp, ASCII_NBRSP, padl); tbl_word(tp, dp); - tbl_char(tp, ASCII_NBRSP, padr); + tbl_fill_char(tp, ASCII_NBRSP, padr); } static void @@ -687,13 +854,13 @@ tbl_number(struct termp *tp, const struct tbl_opts *op } else if (col->width > totsz) padl = (col->width - totsz) / 2; - tbl_char(tp, ASCII_NBRSP, padl); + tbl_fill_char(tp, ASCII_NBRSP, padl); tbl_word(tp, dp); /* Pad right to fill the column. */ if (col->width > padl + totsz) - tbl_char(tp, ASCII_NBRSP, col->width - padl - totsz); + tbl_fill_char(tp, ASCII_NBRSP, col->width - padl - totsz); } static void