Google Git
Sign in
googlers / maze / linux / v2.6.11-tree / . / drivers / cdrom / cdu31a.c
blob: d729ae4b3f15f8b9bae99358747c975e511c956a
/*
* Sony CDU-31A CDROM interface device driver.
*
* Corey Minyard (minyard@wf-rch.cirr.com)
*
* Colossians 3:17
*
* See Documentation/cdrom/cdu31a for additional details about this driver.
*
* The Sony interface device driver handles Sony interface CDROM
* drives and provides a complete block-level interface as well as an
* ioctl() interface compatible with the Sun (as specified in
* include/linux/cdrom.h). With this interface, CDROMs can be
* accessed and standard audio CDs can be played back normally.
*
* WARNING - All autoprobes have been removed from the driver.
* You MUST configure the CDU31A via a LILO config
* at boot time or in lilo.conf. I have the
* following in my lilo.conf:
*
* append="cdu31a=0x1f88,0,PAS"
*
* The first number is the I/O base address of the
* card. The second is the interrupt (0 means none).
* The third should be "PAS" if on a Pro-Audio
* spectrum, or nothing if on something else.
*
* This interface is (unfortunately) a polled interface. This is
* because most Sony interfaces are set up with DMA and interrupts
* disables. Some (like mine) do not even have the capability to
* handle interrupts or DMA. For this reason you will see a lot of
* the following:
*
* retry_count = jiffies+ SONY_JIFFIES_TIMEOUT;
* while (time_before(jiffies, retry_count) && (! <some condition to wait for))
* {
* while (handle_sony_cd_attention())
* ;
*
* sony_sleep();
* }
* if (the condition not met)
* {
* return an error;
* }
*
* This ugly hack waits for something to happen, sleeping a little
* between every try. it also handles attentions, which are
* asynchronous events from the drive informing the driver that a disk
* has been inserted, removed, etc.
*
* NEWS FLASH - The driver now supports interrupts but they are
* turned off by default. Use of interrupts is highly encouraged, it
* cuts CPU usage down to a reasonable level. I had DMA in for a while
* but PC DMA is just too slow. Better to just insb() it.
*
* One thing about these drives: They talk in MSF (Minute Second Frame) format.
* There are 75 frames a second, 60 seconds a minute, and up to 75 minutes on a
* disk. The funny thing is that these are sent to the drive in BCD, but the
* interface wants to see them in decimal. A lot of conversion goes on.
*
* DRIVER SPECIAL FEATURES
* -----------------------
*
* This section describes features beyond the normal audio and CD-ROM
* functions of the drive.
*
* XA compatibility
*
* The driver should support XA disks for both the CDU31A and CDU33A.
* It does this transparently, the using program doesn't need to set it.
*
* Multi-Session
*
* A multi-session disk looks just like a normal disk to the user.
* Just mount one normally, and all the data should be there.
* A special thanks to Koen for help with this!
*
* Raw sector I/O
*
* Using the CDROMREADAUDIO it is possible to read raw audio and data
* tracks. Both operations return 2352 bytes per sector. On the data
* tracks, the first 12 bytes is not returned by the drive and the value
* of that data is indeterminate.
*
*
* Copyright (C) 1993 Corey Minyard
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* 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; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*
* TODO:
* CDs with form1 and form2 sectors cause problems
* with current read-ahead strategy.
*
* Credits:
* Heiko Eissfeldt <heiko@colossus.escape.de>
* For finding abug in the return of the track numbers.
* TOC processing redone for proper multisession support.
*
*
* It probably a little late to be adding a history, but I guess I
* will start.
*
* 10/24/95 - Added support for disabling the eject button when the
* drive is open. Note that there is a small problem
* still here, if the eject button is pushed while the
* drive light is flashing, the drive will return a bad
* status and be reset. It recovers, though.
*
* 03/07/97 - Fixed a problem with timers.
*
*
* 18 Spetember 1997 -- Ported to Uniform CD-ROM driver by
* Heiko Eissfeldt <heiko@colossus.escape.de> with additional
* changes by Erik Andersen <andersee@debian.org>
*
* 24 January 1998 -- Removed the scd_disc_status() function, which was now
* just dead code left over from the port.
* Erik Andersen <andersee@debian.org>
*
* 16 July 1998 -- Drive donated to Erik Andersen by John Kodis
* <kodis@jagunet.com>. Work begun on fixing driver to
* work under 2.1.X. Added temporary extra printks
* which seem to slow it down enough to work.
*
* 9 November 1999 -- Make kernel-parameter implementation work with 2.3.x
* Removed init_module & cleanup_module in favor of
* module_init & module_exit.
* Torben Mathiasen <tmm@image.dk>
*
* 22 October 2004 -- Make the driver work in 2.6.X
* Added workaround to fix hard lockups on eject
* Fixed door locking problem after mounting empty drive
* Set double-speed drives to double speed by default
* Removed all readahead things - not needed anymore
* Ondrej Zary <rainbow@rainbow-software.org>
*/
#include <linux/major.h>
#include <linux/module.h>
#include <linux/errno.h>
#include <linux/signal.h>
#include <linux/sched.h>
#include <linux/timer.h>
#include <linux/fs.h>
#include <linux/kernel.h>
#include <linux/hdreg.h>
#include <linux/genhd.h>
#include <linux/ioport.h>
#include <linux/devfs_fs_kernel.h>
#include <linux/string.h>
#include <linux/slab.h>
#include <linux/init.h>
#include <linux/interrupt.h>
#include <asm/system.h>
#include <asm/io.h>
#include <asm/uaccess.h>
#include <asm/dma.h>
#include <linux/cdrom.h>
#include "cdu31a.h"
#define MAJOR_NR CDU31A_CDROM_MAJOR
#include <linux/blkdev.h>
#define CDU31A_MAX_CONSECUTIVE_ATTENTIONS 10
#define DEBUG 1
/* Define the following if you have data corruption problems. */
#undef SONY_POLL_EACH_BYTE
/*
** Edit the following data to change interrupts, DMA channels, etc.
** Default is polled and no DMA. DMA is not recommended for double-speed
** drives.
*/
static struct {
unsigned short base; /* I/O Base Address */
short int_num; /* Interrupt Number (-1 means scan for it,
0 means don't use) */
} cdu31a_addresses[] __initdata = {
{0}
};
static int handle_sony_cd_attention(void);
static int read_subcode(void);
static void sony_get_toc(void);
static int scd_spinup(void);
/*static int scd_open(struct inode *inode, struct file *filp);*/
static int scd_open(struct cdrom_device_info *, int);
static void do_sony_cd_cmd(unsigned char cmd,
unsigned char *params,
unsigned int num_params,
unsigned char *result_buffer,
unsigned int *result_size);
static void size_to_buf(unsigned int size, unsigned char *buf);
/* Parameters for the read-ahead. */
static unsigned int sony_next_block; /* Next 512 byte block offset */
static unsigned int sony_blocks_left = 0; /* Number of 512 byte blocks left
in the current read command. */
/* The base I/O address of the Sony Interface. This is a variable (not a
#define) so it can be easily changed via some future ioctl() */
static unsigned int cdu31a_port = 0;
module_param(cdu31a_port, uint, 0);
/*
* The following are I/O addresses of the various registers for the drive. The
* comment for the base address also applies here.
*/
static volatile unsigned short sony_cd_cmd_reg;
static volatile unsigned short sony_cd_param_reg;
static volatile unsigned short sony_cd_write_reg;
static volatile unsigned short sony_cd_control_reg;
static volatile unsigned short sony_cd_status_reg;
static volatile unsigned short sony_cd_result_reg;
static volatile unsigned short sony_cd_read_reg;
static volatile unsigned short sony_cd_fifost_reg;
static struct request_queue *cdu31a_queue;
static DEFINE_SPINLOCK(cdu31a_lock); /* queue lock */
static int sony_spun_up = 0; /* Has the drive been spun up? */
static int sony_speed = 0; /* Last wanted speed */
static int sony_xa_mode = 0; /* Is an XA disk in the drive
and the drive a CDU31A? */
static int sony_raw_data_mode = 1; /* 1 if data tracks, 0 if audio.
For raw data reads. */
static unsigned int sony_usage = 0; /* How many processes have the
drive open. */
static int sony_pas_init = 0; /* Initialize the Pro-Audio
Spectrum card? */
static struct s_sony_session_toc single_toc; /* Holds the
table of
contents. */
static struct s_all_sessions_toc sony_toc; /* entries gathered from all
sessions */
static int sony_toc_read = 0; /* Has the TOC been read for
the drive? */
static struct s_sony_subcode last_sony_subcode; /* Points to the last
subcode address read */
static volatile int sony_inuse = 0; /* Is the drive in use? Only one operation
at a time allowed */
static DECLARE_WAIT_QUEUE_HEAD(sony_wait); /* Things waiting for the drive */
static struct task_struct *has_cd_task = NULL; /* The task that is currently
using the CDROM drive, or
NULL if none. */
static int is_double_speed = 0; /* does the drive support double speed ? */
static int is_auto_eject = 1; /* Door has been locked? 1=No/0=Yes */
/*
* The audio status uses the values from read subchannel data as specified
* in include/linux/cdrom.h.
*/
static volatile int sony_audio_status = CDROM_AUDIO_NO_STATUS;
/*
* The following are a hack for pausing and resuming audio play. The drive
* does not work as I would expect it, if you stop it then start it again,
* the drive seeks back to the beginning and starts over. This holds the
* position during a pause so a resume can restart it. It uses the
* audio status variable above to tell if it is paused.
*/
static unsigned volatile char cur_pos_msf[3] = { 0, 0, 0 };
static unsigned volatile char final_pos_msf[3] = { 0, 0, 0 };
/* What IRQ is the drive using? 0 if none. */
static int cdu31a_irq = 0;
module_param(cdu31a_irq, int, 0);
/* The interrupt handler will wake this queue up when it gets an
interrupts. */
DECLARE_WAIT_QUEUE_HEAD(cdu31a_irq_wait);
static int curr_control_reg = 0; /* Current value of the control register */
/* A disk changed variable. When a disk change is detected, it will
all be set to TRUE. As the upper layers ask for disk_changed status
it will be cleared. */
static char disk_changed;
/* This was readahead_buffer once... Now it's used only for audio reads */
static char audio_buffer[CD_FRAMESIZE_RAW];
/* Used to time a short period to abort an operation after the
drive has been idle for a while. This keeps the light on
the drive from flashing for very long. */
static struct timer_list cdu31a_abort_timer;
/* Marks if the timeout has started an abort read. This is used
on entry to the drive to tell the code to read out the status
from the abort read. */
static int abort_read_started = 0;
/*
* Uniform cdrom interface function
* report back, if disc has changed from time of last request.
*/
static int scd_media_changed(struct cdrom_device_info *cdi, int disc_nr)
{
int retval;
retval = disk_changed;
disk_changed = 0;
return retval;
}
/*
* Uniform cdrom interface function
* report back, if drive is ready
*/
static int scd_drive_status(struct cdrom_device_info *cdi, int slot_nr)
{
if (CDSL_CURRENT != slot_nr) {
/* we have no changer support */
return -EINVAL;
}
if (scd_spinup() == 0) {
sony_spun_up = 1;
}
return sony_spun_up ? CDS_DISC_OK : CDS_DRIVE_NOT_READY;
}
static inline void enable_interrupts(void)
{
curr_control_reg |= (SONY_ATTN_INT_EN_BIT
| SONY_RES_RDY_INT_EN_BIT
| SONY_DATA_RDY_INT_EN_BIT);
outb(curr_control_reg, sony_cd_control_reg);
}
static inline void disable_interrupts(void)
{
curr_control_reg &= ~(SONY_ATTN_INT_EN_BIT
| SONY_RES_RDY_INT_EN_BIT
| SONY_DATA_RDY_INT_EN_BIT);
outb(curr_control_reg, sony_cd_control_reg);
}
/*
* Wait a little while (used for polling the drive). If in initialization,
* setting a timeout doesn't work, so just loop for a while.
*/
static inline void sony_sleep(void)
{
unsigned long flags;
if (cdu31a_irq <= 0) {
yield();
} else { /* Interrupt driven */
save_flags(flags);
cli();
enable_interrupts();
interruptible_sleep_on(&cdu31a_irq_wait);
restore_flags(flags);
}
}
/*
* The following are convenience routine to read various status and set
* various conditions in the drive.
*/
static inline int is_attention(void)
{
return ((inb(sony_cd_status_reg) & SONY_ATTN_BIT) != 0);
}
static inline int is_busy(void)
{
return ((inb(sony_cd_status_reg) & SONY_BUSY_BIT) != 0);
}
static inline int is_data_ready(void)
{
return ((inb(sony_cd_status_reg) & SONY_DATA_RDY_BIT) != 0);
}
static inline int is_data_requested(void)
{
return ((inb(sony_cd_status_reg) & SONY_DATA_REQUEST_BIT) != 0);
}
static inline int is_result_ready(void)
{
return ((inb(sony_cd_status_reg) & SONY_RES_RDY_BIT) != 0);
}
static inline int is_param_write_rdy(void)
{
return ((inb(sony_cd_fifost_reg) & SONY_PARAM_WRITE_RDY_BIT) != 0);
}
static inline int is_result_reg_not_empty(void)
{
return ((inb(sony_cd_fifost_reg) & SONY_RES_REG_NOT_EMP_BIT) != 0);
}
static inline void reset_drive(void)
{
curr_control_reg = 0;
sony_toc_read = 0;
outb(SONY_DRIVE_RESET_BIT, sony_cd_control_reg);
}
/*
* Uniform cdrom interface function
* reset drive and return when it is ready
*/
static int scd_reset(struct cdrom_device_info *cdi)
{
unsigned long retry_count;
reset_drive();
retry_count = jiffies + SONY_RESET_TIMEOUT;
while (time_before(jiffies, retry_count) && (!is_attention())) {
sony_sleep();
}
return 0;
}
static inline void clear_attention(void)
{
outb(curr_control_reg | SONY_ATTN_CLR_BIT, sony_cd_control_reg);
}
static inline void clear_result_ready(void)
{
outb(curr_control_reg | SONY_RES_RDY_CLR_BIT, sony_cd_control_reg);
}
static inline void clear_data_ready(void)
{
outb(curr_control_reg | SONY_DATA_RDY_CLR_BIT,
sony_cd_control_reg);
}
static inline void clear_param_reg(void)
{
outb(curr_control_reg | SONY_PARAM_CLR_BIT, sony_cd_control_reg);
}
static inline unsigned char read_status_register(void)
{
return (inb(sony_cd_status_reg));
}
static inline unsigned char read_result_register(void)
{
return (inb(sony_cd_result_reg));
}
static inline unsigned char read_data_register(void)
{
return (inb(sony_cd_read_reg));
}
static inline void write_param(unsigned char param)
{
outb(param, sony_cd_param_reg);
}
static inline void write_cmd(unsigned char cmd)
{
outb(curr_control_reg | SONY_RES_RDY_INT_EN_BIT,
sony_cd_control_reg);
outb(cmd, sony_cd_cmd_reg);
}
static irqreturn_t cdu31a_interrupt(int irq, void *dev_id, struct pt_regs *regs)
{
unsigned char val;
if (abort_read_started) {
/* We might be waiting for an abort to finish. Don't
disable interrupts yet, though, because we handle
this one here. */
/* Clear out the result registers. */
while (is_result_reg_not_empty()) {
val = read_result_register();
}
clear_data_ready();
clear_result_ready();
/* Clear out the data */
while (is_data_requested()) {
val = read_data_register();
}
abort_read_started = 0;
/* If something was waiting, wake it up now. */
if (waitqueue_active(&cdu31a_irq_wait)) {
disable_interrupts();
wake_up(&cdu31a_irq_wait);
}
} else if (waitqueue_active(&cdu31a_irq_wait)) {
disable_interrupts();
wake_up(&cdu31a_irq_wait);
} else {
disable_interrupts();
printk
("CDU31A: Got an interrupt but nothing was waiting\n");
}
return IRQ_HANDLED;
}
/*
* give more verbose error messages
*/
static unsigned char *translate_error(unsigned char err_code)
{
static unsigned char errbuf[80];
switch (err_code) {
case 0x10: return "illegal command ";
case 0x11: return "illegal parameter ";
case 0x20: return "not loaded ";
case 0x21: return "no disc ";
case 0x22: return "not spinning ";
case 0x23: return "spinning ";
case 0x25: return "spindle servo ";
case 0x26: return "focus servo ";
case 0x29: return "eject mechanism ";
case 0x2a: return "audio playing ";
case 0x2c: return "emergency eject ";
case 0x30: return "focus ";
case 0x31: return "frame sync ";
case 0x32: return "subcode address ";
case 0x33: return "block sync ";
case 0x34: return "header address ";
case 0x40: return "illegal track read ";
case 0x41: return "mode 0 read ";
case 0x42: return "illegal mode read ";
case 0x43: return "illegal block size read ";
case 0x44: return "mode read ";
case 0x45: return "form read ";
case 0x46: return "leadout read ";
case 0x47: return "buffer overrun ";
case 0x53: return "unrecoverable CIRC ";
case 0x57: return "unrecoverable LECC ";
case 0x60: return "no TOC ";
case 0x61: return "invalid subcode data ";
case 0x63: return "focus on TOC read ";
case 0x64: return "frame sync on TOC read ";
case 0x65: return "TOC data ";
case 0x70: return "hardware failure ";
case 0x91: return "leadin ";
case 0x92: return "leadout ";
case 0x93: return "data track ";
}
sprintf(errbuf, "unknown 0x%02x ", err_code);
return errbuf;
}
/*
* Set the drive parameters so the drive will auto-spin-up when a
* disk is inserted.
*/
static void set_drive_params(int want_doublespeed)
{
unsigned char res_reg[12];
unsigned int res_size;
unsigned char params[3];
params[0] = SONY_SD_AUTO_SPIN_DOWN_TIME;
params[1] = 0x00; /* Never spin down the drive. */
do_sony_cd_cmd(SONY_SET_DRIVE_PARAM_CMD,
params, 2, res_reg, &res_size);
if ((res_size < 2) || ((res_reg[0] & 0xf0) == 0x20)) {
printk(" Unable to set spin-down time: 0x%2.2x\n",
res_reg[1]);
}
params[0] = SONY_SD_MECH_CONTROL;
params[1] = SONY_AUTO_SPIN_UP_BIT; /* Set auto spin up */
if (is_auto_eject)
params[1] |= SONY_AUTO_EJECT_BIT;
if (is_double_speed && want_doublespeed) {
params[1] |= SONY_DOUBLE_SPEED_BIT; /* Set the drive to double speed if
possible */
}
do_sony_cd_cmd(SONY_SET_DRIVE_PARAM_CMD,
params, 2, res_reg, &res_size);
if ((res_size < 2) || ((res_reg[0] & 0xf0) == 0x20)) {
printk(" Unable to set mechanical parameters: 0x%2.2x\n",
res_reg[1]);
}
}
/*
* Uniform cdrom interface function
* select reading speed for data access
*/
static int scd_select_speed(struct cdrom_device_info *cdi, int speed)
{
if (speed == 0)
sony_speed = 1;
else
sony_speed = speed - 1;
set_drive_params(sony_speed);
return 0;
}
/*
* Uniform cdrom interface function
* lock or unlock eject button
*/
static int scd_lock_door(struct cdrom_device_info *cdi, int lock)
{
if (lock == 0) {
is_auto_eject = 1;
} else {
is_auto_eject = 0;
}
set_drive_params(sony_speed);
return 0;
}
/*
* This code will reset the drive and attempt to restore sane parameters.
*/
static void restart_on_error(void)
{
unsigned char res_reg[12];
unsigned int res_size;
unsigned long retry_count;
printk("cdu31a: Resetting drive on error\n");
reset_drive();
retry_count = jiffies + SONY_RESET_TIMEOUT;
while (time_before(jiffies, retry_count) && (!is_attention())) {
sony_sleep();
}
set_drive_params(sony_speed);
do_sony_cd_cmd(SONY_SPIN_UP_CMD, NULL, 0, res_reg, &res_size);
if ((res_size < 2) || ((res_reg[0] & 0xf0) == 0x20)) {
printk("cdu31a: Unable to spin up drive: 0x%2.2x\n",
res_reg[1]);
}
msleep(2000);
sony_get_toc();
}
/*
* This routine writes data to the parameter register. Since this should
* happen fairly fast, it is polled with no OS waits between.
*/
static int write_params(unsigned char *params, int num_params)
{
unsigned int retry_count;
retry_count = SONY_READY_RETRIES;
while ((retry_count > 0) && (!is_param_write_rdy())) {
retry_count--;
}
if (!is_param_write_rdy()) {
return -EIO;
}
while (num_params > 0) {
write_param(*params);
params++;
num_params--;
}
return 0;
}
/*
* The following reads data from the command result register. It is a
* fairly complex routine, all status info flows back through this
* interface. The algorithm is stolen directly from the flowcharts in
* the drive manual.
*/
static void
get_result(unsigned char *result_buffer, unsigned int *result_size)
{
unsigned char a, b;
int i;
unsigned long retry_count;
while (handle_sony_cd_attention());
/* Wait for the result data to be ready */
retry_count = jiffies + SONY_JIFFIES_TIMEOUT;
while (time_before(jiffies, retry_count)
&& (is_busy() || (!(is_result_ready())))) {
sony_sleep();
while (handle_sony_cd_attention());
}
if (is_busy() || (!(is_result_ready()))) {
#if DEBUG
printk("CDU31A timeout out %d\n", __LINE__);
#endif
result_buffer[0] = 0x20;
result_buffer[1] = SONY_TIMEOUT_OP_ERR;
*result_size = 2;
return;
}
/*
* Get the first two bytes. This determines what else needs
* to be done.
*/
clear_result_ready();
a = read_result_register();
*result_buffer = a;
result_buffer++;
/* Check for block error status result. */
if ((a & 0xf0) == 0x50) {
*result_size = 1;
return;
}
b = read_result_register();
*result_buffer = b;
result_buffer++;
*result_size = 2;
/*
* 0x20 means an error occurred. Byte 2 will have the error code.
* Otherwise, the command succeeded, byte 2 will have the count of
* how many more status bytes are coming.
*
* The result register can be read 10 bytes at a time, a wait for
* result ready to be asserted must be done between every 10 bytes.
*/
if ((a & 0xf0) != 0x20) {
if (b > 8) {
for (i = 0; i < 8; i++) {
*result_buffer = read_result_register();
result_buffer++;
(*result_size)++;
}
b = b - 8;
while (b > 10) {
retry_count = SONY_READY_RETRIES;
while ((retry_count > 0)
&& (!is_result_ready())) {
retry_count--;
}
if (!is_result_ready()) {
#if DEBUG
printk("CDU31A timeout out %d\n",
__LINE__);
#endif
result_buffer[0] = 0x20;
result_buffer[1] =
SONY_TIMEOUT_OP_ERR;
*result_size = 2;
return;
}
clear_result_ready();
for (i = 0; i < 10; i++) {
*result_buffer =
read_result_register();
result_buffer++;
(*result_size)++;
}
b = b - 10;
}
if (b > 0) {
retry_count = SONY_READY_RETRIES;
while ((retry_count > 0)
&& (!is_result_ready())) {
retry_count--;
}
if (!is_result_ready()) {
#if DEBUG
printk("CDU31A timeout out %d\n",
__LINE__);
#endif
result_buffer[0] = 0x20;
result_buffer[1] =
SONY_TIMEOUT_OP_ERR;
*result_size = 2;
return;
}
}
}
while (b > 0) {
*result_buffer = read_result_register();
result_buffer++;
(*result_size)++;
b--;
}
}
}
/*
* Do a command that does not involve data transfer. This routine must
* be re-entrant from the same task to support being called from the
* data operation code when an error occurs.
*/
static void
do_sony_cd_cmd(unsigned char cmd,
unsigned char *params,
unsigned int num_params,
unsigned char *result_buffer, unsigned int *result_size)
{
unsigned long retry_count;
int num_retries;
int recursive_call;
unsigned long flags;
save_flags(flags);
cli();
if (current != has_cd_task) { /* Allow recursive calls to this routine */
while (sony_inuse) {
interruptible_sleep_on(&sony_wait);
if (signal_pending(current)) {
result_buffer[0] = 0x20;
result_buffer[1] = SONY_SIGNAL_OP_ERR;
*result_size = 2;
restore_flags(flags);
return;
}
}
sony_inuse = 1;
has_cd_task = current;
recursive_call = 0;
} else {
recursive_call = 1;
}
num_retries = 0;
retry_cd_operation:
while (handle_sony_cd_attention());
sti();
retry_count = jiffies + SONY_JIFFIES_TIMEOUT;
while (time_before(jiffies, retry_count) && (is_busy())) {
sony_sleep();
while (handle_sony_cd_attention());
}
if (is_busy()) {
#if DEBUG
printk("CDU31A timeout out %d\n", __LINE__);
#endif
result_buffer[0] = 0x20;
result_buffer[1] = SONY_TIMEOUT_OP_ERR;
*result_size = 2;
} else {
clear_result_ready();
clear_param_reg();
write_params(params, num_params);
write_cmd(cmd);
get_result(result_buffer, result_size);
}
if (((result_buffer[0] & 0xf0) == 0x20)
&& (num_retries < MAX_CDU31A_RETRIES)) {
num_retries++;
msleep(100);
goto retry_cd_operation;
}
if (!recursive_call) {
has_cd_task = NULL;
sony_inuse = 0;
wake_up_interruptible(&sony_wait);
}
restore_flags(flags);
}
/*
* Handle an attention from the drive. This will return 1 if it found one
* or 0 if not (if one is found, the caller might want to call again).
*
* This routine counts the number of consecutive times it is called
* (since this is always called from a while loop until it returns
* a 0), and returns a 0 if it happens too many times. This will help
* prevent a lockup.
*/
static int handle_sony_cd_attention(void)
{
unsigned char atten_code;
static int num_consecutive_attentions = 0;
volatile int val;
#if 0*DEBUG
printk("Entering handle_sony_cd_attention\n");
#endif
if (is_attention()) {
if (num_consecutive_attentions >
CDU31A_MAX_CONSECUTIVE_ATTENTIONS) {
printk
("cdu31a: Too many consecutive attentions: %d\n",
num_consecutive_attentions);
num_consecutive_attentions = 0;
#if DEBUG
printk("Leaving handle_sony_cd_attention at %d\n",
__LINE__);
#endif
return (0);
}
clear_attention();
atten_code = read_result_register();
switch (atten_code) {
/* Someone changed the CD. Mark it as changed */
case SONY_MECH_LOADED_ATTN:
disk_changed = 1;
sony_toc_read = 0;
sony_audio_status = CDROM_AUDIO_NO_STATUS;
sony_blocks_left = 0;
break;
case SONY_SPIN_DOWN_COMPLETE_ATTN:
/* Mark the disk as spun down. */
sony_spun_up = 0;
break;
case SONY_AUDIO_PLAY_DONE_ATTN:
sony_audio_status = CDROM_AUDIO_COMPLETED;
read_subcode();
break;
case SONY_EJECT_PUSHED_ATTN:
if (is_auto_eject) {
sony_audio_status = CDROM_AUDIO_INVALID;
}
break;
case SONY_LEAD_IN_ERR_ATTN:
case SONY_LEAD_OUT_ERR_ATTN:
case SONY_DATA_TRACK_ERR_ATTN:
case SONY_AUDIO_PLAYBACK_ERR_ATTN:
sony_audio_status = CDROM_AUDIO_ERROR;
break;
}
num_consecutive_attentions++;
#if DEBUG
printk("Leaving handle_sony_cd_attention at %d\n",
__LINE__);
#endif
return (1);
} else if (abort_read_started) {
while (is_result_reg_not_empty()) {
val = read_result_register();
}
clear_data_ready();
clear_result_ready();
/* Clear out the data */
while (is_data_requested()) {
val = read_data_register();
}
abort_read_started = 0;
#if DEBUG
printk("Leaving handle_sony_cd_attention at %d\n",
__LINE__);
#endif
return (1);
}
num_consecutive_attentions = 0;
#if 0*DEBUG
printk("Leaving handle_sony_cd_attention at %d\n", __LINE__);
#endif
return (0);
}
/* Convert from an integer 0-99 to BCD */
static inline unsigned int int_to_bcd(unsigned int val)
{
int retval;
retval = (val / 10) << 4;
retval = retval | val % 10;
return (retval);
}
/* Convert from BCD to an integer from 0-99 */
static unsigned int bcd_to_int(unsigned int bcd)
{
return ((((bcd >> 4) & 0x0f) * 10) + (bcd & 0x0f));
}
/*
* Convert a logical sector value (like the OS would want to use for
* a block device) to an MSF format.
*/
static void log_to_msf(unsigned int log, unsigned char *msf)
{
log = log + LOG_START_OFFSET;
msf[0] = int_to_bcd(log / 4500);
log = log % 4500;
msf[1] = int_to_bcd(log / 75);
msf[2] = int_to_bcd(log % 75);
}
/*
* Convert an MSF format to a logical sector.
*/
static unsigned int msf_to_log(unsigned char *msf)
{
unsigned int log;
log = msf[2];
log += msf[1] * 75;
log += msf[0] * 4500;
log = log - LOG_START_OFFSET;
return log;
}
/*
* Take in integer size value and put it into a buffer like
* the drive would want to see a number-of-sector value.
*/
static void size_to_buf(unsigned int size, unsigned char *buf)
{
buf[0] = size / 65536;
size = size % 65536;
buf[1] = size / 256;
buf[2] = size % 256;
}
/* Starts a read operation. Returns 0 on success and 1 on failure.
The read operation used here allows multiple sequential sectors
to be read and status returned for each sector. The driver will
read the output one at a time as the requests come and abort the
operation if the requested sector is not the next one from the
drive. */
static int
start_request(unsigned int sector, unsigned int nsect)
{
unsigned char params[6];
unsigned long retry_count;
#if DEBUG
printk("Entering start_request\n");
#endif
log_to_msf(sector, params);
size_to_buf(nsect, &params[3]);
/*
* Clear any outstanding attentions and wait for the drive to
* complete any pending operations.
*/
while (handle_sony_cd_attention());
retry_count = jiffies + SONY_JIFFIES_TIMEOUT;
while (time_before(jiffies, retry_count) && (is_busy())) {
sony_sleep();
while (handle_sony_cd_attention());
}
if (is_busy()) {
printk("CDU31A: Timeout while waiting to issue command\n");
#if DEBUG
printk("Leaving start_request at %d\n", __LINE__);
#endif
return (1);
} else {
/* Issue the command */
clear_result_ready();
clear_param_reg();
write_params(params, 6);
write_cmd(SONY_READ_BLKERR_STAT_CMD);
sony_blocks_left = nsect * 4;
sony_next_block = sector * 4;
#if DEBUG
printk("Leaving start_request at %d\n", __LINE__);
#endif
return (0);
}
#if DEBUG
printk("Leaving start_request at %d\n", __LINE__);
#endif
}
/* Abort a pending read operation. Clear all the drive status variables. */
static void abort_read(void)
{
unsigned char result_reg[2];
int result_size;
volatile int val;
do_sony_cd_cmd(SONY_ABORT_CMD, NULL, 0, result_reg, &result_size);
if ((result_reg[0] & 0xf0) == 0x20) {
printk("CDU31A: Error aborting read, %s error\n",
translate_error(result_reg[1]));
}
while (is_result_reg_not_empty()) {
val = read_result_register();
}
clear_data_ready();
clear_result_ready();
/* Clear out the data */
while (is_data_requested()) {
val = read_data_register();
}
sony_blocks_left = 0;
}
/* Called when the timer times out. This will abort the
pending read operation. */
static void handle_abort_timeout(unsigned long data)
{
unsigned long flags;
#if DEBUG
printk("Entering handle_abort_timeout\n");
#endif
save_flags(flags);
cli();
/* If it is in use, ignore it. */
if (!sony_inuse) {
/* We can't use abort_read(), because it will sleep
or schedule in the timer interrupt. Just start
the operation, finish it on the next access to
the drive. */
clear_result_ready();
clear_param_reg();
write_cmd(SONY_ABORT_CMD);
sony_blocks_left = 0;
abort_read_started = 1;
}
restore_flags(flags);
#if DEBUG
printk("Leaving handle_abort_timeout\n");
#endif
}
/* Actually get one sector of data from the drive. */
static void
input_data_sector(char *buffer)
{
#if DEBUG
printk("Entering input_data_sector\n");
#endif
/* If an XA disk on a CDU31A, skip the first 12 bytes of data from
the disk. The real data is after that. We can use audio_buffer. */
if (sony_xa_mode)
insb(sony_cd_read_reg, audio_buffer, CD_XA_HEAD);
clear_data_ready();
insb(sony_cd_read_reg, buffer, 2048);
/* If an XA disk, we have to clear out the rest of the unused
error correction data. We can use audio_buffer for that. */
if (sony_xa_mode)
insb(sony_cd_read_reg, audio_buffer, CD_XA_TAIL);
#if DEBUG
printk("Leaving input_data_sector\n");
#endif
}
/* read data from the drive. Note the nsect must be <= 4. */
static void
read_data_block(char *buffer,
unsigned int block,
unsigned int nblocks,
unsigned char res_reg[], int *res_size)
{
unsigned long retry_count;
#if DEBUG
printk("Entering read_data_block\n");
#endif
res_reg[0] = 0;
res_reg[1] = 0;
*res_size = 0;
/* Wait for the drive to tell us we have something */
retry_count = jiffies + SONY_JIFFIES_TIMEOUT;
while (time_before(jiffies, retry_count) && !(is_data_ready())) {
while (handle_sony_cd_attention());
sony_sleep();
}
if (!(is_data_ready())) {
if (is_result_ready()) {
get_result(res_reg, res_size);
if ((res_reg[0] & 0xf0) != 0x20) {
printk
("CDU31A: Got result that should have been error: %d\n",
res_reg[0]);
res_reg[0] = 0x20;
res_reg[1] = SONY_BAD_DATA_ERR;
*res_size = 2;
}
abort_read();
} else {
#if DEBUG
printk("CDU31A timeout out %d\n", __LINE__);
#endif
res_reg[0] = 0x20;
res_reg[1] = SONY_TIMEOUT_OP_ERR;
*res_size = 2;
abort_read();
}
} else {
input_data_sector(buffer);
sony_blocks_left -= nblocks;
sony_next_block += nblocks;
/* Wait for the status from the drive. */
retry_count = jiffies + SONY_JIFFIES_TIMEOUT;
while (time_before(jiffies, retry_count)
&& !(is_result_ready())) {
while (handle_sony_cd_attention());
sony_sleep();
}
if (!is_result_ready()) {
#if DEBUG
printk("CDU31A timeout out %d\n", __LINE__);
#endif
res_reg[0] = 0x20;
res_reg[1] = SONY_TIMEOUT_OP_ERR;
*res_size = 2;
abort_read();
} else {
get_result(res_reg, res_size);
/* If we got a buffer status, handle that. */
if ((res_reg[0] & 0xf0) == 0x50) {
if ((res_reg[0] ==
SONY_NO_CIRC_ERR_BLK_STAT)
|| (res_reg[0] ==
SONY_NO_LECC_ERR_BLK_STAT)
|| (res_reg[0] ==
SONY_RECOV_LECC_ERR_BLK_STAT)) {
/* nothing here */
} else {
printk
("CDU31A: Data block error: 0x%x\n",
res_reg[0]);
res_reg[0] = 0x20;
res_reg[1] = SONY_BAD_DATA_ERR;
*res_size = 2;
}
/* Final transfer is done for read command, get final result. */
if (sony_blocks_left == 0) {
get_result(res_reg, res_size);
}
} else if ((res_reg[0] & 0xf0) != 0x20) {
/* The drive gave me bad status, I don't know what to do.
Reset the driver and return an error. */
printk
("CDU31A: Invalid block status: 0x%x\n",
res_reg[0]);
restart_on_error();
res_reg[0] = 0x20;
res_reg[1] = SONY_BAD_DATA_ERR;
*res_size = 2;
}
}
}
#if DEBUG
printk("Leaving read_data_block at %d\n", __LINE__);
#endif
}
/*
* The OS calls this to perform a read or write operation to the drive.
* Write obviously fail. Reads to a read ahead of sony_buffer_size
* bytes to help speed operations. This especially helps since the OS
* uses 1024 byte blocks and the drive uses 2048 byte blocks. Since most
* data access on a CD is done sequentially, this saves a lot of operations.
*/
static void do_cdu31a_request(request_queue_t * q)
{
struct request *req;
int block, nblock, num_retries;
unsigned char res_reg[12];
unsigned int res_size;
unsigned long flags;
#if DEBUG
printk("Entering do_cdu31a_request\n");
#endif
/*
* Make sure no one else is using the driver; wait for them
* to finish if it is so.
*/
save_flags(flags);
cli();
while (sony_inuse) {
interruptible_sleep_on(&sony_wait);
if (signal_pending(current)) {
restore_flags(flags);
#if DEBUG
printk("Leaving do_cdu31a_request at %d\n",
__LINE__);
#endif
return;
}
}
sony_inuse = 1;
has_cd_task = current;
/* Get drive status before doing anything. */
while (handle_sony_cd_attention());
/* Make sure we have a valid TOC. */
sony_get_toc();
/*
* jens: driver has lots of races
*/
spin_unlock_irq(q->queue_lock);
/* Make sure the timer is cancelled. */
del_timer(&cdu31a_abort_timer);
while (1) {
/*
* The beginning here is stolen from the hard disk driver. I hope
* it's right.
*/
req = elv_next_request(q);
if (!req)
goto end_do_cdu31a_request;
if (!sony_spun_up)
scd_spinup();
block = req->sector;
nblock = req->nr_sectors;
#if DEBUG
printk("CDU31A: request at block %d, length %d blocks\n",
block, nblock);
#endif
if (!sony_toc_read) {
printk("CDU31A: TOC not read\n");
end_request(req, 0);
continue;
}
/* WTF??? */
if (!(req->flags & REQ_CMD))
continue;
if (rq_data_dir(req) == WRITE) {
end_request(req, 0);
continue;
}
if (rq_data_dir(req) != READ)
panic("CDU31A: Unknown cmd");
/*
* If the block address is invalid or the request goes beyond the end of
* the media, return an error.
*/
if (((block + nblock) / 4) >= sony_toc.lead_out_start_lba) {
printk("CDU31A: Request past end of media\n");
end_request(req, 0);
continue;
}
if (nblock > 4)
nblock = 4;
num_retries = 0;
try_read_again:
while (handle_sony_cd_attention());
if (!sony_toc_read) {
printk("CDU31A: TOC not read\n");
end_request(req, 0);
continue;
}
/* If no data is left to be read from the drive, start the
next request. */
if (sony_blocks_left == 0) {
if (start_request(block / 4, nblock / 4)) {
end_request(req, 0);
continue;
}
}
/* If the requested block is not the next one waiting in
the driver, abort the current operation and start a
new one. */
else if (block != sony_next_block) {
#if DEBUG
printk("CDU31A Warning: Read for block %d, expected %d\n",
block, sony_next_block);
#endif
abort_read();
if (!sony_toc_read) {
printk("CDU31A: TOC not read\n");
end_request(req, 0);
continue;
}
if (start_request(block / 4, nblock / 4)) {
printk("CDU31a: start request failed\n");
end_request(req, 0);
continue;
}
}
read_data_block(req->buffer, block, nblock, res_reg, &res_size);
if (res_reg[0] != 0x20) {
if (!end_that_request_first(req, 1, nblock)) {
spin_lock_irq(q->queue_lock);
blkdev_dequeue_request(req);
end_that_request_last(req);
spin_unlock_irq(q->queue_lock);
}
continue;
}
if (num_retries > MAX_CDU31A_RETRIES) {
end_request(req, 0);
continue;
}
num_retries++;
if (res_reg[1] == SONY_NOT_SPIN_ERR) {
do_sony_cd_cmd(SONY_SPIN_UP_CMD, NULL, 0, res_reg,
&res_size);
} else {
printk("CDU31A: %s error for block %d, nblock %d\n",
translate_error(res_reg[1]), block, nblock);
}
goto try_read_again;
}
end_do_cdu31a_request:
spin_lock_irq(q->queue_lock);
#if 0
/* After finished, cancel any pending operations. */
abort_read();
#else
/* Start a timer to time out after a while to disable
the read. */
cdu31a_abort_timer.expires = jiffies + 2 * HZ; /* Wait 2 seconds */
add_timer(&cdu31a_abort_timer);
#endif
has_cd_task = NULL;
sony_inuse = 0;
wake_up_interruptible(&sony_wait);
restore_flags(flags);
#if DEBUG
printk("Leaving do_cdu31a_request at %d\n", __LINE__);
#endif
}
/*
* Read the table of contents from the drive and set up TOC if
* successful.
*/
static void sony_get_toc(void)
{
unsigned char res_reg[2];
unsigned int res_size;
unsigned char parms[1];
int session;
int num_spin_ups;
int totaltracks = 0;
int mint = 99;
int maxt = 0;
#if DEBUG
printk("Entering sony_get_toc\n");
#endif
num_spin_ups = 0;
if (!sony_toc_read) {
respinup_on_gettoc:
/* Ignore the result, since it might error if spinning already. */
do_sony_cd_cmd(SONY_SPIN_UP_CMD, NULL, 0, res_reg,
&res_size);
do_sony_cd_cmd(SONY_READ_TOC_CMD, NULL, 0, res_reg,
&res_size);
/* The drive sometimes returns error 0. I don't know why, but ignore
it. It seems to mean the drive has already done the operation. */
if ((res_size < 2)
|| ((res_reg[0] != 0) && (res_reg[1] != 0))) {
/* If the drive is already playing, it's ok. */
if ((res_reg[1] == SONY_AUDIO_PLAYING_ERR)
|| (res_reg[1] == 0)) {
goto gettoc_drive_spinning;
}
/* If the drive says it is not spun up (even though we just did it!)
then retry the operation at least a few times. */
if ((res_reg[1] == SONY_NOT_SPIN_ERR)
&& (num_spin_ups < MAX_CDU31A_RETRIES)) {
num_spin_ups++;
goto respinup_on_gettoc;
}
printk("cdu31a: Error reading TOC: %x %s\n",
res_reg[0], translate_error(res_reg[1]));
return;
}
gettoc_drive_spinning:
/* The idea here is we keep asking for sessions until the command
fails. Then we know what the last valid session on the disk is.
No need to check session 0, since session 0 is the same as session
1; the command returns different information if you give it 0.
*/
#if DEBUG
memset(&sony_toc, 0x0e, sizeof(sony_toc));
memset(&single_toc, 0x0f, sizeof(single_toc));
#endif
session = 1;
while (1) {
/* This seems to slow things down enough to make it work. This
* appears to be a problem in do_sony_cd_cmd. This printk seems
* to address the symptoms... -Erik */
#if DEBUG
printk("cdu31a: Trying session %d\n", session);
#endif
parms[0] = session;
do_sony_cd_cmd(SONY_READ_TOC_SPEC_CMD,
parms, 1, res_reg, &res_size);
#if DEBUG
printk("%2.2x %2.2x\n", res_reg[0], res_reg[1]);
#endif
if ((res_size < 2)
|| ((res_reg[0] & 0xf0) == 0x20)) {
/* An error reading the TOC, this must be past the last session. */
if (session == 1)
printk
("Yikes! Couldn't read any sessions!");
break;
}
#if DEBUG
printk("Reading session %d\n", session);
#endif
parms[0] = session;
do_sony_cd_cmd(SONY_REQ_TOC_DATA_SPEC_CMD,
parms,
1,
(unsigned char *) &single_toc,
&res_size);
if ((res_size < 2)
|| ((single_toc.exec_status[0] & 0xf0) ==
0x20)) {
printk
("cdu31a: Error reading session %d: %x %s\n",
session, single_toc.exec_status[0],
translate_error(single_toc.
exec_status[1]));
/* An error reading the TOC. Return without sony_toc_read
set. */
return;
}
#if DEBUG
printk
("add0 %01x, con0 %01x, poi0 %02x, 1st trk %d, dsktyp %x, dum0 %x\n",
single_toc.address0, single_toc.control0,
single_toc.point0,
bcd_to_int(single_toc.first_track_num),
single_toc.disk_type, single_toc.dummy0);
printk
("add1 %01x, con1 %01x, poi1 %02x, lst trk %d, dummy1 %x, dum2 %x\n",
single_toc.address1, single_toc.control1,
single_toc.point1,
bcd_to_int(single_toc.last_track_num),
single_toc.dummy1, single_toc.dummy2);
printk
("add2 %01x, con2 %01x, poi2 %02x leadout start min %d, sec %d, frame %d\n",
single_toc.address2, single_toc.control2,
single_toc.point2,
bcd_to_int(single_toc.lead_out_start_msf[0]),
bcd_to_int(single_toc.lead_out_start_msf[1]),
bcd_to_int(single_toc.lead_out_start_msf[2]));
if (res_size > 18 && single_toc.pointb0 > 0xaf)
printk
("addb0 %01x, conb0 %01x, poib0 %02x, nextsession min %d, sec %d, frame %d\n"
"#mode5_ptrs %02d, max_start_outer_leadout_msf min %d, sec %d, frame %d\n",
single_toc.addressb0,
single_toc.controlb0,
single_toc.pointb0,
bcd_to_int(single_toc.
next_poss_prog_area_msf
[0]),
bcd_to_int(single_toc.
next_poss_prog_area_msf
[1]),
bcd_to_int(single_toc.
next_poss_prog_area_msf
[2]),
single_toc.num_mode_5_pointers,
bcd_to_int(single_toc.
max_start_outer_leadout_msf
[0]),
bcd_to_int(single_toc.
max_start_outer_leadout_msf
[1]),
bcd_to_int(single_toc.
max_start_outer_leadout_msf
[2]));
if (res_size > 27 && single_toc.pointb1 > 0xaf)
printk
("addb1 %01x, conb1 %01x, poib1 %02x, %x %x %x %x #skipint_ptrs %d, #skiptrkassign %d %x\n",
single_toc.addressb1,
single_toc.controlb1,
single_toc.pointb1,
single_toc.dummyb0_1[0],
single_toc.dummyb0_1[1],
single_toc.dummyb0_1[2],
single_toc.dummyb0_1[3],
single_toc.num_skip_interval_pointers,
single_toc.num_skip_track_assignments,
single_toc.dummyb0_2);
if (res_size > 36 && single_toc.pointb2 > 0xaf)
printk
("addb2 %01x, conb2 %01x, poib2 %02x, %02x %02x %02x %02x %02x %02x %02x\n",
single_toc.addressb2,
single_toc.controlb2,
single_toc.pointb2,
single_toc.tracksb2[0],
single_toc.tracksb2[1],
single_toc.tracksb2[2],
single_toc.tracksb2[3],
single_toc.tracksb2[4],
single_toc.tracksb2[5],
single_toc.tracksb2[6]);
if (res_size > 45 && single_toc.pointb3 > 0xaf)
printk
("addb3 %01x, conb3 %01x, poib3 %02x, %02x %02x %02x %02x %02x %02x %02x\n",
single_toc.addressb3,
single_toc.controlb3,
single_toc.pointb3,
single_toc.tracksb3[0],
single_toc.tracksb3[1],
single_toc.tracksb3[2],
single_toc.tracksb3[3],
single_toc.tracksb3[4],
single_toc.tracksb3[5],
single_toc.tracksb3[6]);
if (res_size > 54 && single_toc.pointb4 > 0xaf)
printk
("addb4 %01x, conb4 %01x, poib4 %02x, %02x %02x %02x %02x %02x %02x %02x\n",
single_toc.addressb4,
single_toc.controlb4,
single_toc.pointb4,
single_toc.tracksb4[0],
single_toc.tracksb4[1],
single_toc.tracksb4[2],
single_toc.tracksb4[3],
single_toc.tracksb4[4],
single_toc.tracksb4[5],
single_toc.tracksb4[6]);
if (res_size > 63 && single_toc.pointc0 > 0xaf)
printk
("addc0 %01x, conc0 %01x, poic0 %02x, %02x %02x %02x %02x %02x %02x %02x\n",
single_toc.addressc0,
single_toc.controlc0,
single_toc.pointc0,
single_toc.dummyc0[0],
single_toc.dummyc0[1],
single_toc.dummyc0[2],
single_toc.dummyc0[3],
single_toc.dummyc0[4],
single_toc.dummyc0[5],
single_toc.dummyc0[6]);
#endif
#undef DEBUG
#define DEBUG 0
sony_toc.lead_out_start_msf[0] =
bcd_to_int(single_toc.lead_out_start_msf[0]);
sony_toc.lead_out_start_msf[1] =
bcd_to_int(single_toc.lead_out_start_msf[1]);
sony_toc.lead_out_start_msf[2] =
bcd_to_int(single_toc.lead_out_start_msf[2]);
sony_toc.lead_out_start_lba =
single_toc.lead_out_start_lba =
msf_to_log(sony_toc.lead_out_start_msf);
/* For points that do not exist, move the data over them
to the right location. */
if (single_toc.pointb0 != 0xb0) {
memmove(((char *) &single_toc) + 27,
((char *) &single_toc) + 18,
res_size - 18);
res_size += 9;
} else if (res_size > 18) {
sony_toc.lead_out_start_msf[0] =
bcd_to_int(single_toc.
max_start_outer_leadout_msf
[0]);
sony_toc.lead_out_start_msf[1] =
bcd_to_int(single_toc.
max_start_outer_leadout_msf
[1]);
sony_toc.lead_out_start_msf[2] =
bcd_to_int(single_toc.
max_start_outer_leadout_msf
[2]);
sony_toc.lead_out_start_lba =
msf_to_log(sony_toc.
lead_out_start_msf);
}
if (single_toc.pointb1 != 0xb1) {
memmove(((char *) &single_toc) + 36,
((char *) &single_toc) + 27,
res_size - 27);
res_size += 9;
}
if (single_toc.pointb2 != 0xb2) {
memmove(((char *) &single_toc) + 45,
((char *) &single_toc) + 36,
res_size - 36);
res_size += 9;
}
if (single_toc.pointb3 != 0xb3) {
memmove(((char *) &single_toc) + 54,
((char *) &single_toc) + 45,
res_size - 45);
res_size += 9;
}
if (single_toc.pointb4 != 0xb4) {
memmove(((char *) &single_toc) + 63,
((char *) &single_toc) + 54,
res_size - 54);
res_size += 9;
}
if (single_toc.pointc0 != 0xc0) {
memmove(((char *) &single_toc) + 72,
((char *) &single_toc) + 63,
res_size - 63);
res_size += 9;
}
#if DEBUG
printk
("start track lba %u, leadout start lba %u\n",
single_toc.start_track_lba,
single_toc.lead_out_start_lba);
{
int i;
for (i = 0;
i <
1 +
bcd_to_int(single_toc.last_track_num)
-
bcd_to_int(single_toc.
first_track_num); i++) {
printk
("trk %02d: add 0x%01x, con 0x%01x, track %02d, start min %02d, sec %02d, frame %02d\n",
i,
single_toc.tracks[i].address,
single_toc.tracks[i].control,
bcd_to_int(single_toc.
tracks[i].track),
bcd_to_int(single_toc.
tracks[i].
track_start_msf
[0]),
bcd_to_int(single_toc.
tracks[i].
track_start_msf
[1]),
bcd_to_int(single_toc.
tracks[i].
track_start_msf
[2]));
if (mint >
bcd_to_int(single_toc.
tracks[i].track))
mint =
bcd_to_int(single_toc.
tracks[i].
track);
if (maxt <
bcd_to_int(single_toc.
tracks[i].track))
maxt =
bcd_to_int(single_toc.
tracks[i].
track);
}
printk
("min track number %d, max track number %d\n",
mint, maxt);
}
#endif
/* prepare a special table of contents for a CD-I disc. They don't have one. */
if (single_toc.disk_type == 0x10 &&
single_toc.first_track_num == 2 &&
single_toc.last_track_num == 2 /* CD-I */ ) {
sony_toc.tracks[totaltracks].address = 1;
sony_toc.tracks[totaltracks].control = 4; /* force data tracks */
sony_toc.tracks[totaltracks].track = 1;
sony_toc.tracks[totaltracks].
track_start_msf[0] = 0;
sony_toc.tracks[totaltracks].
track_start_msf[1] = 2;
sony_toc.tracks[totaltracks].
track_start_msf[2] = 0;
mint = maxt = 1;
totaltracks++;
} else
/* gather track entries from this session */
{
int i;
for (i = 0;
i <
1 +
bcd_to_int(single_toc.last_track_num)
-
bcd_to_int(single_toc.
first_track_num);
i++, totaltracks++) {
sony_toc.tracks[totaltracks].
address =
single_toc.tracks[i].address;
sony_toc.tracks[totaltracks].
control =
single_toc.tracks[i].control;
sony_toc.tracks[totaltracks].
track =
bcd_to_int(single_toc.
tracks[i].track);
sony_toc.tracks[totaltracks].
track_start_msf[0] =
bcd_to_int(single_toc.
tracks[i].
track_start_msf[0]);
sony_toc.tracks[totaltracks].
track_start_msf[1] =
bcd_to_int(single_toc.
tracks[i].
track_start_msf[1]);
sony_toc.tracks[totaltracks].
track_start_msf[2] =
bcd_to_int(single_toc.
tracks[i].
track_start_msf[2]);
if (i == 0)
single_toc.
start_track_lba =
msf_to_log(sony_toc.
tracks
[totaltracks].
track_start_msf);
if (mint >
sony_toc.tracks[totaltracks].
track)
mint =
sony_toc.
tracks[totaltracks].
track;
if (maxt <
sony_toc.tracks[totaltracks].
track)
maxt =
sony_toc.
tracks[totaltracks].
track;
}
}
sony_toc.first_track_num = mint;
sony_toc.last_track_num = maxt;
/* Disk type of last session wins. For example:
CD-Extra has disk type 0 for the first session, so
a dumb HiFi CD player thinks it is a plain audio CD.
We are interested in the disk type of the last session,
which is 0x20 (XA) for CD-Extra, so we can access the
data track ... */
sony_toc.disk_type = single_toc.disk_type;
sony_toc.sessions = session;
/* don't believe everything :-) */
if (session == 1)
single_toc.start_track_lba = 0;
sony_toc.start_track_lba =
single_toc.start_track_lba;
if (session > 1 && single_toc.pointb0 == 0xb0 &&
sony_toc.lead_out_start_lba ==
single_toc.lead_out_start_lba) {
break;
}
/* Let's not get carried away... */
if (session > 40) {
printk("cdu31a: too many sessions: %d\n",
session);
break;
}
session++;
}
sony_toc.track_entries = totaltracks;
/* add one entry for the LAST track with track number CDROM_LEADOUT */
sony_toc.tracks[totaltracks].address = single_toc.address2;
sony_toc.tracks[totaltracks].control = single_toc.control2;
sony_toc.tracks[totaltracks].track = CDROM_LEADOUT;
sony_toc.tracks[totaltracks].track_start_msf[0] =
sony_toc.lead_out_start_msf[0];
sony_toc.tracks[totaltracks].track_start_msf[1] =
sony_toc.lead_out_start_msf[1];
sony_toc.tracks[totaltracks].track_start_msf[2] =
sony_toc.lead_out_start_msf[2];
sony_toc_read = 1;
#undef DEBUG
#if DEBUG
printk
("Disk session %d, start track: %d, stop track: %d\n",
session, single_toc.start_track_lba,
single_toc.lead_out_start_lba);
#endif
}
#if DEBUG
printk("Leaving sony_get_toc\n");
#endif
}
/*
* Uniform cdrom interface function
* return multisession offset and sector information
*/
static int scd_get_last_session(struct cdrom_device_info *cdi,
struct cdrom_multisession *ms_info)
{
if (ms_info == NULL)
return 1;
if (!sony_toc_read)
sony_get_toc();
ms_info->addr_format = CDROM_LBA;
ms_info->addr.lba = sony_toc.start_track_lba;
ms_info->xa_flag = sony_toc.disk_type == SONY_XA_DISK_TYPE ||
sony_toc.disk_type == 0x10 /* CDI */ ;
return 0;
}
/*
* Search for a specific track in the table of contents.
*/
static int find_track(int track)
{
int i;
for (i = 0; i <= sony_toc.track_entries; i++) {
if (sony_toc.tracks[i].track == track) {
return i;
}
}
return -1;
}
/*
* Read the subcode and put it in last_sony_subcode for future use.
*/
static int read_subcode(void)
{
unsigned int res_size;
do_sony_cd_cmd(SONY_REQ_SUBCODE_ADDRESS_CMD,
NULL,
0, (unsigned char *) &last_sony_subcode, &res_size);
if ((res_size < 2)
|| ((last_sony_subcode.exec_status[0] & 0xf0) == 0x20)) {
printk("Sony CDROM error %s (read_subcode)\n",
translate_error(last_sony_subcode.exec_status[1]));
return -EIO;
}
last_sony_subcode.track_num =
bcd_to_int(last_sony_subcode.track_num);
last_sony_subcode.index_num =
bcd_to_int(last_sony_subcode.index_num);
last_sony_subcode.abs_msf[0] =
bcd_to_int(last_sony_subcode.abs_msf[0]);
last_sony_subcode.abs_msf[1] =
bcd_to_int(last_sony_subcode.abs_msf[1]);
last_sony_subcode.abs_msf[2] =
bcd_to_int(last_sony_subcode.abs_msf[2]);
last_sony_subcode.rel_msf[0] =
bcd_to_int(last_sony_subcode.rel_msf[0]);
last_sony_subcode.rel_msf[1] =
bcd_to_int(last_sony_subcode.rel_msf[1]);
last_sony_subcode.rel_msf[2] =
bcd_to_int(last_sony_subcode.rel_msf[2]);
return 0;
}
/*
* Uniform cdrom interface function
* return the media catalog number found on some older audio cds
*/
static int
scd_get_mcn(struct cdrom_device_info *cdi, struct cdrom_mcn *mcn)
{
unsigned char resbuffer[2 + 14];
unsigned char *mcnp = mcn->medium_catalog_number;
unsigned char *resp = resbuffer + 3;
unsigned int res_size;
memset(mcn->medium_catalog_number, 0, 14);
do_sony_cd_cmd(SONY_REQ_UPC_EAN_CMD,
NULL, 0, resbuffer, &res_size);
if ((res_size < 2) || ((resbuffer[0] & 0xf0) == 0x20));
else {
/* packed bcd to single ASCII digits */
*mcnp++ = (*resp >> 4) + '0';
*mcnp++ = (*resp++ & 0x0f) + '0';
*mcnp++ = (*resp >> 4) + '0';
*mcnp++ = (*resp++ & 0x0f) + '0';
*mcnp++ = (*resp >> 4) + '0';
*mcnp++ = (*resp++ & 0x0f) + '0';
*mcnp++ = (*resp >> 4) + '0';
*mcnp++ = (*resp++ & 0x0f) + '0';
*mcnp++ = (*resp >> 4) + '0';
*mcnp++ = (*resp++ & 0x0f) + '0';
*mcnp++ = (*resp >> 4) + '0';
*mcnp++ = (*resp++ & 0x0f) + '0';
*mcnp++ = (*resp >> 4) + '0';
}
*mcnp = '\0';
return 0;
}
/*
* Get the subchannel info like the CDROMSUBCHNL command wants to see it. If
* the drive is playing, the subchannel needs to be read (since it would be
* changing). If the drive is paused or completed, the subcode information has
* already been stored, just use that. The ioctl call wants things in decimal
* (not BCD), so all the conversions are done.
*/
static int sony_get_subchnl_info(struct cdrom_subchnl *schi)
{
/* Get attention stuff */
while (handle_sony_cd_attention());
sony_get_toc();
if (!sony_toc_read) {
return -EIO;
}
switch (sony_audio_status) {
case CDROM_AUDIO_NO_STATUS:
case CDROM_AUDIO_PLAY:
if (read_subcode() < 0) {
return -EIO;
}
break;
case CDROM_AUDIO_PAUSED:
case CDROM_AUDIO_COMPLETED:
break;
#if 0
case CDROM_AUDIO_NO_STATUS:
schi->cdsc_audiostatus = sony_audio_status;
return 0;
break;
#endif
case CDROM_AUDIO_INVALID:
case CDROM_AUDIO_ERROR:
default:
return -EIO;
}
schi->cdsc_audiostatus = sony_audio_status;
schi->cdsc_adr = last_sony_subcode.address;
schi->cdsc_ctrl = last_sony_subcode.control;
schi->cdsc_trk = last_sony_subcode.track_num;
schi->cdsc_ind = last_sony_subcode.index_num;
if (schi->cdsc_format == CDROM_MSF) {
schi->cdsc_absaddr.msf.minute =
last_sony_subcode.abs_msf[0];
schi->cdsc_absaddr.msf.second =
last_sony_subcode.abs_msf[1];
schi->cdsc_absaddr.msf.frame =
last_sony_subcode.abs_msf[2];
schi->cdsc_reladdr.msf.minute =
last_sony_subcode.rel_msf[0];
schi->cdsc_reladdr.msf.second =
last_sony_subcode.rel_msf[1];
schi->cdsc_reladdr.msf.frame =
last_sony_subcode.rel_msf[2];
} else if (schi->cdsc_format == CDROM_LBA) {
schi->cdsc_absaddr.lba =
msf_to_log(last_sony_subcode.abs_msf);
schi->cdsc_reladdr.lba =
msf_to_log(last_sony_subcode.rel_msf);
}
return 0;
}
/* Get audio data from the drive. This is fairly complex because I
am looking for status and data at the same time, but if I get status
then I just look for data. I need to get the status immediately so
the switch from audio to data tracks will happen quickly. */
static void
read_audio_data(char *buffer, unsigned char res_reg[], int *res_size)
{
unsigned long retry_count;
int result_read;
res_reg[0] = 0;
res_reg[1] = 0;
*res_size = 0;
result_read = 0;
/* Wait for the drive to tell us we have something */
retry_count = jiffies + SONY_JIFFIES_TIMEOUT;
continue_read_audio_wait:
while (time_before(jiffies, retry_count) && !(is_data_ready())
&& !(is_result_ready() || result_read)) {
while (handle_sony_cd_attention());
sony_sleep();
}
if (!(is_data_ready())) {
if (is_result_ready() && !result_read) {
get_result(res_reg, res_size);
/* Read block status and continue waiting for data. */
if ((res_reg[0] & 0xf0) == 0x50) {
result_read = 1;
goto continue_read_audio_wait;
}
/* Invalid data from the drive. Shut down the operation. */
else if ((res_reg[0] & 0xf0) != 0x20) {
printk
("CDU31A: Got result that should have been error: %d\n",
res_reg[0]);
res_reg[0] = 0x20;
res_reg[1] = SONY_BAD_DATA_ERR;
*res_size = 2;
}
abort_read();
} else {
#if DEBUG
printk("CDU31A timeout out %d\n", __LINE__);
#endif
res_reg[0] = 0x20;
res_reg[1] = SONY_TIMEOUT_OP_ERR;
*res_size = 2;
abort_read();
}
} else {
clear_data_ready();
/* If data block, then get 2340 bytes offset by 12. */
if (sony_raw_data_mode) {
insb(sony_cd_read_reg, buffer + CD_XA_HEAD,
CD_FRAMESIZE_RAW1);
} else {
/* Audio gets the whole 2352 bytes. */
insb(sony_cd_read_reg, buffer, CD_FRAMESIZE_RAW);
}
/* If I haven't already gotten the result, get it now. */
if (!result_read) {
/* Wait for the drive to tell us we have something */
retry_count = jiffies + SONY_JIFFIES_TIMEOUT;
while (time_before(jiffies, retry_count)
&& !(is_result_ready())) {
while (handle_sony_cd_attention());
sony_sleep();
}
if (!is_result_ready()) {
#if DEBUG
printk("CDU31A timeout out %d\n",
__LINE__);
#endif
res_reg[0] = 0x20;
res_reg[1] = SONY_TIMEOUT_OP_ERR;
*res_size = 2;
abort_read();
return;
} else {
get_result(res_reg, res_size);
}
}
if ((res_reg[0] & 0xf0) == 0x50) {
if ((res_reg[0] == SONY_NO_CIRC_ERR_BLK_STAT)
|| (res_reg[0] == SONY_NO_LECC_ERR_BLK_STAT)
|| (res_reg[0] == SONY_RECOV_LECC_ERR_BLK_STAT)
|| (res_reg[0] == SONY_NO_ERR_DETECTION_STAT)) {
/* Ok, nothing to do. */
} else {
printk("CDU31A: Data block error: 0x%x\n",
res_reg[0]);
res_reg[0] = 0x20;
res_reg[1] = SONY_BAD_DATA_ERR;
*res_size = 2;
}
} else if ((res_reg[0] & 0xf0) != 0x20) {
/* The drive gave me bad status, I don't know what to do.
Reset the driver and return an error. */
printk("CDU31A: Invalid block status: 0x%x\n",
res_reg[0]);
restart_on_error();
res_reg[0] = 0x20;
res_reg[1] = SONY_BAD_DATA_ERR;
*res_size = 2;
}
}
}
/* Perform a raw data read. This will automatically detect the
track type and read the proper data (audio or data). */
static int read_audio(struct cdrom_read_audio *ra)
{
int retval;
unsigned char params[2];
unsigned char res_reg[12];
unsigned int res_size;
unsigned int cframe;
unsigned long flags;
/*
* Make sure no one else is using the driver; wait for them
* to finish if it is so.
*/
save_flags(flags);
cli();
while (sony_inuse) {
interruptible_sleep_on(&sony_wait);
if (signal_pending(current)) {
restore_flags(flags);
return -EAGAIN;
}
}
sony_inuse = 1;
has_cd_task = current;
restore_flags(flags);
if (!sony_spun_up) {
scd_spinup();
}
/* Set the drive to do raw operations. */
params[0] = SONY_SD_DECODE_PARAM;
params[1] = 0x06 | sony_raw_data_mode;
do_sony_cd_cmd(SONY_SET_DRIVE_PARAM_CMD,
params, 2, res_reg, &res_size);
if ((res_size < 2) || ((res_reg[0] & 0xf0) == 0x20)) {
printk("CDU31A: Unable to set decode params: 0x%2.2x\n",
res_reg[1]);
return -EIO;
}
/* From here down, we have to goto exit_read_audio instead of returning
because the drive parameters have to be set back to data before
return. */
retval = 0;
if (start_request(ra->addr.lba, ra->nframes)) {
retval = -EIO;
goto exit_read_audio;
}
/* For every requested frame. */
cframe = 0;
while (cframe < ra->nframes) {
read_audio_data(audio_buffer, res_reg, &res_size);
if ((res_reg[0] & 0xf0) == 0x20) {
if (res_reg[1] == SONY_BAD_DATA_ERR) {
printk
("CDU31A: Data error on audio sector %d\n",
ra->addr.lba + cframe);
} else if (res_reg[1] == SONY_ILL_TRACK_R_ERR) {
/* Illegal track type, change track types and start over. */
sony_raw_data_mode =
(sony_raw_data_mode) ? 0 : 1;
/* Set the drive mode. */
params[0] = SONY_SD_DECODE_PARAM;
params[1] = 0x06 | sony_raw_data_mode;
do_sony_cd_cmd(SONY_SET_DRIVE_PARAM_CMD,
params,
2, res_reg, &res_size);
if ((res_size < 2)
|| ((res_reg[0] & 0xf0) == 0x20)) {
printk
("CDU31A: Unable to set decode params: 0x%2.2x\n",
res_reg[1]);
retval = -EIO;
goto exit_read_audio;
}
/* Restart the request on the current frame. */
if (start_request
(ra->addr.lba + cframe,
ra->nframes - cframe)) {
retval = -EIO;
goto exit_read_audio;
}
/* Don't go back to the top because don't want to get into
and infinite loop. A lot of code gets duplicated, but
that's no big deal, I don't guess. */
read_audio_data(audio_buffer, res_reg,
&res_size);
if ((res_reg[0] & 0xf0) == 0x20) {
if (res_reg[1] ==
SONY_BAD_DATA_ERR) {
printk
("CDU31A: Data error on audio sector %d\n",
ra->addr.lba +
cframe);
} else {
printk
("CDU31A: Error reading audio data on sector %d: %s\n",
ra->addr.lba + cframe,
translate_error
(res_reg[1]));
retval = -EIO;
goto exit_read_audio;
}
} else if (copy_to_user(ra->buf +
(CD_FRAMESIZE_RAW
* cframe),
audio_buffer,
CD_FRAMESIZE_RAW)) {
retval = -EFAULT;
goto exit_read_audio;
}
} else {
printk
("CDU31A: Error reading audio data on sector %d: %s\n",
ra->addr.lba + cframe,
translate_error(res_reg[1]));
retval = -EIO;
goto exit_read_audio;
}
} else if (copy_to_user(ra->buf + (CD_FRAMESIZE_RAW * cframe),
(char *)audio_buffer,
CD_FRAMESIZE_RAW)) {
retval = -EFAULT;
goto exit_read_audio;
}
cframe++;
}
get_result(res_reg, &res_size);
if ((res_reg[0] & 0xf0) == 0x20) {
printk("CDU31A: Error return from audio read: %s\n",
translate_error(res_reg[1]));
retval = -EIO;
goto exit_read_audio;
}
exit_read_audio:
/* Set the drive mode back to the proper one for the disk. */
params[0] = SONY_SD_DECODE_PARAM;
if (!sony_xa_mode) {
params[1] = 0x0f;
} else {
params[1] = 0x07;
}
do_sony_cd_cmd(SONY_SET_DRIVE_PARAM_CMD,
params, 2, res_reg, &res_size);
if ((res_size < 2) || ((res_reg[0] & 0xf0) == 0x20)) {
printk("CDU31A: Unable to reset decode params: 0x%2.2x\n",
res_reg[1]);
return -EIO;
}
has_cd_task = NULL;
sony_inuse = 0;
wake_up_interruptible(&sony_wait);
return (retval);
}
static int
do_sony_cd_cmd_chk(const char *name,
unsigned char cmd,
unsigned char *params,
unsigned int num_params,
unsigned char *result_buffer, unsigned int *result_size)
{
do_sony_cd_cmd(cmd, params, num_params, result_buffer,
result_size);
if ((*result_size < 2) || ((result_buffer[0] & 0xf0) == 0x20)) {
printk("Sony CDROM error %s (CDROM%s)\n",
translate_error(result_buffer[1]), name);
return -EIO;
}
return 0;
}
/*
* Uniform cdrom interface function
* open the tray
*/
static int scd_tray_move(struct cdrom_device_info *cdi, int position)
{
if (position == 1 /* open tray */ ) {
unsigned char res_reg[12];
unsigned int res_size;
do_sony_cd_cmd(SONY_AUDIO_STOP_CMD, NULL, 0, res_reg,
&res_size);
do_sony_cd_cmd(SONY_SPIN_DOWN_CMD, NULL, 0, res_reg,
&res_size);
sony_audio_status = CDROM_AUDIO_INVALID;
return do_sony_cd_cmd_chk("EJECT", SONY_EJECT_CMD, NULL, 0,
res_reg, &res_size);
} else {
if (0 == scd_spinup())
sony_spun_up = 1;
return 0;
}
}
/*
* The big ugly ioctl handler.
*/
static int scd_audio_ioctl(struct cdrom_device_info *cdi,
unsigned int cmd, void *arg)
{
unsigned char res_reg[12];
unsigned int res_size;
unsigned char params[7];
int i;
switch (cmd) {
case CDROMSTART: /* Spin up the drive */
return do_sony_cd_cmd_chk("START", SONY_SPIN_UP_CMD, NULL,
0, res_reg, &res_size);
break;
case CDROMSTOP: /* Spin down the drive */
do_sony_cd_cmd(SONY_AUDIO_STOP_CMD, NULL, 0, res_reg,
&res_size);
/*
* Spin the drive down, ignoring the error if the disk was
* already not spinning.
*/
sony_audio_status = CDROM_AUDIO_NO_STATUS;
return do_sony_cd_cmd_chk("STOP", SONY_SPIN_DOWN_CMD, NULL,
0, res_reg, &res_size);
case CDROMPAUSE: /* Pause the drive */
if (do_sony_cd_cmd_chk
("PAUSE", SONY_AUDIO_STOP_CMD, NULL, 0, res_reg,
&res_size))
return -EIO;
/* Get the current position and save it for resuming */
if (read_subcode() < 0) {
return -EIO;
}
cur_pos_msf[0] = last_sony_subcode.abs_msf[0];
cur_pos_msf[1] = last_sony_subcode.abs_msf[1];
cur_pos_msf[2] = last_sony_subcode.abs_msf[2];
sony_audio_status = CDROM_AUDIO_PAUSED;
return 0;
break;
case CDROMRESUME: /* Start the drive after being paused */
if (sony_audio_status != CDROM_AUDIO_PAUSED) {
return -EINVAL;
}
do_sony_cd_cmd(SONY_SPIN_UP_CMD, NULL, 0, res_reg,
&res_size);
/* Start the drive at the saved position. */
params[1] = int_to_bcd(cur_pos_msf[0]);
params[2] = int_to_bcd(cur_pos_msf[1]);
params[3] = int_to_bcd(cur_pos_msf[2]);
params[4] = int_to_bcd(final_pos_msf[0]);
params[5] = int_to_bcd(final_pos_msf[1]);
params[6] = int_to_bcd(final_pos_msf[2]);
params[0] = 0x03;
if (do_sony_cd_cmd_chk
("RESUME", SONY_AUDIO_PLAYBACK_CMD, params, 7, res_reg,
&res_size) < 0)
return -EIO;
sony_audio_status = CDROM_AUDIO_PLAY;
return 0;
case CDROMPLAYMSF: /* Play starting at the given MSF address. */
do_sony_cd_cmd(SONY_SPIN_UP_CMD, NULL, 0, res_reg,
&res_size);
/* The parameters are given in int, must be converted */
for (i = 1; i < 7; i++) {
params[i] =
int_to_bcd(((unsigned char *) arg)[i - 1]);
}
params[0] = 0x03;
if (do_sony_cd_cmd_chk
("PLAYMSF", SONY_AUDIO_PLAYBACK_CMD, params, 7,
res_reg, &res_size) < 0)
return -EIO;
/* Save the final position for pauses and resumes */
final_pos_msf[0] = bcd_to_int(params[4]);
final_pos_msf[1] = bcd_to_int(params[5]);
final_pos_msf[2] = bcd_to_int(params[6]);
sony_audio_status = CDROM_AUDIO_PLAY;
return 0;
case CDROMREADTOCHDR: /* Read the table of contents header */
{
struct cdrom_tochdr *hdr;
sony_get_toc();
if (!sony_toc_read) {
return -EIO;
}
hdr = (struct cdrom_tochdr *) arg;
hdr->cdth_trk0 = sony_toc.first_track_num;
hdr->cdth_trk1 = sony_toc.last_track_num;
}
return 0;
case CDROMREADTOCENTRY: /* Read a given table of contents entry */
{
struct cdrom_tocentry *entry;
int track_idx;
unsigned char *msf_val = NULL;
sony_get_toc();
if (!sony_toc_read) {
return -EIO;
}
entry = (struct cdrom_tocentry *) arg;
track_idx = find_track(entry->cdte_track);
if (track_idx < 0) {
return -EINVAL;
}
entry->cdte_adr =
sony_toc.tracks[track_idx].address;
entry->cdte_ctrl =
sony_toc.tracks[track_idx].control;
msf_val =
sony_toc.tracks[track_idx].track_start_msf;
/* Logical buffer address or MSF format requested? */
if (entry->cdte_format == CDROM_LBA) {
entry->cdte_addr.lba = msf_to_log(msf_val);
} else if (entry->cdte_format == CDROM_MSF) {
entry->cdte_addr.msf.minute = *msf_val;
entry->cdte_addr.msf.second =
*(msf_val + 1);
entry->cdte_addr.msf.frame =
*(msf_val + 2);
}
}
return 0;
break;
case CDROMPLAYTRKIND: /* Play a track. This currently ignores index. */
{
struct cdrom_ti *ti = (struct cdrom_ti *) arg;
int track_idx;
sony_get_toc();
if (!sony_toc_read) {
return -EIO;
}
if ((ti->cdti_trk0 < sony_toc.first_track_num)
|| (ti->cdti_trk0 > sony_toc.last_track_num)
|| (ti->cdti_trk1 < ti->cdti_trk0)) {
return -EINVAL;
}
track_idx = find_track(ti->cdti_trk0);
if (track_idx < 0) {
return -EINVAL;
}
params[1] =
int_to_bcd(sony_toc.tracks[track_idx].
track_start_msf[0]);
params[2] =
int_to_bcd(sony_toc.tracks[track_idx].
track_start_msf[1]);
params[3] =
int_to_bcd(sony_toc.tracks[track_idx].
track_start_msf[2]);
/*
* If we want to stop after the last track, use the lead-out
* MSF to do that.
*/
if (ti->cdti_trk1 >= sony_toc.last_track_num) {
track_idx = find_track(CDROM_LEADOUT);
} else {
track_idx = find_track(ti->cdti_trk1 + 1);
}
if (track_idx < 0) {
return -EINVAL;
}
params[4] =
int_to_bcd(sony_toc.tracks[track_idx].
track_start_msf[0]);
params[5] =
int_to_bcd(sony_toc.tracks[track_idx].
track_start_msf[1]);
params[6] =
int_to_bcd(sony_toc.tracks[track_idx].
track_start_msf[2]);
params[0] = 0x03;
do_sony_cd_cmd(SONY_SPIN_UP_CMD, NULL, 0, res_reg,
&res_size);
do_sony_cd_cmd(SONY_AUDIO_PLAYBACK_CMD, params, 7,
res_reg, &res_size);
if ((res_size < 2)
|| ((res_reg[0] & 0xf0) == 0x20)) {
printk("Params: %x %x %x %x %x %x %x\n",
params[0], params[1], params[2],
params[3], params[4], params[5],
params[6]);
printk
("Sony CDROM error %s (CDROMPLAYTRKIND)\n",
translate_error(res_reg[1]));
return -EIO;
}
/* Save the final position for pauses and resumes */
final_pos_msf[0] = bcd_to_int(params[4]);
final_pos_msf[1] = bcd_to_int(params[5]);
final_pos_msf[2] = bcd_to_int(params[6]);
sony_audio_status = CDROM_AUDIO_PLAY;
return 0;
}
case CDROMVOLCTRL: /* Volume control. What volume does this change, anyway? */
{
struct cdrom_volctrl *volctrl =
(struct cdrom_volctrl *) arg;
params[0] = SONY_SD_AUDIO_VOLUME;
params[1] = volctrl->channel0;
params[2] = volctrl->channel1;
return do_sony_cd_cmd_chk("VOLCTRL",
SONY_SET_DRIVE_PARAM_CMD,
params, 3, res_reg,
&res_size);
}
case CDROMSUBCHNL: /* Get subchannel info */
return sony_get_subchnl_info((struct cdrom_subchnl *) arg);
default:
return -EINVAL;
}
}
static int scd_dev_ioctl(struct cdrom_device_info *cdi,
unsigned int cmd, unsigned long arg)
{
void __user *argp = (void __user *)arg;
int i;
switch (cmd) {
case CDROMREADAUDIO: /* Read 2352 byte audio tracks and 2340 byte
raw data tracks. */
{
struct cdrom_read_audio ra;
sony_get_toc();
if (!sony_toc_read) {
return -EIO;
}
if (copy_from_user(&ra, argp, sizeof(ra)))
return -EFAULT;
if (ra.nframes == 0) {
return 0;
}
i = verify_area(VERIFY_WRITE, ra.buf,
CD_FRAMESIZE_RAW * ra.nframes);
if (i < 0)
return i;
if (ra.addr_format == CDROM_LBA) {
if ((ra.addr.lba >=
sony_toc.lead_out_start_lba)
|| (ra.addr.lba + ra.nframes >=
sony_toc.lead_out_start_lba)) {
return -EINVAL;
}
} else if (ra.addr_format == CDROM_MSF) {
if ((ra.addr.msf.minute >= 75)
|| (ra.addr.msf.second >= 60)
|| (ra.addr.msf.frame >= 75)) {
return -EINVAL;
}
ra.addr.lba = ((ra.addr.msf.minute * 4500)
+ (ra.addr.msf.second * 75)
+ ra.addr.msf.frame);
if ((ra.addr.lba >=
sony_toc.lead_out_start_lba)
|| (ra.addr.lba + ra.nframes >=
sony_toc.lead_out_start_lba)) {
return -EINVAL;
}
/* I know, this can go negative on an unsigned. However,
the first thing done to the data is to add this value,
so this should compensate and allow direct msf access. */
ra.addr.lba -= LOG_START_OFFSET;
} else {
return -EINVAL;
}
return (read_audio(&ra));
}
return 0;
break;
default:
return -EINVAL;
}
}
static int scd_spinup(void)
{
unsigned char res_reg[12];
unsigned int res_size;
int num_spin_ups;
num_spin_ups = 0;
respinup_on_open:
do_sony_cd_cmd(SONY_SPIN_UP_CMD, NULL, 0, res_reg, &res_size);
/* The drive sometimes returns error 0. I don't know why, but ignore
it. It seems to mean the drive has already done the operation. */
if ((res_size < 2) || ((res_reg[0] != 0) && (res_reg[1] != 0))) {
printk("Sony CDROM %s error (scd_open, spin up)\n",
translate_error(res_reg[1]));
return 1;
}
do_sony_cd_cmd(SONY_READ_TOC_CMD, NULL, 0, res_reg, &res_size);
/* The drive sometimes returns error 0. I don't know why, but ignore
it. It seems to mean the drive has already done the operation. */
if ((res_size < 2) || ((res_reg[0] != 0) && (res_reg[1] != 0))) {
/* If the drive is already playing, it's ok. */
if ((res_reg[1] == SONY_AUDIO_PLAYING_ERR)
|| (res_reg[1] == 0)) {
return 0;
}
/* If the drive says it is not spun up (even though we just did it!)
then retry the operation at least a few times. */
if ((res_reg[1] == SONY_NOT_SPIN_ERR)
&& (num_spin_ups < MAX_CDU31A_RETRIES)) {
num_spin_ups++;
goto respinup_on_open;
}
printk("Sony CDROM error %s (scd_open, read toc)\n",
translate_error(res_reg[1]));
do_sony_cd_cmd(SONY_SPIN_DOWN_CMD, NULL, 0, res_reg,
&res_size);
return 1;
}
return 0;
}
/*
* Open the drive for operations. Spin the drive up and read the table of
* contents if these have not already been done.
*/
static int scd_open(struct cdrom_device_info *cdi, int purpose)
{
unsigned char res_reg[12];
unsigned int res_size;
unsigned char params[2];
if (purpose == 1) {
/* Open for IOCTLs only - no media check */
sony_usage++;
return 0;
}
if (sony_usage == 0) {
if (scd_spinup() != 0)
return -EIO;
sony_get_toc();
if (!sony_toc_read) {
do_sony_cd_cmd(SONY_SPIN_DOWN_CMD, NULL, 0,
res_reg, &res_size);
return -EIO;
}
/* For XA on the CDU31A only, we have to do special reads.
The CDU33A handles XA automagically. */
/* if ( (sony_toc.disk_type == SONY_XA_DISK_TYPE) */
if ((sony_toc.disk_type != 0x00)
&& (!is_double_speed)) {
params[0] = SONY_SD_DECODE_PARAM;
params[1] = 0x07;
do_sony_cd_cmd(SONY_SET_DRIVE_PARAM_CMD,
params, 2, res_reg, &res_size);
if ((res_size < 2)
|| ((res_reg[0] & 0xf0) == 0x20)) {
printk
("CDU31A: Unable to set XA params: 0x%2.2x\n",
res_reg[1]);
}
sony_xa_mode = 1;
}
/* A non-XA disk. Set the parms back if necessary. */
else if (sony_xa_mode) {
params[0] = SONY_SD_DECODE_PARAM;
params[1] = 0x0f;
do_sony_cd_cmd(SONY_SET_DRIVE_PARAM_CMD,
params, 2, res_reg, &res_size);
if ((res_size < 2)
|| ((res_reg[0] & 0xf0) == 0x20)) {
printk
("CDU31A: Unable to reset XA params: 0x%2.2x\n",
res_reg[1]);
}
sony_xa_mode = 0;
}
sony_spun_up = 1;
}
sony_usage++;
return 0;
}
/*
* Close the drive. Spin it down if no task is using it. The spin
* down will fail if playing audio, so audio play is OK.
*/
static void scd_release(struct cdrom_device_info *cdi)
{
if (sony_usage == 1) {
unsigned char res_reg[12];
unsigned int res_size;
do_sony_cd_cmd(SONY_SPIN_DOWN_CMD, NULL, 0, res_reg,
&res_size);
sony_spun_up = 0;
}
sony_usage--;
}
static struct cdrom_device_ops scd_dops = {
.open = scd_open,
.release = scd_release,
.drive_status = scd_drive_status,
.media_changed = scd_media_changed,
.tray_move = scd_tray_move,
.lock_door = scd_lock_door,
.select_speed = scd_select_speed,
.get_last_session = scd_get_last_session,
.get_mcn = scd_get_mcn,
.reset = scd_reset,
.audio_ioctl = scd_audio_ioctl,
.dev_ioctl = scd_dev_ioctl,
.capability = CDC_OPEN_TRAY | CDC_CLOSE_TRAY | CDC_LOCK |
CDC_SELECT_SPEED | CDC_MULTI_SESSION |
CDC_MCN | CDC_MEDIA_CHANGED | CDC_PLAY_AUDIO |
CDC_RESET | CDC_IOCTLS | CDC_DRIVE_STATUS,
.n_minors = 1,
};
static struct cdrom_device_info scd_info = {
.ops = &scd_dops,
.speed = 2,
.capacity = 1,
.name = "cdu31a"
};
static int scd_block_open(struct inode *inode, struct file *file)
{
return cdrom_open(&scd_info, inode, file);
}
static int scd_block_release(struct inode *inode, struct file *file)
{
return cdrom_release(&scd_info, file);
}
static int scd_block_ioctl(struct inode *inode, struct file *file,
unsigned cmd, unsigned long arg)
{
/* The eject and close commands should be handled by Uniform CD-ROM
* driver - but I always got hard lockup instead of eject
* until I put this here.
*/
switch (cmd) {
case CDROMEJECT:
scd_lock_door(&scd_info, 0);
return scd_tray_move(&scd_info, 1);
case CDROMCLOSETRAY:
return scd_tray_move(&scd_info, 0);
default:
return cdrom_ioctl(file, &scd_info, inode, cmd, arg);
}
}
static int scd_block_media_changed(struct gendisk *disk)
{
return cdrom_media_changed(&scd_info);
}
struct block_device_operations scd_bdops =
{
.owner = THIS_MODULE,
.open = scd_block_open,
.release = scd_block_release,
.ioctl = scd_block_ioctl,
.media_changed = scd_block_media_changed,
};
static struct gendisk *scd_gendisk;
/* The different types of disc loading mechanisms supported */
static char *load_mech[] __initdata =
{ "caddy", "tray", "pop-up", "unknown" };
static int __init
get_drive_configuration(unsigned short base_io,
unsigned char res_reg[], unsigned int *res_size)
{
unsigned long retry_count;
if (!request_region(base_io, 4, "cdu31a"))
return 0;
/* Set the base address */
cdu31a_port = base_io;
/* Set up all the register locations */
sony_cd_cmd_reg = cdu31a_port + SONY_CMD_REG_OFFSET;
sony_cd_param_reg = cdu31a_port + SONY_PARAM_REG_OFFSET;
sony_cd_write_reg = cdu31a_port + SONY_WRITE_REG_OFFSET;
sony_cd_control_reg = cdu31a_port + SONY_CONTROL_REG_OFFSET;
sony_cd_status_reg = cdu31a_port + SONY_STATUS_REG_OFFSET;
sony_cd_result_reg = cdu31a_port + SONY_RESULT_REG_OFFSET;
sony_cd_read_reg = cdu31a_port + SONY_READ_REG_OFFSET;
sony_cd_fifost_reg = cdu31a_port + SONY_FIFOST_REG_OFFSET;
/*
* Check to see if anything exists at the status register location.
* I don't know if this is a good way to check, but it seems to work
* ok for me.
*/
if (read_status_register() != 0xff) {
/*
* Reset the drive and wait for attention from it (to say it's reset).
* If you don't wait, the next operation will probably fail.
*/
reset_drive();
retry_count = jiffies + SONY_RESET_TIMEOUT;
while (time_before(jiffies, retry_count)
&& (!is_attention())) {
sony_sleep();
}
#if 0
/* If attention is never seen probably not a CDU31a present */
if (!is_attention()) {
res_reg[0] = 0x20;
goto out_err;
}
#endif
/*
* Get the drive configuration.
*/
do_sony_cd_cmd(SONY_REQ_DRIVE_CONFIG_CMD,
NULL,
0, (unsigned char *) res_reg, res_size);
if (*res_size <= 2 || (res_reg[0] & 0xf0) != 0)
goto out_err;
return 1;
}
/* Return an error */
res_reg[0] = 0x20;
out_err:
release_region(cdu31a_port, 4);
cdu31a_port = 0;
return 0;
}
#ifndef MODULE
/*
* Set up base I/O and interrupts, called from main.c.
*/
static int __init cdu31a_setup(char *strings)
{
int ints[4];
(void) get_options(strings, ARRAY_SIZE(ints), ints);
if (ints[0] > 0) {
cdu31a_port = ints[1];
}
if (ints[0] > 1) {
cdu31a_irq = ints[2];
}
if ((strings != NULL) && (*strings != '\0')) {
if (strcmp(strings, "PAS") == 0) {
sony_pas_init = 1;
} else {
printk("CDU31A: Unknown interface type: %s\n",
strings);
}
}
return 1;
}
__setup("cdu31a=", cdu31a_setup);
#endif
/*
* Initialize the driver.
*/
int __init cdu31a_init(void)
{
struct s_sony_drive_config drive_config;
struct gendisk *disk;
int deficiency = 0;
unsigned int res_size;
char msg[255];
char buf[40];
int i;
int tmp_irq;
/*
* According to Alex Freed (freed@europa.orion.adobe.com), this is
* required for the Fusion CD-16 package. If the sound driver is
* loaded, it should work fine, but just in case...
*
* The following turn on the CD-ROM interface for a Fusion CD-16.
*/
if (sony_pas_init) {
outb(0xbc, 0x9a01);
outb(0xe2, 0x9a01);
}
/* Setting the base I/O address to 0xffff will disable it. */
if (cdu31a_port == 0xffff)
goto errout3;
if (cdu31a_port != 0) {
/* Need IRQ 0 because we can't sleep here. */
tmp_irq = cdu31a_irq;
cdu31a_irq = 0;
if (!get_drive_configuration(cdu31a_port,
drive_config.exec_status,
&res_size))
goto errout3;
cdu31a_irq = tmp_irq;
} else {
cdu31a_irq = 0;
for (i = 0; cdu31a_addresses[i].base; i++) {
if (get_drive_configuration(cdu31a_addresses[i].base,
drive_config.exec_status,
&res_size)) {
cdu31a_irq = cdu31a_addresses[i].int_num;
break;
}
}
if (!cdu31a_port)
goto errout3;
}
if (register_blkdev(MAJOR_NR, "cdu31a"))
goto errout2;
disk = alloc_disk(1);
if (!disk)
goto errout1;
disk->major = MAJOR_NR;
disk->first_minor = 0;
sprintf(disk->disk_name, "cdu31a");
disk->fops = &scd_bdops;
disk->flags = GENHD_FL_CD;
if (SONY_HWC_DOUBLE_SPEED(drive_config))
is_double_speed = 1;
tmp_irq = cdu31a_irq; /* Need IRQ 0 because we can't sleep here. */
cdu31a_irq = 0;
sony_speed = is_double_speed; /* Set 2X drives to 2X by default */
set_drive_params(sony_speed);
cdu31a_irq = tmp_irq;
if (cdu31a_irq > 0) {
if (request_irq
(cdu31a_irq, cdu31a_interrupt, SA_INTERRUPT,
"cdu31a", NULL)) {
printk
("Unable to grab IRQ%d for the CDU31A driver\n",
cdu31a_irq);
cdu31a_irq = 0;
}
}
sprintf(msg, "Sony I/F CDROM : %8.8s %16.16s %8.8s\n",
drive_config.vendor_id,
drive_config.product_id,
drive_config.product_rev_level);
sprintf(buf, " Capabilities: %s",
load_mech[SONY_HWC_GET_LOAD_MECH(drive_config)]);
strcat(msg, buf);
if (SONY_HWC_AUDIO_PLAYBACK(drive_config))
strcat(msg, ", audio");
else
deficiency |= CDC_PLAY_AUDIO;
if (SONY_HWC_EJECT(drive_config))
strcat(msg, ", eject");
else
deficiency |= CDC_OPEN_TRAY;
if (SONY_HWC_LED_SUPPORT(drive_config))
strcat(msg, ", LED");
if (SONY_HWC_ELECTRIC_VOLUME(drive_config))
strcat(msg, ", elec. Vol");
if (SONY_HWC_ELECTRIC_VOLUME_CTL(drive_config))
strcat(msg, ", sep. Vol");
if (is_double_speed)
strcat(msg, ", double speed");
else
deficiency |= CDC_SELECT_SPEED;
if (cdu31a_irq > 0) {
sprintf(buf, ", irq %d", cdu31a_irq);
strcat(msg, buf);
}
strcat(msg, "\n");
printk("%s",msg);
cdu31a_queue = blk_init_queue(do_cdu31a_request, &cdu31a_lock);
if (!cdu31a_queue)
goto errout0;
blk_queue_hardsect_size(cdu31a_queue, 2048);
init_timer(&cdu31a_abort_timer);
cdu31a_abort_timer.function = handle_abort_timeout;
scd_info.mask = deficiency;
scd_gendisk = disk;
if (register_cdrom(&scd_info))
goto err;
disk->queue = cdu31a_queue;
add_disk(disk);
disk_changed = 1;
return (0);
err:
blk_cleanup_queue(cdu31a_queue);
errout0:
if (cdu31a_irq)
free_irq(cdu31a_irq, NULL);
printk("Unable to register CDU-31a with Uniform cdrom driver\n");
put_disk(disk);
errout1:
if (unregister_blkdev(MAJOR_NR, "cdu31a")) {
printk("Can't unregister block device for cdu31a\n");
}
errout2:
release_region(cdu31a_port, 4);
errout3:
return -EIO;
}
void __exit cdu31a_exit(void)
{
del_gendisk(scd_gendisk);
put_disk(scd_gendisk);
if (unregister_cdrom(&scd_info)) {
printk
("Can't unregister cdu31a from Uniform cdrom driver\n");
return;
}
if ((unregister_blkdev(MAJOR_NR, "cdu31a") == -EINVAL)) {
printk("Can't unregister cdu31a\n");
return;
}
blk_cleanup_queue(cdu31a_queue);
if (cdu31a_irq > 0)
free_irq(cdu31a_irq, NULL);
release_region(cdu31a_port, 4);
printk(KERN_INFO "cdu31a module released.\n");
}
#ifdef MODULE
module_init(cdu31a_init);
#endif
module_exit(cdu31a_exit);
MODULE_LICENSE("GPL");
MODULE_ALIAS_BLOCKDEV_MAJOR(CDU31A_CDROM_MAJOR);