[BACK]Return to mmc.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / cdio

Annotation of src/usr.bin/cdio/mmc.c, Revision 1.9

1.9     ! mjc         1: /* $OpenBSD: mmc.c,v 1.8 2006/06/06 20:48:07 mjc Exp $ */
1.7       deraadt     2:
1.3       mjc         3: /*
                      4:  * Copyright (c) 2006 Michael Coulter <mjc@openbsd.org>
                      5:  *
                      6:  * Permission to use, copy, modify, and distribute this software for any
                      7:  * purpose with or without fee is hereby granted, provided that the above
                      8:  * copyright notice and this permission notice appear in all copies.
                      9:  *
                     10:  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
                     11:  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
                     12:  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
                     13:  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
                     14:  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
                     15:  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
                     16:  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
                     17:  */
                     18:
1.1       mjc        19: #include <sys/limits.h>
                     20: #include <sys/types.h>
                     21: #include <sys/scsiio.h>
1.8       mjc        22: #include <scsi/cd.h>
                     23: #include <scsi/scsi_all.h>
                     24: #include <scsi/scsi_disk.h>
1.1       mjc        25: #include <err.h>
1.2       mjc        26: #include <errno.h>
1.1       mjc        27: #include <fcntl.h>
                     28: #include <stdio.h>
                     29: #include <string.h>
                     30: #include <unistd.h>
                     31: #include "extern.h"
                     32:
                     33: extern int fd;
1.2       mjc        34: extern char *cdname;
1.1       mjc        35:
                     36: int
                     37: blank(void)
                     38: {
1.8       mjc        39:        struct scsi_blank *scb;
1.1       mjc        40:        scsireq_t scr;
                     41:        int r;
                     42:
                     43:        bzero(&scr, sizeof(scr));
1.8       mjc        44:        scb = (struct scsi_blank *)scr.cmd;
                     45:        scb->opcode = BLANK;
                     46:        scb->byte2 |= BLANK_MINIMAL;
                     47:        scr.cmdlen = sizeof(*scb);
1.1       mjc        48:        scr.datalen = 0;
                     49:        scr.timeout = 120000;
                     50:        scr.flags = SCCMD_ESCAPE;
                     51:        scr.senselen = SENSEBUFLEN;
                     52:
1.2       mjc        53:        r = ioctl(fd, SCIOCCOMMAND, &scr);
                     54:        if (r == -1 && errno == EPERM) {
                     55:                close(fd);
                     56:                fd = -1;
1.7       deraadt    57:                if (!open_cd(cdname, 1))
1.2       mjc        58:                        return (-1);
                     59:        }
1.1       mjc        60:        r = ioctl(fd, SCIOCCOMMAND, &scr);
                     61:        return (r == 0 ? scr.retsts : -1);
                     62: }
                     63:
                     64: int
                     65: unit_ready(void)
                     66: {
1.8       mjc        67:        struct scsi_test_unit_ready *scb;
1.1       mjc        68:        scsireq_t scr;
                     69:        int r;
                     70:
                     71:        bzero(&scr, sizeof(scr));
1.8       mjc        72:        scb = (struct scsi_test_unit_ready *)scr.cmd;
                     73:        scb->opcode = TEST_UNIT_READY;
                     74:        scr.cmdlen = sizeof(*scb);
1.1       mjc        75:        scr.datalen = 0;
                     76:        scr.timeout = 120000;
                     77:        scr.flags = SCCMD_ESCAPE;
                     78:        scr.senselen = SENSEBUFLEN;
                     79:
                     80:        r = ioctl(fd, SCIOCCOMMAND, &scr);
                     81:        return (r == 0 ? scr.retsts : -1);
                     82: }
                     83:
                     84: int
                     85: synchronize_cache(void)
                     86: {
1.8       mjc        87:        struct scsi_synchronize_cache *scb;
1.1       mjc        88:        scsireq_t scr;
                     89:        int r;
                     90:
                     91:        bzero(&scr, sizeof(scr));
1.8       mjc        92:        scb = (struct scsi_synchronize_cache *)scr.cmd;
                     93:        scb->opcode = SYNCHRONIZE_CACHE;
                     94:        scr.cmdlen = sizeof(*scb);
1.1       mjc        95:        scr.datalen = 0;
                     96:        scr.timeout = 120000;
                     97:        scr.flags = SCCMD_ESCAPE;
                     98:        scr.senselen = SENSEBUFLEN;
                     99:
                    100:        r = ioctl(fd, SCIOCCOMMAND, &scr);
                    101:        return (r == 0 ? scr.retsts : -1);
                    102: }
                    103:
                    104: int
                    105: close_session(void)
                    106: {
1.8       mjc       107:        struct scsi_close_track *scb;
1.1       mjc       108:        scsireq_t scr;
                    109:        int r;
                    110:
                    111:        bzero(&scr, sizeof(scr));
1.8       mjc       112:        scb = (struct scsi_close_track *)scr.cmd;
                    113:        scb->opcode = CLOSE_TRACK;
                    114:        scb->closefunc = CT_CLOSE_SESS;
                    115:        scr.cmdlen = sizeof(*scb);
1.1       mjc       116:        scr.datalen = 0;
                    117:        scr.timeout = 120000;
                    118:        scr.flags = SCCMD_ESCAPE;
                    119:        scr.senselen = SENSEBUFLEN;
                    120:
                    121:        r = ioctl(fd, SCIOCCOMMAND, &scr);
                    122:        return (r == 0 ? scr.retsts : -1);
                    123: }
                    124:
                    125: int
