* Ported to Linux's Second Extended File System as part of the
* dump and restore backup suit
* Remy Card <card@Linux.EU.Org>, 1994-1997
- * Stelian Pop <pop@cybercable.fr>, 1999-2000
- * Stelian Pop <pop@cybercable.fr> - Alcôve <www.alcove.fr>, 2000
+ * Stelian Pop <stelian@popies.net>, 1999-2000
+ * Stelian Pop <stelian@popies.net> - Alcôve <www.alcove.com>, 2000-2002
*/
/*
#ifndef lint
static const char rcsid[] =
- "$Id: rmt.c,v 1.10 2000/11/10 14:51:42 stelian Exp $";
+ "$Id: rmt.c,v 1.16 2002/01/16 09:32:14 stelian Exp $";
#endif /* not linux */
/*
* rmt
*/
+#include <config.h>
+#include <compatlfs.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <sys/mtio.h>
#define DEBUG1(f,a) if (debug) fprintf(debug, f, a)
#define DEBUG2(f,a1,a2) if (debug) fprintf(debug, f, a1, a2)
+/*
+ * Support for Sun's extended RMT protocol
+ */
+#define RMTI_VERSION -1
+#define RMT_VERSION 1
+
+/* Extended 'i' commands */
+#define RMTI_CACHE 0
+#define RMTI_NOCACHE 1
+#define RMTI_RETEN 2
+#define RMTI_ERASE 3
+#define RMTI_EOM 4
+#define RMTI_NBSF 5
+
+/* Extended 's' comands */
+#define MTS_TYPE 'T'
+#define MTS_DSREG 'D'
+#define MTS_ERREG 'E'
+#define MTS_RESID 'R'
+#define MTS_FILENO 'F'
+#define MTS_BLKNO 'B'
+#define MTS_FLAGS 'f'
+#define MTS_BF 'b'
+
char *checkbuf __P((char *, int));
void error __P((int));
void getstring __P((char *));
int rval = 0;
char c;
int n, i, cc;
+ unsigned long block = 0;
argc--, argv++;
if (argc > 0) {
* specify the permission bits; allow rw for everyone,
* as modified by the users umask
*/
- tape = open(device, atoi(filemode), 0666);
+ tape = OPEN(device, atoi(filemode), 0666);
if (tape < 0)
goto ioerror;
+ block = 0;
goto respond;
case 'C':
- DEBUG("rmtd: C\n");
+ DEBUG1("rmtd: C (%lu blocks)\n", block);
getstring(device); /* discard */
if (close(tape) < 0)
goto ioerror;
tape = -1;
+ block = 0;
goto respond;
case 'L':
getstring(count);
getstring(pos);
DEBUG2("rmtd: L %s %s\n", count, pos);
- rval = lseek(tape, (off_t)atol(count), atoi(pos));
+ rval = LSEEK(tape, (off_t)atol(count), atoi(pos));
if (rval < 0)
goto ioerror;
goto respond;
case 'W':
getstring(count);
n = atoi(count);
- DEBUG1("rmtd: W %s\n", count);
+ DEBUG2("rmtd: W %s (block = %lu)\n", count, block);
record = checkbuf(record, n);
for (i = 0; i < n; i += cc) {
cc = read(0, &record[i], n - i);
rval = write(tape, record, n);
if (rval < 0)
goto ioerror;
+ block += n >> 10;
goto respond;
case 'R':
getstring(count);
- DEBUG1("rmtd: R %s\n", count);
+ DEBUG2("rmtd: R %s (block %lu)\n", count, block);
n = atoi(count);
record = checkbuf(record, n);
rval = read(tape, record, n);
(void)sprintf(resp, "A%d\n", rval);
(void)write(1, resp, strlen(resp));
(void)write(1, record, rval);
+ block += n >> 10;
goto top;
case 'I':
getstring(op);
getstring(count);
DEBUG2("rmtd: I %s %s\n", op, count);
- { struct mtop mtop;
+ if (atoi(op) == RMTI_VERSION) {
+ rval = RMT_VERSION;
+ } else {
+ struct mtop mtop;
mtop.mt_op = atoi(op);
mtop.mt_count = atoi(count);
if (ioctl(tape, MTIOCTOP, (char *)&mtop) < 0)
}
goto respond;
+ case 'i':
+ { struct mtop mtop;
+
+ getstring (op);
+ getstring (count);
+ DEBUG2 ("rmtd: i %s %s\n", op, count);
+ switch (atoi(op)) {
+#ifdef MTCACHE
+ case RMTI_CACHE:
+ mtop.mt_op = MTCACHE;
+ break;
+#endif
+#ifdef MTNOCACHE
+ case RMTI_NOCACHE:
+ mtop.mt_op = MTNOCACHE;
+ break;
+#endif
+#ifdef MTRETEN
+ case RMTI_RETEN:
+ mtop.mt_op = MTRETEN;
+ break;
+#endif
+#ifdef MTERASE
+ case RMTI_ERASE:
+ mtop.mt_op = MTERASE;
+ break;
+#endif
+#ifdef MTEOM
+ case RMTI_EOM:
+ mtop.mt_op = MTEOM;
+ break;
+#endif
+#ifdef MTNBSF
+ case RMTI_NBSF:
+ mtop.mt_op = MTNBSF;
+ break;
+#endif
+ default:
+ errno = EINVAL;
+ goto ioerror;
+ }
+ mtop.mt_count = atoi (count);
+ if (ioctl (tape, MTIOCTOP, (char *) &mtop) < 0)
+ goto ioerror;
+
+ rval = mtop.mt_count;
+
+ goto respond;
+ }
+
case 'S': /* status */
DEBUG("rmtd: S\n");
{ struct mtget mtget;
goto top;
}
+ case 's':
+ { char s;
+ struct mtget mtget;
+
+ if (read (0, &s, 1) != 1)
+ goto top;
+
+ if (ioctl (tape, MTIOCGET, (char *) &mtget) < 0)
+ goto ioerror;
+
+ switch (s) {
+ case MTS_TYPE:
+ rval = mtget.mt_type;
+ break;
+ case MTS_DSREG:
+ rval = mtget.mt_dsreg;
+ break;
+ case MTS_ERREG:
+ rval = mtget.mt_erreg;
+ break;
+ case MTS_RESID:
+ rval = mtget.mt_resid;
+ break;
+ case MTS_FILENO:
+ rval = mtget.mt_fileno;
+ break;
+ case MTS_BLKNO:
+ rval = mtget.mt_blkno;
+ break;
+ case MTS_FLAGS:
+ rval = mtget.mt_gstat;
+ break;
+ case MTS_BF:
+ rval = 0;
+ break;
+ default:
+ errno = EINVAL;
+ goto ioerror;
+ }
+
+ goto respond;
+ }
+
case 'V': /* version */
getstring(op);
DEBUG1("rmtd: V %s\n", op);