1 /* nl -- number lines of files
2 Copyright (C) 89, 92, 1995-2000 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>
33 #include "linebuffer.h"
36 /* The official name of this program (e.g., no `g' prefix). */
37 #define PROGRAM_NAME "nl"
39 #define AUTHORS "Scott Bartram and David MacKenzie"
46 /* Line-number formats. */
49 FORMAT_RIGHT_NOLZ, /* Right justified, no leading zeroes. */
50 FORMAT_RIGHT_LZ, /* Right justified, leading zeroes. */
51 FORMAT_LEFT /* Left justified, no leading zeroes. */
54 /* Default section delimiter characters. */
55 #define DEFAULT_SECTION_DELIMITERS "\\:"
57 /* Types of input lines: either one of the section delimiters,
61 Header, Body, Footer, Text
64 /* The name this program was run with. */
67 /* Format of body lines (-b). */
68 static char *body_type = "t";
70 /* Format of header lines (-h). */
71 static char *header_type = "n";
73 /* Format of footer lines (-f). */
74 static char *footer_type = "n";
76 /* Format currently being used (body, header, or footer). */
77 static char *current_type;
79 /* Regex for body lines to number (-bp). */
80 static struct re_pattern_buffer body_regex;
82 /* Regex for header lines to number (-hp). */
83 static struct re_pattern_buffer header_regex;
85 /* Regex for footer lines to number (-fp). */
86 static struct re_pattern_buffer footer_regex;
88 /* Pointer to current regex, if any. */
89 static struct re_pattern_buffer *current_regex = NULL;
91 /* Separator string to print after line number (-s). */
92 static char *separator_str = "\t";
94 /* Input section delimiter string (-d). */
95 static char *section_del = DEFAULT_SECTION_DELIMITERS;
97 /* Header delimiter string. */
98 static char *header_del = NULL;
100 /* Header section delimiter length. */
101 static size_t header_del_len;
103 /* Body delimiter string. */
104 static char *body_del = NULL;
106 /* Body section delimiter length. */
107 static size_t body_del_len;
109 /* Footer delimiter string. */
110 static char *footer_del = NULL;
112 /* Footer section delimiter length. */
113 static size_t footer_del_len;
116 static struct linebuffer line_buf;
118 /* printf format string for line number. */
119 static char *print_fmt;
121 /* printf format string for unnumbered lines. */
122 static char *print_no_line_fmt = NULL;
124 /* Starting line number on each page (-v). */
125 static int starting_line_number = 1;
127 /* Line number increment (-i). */
128 static int page_incr = 1;
130 /* If TRUE, reset line number at start of each page (-p). */
131 static int reset_numbers = TRUE;
133 /* Number of blank lines to consider to be one line for numbering (-l). */
134 static int blank_join = 1;
136 /* Width of line numbers (-w). */
137 static int lineno_width = 6;
139 /* Line number format (-n). */
140 static enum number_format lineno_format = FORMAT_RIGHT_NOLZ;
142 /* Current print line number. */
145 /* Nonzero if we have ever read standard input. */
146 static int have_read_stdin;
148 static struct option const longopts[] =
150 {"header-numbering", required_argument, NULL, 'h'},
151 {"body-numbering", required_argument, NULL, 'b'},
152 {"footer-numbering", required_argument, NULL, 'f'},
153 {"starting-line-number", required_argument, NULL, 'v'},
154 {"page-increment", required_argument, NULL, 'i'},
155 {"no-renumber", no_argument, NULL, 'p'},
156 {"join-blank-lines", required_argument, NULL, 'l'},
157 {"number-separator", required_argument, NULL, 's'},
158 {"number-width", required_argument, NULL, 'w'},
159 {"number-format", required_argument, NULL, 'n'},
160 {"section-delimiter", required_argument, NULL, 'd'},
161 {GETOPT_HELP_OPTION_DECL},
162 {GETOPT_VERSION_OPTION_DECL},
166 /* Print a usage message and quit. */
172 fprintf (stderr, _("Try `%s --help' for more information.\n"),
177 Usage: %s [OPTION]... [FILE]...\n\
181 Write each FILE to standard output, with line numbers added.\n\
182 With no FILE, or when FILE is -, read standard input.\n\
184 -b, --body-numbering=STYLE use STYLE for numbering body lines\n\
185 -d, --section-delimiter=CC use CC for separating logical pages\n\
186 -f, --footer-numbering=STYLE use STYLE for numbering footer lines\n\
187 -h, --header-numbering=STYLE use STYLE for numbering header lines\n\
188 -i, --page-increment=NUMBER line number increment at each line\n\
189 -l, --join-blank-lines=NUMBER group of NUMBER empty lines counted as one\n\
190 -n, --number-format=FORMAT insert line numbers according to FORMAT\n\
191 -p, --no-renumber do not reset line numbers at logical pages\n\
192 -s, --number-separator=STRING add STRING after (possible) line number\n\
193 -v, --first-page=NUMBER first line number on each logical page\n\
194 -w, --number-width=NUMBER use NUMBER columns for line numbers\n\
195 --help display this help and exit\n\
196 --version output version information and exit\n\
198 By default, selects -v1 -i1 -l1 -sTAB -w6 -nrn -hn -bt -fn. CC are\n\
199 two delimiter characters for separating logical pages, a missing\n\
200 second character implies :. Type \\\\ for \\. STYLE is one of:\n\
202 a number all lines\n\
203 t number only nonempty lines\n\
205 pREGEXP number only lines that contain a match for REGEXP\n\
209 ln left justified, no leading zeros\n\
210 rn right justified, no leading zeros\n\
211 rz right justified, leading zeros\n\
214 puts (_("\nReport bugs to <bug-textutils@gnu.org>."));
216 exit (status == 0 ? EXIT_SUCCESS : EXIT_FAILURE);
219 /* Build the printf format string, based on `lineno_format'. */
222 build_print_fmt (void)
224 /* 12 = 10 chars for lineno_width, 1 for %, 1 for \0. */
225 print_fmt = xmalloc (strlen (separator_str) + 12);
226 switch (lineno_format)
228 case FORMAT_RIGHT_NOLZ:
229 sprintf (print_fmt, "%%%dd%s", lineno_width, separator_str);
231 case FORMAT_RIGHT_LZ:
232 sprintf (print_fmt, "%%0%dd%s", lineno_width, separator_str);
235 sprintf (print_fmt, "%%-%dd%s", lineno_width, separator_str);
240 /* Set the command line flag TYPEP and possibly the regex pointer REGEXP,
241 according to `optarg'. */
244 build_type_arg (char **typep, struct re_pattern_buffer *regexp)
259 optlen = strlen (optarg);
260 regexp->allocated = optlen * 2;
261 regexp->buffer = (unsigned char *) xmalloc (regexp->allocated);
262 regexp->translate = NULL;
263 regexp->fastmap = xmalloc (256);
264 regexp->fastmap_accurate = 0;
265 errmsg = re_compile_pattern (optarg, optlen, regexp);
267 error (EXIT_FAILURE, 0, "%s", errmsg);
276 /* Print and increment the line number. */
281 printf (print_fmt, line_no);
282 line_no += page_incr;
285 /* Switch to a header section. */
290 current_type = header_type;
291 current_regex = &header_regex;
293 line_no = starting_line_number;
297 /* Switch to a body section. */
302 current_type = body_type;
303 current_regex = &body_regex;
307 /* Switch to a footer section. */
312 current_type = footer_type;
313 current_regex = &footer_regex;
317 /* Process a regular text line in `line_buf'. */
322 static int blank_lines = 0; /* Consecutive blank lines so far. */
324 switch (*current_type)
329 if (1 < line_buf.length || ++blank_lines == blank_join)
335 printf (print_no_line_fmt);
341 if (1 < line_buf.length)
344 printf (print_no_line_fmt);
347 printf (print_no_line_fmt);
350 if (re_search (current_regex, line_buf.buffer, line_buf.length - 1,
351 0, line_buf.length - 1, (struct re_registers *) 0) < 0)
352 printf (print_no_line_fmt);
357 fwrite (line_buf.buffer, sizeof (char), line_buf.length, stdout);
360 /* Return the type of line in `line_buf'. */
365 size_t len = line_buf.length - 1;
367 if (len < 2 || memcmp (line_buf.buffer, section_del, 2))
369 if (len == header_del_len
370 && !memcmp (line_buf.buffer, header_del, header_del_len))
372 if (len == body_del_len
373 && !memcmp (line_buf.buffer, body_del, body_del_len))
375 if (len == footer_del_len
376 && !memcmp (line_buf.buffer, footer_del, footer_del_len))
381 /* Read and process the file pointed to by FP. */
384 process_file (FILE *fp)
386 while (readline (&line_buf, fp))
388 switch ((int) check_section ())
406 /* Process file FILE to standard output.
407 Return 0 if successful, 1 if not. */
410 nl_file (const char *file)
414 if (STREQ (file, "-"))
421 stream = fopen (file, "r");
424 error (0, errno, "%s", file);
429 process_file (stream);
433 error (0, errno, "%s", file);
436 if (STREQ (file, "-"))
437 clearerr (stream); /* Also clear EOF. */
438 else if (fclose (stream) == EOF)
440 error (0, errno, "%s", file);
447 main (int argc, char **argv)
449 int c, exit_status = 0;
452 program_name = argv[0];
453 setlocale (LC_ALL, "");
454 bindtextdomain (PACKAGE, LOCALEDIR);
455 textdomain (PACKAGE);
457 atexit (close_stdout);
461 while ((c = getopt_long (argc, argv, "h:b:f:v:i:pl:s:w:n:d:", longopts,
470 if (build_type_arg (&header_type, &header_regex) != TRUE)
474 if (build_type_arg (&body_type, &body_regex) != TRUE)
478 if (build_type_arg (&footer_type, &footer_regex) != TRUE)
484 if (xstrtol (optarg, NULL, 10, &tmp_long, "") != LONGINT_OK
485 /* Allow it to be negative. */
486 || tmp_long > INT_MAX)
487 error (EXIT_FAILURE, 0, _("invalid starting line number: `%s'"),
489 starting_line_number = (int) tmp_long;
495 if (xstrtol (optarg, NULL, 10, &tmp_long, "") != LONGINT_OK
496 || tmp_long <= 0 || tmp_long > INT_MAX)
497 error (EXIT_FAILURE, 0, _("invalid line number increment: `%s'"),
499 page_incr = (int) tmp_long;
503 reset_numbers = FALSE;
508 if (xstrtol (optarg, NULL, 10, &tmp_long, "") != LONGINT_OK
509 || tmp_long <= 0 || tmp_long > INT_MAX)
510 error (EXIT_FAILURE, 0, _("invalid number of blank lines: `%s'"),
512 blank_join = (int) tmp_long;
516 separator_str = optarg;
521 if (xstrtol (optarg, NULL, 10, &tmp_long, "") != LONGINT_OK
522 || tmp_long <= 0 || tmp_long > INT_MAX)
523 error (EXIT_FAILURE, 0,
524 _("invalid line number field width: `%s'"),
526 lineno_width = (int) tmp_long;
533 if (optarg[1] == 'n')
534 lineno_format = FORMAT_LEFT;
542 lineno_format = FORMAT_RIGHT_NOLZ;
545 lineno_format = FORMAT_RIGHT_LZ;
558 section_del = optarg;
560 case_GETOPT_HELP_CHAR;
561 case_GETOPT_VERSION_CHAR (PROGRAM_NAME, AUTHORS);
568 /* Initialize the section delimiters. */
569 len = strlen (section_del);
571 header_del_len = len * 3;
572 header_del = xmalloc (header_del_len + 1);
573 strcat (strcat (strcpy (header_del, section_del), section_del), section_del);
575 body_del_len = len * 2;
576 body_del = xmalloc (body_del_len + 1);
577 strcat (strcpy (body_del, section_del), section_del);
579 footer_del_len = len;
580 footer_del = xmalloc (footer_del_len + 1);
581 strcpy (footer_del, section_del);
583 /* Initialize the input buffer. */
584 initbuffer (&line_buf);
586 /* Initialize the printf format for unnumbered lines. */
587 len = strlen (separator_str);
588 print_no_line_fmt = xmalloc (lineno_width + len + 1);
589 memset (print_no_line_fmt, ' ', lineno_width + len);
590 print_no_line_fmt[lineno_width + len] = '\0';
592 line_no = starting_line_number;
593 current_type = body_type;
594 current_regex = &body_regex;
597 /* Main processing. */
600 exit_status |= nl_file ("-");
602 for (; optind < argc; optind++)
603 exit_status |= nl_file (argv[optind]);
605 if (have_read_stdin && fclose (stdin) == EOF)
607 error (0, errno, "-");
611 exit (exit_status == 0 ? EXIT_SUCCESS : EXIT_FAILURE);