nkeynes@520: /**
nkeynes@561:  * $Id$
nkeynes@520:  *
nkeynes@520:  * Linux cd-rom device driver. 
nkeynes@520:  *
nkeynes@520:  * Copyright (c) 2005 Nathan Keynes.
nkeynes@520:  *
nkeynes@520:  * This program is free software; you can redistribute it and/or modify
nkeynes@520:  * it under the terms of the GNU General Public License as published by
nkeynes@520:  * the Free Software Foundation; either version 2 of the License, or
nkeynes@520:  * (at your option) any later version.
nkeynes@520:  *
nkeynes@520:  * This program is distributed in the hope that it will be useful,
nkeynes@520:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
nkeynes@520:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
nkeynes@520:  * GNU General Public License for more details.
nkeynes@520:  */
nkeynes@520: #include <unistd.h>
nkeynes@520: #include <stdlib.h>
nkeynes@520: #include <stdio.h>
nkeynes@520: #include <string.h>
nkeynes@520: #include <errno.h>
nkeynes@520: #include <linux/cdrom.h>
nkeynes@520: #include <sys/stat.h>
nkeynes@520: #include <sys/ioctl.h>
nkeynes@520: #include <fstab.h>
nkeynes@520: #include <fcntl.h>
nkeynes@520: 
nkeynes@678: #include "gdrom/gddriver.h"
nkeynes@520: #include "gdrom/packet.h"
nkeynes@520: #include "dream.h"
nkeynes@520: 
nkeynes@520: #define MAXTOCENTRIES 600  /* This is a fairly generous overestimate really */
nkeynes@520: #define MAXTOCSIZE 4 + (MAXTOCENTRIES*11)
nkeynes@520: #define MAX_SECTORS_PER_CALL 1
nkeynes@520: 
nkeynes@520: static uint32_t inline lbatomsf( uint32_t lba ) {
nkeynes@520:     union cdrom_addr addr;
nkeynes@520:     lba = lba + CD_MSF_OFFSET;
nkeynes@520:     addr.msf.frame = lba % CD_FRAMES;
nkeynes@520:     int seconds = lba / CD_FRAMES;
nkeynes@520:     addr.msf.second = seconds % CD_SECS;
nkeynes@520:     addr.msf.minute = seconds / CD_SECS;
nkeynes@520:     return addr.lba;
nkeynes@520: }
nkeynes@520: 
nkeynes@520: #define LBATOMSF( lba ) lbatomsf(lba)
nkeynes@520: 
nkeynes@520: 
nkeynes@520: static gboolean linux_image_is_valid( FILE *f );
nkeynes@520: static gdrom_disc_t linux_open_device( const gchar *filename, FILE *f );
nkeynes@520: static gdrom_error_t linux_read_disc_toc( gdrom_image_t disc );
nkeynes@520: static gdrom_error_t linux_read_sector( gdrom_disc_t disc, uint32_t sector,
nkeynes@736:                                         int mode, unsigned char *buf, uint32_t *length );
nkeynes@520: static gdrom_error_t linux_send_command( int fd, char *cmd, unsigned char *buffer, size_t *buflen,
nkeynes@736:                                          int direction );
nkeynes@520: static int linux_drive_status( gdrom_disc_t disc );
nkeynes@520: 
nkeynes@520: struct gdrom_image_class cdrom_device_class = { "Linux", NULL,
nkeynes@736:         linux_image_is_valid, linux_open_device };
nkeynes@709: GList *cdrom_get_native_devices(void)
nkeynes@520: {
nkeynes@520:     GList *list = NULL;
nkeynes@520:     struct fstab *ent;
nkeynes@520:     struct stat st;
nkeynes@520:     setfsent();
nkeynes@520:     while( (ent = getfsent()) != NULL ) {
nkeynes@736:         if( (stat(ent->fs_spec, &st) != -1) && 
nkeynes@736:                 S_ISBLK(st.st_mode) ) {
nkeynes@736:             /* Got a valid block device - is it a CDROM? */
nkeynes@736:             int fd = open(ent->fs_spec, O_RDONLY|O_NONBLOCK);
nkeynes@736:             if( fd == -1 )
nkeynes@736:                 continue;
nkeynes@736:             int caps = ioctl(fd, CDROM_GET_CAPABILITY);
nkeynes@736:             if( caps != -1 ) {
nkeynes@736:                 /* Appears to support CDROM functions */
nkeynes@736:                 list = g_list_append( list, gdrom_device_new(ent->fs_spec, ent->fs_spec));
nkeynes@736:             }
nkeynes@736:             close(fd);
nkeynes@736:         }
nkeynes@520:     }
nkeynes@520:     return list;
nkeynes@520: }
nkeynes@520: 
nkeynes@709: gdrom_disc_t cdrom_open_device( const gchar *method, const gchar *path )
nkeynes@709: {
nkeynes@709:     return NULL;
nkeynes@709: }
nkeynes@709: 
nkeynes@520: static gboolean linux_image_is_valid( FILE *f )
nkeynes@520: {
nkeynes@520:     struct stat st;
nkeynes@520:     struct cdrom_tochdr tochdr;
nkeynes@520: 
nkeynes@520:     if( fstat(fileno(f), &st) == -1 ) {
nkeynes@736:         return FALSE; /* can't stat device? */
nkeynes@520:     }
nkeynes@520:     if( !S_ISBLK(st.st_mode) ) {
nkeynes@736:         return FALSE; /* Not a block device */
nkeynes@520:     }
nkeynes@520: 
nkeynes@520:     if( ioctl(fileno(f), CDROMREADTOCHDR, &tochdr) == -1 ) {
nkeynes@736:         /* Quick check that this is really a CD */
nkeynes@736:         return FALSE;
nkeynes@520:     }
nkeynes@520: 
nkeynes@520:     return TRUE;
nkeynes@520: }
nkeynes@520: 
nkeynes@520: static gdrom_disc_t linux_open_device( const gchar *filename, FILE *f ) 
nkeynes@520: {
nkeynes@520:     gdrom_disc_t disc;
nkeynes@520: 
nkeynes@520:     disc = gdrom_image_new(filename, f);
nkeynes@520:     if( disc == NULL ) {
nkeynes@736:         ERROR("Unable to allocate memory!");
nkeynes@736:         return NULL;
nkeynes@520:     }
nkeynes@520: 
nkeynes@520:     gdrom_error_t status = linux_read_disc_toc( (gdrom_image_t)disc );
nkeynes@520:     if( status != 0 ) {
nkeynes@736:         gdrom_image_destroy_no_close(disc);
nkeynes@736:         if( status == 0xFFFF ) {
nkeynes@736:             ERROR("Unable to load disc table of contents (%s)", strerror(errno));
nkeynes@736:         } else {
nkeynes@736:             ERROR("Unable to load disc table of contents (sense %d,%d)",
nkeynes@736:                     status &0xFF, status >> 8 );
nkeynes@736:         }
nkeynes@736:         return NULL;
nkeynes@520:     }
nkeynes@520:     disc->read_sector = linux_read_sector;
nkeynes@520:     disc->drive_status = linux_drive_status;
nkeynes@520:     return disc;
nkeynes@520: }
nkeynes@520: 
nkeynes@520: static int linux_drive_status( gdrom_disc_t disc )
nkeynes@520: {
nkeynes@520:     int fd = fileno(((gdrom_image_t)disc)->file);
nkeynes@520:     int status = ioctl(fd, CDROM_DRIVE_STATUS, CDSL_CURRENT);
nkeynes@520:     if( status == CDS_DISC_OK ) {
nkeynes@736:         status = ioctl(fd, CDROM_MEDIA_CHANGED, CDSL_CURRENT);
nkeynes@736:         if( status != 0 ) {
nkeynes@736:             linux_read_disc_toc( (gdrom_image_t)disc);
nkeynes@736:         }
nkeynes@736:         return ((gdrom_image_t)disc)->disc_type | IDE_DISC_READY;
nkeynes@520:     } else {
nkeynes@736:         return IDE_DISC_NONE;
nkeynes@520:     }
nkeynes@520: }
nkeynes@520: /**
nkeynes@520:  * Read the full table of contents into the disc from the device.
nkeynes@520:  */
nkeynes@520: static gdrom_error_t linux_read_disc_toc( gdrom_image_t disc )
nkeynes@520: {
nkeynes@520:     int fd = fileno(disc->file);
nkeynes@520:     unsigned char buf[MAXTOCSIZE];
nkeynes@520:     size_t buflen = sizeof(buf);
nkeynes@520:     char cmd[12] = { 0x43, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
nkeynes@736: 
nkeynes@520:     cmd[7] = (sizeof(buf))>>8;
nkeynes@520:     cmd[8] = (sizeof(buf))&0xFF;
nkeynes@520:     memset( buf, 0, sizeof(buf) );
nkeynes@520:     gdrom_error_t status = linux_send_command( fd, cmd, buf, &buflen, CGC_DATA_READ );
nkeynes@520:     if( status != 0 ) {
nkeynes@720:         return status;
nkeynes@520:     }
nkeynes@720:     mmc_parse_toc2( disc, buf );
nkeynes@520:     return 0;
nkeynes@520: }
nkeynes@520: 
nkeynes@736: gdrom_error_t linux_play_audio( gdrom_disc_t disc, uint32_t lba, uint32_t endlba )
nkeynes@520: {
nkeynes@520:     int fd = fileno( ((gdrom_image_t)disc)->file );
nkeynes@520:     uint32_t real_sector = lba - CD_MSF_OFFSET;
nkeynes@520:     uint32_t length = endlba - lba;
nkeynes@520:     uint32_t buflen = 0;
nkeynes@520:     char cmd[12] = { 0xA5, 0,0,0, 0,0,0,0, 0,0,0,0 };
nkeynes@520:     cmd[2] = (real_sector >> 24) & 0xFF;
nkeynes@520:     cmd[3] = (real_sector >> 16) & 0xFF;
nkeynes@520:     cmd[4] = (real_sector >> 8) & 0xFF;
nkeynes@520:     cmd[5] = real_sector & 0xFF;
nkeynes@520:     cmd[6] = (length >> 24) & 0xFF;
nkeynes@520:     cmd[7] = (length >> 16) & 0xFF;
nkeynes@520:     cmd[8] = (length >> 8) & 0xFF;
nkeynes@520:     cmd[9] = length & 0xFF;
nkeynes@736: 
nkeynes@520:     return linux_send_command( fd, cmd, NULL, &buflen, CGC_DATA_NONE );
nkeynes@520: }
nkeynes@520: 
nkeynes@520: gdrom_error_t linux_stop_audio( gdrom_disc_t disc )
nkeynes@520: {
nkeynes@520:     int fd = fileno( ((gdrom_image_t)disc)->file );
nkeynes@520:     uint32_t buflen = 0;
nkeynes@520:     char cmd[12] = {0x4E,0,0,0, 0,0,0,0, 0,0,0,0};
nkeynes@520:     return linux_send_command( fd, cmd, NULL, &buflen, CGC_DATA_NONE );
nkeynes@520: }
nkeynes@520: 
nkeynes@520: static gdrom_error_t linux_read_sector( gdrom_disc_t disc, uint32_t sector,
nkeynes@736:                                         int mode, unsigned char *buf, uint32_t *length )
nkeynes@520: {
nkeynes@520:     gdrom_image_t image = (gdrom_image_t)disc;
nkeynes@520:     int fd = fileno(image->file);
nkeynes@520:     uint32_t real_sector = sector - CD_MSF_OFFSET;
nkeynes@520:     uint32_t sector_size = MAX_SECTOR_SIZE;
nkeynes@720:     char cmd[12];
nkeynes@736: 
nkeynes@720:     mmc_make_read_cd_cmd( cmd, real_sector, mode );
nkeynes@736: 
nkeynes@520:     gdrom_error_t status = linux_send_command( fd, cmd, buf, &sector_size, CGC_DATA_READ );
nkeynes@520:     if( status != 0 ) {
nkeynes@720:         return status;
nkeynes@520:     }
nkeynes@520:     *length = 2048;
nkeynes@520:     return 0;
nkeynes@520: }
nkeynes@520: 
nkeynes@520: /**
nkeynes@520:  * Send a packet command to the device and wait for a response. 
nkeynes@520:  * @return 0 on success, -1 on an operating system error, or a sense error
nkeynes@520:  * code on a device error.
nkeynes@520:  */
nkeynes@520: static gdrom_error_t linux_send_command( int fd, char *cmd, unsigned char *buffer, size_t *buflen,
nkeynes@736:                                          int direction )
nkeynes@520: {
nkeynes@520:     struct request_sense sense;
nkeynes@520:     struct cdrom_generic_command cgc;
nkeynes@520: 
nkeynes@520:     memset( &cgc, 0, sizeof(cgc) );
nkeynes@520:     memset( &sense, 0, sizeof(sense) );
nkeynes@520:     memcpy( cgc.cmd, cmd, 12 );
nkeynes@520:     cgc.buffer = buffer;
nkeynes@520:     cgc.buflen = *buflen;
nkeynes@520:     cgc.sense = &sense;
nkeynes@520:     cgc.data_direction = direction;
nkeynes@736: 
nkeynes@644:     if( ioctl(fd, CDROM_SEND_PACKET, &cgc) < 0 ) {
nkeynes@736:         if( sense.sense_key == 0 ) {
nkeynes@736:             return -1; 
nkeynes@736:         } else {
nkeynes@736:             /* TODO: Map newer codes back to the ones used by the gd-rom. */
nkeynes@736:             return sense.sense_key | (sense.asc<<8);
nkeynes@736:         }
nkeynes@520:     } else {
nkeynes@736:         *buflen = cgc.buflen;
nkeynes@736:         return 0;
nkeynes@520:     }
nkeynes@520: }