1.5       mjc       126: writetao(struct track_head *thp)
1.1       mjc       127: {
                    128:        u_char modebuf[70];
1.5       mjc       129:        struct track_info *tr;
1.7       deraadt   130:        u_char bdlen;
1.5       mjc       131:        int r;
                    132:
1.1       mjc       133:        if ((r = mode_sense_write(modebuf)) != SCCMD_OK) {
                    134:                warnx("mode sense failed: %d", r);
                    135:                return (r);
                    136:        }
                    137:        bdlen = modebuf[7];
                    138:        modebuf[2+8+bdlen] |= 0x40; /* Buffer Underrun Free Enable */
                    139:        modebuf[2+8+bdlen] |= 0x01; /* change write type to TAO */
                    140:
1.5       mjc       141:        SLIST_FOREACH(tr, thp, track_list) {
1.7       deraadt   142:                switch (tr->type) {
1.5       mjc       143:                case 'd':
1.1       mjc       144:                        modebuf[3+8+bdlen] = 0x04; /* track mode = data */
                    145:                        modebuf[4+8+bdlen] = 0x08; /* 2048 block track mode */
                    146:                        modebuf[8+8+bdlen] = 0x00; /* turn off XA */
1.5       mjc       147:                        break;
                    148:                case 'a':
1.1       mjc       149:                        modebuf[3+8+bdlen] = 0x00; /* track mode = audio */
                    150:                        modebuf[4+8+bdlen] = 0x00; /* 2352 block track mode */
                    151:                        modebuf[8+8+bdlen] = 0x00; /* turn off XA */
1.5       mjc       152:                        break;
                    153:                default:
                    154:                        warn("impossible tracktype detected");
                    155:                        break;
1.1       mjc       156:                }
                    157:                while (unit_ready() != SCCMD_OK)
                    158:                        continue;
                    159:                if ((r = mode_select_write(modebuf)) != SCCMD_OK) {
                    160:                        warnx("mode select failed: %d",r);
                    161:                        return (r);
                    162:                }
1.5       mjc       163:                writetrack(tr);
1.1       mjc       164:                synchronize_cache();
                    165:        }
                    166:        fprintf(stderr,"\n");
                    167:        close_session();
                    168:        return (0);
                    169: }
                    170:
                    171: int
