gym.cpp

#include "base.h"
#include "reader.h"

#include <gme/Gym_Emu.h>

class input_gym : public input_gep
{
	Gym_Emu::header_t m_header;

public:
	static bool g_is_our_path( const char * p_path, const char * p_extension )
	{
		return ! stricmp( p_extension, "gym" );
	}

	void open( service_ptr_t<file> p_filehint, const char * p_path, t_input_open_reason p_reason, abort_callback & p_abort )
	{
		if ( p_reason == input_open_info_write ) throw exception_io_data();

		input_gep::open( p_filehint, p_path, p_reason, p_abort );

		foobar_File_Reader rdr( m_file, p_abort );

		ERRCHK( rdr.read( & m_header, sizeof( m_header ) ) );
	}

	void get_info( t_uint32 p_subsong, file_info & p_info, abort_callback & p_abort )
	{
		if ( memcmp( m_header.tag, "GYMX", 4 ) == 0 )
		{
			HEADER_STRING( p_info, "title", m_header.song );
			HEADER_STRING( p_info, "album", m_header.game );
			HEADER_STRING( p_info, "copyright", m_header.copyright );
			HEADER_STRING( p_info, "emulator", m_header.emulator );
			HEADER_STRING( p_info, "dumper", m_header.dumper );
			HEADER_STRING( p_info, "comment", m_header.comment );
		}

		p_info.info_set( "codec", "GYM" );

		//p_info.info_set_int( "samplerate", sample_rate );
		p_info.info_set_int( "channels", 2 );
		p_info.info_set_int( "bitspersample", 16 );

		Gym_Emu * emu = ( Gym_Emu * ) this->emu;
		if ( ! emu )
		{
			this->emu = emu = new Gym_Emu;

			try
			{
				m_file->seek( 0, p_abort );
				foobar_File_Reader rdr( m_file, p_abort );
				rdr.skip( sizeof( m_header ) );

				ERRCHK( emu->set_sample_rate( sample_rate ) );
				ERRCHK( emu->load( m_header, rdr ) );
				handle_warning();
				emu->start_track( 0 );
				handle_warning();
			}
			catch(...)
			{
				if ( emu )
				{
					delete emu;
					this->emu = emu = NULL;
				}
				throw;
			}

			m_file.release();
		}

		p_info.set_length( double( emu->track_length() ) / double( Gym_Emu::gym_rate ) );

		if ( * ( ( t_uint32 * ) & m_header.loop_start ) )
			p_info.info_set_int("gym_loop_start", pfc::byteswap_if_be_t( * ( ( t_uint32 * ) & m_header.loop_start ) ) );
	}

	void decode_initialize( t_uint32 p_subsong, unsigned p_flags, abort_callback & p_abort )
	{
		Gym_Emu * emu = ( Gym_Emu * ) this->emu;
		if ( ! emu )
		{
			this->emu = emu = new Gym_Emu;

			try
			{
				m_file->seek( 0, p_abort );
				foobar_File_Reader rdr( m_file, p_abort );
				rdr.skip( sizeof( m_header ) );

				ERRCHK( emu->set_sample_rate( sample_rate ) );
				ERRCHK( emu->load( m_header, rdr ) );
				handle_warning();
			}
			catch(...)
			{
				if ( emu )
				{
					delete emu;
					this->emu = emu = NULL;
				}
				throw;
			}

			m_file.release();
		}

		if ( * ( ( t_uint32 * ) &m_header.loop_start ) )
		{
			tag_song_ms = MulDiv( emu->track_length(), 1000, 60 );
			tag_fade_ms = 0;
		}
		else p_flags |= input_flag_no_looping;

		input_gep::decode_initialize( 0, p_flags, p_abort );
	}
};

DECLARE_FILE_TYPE("GYM files", "*.GYM");

static input_factory_t<input_gym> g_input_gym_factory;