diff options
Diffstat (limited to 'usr.bin/mt/mt.c')
| -rw-r--r-- | usr.bin/mt/mt.c | 274 |
1 files changed, 274 insertions, 0 deletions
diff --git a/usr.bin/mt/mt.c b/usr.bin/mt/mt.c new file mode 100644 index 0000000..396fa81 --- /dev/null +++ b/usr.bin/mt/mt.c @@ -0,0 +1,274 @@ +/* + * Copyright (c) 1980, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + */ + +#ifndef lint +static char copyright[] = +"@(#) Copyright (c) 1980, 1993\n\ + The Regents of the University of California. All rights reserved.\n"; +#endif /* not lint */ + +#ifndef lint +static char sccsid[] = "@(#)mt.c 8.1 (Berkeley) 6/6/93"; +#endif /* not lint */ + +/* + * mt -- + * magnetic tape manipulation program + */ +#include <sys/types.h> +#include <sys/ioctl.h> +#include <sys/mtio.h> +#include <fcntl.h> +#include <errno.h> +#include <stdlib.h> +#include <stdio.h> +#include <ctype.h> +#include <string.h> + +struct commands { + char *c_name; + int c_code; + int c_ronly; +} com[] = { + { "bsf", MTBSF, 1 }, + { "bsr", MTBSR, 1 }, + { "eof", MTWEOF, 0 }, + { "fsf", MTFSF, 1 }, + { "fsr", MTFSR, 1 }, + { "offline", MTOFFL, 1 }, + { "rewind", MTREW, 1 }, + { "rewoffl", MTOFFL, 1 }, + { "status", MTNOP, 1 }, + { "weof", MTWEOF, 0 }, + { NULL } +}; + +void err __P((const char *, ...)); +void printreg __P((char *, u_int, char *)); +void status __P((struct mtget *)); +void usage __P((void)); + +int +main(argc, argv) + int argc; + char *argv[]; +{ + register struct commands *comp; + struct mtget mt_status; + struct mtop mt_com; + int ch, len, mtfd; + char *p, *tape; + + if ((tape = getenv("TAPE")) == NULL) + tape = DEFTAPE; + + while ((ch = getopt(argc, argv, "f:t:")) != EOF) + switch(ch) { + case 'f': + case 't': + tape = optarg; + break; + case '?': + default: + usage(); + } + argc -= optind; + argv += optind; + + if (argc < 1 || argc > 2) + usage(); + + len = strlen(p = *argv++); + for (comp = com;; comp++) { + if (comp->c_name == NULL) + err("%s: unknown command", p); + if (strncmp(p, comp->c_name, len) == 0) + break; + } + if ((mtfd = open(tape, comp->c_ronly ? O_RDONLY : O_RDWR)) < 0) + err("%s: %s", tape, strerror(errno)); + if (comp->c_code != MTNOP) { + mt_com.mt_op = comp->c_code; + if (*argv) { + mt_com.mt_count = strtol(*argv, &p, 10); + if (mt_com.mt_count <= 0 || *p) + err("%s: illegal count", *argv); + } + else + mt_com.mt_count = 1; + if (ioctl(mtfd, MTIOCTOP, &mt_com) < 0) + err("%s: %s: %s", tape, comp->c_name, strerror(errno)); + } else { + if (ioctl(mtfd, MTIOCGET, &mt_status) < 0) + err("%s", strerror(errno)); + status(&mt_status); + } + exit (0); + /* NOTREACHED */ +} + +#ifdef vax +#include <vax/mba/mtreg.h> +#include <vax/mba/htreg.h> + +#include <vax/uba/utreg.h> +#include <vax/uba/tmreg.h> +#undef b_repcnt /* argh */ +#include <vax/uba/tsreg.h> +#endif + +#ifdef sun +#include <sundev/tmreg.h> +#include <sundev/arreg.h> +#endif + +#ifdef tahoe +#include <tahoe/vba/cyreg.h> +#endif + +struct tape_desc { + short t_type; /* type of magtape device */ + char *t_name; /* printing name */ + char *t_dsbits; /* "drive status" register */ + char *t_erbits; /* "error" register */ +} tapes[] = { +#ifdef vax + { MT_ISTS, "ts11", 0, TSXS0_BITS }, + { MT_ISHT, "tm03", HTDS_BITS, HTER_BITS }, + { MT_ISTM, "tm11", 0, TMER_BITS }, + { MT_ISMT, "tu78", MTDS_BITS, 0 }, + { MT_ISUT, "tu45", UTDS_BITS, UTER_BITS }, +#endif +#ifdef sun + { MT_ISCPC, "TapeMaster", TMS_BITS, 0 }, + { MT_ISAR, "Archive", ARCH_CTRL_BITS, ARCH_BITS }, +#endif +#ifdef tahoe + { MT_ISCY, "cipher", CYS_BITS, CYCW_BITS }, +#endif + { 0 } +}; + +/* + * Interpret the status buffer returned + */ +void +status(bp) + register struct mtget *bp; +{ + register struct tape_desc *mt; + + for (mt = tapes;; mt++) { + if (mt->t_type == 0) { + (void)printf("%d: unknown tape drive type\n", + bp->mt_type); + return; + } + if (mt->t_type == bp->mt_type) + break; + } + (void)printf("%s tape drive, residual=%d\n", mt->t_name, bp->mt_resid); + printreg("ds", bp->mt_dsreg, mt->t_dsbits); + printreg("\ner", bp->mt_erreg, mt->t_erbits); + (void)putchar('\n'); +} + +/* + * Print a register a la the %b format of the kernel's printf. + */ +void +printreg(s, v, bits) + char *s; + register u_int v; + register char *bits; +{ + register int i, any = 0; + register char c; + + if (bits && *bits == 8) + printf("%s=%o", s, v); + else + printf("%s=%x", s, v); + bits++; + if (v && bits) { + putchar('<'); + while (i = *bits++) { + if (v & (1 << (i-1))) { + if (any) + putchar(','); + any = 1; + for (; (c = *bits) > 32; bits++) + putchar(c); + } else + for (; *bits > 32; bits++) + ; + } + putchar('>'); + } +} + +void +usage() +{ + (void)fprintf(stderr, "usage: mt [-f device] command [ count ]\n"); + exit(1); +} + +#if __STDC__ +#include <stdarg.h> +#else +#include <varargs.h> +#endif + +void +#if __STDC__ +err(const char *fmt, ...) +#else +err(fmt, va_alist) + char *fmt; + va_dcl +#endif +{ + va_list ap; +#if __STDC__ + va_start(ap, fmt); +#else + va_start(ap); +#endif + (void)fprintf(stderr, "mt: "); + (void)vfprintf(stderr, fmt, ap); + va_end(ap); + (void)fprintf(stderr, "\n"); + exit(1); + /* NOTREACHED */ +} |
