* Copyright (c) 1980, 1987 Regents of the University of California.
* %sccs.include.redist.c%
"@(#) Copyright (c) 1980, 1987 Regents of the University of California.\n\
static char sccsid
[] = "@(#)head.c 5.5 (Berkeley) %G%";
* head - give the first few lines of a stream or of each of a set of files
* Bill Joy UCB August 24, 1977
int firsttime
, linecnt
= 10;
if (argc
> 1 && argv
[1][0] == '-') {
if (!isdigit(argv
[1][1])) {
fprintf(stderr
, "head: illegal option -- %c\n", argv
[1][1]);
if ((linecnt
= atoi(argv
[1] + 1)) < 0) {
usage
: fputs("usage: head [-line_count] [file ...]\n", stderr
);
/* setlinebuf(stdout); */
for (firsttime
= 1, --argc
, ++argv
;; firsttime
= 0) {
if (!freopen(*argv
, "r", stdin
)) {
fprintf(stderr
, "head: can't read %s.\n", *argv
);
printf("==> %s <==\n", *argv
);
for (cnt
= linecnt
; cnt
; --cnt
)
while ((ch
= getchar()) != EOF
)