1.5       mjc       172: writetrack(struct track_info *tr)
1.1       mjc       173: {
                    174:        u_char databuf[65536];
                    175:        scsireq_t scr;
                    176:        u_int end_lba, lba;
                    177:        u_int tmp;
                    178:        int r,rfd;
                    179:        u_char nblk;
                    180:
1.5       mjc       181:        nblk = 65535/tr->blklen;
1.1       mjc       182:        bzero(&scr, sizeof(scr));
                    183:        scr.timeout = 300000;
1.9     ! mjc       184:        scr.cmd[0] = WRITE_BIG;
1.1       mjc       185:        scr.cmd[1] = 0x00;
                    186:        scr.cmd[8] = nblk; /* Transfer length in blocks (LSB) */
                    187:        scr.cmdlen = 10;
                    188:        scr.databuf = (caddr_t)databuf;
1.5       mjc       189:        scr.datalen = nblk * tr->blklen;
1.1       mjc       190:        scr.senselen = SENSEBUFLEN;
                    191:        scr.flags = SCCMD_ESCAPE|SCCMD_WRITE;
                    192:
                    193:        if (get_nwa(&lba) != SCCMD_OK) {
                    194:                warnx("cannot get next writable address");
                    195:                return (-1);
                    196:        }
                    197:        tmp = htobe32(lba); /* update lba in cdb */
                    198:        memcpy(&scr.cmd[2], &tmp, sizeof(tmp));
                    199:
1.5       mjc       200:        if (tr->sz / tr->blklen + 1 > UINT_MAX || tr->sz < tr->blklen) {
                    201:                warnx("file %s has invalid size",tr->file);
1.1       mjc       202:                return (-1);
                    203:        }
1.5       mjc       204:        if (tr->sz % tr->blklen) {
1.7       deraadt   205:                warnx("file %s is not multiple of block length %d",
                    206:                    tr->file, tr->blklen);
1.5       mjc       207:                end_lba = tr->sz / tr->blklen + lba + 1;
1.1       mjc       208:        } else {
1.5       mjc       209:                end_lba = tr->sz / tr->blklen + lba;
1.1       mjc       210:        }
1.5       mjc       211:        rfd = open(tr->file, O_RDONLY, 0640);
                    212:        if (tr->type == 'a') {
1.1       mjc       213:                if (lseek(rfd, WAVHDRLEN, SEEK_SET) == -1)
                    214:                        err(1, "seek failed");
                    215:        }
                    216:        while ((lba < end_lba) && (nblk != 0)) {
                    217:                while (lba + nblk <= end_lba) {
1.5       mjc       218:                        read(rfd, databuf, nblk * tr->blklen);
1.1       mjc       219:                        scr.cmd[8] = nblk;
1.5       mjc       220:                        scr.datalen = nblk * tr->blklen;
1.1       mjc       221:                        r = ioctl(fd, SCIOCCOMMAND, &scr);
                    222:                        if (r != 0) {
                    223:                                warn("ioctl failed while attempting to write");
                    224:                                return (-1);
                    225:                        }
                    226:                        if (scr.retsts != SCCMD_OK) {
1.7       deraadt   227:                                warnx("ioctl returned bad status while "
                    228:                                    "attempting to write: %d",
                    229:                                    scr.retsts);
1.1       mjc       230:                                return (r);
                    231:                        }
                    232:                        lba += nblk;
                    233:                        fprintf(stderr,"\rLBA: 0x%06x/0x%06x",lba,end_lba);
                    234:                        tmp = htobe32(lba); /* update lba in cdb */
                    235:                        memcpy(&scr.cmd[2], &tmp, sizeof(tmp));
                    236:                }
                    237:                nblk--;
                    238:        }
                    239:        close(rfd);
                    240:        return (0);
                    241: }
                    242:
                    243: int
                    244: mode_sense_write(unsigned char buf[])
                    245: {
1.8       mjc       246:        struct scsi_mode_sense_big *scb;
1.1       mjc       247:        scsireq_t scr;
                    248:        int r;
                    249:
                    250:        bzero(&scr, sizeof(scr));
1.8       mjc       251:        scb = (struct scsi_mode_sense_big *)scr.cmd;
                    252:        scb->opcode = MODE_SENSE_BIG;
                    253:        /* XXX: need to set disable block descriptors and check SCSI drive */
                    254:        scb->page = WRITE_PARAM_PAGE;
                    255:        scb->length[1] = 0x46; /* 16 for the header + size from pg. 89 mmc-r10a.pdf */
                    256:        scr.cmdlen = sizeof(*scb);
1.1       mjc       257:        scr.timeout = 4000;
                    258:        scr.senselen = SENSEBUFLEN;
1.7       deraadt   259:        scr.datalen= 0x46;
1.1       mjc       260:        scr.flags = SCCMD_ESCAPE|SCCMD_READ;
                    261:        scr.databuf = (caddr_t)buf;
                    262:
                    263:        r = ioctl(fd, SCIOCCOMMAND, &scr);
                    264:        return (r == 0 ? scr.retsts : -1);
                    265: }
                    266:
                    267: int
                    268: mode_select_write(unsigned char buf[])
                    269: {
1.8       mjc       270:        struct scsi_mode_select_big *scb;
1.1       mjc       271:        scsireq_t scr;
                    272:        int r;
                    273:
                    274:        bzero(&scr, sizeof(scr));
1.8       mjc       275:        scb = (struct scsi_mode_select_big *)scr.cmd;
                    276:        scb->opcode = MODE_SELECT_BIG;
                    277: /*
                    278:  * INF-8020 says bit 4 in byte 2 is '1'
                    279:  * INF-8090 refers to it as 'PF(1)' then doesn't
                    280:  * describe it.
                    281:  */
                    282:        scb->byte2 = 0x10;
                    283:        scb->length[1] = 2 + buf[1] + 256 * buf[0];
1.1       mjc       284:        scr.timeout = 4000;
                    285:        scr.senselen = SENSEBUFLEN;
1.8       mjc       286:        scr.cmdlen = sizeof(*scb);
1.1       mjc       287:        scr.datalen = 2 + buf[1] + 256 * buf[0];
                    288:        scr.flags = SCCMD_ESCAPE|SCCMD_WRITE;
                    289:        scr.databuf = (caddr_t)buf;
                    290:
                    291:        r = ioctl(fd, SCIOCCOMMAND, &scr);
1.6       mjc       292:        return (r == 0 ? scr.retsts : -1);
                    293: }
                    294:
                    295: int
                    296: get_disc_size(off_t *availblk)
                    297: {
                    298:        u_char databuf[28];
1.8       mjc       299:        struct scsi_read_track_info *scb;
1.6       mjc       300:        scsireq_t scr;
                    301:        int r,tmp;
                    302:
                    303:        bzero(&scr, sizeof(scr));
1.8       mjc       304:        scb = (struct scsi_read_track_info *)scr.cmd;
1.6       mjc       305:        scr.timeout = 4000;
                    306:        scr.senselen = SENSEBUFLEN;
1.8       mjc       307:        scb->opcode = READ_TRACK_INFO;
                    308:        scb->addrtype = RTI_TRACK;
                    309:        scb->addr[1] = 1;
                    310:        scb->data_len[3] = 0x1c;
                    311:        scr.cmdlen = sizeof(*scb);
1.7       deraadt   312:        scr.datalen= 0x1c;
1.6       mjc       313:        scr.flags = SCCMD_ESCAPE|SCCMD_READ;
                    314:        scr.databuf = (caddr_t)databuf;
                    315:
                    316:        r = ioctl(fd, SCIOCCOMMAND, &scr);
                    317:        memcpy(&tmp, &databuf[16], sizeof(tmp));
                    318:        *availblk = betoh32(tmp);
1.1       mjc       319:        return (r == 0 ? scr.retsts : -1);
                    320: }
                    321:
                    322: int
                    323: get_nwa(int *nwa)
                    324: {
                    325:        u_char databuf[28];
                    326:        scsireq_t scr;
                    327:        int r,tmp;
                    328:
                    329:        bzero(&scr, sizeof(scr));
                    330:        scr.timeout = 4000;
                    331:        scr.senselen = SENSEBUFLEN;
                    332:        scr.cmd[0] = 0x52; /* READ TRACK INFO */
                    333:        scr.cmd[1] = 0x01;
                    334:        scr.cmd[5] = 0xff; /* Invisible Track */
                    335:        scr.cmd[7] = 0x00;
                    336:        scr.cmd[8] = 0x1c;
                    337:        scr.cmdlen = 10;
1.7       deraadt   338:        scr.datalen= 0x1c;
1.1       mjc       339:        scr.flags = SCCMD_ESCAPE|SCCMD_READ;
                    340:        scr.databuf = (caddr_t)databuf;
                    341:
                    342:        r = ioctl(fd, SCIOCCOMMAND, &scr);
                    343:        memcpy(&tmp, &databuf[12], sizeof(tmp));
                    344:        *nwa = betoh32(tmp);
                    345:        return (r == 0 ? scr.retsts : -1);
                    346: }