Vladimir N. Oleynik (vodz) writes:
[oweals/busybox.git] / util-linux / more.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Mini more implementation for busybox
4  *
5  * Copyright (C) 1995, 1996 by Bruce Perens <bruce@pixar.com>.
6  * Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
7  *
8  * Latest version blended together by Erik Andersen <andersen@codepoet.org>,
9  * based on the original more implementation by Bruce, and code from the
10  * Debian boot-floppies team.
11  *
12  * Termios corrects by Vladimir Oleynik <dzo@simtreas.ru>
13  *
14  * This program is free software; you can redistribute it and/or modify
15  * it under the terms of the GNU General Public License as published by
16  * the Free Software Foundation; either version 2 of the License, or
17  * (at your option) any later version.
18  *
19  * This program is distributed in the hope that it will be useful,
20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
22  * General Public License for more details.
23  *
24  * You should have received a copy of the GNU General Public License
25  * along with this program; if not, write to the Free Software
26  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
27  *
28  */
29
30 #include <stdio.h>
31 #include <fcntl.h>
32 #include <signal.h>
33 #include <stdlib.h>
34 #include <unistd.h>
35 #include <sys/ioctl.h>
36 #include "busybox.h"
37
38
39 #ifdef CONFIG_FEATURE_USE_TERMIOS
40 static int cin_fileno;
41 #include <termios.h>
42 #define setTermSettings(fd,argp) tcsetattr(fd,TCSANOW,argp)
43 #define getTermSettings(fd,argp) tcgetattr(fd, argp);
44
45 static struct termios initial_settings, new_settings;
46
47 static void set_tty_to_initial_mode(void)
48 {
49         setTermSettings(cin_fileno, &initial_settings);
50 }
51
52 static void gotsig(int sig)
53 {
54         putchar('\n');
55         exit(EXIT_FAILURE);
56 }
57 #endif /* CONFIG_FEATURE_USE_TERMIOS */
58
59
60 extern int more_main(int argc, char **argv)
61 {
62         int c, lines, input = 0;
63         int please_display_more_prompt = 0;
64         struct stat st;
65         FILE *file;
66         FILE *cin;
67         int len, page_height;
68         int terminal_width;
69         int terminal_height;
70 #ifndef CONFIG_FEATURE_USE_TERMIOS
71         int cin_fileno;
72 #endif
73
74         argc--;
75         argv++;
76
77
78         /* not use inputing from terminal if usage: more > outfile */
79         if(isatty(fileno(stdout))) {
80                 cin = fopen(CURRENT_TTY, "r");
81                 if (!cin)
82                         cin = bb_xfopen(CONSOLE_DEV, "r");
83                 cin_fileno = fileno(cin);
84                 please_display_more_prompt = 2;
85 #ifdef CONFIG_FEATURE_USE_TERMIOS
86                 getTermSettings(cin_fileno, &initial_settings);
87                 new_settings = initial_settings;
88                 new_settings.c_lflag &= ~ICANON;
89                 new_settings.c_lflag &= ~ECHO;
90                 new_settings.c_cc[VMIN] = 1;
91                 new_settings.c_cc[VTIME] = 0;
92                 setTermSettings(cin_fileno, &new_settings);
93                 atexit(set_tty_to_initial_mode);
94                 (void) signal(SIGINT, gotsig);
95                 (void) signal(SIGQUIT, gotsig);
96                 (void) signal(SIGTERM, gotsig);
97 #endif
98         } else {
99                 cin = stdin;
100         }
101
102         do {
103                 if (argc == 0) {
104                         file = stdin;
105                 } else
106                         file = bb_wfopen(*argv, "r");
107                 if(file==0)
108                         goto loop;
109
110                 st.st_size = 0;
111                 fstat(fileno(file), &st);
112
113                 please_display_more_prompt &= ~1;
114
115                 get_terminal_width_height(cin_fileno, &terminal_width, &terminal_height);
116                 if (terminal_height > 4)
117                         terminal_height -= 2;
118                 if (terminal_width > 0)
119                         terminal_width -= 1;
120
121                 len=0;
122                 lines = 0;
123                 page_height = terminal_height;
124                 while ((c = getc(file)) != EOF) {
125
126                         if ((please_display_more_prompt & 3) == 3) {
127                                 len = printf("--More-- ");
128                                 if (file != stdin && st.st_size > 0) {
129 #if _FILE_OFFSET_BITS == 64
130                                         len += printf("(%d%% of %lld bytes)",
131                                                    (int) (100 * ((double) ftell(file) /
132                                                    (double) st.st_size)), (long long)st.st_size);
133 #else
134                                         len += printf("(%d%% of %ld bytes)",
135                                                    (int) (100 * ((double) ftell(file) /
136                                                    (double) st.st_size)), (long)st.st_size);
137 #endif
138                                 }
139
140                                 fflush(stdout);
141
142                                 /*
143                                  * We've just displayed the "--More--" prompt, so now we need
144                                  * to get input from the user.
145                                  */
146                                 input = getc(cin);
147 #ifndef CONFIG_FEATURE_USE_TERMIOS
148                                 printf("\033[A"); /* up cursor */
149 #endif
150                                 /* Erase the "More" message */
151                                 putc('\r', stdout);
152                                 while (--len >= 0)
153                                         putc(' ', stdout);
154                                 putc('\r', stdout);
155                                 len=0;
156                                 lines = 0;
157                                 page_height = terminal_height;
158                                 please_display_more_prompt &= ~1;
159
160                                 if (input == 'q')
161                                         goto end;
162                         }
163
164                         /*
165                          * There are two input streams to worry about here:
166                          *
167                          * c     : the character we are reading from the file being "mored"
168                          * input : a character received from the keyboard
169                          *
170                          * If we hit a newline in the _file_ stream, we want to test and
171                          * see if any characters have been hit in the _input_ stream. This
172                          * allows the user to quit while in the middle of a file.
173                          */
174                         if (c == '\n') {
175                                 /* increment by just one line if we are at
176                                  * the end of this line */
177                                 if (input == '\n')
178                                         please_display_more_prompt |= 1;
179                                 /* Adjust the terminal height for any overlap, so that
180                                  * no lines get lost off the top. */
181                                 if (len >= terminal_width) {
182                                         int quot, rem;
183                                         quot = len / terminal_width;
184                                         rem  = len - (quot * terminal_width);
185                                         if (quot) {
186                                                 if (rem)
187                                                         page_height-=quot;
188                                                 else
189                                                         page_height-=(quot-1);
190                                         }
191                                 }
192                                 if (++lines >= page_height) {
193                                         please_display_more_prompt |= 1;
194                                 }
195                                 len=0;
196                         }
197                         /*
198                          * If we just read a newline from the file being 'mored' and any
199                          * key other than a return is hit, scroll by one page
200                          */
201                         putc(c, stdout);
202                         len++;
203                 }
204                 fclose(file);
205                 fflush(stdout);
206 loop:
207                 argv++;
208         } while (--argc > 0);
209   end:
210         return 0;
211 }