/* * This file has been modified for the cdrkit suite. * * The behaviour and appearence of the program code below can differ to a major * extent from the version distributed by the original author(s). * * For details, see Changelog file distributed with the cdrkit package. If you * received this file from another source then ask the distributing person for * a log of modifications. * */ /* @(#)drv_7501.c 1.16 05/05/16 Copyright 2003-2005 J. Schilling */ /* * Device driver for the Masushita CW-7501 * * Copyright (c) 2003-2005 J. Schilling * * Mode Pages: * 0x01 error recovery Seite 100 * 0x02 disconnect/reconnect Seite 107 * 0x0D CD-ROM device parameter Seite 110 * 0x0E CD-ROM Audio control Seite 112 * 0x20 Speed & Tray position Seite 115 * 0x21 Media catalog number Seite 124 * 0x22 ISRC Seite 125 * 0x23 Dummy/Write Information Seite 126 * 0x24 CD-R disk information Seite 127 */ /* * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License version 2 * as published by the Free Software Foundation. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License along with * this program; see the file COPYING. If not, write to the Free Software * Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ #ifndef DEBUG #define DEBUG #endif #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "wodim.h" extern int silent; extern int debug; extern int verbose; extern int lverbose; extern int xdebug; #if defined(_BIT_FIELDS_LTOH) /* Intel byteorder */ struct cw7501_mode_page_20 { /* Speed control */ MP_P_CODE; /* parsave & pagecode */ Uchar p_len; /* 0x02 = 2 Bytes */ Uchar speed; Ucbit res : 7; Ucbit traypos : 1; }; #else /* Motorola byteorder */ struct cw7501_mode_page_20 { /* Speed control */ MP_P_CODE; /* parsave & pagecode */ Uchar p_len; /* 0x02 = 2 Bytes */ Uchar speed; Ucbit traypos : 1; Ucbit res : 7; }; #endif #if defined(_BIT_FIELDS_LTOH) /* Intel byteorder */ struct cw7501_mode_page_21 { /* MCN */ MP_P_CODE; /* parsave & pagecode */ Uchar p_len; /* 0x12 = 20 Bytes */ Ucbit control : 4; Ucbit addr : 4; Uchar res_3; Uchar res_4; Uchar mcn[15]; }; #else /* Motorola byteorder */ struct cw7501_mode_page_21 { /* MCN */ MP_P_CODE; /* parsave & pagecode */ Uchar p_len; /* 0x12 = 20 Bytes */ Ucbit addr : 4; Ucbit control : 4; Uchar res_3; Uchar res_4; Uchar mcn[15]; }; #endif #if defined(_BIT_FIELDS_LTOH) /* Intel byteorder */ struct cw7501_mode_page_22 { /* ISRC */ MP_P_CODE; /* parsave & pagecode */ Uchar p_len; /* 0x12 = 20 Bytes */ Ucbit control : 4; Ucbit addr : 4; Uchar trackno; Uchar res_4; Uchar isrc[15]; }; #else /* Motorola byteorder */ struct cw7501_mode_page_22 { /* ISRC */ MP_P_CODE; /* parsave & pagecode */ Uchar p_len; /* 0x12 = 20 Bytes */ Ucbit addr : 4; Ucbit control : 4; Uchar trackno; Uchar res_4; Uchar isrc[15]; }; #endif #if defined(_BIT_FIELDS_LTOH) /* Intel byteorder */ struct cw7501_mode_page_23 { /* Dummy / Write information */ MP_P_CODE; /* parsave & pagecode */ Uchar p_len; /* 0x02 = 2 Bytes */ Uchar res; Ucbit autopg : 1; Ucbit dummy : 1; Ucbit res3_72 : 6; }; #else /* Motorola byteorder */ struct cw7501_mode_page_23 { /* Dummy / Write information */ MP_P_CODE; /* parsave & pagecode */ Uchar p_len; /* 0x02 = 2 Bytes */ Uchar res; Ucbit res3_72 : 6; Ucbit dummy : 1; Ucbit autopg : 1; }; #endif struct cw7501_mode_page_24 { /* CD-R Disk information */ MP_P_CODE; /* parsave & pagecode */ Uchar p_len; /* 0x0A = 12 Bytes */ Uchar disktype; Uchar res; Uchar appl_code[4]; Uchar disk_id[4]; }; struct cw7501_mode_data { struct scsi_mode_header header; union cdd_pagex { struct cw7501_mode_page_20 page20; struct cw7501_mode_page_21 page21; struct cw7501_mode_page_22 page22; struct cw7501_mode_page_23 page23; struct cw7501_mode_page_24 page24; } pagex; }; /* * Mode for read track information */ #define TI_TRACKINFO_R 0 #define TI_NWA 1 #define TI_PMA 2 #define TI_TRACKINFO 3 struct cw7501_nwa { Uchar nwa_length[2]; Uchar nwa_res; Uchar nwa_trackno; Uchar nwa_nwa[4]; Uchar nwa_freeblocks[4]; }; struct cw7501_cue { Uchar cs_ctladr; /* CTL/ADR for this track */ Uchar cs_tno; /* This track number */ Uchar cs_index; /* Index within this track */ Uchar cs_dataform; /* Data form */ /* Bit 0..3 Physical Format */ /* Bit 4 Alt Copy (SCMS) */ /* Bit 5 SubC Audio + RAW96 sub */ Uchar cs_extension; /* Reserved or MCN/ISRC */ Uchar cs_min; /* Absolute time minutes */ Uchar cs_sec; /* Absolute time seconds */ Uchar cs_frame; /* Absolute time frames */ }; static int cw7501_attach(SCSI *usalp, cdr_t *dp); static int cw7501_init(SCSI *usalp, cdr_t *dp); static int cw7501_getdisktype(SCSI *usalp, cdr_t *dp); static int cw7501_speed_select(SCSI *usalp, cdr_t *dp, int *speedp); static int cw7501_next_wr_addr(SCSI *usalp, track_t *trackp, long *ap); static int cw7501_write(SCSI *usalp, caddr_t bp, long sectaddr, long size, int blocks, BOOL islast); static int cw7501_write_leadin(SCSI *usalp, cdr_t *dp, track_t *trackp); static int cw7501_open_track(SCSI *usalp, cdr_t *dp, track_t *trackp); static int cw7501_close_track(SCSI *usalp, cdr_t *dp, track_t *trackp); static int cw7501_open_session(SCSI *usalp, cdr_t *dp, track_t *trackp); static int cw7501_gen_cue(track_t *trackp, void *vcuep, BOOL needgap); static void fillcue(struct cw7501_cue *cp, int ca, int tno, int idx, int dataform, int scms, msf_t *mp); static int cw7501_send_cue(SCSI *usalp, cdr_t *dp, track_t *trackp); static int cw7501_fixate(SCSI *usalp, cdr_t *dp, track_t *trackp); static int cw7501_rezero(SCSI *usalp, int reset, int dwreset); static int cw7501_read_trackinfo(SCSI *usalp, Uchar *bp, int count, int track, int mode); static int cw7501_write_dao(SCSI *usalp, Uchar *bp, int len, int disktype); static int cw7501_reserve_track(SCSI *usalp, unsigned long); static int cw7501_set_mode(SCSI *usalp, int phys_form, int control, int subc, int alt, int trackno, int tindex, int packet_size, int write_mode); static int cw7501_finalize(SCSI *usalp, int pad, int fixed); cdr_t cdr_cw7501 = { 0, 0, /* * Prinzipiell geht auch: CDR_PACKET & CDR_SRAW96R */ CDR_TAO|CDR_SAO|CDR_TRAYLOAD, CDR_CDRW_NONE, 2, 2, "cw_7501", "driver for Matsushita/Panasonic CW-7501", 0, (dstat_t *)0, drive_identify, cw7501_attach, cw7501_init, cw7501_getdisktype, scsi_load, scsi_unload, buf_dummy, /* RD buffer cap not supp. */ cmd_dummy, /* recovery_needed */ (int(*)(SCSI *, cdr_t *, int))cmd_dummy, /* recover */ cw7501_speed_select, select_secsize, cw7501_next_wr_addr, cw7501_reserve_track, cw7501_write, cw7501_gen_cue, cw7501_send_cue, cw7501_write_leadin, cw7501_open_track, cw7501_close_track, cw7501_open_session, cmd_dummy, /* close seession */ cmd_dummy, /* abort */ read_session_offset, cw7501_fixate, cmd_dummy, /* stats */ blank_dummy, format_dummy, (int(*)(SCSI *, caddr_t, int, int))NULL, /* no OPC */ cmd_dummy, /* opt1 */ cmd_dummy, /* opt2 */ }; static const char *sd_cw7501_error_str[] = { "\100\201diagnostic failure on ROM", /* 40 81 */ "\100\202diagnostic failure on CPU internal RAM", /* 40 82 */ "\100\203diagnostic failure on BUFFER RAM", /* 40 83 */ "\100\204diagnostic failure on internal SCSI controller", /* 40 84 */ "\100\205diagnostic failure on system mechanism", /* 40 85 */ "\210\000Illegal Que Sheet (DAO parameter)", /* 88 00 */ "\211\000Inappropriate command", /* 89 00 */ "\250\000Audio Play operation Not in Progress", /* A8 00 */ "\251\000Buffer Overrun", /* A9 00 */ "\300\000Unrecordable Disk", /* C0 00 */ "\301\000Illegal Track Status", /* C1 00 */ "\302\000Reserved track Status", /* C2 00 */ "\304\000Illegal Reserve Length for Reserve Track Command", /* C4 00 */ "\304\001Illegal Data Form for Reserve Track Command", /* C4 01 */ "\304\002Unable to Reserve Track, Because Track Mode has been Changed", /* C4 02 */ "\305\000Buffer error during recording", /* C5 00 */ "\307\000Disk Style mismatch", /* C7 00 */ "\312\000Power Calibration error", /* CA 00 */ "\313\000Write error (Fatal Error/Time out)", /* CB 00 */ "\314\000Not enough space (Leadin/Leadout space)", /* CC 00 */ "\315\000No track present to finalize", /* CD 00 */ "\317\000Unable to recover damaged disk", /* CF 00 */ "\320\000PMA area full (1000 blocks)", /* D0 00 */ "\321\000PCA area full (100 counts)", /* D1 00 */ "\322\000Recovery failed", /* D2 00 */ "\323\000Recovery needed", /* D3 00 */ NULL }; static int cw7501_attach(SCSI *usalp, cdr_t *dp) { usal_setnonstderrs(usalp, sd_cw7501_error_str); return (0); } static int cw7501_init(SCSI *usalp, cdr_t *dp) { return (cw7501_speed_select(usalp, dp, NULL)); } static int cw7501_getdisktype(SCSI *usalp, cdr_t *dp) { Ulong maxb = 0; Uchar buf[256]; int ret; dstat_t *dsp = dp->cdr_dstat; if (xdebug > 0) { usalp->silent++; fillbytes((caddr_t)buf, sizeof (buf), '\0'); ret = cw7501_read_trackinfo(usalp, buf, 32, 0, 0); if (ret >= 0) usal_prbytes("TI EXIST-R (0): ", buf, 32 -usal_getresid(usalp)); fillbytes((caddr_t)buf, sizeof (buf), '\0'); ret = cw7501_read_trackinfo(usalp, buf, 32, 0, 1); if (ret >= 0) usal_prbytes("TI NWA (1): ", buf, 32 -usal_getresid(usalp)); fillbytes((caddr_t)buf, sizeof (buf), '\0'); ret = cw7501_read_trackinfo(usalp, buf, 32, 0, 2); if (ret >= 0) usal_prbytes("TI PMA (2): ", buf, 32 -usal_getresid(usalp)); fillbytes((caddr_t)buf, sizeof (buf), '\0'); ret = cw7501_read_trackinfo(usalp, buf, 32, 0, 3); if (ret >= 0) usal_prbytes("TI EXIST-ROM (3): ", buf, 32 -usal_getresid(usalp)); usalp->silent--; } fillbytes((caddr_t)buf, sizeof (buf), '\0'); usalp->silent++; ret = cw7501_read_trackinfo(usalp, buf, 12, 0, TI_NWA); if (ret < 0 && (dsp->ds_cdrflags & (RF_WRITE|RF_BLANK)) == RF_WRITE) { /* * Try to clear the dummy bit to reset the virtual * drive status. Not all drives support it even though * it is mentioned in the MMC standard. */ if (lverbose) printf("Trying to clear drive status.\n"); cw7501_rezero(usalp, 0, 1); wait_unit_ready(usalp, 60); ret = cw7501_read_trackinfo(usalp, buf, 12, 0, TI_NWA); } usalp->silent--; if (ret >= 0) { maxb = a_to_u_4_byte(&buf[8]); if (maxb != 0) maxb -= 150; } dsp->ds_maxblocks = maxb; return (drive_getdisktype(usalp, dp)); } static int cw7501_speed_select(SCSI *usalp, cdr_t *dp, int *speedp) { struct scsi_mode_page_header *mp; char mode[256]; int len = 20; int page = 0x20; struct cw7501_mode_page_20 *xp20; struct cw7501_mode_data md; int count; int speed = 1; BOOL dummy = (dp->cdr_cmdflags & F_DUMMY) != 0; if (speedp) { speed = *speedp; } else { fillbytes((caddr_t)mode, sizeof (mode), '\0'); if (!get_mode_params(usalp, page, "Speed information", (Uchar *)mode, (Uchar *)0, (Uchar *)0, (Uchar *)0, &len)) { return (-1); } if (len == 0) return (-1); mp = (struct scsi_mode_page_header *) (mode + sizeof (struct scsi_mode_header) + ((struct scsi_mode_header *)mode)->blockdesc_len); xp20 = (struct cw7501_mode_page_20 *)mp; speed = xp20->speed; } fillbytes((caddr_t)&md, sizeof (md), '\0'); count = sizeof (struct scsi_mode_header) + sizeof (struct cw7501_mode_page_20); md.pagex.page20.p_code = 0x20; md.pagex.page20.p_len = 0x02; md.pagex.page20.speed = speed; if (mode_select(usalp, (Uchar *)&md, count, 0, usalp->inq->data_format >= 2) < 0) return (-1); fillbytes((caddr_t)&md, sizeof (md), '\0'); count = sizeof (struct scsi_mode_header) + sizeof (struct cw7501_mode_page_23); md.pagex.page23.p_code = 0x23; md.pagex.page23.p_len = 0x02; md.pagex.page23.dummy = dummy?1:0; return (mode_select(usalp, (Uchar *)&md, count, 0, usalp->inq->data_format >= 2)); } static int cw7501_next_wr_addr(SCSI *usalp, track_t *trackp, long *ap) { struct cw7501_nwa *nwa; Uchar buf[256]; long next_addr; int result = -1; /* * Reading info for current track may require doing the read_track_info * with either the track number (if the track is currently being written) * or with 0 (if the track hasn't been started yet and is invisible */ nwa = (struct cw7501_nwa *)buf; if (trackp != 0 && trackp->track > 0 && is_packet(trackp)) { fillbytes((caddr_t)buf, sizeof (buf), '\0'); usalp->silent++; result = cw7501_read_trackinfo(usalp, buf, sizeof (*nwa), trackp->trackno, TI_NWA); usalp->silent--; } if (result < 0) { if (cw7501_read_trackinfo(usalp, buf, sizeof (*nwa), 0, TI_NWA) < 0) return (-1); } if (usalp->verbose) usal_prbytes("track info:", buf, 12-usal_getresid(usalp)); next_addr = a_to_4_byte(&nwa->nwa_nwa); /* * XXX Für TAO definitiv notwendig. * XXX ABhängig von Auto-Pregap? */ /* XXX */ next_addr += 150; if (ap) *ap = next_addr; return (0); } static int cw7501_write(SCSI *usalp, caddr_t bp /* address of buffer */, long sectaddr /* disk address (sector) to put */, long size /* number of bytes to transfer */, int blocks /* sector count */, BOOL islast /* last write for track */) { if (lverbose > 1 && islast) printf("\nWriting last record for this track.\n"); return (write_xg0(usalp, bp, 0, size, blocks)); } static int cw7501_write_leadin(SCSI *usalp, cdr_t *dp, track_t *trackp) { Uint i; long startsec = 0L; if (wm_base(dp->cdr_dstat->ds_wrmode) == WM_SAO) { if (debug || lverbose) { printf("Sending CUE sheet...\n"); flush(); } if ((*dp->cdr_send_cue)(usalp, dp, trackp) < 0) { errmsgno(EX_BAD, "Cannot send CUE sheet.\n"); return (-1); } /* * Next writable address function does not work in DAO * mode for this writer, so we just assume -150. */ startsec = -150; if (debug) printf("SAO startsec: %ld\n", startsec); if (trackp[0].flags & TI_TEXT) { errmsgno(EX_BAD, "CD-Text unsupported in CW-7501 - ignoring.\n"); } else for (i = 1; i <= trackp->tracks; i++) { trackp[i].trackstart += startsec +150; } } return (0); } static Uchar db2phys[] = { 0x00, /* 0 2352 bytes of raw data */ 0xFF, /* 1 2368 bytes (raw data + P/Q Subchannel) */ 0xFF, /* 2 2448 bytes (raw data + P-W Subchannel) */ 0xFF, /* 3 2448 bytes (raw data + P-W raw Subchannel)*/ 0xFF, /* 4 - Reserved */ 0xFF, /* 5 - Reserved */ 0xFF, /* 6 - Reserved */ 0xFF, /* 7 - Vendor specific */ 0x02, /* 8 2048 bytes Mode 1 (ISO/IEC 10149) */ 0x03, /* 9 2336 bytes Mode 2 (ISO/IEC 10149) */ 0xFF, /* 10 2048 bytes Mode 2 (CD-ROM XA form 1) */ 0x04, /* 11 2056 bytes Mode 2 (CD-ROM XA form 1) */ 0xFF, /* 12 2324 bytes Mode 2 (CD-ROM XA form 2) */ 0x08, /* 13 2332 bytes Mode 2 (CD-ROM XA 1/2+subhdr) */ 0xFF, /* 14 - Reserved */ 0xFF, /* 15 - Vendor specific */ }; static int cw7501_open_track(SCSI *usalp, cdr_t *dp, track_t *trackp) { struct scsi_mode_page_header *mp; Uchar mode[256]; int len = 0; int page = 0x23; struct cw7501_mode_page_23 *xp23; if (!is_tao(trackp) && !is_packet(trackp)) { if (trackp->pregapsize > 0 && (trackp->flags & TI_PREGAP) == 0) { if (lverbose) { printf("Writing pregap for track %d at %ld\n", (int)trackp->trackno, trackp->trackstart-trackp->pregapsize); } /* * XXX Do we need to check isecsize too? */ pad_track(usalp, dp, trackp, trackp->trackstart-trackp->pregapsize, (Llong)trackp->pregapsize*trackp->secsize, FALSE, 0); } return (0); } if (select_secsize(usalp, trackp->secsize) < 0) return (-1); if (!get_mode_params(usalp, page, "Dummy/autopg information", (Uchar *)mode, (Uchar *)0, (Uchar *)0, (Uchar *)0, &len)) { return (-1); } if (len == 0) return (-1); mp = (struct scsi_mode_page_header *) (mode + sizeof (struct scsi_mode_header) + ((struct scsi_mode_header *)mode)->blockdesc_len); xp23 = (struct cw7501_mode_page_23 *)mp; xp23->autopg = 1; if (!set_mode_params(usalp, "Dummy/autopg page", mode, len, 0, trackp->secsize)) return (-1); /* * Set write modes for next track. */ if (cw7501_set_mode(usalp, db2phys[trackp->dbtype & 0x0F], st2mode[trackp->sectype&ST_MASK] | (is_copy(trackp) ? TM_ALLOW_COPY : 0), 0, is_scms(trackp) ? 1 : 0, trackp->trackno, 1, 0, /* write mode TAO */ 0x01) < 0) return (-1); return (0); } static int cw7501_close_track(SCSI *usalp, cdr_t *dp, track_t *trackp) { if (!is_tao(trackp) && !is_packet(trackp)) { return (0); } return (scsi_flush_cache(usalp, FALSE)); } static int cw7501_open_session(SCSI *usalp, cdr_t *dp, track_t *trackp) { struct cw7501_mode_data md; int count; if (select_secsize(usalp, 2048) < 0) return (-1); /* * Disable Auto Pregap when writing in SAO mode. */ if (!is_tao(trackp) && !is_packet(trackp)) { struct scsi_mode_page_header *mp; Uchar mode[256]; int len = 0; int page = 0x23; struct cw7501_mode_page_23 *xp23; if (!get_mode_params(usalp, page, "Dummy/autopg information", (Uchar *)mode, (Uchar *)0, (Uchar *)0, (Uchar *)0, &len)) { return (-1); } if (len == 0) return (-1); mp = (struct scsi_mode_page_header *) (mode + sizeof (struct scsi_mode_header) + ((struct scsi_mode_header *)mode)->blockdesc_len); xp23 = (struct cw7501_mode_page_23 *)mp; xp23->autopg = 0; if (!set_mode_params(usalp, "Dummy/autopg page", mode, len, 0, trackp->secsize)) return (-1); return (0); } /* * Set Disk Type and Disk ID. */ fillbytes((caddr_t)&md, sizeof (md), '\0'); count = sizeof (struct scsi_mode_header) + sizeof (struct cw7501_mode_page_24); md.pagex.page24.p_code = 0x24; md.pagex.page24.p_len = 0x0A; md.pagex.page24.disktype = toc2sess[track_base(trackp)->tracktype & TOC_MASK]; i_to_4_byte(&md.pagex.page24.disk_id, 0x12345); return (mode_select(usalp, (Uchar *)&md, count, 0, usalp->inq->data_format >= 2)); } static int cw7501_fixate(SCSI *usalp, cdr_t *dp, track_t *trackp) { if (!is_tao(trackp) && !is_packet(trackp)) { return (scsi_flush_cache(usalp, FALSE)); } /* * 0x00 Finalize Disk (not appendable) * 0x01 Finalize Session (allow next session) * 0x10 Finalize track (variable packet writing) - Must fluch cache before */ return (cw7501_finalize(usalp, 0, (track_base(trackp)->tracktype & TOCF_MULTI) ? 0x01 : 0x00)); } /*--------------------------------------------------------------------------*/ static int cw7501_gen_cue(track_t *trackp, void *vcuep, BOOL needgap) { int tracks = trackp->tracks; int i; struct cw7501_cue **cuep = vcuep; struct cw7501_cue *cue; struct cw7501_cue *cp; int ncue = 0; int icue = 0; int pgsize; msf_t m; int ctl; int df; int scms; cue = malloc(1); for (i = 0; i <= tracks; i++) { ctl = (st2mode[trackp[i].sectype & ST_MASK]) << 4; if (is_copy(&trackp[i])) ctl |= TM_ALLOW_COPY << 4; df = db2phys[trackp[i].dbtype & 0x0F]; if (trackp[i].isrc) { /* MCN or ISRC */ ncue += 2; cue = realloc(cue, ncue * sizeof (*cue)); cp = &cue[icue++]; if (i == 0) { cp->cs_ctladr = 0x02; movebytes(&trackp[i].isrc[0], &cp->cs_tno, 7); cp = &cue[icue++]; cp->cs_ctladr = 0x02; movebytes(&trackp[i].isrc[7], &cp->cs_tno, 7); } else { cp->cs_ctladr = 0x03; cp->cs_tno = i; movebytes(&trackp[i].isrc[0], &cp->cs_index, 6); cp = &cue[icue++]; cp->cs_ctladr = 0x03; cp->cs_tno = i; movebytes(&trackp[i].isrc[6], &cp->cs_index, 6); } } if (i == 0) { /* Lead in */ lba_to_msf(-150, &m); cue = realloc(cue, ++ncue * sizeof (*cue)); cp = &cue[icue++]; fillcue(cp, ctl|0x01, i, 0, df, 0, &m); } else { scms = 0; if (is_scms(&trackp[i])) scms = 0x80; pgsize = trackp[i].pregapsize; if (pgsize == 0 && needgap) pgsize++; lba_to_msf(trackp[i].trackstart-pgsize, &m); cue = realloc(cue, ++ncue * sizeof (*cue)); cp = &cue[icue++]; fillcue(cp, ctl|0x01, i, 0, df, scms, &m); if (trackp[i].nindex == 1) { lba_to_msf(trackp[i].trackstart, &m); cue = realloc(cue, ++ncue * sizeof (*cue)); cp = &cue[icue++]; fillcue(cp, ctl|0x01, i, 1, df, scms, &m); } else { int idx; long *idxlist; ncue += trackp[i].nindex; idxlist = trackp[i].tindex; cue = realloc(cue, ncue * sizeof (*cue)); for (idx = 1; idx <= trackp[i].nindex; idx++) { lba_to_msf(trackp[i].trackstart + idxlist[idx], &m); cp = &cue[icue++]; fillcue(cp, ctl|0x01, i, idx, df, scms, &m); } } } } /* Lead out */ ctl = (st2mode[trackp[tracks+1].sectype & ST_MASK]) << 4; df = db2phys[trackp[tracks+1].dbtype & 0x0F]; lba_to_msf(trackp[tracks+1].trackstart, &m); cue = realloc(cue, ++ncue * sizeof (*cue)); cp = &cue[icue++]; fillcue(cp, ctl|0x01, 0xAA, 1, df, 0, &m); if (lverbose > 1) { for (i = 0; i < ncue; i++) { usal_prbytes("", (Uchar *)&cue[i], 8); } } if (cuep) *cuep = cue; else free(cue); return (ncue); } static void fillcue(struct cw7501_cue *cp /* The target cue entry */, int ca /* Control/adr for this entry */, int tno /* Track number for this entry */, int idx /* Index for this entry */, int dataform /* Data format for this entry */, int scms /* Serial copy management */, msf_t *mp /* MSF value for this entry */) { cp->cs_ctladr = ca; if (tno <= 99) cp->cs_tno = to_bcd(tno); else cp->cs_tno = tno; cp->cs_index = to_bcd(idx); if (scms != 0) dataform |= 0x10; cp->cs_dataform = dataform; cp->cs_extension = 0; cp->cs_min = to_bcd(mp->msf_min); cp->cs_sec = to_bcd(mp->msf_sec); cp->cs_frame = to_bcd(mp->msf_frame); } static int cw7501_send_cue(SCSI *usalp, cdr_t *dp, track_t *trackp) { struct cw7501_cue *cp; int ncue; int ret; Uint i; struct timeval starttime; struct timeval stoptime; int disktype; disktype = toc2sess[track_base(trackp)->tracktype & TOC_MASK]; for (i = 1; i <= trackp->tracks; i++) { if (trackp[i].tracksize < (tsize_t)0) { errmsgno(EX_BAD, "Track %d has unknown length.\n", i); return (-1); } } ncue = (*dp->cdr_gen_cue)(trackp, &cp, FALSE); starttime.tv_sec = 0; starttime.tv_usec = 0; stoptime = starttime; gettimeofday(&starttime, (struct timezone *)0); usalp->silent++; ret = cw7501_write_dao(usalp, (Uchar *)cp, ncue*8, disktype); usalp->silent--; free(cp); if (ret < 0) { errmsgno(EX_BAD, "CUE sheet not accepted. Retrying with minimum pregapsize = 1.\n"); ncue = (*dp->cdr_gen_cue)(trackp, &cp, TRUE); ret = cw7501_write_dao(usalp, (Uchar *)cp, ncue*8, disktype); free(cp); } if (ret >= 0 && lverbose) { gettimeofday(&stoptime, (struct timezone *)0); prtimediff("Write Lead-in time: ", &starttime, &stoptime); } return (ret); } /*--------------------------------------------------------------------------*/ static int cw7501_rezero(SCSI *usalp, int reset, int dwreset) { register struct usal_cmd *scmd = usalp->scmd; fillbytes((caddr_t)scmd, sizeof (*scmd), '\0'); scmd->addr = (caddr_t)0; scmd->size = 0; scmd->flags = SCG_DISRE_ENA; scmd->cdb_len = SC_G0_CDBLEN; scmd->sense_len = CCS_SENSE_LEN; scmd->cdb.g0_cdb.cmd = SC_REZERO_UNIT; scmd->cdb.g0_cdb.lun = usal_lun(usalp); scmd->cdb.cmd_cdb[5] |= reset ? 0x80 : 0; scmd->cdb.cmd_cdb[5] |= dwreset ? 0x40 : 0; usalp->cmdname = "cw7501 rezero"; return (usal_cmd(usalp)); } static int cw7501_read_trackinfo(SCSI *usalp, Uchar *bp, int count, int track, int mode) { register struct usal_cmd *scmd = usalp->scmd; fillbytes((caddr_t) scmd, sizeof (*scmd), '\0'); scmd->addr = (caddr_t)bp; scmd->size = count; scmd->flags = SCG_RECV_DATA | SCG_DISRE_ENA; scmd->cdb_len = SC_G1_CDBLEN; scmd->sense_len = CCS_SENSE_LEN; scmd->cdb.g1_cdb.cmd = 0xE9; scmd->cdb.g1_cdb.lun = usal_lun(usalp); scmd->cdb.cmd_cdb[6] = track; g1_cdblen(&scmd->cdb.g1_cdb, count); scmd->cdb.cmd_cdb[9] = (mode & 3) << 6; usalp->cmdname = "cw7501 read_track_information"; if (usal_cmd(usalp) < 0) return (-1); return (0); } static int cw7501_write_dao(SCSI *usalp, Uchar *bp, int len, int disktype) { register struct usal_cmd *scmd = usalp->scmd; fillbytes((caddr_t)scmd, sizeof (*scmd), '\0'); scmd->addr = (caddr_t)bp; scmd->size = len; scmd->flags = SCG_DISRE_ENA; scmd->cdb_len = SC_G1_CDBLEN; scmd->sense_len = CCS_SENSE_LEN; scmd->cdb.g1_cdb.cmd = 0xE6; scmd->cdb.g1_cdb.lun = usal_lun(usalp); scmd->cdb.cmd_cdb[2] = disktype; g1_cdblen(&scmd->cdb.g1_cdb, len); usalp->cmdname = "cw7501 write_dao"; if (usal_cmd(usalp) < 0) return (-1); return (0); } /* * XXX CW-7501 also needs "control", so we need to make a different * XXX driver interface. */ static int cw7501_reserve_track(SCSI *usalp, unsigned long len) { register struct usal_cmd *scmd = usalp->scmd; fillbytes((caddr_t)scmd, sizeof (*scmd), '\0'); scmd->flags = SCG_DISRE_ENA; scmd->cdb_len = SC_G1_CDBLEN; scmd->sense_len = CCS_SENSE_LEN; scmd->cdb.g1_cdb.cmd = 0xE7; scmd->cdb.g1_cdb.lun = usal_lun(usalp); /* scmd->cdb.cmd_cdb[2] = control & 0x0F;*/ i_to_4_byte(&scmd->cdb.cmd_cdb[5], len); usalp->cmdname = "cw7501 reserve_track"; comerrno(EX_BAD, "Control (as in set mode) missing.\n"); if (usal_cmd(usalp) < 0) return (-1); return (0); } static int cw7501_set_mode(SCSI *usalp, int phys_form, int control, int subc, int alt, int trackno, int tindex, int packet_size, int write_mode) { register struct usal_cmd *scmd = usalp->scmd; fillbytes((caddr_t)scmd, sizeof (*scmd), '\0'); scmd->flags = SCG_DISRE_ENA; scmd->cdb_len = SC_G1_CDBLEN; scmd->sense_len = CCS_SENSE_LEN; scmd->cdb.g1_cdb.cmd = 0xE2; scmd->cdb.g1_cdb.lun = usal_lun(usalp); scmd->cdb.cmd_cdb[2] = phys_form & 0x0F; scmd->cdb.cmd_cdb[3] = (control & 0x0F) << 4; scmd->cdb.cmd_cdb[3] |= subc ? 2 : 0; scmd->cdb.cmd_cdb[3] |= alt ? 1 : 0; scmd->cdb.cmd_cdb[4] = trackno; scmd->cdb.cmd_cdb[5] = tindex; i_to_3_byte(&scmd->cdb.cmd_cdb[6], packet_size); scmd->cdb.cmd_cdb[9] = (write_mode & 0x03) << 6; usalp->cmdname = "cw7501 set_mode"; if (usal_cmd(usalp) < 0) return (-1); return (0); } static int cw7501_finalize(SCSI *usalp, int pad, int fixed) { register struct usal_cmd *scmd = usalp->scmd; fillbytes((caddr_t)scmd, sizeof (*scmd), '\0'); scmd->flags = SCG_DISRE_ENA; scmd->cdb_len = SC_G1_CDBLEN; scmd->sense_len = CCS_SENSE_LEN; scmd->timeout = 8 * 60; /* Needs up to 4 minutes */ scmd->cdb.g1_cdb.cmd = 0xE3; scmd->cdb.g1_cdb.lun = usal_lun(usalp); scmd->cdb.cmd_cdb[1] = pad ? 1 : 0; scmd->cdb.cmd_cdb[8] = fixed & 0x03; usalp->cmdname = "cw7501 finalize"; if (usal_cmd(usalp) < 0) return (-1); return (0); }