Trailing-Edge
-
PDP-10 Archives
-
SRI_NIC_PERM_FS_1_19910112
-
kcc-6/lib/test/tcat.c
There are 5 other files named tcat.c in the archive. Click here to see a list.
/* Simple CAT-style test program for I/O
** Any arg causes TCAT to prefix each line with argv[0] and PID.
*/
#include <stdio.h>
main(argc, argv)
int argc;
char **argv;
{
int c;
int pid = getpid();
char *name = NULL;
int showpid = 0, bol = 1;
if (argc > 1) name = argv[0], ++showpid;
while ((c = getchar()) != EOF) {
if (c == 0)
fprintf(stderr,"%o: Null byte seen on input!\n", pid);
if (showpid) {
if (bol) printf("%s-%o: ", name, pid), bol = 0;
if (c == '\n') bol = 1;
}
putchar(c);
}
if (ferror(stdin)) {
perror("Input error on stdin! errno = ");
}
}