Age Owner Branch data TLA Line data Source code
1 : : /*-------------------------------------------------------------------------
2 : : *
3 : : * Query-result printing support for frontend code
4 : : *
5 : : * This file used to be part of psql, but now it's separated out to allow
6 : : * other frontend programs to use it. Because the printing code needs
7 : : * access to the cancel_pressed flag as well as SIGPIPE trapping and
8 : : * pager open/close functions, all that stuff came with it.
9 : : *
10 : : *
11 : : * Portions Copyright (c) 1996-2024, PostgreSQL Global Development Group
12 : : * Portions Copyright (c) 1994, Regents of the University of California
13 : : *
14 : : * src/fe_utils/print.c
15 : : *
16 : : *-------------------------------------------------------------------------
17 : : */
18 : : #include "postgres_fe.h"
19 : :
20 : : #include <limits.h>
21 : : #include <math.h>
22 : : #include <unistd.h>
23 : :
24 : : #ifndef WIN32
25 : : #include <sys/ioctl.h> /* for ioctl() */
26 : : #endif
27 : :
28 : : #ifdef HAVE_TERMIOS_H
29 : : #include <termios.h>
30 : : #endif
31 : :
32 : : #include "catalog/pg_type_d.h"
33 : : #include "fe_utils/mbprint.h"
34 : : #include "fe_utils/print.h"
35 : :
36 : : /*
37 : : * If the calling program doesn't have any mechanism for setting
38 : : * cancel_pressed, it will have no effect.
39 : : *
40 : : * Note: print.c's general strategy for when to check cancel_pressed is to do
41 : : * so at completion of each row of output.
42 : : */
43 : : volatile sig_atomic_t cancel_pressed = false;
44 : :
45 : : static bool always_ignore_sigpipe = false;
46 : :
47 : : /* info for locale-aware numeric formatting; set up by setDecimalLocale() */
48 : : static char *decimal_point;
49 : : static int groupdigits;
50 : : static char *thousands_sep;
51 : :
52 : : static char default_footer[100];
53 : : static printTableFooter default_footer_cell = {default_footer, NULL};
54 : :
55 : : /* Line style control structures */
56 : : const printTextFormat pg_asciiformat =
57 : : {
58 : : "ascii",
59 : : {
60 : : {"-", "+", "+", "+"},
61 : : {"-", "+", "+", "+"},
62 : : {"-", "+", "+", "+"},
63 : : {"", "|", "|", "|"}
64 : : },
65 : : "|",
66 : : "|",
67 : : "|",
68 : : " ",
69 : : "+",
70 : : " ",
71 : : "+",
72 : : ".",
73 : : ".",
74 : : true
75 : : };
76 : :
77 : : const printTextFormat pg_asciiformat_old =
78 : : {
79 : : "old-ascii",
80 : : {
81 : : {"-", "+", "+", "+"},
82 : : {"-", "+", "+", "+"},
83 : : {"-", "+", "+", "+"},
84 : : {"", "|", "|", "|"}
85 : : },
86 : : ":",
87 : : ";",
88 : : " ",
89 : : "+",
90 : : " ",
91 : : " ",
92 : : " ",
93 : : " ",
94 : : " ",
95 : : false
96 : : };
97 : :
98 : : /* Default unicode linestyle format */
99 : : printTextFormat pg_utf8format;
100 : :
101 : : typedef struct unicodeStyleRowFormat
102 : : {
103 : : const char *horizontal;
104 : : const char *vertical_and_right[2];
105 : : const char *vertical_and_left[2];
106 : : } unicodeStyleRowFormat;
107 : :
108 : : typedef struct unicodeStyleColumnFormat
109 : : {
110 : : const char *vertical;
111 : : const char *vertical_and_horizontal[2];
112 : : const char *up_and_horizontal[2];
113 : : const char *down_and_horizontal[2];
114 : : } unicodeStyleColumnFormat;
115 : :
116 : : typedef struct unicodeStyleBorderFormat
117 : : {
118 : : const char *up_and_right;
119 : : const char *vertical;
120 : : const char *down_and_right;
121 : : const char *horizontal;
122 : : const char *down_and_left;
123 : : const char *left_and_right;
124 : : } unicodeStyleBorderFormat;
125 : :
126 : : typedef struct unicodeStyleFormat
127 : : {
128 : : unicodeStyleRowFormat row_style[2];
129 : : unicodeStyleColumnFormat column_style[2];
130 : : unicodeStyleBorderFormat border_style[2];
131 : : const char *header_nl_left;
132 : : const char *header_nl_right;
133 : : const char *nl_left;
134 : : const char *nl_right;
135 : : const char *wrap_left;
136 : : const char *wrap_right;
137 : : bool wrap_right_border;
138 : : } unicodeStyleFormat;
139 : :
140 : : static const unicodeStyleFormat unicode_style = {
141 : : {
142 : : {
143 : : /* U+2500 Box Drawings Light Horizontal */
144 : : "\342\224\200",
145 : :
146 : : /*--
147 : : * U+251C Box Drawings Light Vertical and Right,
148 : : * U+255F Box Drawings Vertical Double and Right Single
149 : : *--
150 : : */
151 : : {"\342\224\234", "\342\225\237"},
152 : :
153 : : /*--
154 : : * U+2524 Box Drawings Light Vertical and Left,
155 : : * U+2562 Box Drawings Vertical Double and Left Single
156 : : *--
157 : : */
158 : : {"\342\224\244", "\342\225\242"},
159 : : },
160 : : {
161 : : /* U+2550 Box Drawings Double Horizontal */
162 : : "\342\225\220",
163 : :
164 : : /*--
165 : : * U+255E Box Drawings Vertical Single and Right Double,
166 : : * U+2560 Box Drawings Double Vertical and Right
167 : : *--
168 : : */
169 : : {"\342\225\236", "\342\225\240"},
170 : :
171 : : /*--
172 : : * U+2561 Box Drawings Vertical Single and Left Double,
173 : : * U+2563 Box Drawings Double Vertical and Left
174 : : *--
175 : : */
176 : : {"\342\225\241", "\342\225\243"},
177 : : },
178 : : },
179 : : {
180 : : {
181 : : /* U+2502 Box Drawings Light Vertical */
182 : : "\342\224\202",
183 : :
184 : : /*--
185 : : * U+253C Box Drawings Light Vertical and Horizontal,
186 : : * U+256A Box Drawings Vertical Single and Horizontal Double
187 : : *--
188 : : */
189 : : {"\342\224\274", "\342\225\252"},
190 : :
191 : : /*--
192 : : * U+2534 Box Drawings Light Up and Horizontal,
193 : : * U+2567 Box Drawings Up Single and Horizontal Double
194 : : *--
195 : : */
196 : : {"\342\224\264", "\342\225\247"},
197 : :
198 : : /*--
199 : : * U+252C Box Drawings Light Down and Horizontal,
200 : : * U+2564 Box Drawings Down Single and Horizontal Double
201 : : *--
202 : : */
203 : : {"\342\224\254", "\342\225\244"},
204 : : },
205 : : {
206 : : /* U+2551 Box Drawings Double Vertical */
207 : : "\342\225\221",
208 : :
209 : : /*--
210 : : * U+256B Box Drawings Vertical Double and Horizontal Single,
211 : : * U+256C Box Drawings Double Vertical and Horizontal
212 : : *--
213 : : */
214 : : {"\342\225\253", "\342\225\254"},
215 : :
216 : : /*--
217 : : * U+2568 Box Drawings Up Double and Horizontal Single,
218 : : * U+2569 Box Drawings Double Up and Horizontal
219 : : *--
220 : : */
221 : : {"\342\225\250", "\342\225\251"},
222 : :
223 : : /*--
224 : : * U+2565 Box Drawings Down Double and Horizontal Single,
225 : : * U+2566 Box Drawings Double Down and Horizontal
226 : : *--
227 : : */
228 : : {"\342\225\245", "\342\225\246"},
229 : : },
230 : : },
231 : : {
232 : : /*--
233 : : * U+2514 Box Drawings Light Up and Right,
234 : : * U+2502 Box Drawings Light Vertical,
235 : : * U+250C Box Drawings Light Down and Right,
236 : : * U+2500 Box Drawings Light Horizontal,
237 : : * U+2510 Box Drawings Light Down and Left,
238 : : * U+2518 Box Drawings Light Up and Left
239 : : *--
240 : : */
241 : : {"\342\224\224", "\342\224\202", "\342\224\214", "\342\224\200", "\342\224\220", "\342\224\230"},
242 : :
243 : : /*--
244 : : * U+255A Box Drawings Double Up and Right,
245 : : * U+2551 Box Drawings Double Vertical,
246 : : * U+2554 Box Drawings Double Down and Right,
247 : : * U+2550 Box Drawings Double Horizontal,
248 : : * U+2557 Box Drawings Double Down and Left,
249 : : * U+255D Box Drawings Double Up and Left
250 : : *--
251 : : */
252 : : {"\342\225\232", "\342\225\221", "\342\225\224", "\342\225\220", "\342\225\227", "\342\225\235"},
253 : : },
254 : : " ",
255 : : /* U+21B5 Downwards Arrow with Corner Leftwards */
256 : : "\342\206\265",
257 : : " ",
258 : : /* U+21B5 Downwards Arrow with Corner Leftwards */
259 : : "\342\206\265",
260 : : /* U+2026 Horizontal Ellipsis */
261 : : "\342\200\246",
262 : : "\342\200\246",
263 : : true
264 : : };
265 : :
266 : :
267 : : /* Local functions */
268 : : static int strlen_max_width(unsigned char *str, int *target_width, int encoding);
269 : : static void IsPagerNeeded(const printTableContent *cont, int extra_lines, bool expanded,
270 : : FILE **fout, bool *is_pager);
271 : :
272 : : static void print_aligned_vertical(const printTableContent *cont,
273 : : FILE *fout, bool is_pager);
274 : :
275 : :
276 : : /* Count number of digits in integral part of number */
277 : : static int
6849 bruce@momjian.us 278 :CBC 96 : integer_digits(const char *my_str)
279 : : {
280 : : /* ignoring any sign ... */
3125 tgl@sss.pgh.pa.us 281 [ + + - + ]: 96 : if (my_str[0] == '-' || my_str[0] == '+')
6853 bruce@momjian.us 282 : 18 : my_str++;
283 : : /* ... count initial integral digits */
3125 tgl@sss.pgh.pa.us 284 : 96 : return strspn(my_str, "0123456789");
285 : : }
286 : :
287 : : /* Compute additional length required for locale-aware numeric output */
288 : : static int
6845 bruce@momjian.us 289 : 48 : additional_numeric_locale_len(const char *my_str)
290 : : {
6756 291 : 48 : int int_len = integer_digits(my_str),
292 : 48 : len = 0;
293 : :
294 : : /* Account for added thousands_sep instances */
3125 tgl@sss.pgh.pa.us 295 [ - + ]: 48 : if (int_len > groupdigits)
3125 tgl@sss.pgh.pa.us 296 :UBC 0 : len += ((int_len - 1) / groupdigits) * strlen(thousands_sep);
297 : :
298 : : /* Account for possible additional length of decimal_point */
6845 bruce@momjian.us 299 [ - + ]:CBC 48 : if (strchr(my_str, '.') != NULL)
3125 tgl@sss.pgh.pa.us 300 :UBC 0 : len += strlen(decimal_point) - 1;
301 : :
6845 bruce@momjian.us 302 :CBC 48 : return len;
303 : : }
304 : :
305 : : /*
306 : : * Format a numeric value per current LC_NUMERIC locale setting
307 : : *
308 : : * Returns the appropriately formatted string in a new allocated block,
309 : : * caller must free.
310 : : *
311 : : * setDecimalLocale() must have been called earlier.
312 : : */
313 : : static char *
6774 314 : 48 : format_numeric_locale(const char *my_str)
315 : : {
316 : : char *new_str;
317 : : int new_len,
318 : : int_len,
319 : : leading_digits,
320 : : i,
321 : : new_str_pos;
322 : :
323 : : /*
324 : : * If the string doesn't look like a number, return it unchanged. This
325 : : * check is essential to avoid mangling already-localized "money" values.
326 : : */
3124 tgl@sss.pgh.pa.us 327 [ - + ]: 48 : if (strspn(my_str, "0123456789+-.eE") != strlen(my_str))
3124 tgl@sss.pgh.pa.us 328 :UBC 0 : return pg_strdup(my_str);
329 : :
3124 tgl@sss.pgh.pa.us 330 :CBC 48 : new_len = strlen(my_str) + additional_numeric_locale_len(my_str);
331 : 48 : new_str = pg_malloc(new_len + 1);
332 : 48 : new_str_pos = 0;
333 : 48 : int_len = integer_digits(my_str);
334 : :
335 : : /* number of digits in first thousands group */
3125 336 : 48 : leading_digits = int_len % groupdigits;
337 [ + + ]: 48 : if (leading_digits == 0)
338 : 9 : leading_digits = groupdigits;
339 : :
340 : : /* process sign */
341 [ + + - + ]: 48 : if (my_str[0] == '-' || my_str[0] == '+')
342 : : {
343 : 9 : new_str[new_str_pos++] = my_str[0];
6774 bruce@momjian.us 344 : 9 : my_str++;
345 : : }
346 : :
347 : : /* process integer part of number */
3125 tgl@sss.pgh.pa.us 348 [ + + ]: 114 : for (i = 0; i < int_len; i++)
349 : : {
350 : : /* Time to insert separator? */
351 [ + + - + ]: 66 : if (i > 0 && --leading_digits == 0)
352 : : {
3125 tgl@sss.pgh.pa.us 353 :UBC 0 : strcpy(&new_str[new_str_pos], thousands_sep);
354 : 0 : new_str_pos += strlen(thousands_sep);
355 : 0 : leading_digits = groupdigits;
356 : : }
3125 tgl@sss.pgh.pa.us 357 :CBC 66 : new_str[new_str_pos++] = my_str[i];
358 : : }
359 : :
360 : : /* handle decimal point if any */
361 [ - + ]: 48 : if (my_str[i] == '.')
362 : : {
3125 tgl@sss.pgh.pa.us 363 :UBC 0 : strcpy(&new_str[new_str_pos], decimal_point);
364 : 0 : new_str_pos += strlen(decimal_point);
365 : 0 : i++;
366 : : }
367 : :
368 : : /* copy the rest (fractional digits and/or exponent, and \0 terminator) */
3125 tgl@sss.pgh.pa.us 369 :CBC 48 : strcpy(&new_str[new_str_pos], &my_str[i]);
370 : :
371 : : /* assert we didn't underestimate new_len (an overestimate is OK) */
372 [ - + ]: 48 : Assert(strlen(new_str) <= new_len);
373 : :
6774 bruce@momjian.us 374 : 48 : return new_str;
375 : : }
376 : :
377 : :
378 : : static void
4448 peter_e@gmx.net 379 : 1896880 : print_separator(struct separator sep, FILE *fout)
380 : : {
381 [ - + ]: 1896880 : if (sep.separator_zero)
4448 peter_e@gmx.net 382 :UBC 0 : fputc('\000', fout);
4448 peter_e@gmx.net 383 [ + - ]:CBC 1896880 : else if (sep.separator)
384 : 1896880 : fputs(sep.separator, fout);
385 : 1896880 : }
386 : :
387 : :
388 : : /*
389 : : * Return the list of explicitly-requested footers or, when applicable, the
390 : : * default "(xx rows)" footer. Always omit the default footer when given
391 : : * non-default footers, "\pset footer off", or a specific instruction to that
392 : : * effect from a calling backslash command. Vertical formats number each row,
393 : : * making the default footer redundant; they do not call this function.
394 : : *
395 : : * The return value may point to static storage; do not keep it across calls.
396 : : */
397 : : static printTableFooter *
4366 rhaas@postgresql.org 398 : 63777 : footers_with_default(const printTableContent *cont)
399 : : {
400 [ + + + + ]: 63777 : if (cont->footers == NULL && cont->opt->default_footer)
401 : : {
402 : : unsigned long total_records;
403 : :
404 : 61863 : total_records = cont->opt->prior_records + cont->nrows;
405 : 61863 : snprintf(default_footer, sizeof(default_footer),
406 : 61863 : ngettext("(%lu row)", "(%lu rows)", total_records),
407 : : total_records);
408 : :
409 : 61863 : return &default_footer_cell;
410 : : }
411 : : else
412 : 1914 : return cont->footers;
413 : : }
414 : :
415 : :
416 : : /*************************/
417 : : /* Unaligned text */
418 : : /*************************/
419 : :
420 : :
421 : : static void
5816 alvherre@alvh.no-ip. 422 : 5052 : print_unaligned_text(const printTableContent *cont, FILE *fout)
423 : : {
424 : 5052 : bool opt_tuples_only = cont->opt->tuples_only;
425 : : unsigned int i;
426 : : const char *const *ptr;
8768 bruce@momjian.us 427 : 5052 : bool need_recordsep = false;
428 : :
6514 tgl@sss.pgh.pa.us 429 [ - + ]: 5052 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 430 :UBC 0 : return;
431 : :
5816 alvherre@alvh.no-ip. 432 [ + - ]:CBC 5052 : if (cont->opt->start_table)
433 : : {
434 : : /* print title */
435 [ + + + + ]: 5052 : if (!opt_tuples_only && cont->title)
436 : : {
4448 peter_e@gmx.net 437 : 3 : fputs(cont->title, fout);
438 : 3 : print_separator(cont->opt->recordSep, fout);
439 : : }
440 : :
441 : : /* print headers */
6849 bruce@momjian.us 442 [ + + ]: 5052 : if (!opt_tuples_only)
443 : : {
5816 alvherre@alvh.no-ip. 444 [ + + ]: 190 : for (ptr = cont->headers; *ptr; ptr++)
445 : : {
446 [ + + ]: 129 : if (ptr != cont->headers)
4448 peter_e@gmx.net 447 : 68 : print_separator(cont->opt->fieldSep, fout);
6438 tgl@sss.pgh.pa.us 448 : 129 : fputs(*ptr, fout);
449 : : }
450 : 61 : need_recordsep = true;
451 : : }
452 : : }
453 : : else
454 : : /* assume continuing printout */
8768 bruce@momjian.us 455 :UBC 0 : need_recordsep = true;
456 : :
457 : : /* print cells */
5816 alvherre@alvh.no-ip. 458 [ + + ]:CBC 1904919 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
459 : : {
8768 bruce@momjian.us 460 [ + + ]: 1899867 : if (need_recordsep)
461 : : {
4448 peter_e@gmx.net 462 : 971758 : print_separator(cont->opt->recordSep, fout);
8768 bruce@momjian.us 463 : 971758 : need_recordsep = false;
6514 tgl@sss.pgh.pa.us 464 [ - + ]: 971758 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 465 :UBC 0 : break;
466 : : }
5158 heikki.linnakangas@i 467 :CBC 1899867 : fputs(*ptr, fout);
468 : :
5816 alvherre@alvh.no-ip. 469 [ + + ]: 1899867 : if ((i + 1) % cont->ncolumns)
4448 peter_e@gmx.net 470 : 923439 : print_separator(cont->opt->fieldSep, fout);
471 : : else
8768 bruce@momjian.us 472 : 976428 : need_recordsep = true;
473 : : }
474 : :
475 : : /* print footers */
5816 alvherre@alvh.no-ip. 476 [ + - ]: 5052 : if (cont->opt->stop_table)
477 : : {
4366 rhaas@postgresql.org 478 : 5052 : printTableFooter *footers = footers_with_default(cont);
479 : :
480 [ + + + - : 5052 : if (!opt_tuples_only && footers != NULL && !cancel_pressed)
+ - ]
481 : : {
482 : : printTableFooter *f;
483 : :
484 [ + + ]: 122 : for (f = footers; f; f = f->next)
485 : : {
6438 tgl@sss.pgh.pa.us 486 [ + - ]: 61 : if (need_recordsep)
487 : : {
4448 peter_e@gmx.net 488 : 61 : print_separator(cont->opt->recordSep, fout);
6438 tgl@sss.pgh.pa.us 489 : 61 : need_recordsep = false;
490 : : }
5816 alvherre@alvh.no-ip. 491 : 61 : fputs(f->data, fout);
6438 tgl@sss.pgh.pa.us 492 : 61 : need_recordsep = true;
493 : : }
494 : : }
495 : :
496 : : /*
497 : : * The last record is terminated by a newline, independent of the set
498 : : * record separator. But when the record separator is a zero byte, we
499 : : * use that (compatible with find -print0 and xargs).
500 : : */
501 [ + + ]: 5052 : if (need_recordsep)
502 : : {
4448 peter_e@gmx.net 503 [ - + ]: 4731 : if (cont->opt->recordSep.separator_zero)
4448 peter_e@gmx.net 504 :UBC 0 : print_separator(cont->opt->recordSep, fout);
505 : : else
4448 peter_e@gmx.net 506 :CBC 4731 : fputc('\n', fout);
507 : : }
508 : : }
509 : : }
510 : :
511 : :
512 : : static void
5816 alvherre@alvh.no-ip. 513 : 51 : print_unaligned_vertical(const printTableContent *cont, FILE *fout)
514 : : {
515 : 51 : bool opt_tuples_only = cont->opt->tuples_only;
516 : : unsigned int i;
517 : : const char *const *ptr;
6438 tgl@sss.pgh.pa.us 518 : 51 : bool need_recordsep = false;
519 : :
6514 520 [ - + ]: 51 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 521 :UBC 0 : return;
522 : :
5816 alvherre@alvh.no-ip. 523 [ + - ]:CBC 51 : if (cont->opt->start_table)
524 : : {
525 : : /* print title */
526 [ + + + + ]: 51 : if (!opt_tuples_only && cont->title)
527 : : {
528 : 3 : fputs(cont->title, fout);
6438 tgl@sss.pgh.pa.us 529 : 3 : need_recordsep = true;
530 : : }
531 : : }
532 : : else
533 : : /* assume continuing printout */
6438 tgl@sss.pgh.pa.us 534 :UBC 0 : need_recordsep = true;
535 : :
536 : : /* print records */
5816 alvherre@alvh.no-ip. 537 [ + + ]:CBC 714 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
538 : : {
6438 tgl@sss.pgh.pa.us 539 [ + + ]: 663 : if (need_recordsep)
540 : : {
541 : : /* record separator is 2 occurrences of recordsep in this mode */
4448 peter_e@gmx.net 542 : 267 : print_separator(cont->opt->recordSep, fout);
543 : 267 : print_separator(cont->opt->recordSep, fout);
6438 tgl@sss.pgh.pa.us 544 : 267 : need_recordsep = false;
6514 545 [ - + ]: 267 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 546 :UBC 0 : break;
547 : : }
548 : :
5816 alvherre@alvh.no-ip. 549 :CBC 663 : fputs(cont->headers[i % cont->ncolumns], fout);
4448 peter_e@gmx.net 550 : 663 : print_separator(cont->opt->fieldSep, fout);
5158 heikki.linnakangas@i 551 : 663 : fputs(*ptr, fout);
552 : :
5816 alvherre@alvh.no-ip. 553 [ + + ]: 663 : if ((i + 1) % cont->ncolumns)
4448 peter_e@gmx.net 554 : 348 : print_separator(cont->opt->recordSep, fout);
555 : : else
6438 tgl@sss.pgh.pa.us 556 : 315 : need_recordsep = true;
557 : : }
558 : :
5816 alvherre@alvh.no-ip. 559 [ + - ]: 51 : if (cont->opt->stop_table)
560 : : {
561 : : /* print footers */
562 [ + + + + : 51 : if (!opt_tuples_only && cont->footers != NULL && !cancel_pressed)
+ - ]
563 : : {
564 : : printTableFooter *f;
565 : :
4448 peter_e@gmx.net 566 : 3 : print_separator(cont->opt->recordSep, fout);
5816 alvherre@alvh.no-ip. 567 [ + + ]: 6 : for (f = cont->footers; f; f = f->next)
568 : : {
4448 peter_e@gmx.net 569 : 3 : print_separator(cont->opt->recordSep, fout);
5816 alvherre@alvh.no-ip. 570 : 3 : fputs(f->data, fout);
571 : : }
572 : : }
573 : :
574 : : /* see above in print_unaligned_text() */
4082 peter_e@gmx.net 575 [ + - ]: 51 : if (need_recordsep)
576 : : {
577 [ - + ]: 51 : if (cont->opt->recordSep.separator_zero)
4082 peter_e@gmx.net 578 :UBC 0 : print_separator(cont->opt->recordSep, fout);
579 : : else
4082 peter_e@gmx.net 580 :CBC 51 : fputc('\n', fout);
581 : : }
582 : : }
583 : : }
584 : :
585 : :
586 : : /********************/
587 : : /* Aligned text */
588 : : /********************/
589 : :
590 : :
591 : : /* draw "line" */
592 : : static void
5816 alvherre@alvh.no-ip. 593 : 58593 : _print_horizontal_line(const unsigned int ncolumns, const unsigned int *widths,
594 : : unsigned short border, printTextRule pos,
595 : : const printTextFormat *format,
596 : : FILE *fout)
597 : : {
5297 tgl@sss.pgh.pa.us 598 : 58593 : const printTextLineFormat *lformat = &format->lrule[pos];
599 : : unsigned int i,
600 : : j;
601 : :
8928 bruce@momjian.us 602 [ + + ]: 58593 : if (border == 1)
5297 tgl@sss.pgh.pa.us 603 : 58497 : fputs(lformat->hrule, fout);
8928 bruce@momjian.us 604 [ + + ]: 96 : else if (border == 2)
5297 tgl@sss.pgh.pa.us 605 : 72 : fprintf(fout, "%s%s", lformat->leftvrule, lformat->hrule);
606 : :
5816 alvherre@alvh.no-ip. 607 [ + + ]: 169709 : for (i = 0; i < ncolumns; i++)
608 : : {
8928 bruce@momjian.us 609 [ + + ]: 1748793 : for (j = 0; j < widths[i]; j++)
5297 tgl@sss.pgh.pa.us 610 : 1637677 : fputs(lformat->hrule, fout);
611 : :
5816 alvherre@alvh.no-ip. 612 [ + + ]: 111116 : if (i < ncolumns - 1)
613 : : {
8928 bruce@momjian.us 614 [ + + ]: 52581 : if (border == 0)
615 : 24 : fputc(' ', fout);
616 : : else
5297 tgl@sss.pgh.pa.us 617 : 52557 : fprintf(fout, "%s%s%s", lformat->hrule,
618 : 52557 : lformat->midvrule, lformat->hrule);
619 : : }
620 : : }
621 : :
8928 bruce@momjian.us 622 [ + + ]: 58593 : if (border == 2)
5297 tgl@sss.pgh.pa.us 623 : 72 : fprintf(fout, "%s%s", lformat->hrule, lformat->rightvrule);
8928 bruce@momjian.us 624 [ + + ]: 58521 : else if (border == 1)
5297 tgl@sss.pgh.pa.us 625 : 58497 : fputs(lformat->hrule, fout);
626 : :
8928 bruce@momjian.us 627 : 58593 : fputc('\n', fout);
628 : 58593 : }
629 : :
630 : :
631 : : /*
632 : : * Print pretty boxes around cells.
633 : : */
634 : : static void
3056 tgl@sss.pgh.pa.us 635 : 58687 : print_aligned_text(const printTableContent *cont, FILE *fout, bool is_pager)
636 : : {
5816 alvherre@alvh.no-ip. 637 : 58687 : bool opt_tuples_only = cont->opt->tuples_only;
638 : 58687 : int encoding = cont->opt->encoding;
639 : 58687 : unsigned short opt_border = cont->opt->border;
5297 tgl@sss.pgh.pa.us 640 : 58687 : const printTextFormat *format = get_line_style(cont->opt);
641 : 58687 : const printTextLineFormat *dformat = &format->lrule[PRINT_RULE_DATA];
642 : :
5421 bruce@momjian.us 643 : 58687 : unsigned int col_count = 0,
644 : 58687 : cell_count = 0;
645 : :
646 : : unsigned int i,
647 : : j;
648 : :
649 : : unsigned int *width_header,
650 : : *max_width,
651 : : *width_wrap,
652 : : *width_average;
653 : : unsigned int *max_nl_lines, /* value split by newlines */
654 : : *curr_nl_line,
655 : : *max_bytes;
656 : : unsigned char **format_buf;
657 : : unsigned int width_total;
658 : : unsigned int total_header_width;
5812 659 : 58687 : unsigned int extra_row_output_lines = 0;
660 : 58687 : unsigned int extra_output_lines = 0;
661 : :
662 : : const char *const *ptr;
663 : :
664 : : struct lineptr **col_lineptrs; /* pointers to line pointer per column */
665 : :
666 : : bool *header_done; /* Have all header lines been output? */
667 : : int *bytes_output; /* Bytes output for column value */
668 : : printTextLineWrap *wrap; /* Wrap status for each column */
2489 tgl@sss.pgh.pa.us 669 : 58687 : int output_columns = 0; /* Width of interactive console */
3056 670 : 58687 : bool is_local_pager = false;
671 : :
6514 672 [ - + ]: 58687 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 673 :UBC 0 : return;
674 : :
6438 tgl@sss.pgh.pa.us 675 [ - + ]:CBC 58687 : if (opt_border > 2)
6438 tgl@sss.pgh.pa.us 676 :UBC 0 : opt_border = 2;
677 : :
5816 alvherre@alvh.no-ip. 678 [ + + ]:CBC 58687 : if (cont->ncolumns > 0)
679 : : {
680 : 58629 : col_count = cont->ncolumns;
4212 tgl@sss.pgh.pa.us 681 : 58629 : width_header = pg_malloc0(col_count * sizeof(*width_header));
682 : 58629 : width_average = pg_malloc0(col_count * sizeof(*width_average));
683 : 58629 : max_width = pg_malloc0(col_count * sizeof(*max_width));
684 : 58629 : width_wrap = pg_malloc0(col_count * sizeof(*width_wrap));
685 : 58629 : max_nl_lines = pg_malloc0(col_count * sizeof(*max_nl_lines));
686 : 58629 : curr_nl_line = pg_malloc0(col_count * sizeof(*curr_nl_line));
687 : 58629 : col_lineptrs = pg_malloc0(col_count * sizeof(*col_lineptrs));
688 : 58629 : max_bytes = pg_malloc0(col_count * sizeof(*max_bytes));
689 : 58629 : format_buf = pg_malloc0(col_count * sizeof(*format_buf));
690 : 58629 : header_done = pg_malloc0(col_count * sizeof(*header_done));
691 : 58629 : bytes_output = pg_malloc0(col_count * sizeof(*bytes_output));
692 : 58629 : wrap = pg_malloc0(col_count * sizeof(*wrap));
693 : : }
694 : : else
695 : : {
5820 bruce@momjian.us 696 : 58 : width_header = NULL;
697 : 58 : width_average = NULL;
698 : 58 : max_width = NULL;
699 : 58 : width_wrap = NULL;
700 : 58 : max_nl_lines = NULL;
701 : 58 : curr_nl_line = NULL;
6638 702 : 58 : col_lineptrs = NULL;
5820 703 : 58 : max_bytes = NULL;
6638 704 : 58 : format_buf = NULL;
5820 705 : 58 : header_done = NULL;
706 : 58 : bytes_output = NULL;
5257 tgl@sss.pgh.pa.us 707 : 58 : wrap = NULL;
708 : : }
709 : :
710 : : /* scan all column headers, find maximum width and max max_nl_lines */
8207 bruce@momjian.us 711 [ + + ]: 170083 : for (i = 0; i < col_count; i++)
712 : : {
713 : : int width,
714 : : nl_lines,
715 : : bytes_required;
716 : :
4599 peter_e@gmx.net 717 : 111396 : pg_wcssize((const unsigned char *) cont->headers[i], strlen(cont->headers[i]),
718 : : encoding, &width, &nl_lines, &bytes_required);
5820 bruce@momjian.us 719 [ + + ]: 111396 : if (width > max_width[i])
720 : 111378 : max_width[i] = width;
721 [ + - ]: 111396 : if (nl_lines > max_nl_lines[i])
722 : 111396 : max_nl_lines[i] = nl_lines;
723 [ + - ]: 111396 : if (bytes_required > max_bytes[i])
724 : 111396 : max_bytes[i] = bytes_required;
5812 725 [ + + ]: 111396 : if (nl_lines > extra_row_output_lines)
726 : 58629 : extra_row_output_lines = nl_lines;
727 : :
5820 728 : 111396 : width_header[i] = width;
729 : : }
730 : : /* Add height of tallest header column */
5812 731 : 58687 : extra_output_lines += extra_row_output_lines;
732 : 58687 : extra_row_output_lines = 0;
733 : :
734 : : /* scan all cells, find maximum width, compute cell_count */
5816 alvherre@alvh.no-ip. 735 [ + + ]: 576319 : for (i = 0, ptr = cont->cells; *ptr; ptr++, i++, cell_count++)
736 : : {
737 : : int width,
738 : : nl_lines,
739 : : bytes_required;
740 : :
4599 peter_e@gmx.net 741 : 517632 : pg_wcssize((const unsigned char *) *ptr, strlen(*ptr), encoding,
742 : : &width, &nl_lines, &bytes_required);
743 : :
5820 bruce@momjian.us 744 [ + + ]: 517632 : if (width > max_width[i % col_count])
745 : 61858 : max_width[i % col_count] = width;
746 [ + + ]: 517632 : if (nl_lines > max_nl_lines[i % col_count])
747 : 843 : max_nl_lines[i % col_count] = nl_lines;
748 [ + + ]: 517632 : if (bytes_required > max_bytes[i % col_count])
749 : 62101 : max_bytes[i % col_count] = bytes_required;
750 : :
751 : 517632 : width_average[i % col_count] += width;
752 : : }
753 : :
754 : : /* If we have rows, compute average */
755 [ + + + + ]: 58687 : if (col_count != 0 && cell_count != 0)
756 : : {
5421 757 : 55749 : int rows = cell_count / col_count;
758 : :
5820 759 [ + + ]: 159691 : for (i = 0; i < col_count; i++)
5811 tgl@sss.pgh.pa.us 760 : 103942 : width_average[i] /= rows;
761 : : }
762 : :
763 : : /* adjust the total display width based on border style */
8928 bruce@momjian.us 764 [ + + ]: 58687 : if (opt_border == 0)
5257 tgl@sss.pgh.pa.us 765 : 24 : width_total = col_count;
8928 bruce@momjian.us 766 [ + + ]: 58663 : else if (opt_border == 1)
3309 767 [ + + ]: 58639 : width_total = col_count * 3 - ((col_count > 0) ? 1 : 0);
768 : : else
5820 769 : 24 : width_total = col_count * 3 + 1;
770 : 58687 : total_header_width = width_total;
771 : :
8928 772 [ + + ]: 170083 : for (i = 0; i < col_count; i++)
773 : : {
5820 774 : 111396 : width_total += max_width[i];
775 : 111396 : total_header_width += width_header[i];
776 : : }
777 : :
778 : : /*
779 : : * At this point: max_width[] contains the max width of each column,
780 : : * max_nl_lines[] contains the max number of lines in each column,
781 : : * max_bytes[] contains the maximum storage space for formatting strings,
782 : : * width_total contains the giant width sum. Now we allocate some memory
783 : : * for line pointers.
784 : : */
785 [ + + ]: 170083 : for (i = 0; i < col_count; i++)
786 : : {
787 : : /* Add entry for ptr == NULL array termination */
4212 tgl@sss.pgh.pa.us 788 : 111396 : col_lineptrs[i] = pg_malloc0((max_nl_lines[i] + 1) *
789 : : sizeof(**col_lineptrs));
790 : :
791 : 111396 : format_buf[i] = pg_malloc(max_bytes[i] + 1);
792 : :
5820 bruce@momjian.us 793 : 111396 : col_lineptrs[i]->ptr = format_buf[i];
794 : : }
795 : :
796 : : /* Default word wrap to the full width, i.e. no word wrap */
797 [ + + ]: 170083 : for (i = 0; i < col_count; i++)
798 : 111396 : width_wrap[i] = max_width[i];
799 : :
800 : : /*
801 : : * Choose target output width: \pset columns, or $COLUMNS, or ioctl
802 : : */
5812 803 [ + + ]: 58687 : if (cont->opt->columns > 0)
804 : 672 : output_columns = cont->opt->columns;
805 [ + - + - : 58015 : else if ((fout == stdout && isatty(fileno(stdout))) || is_pager)
+ + ]
806 : : {
807 [ - + ]: 39 : if (cont->opt->env_columns > 0)
5812 bruce@momjian.us 808 :UBC 0 : output_columns = cont->opt->env_columns;
809 : : #ifdef TIOCGWINSZ
810 : : else
811 : : {
812 : : struct winsize screen_size;
813 : :
5812 bruce@momjian.us 814 [ - + ]:CBC 39 : if (ioctl(fileno(stdout), TIOCGWINSZ, &screen_size) != -1)
5812 bruce@momjian.us 815 :UBC 0 : output_columns = screen_size.ws_col;
816 : : }
817 : : #endif
818 : : }
819 : :
5812 bruce@momjian.us 820 [ + + ]:CBC 58687 : if (cont->opt->format == PRINT_WRAPPED)
821 : : {
822 : : /*
823 : : * Optional optimized word wrap. Shrink columns with a high max/avg
824 : : * ratio. Slightly bias against wider columns. (Increases chance a
825 : : * narrow column will fit in its cell.) If available columns is
826 : : * positive... and greater than the width of the unshrinkable column
827 : : * headers
828 : : */
5820 829 [ + - + + ]: 69 : if (output_columns > 0 && output_columns >= total_header_width)
830 : : {
831 : : /* While there is still excess width... */
832 [ + + ]: 132 : while (width_total > output_columns)
833 : : {
834 : 96 : double max_ratio = 0;
835 : 96 : int worst_col = -1;
836 : :
837 : : /*
838 : : * Find column that has the highest ratio of its maximum width
839 : : * compared to its average width. This tells us which column
840 : : * will produce the fewest wrapped values if shortened.
841 : : * width_wrap starts as equal to max_width.
842 : : */
843 [ + + ]: 288 : for (i = 0; i < col_count; i++)
844 : : {
845 [ + - + - ]: 192 : if (width_average[i] && width_wrap[i] > width_header[i])
846 : : {
847 : : /* Penalize wide columns by 1% of their width */
848 : : double ratio;
849 : :
5818 tgl@sss.pgh.pa.us 850 : 192 : ratio = (double) width_wrap[i] / width_average[i] +
851 : 192 : max_width[i] * 0.01;
5820 bruce@momjian.us 852 [ + + ]: 192 : if (ratio > max_ratio)
853 : : {
854 : 126 : max_ratio = ratio;
855 : 126 : worst_col = i;
856 : : }
857 : : }
858 : : }
859 : :
860 : : /* Exit loop if we can't squeeze any more. */
861 [ - + ]: 96 : if (worst_col == -1)
5820 bruce@momjian.us 862 :UBC 0 : break;
863 : :
864 : : /* Decrease width of target column by one. */
5820 bruce@momjian.us 865 :CBC 96 : width_wrap[worst_col]--;
866 : 96 : width_total--;
867 : : }
868 : : }
869 : : }
870 : :
871 : : /*
872 : : * If in expanded auto mode, we have now calculated the expected width, so
873 : : * we can now escape to vertical mode if necessary. If the output has
874 : : * only one column, the expanded format would be wider than the regular
875 : : * format, so don't use it in that case.
876 : : */
2956 rhaas@postgresql.org 877 [ - + - - : 58687 : if (cont->opt->expanded == 2 && output_columns > 0 && cont->ncolumns > 1 &&
- - ]
4537 peter_e@gmx.net 878 [ # # # # ]:UBC 0 : (output_columns < total_header_width || output_columns < width_total))
879 : : {
3056 tgl@sss.pgh.pa.us 880 : 0 : print_aligned_vertical(cont, fout, is_pager);
4421 peter_e@gmx.net 881 : 0 : goto cleanup;
882 : : }
883 : :
884 : : /* If we wrapped beyond the display width, use the pager */
5811 bruce@momjian.us 885 [ + + + + :CBC 58687 : if (!is_pager && fout == stdout && output_columns > 0 &&
+ + ]
5812 886 [ + + + + ]: 636 : (output_columns < total_header_width || output_columns < width_total))
887 : : {
3305 andrew@dunslane.net 888 : 300 : fout = PageOutput(INT_MAX, cont->opt); /* force pager */
3056 tgl@sss.pgh.pa.us 889 : 300 : is_pager = is_local_pager = true;
890 : : }
891 : :
892 : : /* Check if newlines or our wrapping now need the pager */
893 [ + + + + ]: 58687 : if (!is_pager && fout == stdout)
894 : : {
895 : : /* scan all cells, find maximum width, compute cell_count */
5811 896 [ + + ]: 572695 : for (i = 0, ptr = cont->cells; *ptr; ptr++, cell_count++)
897 : : {
898 : : int width,
899 : : nl_lines,
900 : : bytes_required;
901 : :
4599 peter_e@gmx.net 902 : 514383 : pg_wcssize((const unsigned char *) *ptr, strlen(*ptr), encoding,
903 : : &width, &nl_lines, &bytes_required);
904 : :
905 : : /*
906 : : * A row can have both wrapping and newlines that cause it to
907 : : * display across multiple lines. We check for both cases below.
908 : : */
5811 tgl@sss.pgh.pa.us 909 [ + + + - ]: 514383 : if (width > 0 && width_wrap[i])
910 : : {
911 : : unsigned int extra_lines;
912 : :
913 : : /* don't count the first line of nl_lines - it's not "extra" */
3432 andrew@dunslane.net 914 : 473151 : extra_lines = ((width - 1) / width_wrap[i]) + nl_lines - 1;
5811 tgl@sss.pgh.pa.us 915 [ + + ]: 473151 : if (extra_lines > extra_row_output_lines)
916 : 890 : extra_row_output_lines = extra_lines;
917 : : }
918 : :
919 : : /* i is the current column number: increment with wrap */
920 [ + + ]: 514383 : if (++i >= col_count)
921 : : {
922 : 218816 : i = 0;
923 : : /* At last column of each row, add tallest column height */
5812 bruce@momjian.us 924 : 218816 : extra_output_lines += extra_row_output_lines;
925 : 218816 : extra_row_output_lines = 0;
926 : : }
927 : : }
4537 peter_e@gmx.net 928 : 58312 : IsPagerNeeded(cont, extra_output_lines, false, &fout, &is_pager);
3056 tgl@sss.pgh.pa.us 929 : 58312 : is_local_pager = is_pager;
930 : : }
931 : :
932 : : /* time to output */
5816 alvherre@alvh.no-ip. 933 [ + + ]: 58687 : if (cont->opt->start_table)
934 : : {
935 : : /* print title */
936 [ + + + + ]: 58657 : if (cont->title && !opt_tuples_only)
937 : : {
938 : : int width,
939 : : height;
940 : :
4599 peter_e@gmx.net 941 : 2641 : pg_wcssize((const unsigned char *) cont->title, strlen(cont->title),
942 : : encoding, &width, &height, NULL);
5820 bruce@momjian.us 943 [ + + ]: 2641 : if (width >= width_total)
944 : : /* Aligned */
5816 alvherre@alvh.no-ip. 945 : 126 : fprintf(fout, "%s\n", cont->title);
946 : : else
947 : : /* Centered */
948 : 2515 : fprintf(fout, "%-*s%s\n", (width_total - width) / 2, "",
949 : 2515 : cont->title);
950 : : }
951 : :
952 : : /* print headers */
6438 tgl@sss.pgh.pa.us 953 [ + + ]: 58657 : if (!opt_tuples_only)
954 : : {
955 : : int more_col_wrapping;
956 : : int curr_nl_line;
957 : :
6638 bruce@momjian.us 958 [ + + ]: 58545 : if (opt_border == 2)
5297 tgl@sss.pgh.pa.us 959 : 24 : _print_horizontal_line(col_count, width_wrap, opt_border,
960 : : PRINT_RULE_TOP, format, fout);
961 : :
6638 bruce@momjian.us 962 [ + + ]: 169565 : for (i = 0; i < col_count; i++)
4599 peter_e@gmx.net 963 : 111020 : pg_wcsformat((const unsigned char *) cont->headers[i],
5816 alvherre@alvh.no-ip. 964 : 111020 : strlen(cont->headers[i]), encoding,
965 : 111020 : col_lineptrs[i], max_nl_lines[i]);
966 : :
5820 bruce@momjian.us 967 : 58545 : more_col_wrapping = col_count;
968 : 58545 : curr_nl_line = 0;
773 tgl@sss.pgh.pa.us 969 [ + + ]: 58545 : if (col_count > 0)
970 : 58487 : memset(header_done, false, col_count * sizeof(bool));
5820 bruce@momjian.us 971 [ + + ]: 117104 : while (more_col_wrapping)
972 : : {
6438 tgl@sss.pgh.pa.us 973 [ + + ]: 58559 : if (opt_border == 2)
5257 974 : 48 : fputs(dformat->leftvrule, fout);
975 : :
5816 alvherre@alvh.no-ip. 976 [ + + ]: 169723 : for (i = 0; i < cont->ncolumns; i++)
977 : : {
5820 bruce@momjian.us 978 : 111164 : struct lineptr *this_line = col_lineptrs[i] + curr_nl_line;
979 : : unsigned int nbspace;
980 : :
5257 tgl@sss.pgh.pa.us 981 [ + + ]: 111164 : if (opt_border != 0 ||
4900 rhaas@postgresql.org 982 [ + + + + ]: 96 : (!format->wrap_right_border && i > 0))
5257 tgl@sss.pgh.pa.us 983 [ + + ]: 111092 : fputs(curr_nl_line ? format->header_nl_left : " ",
984 : : fout);
985 : :
5820 bruce@momjian.us 986 [ + + ]: 111164 : if (!header_done[i])
987 : : {
988 : 111128 : nbspace = width_wrap[i] - this_line->width;
989 : :
990 : : /* centered */
6438 tgl@sss.pgh.pa.us 991 : 111128 : fprintf(fout, "%-*s%s%-*s",
992 : 111128 : nbspace / 2, "", this_line->ptr, (nbspace + 1) / 2, "");
993 : :
5820 bruce@momjian.us 994 [ + + ]: 111128 : if (!(this_line + 1)->ptr)
995 : : {
996 : 111020 : more_col_wrapping--;
997 : 111020 : header_done[i] = 1;
998 : : }
999 : : }
1000 : : else
1001 : 36 : fprintf(fout, "%*s", width_wrap[i], "");
1002 : :
4900 rhaas@postgresql.org 1003 [ + + + + ]: 111164 : if (opt_border != 0 || format->wrap_right_border)
5257 tgl@sss.pgh.pa.us 1004 [ + + ]: 111116 : fputs(!header_done[i] ? format->header_nl_right : " ",
1005 : : fout);
1006 : :
3309 bruce@momjian.us 1007 [ + + + - : 111164 : if (opt_border != 0 && col_count > 0 && i < col_count - 1)
+ + ]
5257 tgl@sss.pgh.pa.us 1008 : 52557 : fputs(dformat->midvrule, fout);
1009 : : }
5820 bruce@momjian.us 1010 : 58559 : curr_nl_line++;
1011 : :
6438 tgl@sss.pgh.pa.us 1012 [ + + ]: 58559 : if (opt_border == 2)
5257 1013 : 48 : fputs(dformat->rightvrule, fout);
6438 1014 : 58559 : fputc('\n', fout);
1015 : : }
1016 : :
5297 1017 : 58545 : _print_horizontal_line(col_count, width_wrap, opt_border,
1018 : : PRINT_RULE_MIDDLE, format, fout);
1019 : : }
1020 : : }
1021 : :
1022 : : /* print cells, one loop per row */
5816 alvherre@alvh.no-ip. 1023 [ + + ]: 278283 : for (i = 0, ptr = cont->cells; *ptr; i += col_count, ptr += col_count)
1024 : : {
1025 : : bool more_lines;
1026 : :
6514 tgl@sss.pgh.pa.us 1027 [ - + ]: 219596 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 1028 :UBC 0 : break;
1029 : :
1030 : : /*
1031 : : * Format each cell.
1032 : : */
6638 bruce@momjian.us 1033 [ + + ]:CBC 737228 : for (j = 0; j < col_count; j++)
1034 : : {
4599 peter_e@gmx.net 1035 : 517632 : pg_wcsformat((const unsigned char *) ptr[j], strlen(ptr[j]), encoding,
5818 tgl@sss.pgh.pa.us 1036 : 517632 : col_lineptrs[j], max_nl_lines[j]);
5820 bruce@momjian.us 1037 : 517632 : curr_nl_line[j] = 0;
1038 : : }
1039 : :
1040 : 219596 : memset(bytes_output, 0, col_count * sizeof(int));
1041 : :
1042 : : /*
1043 : : * Each time through this loop, one display line is output. It can
1044 : : * either be a full value or a partial value if embedded newlines
1045 : : * exist or if 'format=wrapping' mode is enabled.
1046 : : */
1047 : : do
1048 : : {
1049 : 228357 : more_lines = false;
1050 : :
1051 : : /* left border */
8928 1052 [ + + ]: 228357 : if (opt_border == 2)
5257 tgl@sss.pgh.pa.us 1053 : 276 : fputs(dformat->leftvrule, fout);
1054 : :
1055 : : /* for each column */
6638 bruce@momjian.us 1056 [ + + ]: 756580 : for (j = 0; j < col_count; j++)
1057 : : {
1058 : : /* We have a valid array element, so index it */
5820 1059 : 528223 : struct lineptr *this_line = &col_lineptrs[j][curr_nl_line[j]];
1060 : : int bytes_to_output;
5421 1061 : 528223 : int chars_to_output = width_wrap[j];
3309 1062 [ + + + - ]: 1055894 : bool finalspaces = (opt_border == 2 ||
2489 tgl@sss.pgh.pa.us 1063 [ + + ]: 527671 : (col_count > 0 && j < col_count - 1));
1064 : :
1065 : : /* Print left-hand wrap or newline mark */
5257 1066 [ + + ]: 528223 : if (opt_border != 0)
1067 : : {
1068 [ + + ]: 527743 : if (wrap[j] == PRINT_LINE_WRAP_WRAP)
1069 : 60 : fputs(format->wrap_left, fout);
1070 [ + + ]: 527683 : else if (wrap[j] == PRINT_LINE_WRAP_NEWLINE)
1071 : 8800 : fputs(format->nl_left, fout);
1072 : : else
1073 : 518883 : fputc(' ', fout);
1074 : : }
1075 : :
5820 bruce@momjian.us 1076 [ + + ]: 528223 : if (!this_line->ptr)
1077 : : {
1078 : : /* Past newline lines so just pad for other columns */
5818 tgl@sss.pgh.pa.us 1079 [ + + ]: 1539 : if (finalspaces)
1080 : 1323 : fprintf(fout, "%*s", chars_to_output, "");
1081 : : }
1082 : : else
1083 : : {
1084 : : /* Get strlen() of the characters up to width_wrap */
1085 : : bytes_to_output =
1086 : 526684 : strlen_max_width(this_line->ptr + bytes_output[j],
1087 : : &chars_to_output, encoding);
1088 : :
1089 : : /*
1090 : : * If we exceeded width_wrap, it means the display width
1091 : : * of a single character was wider than our target width.
1092 : : * In that case, we have to pretend we are only printing
1093 : : * the target display width and make the best of it.
1094 : : */
5820 bruce@momjian.us 1095 [ - + ]: 526684 : if (chars_to_output > width_wrap[j])
5820 bruce@momjian.us 1096 :UBC 0 : chars_to_output = width_wrap[j];
1097 : :
5421 bruce@momjian.us 1098 [ + + ]:CBC 526684 : if (cont->aligns[j] == 'r') /* Right aligned cell */
1099 : : {
1100 : : /* spaces first */
5820 1101 : 213435 : fprintf(fout, "%*s", width_wrap[j] - chars_to_output, "");
1385 tgl@sss.pgh.pa.us 1102 : 213435 : fwrite((char *) (this_line->ptr + bytes_output[j]),
1103 : : 1, bytes_to_output, fout);
1104 : : }
1105 : : else /* Left aligned cell */
1106 : : {
1107 : : /* spaces second */
1108 : 313249 : fwrite((char *) (this_line->ptr + bytes_output[j]),
1109 : : 1, bytes_to_output, fout);
1110 : : }
1111 : :
5820 bruce@momjian.us 1112 : 526684 : bytes_output[j] += bytes_to_output;
1113 : :
1114 : : /* Do we have more text to wrap? */
5818 tgl@sss.pgh.pa.us 1115 [ + + ]: 526684 : if (*(this_line->ptr + bytes_output[j]) != '\0')
5820 bruce@momjian.us 1116 : 60 : more_lines = true;
1117 : : else
1118 : : {
1119 : : /* Advance to next newline line */
1120 : 526624 : curr_nl_line[j]++;
1121 [ + + ]: 526624 : if (col_lineptrs[j][curr_nl_line[j]].ptr != NULL)
1122 : 8992 : more_lines = true;
1123 : 526624 : bytes_output[j] = 0;
1124 : : }
1125 : : }
1126 : :
1127 : : /* Determine next line's wrap status for this column */
5257 tgl@sss.pgh.pa.us 1128 : 528223 : wrap[j] = PRINT_LINE_WRAP_NONE;
1129 [ + + ]: 528223 : if (col_lineptrs[j][curr_nl_line[j]].ptr != NULL)
1130 : : {
1131 [ + + ]: 9052 : if (bytes_output[j] != 0)
1132 : 60 : wrap[j] = PRINT_LINE_WRAP_WRAP;
1133 [ + - ]: 8992 : else if (curr_nl_line[j] != 0)
1134 : 8992 : wrap[j] = PRINT_LINE_WRAP_NEWLINE;
1135 : : }
1136 : :
1137 : : /*
1138 : : * If left-aligned, pad out remaining space if needed (not
1139 : : * last column, and/or wrap marks required).
1140 : : */
2489 1141 [ + + ]: 528223 : if (cont->aligns[j] != 'r') /* Left aligned cell */
1142 : : {
5257 1143 [ + + ]: 314625 : if (finalspaces ||
1144 [ + + ]: 161078 : wrap[j] == PRINT_LINE_WRAP_WRAP ||
5161 bruce@momjian.us 1145 [ + + ]: 161072 : wrap[j] == PRINT_LINE_WRAP_NEWLINE)
5257 tgl@sss.pgh.pa.us 1146 : 161960 : fprintf(fout, "%*s",
1147 : 161960 : width_wrap[j] - chars_to_output, "");
1148 : : }
1149 : :
1150 : : /* Print right-hand wrap or newline mark */
1151 [ + + ]: 528223 : if (wrap[j] == PRINT_LINE_WRAP_WRAP)
1152 : 60 : fputs(format->wrap_right, fout);
1153 [ + + ]: 528163 : else if (wrap[j] == PRINT_LINE_WRAP_NEWLINE)
1154 : 8992 : fputs(format->nl_right, fout);
3309 bruce@momjian.us 1155 [ + + + - : 519171 : else if (opt_border == 2 || (col_count > 0 && j < col_count - 1))
+ + ]
5257 tgl@sss.pgh.pa.us 1156 : 299503 : fputc(' ', fout);
1157 : :
1158 : : /* Print column divider, if not the last column */
3309 bruce@momjian.us 1159 [ + + + - : 528223 : if (opt_border != 0 && (col_count > 0 && j < col_count - 1))
+ + ]
1160 : : {
5161 1161 [ + + ]: 299626 : if (wrap[j + 1] == PRINT_LINE_WRAP_WRAP)
5257 tgl@sss.pgh.pa.us 1162 : 18 : fputs(format->midvrule_wrap, fout);
5161 bruce@momjian.us 1163 [ + + ]: 299608 : else if (wrap[j + 1] == PRINT_LINE_WRAP_NEWLINE)
5257 tgl@sss.pgh.pa.us 1164 : 556 : fputs(format->midvrule_nl, fout);
5421 bruce@momjian.us 1165 [ + + ]: 299052 : else if (col_lineptrs[j + 1][curr_nl_line[j + 1]].ptr == NULL)
5257 tgl@sss.pgh.pa.us 1166 : 1160 : fputs(format->midvrule_blank, fout);
1167 : : else
1168 : 297892 : fputs(dformat->midvrule, fout);
1169 : : }
1170 : : }
1171 : :
1172 : : /* end-of-row border */
8928 bruce@momjian.us 1173 [ + + ]: 228357 : if (opt_border == 2)
5257 tgl@sss.pgh.pa.us 1174 : 276 : fputs(dformat->rightvrule, fout);
8928 bruce@momjian.us 1175 : 228357 : fputc('\n', fout);
5820 1176 [ + + ]: 228357 : } while (more_lines);
1177 : : }
1178 : :
5816 alvherre@alvh.no-ip. 1179 [ + + ]: 58687 : if (cont->opt->stop_table)
1180 : : {
4366 rhaas@postgresql.org 1181 : 58654 : printTableFooter *footers = footers_with_default(cont);
1182 : :
6438 tgl@sss.pgh.pa.us 1183 [ + + + - ]: 58654 : if (opt_border == 2 && !cancel_pressed)
5297 1184 : 24 : _print_horizontal_line(col_count, width_wrap, opt_border,
1185 : : PRINT_RULE_BOTTOM, format, fout);
1186 : :
1187 : : /* print footers */
4366 rhaas@postgresql.org 1188 [ + + + + : 58654 : if (footers && !opt_tuples_only && !cancel_pressed)
+ - ]
1189 : : {
1190 : : printTableFooter *f;
1191 : :
1192 [ + + ]: 120194 : for (f = footers; f; f = f->next)
5816 alvherre@alvh.no-ip. 1193 : 61897 : fprintf(fout, "%s\n", f->data);
1194 : : }
1195 : :
6438 tgl@sss.pgh.pa.us 1196 : 58654 : fputc('\n', fout);
1197 : : }
1198 : :
4421 peter_e@gmx.net 1199 : 33 : cleanup:
1200 : : /* clean up */
5188 tgl@sss.pgh.pa.us 1201 [ + + ]: 170083 : for (i = 0; i < col_count; i++)
1202 : : {
1203 : 111396 : free(col_lineptrs[i]);
1204 : 111396 : free(format_buf[i]);
1205 : : }
5820 bruce@momjian.us 1206 : 58687 : free(width_header);
1207 : 58687 : free(width_average);
1208 : 58687 : free(max_width);
1209 : 58687 : free(width_wrap);
1210 : 58687 : free(max_nl_lines);
1211 : 58687 : free(curr_nl_line);
6638 1212 : 58687 : free(col_lineptrs);
5820 1213 : 58687 : free(max_bytes);
5188 tgl@sss.pgh.pa.us 1214 : 58687 : free(format_buf);
5820 bruce@momjian.us 1215 : 58687 : free(header_done);
1216 : 58687 : free(bytes_output);
5188 tgl@sss.pgh.pa.us 1217 : 58687 : free(wrap);
1218 : :
3056 1219 [ + + ]: 58687 : if (is_local_pager)
5812 bruce@momjian.us 1220 : 300 : ClosePager(fout);
1221 : : }
1222 : :
1223 : :
1224 : : static void
629 andrew@dunslane.net 1225 : 793 : print_aligned_vertical_line(const printTableOpt *topt,
1226 : : unsigned long record,
1227 : : unsigned int hwidth,
1228 : : unsigned int dwidth,
1229 : : int output_columns,
1230 : : printTextRule pos,
1231 : : FILE *fout)
1232 : : {
1233 : 793 : const printTextLineFormat *lformat = &get_line_style(topt)->lrule[pos];
1234 : 793 : const unsigned short opt_border = topt->border;
1235 : : unsigned int i;
5161 bruce@momjian.us 1236 : 793 : int reclen = 0;
1237 : :
5297 tgl@sss.pgh.pa.us 1238 [ + + ]: 793 : if (opt_border == 2)
1239 : 234 : fprintf(fout, "%s%s", lformat->leftvrule, lformat->hrule);
1240 [ + + ]: 559 : else if (opt_border == 1)
1241 : 355 : fputs(lformat->hrule, fout);
1242 : :
1243 [ + + ]: 793 : if (record)
1244 : : {
1245 [ + + ]: 757 : if (opt_border == 0)
1246 : 204 : reclen = fprintf(fout, "* Record %lu", record);
1247 : : else
1248 : 553 : reclen = fprintf(fout, "[ RECORD %lu ]", record);
1249 : : }
1250 [ + + ]: 793 : if (opt_border != 2)
1251 : 559 : reclen++;
1252 [ - + ]: 793 : if (reclen < 0)
5297 tgl@sss.pgh.pa.us 1253 :UBC 0 : reclen = 0;
5297 tgl@sss.pgh.pa.us 1254 [ + + ]:CBC 3721 : for (i = reclen; i < hwidth; i++)
1255 [ + + ]: 2928 : fputs(opt_border > 0 ? lformat->hrule : " ", fout);
1256 : 793 : reclen -= hwidth;
1257 : :
1258 [ + + ]: 793 : if (opt_border > 0)
1259 : : {
1260 [ + + ]: 589 : if (reclen-- <= 0)
1261 : 502 : fputs(lformat->hrule, fout);
1262 [ + + ]: 589 : if (reclen-- <= 0)
1263 : : {
629 andrew@dunslane.net 1264 [ - + ]: 505 : if (topt->expanded_header_width_type == PRINT_XHEADER_COLUMN)
1265 : : {
629 andrew@dunslane.net 1266 :UBC 0 : fputs(lformat->rightvrule, fout);
1267 : : }
1268 : : else
1269 : : {
629 andrew@dunslane.net 1270 :CBC 505 : fputs(lformat->midvrule, fout);
1271 : : }
1272 : : }
1273 [ + + ]: 589 : if (reclen-- <= 0
1274 [ + - ]: 505 : && topt->expanded_header_width_type != PRINT_XHEADER_COLUMN)
5297 tgl@sss.pgh.pa.us 1275 : 505 : fputs(lformat->hrule, fout);
1276 : : }
1277 : : else
1278 : : {
1279 [ + + ]: 204 : if (reclen-- <= 0)
1280 : 180 : fputc(' ', fout);
1281 : : }
1282 : :
629 andrew@dunslane.net 1283 [ + - ]: 793 : if (topt->expanded_header_width_type != PRINT_XHEADER_COLUMN)
1284 : : {
1285 [ + - ]: 793 : if (topt->expanded_header_width_type == PRINT_XHEADER_PAGE
1286 [ - + ]: 793 : || topt->expanded_header_width_type == PRINT_XHEADER_EXACT_WIDTH)
1287 : : {
629 andrew@dunslane.net 1288 [ # # ]:UBC 0 : if (topt->expanded_header_width_type == PRINT_XHEADER_EXACT_WIDTH)
1289 : : {
1290 : 0 : output_columns = topt->expanded_header_exact_width;
1291 : : }
1292 [ # # ]: 0 : if (output_columns > 0)
1293 : : {
1294 [ # # ]: 0 : if (opt_border == 0)
1295 : 0 : dwidth = Min(dwidth, Max(0, (int) (output_columns - hwidth)));
1296 [ # # ]: 0 : if (opt_border == 1)
1297 : 0 : dwidth = Min(dwidth, Max(0, (int) (output_columns - hwidth - 3)));
1298 : :
1299 : : /*
1300 : : * Handling the xheader width for border=2 doesn't make much
1301 : : * sense because this format has an additional right border,
1302 : : * but keep this for consistency.
1303 : : */
1304 [ # # ]: 0 : if (opt_border == 2)
1305 : 0 : dwidth = Min(dwidth, Max(0, (int) (output_columns - hwidth - 7)));
1306 : : }
1307 : : }
1308 : :
629 andrew@dunslane.net 1309 [ + + ]:CBC 793 : if (reclen < 0)
1310 : 685 : reclen = 0;
1311 [ + + ]: 793 : if (dwidth < reclen)
1312 : 16 : dwidth = reclen;
1313 : :
1314 [ + + ]: 29210 : for (i = reclen; i < dwidth; i++)
1315 [ + + ]: 28417 : fputs(opt_border > 0 ? lformat->hrule : " ", fout);
1316 [ + + ]: 793 : if (opt_border == 2)
1317 : 234 : fprintf(fout, "%s%s", lformat->hrule, lformat->rightvrule);
1318 : : }
1319 : :
5297 tgl@sss.pgh.pa.us 1320 : 793 : fputc('\n', fout);
1321 : 793 : }
1322 : :
1323 : : static void
3056 1324 : 247 : print_aligned_vertical(const printTableContent *cont,
1325 : : FILE *fout, bool is_pager)
1326 : : {
5816 alvherre@alvh.no-ip. 1327 : 247 : bool opt_tuples_only = cont->opt->tuples_only;
1328 : 247 : unsigned short opt_border = cont->opt->border;
5297 tgl@sss.pgh.pa.us 1329 : 247 : const printTextFormat *format = get_line_style(cont->opt);
1330 : 247 : const printTextLineFormat *dformat = &format->lrule[PRINT_RULE_DATA];
5816 alvherre@alvh.no-ip. 1331 : 247 : int encoding = cont->opt->encoding;
1332 : 247 : unsigned long record = cont->opt->prior_records + 1;
1333 : : const char *const *ptr;
1334 : : unsigned int i,
8928 bruce@momjian.us 1335 : 247 : hwidth = 0,
6638 1336 : 247 : dwidth = 0,
1337 : 247 : hheight = 1,
1338 : 247 : dheight = 1,
1339 : 247 : hformatsize = 0,
1340 : 247 : dformatsize = 0;
1341 : : struct lineptr *hlineptr,
1342 : : *dlineptr;
3056 tgl@sss.pgh.pa.us 1343 : 247 : bool is_local_pager = false,
3527 stark@mit.edu 1344 : 247 : hmultiline = false,
1345 : 247 : dmultiline = false;
2489 tgl@sss.pgh.pa.us 1346 : 247 : int output_columns = 0; /* Width of interactive console */
1347 : :
6514 1348 [ - + ]: 247 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 1349 :UBC 0 : return;
1350 : :
6438 tgl@sss.pgh.pa.us 1351 [ - + ]:CBC 247 : if (opt_border > 2)
6438 tgl@sss.pgh.pa.us 1352 :UBC 0 : opt_border = 2;
1353 : :
5816 alvherre@alvh.no-ip. 1354 [ + + + + ]:CBC 247 : if (cont->cells[0] == NULL && cont->opt->start_table &&
1355 [ + - ]: 8 : cont->opt->stop_table)
1356 : : {
3309 bruce@momjian.us 1357 : 8 : printTableFooter *footers = footers_with_default(cont);
1358 : :
1359 [ + - + - : 8 : if (!opt_tuples_only && !cancel_pressed && footers)
+ - ]
1360 : : {
1361 : : printTableFooter *f;
1362 : :
1363 [ + + ]: 16 : for (f = footers; f; f = f->next)
1364 : 8 : fprintf(fout, "%s\n", f->data);
1365 : : }
1366 : :
1367 : 8 : fputc('\n', fout);
1368 : :
8768 1369 : 8 : return;
1370 : : }
1371 : :
1372 : : /*
1373 : : * Deal with the pager here instead of in printTable(), because we could
1374 : : * get here via print_aligned_text() in expanded auto mode, and so we have
1375 : : * to recalculate the pager requirement based on vertical output.
1376 : : */
3056 tgl@sss.pgh.pa.us 1377 [ + + ]: 239 : if (!is_pager)
1378 : : {
1379 : 227 : IsPagerNeeded(cont, 0, true, &fout, &is_pager);
1380 : 227 : is_local_pager = is_pager;
1381 : : }
1382 : :
1383 : : /* Find the maximum dimensions for the headers */
5816 alvherre@alvh.no-ip. 1384 [ + + ]: 1337 : for (i = 0; i < cont->ncolumns; i++)
1385 : : {
1386 : : int width,
1387 : : height,
1388 : : fs;
1389 : :
4599 peter_e@gmx.net 1390 : 1098 : pg_wcssize((const unsigned char *) cont->headers[i], strlen(cont->headers[i]),
1391 : : encoding, &width, &height, &fs);
5820 bruce@momjian.us 1392 [ + + ]: 1098 : if (width > hwidth)
1393 : 305 : hwidth = width;
6638 1394 [ + + ]: 1098 : if (height > hheight)
1395 : : {
1396 : 36 : hheight = height;
3527 stark@mit.edu 1397 : 36 : hmultiline = true;
1398 : : }
6638 bruce@momjian.us 1399 [ + + ]: 1098 : if (fs > hformatsize)
1400 : 305 : hformatsize = fs;
1401 : : }
1402 : :
1403 : : /* find longest data cell */
145 alvherre@alvh.no-ip. 1404 [ + + ]:GNC 2460 : for (ptr = cont->cells; *ptr; ptr++)
1405 : : {
1406 : : int width,
1407 : : height,
1408 : : fs;
1409 : :
4599 peter_e@gmx.net 1410 :CBC 2221 : pg_wcssize((const unsigned char *) *ptr, strlen(*ptr), encoding,
1411 : : &width, &height, &fs);
5820 bruce@momjian.us 1412 [ + + ]: 2221 : if (width > dwidth)
1413 : 466 : dwidth = width;
6638 1414 [ + + ]: 2221 : if (height > dheight)
1415 : : {
1416 : 42 : dheight = height;
3527 stark@mit.edu 1417 : 42 : dmultiline = true;
1418 : : }
6638 bruce@momjian.us 1419 [ + + ]: 2221 : if (fs > dformatsize)
1420 : 470 : dformatsize = fs;
1421 : : }
1422 : :
1423 : : /*
1424 : : * We now have all the information we need to setup the formatting
1425 : : * structures
1426 : : */
4212 tgl@sss.pgh.pa.us 1427 : 239 : dlineptr = pg_malloc((sizeof(*dlineptr)) * (dheight + 1));
1428 : 239 : hlineptr = pg_malloc((sizeof(*hlineptr)) * (hheight + 1));
1429 : :
1430 : 239 : dlineptr->ptr = pg_malloc(dformatsize);
1431 : 239 : hlineptr->ptr = pg_malloc(hformatsize);
1432 : :
5816 alvherre@alvh.no-ip. 1433 [ + + ]: 239 : if (cont->opt->start_table)
1434 : : {
1435 : : /* print title */
1436 [ + + + + ]: 233 : if (!opt_tuples_only && cont->title)
1437 : 9 : fprintf(fout, "%s\n", cont->title);
1438 : : }
1439 : :
1440 : : /*
1441 : : * Choose target output width: \pset columns, or $COLUMNS, or ioctl
1442 : : */
3639 stark@mit.edu 1443 [ + + ]: 239 : if (cont->opt->columns > 0)
1444 : 102 : output_columns = cont->opt->columns;
1445 [ + - + - : 137 : else if ((fout == stdout && isatty(fileno(stdout))) || is_pager)
+ + ]
1446 : : {
1447 [ - + ]: 12 : if (cont->opt->env_columns > 0)
3639 stark@mit.edu 1448 :UBC 0 : output_columns = cont->opt->env_columns;
1449 : : #ifdef TIOCGWINSZ
1450 : : else
1451 : : {
1452 : : struct winsize screen_size;
1453 : :
3639 stark@mit.edu 1454 [ - + ]:CBC 12 : if (ioctl(fileno(stdout), TIOCGWINSZ, &screen_size) != -1)
3639 stark@mit.edu 1455 :UBC 0 : output_columns = screen_size.ws_col;
1456 : : }
1457 : : #endif
1458 : : }
1459 : :
1460 : : /*
1461 : : * Calculate available width for data in wrapped mode
1462 : : */
3639 stark@mit.edu 1463 [ + + ]:CBC 239 : if (cont->opt->format == PRINT_WRAPPED)
1464 : : {
1465 : : unsigned int swidth,
3058 tgl@sss.pgh.pa.us 1466 : 51 : rwidth = 0,
1467 : : newdwidth;
1468 : :
3639 stark@mit.edu 1469 [ + + ]: 51 : if (opt_border == 0)
1470 : : {
1471 : : /*
1472 : : * For border = 0, one space in the middle. (If we discover we
1473 : : * need to wrap, the spacer column will be replaced by a wrap
1474 : : * marker, and we'll make room below for another wrap marker at
1475 : : * the end of the line. But for now, assume no wrap is needed.)
1476 : : */
3527 1477 : 15 : swidth = 1;
1478 : :
1479 : : /* We might need a column for header newline markers, too */
3058 tgl@sss.pgh.pa.us 1480 [ + + ]: 15 : if (hmultiline)
1481 : 6 : swidth++;
1482 : : }
3639 stark@mit.edu 1483 [ + + ]: 36 : else if (opt_border == 1)
1484 : : {
1485 : : /*
1486 : : * For border = 1, two spaces and a vrule in the middle. (As
1487 : : * above, we might need one more column for a wrap marker.)
1488 : : */
3527 1489 : 21 : swidth = 3;
1490 : :
1491 : : /* We might need a column for left header newline markers, too */
3058 tgl@sss.pgh.pa.us 1492 [ + + + + ]: 21 : if (hmultiline && (format == &pg_asciiformat_old))
1493 : 3 : swidth++;
1494 : : }
1495 : : else
1496 : : {
1497 : : /*
1498 : : * For border = 2, two more for the vrules at the beginning and
1499 : : * end of the lines, plus spacer columns adjacent to these. (We
1500 : : * won't need extra columns for wrap/newline markers, we'll just
1501 : : * repurpose the spacers.)
1502 : : */
3527 stark@mit.edu 1503 : 15 : swidth = 7;
1504 : : }
1505 : :
1506 : : /* Reserve a column for data newline indicators, too, if needed */
3058 tgl@sss.pgh.pa.us 1507 [ + + + + ]: 51 : if (dmultiline &&
1508 [ + + ]: 12 : opt_border < 2 && format != &pg_asciiformat_old)
1509 : 6 : swidth++;
1510 : :
1511 : : /* Determine width required for record header lines */
3639 stark@mit.edu 1512 [ + + ]: 51 : if (!opt_tuples_only)
1513 : : {
3057 tgl@sss.pgh.pa.us 1514 [ + - ]: 48 : if (cont->nrows > 0)
1515 : 48 : rwidth = 1 + (int) log10(cont->nrows);
3639 stark@mit.edu 1516 [ + + ]: 48 : if (opt_border == 0)
3527 1517 : 15 : rwidth += 9; /* "* RECORD " */
3639 1518 [ + + ]: 33 : else if (opt_border == 1)
3527 1519 : 18 : rwidth += 12; /* "-[ RECORD ]" */
1520 : : else
1521 : 15 : rwidth += 15; /* "+-[ RECORD ]-+" */
1522 : : }
1523 : :
1524 : : /* We might need to do the rest of the calculation twice */
1525 : : for (;;)
3058 tgl@sss.pgh.pa.us 1526 : 12 : {
1527 : : unsigned int width;
1528 : :
1529 : : /* Total width required to not wrap data */
1530 : 63 : width = hwidth + swidth + dwidth;
1531 : : /* ... and not the header lines, either */
3057 1532 [ - + ]: 63 : if (width < rwidth)
3057 tgl@sss.pgh.pa.us 1533 :UBC 0 : width = rwidth;
1534 : :
3057 tgl@sss.pgh.pa.us 1535 [ + - ]:CBC 63 : if (output_columns > 0)
1536 : : {
1537 : : unsigned int min_width;
1538 : :
1539 : : /* Minimum acceptable width: room for just 3 columns of data */
1540 : 63 : min_width = hwidth + swidth + 3;
1541 : : /* ... but not less than what the record header lines need */
1542 [ + + ]: 63 : if (min_width < rwidth)
1543 : 18 : min_width = rwidth;
1544 : :
1545 [ + + ]: 63 : if (output_columns >= width)
1546 : : {
1547 : : /* Plenty of room, use native data width */
1548 : : /* (but at least enough for the record header lines) */
1549 : 12 : newdwidth = width - hwidth - swidth;
1550 : : }
1551 [ + + ]: 51 : else if (output_columns < min_width)
1552 : : {
1553 : : /* Set data width to match min_width */
1554 : 12 : newdwidth = min_width - hwidth - swidth;
1555 : : }
1556 : : else
1557 : : {
1558 : : /* Set data width to match output_columns */
1559 : 39 : newdwidth = output_columns - hwidth - swidth;
1560 : : }
1561 : : }
1562 : : else
1563 : : {
1564 : : /* Don't know the wrap limit, so use native data width */
1565 : : /* (but at least enough for the record header lines) */
3057 tgl@sss.pgh.pa.us 1566 :UBC 0 : newdwidth = width - hwidth - swidth;
1567 : : }
1568 : :
1569 : : /*
1570 : : * If we will need to wrap data and didn't already allocate a data
1571 : : * newline/wrap marker column, do so and recompute.
1572 : : */
3058 tgl@sss.pgh.pa.us 1573 [ + + + + :CBC 63 : if (newdwidth < dwidth && !dmultiline &&
+ + ]
1574 [ + - ]: 12 : opt_border < 2 && format != &pg_asciiformat_old)
1575 : : {
1576 : 12 : dmultiline = true;
1577 : 12 : swidth++;
1578 : : }
1579 : : else
1580 : : break;
1581 : : }
1582 : :
1583 : 51 : dwidth = newdwidth;
1584 : : }
1585 : :
1586 : : /* print records */
5816 alvherre@alvh.no-ip. 1587 [ + + ]: 2460 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
1588 : : {
1589 : : printTextRule pos;
1590 : : int dline,
1591 : : hline,
1592 : : dcomplete,
1593 : : hcomplete,
1594 : : offset,
1595 : : chars_to_output;
1596 : :
5297 tgl@sss.pgh.pa.us 1597 [ - + ]: 2221 : if (cancel_pressed)
5297 tgl@sss.pgh.pa.us 1598 :UBC 0 : break;
1599 : :
5297 tgl@sss.pgh.pa.us 1600 [ + + ]:CBC 2221 : if (i == 0)
5161 bruce@momjian.us 1601 : 233 : pos = PRINT_RULE_TOP;
1602 : : else
5297 tgl@sss.pgh.pa.us 1603 : 1988 : pos = PRINT_RULE_MIDDLE;
1604 : :
1605 : : /* Print record header (e.g. "[ RECORD N ]") above each record */
5816 alvherre@alvh.no-ip. 1606 [ + + ]: 2221 : if (i % cont->ncolumns == 0)
1607 : : {
3527 stark@mit.edu 1608 : 769 : unsigned int lhwidth = hwidth;
1609 : :
1610 [ + + + + ]: 769 : if ((opt_border < 2) &&
3524 peter_e@gmx.net 1611 [ + + ]: 48 : (hmultiline) &&
1612 : : (format == &pg_asciiformat_old))
3249 bruce@momjian.us 1613 : 24 : lhwidth++; /* for newline indicators */
1614 : :
6849 1615 [ + + ]: 769 : if (!opt_tuples_only)
629 andrew@dunslane.net 1616 : 757 : print_aligned_vertical_line(cont->opt, record++,
1617 : : lhwidth, dwidth, output_columns,
1618 : : pos, fout);
5816 alvherre@alvh.no-ip. 1619 [ + + + - : 12 : else if (i != 0 || !cont->opt->start_table || opt_border == 2)
- + ]
629 andrew@dunslane.net 1620 : 6 : print_aligned_vertical_line(cont->opt, 0, lhwidth,
1621 : : dwidth, output_columns, pos, fout);
1622 : : }
1623 : :
1624 : : /* Format the header */
4599 peter_e@gmx.net 1625 : 2221 : pg_wcsformat((const unsigned char *) cont->headers[i % cont->ncolumns],
5816 alvherre@alvh.no-ip. 1626 : 2221 : strlen(cont->headers[i % cont->ncolumns]),
1627 : : encoding, hlineptr, hheight);
1628 : : /* Format the data */
4599 peter_e@gmx.net 1629 : 2221 : pg_wcsformat((const unsigned char *) *ptr, strlen(*ptr), encoding,
1630 : : dlineptr, dheight);
1631 : :
1632 : : /*
1633 : : * Loop through header and data in parallel dealing with newlines and
1634 : : * wrapped lines until they're both exhausted
1635 : : */
3639 stark@mit.edu 1636 : 2221 : dline = hline = 0;
6638 bruce@momjian.us 1637 : 2221 : dcomplete = hcomplete = 0;
3639 stark@mit.edu 1638 : 2221 : offset = 0;
1639 : 2221 : chars_to_output = dlineptr[dline].width;
6638 bruce@momjian.us 1640 [ + + + + ]: 5846 : while (!dcomplete || !hcomplete)
1641 : : {
1642 : : /* Left border */
1643 [ + + ]: 3625 : if (opt_border == 2)
3639 stark@mit.edu 1644 : 909 : fprintf(fout, "%s", dformat->leftvrule);
1645 : :
1646 : : /* Header (never wrapped so just need to deal with newlines) */
6638 bruce@momjian.us 1647 [ + + ]: 3625 : if (!hcomplete)
1648 : : {
3527 stark@mit.edu 1649 : 2437 : int swidth = hwidth,
1650 : 2437 : target_width = hwidth;
1651 : :
1652 : : /*
1653 : : * Left spacer or new line indicator
1654 : : */
1655 [ + + + + ]: 2437 : if ((opt_border == 2) ||
1656 [ + + ]: 240 : (hmultiline && (format == &pg_asciiformat_old)))
1657 [ + + ]: 600 : fputs(hline ? format->header_nl_left : " ", fout);
1658 : :
1659 : : /*
1660 : : * Header text
1661 : : */
1662 : 2437 : strlen_max_width(hlineptr[hline].ptr, &target_width,
1663 : : encoding);
3639 1664 : 2437 : fprintf(fout, "%-s", hlineptr[hline].ptr);
1665 : :
1666 : : /*
1667 : : * Spacer
1668 : : */
3527 1669 : 2437 : swidth -= target_width;
1670 [ + + ]: 2437 : if (swidth > 0)
3639 1671 : 1504 : fprintf(fout, "%*s", swidth, " ");
1672 : :
1673 : : /*
1674 : : * New line indicator or separator's space
1675 : : */
1676 [ + + ]: 2437 : if (hlineptr[hline + 1].ptr)
1677 : : {
1678 : : /* More lines after this one due to a newline */
3527 1679 [ + + + - ]: 216 : if ((opt_border > 0) ||
1680 [ + + ]: 72 : (hmultiline && (format != &pg_asciiformat_old)))
1681 : 180 : fputs(format->header_nl_right, fout);
3639 1682 : 216 : hline++;
1683 : : }
1684 : : else
1685 : : {
1686 : : /* This was the last line of the header */
3527 1687 [ + + + + ]: 2221 : if ((opt_border > 0) ||
1688 [ + + ]: 48 : (hmultiline && (format != &pg_asciiformat_old)))
1689 : 1837 : fputs(" ", fout);
6638 bruce@momjian.us 1690 : 2221 : hcomplete = 1;
1691 : : }
1692 : : }
1693 : : else
1694 : : {
3527 stark@mit.edu 1695 : 1188 : unsigned int swidth = hwidth + opt_border;
1696 : :
1697 [ + + + + ]: 1188 : if ((opt_border < 2) &&
1698 [ + + ]: 354 : (hmultiline) &&
1699 : : (format == &pg_asciiformat_old))
1700 : 174 : swidth++;
1701 : :
3524 peter_e@gmx.net 1702 [ + + + + ]: 1188 : if ((opt_border == 0) &&
3527 stark@mit.edu 1703 [ + + ]: 273 : (format != &pg_asciiformat_old) &&
1704 : : (hmultiline))
1705 : 90 : swidth++;
1706 : :
1707 : 1188 : fprintf(fout, "%*s", swidth, " ");
1708 : : }
1709 : :
1710 : : /* Separator */
6638 bruce@momjian.us 1711 [ + + ]: 3625 : if (opt_border > 0)
1712 : : {
3639 stark@mit.edu 1713 [ + + ]: 2788 : if (offset)
1714 : 558 : fputs(format->midvrule_wrap, fout);
3058 tgl@sss.pgh.pa.us 1715 [ + + ]: 2230 : else if (dline == 0)
3639 stark@mit.edu 1716 : 1813 : fputs(dformat->midvrule, fout);
1717 : : else
3058 tgl@sss.pgh.pa.us 1718 : 417 : fputs(format->midvrule_nl, fout);
1719 : : }
1720 : :
1721 : : /* Data */
6638 bruce@momjian.us 1722 [ + + ]: 3625 : if (!dcomplete)
1723 : : {
3527 stark@mit.edu 1724 : 3535 : int target_width = dwidth,
1725 : : bytes_to_output,
1726 : 3535 : swidth = dwidth;
1727 : :
1728 : : /*
1729 : : * Left spacer or wrap indicator
1730 : : */
3058 tgl@sss.pgh.pa.us 1731 [ + + ]: 3535 : fputs(offset == 0 ? " " : format->wrap_left, fout);
1732 : :
1733 : : /*
1734 : : * Data text
1735 : : */
3639 stark@mit.edu 1736 : 3535 : bytes_to_output = strlen_max_width(dlineptr[dline].ptr + offset,
1737 : : &target_width, encoding);
1385 tgl@sss.pgh.pa.us 1738 : 3535 : fwrite((char *) (dlineptr[dline].ptr + offset),
1739 : : 1, bytes_to_output, fout);
1740 : :
3639 stark@mit.edu 1741 : 3535 : chars_to_output -= target_width;
1742 : 3535 : offset += bytes_to_output;
1743 : :
1744 : : /* Spacer */
3527 1745 : 3535 : swidth -= target_width;
1746 : :
3639 1747 [ + + ]: 3535 : if (chars_to_output)
1748 : : {
1749 : : /* continuing a wrapped column */
3527 1750 [ + + + - ]: 705 : if ((opt_border > 1) ||
1751 [ + + ]: 426 : (dmultiline && (format != &pg_asciiformat_old)))
1752 : : {
1753 [ - + ]: 681 : if (swidth > 0)
3527 stark@mit.edu 1754 :UBC 0 : fprintf(fout, "%*s", swidth, " ");
3527 stark@mit.edu 1755 :CBC 681 : fputs(format->wrap_right, fout);
1756 : : }
1757 : : }
3639 1758 [ + + ]: 2830 : else if (dlineptr[dline + 1].ptr)
1759 : : {
1760 : : /* reached a newline in the column */
3527 1761 [ + + + - ]: 609 : if ((opt_border > 1) ||
1762 [ + + ]: 417 : (dmultiline && (format != &pg_asciiformat_old)))
1763 : : {
1764 [ + + ]: 417 : if (swidth > 0)
1765 : 408 : fprintf(fout, "%*s", swidth, " ");
1766 : 417 : fputs(format->nl_right, fout);
1767 : : }
3639 1768 : 609 : dline++;
1769 : 609 : offset = 0;
1770 : 609 : chars_to_output = dlineptr[dline].width;
1771 : : }
1772 : : else
1773 : : {
1774 : : /* reached the end of the cell */
3527 1775 [ + + ]: 2221 : if (opt_border > 1)
1776 : : {
1777 [ + + ]: 408 : if (swidth > 0)
1778 : 369 : fprintf(fout, "%*s", swidth, " ");
1779 : 408 : fputs(" ", fout);
1780 : : }
6402 bruce@momjian.us 1781 : 2221 : dcomplete = 1;
1782 : : }
1783 : :
1784 : : /* Right border */
3639 stark@mit.edu 1785 [ + + ]: 3535 : if (opt_border == 2)
1786 : 879 : fputs(dformat->rightvrule, fout);
1787 : :
1788 : 3535 : fputs("\n", fout);
1789 : : }
1790 : : else
1791 : : {
1792 : : /*
1793 : : * data exhausted (this can occur if header is longer than the
1794 : : * data due to newlines in the header)
1795 : : */
6402 bruce@momjian.us 1796 [ + + ]: 90 : if (opt_border < 2)
3639 stark@mit.edu 1797 : 60 : fputs("\n", fout);
1798 : : else
1799 : 30 : fprintf(fout, "%*s %s\n", dwidth, "", dformat->rightvrule);
1800 : : }
1801 : : }
1802 : : }
1803 : :
5816 alvherre@alvh.no-ip. 1804 [ + + ]: 239 : if (cont->opt->stop_table)
1805 : : {
6438 tgl@sss.pgh.pa.us 1806 [ + + + - ]: 233 : if (opt_border == 2 && !cancel_pressed)
629 andrew@dunslane.net 1807 : 30 : print_aligned_vertical_line(cont->opt, 0, hwidth, dwidth,
1808 : : output_columns, PRINT_RULE_BOTTOM, fout);
1809 : :
1810 : : /* print footers */
5816 alvherre@alvh.no-ip. 1811 [ + + + + : 233 : if (!opt_tuples_only && cont->footers != NULL && !cancel_pressed)
+ - ]
1812 : : {
1813 : : printTableFooter *f;
1814 : :
6438 tgl@sss.pgh.pa.us 1815 [ + - ]: 6 : if (opt_border < 2)
1816 : 6 : fputc('\n', fout);
5816 alvherre@alvh.no-ip. 1817 [ + + ]: 12 : for (f = cont->footers; f; f = f->next)
1818 : 6 : fprintf(fout, "%s\n", f->data);
1819 : : }
1820 : :
6438 tgl@sss.pgh.pa.us 1821 : 233 : fputc('\n', fout);
1822 : : }
1823 : :
6638 bruce@momjian.us 1824 : 239 : free(hlineptr->ptr);
1825 : 239 : free(dlineptr->ptr);
1826 : 239 : free(hlineptr);
1827 : 239 : free(dlineptr);
1828 : :
3056 tgl@sss.pgh.pa.us 1829 [ - + ]: 239 : if (is_local_pager)
4537 peter_e@gmx.net 1830 :UBC 0 : ClosePager(fout);
1831 : : }
1832 : :
1833 : :
1834 : : /**********************/
1835 : : /* CSV format */
1836 : : /**********************/
1837 : :
1838 : :
1839 : : static void
1966 tgl@sss.pgh.pa.us 1840 :CBC 54 : csv_escaped_print(const char *str, FILE *fout)
1841 : : {
1842 : : const char *p;
1843 : :
1844 : 54 : fputc('"', fout);
1845 [ + + ]: 462 : for (p = str; *p; p++)
1846 : : {
1847 [ + + ]: 408 : if (*p == '"')
1848 : 21 : fputc('"', fout); /* double quotes are doubled */
1849 : 408 : fputc(*p, fout);
1850 : : }
1851 : 54 : fputc('"', fout);
1852 : 54 : }
1853 : :
1854 : : static void
1855 : 312 : csv_print_field(const char *str, FILE *fout, char sep)
1856 : : {
1857 : : /*----------------
1858 : : * Enclose and escape field contents when one of these conditions is met:
1859 : : * - the field separator is found in the contents.
1860 : : * - the field contains a CR or LF.
1861 : : * - the field contains a double quote.
1862 : : * - the field is exactly "\.".
1863 : : * - the field separator is either "\" or ".".
1864 : : * The last two cases prevent producing a line that the server's COPY
1865 : : * command would interpret as an end-of-data marker. We only really
1866 : : * need to ensure that the complete line isn't exactly "\.", but for
1867 : : * simplicity we apply stronger restrictions here.
1868 : : *----------------
1869 : : */
1870 [ + + ]: 312 : if (strchr(str, sep) != NULL ||
1871 [ + + ]: 306 : strcspn(str, "\r\n\"") != strlen(str) ||
1872 [ + + + - ]: 273 : strcmp(str, "\\.") == 0 ||
1873 [ + + ]: 270 : sep == '\\' || sep == '.')
1874 : 54 : csv_escaped_print(str, fout);
1875 : : else
1876 : 258 : fputs(str, fout);
1877 : 312 : }
1878 : :
1879 : : static void
1880 : 24 : print_csv_text(const printTableContent *cont, FILE *fout)
1881 : : {
1882 : : const char *const *ptr;
1883 : : int i;
1884 : :
1885 [ - + ]: 24 : if (cancel_pressed)
1966 tgl@sss.pgh.pa.us 1886 :UBC 0 : return;
1887 : :
1888 : : /*
1889 : : * The title and footer are never printed in csv format. The header is
1890 : : * printed if opt_tuples_only is false.
1891 : : *
1892 : : * Despite RFC 4180 saying that end of lines are CRLF, terminate lines
1893 : : * with '\n', which prints out as the system-dependent EOL string in text
1894 : : * mode (typically LF on Unix and CRLF on Windows).
1895 : : */
1966 tgl@sss.pgh.pa.us 1896 [ + - + + ]:CBC 24 : if (cont->opt->start_table && !cont->opt->tuples_only)
1897 : : {
1898 : : /* print headers */
1899 [ + + ]: 81 : for (ptr = cont->headers; *ptr; ptr++)
1900 : : {
1901 [ + + ]: 60 : if (ptr != cont->headers)
1902 : 39 : fputc(cont->opt->csvFieldSep[0], fout);
1903 : 60 : csv_print_field(*ptr, fout, cont->opt->csvFieldSep[0]);
1904 : : }
1905 : 21 : fputc('\n', fout);
1906 : : }
1907 : :
1908 : : /* print cells */
1909 [ + + ]: 126 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
1910 : : {
1911 : 102 : csv_print_field(*ptr, fout, cont->opt->csvFieldSep[0]);
1912 [ + + ]: 102 : if ((i + 1) % cont->ncolumns)
1913 : 72 : fputc(cont->opt->csvFieldSep[0], fout);
1914 : : else
1915 : 30 : fputc('\n', fout);
1916 : : }
1917 : : }
1918 : :
1919 : : static void
1920 : 9 : print_csv_vertical(const printTableContent *cont, FILE *fout)
1921 : : {
1922 : : const char *const *ptr;
1923 : : int i;
1924 : :
1925 : : /* print records */
1926 [ + + ]: 84 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
1927 : : {
1928 [ - + ]: 75 : if (cancel_pressed)
1966 tgl@sss.pgh.pa.us 1929 :UBC 0 : return;
1930 : :
1931 : : /* print name of column */
1966 tgl@sss.pgh.pa.us 1932 :CBC 75 : csv_print_field(cont->headers[i % cont->ncolumns], fout,
1933 : 75 : cont->opt->csvFieldSep[0]);
1934 : :
1935 : : /* print field separator */
1936 : 75 : fputc(cont->opt->csvFieldSep[0], fout);
1937 : :
1938 : : /* print field value */
1939 : 75 : csv_print_field(*ptr, fout, cont->opt->csvFieldSep[0]);
1940 : :
1941 : 75 : fputc('\n', fout);
1942 : : }
1943 : : }
1944 : :
1945 : :
1946 : : /**********************/
1947 : : /* HTML */
1948 : : /**********************/
1949 : :
1950 : :
1951 : : void
8928 bruce@momjian.us 1952 : 411 : html_escaped_print(const char *in, FILE *fout)
1953 : : {
1954 : : const char *p;
6756 1955 : 411 : bool leading_space = true;
1956 : :
8928 1957 [ + + ]: 3450 : for (p = in; *p; p++)
1958 : : {
1959 [ + + + + : 3039 : switch (*p)
+ + + ]
1960 : : {
1961 : 27 : case '&':
1962 : 27 : fputs("&", fout);
1963 : 27 : break;
1964 : 72 : case '<':
1965 : 72 : fputs("<", fout);
1966 : 72 : break;
1967 : 72 : case '>':
1968 : 72 : fputs(">", fout);
1969 : 72 : break;
1970 : 36 : case '\n':
7612 1971 : 36 : fputs("<br />\n", fout);
1972 : 36 : break;
1973 : 48 : case '"':
1974 : 48 : fputs(""", fout);
1975 : 48 : break;
6879 1976 : 135 : case ' ':
1977 : : /* protect leading space, for EXPLAIN output */
1978 [ + + ]: 135 : if (leading_space)
1979 : 72 : fputs(" ", fout);
1980 : : else
1981 : 63 : fputs(" ", fout);
1982 : 135 : break;
8928 1983 : 2649 : default:
1984 : 2649 : fputc(*p, fout);
1985 : : }
6879 1986 [ + + ]: 3039 : if (*p != ' ')
1987 : 2904 : leading_space = false;
1988 : : }
8928 1989 : 411 : }
1990 : :
1991 : :
1992 : : static void
5816 alvherre@alvh.no-ip. 1993 : 15 : print_html_text(const printTableContent *cont, FILE *fout)
1994 : : {
1995 : 15 : bool opt_tuples_only = cont->opt->tuples_only;
1996 : 15 : unsigned short opt_border = cont->opt->border;
1997 : 15 : const char *opt_table_attr = cont->opt->tableAttr;
1998 : : unsigned int i;
1999 : : const char *const *ptr;
2000 : :
6514 tgl@sss.pgh.pa.us 2001 [ - + ]: 15 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 2002 :UBC 0 : return;
2003 : :
5816 alvherre@alvh.no-ip. 2004 [ + - ]:CBC 15 : if (cont->opt->start_table)
2005 : : {
6438 tgl@sss.pgh.pa.us 2006 : 15 : fprintf(fout, "<table border=\"%d\"", opt_border);
2007 [ + + ]: 15 : if (opt_table_attr)
2008 : 3 : fprintf(fout, " %s", opt_table_attr);
2009 : 15 : fputs(">\n", fout);
2010 : :
2011 : : /* print title */
5816 alvherre@alvh.no-ip. 2012 [ + + + + ]: 15 : if (!opt_tuples_only && cont->title)
2013 : : {
6438 tgl@sss.pgh.pa.us 2014 : 3 : fputs(" <caption>", fout);
5816 alvherre@alvh.no-ip. 2015 : 3 : html_escaped_print(cont->title, fout);
6438 tgl@sss.pgh.pa.us 2016 : 3 : fputs("</caption>\n", fout);
2017 : : }
2018 : :
2019 : : /* print headers */
6849 bruce@momjian.us 2020 [ + + ]: 15 : if (!opt_tuples_only)
2021 : : {
6438 tgl@sss.pgh.pa.us 2022 : 12 : fputs(" <tr>\n", fout);
5816 alvherre@alvh.no-ip. 2023 [ + + ]: 69 : for (ptr = cont->headers; *ptr; ptr++)
2024 : : {
6438 tgl@sss.pgh.pa.us 2025 : 57 : fputs(" <th align=\"center\">", fout);
2026 : 57 : html_escaped_print(*ptr, fout);
2027 : 57 : fputs("</th>\n", fout);
2028 : : }
2029 : 12 : fputs(" </tr>\n", fout);
2030 : : }
2031 : : }
2032 : :
2033 : : /* print cells */
5816 alvherre@alvh.no-ip. 2034 [ + + ]: 138 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
2035 : : {
2036 [ + + ]: 123 : if (i % cont->ncolumns == 0)
2037 : : {
6514 tgl@sss.pgh.pa.us 2038 [ - + ]: 27 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 2039 :UBC 0 : break;
7612 bruce@momjian.us 2040 :CBC 27 : fputs(" <tr valign=\"top\">\n", fout);
2041 : : }
2042 : :
5816 alvherre@alvh.no-ip. 2043 [ + + ]: 123 : fprintf(fout, " <td align=\"%s\">", cont->aligns[(i) % cont->ncolumns] == 'r' ? "right" : "left");
2044 : : /* is string only whitespace? */
6756 bruce@momjian.us 2045 [ + + ]: 123 : if ((*ptr)[strspn(*ptr, " \t")] == '\0')
7612 2046 : 18 : fputs(" ", fout);
2047 : : else
8928 2048 : 105 : html_escaped_print(*ptr, fout);
2049 : :
2050 : 123 : fputs("</td>\n", fout);
2051 : :
5816 alvherre@alvh.no-ip. 2052 [ + + ]: 123 : if ((i + 1) % cont->ncolumns == 0)
8928 bruce@momjian.us 2053 : 27 : fputs(" </tr>\n", fout);
2054 : : }
2055 : :
5816 alvherre@alvh.no-ip. 2056 [ + - ]: 15 : if (cont->opt->stop_table)
2057 : : {
4366 rhaas@postgresql.org 2058 : 15 : printTableFooter *footers = footers_with_default(cont);
2059 : :
6438 tgl@sss.pgh.pa.us 2060 : 15 : fputs("</table>\n", fout);
2061 : :
2062 : : /* print footers */
4366 rhaas@postgresql.org 2063 [ + + + - : 15 : if (!opt_tuples_only && footers != NULL && !cancel_pressed)
+ - ]
2064 : : {
2065 : : printTableFooter *f;
2066 : :
6438 tgl@sss.pgh.pa.us 2067 : 12 : fputs("<p>", fout);
4366 rhaas@postgresql.org 2068 [ + + ]: 24 : for (f = footers; f; f = f->next)
2069 : : {
5816 alvherre@alvh.no-ip. 2070 : 12 : html_escaped_print(f->data, fout);
6438 tgl@sss.pgh.pa.us 2071 : 12 : fputs("<br />\n", fout);
2072 : : }
2073 : 12 : fputs("</p>", fout);
2074 : : }
2075 : :
2076 : 15 : fputc('\n', fout);
2077 : : }
2078 : : }
2079 : :
2080 : :
2081 : : static void
5816 alvherre@alvh.no-ip. 2082 : 15 : print_html_vertical(const printTableContent *cont, FILE *fout)
2083 : : {
2084 : 15 : bool opt_tuples_only = cont->opt->tuples_only;
2085 : 15 : unsigned short opt_border = cont->opt->border;
2086 : 15 : const char *opt_table_attr = cont->opt->tableAttr;
2087 : 15 : unsigned long record = cont->opt->prior_records + 1;
2088 : : unsigned int i;
2089 : : const char *const *ptr;
2090 : :
6514 tgl@sss.pgh.pa.us 2091 [ - + ]: 15 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 2092 :UBC 0 : return;
2093 : :
5816 alvherre@alvh.no-ip. 2094 [ + - ]:CBC 15 : if (cont->opt->start_table)
2095 : : {
6438 tgl@sss.pgh.pa.us 2096 : 15 : fprintf(fout, "<table border=\"%d\"", opt_border);
2097 [ + + ]: 15 : if (opt_table_attr)
2098 : 3 : fprintf(fout, " %s", opt_table_attr);
2099 : 15 : fputs(">\n", fout);
2100 : :
2101 : : /* print title */
5816 alvherre@alvh.no-ip. 2102 [ + + + + ]: 15 : if (!opt_tuples_only && cont->title)
2103 : : {
6438 tgl@sss.pgh.pa.us 2104 : 3 : fputs(" <caption>", fout);
5816 alvherre@alvh.no-ip. 2105 : 3 : html_escaped_print(cont->title, fout);
6438 tgl@sss.pgh.pa.us 2106 : 3 : fputs("</caption>\n", fout);
2107 : : }
2108 : : }
2109 : :
2110 : : /* print records */
5816 alvherre@alvh.no-ip. 2111 [ + + ]: 138 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
2112 : : {
2113 [ + + ]: 123 : if (i % cont->ncolumns == 0)
2114 : : {
6514 tgl@sss.pgh.pa.us 2115 [ - + ]: 27 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 2116 :UBC 0 : break;
6849 bruce@momjian.us 2117 [ + + ]:CBC 27 : if (!opt_tuples_only)
6438 tgl@sss.pgh.pa.us 2118 : 21 : fprintf(fout,
2119 : : "\n <tr><td colspan=\"2\" align=\"center\">Record %lu</td></tr>\n",
2120 : : record++);
2121 : : else
7612 bruce@momjian.us 2122 : 6 : fputs("\n <tr><td colspan=\"2\"> </td></tr>\n", fout);
2123 : : }
2124 : 123 : fputs(" <tr valign=\"top\">\n"
2125 : : " <th>", fout);
5816 alvherre@alvh.no-ip. 2126 : 123 : html_escaped_print(cont->headers[i % cont->ncolumns], fout);
8928 bruce@momjian.us 2127 : 123 : fputs("</th>\n", fout);
2128 : :
5816 alvherre@alvh.no-ip. 2129 [ + + ]: 123 : fprintf(fout, " <td align=\"%s\">", cont->aligns[i % cont->ncolumns] == 'r' ? "right" : "left");
2130 : : /* is string only whitespace? */
6756 bruce@momjian.us 2131 [ + + ]: 123 : if ((*ptr)[strspn(*ptr, " \t")] == '\0')
7612 2132 : 18 : fputs(" ", fout);
2133 : : else
8928 2134 : 105 : html_escaped_print(*ptr, fout);
2135 : :
2136 : 123 : fputs("</td>\n </tr>\n", fout);
2137 : : }
2138 : :
5816 alvherre@alvh.no-ip. 2139 [ + - ]: 15 : if (cont->opt->stop_table)
2140 : : {
6438 tgl@sss.pgh.pa.us 2141 : 15 : fputs("</table>\n", fout);
2142 : :
2143 : : /* print footers */
5816 alvherre@alvh.no-ip. 2144 [ + + + + : 15 : if (!opt_tuples_only && cont->footers != NULL && !cancel_pressed)
+ - ]
2145 : : {
2146 : : printTableFooter *f;
2147 : :
6438 tgl@sss.pgh.pa.us 2148 : 3 : fputs("<p>", fout);
5816 alvherre@alvh.no-ip. 2149 [ + + ]: 6 : for (f = cont->footers; f; f = f->next)
2150 : : {
2151 : 3 : html_escaped_print(f->data, fout);
6438 tgl@sss.pgh.pa.us 2152 : 3 : fputs("<br />\n", fout);
2153 : : }
2154 : 3 : fputs("</p>", fout);
2155 : : }
2156 : :
2157 : 15 : fputc('\n', fout);
2158 : : }
2159 : : }
2160 : :
2161 : :
2162 : : /*************************/
2163 : : /* ASCIIDOC */
2164 : : /*************************/
2165 : :
2166 : :
2167 : : static void
3302 bruce@momjian.us 2168 : 327 : asciidoc_escaped_print(const char *in, FILE *fout)
2169 : : {
2170 : : const char *p;
2171 : :
2172 [ + + ]: 2295 : for (p = in; *p; p++)
2173 : : {
3249 2174 [ + + ]: 1968 : switch (*p)
2175 : : {
3302 2176 : 63 : case '|':
2177 : 63 : fputs("\\|", fout);
2178 : 63 : break;
2179 : 1905 : default:
2180 : 1905 : fputc(*p, fout);
2181 : : }
2182 : : }
2183 : 327 : }
2184 : :
2185 : : static void
2186 : 15 : print_asciidoc_text(const printTableContent *cont, FILE *fout)
2187 : : {
2188 : 15 : bool opt_tuples_only = cont->opt->tuples_only;
2189 : 15 : unsigned short opt_border = cont->opt->border;
2190 : : unsigned int i;
2191 : : const char *const *ptr;
2192 : :
2193 [ - + ]: 15 : if (cancel_pressed)
3302 bruce@momjian.us 2194 :UBC 0 : return;
2195 : :
3302 bruce@momjian.us 2196 [ + - ]:CBC 15 : if (cont->opt->start_table)
2197 : : {
2198 : : /* print table in new paragraph - enforce preliminary new line */
2199 : 15 : fputs("\n", fout);
2200 : :
2201 : : /* print title */
2202 [ + + + + ]: 15 : if (!opt_tuples_only && cont->title)
2203 : : {
2204 : 3 : fputs(".", fout);
2205 : 3 : fputs(cont->title, fout);
2206 : 3 : fputs("\n", fout);
2207 : : }
2208 : :
2209 : : /* print table [] header definition */
2210 [ + + ]: 15 : fprintf(fout, "[%scols=\"", !opt_tuples_only ? "options=\"header\"," : "");
3249 2211 [ + + ]: 78 : for (i = 0; i < cont->ncolumns; i++)
2212 : : {
3302 2213 [ + + ]: 63 : if (i != 0)
2214 : 48 : fputs(",", fout);
2215 [ + + ]: 63 : fprintf(fout, "%s", cont->aligns[(i) % cont->ncolumns] == 'r' ? ">l" : "<l");
2216 : : }
2217 : 15 : fputs("\"", fout);
2218 [ + + + - ]: 15 : switch (opt_border)
2219 : : {
2220 : 3 : case 0:
2221 : 3 : fputs(",frame=\"none\",grid=\"none\"", fout);
2222 : 3 : break;
2223 : 9 : case 1:
2224 : 9 : fputs(",frame=\"none\"", fout);
2225 : 9 : break;
2226 : 3 : case 2:
2227 : 3 : fputs(",frame=\"all\",grid=\"all\"", fout);
2228 : 3 : break;
2229 : : }
2230 : 15 : fputs("]\n", fout);
2231 : 15 : fputs("|====\n", fout);
2232 : :
2233 : : /* print headers */
2234 [ + + ]: 15 : if (!opt_tuples_only)
2235 : : {
2236 [ + + ]: 60 : for (ptr = cont->headers; *ptr; ptr++)
2237 : : {
2238 [ + + ]: 48 : if (ptr != cont->headers)
2239 : 36 : fputs(" ", fout);
2240 : 48 : fputs("^l|", fout);
2241 : 48 : asciidoc_escaped_print(*ptr, fout);
2242 : : }
2243 : 12 : fputs("\n", fout);
2244 : : }
2245 : : }
2246 : :
2247 : : /* print cells */
2248 [ + + ]: 120 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
2249 : : {
2250 [ + + ]: 105 : if (i % cont->ncolumns == 0)
2251 : : {
2252 [ - + ]: 27 : if (cancel_pressed)
3302 bruce@momjian.us 2253 :UBC 0 : break;
2254 : : }
2255 : :
3302 bruce@momjian.us 2256 [ + + ]:CBC 105 : if (i % cont->ncolumns != 0)
2257 : 78 : fputs(" ", fout);
2258 : 105 : fputs("|", fout);
2259 : :
2260 : : /* protect against needless spaces */
2261 [ + + ]: 105 : if ((*ptr)[strspn(*ptr, " \t")] == '\0')
2262 : : {
2263 [ + - ]: 18 : if ((i + 1) % cont->ncolumns != 0)
2264 : 18 : fputs(" ", fout);
2265 : : }
2266 : : else
2267 : 87 : asciidoc_escaped_print(*ptr, fout);
2268 : :
2269 [ + + ]: 105 : if ((i + 1) % cont->ncolumns == 0)
2270 : 27 : fputs("\n", fout);
2271 : : }
2272 : :
2273 : 15 : fputs("|====\n", fout);
2274 : :
2275 [ + - ]: 15 : if (cont->opt->stop_table)
2276 : : {
2277 : 15 : printTableFooter *footers = footers_with_default(cont);
2278 : :
2279 : : /* print footers */
2280 [ + + + - : 15 : if (!opt_tuples_only && footers != NULL && !cancel_pressed)
+ - ]
2281 : : {
2282 : : printTableFooter *f;
2283 : :
2284 : 12 : fputs("\n....\n", fout);
2285 [ + + ]: 24 : for (f = footers; f; f = f->next)
2286 : : {
2287 : 12 : fputs(f->data, fout);
2288 : 12 : fputs("\n", fout);
2289 : : }
2290 : 12 : fputs("....\n", fout);
2291 : : }
2292 : : }
2293 : : }
2294 : :
2295 : : static void
2296 : 15 : print_asciidoc_vertical(const printTableContent *cont, FILE *fout)
2297 : : {
2298 : 15 : bool opt_tuples_only = cont->opt->tuples_only;
2299 : 15 : unsigned short opt_border = cont->opt->border;
2300 : 15 : unsigned long record = cont->opt->prior_records + 1;
2301 : : unsigned int i;
2302 : : const char *const *ptr;
2303 : :
2304 [ - + ]: 15 : if (cancel_pressed)
3302 bruce@momjian.us 2305 :UBC 0 : return;
2306 : :
3302 bruce@momjian.us 2307 [ + - ]:CBC 15 : if (cont->opt->start_table)
2308 : : {
2309 : : /* print table in new paragraph - enforce preliminary new line */
2310 : 15 : fputs("\n", fout);
2311 : :
2312 : : /* print title */
2313 [ + + + + ]: 15 : if (!opt_tuples_only && cont->title)
2314 : : {
2315 : 3 : fputs(".", fout);
2316 : 3 : fputs(cont->title, fout);
2317 : 3 : fputs("\n", fout);
2318 : : }
2319 : :
2320 : : /* print table [] header definition */
2321 : 15 : fputs("[cols=\"h,l\"", fout);
2322 [ + + + - ]: 15 : switch (opt_border)
2323 : : {
2324 : 3 : case 0:
2325 : 3 : fputs(",frame=\"none\",grid=\"none\"", fout);
2326 : 3 : break;
2327 : 9 : case 1:
2328 : 9 : fputs(",frame=\"none\"", fout);
2329 : 9 : break;
2330 : 3 : case 2:
2331 : 3 : fputs(",frame=\"all\",grid=\"all\"", fout);
3249 2332 : 3 : break;
2333 : : }
3302 2334 : 15 : fputs("]\n", fout);
2335 : 15 : fputs("|====\n", fout);
2336 : : }
2337 : :
2338 : : /* print records */
2339 [ + + ]: 120 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
2340 : : {
2341 [ + + ]: 105 : if (i % cont->ncolumns == 0)
2342 : : {
2343 [ - + ]: 27 : if (cancel_pressed)
3302 bruce@momjian.us 2344 :UBC 0 : break;
3302 bruce@momjian.us 2345 [ + + ]:CBC 27 : if (!opt_tuples_only)
2346 : 21 : fprintf(fout,
2347 : : "2+^|Record %lu\n",
2348 : : record++);
2349 : : else
2350 : 6 : fputs("2+|\n", fout);
2351 : : }
2352 : :
2353 : 105 : fputs("<l|", fout);
2354 : 105 : asciidoc_escaped_print(cont->headers[i % cont->ncolumns], fout);
2355 : :
2356 [ + + ]: 105 : fprintf(fout, " %s|", cont->aligns[i % cont->ncolumns] == 'r' ? ">l" : "<l");
2357 : : /* is string only whitespace? */
2358 [ + + ]: 105 : if ((*ptr)[strspn(*ptr, " \t")] == '\0')
2359 : 18 : fputs(" ", fout);
2360 : : else
2361 : 87 : asciidoc_escaped_print(*ptr, fout);
2362 : 105 : fputs("\n", fout);
2363 : : }
2364 : :
2365 : 15 : fputs("|====\n", fout);
2366 : :
2367 [ + - ]: 15 : if (cont->opt->stop_table)
2368 : : {
2369 : : /* print footers */
2370 [ + + + + : 15 : if (!opt_tuples_only && cont->footers != NULL && !cancel_pressed)
+ - ]
2371 : : {
2372 : : printTableFooter *f;
2373 : :
2374 : 3 : fputs("\n....\n", fout);
2375 [ + + ]: 6 : for (f = cont->footers; f; f = f->next)
2376 : : {
2377 : 3 : fputs(f->data, fout);
2378 : 3 : fputs("\n", fout);
2379 : : }
2380 : 3 : fputs("....\n", fout);
2381 : : }
2382 : : }
2383 : : }
2384 : :
2385 : :
2386 : : /*************************/
2387 : : /* LaTeX */
2388 : : /*************************/
2389 : :
2390 : :
2391 : : static void
8928 2392 : 1227 : latex_escaped_print(const char *in, FILE *fout)
2393 : : {
2394 : : const char *p;
2395 : :
2396 [ + + ]: 10782 : for (p = in; *p; p++)
2397 [ + + + + : 9555 : switch (*p)
+ + + + +
+ + + + +
+ ]
2398 : : {
2399 : : /*
2400 : : * We convert ASCII characters per the recommendations in
2401 : : * Scott Pakin's "The Comprehensive LATEX Symbol List",
2402 : : * available from CTAN. For non-ASCII, you're on your own.
2403 : : */
1966 tgl@sss.pgh.pa.us 2404 : 108 : case '#':
2405 : 108 : fputs("\\#", fout);
2406 : 108 : break;
2407 : 96 : case '$':
2408 : 96 : fputs("\\$", fout);
8928 bruce@momjian.us 2409 : 96 : break;
2410 : 108 : case '%':
2411 : 108 : fputs("\\%", fout);
2412 : 108 : break;
1966 tgl@sss.pgh.pa.us 2413 : 108 : case '&':
2414 : 108 : fputs("\\&", fout);
2415 : 108 : break;
2416 : 108 : case '<':
2417 : 108 : fputs("\\textless{}", fout);
2418 : 108 : break;
2419 : 108 : case '>':
2420 : 108 : fputs("\\textgreater{}", fout);
2421 : 108 : break;
2422 : 108 : case '\\':
2423 : 108 : fputs("\\textbackslash{}", fout);
2424 : 108 : break;
2425 : 108 : case '^':
2426 : 108 : fputs("\\^{}", fout);
8928 bruce@momjian.us 2427 : 108 : break;
7191 2428 : 234 : case '_':
2429 : 234 : fputs("\\_", fout);
2430 : 234 : break;
8928 2431 : 108 : case '{':
2432 : 108 : fputs("\\{", fout);
2433 : 108 : break;
1966 tgl@sss.pgh.pa.us 2434 : 108 : case '|':
2435 : 108 : fputs("\\textbar{}", fout);
2436 : 108 : break;
8928 bruce@momjian.us 2437 : 108 : case '}':
2438 : 108 : fputs("\\}", fout);
2439 : 108 : break;
1966 tgl@sss.pgh.pa.us 2440 : 108 : case '~':
2441 : 108 : fputs("\\~{}", fout);
8928 bruce@momjian.us 2442 : 108 : break;
2443 : 108 : case '\n':
2444 : : /* This is not right, but doing it right seems too hard */
2445 : 108 : fputs("\\\\", fout);
2446 : 108 : break;
2447 : 7929 : default:
2448 : 7929 : fputc(*p, fout);
2449 : : }
2450 : 1227 : }
2451 : :
2452 : :
2453 : : static void
5816 alvherre@alvh.no-ip. 2454 : 18 : print_latex_text(const printTableContent *cont, FILE *fout)
2455 : : {
2456 : 18 : bool opt_tuples_only = cont->opt->tuples_only;
2457 : 18 : unsigned short opt_border = cont->opt->border;
2458 : : unsigned int i;
2459 : : const char *const *ptr;
2460 : :
6514 tgl@sss.pgh.pa.us 2461 [ - + ]: 18 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 2462 :UBC 0 : return;
2463 : :
4105 bruce@momjian.us 2464 [ - + ]:CBC 18 : if (opt_border > 3)
4105 bruce@momjian.us 2465 :UBC 0 : opt_border = 3;
2466 : :
5816 alvherre@alvh.no-ip. 2467 [ + - ]:CBC 18 : if (cont->opt->start_table)
2468 : : {
2469 : : /* print title */
2470 [ + + + + ]: 18 : if (!opt_tuples_only && cont->title)
2471 : : {
6438 tgl@sss.pgh.pa.us 2472 : 3 : fputs("\\begin{center}\n", fout);
5816 alvherre@alvh.no-ip. 2473 : 3 : latex_escaped_print(cont->title, fout);
6438 tgl@sss.pgh.pa.us 2474 : 3 : fputs("\n\\end{center}\n\n", fout);
2475 : : }
2476 : :
2477 : : /* begin environment and set alignments and borders */
2478 : 18 : fputs("\\begin{tabular}{", fout);
2479 : :
4105 bruce@momjian.us 2480 [ + + ]: 18 : if (opt_border >= 2)
6438 tgl@sss.pgh.pa.us 2481 : 6 : fputs("| ", fout);
5816 alvherre@alvh.no-ip. 2482 [ + + ]: 102 : for (i = 0; i < cont->ncolumns; i++)
2483 : : {
2484 : 84 : fputc(*(cont->aligns + i), fout);
2485 [ + + + + ]: 84 : if (opt_border != 0 && i < cont->ncolumns - 1)
6438 tgl@sss.pgh.pa.us 2486 : 57 : fputs(" | ", fout);
2487 : : }
4105 bruce@momjian.us 2488 [ + + ]: 18 : if (opt_border >= 2)
6438 tgl@sss.pgh.pa.us 2489 : 6 : fputs(" |", fout);
2490 : :
2491 : 18 : fputs("}\n", fout);
2492 : :
4105 bruce@momjian.us 2493 [ + + + + ]: 18 : if (!opt_tuples_only && opt_border >= 2)
6438 tgl@sss.pgh.pa.us 2494 : 6 : fputs("\\hline\n", fout);
2495 : :
2496 : : /* print headers */
6849 bruce@momjian.us 2497 [ + + ]: 18 : if (!opt_tuples_only)
2498 : : {
5816 alvherre@alvh.no-ip. 2499 [ + + ]: 84 : for (i = 0, ptr = cont->headers; i < cont->ncolumns; i++, ptr++)
2500 : : {
6438 tgl@sss.pgh.pa.us 2501 [ + + ]: 69 : if (i != 0)
2502 : 54 : fputs(" & ", fout);
2503 : 69 : fputs("\\textit{", fout);
2504 : 69 : latex_escaped_print(*ptr, fout);
2505 : 69 : fputc('}', fout);
2506 : : }
2507 : 15 : fputs(" \\\\\n", fout);
2508 : 15 : fputs("\\hline\n", fout);
2509 : : }
2510 : : }
2511 : :
2512 : : /* print cells */
5816 alvherre@alvh.no-ip. 2513 [ + + ]: 165 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
2514 : : {
5158 heikki.linnakangas@i 2515 : 147 : latex_escaped_print(*ptr, fout);
2516 : :
5816 alvherre@alvh.no-ip. 2517 [ + + ]: 147 : if ((i + 1) % cont->ncolumns == 0)
2518 : : {
8928 bruce@momjian.us 2519 : 33 : fputs(" \\\\\n", fout);
4105 2520 [ + + ]: 33 : if (opt_border == 3)
2521 : 6 : fputs("\\hline\n", fout);
6514 tgl@sss.pgh.pa.us 2522 [ - + ]: 33 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 2523 :UBC 0 : break;
2524 : : }
2525 : : else
8928 bruce@momjian.us 2526 :CBC 114 : fputs(" & ", fout);
2527 : : }
2528 : :
5816 alvherre@alvh.no-ip. 2529 [ + - ]: 18 : if (cont->opt->stop_table)
2530 : : {
4366 rhaas@postgresql.org 2531 : 18 : printTableFooter *footers = footers_with_default(cont);
2532 : :
4104 bruce@momjian.us 2533 [ + + ]: 18 : if (opt_border == 2)
6438 tgl@sss.pgh.pa.us 2534 : 3 : fputs("\\hline\n", fout);
2535 : :
2536 : 18 : fputs("\\end{tabular}\n\n\\noindent ", fout);
2537 : :
2538 : : /* print footers */
4366 rhaas@postgresql.org 2539 [ + - + + : 18 : if (footers && !opt_tuples_only && !cancel_pressed)
+ - ]
2540 : : {
2541 : : printTableFooter *f;
2542 : :
2543 [ + + ]: 30 : for (f = footers; f; f = f->next)
2544 : : {
5816 alvherre@alvh.no-ip. 2545 : 15 : latex_escaped_print(f->data, fout);
6438 tgl@sss.pgh.pa.us 2546 : 15 : fputs(" \\\\\n", fout);
2547 : : }
2548 : : }
2549 : :
2550 : 18 : fputc('\n', fout);
2551 : : }
2552 : : }
2553 : :
2554 : :
2555 : : /*************************/
2556 : : /* LaTeX longtable */
2557 : : /*************************/
2558 : :
2559 : :
2560 : : static void
4104 bruce@momjian.us 2561 : 21 : print_latex_longtable_text(const printTableContent *cont, FILE *fout)
2562 : : {
4105 2563 : 21 : bool opt_tuples_only = cont->opt->tuples_only;
2564 : 21 : unsigned short opt_border = cont->opt->border;
2565 : : unsigned int i;
2566 : 21 : const char *opt_table_attr = cont->opt->tableAttr;
2567 : 21 : const char *next_opt_table_attr_char = opt_table_attr;
2568 : 21 : const char *last_opt_table_attr_char = NULL;
2569 : : const char *const *ptr;
2570 : :
2571 [ - + ]: 21 : if (cancel_pressed)
4105 bruce@momjian.us 2572 :UBC 0 : return;
2573 : :
4105 bruce@momjian.us 2574 [ - + ]:CBC 21 : if (opt_border > 3)
4105 bruce@momjian.us 2575 :UBC 0 : opt_border = 3;
2576 : :
4105 bruce@momjian.us 2577 [ + - ]:CBC 21 : if (cont->opt->start_table)
2578 : : {
2579 : : /* begin environment and set alignments and borders */
2580 : 21 : fputs("\\begin{longtable}{", fout);
2581 : :
2582 [ + + ]: 21 : if (opt_border >= 2)
2583 : 9 : fputs("| ", fout);
2584 : :
2585 [ + + ]: 117 : for (i = 0; i < cont->ncolumns; i++)
2586 : : {
2587 : : /* longtable supports either a width (p) or an alignment (l/r) */
2588 : : /* Are we left-justified and was a proportional width specified? */
2589 [ + + + + ]: 96 : if (*(cont->aligns + i) == 'l' && opt_table_attr)
2590 : : {
2591 : : #define LONGTABLE_WHITESPACE " \t\n"
2592 : :
2593 : : /* advance over whitespace */
2594 : 9 : next_opt_table_attr_char += strspn(next_opt_table_attr_char,
2595 : : LONGTABLE_WHITESPACE);
2596 : : /* We have a value? */
2597 [ + + ]: 9 : if (next_opt_table_attr_char[0] != '\0')
2598 : : {
2599 : 3 : fputs("p{", fout);
2600 : 3 : fwrite(next_opt_table_attr_char, strcspn(next_opt_table_attr_char,
2601 : : LONGTABLE_WHITESPACE), 1, fout);
2602 : 3 : last_opt_table_attr_char = next_opt_table_attr_char;
2603 : 3 : next_opt_table_attr_char += strcspn(next_opt_table_attr_char,
2604 : : LONGTABLE_WHITESPACE);
2605 : 3 : fputs("\\textwidth}", fout);
2606 : : }
2607 : : /* use previous value */
2608 [ + - ]: 6 : else if (last_opt_table_attr_char != NULL)
2609 : : {
2610 : 6 : fputs("p{", fout);
2611 : 6 : fwrite(last_opt_table_attr_char, strcspn(last_opt_table_attr_char,
2612 : : LONGTABLE_WHITESPACE), 1, fout);
2613 : 6 : fputs("\\textwidth}", fout);
2614 : : }
2615 : : else
4105 bruce@momjian.us 2616 :UBC 0 : fputc('l', fout);
2617 : : }
2618 : : else
4105 bruce@momjian.us 2619 :CBC 87 : fputc(*(cont->aligns + i), fout);
2620 : :
2621 [ + + + + ]: 96 : if (opt_border != 0 && i < cont->ncolumns - 1)
2622 : 66 : fputs(" | ", fout);
2623 : : }
2624 : :
2625 [ + + ]: 21 : if (opt_border >= 2)
2626 : 9 : fputs(" |", fout);
2627 : :
2628 : 21 : fputs("}\n", fout);
2629 : :
2630 : : /* print headers */
2631 [ + + ]: 21 : if (!opt_tuples_only)
2632 : : {
2633 : : /* firsthead */
2634 [ + + ]: 18 : if (opt_border >= 2)
2635 : 9 : fputs("\\toprule\n", fout);
2636 [ + + ]: 99 : for (i = 0, ptr = cont->headers; i < cont->ncolumns; i++, ptr++)
2637 : : {
2638 [ + + ]: 81 : if (i != 0)
2639 : 63 : fputs(" & ", fout);
2640 : 81 : fputs("\\small\\textbf{\\textit{", fout);
2641 : 81 : latex_escaped_print(*ptr, fout);
2642 : 81 : fputs("}}", fout);
2643 : : }
2644 : 18 : fputs(" \\\\\n", fout);
2645 : 18 : fputs("\\midrule\n\\endfirsthead\n", fout);
2646 : :
2647 : : /* secondary heads */
2648 [ + + ]: 18 : if (opt_border >= 2)
2649 : 9 : fputs("\\toprule\n", fout);
2650 [ + + ]: 99 : for (i = 0, ptr = cont->headers; i < cont->ncolumns; i++, ptr++)
2651 : : {
2652 [ + + ]: 81 : if (i != 0)
2653 : 63 : fputs(" & ", fout);
2654 : 81 : fputs("\\small\\textbf{\\textit{", fout);
2655 : 81 : latex_escaped_print(*ptr, fout);
2656 : 81 : fputs("}}", fout);
2657 : : }
2658 : 18 : fputs(" \\\\\n", fout);
2659 : : /* If the line under the row already appeared, don't do another */
2660 [ + + ]: 18 : if (opt_border != 3)
2661 : 12 : fputs("\\midrule\n", fout);
2662 : 18 : fputs("\\endhead\n", fout);
2663 : :
2664 : : /* table name, caption? */
2665 [ + - + + ]: 18 : if (!opt_tuples_only && cont->title)
2666 : : {
2667 : : /* Don't output if we are printing a line under each row */
2668 [ - + ]: 3 : if (opt_border == 2)
4105 bruce@momjian.us 2669 :UBC 0 : fputs("\\bottomrule\n", fout);
4105 bruce@momjian.us 2670 :CBC 3 : fputs("\\caption[", fout);
2671 : 3 : latex_escaped_print(cont->title, fout);
2672 : 3 : fputs(" (Continued)]{", fout);
2673 : 3 : latex_escaped_print(cont->title, fout);
2674 : 3 : fputs("}\n\\endfoot\n", fout);
2675 [ - + ]: 3 : if (opt_border == 2)
4105 bruce@momjian.us 2676 :UBC 0 : fputs("\\bottomrule\n", fout);
4105 bruce@momjian.us 2677 :CBC 3 : fputs("\\caption[", fout);
2678 : 3 : latex_escaped_print(cont->title, fout);
2679 : 3 : fputs("]{", fout);
2680 : 3 : latex_escaped_print(cont->title, fout);
2681 : 3 : fputs("}\n\\endlastfoot\n", fout);
2682 : : }
2683 : : /* output bottom table line? */
2684 [ + + ]: 15 : else if (opt_border >= 2)
2685 : : {
2686 : 9 : fputs("\\bottomrule\n\\endfoot\n", fout);
2687 : 9 : fputs("\\bottomrule\n\\endlastfoot\n", fout);
2688 : : }
2689 : : }
2690 : : }
2691 : :
2692 : : /* print cells */
2693 [ + + ]: 192 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
2694 : : {
2695 : : /* Add a line under each row? */
2696 [ + + + + ]: 171 : if (i != 0 && i % cont->ncolumns != 0)
2697 : 132 : fputs("\n&\n", fout);
2698 : 171 : fputs("\\raggedright{", fout);
2699 : 171 : latex_escaped_print(*ptr, fout);
2700 : 171 : fputc('}', fout);
2701 [ + + ]: 171 : if ((i + 1) % cont->ncolumns == 0)
2702 : : {
2703 : 39 : fputs(" \\tabularnewline\n", fout);
2704 [ + + ]: 39 : if (opt_border == 3)
2705 : 12 : fputs(" \\hline\n", fout);
2706 : : }
2707 [ - + ]: 171 : if (cancel_pressed)
4105 bruce@momjian.us 2708 :UBC 0 : break;
2709 : : }
2710 : :
4105 bruce@momjian.us 2711 [ + - ]:CBC 21 : if (cont->opt->stop_table)
2712 : 21 : fputs("\\end{longtable}\n", fout);
2713 : : }
2714 : :
2715 : :
2716 : : static void
5816 alvherre@alvh.no-ip. 2717 : 39 : print_latex_vertical(const printTableContent *cont, FILE *fout)
2718 : : {
2719 : 39 : bool opt_tuples_only = cont->opt->tuples_only;
2720 : 39 : unsigned short opt_border = cont->opt->border;
2721 : 39 : unsigned long record = cont->opt->prior_records + 1;
2722 : : unsigned int i;
2723 : : const char *const *ptr;
2724 : :
6514 tgl@sss.pgh.pa.us 2725 [ - + ]: 39 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 2726 :UBC 0 : return;
2727 : :
6438 tgl@sss.pgh.pa.us 2728 [ + + ]:CBC 39 : if (opt_border > 2)
2729 : 9 : opt_border = 2;
2730 : :
5816 alvherre@alvh.no-ip. 2731 [ + - ]: 39 : if (cont->opt->start_table)
2732 : : {
2733 : : /* print title */
2734 [ + + + + ]: 39 : if (!opt_tuples_only && cont->title)
2735 : : {
6438 tgl@sss.pgh.pa.us 2736 : 6 : fputs("\\begin{center}\n", fout);
5816 alvherre@alvh.no-ip. 2737 : 6 : latex_escaped_print(cont->title, fout);
6438 tgl@sss.pgh.pa.us 2738 : 6 : fputs("\n\\end{center}\n\n", fout);
2739 : : }
2740 : :
2741 : : /* begin environment and set alignments and borders */
2742 : 39 : fputs("\\begin{tabular}{", fout);
2743 [ + + ]: 39 : if (opt_border == 0)
2744 : 6 : fputs("cl", fout);
2745 [ + + ]: 33 : else if (opt_border == 1)
2746 : 18 : fputs("c|l", fout);
2747 [ + - ]: 15 : else if (opt_border == 2)
2748 : 15 : fputs("|c|l|", fout);
2749 : 39 : fputs("}\n", fout);
2750 : : }
2751 : :
2752 : : /* print records */
5816 alvherre@alvh.no-ip. 2753 [ + + ]: 357 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
2754 : : {
2755 : : /* new record */
2756 [ + + ]: 318 : if (i % cont->ncolumns == 0)
2757 : : {
6514 tgl@sss.pgh.pa.us 2758 [ - + ]: 72 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 2759 :UBC 0 : break;
6849 bruce@momjian.us 2760 [ + + ]:CBC 72 : if (!opt_tuples_only)
2761 : : {
8928 2762 [ + + ]: 60 : if (opt_border == 2)
2763 : : {
2764 : 30 : fputs("\\hline\n", fout);
6438 tgl@sss.pgh.pa.us 2765 : 30 : fprintf(fout, "\\multicolumn{2}{|c|}{\\textit{Record %lu}} \\\\\n", record++);
2766 : : }
2767 : : else
2768 : 30 : fprintf(fout, "\\multicolumn{2}{c}{\\textit{Record %lu}} \\\\\n", record++);
2769 : : }
8928 bruce@momjian.us 2770 [ + + ]: 72 : if (opt_border >= 1)
2771 : 60 : fputs("\\hline\n", fout);
2772 : : }
2773 : :
5816 alvherre@alvh.no-ip. 2774 : 318 : latex_escaped_print(cont->headers[i % cont->ncolumns], fout);
8928 bruce@momjian.us 2775 : 318 : fputs(" & ", fout);
2776 : 318 : latex_escaped_print(*ptr, fout);
2777 : 318 : fputs(" \\\\\n", fout);
2778 : : }
2779 : :
5816 alvherre@alvh.no-ip. 2780 [ + - ]: 39 : if (cont->opt->stop_table)
2781 : : {
6438 tgl@sss.pgh.pa.us 2782 [ + + ]: 39 : if (opt_border == 2)
2783 : 15 : fputs("\\hline\n", fout);
2784 : :
2785 : 39 : fputs("\\end{tabular}\n\n\\noindent ", fout);
2786 : :
2787 : : /* print footers */
5816 alvherre@alvh.no-ip. 2788 [ + + + - : 39 : if (cont->footers && !opt_tuples_only && !cancel_pressed)
+ - ]
2789 : : {
2790 : : printTableFooter *f;
2791 : :
2792 [ + + ]: 12 : for (f = cont->footers; f; f = f->next)
2793 : : {
5158 heikki.linnakangas@i 2794 : 6 : latex_escaped_print(f->data, fout);
6438 tgl@sss.pgh.pa.us 2795 : 6 : fputs(" \\\\\n", fout);
2796 : : }
2797 : : }
2798 : :
2799 : 39 : fputc('\n', fout);
2800 : : }
2801 : : }
2802 : :
2803 : :
2804 : : /*************************/
2805 : : /* Troff -ms */
2806 : : /*************************/
2807 : :
2808 : :
2809 : : static void
6884 bruce@momjian.us 2810 : 447 : troff_ms_escaped_print(const char *in, FILE *fout)
2811 : : {
2812 : : const char *p;
2813 : :
2814 [ + + ]: 3594 : for (p = in; *p; p++)
2815 [ + + ]: 3147 : switch (*p)
2816 : : {
2817 : 63 : case '\\':
2818 : 63 : fputs("\\(rs", fout);
2819 : 63 : break;
2820 : 3084 : default:
2821 : 3084 : fputc(*p, fout);
2822 : : }
2823 : 447 : }
2824 : :
2825 : :
2826 : : static void
5816 alvherre@alvh.no-ip. 2827 : 15 : print_troff_ms_text(const printTableContent *cont, FILE *fout)
2828 : : {
2829 : 15 : bool opt_tuples_only = cont->opt->tuples_only;
2830 : 15 : unsigned short opt_border = cont->opt->border;
2831 : : unsigned int i;
2832 : : const char *const *ptr;
2833 : :
6514 tgl@sss.pgh.pa.us 2834 [ - + ]: 15 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 2835 :UBC 0 : return;
2836 : :
6438 tgl@sss.pgh.pa.us 2837 [ - + ]:CBC 15 : if (opt_border > 2)
6438 tgl@sss.pgh.pa.us 2838 :UBC 0 : opt_border = 2;
2839 : :
5816 alvherre@alvh.no-ip. 2840 [ + - ]:CBC 15 : if (cont->opt->start_table)
2841 : : {
2842 : : /* print title */
2843 [ + + + + ]: 15 : if (!opt_tuples_only && cont->title)
2844 : : {
6438 tgl@sss.pgh.pa.us 2845 : 3 : fputs(".LP\n.DS C\n", fout);
5816 alvherre@alvh.no-ip. 2846 : 3 : troff_ms_escaped_print(cont->title, fout);
6438 tgl@sss.pgh.pa.us 2847 : 3 : fputs("\n.DE\n", fout);
2848 : : }
2849 : :
2850 : : /* begin environment and set alignments and borders */
2851 : 15 : fputs(".LP\n.TS\n", fout);
2852 [ + + ]: 15 : if (opt_border == 2)
2853 : 3 : fputs("center box;\n", fout);
2854 : : else
2855 : 12 : fputs("center;\n", fout);
2856 : :
5816 alvherre@alvh.no-ip. 2857 [ + + ]: 87 : for (i = 0; i < cont->ncolumns; i++)
2858 : : {
2859 : 72 : fputc(*(cont->aligns + i), fout);
2860 [ + + + + ]: 72 : if (opt_border > 0 && i < cont->ncolumns - 1)
6438 tgl@sss.pgh.pa.us 2861 : 48 : fputs(" | ", fout);
2862 : : }
2863 : 15 : fputs(".\n", fout);
2864 : :
2865 : : /* print headers */
6849 bruce@momjian.us 2866 [ + + ]: 15 : if (!opt_tuples_only)
2867 : : {
5816 alvherre@alvh.no-ip. 2868 [ + + ]: 69 : for (i = 0, ptr = cont->headers; i < cont->ncolumns; i++, ptr++)
2869 : : {
6438 tgl@sss.pgh.pa.us 2870 [ + + ]: 57 : if (i != 0)
2871 : 45 : fputc('\t', fout);
2872 : 57 : fputs("\\fI", fout);
2873 : 57 : troff_ms_escaped_print(*ptr, fout);
2874 : 57 : fputs("\\fP", fout);
2875 : : }
2876 : 12 : fputs("\n_\n", fout);
2877 : : }
2878 : : }
2879 : :
2880 : : /* print cells */
5816 alvherre@alvh.no-ip. 2881 [ + + ]: 138 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
2882 : : {
5158 heikki.linnakangas@i 2883 : 123 : troff_ms_escaped_print(*ptr, fout);
2884 : :
5816 alvherre@alvh.no-ip. 2885 [ + + ]: 123 : if ((i + 1) % cont->ncolumns == 0)
2886 : : {
6884 bruce@momjian.us 2887 : 27 : fputc('\n', fout);
6514 tgl@sss.pgh.pa.us 2888 [ - + ]: 27 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 2889 :UBC 0 : break;
2890 : : }
2891 : : else
6884 bruce@momjian.us 2892 :CBC 96 : fputc('\t', fout);
2893 : : }
2894 : :
5816 alvherre@alvh.no-ip. 2895 [ + - ]: 15 : if (cont->opt->stop_table)
2896 : : {
4366 rhaas@postgresql.org 2897 : 15 : printTableFooter *footers = footers_with_default(cont);
2898 : :
6438 tgl@sss.pgh.pa.us 2899 : 15 : fputs(".TE\n.DS L\n", fout);
2900 : :
2901 : : /* print footers */
4366 rhaas@postgresql.org 2902 [ + - + + : 15 : if (footers && !opt_tuples_only && !cancel_pressed)
+ - ]
2903 : : {
2904 : : printTableFooter *f;
2905 : :
2906 [ + + ]: 24 : for (f = footers; f; f = f->next)
2907 : : {
5816 alvherre@alvh.no-ip. 2908 : 12 : troff_ms_escaped_print(f->data, fout);
6438 tgl@sss.pgh.pa.us 2909 : 12 : fputc('\n', fout);
2910 : : }
2911 : : }
2912 : :
2913 : 15 : fputs(".DE\n", fout);
2914 : : }
2915 : : }
2916 : :
2917 : :
2918 : : static void
5816 alvherre@alvh.no-ip. 2919 : 15 : print_troff_ms_vertical(const printTableContent *cont, FILE *fout)
2920 : : {
2921 : 15 : bool opt_tuples_only = cont->opt->tuples_only;
2922 : 15 : unsigned short opt_border = cont->opt->border;
2923 : 15 : unsigned long record = cont->opt->prior_records + 1;
2924 : : unsigned int i;
2925 : : const char *const *ptr;
6756 bruce@momjian.us 2926 : 15 : unsigned short current_format = 0; /* 0=none, 1=header, 2=body */
2927 : :
6514 tgl@sss.pgh.pa.us 2928 [ - + ]: 15 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 2929 :UBC 0 : return;
2930 : :
6438 tgl@sss.pgh.pa.us 2931 [ - + ]:CBC 15 : if (opt_border > 2)
6438 tgl@sss.pgh.pa.us 2932 :UBC 0 : opt_border = 2;
2933 : :
5816 alvherre@alvh.no-ip. 2934 [ + - ]:CBC 15 : if (cont->opt->start_table)
2935 : : {
2936 : : /* print title */
2937 [ + + + + ]: 15 : if (!opt_tuples_only && cont->title)
2938 : : {
6438 tgl@sss.pgh.pa.us 2939 : 3 : fputs(".LP\n.DS C\n", fout);
5816 alvherre@alvh.no-ip. 2940 : 3 : troff_ms_escaped_print(cont->title, fout);
6438 tgl@sss.pgh.pa.us 2941 : 3 : fputs("\n.DE\n", fout);
2942 : : }
2943 : :
2944 : : /* begin environment and set alignments and borders */
2945 : 15 : fputs(".LP\n.TS\n", fout);
2946 [ + + ]: 15 : if (opt_border == 2)
2947 : 3 : fputs("center box;\n", fout);
2948 : : else
2949 : 12 : fputs("center;\n", fout);
2950 : :
2951 : : /* basic format */
2952 [ + + ]: 15 : if (opt_tuples_only)
2953 : 3 : fputs("c l;\n", fout);
2954 : : }
2955 : : else
6438 tgl@sss.pgh.pa.us 2956 :UBC 0 : current_format = 2; /* assume tuples printed already */
2957 : :
2958 : : /* print records */
5816 alvherre@alvh.no-ip. 2959 [ + + ]:CBC 138 : for (i = 0, ptr = cont->cells; *ptr; i++, ptr++)
2960 : : {
2961 : : /* new record */
2962 [ + + ]: 123 : if (i % cont->ncolumns == 0)
2963 : : {
6514 tgl@sss.pgh.pa.us 2964 [ - + ]: 27 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 2965 :UBC 0 : break;
6849 bruce@momjian.us 2966 [ + + ]:CBC 27 : if (!opt_tuples_only)
2967 : : {
6884 2968 [ + - ]: 21 : if (current_format != 1)
2969 : : {
6438 tgl@sss.pgh.pa.us 2970 [ + + + + ]: 21 : if (opt_border == 2 && record > 1)
6884 bruce@momjian.us 2971 : 3 : fputs("_\n", fout);
2972 [ + + ]: 21 : if (current_format != 0)
2973 : 9 : fputs(".T&\n", fout);
2974 : 21 : fputs("c s.\n", fout);
2975 : 21 : current_format = 1;
2976 : : }
6438 tgl@sss.pgh.pa.us 2977 : 21 : fprintf(fout, "\\fIRecord %lu\\fP\n", record++);
2978 : : }
6884 bruce@momjian.us 2979 [ + + ]: 27 : if (opt_border >= 1)
2980 : 21 : fputs("_\n", fout);
2981 : : }
2982 : :
6849 2983 [ + + ]: 123 : if (!opt_tuples_only)
2984 : : {
6884 2985 [ + + ]: 93 : if (current_format != 2)
2986 : : {
2987 [ + - ]: 21 : if (current_format != 0)
2988 : 21 : fputs(".T&\n", fout);
2989 [ + + ]: 21 : if (opt_border != 1)
2990 : 12 : fputs("c l.\n", fout);
2991 : : else
2992 : 9 : fputs("c | l.\n", fout);
2993 : 21 : current_format = 2;
2994 : : }
2995 : : }
2996 : :
5816 alvherre@alvh.no-ip. 2997 : 123 : troff_ms_escaped_print(cont->headers[i % cont->ncolumns], fout);
6884 bruce@momjian.us 2998 : 123 : fputc('\t', fout);
5158 heikki.linnakangas@i 2999 : 123 : troff_ms_escaped_print(*ptr, fout);
3000 : :
6884 bruce@momjian.us 3001 : 123 : fputc('\n', fout);
3002 : : }
3003 : :
5816 alvherre@alvh.no-ip. 3004 [ + - ]: 15 : if (cont->opt->stop_table)
3005 : : {
6438 tgl@sss.pgh.pa.us 3006 : 15 : fputs(".TE\n.DS L\n", fout);
3007 : :
3008 : : /* print footers */
5816 alvherre@alvh.no-ip. 3009 [ + + + - : 15 : if (cont->footers && !opt_tuples_only && !cancel_pressed)
+ - ]
3010 : : {
3011 : : printTableFooter *f;
3012 : :
3013 [ + + ]: 6 : for (f = cont->footers; f; f = f->next)
3014 : : {
3015 : 3 : troff_ms_escaped_print(f->data, fout);
6438 tgl@sss.pgh.pa.us 3016 : 3 : fputc('\n', fout);
3017 : : }
3018 : : }
3019 : :
3020 : 15 : fputs(".DE\n", fout);
3021 : : }
3022 : : }
3023 : :
3024 : :
3025 : : /********************************/
3026 : : /* Public functions */
3027 : : /********************************/
3028 : :
3029 : :
3030 : : /*
3031 : : * disable_sigpipe_trap
3032 : : *
3033 : : * Turn off SIGPIPE interrupt --- call this before writing to a temporary
3034 : : * query output file that is a pipe.
3035 : : *
3036 : : * No-op on Windows, where there's no SIGPIPE interrupts.
3037 : : */
3038 : : void
3055 tgl@sss.pgh.pa.us 3039 :GBC 4 : disable_sigpipe_trap(void)
3040 : : {
3041 : : #ifndef WIN32
3042 : 4 : pqsignal(SIGPIPE, SIG_IGN);
3043 : : #endif
3044 : 4 : }
3045 : :
3046 : : /*
3047 : : * restore_sigpipe_trap
3048 : : *
3049 : : * Restore normal SIGPIPE interrupt --- call this when done writing to a
3050 : : * temporary query output file that was (or might have been) a pipe.
3051 : : *
3052 : : * Note: within psql, we enable SIGPIPE interrupts unless the permanent query
3053 : : * output file is a pipe, in which case they should be kept off. This
3054 : : * approach works only because psql is not currently complicated enough to
3055 : : * have nested usages of short-lived output files. Otherwise we'd probably
3056 : : * need a genuine save-and-restore-state approach; but for now, that would be
3057 : : * useless complication. In non-psql programs, this always enables SIGPIPE.
3058 : : *
3059 : : * No-op on Windows, where there's no SIGPIPE interrupts.
3060 : : */
3061 : : void
3055 tgl@sss.pgh.pa.us 3062 :CBC 7962 : restore_sigpipe_trap(void)
3063 : : {
3064 : : #ifndef WIN32
3065 [ - + ]: 7962 : pqsignal(SIGPIPE, always_ignore_sigpipe ? SIG_IGN : SIG_DFL);
3066 : : #endif
3067 : 7962 : }
3068 : :
3069 : : /*
3070 : : * set_sigpipe_trap_state
3071 : : *
3072 : : * Set the trap state that restore_sigpipe_trap should restore to.
3073 : : */
3074 : : void
3075 : 7958 : set_sigpipe_trap_state(bool ignore)
3076 : : {
3077 : 7958 : always_ignore_sigpipe = ignore;
3078 : 7958 : }
3079 : :
3080 : :
3081 : : /*
3082 : : * PageOutput
3083 : : *
3084 : : * Tests if pager is needed and returns appropriate FILE pointer.
3085 : : *
3086 : : * If the topt argument is NULL no pager is used.
3087 : : */
3088 : : FILE *
3305 andrew@dunslane.net 3089 : 64245 : PageOutput(int lines, const printTableOpt *topt)
3090 : : {
3091 : : /* check whether we need / can / are supposed to use pager */
3092 [ + + + + : 64245 : if (topt && topt->pager && isatty(fileno(stdin)) && isatty(fileno(stdout)))
+ + - + ]
3093 : : {
3094 : : #ifdef TIOCGWINSZ
3121 andrew@dunslane.net 3095 :UBC 0 : unsigned short int pager = topt->pager;
3096 : 0 : int min_lines = topt->pager_min_lines;
3097 : : int result;
3098 : : struct winsize screen_size;
3099 : :
7698 peter_e@gmx.net 3100 : 0 : result = ioctl(fileno(stdout), TIOCGWINSZ, &screen_size);
3101 : :
3102 : : /* >= accounts for a one-line prompt */
3305 andrew@dunslane.net 3103 [ # # ]: 0 : if (result == -1
3104 [ # # # # ]: 0 : || (lines >= screen_size.ws_row && lines >= min_lines)
3105 [ # # ]: 0 : || pager > 1)
3106 : : #endif
3107 : : {
3108 : : const char *pagerprog;
3109 : : FILE *pagerpipe;
3110 : :
2413 tgl@sss.pgh.pa.us 3111 : 0 : pagerprog = getenv("PSQL_PAGER");
3112 [ # # ]: 0 : if (!pagerprog)
3113 : 0 : pagerprog = getenv("PAGER");
7698 peter_e@gmx.net 3114 [ # # ]: 0 : if (!pagerprog)
3115 : 0 : pagerprog = DEFAULT_PAGER;
3116 : : else
3117 : : {
3118 : : /* if PAGER is empty or all-white-space, don't use pager */
2685 tgl@sss.pgh.pa.us 3119 [ # # ]: 0 : if (strspn(pagerprog, " \t\r\n") == strlen(pagerprog))
3120 : 0 : return stdout;
3121 : : }
594 3122 : 0 : fflush(NULL);
3055 3123 : 0 : disable_sigpipe_trap();
6438 3124 : 0 : pagerpipe = popen(pagerprog, "w");
3125 [ # # ]: 0 : if (pagerpipe)
3126 : 0 : return pagerpipe;
3127 : : /* if popen fails, silently proceed without pager */
2685 3128 : 0 : restore_sigpipe_trap();
3129 : : }
3130 : : }
3131 : :
7698 peter_e@gmx.net 3132 :CBC 64245 : return stdout;
3133 : : }
3134 : :
3135 : : /*
3136 : : * ClosePager
3137 : : *
3138 : : * Close previously opened pager pipe, if any
3139 : : */
3140 : : void
6438 tgl@sss.pgh.pa.us 3141 : 406 : ClosePager(FILE *pagerpipe)
3142 : : {
3143 [ + - - + ]: 406 : if (pagerpipe && pagerpipe != stdout)
3144 : : {
3145 : : /*
3146 : : * If printing was canceled midstream, warn about it.
3147 : : *
3148 : : * Some pagers like less use Ctrl-C as part of their command set. Even
3149 : : * so, we abort our processing and warn the user what we did. If the
3150 : : * pager quit as a result of the SIGINT, this message won't go
3151 : : * anywhere ...
3152 : : */
6438 tgl@sss.pgh.pa.us 3153 [ # # ]:UBC 0 : if (cancel_pressed)
3154 : 0 : fprintf(pagerpipe, _("Interrupted\n"));
3155 : :
3156 : 0 : pclose(pagerpipe);
3055 3157 : 0 : restore_sigpipe_trap();
3158 : : }
6438 tgl@sss.pgh.pa.us 3159 :CBC 406 : }
3160 : :
3161 : : /*
3162 : : * Initialise a table contents struct.
3163 : : * Must be called before any other printTable method is used.
3164 : : *
3165 : : * The title is not duplicated; the caller must ensure that the buffer
3166 : : * is available for the lifetime of the printTableContent struct.
3167 : : *
3168 : : * If you call this, you must call printTableCleanup once you're done with the
3169 : : * table.
3170 : : */
3171 : : void
5816 alvherre@alvh.no-ip. 3172 : 64241 : printTableInit(printTableContent *const content, const printTableOpt *opt,
3173 : : const char *title, const int ncolumns, const int nrows)
3174 : : {
3175 : : uint64 total_cells;
3176 : :
3177 : 64241 : content->opt = opt;
3178 : 64241 : content->title = title;
3179 : 64241 : content->ncolumns = ncolumns;
3180 : 64241 : content->nrows = nrows;
3181 : :
4212 tgl@sss.pgh.pa.us 3182 : 64241 : content->headers = pg_malloc0((ncolumns + 1) * sizeof(*content->headers));
3183 : :
145 alvherre@alvh.no-ip. 3184 :GNC 64241 : total_cells = (uint64) ncolumns * nrows;
3185 : : /* Catch possible overflow. Using >= here allows adding 1 below */
3186 [ - + ]: 64241 : if (total_cells >= SIZE_MAX / sizeof(*content->cells))
3187 : : {
145 alvherre@alvh.no-ip. 3188 :UNC 0 : fprintf(stderr, _("Cannot print table contents: number of cells %lld is equal to or exceeds maximum %lld.\n"),
3189 : : (long long int) total_cells,
3190 : : (long long int) (SIZE_MAX / sizeof(*content->cells)));
3191 : 0 : exit(EXIT_FAILURE);
3192 : : }
145 alvherre@alvh.no-ip. 3193 :GNC 64241 : content->cells = pg_malloc0((total_cells + 1) * sizeof(*content->cells));
3194 : :
5158 heikki.linnakangas@i 3195 :CBC 64241 : content->cellmustfree = NULL;
5816 alvherre@alvh.no-ip. 3196 : 64241 : content->footers = NULL;
3197 : :
4212 tgl@sss.pgh.pa.us 3198 : 64241 : content->aligns = pg_malloc0((ncolumns + 1) * sizeof(*content->align));
3199 : :
5816 alvherre@alvh.no-ip. 3200 : 64241 : content->header = content->headers;
3201 : 64241 : content->cell = content->cells;
3202 : 64241 : content->footer = content->footers;
3203 : 64241 : content->align = content->aligns;
5158 heikki.linnakangas@i 3204 : 64241 : content->cellsadded = 0;
5816 alvherre@alvh.no-ip. 3205 : 64241 : }
3206 : :
3207 : : /*
3208 : : * Add a header to the table.
3209 : : *
3210 : : * Headers are not duplicated; you must ensure that the header string is
3211 : : * available for the lifetime of the printTableContent struct.
3212 : : *
3213 : : * If translate is true, the function will pass the header through gettext.
3214 : : * Otherwise, the header will not be translated.
3215 : : *
3216 : : * align is either 'l' or 'r', and specifies the alignment for cells in this
3217 : : * column.
3218 : : */
3219 : : void
4412 peter_e@gmx.net 3220 : 121080 : printTableAddHeader(printTableContent *const content, char *header,
3221 : : const bool translate, const char align)
3222 : : {
3223 : : #ifndef ENABLE_NLS
3224 : : (void) translate; /* unused parameter */
3225 : : #endif
3226 : :
5816 alvherre@alvh.no-ip. 3227 [ - + ]: 121080 : if (content->header >= content->headers + content->ncolumns)
3228 : : {
5816 alvherre@alvh.no-ip. 3229 :UBC 0 : fprintf(stderr, _("Cannot add header to table content: "
3230 : : "column count of %d exceeded.\n"),
3231 : : content->ncolumns);
3232 : 0 : exit(EXIT_FAILURE);
3233 : : }
3234 : :
5816 alvherre@alvh.no-ip. 3235 :CBC 242160 : *content->header = (char *) mbvalidate((unsigned char *) header,
3236 : 121080 : content->opt->encoding);
3237 : : #ifdef ENABLE_NLS
3238 [ + + ]: 121080 : if (translate)
3239 : 16684 : *content->header = _(*content->header);
3240 : : #endif
3241 : 121080 : content->header++;
3242 : :
3243 : 121080 : *content->align = align;
3244 : 121080 : content->align++;
3245 : 121080 : }
3246 : :
3247 : : /*
3248 : : * Add a cell to the table.
3249 : : *
3250 : : * Cells are not duplicated; you must ensure that the cell string is available
3251 : : * for the lifetime of the printTableContent struct.
3252 : : *
3253 : : * If translate is true, the function will pass the cell through gettext.
3254 : : * Otherwise, the cell will not be translated.
3255 : : *
3256 : : * If mustfree is true, the cell string is freed by printTableCleanup().
3257 : : * Note: Automatic freeing of translatable strings is not supported.
3258 : : */
3259 : : void
4412 peter_e@gmx.net 3260 : 2421361 : printTableAddCell(printTableContent *const content, char *cell,
3261 : : const bool translate, const bool mustfree)
3262 : : {
3263 : : uint64 total_cells;
3264 : :
3265 : : #ifndef ENABLE_NLS
3266 : : (void) translate; /* unused parameter */
3267 : : #endif
3268 : :
145 alvherre@alvh.no-ip. 3269 :GNC 2421361 : total_cells = (uint64) content->ncolumns * content->nrows;
3270 [ - + ]: 2421361 : if (content->cellsadded >= total_cells)
3271 : : {
145 alvherre@alvh.no-ip. 3272 :UNC 0 : fprintf(stderr, _("Cannot add cell to table content: total cell count of %lld exceeded.\n"),
3273 : : (long long int) total_cells);
5816 alvherre@alvh.no-ip. 3274 :UBC 0 : exit(EXIT_FAILURE);
3275 : : }
3276 : :
5816 alvherre@alvh.no-ip. 3277 :CBC 4842722 : *content->cell = (char *) mbvalidate((unsigned char *) cell,
3278 : 2421361 : content->opt->encoding);
3279 : :
3280 : : #ifdef ENABLE_NLS
3281 [ + + ]: 2421361 : if (translate)
5158 heikki.linnakangas@i 3282 : 781 : *content->cell = _(*content->cell);
3283 : : #endif
3284 : :
3285 [ + + ]: 2421361 : if (mustfree)
3286 : : {
3287 [ + + ]: 158 : if (content->cellmustfree == NULL)
4212 tgl@sss.pgh.pa.us 3288 : 104 : content->cellmustfree =
145 alvherre@alvh.no-ip. 3289 :GNC 104 : pg_malloc0((total_cells + 1) * sizeof(bool));
3290 : :
5158 heikki.linnakangas@i 3291 :CBC 158 : content->cellmustfree[content->cellsadded] = true;
3292 : : }
5816 alvherre@alvh.no-ip. 3293 : 2421361 : content->cell++;
5158 heikki.linnakangas@i 3294 : 2421361 : content->cellsadded++;
5816 alvherre@alvh.no-ip. 3295 : 2421361 : }
3296 : :
3297 : : /*
3298 : : * Add a footer to the table.
3299 : : *
3300 : : * Footers are added as elements of a singly-linked list, and the content is
3301 : : * strdup'd, so there is no need to keep the original footer string around.
3302 : : *
3303 : : * Footers are never translated by the function. If you want the footer
3304 : : * translated you must do so yourself, before calling printTableAddFooter. The
3305 : : * reason this works differently to headers and cells is that footers tend to
3306 : : * be made of up individually translated components, rather than being
3307 : : * translated as a whole.
3308 : : */
3309 : : void
3310 : 5302 : printTableAddFooter(printTableContent *const content, const char *footer)
3311 : : {
3312 : : printTableFooter *f;
3313 : :
4212 tgl@sss.pgh.pa.us 3314 : 5302 : f = pg_malloc0(sizeof(*f));
5816 alvherre@alvh.no-ip. 3315 : 5302 : f->data = pg_strdup(footer);
3316 : :
3317 [ + + ]: 5302 : if (content->footers == NULL)
3318 : 1702 : content->footers = f;
3319 : : else
3320 : 3600 : content->footer->next = f;
3321 : :
3322 : 5302 : content->footer = f;
3323 : 5302 : }
3324 : :
3325 : : /*
3326 : : * Change the content of the last-added footer.
3327 : : *
3328 : : * The current contents of the last-added footer are freed, and replaced by the
3329 : : * content given in *footer. If there was no previous footer, add a new one.
3330 : : *
3331 : : * The content is strdup'd, so there is no need to keep the original string
3332 : : * around.
3333 : : */
3334 : : void
3335 : 15 : printTableSetFooter(printTableContent *const content, const char *footer)
3336 : : {
3337 [ + - ]: 15 : if (content->footers != NULL)
3338 : : {
3339 : 15 : free(content->footer->data);
3340 : 15 : content->footer->data = pg_strdup(footer);
3341 : : }
3342 : : else
5816 alvherre@alvh.no-ip. 3343 :UBC 0 : printTableAddFooter(content, footer);
5816 alvherre@alvh.no-ip. 3344 :CBC 15 : }
3345 : :
3346 : : /*
3347 : : * Free all memory allocated to this struct.
3348 : : *
3349 : : * Once this has been called, the struct is unusable unless you pass it to
3350 : : * printTableInit() again.
3351 : : */
3352 : : void
5807 magnus@hagander.net 3353 : 64241 : printTableCleanup(printTableContent *const content)
3354 : : {
5158 heikki.linnakangas@i 3355 [ + + ]: 64241 : if (content->cellmustfree)
3356 : : {
3357 : : uint64 total_cells;
3358 : :
145 alvherre@alvh.no-ip. 3359 :GNC 104 : total_cells = (uint64) content->ncolumns * content->nrows;
3360 [ + + ]: 1658 : for (uint64 i = 0; i < total_cells; i++)
3361 : : {
5158 heikki.linnakangas@i 3362 [ + + ]:CBC 1554 : if (content->cellmustfree[i])
1902 peter@eisentraut.org 3363 : 158 : free(unconstify(char *, content->cells[i]));
3364 : : }
5158 heikki.linnakangas@i 3365 : 104 : free(content->cellmustfree);
3366 : 104 : content->cellmustfree = NULL;
3367 : : }
5816 alvherre@alvh.no-ip. 3368 : 64241 : free(content->headers);
3369 : 64241 : free(content->cells);
3370 : 64241 : free(content->aligns);
3371 : :
3372 : 64241 : content->opt = NULL;
3373 : 64241 : content->title = NULL;
3374 : 64241 : content->headers = NULL;
3375 : 64241 : content->cells = NULL;
3376 : 64241 : content->aligns = NULL;
3377 : 64241 : content->header = NULL;
3378 : 64241 : content->cell = NULL;
3379 : 64241 : content->align = NULL;
3380 : :
3381 [ + + ]: 64241 : if (content->footers)
3382 : : {
3383 [ + + ]: 7004 : for (content->footer = content->footers; content->footer;)
3384 : : {
3385 : : printTableFooter *f;
3386 : :
3387 : 5302 : f = content->footer;
3388 : 5302 : content->footer = f->next;
3389 : 5302 : free(f->data);
3390 : 5302 : free(f);
3391 : : }
3392 : : }
3393 : 64241 : content->footers = NULL;
3394 : 64241 : content->footer = NULL;
3395 : 64241 : }
3396 : :
3397 : : /*
3398 : : * IsPagerNeeded
3399 : : *
3400 : : * Setup pager if required
3401 : : */
3402 : : static void
3056 tgl@sss.pgh.pa.us 3403 : 63843 : IsPagerNeeded(const printTableContent *cont, int extra_lines, bool expanded,
3404 : : FILE **fout, bool *is_pager)
3405 : : {
5812 bruce@momjian.us 3406 [ + + ]: 63843 : if (*fout == stdout)
3407 : : {
3408 : : int lines;
3409 : :
4537 peter_e@gmx.net 3410 [ + + ]: 63839 : if (expanded)
5816 alvherre@alvh.no-ip. 3411 : 371 : lines = (cont->ncolumns + 1) * cont->nrows;
3412 : : else
3413 : 63468 : lines = cont->nrows + 1;
3414 : :
3415 [ + + ]: 63839 : if (!cont->opt->tuples_only)
3416 : : {
3417 : : printTableFooter *f;
3418 : :
3419 : : /*
3420 : : * FIXME -- this is slightly bogus: it counts the number of
3421 : : * footers, not the number of lines in them.
3422 : : */
3423 [ + + ]: 63991 : for (f = cont->footers; f; f = f->next)
7896 bruce@momjian.us 3424 : 5290 : lines++;
3425 : : }
3426 : :
3305 andrew@dunslane.net 3427 : 63839 : *fout = PageOutput(lines + extra_lines, cont->opt);
5812 bruce@momjian.us 3428 : 63839 : *is_pager = (*fout != stdout);
3429 : : }
3430 : : else
5812 bruce@momjian.us 3431 :GBC 4 : *is_pager = false;
5812 bruce@momjian.us 3432 :CBC 63843 : }
3433 : :
3434 : : /*
3435 : : * Use this to print any table in the supported formats.
3436 : : *
3437 : : * cont: table data and formatting options
3438 : : * fout: where to print to
3439 : : * is_pager: true if caller has already redirected fout to be a pager pipe
3440 : : * flog: if not null, also print the table there (for --log-file option)
3441 : : */
3442 : : void
3056 tgl@sss.pgh.pa.us 3443 : 64238 : printTable(const printTableContent *cont,
3444 : : FILE *fout, bool is_pager, FILE *flog)
3445 : : {
3446 : 64238 : bool is_local_pager = false;
3447 : :
5812 bruce@momjian.us 3448 [ - + ]: 64238 : if (cancel_pressed)
5812 bruce@momjian.us 3449 :UBC 0 : return;
3450 : :
5812 bruce@momjian.us 3451 [ - + ]:CBC 64238 : if (cont->opt->format == PRINT_NOTHING)
5812 bruce@momjian.us 3452 :UBC 0 : return;
3453 : :
3454 : : /* print_aligned_*() handle the pager themselves */
3056 tgl@sss.pgh.pa.us 3455 [ + + ]:CBC 64238 : if (!is_pager &&
3456 [ + + ]: 64175 : cont->opt->format != PRINT_ALIGNED &&
4537 peter_e@gmx.net 3457 [ + + ]: 5424 : cont->opt->format != PRINT_WRAPPED)
3458 : : {
3459 : 5304 : IsPagerNeeded(cont, 0, (cont->opt->expanded == 1), &fout, &is_pager);
3056 tgl@sss.pgh.pa.us 3460 : 5304 : is_local_pager = is_pager;
3461 : : }
3462 : :
3463 : : /* clear any pre-existing error indication on the output stream */
1112 alvherre@alvh.no-ip. 3464 : 64238 : clearerr(fout);
3465 : :
3466 : : /* print the stuff */
3467 : :
6879 bruce@momjian.us 3468 [ - + ]: 64238 : if (flog)
3056 tgl@sss.pgh.pa.us 3469 :UBC 0 : print_aligned_text(cont, flog, false);
3470 : :
5816 alvherre@alvh.no-ip. 3471 [ + + + + :CBC 64238 : switch (cont->opt->format)
+ + + +
- ]
3472 : : {
8928 bruce@momjian.us 3473 : 5103 : case PRINT_UNALIGNED:
4537 peter_e@gmx.net 3474 [ + + ]: 5103 : if (cont->opt->expanded == 1)
5812 bruce@momjian.us 3475 : 51 : print_unaligned_vertical(cont, fout);
3476 : : else
3477 : 5052 : print_unaligned_text(cont, fout);
8928 3478 : 5103 : break;
3479 : 58934 : case PRINT_ALIGNED:
3480 : : case PRINT_WRAPPED:
3481 : :
3482 : : /*
3483 : : * In expanded-auto mode, force vertical if a pager is passed in;
3484 : : * else we may make different decisions for different hunks of the
3485 : : * query result.
3486 : : */
3056 tgl@sss.pgh.pa.us 3487 [ + + ]: 58934 : if (cont->opt->expanded == 1 ||
3488 [ - + - - ]: 58687 : (cont->opt->expanded == 2 && is_pager))
3489 : 247 : print_aligned_vertical(cont, fout, is_pager);
3490 : : else
3491 : 58687 : print_aligned_text(cont, fout, is_pager);
8928 bruce@momjian.us 3492 : 58934 : break;
1966 tgl@sss.pgh.pa.us 3493 : 33 : case PRINT_CSV:
3494 [ + + ]: 33 : if (cont->opt->expanded == 1)
3495 : 9 : print_csv_vertical(cont, fout);
3496 : : else
3497 : 24 : print_csv_text(cont, fout);
3498 : 33 : break;
8928 bruce@momjian.us 3499 : 30 : case PRINT_HTML:
4537 peter_e@gmx.net 3500 [ + + ]: 30 : if (cont->opt->expanded == 1)
5812 bruce@momjian.us 3501 : 15 : print_html_vertical(cont, fout);
3502 : : else
3503 : 15 : print_html_text(cont, fout);
8928 3504 : 30 : break;
3302 3505 : 30 : case PRINT_ASCIIDOC:
3506 [ + + ]: 30 : if (cont->opt->expanded == 1)
3507 : 15 : print_asciidoc_vertical(cont, fout);
3508 : : else
3509 : 15 : print_asciidoc_text(cont, fout);
3510 : 30 : break;
8928 3511 : 36 : case PRINT_LATEX:
4537 peter_e@gmx.net 3512 [ + + ]: 36 : if (cont->opt->expanded == 1)
5812 bruce@momjian.us 3513 : 18 : print_latex_vertical(cont, fout);
3514 : : else
3515 : 18 : print_latex_text(cont, fout);
8928 3516 : 36 : break;
4105 3517 : 42 : case PRINT_LATEX_LONGTABLE:
3518 [ + + ]: 42 : if (cont->opt->expanded == 1)
3519 : 21 : print_latex_vertical(cont, fout);
3520 : : else
4104 3521 : 21 : print_latex_longtable_text(cont, fout);
4105 3522 : 42 : break;
6884 3523 : 30 : case PRINT_TROFF_MS:
4537 peter_e@gmx.net 3524 [ + + ]: 30 : if (cont->opt->expanded == 1)
5812 bruce@momjian.us 3525 : 15 : print_troff_ms_vertical(cont, fout);
3526 : : else
3527 : 15 : print_troff_ms_text(cont, fout);
6884 3528 : 30 : break;
8928 bruce@momjian.us 3529 :UBC 0 : default:
5482 peter_e@gmx.net 3530 : 0 : fprintf(stderr, _("invalid output format (internal error): %d"),
5816 alvherre@alvh.no-ip. 3531 : 0 : cont->opt->format);
6880 neilc@samurai.com 3532 : 0 : exit(EXIT_FAILURE);
3533 : : }
3534 : :
3056 tgl@sss.pgh.pa.us 3535 [ - + ]:CBC 64238 : if (is_local_pager)
5812 bruce@momjian.us 3536 :UBC 0 : ClosePager(fout);
3537 : : }
3538 : :
3539 : : /*
3540 : : * Use this to print query results
3541 : : *
3542 : : * result: result of a successful query
3543 : : * opt: formatting options
3544 : : * fout: where to print to
3545 : : * is_pager: true if caller has already redirected fout to be a pager pipe
3546 : : * flog: if not null, also print the data there (for --log-file option)
3547 : : */
3548 : : void
3056 tgl@sss.pgh.pa.us 3549 :CBC 62336 : printQuery(const PGresult *result, const printQueryOpt *opt,
3550 : : FILE *fout, bool is_pager, FILE *flog)
3551 : : {
3552 : : printTableContent cont;
3553 : : int i,
3554 : : r,
3555 : : c;
3556 : :
6514 3557 [ - + ]: 62336 : if (cancel_pressed)
6514 tgl@sss.pgh.pa.us 3558 :UBC 0 : return;
3559 : :
5816 alvherre@alvh.no-ip. 3560 :CBC 62336 : printTableInit(&cont, &opt->topt, opt->title,
3561 : : PQnfields(result), PQntuples(result));
3562 : :
3563 : : /* Assert caller supplied enough translate_columns[] entries */
3753 tgl@sss.pgh.pa.us 3564 [ + + - + ]: 62336 : Assert(opt->translate_columns == NULL ||
3565 : : opt->n_translate_columns >= cont.ncolumns);
3566 : :
5816 alvherre@alvh.no-ip. 3567 [ + + ]: 171647 : for (i = 0; i < cont.ncolumns; i++)
3568 : : {
3569 : 109311 : printTableAddHeader(&cont, PQfname(result, i),
2928 3570 : 109311 : opt->translate_header,
3571 : 109311 : column_type_alignment(PQftype(result, i)));
3572 : : }
3573 : :
3574 : : /* set cells */
5816 3575 [ + + ]: 1255651 : for (r = 0; r < cont.nrows; r++)
3576 : : {
3577 [ + + ]: 3588599 : for (c = 0; c < cont.ncolumns; c++)
3578 : : {
3579 : : char *cell;
5158 heikki.linnakangas@i 3580 : 2395284 : bool mustfree = false;
3581 : : bool translate;
3582 : :
5816 alvherre@alvh.no-ip. 3583 [ + + ]: 2395284 : if (PQgetisnull(result, r, c))
3584 [ + + ]: 30775 : cell = opt->nullPrint ? opt->nullPrint : "";
3585 : : else
3586 : : {
3587 : 2364509 : cell = PQgetvalue(result, r, c);
5158 heikki.linnakangas@i 3588 [ + + + + ]: 2364509 : if (cont.aligns[c] == 'r' && opt->topt.numericLocale)
3589 : : {
3590 : 48 : cell = format_numeric_locale(cell);
3591 : 48 : mustfree = true;
3592 : : }
3593 : : }
3594 : :
5753 bruce@momjian.us 3595 [ + + + + ]: 2395284 : translate = (opt->translate_columns && opt->translate_columns[c]);
5158 heikki.linnakangas@i 3596 : 2395284 : printTableAddCell(&cont, cell, translate, mustfree);
3597 : : }
3598 : : }
3599 : :
3600 : : /* set footers */
5816 alvherre@alvh.no-ip. 3601 [ + + ]: 62336 : if (opt->footers)
3602 : : {
3603 : : char **footer;
3604 : :
3605 [ + + ]: 183 : for (footer = opt->footers; *footer; footer++)
3606 : 87 : printTableAddFooter(&cont, *footer);
3607 : : }
3608 : :
3056 tgl@sss.pgh.pa.us 3609 : 62336 : printTable(&cont, fout, is_pager, flog);
5816 alvherre@alvh.no-ip. 3610 : 62336 : printTableCleanup(&cont);
3611 : : }
3612 : :
3613 : : char
2928 3614 : 109395 : column_type_alignment(Oid ftype)
3615 : : {
3616 : : char align;
3617 : :
3618 [ + + ]: 109395 : switch (ftype)
3619 : : {
3620 : 42529 : case INT2OID:
3621 : : case INT4OID:
3622 : : case INT8OID:
3623 : : case FLOAT4OID:
3624 : : case FLOAT8OID:
3625 : : case NUMERICOID:
3626 : : case OIDOID:
3627 : : case XIDOID:
3628 : : case XID8OID:
3629 : : case CIDOID:
3630 : : case MONEYOID:
3631 : 42529 : align = 'r';
3632 : 42529 : break;
3633 : 66866 : default:
3634 : 66866 : align = 'l';
3635 : 66866 : break;
3636 : : }
3637 : 109395 : return align;
3638 : : }
3639 : :
3640 : : void
6849 bruce@momjian.us 3641 : 8197 : setDecimalLocale(void)
3642 : : {
3643 : : struct lconv *extlconv;
3644 : :
3645 : 8197 : extlconv = localeconv();
3646 : :
3647 : : /* Don't accept an empty decimal_point string */
3648 [ + - ]: 8197 : if (*extlconv->decimal_point)
5816 alvherre@alvh.no-ip. 3649 : 8197 : decimal_point = pg_strdup(extlconv->decimal_point);
3650 : : else
6849 bruce@momjian.us 3651 :UBC 0 : decimal_point = "."; /* SQL output standard */
3652 : :
3653 : : /*
3654 : : * Although the Open Group standard allows locales to supply more than one
3655 : : * group width, we consider only the first one, and we ignore any attempt
3656 : : * to suppress grouping by specifying CHAR_MAX. As in the backend's
3657 : : * cash.c, we must apply a range check to avoid being fooled by variant
3658 : : * CHAR_MAX values.
3659 : : */
3124 tgl@sss.pgh.pa.us 3660 :CBC 8197 : groupdigits = *extlconv->grouping;
3661 [ + + - + ]: 8197 : if (groupdigits <= 0 || groupdigits > 6)
3125 3662 : 9 : groupdigits = 3; /* most common */
3663 : :
3664 : : /* Don't accept an empty thousands_sep string, either */
3665 : : /* similar code exists in formatting.c */
6849 bruce@momjian.us 3666 [ + + ]: 8197 : if (*extlconv->thousands_sep)
5816 alvherre@alvh.no-ip. 3667 : 8188 : thousands_sep = pg_strdup(extlconv->thousands_sep);
3668 : : /* Make sure thousands separator doesn't match decimal point symbol. */
5989 bruce@momjian.us 3669 [ + - ]: 9 : else if (strcmp(decimal_point, ",") != 0)
6849 3670 : 9 : thousands_sep = ",";
3671 : : else
6849 bruce@momjian.us 3672 :UBC 0 : thousands_sep = ".";
6849 bruce@momjian.us 3673 :CBC 8197 : }
3674 : :
3675 : : /* get selected or default line style */
3676 : : const printTextFormat *
5297 tgl@sss.pgh.pa.us 3677 : 59730 : get_line_style(const printTableOpt *opt)
3678 : : {
3679 : : /*
3680 : : * Note: this function mainly exists to preserve the convention that a
3681 : : * printTableOpt struct can be initialized to zeroes to get default
3682 : : * behavior.
3683 : : */
3684 [ + + ]: 59730 : if (opt->line_style != NULL)
3685 : 1431 : return opt->line_style;
3686 : : else
3687 : 58299 : return &pg_asciiformat;
3688 : : }
3689 : :
3690 : : void
3502 sfrost@snowman.net 3691 : 8197 : refresh_utf8format(const printTableOpt *opt)
3692 : : {
2955 tgl@sss.pgh.pa.us 3693 : 8197 : printTextFormat *popt = &pg_utf8format;
3694 : :
3695 : : const unicodeStyleBorderFormat *border;
3696 : : const unicodeStyleRowFormat *header;
3697 : : const unicodeStyleColumnFormat *column;
3698 : :
3502 sfrost@snowman.net 3699 : 8197 : popt->name = "unicode";
3700 : :
3701 : 8197 : border = &unicode_style.border_style[opt->unicode_border_linestyle];
3702 : 8197 : header = &unicode_style.row_style[opt->unicode_header_linestyle];
3703 : 8197 : column = &unicode_style.column_style[opt->unicode_column_linestyle];
3704 : :
3705 : 8197 : popt->lrule[PRINT_RULE_TOP].hrule = border->horizontal;
3706 : 8197 : popt->lrule[PRINT_RULE_TOP].leftvrule = border->down_and_right;
3707 : 8197 : popt->lrule[PRINT_RULE_TOP].midvrule = column->down_and_horizontal[opt->unicode_border_linestyle];
3708 : 8197 : popt->lrule[PRINT_RULE_TOP].rightvrule = border->down_and_left;
3709 : :
3710 : 8197 : popt->lrule[PRINT_RULE_MIDDLE].hrule = header->horizontal;
3711 : 8197 : popt->lrule[PRINT_RULE_MIDDLE].leftvrule = header->vertical_and_right[opt->unicode_border_linestyle];
3712 : 8197 : popt->lrule[PRINT_RULE_MIDDLE].midvrule = column->vertical_and_horizontal[opt->unicode_header_linestyle];
3713 : 8197 : popt->lrule[PRINT_RULE_MIDDLE].rightvrule = header->vertical_and_left[opt->unicode_border_linestyle];
3714 : :
3715 : 8197 : popt->lrule[PRINT_RULE_BOTTOM].hrule = border->horizontal;
3716 : 8197 : popt->lrule[PRINT_RULE_BOTTOM].leftvrule = border->up_and_right;
3717 : 8197 : popt->lrule[PRINT_RULE_BOTTOM].midvrule = column->up_and_horizontal[opt->unicode_border_linestyle];
3718 : 8197 : popt->lrule[PRINT_RULE_BOTTOM].rightvrule = border->left_and_right;
3719 : :
3720 : : /* N/A */
3721 : 8197 : popt->lrule[PRINT_RULE_DATA].hrule = "";
3722 : 8197 : popt->lrule[PRINT_RULE_DATA].leftvrule = border->vertical;
3723 : 8197 : popt->lrule[PRINT_RULE_DATA].midvrule = column->vertical;
3724 : 8197 : popt->lrule[PRINT_RULE_DATA].rightvrule = border->vertical;
3725 : :
3726 : 8197 : popt->midvrule_nl = column->vertical;
3727 : 8197 : popt->midvrule_wrap = column->vertical;
3728 : 8197 : popt->midvrule_blank = column->vertical;
3729 : :
3730 : : /* Same for all unicode today */
3731 : 8197 : popt->header_nl_left = unicode_style.header_nl_left;
3732 : 8197 : popt->header_nl_right = unicode_style.header_nl_right;
3733 : 8197 : popt->nl_left = unicode_style.nl_left;
3734 : 8197 : popt->nl_right = unicode_style.nl_right;
3735 : 8197 : popt->wrap_left = unicode_style.wrap_left;
3736 : 8197 : popt->wrap_right = unicode_style.wrap_right;
3737 : 8197 : popt->wrap_right_border = unicode_style.wrap_right_border;
3738 : 8197 : }
3739 : :
3740 : : /*
3741 : : * Compute the byte distance to the end of the string or *target_width
3742 : : * display character positions, whichever comes first. Update *target_width
3743 : : * to be the number of display character positions actually filled.
3744 : : */
3745 : : static int
5820 bruce@momjian.us 3746 : 532656 : strlen_max_width(unsigned char *str, int *target_width, int encoding)
3747 : : {
3748 : 532656 : unsigned char *start = str;
5818 tgl@sss.pgh.pa.us 3749 : 532656 : unsigned char *end = str + strlen((char *) str);
5421 bruce@momjian.us 3750 : 532656 : int curr_width = 0;
3751 : :
5818 tgl@sss.pgh.pa.us 3752 [ + + ]: 6416561 : while (str < end)
3753 : : {
5421 bruce@momjian.us 3754 : 5884670 : int char_width = PQdsplen((char *) str, encoding);
3755 : :
3756 : : /*
3757 : : * If the display width of the new character causes the string to
3758 : : * exceed its target width, skip it and return. However, if this is
3759 : : * the first character of the string (curr_width == 0), we have to
3760 : : * accept it.
3761 : : */
5818 tgl@sss.pgh.pa.us 3762 [ + + + - ]: 5884670 : if (*target_width < curr_width + char_width && curr_width != 0)
5820 bruce@momjian.us 3763 : 765 : break;
3764 : :
3765 : 5883905 : curr_width += char_width;
3766 : :
5818 tgl@sss.pgh.pa.us 3767 : 5883905 : str += PQmblen((char *) str, encoding);
3768 : :
1042 3769 [ - + ]: 5883905 : if (str > end) /* Don't overrun invalid string */
1042 tgl@sss.pgh.pa.us 3770 :UBC 0 : str = end;
3771 : : }
3772 : :
5820 bruce@momjian.us 3773 :CBC 532656 : *target_width = curr_width;
3774 : :
3775 : 532656 : return str - start;
3776 : : }
|
