diff options
Diffstat (limited to 'wodim/drv_philips.c')
| -rw-r--r-- | wodim/drv_philips.c | 1346 |
1 files changed, 1346 insertions, 0 deletions
diff --git a/wodim/drv_philips.c b/wodim/drv_philips.c new file mode 100644 index 0000000..13cf8ed --- /dev/null +++ b/wodim/drv_philips.c @@ -0,0 +1,1346 @@ +/* + * 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_philips.c 1.69 05/05/16 Copyright 1997-2005 J. Schilling */ +/* + * CDR device implementation for + * Philips/Yamaha/Ricoh/Plasmon + * + * Copyright (c) 1997-2005 J. Schilling + */ +/* + * 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. + */ + +#include <mconfig.h> + +#include <stdio.h> +#include <unixstd.h> /* Include sys/types.h to make off_t available */ +#include <standard.h> +#include <intcvt.h> +#include <schily.h> + +#include <usal/scsireg.h> +#include <usal/scsitransp.h> +#include <usal/usalcmd.h> +#include <usal/scsidefs.h> /* XXX Only for DEV_RICOH_RO_1060C */ + +#include "wodim.h" + +extern int debug; +extern int lverbose; + +static int load_unload_philips(SCSI *usalp, int); +static int philips_load(SCSI *usalp, cdr_t *dp); +static int philips_unload(SCSI *usalp, cdr_t *dp); +static int philips_dumbload(SCSI *usalp, cdr_t *dp); +static int philips_dumbunload(SCSI *usalp, cdr_t *dp); +static int plasmon_buf(SCSI *, long *, long *); +static int recover_philips(SCSI *usalp, cdr_t *dp, int); +static int speed_select_yamaha(SCSI *usalp, cdr_t *dp, int *speedp); +static int speed_select_philips(SCSI *usalp, cdr_t *dp, int *speedp); +static int speed_select_oldphilips(SCSI *usalp, cdr_t *dp, int *speedp); +static int speed_select_dumbphilips(SCSI *usalp, cdr_t *dp, int *speedp); +static int speed_select_pioneer(SCSI *usalp, cdr_t *dp, int *speedp); +static int philips_init(SCSI *usalp, cdr_t *dp); +static int philips_getdisktype(SCSI *usalp, cdr_t *dp); +static BOOL capacity_philips(SCSI *usalp, long *lp); +static int first_writable_addr_philips(SCSI *usalp, long *, int, int, int, + int); +static int next_wr_addr_philips(SCSI *usalp, track_t *trackp, long *ap); +static int reserve_track_philips(SCSI *usalp, unsigned long); +static int scsi_cdr_write_philips(SCSI *usalp, caddr_t bp, long sectaddr, + long size, int blocks, BOOL islast); +static int write_track_info_philips(SCSI *usalp, int); +static int write_track_philips(SCSI *usalp, long, int); +static int open_track_philips(SCSI *usalp, cdr_t *dp, track_t *trackp); +static int open_track_plasmon(SCSI *usalp, cdr_t *dp, track_t *trackp); +static int open_track_oldphilips(SCSI *usalp, cdr_t *dp, track_t *trackp); +static int open_track_yamaha(SCSI *usalp, cdr_t *dp, track_t *trackp); +static int close_track_philips(SCSI *usalp, cdr_t *dp, track_t *trackp); +static int fixation_philips(SCSI *usalp, cdr_t *dp, track_t *trackp); + +static int philips_attach(SCSI *usalp, cdr_t *); +static int plasmon_attach(SCSI *usalp, cdr_t *); +static int ricoh_attach(SCSI *usalp, cdr_t *); +static int philips_getlilo(SCSI *usalp, long *lilenp, long *lolenp); + + +struct cdd_52x_mode_page_21 { /* write track information */ + MP_P_CODE; /* parsave & pagecode */ + Uchar p_len; /* 0x0E = 14 Bytes */ + Uchar res_2; + Uchar sectype; + Uchar track; + Uchar ISRC[9]; + Uchar res[2]; +}; + +struct cdd_52x_mode_page_23 { /* speed selection */ + MP_P_CODE; /* parsave & pagecode */ + Uchar p_len; /* 0x06 = 6 Bytes */ + Uchar speed; + Uchar dummy; + Uchar res[4]; + +}; + +#if defined(_BIT_FIELDS_LTOH) /* Intel byteorder */ + +struct yamaha_mode_page_31 { /* drive configuration */ + MP_P_CODE; /* parsave & pagecode */ + Uchar p_len; /* 0x02 = 2 Bytes */ + Uchar res; + Ucbit dummy : 4; + Ucbit speed : 4; +}; + +#else /* Motorola byteorder */ + +struct yamaha_mode_page_31 { /* drive configuration */ + MP_P_CODE; /* parsave & pagecode */ + Uchar p_len; /* 0x02 = 2 Bytes */ + Uchar res; + Ucbit speed : 4; + Ucbit dummy : 4; +}; +#endif + +struct cdd_52x_mode_data { + struct scsi_mode_header header; + union cdd_pagex { + struct cdd_52x_mode_page_21 page21; + struct cdd_52x_mode_page_23 page23; + struct yamaha_mode_page_31 page31; + } pagex; +}; + + +cdr_t cdr_philips_cdd521O = { + 0, 0, + CDR_TAO|CDR_TRAYLOAD, + CDR_CDRW_NONE, + 2, 2, + "philips_cdd521_old", + "driver for Philips old CDD-521", + 0, + (dstat_t *)0, + drive_identify, + philips_attach, + philips_init, + philips_getdisktype, + philips_load, + philips_unload, + buf_dummy, + recovery_needed, + recover_philips, + speed_select_oldphilips, + select_secsize, + next_wr_addr_philips, + reserve_track_philips, + scsi_cdr_write_philips, + (int(*)(track_t *, void *, BOOL))cmd_dummy, /* gen_cue */ + no_sendcue, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, /* leadin */ + open_track_oldphilips, + close_track_philips, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, + cmd_dummy, + cmd_dummy, /* abort */ + read_session_offset_philips, + fixation_philips, + cmd_dummy, /* stats */ + blank_dummy, + format_dummy, + (int(*)(SCSI *, caddr_t, int, int))NULL, /* no OPC */ + cmd_dummy, /* opt1 */ + cmd_dummy, /* opt2 */ +}; + +cdr_t cdr_philips_dumb = { + 0, 0, + CDR_TAO|CDR_TRAYLOAD, + CDR_CDRW_NONE, + 2, 2, + "philips_dumb", + "driver for Philips CDD-521 with pessimistic assumptions", + 0, + (dstat_t *)0, + drive_identify, + philips_attach, + philips_init, + philips_getdisktype, + philips_dumbload, + philips_dumbunload, + buf_dummy, + recovery_needed, + recover_philips, + speed_select_dumbphilips, + select_secsize, + next_wr_addr_philips, + reserve_track_philips, + scsi_cdr_write_philips, + (int(*)(track_t *, void *, BOOL))cmd_dummy, /* gen_cue */ + no_sendcue, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, /* leadin */ + open_track_oldphilips, + close_track_philips, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, + cmd_dummy, + cmd_dummy, /* abort */ + read_session_offset_philips, + fixation_philips, + cmd_dummy, /* stats */ + blank_dummy, + format_dummy, + (int(*)(SCSI *, caddr_t, int, int))NULL, /* no OPC */ + cmd_dummy, /* opt1 */ + cmd_dummy, /* opt2 */ +}; + +cdr_t cdr_philips_cdd521 = { + 0, 0, + CDR_TAO|CDR_TRAYLOAD, + CDR_CDRW_NONE, + 2, 2, + "philips_cdd521", + "driver for Philips CDD-521", + 0, + (dstat_t *)0, + drive_identify, + philips_attach, + philips_init, + philips_getdisktype, + philips_load, + philips_unload, + buf_dummy, + recovery_needed, + recover_philips, + speed_select_philips, + select_secsize, + next_wr_addr_philips, + reserve_track_philips, + scsi_cdr_write_philips, + (int(*)(track_t *, void *, BOOL))cmd_dummy, /* gen_cue */ + no_sendcue, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, /* leadin */ + open_track_philips, + close_track_philips, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, + cmd_dummy, + cmd_dummy, /* abort */ + read_session_offset_philips, + fixation_philips, + cmd_dummy, /* stats */ + blank_dummy, + format_dummy, + (int(*)(SCSI *, caddr_t, int, int))NULL, /* no OPC */ + cmd_dummy, /* opt1 */ + cmd_dummy, /* opt2 */ +}; + +cdr_t cdr_philips_cdd522 = { + 0, 0, +/* CDR_TAO|CDR_SAO|CDR_TRAYLOAD,*/ + CDR_TAO|CDR_TRAYLOAD, + CDR_CDRW_NONE, + 2, 2, + "philips_cdd522", + "driver for Philips CDD-522", + 0, + (dstat_t *)0, + drive_identify, + philips_attach, + philips_init, + philips_getdisktype, + philips_load, + philips_unload, + buf_dummy, + recovery_needed, + recover_philips, + speed_select_philips, + select_secsize, + next_wr_addr_philips, + reserve_track_philips, + scsi_cdr_write_philips, + (int(*)(track_t *, void *, BOOL))cmd_dummy, /* gen_cue */ + no_sendcue, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, /* leadin */ + open_track_philips, + close_track_philips, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, + cmd_dummy, + cmd_dummy, /* abort */ + read_session_offset_philips, + fixation_philips, + cmd_dummy, /* stats */ + blank_dummy, + format_dummy, + (int(*)(SCSI *, caddr_t, int, int))NULL, /* no OPC */ + cmd_dummy, /* opt1 */ + cmd_dummy, /* opt2 */ +}; + +cdr_t cdr_tyuden_ew50 = { + 0, 0, + CDR_TAO|CDR_TRAYLOAD|CDR_SWABAUDIO, + CDR_CDRW_NONE, + 2, 2, + "tyuden_ew50", + "driver for Taiyo Yuden EW-50", + 0, + (dstat_t *)0, + drive_identify, + philips_attach, + philips_init, + philips_getdisktype, + philips_load, + philips_unload, + buf_dummy, + recovery_needed, + recover_philips, + speed_select_philips, + select_secsize, + next_wr_addr_philips, + reserve_track_philips, + scsi_cdr_write_philips, + (int(*)(track_t *, void *, BOOL))cmd_dummy, /* gen_cue */ + no_sendcue, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, /* leadin */ + open_track_philips, + close_track_philips, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, + cmd_dummy, + cmd_dummy, /* abort */ + read_session_offset_philips, + fixation_philips, + cmd_dummy, /* stats */ + blank_dummy, + format_dummy, + (int(*)(SCSI *, caddr_t, int, int))NULL, /* no OPC */ + cmd_dummy, /* opt1 */ + cmd_dummy, /* opt2 */ +}; + +cdr_t cdr_kodak_pcd600 = { + 0, 0, + CDR_TAO|CDR_TRAYLOAD, + CDR_CDRW_NONE, + 6, 6, + "kodak_pcd_600", + "driver for Kodak PCD-600", + 0, + (dstat_t *)0, + drive_identify, + philips_attach, + philips_init, + philips_getdisktype, + philips_load, + philips_unload, + buf_dummy, + recovery_needed, + recover_philips, + speed_select_philips, + select_secsize, + next_wr_addr_philips, + reserve_track_philips, + scsi_cdr_write_philips, + (int(*)(track_t *, void *, BOOL))cmd_dummy, /* gen_cue */ + no_sendcue, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, /* leadin */ + open_track_oldphilips, + close_track_philips, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, + cmd_dummy, + cmd_dummy, /* abort */ + read_session_offset_philips, + fixation_philips, + cmd_dummy, /* stats */ + blank_dummy, + format_dummy, + (int(*)(SCSI *, caddr_t, int, int))NULL, /* no OPC */ + cmd_dummy, /* opt1 */ + cmd_dummy, /* opt2 */ +}; + +cdr_t cdr_plasmon_rf4100 = { + 0, 0, + CDR_TAO|CDR_TRAYLOAD, + CDR_CDRW_NONE, + 2, 4, + "plasmon_rf4100", + "driver for Plasmon RF 4100", + 0, + (dstat_t *)0, + drive_identify, + plasmon_attach, + philips_init, + philips_getdisktype, + philips_load, + philips_unload, + plasmon_buf, + recovery_needed, + recover_philips, + speed_select_philips, + select_secsize, + next_wr_addr_philips, + reserve_track_philips, + scsi_cdr_write_philips, + (int(*)(track_t *, void *, BOOL))cmd_dummy, /* gen_cue */ + no_sendcue, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, /* leadin */ + open_track_plasmon, + close_track_philips, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, + cmd_dummy, + cmd_dummy, /* abort */ + read_session_offset_philips, + fixation_philips, + cmd_dummy, /* stats */ + blank_dummy, + format_dummy, + (int(*)(SCSI *, caddr_t, int, int))NULL, /* no OPC */ + cmd_dummy, /* opt1 */ + cmd_dummy, /* opt2 */ +}; + +cdr_t cdr_pioneer_dw_s114x = { + 0, 0, + CDR_TAO|CDR_TRAYLOAD|CDR_SWABAUDIO, + CDR_CDRW_NONE, + 2, 4, + "pioneer_dws114x", + "driver for Pioneer DW-S114X", + 0, + (dstat_t *)0, + drive_identify, + philips_attach, + philips_init, + philips_getdisktype, + scsi_load, + scsi_unload, + buf_dummy, + recovery_needed, + recover_philips, + speed_select_pioneer, + select_secsize, + next_wr_addr_philips, + reserve_track_philips, + scsi_cdr_write_philips, + (int(*)(track_t *, void *, BOOL))cmd_dummy, /* gen_cue */ + no_sendcue, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, /* leadin */ +/* open_track_yamaha,*/ +/*???*/ open_track_oldphilips, + close_track_philips, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, + cmd_dummy, + cmd_dummy, /* abort */ + read_session_offset_philips, + fixation_philips, + cmd_dummy, /* stats */ + blank_dummy, + format_dummy, + (int(*)(SCSI *, caddr_t, int, int))NULL, /* no OPC */ + cmd_dummy, /* opt1 */ + cmd_dummy, /* opt2 */ +}; + +cdr_t cdr_yamaha_cdr100 = { + 0, 0, +/* CDR_TAO|CDR_SAO|CDR_CADDYLOAD|CDR_SWABAUDIO,*/ + CDR_TAO|CDR_CADDYLOAD|CDR_SWABAUDIO, + CDR_CDRW_NONE, + 2, 4, + "yamaha_cdr100", + "driver for Yamaha CDR-100 / CDR-102", + 0, + (dstat_t *)0, + drive_identify, + philips_attach, + philips_init, + drive_getdisktype, + scsi_load, + philips_unload, + buf_dummy, + recovery_needed, + recover_philips, + speed_select_yamaha, + select_secsize, + next_wr_addr_philips, + reserve_track_philips, + scsi_cdr_write_philips, + (int(*)(track_t *, void *, BOOL))cmd_dummy, /* gen_cue */ + no_sendcue, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, /* leadin */ + open_track_yamaha, + close_track_philips, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, + cmd_dummy, + cmd_dummy, /* abort */ + read_session_offset_philips, + fixation_philips, + cmd_dummy, /* stats */ + blank_dummy, + format_dummy, + (int(*)(SCSI *, caddr_t, int, int))NULL, /* no OPC */ + cmd_dummy, /* opt1 */ + cmd_dummy, /* opt2 */ +}; + +cdr_t cdr_ricoh_ro1060 = { + 0, 0, +/* CDR_TAO|CDR_SAO|CDR_CADDYLOAD,*/ + CDR_TAO|CDR_CADDYLOAD, + CDR_CDRW_NONE, + 2, 2, + "ricoh_ro1060c", + "driver for Ricoh RO-1060C", + 0, + (dstat_t *)0, + drive_identify, + ricoh_attach, + philips_init, + philips_getdisktype, + scsi_load, + scsi_unload, + buf_dummy, + recovery_needed, + recover_philips, + speed_select_yamaha, + select_secsize, + next_wr_addr_philips, + reserve_track_philips, + scsi_cdr_write_philips, + (int(*)(track_t *, void *, BOOL))cmd_dummy, /* gen_cue */ + no_sendcue, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, /* leadin */ + open_track_philips, + close_track_philips, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, + cmd_dummy, + cmd_dummy, /* abort */ + read_session_offset_philips, + fixation_philips, + cmd_dummy, /* stats */ + blank_dummy, + format_dummy, + (int(*)(SCSI *, caddr_t, int, int))NULL, /* no OPC */ + cmd_dummy, /* opt1 */ + cmd_dummy, /* opt2 */ +}; + +cdr_t cdr_ricoh_ro1420 = { + 0, 0, +/* CDR_TAO|CDR_SAO|CDR_CADDYLOAD,*/ + CDR_TAO|CDR_CADDYLOAD, + CDR_CDRW_NONE, + 2, 2, + "ricoh_ro1420c", + "driver for Ricoh RO-1420C", + 0, + (dstat_t *)0, + drive_identify, + ricoh_attach, + philips_init, + philips_getdisktype, + scsi_load, + scsi_unload, + buf_dummy, + recovery_needed, + recover_philips, + speed_select_yamaha, + select_secsize, + next_wr_addr_philips, + reserve_track_philips, + scsi_cdr_write_philips, + (int(*)(track_t *, void *, BOOL))cmd_dummy, /* gen_cue */ + no_sendcue, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, /* leadin */ + open_track_philips, + close_track_philips, + (int(*)(SCSI *, cdr_t *, track_t *))cmd_dummy, + cmd_dummy, + cmd_dummy, /* abort */ + read_session_offset_philips, + fixation_philips, + cmd_dummy, /* stats */ + blank_dummy, + format_dummy, + (int(*)(SCSI *, caddr_t, int, int))NULL, /* no OPC */ + cmd_dummy, /* opt1 */ + cmd_dummy, /* opt2 */ +}; + + +static int load_unload_philips(SCSI *usalp, int load) +{ + 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.g1_cdb.count[1] = !load; + + usalp->cmdname = "philips medium load/unload"; + + if (usal_cmd(usalp) < 0) + return (-1); + return (0); +} + +static int +philips_load(SCSI *usalp, cdr_t *dp) +{ + return (load_unload_philips(usalp, 1)); +} + +static int +philips_unload(SCSI *usalp, cdr_t *dp) +{ + return (load_unload_philips(usalp, 0)); +} + +static int +philips_dumbload(SCSI *usalp, cdr_t *dp) +{ + int ret; + + usalp->silent++; + ret = load_unload_philips(usalp, 1); + usalp->silent--; + if (ret < 0) + return (scsi_load(usalp, dp)); + return (0); +} + +static int +philips_dumbunload(SCSI *usalp, cdr_t *dp) +{ + int ret; + + usalp->silent++; + ret = load_unload_philips(usalp, 0); + usalp->silent--; + if (ret < 0) + return (scsi_unload(usalp, dp)); + return (0); +} + +static int +plasmon_buf(SCSI *usalp, + long *sp /* Size pointer */, + long *fp /* Free space pointer */) +{ + /* + * There's no way to obtain these values from the + * Plasmon RF41xx devices. This function stub is only + * present to prevent cdrecord.c from calling the READ BUFFER + * SCSI cmd which is implemented non standard compliant in + * the Plasmon drive. Calling READ BUFFER would only jam the Plasmon + * as the non standard implementation in the Plasmon firmware + * expects different parameters. + */ + + if (sp) + *sp = 0L; + if (fp) + *fp = 0L; + + return (100); /* 100 % */ +} + +static int +recover_philips(SCSI *usalp, cdr_t *dp, int track) +{ + 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 = 0xEC; + scmd->cdb.g1_cdb.lun = usal_lun(usalp); + + usalp->cmdname = "philips recover"; + + if (usal_cmd(usalp) < 0) + return (-1); + return (0); +} + +static int +speed_select_yamaha(SCSI *usalp, cdr_t *dp, int *speedp) +{ + struct scsi_mode_page_header *mp; + char mode[256]; + int len = 16; + int page = 0x31; + struct yamaha_mode_page_31 *xp; + struct cdd_52x_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/Dummy 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); + + xp = (struct yamaha_mode_page_31 *)mp; + speed = xp->speed; + } + + fillbytes((caddr_t)&md, sizeof (md), '\0'); + + count = sizeof (struct scsi_mode_header) + + sizeof (struct yamaha_mode_page_31); + + speed >>= 1; + md.pagex.page31.p_code = 0x31; + md.pagex.page31.p_len = 0x02; + md.pagex.page31.speed = speed; + md.pagex.page31.dummy = dummy?1:0; + + return (mode_select(usalp, (Uchar *)&md, count, 0, usalp->inq->data_format >= 2)); +} + +static int +speed_select_philips(SCSI *usalp, cdr_t *dp, int *speedp) +{ + struct scsi_mode_page_header *mp; + char mode[256]; + int len = 20; + int page = 0x23; + struct cdd_52x_mode_page_23 *xp; + struct cdd_52x_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/Dummy 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); + + xp = (struct cdd_52x_mode_page_23 *)mp; + speed = xp->speed; + } + + fillbytes((caddr_t)&md, sizeof (md), '\0'); + + count = sizeof (struct scsi_mode_header) + + sizeof (struct cdd_52x_mode_page_23); + + md.pagex.page23.p_code = 0x23; + md.pagex.page23.p_len = 0x06; + md.pagex.page23.speed = speed; + md.pagex.page23.dummy = dummy?1:0; + + return (mode_select(usalp, (Uchar *)&md, count, 0, usalp->inq->data_format >= 2)); +} + +static int +speed_select_pioneer(SCSI *usalp, cdr_t *dp, int *speedp) +{ + if (speedp != 0 && *speedp < 2) { + *speedp = 2; + if (lverbose) + printf("WARNING: setting to minimum speed (2).\n"); + } + return (speed_select_philips(usalp, dp, speedp)); +} + +static int +speed_select_oldphilips(SCSI *usalp, cdr_t *dp, int *speedp) +{ + BOOL dummy = (dp->cdr_cmdflags & F_DUMMY) != 0; + + if (lverbose) + printf("WARNING: ignoring selected speed.\n"); + if (dummy) { + errmsgno(EX_BAD, "Cannot set dummy writing for this device.\n"); + return (-1); + } + return (0); +} + +static int +speed_select_dumbphilips(SCSI *usalp, cdr_t *dp, int *speedp) +{ + if (speed_select_philips(usalp, dp, speedp) < 0) + return (speed_select_oldphilips(usalp, dp, speedp)); + return (0); +} + +static int +philips_init(SCSI *usalp, cdr_t *dp) +{ + return ((*dp->cdr_set_speed_dummy)(usalp, dp, NULL)); +} + + +#define IS(what, flag) printf(" Is %s%s\n", flag?"":"not ", what); + +static int +philips_getdisktype(SCSI *usalp, cdr_t *dp) +{ + dstat_t *dsp = dp->cdr_dstat; + char sbuf[16]; + long dummy; + long lilen; + long lolen; + msf_t msf; + int audio = -1; + + usalp->silent++; + dummy = (*dp->cdr_next_wr_address)(usalp, (track_t *)0, &lilen); + usalp->silent--; + + /* + * Check for "Command sequence error" first. + */ + if ((dsp->ds_cdrflags & RF_WRITE) != 0 && + dummy < 0 && + (usal_sense_key(usalp) != SC_ILLEGAL_REQUEST || + usal_sense_code(usalp) != 0x2C)) { + reload_media(usalp, dp); + } + + usalp->silent++; + if (read_subchannel(usalp, sbuf, 0, 12, 0, 1, 0xf0) >= 0) { + if (sbuf[2] == 0 && sbuf[3] == 8) + audio = (sbuf[7] & 0x40) != 0; + } + usalp->silent--; + + if ((dp->cdr_dstat->ds_cdrflags & RF_PRATIP) != 0 && + dummy >= 0 && lilen == 0) { + usalp->silent++; + dummy = philips_getlilo(usalp, &lilen, &lolen); + usalp->silent--; + + if (dummy >= 0) { +/* printf("lead-in len: %d lead-out len: %d\n", lilen, lolen);*/ + lba_to_msf(-150 - lilen, &msf); + + printf("ATIP info from disk:\n"); + if (audio >= 0) + IS("unrestricted", audio); + if (audio == 1 || (audio == 0 && (sbuf[7] & 0x3F) != 0x3F)) + printf(" Disk application code: %d\n", sbuf[7] & 0x3F); + printf(" ATIP start of lead in: %ld (%02d:%02d/%02d)\n", + -150 - lilen, msf.msf_min, msf.msf_sec, msf.msf_frame); + + if (capacity_philips(usalp, &lolen)) { + lba_to_msf(lolen, &msf); + printf( + " ATIP start of lead out: %ld (%02d:%02d/%02d)\n", + lolen, msf.msf_min, msf.msf_sec, msf.msf_frame); + } + lba_to_msf(-150 - lilen, &msf); + pr_manufacturer(&msf, + FALSE, /* Always not erasable */ + audio > 0); /* Audio from read subcode */ + } + } + + if (capacity_philips(usalp, &lolen)) { + dsp->ds_maxblocks = lolen; + dsp->ds_maxrblocks = disk_rcap(&msf, dsp->ds_maxblocks, + FALSE, /* Always not erasable */ + audio > 0); /* Audio from read subcode */ + } + usalp->silent++; + /*read_subchannel(usalp, bp, track, cnt, msf, subq, fmt); */ + + if (read_subchannel(usalp, sbuf, 0, 14, 0, 0, 0xf1) >= 0) + usal_prbytes("Disk bar code:", (Uchar *)sbuf, 14 - usal_getresid(usalp)); + usalp->silent--; + + return (drive_getdisktype(usalp, dp)); +} + +static BOOL +capacity_philips(SCSI *usalp, long *lp) +{ + long l = 0L; + BOOL succeed = TRUE; + + usalp->silent++; + if (read_B0(usalp, FALSE, NULL, &l) >= 0) { + if (debug) + printf("lead out B0: %ld\n", l); + *lp = l; + } else if (read_trackinfo(usalp, 0xAA, &l, NULL, NULL, NULL, NULL) >= 0) { + if (debug) + printf("lead out AA: %ld\n", l); + *lp = l; + } if (read_capacity(usalp) >= 0) { + l = usalp->cap->c_baddr + 1; + if (debug) + printf("lead out capacity: %ld\n", l); + } else { + succeed = FALSE; + } + *lp = l; + usalp->silent--; + return (succeed); +} + +struct fwa { + char len; + char addr[4]; + char res; +}; + +static int +first_writable_addr_philips(SCSI *usalp, long *ap, int track, int isaudio, + int preemp, int npa) +{ + struct fwa fwa; + register struct usal_cmd *scmd = usalp->scmd; + + fillbytes((caddr_t)&fwa, sizeof (fwa), '\0'); + fillbytes((caddr_t)scmd, sizeof (*scmd), '\0'); + scmd->addr = (caddr_t)&fwa; + scmd->size = sizeof (fwa); + 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 = 0xE2; + scmd->cdb.g1_cdb.lun = usal_lun(usalp); + scmd->cdb.g1_cdb.addr[0] = track; + scmd->cdb.g1_cdb.addr[1] = isaudio ? (preemp ? 5 : 4) : 1; + + scmd->cdb.g1_cdb.count[0] = npa?1:0; + scmd->cdb.g1_cdb.count[1] = sizeof (fwa); + + usalp->cmdname = "first writeable address philips"; + + if (usal_cmd(usalp) < 0) + return (-1); + + if (ap) + *ap = a_to_4_byte(fwa.addr); + return (0); +} + +static int +next_wr_addr_philips(SCSI *usalp, track_t *trackp, long *ap) +{ + +/* if (first_writable_addr_philips(usalp, ap, 0, 0, 0, 1) < 0)*/ + if (first_writable_addr_philips(usalp, ap, 0, 0, 0, 0) < 0) + return (-1); + return (0); +} + +static int +reserve_track_philips(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 = 0xE4; + scmd->cdb.g1_cdb.lun = usal_lun(usalp); + i_to_4_byte(&scmd->cdb.g1_cdb.addr[3], len); + + usalp->cmdname = "philips reserve_track"; + + if (usal_cmd(usalp) < 0) + return (-1); + return (0); +} + +static int +scsi_cdr_write_philips(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 */) +{ + return (write_xg0(usalp, bp, 0, size, blocks)); +} + +static int +write_track_info_philips(SCSI *usalp, int sectype) +{ + struct cdd_52x_mode_data md; + int count = sizeof (struct scsi_mode_header) + + sizeof (struct cdd_52x_mode_page_21); + + fillbytes((caddr_t)&md, sizeof (md), '\0'); + md.pagex.page21.p_code = 0x21; + md.pagex.page21.p_len = 0x0E; + /* is sectype ok ??? */ + md.pagex.page21.sectype = sectype & ST_MASK; + md.pagex.page21.track = 0; /* 0 : create new track */ + + return (mode_select(usalp, (Uchar *)&md, count, 0, usalp->inq->data_format >= 2)); +} + +static int +write_track_philips(SCSI *usalp, + long track /* track number 0 == new track */, + int sectype) +{ + register struct usal_cmd *scmd = usalp->scmd; + + fillbytes((caddr_t)scmd, sizeof (*scmd), '\0'); + scmd->flags = SCG_DISRE_ENA|SCG_CMD_RETRY; +/* 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); + g1_cdbaddr(&scmd->cdb.g1_cdb, track); + scmd->cdb.g1_cdb.res6 = sectype & ST_MASK; + + usalp->cmdname = "philips write_track"; + + if (usal_cmd(usalp) < 0) + return (-1); + return (0); +} + +static int +open_track_philips(SCSI *usalp, cdr_t *dp, track_t *trackp) +{ + if (select_secsize(usalp, trackp->secsize) < 0) + return (-1); + + if (write_track_info_philips(usalp, trackp->sectype) < 0) + return (-1); + + if (write_track_philips(usalp, 0, trackp->sectype) < 0) + return (-1); + + return (0); +} + +static int +open_track_plasmon(SCSI *usalp, cdr_t *dp, track_t *trackp) +{ + if (select_secsize(usalp, trackp->secsize) < 0) + return (-1); + + if (write_track_info_philips(usalp, trackp->sectype) < 0) + return (-1); + + return (0); +} + +static int +open_track_oldphilips(SCSI *usalp, cdr_t *dp, track_t *trackp) +{ + if (write_track_philips(usalp, 0, trackp->sectype) < 0) + return (-1); + + return (0); +} + +static int +open_track_yamaha(SCSI *usalp, cdr_t *dp, track_t *trackp) +{ + if (select_secsize(usalp, trackp->secsize) < 0) + return (-1); + + if (write_track_philips(usalp, 0, trackp->sectype) < 0) + return (-1); + + return (0); +} + +static int +close_track_philips(SCSI *usalp, cdr_t *dp, track_t *trackp) +{ + return (scsi_flush_cache(usalp, FALSE)); +} + +static int fixation_philips(SCSI *usalp, cdr_t *dp, track_t *trackp) +{ + 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 = 0xE9; + scmd->cdb.g1_cdb.lun = usal_lun(usalp); + scmd->cdb.g1_cdb.count[1] = + ((track_base(trackp)->tracktype & TOCF_MULTI) ? 8 : 0) | + (track_base(trackp)->tracktype & TOC_MASK); + + usalp->cmdname = "philips fixation"; + + if (usal_cmd(usalp) < 0) + return (-1); + return (0); +} + +static const char *sd_cdd_521_error_str[] = { + "\003\000tray out", /* 0x03 */ + "\062\000write data error with CU", /* 0x32 */ /* Yamaha */ + "\063\000monitor atip error", /* 0x33 */ + "\064\000absorbtion control error", /* 0x34 */ +#ifdef YAMAHA_CDR_100 + /* Is this the same ??? */ + "\120\000write operation in progress", /* 0x50 */ +#endif + "\127\000unable to read TOC/PMA/Subcode/ATIP", /* 0x57 */ + "\132\000operator medium removal request", /* 0x5a */ + "\145\000verify failed", /* 0x65 */ + "\201\000illegal track number", /* 0x81 */ + "\202\000command now not valid", /* 0x82 */ + "\203\000medium removal is prevented", /* 0x83 */ + "\204\000tray out", /* 0x84 */ + "\205\000track at one not in PMA", /* 0x85 */ + "\240\000stopped on non data block", /* 0xa0 */ + "\241\000invalid start adress", /* 0xa1 */ + "\242\000attampt to cross track-boundary", /* 0xa2 */ + "\243\000illegal medium", /* 0xa3 */ + "\244\000disk write protected", /* 0xa4 */ + "\245\000application code conflict", /* 0xa5 */ + "\246\000illegal blocksize for command", /* 0xa6 */ + "\247\000blocksize conflict", /* 0xa7 */ + "\250\000illegal transfer length", /* 0xa8 */ + "\251\000request for fixation failed", /* 0xa9 */ + "\252\000end of medium reached", /* 0xaa */ +#ifdef REAL_CDD_521 + "\253\000non reserved reserved track", /* 0xab */ +#else + "\253\000illegal track number", /* 0xab */ +#endif + "\254\000data track length error", /* 0xac */ + "\255\000buffer under run", /* 0xad */ + "\256\000illegal track mode", /* 0xae */ + "\257\000optical power calibration error", /* 0xaf */ + "\260\000calibration area almost full", /* 0xb0 */ + "\261\000current program area empty", /* 0xb1 */ + "\262\000no efm at search address", /* 0xb2 */ + "\263\000link area encountered", /* 0xb3 */ + "\264\000calibration area full", /* 0xb4 */ + "\265\000dummy data blocks added", /* 0xb5 */ + "\266\000block size format conflict", /* 0xb6 */ + "\267\000current command aborted", /* 0xb7 */ + "\270\000program area not empty", /* 0xb8 */ +#ifdef YAMAHA_CDR_100 + /* Used while writing lead in in DAO */ + "\270\000write leadin in progress", /* 0xb8 */ +#endif + "\271\000parameter list too large", /* 0xb9 */ + "\277\000buffer overflow", /* 0xbf */ /* Yamaha */ + "\300\000no barcode available", /* 0xc0 */ + "\301\000barcode reading error", /* 0xc1 */ + "\320\000recovery needed", /* 0xd0 */ + "\321\000cannot recover track", /* 0xd1 */ + "\322\000cannot recover pma", /* 0xd2 */ + "\323\000cannot recover leadin", /* 0xd3 */ + "\324\000cannot recover leadout", /* 0xd4 */ + "\325\000cannot recover opc", /* 0xd5 */ + "\326\000eeprom failure", /* 0xd6 */ + "\340\000laser current over", /* 0xe0 */ /* Yamaha */ + "\341\000servo adjustment over", /* 0xe0 */ /* Yamaha */ + NULL +}; + +static const char *sd_ro1420_error_str[] = { + "\004\000logical unit is in process of becoming ready", /* 04 00 */ + "\011\200radial skating error", /* 09 80 */ + "\011\201sledge servo failure", /* 09 81 */ + "\011\202pll no lock", /* 09 82 */ + "\011\203servo off track", /* 09 83 */ + "\011\204atip sync error", /* 09 84 */ + "\011\205atip/subcode jumped error", /* 09 85 */ + "\127\300subcode not found", /* 57 C0 */ + "\127\301atip not found", /* 57 C1 */ + "\127\302no atip or subcode", /* 57 C2 */ + "\127\303pma error", /* 57 C3 */ + "\127\304toc read error", /* 57 C4 */ + "\127\305disk informatoion error", /* 57 C5 */ + "\144\200read in leadin", /* 64 80 */ + "\144\201read in leadout", /* 64 81 */ + "\201\000illegal track", /* 81 00 */ + "\202\000command not now valid", /* 82 00 */ + "\220\000reserve track check error", /* 90 00 */ + "\220\001verify blank error", /* 90 01 */ + "\221\001mode of last track error", /* 91 01 */ + "\222\000header search error", /* 92 00 */ + "\230\001header monitor error", /* 98 01 */ + "\230\002edc error", /* 98 02 */ + "\230\003read link, run-in run-out", /* 98 03 */ + "\230\004last one block error", /* 98 04 */ + "\230\005illegal blocksize", /* 98 05 */ + "\230\006not all data transferred", /* 98 06 */ + "\230\007cdbd over run error", /* 98 07 */ + "\240\000stopped on non_data block", /* A0 00 */ + "\241\000invalid start address", /* A1 00 */ + "\243\000illegal medium", /* A3 00 */ + "\246\000illegal blocksize for command", /* A6 00 */ + "\251\000request for fixation failed", /* A9 00 */ + "\252\000end of medium reached", /* AA 00 */ + "\253\000illegal track number", /* AB 00 */ + "\255\000buffer underrun", /* AD 00 */ + "\256\000illegal track mode", /* AE 00 */ + "\257\200power range error", /* AF 80 */ + "\257\201moderation error", /* AF 81 */ + "\257\202beta upper range error", /* AF 82 */ + "\257\203beta lower range error", /* AF 83 */ + "\257\204alpha upper range error", /* AF 84 */ + "\257\205alpha lower range error", /* AF 85 */ + "\257\206alpha and power range error", /* AF 86 */ + "\260\000calibration area almost full", /* B0 00 */ + "\261\000current program area empty", /* B1 00 */ + "\262\000no efm at search address", /* B2 00 */ + "\264\000calibration area full", /* B4 00 */ + "\265\000dummy blocks added", /* B5 00 */ + "\272\000write audio on reserved track", /* BA 00 */ + "\302\200syscon rom error", /* C2 80 */ + "\302\201syscon ram error", /* C2 81 */ + "\302\220efm encoder error", /* C2 90 */ + "\302\221efm decoder error", /* C2 91 */ + "\302\222servo ic error", /* C2 92 */ + "\302\223motor controller error", /* C2 93 */ + "\302\224dac error", /* C2 94 */ + "\302\225syscon eeprom error", /* C2 95 */ + "\302\240block decoder communication error", /* C2 A0 */ + "\302\241block encoder communication error", /* C2 A1 */ + "\302\242block encoder/decoder path error", /* C2 A2 */ + "\303\000CD-R engine selftest error", /* C3 xx */ + "\304\000buffer parity error", /* C4 00 */ + "\305\000data transfer error", /* C5 00 */ + "\340\00012V failure", /* E0 00 */ + "\341\000undefined syscon error", /* E1 00 */ + "\341\001syscon communication error", /* E1 01 */ + "\341\002unknown syscon error", /* E1 02 */ + "\342\000syscon not ready", /* E2 00 */ + "\343\000command rejected", /* E3 00 */ + "\344\000command not accepted", /* E4 00 */ + "\345\000verify error at beginning of track", /* E5 00 */ + "\345\001verify error at ending of track", /* E5 01 */ + "\345\002verify error at beginning of lead-in", /* E5 02 */ + "\345\003verify error at ending of lead-in", /* E5 03 */ + "\345\004verify error at beginning of lead-out", /* E5 04 */ + "\345\005verify error at ending of lead-out", /* E5 05 */ + "\377\000command phase timeout error", /* FF 00 */ + "\377\001data in phase timeout error", /* FF 01 */ + "\377\002data out phase timeout error", /* FF 02 */ + "\377\003status phase timeout error", /* FF 03 */ + "\377\004message in phase timeout error", /* FF 04 */ + "\377\005message out phase timeout error", /* FF 05 */ + NULL +}; + +static int +philips_attach(SCSI *usalp, cdr_t *dp) +{ + usal_setnonstderrs(usalp, sd_cdd_521_error_str); + return (0); +} + +static int +plasmon_attach(SCSI *usalp, cdr_t *dp) +{ + usalp->inq->data_format = 1; /* Correct the ly */ + + usal_setnonstderrs(usalp, sd_cdd_521_error_str); + return (0); +} + +static int +ricoh_attach(SCSI *usalp, cdr_t *dp) +{ + if (dp == &cdr_ricoh_ro1060) { + errmsgno(EX_BAD, "No support for Ricoh RO-1060C\n"); + return (-1); + } + usal_setnonstderrs(usalp, sd_ro1420_error_str); + return (0); +} + +static int +philips_getlilo(SCSI *usalp, long *lilenp, long *lolenp) +{ + char buf[4]; + long li, lo; + register struct usal_cmd *scmd = usalp->scmd; + + fillbytes((caddr_t)scmd, sizeof (*scmd), '\0'); + scmd->addr = buf; + scmd->size = sizeof (buf); + 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 = 0xEE; /* Read session info */ + scmd->cdb.g1_cdb.lun = usal_lun(usalp); + g1_cdblen(&scmd->cdb.g1_cdb, sizeof (buf)); + + usalp->cmdname = "philips read session info"; + + if (usal_cmd(usalp) < 0) + return (-1); + + if (usalp->verbose) + usal_prbytes("Session info data: ", (Uchar *)buf, sizeof (buf) - usal_getresid(usalp)); + + li = a_to_u_2_byte(buf); + lo = a_to_u_2_byte(&buf[2]); + + if (lilenp) + *lilenp = li; + if (lolenp) + *lolenp = lo; + + return (0); +} |