1 /* vi: set sw=4 ts=4: */
3 * Mini less implementation for busybox
5 * Copyright (C) 2005 by Rob Sullivan <cogito.ergo.cogito@gmail.com>
7 * Licensed under GPLv2 or later, see file LICENSE in this source tree.
12 * - Add more regular expression support - search modifiers, certain matches, etc.
13 * - Add more complex bracket searching - currently, nested brackets are
15 * - Add support for "F" as an input. This causes less to act in
16 * a similar way to tail -f.
17 * - Allow horizontal scrolling.
20 * - the inp file pointer is used so that keyboard input works after
21 * redirected input has been read from stdin
28 //config: 'less' is a pager, meaning that it displays text files. It possesses
29 //config: a wide array of features, and is an improvement over 'more'.
31 //config:config FEATURE_LESS_MAXLINES
32 //config: int "Max number of input lines less will try to eat"
33 //config: default 9999999
34 //config: depends on LESS
36 //config:config FEATURE_LESS_BRACKETS
37 //config: bool "Enable bracket searching"
39 //config: depends on LESS
41 //config: This option adds the capability to search for matching left and right
42 //config: brackets, facilitating programming.
44 //config:config FEATURE_LESS_FLAGS
45 //config: bool "Enable -m/-M"
47 //config: depends on LESS
49 //config: The -M/-m flag enables a more sophisticated status line.
51 //config:config FEATURE_LESS_MARKS
52 //config: bool "Enable marks"
54 //config: depends on LESS
56 //config: Marks enable positions in a file to be stored for easy reference.
58 //config:config FEATURE_LESS_REGEXP
59 //config: bool "Enable regular expressions"
61 //config: depends on LESS
63 //config: Enable regular expressions, allowing complex file searches.
65 //config:config FEATURE_LESS_WINCH
66 //config: bool "Enable automatic resizing on window size changes"
68 //config: depends on LESS
70 //config: Makes less track window size changes.
72 //config:config FEATURE_LESS_ASK_TERMINAL
73 //config: bool "Use 'tell me cursor position' ESC sequence to measure window"
75 //config: depends on FEATURE_LESS_WINCH
77 //config: Makes less track window size changes.
78 //config: If terminal size can't be retrieved and $LINES/$COLUMNS are not set,
79 //config: this option makes less perform a last-ditch effort to find it:
80 //config: position cursor to 999,999 and ask terminal to report real
81 //config: cursor position using "ESC [ 6 n" escape sequence, then read stdin.
83 //config: This is not clean but helps a lot on serial lines and such.
85 //config:config FEATURE_LESS_DASHCMD
86 //config: bool "Enable flag changes ('-' command)"
88 //config: depends on LESS
90 //config: This enables the ability to change command-line flags within
91 //config: less itself ('-' keyboard command).
93 //config:config FEATURE_LESS_LINENUMS
94 //config: bool "Enable dynamic switching of line numbers"
96 //config: depends on FEATURE_LESS_DASHCMD
98 //config: Enables "-N" command.
100 //usage:#define less_trivial_usage
101 //usage: "[-E" IF_FEATURE_LESS_REGEXP("I")IF_FEATURE_LESS_FLAGS("Mm") "Nh~] [FILE]..."
102 //usage:#define less_full_usage "\n\n"
103 //usage: "View FILE (or stdin) one screenful at a time\n"
104 //usage: "\n -E Quit once the end of a file is reached"
105 //usage: IF_FEATURE_LESS_REGEXP(
106 //usage: "\n -I Ignore case in all searches"
108 //usage: IF_FEATURE_LESS_FLAGS(
109 //usage: "\n -M,-m Display status line with line numbers"
110 //usage: "\n and percentage through the file"
112 //usage: "\n -N Prefix line number to each line"
113 //usage: "\n -~ Suppress ~s displayed past EOF"
115 #include <sched.h> /* sched_yield() */
118 #if ENABLE_FEATURE_LESS_REGEXP
124 /* The escape codes for highlighted and normal text */
125 #define HIGHLIGHT ESC"[7m"
126 #define NORMAL ESC"[0m"
127 /* The escape code to home and clear to the end of screen */
128 #define CLEAR ESC"[H\033[J"
129 /* The escape code to clear to the end of line */
130 #define CLEAR_2_EOL ESC"[K"
133 /* Absolute max of lines eaten */
134 MAXLINES = CONFIG_FEATURE_LESS_MAXLINES,
135 /* This many "after the end" lines we will show (at max) */
139 /* Command line options */
147 FLAG_S = (1 << 6) * ENABLE_FEATURE_LESS_DASHCMD,
148 /* hijack command line options variable for internal state vars */
149 LESS_STATE_MATCH_BACKWARDS = 1 << 15,
152 #if !ENABLE_FEATURE_LESS_REGEXP
153 enum { pattern_valid = 0 };
157 int cur_fline; /* signed */
158 int kbd_fd; /* fd to get input from */
160 /* last position in last line, taking into account tabs */
161 size_t last_line_pos;
163 unsigned max_lineno; /* this one tracks linewrap */
164 unsigned max_displayed_line;
166 #if ENABLE_FEATURE_LESS_WINCH
167 unsigned winch_counter;
169 ssize_t eof_error; /* eof if 0, error if < 0 */
171 ssize_t readeof; /* must be signed */
174 const char *empty_line_marker;
176 unsigned current_file;
179 #if ENABLE_FEATURE_LESS_MARKS
181 unsigned mark_lines[15][2];
183 #if ENABLE_FEATURE_LESS_REGEXP
184 unsigned *match_lines;
185 int match_pos; /* signed! */
186 int wanted_match; /* signed! */
189 smallint pattern_valid;
191 #if ENABLE_FEATURE_LESS_ASK_TERMINAL
192 smallint winsize_err;
195 struct termios term_orig, term_less;
196 char kbd_input[KEYCODE_BUFFER_SIZE];
198 #define G (*ptr_to_globals)
199 #define cur_fline (G.cur_fline )
200 #define kbd_fd (G.kbd_fd )
201 #define less_gets_pos (G.less_gets_pos )
202 #define last_line_pos (G.last_line_pos )
203 #define max_fline (G.max_fline )
204 #define max_lineno (G.max_lineno )
205 #define max_displayed_line (G.max_displayed_line)
206 #define width (G.width )
207 #define winch_counter (G.winch_counter )
208 /* This one is 100% not cached by compiler on read access */
209 #define WINCH_COUNTER (*(volatile unsigned *)&winch_counter)
210 #define eof_error (G.eof_error )
211 #define readpos (G.readpos )
212 #define readeof (G.readeof )
213 #define buffer (G.buffer )
214 #define flines (G.flines )
215 #define empty_line_marker (G.empty_line_marker )
216 #define num_files (G.num_files )
217 #define current_file (G.current_file )
218 #define filename (G.filename )
219 #define files (G.files )
220 #define num_marks (G.num_marks )
221 #define mark_lines (G.mark_lines )
222 #if ENABLE_FEATURE_LESS_REGEXP
223 #define match_lines (G.match_lines )
224 #define match_pos (G.match_pos )
225 #define num_matches (G.num_matches )
226 #define wanted_match (G.wanted_match )
227 #define pattern (G.pattern )
228 #define pattern_valid (G.pattern_valid )
230 #define terminated (G.terminated )
231 #define term_orig (G.term_orig )
232 #define term_less (G.term_less )
233 #define kbd_input (G.kbd_input )
234 #define INIT_G() do { \
235 SET_PTR_TO_GLOBALS(xzalloc(sizeof(G))); \
236 less_gets_pos = -1; \
237 empty_line_marker = "~"; \
242 IF_FEATURE_LESS_REGEXP(wanted_match = -1;) \
245 /* flines[] are lines read from stdin, each in malloc'ed buffer.
246 * Line numbers are stored as uint32_t prepended to each line.
247 * Pointer is adjusted so that flines[i] points directly past
248 * line number. Accesor: */
249 #define MEMPTR(p) ((char*)(p) - 4)
250 #define LINENO(p) (*(uint32_t*)((p) - 4))
253 /* Reset terminal input to normal */
254 static void set_tty_cooked(void)
257 tcsetattr(kbd_fd, TCSANOW, &term_orig);
260 /* Move the cursor to a position (x,y), where (0,0) is the
261 top-left corner of the console */
262 static void move_cursor(int line, int row)
264 printf(ESC"[%u;%uH", line, row);
267 static void clear_line(void)
269 printf(ESC"[%u;0H" CLEAR_2_EOL, max_displayed_line + 2);
272 static void print_hilite(const char *str)
274 printf(HIGHLIGHT"%s"NORMAL, str);
277 static void print_statusline(const char *str)
280 printf(HIGHLIGHT"%.*s"NORMAL, width - 1, str);
283 /* Exit the program gracefully */
284 static void less_exit(int code)
289 kill_myself_with_sig(- code); /* does not return */
293 #if (ENABLE_FEATURE_LESS_DASHCMD && ENABLE_FEATURE_LESS_LINENUMS) \
294 || ENABLE_FEATURE_LESS_WINCH
295 static void re_wrap(void)
301 int new_cur_fline = 0;
304 const char **old_flines = flines;
306 char **new_flines = NULL;
309 if (option_mask32 & FLAG_N)
322 if (*d == '\t') /* tab */
326 if (new_line_pos >= w) {
328 /* new line is full, create next one */
331 sz = (d - linebuf) + 1; /* + 1: NUL */
332 d = ((char*)xmalloc(sz + 4)) + 4;
334 memcpy(d, linebuf, sz);
335 new_flines = xrealloc_vector(new_flines, 8, dst_idx);
336 new_flines[dst_idx] = d;
338 if (new_line_pos < w) {
339 /* if we came here thru "goto next_new" */
340 if (src_idx > max_fline)
349 /* *d == NUL: old line ended, go to next old one */
350 free(MEMPTR(old_flines[src_idx]));
351 /* btw, convert cur_fline... */
352 if (cur_fline == src_idx)
353 new_cur_fline = dst_idx;
355 /* no more lines? finish last new line (and exit the loop) */
356 if (src_idx > max_fline)
358 s = old_flines[src_idx];
359 if (lineno != LINENO(s)) {
360 /* this is not a continuation line!
361 * create next _new_ line too */
367 flines = (const char **)new_flines;
369 max_fline = dst_idx - 1;
370 last_line_pos = new_line_pos;
371 cur_fline = new_cur_fline;
372 /* max_lineno is screen-size independent */
373 #if ENABLE_FEATURE_LESS_REGEXP
379 #if ENABLE_FEATURE_LESS_REGEXP
380 static void fill_match_lines(unsigned pos);
382 #define fill_match_lines(pos) ((void)0)
385 /* Devilishly complex routine.
387 * Has to deal with EOF and EPIPE on input,
388 * with line wrapping, with last line not ending in '\n'
389 * (possibly not ending YET!), with backspace and tabs.
390 * It reads input again if last time we got an EOF (thus supporting
391 * growing files) or EPIPE (watching output of slow process like make).
394 * flines[] - array of lines already read. Linewrap may cause
395 * one source file line to occupy several flines[n].
396 * flines[max_fline] - last line, possibly incomplete.
397 * terminated - 1 if flines[max_fline] is 'terminated'
398 * (if there was '\n' [which isn't stored itself, we just remember
400 * max_lineno - last line's number, this one doesn't increment
401 * on line wrap, only on "real" new lines.
402 * readbuf[0..readeof-1] - small preliminary buffer.
403 * readbuf[readpos] - next character to add to current line.
404 * last_line_pos - screen line position of next char to be read
405 * (takes into account tabs and backspaces)
406 * eof_error - < 0 error, == 0 EOF, > 0 not EOF/error
408 static void read_lines(void)
410 #define readbuf bb_common_bufsiz1
411 char *current_line, *p;
413 char last_terminated = terminated;
414 #if ENABLE_FEATURE_LESS_REGEXP
415 unsigned old_max_fline = max_fline;
416 time_t last_time = 0;
417 unsigned seconds_p1 = 3; /* seconds_to_loop + 1 */
420 if (option_mask32 & FLAG_N)
423 IF_FEATURE_LESS_REGEXP(again0:)
425 p = current_line = ((char*)xmalloc(w + 4)) + 4;
426 max_fline += last_terminated;
427 if (!last_terminated) {
428 const char *cp = flines[max_fline];
430 p += strlen(current_line);
431 free(MEMPTR(flines[max_fline]));
432 /* last_line_pos is still valid from previous read_lines() */
437 while (1) { /* read lines until we reach cur_fline or wanted_match */
440 while (1) { /* read chars until we have a line */
442 /* if no unprocessed chars left, eat more */
443 if (readpos >= readeof) {
445 eof_error = safe_read(STDIN_FILENO, readbuf, sizeof(readbuf));
452 c = readbuf[readpos];
453 /* backspace? [needed for manpages] */
454 /* <tab><bs> is (a) insane and */
455 /* (b) harder to do correctly, so we refuse to do it */
456 if (c == '\x8' && last_line_pos && p[-1] != '\t') {
457 readpos++; /* eat it */
459 /* was buggy (p could end up <= current_line)... */
464 size_t new_last_line_pos = last_line_pos + 1;
466 new_last_line_pos += 7;
467 new_last_line_pos &= (~7);
469 if ((int)new_last_line_pos >= w)
471 last_line_pos = new_last_line_pos;
473 /* ok, we will eat this char */
480 /* NUL is substituted by '\n'! */
481 if (c == '\0') c = '\n';
484 } /* end of "read chars until we have a line" loop */
485 /* Corner case: linewrap with only "" wrapping to next line */
486 /* Looks ugly on screen, so we do not store this empty line */
487 if (!last_terminated && !current_line[0]) {
493 last_terminated = terminated;
494 flines = xrealloc_vector(flines, 8, max_fline);
496 flines[max_fline] = (char*)xrealloc(MEMPTR(current_line), strlen(current_line) + 1 + 4) + 4;
497 LINENO(flines[max_fline]) = max_lineno;
501 if (max_fline >= MAXLINES) {
502 eof_error = 0; /* Pretend we saw EOF */
505 if (!(option_mask32 & FLAG_S)
506 ? (max_fline > cur_fline + max_displayed_line)
507 : (max_fline >= cur_fline
508 && max_lineno > LINENO(flines[cur_fline]) + max_displayed_line)
510 #if !ENABLE_FEATURE_LESS_REGEXP
513 if (wanted_match >= num_matches) { /* goto_match called us */
514 fill_match_lines(old_max_fline);
515 old_max_fline = max_fline;
517 if (wanted_match < num_matches)
521 if (eof_error <= 0) {
523 if (errno == EAGAIN) {
524 /* not yet eof or error, reset flag (or else
525 * we will hog CPU - select() will return
529 print_statusline(bb_msg_read_error);
532 #if !ENABLE_FEATURE_LESS_REGEXP
535 if (wanted_match < num_matches) {
537 } else { /* goto_match called us */
538 time_t t = time(NULL);
539 if (t != last_time) {
541 if (--seconds_p1 == 0)
545 goto again0; /* go loop again (max 2 seconds) */
550 current_line = ((char*)xmalloc(w + 4)) + 4;
553 } /* end of "read lines until we reach cur_fline" loop */
554 fill_match_lines(old_max_fline);
555 #if ENABLE_FEATURE_LESS_REGEXP
556 /* prevent us from being stuck in search for a match */
562 #if ENABLE_FEATURE_LESS_FLAGS
563 /* Interestingly, writing calc_percent as a function saves around 32 bytes
565 static int calc_percent(void)
567 unsigned p = (100 * (cur_fline+max_displayed_line+1) + max_fline/2) / (max_fline+1);
568 return p <= 100 ? p : 100;
571 /* Print a status line if -M was specified */
572 static void m_status_print(void)
576 if (less_gets_pos >= 0) /* don't touch statusline while input is done! */
580 printf(HIGHLIGHT"%s", filename);
582 printf(" (file %i of %i)", current_file, num_files);
583 printf(" lines %i-%i/%i ",
584 cur_fline + 1, cur_fline + max_displayed_line + 1,
586 if (cur_fline >= (int)(max_fline - max_displayed_line)) {
587 printf("(END)"NORMAL);
588 if (num_files > 1 && current_file != num_files)
589 printf(HIGHLIGHT" - next: %s"NORMAL, files[current_file]);
592 percentage = calc_percent();
593 printf("%i%%"NORMAL, percentage);
597 /* Print the status line */
598 static void status_print(void)
602 if (less_gets_pos >= 0) /* don't touch statusline while input is done! */
605 /* Change the status if flags have been set */
606 #if ENABLE_FEATURE_LESS_FLAGS
607 if (option_mask32 & (FLAG_M|FLAG_m)) {
615 if (cur_fline && cur_fline < (int)(max_fline - max_displayed_line)) {
623 printf(HIGHLIGHT"%s (file %i of %i)"NORMAL,
624 p, current_file, num_files);
630 static void cap_cur_fline(int nlines)
635 if (cur_fline + max_displayed_line > max_fline + TILDES) {
639 diff = max_fline - (cur_fline + max_displayed_line) + TILDES;
640 /* As the number of lines requested was too large, we just move
641 * to the end of the file */
647 static const char controls[] ALIGN1 =
648 /* NUL: never encountered; TAB: not converted */
649 /**/"\x01\x02\x03\x04\x05\x06\x07\x08" "\x0a\x0b\x0c\x0d\x0e\x0f"
650 "\x10\x11\x12\x13\x14\x15\x16\x17\x18\x19\x1a\x1b\x1c\x1d\x1e\x1f"
651 "\x7f\x9b"; /* DEL and infamous Meta-ESC :( */
652 static const char ctrlconv[] ALIGN1 =
653 /* why 40 instead of 4a below? - it is a replacement for '\n'.
654 * '\n' is a former NUL - we subst it with @, not J */
655 "\x40\x41\x42\x43\x44\x45\x46\x47\x48\x49\x40\x4b\x4c\x4d\x4e\x4f"
656 "\x50\x51\x52\x53\x54\x55\x56\x57\x58\x59\x5a\x5b\x5c\x5d\x5e\x5f";
658 static void lineno_str(char *nbuf9, const char *line)
661 if (option_mask32 & FLAG_N) {
665 if (line == empty_line_marker) {
666 memset(nbuf9, ' ', 8);
670 /* Width of 7 preserves tab spacing in the text */
672 n = LINENO(line) + 1;
677 sprintf(nbuf9, fmt, n);
682 #if ENABLE_FEATURE_LESS_REGEXP
683 static void print_found(const char *line)
688 regmatch_t match_structs;
692 const char *str = line;
697 n = strcspn(str, controls);
704 n = strspn(str, controls);
711 /* buf[] holds quarantined version of str */
713 /* Each part of the line that matches has the HIGHLIGHT
714 * and NORMAL escape sequences placed around it.
715 * NB: we regex against line, but insert text
716 * from quarantined copy (buf[]) */
722 while (match_status == 0) {
723 char *new = xasprintf("%s%.*s"HIGHLIGHT"%.*s"NORMAL,
724 growline ? growline : "",
725 (int)match_structs.rm_so, str,
726 (int)(match_structs.rm_eo - match_structs.rm_so),
727 str + match_structs.rm_so);
730 str += match_structs.rm_eo;
731 line += match_structs.rm_eo;
734 /* Most of the time doesn't find the regex, optimize for that */
735 match_status = regexec(&pattern, line, 1, &match_structs, eflags);
736 /* if even "" matches, treat it as "not a match" */
737 if (match_structs.rm_so >= match_structs.rm_eo)
741 lineno_str(nbuf9, line);
743 printf(CLEAR_2_EOL"%s%s\n", nbuf9, str);
746 printf(CLEAR_2_EOL"%s%s%s\n", nbuf9, growline, str);
750 void print_found(const char *line);
753 static void print_ascii(const char *str)
760 lineno_str(nbuf9, str);
761 printf(CLEAR_2_EOL"%s", nbuf9);
764 n = strcspn(str, controls);
767 printf("%.*s", (int) n, str);
770 n = strspn(str, controls);
775 else if (*str == (char)0x9b)
776 /* VT100's CSI, aka Meta-ESC. Who's inventor? */
777 /* I want to know who committed this sin */
780 *p++ = ctrlconv[(unsigned char)*str];
789 /* Print the buffer */
790 static void buffer_print(void)
795 for (i = 0; i <= max_displayed_line; i++)
797 print_found(buffer[i]);
799 print_ascii(buffer[i]);
803 static void buffer_fill_and_print(void)
806 #if ENABLE_FEATURE_LESS_DASHCMD
807 int fpos = cur_fline;
809 if (option_mask32 & FLAG_S) {
810 /* Go back to the beginning of this line */
811 while (fpos && LINENO(flines[fpos]) == LINENO(flines[fpos-1]))
816 while (i <= max_displayed_line && fpos <= max_fline) {
817 int lineno = LINENO(flines[fpos]);
818 buffer[i] = flines[fpos];
822 } while ((fpos <= max_fline)
823 && (option_mask32 & FLAG_S)
824 && lineno == LINENO(flines[fpos])
828 for (i = 0; i <= max_displayed_line && cur_fline + i <= max_fline; i++) {
829 buffer[i] = flines[cur_fline + i];
832 for (; i <= max_displayed_line; i++) {
833 buffer[i] = empty_line_marker;
838 /* Move the buffer up and down in the file in order to scroll */
839 static void buffer_down(int nlines)
843 cap_cur_fline(nlines);
844 buffer_fill_and_print();
847 static void buffer_up(int nlines)
850 if (cur_fline < 0) cur_fline = 0;
852 buffer_fill_and_print();
855 static void buffer_line(int linenum)
861 if (linenum + max_displayed_line > max_fline)
862 linenum = max_fline - max_displayed_line + TILDES;
866 buffer_fill_and_print();
869 static void open_file_and_read_lines(void)
872 xmove_fd(xopen(filename, O_RDONLY), STDIN_FILENO);
874 /* "less" with no arguments in argv[] */
875 /* For status line only */
876 filename = xstrdup(bb_msg_standard_input);
885 /* Reinitialize everything for a new file - free the memory and start over */
886 static void reinitialize(void)
891 for (i = 0; i <= max_fline; i++)
892 free(MEMPTR(flines[i]));
900 open_file_and_read_lines();
901 #if ENABLE_FEATURE_LESS_ASK_TERMINAL
903 printf("\033[999;999H" "\033[6n");
905 buffer_fill_and_print();
908 static int64_t getch_nowait(void)
912 struct pollfd pfd[2];
914 pfd[0].fd = STDIN_FILENO;
915 pfd[0].events = POLLIN;
917 pfd[1].events = POLLIN;
919 tcsetattr(kbd_fd, TCSANOW, &term_less);
920 /* NB: select/poll returns whenever read will not block. Therefore:
921 * if eof is reached, select/poll will return immediately
922 * because read will immediately return 0 bytes.
923 * Even if select/poll says that input is available, read CAN block
924 * (switch fd into O_NONBLOCK'ed mode to avoid it)
927 /* Are we interested in stdin? */
928 //TODO: reuse code for determining this
929 if (!(option_mask32 & FLAG_S)
930 ? !(max_fline > cur_fline + max_displayed_line)
931 : !(max_fline >= cur_fline
932 && max_lineno > LINENO(flines[cur_fline]) + max_displayed_line)
934 if (eof_error > 0) /* did NOT reach eof yet */
935 rd = 0; /* yes, we are interested in stdin */
937 /* Position cursor if line input is done */
938 if (less_gets_pos >= 0)
939 move_cursor(max_displayed_line + 2, less_gets_pos + 1);
942 if (kbd_input[0] == 0) { /* if nothing is buffered */
943 #if ENABLE_FEATURE_LESS_WINCH
946 /* NB: SIGWINCH interrupts poll() */
947 r = poll(pfd + rd, 2 - rd, -1);
948 if (/*r < 0 && errno == EINTR &&*/ winch_counter)
949 return '\\'; /* anything which has no defined function */
953 safe_poll(pfd + rd, 2 - rd, -1);
957 /* We have kbd_fd in O_NONBLOCK mode, read inside read_key()
958 * would not block even if there is no input available */
959 key64 = read_key(kbd_fd, kbd_input, /*timeout off:*/ -2);
960 if ((int)key64 == -1) {
961 if (errno == EAGAIN) {
962 /* No keyboard input available. Since poll() did return,
963 * we should have input on stdin */
965 buffer_fill_and_print();
968 /* EOF/error (ssh session got killed etc) */
975 /* Grab a character from input without requiring the return key.
976 * May return KEYCODE_xxx values.
977 * Note that this function works best with raw input. */
978 static int64_t less_getch(int pos)
985 key = key64 = getch_nowait();
988 /* Discard Ctrl-something chars.
989 * (checking only lower 32 bits is a size optimization:
990 * upper 32 bits are used only by KEYCODE_CURSOR_POS)
992 if (key >= 0 && key < ' ' && key != 0x0d && key != 8)
998 static char* less_gets(int sz)
1002 char *result = xzalloc(1);
1006 less_gets_pos = sz + i;
1019 if (c < ' ') /* filters out KEYCODE_xxx too (<0) */
1021 if (i >= width - sz - 1)
1022 continue; /* len limit */
1025 result = xrealloc(result, i+1);
1029 static void examine_file(void)
1033 print_statusline("Examine: ");
1034 new_fname = less_gets(sizeof("Examine: ") - 1);
1035 if (!new_fname[0]) {
1041 if (access(new_fname, R_OK) != 0) {
1042 print_statusline("Cannot read this file");
1046 filename = new_fname;
1047 /* files start by = argv. why we assume that argv is infinitely long??
1048 files[num_files] = filename;
1049 current_file = num_files + 1;
1051 files[0] = filename;
1052 num_files = current_file = 1;
1056 /* This function changes the file currently being paged. direction can be one of the following:
1057 * -1: go back one file
1058 * 0: go to the first file
1059 * 1: go forward one file */
1060 static void change_file(int direction)
1062 if (current_file != ((direction > 0) ? num_files : 1)) {
1063 current_file = direction ? current_file + direction : 1;
1065 filename = xstrdup(files[current_file - 1]);
1068 print_statusline(direction > 0 ? "No next file" : "No previous file");
1072 static void remove_current_file(void)
1079 if (current_file != 1) {
1081 for (i = 3; i <= num_files; i++)
1082 files[i - 2] = files[i - 1];
1086 for (i = 2; i <= num_files; i++)
1087 files[i - 2] = files[i - 1];
1093 static void colon_process(void)
1097 /* Clear the current line and print a prompt */
1098 print_statusline(" :");
1100 keypress = less_getch(2);
1103 remove_current_file();
1108 #if ENABLE_FEATURE_LESS_FLAGS
1120 less_exit(EXIT_SUCCESS);
1128 #if ENABLE_FEATURE_LESS_REGEXP
1129 static void normalize_match_pos(int match)
1131 if (match >= num_matches)
1132 match = num_matches - 1;
1138 static void goto_match(int match)
1144 /* Try to find next match if eof isn't reached yet */
1145 if (match >= num_matches && eof_error > 0) {
1146 wanted_match = match; /* "I want to read until I see N'th match" */
1150 normalize_match_pos(match);
1151 buffer_line(match_lines[match_pos]);
1153 print_statusline("No matches found");
1157 static void fill_match_lines(unsigned pos)
1161 /* Run the regex on each line of the current file */
1162 while (pos <= max_fline) {
1163 /* If this line matches */
1164 if (regexec(&pattern, flines[pos], 0, NULL, 0) == 0
1165 /* and we didn't match it last time */
1166 && !(num_matches && match_lines[num_matches-1] == pos)
1168 match_lines = xrealloc_vector(match_lines, 4, num_matches);
1169 match_lines[num_matches++] = pos;
1175 static void regex_process(void)
1177 char *uncomp_regex, *err;
1179 /* Reset variables */
1184 if (pattern_valid) {
1189 /* Get the uncompiled regular expression from the user */
1191 bb_putchar((option_mask32 & LESS_STATE_MATCH_BACKWARDS) ? '?' : '/');
1192 uncomp_regex = less_gets(1);
1193 if (!uncomp_regex[0]) {
1199 /* Compile the regex and check for errors */
1200 err = regcomp_or_errmsg(&pattern, uncomp_regex,
1201 (option_mask32 & FLAG_I) ? REG_ICASE : 0);
1204 print_statusline(err);
1211 fill_match_lines(0);
1212 while (match_pos < num_matches) {
1213 if ((int)match_lines[match_pos] > cur_fline)
1217 if (option_mask32 & LESS_STATE_MATCH_BACKWARDS)
1220 /* It's possible that no matches are found yet.
1221 * goto_match() will read input looking for match,
1223 goto_match(match_pos);
1227 static void number_process(int first_digit)
1232 char num_input[sizeof(int)*4]; /* more than enough */
1234 num_input[0] = first_digit;
1236 /* Clear the current line, print a prompt, and then print the digit */
1238 printf(":%c", first_digit);
1240 /* Receive input until a letter is given */
1242 while (i < sizeof(num_input)-1) {
1243 keypress = less_getch(i + 1);
1244 if ((unsigned)keypress > 255 || !isdigit(num_input[i]))
1246 num_input[i] = keypress;
1247 bb_putchar(keypress);
1251 num_input[i] = '\0';
1252 num = bb_strtou(num_input, NULL, 10);
1253 /* on format error, num == -1 */
1254 if (num < 1 || num > MAXLINES) {
1259 /* We now know the number and the letter entered, so we process them */
1261 case KEYCODE_DOWN: case 'z': case 'd': case 'e': case ' ': case '\015':
1264 case KEYCODE_UP: case 'b': case 'w': case 'y': case 'u':
1267 case 'g': case '<': case 'G': case '>':
1268 cur_fline = num + max_displayed_line;
1270 buffer_line(num - 1);
1273 num = num * (max_fline / 100); /* + max_fline / 2; */
1274 cur_fline = num + max_displayed_line;
1278 #if ENABLE_FEATURE_LESS_REGEXP
1280 goto_match(match_pos + num);
1283 option_mask32 &= ~LESS_STATE_MATCH_BACKWARDS;
1287 option_mask32 |= LESS_STATE_MATCH_BACKWARDS;
1294 #if ENABLE_FEATURE_LESS_DASHCMD
1295 static void flag_change(void)
1301 keypress = less_getch(1);
1305 option_mask32 ^= FLAG_M;
1308 option_mask32 ^= FLAG_m;
1311 option_mask32 ^= FLAG_E;
1314 option_mask32 ^= FLAG_TILDE;
1317 option_mask32 ^= FLAG_S;
1318 buffer_fill_and_print();
1320 #if ENABLE_FEATURE_LESS_LINENUMS
1322 option_mask32 ^= FLAG_N;
1324 buffer_fill_and_print();
1331 static void show_flag_status(void)
1338 keypress = less_getch(1);
1342 flag_val = option_mask32 & FLAG_M;
1345 flag_val = option_mask32 & FLAG_m;
1348 flag_val = option_mask32 & FLAG_TILDE;
1351 flag_val = option_mask32 & FLAG_N;
1354 flag_val = option_mask32 & FLAG_E;
1362 printf(HIGHLIGHT"The status of the flag is: %u"NORMAL, flag_val != 0);
1366 #endif /* ENABLE_FEATURE_LESS_DASHCMD */
1368 static void save_input_to_file(void)
1370 const char *msg = "";
1375 print_statusline("Log file: ");
1376 current_line = less_gets(sizeof("Log file: ")-1);
1377 if (current_line[0]) {
1378 fp = fopen_for_write(current_line);
1380 msg = "Error opening log file";
1383 for (i = 0; i <= max_fline; i++)
1384 fprintf(fp, "%s\n", flines[i]);
1389 print_statusline(msg);
1393 #if ENABLE_FEATURE_LESS_MARKS
1394 static void add_mark(void)
1398 print_statusline("Mark: ");
1399 letter = less_getch(sizeof("Mark: ") - 1);
1401 if (isalpha(letter)) {
1402 /* If we exceed 15 marks, start overwriting previous ones */
1403 if (num_marks == 14)
1406 mark_lines[num_marks][0] = letter;
1407 mark_lines[num_marks][1] = cur_fline;
1410 print_statusline("Invalid mark letter");
1414 static void goto_mark(void)
1419 print_statusline("Go to mark: ");
1420 letter = less_getch(sizeof("Go to mark: ") - 1);
1423 if (isalpha(letter)) {
1424 for (i = 0; i <= num_marks; i++)
1425 if (letter == mark_lines[i][0]) {
1426 buffer_line(mark_lines[i][1]);
1429 if (num_marks == 14 && letter != mark_lines[14][0])
1430 print_statusline("Mark not set");
1432 print_statusline("Invalid mark letter");
1436 #if ENABLE_FEATURE_LESS_BRACKETS
1437 static char opp_bracket(char bracket)
1440 case '{': case '[': /* '}' == '{' + 2. Same for '[' */
1442 case '(': /* ')' == '(' + 1 */
1454 static void match_right_bracket(char bracket)
1458 if (strchr(flines[cur_fline], bracket) == NULL) {
1459 print_statusline("No bracket in top line");
1462 bracket = opp_bracket(bracket);
1463 for (i = cur_fline + 1; i < max_fline; i++) {
1464 if (strchr(flines[i], bracket) != NULL) {
1469 print_statusline("No matching bracket found");
1472 static void match_left_bracket(char bracket)
1476 if (strchr(flines[cur_fline + max_displayed_line], bracket) == NULL) {
1477 print_statusline("No bracket in bottom line");
1481 bracket = opp_bracket(bracket);
1482 for (i = cur_fline + max_displayed_line; i >= 0; i--) {
1483 if (strchr(flines[i], bracket) != NULL) {
1488 print_statusline("No matching bracket found");
1490 #endif /* FEATURE_LESS_BRACKETS */
1492 static void keypress_process(int keypress)
1495 case KEYCODE_DOWN: case 'e': case 'j': case 0x0d:
1498 case KEYCODE_UP: case 'y': case 'k':
1501 case KEYCODE_PAGEDOWN: case ' ': case 'z': case 'f':
1502 buffer_down(max_displayed_line + 1);
1504 case KEYCODE_PAGEUP: case 'w': case 'b':
1505 buffer_up(max_displayed_line + 1);
1508 buffer_down((max_displayed_line + 1) / 2);
1511 buffer_up((max_displayed_line + 1) / 2);
1513 case KEYCODE_HOME: case 'g': case 'p': case '<': case '%':
1516 case KEYCODE_END: case 'G': case '>':
1517 cur_fline = MAXLINES;
1519 buffer_line(cur_fline);
1522 less_exit(EXIT_SUCCESS);
1524 #if ENABLE_FEATURE_LESS_MARKS
1535 /* TODO: (1) also bind ^R, ^L to this?
1536 * (2) re-measure window size?
1544 save_input_to_file();
1549 #if ENABLE_FEATURE_LESS_FLAGS
1554 #if ENABLE_FEATURE_LESS_REGEXP
1556 option_mask32 &= ~LESS_STATE_MATCH_BACKWARDS;
1560 goto_match(match_pos + 1);
1563 goto_match(match_pos - 1);
1566 option_mask32 |= LESS_STATE_MATCH_BACKWARDS;
1570 #if ENABLE_FEATURE_LESS_DASHCMD
1581 #if ENABLE_FEATURE_LESS_BRACKETS
1582 case '{': case '(': case '[':
1583 match_right_bracket(keypress);
1585 case '}': case ')': case ']':
1586 match_left_bracket(keypress);
1594 if (isdigit(keypress))
1595 number_process(keypress);
1598 static void sig_catcher(int sig)
1603 #if ENABLE_FEATURE_LESS_WINCH
1604 static void sigwinch_handler(int sig UNUSED_PARAM)
1610 int less_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
1611 int less_main(int argc, char **argv)
1618 /* TODO: -x: do not interpret backspace, -xx: tab also
1619 * -xxx: newline also
1620 * -w N: assume width N (-xxx -w 32: hex viewer of sorts)
1621 * -s: condense many empty lines to one
1622 * (used by some setups for manpage display)
1624 getopt32(argv, "EMmN~I" IF_FEATURE_LESS_DASHCMD("S") /*ignored:*/"s");
1630 /* Another popular pager, most, detects when stdout
1631 * is not a tty and turns into cat. This makes sense. */
1632 if (!isatty(STDOUT_FILENO))
1633 return bb_cat(argv);
1636 if (isatty(STDIN_FILENO)) {
1637 /* Just "less"? No args and no redirection? */
1638 bb_error_msg("missing filename");
1642 filename = xstrdup(files[0]);
1645 if (option_mask32 & FLAG_TILDE)
1646 empty_line_marker = "";
1648 /* Some versions of less can survive w/o controlling tty,
1649 * try to do the same. This also allows to specify an alternative
1650 * tty via "less 1<>TTY".
1651 * We don't try to use STDOUT_FILENO directly,
1652 * since we want to set this fd to non-blocking mode,
1653 * and not bother with restoring it on exit.
1655 tty_name = xmalloc_ttyname(STDOUT_FILENO);
1657 tty_fd = open(tty_name, O_RDONLY);
1662 /* Try controlling tty */
1664 tty_fd = open(CURRENT_TTY, O_RDONLY);
1666 return bb_cat(argv);
1669 kbd_fd = tty_fd; /* save in a global */
1671 tcgetattr(kbd_fd, &term_orig);
1672 term_less = term_orig;
1673 term_less.c_lflag &= ~(ICANON | ECHO);
1674 term_less.c_iflag &= ~(IXON | ICRNL);
1675 /*term_less.c_oflag &= ~ONLCR;*/
1676 term_less.c_cc[VMIN] = 1;
1677 term_less.c_cc[VTIME] = 0;
1679 IF_FEATURE_LESS_ASK_TERMINAL(G.winsize_err =) get_terminal_width_height(kbd_fd, &width, &max_displayed_line);
1680 /* 20: two tabstops + 4 */
1681 if (width < 20 || max_displayed_line < 3)
1682 return bb_cat(argv);
1683 max_displayed_line -= 2;
1685 /* We want to restore term_orig on exit */
1686 bb_signals(BB_FATAL_SIGS, sig_catcher);
1687 #if ENABLE_FEATURE_LESS_WINCH
1688 signal(SIGWINCH, sigwinch_handler);
1691 buffer = xmalloc((max_displayed_line+1) * sizeof(char *));
1696 #if ENABLE_FEATURE_LESS_WINCH
1697 while (WINCH_COUNTER) {
1700 IF_FEATURE_LESS_ASK_TERMINAL(G.winsize_err =) get_terminal_width_height(kbd_fd, &width, &max_displayed_line);
1701 IF_FEATURE_LESS_ASK_TERMINAL(got_size:)
1702 /* 20: two tabstops + 4 */
1705 if (max_displayed_line < 3)
1706 max_displayed_line = 3;
1707 max_displayed_line -= 2;
1709 buffer = xmalloc((max_displayed_line+1) * sizeof(char *));
1710 /* Avoid re-wrap and/or redraw if we already know
1711 * we need to do it again. These ops are expensive */
1717 buffer_fill_and_print();
1718 /* This took some time. Loop back and check,
1719 * were there another SIGWINCH? */
1721 keypress = less_getch(-1); /* -1: do not position cursor */
1722 # if ENABLE_FEATURE_LESS_ASK_TERMINAL
1723 if ((int32_t)keypress == KEYCODE_CURSOR_POS) {
1724 uint32_t rc = (keypress >> 32);
1725 width = (rc & 0x7fff);
1726 max_displayed_line = ((rc >> 16) & 0x7fff);
1731 keypress = less_getch(-1); /* -1: do not position cursor */
1733 keypress_process(keypress);
1738 Help text of less version 418 is below.
1739 If you are implementing something, keeping
1740 key and/or command line switch compatibility is a good idea:
1743 SUMMARY OF LESS COMMANDS
1745 Commands marked with * may be preceded by a number, N.
1746 Notes in parentheses indicate the behavior if N is given.
1747 h H Display this help.
1749 ---------------------------------------------------------------------------
1751 e ^E j ^N CR * Forward one line (or N lines).
1752 y ^Y k ^K ^P * Backward one line (or N lines).
1753 f ^F ^V SPACE * Forward one window (or N lines).
1754 b ^B ESC-v * Backward one window (or N lines).
1755 z * Forward one window (and set window to N).
1756 w * Backward one window (and set window to N).
1757 ESC-SPACE * Forward one window, but don't stop at end-of-file.
1758 d ^D * Forward one half-window (and set half-window to N).
1759 u ^U * Backward one half-window (and set half-window to N).
1760 ESC-) RightArrow * Left one half screen width (or N positions).
1761 ESC-( LeftArrow * Right one half screen width (or N positions).
1762 F Forward forever; like "tail -f".
1763 r ^R ^L Repaint screen.
1764 R Repaint screen, discarding buffered input.
1765 ---------------------------------------------------
1766 Default "window" is the screen height.
1767 Default "half-window" is half of the screen height.
1768 ---------------------------------------------------------------------------
1770 /pattern * Search forward for (N-th) matching line.
1771 ?pattern * Search backward for (N-th) matching line.
1772 n * Repeat previous search (for N-th occurrence).
1773 N * Repeat previous search in reverse direction.
1774 ESC-n * Repeat previous search, spanning files.
1775 ESC-N * Repeat previous search, reverse dir. & spanning files.
1776 ESC-u Undo (toggle) search highlighting.
1777 ---------------------------------------------------
1778 Search patterns may be modified by one or more of:
1779 ^N or ! Search for NON-matching lines.
1780 ^E or * Search multiple files (pass thru END OF FILE).
1781 ^F or @ Start search at FIRST file (for /) or last file (for ?).
1782 ^K Highlight matches, but don't move (KEEP position).
1783 ^R Don't use REGULAR EXPRESSIONS.
1784 ---------------------------------------------------------------------------
1786 g < ESC-< * Go to first line in file (or line N).
1787 G > ESC-> * Go to last line in file (or line N).
1788 p % * Go to beginning of file (or N percent into file).
1789 t * Go to the (N-th) next tag.
1790 T * Go to the (N-th) previous tag.
1791 { ( [ * Find close bracket } ) ].
1792 } ) ] * Find open bracket { ( [.
1793 ESC-^F <c1> <c2> * Find close bracket <c2>.
1794 ESC-^B <c1> <c2> * Find open bracket <c1>
1795 ---------------------------------------------------
1796 Each "find close bracket" command goes forward to the close bracket
1797 matching the (N-th) open bracket in the top line.
1798 Each "find open bracket" command goes backward to the open bracket
1799 matching the (N-th) close bracket in the bottom line.
1800 m<letter> Mark the current position with <letter>.
1801 '<letter> Go to a previously marked position.
1802 '' Go to the previous position.
1804 ---------------------------------------------------
1805 A mark is any upper-case or lower-case letter.
1806 Certain marks are predefined:
1807 ^ means beginning of the file
1808 $ means end of the file
1809 ---------------------------------------------------------------------------
1811 :e [file] Examine a new file.
1813 :n * Examine the (N-th) next file from the command line.
1814 :p * Examine the (N-th) previous file from the command line.
1815 :x * Examine the first (or N-th) file from the command line.
1816 :d Delete the current file from the command line list.
1817 = ^G :f Print current file name.
1818 ---------------------------------------------------------------------------
1819 MISCELLANEOUS COMMANDS
1820 -<flag> Toggle a command line option [see OPTIONS below].
1821 --<name> Toggle a command line option, by name.
1822 _<flag> Display the setting of a command line option.
1823 __<name> Display the setting of an option, by name.
1824 +cmd Execute the less cmd each time a new file is examined.
1825 !command Execute the shell command with $SHELL.
1826 |Xcommand Pipe file between current pos & mark X to shell command.
1827 v Edit the current file with $VISUAL or $EDITOR.
1828 V Print version number of "less".
1829 ---------------------------------------------------------------------------
1831 Most options may be changed either on the command line,
1832 or from within less by using the - or -- command.
1833 Options may be given in one of two forms: either a single
1834 character preceded by a -, or a name preceeded by --.
1836 Display help (from command line).
1837 -a ........ --search-skip-screen
1838 Forward search skips current screen.
1839 -b [N] .... --buffers=[N]
1841 -B ........ --auto-buffers
1842 Don't automatically allocate buffers for pipes.
1843 -c ........ --clear-screen
1844 Repaint by clearing rather than scrolling.
1847 -D [xn.n] . --color=xn.n
1848 Set screen colors. (MS-DOS only)
1849 -e -E .... --quit-at-eof --QUIT-AT-EOF
1850 Quit at end of file.
1852 Force open non-regular files.
1853 -F ........ --quit-if-one-screen
1854 Quit if entire file fits on first screen.
1855 -g ........ --hilite-search
1856 Highlight only last match for searches.
1857 -G ........ --HILITE-SEARCH
1858 Don't highlight any matches for searches.
1859 -h [N] .... --max-back-scroll=[N]
1860 Backward scroll limit.
1861 -i ........ --ignore-case
1862 Ignore case in searches that do not contain uppercase.
1863 -I ........ --IGNORE-CASE
1864 Ignore case in all searches.
1865 -j [N] .... --jump-target=[N]
1866 Screen position of target lines.
1867 -J ........ --status-column
1868 Display a status column at left edge of screen.
1869 -k [file] . --lesskey-file=[file]
1871 -L ........ --no-lessopen
1872 Ignore the LESSOPEN environment variable.
1873 -m -M .... --long-prompt --LONG-PROMPT
1875 -n -N .... --line-numbers --LINE-NUMBERS
1876 Don't use line numbers.
1877 -o [file] . --log-file=[file]
1878 Copy to log file (standard input only).
1879 -O [file] . --LOG-FILE=[file]
1880 Copy to log file (unconditionally overwrite).
1881 -p [pattern] --pattern=[pattern]
1882 Start at pattern (from command line).
1883 -P [prompt] --prompt=[prompt]
1885 -q -Q .... --quiet --QUIET --silent --SILENT
1886 Quiet the terminal bell.
1887 -r -R .... --raw-control-chars --RAW-CONTROL-CHARS
1888 Output "raw" control characters.
1889 -s ........ --squeeze-blank-lines
1890 Squeeze multiple blank lines.
1891 -S ........ --chop-long-lines
1893 -t [tag] .. --tag=[tag]
1895 -T [tagsfile] --tag-file=[tagsfile]
1896 Use an alternate tags file.
1897 -u -U .... --underline-special --UNDERLINE-SPECIAL
1898 Change handling of backspaces.
1899 -V ........ --version
1900 Display the version number of "less".
1901 -w ........ --hilite-unread
1902 Highlight first new line after forward-screen.
1903 -W ........ --HILITE-UNREAD
1904 Highlight first new line after any forward movement.
1905 -x [N[,...]] --tabs=[N[,...]]
1907 -X ........ --no-init
1908 Don't use termcap init/deinit strings.
1910 Don't use termcap keypad init/deinit strings.
1911 -y [N] .... --max-forw-scroll=[N]
1912 Forward scroll limit.
1913 -z [N] .... --window=[N]
1915 -" [c[c]] . --quotes=[c[c]]
1916 Set shell quote characters.
1918 Don't display tildes after end of file.
1919 -# [N] .... --shift=[N]
1920 Horizontal scroll amount (0 = one half screen width)
1922 ---------------------------------------------------------------------------
1924 These keys can be used to edit text being entered
1925 on the "command line" at the bottom of the screen.
1926 RightArrow ESC-l Move cursor right one character.
1927 LeftArrow ESC-h Move cursor left one character.
1928 CNTL-RightArrow ESC-RightArrow ESC-w Move cursor right one word.
1929 CNTL-LeftArrow ESC-LeftArrow ESC-b Move cursor left one word.
1930 HOME ESC-0 Move cursor to start of line.
1931 END ESC-$ Move cursor to end of line.
1932 BACKSPACE Delete char to left of cursor.
1933 DELETE ESC-x Delete char under cursor.
1934 CNTL-BACKSPACE ESC-BACKSPACE Delete word to left of cursor.
1935 CNTL-DELETE ESC-DELETE ESC-X Delete word under cursor.
1936 CNTL-U ESC (MS-DOS only) Delete entire line.
1937 UpArrow ESC-k Retrieve previous command line.
1938 DownArrow ESC-j Retrieve next command line.
1939 TAB Complete filename & cycle.
1940 SHIFT-TAB ESC-TAB Complete filename & reverse cycle.
1941 CNTL-L Complete filename, list all.