home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / compsrcs / apple2 / 33 < prev    next >
Encoding:
Internet Message Format  |  1990-12-02  |  3.1 KB
  1. Path: wuarchive!zaphod.mps.ohio-state.edu!usc!cs.utexas.edu!rutgers!aramis.rutgers.edu!paul.rutgers.edu!yoko.rutgers.edu!jac
  2. From: jac@yoko.rutgers.edu (Jonathan A. Chandross)
  3. Newsgroups: comp.sources.apple2
  4. Subject: v001SRC010:  View A File 1 Page At A Time
  5. Message-ID: <Dec.1.16.37.43.1990.24383@yoko.rutgers.edu>
  6. Date: 1 Dec 90 21:37:44 GMT
  7. Organization: Rutgers Univ., New Brunswick, N.J.
  8. Lines: 155
  9. Approved: jac@paul.rutgers.edu
  10.  
  11.  
  12. Submitted-by: NONE
  13. Posting-number: Volume 1, Source:10
  14. Archive-name: util/page
  15. Architecture: ANY_2
  16. Version-number: 1.00
  17.  
  18. Enclosed is page.c.  It allows you to view a file one page at a
  19. time.
  20.  
  21. Enjoy.
  22.  
  23.  
  24. =page.c
  25. -
  26. -/*
  27. - *
  28. - * page.c
  29. - *
  30. - * Examine a file one screenful at a time.
  31. - *
  32. - * Developed for the AZTEC C system for the Apple ][+, Apple //e computer.
  33. - * Based on a more.c by aluxe!ira.
  34. - *
  35. - * Bob Cunningham
  36. - * bob@kahala.soest.hawaii.edu
  37. - * November 19, 1983
  38. - *
  39. - * Version 1.00
  40. - *
  41. - * This code is offered without any warranty or support.
  42. - *
  43. - */
  44. - 
  45. -#include "kbctl.h"
  46. -#include "stdio.h"
  47. - 
  48. -#define SCRNSIZE 24
  49. -#define MAXLINE 1000
  50. -#define NEWPAGE ioctl( 1, KB_CLEAR)
  51. - 
  52. -char    str_e[] = "  End of  ";
  53. -char    str_m[] = "--More--  ";
  54. -char    str_more[] = "  [Hit 'space' to continue, 'q' to quit] ";
  55. -int    file_len;
  56. - 
  57. -main(argc, argv)
  58. -    int    argc;
  59. -    char    *argv[];
  60. -    {
  61. -    char    line[MAXLINE], *s;
  62. -    long    lineno;
  63. -    int    flag, srnsize, len;
  64. -    FILE * fp, *fopen();
  65. - 
  66. -    flag = lineno = 0;
  67. -    srnsize = SCRNSIZE - 2;
  68. -    while (--argc > 0 && (*++argv)[0] == '-' )
  69. -        for (s = argv[0] + 1; *s != '\0'; s++)
  70. -            switch (*s)
  71. -                {
  72. -                default:
  73. -                    printf("page: illegal option %c\n",
  74. -                           *s );
  75. -                    argc = 0;
  76. -                    break;
  77. -                }
  78. -    if ( argc < 1 ) 
  79. -        {
  80. -        printf("Usage: page file1 [ file2 file3 .. ]\n");
  81. -        exit(1);
  82. -        }
  83. -     else
  84. -        *--argv;
  85. -    if ( argc >= 2 )
  86. -        flag = 1;
  87. -    while ( --argc >= 0 )
  88. -        {
  89. -        if ((fp = fopen(*++argv, "r")) == NULL)
  90. -            {
  91. -            printf("page: can't open %s\n", *argv);
  92. -            exit(1);
  93. -            }
  94. -        NEWPAGE;
  95. -        if (flag)
  96. -            {
  97. -            printf(":::::::::::::::::::\n");
  98. -            printf("%s\n",*argv);
  99. -            printf(":::::::::::::::::::\n");
  100. -            lineno = 2;
  101. -            }
  102. -        fp->bufsiz = 2048;
  103. -        file_len = strlen (*argv);
  104. -        while ( (len = getline(line, MAXLINE, fp)) > 0)
  105. -            {
  106. -            lineno++;
  107. -            write( 1, line, len );
  108. -            if ( lineno % srnsize == 0 )
  109. -                {
  110. -                if ( more(str_m,*argv) == -1 )
  111. -                    exit(0);
  112. -                lineno = 0;
  113. -                }
  114. -            }
  115. -            fclose(fp);
  116. -            if ( (argc >= 1) )
  117. -                {
  118. -                fflush(stdout);
  119. -                if ( more(str_e,*argv) == -1 )
  120. -                    exit(0);
  121. -                }
  122. -            lineno = 0;
  123. -        }
  124. -    }
  125. - 
  126. - 
  127. -getline(s, lim, fp)
  128. -char    *s;
  129. -int    lim;
  130. -FILE *fp;
  131. -{
  132. -    char    c, *pc;
  133. - 
  134. -    pc = s;
  135. -    while (--lim > 0 && (c = agetc(fp) ) != EOF && c != '\n' )
  136. -        *pc++ = c;
  137. -    if (c == '\n' )
  138. -        *pc++ = c;
  139. -    *pc = '\0';
  140. -    return((int)(pc - s));
  141. -}
  142. - 
  143. - 
  144. -more(msg,file)
  145. -    char   *msg;
  146. -    char    *file;
  147. -    {
  148. -    int    c;
  149. - 
  150. -    ioctl ( 1, KB_INV, 1 );
  151. -    write ( 1, msg, 11);
  152. -    write ( 1, file, file_len);
  153. -    write ( 1, str_more, 42 );
  154. -    ioctl ( 1, KB_INV, 0 );
  155. -    c = getchar();
  156. -    ioctl ( 1, KB_CURS, ( 23 << 8 ) | 0 );
  157. -    ioctl ( 1, KB_CLEOL );
  158. -    if ( c != ' ' && c != 'q' )
  159. -        more(file);
  160. -    if ( c == 'q' )
  161. -        return(-1);
  162. -    NEWPAGE;
  163. -    }
  164. - 
  165. + END OF ARCHIVE
  166.