2 * Copyright (c) 1983, 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) 1983, 1993 The Regents of the University of California. All rights reserved.
30 * @(#)rmt.c 8.1 (Berkeley) 6/6/93
31 * $FreeBSD: src/usr.sbin/rmt/rmt.c,v 1.7 2000/02/12 01:14:33 mjacob Exp $
37 #include <sys/types.h>
38 #include <sys/socket.h>
54 char count
[SSIZE
], mode
[SSIZE
], pos
[SSIZE
], op
[SSIZE
];
59 #define DEBUG(f) if (debug) fprintf(debug, f)
60 #define DEBUG1(f,a) if (debug) fprintf(debug, f, a)
61 #define DEBUG2(f,a1,a2) if (debug) fprintf(debug, f, a1, a2)
63 char *checkbuf(char *, int);
65 void getstring(char *);
68 main(int argc
, char **argv
)
76 debug
= fopen(*argv
, "w");
84 if (read(0, &c
, 1) != 1)
93 DEBUG2("rmtd: O %s %s\n", device
, mode
);
95 * XXX the rmt protocol does not provide a means to
96 * specify the permission bits; allow rw for everyone,
97 * as modified by the users umask
99 tape
= open(device
, atoi(mode
), 0666);
106 getstring(device
); /* discard */
115 DEBUG2("rmtd: L %s %s\n", count
, pos
);
116 rval
= lseek(tape
, (off_t
)atol(count
), atoi(pos
));
124 DEBUG1("rmtd: W %s\n", count
);
125 record
= checkbuf(record
, n
);
126 for (i
= 0; i
< n
; i
+= cc
) {
127 cc
= read(0, &record
[i
], n
- i
);
129 DEBUG("rmtd: premature eof\n");
133 rval
= write(tape
, record
, n
);
140 DEBUG1("rmtd: R %s\n", count
);
142 record
= checkbuf(record
, n
);
143 rval
= read(tape
, record
, n
);
146 sprintf(resp
, "A%d\n", rval
);
147 write(1, resp
, strlen(resp
));
148 write(1, record
, rval
);
154 DEBUG2("rmtd: I %s %s\n", op
, count
);
156 mtop
.mt_op
= atoi(op
);
157 mtop
.mt_count
= atoi(count
);
158 if (ioctl(tape
, MTIOCTOP
, (char *)&mtop
) < 0)
160 rval
= mtop
.mt_count
;
164 case 'S': /* status */
166 { struct mtget mtget
;
167 if (ioctl(tape
, MTIOCGET
, (char *)&mtget
) < 0)
169 rval
= sizeof (mtget
);
170 if (rval
> 24) /* original mtget structure size */
172 sprintf(resp
, "A%d\n", rval
);
173 write(1, resp
, strlen(resp
));
174 write(1, (char *)&mtget
, rval
);
178 case 'V': /* version */
180 DEBUG1("rmtd: V %s\n", op
);
185 DEBUG1("rmtd: garbage command %c\n", c
);
189 DEBUG1("rmtd: A %d\n", rval
);
190 sprintf(resp
, "A%d\n", rval
);
191 write(1, resp
, strlen(resp
));
204 for (i
= 0; i
< SSIZE
; i
++) {
205 if (read(0, cp
+i
, 1) != 1)
214 checkbuf(char *record
, int size
)
217 if (size
<= maxrecsize
)
221 record
= malloc(size
);
222 if (record
== NULL
) {
223 DEBUG("rmtd: cannot allocate buffer space\n");
227 while (size
> 1024 &&
228 setsockopt(0, SOL_SOCKET
, SO_RCVBUF
, &size
, sizeof (size
)) < 0)
237 DEBUG2("rmtd: E %d (%s)\n", num
, strerror(num
));
238 snprintf(resp
, sizeof(resp
), "E%d\n%s\n", num
, strerror(num
));
239 write(1, resp
, strlen(resp
));