More stuff.
[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 //#define ERASE_STUFF
29
30 extern int more_main(int argc, char **argv)
31 {
32     int c, lines=0;
33     int next_page=0, rows = 24;
34 #ifdef ERASE_STUFF
35     int cols=79;
36 #endif
37     struct stat st;     
38     FILE *file = stdin;
39
40     if ( strcmp(*argv,"--help")==0 || strcmp(*argv,"-h")==0 ) {
41         fprintf(stderr, "Usage: %s %s", *argv, more_usage);
42         return(FALSE);
43     }
44     argc--;
45     argv++;
46
47     while (argc-- > 0) {
48             file = fopen(*argv, "r");
49         if (file == NULL) {
50             perror("Can't open file");
51             return(FALSE);
52         }
53         fstat(fileno(file), &st);
54         fprintf(stderr, "hi\n");
55
56         while ((c = getc(file)) != EOF) {
57             if ( next_page ) {
58                 int len=0;
59                 next_page = 0;
60                 lines=0;
61                 len = fprintf(stdout, "--More-- (%d%% of %ld bytes)", 
62                         (int) (100*( (double) ftell(file) / (double) st.st_size )),
63                         st.st_size);
64                 fflush(stdout);
65                 getc( stdin);
66 #ifdef ERASE_STUFF
67                 /* Try to erase the "More" message */
68                 while(len-- > 0)
69                     putc('\b', stdout);
70                 while(len++ < cols)
71                     putc(' ', stdout);
72                 while(len-- > 0)
73                     putc('\b', stdout);
74                 fflush(stdout);
75 #endif
76             }
77             if ( c == '\n' && ++lines == (rows + 1) )
78                 next_page = 1;
79             putc(c, stdout);
80         }
81         fclose(file);
82         fflush(stdout);
83
84         argc--;
85         argv++;
86     }
87     return(TRUE);
88 }
89
90