102 lines
1.5 KiB
C
Executable File
102 lines
1.5 KiB
C
Executable File
/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
|
|
/* All Rights Reserved */
|
|
|
|
/* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T */
|
|
/* The copyright notice above does not evidence any */
|
|
/* actual or intended publication of such source code. */
|
|
|
|
#ident "@(#)fold.c 1.5 92/07/14 SMI" /* SVr4.0 1.5 */
|
|
#include <stdio.h>
|
|
/*
|
|
* fold - fold long lines for finite output devices
|
|
*
|
|
*/
|
|
|
|
int fold = 80;
|
|
|
|
main(argc, argv)
|
|
int argc;
|
|
char *argv[];
|
|
{
|
|
register c;
|
|
FILE *f;
|
|
char obuf[BUFSIZ];
|
|
|
|
argc--, argv++;
|
|
setbuf(stdout, obuf);
|
|
if (argc > 0 && argv[0][0] == '-') {
|
|
fold = 0;
|
|
argv[0]++;
|
|
while (*argv[0] >= '0' && *argv[0] <= '9')
|
|
fold *= 10, fold += *argv[0]++ - '0';
|
|
if (*argv[0]) {
|
|
printf("Bad number for fold\n");
|
|
exit(1);
|
|
}
|
|
argc--, argv++;
|
|
}
|
|
do {
|
|
if (argc > 0) {
|
|
if (freopen(argv[0], "r", stdin) == NULL) {
|
|
perror(argv[0]);
|
|
exit(1);
|
|
}
|
|
argc--, argv++;
|
|
}
|
|
for (;;) {
|
|
c = getc(stdin);
|
|
if (c == -1)
|
|
break;
|
|
putch(c);
|
|
}
|
|
} while (argc > 0);
|
|
exit(0);
|
|
}
|
|
|
|
int col;
|
|
|
|
putch(c)
|
|
register c;
|
|
{
|
|
register ncol;
|
|
|
|
switch (c) {
|
|
case '\n':
|
|
ncol = 0;
|
|
break;
|
|
case '\t':
|
|
ncol = (col + 8) &~ 7;
|
|
break;
|
|
case '\b':
|
|
ncol = col ? col - 1 : 0;
|
|
break;
|
|
case '\r':
|
|
ncol = 0;
|
|
break;
|
|
default:
|
|
ncol = col + 1;
|
|
}
|
|
if (ncol > fold)
|
|
putchar('\n'), col = 0;
|
|
putchar(c);
|
|
switch (c) {
|
|
case '\n':
|
|
col = 0;
|
|
break;
|
|
case '\t':
|
|
col += 8;
|
|
col &= ~7;
|
|
break;
|
|
case '\b':
|
|
if (col)
|
|
col--;
|
|
break;
|
|
case '\r':
|
|
col = 0;
|
|
break;
|
|
default:
|
|
col++;
|
|
break;
|
|
}
|
|
}
|