160 lines
3.5 KiB
C
Executable File
160 lines
3.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. */
|
|
|
|
#pragma ident "@(#)tcopy.c 1.3 93/09/27 SMI"
|
|
|
|
/*******************************************************************
|
|
|
|
PROPRIETARY NOTICE (Combined)
|
|
|
|
This source code is unpublished proprietary information
|
|
constituting, or derived under license from AT&T's UNIX(r) System V.
|
|
In addition, portions of such source code were derived from Berkeley
|
|
4.3 BSD under license from the Regents of the University of
|
|
California.
|
|
|
|
|
|
|
|
Copyright Notice
|
|
|
|
Notice of copyright on this source code product does not indicate
|
|
publication.
|
|
|
|
(c) 1986,1987,1988,1989 Sun Microsystems, Inc
|
|
(c) 1983,1984,1985,1986,1987,1988,1989 AT&T.
|
|
All rights reserved.
|
|
********************************************************************/
|
|
|
|
#include <stdio.h>
|
|
#include <signal.h>
|
|
#include <sys/types.h>
|
|
#include <sys/file.h>
|
|
#include <sys/fcntl.h>
|
|
#include <sys/mtio.h>
|
|
|
|
#define SIZE (64 * 1024)
|
|
|
|
char buff[SIZE];
|
|
int filen=1;
|
|
long count, lcount;
|
|
extern void RUBOUT();
|
|
int nfile;
|
|
long size, tsize;
|
|
int ln;
|
|
char *inf, *outf;
|
|
int copy;
|
|
|
|
main(argc, argv)
|
|
char **argv;
|
|
{
|
|
register n, nw, inp, outp;
|
|
struct mtop op;
|
|
|
|
if (argc <=1 || argc > 3) {
|
|
fprintf(stderr, "Usage: tcopy src [dest]\n");
|
|
exit(1);
|
|
}
|
|
inf = argv[1];
|
|
if (argc == 3) {
|
|
outf = argv[2];
|
|
copy = 1;
|
|
}
|
|
if ((inp=open(inf, O_RDONLY, 0666)) < 0) {
|
|
fprintf(stderr,"Can't open %s\n", inf);
|
|
exit(1);
|
|
}
|
|
if (copy) {
|
|
if ((outp=open(outf, O_WRONLY, 0666)) < 0) {
|
|
fprintf(stderr,"Can't open %s\n", outf);
|
|
exit(3);
|
|
}
|
|
}
|
|
if (signal(SIGINT, SIG_IGN) != SIG_IGN)
|
|
(void) signal(SIGINT, RUBOUT);
|
|
ln = -2;
|
|
for (;;) {
|
|
count++;
|
|
n = read(inp, buff, SIZE);
|
|
if (n > 0) {
|
|
if (copy) {
|
|
nw = write(outp, buff, n);
|
|
if (nw != n) {
|
|
fprintf(stderr, "write (%d) != read (%d)\n",
|
|
nw, n);
|
|
fprintf(stderr, "COPY Aborted\n");
|
|
exit(5);
|
|
}
|
|
}
|
|
size += n;
|
|
if (n != ln) {
|
|
if (ln > 0)
|
|
if (count - lcount > 1)
|
|
printf("file %d: records %ld to %ld: size %d\n",
|
|
filen, lcount, count-1, ln);
|
|
else
|
|
printf("file %d: record %ld: size %d\n",
|
|
filen, lcount, ln);
|
|
ln = n;
|
|
lcount = count;
|
|
}
|
|
}
|
|
else {
|
|
if (ln <= 0 && ln != -2) {
|
|
printf("eot\n");
|
|
break;
|
|
}
|
|
if (ln > 0)
|
|
if (count - lcount > 1)
|
|
printf("file %d: records %ld to %ld: size %d\n",
|
|
filen, lcount, count-1, ln);
|
|
else
|
|
printf("file %d: record %ld: size %d\n",
|
|
filen, lcount, ln);
|
|
printf("file %d: eof after %ld records: %ld bytes\n",
|
|
filen, count-1, size);
|
|
if (copy) {
|
|
op.mt_op = MTWEOF;
|
|
op.mt_count = (daddr_t)1;
|
|
if(ioctl(outp, MTIOCTOP, (char *)&op) < 0) {
|
|
perror("Write EOF");
|
|
exit(6);
|
|
}
|
|
}
|
|
filen++;
|
|
count = 0;
|
|
lcount = 0;
|
|
tsize += size;
|
|
size = 0;
|
|
if (nfile && filen > nfile)
|
|
break;
|
|
ln = n;
|
|
}
|
|
}
|
|
if (copy)
|
|
(void) close(outp);
|
|
printf("total length: %ld bytes\n", tsize);
|
|
exit(0);
|
|
/* NOTREACHED */
|
|
}
|
|
|
|
void
|
|
RUBOUT()
|
|
{
|
|
if (count > lcount)
|
|
--count;
|
|
if (count)
|
|
if (count > lcount)
|
|
printf("file %d: records %ld to %ld: size %d\n",
|
|
filen, lcount, count, ln);
|
|
else
|
|
printf("file %d: record %ld: size %d\n",
|
|
filen, lcount, ln);
|
|
printf("interrupted at file %d: record %ld\n", filen, count);
|
|
printf("total length: %ld bytes\n", tsize+size);
|
|
exit(1);
|
|
}
|