| /* -- sjcd.c |
| * |
| * Sanyo CD-ROM device driver implementation, Version 1.6 |
| * Copyright (C) 1995 Vadim V. Model |
| * |
| * model@cecmow.enet.dec.com |
| * vadim@rbrf.ru |
| * vadim@ipsun.ras.ru |
| * |
| * |
| * This driver is based on pre-works by Eberhard Moenkeberg (emoenke@gwdg.de); |
| * it was developed under use of mcd.c from Martin Harriss, with help of |
| * Eric van der Maarel (H.T.M.v.d.Maarel@marin.nl). |
| * |
| * It is planned to include these routines into sbpcd.c later - to make |
| * a "mixed use" on one cable possible for all kinds of drives which use |
| * the SoundBlaster/Panasonic style CDROM interface. But today, the |
| * ability to install directly from CDROM is more important than flexibility. |
| * |
| * 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. |
| * |
| * History: |
| * 1.1 First public release with kernel version 1.3.7. |
| * Written by Vadim Model. |
| * 1.2 Added detection and configuration of cdrom interface |
| * on ISP16 soundcard. |
| * Allow for command line options: sjcd=<io_base>,<irq>,<dma> |
| * 1.3 Some minor changes to README.sjcd. |
| * 1.4 MSS Sound support!! Listen to a CD through the speakers. |
| * 1.5 Module support and bugfixes. |
| * Tray locking. |
| * 1.6 Removed ISP16 code from this driver. |
| * Allow only to set io base address on command line: sjcd=<io_base> |
| * Changes to Documentation/cdrom/sjcd |
| * Added cleanup after any error in the initialisation. |
| * 1.7 Added code to set the sector size tables to prevent the bug present in |
| * the previous version of this driver. Coded added by Anthony Barbachan |
| * from bugfix tip originally suggested by Alan Cox. |
| * |
| * 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> |
| */ |
| |
| #define SJCD_VERSION_MAJOR 1 |
| #define SJCD_VERSION_MINOR 7 |
| |
| #include <linux/module.h> |
| #include <linux/errno.h> |
| #include <linux/mm.h> |
| #include <linux/timer.h> |
| #include <linux/fs.h> |
| #include <linux/kernel.h> |
| #include <linux/cdrom.h> |
| #include <linux/ioport.h> |
| #include <linux/string.h> |
| #include <linux/major.h> |
| #include <linux/init.h> |
| |
| #include <asm/system.h> |
| #include <asm/io.h> |
| #include <asm/uaccess.h> |
| #include <linux/blkdev.h> |
| #include "sjcd.h" |
| |
| static int sjcd_present = 0; |
| static struct request_queue *sjcd_queue; |
| |
| #define MAJOR_NR SANYO_CDROM_MAJOR |
| #define QUEUE (sjcd_queue) |
| #define CURRENT elv_next_request(sjcd_queue) |
| |
| #define SJCD_BUF_SIZ 32 /* cdr-h94a has internal 64K buffer */ |
| |
| /* |
| * buffer for block size conversion |
| */ |
| static char sjcd_buf[2048 * SJCD_BUF_SIZ]; |
| static volatile int sjcd_buf_bn[SJCD_BUF_SIZ], sjcd_next_bn; |
| static volatile int sjcd_buf_in, sjcd_buf_out = -1; |
| |
| /* |
| * Status. |
| */ |
| static unsigned short sjcd_status_valid = 0; |
| static unsigned short sjcd_door_closed; |
| static unsigned short sjcd_door_was_open; |
| static unsigned short sjcd_media_is_available; |
| static unsigned short sjcd_media_is_changed; |
| static unsigned short sjcd_toc_uptodate = 0; |
| static unsigned short sjcd_command_failed; |
| static volatile unsigned char sjcd_completion_status = 0; |
| static volatile unsigned char sjcd_completion_error = 0; |
| static unsigned short sjcd_command_is_in_progress = 0; |
| static unsigned short sjcd_error_reported = 0; |
| static DEFINE_SPINLOCK(sjcd_lock); |
| |
| static int sjcd_open_count; |
| |
| static int sjcd_audio_status; |
| static struct sjcd_play_msf sjcd_playing; |
| |
| static int sjcd_base = SJCD_BASE_ADDR; |
| |
| module_param(sjcd_base, int, 0); |
| |
| static DECLARE_WAIT_QUEUE_HEAD(sjcd_waitq); |
| |
| /* |
| * Data transfer. |
| */ |
| static volatile unsigned short sjcd_transfer_is_active = 0; |
| |
| enum sjcd_transfer_state { |
| SJCD_S_IDLE = 0, |
| SJCD_S_START = 1, |
| SJCD_S_MODE = 2, |
| SJCD_S_READ = 3, |
| SJCD_S_DATA = 4, |
| SJCD_S_STOP = 5, |
| SJCD_S_STOPPING = 6 |
| }; |
| static enum sjcd_transfer_state sjcd_transfer_state = SJCD_S_IDLE; |
| static long sjcd_transfer_timeout = 0; |
| static int sjcd_read_count = 0; |
| static unsigned char sjcd_mode = 0; |
| |
| #define SJCD_READ_TIMEOUT 5000 |
| |
| #if defined( SJCD_GATHER_STAT ) |
| /* |
| * Statistic. |
| */ |
| static struct sjcd_stat statistic; |
| #endif |
| |
| /* |
| * Timer. |
| */ |
| static DEFINE_TIMER(sjcd_delay_timer, NULL, 0, 0); |
| |
| #define SJCD_SET_TIMER( func, tmout ) \ |
| ( sjcd_delay_timer.expires = jiffies+tmout, \ |
| sjcd_delay_timer.function = ( void * )func, \ |
| add_timer( &sjcd_delay_timer ) ) |
| |
| #define CLEAR_TIMER del_timer( &sjcd_delay_timer ) |
| |
| /* |
| * Set up device, i.e., use command line data to set |
| * base address. |
| */ |
| #ifndef MODULE |
| static int __init sjcd_setup(char *str) |
| { |
| int ints[2]; |
| (void) get_options(str, ARRAY_SIZE(ints), ints); |
| if (ints[0] > 0) |
| sjcd_base = ints[1]; |
| |
| return 1; |
| } |
| |
| __setup("sjcd=", sjcd_setup); |
| |
| #endif |
| |
| /* |
| * Special converters. |
| */ |
| static unsigned char bin2bcd(int bin) |
| { |
| int u, v; |
| |
| u = bin % 10; |
| v = bin / 10; |
| return (u | (v << 4)); |
| } |
| |
| static int bcd2bin(unsigned char bcd) |
| { |
| return ((bcd >> 4) * 10 + (bcd & 0x0F)); |
| } |
| |
| static long msf2hsg(struct msf *mp) |
| { |
| return (bcd2bin(mp->frame) + bcd2bin(mp->sec) * 75 |
| + bcd2bin(mp->min) * 4500 - 150); |
| } |
| |
| static void hsg2msf(long hsg, struct msf *msf) |
| { |
| hsg += 150; |
| msf->min = hsg / 4500; |
| hsg %= 4500; |
| msf->sec = hsg / 75; |
| msf->frame = hsg % 75; |
| msf->min = bin2bcd(msf->min); /* convert to BCD */ |
| msf->sec = bin2bcd(msf->sec); |
| msf->frame = bin2bcd(msf->frame); |
| } |
| |
| /* |
| * Send a command to cdrom. Invalidate status. |
| */ |
| static void sjcd_send_cmd(unsigned char cmd) |
| { |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: send_cmd( 0x%x )\n", cmd); |
| #endif |
| outb(cmd, SJCDPORT(0)); |
| sjcd_command_is_in_progress = 1; |
| sjcd_status_valid = 0; |
| sjcd_command_failed = 0; |
| } |
| |
| /* |
| * Send a command with one arg to cdrom. Invalidate status. |
| */ |
| static void sjcd_send_1_cmd(unsigned char cmd, unsigned char a) |
| { |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: send_1_cmd( 0x%x, 0x%x )\n", cmd, a); |
| #endif |
| outb(cmd, SJCDPORT(0)); |
| outb(a, SJCDPORT(0)); |
| sjcd_command_is_in_progress = 1; |
| sjcd_status_valid = 0; |
| sjcd_command_failed = 0; |
| } |
| |
| /* |
| * Send a command with four args to cdrom. Invalidate status. |
| */ |
| static void sjcd_send_4_cmd(unsigned char cmd, unsigned char a, |
| unsigned char b, unsigned char c, |
| unsigned char d) |
| { |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: send_4_cmd( 0x%x )\n", cmd); |
| #endif |
| outb(cmd, SJCDPORT(0)); |
| outb(a, SJCDPORT(0)); |
| outb(b, SJCDPORT(0)); |
| outb(c, SJCDPORT(0)); |
| outb(d, SJCDPORT(0)); |
| sjcd_command_is_in_progress = 1; |
| sjcd_status_valid = 0; |
| sjcd_command_failed = 0; |
| } |
| |
| /* |
| * Send a play or read command to cdrom. Invalidate Status. |
| */ |
| static void sjcd_send_6_cmd(unsigned char cmd, struct sjcd_play_msf *pms) |
| { |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: send_long_cmd( 0x%x )\n", cmd); |
| #endif |
| outb(cmd, SJCDPORT(0)); |
| outb(pms->start.min, SJCDPORT(0)); |
| outb(pms->start.sec, SJCDPORT(0)); |
| outb(pms->start.frame, SJCDPORT(0)); |
| outb(pms->end.min, SJCDPORT(0)); |
| outb(pms->end.sec, SJCDPORT(0)); |
| outb(pms->end.frame, SJCDPORT(0)); |
| sjcd_command_is_in_progress = 1; |
| sjcd_status_valid = 0; |
| sjcd_command_failed = 0; |
| } |
| |
| /* |
| * Get a value from the data port. Should not block, so we use a little |
| * wait for a while. Returns 0 if OK. |
| */ |
| static int sjcd_load_response(void *buf, int len) |
| { |
| unsigned char *resp = (unsigned char *) buf; |
| |
| for (; len; --len) { |
| int i; |
| for (i = 200; |
| i-- && !SJCD_STATUS_AVAILABLE(inb(SJCDPORT(1)));); |
| if (i > 0) |
| *resp++ = (unsigned char) inb(SJCDPORT(0)); |
| else |
| break; |
| } |
| return (len); |
| } |
| |
| /* |
| * Load and parse command completion status (drive info byte and maybe error). |
| * Sorry, no error classification yet. |
| */ |
| static void sjcd_load_status(void) |
| { |
| sjcd_media_is_changed = 0; |
| sjcd_completion_error = 0; |
| sjcd_completion_status = inb(SJCDPORT(0)); |
| if (sjcd_completion_status & SST_DOOR_OPENED) { |
| sjcd_door_closed = sjcd_media_is_available = 0; |
| } else { |
| sjcd_door_closed = 1; |
| if (sjcd_completion_status & SST_MEDIA_CHANGED) |
| sjcd_media_is_available = sjcd_media_is_changed = |
| 1; |
| else if (sjcd_completion_status & 0x0F) { |
| /* |
| * OK, we seem to catch an error ... |
| */ |
| while (!SJCD_STATUS_AVAILABLE(inb(SJCDPORT(1)))); |
| sjcd_completion_error = inb(SJCDPORT(0)); |
| if ((sjcd_completion_status & 0x08) && |
| (sjcd_completion_error & 0x40)) |
| sjcd_media_is_available = 0; |
| else |
| sjcd_command_failed = 1; |
| } else |
| sjcd_media_is_available = 1; |
| } |
| /* |
| * Ok, status loaded successfully. |
| */ |
| sjcd_status_valid = 1, sjcd_error_reported = 0; |
| sjcd_command_is_in_progress = 0; |
| |
| /* |
| * If the disk is changed, the TOC is not valid. |
| */ |
| if (sjcd_media_is_changed) |
| sjcd_toc_uptodate = 0; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: status %02x.%02x loaded.\n", |
| (int) sjcd_completion_status, (int) sjcd_completion_error); |
| #endif |
| } |
| |
| /* |
| * Read status from cdrom. Check to see if the status is available. |
| */ |
| static int sjcd_check_status(void) |
| { |
| /* |
| * Try to load the response from cdrom into buffer. |
| */ |
| if (SJCD_STATUS_AVAILABLE(inb(SJCDPORT(1)))) { |
| sjcd_load_status(); |
| return (1); |
| } else { |
| /* |
| * No status is available. |
| */ |
| return (0); |
| } |
| } |
| |
| /* |
| * This is just timeout counter, and nothing more. Surprised ? :-) |
| */ |
| static volatile long sjcd_status_timeout; |
| |
| /* |
| * We need about 10 seconds to wait. The longest command takes about 5 seconds |
| * to probe the disk (usually after tray closed or drive reset). Other values |
| * should be thought of for other commands. |
| */ |
| #define SJCD_WAIT_FOR_STATUS_TIMEOUT 1000 |
| |
| static void sjcd_status_timer(void) |
| { |
| if (sjcd_check_status()) { |
| /* |
| * The command completed and status is loaded, stop waiting. |
| */ |
| wake_up(&sjcd_waitq); |
| } else if (--sjcd_status_timeout <= 0) { |
| /* |
| * We are timed out. |
| */ |
| wake_up(&sjcd_waitq); |
| } else { |
| /* |
| * We have still some time to wait. Try again. |
| */ |
| SJCD_SET_TIMER(sjcd_status_timer, 1); |
| } |
| } |
| |
| /* |
| * Wait for status for 10 sec approx. Returns non-positive when timed out. |
| * Should not be used while reading data CDs. |
| */ |
| static int sjcd_wait_for_status(void) |
| { |
| sjcd_status_timeout = SJCD_WAIT_FOR_STATUS_TIMEOUT; |
| SJCD_SET_TIMER(sjcd_status_timer, 1); |
| sleep_on(&sjcd_waitq); |
| #if defined( SJCD_DIAGNOSTIC ) || defined ( SJCD_TRACE ) |
| if (sjcd_status_timeout <= 0) |
| printk("SJCD: Error Wait For Status.\n"); |
| #endif |
| return (sjcd_status_timeout); |
| } |
| |
| static int sjcd_receive_status(void) |
| { |
| int i; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: receive_status\n"); |
| #endif |
| /* |
| * Wait a bit for status available. |
| */ |
| for (i = 200; i-- && (sjcd_check_status() == 0);); |
| if (i < 0) { |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: long wait for status\n"); |
| #endif |
| if (sjcd_wait_for_status() <= 0) |
| printk("SJCD: Timeout when read status.\n"); |
| else |
| i = 0; |
| } |
| return (i); |
| } |
| |
| /* |
| * Load the status. Issue get status command and wait for status available. |
| */ |
| static void sjcd_get_status(void) |
| { |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: get_status\n"); |
| #endif |
| sjcd_send_cmd(SCMD_GET_STATUS); |
| sjcd_receive_status(); |
| } |
| |
| /* |
| * Check the drive if the disk is changed. Should be revised. |
| */ |
| static int sjcd_disk_change(struct gendisk *disk) |
| { |
| #if 0 |
| printk("SJCD: sjcd_disk_change(%s)\n", disk->disk_name); |
| #endif |
| if (!sjcd_command_is_in_progress) |
| sjcd_get_status(); |
| return (sjcd_status_valid ? sjcd_media_is_changed : 0); |
| } |
| |
| /* |
| * Read the table of contents (TOC) and TOC header if necessary. |
| * We assume that the drive contains no more than 99 toc entries. |
| */ |
| static struct sjcd_hw_disk_info sjcd_table_of_contents[SJCD_MAX_TRACKS]; |
| static unsigned char sjcd_first_track_no, sjcd_last_track_no; |
| #define sjcd_disk_length sjcd_table_of_contents[0].un.track_msf |
| |
| static int sjcd_update_toc(void) |
| { |
| struct sjcd_hw_disk_info info; |
| int i; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: update toc:\n"); |
| #endif |
| /* |
| * check to see if we need to do anything |
| */ |
| if (sjcd_toc_uptodate) |
| return (0); |
| |
| /* |
| * Get the TOC start information. |
| */ |
| sjcd_send_1_cmd(SCMD_GET_DISK_INFO, SCMD_GET_1_TRACK); |
| sjcd_receive_status(); |
| |
| if (!sjcd_status_valid) { |
| printk("SJCD: cannot load status.\n"); |
| return (-1); |
| } |
| |
| if (!sjcd_media_is_available) { |
| printk("SJCD: no disk in drive\n"); |
| return (-1); |
| } |
| |
| if (!sjcd_command_failed) { |
| if (sjcd_load_response(&info, sizeof(info)) != 0) { |
| printk |
| ("SJCD: cannot load response about TOC start.\n"); |
| return (-1); |
| } |
| sjcd_first_track_no = bcd2bin(info.un.track_no); |
| } else { |
| printk("SJCD: get first failed\n"); |
| return (-1); |
| } |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: TOC start 0x%02x ", sjcd_first_track_no); |
| #endif |
| /* |
| * Get the TOC finish information. |
| */ |
| sjcd_send_1_cmd(SCMD_GET_DISK_INFO, SCMD_GET_L_TRACK); |
| sjcd_receive_status(); |
| |
| if (!sjcd_status_valid) { |
| printk("SJCD: cannot load status.\n"); |
| return (-1); |
| } |
| |
| if (!sjcd_media_is_available) { |
| printk("SJCD: no disk in drive\n"); |
| return (-1); |
| } |
| |
| if (!sjcd_command_failed) { |
| if (sjcd_load_response(&info, sizeof(info)) != 0) { |
| printk |
| ("SJCD: cannot load response about TOC finish.\n"); |
| return (-1); |
| } |
| sjcd_last_track_no = bcd2bin(info.un.track_no); |
| } else { |
| printk("SJCD: get last failed\n"); |
| return (-1); |
| } |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: TOC finish 0x%02x ", sjcd_last_track_no); |
| #endif |
| for (i = sjcd_first_track_no; i <= sjcd_last_track_no; i++) { |
| /* |
| * Get the first track information. |
| */ |
| sjcd_send_1_cmd(SCMD_GET_DISK_INFO, bin2bcd(i)); |
| sjcd_receive_status(); |
| |
| if (!sjcd_status_valid) { |
| printk("SJCD: cannot load status.\n"); |
| return (-1); |
| } |
| |
| if (!sjcd_media_is_available) { |
| printk("SJCD: no disk in drive\n"); |
| return (-1); |
| } |
| |
| if (!sjcd_command_failed) { |
| if (sjcd_load_response(&sjcd_table_of_contents[i], |
| sizeof(struct |
| sjcd_hw_disk_info)) |
| != 0) { |
| printk |
| ("SJCD: cannot load info for %d track\n", |
| i); |
| return (-1); |
| } |
| } else { |
| printk("SJCD: get info %d failed\n", i); |
| return (-1); |
| } |
| } |
| |
| /* |
| * Get the disk length info. |
| */ |
| sjcd_send_1_cmd(SCMD_GET_DISK_INFO, SCMD_GET_D_SIZE); |
| sjcd_receive_status(); |
| |
| if (!sjcd_status_valid) { |
| printk("SJCD: cannot load status.\n"); |
| return (-1); |
| } |
| |
| if (!sjcd_media_is_available) { |
| printk("SJCD: no disk in drive\n"); |
| return (-1); |
| } |
| |
| if (!sjcd_command_failed) { |
| if (sjcd_load_response(&info, sizeof(info)) != 0) { |
| printk |
| ("SJCD: cannot load response about disk size.\n"); |
| return (-1); |
| } |
| sjcd_disk_length.min = info.un.track_msf.min; |
| sjcd_disk_length.sec = info.un.track_msf.sec; |
| sjcd_disk_length.frame = info.un.track_msf.frame; |
| } else { |
| printk("SJCD: get size failed\n"); |
| return (1); |
| } |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: (%02x:%02x.%02x)\n", sjcd_disk_length.min, |
| sjcd_disk_length.sec, sjcd_disk_length.frame); |
| #endif |
| return (0); |
| } |
| |
| /* |
| * Load subchannel information. |
| */ |
| static int sjcd_get_q_info(struct sjcd_hw_qinfo *qp) |
| { |
| int s; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: load sub q\n"); |
| #endif |
| sjcd_send_cmd(SCMD_GET_QINFO); |
| s = sjcd_receive_status(); |
| if (s < 0 || sjcd_command_failed || !sjcd_status_valid) { |
| sjcd_send_cmd(0xF2); |
| s = sjcd_receive_status(); |
| if (s < 0 || sjcd_command_failed || !sjcd_status_valid) |
| return (-1); |
| sjcd_send_cmd(SCMD_GET_QINFO); |
| s = sjcd_receive_status(); |
| if (s < 0 || sjcd_command_failed || !sjcd_status_valid) |
| return (-1); |
| } |
| if (sjcd_media_is_available) |
| if (sjcd_load_response(qp, sizeof(*qp)) == 0) |
| return (0); |
| return (-1); |
| } |
| |
| /* |
| * Start playing from the specified position. |
| */ |
| static int sjcd_play(struct sjcd_play_msf *mp) |
| { |
| struct sjcd_play_msf msf; |
| |
| /* |
| * Turn the device to play mode. |
| */ |
| sjcd_send_1_cmd(SCMD_SET_MODE, SCMD_MODE_PLAY); |
| if (sjcd_receive_status() < 0) |
| return (-1); |
| |
| /* |
| * Seek to the starting point. |
| */ |
| msf.start = mp->start; |
| msf.end.min = msf.end.sec = msf.end.frame = 0x00; |
| sjcd_send_6_cmd(SCMD_SEEK, &msf); |
| if (sjcd_receive_status() < 0) |
| return (-1); |
| |
| /* |
| * Start playing. |
| */ |
| sjcd_send_6_cmd(SCMD_PLAY, mp); |
| return (sjcd_receive_status()); |
| } |
| |
| /* |
| * Tray control functions. |
| */ |
| static int sjcd_tray_close(void) |
| { |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: tray_close\n"); |
| #endif |
| sjcd_send_cmd(SCMD_CLOSE_TRAY); |
| return (sjcd_receive_status()); |
| } |
| |
| static int sjcd_tray_lock(void) |
| { |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: tray_lock\n"); |
| #endif |
| sjcd_send_cmd(SCMD_LOCK_TRAY); |
| return (sjcd_receive_status()); |
| } |
| |
| static int sjcd_tray_unlock(void) |
| { |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: tray_unlock\n"); |
| #endif |
| sjcd_send_cmd(SCMD_UNLOCK_TRAY); |
| return (sjcd_receive_status()); |
| } |
| |
| static int sjcd_tray_open(void) |
| { |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: tray_open\n"); |
| #endif |
| sjcd_send_cmd(SCMD_EJECT_TRAY); |
| return (sjcd_receive_status()); |
| } |
| |
| /* |
| * Do some user commands. |
| */ |
| static int sjcd_ioctl(struct inode *ip, struct file *fp, |
| unsigned int cmd, unsigned long arg) |
| { |
| void __user *argp = (void __user *)arg; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD:ioctl\n"); |
| #endif |
| |
| sjcd_get_status(); |
| if (!sjcd_status_valid) |
| return (-EIO); |
| if (sjcd_update_toc() < 0) |
| return (-EIO); |
| |
| switch (cmd) { |
| case CDROMSTART:{ |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: ioctl: start\n"); |
| #endif |
| return (0); |
| } |
| |
| case CDROMSTOP:{ |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: ioctl: stop\n"); |
| #endif |
| sjcd_send_cmd(SCMD_PAUSE); |
| (void) sjcd_receive_status(); |
| sjcd_audio_status = CDROM_AUDIO_NO_STATUS; |
| return (0); |
| } |
| |
| case CDROMPAUSE:{ |
| struct sjcd_hw_qinfo q_info; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: ioctl: pause\n"); |
| #endif |
| if (sjcd_audio_status == CDROM_AUDIO_PLAY) { |
| sjcd_send_cmd(SCMD_PAUSE); |
| (void) sjcd_receive_status(); |
| if (sjcd_get_q_info(&q_info) < 0) { |
| sjcd_audio_status = |
| CDROM_AUDIO_NO_STATUS; |
| } else { |
| sjcd_audio_status = |
| CDROM_AUDIO_PAUSED; |
| sjcd_playing.start = q_info.abs; |
| } |
| return (0); |
| } else |
| return (-EINVAL); |
| } |
| |
| case CDROMRESUME:{ |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: ioctl: resume\n"); |
| #endif |
| if (sjcd_audio_status == CDROM_AUDIO_PAUSED) { |
| /* |
| * continue play starting at saved location |
| */ |
| if (sjcd_play(&sjcd_playing) < 0) { |
| sjcd_audio_status = |
| CDROM_AUDIO_ERROR; |
| return (-EIO); |
| } else { |
| sjcd_audio_status = |
| CDROM_AUDIO_PLAY; |
| return (0); |
| } |
| } else |
| return (-EINVAL); |
| } |
| |
| case CDROMPLAYTRKIND:{ |
| struct cdrom_ti ti; |
| int s = -EFAULT; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: ioctl: playtrkind\n"); |
| #endif |
| if (!copy_from_user(&ti, argp, sizeof(ti))) { |
| s = 0; |
| if (ti.cdti_trk0 < sjcd_first_track_no) |
| return (-EINVAL); |
| if (ti.cdti_trk1 > sjcd_last_track_no) |
| ti.cdti_trk1 = sjcd_last_track_no; |
| if (ti.cdti_trk0 > ti.cdti_trk1) |
| return (-EINVAL); |
| |
| sjcd_playing.start = |
| sjcd_table_of_contents[ti.cdti_trk0]. |
| un.track_msf; |
| sjcd_playing.end = |
| (ti.cdti_trk1 < |
| sjcd_last_track_no) ? |
| sjcd_table_of_contents[ti.cdti_trk1 + |
| 1].un. |
| track_msf : sjcd_table_of_contents[0]. |
| un.track_msf; |
| |
| if (sjcd_play(&sjcd_playing) < 0) { |
| sjcd_audio_status = |
| CDROM_AUDIO_ERROR; |
| return (-EIO); |
| } else |
| sjcd_audio_status = |
| CDROM_AUDIO_PLAY; |
| } |
| return (s); |
| } |
| |
| case CDROMPLAYMSF:{ |
| struct cdrom_msf sjcd_msf; |
| int s; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: ioctl: playmsf\n"); |
| #endif |
| if ((s = |
| access_ok(VERIFY_READ, argp, sizeof(sjcd_msf)) |
| ? 0 : -EFAULT) == 0) { |
| if (sjcd_audio_status == CDROM_AUDIO_PLAY) { |
| sjcd_send_cmd(SCMD_PAUSE); |
| (void) sjcd_receive_status(); |
| sjcd_audio_status = |
| CDROM_AUDIO_NO_STATUS; |
| } |
| |
| if (copy_from_user(&sjcd_msf, argp, |
| sizeof(sjcd_msf))) |
| return (-EFAULT); |
| |
| sjcd_playing.start.min = |
| bin2bcd(sjcd_msf.cdmsf_min0); |
| sjcd_playing.start.sec = |
| bin2bcd(sjcd_msf.cdmsf_sec0); |
| sjcd_playing.start.frame = |
| bin2bcd(sjcd_msf.cdmsf_frame0); |
| sjcd_playing.end.min = |
| bin2bcd(sjcd_msf.cdmsf_min1); |
| sjcd_playing.end.sec = |
| bin2bcd(sjcd_msf.cdmsf_sec1); |
| sjcd_playing.end.frame = |
| bin2bcd(sjcd_msf.cdmsf_frame1); |
| |
| if (sjcd_play(&sjcd_playing) < 0) { |
| sjcd_audio_status = |
| CDROM_AUDIO_ERROR; |
| return (-EIO); |
| } else |
| sjcd_audio_status = |
| CDROM_AUDIO_PLAY; |
| } |
| return (s); |
| } |
| |
| case CDROMREADTOCHDR:{ |
| struct cdrom_tochdr toc_header; |
| #if defined (SJCD_TRACE ) |
| printk("SJCD: ioctl: readtocheader\n"); |
| #endif |
| toc_header.cdth_trk0 = sjcd_first_track_no; |
| toc_header.cdth_trk1 = sjcd_last_track_no; |
| if (copy_to_user(argp, &toc_header, |
| sizeof(toc_header))) |
| return -EFAULT; |
| return 0; |
| } |
| |
| case CDROMREADTOCENTRY:{ |
| struct cdrom_tocentry toc_entry; |
| int s; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: ioctl: readtocentry\n"); |
| #endif |
| if ((s = |
| access_ok(VERIFY_WRITE, argp, sizeof(toc_entry)) |
| ? 0 : -EFAULT) == 0) { |
| struct sjcd_hw_disk_info *tp; |
| |
| if (copy_from_user(&toc_entry, argp, |
| sizeof(toc_entry))) |
| return (-EFAULT); |
| if (toc_entry.cdte_track == CDROM_LEADOUT) |
| tp = &sjcd_table_of_contents[0]; |
| else if (toc_entry.cdte_track < |
| sjcd_first_track_no) |
| return (-EINVAL); |
| else if (toc_entry.cdte_track > |
| sjcd_last_track_no) |
| return (-EINVAL); |
| else |
| tp = &sjcd_table_of_contents |
| [toc_entry.cdte_track]; |
| |
| toc_entry.cdte_adr = |
| tp->track_control & 0x0F; |
| toc_entry.cdte_ctrl = |
| tp->track_control >> 4; |
| |
| switch (toc_entry.cdte_format) { |
| case CDROM_LBA: |
| toc_entry.cdte_addr.lba = |
| msf2hsg(&(tp->un.track_msf)); |
| break; |
| case CDROM_MSF: |
| toc_entry.cdte_addr.msf.minute = |
| bcd2bin(tp->un.track_msf.min); |
| toc_entry.cdte_addr.msf.second = |
| bcd2bin(tp->un.track_msf.sec); |
| toc_entry.cdte_addr.msf.frame = |
| bcd2bin(tp->un.track_msf. |
| frame); |
| break; |
| default: |
| return (-EINVAL); |
| } |
| if (copy_to_user(argp, &toc_entry, |
| sizeof(toc_entry))) |
| s = -EFAULT; |
| } |
| return (s); |
| } |
| |
| case CDROMSUBCHNL:{ |
| struct cdrom_subchnl subchnl; |
| int s; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: ioctl: subchnl\n"); |
| #endif |
| if ((s = |
| access_ok(VERIFY_WRITE, argp, sizeof(subchnl)) |
| ? 0 : -EFAULT) == 0) { |
| struct sjcd_hw_qinfo q_info; |
| |
| if (copy_from_user(&subchnl, argp, |
| sizeof(subchnl))) |
| return (-EFAULT); |
| |
| if (sjcd_get_q_info(&q_info) < 0) |
| return (-EIO); |
| |
| subchnl.cdsc_audiostatus = |
| sjcd_audio_status; |
| subchnl.cdsc_adr = |
| q_info.track_control & 0x0F; |
| subchnl.cdsc_ctrl = |
| q_info.track_control >> 4; |
| subchnl.cdsc_trk = |
| bcd2bin(q_info.track_no); |
| subchnl.cdsc_ind = bcd2bin(q_info.x); |
| |
| switch (subchnl.cdsc_format) { |
| case CDROM_LBA: |
| subchnl.cdsc_absaddr.lba = |
| msf2hsg(&(q_info.abs)); |
| subchnl.cdsc_reladdr.lba = |
| msf2hsg(&(q_info.rel)); |
| break; |
| case CDROM_MSF: |
| subchnl.cdsc_absaddr.msf.minute = |
| bcd2bin(q_info.abs.min); |
| subchnl.cdsc_absaddr.msf.second = |
| bcd2bin(q_info.abs.sec); |
| subchnl.cdsc_absaddr.msf.frame = |
| bcd2bin(q_info.abs.frame); |
| subchnl.cdsc_reladdr.msf.minute = |
| bcd2bin(q_info.rel.min); |
| subchnl.cdsc_reladdr.msf.second = |
| bcd2bin(q_info.rel.sec); |
| subchnl.cdsc_reladdr.msf.frame = |
| bcd2bin(q_info.rel.frame); |
| break; |
| default: |
| return (-EINVAL); |
| } |
| if (copy_to_user(argp, &subchnl, |
| sizeof(subchnl))) |
| s = -EFAULT; |
| } |
| return (s); |
| } |
| |
| case CDROMVOLCTRL:{ |
| struct cdrom_volctrl vol_ctrl; |
| int s; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: ioctl: volctrl\n"); |
| #endif |
| if ((s = |
| access_ok(VERIFY_READ, argp, sizeof(vol_ctrl)) |
| ? 0 : -EFAULT) == 0) { |
| unsigned char dummy[4]; |
| |
| if (copy_from_user(&vol_ctrl, argp, |
| sizeof(vol_ctrl))) |
| return (-EFAULT); |
| sjcd_send_4_cmd(SCMD_SET_VOLUME, |
| vol_ctrl.channel0, 0xFF, |
| vol_ctrl.channel1, 0xFF); |
| if (sjcd_receive_status() < 0) |
| return (-EIO); |
| (void) sjcd_load_response(dummy, 4); |
| } |
| return (s); |
| } |
| |
| case CDROMEJECT:{ |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: ioctl: eject\n"); |
| #endif |
| if (!sjcd_command_is_in_progress) { |
| sjcd_tray_unlock(); |
| sjcd_send_cmd(SCMD_EJECT_TRAY); |
| (void) sjcd_receive_status(); |
| } |
| return (0); |
| } |
| |
| #if defined( SJCD_GATHER_STAT ) |
| case 0xABCD:{ |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: ioctl: statistic\n"); |
| #endif |
| if (copy_to_user(argp, &statistic, sizeof(statistic))) |
| return -EFAULT; |
| return 0; |
| } |
| #endif |
| |
| default: |
| return (-EINVAL); |
| } |
| } |
| |
| /* |
| * Invalidate internal buffers of the driver. |
| */ |
| static void sjcd_invalidate_buffers(void) |
| { |
| int i; |
| for (i = 0; i < SJCD_BUF_SIZ; sjcd_buf_bn[i++] = -1); |
| sjcd_buf_out = -1; |
| } |
| |
| /* |
| * Take care of the different block sizes between cdrom and Linux. |
| * When Linux gets variable block sizes this will probably go away. |
| */ |
| |
| static int current_valid(void) |
| { |
| return CURRENT && |
| CURRENT->cmd == READ && |
| CURRENT->sector != -1; |
| } |
| |
| static void sjcd_transfer(void) |
| { |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: transfer:\n"); |
| #endif |
| if (current_valid()) { |
| while (CURRENT->nr_sectors) { |
| int i, bn = CURRENT->sector / 4; |
| for (i = 0; |
| i < SJCD_BUF_SIZ && sjcd_buf_bn[i] != bn; |
| i++); |
| if (i < SJCD_BUF_SIZ) { |
| int offs = |
| (i * 4 + (CURRENT->sector & 3)) * 512; |
| int nr_sectors = 4 - (CURRENT->sector & 3); |
| if (sjcd_buf_out != i) { |
| sjcd_buf_out = i; |
| if (sjcd_buf_bn[i] != bn) { |
| sjcd_buf_out = -1; |
| continue; |
| } |
| } |
| if (nr_sectors > CURRENT->nr_sectors) |
| nr_sectors = CURRENT->nr_sectors; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: copy out\n"); |
| #endif |
| memcpy(CURRENT->buffer, sjcd_buf + offs, |
| nr_sectors * 512); |
| CURRENT->nr_sectors -= nr_sectors; |
| CURRENT->sector += nr_sectors; |
| CURRENT->buffer += nr_sectors * 512; |
| } else { |
| sjcd_buf_out = -1; |
| break; |
| } |
| } |
| } |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: transfer: done\n"); |
| #endif |
| } |
| |
| static void sjcd_poll(void) |
| { |
| #if defined( SJCD_GATHER_STAT ) |
| /* |
| * Update total number of ticks. |
| */ |
| statistic.ticks++; |
| statistic.tticks[sjcd_transfer_state]++; |
| #endif |
| |
| ReSwitch:switch (sjcd_transfer_state) { |
| |
| case SJCD_S_IDLE:{ |
| #if defined( SJCD_GATHER_STAT ) |
| statistic.idle_ticks++; |
| #endif |
| #if defined( SJCD_TRACE ) |
| printk("SJCD_S_IDLE\n"); |
| #endif |
| return; |
| } |
| |
| case SJCD_S_START:{ |
| #if defined( SJCD_GATHER_STAT ) |
| statistic.start_ticks++; |
| #endif |
| sjcd_send_cmd(SCMD_GET_STATUS); |
| sjcd_transfer_state = |
| sjcd_mode == |
| SCMD_MODE_COOKED ? SJCD_S_READ : SJCD_S_MODE; |
| sjcd_transfer_timeout = 500; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD_S_START: goto SJCD_S_%s mode\n", |
| sjcd_transfer_state == |
| SJCD_S_READ ? "READ" : "MODE"); |
| #endif |
| break; |
| } |
| |
| case SJCD_S_MODE:{ |
| if (sjcd_check_status()) { |
| /* |
| * Previous command is completed. |
| */ |
| if (!sjcd_status_valid |
| || sjcd_command_failed) { |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD_S_MODE: pre-cmd failed: goto to SJCD_S_STOP mode\n"); |
| #endif |
| sjcd_transfer_state = SJCD_S_STOP; |
| goto ReSwitch; |
| } |
| |
| sjcd_mode = 0; /* unknown mode; should not be valid when failed */ |
| sjcd_send_1_cmd(SCMD_SET_MODE, |
| SCMD_MODE_COOKED); |
| sjcd_transfer_state = SJCD_S_READ; |
| sjcd_transfer_timeout = 1000; |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD_S_MODE: goto SJCD_S_READ mode\n"); |
| #endif |
| } |
| #if defined( SJCD_GATHER_STAT ) |
| else |
| statistic.mode_ticks++; |
| #endif |
| break; |
| } |
| |
| case SJCD_S_READ:{ |
| if (sjcd_status_valid ? 1 : sjcd_check_status()) { |
| /* |
| * Previous command is completed. |
| */ |
| if (!sjcd_status_valid |
| || sjcd_command_failed) { |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD_S_READ: pre-cmd failed: goto to SJCD_S_STOP mode\n"); |
| #endif |
| sjcd_transfer_state = SJCD_S_STOP; |
| goto ReSwitch; |
| } |
| if (!sjcd_media_is_available) { |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD_S_READ: no disk: goto to SJCD_S_STOP mode\n"); |
| #endif |
| sjcd_transfer_state = SJCD_S_STOP; |
| goto ReSwitch; |
| } |
| if (sjcd_mode != SCMD_MODE_COOKED) { |
| /* |
| * We seem to come from set mode. So discard one byte of result. |
| */ |
| if (sjcd_load_response |
| (&sjcd_mode, 1) != 0) { |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD_S_READ: load failed: goto to SJCD_S_STOP mode\n"); |
| #endif |
| sjcd_transfer_state = |
| SJCD_S_STOP; |
| goto ReSwitch; |
| } |
| if (sjcd_mode != SCMD_MODE_COOKED) { |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD_S_READ: mode failed: goto to SJCD_S_STOP mode\n"); |
| #endif |
| sjcd_transfer_state = |
| SJCD_S_STOP; |
| goto ReSwitch; |
| } |
| } |
| |
| if (current_valid()) { |
| struct sjcd_play_msf msf; |
| |
| sjcd_next_bn = CURRENT->sector / 4; |
| hsg2msf(sjcd_next_bn, &msf.start); |
| msf.end.min = 0; |
| msf.end.sec = 0; |
| msf.end.frame = sjcd_read_count = |
| SJCD_BUF_SIZ; |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD: ---reading msf-address %x:%x:%x %x:%x:%x\n", |
| msf.start.min, msf.start.sec, |
| msf.start.frame, msf.end.min, |
| msf.end.sec, msf.end.frame); |
| printk |
| ("sjcd_next_bn:%x buf_in:%x buf_out:%x buf_bn:%x\n", |
| sjcd_next_bn, sjcd_buf_in, |
| sjcd_buf_out, |
| sjcd_buf_bn[sjcd_buf_in]); |
| #endif |
| sjcd_send_6_cmd(SCMD_DATA_READ, |
| &msf); |
| sjcd_transfer_state = SJCD_S_DATA; |
| sjcd_transfer_timeout = 500; |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD_S_READ: go to SJCD_S_DATA mode\n"); |
| #endif |
| } else { |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD_S_READ: nothing to read: go to SJCD_S_STOP mode\n"); |
| #endif |
| sjcd_transfer_state = SJCD_S_STOP; |
| goto ReSwitch; |
| } |
| } |
| #if defined( SJCD_GATHER_STAT ) |
| else |
| statistic.read_ticks++; |
| #endif |
| break; |
| } |
| |
| case SJCD_S_DATA:{ |
| unsigned char stat; |
| |
| sjcd_s_data:stat = |
| inb(SJCDPORT |
| (1)); |
| #if defined( SJCD_TRACE ) |
| printk("SJCD_S_DATA: status = 0x%02x\n", stat); |
| #endif |
| if (SJCD_STATUS_AVAILABLE(stat)) { |
| /* |
| * No data is waiting for us in the drive buffer. Status of operation |
| * completion is available. Read and parse it. |
| */ |
| sjcd_load_status(); |
| |
| if (!sjcd_status_valid |
| || sjcd_command_failed) { |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD: read block %d failed, maybe audio disk? Giving up\n", |
| sjcd_next_bn); |
| #endif |
| if (current_valid()) |
| end_request(CURRENT, 0); |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD_S_DATA: pre-cmd failed: go to SJCD_S_STOP mode\n"); |
| #endif |
| sjcd_transfer_state = SJCD_S_STOP; |
| goto ReSwitch; |
| } |
| |
| if (!sjcd_media_is_available) { |
| printk |
| ("SJCD_S_DATA: no disk: go to SJCD_S_STOP mode\n"); |
| sjcd_transfer_state = SJCD_S_STOP; |
| goto ReSwitch; |
| } |
| |
| sjcd_transfer_state = SJCD_S_READ; |
| goto ReSwitch; |
| } else if (SJCD_DATA_AVAILABLE(stat)) { |
| /* |
| * One frame is read into device buffer. We must copy it to our memory. |
| * Otherwise cdrom hangs up. Check to see if we have something to copy |
| * to. |
| */ |
| if (!current_valid() |
| && sjcd_buf_in == sjcd_buf_out) { |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD_S_DATA: nothing to read: go to SJCD_S_STOP mode\n"); |
| printk |
| (" ... all the date would be discarded\n"); |
| #endif |
| sjcd_transfer_state = SJCD_S_STOP; |
| goto ReSwitch; |
| } |
| |
| /* |
| * Everything seems to be OK. Just read the frame and recalculate |
| * indices. |
| */ |
| sjcd_buf_bn[sjcd_buf_in] = -1; /* ??? */ |
| insb(SJCDPORT(2), |
| sjcd_buf + 2048 * sjcd_buf_in, 2048); |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD_S_DATA: next_bn=%d, buf_in=%d, buf_out=%d, buf_bn=%d\n", |
| sjcd_next_bn, sjcd_buf_in, |
| sjcd_buf_out, |
| sjcd_buf_bn[sjcd_buf_in]); |
| #endif |
| sjcd_buf_bn[sjcd_buf_in] = sjcd_next_bn++; |
| if (sjcd_buf_out == -1) |
| sjcd_buf_out = sjcd_buf_in; |
| if (++sjcd_buf_in == SJCD_BUF_SIZ) |
| sjcd_buf_in = 0; |
| |
| /* |
| * Only one frame is ready at time. So we should turn over to wait for |
| * another frame. If we need that, of course. |
| */ |
| if (--sjcd_read_count == 0) { |
| /* |
| * OK, request seems to be precessed. Continue transferring... |
| */ |
| if (!sjcd_transfer_is_active) { |
| while (current_valid()) { |
| /* |
| * Continue transferring. |
| */ |
| sjcd_transfer(); |
| if (CURRENT-> |
| nr_sectors == |
| 0) |
| end_request |
| (CURRENT, 1); |
| else |
| break; |
| } |
| } |
| if (current_valid() && |
| (CURRENT->sector / 4 < |
| sjcd_next_bn |
| || CURRENT->sector / 4 > |
| sjcd_next_bn + |
| SJCD_BUF_SIZ)) { |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD_S_DATA: can't read: go to SJCD_S_STOP mode\n"); |
| #endif |
| sjcd_transfer_state = |
| SJCD_S_STOP; |
| goto ReSwitch; |
| } |
| } |
| /* |
| * Now we should turn around rather than wait for while. |
| */ |
| goto sjcd_s_data; |
| } |
| #if defined( SJCD_GATHER_STAT ) |
| else |
| statistic.data_ticks++; |
| #endif |
| break; |
| } |
| |
| case SJCD_S_STOP:{ |
| sjcd_read_count = 0; |
| sjcd_send_cmd(SCMD_STOP); |
| sjcd_transfer_state = SJCD_S_STOPPING; |
| sjcd_transfer_timeout = 500; |
| #if defined( SJCD_GATHER_STAT ) |
| statistic.stop_ticks++; |
| #endif |
| break; |
| } |
| |
| case SJCD_S_STOPPING:{ |
| unsigned char stat; |
| |
| stat = inb(SJCDPORT(1)); |
| #if defined( SJCD_TRACE ) |
| printk("SJCD_S_STOP: status = 0x%02x\n", stat); |
| #endif |
| if (SJCD_DATA_AVAILABLE(stat)) { |
| int i; |
| #if defined( SJCD_TRACE ) |
| printk("SJCD_S_STOP: discard data\n"); |
| #endif |
| /* |
| * Discard all the data from the pipe. Foolish method. |
| */ |
| for (i = 2048; i--; |
| (void) inb(SJCDPORT(2))); |
| sjcd_transfer_timeout = 500; |
| } else if (SJCD_STATUS_AVAILABLE(stat)) { |
| sjcd_load_status(); |
| if (sjcd_status_valid |
| && sjcd_media_is_changed) { |
| sjcd_toc_uptodate = 0; |
| sjcd_invalidate_buffers(); |
| } |
| if (current_valid()) { |
| if (sjcd_status_valid) |
| sjcd_transfer_state = |
| SJCD_S_READ; |
| else |
| sjcd_transfer_state = |
| SJCD_S_START; |
| } else |
| sjcd_transfer_state = SJCD_S_IDLE; |
| goto ReSwitch; |
| } |
| #if defined( SJCD_GATHER_STAT ) |
| else |
| statistic.stopping_ticks++; |
| #endif |
| break; |
| } |
| |
| default: |
| printk("SJCD: poll: invalid state %d\n", |
| sjcd_transfer_state); |
| return; |
| } |
| |
| if (--sjcd_transfer_timeout == 0) { |
| printk("SJCD: timeout in state %d\n", sjcd_transfer_state); |
| while (current_valid()) |
| end_request(CURRENT, 0); |
| sjcd_send_cmd(SCMD_STOP); |
| sjcd_transfer_state = SJCD_S_IDLE; |
| goto ReSwitch; |
| } |
| |
| /* |
| * Get back in some time. 1 should be replaced with count variable to |
| * avoid unnecessary testings. |
| */ |
| SJCD_SET_TIMER(sjcd_poll, 1); |
| } |
| |
| static void do_sjcd_request(request_queue_t * q) |
| { |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: do_sjcd_request(%ld+%ld)\n", |
| CURRENT->sector, CURRENT->nr_sectors); |
| #endif |
| sjcd_transfer_is_active = 1; |
| while (current_valid()) { |
| sjcd_transfer(); |
| if (CURRENT->nr_sectors == 0) |
| end_request(CURRENT, 1); |
| else { |
| sjcd_buf_out = -1; /* Want to read a block not in buffer */ |
| if (sjcd_transfer_state == SJCD_S_IDLE) { |
| if (!sjcd_toc_uptodate) { |
| if (sjcd_update_toc() < 0) { |
| printk |
| ("SJCD: transfer: discard\n"); |
| while (current_valid()) |
| end_request(CURRENT, 0); |
| break; |
| } |
| } |
| sjcd_transfer_state = SJCD_S_START; |
| SJCD_SET_TIMER(sjcd_poll, HZ / 100); |
| } |
| break; |
| } |
| } |
| sjcd_transfer_is_active = 0; |
| #if defined( SJCD_TRACE ) |
| printk |
| ("sjcd_next_bn:%x sjcd_buf_in:%x sjcd_buf_out:%x sjcd_buf_bn:%x\n", |
| sjcd_next_bn, sjcd_buf_in, sjcd_buf_out, |
| sjcd_buf_bn[sjcd_buf_in]); |
| printk("do_sjcd_request ends\n"); |
| #endif |
| } |
| |
| /* |
| * Open the device special file. Check disk is in. |
| */ |
| static int sjcd_open(struct inode *ip, struct file *fp) |
| { |
| /* |
| * Check the presence of device. |
| */ |
| if (!sjcd_present) |
| return (-ENXIO); |
| |
| /* |
| * Only read operations are allowed. Really? (:-) |
| */ |
| if (fp->f_mode & 2) |
| return (-EROFS); |
| |
| if (sjcd_open_count == 0) { |
| int s, sjcd_open_tries; |
| /* We don't know that, do we? */ |
| /* |
| sjcd_audio_status = CDROM_AUDIO_NO_STATUS; |
| */ |
| sjcd_mode = 0; |
| sjcd_door_was_open = 0; |
| sjcd_transfer_state = SJCD_S_IDLE; |
| sjcd_invalidate_buffers(); |
| sjcd_status_valid = 0; |
| |
| /* |
| * Strict status checking. |
| */ |
| for (sjcd_open_tries = 4; --sjcd_open_tries;) { |
| if (!sjcd_status_valid) |
| sjcd_get_status(); |
| if (!sjcd_status_valid) { |
| #if defined( SJCD_DIAGNOSTIC ) |
| printk |
| ("SJCD: open: timed out when check status.\n"); |
| #endif |
| goto err_out; |
| } else if (!sjcd_media_is_available) { |
| #if defined( SJCD_DIAGNOSTIC ) |
| printk("SJCD: open: no disk in drive\n"); |
| #endif |
| if (!sjcd_door_closed) { |
| sjcd_door_was_open = 1; |
| #if defined( SJCD_TRACE ) |
| printk |
| ("SJCD: open: close the tray\n"); |
| #endif |
| s = sjcd_tray_close(); |
| if (s < 0 || !sjcd_status_valid |
| || sjcd_command_failed) { |
| #if defined( SJCD_DIAGNOSTIC ) |
| printk |
| ("SJCD: open: tray close attempt failed\n"); |
| #endif |
| goto err_out; |
| } |
| continue; |
| } else |
| goto err_out; |
| } |
| break; |
| } |
| s = sjcd_tray_lock(); |
| if (s < 0 || !sjcd_status_valid || sjcd_command_failed) { |
| #if defined( SJCD_DIAGNOSTIC ) |
| printk("SJCD: open: tray lock attempt failed\n"); |
| #endif |
| goto err_out; |
| } |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: open: done\n"); |
| #endif |
| } |
| |
| ++sjcd_open_count; |
| return (0); |
| |
| err_out: |
| return (-EIO); |
| } |
| |
| /* |
| * On close, we flush all sjcd blocks from the buffer cache. |
| */ |
| static int sjcd_release(struct inode *inode, struct file *file) |
| { |
| int s; |
| |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: release\n"); |
| #endif |
| if (--sjcd_open_count == 0) { |
| sjcd_invalidate_buffers(); |
| s = sjcd_tray_unlock(); |
| if (s < 0 || !sjcd_status_valid || sjcd_command_failed) { |
| #if defined( SJCD_DIAGNOSTIC ) |
| printk |
| ("SJCD: release: tray unlock attempt failed.\n"); |
| #endif |
| } |
| if (sjcd_door_was_open) { |
| s = sjcd_tray_open(); |
| if (s < 0 || !sjcd_status_valid |
| || sjcd_command_failed) { |
| #if defined( SJCD_DIAGNOSTIC ) |
| printk |
| ("SJCD: release: tray unload attempt failed.\n"); |
| #endif |
| } |
| } |
| } |
| return 0; |
| } |
| |
| /* |
| * A list of file operations allowed for this cdrom. |
| */ |
| static struct block_device_operations sjcd_fops = { |
| .owner = THIS_MODULE, |
| .open = sjcd_open, |
| .release = sjcd_release, |
| .ioctl = sjcd_ioctl, |
| .media_changed = sjcd_disk_change, |
| }; |
| |
| /* |
| * Following stuff is intended for initialization of the cdrom. It |
| * first looks for presence of device. If the device is present, it |
| * will be reset. Then read the version of the drive and load status. |
| * The version is two BCD-coded bytes. |
| */ |
| static struct { |
| unsigned char major, minor; |
| } sjcd_version; |
| |
| static struct gendisk *sjcd_disk; |
| |
| /* |
| * Test for presence of drive and initialize it. Called at boot time. |
| * Probe cdrom, find out version and status. |
| */ |
| static int __init sjcd_init(void) |
| { |
| int i; |
| |
| printk(KERN_INFO |
| "SJCD: Sanyo CDR-H94A cdrom driver version %d.%d.\n", |
| SJCD_VERSION_MAJOR, SJCD_VERSION_MINOR); |
| |
| #if defined( SJCD_TRACE ) |
| printk("SJCD: sjcd=0x%x: ", sjcd_base); |
| #endif |
| |
| if (register_blkdev(MAJOR_NR, "sjcd")) |
| return -EIO; |
| |
| sjcd_queue = blk_init_queue(do_sjcd_request, &sjcd_lock); |
| if (!sjcd_queue) |
| goto out0; |
| |
| blk_queue_hardsect_size(sjcd_queue, 2048); |
| |
| sjcd_disk = alloc_disk(1); |
| if (!sjcd_disk) { |
| printk(KERN_ERR "SJCD: can't allocate disk"); |
| goto out1; |
| } |
| sjcd_disk->major = MAJOR_NR, |
| sjcd_disk->first_minor = 0, |
| sjcd_disk->fops = &sjcd_fops, |
| sprintf(sjcd_disk->disk_name, "sjcd"); |
| |
| if (!request_region(sjcd_base, 4,"sjcd")) { |
| printk |
| ("SJCD: Init failed, I/O port (%X) is already in use\n", |
| sjcd_base); |
| goto out2; |
| } |
| |
| /* |
| * Check for card. Since we are booting now, we can't use standard |
| * wait algorithm. |
| */ |
| printk(KERN_INFO "SJCD: Resetting: "); |
| sjcd_send_cmd(SCMD_RESET); |
| for (i = 1000; i > 0 && !sjcd_status_valid; --i) { |
| unsigned long timer; |
| |
| /* |
| * Wait 10ms approx. |
| */ |
| for (timer = jiffies; time_before_eq(jiffies, timer);); |
| if ((i % 100) == 0) |
| printk("."); |
| (void) sjcd_check_status(); |
| } |
| if (i == 0 || sjcd_command_failed) { |
| printk(" reset failed, no drive found.\n"); |
| goto out3; |
| } else |
| printk("\n"); |
| |
| /* |
| * Get and print out cdrom version. |
| */ |
| printk(KERN_INFO "SJCD: Getting version: "); |
| sjcd_send_cmd(SCMD_GET_VERSION); |
| for (i = 1000; i > 0 && !sjcd_status_valid; --i) { |
| unsigned long timer; |
| |
| /* |
| * Wait 10ms approx. |
| */ |
| for (timer = jiffies; time_before_eq(jiffies, timer);); |
| if ((i % 100) == 0) |
| printk("."); |
| (void) sjcd_check_status(); |
| } |
| if (i == 0 || sjcd_command_failed) { |
| printk(" get version failed, no drive found.\n"); |
| goto out3; |
| } |
| |
| if (sjcd_load_response(&sjcd_version, sizeof(sjcd_version)) == 0) { |
| printk(" %1x.%02x\n", (int) sjcd_version.major, |
| (int) sjcd_version.minor); |
| } else { |
| printk(" read version failed, no drive found.\n"); |
| goto out3; |
| } |
| |
| /* |
| * Check and print out the tray state. (if it is needed?). |
| */ |
| if (!sjcd_status_valid) { |
| printk(KERN_INFO "SJCD: Getting status: "); |
| sjcd_send_cmd(SCMD_GET_STATUS); |
| for (i = 1000; i > 0 && !sjcd_status_valid; --i) { |
| unsigned long timer; |
| |
| /* |
| * Wait 10ms approx. |
| */ |
| for (timer = jiffies; |
| time_before_eq(jiffies, timer);); |
| if ((i % 100) == 0) |
| printk("."); |
| (void) sjcd_check_status(); |
| } |
| if (i == 0 || sjcd_command_failed) { |
| printk(" get status failed, no drive found.\n"); |
| goto out3; |
| } else |
| printk("\n"); |
| } |
| |
| printk(KERN_INFO "SJCD: Status: port=0x%x.\n", sjcd_base); |
| sjcd_disk->queue = sjcd_queue; |
| add_disk(sjcd_disk); |
| |
| sjcd_present++; |
| return (0); |
| out3: |
| release_region(sjcd_base, 4); |
| out2: |
| put_disk(sjcd_disk); |
| out1: |
| blk_cleanup_queue(sjcd_queue); |
| out0: |
| if ((unregister_blkdev(MAJOR_NR, "sjcd") == -EINVAL)) |
| printk("SJCD: cannot unregister device.\n"); |
| return (-EIO); |
| } |
| |
| static void __exit sjcd_exit(void) |
| { |
| del_gendisk(sjcd_disk); |
| put_disk(sjcd_disk); |
| release_region(sjcd_base, 4); |
| blk_cleanup_queue(sjcd_queue); |
| if ((unregister_blkdev(MAJOR_NR, "sjcd") == -EINVAL)) |
| printk("SJCD: cannot unregister device.\n"); |
| printk(KERN_INFO "SJCD: module: removed.\n"); |
| } |
| |
| module_init(sjcd_init); |
| module_exit(sjcd_exit); |
| |
| MODULE_LICENSE("GPL"); |
| MODULE_ALIAS_BLOCKDEV_MAJOR(SANYO_CDROM_MAJOR); |