File: [local] / src / usr.bin / cdio / mmc.c (download)
Revision 1.13, Tue Jun 27 02:02:30 2006 UTC (17 years, 11 months ago) by deraadt
Branch: MAIN
Changes since 1.12: +7 -3 lines
improve output during cd writing; ok mjc
|
/* $OpenBSD: mmc.c,v 1.13 2006/06/27 02:02:30 deraadt Exp $ */
/*
* Copyright (c) 2006 Michael Coulter <mjc@openbsd.org>
*
* Permission to use, copy, modify, and distribute this software for any
* purpose with or without fee is hereby granted, provided that the above
* copyright notice and this permission notice appear in all copies.
*
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/
#include <sys/limits.h>
#include <sys/types.h>
#include <sys/scsiio.h>
#include <scsi/cd.h>
#include <scsi/scsi_all.h>
#include <scsi/scsi_disk.h>
#include <err.h>
#include <errno.h>
#include <fcntl.h>
#include <stdio.h>
#include <string.h>
#include <unistd.h>
#include "extern.h"
extern int fd;
extern char *cdname;
int
blank(void)
{
struct scsi_blank *scb;
scsireq_t scr;
int r;
bzero(&scr, sizeof(scr));
scb = (struct scsi_blank *)scr.cmd;
scb->opcode = BLANK;
scb->byte2 |= BLANK_MINIMAL;
scr.cmdlen = sizeof(*scb);
scr.datalen = 0;
scr.timeout = 120000;
scr.flags = SCCMD_ESCAPE;
scr.senselen = SENSEBUFLEN;
r = ioctl(fd, SCIOCCOMMAND, &scr);
if (r == -1 && errno == EPERM) {
close(fd);
fd = -1;
if (!open_cd(cdname, 1))
return (-1);
}
r = ioctl(fd, SCIOCCOMMAND, &scr);
return (r == 0 ? scr.retsts : -1);
}
int
unit_ready(void)
{
struct scsi_test_unit_ready *scb;
scsireq_t scr;
int r;
bzero(&scr, sizeof(scr));
scb = (struct scsi_test_unit_ready *)scr.cmd;
scb->opcode = TEST_UNIT_READY;
scr.cmdlen = sizeof(*scb);
scr.datalen = 0;
scr.timeout = 120000;
scr.flags = SCCMD_ESCAPE;
scr.senselen = SENSEBUFLEN;
r = ioctl(fd, SCIOCCOMMAND, &scr);
return (r == 0 ? scr.retsts : -1);
}
int
synchronize_cache(void)
{
struct scsi_synchronize_cache *scb;
scsireq_t scr;
int r;
bzero(&scr, sizeof(scr));
scb = (struct scsi_synchronize_cache *)scr.cmd;
scb->opcode = SYNCHRONIZE_CACHE;
scr.cmdlen = sizeof(*scb);
scr.datalen = 0;
scr.timeout = 120000;
scr.flags = SCCMD_ESCAPE;
scr.senselen = SENSEBUFLEN;
r = ioctl(fd, SCIOCCOMMAND, &scr);
return (r == 0 ? scr.retsts : -1);
}
int
close_session(void)
{
struct scsi_close_track *scb;
scsireq_t scr;
int r;
bzero(&scr, sizeof(scr));
scb = (struct scsi_close_track *)scr.cmd;
scb->opcode = CLOSE_TRACK;
scb->closefunc = CT_CLOSE_SESS;
scr.cmdlen = sizeof(*scb);
scr.datalen = 0;
scr.timeout = 120000;
scr.flags = SCCMD_ESCAPE;
scr.senselen = SENSEBUFLEN;
r = ioctl(fd, SCIOCCOMMAND, &scr);
return (r == 0 ? scr.retsts : -1);
}
int
writetao(struct track_head *thp)
{
u_char modebuf[70];
struct track_info *tr;
u_char bdlen;
int r;
if ((r = mode_sense_write(modebuf)) != SCCMD_OK) {
warnx("mode sense failed: %d", r);
return (r);
}
bdlen = modebuf[7];
modebuf[2+8+bdlen] |= 0x40; /* Buffer Underrun Free Enable */
modebuf[2+8+bdlen] |= 0x01; /* change write type to TAO */
SLIST_FOREACH(tr, thp, track_list) {
switch (tr->type) {
case 'd':
modebuf[3+8+bdlen] = 0x04; /* track mode = data */
modebuf[4+8+bdlen] = 0x08; /* 2048 block track mode */
modebuf[8+8+bdlen] = 0x00; /* turn off XA */
break;
case 'a':
modebuf[3+8+bdlen] = 0x00; /* track mode = audio */
modebuf[4+8+bdlen] = 0x00; /* 2352 block track mode */
modebuf[8+8+bdlen] = 0x00; /* turn off XA */
break;
default:
warn("impossible tracktype detected");
break;
}
while (unit_ready() != SCCMD_OK)
continue;
if ((r = mode_select_write(modebuf)) != SCCMD_OK) {
warnx("mode select failed: %d",r);
return (r);
}
writetrack(tr);
synchronize_cache();
}
fprintf(stderr,"\n");
close_session();
return (0);
}
int
writetrack(struct track_info *tr)
{
u_char databuf[65536];
scsireq_t scr;
u_int end_lba, lba;
u_int tmp;
int r;
u_char nblk;
nblk = 65535/tr->blklen;
bzero(&scr, sizeof(scr));
scr.timeout = 300000;
scr.cmd[0] = WRITE_BIG;
scr.cmd[1] = 0x00;
scr.cmd[8] = nblk; /* Transfer length in blocks (LSB) */
scr.cmdlen = 10;
scr.databuf = (caddr_t)databuf;
scr.datalen = nblk * tr->blklen;
scr.senselen = SENSEBUFLEN;
scr.flags = SCCMD_ESCAPE|SCCMD_WRITE;
if (get_nwa(&lba) != SCCMD_OK) {
warnx("cannot get next writable address");
return (-1);
}
tmp = htobe32(lba); /* update lba in cdb */
memcpy(&scr.cmd[2], &tmp, sizeof(tmp));
if (tr->sz / tr->blklen + 1 > UINT_MAX || tr->sz < tr->blklen) {
warnx("file %s has invalid size",tr->file);
return (-1);
}
if (tr->sz % tr->blklen) {
warnx("file %s is not multiple of block length %d",
tr->file, tr->blklen);
end_lba = tr->sz / tr->blklen + lba + 1;
} else {
end_lba = tr->sz / tr->blklen + lba;
}
if (tr->type == 'a') {
if (lseek(tr->fd, WAVHDRLEN, SEEK_SET) == -1)
err(1, "seek failed for file %s", tr->file);
}
while (lba < end_lba && nblk != 0) {
while (lba + nblk <= end_lba) {
read(tr->fd, databuf, nblk * tr->blklen);
scr.cmd[8] = nblk;
scr.datalen = nblk * tr->blklen;
again:
r = ioctl(fd, SCIOCCOMMAND, &scr);
if (r != 0) {
printf("\r");
warn("ioctl failed while attempting to write");
return (-1);
}
if (scr.retsts == SCCMD_SENSE && scr.sense[2] == 0x2) {
usleep(1000);
goto again;
}
if (scr.retsts != SCCMD_OK) {
printf("\r");
warnx("ioctl returned bad status while "
"attempting to write: %d",
scr.retsts);
return (r);
}
lba += nblk;
fprintf(stderr,"\rLBA: %08u/%08u",
lba, end_lba);
tmp = htobe32(lba); /* update lba in cdb */
memcpy(&scr.cmd[2], &tmp, sizeof(tmp));
}
nblk--;
}
printf("\n");
close(tr->fd);
return (0);
}
int
mode_sense_write(unsigned char buf[])
{
struct scsi_mode_sense_big *scb;
scsireq_t scr;
int r;
bzero(&scr, sizeof(scr));
scb = (struct scsi_mode_sense_big *)scr.cmd;
scb->opcode = MODE_SENSE_BIG;
/* XXX: need to set disable block descriptors and check SCSI drive */
scb->page = WRITE_PARAM_PAGE;
scb->length[1] = 0x46; /* 16 for the header + size from pg. 89 mmc-r10a.pdf */
scr.cmdlen = sizeof(*scb);
scr.timeout = 4000;
scr.senselen = SENSEBUFLEN;
scr.datalen= 0x46;
scr.flags = SCCMD_ESCAPE|SCCMD_READ;
scr.databuf = (caddr_t)buf;
r = ioctl(fd, SCIOCCOMMAND, &scr);
return (r == 0 ? scr.retsts : -1);
}
int
mode_select_write(unsigned char buf[])
{
struct scsi_mode_select_big *scb;
scsireq_t scr;
int r;
bzero(&scr, sizeof(scr));
scb = (struct scsi_mode_select_big *)scr.cmd;
scb->opcode = MODE_SELECT_BIG;
/*
* INF-8020 says bit 4 in byte 2 is '1'
* INF-8090 refers to it as 'PF(1)' then doesn't
* describe it.
*/
scb->byte2 = 0x10;
scb->length[1] = 2 + buf[1] + 256 * buf[0];
scr.timeout = 4000;
scr.senselen = SENSEBUFLEN;
scr.cmdlen = sizeof(*scb);
scr.datalen = 2 + buf[1] + 256 * buf[0];
scr.flags = SCCMD_ESCAPE|SCCMD_WRITE;
scr.databuf = (caddr_t)buf;
r = ioctl(fd, SCIOCCOMMAND, &scr);
return (r == 0 ? scr.retsts : -1);
}
int
get_disc_size(off_t *availblk)
{
u_char databuf[28];
struct scsi_read_track_info *scb;
scsireq_t scr;
int r,tmp;
bzero(&scr, sizeof(scr));
scb = (struct scsi_read_track_info *)scr.cmd;
scr.timeout = 4000;
scr.senselen = SENSEBUFLEN;
scb->opcode = READ_TRACK_INFO;
scb->addrtype = RTI_TRACK;
scb->addr[1] = 1;
scb->data_len[3] = 0x1c;
scr.cmdlen = sizeof(*scb);
scr.datalen= 0x1c;
scr.flags = SCCMD_ESCAPE|SCCMD_READ;
scr.databuf = (caddr_t)databuf;
r = ioctl(fd, SCIOCCOMMAND, &scr);
memcpy(&tmp, &databuf[16], sizeof(tmp));
*availblk = betoh32(tmp);
return (r == 0 ? scr.retsts : -1);
}
int
get_nwa(int *nwa)
{
u_char databuf[28];
scsireq_t scr;
int r,tmp;
bzero(&scr, sizeof(scr));
scr.timeout = 4000;
scr.senselen = SENSEBUFLEN;
scr.cmd[0] = 0x52; /* READ TRACK INFO */
scr.cmd[1] = 0x01;
scr.cmd[5] = 0xff; /* Invisible Track */
scr.cmd[7] = 0x00;
scr.cmd[8] = 0x1c;
scr.cmdlen = 10;
scr.datalen= 0x1c;
scr.flags = SCCMD_ESCAPE|SCCMD_READ;
scr.databuf = (caddr_t)databuf;
r = ioctl(fd, SCIOCCOMMAND, &scr);
memcpy(&tmp, &databuf[12], sizeof(tmp));
*nwa = betoh32(tmp);
return (r == 0 ? scr.retsts : -1);
}