1 /* nl -- number lines of files
2 Copyright (C) 89, 92, 1995-1999 Free Software Foundation, Inc.
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2, or (at your option)
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software Foundation,
16 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
18 /* Written by Scott Bartram (nancy!scott@uunet.uu.net)
19 Revised by David MacKenzie (djm@gnu.ai.mit.edu) */
24 #include <sys/types.h>
32 #include "linebuffer.h"
33 #include "long-options.h"
41 /* Line-number formats. */
44 FORMAT_RIGHT_NOLZ, /* Right justified, no leading zeroes. */
45 FORMAT_RIGHT_LZ, /* Right justified, leading zeroes. */
46 FORMAT_LEFT /* Left justified, no leading zeroes. */
49 /* Default section delimiter characters. */
50 #define DEFAULT_SECTION_DELIMITERS "\\:"
52 /* Types of input lines: either one of the section delimiters,
56 Header, Body, Footer, Text
59 /* The name this program was run with. */
62 /* Format of body lines (-b). */
63 static char *body_type = "t";
65 /* Format of header lines (-h). */
66 static char *header_type = "n";
68 /* Format of footer lines (-f). */
69 static char *footer_type = "n";
71 /* Format currently being used (body, header, or footer). */
72 static char *current_type;
74 /* Regex for body lines to number (-bp). */
75 static struct re_pattern_buffer body_regex;
77 /* Regex for header lines to number (-hp). */
78 static struct re_pattern_buffer header_regex;
80 /* Regex for footer lines to number (-fp). */
81 static struct re_pattern_buffer footer_regex;
83 /* Pointer to current regex, if any. */
84 static struct re_pattern_buffer *current_regex = NULL;
86 /* Separator string to print after line number (-s). */
87 static char *separator_str = "\t";
89 /* Input section delimiter string (-d). */
90 static char *section_del = DEFAULT_SECTION_DELIMITERS;
92 /* Header delimiter string. */
93 static char *header_del = NULL;
95 /* Header section delimiter length. */
96 static int header_del_len;
98 /* Body delimiter string. */
99 static char *body_del = NULL;
101 /* Body section delimiter length. */
102 static int body_del_len;
104 /* Footer delimiter string. */
105 static char *footer_del = NULL;
107 /* Footer section delimiter length. */
108 static int footer_del_len;
111 static struct linebuffer line_buf;
113 /* printf format string for line number. */
114 static char *print_fmt;
116 /* printf format string for unnumbered lines. */
117 static char *print_no_line_fmt = NULL;
119 /* Starting line number on each page (-v). */
120 static int starting_line_number = 1;
122 /* Line number increment (-i). */
123 static int page_incr = 1;
125 /* If TRUE, reset line number at start of each page (-p). */
126 static int reset_numbers = TRUE;
128 /* Number of blank lines to consider to be one line for numbering (-l). */
129 static int blank_join = 1;
131 /* Width of line numbers (-w). */
132 static int lineno_width = 6;
134 /* Line number format (-n). */
135 static enum number_format lineno_format = FORMAT_RIGHT_NOLZ;
137 /* Current print line number. */
140 /* Nonzero if we have ever read standard input. */
141 static int have_read_stdin;
143 static struct option const longopts[] =
145 {"header-numbering", required_argument, NULL, 'h'},
146 {"body-numbering", required_argument, NULL, 'b'},
147 {"footer-numbering", required_argument, NULL, 'f'},
148 {"starting-line-number", required_argument, NULL, 'v'},
149 {"page-increment", required_argument, NULL, 'i'},
150 {"no-renumber", no_argument, NULL, 'p'},
151 {"join-blank-lines", required_argument, NULL, 'l'},
152 {"number-separator", required_argument, NULL, 's'},
153 {"number-width", required_argument, NULL, 'w'},
154 {"number-format", required_argument, NULL, 'n'},
155 {"section-delimiter", required_argument, NULL, 'd'},
159 /* Print a usage message and quit. */
165 fprintf (stderr, _("Try `%s --help' for more information.\n"),
170 Usage: %s [OPTION]... [FILE]...\n\
174 Write each FILE to standard output, with line numbers added.\n\
175 With no FILE, or when FILE is -, read standard input.\n\
177 -b, --body-numbering=STYLE use STYLE for numbering body lines\n\
178 -d, --section-delimiter=CC use CC for separating logical pages\n\
179 -f, --footer-numbering=STYLE use STYLE for numbering footer lines\n\
180 -h, --header-numbering=STYLE use STYLE for numbering header lines\n\
181 -i, --page-increment=NUMBER line number increment at each line\n\
182 -l, --join-blank-lines=NUMBER group of NUMBER empty lines counted as one\n\
183 -n, --number-format=FORMAT insert line numbers according to FORMAT\n\
184 -p, --no-renumber do not reset line numbers at logical pages\n\
185 -s, --number-separator=STRING add STRING after (possible) line number\n\
186 -v, --first-page=NUMBER first line number on each logical page\n\
187 -w, --number-width=NUMBER use NUMBER columns for line numbers\n\
188 --help display this help and exit\n\
189 --version output version information and exit\n\
191 By default, selects -v1 -i1 -l1 -sTAB -w6 -nrn -hn -bt -fn. CC are\n\
192 two delimiter characters for separating logical pages, a missing\n\
193 second character implies :. Type \\\\ for \\. STYLE is one of:\n\
195 a number all lines\n\
196 t number only nonempty lines\n\
198 pREGEXP number only lines that contain a match for REGEXP\n\
202 ln left justified, no leading zeros\n\
203 rn right justified, no leading zeros\n\
204 rz right justified, leading zeros\n\
207 puts (_("\nReport bugs to <bug-textutils@gnu.org>."));
209 exit (status == 0 ? EXIT_SUCCESS : EXIT_FAILURE);
212 /* Build the printf format string, based on `lineno_format'. */
215 build_print_fmt (void)
217 /* 12 = 10 chars for lineno_width, 1 for %, 1 for \0. */
218 print_fmt = xmalloc (strlen (separator_str) + 12);
219 switch (lineno_format)
221 case FORMAT_RIGHT_NOLZ:
222 sprintf (print_fmt, "%%%dd%s", lineno_width, separator_str);
224 case FORMAT_RIGHT_LZ:
225 sprintf (print_fmt, "%%0%dd%s", lineno_width, separator_str);
228 sprintf (print_fmt, "%%-%dd%s", lineno_width, separator_str);
233 /* Set the command line flag TYPEP and possibly the regex pointer REGEXP,
234 according to `optarg'. */
237 build_type_arg (char **typep, struct re_pattern_buffer *regexp)
252 optlen = strlen (optarg);
253 regexp->allocated = optlen * 2;
254 regexp->buffer = (unsigned char *) xmalloc (regexp->allocated);
255 regexp->translate = NULL;
256 regexp->fastmap = xmalloc (256);
257 regexp->fastmap_accurate = 0;
258 errmsg = re_compile_pattern (optarg, optlen, regexp);
260 error (EXIT_FAILURE, 0, "%s", errmsg);
269 /* Print and increment the line number. */
274 printf (print_fmt, line_no);
275 line_no += page_incr;
278 /* Switch to a header section. */
283 current_type = header_type;
284 current_regex = &header_regex;
286 line_no = starting_line_number;
290 /* Switch to a body section. */
295 current_type = body_type;
296 current_regex = &body_regex;
300 /* Switch to a footer section. */
305 current_type = footer_type;
306 current_regex = &footer_regex;
310 /* Process a regular text line in `line_buf'. */
315 static int blank_lines = 0; /* Consecutive blank lines so far. */
317 switch (*current_type)
322 if (line_buf.length || ++blank_lines == blank_join)
328 printf (print_no_line_fmt);
337 printf (print_no_line_fmt);
340 printf (print_no_line_fmt);
343 if (re_search (current_regex, line_buf.buffer, line_buf.length,
344 0, line_buf.length, (struct re_registers *) 0) < 0)
345 printf (print_no_line_fmt);
350 fwrite (line_buf.buffer, sizeof (char), line_buf.length, stdout);
354 /* Return the type of line in `line_buf'. */
359 if (line_buf.length < 2 || memcmp (line_buf.buffer, section_del, 2))
361 if (line_buf.length == header_del_len
362 && !memcmp (line_buf.buffer, header_del, header_del_len))
364 if (line_buf.length == body_del_len
365 && !memcmp (line_buf.buffer, body_del, body_del_len))
367 if (line_buf.length == footer_del_len
368 && !memcmp (line_buf.buffer, footer_del, footer_del_len))
373 /* Read and process the file pointed to by FP. */
376 process_file (FILE *fp)
378 while (readline (&line_buf, fp))
380 switch ((int) check_section ())
398 /* Process file FILE to standard output.
399 Return 0 if successful, 1 if not. */
402 nl_file (const char *file)
406 if (STREQ (file, "-"))
413 stream = fopen (file, "r");
416 error (0, errno, "%s", file);
421 process_file (stream);
425 error (0, errno, "%s", file);
428 if (STREQ (file, "-"))
429 clearerr (stream); /* Also clear EOF. */
430 else if (fclose (stream) == EOF)
432 error (0, errno, "%s", file);
439 main (int argc, char **argv)
441 int c, exit_status = 0;
443 program_name = argv[0];
444 setlocale (LC_ALL, "");
445 bindtextdomain (PACKAGE, LOCALEDIR);
446 textdomain (PACKAGE);
448 parse_long_options (argc, argv, "nl", GNU_PACKAGE, VERSION,
449 "Scott Bartram and David MacKenzie", usage);
453 while ((c = getopt_long (argc, argv, "h:b:f:v:i:pl:s:w:n:d:", longopts,
462 if (build_type_arg (&header_type, &header_regex) != TRUE)
466 if (build_type_arg (&body_type, &body_regex) != TRUE)
470 if (build_type_arg (&footer_type, &footer_regex) != TRUE)
476 if (xstrtol (optarg, NULL, 10, &tmp_long, "") != LONGINT_OK
477 /* Allow it to be negative. */
478 || tmp_long > INT_MAX)
479 error (EXIT_FAILURE, 0, _("invalid starting line number: `%s'"),
481 starting_line_number = (int) tmp_long;
487 if (xstrtol (optarg, NULL, 10, &tmp_long, "") != LONGINT_OK
488 || tmp_long <= 0 || tmp_long > INT_MAX)
489 error (EXIT_FAILURE, 0, _("invalid line number increment: `%s'"),
491 page_incr = (int) tmp_long;
495 reset_numbers = FALSE;
500 if (xstrtol (optarg, NULL, 10, &tmp_long, "") != LONGINT_OK
501 || tmp_long <= 0 || tmp_long > INT_MAX)
502 error (EXIT_FAILURE, 0, _("invalid number of blank lines: `%s'"),
504 blank_join = (int) tmp_long;
508 separator_str = optarg;
513 if (xstrtol (optarg, NULL, 10, &tmp_long, "") != LONGINT_OK
514 || tmp_long <= 0 || tmp_long > INT_MAX)
515 error (EXIT_FAILURE, 0,
516 _("invalid line number field width: `%s'"),
518 lineno_width = (int) tmp_long;
525 if (optarg[1] == 'n')
526 lineno_format = FORMAT_LEFT;
534 lineno_format = FORMAT_RIGHT_NOLZ;
537 lineno_format = FORMAT_RIGHT_LZ;
550 section_del = optarg;
558 /* Initialize the section delimiters. */
559 c = strlen (section_del);
561 header_del_len = c * 3;
562 header_del = xmalloc (header_del_len + 1);
563 strcat (strcat (strcpy (header_del, section_del), section_del), section_del);
565 body_del_len = c * 2;
566 body_del = xmalloc (body_del_len + 1);
567 strcat (strcpy (body_del, section_del), section_del);
570 footer_del = xmalloc (footer_del_len + 1);
571 strcpy (footer_del, section_del);
573 /* Initialize the input buffer. */
574 initbuffer (&line_buf);
576 /* Initialize the printf format for unnumbered lines. */
577 c = strlen (separator_str);
578 print_no_line_fmt = xmalloc (lineno_width + c + 1);
579 memset (print_no_line_fmt, ' ', lineno_width + c);
580 print_no_line_fmt[lineno_width + c] = '\0';
582 line_no = starting_line_number;
583 current_type = body_type;
584 current_regex = &body_regex;
587 /* Main processing. */
590 exit_status |= nl_file ("-");
592 for (; optind < argc; optind++)
593 exit_status |= nl_file (argv[optind]);
595 if (have_read_stdin && fclose (stdin) == EOF)
597 error (0, errno, "-");
600 if (ferror (stdout) || fclose (stdout) == EOF)
601 error (EXIT_FAILURE, errno, _("write error"));
603 exit (exit_status == 0 ? EXIT_SUCCESS : EXIT_FAILURE);