1
0
Files
irix-657m-src/eoe/cmd/line/line.c
2022-09-29 17:59:04 +03:00

52 lines
996 B
C

/* Copyright (c) 1984 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 "@(#)line:line.c 1.3" */
#ident "$Header: /proj/irix6.5.7m/isms/eoe/cmd/line/RCS/line.c,v 1.4 1992/04/27 12:45:05 wtk Exp $"
/*
This program reads a single line from the standard input
and writes it on the standard output. It is probably most useful
in conjunction with the shell.
*/
#define LSIZE 512
int EOF;
char nl = '\n';
main()
{
register char c;
char line[LSIZE];
register char *linep, *linend;
EOF = 0;
linep = line;
linend = line + LSIZE;
while ((c = readc()) != nl)
{
if (linep == linend)
{
write (1, line, LSIZE);
linep = line;
}
*linep++ = c;
}
write (1, line, linep-line);
write(1,&nl,1);
if (EOF == 1) exit(1);
exit (0);
}
readc()
{
char c;
if (read (0, &c, 1) != 1) {
EOF = 1;
return(nl);
}
else
return (c);
}