18a16b7a1SPedro F. Giffuni /*-
28a16b7a1SPedro F. Giffuni * SPDX-License-Identifier: BSD-3-Clause
38a16b7a1SPedro F. Giffuni *
4dea673e9SRodney W. Grimes * Copyright (c) 1983, 1993
5dea673e9SRodney W. Grimes * The Regents of the University of California. All rights reserved.
6dea673e9SRodney W. Grimes *
7dea673e9SRodney W. Grimes * Redistribution and use in source and binary forms, with or without
8dea673e9SRodney W. Grimes * modification, are permitted provided that the following conditions
9dea673e9SRodney W. Grimes * are met:
10dea673e9SRodney W. Grimes * 1. Redistributions of source code must retain the above copyright
11dea673e9SRodney W. Grimes * notice, this list of conditions and the following disclaimer.
12dea673e9SRodney W. Grimes * 2. Redistributions in binary form must reproduce the above copyright
13dea673e9SRodney W. Grimes * notice, this list of conditions and the following disclaimer in the
14dea673e9SRodney W. Grimes * documentation and/or other materials provided with the distribution.
15fbbd9655SWarner Losh * 3. Neither the name of the University nor the names of its contributors
16dea673e9SRodney W. Grimes * may be used to endorse or promote products derived from this software
17dea673e9SRodney W. Grimes * without specific prior written permission.
18dea673e9SRodney W. Grimes *
19dea673e9SRodney W. Grimes * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20dea673e9SRodney W. Grimes * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21dea673e9SRodney W. Grimes * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22dea673e9SRodney W. Grimes * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23dea673e9SRodney W. Grimes * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24dea673e9SRodney W. Grimes * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25dea673e9SRodney W. Grimes * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26dea673e9SRodney W. Grimes * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27dea673e9SRodney W. Grimes * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28dea673e9SRodney W. Grimes * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29dea673e9SRodney W. Grimes * SUCH DAMAGE.
30dea673e9SRodney W. Grimes */
31dea673e9SRodney W. Grimes
32dea673e9SRodney W. Grimes /*
33dea673e9SRodney W. Grimes * rmt
34dea673e9SRodney W. Grimes */
35dea673e9SRodney W. Grimes #include <sys/types.h>
36dea673e9SRodney W. Grimes #include <sys/socket.h>
37dea673e9SRodney W. Grimes #include <sys/mtio.h>
38dea673e9SRodney W. Grimes #include <errno.h>
39dea673e9SRodney W. Grimes #include <fcntl.h>
40dea673e9SRodney W. Grimes #include <stdio.h>
41dea673e9SRodney W. Grimes #include <stdlib.h>
42dea673e9SRodney W. Grimes #include <string.h>
43dea673e9SRodney W. Grimes #include <unistd.h>
44dea673e9SRodney W. Grimes
450aa42e81SEd Schouten static int tape = -1;
46dea673e9SRodney W. Grimes
470aa42e81SEd Schouten static char *record;
480aa42e81SEd Schouten static int maxrecsize = -1;
49dea673e9SRodney W. Grimes
50dea673e9SRodney W. Grimes #define SSIZE 64
510aa42e81SEd Schouten static char device[SSIZE];
520aa42e81SEd Schouten static char count[SSIZE], mode[SSIZE], pos[SSIZE], op[SSIZE];
53dea673e9SRodney W. Grimes
540aa42e81SEd Schouten static char resp[BUFSIZ];
55dea673e9SRodney W. Grimes
560aa42e81SEd Schouten static FILE *debug;
57dea673e9SRodney W. Grimes #define DEBUG(f) if (debug) fprintf(debug, f)
58dea673e9SRodney W. Grimes #define DEBUG1(f,a) if (debug) fprintf(debug, f, a)
59dea673e9SRodney W. Grimes #define DEBUG2(f,a1,a2) if (debug) fprintf(debug, f, a1, a2)
60dea673e9SRodney W. Grimes
610aa42e81SEd Schouten static char *checkbuf(char *, int);
620aa42e81SEd Schouten static void error(int);
630aa42e81SEd Schouten static void getstring(char *);
64dea673e9SRodney W. Grimes
65dea673e9SRodney W. Grimes int
main(int argc,char ** argv)66d8c96595SAlfred Perlstein main(int argc, char **argv)
67dea673e9SRodney W. Grimes {
68dea673e9SRodney W. Grimes int rval;
69dea673e9SRodney W. Grimes char c;
70dea673e9SRodney W. Grimes int n, i, cc;
71dea673e9SRodney W. Grimes
72dea673e9SRodney W. Grimes argc--, argv++;
73dea673e9SRodney W. Grimes if (argc > 0) {
74dea673e9SRodney W. Grimes debug = fopen(*argv, "w");
75fa02fc2dSMarcelo Araujo if (debug == NULL) {
76fa02fc2dSMarcelo Araujo DEBUG1("rmtd: error to open %s\n", *argv);
77dea673e9SRodney W. Grimes exit(1);
78fa02fc2dSMarcelo Araujo }
79dea673e9SRodney W. Grimes (void)setbuf(debug, (char *)0);
80dea673e9SRodney W. Grimes }
81dea673e9SRodney W. Grimes top:
82dea673e9SRodney W. Grimes errno = 0;
83dea673e9SRodney W. Grimes rval = 0;
84e1b4d8d0SSheldon Hearn if (read(STDIN_FILENO, &c, 1) != 1)
85dea673e9SRodney W. Grimes exit(0);
86dea673e9SRodney W. Grimes switch (c) {
87dea673e9SRodney W. Grimes
88dea673e9SRodney W. Grimes case 'O':
89dea673e9SRodney W. Grimes if (tape >= 0)
90dea673e9SRodney W. Grimes (void) close(tape);
91dea673e9SRodney W. Grimes getstring(device);
92dea673e9SRodney W. Grimes getstring(mode);
93dea673e9SRodney W. Grimes DEBUG2("rmtd: O %s %s\n", device, mode);
94a3e02639SJoerg Wunsch /*
95a3e02639SJoerg Wunsch * XXX the rmt protocol does not provide a means to
96a3e02639SJoerg Wunsch * specify the permission bits; allow rw for everyone,
97a3e02639SJoerg Wunsch * as modified by the users umask
98a3e02639SJoerg Wunsch */
99a3e02639SJoerg Wunsch tape = open(device, atoi(mode), 0666);
100dea673e9SRodney W. Grimes if (tape < 0)
101dea673e9SRodney W. Grimes goto ioerror;
102dea673e9SRodney W. Grimes goto respond;
103dea673e9SRodney W. Grimes
104dea673e9SRodney W. Grimes case 'C':
105dea673e9SRodney W. Grimes DEBUG("rmtd: C\n");
106dea673e9SRodney W. Grimes getstring(device); /* discard */
107dea673e9SRodney W. Grimes if (close(tape) < 0)
108dea673e9SRodney W. Grimes goto ioerror;
109dea673e9SRodney W. Grimes tape = -1;
110dea673e9SRodney W. Grimes goto respond;
111dea673e9SRodney W. Grimes
112dea673e9SRodney W. Grimes case 'L':
113dea673e9SRodney W. Grimes getstring(count);
114dea673e9SRodney W. Grimes getstring(pos);
115dea673e9SRodney W. Grimes DEBUG2("rmtd: L %s %s\n", count, pos);
1165d078bb3SAndrey A. Chernov rval = lseek(tape, (off_t)strtoll(count, NULL, 10), atoi(pos));
117dea673e9SRodney W. Grimes if (rval < 0)
118dea673e9SRodney W. Grimes goto ioerror;
119dea673e9SRodney W. Grimes goto respond;
120dea673e9SRodney W. Grimes
121dea673e9SRodney W. Grimes case 'W':
122dea673e9SRodney W. Grimes getstring(count);
123dea673e9SRodney W. Grimes n = atoi(count);
124dea673e9SRodney W. Grimes DEBUG1("rmtd: W %s\n", count);
125dea673e9SRodney W. Grimes record = checkbuf(record, n);
126dea673e9SRodney W. Grimes for (i = 0; i < n; i += cc) {
127e1b4d8d0SSheldon Hearn cc = read(STDIN_FILENO, &record[i], n - i);
128dea673e9SRodney W. Grimes if (cc <= 0) {
129dea673e9SRodney W. Grimes DEBUG("rmtd: premature eof\n");
130dea673e9SRodney W. Grimes exit(2);
131dea673e9SRodney W. Grimes }
132dea673e9SRodney W. Grimes }
133dea673e9SRodney W. Grimes rval = write(tape, record, n);
134dea673e9SRodney W. Grimes if (rval < 0)
135dea673e9SRodney W. Grimes goto ioerror;
136dea673e9SRodney W. Grimes goto respond;
137dea673e9SRodney W. Grimes
138dea673e9SRodney W. Grimes case 'R':
139dea673e9SRodney W. Grimes getstring(count);
140dea673e9SRodney W. Grimes DEBUG1("rmtd: R %s\n", count);
141dea673e9SRodney W. Grimes n = atoi(count);
142dea673e9SRodney W. Grimes record = checkbuf(record, n);
143dea673e9SRodney W. Grimes rval = read(tape, record, n);
144dea673e9SRodney W. Grimes if (rval < 0)
145dea673e9SRodney W. Grimes goto ioerror;
146dea673e9SRodney W. Grimes (void)sprintf(resp, "A%d\n", rval);
147e1b4d8d0SSheldon Hearn (void)write(STDOUT_FILENO, resp, strlen(resp));
148e1b4d8d0SSheldon Hearn (void)write(STDOUT_FILENO, record, rval);
149dea673e9SRodney W. Grimes goto top;
150dea673e9SRodney W. Grimes
151dea673e9SRodney W. Grimes case 'I':
152dea673e9SRodney W. Grimes getstring(op);
153dea673e9SRodney W. Grimes getstring(count);
154dea673e9SRodney W. Grimes DEBUG2("rmtd: I %s %s\n", op, count);
155dea673e9SRodney W. Grimes { struct mtop mtop;
156dea673e9SRodney W. Grimes mtop.mt_op = atoi(op);
157dea673e9SRodney W. Grimes mtop.mt_count = atoi(count);
158dea673e9SRodney W. Grimes if (ioctl(tape, MTIOCTOP, (char *)&mtop) < 0)
159dea673e9SRodney W. Grimes goto ioerror;
160dea673e9SRodney W. Grimes rval = mtop.mt_count;
161dea673e9SRodney W. Grimes }
162dea673e9SRodney W. Grimes goto respond;
163dea673e9SRodney W. Grimes
164dea673e9SRodney W. Grimes case 'S': /* status */
165dea673e9SRodney W. Grimes DEBUG("rmtd: S\n");
166dea673e9SRodney W. Grimes { struct mtget mtget;
167dea673e9SRodney W. Grimes if (ioctl(tape, MTIOCGET, (char *)&mtget) < 0)
168dea673e9SRodney W. Grimes goto ioerror;
169dea673e9SRodney W. Grimes rval = sizeof (mtget);
170f08566c3SMatt Jacob if (rval > 24) /* original mtget structure size */
171f08566c3SMatt Jacob rval = 24;
172dea673e9SRodney W. Grimes (void)sprintf(resp, "A%d\n", rval);
173e1b4d8d0SSheldon Hearn (void)write(STDOUT_FILENO, resp, strlen(resp));
174e1b4d8d0SSheldon Hearn (void)write(STDOUT_FILENO, (char *)&mtget, rval);
175dea673e9SRodney W. Grimes goto top;
176dea673e9SRodney W. Grimes }
177dea673e9SRodney W. Grimes
178eeda31acSJustin T. Gibbs case 'V': /* version */
179eeda31acSJustin T. Gibbs getstring(op);
180eeda31acSJustin T. Gibbs DEBUG1("rmtd: V %s\n", op);
181eeda31acSJustin T. Gibbs rval = 2;
182eeda31acSJustin T. Gibbs goto respond;
183eeda31acSJustin T. Gibbs
184dea673e9SRodney W. Grimes default:
185dea673e9SRodney W. Grimes DEBUG1("rmtd: garbage command %c\n", c);
186dea673e9SRodney W. Grimes exit(3);
187dea673e9SRodney W. Grimes }
188dea673e9SRodney W. Grimes respond:
189dea673e9SRodney W. Grimes DEBUG1("rmtd: A %d\n", rval);
190dea673e9SRodney W. Grimes (void)sprintf(resp, "A%d\n", rval);
191e1b4d8d0SSheldon Hearn (void)write(STDOUT_FILENO, resp, strlen(resp));
192dea673e9SRodney W. Grimes goto top;
193dea673e9SRodney W. Grimes ioerror:
194dea673e9SRodney W. Grimes error(errno);
195dea673e9SRodney W. Grimes goto top;
196dea673e9SRodney W. Grimes }
197dea673e9SRodney W. Grimes
198dea673e9SRodney W. Grimes void
getstring(char * bp)1999a958de5SEd Schouten getstring(char *bp)
200dea673e9SRodney W. Grimes {
201dea673e9SRodney W. Grimes int i;
202dea673e9SRodney W. Grimes char *cp = bp;
203dea673e9SRodney W. Grimes
204dea673e9SRodney W. Grimes for (i = 0; i < SSIZE; i++) {
205e1b4d8d0SSheldon Hearn if (read(STDIN_FILENO, cp+i, 1) != 1)
206dea673e9SRodney W. Grimes exit(0);
207dea673e9SRodney W. Grimes if (cp[i] == '\n')
208dea673e9SRodney W. Grimes break;
209dea673e9SRodney W. Grimes }
210dea673e9SRodney W. Grimes cp[i] = '\0';
211dea673e9SRodney W. Grimes }
212dea673e9SRodney W. Grimes
2130aa42e81SEd Schouten static char *
checkbuf(char * rec,int size)2149a958de5SEd Schouten checkbuf(char *rec, int size)
215dea673e9SRodney W. Grimes {
216dea673e9SRodney W. Grimes
217dea673e9SRodney W. Grimes if (size <= maxrecsize)
218d8c96595SAlfred Perlstein return (rec);
219fa02fc2dSMarcelo Araujo if (rec != NULL)
220d8c96595SAlfred Perlstein free(rec);
221d8c96595SAlfred Perlstein rec = malloc(size);
222fa02fc2dSMarcelo Araujo if (rec == NULL) {
223dea673e9SRodney W. Grimes DEBUG("rmtd: cannot allocate buffer space\n");
224dea673e9SRodney W. Grimes exit(4);
225dea673e9SRodney W. Grimes }
226dea673e9SRodney W. Grimes maxrecsize = size;
227dea673e9SRodney W. Grimes while (size > 1024 &&
228dea673e9SRodney W. Grimes setsockopt(0, SOL_SOCKET, SO_RCVBUF, &size, sizeof (size)) < 0)
229dea673e9SRodney W. Grimes size -= 1024;
230d8c96595SAlfred Perlstein return (rec);
231dea673e9SRodney W. Grimes }
232dea673e9SRodney W. Grimes
2330aa42e81SEd Schouten static void
error(int num)2349a958de5SEd Schouten error(int num)
235dea673e9SRodney W. Grimes {
236dea673e9SRodney W. Grimes
237dea673e9SRodney W. Grimes DEBUG2("rmtd: E %d (%s)\n", num, strerror(num));
238c50189d7SWarner Losh (void)snprintf(resp, sizeof(resp), "E%d\n%s\n", num, strerror(num));
239e1b4d8d0SSheldon Hearn (void)write(STDOUT_FILENO, resp, strlen(resp));
240dea673e9SRodney W. Grimes }
241