Annotation of src/usr.bin/mandoc/man_term.c, Revision 1.195
1.195 ! schwarze 1: /* $OpenBSD: man_term.c,v 1.194 2022/08/28 09:55:58 schwarze Exp $ */
1.1 kristaps 2: /*
1.190 schwarze 3: * Copyright (c) 2010-2015,2017-2020,2022 Ingo Schwarze <schwarze@openbsd.org>
1.84 schwarze 4: * Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv>
1.1 kristaps 5: *
6: * Permission to use, copy, modify, and distribute this software for any
1.2 schwarze 7: * purpose with or without fee is hereby granted, provided that the above
8: * copyright notice and this permission notice appear in all copies.
1.1 kristaps 9: *
1.124 schwarze 10: * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHORS DISCLAIM ALL WARRANTIES
1.2 schwarze 11: * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
1.124 schwarze 12: * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR
1.2 schwarze 13: * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14: * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15: * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16: * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
1.188 schwarze 17: *
18: * Plain text formatter for man(7), used by mandoc(1)
19: * for ASCII, UTF-8, PostScript, and PDF output.
1.1 kristaps 20: */
1.13 schwarze 21: #include <sys/types.h>
22:
1.1 kristaps 23: #include <assert.h>
1.11 schwarze 24: #include <ctype.h>
1.117 schwarze 25: #include <limits.h>
1.1 kristaps 26: #include <stdio.h>
27: #include <stdlib.h>
28: #include <string.h>
29:
1.124 schwarze 30: #include "mandoc_aux.h"
1.184 schwarze 31: #include "mandoc.h"
1.124 schwarze 32: #include "roff.h"
33: #include "man.h"
1.18 schwarze 34: #include "out.h"
1.1 kristaps 35: #include "term.h"
1.188 schwarze 36: #include "term_tag.h"
1.18 schwarze 37: #include "main.h"
1.10 schwarze 38:
1.70 schwarze 39: #define MAXMARGINS 64 /* maximum number of indented scopes */
1.1 kristaps 40:
1.11 schwarze 41: struct mtermp {
1.116 schwarze 42: int lmargin[MAXMARGINS]; /* margins (incl. vis. page) */
1.70 schwarze 43: int lmargincur; /* index of current margin */
44: int lmarginsz; /* actual number of nested margins */
45: size_t offset; /* default offset to visible page */
1.88 schwarze 46: int pardist; /* vert. space before par., unit: [v] */
1.11 schwarze 47: };
48:
1.100 schwarze 49: #define DECL_ARGS struct termp *p, \
1.11 schwarze 50: struct mtermp *mt, \
1.125 schwarze 51: struct roff_node *n, \
1.126 schwarze 52: const struct roff_meta *meta
1.1 kristaps 53:
1.167 schwarze 54: struct man_term_act {
1.1 kristaps 55: int (*pre)(DECL_ARGS);
56: void (*post)(DECL_ARGS);
1.26 schwarze 57: int flags;
58: #define MAN_NOTEXT (1 << 0) /* Never has text children. */
1.1 kristaps 59: };
60:
1.21 schwarze 61: static void print_man_nodelist(DECL_ARGS);
1.19 schwarze 62: static void print_man_node(DECL_ARGS);
1.126 schwarze 63: static void print_man_head(struct termp *,
64: const struct roff_meta *);
65: static void print_man_foot(struct termp *,
66: const struct roff_meta *);
1.100 schwarze 67: static void print_bvspace(struct termp *,
1.187 schwarze 68: struct roff_node *, int);
1.18 schwarze 69:
1.1 kristaps 70: static int pre_B(DECL_ARGS);
1.152 schwarze 71: static int pre_DT(DECL_ARGS);
1.11 schwarze 72: static int pre_HP(DECL_ARGS);
1.1 kristaps 73: static int pre_I(DECL_ARGS);
74: static int pre_IP(DECL_ARGS);
1.82 schwarze 75: static int pre_OP(DECL_ARGS);
1.88 schwarze 76: static int pre_PD(DECL_ARGS);
1.1 kristaps 77: static int pre_PP(DECL_ARGS);
1.13 schwarze 78: static int pre_RS(DECL_ARGS);
1.1 kristaps 79: static int pre_SH(DECL_ARGS);
80: static int pre_SS(DECL_ARGS);
1.168 schwarze 81: static int pre_SY(DECL_ARGS);
1.1 kristaps 82: static int pre_TP(DECL_ARGS);
1.91 schwarze 83: static int pre_UR(DECL_ARGS);
1.82 schwarze 84: static int pre_alternate(DECL_ARGS);
1.14 schwarze 85: static int pre_ign(DECL_ARGS);
1.45 schwarze 86: static int pre_in(DECL_ARGS);
87: static int pre_literal(DECL_ARGS);
1.1 kristaps 88:
1.11 schwarze 89: static void post_IP(DECL_ARGS);
90: static void post_HP(DECL_ARGS);
1.13 schwarze 91: static void post_RS(DECL_ARGS);
1.1 kristaps 92: static void post_SH(DECL_ARGS);
1.168 schwarze 93: static void post_SY(DECL_ARGS);
1.11 schwarze 94: static void post_TP(DECL_ARGS);
1.91 schwarze 95: static void post_UR(DECL_ARGS);
1.1 kristaps 96:
1.167 schwarze 97: static const struct man_term_act man_term_acts[MAN_MAX - MAN_TH] = {
1.26 schwarze 98: { NULL, NULL, 0 }, /* TH */
99: { pre_SH, post_SH, 0 }, /* SH */
1.180 schwarze 100: { pre_SS, post_SH, 0 }, /* SS */
1.26 schwarze 101: { pre_TP, post_TP, 0 }, /* TP */
1.166 schwarze 102: { pre_TP, post_TP, 0 }, /* TQ */
1.195 ! schwarze 103: { pre_PP, NULL, 0 }, /* LP */
1.26 schwarze 104: { pre_PP, NULL, 0 }, /* PP */
1.195 ! schwarze 105: { pre_PP, NULL, 0 }, /* P */
1.26 schwarze 106: { pre_IP, post_IP, 0 }, /* IP */
1.100 schwarze 107: { pre_HP, post_HP, 0 }, /* HP */
1.26 schwarze 108: { NULL, NULL, 0 }, /* SM */
109: { pre_B, NULL, 0 }, /* SB */
1.51 schwarze 110: { pre_alternate, NULL, 0 }, /* BI */
111: { pre_alternate, NULL, 0 }, /* IB */
112: { pre_alternate, NULL, 0 }, /* BR */
113: { pre_alternate, NULL, 0 }, /* RB */
1.26 schwarze 114: { NULL, NULL, 0 }, /* R */
115: { pre_B, NULL, 0 }, /* B */
116: { pre_I, NULL, 0 }, /* I */
1.51 schwarze 117: { pre_alternate, NULL, 0 }, /* IR */
118: { pre_alternate, NULL, 0 }, /* RI */
1.26 schwarze 119: { NULL, NULL, 0 }, /* RE */
120: { pre_RS, post_RS, 0 }, /* RS */
1.190 schwarze 121: { pre_DT, NULL, MAN_NOTEXT }, /* DT */
1.111 schwarze 122: { pre_ign, NULL, MAN_NOTEXT }, /* UC */
1.88 schwarze 123: { pre_PD, NULL, MAN_NOTEXT }, /* PD */
1.190 schwarze 124: { pre_ign, NULL, MAN_NOTEXT }, /* AT */
1.45 schwarze 125: { pre_in, NULL, MAN_NOTEXT }, /* in */
1.168 schwarze 126: { pre_SY, post_SY, 0 }, /* SY */
127: { NULL, NULL, 0 }, /* YS */
1.82 schwarze 128: { pre_OP, NULL, 0 }, /* OP */
1.83 schwarze 129: { pre_literal, NULL, 0 }, /* EX */
130: { pre_literal, NULL, 0 }, /* EE */
1.91 schwarze 131: { pre_UR, post_UR, 0 }, /* UR */
132: { NULL, NULL, 0 }, /* UE */
1.161 bentley 133: { pre_UR, post_UR, 0 }, /* MT */
134: { NULL, NULL, 0 }, /* ME */
1.1 kristaps 135: };
1.167 schwarze 136: static const struct man_term_act *man_term_act(enum roff_tok);
1.11 schwarze 137:
1.1 kristaps 138:
1.167 schwarze 139: static const struct man_term_act *
140: man_term_act(enum roff_tok tok)
141: {
142: assert(tok >= MAN_TH && tok <= MAN_MAX);
143: return man_term_acts + (tok - MAN_TH);
144: }
145:
1.16 schwarze 146: void
1.176 schwarze 147: terminal_man(void *arg, const struct roff_meta *man)
1.1 kristaps 148: {
1.180 schwarze 149: struct mtermp mt;
1.18 schwarze 150: struct termp *p;
1.182 schwarze 151: struct roff_node *n, *nc, *nn;
1.142 schwarze 152: size_t save_defindent;
1.18 schwarze 153:
154: p = (struct termp *)arg;
1.159 schwarze 155: save_defindent = p->defindent;
156: if (p->synopsisonly == 0 && p->defindent == 0)
157: p->defindent = 7;
1.156 schwarze 158: p->tcol->rmargin = p->maxrmargin = p->defrmargin;
1.151 schwarze 159: term_tab_set(p, NULL);
160: term_tab_set(p, "T");
161: term_tab_set(p, ".5i");
1.18 schwarze 162:
1.180 schwarze 163: memset(&mt, 0, sizeof(mt));
1.77 schwarze 164: mt.lmargin[mt.lmargincur] = term_len(p, p->defindent);
165: mt.offset = term_len(p, p->defindent);
1.88 schwarze 166: mt.pardist = 1;
1.11 schwarze 167:
1.134 schwarze 168: n = man->first->child;
1.104 schwarze 169: if (p->synopsisonly) {
1.182 schwarze 170: for (nn = NULL; n != NULL; n = n->next) {
171: if (n->tok != MAN_SH)
172: continue;
173: nc = n->child->child;
174: if (nc->type != ROFFT_TEXT)
175: continue;
176: if (strcmp(nc->string, "SYNOPSIS") == 0)
1.104 schwarze 177: break;
1.182 schwarze 178: if (nn == NULL && strcmp(nc->string, "NAME") == 0)
179: nn = n;
1.104 schwarze 180: }
1.182 schwarze 181: if (n == NULL)
182: n = nn;
183: p->flags |= TERMP_NOSPACE;
184: if (n != NULL && (n = n->child->next->child) != NULL)
185: print_man_nodelist(p, &mt, n, man);
186: term_newln(p);
1.104 schwarze 187: } else {
1.176 schwarze 188: term_begin(p, print_man_head, print_man_foot, man);
1.104 schwarze 189: p->flags |= TERMP_NOSPACE;
190: if (n != NULL)
1.176 schwarze 191: print_man_nodelist(p, &mt, n, man);
1.104 schwarze 192: term_end(p);
193: }
1.159 schwarze 194: p->defindent = save_defindent;
1.1 kristaps 195: }
196:
1.69 schwarze 197: /*
198: * Printing leading vertical space before a block.
199: * This is used for the paragraph macros.
200: * The rules are pretty simple, since there's very little nesting going
201: * on here. Basically, if we're the first within another block (SS/SH),
202: * then don't emit vertical space. If we are (RS), then do. If not the
203: * first, print it.
204: */
1.18 schwarze 205: static void
1.187 schwarze 206: print_bvspace(struct termp *p, struct roff_node *n, int pardist)
1.18 schwarze 207: {
1.187 schwarze 208: struct roff_node *nch;
209: int i;
1.69 schwarze 210:
1.18 schwarze 211: term_newln(p);
1.64 schwarze 212:
1.187 schwarze 213: if (n->body != NULL &&
214: (nch = roff_node_child(n->body)) != NULL &&
215: nch->type == ROFFT_TBL)
216: return;
217:
218: if (n->parent->tok != MAN_RS && roff_node_prev(n) == NULL)
219: return;
1.11 schwarze 220:
1.88 schwarze 221: for (i = 0; i < pardist; i++)
222: term_vspace(p);
1.174 schwarze 223: }
1.100 schwarze 224:
1.14 schwarze 225: static int
226: pre_ign(DECL_ARGS)
227: {
1.138 schwarze 228: return 0;
1.11 schwarze 229: }
230:
1.1 kristaps 231: static int
232: pre_I(DECL_ARGS)
233: {
1.21 schwarze 234: term_fontrepl(p, TERMFONT_UNDER);
1.138 schwarze 235: return 1;
1.1 kristaps 236: }
237:
1.11 schwarze 238: static int
1.45 schwarze 239: pre_literal(DECL_ARGS)
1.11 schwarze 240: {
1.45 schwarze 241: term_newln(p);
1.53 schwarze 242:
1.72 schwarze 243: /*
244: * Unlike .IP and .TP, .HP does not have a HEAD.
245: * So in case a second call to term_flushln() is needed,
246: * indentation has to be set up explicitly.
247: */
1.156 schwarze 248: if (n->parent->tok == MAN_HP && p->tcol->rmargin < p->maxrmargin) {
249: p->tcol->offset = p->tcol->rmargin;
250: p->tcol->rmargin = p->maxrmargin;
1.93 schwarze 251: p->trailspace = 0;
1.99 schwarze 252: p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND);
1.72 schwarze 253: p->flags |= TERMP_NOSPACE;
254: }
1.138 schwarze 255: return 0;
1.11 schwarze 256: }
257:
258: static int
1.88 schwarze 259: pre_PD(DECL_ARGS)
260: {
1.113 schwarze 261: struct roffsu su;
1.88 schwarze 262:
263: n = n->child;
1.113 schwarze 264: if (n == NULL) {
1.88 schwarze 265: mt->pardist = 1;
1.138 schwarze 266: return 0;
1.88 schwarze 267: }
1.124 schwarze 268: assert(n->type == ROFFT_TEXT);
1.157 schwarze 269: if (a2roffsu(n->string, &su, SCALE_VS) != NULL)
1.113 schwarze 270: mt->pardist = term_vspan(p, &su);
1.138 schwarze 271: return 0;
1.88 schwarze 272: }
273:
274: static int
1.51 schwarze 275: pre_alternate(DECL_ARGS)
1.1 kristaps 276: {
1.51 schwarze 277: enum termfont font[2];
1.125 schwarze 278: struct roff_node *nn;
1.178 schwarze 279: int i;
1.1 kristaps 280:
1.51 schwarze 281: switch (n->tok) {
1.100 schwarze 282: case MAN_RB:
1.51 schwarze 283: font[0] = TERMFONT_NONE;
284: font[1] = TERMFONT_BOLD;
285: break;
1.100 schwarze 286: case MAN_RI:
1.51 schwarze 287: font[0] = TERMFONT_NONE;
288: font[1] = TERMFONT_UNDER;
289: break;
1.100 schwarze 290: case MAN_BR:
1.51 schwarze 291: font[0] = TERMFONT_BOLD;
292: font[1] = TERMFONT_NONE;
293: break;
1.100 schwarze 294: case MAN_BI:
1.51 schwarze 295: font[0] = TERMFONT_BOLD;
296: font[1] = TERMFONT_UNDER;
297: break;
1.100 schwarze 298: case MAN_IR:
1.51 schwarze 299: font[0] = TERMFONT_UNDER;
300: font[1] = TERMFONT_NONE;
301: break;
1.100 schwarze 302: case MAN_IB:
1.51 schwarze 303: font[0] = TERMFONT_UNDER;
304: font[1] = TERMFONT_BOLD;
305: break;
306: default:
307: abort();
308: }
1.178 schwarze 309: for (i = 0, nn = n->child; nn != NULL; nn = nn->next, i = 1 - i) {
1.51 schwarze 310: term_fontrepl(p, font[i]);
1.132 schwarze 311: assert(nn->type == ROFFT_TEXT);
312: term_word(p, nn->string);
1.141 schwarze 313: if (nn->flags & NODE_EOS)
1.183 schwarze 314: p->flags |= TERMP_SENTENCE;
1.180 schwarze 315: if (nn->next != NULL)
1.1 kristaps 316: p->flags |= TERMP_NOSPACE;
317: }
1.138 schwarze 318: return 0;
1.1 kristaps 319: }
320:
321: static int
322: pre_B(DECL_ARGS)
323: {
1.21 schwarze 324: term_fontrepl(p, TERMFONT_BOLD);
1.138 schwarze 325: return 1;
1.82 schwarze 326: }
327:
328: static int
329: pre_OP(DECL_ARGS)
330: {
331: term_word(p, "[");
1.169 schwarze 332: p->flags |= TERMP_KEEP | TERMP_NOSPACE;
1.82 schwarze 333:
1.180 schwarze 334: if ((n = n->child) != NULL) {
1.82 schwarze 335: term_fontrepl(p, TERMFONT_BOLD);
336: term_word(p, n->string);
337: }
1.180 schwarze 338: if (n != NULL && n->next != NULL) {
1.82 schwarze 339: term_fontrepl(p, TERMFONT_UNDER);
340: term_word(p, n->next->string);
341: }
342: term_fontrepl(p, TERMFONT_NONE);
1.169 schwarze 343: p->flags &= ~TERMP_KEEP;
1.82 schwarze 344: p->flags |= TERMP_NOSPACE;
345: term_word(p, "]");
1.138 schwarze 346: return 0;
1.1 kristaps 347: }
348:
349: static int
1.45 schwarze 350: pre_in(DECL_ARGS)
1.11 schwarze 351: {
1.116 schwarze 352: struct roffsu su;
353: const char *cp;
1.45 schwarze 354: size_t v;
1.116 schwarze 355: int less;
1.45 schwarze 356:
357: term_newln(p);
358:
1.156 schwarze 359: if (n->child == NULL) {
360: p->tcol->offset = mt->offset;
1.138 schwarze 361: return 0;
1.45 schwarze 362: }
1.11 schwarze 363:
1.45 schwarze 364: cp = n->child->string;
365: less = 0;
1.11 schwarze 366:
1.180 schwarze 367: if (*cp == '-')
1.45 schwarze 368: less = -1;
1.180 schwarze 369: else if (*cp == '+')
1.45 schwarze 370: less = 1;
371: else
372: cp--;
373:
1.157 schwarze 374: if (a2roffsu(++cp, &su, SCALE_EN) == NULL)
1.138 schwarze 375: return 0;
1.45 schwarze 376:
1.158 schwarze 377: v = term_hen(p, &su);
1.45 schwarze 378:
379: if (less < 0)
1.156 schwarze 380: p->tcol->offset -= p->tcol->offset > v ? v : p->tcol->offset;
1.45 schwarze 381: else if (less > 0)
1.156 schwarze 382: p->tcol->offset += v;
1.100 schwarze 383: else
1.156 schwarze 384: p->tcol->offset = v;
385: if (p->tcol->offset > SHRT_MAX)
386: p->tcol->offset = term_len(p, p->defindent);
1.8 schwarze 387:
1.152 schwarze 388: return 0;
389: }
390:
391: static int
392: pre_DT(DECL_ARGS)
393: {
394: term_tab_set(p, NULL);
395: term_tab_set(p, "T");
396: term_tab_set(p, ".5i");
1.138 schwarze 397: return 0;
1.8 schwarze 398: }
399:
400: static int
1.11 schwarze 401: pre_HP(DECL_ARGS)
402: {
1.116 schwarze 403: struct roffsu su;
1.125 schwarze 404: const struct roff_node *nn;
1.116 schwarze 405: int len;
1.11 schwarze 406:
407: switch (n->type) {
1.124 schwarze 408: case ROFFT_BLOCK:
1.88 schwarze 409: print_bvspace(p, n, mt->pardist);
1.138 schwarze 410: return 1;
1.180 schwarze 411: case ROFFT_HEAD:
412: return 0;
1.124 schwarze 413: case ROFFT_BODY:
1.11 schwarze 414: break;
415: default:
1.180 schwarze 416: abort();
1.11 schwarze 417: }
418:
1.179 schwarze 419: if (n->child == NULL)
420: return 0;
421:
422: if ((n->child->flags & NODE_NOFILL) == 0) {
1.99 schwarze 423: p->flags |= TERMP_NOBREAK | TERMP_BRIND;
1.93 schwarze 424: p->trailspace = 2;
1.84 schwarze 425: }
426:
1.11 schwarze 427: /* Calculate offset. */
428:
1.116 schwarze 429: if ((nn = n->parent->head->child) != NULL &&
1.157 schwarze 430: a2roffsu(nn->string, &su, SCALE_EN) != NULL) {
1.158 schwarze 431: len = term_hen(p, &su);
1.117 schwarze 432: if (len < 0 && (size_t)(-len) > mt->offset)
433: len = -mt->offset;
434: else if (len > SHRT_MAX)
435: len = term_len(p, p->defindent);
1.116 schwarze 436: mt->lmargin[mt->lmargincur] = len;
437: } else
438: len = mt->lmargin[mt->lmargincur];
1.11 schwarze 439:
1.156 schwarze 440: p->tcol->offset = mt->offset;
441: p->tcol->rmargin = mt->offset + len;
1.138 schwarze 442: return 1;
1.11 schwarze 443: }
444:
445: static void
446: post_HP(DECL_ARGS)
447: {
448: switch (n->type) {
1.180 schwarze 449: case ROFFT_BLOCK:
450: case ROFFT_HEAD:
451: break;
1.124 schwarze 452: case ROFFT_BODY:
1.90 schwarze 453: term_newln(p);
1.127 schwarze 454:
455: /*
456: * Compatibility with a groff bug.
457: * The .HP macro uses the undocumented .tag request
458: * which causes a line break and cancels no-space
459: * mode even if there isn't any output.
460: */
461:
462: if (n->child == NULL)
463: term_vspace(p);
464:
1.99 schwarze 465: p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND);
1.93 schwarze 466: p->trailspace = 0;
1.156 schwarze 467: p->tcol->offset = mt->offset;
468: p->tcol->rmargin = p->maxrmargin;
1.11 schwarze 469: break;
470: default:
1.180 schwarze 471: abort();
1.11 schwarze 472: }
473: }
474:
475: static int
1.1 kristaps 476: pre_PP(DECL_ARGS)
477: {
1.11 schwarze 478: switch (n->type) {
1.124 schwarze 479: case ROFFT_BLOCK:
1.77 schwarze 480: mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);
1.88 schwarze 481: print_bvspace(p, n, mt->pardist);
1.11 schwarze 482: break;
1.180 schwarze 483: case ROFFT_HEAD:
484: return 0;
485: case ROFFT_BODY:
1.156 schwarze 486: p->tcol->offset = mt->offset;
1.11 schwarze 487: break;
1.180 schwarze 488: default:
489: abort();
1.11 schwarze 490: }
1.180 schwarze 491: return 1;
1.1 kristaps 492: }
493:
494: static int
495: pre_IP(DECL_ARGS)
496: {
1.116 schwarze 497: struct roffsu su;
1.125 schwarze 498: const struct roff_node *nn;
1.178 schwarze 499: int len;
1.11 schwarze 500:
501: switch (n->type) {
1.180 schwarze 502: case ROFFT_BLOCK:
503: print_bvspace(p, n, mt->pardist);
504: return 1;
1.124 schwarze 505: case ROFFT_HEAD:
1.11 schwarze 506: p->flags |= TERMP_NOBREAK;
1.93 schwarze 507: p->trailspace = 1;
1.11 schwarze 508: break;
1.180 schwarze 509: case ROFFT_BODY:
1.192 schwarze 510: p->flags |= TERMP_NOSPACE | TERMP_NONEWLINE;
1.180 schwarze 511: break;
1.11 schwarze 512: default:
1.180 schwarze 513: abort();
1.11 schwarze 514: }
515:
1.57 schwarze 516: /* Calculate the offset from the optional second argument. */
1.116 schwarze 517: if ((nn = n->parent->head->child) != NULL &&
518: (nn = nn->next) != NULL &&
1.157 schwarze 519: a2roffsu(nn->string, &su, SCALE_EN) != NULL) {
1.158 schwarze 520: len = term_hen(p, &su);
1.116 schwarze 521: if (len < 0 && (size_t)(-len) > mt->offset)
522: len = -mt->offset;
1.117 schwarze 523: else if (len > SHRT_MAX)
524: len = term_len(p, p->defindent);
525: mt->lmargin[mt->lmargincur] = len;
1.116 schwarze 526: } else
527: len = mt->lmargin[mt->lmargincur];
1.11 schwarze 528:
529: switch (n->type) {
1.124 schwarze 530: case ROFFT_HEAD:
1.156 schwarze 531: p->tcol->offset = mt->offset;
532: p->tcol->rmargin = mt->offset + len;
1.188 schwarze 533: if (n->child != NULL)
1.89 schwarze 534: print_man_node(p, mt, n->child, meta);
1.138 schwarze 535: return 0;
1.124 schwarze 536: case ROFFT_BODY:
1.156 schwarze 537: p->tcol->offset = mt->offset + len;
538: p->tcol->rmargin = p->maxrmargin;
1.11 schwarze 539: break;
540: default:
1.180 schwarze 541: abort();
1.11 schwarze 542: }
1.138 schwarze 543: return 1;
1.11 schwarze 544: }
1.1 kristaps 545:
1.11 schwarze 546: static void
547: post_IP(DECL_ARGS)
548: {
549: switch (n->type) {
1.180 schwarze 550: case ROFFT_BLOCK:
551: break;
1.124 schwarze 552: case ROFFT_HEAD:
1.11 schwarze 553: term_flushln(p);
554: p->flags &= ~TERMP_NOBREAK;
1.93 schwarze 555: p->trailspace = 0;
1.156 schwarze 556: p->tcol->rmargin = p->maxrmargin;
1.11 schwarze 557: break;
1.124 schwarze 558: case ROFFT_BODY:
1.57 schwarze 559: term_newln(p);
1.156 schwarze 560: p->tcol->offset = mt->offset;
1.11 schwarze 561: break;
562: default:
1.180 schwarze 563: abort();
1.11 schwarze 564: }
1.1 kristaps 565: }
566:
567: static int
568: pre_TP(DECL_ARGS)
569: {
1.116 schwarze 570: struct roffsu su;
1.125 schwarze 571: struct roff_node *nn;
1.178 schwarze 572: int len;
1.11 schwarze 573:
574: switch (n->type) {
1.180 schwarze 575: case ROFFT_BLOCK:
576: if (n->tok == MAN_TP)
577: print_bvspace(p, n, mt->pardist);
578: return 1;
1.124 schwarze 579: case ROFFT_HEAD:
1.137 schwarze 580: p->flags |= TERMP_NOBREAK | TERMP_BRTRSP;
1.93 schwarze 581: p->trailspace = 1;
1.11 schwarze 582: break;
1.124 schwarze 583: case ROFFT_BODY:
1.192 schwarze 584: p->flags |= TERMP_NOSPACE | TERMP_NONEWLINE;
1.11 schwarze 585: break;
586: default:
1.180 schwarze 587: abort();
1.11 schwarze 588: }
589:
590: /* Calculate offset. */
1.1 kristaps 591:
1.116 schwarze 592: if ((nn = n->parent->head->child) != NULL &&
1.141 schwarze 593: nn->string != NULL && ! (NODE_LINE & nn->flags) &&
1.157 schwarze 594: a2roffsu(nn->string, &su, SCALE_EN) != NULL) {
1.158 schwarze 595: len = term_hen(p, &su);
1.116 schwarze 596: if (len < 0 && (size_t)(-len) > mt->offset)
597: len = -mt->offset;
1.117 schwarze 598: else if (len > SHRT_MAX)
599: len = term_len(p, p->defindent);
600: mt->lmargin[mt->lmargincur] = len;
1.116 schwarze 601: } else
602: len = mt->lmargin[mt->lmargincur];
1.8 schwarze 603:
1.11 schwarze 604: switch (n->type) {
1.124 schwarze 605: case ROFFT_HEAD:
1.156 schwarze 606: p->tcol->offset = mt->offset;
607: p->tcol->rmargin = mt->offset + len;
1.11 schwarze 608:
609: /* Don't print same-line elements. */
1.95 schwarze 610: nn = n->child;
1.180 schwarze 611: while (nn != NULL && (nn->flags & NODE_LINE) == 0)
1.95 schwarze 612: nn = nn->next;
1.185 schwarze 613:
1.180 schwarze 614: while (nn != NULL) {
1.95 schwarze 615: print_man_node(p, mt, nn, meta);
616: nn = nn->next;
617: }
1.138 schwarze 618: return 0;
1.124 schwarze 619: case ROFFT_BODY:
1.156 schwarze 620: p->tcol->offset = mt->offset + len;
621: p->tcol->rmargin = p->maxrmargin;
1.93 schwarze 622: p->trailspace = 0;
1.137 schwarze 623: p->flags &= ~(TERMP_NOBREAK | TERMP_BRTRSP);
1.11 schwarze 624: break;
625: default:
1.180 schwarze 626: abort();
1.11 schwarze 627: }
1.138 schwarze 628: return 1;
1.11 schwarze 629: }
1.1 kristaps 630:
1.11 schwarze 631: static void
632: post_TP(DECL_ARGS)
633: {
634: switch (n->type) {
1.180 schwarze 635: case ROFFT_BLOCK:
636: break;
1.124 schwarze 637: case ROFFT_HEAD:
1.11 schwarze 638: term_flushln(p);
639: break;
1.124 schwarze 640: case ROFFT_BODY:
1.57 schwarze 641: term_newln(p);
1.156 schwarze 642: p->tcol->offset = mt->offset;
1.11 schwarze 643: break;
644: default:
1.180 schwarze 645: abort();
1.11 schwarze 646: }
1.1 kristaps 647: }
648:
649: static int
650: pre_SS(DECL_ARGS)
651: {
1.88 schwarze 652: int i;
1.1 kristaps 653:
1.11 schwarze 654: switch (n->type) {
1.124 schwarze 655: case ROFFT_BLOCK:
1.77 schwarze 656: mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);
657: mt->offset = term_len(p, p->defindent);
1.111 schwarze 658:
659: /*
660: * No vertical space before the first subsection
661: * and after an empty subsection.
662: */
663:
1.187 schwarze 664: if ((n = roff_node_prev(n)) == NULL ||
665: (n->tok == MAN_SS && roff_node_child(n->body) == NULL))
1.11 schwarze 666: break;
1.111 schwarze 667:
1.88 schwarze 668: for (i = 0; i < mt->pardist; i++)
669: term_vspace(p);
1.11 schwarze 670: break;
1.124 schwarze 671: case ROFFT_HEAD:
1.21 schwarze 672: term_fontrepl(p, TERMFONT_BOLD);
1.156 schwarze 673: p->tcol->offset = term_len(p, 3);
674: p->tcol->rmargin = mt->offset;
1.129 schwarze 675: p->trailspace = mt->offset;
676: p->flags |= TERMP_NOBREAK | TERMP_BRIND;
1.11 schwarze 677: break;
1.124 schwarze 678: case ROFFT_BODY:
1.156 schwarze 679: p->tcol->offset = mt->offset;
680: p->tcol->rmargin = p->maxrmargin;
1.129 schwarze 681: p->trailspace = 0;
682: p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND);
1.11 schwarze 683: break;
684: default:
685: break;
686: }
1.138 schwarze 687: return 1;
1.1 kristaps 688: }
689:
690: static int
691: pre_SH(DECL_ARGS)
692: {
1.88 schwarze 693: int i;
1.1 kristaps 694:
1.11 schwarze 695: switch (n->type) {
1.124 schwarze 696: case ROFFT_BLOCK:
1.77 schwarze 697: mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);
698: mt->offset = term_len(p, p->defindent);
1.111 schwarze 699:
700: /*
701: * No vertical space before the first section
702: * and after an empty section.
703: */
704:
1.187 schwarze 705: if ((n = roff_node_prev(n)) == NULL ||
706: (n->tok == MAN_SH && roff_node_child(n->body) == NULL))
1.29 schwarze 707: break;
1.111 schwarze 708:
1.88 schwarze 709: for (i = 0; i < mt->pardist; i++)
710: term_vspace(p);
1.11 schwarze 711: break;
1.124 schwarze 712: case ROFFT_HEAD:
1.21 schwarze 713: term_fontrepl(p, TERMFONT_BOLD);
1.156 schwarze 714: p->tcol->offset = 0;
715: p->tcol->rmargin = mt->offset;
1.129 schwarze 716: p->trailspace = mt->offset;
717: p->flags |= TERMP_NOBREAK | TERMP_BRIND;
1.11 schwarze 718: break;
1.124 schwarze 719: case ROFFT_BODY:
1.156 schwarze 720: p->tcol->offset = mt->offset;
721: p->tcol->rmargin = p->maxrmargin;
1.129 schwarze 722: p->trailspace = 0;
723: p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND);
1.11 schwarze 724: break;
725: default:
1.180 schwarze 726: abort();
1.11 schwarze 727: }
1.138 schwarze 728: return 1;
1.1 kristaps 729: }
730:
731: static void
732: post_SH(DECL_ARGS)
733: {
1.11 schwarze 734: switch (n->type) {
1.180 schwarze 735: case ROFFT_BLOCK:
736: break;
1.124 schwarze 737: case ROFFT_HEAD:
738: case ROFFT_BODY:
1.11 schwarze 739: term_newln(p);
740: break;
741: default:
1.180 schwarze 742: abort();
1.13 schwarze 743: }
744: }
745:
746: static int
747: pre_RS(DECL_ARGS)
748: {
1.116 schwarze 749: struct roffsu su;
1.13 schwarze 750:
751: switch (n->type) {
1.124 schwarze 752: case ROFFT_BLOCK:
1.13 schwarze 753: term_newln(p);
1.138 schwarze 754: return 1;
1.124 schwarze 755: case ROFFT_HEAD:
1.138 schwarze 756: return 0;
1.180 schwarze 757: case ROFFT_BODY:
758: break;
1.13 schwarze 759: default:
1.180 schwarze 760: abort();
1.13 schwarze 761: }
762:
1.118 schwarze 763: n = n->parent->head;
764: n->aux = SHRT_MAX + 1;
1.130 schwarze 765: if (n->child == NULL)
766: n->aux = mt->lmargin[mt->lmargincur];
1.157 schwarze 767: else if (a2roffsu(n->child->string, &su, SCALE_EN) != NULL)
1.158 schwarze 768: n->aux = term_hen(p, &su);
1.118 schwarze 769: if (n->aux < 0 && (size_t)(-n->aux) > mt->offset)
770: n->aux = -mt->offset;
771: else if (n->aux > SHRT_MAX)
772: n->aux = term_len(p, p->defindent);
1.13 schwarze 773:
1.118 schwarze 774: mt->offset += n->aux;
1.156 schwarze 775: p->tcol->offset = mt->offset;
776: p->tcol->rmargin = p->maxrmargin;
1.13 schwarze 777:
1.70 schwarze 778: if (++mt->lmarginsz < MAXMARGINS)
779: mt->lmargincur = mt->lmarginsz;
780:
1.131 schwarze 781: mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);
1.138 schwarze 782: return 1;
1.13 schwarze 783: }
784:
785: static void
786: post_RS(DECL_ARGS)
787: {
788: switch (n->type) {
1.124 schwarze 789: case ROFFT_BLOCK:
790: case ROFFT_HEAD:
1.69 schwarze 791: return;
1.180 schwarze 792: case ROFFT_BODY:
793: break;
1.13 schwarze 794: default:
1.180 schwarze 795: abort();
1.11 schwarze 796: }
1.180 schwarze 797: term_newln(p);
1.118 schwarze 798: mt->offset -= n->parent->head->aux;
1.156 schwarze 799: p->tcol->offset = mt->offset;
1.70 schwarze 800: if (--mt->lmarginsz < MAXMARGINS)
801: mt->lmargincur = mt->lmarginsz;
1.168 schwarze 802: }
803:
804: static int
805: pre_SY(DECL_ARGS)
806: {
807: const struct roff_node *nn;
808: int len;
809:
810: switch (n->type) {
811: case ROFFT_BLOCK:
1.187 schwarze 812: if ((nn = roff_node_prev(n)) == NULL || nn->tok != MAN_SY)
1.170 schwarze 813: print_bvspace(p, n, mt->pardist);
1.168 schwarze 814: return 1;
815: case ROFFT_HEAD:
816: case ROFFT_BODY:
817: break;
818: default:
819: abort();
820: }
821:
822: nn = n->parent->head->child;
1.172 schwarze 823: len = nn == NULL ? 1 : term_strlen(p, nn->string) + 1;
1.168 schwarze 824:
825: switch (n->type) {
826: case ROFFT_HEAD:
827: p->tcol->offset = mt->offset;
828: p->tcol->rmargin = mt->offset + len;
1.181 schwarze 829: if (n->next->child == NULL ||
830: (n->next->child->flags & NODE_NOFILL) == 0)
831: p->flags |= TERMP_NOBREAK;
1.168 schwarze 832: term_fontrepl(p, TERMFONT_BOLD);
833: break;
834: case ROFFT_BODY:
835: mt->lmargin[mt->lmargincur] = len;
836: p->tcol->offset = mt->offset + len;
837: p->tcol->rmargin = p->maxrmargin;
838: p->flags |= TERMP_NOSPACE;
839: break;
840: default:
841: abort();
842: }
843: return 1;
844: }
845:
846: static void
847: post_SY(DECL_ARGS)
848: {
849: switch (n->type) {
1.180 schwarze 850: case ROFFT_BLOCK:
851: break;
1.168 schwarze 852: case ROFFT_HEAD:
853: term_flushln(p);
854: p->flags &= ~TERMP_NOBREAK;
855: break;
856: case ROFFT_BODY:
857: term_newln(p);
858: p->tcol->offset = mt->offset;
859: break;
860: default:
1.180 schwarze 861: abort();
1.168 schwarze 862: }
1.91 schwarze 863: }
864:
865: static int
866: pre_UR(DECL_ARGS)
867: {
1.138 schwarze 868: return n->type != ROFFT_HEAD;
1.91 schwarze 869: }
870:
871: static void
872: post_UR(DECL_ARGS)
873: {
1.124 schwarze 874: if (n->type != ROFFT_BLOCK)
1.91 schwarze 875: return;
876:
877: term_word(p, "<");
878: p->flags |= TERMP_NOSPACE;
879:
1.180 schwarze 880: if (n->child->child != NULL)
1.91 schwarze 881: print_man_node(p, mt, n->child->child, meta);
882:
883: p->flags |= TERMP_NOSPACE;
884: term_word(p, ">");
1.47 schwarze 885: }
886:
1.1 kristaps 887: static void
1.19 schwarze 888: print_man_node(DECL_ARGS)
1.1 kristaps 889: {
1.167 schwarze 890: const struct man_term_act *act;
891: int c;
1.1 kristaps 892:
1.192 schwarze 893: /*
894: * In no-fill mode, break the output line at the beginning
895: * of new input lines except after \c, and nowhere else.
896: */
897:
898: if (n->flags & NODE_NOFILL) {
899: if (n->flags & NODE_LINE &&
900: (p->flags & TERMP_NONEWLINE) == 0)
901: term_newln(p);
902: p->flags |= TERMP_BRNEVER;
1.193 schwarze 903: } else {
904: if (n->flags & NODE_LINE)
905: term_tab_ref(p);
1.192 schwarze 906: p->flags &= ~TERMP_BRNEVER;
1.193 schwarze 907: }
1.192 schwarze 908:
1.188 schwarze 909: if (n->flags & NODE_ID)
910: term_tag_write(n, p->line);
911:
1.1 kristaps 912: switch (n->type) {
1.124 schwarze 913: case ROFFT_TEXT:
1.61 schwarze 914: /*
915: * If we have a blank line, output a vertical space.
916: * If we have a space as the first character, break
917: * before printing the line's data.
918: */
1.153 schwarze 919: if (*n->string == '\0') {
1.160 schwarze 920: if (p->flags & TERMP_NONEWLINE)
921: term_newln(p);
922: else
923: term_vspace(p);
1.61 schwarze 924: return;
1.153 schwarze 925: } else if (*n->string == ' ' && n->flags & NODE_LINE &&
926: (p->flags & TERMP_NONEWLINE) == 0)
1.60 schwarze 927: term_newln(p);
1.165 schwarze 928: else if (n->flags & NODE_DELIMC)
929: p->flags |= TERMP_NOSPACE;
1.21 schwarze 930:
1.1 kristaps 931: term_word(p, n->string);
1.84 schwarze 932: goto out;
1.163 schwarze 933: case ROFFT_COMMENT:
934: return;
1.124 schwarze 935: case ROFFT_EQN:
1.141 schwarze 936: if ( ! (n->flags & NODE_LINE))
1.105 schwarze 937: p->flags |= TERMP_NOSPACE;
1.71 schwarze 938: term_eqn(p, n->eqn);
1.141 schwarze 939: if (n->next != NULL && ! (n->next->flags & NODE_LINE))
1.106 schwarze 940: p->flags |= TERMP_NOSPACE;
1.61 schwarze 941: return;
1.124 schwarze 942: case ROFFT_TBL:
1.122 schwarze 943: if (p->tbl.cols == NULL)
1.194 schwarze 944: term_newln(p);
1.58 schwarze 945: term_tbl(p, n->span);
1.61 schwarze 946: return;
1.1 kristaps 947: default:
948: break;
949: }
1.177 schwarze 950:
1.146 schwarze 951: if (n->tok < ROFF_MAX) {
1.147 schwarze 952: roff_term_pre(p, n);
1.146 schwarze 953: return;
954: }
955:
1.167 schwarze 956: act = man_term_act(n->tok);
1.173 schwarze 957: if ((act->flags & MAN_NOTEXT) == 0 && n->tok != MAN_SM)
1.61 schwarze 958: term_fontrepl(p, TERMFONT_NONE);
959:
960: c = 1;
1.167 schwarze 961: if (act->pre != NULL)
962: c = (*act->pre)(p, mt, n, meta);
1.61 schwarze 963:
1.180 schwarze 964: if (c && n->child != NULL)
1.89 schwarze 965: print_man_nodelist(p, mt, n->child, meta);
1.1 kristaps 966:
1.167 schwarze 967: if (act->post != NULL)
968: (*act->post)(p, mt, n, meta);
1.173 schwarze 969: if ((act->flags & MAN_NOTEXT) == 0 && n->tok != MAN_SM)
1.61 schwarze 970: term_fontrepl(p, TERMFONT_NONE);
1.30 schwarze 971:
1.84 schwarze 972: out:
1.192 schwarze 973: if (n->parent->tok == MAN_HP && n->parent->type == ROFFT_BODY &&
974: n->prev == NULL && n->flags & NODE_NOFILL) {
975: term_newln(p);
976: p->tcol->offset = p->tcol->rmargin;
977: p->tcol->rmargin = p->maxrmargin;
1.84 schwarze 978: }
1.180 schwarze 979: if (n->flags & NODE_EOS)
1.30 schwarze 980: p->flags |= TERMP_SENTENCE;
1.1 kristaps 981: }
982:
983: static void
1.21 schwarze 984: print_man_nodelist(DECL_ARGS)
1.1 kristaps 985: {
1.121 schwarze 986: while (n != NULL) {
987: print_man_node(p, mt, n, meta);
988: n = n->next;
989: }
1.1 kristaps 990: }
991:
992: static void
1.126 schwarze 993: print_man_foot(struct termp *p, const struct roff_meta *meta)
1.1 kristaps 994: {
1.101 schwarze 995: char *title;
1.109 schwarze 996: size_t datelen, titlen;
1.41 schwarze 997:
1.80 schwarze 998: assert(meta->title);
999: assert(meta->msec);
1000: assert(meta->date);
1.21 schwarze 1001:
1002: term_fontrepl(p, TERMFONT_NONE);
1.1 kristaps 1003:
1.103 schwarze 1004: if (meta->hasbody)
1005: term_vspace(p);
1.81 schwarze 1006:
1007: /*
1008: * Temporary, undocumented option to imitate mdoc(7) output.
1.126 schwarze 1009: * In the bottom right corner, use the operating system
1010: * instead of the title.
1.81 schwarze 1011: */
1012:
1.79 schwarze 1013: if ( ! p->mdocstyle) {
1.101 schwarze 1014: mandoc_asprintf(&title, "%s(%s)",
1015: meta->title, meta->msec);
1.180 schwarze 1016: } else if (meta->os != NULL) {
1.126 schwarze 1017: title = mandoc_strdup(meta->os);
1.79 schwarze 1018: } else {
1.101 schwarze 1019: title = mandoc_strdup("");
1.79 schwarze 1020: }
1.78 schwarze 1021: datelen = term_strlen(p, meta->date);
1.1 kristaps 1022:
1.126 schwarze 1023: /* Bottom left corner: operating system. */
1.81 schwarze 1024:
1.1 kristaps 1025: p->flags |= TERMP_NOSPACE | TERMP_NOBREAK;
1.93 schwarze 1026: p->trailspace = 1;
1.156 schwarze 1027: p->tcol->offset = 0;
1028: p->tcol->rmargin = p->maxrmargin > datelen ?
1.109 schwarze 1029: (p->maxrmargin + term_len(p, 1) - datelen) / 2 : 0;
1.1 kristaps 1030:
1.126 schwarze 1031: if (meta->os)
1032: term_word(p, meta->os);
1.1 kristaps 1033: term_flushln(p);
1034:
1.81 schwarze 1035: /* At the bottom in the middle: manual date. */
1036:
1.156 schwarze 1037: p->tcol->offset = p->tcol->rmargin;
1.109 schwarze 1038: titlen = term_strlen(p, title);
1.156 schwarze 1039: p->tcol->rmargin = p->maxrmargin > titlen ?
1040: p->maxrmargin - titlen : 0;
1.72 schwarze 1041: p->flags |= TERMP_NOSPACE;
1.78 schwarze 1042:
1043: term_word(p, meta->date);
1044: term_flushln(p);
1045:
1.81 schwarze 1046: /* Bottom right corner: manual title and section. */
1047:
1.78 schwarze 1048: p->flags &= ~TERMP_NOBREAK;
1049: p->flags |= TERMP_NOSPACE;
1.93 schwarze 1050: p->trailspace = 0;
1.156 schwarze 1051: p->tcol->offset = p->tcol->rmargin;
1052: p->tcol->rmargin = p->maxrmargin;
1.1 kristaps 1053:
1.78 schwarze 1054: term_word(p, title);
1.1 kristaps 1055: term_flushln(p);
1.164 schwarze 1056:
1057: /*
1058: * Reset the terminal state for more output after the footer:
1059: * Some output modes, in particular PostScript and PDF, print
1060: * the header and the footer into a buffer such that it can be
1061: * reused for multiple output pages, then go on to format the
1062: * main text.
1063: */
1064:
1065: p->tcol->offset = 0;
1066: p->flags = 0;
1067:
1.101 schwarze 1068: free(title);
1.1 kristaps 1069: }
1070:
1071: static void
1.126 schwarze 1072: print_man_head(struct termp *p, const struct roff_meta *meta)
1.1 kristaps 1073: {
1.102 schwarze 1074: const char *volume;
1.101 schwarze 1075: char *title;
1.102 schwarze 1076: size_t vollen, titlen;
1.41 schwarze 1077:
1.89 schwarze 1078: assert(meta->title);
1079: assert(meta->msec);
1.1 kristaps 1080:
1.102 schwarze 1081: volume = NULL == meta->vol ? "" : meta->vol;
1082: vollen = term_strlen(p, volume);
1.1 kristaps 1083:
1.81 schwarze 1084: /* Top left corner: manual title and section. */
1085:
1.101 schwarze 1086: mandoc_asprintf(&title, "%s(%s)", meta->title, meta->msec);
1.42 schwarze 1087: titlen = term_strlen(p, title);
1.1 kristaps 1088:
1.73 schwarze 1089: p->flags |= TERMP_NOBREAK | TERMP_NOSPACE;
1.93 schwarze 1090: p->trailspace = 1;
1.156 schwarze 1091: p->tcol->offset = 0;
1092: p->tcol->rmargin = 2 * (titlen+1) + vollen < p->maxrmargin ?
1.102 schwarze 1093: (p->maxrmargin - vollen + term_len(p, 1)) / 2 :
1.109 schwarze 1094: vollen < p->maxrmargin ? p->maxrmargin - vollen : 0;
1.1 kristaps 1095:
1096: term_word(p, title);
1097: term_flushln(p);
1098:
1.81 schwarze 1099: /* At the top in the middle: manual volume. */
1100:
1.72 schwarze 1101: p->flags |= TERMP_NOSPACE;
1.156 schwarze 1102: p->tcol->offset = p->tcol->rmargin;
1103: p->tcol->rmargin = p->tcol->offset + vollen + titlen <
1104: p->maxrmargin ? p->maxrmargin - titlen : p->maxrmargin;
1.1 kristaps 1105:
1.102 schwarze 1106: term_word(p, volume);
1.1 kristaps 1107: term_flushln(p);
1108:
1.81 schwarze 1109: /* Top right corner: title and section, again. */
1110:
1.1 kristaps 1111: p->flags &= ~TERMP_NOBREAK;
1.93 schwarze 1112: p->trailspace = 0;
1.156 schwarze 1113: if (p->tcol->rmargin + titlen <= p->maxrmargin) {
1.72 schwarze 1114: p->flags |= TERMP_NOSPACE;
1.156 schwarze 1115: p->tcol->offset = p->tcol->rmargin;
1116: p->tcol->rmargin = p->maxrmargin;
1.25 schwarze 1117: term_word(p, title);
1118: term_flushln(p);
1119: }
1.1 kristaps 1120:
1.73 schwarze 1121: p->flags &= ~TERMP_NOSPACE;
1.156 schwarze 1122: p->tcol->offset = 0;
1123: p->tcol->rmargin = p->maxrmargin;
1.29 schwarze 1124:
1.100 schwarze 1125: /*
1.81 schwarze 1126: * Groff prints three blank lines before the content.
1127: * Do the same, except in the temporary, undocumented
1128: * mode imitating mdoc(7) output.
1.29 schwarze 1129: */
1130:
1131: term_vspace(p);
1.101 schwarze 1132: free(title);
1.1 kristaps 1133: }