2 * SPDX-License-Identifier: BSD-3-Clause
4 * Copyright (c) 1985, 1987, 1993
5 * The Regents of the University of California. All rights reserved.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 #include <sys/cdefs.h>
34 __FBSDID("$FreeBSD$");
37 static const char copyright[] =
38 "@(#) Copyright (c) 1985, 1987, 1993\n\
39 The Regents of the University of California. All rights reserved.\n";
43 static const char sccsid[] = "@(#)tcopy.c 8.2 (Berkeley) 4/17/94";
46 #include <sys/types.h>
48 #include <sys/ioctl.h>
62 #define MAXREC (64 * 1024)
65 static int filen, guesslen, maxblk = MAXREC;
66 static uint64_t lastrec, record, size, tsize;
69 static void *getspace(int);
70 static void intr(int);
71 static void usage(void) __dead2;
72 static void verify(int, int, char *);
73 static void writeop(int, int);
74 static void rewind_tape(int);
77 main(int argc, char *argv[])
79 int lastnread, nread, nw, inp, outp;
80 enum {READ, VERIFY, COPY, COPYVERIFY} op = READ;
89 while ((ch = getopt(argc, argv, "cs:vx")) != -1)
95 maxblk = atoi(optarg);
97 warnx("illegal block size");
130 if ((outp = open(argv[1], op == VERIFY ? O_RDONLY :
131 op == COPY ? O_WRONLY : O_RDWR, DEFFILEMODE)) < 0)
132 err(3, "%s", argv[1]);
138 if ((inp = open(inf, O_RDONLY, 0)) < 0)
141 buff = getspace(maxblk);
144 verify(inp, outp, buff);
148 if ((oldsig = signal(SIGINT, SIG_IGN)) != SIG_IGN)
149 (void) signal(SIGINT, intr);
152 for (lastnread = NOCOUNT;;) {
153 if ((nread = read(inp, buff, maxblk)) == -1) {
154 while (errno == EINVAL && (maxblk -= 1024)) {
155 nread = read(inp, buff, maxblk);
159 err(1, "read error, file %d, record %ju", filen, (intmax_t)record);
160 } else if (nread != lastnread) {
161 if (lastnread != 0 && lastnread != NOCOUNT) {
162 if (lastrec == 0 && nread == 0)
163 fprintf(msg, "%ju records\n", (intmax_t)record);
164 else if (record - lastrec > 1)
165 fprintf(msg, "records %ju to %ju\n",
166 (intmax_t)lastrec, (intmax_t)record);
168 fprintf(msg, "record %ju\n", (intmax_t)lastrec);
171 fprintf(msg, "file %d: block size %d: ",
173 (void) fflush(stdout);
178 if (op == COPY || op == COPYVERIFY) {
180 writeop(outp, MTWEOF);
183 nw = write(outp, buff, nread);
186 warn("write error, file %d, record %ju", filen,
189 warnx("write error, file %d, record %ju", filen,
191 warnx("write (%d) != read (%d)", nw, nread);
193 errx(5, "copy aborted");
199 if (lastnread <= 0 && lastnread != NOCOUNT) {
200 fprintf(msg, "eot\n");
204 "file %d: eof after %ju records: %ju bytes\n",
205 filen, (intmax_t)record, (intmax_t)size);
209 size = record = lastrec = 0;
214 fprintf(msg, "total length: %ju bytes\n", (intmax_t)tsize);
215 (void)signal(SIGINT, oldsig);
216 if (op == COPY || op == COPYVERIFY) {
217 writeop(outp, MTWEOF);
218 writeop(outp, MTWEOF);
219 if (op == COPYVERIFY) {
222 verify(inp, outp, buff);
229 verify(int inp, int outp, char *outb)
231 int eot, inmaxblk, inn, outmaxblk, outn;
234 inb = getspace(maxblk);
235 inmaxblk = outmaxblk = maxblk;
236 for (eot = 0;; guesslen = 0) {
237 if ((inn = read(inp, inb, inmaxblk)) == -1) {
239 while (errno == EINVAL && (inmaxblk -= 1024)) {
240 inn = read(inp, inb, inmaxblk);
247 r1: if ((outn = read(outp, outb, outmaxblk)) == -1) {
249 while (errno == EINVAL && (outmaxblk -= 1024)) {
250 outn = read(outp, outb, outmaxblk);
257 r2: if (inn != outn) {
259 "%s: tapes have different block sizes; %d != %d.\n",
265 fprintf(msg, "tcopy: tapes are identical.\n");
270 if (bcmp(inb, outb, inn)) {
272 "tcopy: tapes have different data.\n");
282 intr(int signo __unused)
285 if (record - lastrec > 1)
286 fprintf(msg, "records %ju to %ju\n", (intmax_t)lastrec, (intmax_t)record);
288 fprintf(msg, "record %ju\n", (intmax_t)lastrec);
290 fprintf(msg, "interrupt at file %d: record %ju\n", filen, (intmax_t)record);
291 fprintf(msg, "total length: %ju bytes\n", (uintmax_t)(tsize + size));
300 if ((bp = malloc((size_t)blk)) == NULL)
301 errx(11, "no memory");
306 writeop(int fd, int type)
311 op.mt_count = (daddr_t)1;
312 if (ioctl(fd, MTIOCTOP, (char *)&op) < 0)
319 fprintf(stderr, "usage: tcopy [-cvx] [-s maxblk] [src [dest]]\n");
329 errx(12, "fstat in rewind");
332 * don't want to do tape ioctl on regular files:
334 if( S_ISREG(sp.st_mode) ) {
335 if( lseek(fd, 0, SEEK_SET) == -1 )
338 /* assume its a tape */