latest and greatest.
[oweals/busybox.git] / more.c
1 /*
2  * Mini more implementation for busybox
3  *
4  * Copyright (C) 1998 by Erik Andersen <andersee@debian.org>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14  * General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19  *
20  */
21
22 #include "internal.h"
23 #include <stdio.h>
24 #include <signal.h>
25
26 const char more_usage[] = "[file ...]";
27
28
29
30 extern int more_main(int argc, char **argv)
31 {
32     int c, lines=0;
33     int next_page=0, rows = 24, cols=79;
34     struct stat st;     
35     FILE *file = stdin;
36
37     if ( strcmp(*argv,"--help")==0 || strcmp(*argv,"-h")==0 ) {
38         fprintf(stderr, "Usage: %s %s", *argv, more_usage);
39         return(FALSE);
40     }
41     argc--;
42     argv++;
43
44     while (argc-- > 0) {
45         file = fopen(*argv, "r");
46         if (file == NULL) {
47             perror(*argv);
48             return(FALSE);
49         }
50         fstat(fileno(file), &st);
51
52         while ((c = getc(file)) != EOF) {
53             if ( next_page ) {
54                 int len=0;
55                 next_page = 0;
56                 lines=0;
57                 len = fprintf(stdout, "--More-- (%d%% of %ld bytes)\n", 
58                         (int) (100*( (double) ftell(file) / (double) st.st_size )),
59                         st.st_size);
60                 fflush(stdout);
61                 getc( stdin);
62 #if 0
63                 while(len-- > 0)
64                     putc('\b', stdout);
65                 while(len++ < cols)
66                     putc('8', stdout);
67                 while(len-- > 0)
68                     putc('\b', stdout);
69                 fflush(stdout);
70 #endif
71             }
72             if ( c == '\n' && ++lines == (rows + 1) )
73                 next_page = 1;
74             putc(c, stdout);
75         }
76         fclose(file);
77         fflush(stdout);
78
79         argc--;
80         argv++;
81     }
82     return(TRUE);
83 }
84
85