blob: debad81bd8e84b75d8eff695e43680794f8c0dd8 [file] [log] [blame]
/* vi: set sw=4 ts=4: */
/*
* Mini more implementation for busybox
*
* Copyright (C) 1995, 1996 by Bruce Perens <bruce@pixar.com>.
* Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
*
* Latest version blended together by Erik Andersen <andersen@codepoet.org>,
* based on the original more implementation by Bruce, and code from the
* Debian boot-floppies team.
*
* Termios corrects by Vladimir Oleynik <dzo@simtreas.ru>
*
* Licensed under GPLv2 or later, see file LICENSE in this source tree.
*/
//config:config MORE
//config: bool "more"
//config: default y
//config: help
//config: more is a simple utility which allows you to read text one screen
//config: sized page at a time. If you want to read text that is larger than
//config: the screen, and you are using anything faster than a 300 baud modem,
//config: you will probably find this utility very helpful. If you don't have
//config: any need to reading text files, you can leave this disabled.
//applet:IF_MORE(APPLET(more, BB_DIR_BIN, BB_SUID_DROP))
//kbuild:lib-$(CONFIG_MORE) += more.o
//usage:#define more_trivial_usage
//usage: "[FILE]..."
//usage:#define more_full_usage "\n\n"
//usage: "View FILE (or stdin) one screenful at a time"
//usage:
//usage:#define more_example_usage
//usage: "$ dmesg | more\n"
#include "libbb.h"
#include "common_bufsiz.h"
struct globals {
int tty_fileno;
unsigned terminal_width;
unsigned terminal_height;
struct termios initial_settings;
} FIX_ALIASING;
#define G (*(struct globals*)bb_common_bufsiz1)
#define INIT_G() do { setup_common_bufsiz(); } while (0)
static void get_wh(void)
{
/* never returns w, h <= 1 */
get_terminal_width_height(G.tty_fileno, &G.terminal_width, &G.terminal_height);
G.terminal_height -= 1;
}
static void tcsetattr_tty_TCSANOW(struct termios *settings)
{
tcsetattr(G.tty_fileno, TCSANOW, settings);
}
static void gotsig(int sig UNUSED_PARAM)
{
/* bb_putchar_stderr doesn't use stdio buffering,
* therefore it is safe in signal handler */
bb_putchar_stderr('\n');
tcsetattr_tty_TCSANOW(&G.initial_settings);
_exit(EXIT_FAILURE);
}
#define CONVERTED_TAB_SIZE 8
int more_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
int more_main(int argc UNUSED_PARAM, char **argv)
{
int c = c; /* for compiler */
int input = 0;
int spaces = 0;
int please_display_more_prompt;
FILE *tty;
INIT_G();
/* Parse options */
/* Accepted but ignored: */
/* -d Display help instead of ringing bell */
/* -f Count logical lines (IOW: long lines are not folded) */
/* -l Do not pause after any line containing a ^L (form feed) */
/* -s Squeeze blank lines into one */
/* -u Suppress underlining */
getopt32(argv, "dflsu");
argv += optind;
/* Another popular pager, most, detects when stdout
* is not a tty and turns into cat. This makes sense. */
if (!isatty(STDOUT_FILENO))
return bb_cat(argv);
tty = fopen_for_read(CURRENT_TTY);
if (!tty)
return bb_cat(argv);
G.tty_fileno = fileno(tty);
/* Turn on unbuffered input; turn off echoing */
set_termios_to_raw(G.tty_fileno, &G.initial_settings, 0);
bb_signals(BB_FATAL_SIGS, gotsig);
do {
struct stat st;
FILE *file;
int len;
int lines;
file = stdin;
if (*argv) {
file = fopen_or_warn(*argv, "r");
if (!file)
continue;
}
st.st_size = 0;
fstat(fileno(file), &st);
get_wh();
please_display_more_prompt = 0;
len = 0;
lines = 0;
for (;;) {
int wrap;
if (spaces)
spaces--;
else {
c = getc(file);
if (c == EOF) break;
}
loop_top:
if (input != 'r' && please_display_more_prompt) {
len = printf("--More-- ");
if (st.st_size != 0) {
uoff_t d = (uoff_t)st.st_size / 100;
if (d == 0)
d = 1;
len += printf("(%u%% of %"OFF_FMT"u bytes)",
(int) ((uoff_t)ftello(file) / d),
st.st_size);
}
/*
* We've just displayed the "--More--" prompt, so now we need
* to get input from the user.
*/
for (;;) {
fflush_all();
input = getc(tty);
input = tolower(input);
/* Erase the last message */
printf("\r%*s\r", len, "");
if (input == 'q')
goto end;
/* Due to various multibyte escape
* sequences, it's not ok to accept
* any input as a command to scroll
* the screen. We only allow known
* commands, else we show help msg. */
if (input == ' ' || input == '\n' || input == 'r')
break;
len = printf("(Enter:next line Space:next page Q:quit R:show the rest)");
}
len = 0;
lines = 0;
please_display_more_prompt = 0;
/* The user may have resized the terminal.
* Re-read the dimensions. */
get_wh();
}
/* Crudely convert tabs into spaces, which are
* a bajillion times easier to deal with. */
if (c == '\t') {
spaces = ((unsigned)~len) % CONVERTED_TAB_SIZE;
c = ' ';
}
/*
* There are two input streams to worry about here:
*
* c : the character we are reading from the file being "mored"
* input: a character received from the keyboard
*
* If we hit a newline in the _file_ stream, we want to test and
* see if any characters have been hit in the _input_ stream. This
* allows the user to quit while in the middle of a file.
*/
wrap = (++len > G.terminal_width);
if (c == '\n' || wrap) {
/* Then outputting this character
* will move us to a new line. */
if (++lines >= G.terminal_height || input == '\n')
please_display_more_prompt = 1;
len = 0;
}
if (c != '\n' && wrap) {
/* Then outputting this will also put a character on
* the beginning of that new line. Thus we first want to
* display the prompt (if any), so we skip the putchar()
* and go back to the top of the loop, without reading
* a new character. */
goto loop_top;
}
/* My small mind cannot fathom backspaces and UTF-8 */
putchar(c);
die_if_ferror_stdout(); /* if tty was destroyed (closed xterm, etc) */
}
fclose(file);
fflush_all();
} while (*argv && *++argv);
end:
tcsetattr_tty_TCSANOW(&G.initial_settings);
return 0;
}