static void
st_status(struct mtget *bp)
{
printf("Mode Density Blocksize bpi "
"Compression\n"
"Current: %-17s %-12s %-7d %s\n"
"---------available modes---------\n"
"0: %-17s %-12s %-7d %s\n"
"1: %-17s %-12s %-7d %s\n"
"2: %-17s %-12s %-7d %s\n"
"3: %-17s %-12s %-7d %s\n",
denstostring(bp->mt_density), getblksiz(bp->mt_blksiz),
mt_density_bp(bp->mt_density, TRUE), comptostring(bp->mt_comp),
denstostring(bp->mt_density0), getblksiz(bp->mt_blksiz0),
mt_density_bp(bp->mt_density0, TRUE), comptostring(bp->mt_comp0),
denstostring(bp->mt_density1), getblksiz(bp->mt_blksiz1),
mt_density_bp(bp->mt_density1, TRUE), comptostring(bp->mt_comp1),
denstostring(bp->mt_density2), getblksiz(bp->mt_blksiz2),
mt_density_bp(bp->mt_density2, TRUE), comptostring(bp->mt_comp2),
denstostring(bp->mt_density3), getblksiz(bp->mt_blksiz3),
mt_density_bp(bp->mt_density3, TRUE), comptostring(bp->mt_comp3));
if (bp->mt_dsreg != MTIO_DSREG_NIL) {
const char sfmt[] = "Current Driver State: %s.\n";
printf("---------------------------------\n");
const char *state_str;
state_str = get_driver_state_str(bp->mt_dsreg);
if (state_str == NULL) {
char foo[32];
(void) sprintf(foo, "Unknown state 0x%x", bp->mt_dsreg);
printf(sfmt, foo);
} else {
printf(sfmt, state_str);
}
}
if (bp->mt_resid == 0 && bp->mt_fileno == (daddr_t) -1 &&
bp->mt_blkno == (daddr_t) -1)
return;
printf("---------------------------------\n");
printf("File Number: %d\tRecord Number: %d\tResidual Count %d\n",
bp->mt_fileno, bp->mt_blkno, bp->mt_resid);
}
void
st_status(struct mtget *bp)
{
printf("Mode Density Blocksize bpi "
"Compression\n"
"Current: %-17s %-12s %-7d %s\n"
"---------available modes---------\n"
"0: %-17s %-12s %-7d %s\n"
"1: %-17s %-12s %-7d %s\n"
"2: %-17s %-12s %-7d %s\n"
"3: %-17s %-12s %-7d %s\n",
denstostring(bp->mt_density), getblksiz(bp->mt_blksiz),
denstobp(bp->mt_density, TRUE), comptostring(bp->mt_comp),
denstostring(bp->mt_density0), getblksiz(bp->mt_blksiz0),
denstobp(bp->mt_density0, TRUE), comptostring(bp->mt_comp0),
denstostring(bp->mt_density1), getblksiz(bp->mt_blksiz1),
denstobp(bp->mt_density1, TRUE), comptostring(bp->mt_comp1),
denstostring(bp->mt_density2), getblksiz(bp->mt_blksiz2),
denstobp(bp->mt_density2, TRUE), comptostring(bp->mt_comp2),
denstostring(bp->mt_density3), getblksiz(bp->mt_blksiz3),
denstobp(bp->mt_density3, TRUE), comptostring(bp->mt_comp3));
if (bp->mt_dsreg != MTIO_DSREG_NIL) {
auto char foo[32];
const char *sfmt = "Current Driver State: %s.\n";
printf("---------------------------------\n");
switch (bp->mt_dsreg) {
case MTIO_DSREG_REST:
printf(sfmt, "at rest");
break;
case MTIO_DSREG_RBSY:
printf(sfmt, "Communicating with drive");
break;
case MTIO_DSREG_WR:
printf(sfmt, "Writing");
break;
case MTIO_DSREG_FMK:
printf(sfmt, "Writing Filemarks");
break;
case MTIO_DSREG_ZER:
printf(sfmt, "Erasing");
break;
case MTIO_DSREG_RD:
printf(sfmt, "Reading");
break;
case MTIO_DSREG_FWD:
printf(sfmt, "Spacing Forward");
break;
case MTIO_DSREG_REV:
printf(sfmt, "Spacing Reverse");
break;
case MTIO_DSREG_POS:
printf(sfmt,
"Hardware Positioning (direction unknown)");
break;
case MTIO_DSREG_REW:
printf(sfmt, "Rewinding");
break;
case MTIO_DSREG_TEN:
printf(sfmt, "Retensioning");
break;
case MTIO_DSREG_UNL:
printf(sfmt, "Unloading");
break;
case MTIO_DSREG_LD:
printf(sfmt, "Loading");
break;
default:
(void) sprintf(foo, "Unknown state 0x%x", bp->mt_dsreg);
printf(sfmt, foo);
break;
}
}
if (bp->mt_resid == 0 && bp->mt_fileno == (daddr_t) -1 &&
bp->mt_blkno == (daddr_t) -1)
return;
printf("---------------------------------\n");
printf("File Number: %u\tRecord Number: %u\tResidual Count %d\n",
bp->mt_fileno, bp->mt_blkno, bp->mt_resid);
}
int
main(int argc, char *argv[])
{
const struct commands *comp;
struct mtget mt_status;
struct mtop mt_com;
int ch, len, mtfd;
const char *p, *tape;
bzero(&mt_com, sizeof(mt_com));
if ((tape = getenv("TAPE")) == NULL)
tape = DEFTAPE;
while ((ch = getopt(argc, argv, "f:t:")) != -1)
switch(ch) {
case 'f':
case 't':
tape = optarg;
break;
case '?':
usage();
break;
default:
break;
}
argc -= optind;
argv += optind;
if (argc < 1)
usage();
len = strlen(p = *argv++);
for (comp = com;; comp++) {
if (comp->c_name == NULL)
errx(1, "%s: unknown command", p);
if (strncmp(p, comp->c_name, len) == 0)
break;
}
if((comp->c_flags & NEED_2ARGS) && argc != 2)
usage();
if(comp->c_flags & DISABLE_THIS) {
warn_eof();
}
if (comp->c_flags & USE_GETOPT) {
argc--;
optind = 0;
}
if ((mtfd = open(tape, comp->c_ronly ? O_RDONLY : O_RDWR)) < 0)
err(1, "%s", tape);
if (comp->c_code != MTNOP) {
mt_com.mt_op = comp->c_code;
if (*argv) {
if (!isdigit(**argv) &&
(comp->c_flags & IS_DENSITY)) {
const char *dcanon;
mt_com.mt_count = mt_density_num(*argv);
if (mt_com.mt_count == 0)
errx(1, "%s: unknown density", *argv);
dcanon = denstostring(mt_com.mt_count);
if (strcmp(dcanon, *argv) != 0)
printf(
"Using \"%s\" as an alias for %s\n",
*argv, dcanon);
p = "";
} else if (!isdigit(**argv) &&
(comp->c_flags & IS_COMP)) {
mt_com.mt_count = stringtocomp(*argv);
if ((u_int32_t)mt_com.mt_count == 0xf0f0f0f0)
errx(1, "%s: unknown compression",
*argv);
p = "";
} else if ((comp->c_flags & USE_GETOPT) == 0) {
char *q;
/* allow for hex numbers; useful for density */
mt_com.mt_count = strtol(*argv, &q, 0);
p = q;
}
if (((comp->c_flags & USE_GETOPT) == 0)
&& (((mt_com.mt_count <=
((comp->c_flags & ZERO_ALLOWED)? -1: 0))
&& ((comp->c_flags & IS_COMP) == 0))
|| *p))
errx(1, "%s: illegal count", *argv);
}
else
mt_com.mt_count = 1;
switch (comp->c_code) {
case MTIOCERRSTAT:
{
unsigned int i;
union mterrstat umn;
struct scsi_tape_errors *s = &umn.scsi_errstat;
if (ioctl(mtfd, comp->c_code, (caddr_t)&umn) < 0)
err(2, "%s", tape);
(void)printf("Last I/O Residual: %u\n", s->io_resid);
(void)printf(" Last I/O Command:");
for (i = 0; i < sizeof (s->io_cdb); i++)
(void)printf(" %02X", s->io_cdb[i]);
(void)printf("\n");
(void)printf(" Last I/O Sense:\n\n\t");
for (i = 0; i < sizeof (s->io_sense); i++) {
(void)printf(" %02X", s->io_sense[i]);
if (((i + 1) & 0xf) == 0) {
(void)printf("\n\t");
}
}
(void)printf("\n");
(void)printf("Last Control Residual: %u\n",
s->ctl_resid);
(void)printf(" Last Control Command:");
for (i = 0; i < sizeof (s->ctl_cdb); i++)
(void)printf(" %02X", s->ctl_cdb[i]);
(void)printf("\n");
(void)printf(" Last Control Sense:\n\n\t");
for (i = 0; i < sizeof (s->ctl_sense); i++) {
(void)printf(" %02X", s->ctl_sense[i]);
if (((i + 1) & 0xf) == 0) {
(void)printf("\n\t");
}
}
(void)printf("\n\n");
exit(0);
/* NOTREACHED */
}
case MTIOCRDHPOS:
case MTIOCRDSPOS:
{
u_int32_t block;
if (ioctl(mtfd, comp->c_code, (caddr_t)&block) < 0)
err(2, "%s", tape);
(void)printf("%s: %s block location %u\n", tape,
(comp->c_code == MTIOCRDHPOS)? "hardware" :
"logical", block);
exit(0);
/* NOTREACHED */
}
case MTIOCSLOCATE:
case MTIOCHLOCATE:
{
u_int32_t block = (u_int32_t)mt_com.mt_count;
if (ioctl(mtfd, comp->c_code, (caddr_t)&block) < 0)
err(2, "%s", tape);
exit(0);
/* NOTREACHED */
}
case MTIOCGETEOTMODEL:
{
u_int32_t om;
if (ioctl(mtfd, MTIOCGETEOTMODEL, (caddr_t)&om) < 0)
err(2, "%s", tape);
(void)printf("%s: the model is %u filemar%s at EOT\n",
tape, om, (om > 1)? "ks" : "k");
exit(0);
/* NOTREACHED */
}
case MTIOCSETEOTMODEL:
{
u_int32_t om, nm = (u_int32_t)mt_com.mt_count;
if (ioctl(mtfd, MTIOCGETEOTMODEL, (caddr_t)&om) < 0)
err(2, "%s", tape);
if (ioctl(mtfd, comp->c_code, (caddr_t)&nm) < 0)
err(2, "%s", tape);
(void)printf("%s: old model was %u filemar%s at EOT\n",
tape, om, (om > 1)? "ks" : "k");
(void)printf("%s: new model is %u filemar%s at EOT\n",
tape, nm, (nm > 1)? "ks" : "k");
exit(0);
/* NOTREACHED */
}
case MTIOCRBLIM:
{
struct mtrblim rblim;
bzero(&rblim, sizeof(rblim));
if (ioctl(mtfd, MTIOCRBLIM, (caddr_t)&rblim) < 0)
err(2, "%s", tape);
(void)printf("%s:\n"
" min blocksize %u byte%s\n"
" max blocksize %u byte%s\n"
" granularity %u byte%s\n",
tape, rblim.min_block_length,
MT_PLURAL(rblim.min_block_length),
rblim.max_block_length,
MT_PLURAL(rblim.max_block_length),
(1 << rblim.granularity),
MT_PLURAL((1 << rblim.granularity)));
exit(0);
/* NOTREACHED */
}
case MTIOCPARAMGET:
case MTIOCEXTGET:
case MT_CMD_PROTECT:
case MT_CMD_GETDENSITY:
{
int retval = 0;
retval = mt_xml_cmd(comp->c_code, argc, argv, mtfd,
tape);
exit(retval);
}
case MTIOCEXTLOCATE:
{
int retval = 0;
retval = mt_locate(argc, argv, mtfd, tape);
exit(retval);
}
default:
break;
}
if (ioctl(mtfd, MTIOCTOP, &mt_com) < 0)
err(1, "%s: %s", tape, comp->c_name);
} else {
if (ioctl(mtfd, MTIOCGET, &mt_status) < 0)
err(1, NULL);
status(&mt_status);
}
exit(0);
/* NOTREACHED */
}
int
main(int argc, char **argv)
{
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:")) != -1)
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)
errx(1, "%s: unknown command", p);
if (strncmp(p, comp->c_name, len) == 0)
break;
}
#if defined(__DragonFly__)
if((comp->c_flags & NEED_2ARGS) && argc != 2)
usage();
if(comp->c_flags & DISABLE_THIS) {
warn_eof();
}
#endif /* defined(__DragonFly__) */
if ((mtfd = open(tape, comp->c_ronly ? O_RDONLY : O_RDWR)) < 0)
err(1, "%s", tape);
if (comp->c_code != MTNOP) {
mt_com.mt_op = comp->c_code;
if (*argv) {
#if defined (__DragonFly__)
if (!isdigit(**argv) &&
(comp->c_flags & IS_DENSITY)) {
const char *dcanon;
mt_com.mt_count = stringtodens(*argv);
if (mt_com.mt_count == 0)
errx(1, "%s: unknown density", *argv);
dcanon = denstostring(mt_com.mt_count);
if (strcmp(dcanon, *argv) != 0)
printf(
"Using \"%s\" as an alias for %s\n",
*argv, dcanon);
p = "";
} else if (!isdigit(**argv) &&
(comp->c_flags & IS_COMP)) {
mt_com.mt_count = stringtocomp(*argv);
if ((u_int32_t)mt_com.mt_count == 0xf0f0f0f0)
errx(1, "%s: unknown compression",
*argv);
p = "";
} else
/* allow for hex numbers; useful for density */
mt_com.mt_count = strtol(*argv, &p, 0);
#else
mt_com.mt_count = strtol(*argv, &p, 10);
#endif /* defined(__DragonFly__) */
if ((mt_com.mt_count <=
#if defined (__DragonFly__)
((comp->c_flags & ZERO_ALLOWED)? -1: 0)
&& ((comp->c_flags & IS_COMP) == 0)
#else
0
#endif /* defined (__DragonFly__) */
) || *p)
errx(1, "%s: illegal count", *argv);
}
else
mt_com.mt_count = 1;
#if defined(__DragonFly__)
switch (comp->c_code) {
case MTIOCERRSTAT:
{
int i;
union mterrstat umn;
struct scsi_tape_errors *s = &umn.scsi_errstat;
if (ioctl(mtfd, comp->c_code, (caddr_t)&umn) < 0)
err(2, "%s", tape);
(void)printf("Last I/O Residual: %u\n", s->io_resid);
(void)printf(" Last I/O Command:");
for (i = 0; i < sizeof (s->io_cdb); i++)
(void)printf(" %02X", s->io_cdb[i]);
(void)printf("\n");
(void)printf(" Last I/O Sense:\n\n\t");
for (i = 0; i < sizeof (s->io_sense); i++) {
(void)printf(" %02X", s->io_sense[i]);
if (((i + 1) & 0xf) == 0) {
(void)printf("\n\t");
}
}
(void)printf("\n");
(void)printf("Last Control Residual: %u\n",
s->ctl_resid);
(void)printf(" Last Control Command:");
for (i = 0; i < sizeof (s->ctl_cdb); i++)
(void)printf(" %02X", s->ctl_cdb[i]);
(void)printf("\n");
(void)printf(" Last Control Sense:\n\n\t");
for (i = 0; i < sizeof (s->ctl_sense); i++) {
(void)printf(" %02X", s->ctl_sense[i]);
if (((i + 1) & 0xf) == 0) {
(void)printf("\n\t");
}
}
(void)printf("\n\n");
exit(0);
/* NOTREACHED */
}
case MTIOCRDHPOS:
case MTIOCRDSPOS:
{
u_int32_t block;
if (ioctl(mtfd, comp->c_code, (caddr_t)&block) < 0)
err(2, "%s", tape);
(void)printf("%s: %s block location %u\n", tape,
(comp->c_code == MTIOCRDHPOS)? "hardware" :
"logical", block);
exit(0);
/* NOTREACHED */
}
case MTIOCSLOCATE:
case MTIOCHLOCATE:
{
u_int32_t block = (u_int32_t)mt_com.mt_count;
if (ioctl(mtfd, comp->c_code, (caddr_t)&block) < 0)
err(2, "%s", tape);
exit(0);
/* NOTREACHED */
}
case MTIOCGETEOTMODEL:
{
u_int32_t om;
if (ioctl(mtfd, MTIOCGETEOTMODEL, (caddr_t)&om) < 0)
err(2, "%s", tape);
(void)printf("%s: the model is %u filemar%s at EOT\n",
tape, om, (om > 1)? "ks" : "k");
exit(0);
/* NOTREACHED */
}
case MTIOCSETEOTMODEL:
{
u_int32_t om, nm = (u_int32_t)mt_com.mt_count;
if (ioctl(mtfd, MTIOCGETEOTMODEL, (caddr_t)&om) < 0)
err(2, "%s", tape);
if (ioctl(mtfd, comp->c_code, (caddr_t)&nm) < 0)
err(2, "%s", tape);
(void)printf("%s: old model was %u filemar%s at EOT\n",
tape, om, (om > 1)? "ks" : "k");
(void)printf("%s: new model is %u filemar%s at EOT\n",
tape, nm, (nm > 1)? "ks" : "k");
exit(0);
/* NOTREACHED */
}
default:
break;
}
#endif
if (ioctl(mtfd, MTIOCTOP, &mt_com) < 0)
err(1, "%s: %s", tape, comp->c_name);
} else {
if (ioctl(mtfd, MTIOCGET, &mt_status) < 0)
err(1, NULL);
status(&mt_status);
}
exit(0);
/* NOTREACHED */
}
