nkeynes@138: /**
nkeynes@152:  * $Id: gdrom.c,v 1.5 2006-05-23 13:11:45 nkeynes Exp $
nkeynes@138:  *
nkeynes@138:  * GD-Rom  access functions.
nkeynes@138:  *
nkeynes@138:  * Copyright (c) 2005 Nathan Keynes.
nkeynes@138:  *
nkeynes@138:  * This program is free software; you can redistribute it and/or modify
nkeynes@138:  * it under the terms of the GNU General Public License as published by
nkeynes@138:  * the Free Software Foundation; either version 2 of the License, or
nkeynes@138:  * (at your option) any later version.
nkeynes@138:  *
nkeynes@138:  * This program is distributed in the hope that it will be useful,
nkeynes@138:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
nkeynes@138:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
nkeynes@138:  * GNU General Public License for more details.
nkeynes@138:  */
nkeynes@138: 
nkeynes@138: #include <stdio.h>
nkeynes@138: 
nkeynes@138: #include "gdrom/ide.h"
nkeynes@138: #include "gdrom/gdrom.h"
nkeynes@143: #include "gdrom/packet.h"
nkeynes@138: #include "dream.h"
nkeynes@138: 
nkeynes@138: static void gdrom_image_destroy( gdrom_disc_t );
nkeynes@152: static gdrom_error_t gdrom_image_read_sectors( gdrom_disc_t, uint32_t, uint32_t, int, char *, uint32_t * );
nkeynes@138: 
nkeynes@138: 
nkeynes@138: gdrom_disc_t gdrom_disc = NULL;
nkeynes@138: 
nkeynes@138: char *gdrom_mode_names[] = { "Mode1", "Mode2", "XA 1", "XA2", "Audio", "GD-Rom" };
nkeynes@138: uint32_t gdrom_sector_size[] = { 2048, 2336, 2048, 2324, 2352, 2336 };
nkeynes@138: 
nkeynes@138: gdrom_disc_t gdrom_image_open( const gchar *filename )
nkeynes@138: {
nkeynes@138:     return nrg_image_open( filename );
nkeynes@138: }
nkeynes@138: 
nkeynes@138: 
nkeynes@138: gdrom_disc_t gdrom_image_new( FILE *file )
nkeynes@138: {
nkeynes@138:     struct gdrom_disc *disc = (struct gdrom_disc *)calloc(1, sizeof(struct gdrom_disc));
nkeynes@138:     if( disc == NULL )
nkeynes@138: 	return NULL;
nkeynes@138:     disc->read_sectors = gdrom_image_read_sectors;
nkeynes@138:     disc->close = gdrom_image_destroy;
nkeynes@138:     disc->disc_type = IDE_DISC_CDROM;
nkeynes@138:     disc->file = file;
nkeynes@138:     return disc;
nkeynes@138: }
nkeynes@138: 
nkeynes@138: static void gdrom_image_destroy( gdrom_disc_t disc )
nkeynes@138: {
nkeynes@138:     if( disc->file != NULL ) {
nkeynes@138: 	fclose(disc->file);
nkeynes@138: 	disc->file = NULL;
nkeynes@138:     }
nkeynes@138:     free( disc );
nkeynes@138: }
nkeynes@138: 
nkeynes@152: static gdrom_error_t gdrom_image_read_sectors( gdrom_disc_t disc, uint32_t sector,
nkeynes@152: 					       uint32_t sector_count, int mode, char *buf,
nkeynes@152: 					       uint32_t *length )
nkeynes@138: {
nkeynes@152:     int i, file_offset, read_len;
nkeynes@152:     struct gdrom_track *track = NULL;
nkeynes@138: 
nkeynes@138:     for( i=0; i<disc->track_count; i++ ) {
nkeynes@138: 	if( disc->track[i].lba <= sector && 
nkeynes@142: 	    (sector + sector_count) <= (disc->track[i].lba + disc->track[i].sector_count) ) {
nkeynes@152: 	    track = &disc->track[i];
nkeynes@138: 	    break;
nkeynes@138: 	}
nkeynes@138:     }
nkeynes@152:     if( track == NULL )
nkeynes@143: 	return PKT_ERR_BADREAD;
nkeynes@152: 
nkeynes@152:     file_offset = track->offset + track->sector_size * (sector - track->lba);
nkeynes@152:     read_len = track->sector_size * sector_count;
nkeynes@152:     fseek( disc->file, file_offset, SEEK_SET );
nkeynes@152: 
nkeynes@152:     switch( mode ) {
nkeynes@152:     case GDROM_GD:
nkeynes@152: 	if( track->mode != GDROM_GD ) 
nkeynes@152: 	    return PKT_ERR_BADREADMODE;
nkeynes@152: 	break;
nkeynes@152:     case GDROM_MODE1:
nkeynes@152: 	switch( track->mode ) {
nkeynes@152: 	case GDROM_MODE1:
nkeynes@152: 	case GDROM_MODE2_XA1:
nkeynes@152: 	    fread( buf, track->sector_size, sector_count, disc->file );
nkeynes@152: 	    break;
nkeynes@152: 	case GDROM_MODE2:
nkeynes@152: 	    read_len = sector_count * 2048;
nkeynes@152: 	    while( sector_count > 0 ) {
nkeynes@152: 		fread( buf, 2048, 1, disc->file );
nkeynes@152: 		file_offset += track->sector_size;
nkeynes@152: 		buf += 2048;
nkeynes@152: 		fseek( disc->file, file_offset, SEEK_SET );
nkeynes@152: 		sector_count--;
nkeynes@152: 	    }
nkeynes@152: 	    break;
nkeynes@152: 	default:
nkeynes@152: 	    return PKT_ERR_BADREADMODE;
nkeynes@152: 	}
nkeynes@152: 	break;
nkeynes@152:     default:
nkeynes@143: 	return PKT_ERR_BADREADMODE;
nkeynes@152:     }
nkeynes@152: 	    
nkeynes@143:     *length = read_len;
nkeynes@143:     return PKT_ERR_OK;
nkeynes@138: }
nkeynes@138: 
nkeynes@138: uint32_t gdrom_read_sectors( uint32_t sector, uint32_t sector_count,
nkeynes@143: 			     int mode, char *buf, uint32_t *length )
nkeynes@138: {
nkeynes@138:     if( gdrom_disc == NULL )
nkeynes@143: 	return PKT_ERR_NODISC; /* No media */
nkeynes@143:     return gdrom_disc->read_sectors( gdrom_disc, sector, sector_count, mode, buf, length );
nkeynes@138: }
nkeynes@138: 
nkeynes@138: 
nkeynes@138: void gdrom_dump_disc( gdrom_disc_t disc ) {
nkeynes@138:     int i;
nkeynes@138:     INFO( "Disc ID: %s, %d tracks in %d sessions", disc->mcn, disc->track_count, 
nkeynes@138: 	  disc->track[disc->track_count-1].session + 1 );
nkeynes@138:     for( i=0; i<disc->track_count; i++ ) {
nkeynes@138: 	INFO( "Sess %d Trk %d: Start %06X Length %06X, %s",
nkeynes@138: 	      disc->track[i].session+1, i+1, disc->track[i].lba,
nkeynes@138: 	      disc->track[i].sector_count, gdrom_mode_names[disc->track[i].mode] );
nkeynes@138:     }
nkeynes@138: }
nkeynes@138: 
nkeynes@149: gdrom_error_t gdrom_get_toc( char *buf ) 
nkeynes@138: {
nkeynes@142:     struct gdrom_toc *toc = (struct gdrom_toc *)buf;
nkeynes@142:     int i;
nkeynes@142: 
nkeynes@138:     if( gdrom_disc == NULL )
nkeynes@149: 	return PKT_ERR_NODISC;
nkeynes@142: 
nkeynes@142:     for( i=0; i<gdrom_disc->track_count; i++ ) {
nkeynes@142: 	toc->track[i] = htonl( gdrom_disc->track[i].lba ) | gdrom_disc->track[i].flags;
nkeynes@142:     }
nkeynes@142:     toc->first = 0x0100 | gdrom_disc->track[0].flags;
nkeynes@142:     toc->last = (gdrom_disc->track_count<<8) | gdrom_disc->track[i-1].flags;
nkeynes@142:     toc->leadout = htonl(gdrom_disc->track[i-1].lba + gdrom_disc->track[i-1].sector_count) |
nkeynes@142: 	gdrom_disc->track[i-1].flags;
nkeynes@142:     for( ;i<99; i++ )
nkeynes@142: 	toc->track[i] = 0xFFFFFFFF;
nkeynes@149:     return PKT_ERR_OK;
nkeynes@149: }
nkeynes@149: 
nkeynes@152: gdrom_error_t gdrom_get_info( char *buf, int session )
nkeynes@149: {
nkeynes@149:     if( gdrom_disc == NULL )
nkeynes@149: 	return PKT_ERR_NODISC;
nkeynes@149:     struct gdrom_track *last_track = &gdrom_disc->track[gdrom_disc->track_count-1];
nkeynes@149:     unsigned int end_of_disc = last_track->lba + last_track->sector_count;
nkeynes@152:     int i;
nkeynes@152:     buf[0] = 0x01; /* Disc status? */
nkeynes@149:     buf[1] = 0;
nkeynes@152: 
nkeynes@152:     if( session == 0 ) {
nkeynes@152: 	buf[2] = last_track->session+1; /* last session */
nkeynes@152: 	buf[3] = (end_of_disc >> 16) & 0xFF;
nkeynes@152: 	buf[4] = (end_of_disc >> 8) & 0xFF;
nkeynes@152: 	buf[5] = end_of_disc & 0xFF;
nkeynes@152: 	return PKT_ERR_OK;
nkeynes@152:     } else {
nkeynes@152: 	session--;
nkeynes@152: 	for( i=0; i<gdrom_disc->track_count; i++ ) {
nkeynes@152: 	    if( gdrom_disc->track[i].session == session ) {
nkeynes@152: 		buf[2] = i+1; /* first track of session */
nkeynes@152: 		buf[3] = (gdrom_disc->track[i].lba >> 16) & 0xFF;
nkeynes@152: 		buf[4] = (gdrom_disc->track[i].lba >> 8) & 0xFF;
nkeynes@152: 		buf[5] = gdrom_disc->track[i].lba & 0xFF;
nkeynes@152: 		return PKT_ERR_OK;
nkeynes@152: 	    }
nkeynes@152: 	}
nkeynes@152: 	return PKT_ERR_BADFIELD; /* No such session */
nkeynes@152:     }
nkeynes@152: 	
nkeynes@138: }
nkeynes@138: 
nkeynes@138: void gdrom_mount_disc( gdrom_disc_t disc ) 
nkeynes@138: {
nkeynes@138:     gdrom_unmount_disc();
nkeynes@138:     gdrom_disc = disc;
nkeynes@138:     idereg.disc = disc->disc_type | IDE_DISC_READY;
nkeynes@138:     gdrom_dump_disc( disc );
nkeynes@138: }
nkeynes@138: 
nkeynes@138: gdrom_disc_t gdrom_mount_image( const gchar *filename )
nkeynes@138: {
nkeynes@138:     gdrom_disc_t disc = gdrom_image_open(filename);
nkeynes@138:     if( disc != NULL )
nkeynes@138: 	gdrom_mount_disc( disc );
nkeynes@138:     return disc;
nkeynes@138: }
nkeynes@138: 
nkeynes@138: void gdrom_unmount_disc( ) 
nkeynes@138: {
nkeynes@138:     if( gdrom_disc != NULL ) {
nkeynes@138: 	gdrom_disc->close(gdrom_disc);
nkeynes@138:     }
nkeynes@138:     gdrom_disc = NULL;
nkeynes@138:     idereg.disc = IDE_DISC_NONE;
nkeynes@138: }
nkeynes@138: 
nkeynes@138: gboolean gdrom_is_mounted( void ) 
nkeynes@138: {
nkeynes@138:     return gdrom_disc != NULL;
nkeynes@138: }