]>
git.cameronkatri.com Git - mandoc.git/blob - mdoc_term.c
1 /* $Id: mdoc_term.c,v 1.325 2015/09/14 12:57:47 schwarze Exp $ */
3 * Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
4 * Copyright (c) 2010, 2012-2015 Ingo Schwarze <schwarze@openbsd.org>
5 * Copyright (c) 2013 Franco Fichtner <franco@lastsummer.de>
7 * Permission to use, copy, modify, and distribute this software for any
8 * purpose with or without fee is hereby granted, provided that the above
9 * copyright notice and this permission notice appear in all copies.
11 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHORS DISCLAIM ALL WARRANTIES
12 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR
14 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
21 #include <sys/types.h>
31 #include "mandoc_aux.h"
41 struct termpair
*ppair
;
45 #define DECL_ARGS struct termp *p, \
46 struct termpair *pair, \
47 const struct roff_meta *meta, \
51 int (*pre
)(DECL_ARGS
);
52 void (*post
)(DECL_ARGS
);
55 static int a2width(const struct termp
*, const char *);
57 static void print_bvspace(struct termp
*,
58 const struct roff_node
*,
59 const struct roff_node
*);
60 static void print_mdoc_node(DECL_ARGS
);
61 static void print_mdoc_nodelist(DECL_ARGS
);
62 static void print_mdoc_head(struct termp
*, const struct roff_meta
*);
63 static void print_mdoc_foot(struct termp
*, const struct roff_meta
*);
64 static void synopsis_pre(struct termp
*,
65 const struct roff_node
*);
67 static void termp____post(DECL_ARGS
);
68 static void termp__t_post(DECL_ARGS
);
69 static void termp_bd_post(DECL_ARGS
);
70 static void termp_bk_post(DECL_ARGS
);
71 static void termp_bl_post(DECL_ARGS
);
72 static void termp_eo_post(DECL_ARGS
);
73 static void termp_fd_post(DECL_ARGS
);
74 static void termp_fo_post(DECL_ARGS
);
75 static void termp_in_post(DECL_ARGS
);
76 static void termp_it_post(DECL_ARGS
);
77 static void termp_lb_post(DECL_ARGS
);
78 static void termp_nm_post(DECL_ARGS
);
79 static void termp_pf_post(DECL_ARGS
);
80 static void termp_quote_post(DECL_ARGS
);
81 static void termp_sh_post(DECL_ARGS
);
82 static void termp_ss_post(DECL_ARGS
);
84 static int termp__a_pre(DECL_ARGS
);
85 static int termp__t_pre(DECL_ARGS
);
86 static int termp_an_pre(DECL_ARGS
);
87 static int termp_ap_pre(DECL_ARGS
);
88 static int termp_bd_pre(DECL_ARGS
);
89 static int termp_bf_pre(DECL_ARGS
);
90 static int termp_bk_pre(DECL_ARGS
);
91 static int termp_bl_pre(DECL_ARGS
);
92 static int termp_bold_pre(DECL_ARGS
);
93 static int termp_bt_pre(DECL_ARGS
);
94 static int termp_bx_pre(DECL_ARGS
);
95 static int termp_cd_pre(DECL_ARGS
);
96 static int termp_d1_pre(DECL_ARGS
);
97 static int termp_eo_pre(DECL_ARGS
);
98 static int termp_er_pre(DECL_ARGS
);
99 static int termp_ex_pre(DECL_ARGS
);
100 static int termp_fa_pre(DECL_ARGS
);
101 static int termp_fd_pre(DECL_ARGS
);
102 static int termp_fl_pre(DECL_ARGS
);
103 static int termp_fn_pre(DECL_ARGS
);
104 static int termp_fo_pre(DECL_ARGS
);
105 static int termp_ft_pre(DECL_ARGS
);
106 static int termp_in_pre(DECL_ARGS
);
107 static int termp_it_pre(DECL_ARGS
);
108 static int termp_li_pre(DECL_ARGS
);
109 static int termp_ll_pre(DECL_ARGS
);
110 static int termp_lk_pre(DECL_ARGS
);
111 static int termp_nd_pre(DECL_ARGS
);
112 static int termp_nm_pre(DECL_ARGS
);
113 static int termp_ns_pre(DECL_ARGS
);
114 static int termp_quote_pre(DECL_ARGS
);
115 static int termp_rs_pre(DECL_ARGS
);
116 static int termp_rv_pre(DECL_ARGS
);
117 static int termp_sh_pre(DECL_ARGS
);
118 static int termp_skip_pre(DECL_ARGS
);
119 static int termp_sm_pre(DECL_ARGS
);
120 static int termp_sp_pre(DECL_ARGS
);
121 static int termp_ss_pre(DECL_ARGS
);
122 static int termp_tag_pre(DECL_ARGS
);
123 static int termp_under_pre(DECL_ARGS
);
124 static int termp_ud_pre(DECL_ARGS
);
125 static int termp_vt_pre(DECL_ARGS
);
126 static int termp_xr_pre(DECL_ARGS
);
127 static int termp_xx_pre(DECL_ARGS
);
129 static const struct termact termacts
[MDOC_MAX
] = {
130 { termp_ap_pre
, NULL
}, /* Ap */
131 { NULL
, NULL
}, /* Dd */
132 { NULL
, NULL
}, /* Dt */
133 { NULL
, NULL
}, /* Os */
134 { termp_sh_pre
, termp_sh_post
}, /* Sh */
135 { termp_ss_pre
, termp_ss_post
}, /* Ss */
136 { termp_sp_pre
, NULL
}, /* Pp */
137 { termp_d1_pre
, termp_bl_post
}, /* D1 */
138 { termp_d1_pre
, termp_bl_post
}, /* Dl */
139 { termp_bd_pre
, termp_bd_post
}, /* Bd */
140 { NULL
, NULL
}, /* Ed */
141 { termp_bl_pre
, termp_bl_post
}, /* Bl */
142 { NULL
, NULL
}, /* El */
143 { termp_it_pre
, termp_it_post
}, /* It */
144 { termp_under_pre
, NULL
}, /* Ad */
145 { termp_an_pre
, NULL
}, /* An */
146 { termp_under_pre
, NULL
}, /* Ar */
147 { termp_cd_pre
, NULL
}, /* Cd */
148 { termp_bold_pre
, NULL
}, /* Cm */
149 { termp_li_pre
, NULL
}, /* Dv */
150 { termp_er_pre
, NULL
}, /* Er */
151 { termp_tag_pre
, NULL
}, /* Ev */
152 { termp_ex_pre
, NULL
}, /* Ex */
153 { termp_fa_pre
, NULL
}, /* Fa */
154 { termp_fd_pre
, termp_fd_post
}, /* Fd */
155 { termp_fl_pre
, NULL
}, /* Fl */
156 { termp_fn_pre
, NULL
}, /* Fn */
157 { termp_ft_pre
, NULL
}, /* Ft */
158 { termp_bold_pre
, NULL
}, /* Ic */
159 { termp_in_pre
, termp_in_post
}, /* In */
160 { termp_li_pre
, NULL
}, /* Li */
161 { termp_nd_pre
, NULL
}, /* Nd */
162 { termp_nm_pre
, termp_nm_post
}, /* Nm */
163 { termp_quote_pre
, termp_quote_post
}, /* Op */
164 { termp_ft_pre
, NULL
}, /* Ot */
165 { termp_under_pre
, NULL
}, /* Pa */
166 { termp_rv_pre
, NULL
}, /* Rv */
167 { NULL
, NULL
}, /* St */
168 { termp_under_pre
, NULL
}, /* Va */
169 { termp_vt_pre
, NULL
}, /* Vt */
170 { termp_xr_pre
, NULL
}, /* Xr */
171 { termp__a_pre
, termp____post
}, /* %A */
172 { termp_under_pre
, termp____post
}, /* %B */
173 { NULL
, termp____post
}, /* %D */
174 { termp_under_pre
, termp____post
}, /* %I */
175 { termp_under_pre
, termp____post
}, /* %J */
176 { NULL
, termp____post
}, /* %N */
177 { NULL
, termp____post
}, /* %O */
178 { NULL
, termp____post
}, /* %P */
179 { NULL
, termp____post
}, /* %R */
180 { termp__t_pre
, termp__t_post
}, /* %T */
181 { NULL
, termp____post
}, /* %V */
182 { NULL
, NULL
}, /* Ac */
183 { termp_quote_pre
, termp_quote_post
}, /* Ao */
184 { termp_quote_pre
, termp_quote_post
}, /* Aq */
185 { NULL
, NULL
}, /* At */
186 { NULL
, NULL
}, /* Bc */
187 { termp_bf_pre
, NULL
}, /* Bf */
188 { termp_quote_pre
, termp_quote_post
}, /* Bo */
189 { termp_quote_pre
, termp_quote_post
}, /* Bq */
190 { termp_xx_pre
, NULL
}, /* Bsx */
191 { termp_bx_pre
, NULL
}, /* Bx */
192 { termp_skip_pre
, NULL
}, /* Db */
193 { NULL
, NULL
}, /* Dc */
194 { termp_quote_pre
, termp_quote_post
}, /* Do */
195 { termp_quote_pre
, termp_quote_post
}, /* Dq */
196 { NULL
, NULL
}, /* Ec */ /* FIXME: no space */
197 { NULL
, NULL
}, /* Ef */
198 { termp_under_pre
, NULL
}, /* Em */
199 { termp_eo_pre
, termp_eo_post
}, /* Eo */
200 { termp_xx_pre
, NULL
}, /* Fx */
201 { termp_bold_pre
, NULL
}, /* Ms */
202 { termp_li_pre
, NULL
}, /* No */
203 { termp_ns_pre
, NULL
}, /* Ns */
204 { termp_xx_pre
, NULL
}, /* Nx */
205 { termp_xx_pre
, NULL
}, /* Ox */
206 { NULL
, NULL
}, /* Pc */
207 { NULL
, termp_pf_post
}, /* Pf */
208 { termp_quote_pre
, termp_quote_post
}, /* Po */
209 { termp_quote_pre
, termp_quote_post
}, /* Pq */
210 { NULL
, NULL
}, /* Qc */
211 { termp_quote_pre
, termp_quote_post
}, /* Ql */
212 { termp_quote_pre
, termp_quote_post
}, /* Qo */
213 { termp_quote_pre
, termp_quote_post
}, /* Qq */
214 { NULL
, NULL
}, /* Re */
215 { termp_rs_pre
, NULL
}, /* Rs */
216 { NULL
, NULL
}, /* Sc */
217 { termp_quote_pre
, termp_quote_post
}, /* So */
218 { termp_quote_pre
, termp_quote_post
}, /* Sq */
219 { termp_sm_pre
, NULL
}, /* Sm */
220 { termp_under_pre
, NULL
}, /* Sx */
221 { termp_bold_pre
, NULL
}, /* Sy */
222 { NULL
, NULL
}, /* Tn */
223 { termp_xx_pre
, NULL
}, /* Ux */
224 { NULL
, NULL
}, /* Xc */
225 { NULL
, NULL
}, /* Xo */
226 { termp_fo_pre
, termp_fo_post
}, /* Fo */
227 { NULL
, NULL
}, /* Fc */
228 { termp_quote_pre
, termp_quote_post
}, /* Oo */
229 { NULL
, NULL
}, /* Oc */
230 { termp_bk_pre
, termp_bk_post
}, /* Bk */
231 { NULL
, NULL
}, /* Ek */
232 { termp_bt_pre
, NULL
}, /* Bt */
233 { NULL
, NULL
}, /* Hf */
234 { termp_under_pre
, NULL
}, /* Fr */
235 { termp_ud_pre
, NULL
}, /* Ud */
236 { NULL
, termp_lb_post
}, /* Lb */
237 { termp_sp_pre
, NULL
}, /* Lp */
238 { termp_lk_pre
, NULL
}, /* Lk */
239 { termp_under_pre
, NULL
}, /* Mt */
240 { termp_quote_pre
, termp_quote_post
}, /* Brq */
241 { termp_quote_pre
, termp_quote_post
}, /* Bro */
242 { NULL
, NULL
}, /* Brc */
243 { NULL
, termp____post
}, /* %C */
244 { termp_skip_pre
, NULL
}, /* Es */
245 { termp_quote_pre
, termp_quote_post
}, /* En */
246 { termp_xx_pre
, NULL
}, /* Dx */
247 { NULL
, termp____post
}, /* %Q */
248 { termp_sp_pre
, NULL
}, /* br */
249 { termp_sp_pre
, NULL
}, /* sp */
250 { NULL
, termp____post
}, /* %U */
251 { NULL
, NULL
}, /* Ta */
252 { termp_ll_pre
, NULL
}, /* ll */
258 terminal_mdoc(void *arg
, const struct roff_man
*mdoc
)
263 p
= (struct termp
*)arg
;
265 p
->rmargin
= p
->maxrmargin
= p
->defrmargin
;
266 p
->tabwidth
= term_len(p
, 5);
268 n
= mdoc
->first
->child
;
269 if (p
->synopsisonly
) {
271 if (n
->tok
== MDOC_Sh
&& n
->sec
== SEC_SYNOPSIS
) {
272 if (n
->child
->next
->child
!= NULL
)
273 print_mdoc_nodelist(p
, NULL
,
275 n
->child
->next
->child
);
282 if (p
->defindent
== 0)
284 term_begin(p
, print_mdoc_head
, print_mdoc_foot
,
287 if (n
->tok
!= MDOC_Sh
)
289 print_mdoc_nodelist(p
, NULL
, &mdoc
->meta
, n
);
296 print_mdoc_nodelist(DECL_ARGS
)
300 print_mdoc_node(p
, pair
, meta
, n
);
306 print_mdoc_node(DECL_ARGS
)
309 struct termpair npair
;
310 size_t offset
, rmargin
;
314 rmargin
= p
->rmargin
;
315 n
->flags
&= ~MDOC_ENDED
;
316 n
->prev_font
= p
->fonti
;
318 memset(&npair
, 0, sizeof(struct termpair
));
322 * Keeps only work until the end of a line. If a keep was
323 * invoked in a prior line, revert it to PREKEEP.
326 if (p
->flags
& TERMP_KEEP
&& n
->flags
& MDOC_LINE
) {
327 p
->flags
&= ~TERMP_KEEP
;
328 p
->flags
|= TERMP_PREKEEP
;
332 * After the keep flags have been set up, we may now
333 * produce output. Note that some pre-handlers do so.
338 if (' ' == *n
->string
&& MDOC_LINE
& n
->flags
)
340 if (MDOC_DELIMC
& n
->flags
)
341 p
->flags
|= TERMP_NOSPACE
;
342 term_word(p
, n
->string
);
343 if (MDOC_DELIMO
& n
->flags
)
344 p
->flags
|= TERMP_NOSPACE
;
347 if ( ! (n
->flags
& MDOC_LINE
))
348 p
->flags
|= TERMP_NOSPACE
;
350 if (n
->next
!= NULL
&& ! (n
->next
->flags
& MDOC_LINE
))
351 p
->flags
|= TERMP_NOSPACE
;
354 if (p
->tbl
.cols
== NULL
)
356 term_tbl(p
, n
->span
);
359 if (termacts
[n
->tok
].pre
&&
360 (n
->end
== ENDBODY_NOT
|| n
->nchild
))
361 chld
= (*termacts
[n
->tok
].pre
)
362 (p
, &npair
, meta
, n
);
366 if (chld
&& n
->child
)
367 print_mdoc_nodelist(p
, &npair
, meta
, n
->child
);
370 (ENDBODY_NOT
== n
->end
? n
: n
->body
)->prev_font
);
380 if ( ! termacts
[n
->tok
].post
|| MDOC_ENDED
& n
->flags
)
382 (void)(*termacts
[n
->tok
].post
)(p
, &npair
, meta
, n
);
385 * Explicit end tokens not only call the post
386 * handler, but also tell the respective block
387 * that it must not call the post handler again.
389 if (ENDBODY_NOT
!= n
->end
)
390 n
->body
->flags
|= MDOC_ENDED
;
393 * End of line terminating an implicit block
394 * while an explicit block is still open.
395 * Continue the explicit block without spacing.
397 if (ENDBODY_NOSPACE
== n
->end
)
398 p
->flags
|= TERMP_NOSPACE
;
402 if (MDOC_EOS
& n
->flags
)
403 p
->flags
|= TERMP_SENTENCE
;
405 if (MDOC_ll
!= n
->tok
) {
407 p
->rmargin
= rmargin
;
412 print_mdoc_foot(struct termp
*p
, const struct roff_meta
*meta
)
416 term_fontrepl(p
, TERMFONT_NONE
);
419 * Output the footer in new-groff style, that is, three columns
420 * with the middle being the manual date and flanking columns
421 * being the operating system:
429 sz
= term_strlen(p
, meta
->date
);
430 p
->rmargin
= p
->maxrmargin
> sz
?
431 (p
->maxrmargin
+ term_len(p
, 1) - sz
) / 2 : 0;
433 p
->flags
|= TERMP_NOSPACE
| TERMP_NOBREAK
;
435 term_word(p
, meta
->os
);
438 p
->offset
= p
->rmargin
;
439 sz
= term_strlen(p
, meta
->os
);
440 p
->rmargin
= p
->maxrmargin
> sz
? p
->maxrmargin
- sz
: 0;
441 p
->flags
|= TERMP_NOSPACE
;
443 term_word(p
, meta
->date
);
446 p
->offset
= p
->rmargin
;
447 p
->rmargin
= p
->maxrmargin
;
449 p
->flags
&= ~TERMP_NOBREAK
;
450 p
->flags
|= TERMP_NOSPACE
;
452 term_word(p
, meta
->os
);
456 p
->rmargin
= p
->maxrmargin
;
461 print_mdoc_head(struct termp
*p
, const struct roff_meta
*meta
)
463 char *volume
, *title
;
464 size_t vollen
, titlen
;
467 * The header is strange. It has three components, which are
468 * really two with the first duplicated. It goes like this:
470 * IDENTIFIER TITLE IDENTIFIER
472 * The IDENTIFIER is NAME(SECTION), which is the command-name
473 * (if given, or "unknown" if not) followed by the manual page
474 * section. These are given in `Dt'. The TITLE is a free-form
475 * string depending on the manual volume. If not specified, it
476 * switches on the manual section.
480 if (NULL
== meta
->arch
)
481 volume
= mandoc_strdup(meta
->vol
);
483 mandoc_asprintf(&volume
, "%s (%s)",
484 meta
->vol
, meta
->arch
);
485 vollen
= term_strlen(p
, volume
);
487 if (NULL
== meta
->msec
)
488 title
= mandoc_strdup(meta
->title
);
490 mandoc_asprintf(&title
, "%s(%s)",
491 meta
->title
, meta
->msec
);
492 titlen
= term_strlen(p
, title
);
494 p
->flags
|= TERMP_NOBREAK
| TERMP_NOSPACE
;
497 p
->rmargin
= 2 * (titlen
+1) + vollen
< p
->maxrmargin
?
498 (p
->maxrmargin
- vollen
+ term_len(p
, 1)) / 2 :
499 vollen
< p
->maxrmargin
? p
->maxrmargin
- vollen
: 0;
504 p
->flags
|= TERMP_NOSPACE
;
505 p
->offset
= p
->rmargin
;
506 p
->rmargin
= p
->offset
+ vollen
+ titlen
< p
->maxrmargin
?
507 p
->maxrmargin
- titlen
: p
->maxrmargin
;
509 term_word(p
, volume
);
512 p
->flags
&= ~TERMP_NOBREAK
;
514 if (p
->rmargin
+ titlen
<= p
->maxrmargin
) {
515 p
->flags
|= TERMP_NOSPACE
;
516 p
->offset
= p
->rmargin
;
517 p
->rmargin
= p
->maxrmargin
;
522 p
->flags
&= ~TERMP_NOSPACE
;
524 p
->rmargin
= p
->maxrmargin
;
530 a2width(const struct termp
*p
, const char *v
)
534 if (a2roffsu(v
, &su
, SCALE_MAX
) < 2) {
535 SCALE_HS_INIT(&su
, term_strlen(p
, v
));
536 su
.scale
/= term_strlen(p
, "0");
538 return(term_hspan(p
, &su
) / 24);
542 * Determine how much space to print out before block elements of `It'
543 * (and thus `Bl') and `Bd'. And then go ahead and print that space,
547 print_bvspace(struct termp
*p
,
548 const struct roff_node
*bl
,
549 const struct roff_node
*n
)
551 const struct roff_node
*nn
;
557 if (MDOC_Bd
== bl
->tok
&& bl
->norm
->Bd
.comp
)
559 if (MDOC_Bl
== bl
->tok
&& bl
->norm
->Bl
.comp
)
562 /* Do not vspace directly after Ss/Sh. */
565 while (nn
->prev
== NULL
) {
568 if (nn
->type
== ROFFT_ROOT
)
570 } while (nn
->type
!= ROFFT_BLOCK
);
571 if (nn
->tok
== MDOC_Sh
|| nn
->tok
== MDOC_Ss
)
573 if (nn
->tok
== MDOC_It
&&
574 nn
->parent
->parent
->norm
->Bl
.type
!= LIST_item
)
578 /* A `-column' does not assert vspace within the list. */
580 if (MDOC_Bl
== bl
->tok
&& LIST_column
== bl
->norm
->Bl
.type
)
581 if (n
->prev
&& MDOC_It
== n
->prev
->tok
)
584 /* A `-diag' without body does not vspace. */
586 if (MDOC_Bl
== bl
->tok
&& LIST_diag
== bl
->norm
->Bl
.type
)
587 if (n
->prev
&& MDOC_It
== n
->prev
->tok
) {
588 assert(n
->prev
->body
);
589 if (NULL
== n
->prev
->body
->child
)
598 termp_ll_pre(DECL_ARGS
)
601 term_setwidth(p
, n
->nchild
? n
->child
->string
: NULL
);
606 termp_it_pre(DECL_ARGS
)
609 const struct roff_node
*bl
, *nn
;
611 int i
, offset
, width
;
614 if (n
->type
== ROFFT_BLOCK
) {
615 print_bvspace(p
, n
->parent
->parent
, n
);
619 bl
= n
->parent
->parent
->parent
;
620 type
= bl
->norm
->Bl
.type
;
623 * Defaults for specific list types.
634 width
= term_len(p
, 2);
637 width
= term_len(p
, 8);
642 width
= term_len(p
, 10);
651 * First calculate width and offset. This is pretty easy unless
652 * we're a -column list, in which case all prior columns must
656 if (bl
->norm
->Bl
.offs
!= NULL
) {
657 offset
= a2width(p
, bl
->norm
->Bl
.offs
);
658 if (offset
< 0 && (size_t)(-offset
) > p
->offset
)
660 else if (offset
> SHRT_MAX
)
666 if (n
->type
== ROFFT_HEAD
)
670 * Imitate groff's column handling:
671 * - For each earlier column, add its width.
672 * - For less than 5 columns, add four more blanks per
674 * - For exactly 5 columns, add three more blank per
676 * - For more than 5 columns, add only one column.
678 ncols
= bl
->norm
->Bl
.ncols
;
679 dcol
= ncols
< 5 ? term_len(p
, 4) :
680 ncols
== 5 ? term_len(p
, 3) : term_len(p
, 1);
683 * Calculate the offset by applying all prior ROFFT_BODY,
684 * so we stop at the ROFFT_HEAD (nn->prev == NULL).
687 for (i
= 0, nn
= n
->prev
;
688 nn
->prev
&& i
< (int)ncols
;
690 offset
+= dcol
+ a2width(p
,
691 bl
->norm
->Bl
.cols
[i
]);
694 * When exceeding the declared number of columns, leave
695 * the remaining widths at 0. This will later be
696 * adjusted to the default width of 10, or, for the last
697 * column, stretched to the right margin.
703 * Use the declared column widths, extended as explained
704 * in the preceding paragraph.
706 width
= a2width(p
, bl
->norm
->Bl
.cols
[i
]) + dcol
;
709 if (NULL
== bl
->norm
->Bl
.width
)
713 * Note: buffer the width by 2, which is groff's magic
714 * number for buffering single arguments. See the above
715 * handling for column for how this changes.
717 width
= a2width(p
, bl
->norm
->Bl
.width
) + term_len(p
, 2);
718 if (width
< 0 && (size_t)(-width
) > p
->offset
)
720 else if (width
> SHRT_MAX
)
726 * Whitespace control. Inset bodies need an initial space,
727 * while diagonal bodies need two.
730 p
->flags
|= TERMP_NOSPACE
;
734 if (n
->type
== ROFFT_BODY
)
735 term_word(p
, "\\ \\ ");
738 if (n
->type
== ROFFT_BODY
&& n
->parent
->head
->nchild
)
745 p
->flags
|= TERMP_NOSPACE
;
749 if (n
->type
== ROFFT_HEAD
)
750 term_fontpush(p
, TERMFONT_BOLD
);
757 * Pad and break control. This is the tricky part. These flags
758 * are documented in term_flushln() in term.c. Note that we're
759 * going to unset all of these flags in termp_it_post() when we
766 * Weird special case.
767 * Some very narrow lists actually hang.
775 if (width
<= (int)term_len(p
, 2))
776 p
->flags
|= TERMP_HANG
;
777 if (n
->type
!= ROFFT_HEAD
)
779 p
->flags
|= TERMP_NOBREAK
;
783 if (n
->type
!= ROFFT_HEAD
)
787 * This is ugly. If `-hang' is specified and the body
788 * is a `Bl' or `Bd', then we want basically to nullify
789 * the "overstep" effect in term_flushln() and treat
790 * this as a `-ohang' list instead.
792 if (NULL
!= n
->next
&&
793 NULL
!= n
->next
->child
&&
794 (MDOC_Bl
== n
->next
->child
->tok
||
795 MDOC_Bd
== n
->next
->child
->tok
))
798 p
->flags
|= TERMP_NOBREAK
| TERMP_BRIND
| TERMP_HANG
;
802 if (n
->type
!= ROFFT_HEAD
)
805 p
->flags
|= TERMP_NOBREAK
| TERMP_BRIND
;
808 if (NULL
== n
->next
|| NULL
== n
->next
->child
)
809 p
->flags
|= TERMP_DANGLE
;
812 if (n
->type
== ROFFT_HEAD
)
815 if (NULL
== n
->next
) {
816 p
->flags
&= ~TERMP_NOBREAK
;
819 p
->flags
|= TERMP_NOBREAK
;
825 if (n
->type
!= ROFFT_HEAD
)
827 p
->flags
|= TERMP_NOBREAK
| TERMP_BRIND
;
835 * Margin control. Set-head-width lists have their right
836 * margins shortened. The body for these lists has the offset
837 * necessarily lengthened. Everybody gets the offset.
845 * Same stipulation as above, regarding `-hang'. We
846 * don't want to recalculate rmargin and offsets when
847 * using `Bd' or `Bl' within `-hang' overstep lists.
849 if (n
->type
== ROFFT_HEAD
&&
851 NULL
!= n
->next
->child
&&
852 (MDOC_Bl
== n
->next
->child
->tok
||
853 MDOC_Bd
== n
->next
->child
->tok
))
865 if (n
->type
== ROFFT_HEAD
)
866 p
->rmargin
= p
->offset
+ width
;
872 p
->rmargin
= p
->offset
+ width
;
874 * XXX - this behaviour is not documented: the
875 * right-most column is filled to the right margin.
877 if (n
->type
== ROFFT_HEAD
)
879 if (NULL
== n
->next
&& p
->rmargin
< p
->maxrmargin
)
880 p
->rmargin
= p
->maxrmargin
;
887 * The dash, hyphen, bullet and enum lists all have a special
888 * HEAD character (temporarily bold, in some cases).
891 if (n
->type
== ROFFT_HEAD
)
894 term_fontpush(p
, TERMFONT_BOLD
);
895 term_word(p
, "\\[bu]");
901 term_fontpush(p
, TERMFONT_BOLD
);
902 term_word(p
, "\\(hy");
906 (pair
->ppair
->ppair
->count
)++;
907 (void)snprintf(buf
, sizeof(buf
), "%d.",
908 pair
->ppair
->ppair
->count
);
916 * If we're not going to process our children, indicate so here.
929 if (n
->type
== ROFFT_HEAD
)
933 if (n
->type
== ROFFT_HEAD
)
944 termp_it_post(DECL_ARGS
)
948 if (n
->type
== ROFFT_BLOCK
)
951 type
= n
->parent
->parent
->parent
->norm
->Bl
.type
;
959 if (n
->type
== ROFFT_BODY
)
963 if (n
->type
== ROFFT_BODY
)
972 * Now that our output is flushed, we can reset our tags. Since
973 * only `It' sets these flags, we're free to assume that nobody
974 * has munged them in the meanwhile.
977 p
->flags
&= ~(TERMP_NOBREAK
| TERMP_BRIND
|
978 TERMP_DANGLE
| TERMP_HANG
);
983 termp_nm_pre(DECL_ARGS
)
987 if (n
->type
== ROFFT_BLOCK
) {
988 p
->flags
|= TERMP_PREKEEP
;
992 if (n
->type
== ROFFT_BODY
) {
993 if (NULL
== n
->child
)
995 p
->flags
|= TERMP_NOSPACE
;
997 if (n
->prev
->child
!= NULL
)
998 cp
= n
->prev
->child
->string
;
1002 p
->offset
+= term_len(p
, 6);
1004 p
->offset
+= term_len(p
, 1) + term_strlen(p
, cp
);
1008 if (NULL
== n
->child
&& NULL
== meta
->name
)
1011 if (n
->type
== ROFFT_HEAD
)
1012 synopsis_pre(p
, n
->parent
);
1014 if (n
->type
== ROFFT_HEAD
&&
1015 NULL
!= n
->next
&& NULL
!= n
->next
->child
) {
1016 p
->flags
|= TERMP_NOSPACE
| TERMP_NOBREAK
| TERMP_BRIND
;
1018 p
->rmargin
= p
->offset
+ term_len(p
, 1);
1019 if (NULL
== n
->child
) {
1020 p
->rmargin
+= term_strlen(p
, meta
->name
);
1021 } else if (n
->child
->type
== ROFFT_TEXT
) {
1022 p
->rmargin
+= term_strlen(p
, n
->child
->string
);
1024 p
->flags
|= TERMP_HANG
;
1026 p
->rmargin
+= term_len(p
, 5);
1027 p
->flags
|= TERMP_HANG
;
1031 term_fontpush(p
, TERMFONT_BOLD
);
1032 if (NULL
== n
->child
)
1033 term_word(p
, meta
->name
);
1038 termp_nm_post(DECL_ARGS
)
1041 if (n
->type
== ROFFT_BLOCK
) {
1042 p
->flags
&= ~(TERMP_KEEP
| TERMP_PREKEEP
);
1043 } else if (n
->type
== ROFFT_HEAD
&&
1044 NULL
!= n
->next
&& NULL
!= n
->next
->child
) {
1046 p
->flags
&= ~(TERMP_NOBREAK
| TERMP_BRIND
| TERMP_HANG
);
1048 } else if (n
->type
== ROFFT_BODY
&& n
->child
!= NULL
)
1053 termp_fl_pre(DECL_ARGS
)
1056 termp_tag_pre(p
, pair
, meta
, n
);
1057 term_fontpush(p
, TERMFONT_BOLD
);
1058 term_word(p
, "\\-");
1060 if ( ! (n
->nchild
== 0 &&
1062 n
->next
->type
== ROFFT_TEXT
||
1063 n
->next
->flags
& MDOC_LINE
)))
1064 p
->flags
|= TERMP_NOSPACE
;
1070 termp__a_pre(DECL_ARGS
)
1073 if (n
->prev
&& MDOC__A
== n
->prev
->tok
)
1074 if (NULL
== n
->next
|| MDOC__A
!= n
->next
->tok
)
1075 term_word(p
, "and");
1081 termp_an_pre(DECL_ARGS
)
1084 if (n
->norm
->An
.auth
== AUTH_split
) {
1085 p
->flags
&= ~TERMP_NOSPLIT
;
1086 p
->flags
|= TERMP_SPLIT
;
1089 if (n
->norm
->An
.auth
== AUTH_nosplit
) {
1090 p
->flags
&= ~TERMP_SPLIT
;
1091 p
->flags
|= TERMP_NOSPLIT
;
1095 if (p
->flags
& TERMP_SPLIT
)
1098 if (n
->sec
== SEC_AUTHORS
&& ! (p
->flags
& TERMP_NOSPLIT
))
1099 p
->flags
|= TERMP_SPLIT
;
1105 termp_ns_pre(DECL_ARGS
)
1108 if ( ! (MDOC_LINE
& n
->flags
))
1109 p
->flags
|= TERMP_NOSPACE
;
1114 termp_rs_pre(DECL_ARGS
)
1117 if (SEC_SEE_ALSO
!= n
->sec
)
1119 if (n
->type
== ROFFT_BLOCK
&& n
->prev
!= NULL
)
1125 termp_rv_pre(DECL_ARGS
)
1133 term_word(p
, "The");
1135 for (n
= n
->child
; n
; n
= n
->next
) {
1136 term_fontpush(p
, TERMFONT_BOLD
);
1137 term_word(p
, n
->string
);
1140 p
->flags
|= TERMP_NOSPACE
;
1143 if (n
->next
== NULL
)
1147 p
->flags
|= TERMP_NOSPACE
;
1150 if (n
->next
->next
== NULL
)
1151 term_word(p
, "and");
1155 term_word(p
, "functions return");
1157 term_word(p
, "function returns");
1159 term_word(p
, "the value\\~0 if successful;");
1161 term_word(p
, "Upon successful completion,"
1162 " the value\\~0 is returned;");
1164 term_word(p
, "otherwise the value\\~\\-1 is returned"
1165 " and the global variable");
1167 term_fontpush(p
, TERMFONT_UNDER
);
1168 term_word(p
, "errno");
1171 term_word(p
, "is set to indicate the error.");
1172 p
->flags
|= TERMP_SENTENCE
;
1178 termp_ex_pre(DECL_ARGS
)
1183 term_word(p
, "The");
1186 for (n
= n
->child
; n
; n
= n
->next
) {
1187 term_fontpush(p
, TERMFONT_BOLD
);
1188 term_word(p
, n
->string
);
1191 if (nchild
> 2 && n
->next
) {
1192 p
->flags
|= TERMP_NOSPACE
;
1196 if (n
->next
&& NULL
== n
->next
->next
)
1197 term_word(p
, "and");
1201 term_word(p
, "utilities exit\\~0");
1203 term_word(p
, "utility exits\\~0");
1205 term_word(p
, "on success, and\\~>0 if an error occurs.");
1207 p
->flags
|= TERMP_SENTENCE
;
1212 termp_nd_pre(DECL_ARGS
)
1215 if (n
->type
== ROFFT_BODY
)
1216 term_word(p
, "\\(en");
1221 termp_bl_pre(DECL_ARGS
)
1224 return(n
->type
!= ROFFT_HEAD
);
1228 termp_bl_post(DECL_ARGS
)
1231 if (n
->type
== ROFFT_BLOCK
)
1236 termp_xr_pre(DECL_ARGS
)
1239 if (NULL
== (n
= n
->child
))
1242 assert(n
->type
== ROFFT_TEXT
);
1243 term_word(p
, n
->string
);
1245 if (NULL
== (n
= n
->next
))
1248 p
->flags
|= TERMP_NOSPACE
;
1250 p
->flags
|= TERMP_NOSPACE
;
1252 assert(n
->type
== ROFFT_TEXT
);
1253 term_word(p
, n
->string
);
1255 p
->flags
|= TERMP_NOSPACE
;
1262 * This decides how to assert whitespace before any of the SYNOPSIS set
1263 * of macros (which, as in the case of Ft/Fo and Ft/Fn, may contain
1267 synopsis_pre(struct termp
*p
, const struct roff_node
*n
)
1270 * Obviously, if we're not in a SYNOPSIS or no prior macros
1271 * exist, do nothing.
1273 if (NULL
== n
->prev
|| ! (MDOC_SYNPRETTY
& n
->flags
))
1277 * If we're the second in a pair of like elements, emit our
1278 * newline and return. UNLESS we're `Fo', `Fn', `Fn', in which
1279 * case we soldier on.
1281 if (n
->prev
->tok
== n
->tok
&&
1282 MDOC_Ft
!= n
->tok
&&
1283 MDOC_Fo
!= n
->tok
&&
1284 MDOC_Fn
!= n
->tok
) {
1290 * If we're one of the SYNOPSIS set and non-like pair-wise after
1291 * another (or Fn/Fo, which we've let slip through) then assert
1292 * vertical space, else only newline and move on.
1294 switch (n
->prev
->tok
) {
1307 if (MDOC_Fn
!= n
->tok
&& MDOC_Fo
!= n
->tok
) {
1319 termp_vt_pre(DECL_ARGS
)
1322 if (n
->type
== ROFFT_ELEM
) {
1324 return(termp_under_pre(p
, pair
, meta
, n
));
1325 } else if (n
->type
== ROFFT_BLOCK
) {
1328 } else if (n
->type
== ROFFT_HEAD
)
1331 return(termp_under_pre(p
, pair
, meta
, n
));
1335 termp_bold_pre(DECL_ARGS
)
1338 termp_tag_pre(p
, pair
, meta
, n
);
1339 term_fontpush(p
, TERMFONT_BOLD
);
1344 termp_fd_pre(DECL_ARGS
)
1348 return(termp_bold_pre(p
, pair
, meta
, n
));
1352 termp_fd_post(DECL_ARGS
)
1359 termp_sh_pre(DECL_ARGS
)
1365 * Vertical space before sections, except
1366 * when the previous section was empty.
1368 if (n
->prev
== NULL
||
1369 n
->prev
->tok
!= MDOC_Sh
||
1370 (n
->prev
->body
!= NULL
&&
1371 n
->prev
->body
->child
!= NULL
))
1375 term_fontpush(p
, TERMFONT_BOLD
);
1378 p
->offset
= term_len(p
, p
->defindent
);
1380 case SEC_DESCRIPTION
:
1384 p
->flags
&= ~(TERMP_SPLIT
|TERMP_NOSPLIT
);
1397 termp_sh_post(DECL_ARGS
)
1414 termp_bt_pre(DECL_ARGS
)
1417 term_word(p
, "is currently in beta test.");
1418 p
->flags
|= TERMP_SENTENCE
;
1423 termp_lb_post(DECL_ARGS
)
1426 if (SEC_LIBRARY
== n
->sec
&& MDOC_LINE
& n
->flags
)
1431 termp_ud_pre(DECL_ARGS
)
1434 term_word(p
, "currently under development.");
1435 p
->flags
|= TERMP_SENTENCE
;
1440 termp_d1_pre(DECL_ARGS
)
1443 if (n
->type
!= ROFFT_BLOCK
)
1446 p
->offset
+= term_len(p
, p
->defindent
+ 1);
1451 termp_ft_pre(DECL_ARGS
)
1454 /* NB: MDOC_LINE does not effect this! */
1456 term_fontpush(p
, TERMFONT_UNDER
);
1461 termp_fn_pre(DECL_ARGS
)
1466 pretty
= MDOC_SYNPRETTY
& n
->flags
;
1470 if (NULL
== (n
= n
->child
))
1474 rmargin
= p
->rmargin
;
1475 p
->rmargin
= p
->offset
+ term_len(p
, 4);
1476 p
->flags
|= TERMP_NOBREAK
| TERMP_BRIND
| TERMP_HANG
;
1479 assert(n
->type
== ROFFT_TEXT
);
1480 term_fontpush(p
, TERMFONT_BOLD
);
1481 term_word(p
, n
->string
);
1484 if (n
->sec
== SEC_DESCRIPTION
)
1485 tag_put(n
->string
, ++fn_prio
, p
->line
);
1489 p
->flags
&= ~(TERMP_NOBREAK
| TERMP_BRIND
| TERMP_HANG
);
1490 p
->offset
= p
->rmargin
;
1491 p
->rmargin
= rmargin
;
1494 p
->flags
|= TERMP_NOSPACE
;
1496 p
->flags
|= TERMP_NOSPACE
;
1498 for (n
= n
->next
; n
; n
= n
->next
) {
1499 assert(n
->type
== ROFFT_TEXT
);
1500 term_fontpush(p
, TERMFONT_UNDER
);
1502 p
->flags
|= TERMP_NBRWORD
;
1503 term_word(p
, n
->string
);
1507 p
->flags
|= TERMP_NOSPACE
;
1512 p
->flags
|= TERMP_NOSPACE
;
1516 p
->flags
|= TERMP_NOSPACE
;
1525 termp_fa_pre(DECL_ARGS
)
1527 const struct roff_node
*nn
;
1529 if (n
->parent
->tok
!= MDOC_Fo
) {
1530 term_fontpush(p
, TERMFONT_UNDER
);
1534 for (nn
= n
->child
; nn
; nn
= nn
->next
) {
1535 term_fontpush(p
, TERMFONT_UNDER
);
1536 p
->flags
|= TERMP_NBRWORD
;
1537 term_word(p
, nn
->string
);
1540 if (nn
->next
|| (n
->next
&& n
->next
->tok
== MDOC_Fa
)) {
1541 p
->flags
|= TERMP_NOSPACE
;
1550 termp_bd_pre(DECL_ARGS
)
1552 size_t tabwidth
, lm
, len
, rm
, rmax
;
1553 struct roff_node
*nn
;
1556 if (n
->type
== ROFFT_BLOCK
) {
1557 print_bvspace(p
, n
, n
);
1559 } else if (n
->type
== ROFFT_HEAD
)
1562 /* Handle the -offset argument. */
1564 if (n
->norm
->Bd
.offs
== NULL
||
1565 ! strcmp(n
->norm
->Bd
.offs
, "left"))
1567 else if ( ! strcmp(n
->norm
->Bd
.offs
, "indent"))
1568 p
->offset
+= term_len(p
, p
->defindent
+ 1);
1569 else if ( ! strcmp(n
->norm
->Bd
.offs
, "indent-two"))
1570 p
->offset
+= term_len(p
, (p
->defindent
+ 1) * 2);
1572 offset
= a2width(p
, n
->norm
->Bd
.offs
);
1573 if (offset
< 0 && (size_t)(-offset
) > p
->offset
)
1575 else if (offset
< SHRT_MAX
)
1576 p
->offset
+= offset
;
1580 * If -ragged or -filled are specified, the block does nothing
1581 * but change the indentation. If -unfilled or -literal are
1582 * specified, text is printed exactly as entered in the display:
1583 * for macro lines, a newline is appended to the line. Blank
1584 * lines are allowed.
1587 if (DISP_literal
!= n
->norm
->Bd
.type
&&
1588 DISP_unfilled
!= n
->norm
->Bd
.type
&&
1589 DISP_centered
!= n
->norm
->Bd
.type
)
1592 tabwidth
= p
->tabwidth
;
1593 if (DISP_literal
== n
->norm
->Bd
.type
)
1594 p
->tabwidth
= term_len(p
, 8);
1598 rmax
= p
->maxrmargin
;
1599 p
->rmargin
= p
->maxrmargin
= TERM_MAXMARGIN
;
1601 for (nn
= n
->child
; nn
; nn
= nn
->next
) {
1602 if (DISP_centered
== n
->norm
->Bd
.type
) {
1603 if (nn
->type
== ROFFT_TEXT
) {
1604 len
= term_strlen(p
, nn
->string
);
1605 p
->offset
= len
>= rm
? 0 :
1606 lm
+ len
>= rm
? rm
- len
:
1607 (lm
+ rm
- len
) / 2;
1611 print_mdoc_node(p
, pair
, meta
, nn
);
1613 * If the printed node flushes its own line, then we
1614 * needn't do it here as well. This is hacky, but the
1615 * notion of selective eoln whitespace is pretty dumb
1616 * anyway, so don't sweat it.
1638 if (p
->flags
& TERMP_NONEWLINE
||
1639 (nn
->next
&& ! (nn
->next
->flags
& MDOC_LINE
)))
1642 p
->flags
|= TERMP_NOSPACE
;
1645 p
->tabwidth
= tabwidth
;
1647 p
->maxrmargin
= rmax
;
1652 termp_bd_post(DECL_ARGS
)
1656 if (n
->type
!= ROFFT_BODY
)
1660 rmax
= p
->maxrmargin
;
1662 if (DISP_literal
== n
->norm
->Bd
.type
||
1663 DISP_unfilled
== n
->norm
->Bd
.type
)
1664 p
->rmargin
= p
->maxrmargin
= TERM_MAXMARGIN
;
1666 p
->flags
|= TERMP_NOSPACE
;
1670 p
->maxrmargin
= rmax
;
1674 termp_bx_pre(DECL_ARGS
)
1677 if (NULL
!= (n
= n
->child
)) {
1678 term_word(p
, n
->string
);
1679 p
->flags
|= TERMP_NOSPACE
;
1680 term_word(p
, "BSD");
1682 term_word(p
, "BSD");
1686 if (NULL
!= (n
= n
->next
)) {
1687 p
->flags
|= TERMP_NOSPACE
;
1689 p
->flags
|= TERMP_NOSPACE
;
1690 term_word(p
, n
->string
);
1697 termp_xx_pre(DECL_ARGS
)
1730 p
->flags
|= TERMP_KEEP
;
1731 term_word(p
, n
->child
->string
);
1738 termp_pf_post(DECL_ARGS
)
1741 if ( ! (n
->next
== NULL
|| n
->next
->flags
& MDOC_LINE
))
1742 p
->flags
|= TERMP_NOSPACE
;
1746 termp_ss_pre(DECL_ARGS
)
1756 term_fontpush(p
, TERMFONT_BOLD
);
1757 p
->offset
= term_len(p
, (p
->defindent
+1)/2);
1760 p
->offset
= term_len(p
, p
->defindent
);
1770 termp_ss_post(DECL_ARGS
)
1773 if (n
->type
== ROFFT_HEAD
|| n
->type
== ROFFT_BODY
)
1778 termp_cd_pre(DECL_ARGS
)
1782 term_fontpush(p
, TERMFONT_BOLD
);
1787 termp_in_pre(DECL_ARGS
)
1792 if (MDOC_SYNPRETTY
& n
->flags
&& MDOC_LINE
& n
->flags
) {
1793 term_fontpush(p
, TERMFONT_BOLD
);
1794 term_word(p
, "#include");
1798 term_fontpush(p
, TERMFONT_UNDER
);
1801 p
->flags
|= TERMP_NOSPACE
;
1806 termp_in_post(DECL_ARGS
)
1809 if (MDOC_SYNPRETTY
& n
->flags
)
1810 term_fontpush(p
, TERMFONT_BOLD
);
1812 p
->flags
|= TERMP_NOSPACE
;
1815 if (MDOC_SYNPRETTY
& n
->flags
)
1820 termp_sp_pre(DECL_ARGS
)
1828 if ( ! a2roffsu(n
->child
->string
, &su
, SCALE_VS
))
1830 len
= term_vspan(p
, &su
);
1848 for (i
= 0; i
< len
; i
++)
1855 termp_skip_pre(DECL_ARGS
)
1862 termp_quote_pre(DECL_ARGS
)
1865 if (n
->type
!= ROFFT_BODY
&& n
->type
!= ROFFT_ELEM
)
1872 term_word(p
, n
->nchild
== 1 &&
1873 n
->child
->tok
== MDOC_Mt
? "<" : "\\(la");
1892 term_word(p
, "\\(Lq");
1895 if (NULL
== n
->norm
->Es
||
1896 NULL
== n
->norm
->Es
->child
)
1898 term_word(p
, n
->norm
->Es
->child
->string
);
1917 term_word(p
, "\\(oq");
1924 p
->flags
|= TERMP_NOSPACE
;
1929 termp_quote_post(DECL_ARGS
)
1932 if (n
->type
!= ROFFT_BODY
&& n
->type
!= ROFFT_ELEM
)
1935 p
->flags
|= TERMP_NOSPACE
;
1941 term_word(p
, n
->nchild
== 1 &&
1942 n
->child
->tok
== MDOC_Mt
? ">" : "\\(ra");
1961 term_word(p
, "\\(Rq");
1964 if (n
->norm
->Es
== NULL
||
1965 n
->norm
->Es
->child
== NULL
||
1966 n
->norm
->Es
->child
->next
== NULL
)
1967 p
->flags
&= ~TERMP_NOSPACE
;
1969 term_word(p
, n
->norm
->Es
->child
->next
->string
);
1988 term_word(p
, "\\(cq");
1997 termp_eo_pre(DECL_ARGS
)
2000 if (n
->type
!= ROFFT_BODY
)
2003 if (n
->end
== ENDBODY_NOT
&&
2004 n
->parent
->head
->child
== NULL
&&
2006 n
->child
->end
!= ENDBODY_NOT
)
2007 term_word(p
, "\\&");
2008 else if (n
->end
!= ENDBODY_NOT
? n
->child
!= NULL
:
2009 n
->parent
->head
->child
!= NULL
&& (n
->child
!= NULL
||
2010 (n
->parent
->tail
!= NULL
&& n
->parent
->tail
->child
!= NULL
)))
2011 p
->flags
|= TERMP_NOSPACE
;
2017 termp_eo_post(DECL_ARGS
)
2021 if (n
->type
!= ROFFT_BODY
)
2024 if (n
->end
!= ENDBODY_NOT
) {
2025 p
->flags
&= ~TERMP_NOSPACE
;
2029 body
= n
->child
!= NULL
|| n
->parent
->head
->child
!= NULL
;
2030 tail
= n
->parent
->tail
!= NULL
&& n
->parent
->tail
->child
!= NULL
;
2033 p
->flags
|= TERMP_NOSPACE
;
2034 else if ( ! (body
|| tail
))
2035 term_word(p
, "\\&");
2037 p
->flags
&= ~TERMP_NOSPACE
;
2041 termp_fo_pre(DECL_ARGS
)
2046 pretty
= MDOC_SYNPRETTY
& n
->flags
;
2048 if (n
->type
== ROFFT_BLOCK
) {
2051 } else if (n
->type
== ROFFT_BODY
) {
2053 rmargin
= p
->rmargin
;
2054 p
->rmargin
= p
->offset
+ term_len(p
, 4);
2055 p
->flags
|= TERMP_NOBREAK
| TERMP_BRIND
|
2058 p
->flags
|= TERMP_NOSPACE
;
2060 p
->flags
|= TERMP_NOSPACE
;
2063 p
->flags
&= ~(TERMP_NOBREAK
| TERMP_BRIND
|
2065 p
->offset
= p
->rmargin
;
2066 p
->rmargin
= rmargin
;
2071 if (NULL
== n
->child
)
2074 /* XXX: we drop non-initial arguments as per groff. */
2076 assert(n
->child
->string
);
2077 term_fontpush(p
, TERMFONT_BOLD
);
2078 term_word(p
, n
->child
->string
);
2083 termp_fo_post(DECL_ARGS
)
2086 if (n
->type
!= ROFFT_BODY
)
2089 p
->flags
|= TERMP_NOSPACE
;
2092 if (MDOC_SYNPRETTY
& n
->flags
) {
2093 p
->flags
|= TERMP_NOSPACE
;
2100 termp_bf_pre(DECL_ARGS
)
2103 if (n
->type
== ROFFT_HEAD
)
2105 else if (n
->type
!= ROFFT_BODY
)
2108 if (FONT_Em
== n
->norm
->Bf
.font
)
2109 term_fontpush(p
, TERMFONT_UNDER
);
2110 else if (FONT_Sy
== n
->norm
->Bf
.font
)
2111 term_fontpush(p
, TERMFONT_BOLD
);
2113 term_fontpush(p
, TERMFONT_NONE
);
2119 termp_sm_pre(DECL_ARGS
)
2122 if (NULL
== n
->child
)
2123 p
->flags
^= TERMP_NONOSPACE
;
2124 else if (0 == strcmp("on", n
->child
->string
))
2125 p
->flags
&= ~TERMP_NONOSPACE
;
2127 p
->flags
|= TERMP_NONOSPACE
;
2129 if (p
->col
&& ! (TERMP_NONOSPACE
& p
->flags
))
2130 p
->flags
&= ~TERMP_NOSPACE
;
2136 termp_ap_pre(DECL_ARGS
)
2139 p
->flags
|= TERMP_NOSPACE
;
2141 p
->flags
|= TERMP_NOSPACE
;
2146 termp____post(DECL_ARGS
)
2150 * Handle lists of authors. In general, print each followed by
2151 * a comma. Don't print the comma if there are only two
2154 if (MDOC__A
== n
->tok
&& n
->next
&& MDOC__A
== n
->next
->tok
)
2155 if (NULL
== n
->next
->next
|| MDOC__A
!= n
->next
->next
->tok
)
2156 if (NULL
== n
->prev
|| MDOC__A
!= n
->prev
->tok
)
2161 if (NULL
== n
->parent
|| MDOC_Rs
!= n
->parent
->tok
)
2164 p
->flags
|= TERMP_NOSPACE
;
2165 if (NULL
== n
->next
) {
2167 p
->flags
|= TERMP_SENTENCE
;
2173 termp_li_pre(DECL_ARGS
)
2176 term_fontpush(p
, TERMFONT_NONE
);
2181 termp_lk_pre(DECL_ARGS
)
2183 const struct roff_node
*link
, *descr
;
2185 if (NULL
== (link
= n
->child
))
2188 if (NULL
!= (descr
= link
->next
)) {
2189 term_fontpush(p
, TERMFONT_UNDER
);
2190 while (NULL
!= descr
) {
2191 term_word(p
, descr
->string
);
2192 descr
= descr
->next
;
2194 p
->flags
|= TERMP_NOSPACE
;
2199 term_fontpush(p
, TERMFONT_BOLD
);
2200 term_word(p
, link
->string
);
2207 termp_bk_pre(DECL_ARGS
)
2216 if (n
->parent
->args
|| 0 == n
->prev
->nchild
)
2217 p
->flags
|= TERMP_PREKEEP
;
2228 termp_bk_post(DECL_ARGS
)
2231 if (n
->type
== ROFFT_BODY
)
2232 p
->flags
&= ~(TERMP_KEEP
| TERMP_PREKEEP
);
2236 termp__t_post(DECL_ARGS
)
2240 * If we're in an `Rs' and there's a journal present, then quote
2241 * us instead of underlining us (for disambiguation).
2243 if (n
->parent
&& MDOC_Rs
== n
->parent
->tok
&&
2244 n
->parent
->norm
->Rs
.quote_T
)
2245 termp_quote_post(p
, pair
, meta
, n
);
2247 termp____post(p
, pair
, meta
, n
);
2251 termp__t_pre(DECL_ARGS
)
2255 * If we're in an `Rs' and there's a journal present, then quote
2256 * us instead of underlining us (for disambiguation).
2258 if (n
->parent
&& MDOC_Rs
== n
->parent
->tok
&&
2259 n
->parent
->norm
->Rs
.quote_T
)
2260 return(termp_quote_pre(p
, pair
, meta
, n
));
2262 term_fontpush(p
, TERMFONT_UNDER
);
2267 termp_under_pre(DECL_ARGS
)
2270 term_fontpush(p
, TERMFONT_UNDER
);
2275 termp_er_pre(DECL_ARGS
)
2278 if (n
->sec
== SEC_ERRORS
&&
2279 (n
->parent
->tok
== MDOC_It
||
2280 (n
->parent
->tok
== MDOC_Bq
&&
2281 n
->parent
->parent
->parent
->tok
== MDOC_It
)))
2282 tag_put(n
->child
->string
, 1, p
->line
);
2287 termp_tag_pre(DECL_ARGS
)
2290 if (n
->child
!= NULL
&&
2291 n
->child
->type
== ROFFT_TEXT
&&
2293 (n
->parent
->tok
== MDOC_It
||
2294 (n
->parent
->tok
== MDOC_Xo
&&
2295 n
->parent
->parent
->prev
== NULL
&&
2296 n
->parent
->parent
->parent
->tok
== MDOC_It
)))
2297 tag_put(n
->child
->string
, 1, p
->line
);