2 * Copyright (c) 1985, 1987, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * @(#) Copyright (c) 1985, 1987, 1993 The Regents of the University of California. All rights reserved.
30 * @(#)tcopy.c 8.2 (Berkeley) 4/17/94
31 * $FreeBSD: src/usr.bin/tcopy/tcopy.c,v 1.7.2.1 2002/11/07 17:54:42 imp Exp $
34 #include <sys/types.h>
36 #include <sys/ioctl.h>
48 #include "pathnames.h"
50 #define MAXREC (64 * 1024)
53 int filen, guesslen, maxblk = MAXREC;
54 u_int64_t lastrec, record, size, tsize;
59 static void usage(void);
60 void verify(int, int, char *);
61 void writeop(int, int);
62 void rewind_tape(int);
65 main(int argc, char **argv)
67 int lastnread, nread, nw, inp, outp;
68 enum {READ, VERIFY, COPY, COPYVERIFY} op = READ;
75 while ((ch = getopt(argc, argv, "cs:vx")) != -1)
81 maxblk = atoi(optarg);
83 warnx("illegal block size");
116 if ((outp = open(argv[1], op == VERIFY ? O_RDONLY :
117 op == COPY ? O_WRONLY : O_RDWR, DEFFILEMODE)) < 0)
118 err(3, "%s", argv[1]);
124 if ((inp = open(inf, O_RDONLY, 0)) < 0)
127 buff = getspace(maxblk);
130 verify(inp, outp, buff);
134 if ((oldsig = signal(SIGINT, SIG_IGN)) != SIG_IGN)
135 (void) signal(SIGINT, intr);
138 for (lastnread = NOCOUNT;;) {
139 if ((nread = read(inp, buff, maxblk)) == -1) {
140 while (errno == EINVAL && (maxblk -= 1024)) {
141 nread = read(inp, buff, maxblk);
145 err(1, "read error, file %d, record %ju", filen,
147 } else if (nread != lastnread) {
148 if (lastnread != 0 && lastnread != NOCOUNT) {
149 if (lastrec == 0 && nread == 0)
150 fprintf(msg, "%ju records\n",
152 else if (record - lastrec > 1)
153 fprintf(msg, "records %ju to %ju\n",
157 fprintf(msg, "record %ju\n",
161 fprintf(msg, "file %d: block size %d: ",
163 (void) fflush(stdout);
168 if (op == COPY || op == COPYVERIFY) {
170 writeop(outp, MTWEOF);
173 nw = write(outp, buff, nread);
176 warn("write error, file %d, record %ju",
177 filen, (uintmax_t)record);
179 warnx("write error, file %d, record %ju",
180 filen, (uintmax_t)record);
181 warnx("write (%d) != read (%d)", nw, nread);
183 errx(5, "copy aborted");
189 if (lastnread <= 0 && lastnread != NOCOUNT) {
190 fprintf(msg, "eot\n");
194 "file %d: eof after %ju records: %ju bytes\n",
195 filen, (uintmax_t)record, (uintmax_t)size);
199 size = record = lastrec = 0;
204 fprintf(msg, "total length: %ju bytes\n", (uintmax_t)tsize);
205 (void)signal(SIGINT, oldsig);
206 if (op == COPY || op == COPYVERIFY) {
207 writeop(outp, MTWEOF);
208 writeop(outp, MTWEOF);
209 if (op == COPYVERIFY) {
212 verify(inp, outp, buff);
219 verify(int inp, int outp, char *outb)
221 int eot, inmaxblk, inn, outmaxblk, outn;
224 inb = getspace(maxblk);
225 inmaxblk = outmaxblk = maxblk;
226 for (eot = 0;; guesslen = 0) {
227 if ((inn = read(inp, inb, inmaxblk)) == -1) {
229 while (errno == EINVAL && (inmaxblk -= 1024)) {
230 inn = read(inp, inb, inmaxblk);
237 r1: if ((outn = read(outp, outb, outmaxblk)) == -1) {
239 while (errno == EINVAL && (outmaxblk -= 1024)) {
240 outn = read(outp, outb, outmaxblk);
247 r2: if (inn != outn) {
249 "%s: tapes have different block sizes; %d != %d.\n",
255 fprintf(msg, "tcopy: tapes are identical.\n");
259 if (bcmp(inb, outb, inn)) {
261 "tcopy: tapes have different data.\n");
274 if (record - lastrec > 1)
275 fprintf(msg, "records %ju to %ju\n",
276 (uintmax_t)lastrec, (uintmax_t)record);
278 fprintf(msg, "record %ju\n", (uintmax_t)lastrec);
280 fprintf(msg, "interrupt at file %d: record %ju\n", filen,
282 fprintf(msg, "total length: %ju bytes\n", (uintmax_t)tsize + size);
291 if ((bp = malloc((size_t)blk)) == NULL)
292 errx(11, "no memory");
297 writeop(int fd, int type)
302 op.mt_count = (daddr_t)1;
303 if (ioctl(fd, MTIOCTOP, (char *)&op) < 0)
310 fprintf(stderr, "usage: tcopy [-cvx] [-s maxblk] [src [dest]]\n");
320 errx(12, "fstat in rewind");
323 * don't want to do tape ioctl on regular files:
325 if( S_ISREG(sp.st_mode) ) {
326 if( lseek(fd, 0, SEEK_SET) == -1 )
329 /* assume its a tape */