From ea1947ffcc606d757357398b24e74a3f4ecefa07 Mon Sep 17 00:00:00 2001 From: neonloop Date: Wed, 20 Oct 2021 14:54:27 +0000 Subject: Initial commit from steward-fu release --- modules/mod_cd/mod_cd.c | 322 ++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 322 insertions(+) create mode 100644 modules/mod_cd/mod_cd.c (limited to 'modules/mod_cd/mod_cd.c') diff --git a/modules/mod_cd/mod_cd.c b/modules/mod_cd/mod_cd.c new file mode 100644 index 0000000..46a3825 --- /dev/null +++ b/modules/mod_cd/mod_cd.c @@ -0,0 +1,322 @@ +/* + * Copyright © 2006-2016 SplinterGU (Fenix/Bennugd) + * Copyright © 2002-2006 Fenix Team (Fenix) + * Copyright © 1999-2002 José Luis Cebrián Pagüe (Fenix) + * + * This file is part of Bennu - Game Development + * + * This software is provided 'as-is', without any express or implied + * warranty. In no event will the authors be held liable for any damages + * arising from the use of this software. + * + * Permission is granted to anyone to use this software for any purpose, + * including commercial applications, and to alter it and redistribute it + * freely, subject to the following restrictions: + * + * 1. The origin of this software must not be misrepresented; you must not + * claim that you wrote the original software. If you use this software + * in a product, an acknowledgment in the product documentation would be + * appreciated but is not required. + * + * 2. Altered source versions must be plainly marked as such, and must not be + * misrepresented as being the original software. + * + * 3. This notice may not be removed or altered from any source + * distribution. + * + */ + +/* --------------------------------------------------------------------------- */ + +#include +#include +#include + +#include + +#include "bgddl.h" +#include "bgdrtm.h" +#include "xstrings.h" +#include "dlvaracc.h" + +/* --------------------------------------------------------------------------- */ + +static SDL_CD * sdl_cd = NULL; +static int sdl_cdnum = -1; + +/* ----------------------------------------------------------------- */ + +enum { + CD_TRACK = 0, + CD_FRAME, + CD_TRACKS, + CD_MINUTE, + CD_SECOND, + CD_SUBFRAME, + CD_MINUTES, + CD_SECONDS, + CD_FRAMES, + CD_TRACKINFO +}; + +/* ----------------------------------------------------------------- */ +/* Son las variables que se desea acceder. */ +/* El interprete completa esta estructura, si la variable existe. */ +/* (usada en tiempo de ejecucion) */ +DLVARFIXUP __bgdexport( mod_cd, globals_fixup )[] = +{ + /* Nombre de variable global, puntero al dato, tamaño del elemento, cantidad de elementos */ + { "cdinfo.current_track", NULL, -1, -1 }, + { "cdinfo.current_frame", NULL, -1, -1 }, + { "cdinfo.tracks", NULL, -1, -1 }, + { "cdinfo.minute", NULL, -1, -1 }, + { "cdinfo.second", NULL, -1, -1 }, + { "cdinfo.subframe", NULL, -1, -1 }, + { "cdinfo.minutes", NULL, -1, -1 }, + { "cdinfo.seconds", NULL, -1, -1 }, + { "cdinfo.subframes", NULL, -1, -1 }, + { "cdinfo.track", NULL, -1, -1 }, + { NULL, NULL, -1, -1 } +}; + +/* ----------------------------------------------------------------- */ +/** + int CD_DRIVES() + Returns the number of CD drives in the system + **/ + +static int modcd_drives( INSTANCE * my, int * params ) +{ + return SDL_CDNumDrives(); +} + +/* --------------------------------------------------------------------------- */ +/** + int CD_STATUS (int CD) + Returns the status of a CD (using SDL constants) + **/ + +static int modcd_status( INSTANCE * my, int * params ) +{ + if ( params[0] < 0 || params[0] >= SDL_CDNumDrives() ) return 0; + + if ( sdl_cd == NULL || sdl_cdnum != params[0] ) + { + if ( sdl_cd ) SDL_CDClose( sdl_cd ); + sdl_cd = SDL_CDOpen( params[0] ); + if ( sdl_cd == NULL ) return 0; + sdl_cdnum = params[0]; + } + + return SDL_CDStatus( sdl_cd ); +} + +/* --------------------------------------------------------------------------- */ +/** + string CD_NAME (int CD) + Returns a human-readable string with the name of a CD drive + **/ + +static int modcd_name( INSTANCE * my, int * params ) +{ + int result; + + if ( params[0] < 0 || params[0] >= SDL_CDNumDrives() ) return 0; + + result = string_new( SDL_CDName( params[0] ) ); + string_use( result ); + return result; +} + +/* --------------------------------------------------------------------------- */ +/** + CD_GETINFO(int CD) + Fills the global structure CD with information about the current CD + Returns 1 if there is a valid CD in the drive or 0 otherwise + **/ + +static int modcd_getinfo( INSTANCE * my, int * params ) +{ + int i, total = 0; + char * trackinfo; + + if ( params[0] < 0 || params[0] >= SDL_CDNumDrives() ) return 0; + + if ( sdl_cd == NULL || sdl_cdnum != params[0] ) + { + if ( sdl_cd ) SDL_CDClose( sdl_cd ); + sdl_cd = SDL_CDOpen( params[0] ); + if ( sdl_cd == NULL ) return 0; + sdl_cdnum = params[0]; + } + + GLODWORD( mod_cd, CD_TRACKS ) = sdl_cd->numtracks; + GLODWORD( mod_cd, CD_TRACK ) = sdl_cd->cur_track; + FRAMES_TO_MSF( sdl_cd->cur_frame, &GLODWORD( mod_cd, CD_MINUTE ), &GLODWORD( mod_cd, CD_SECOND ), &GLODWORD( mod_cd, CD_SUBFRAME ) ); + + trackinfo = ( char * ) & GLODWORD( mod_cd, CD_TRACKINFO ); + + for ( i = 0; i < sdl_cd->numtracks ; i++, trackinfo += 16 ) + { + total += sdl_cd->track[i].length; + *( Uint32 * ) trackinfo = ( sdl_cd->track[i].type == SDL_AUDIO_TRACK ); + FRAMES_TO_MSF( sdl_cd->track[i].length, trackinfo + 4, trackinfo + 8, trackinfo + 12 ); + } + FRAMES_TO_MSF( total, &GLODWORD( mod_cd, CD_MINUTES ), &GLODWORD( mod_cd, CD_SECONDS ), &GLODWORD( mod_cd, CD_FRAMES ) ); + return 1; +} + +/* --------------------------------------------------------------------------- */ +/** + CD_PLAY (int CD, int TRACK) + Starts playing a track of the given CD + **/ + +static int modcd_play( INSTANCE * my, int * params ) +{ + if ( params[0] < 0 || params[0] >= SDL_CDNumDrives() ) return 0; + + if ( sdl_cd == NULL || sdl_cdnum != params[0] ) + { + if ( sdl_cd ) SDL_CDClose( sdl_cd ); + sdl_cd = SDL_CDOpen( params[0] ); + if ( sdl_cd == NULL ) return 0; + sdl_cdnum = params[0]; + } + + if ( CD_INDRIVE( SDL_CDStatus( sdl_cd ) ) ) + return !SDL_CDPlayTracks( sdl_cd, params[1], 0, 1, 0 ); + + return 0; +} + +/* --------------------------------------------------------------------------- */ +/** + CD_PLAY (int CD, int TRACK, int NUMTRACKS) + Plays a series of tracks of the CD + **/ + +static int modcd_playtracks( INSTANCE * my, int * params ) +{ + if ( params[0] < 0 || params[0] >= SDL_CDNumDrives() ) return 0; + + if ( sdl_cd == NULL || sdl_cdnum != params[0] ) + { + if ( sdl_cd ) SDL_CDClose( sdl_cd ); + sdl_cd = SDL_CDOpen( params[0] ); + if ( sdl_cd == NULL ) return 0; + sdl_cdnum = params[0]; + } + + if ( CD_INDRIVE( SDL_CDStatus( sdl_cd ) ) ) + return !SDL_CDPlayTracks( sdl_cd, params[1], 0, params[2], 0 ); + + return 0; +} + +/* --------------------------------------------------------------------------- */ +/** + CD_EJECT (int CD) + Ejects a CD + **/ + +static int modcd_eject( INSTANCE * my, int * params ) +{ + if ( params[0] < 0 || params[0] >= SDL_CDNumDrives() ) return 0; + + if ( sdl_cd == NULL || sdl_cdnum != params[0] ) + { + if ( sdl_cd ) SDL_CDClose( sdl_cd ); + sdl_cd = SDL_CDOpen( params[0] ); + if ( sdl_cd == NULL ) return 0; + sdl_cdnum = params[0]; + } + + return !SDL_CDEject( sdl_cd ); +} + +/* --------------------------------------------------------------------------- */ +/** + CD_PAUSE (int CD) + Pauses the CD playing + **/ + +static int modcd_pause( INSTANCE * my, int * params ) +{ + if ( params[0] < 0 || params[0] >= SDL_CDNumDrives() ) return 0; + + if ( sdl_cd == NULL || sdl_cdnum != params[0] ) + { + if ( sdl_cd ) SDL_CDClose( sdl_cd ); + sdl_cd = SDL_CDOpen( params[0] ); + if ( sdl_cd == NULL ) return 0; + sdl_cdnum = params[0]; + } + + return !SDL_CDPause( sdl_cd ); +} + +/* --------------------------------------------------------------------------- */ +/** + CD_RESUME (int CD) + Resumes a CD in pause + **/ + +static int modcd_resume( INSTANCE * my, int * params ) +{ + if ( params[0] < 0 || params[0] >= SDL_CDNumDrives() ) return 0; + + if ( sdl_cd == NULL || sdl_cdnum != params[0] ) + { + if ( sdl_cd ) SDL_CDClose( sdl_cd ); + sdl_cd = SDL_CDOpen( params[0] ); + if ( sdl_cd == NULL ) return 0; + sdl_cdnum = params[0]; + } + + return !SDL_CDResume( sdl_cd ); +} + +/* --------------------------------------------------------------------------- */ +/** + CD_STOP (int CD) + Stops the CD + **/ + +static int modcd_stop( INSTANCE * my, int * params ) +{ + if ( params[0] < 0 || params[0] >= SDL_CDNumDrives() ) return 0; + + if ( sdl_cd == NULL || sdl_cdnum != params[0] ) + { + if ( sdl_cd ) SDL_CDClose( sdl_cd ); + sdl_cd = SDL_CDOpen( params[0] ); + if ( sdl_cd == NULL ) return 0; + sdl_cdnum = params[0]; + } + + return !SDL_CDStop( sdl_cd ); +} + +/* --------------------------------------------------------------------------- */ +/* Funciones de inicializacion del modulo/plugin */ + +void __bgdexport( mod_cd, module_initialize )() +{ + if ( !SDL_WasInit( SDL_INIT_CDROM ) ) SDL_InitSubSystem( SDL_INIT_CDROM ); +} + +/* --------------------------------------------------------------------------- */ + +void __bgdexport( mod_cd, module_finalize )() +{ + if ( SDL_WasInit( SDL_INIT_CDROM ) ) SDL_QuitSubSystem( SDL_INIT_CDROM ); +} + +/* --------------------------------------------------------------------------- */ +/* exports */ +/* --------------------------------------------------------------------------- */ + +#include "mod_cd_exports.h" + +/* --------------------------------------------------------------------------- */ -- cgit v1.2.3