diff options
Diffstat (limited to 'src/audio.c')
| -rw-r--r-- | src/audio.c | 834 |
1 files changed, 146 insertions, 688 deletions
diff --git a/src/audio.c b/src/audio.c index 3ba9cb0..935bf1f 100644 --- a/src/audio.c +++ b/src/audio.c @@ -3,147 +3,21 @@ #include "audio.h" #include "lua_core.h" -static bool validSound( size_t id ) { - if ( id < 0 || state->soundCount < id || state->sounds[ id ] == NULL ) { - TraceLog( state->logLevelInvalid, "%s %d", "Invalid sound", id ); - return false; - } - else { - return true; - } -} - -static bool validWave( size_t id ) { - if ( id < 0 || state->waveCount < id || state->waves[ id ] == NULL ) { - TraceLog( state->logLevelInvalid, "%s %d", "Invalid wave", id ); - return false; - } - else { - return true; - } -} - -static bool validMusic( size_t id ) { - if ( id < 0 || state->musicCount < id || state->musics[ id ] == NULL ) { - TraceLog( state->logLevelInvalid, "%s %d", "Invalid music", id ); - return false; - } - else { - return true; - } -} - -static void checkSoundRealloc( int i ) { - if ( i == state->soundCount ) { - state->soundCount++; - } - - if ( state->soundCount == state->soundAlloc ) { - state->soundAlloc += ALLOC_PAGE_SIZE; - state->sounds = realloc( state->sounds, state->soundAlloc * sizeof( Sound* ) ); - - for ( i = state->soundCount; i < state->soundAlloc; i++ ) { - state->sounds[i] = NULL; - } - } -} - -static void checkWaveRealloc( int i ) { - if ( i == state->waveCount ) { - state->waveCount++; - } - - if ( state->waveCount == state->waveAlloc ) { - state->waveAlloc += ALLOC_PAGE_SIZE; - state->waves = realloc( state->waves, state->waveAlloc * sizeof( Wave* ) ); - - for ( i = state->waveCount; i < state->waveAlloc; i++ ) { - state->waves[i] = NULL; - } - } -} - -static void checkMusicRealloc( int i ) { - if ( i == state->musicCount ) { - state->musicCount++; - } - - if ( state->musicCount == state->musicAlloc ) { - state->musicAlloc += ALLOC_PAGE_SIZE; - state->musics = realloc( state->musics, state->musicAlloc * sizeof( Music* ) ); - - for ( i = state->musicCount; i < state->musicAlloc; i++ ) { - state->musics[i] = NULL; - } - } -} - -static int newSound() { - int i = 0; - - for ( i = 0; i < state->soundCount; i++ ) { - if ( state->sounds[i] == NULL ) { - break; - } - } - state->sounds[i] = malloc( sizeof( Sound ) ); - checkSoundRealloc( i ); - - return i; -} - -static int newWave() { - int i = 0; - - for ( i = 0; i < state->waveCount; i++ ) { - if ( state->waves[i] == NULL ) { - break; - } - } - state->waves[i] = malloc( sizeof( Wave ) ); - checkWaveRealloc( i ); - - return i; -} - -static int newMusic() { - int i = 0; - - for ( i = 0; i < state->musicCount; i++ ) { - if ( state->musics[i] == NULL ) { - break; - } - } - state->musics[i] = malloc( sizeof( Music ) ); - checkMusicRealloc( i ); - - return i; -} - /* ## Audio - Audio device management */ /* -> success = RL.SetMasterVolume( float volume ) +> RL.SetMasterVolume( float volume ) -Set master volume ( listener ) - -- Failure return false -- Success return true +Set master volume (listener) */ int laudioSetMasterVolume( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.SetMasterVolume( float volume )" ); - lua_pushboolean( L, false ); - return 1; - } - float volume = lua_tonumber( L, 1 ); + float volume = luaL_checknumber( L, 1 ); SetMasterVolume( volume ); - lua_pushboolean( L, true ); - return 1; + return 0; } /* @@ -155,26 +29,19 @@ int laudioSetMasterVolume( lua_State *L ) { Load sound from file -- Failure return -1 -- Success return int +- Failure return nil +- Success return Sound */ int laudioLoadSound( lua_State *L ) { - if ( !lua_isstring( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.LoadSound( string fileName )" ); - lua_pushinteger( L, -1 ); - return 1; - } + if ( FileExists( luaL_checkstring( L, 1 ) ) ) { + uluaPushSound( L, LoadSound( lua_tostring( L, 1 ) ) ); - if ( FileExists( lua_tostring( L, 1 ) ) ) { - int i = newSound(); - *state->sounds[i] = LoadSound( lua_tostring( L, 1 ) ); - lua_pushinteger( L, i ); - return 1; - } - else { - lua_pushinteger( L, -1 ); return 1; } + TraceLog( state->logLevelInvalid, "Invalid file '%s'", lua_tostring( L, 1 ) ); + lua_pushnil( L ); + + return 1; } /* @@ -182,26 +49,19 @@ int laudioLoadSound( lua_State *L ) { Load wave data from file -- Failure return -1 -- Success return int +- Failure return nil +- Success return Wave */ int laudioLoadWave( lua_State *L ) { - if ( !lua_isstring( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.LoadWave( string fileName )" ); - lua_pushinteger( L, -1 ); - return 1; - } + if ( FileExists( luaL_checkstring( L, 1 ) ) ) { + uluaPushWave( L, LoadWave( lua_tostring( L, 1 ) ) ); - if ( FileExists( lua_tostring( L, 1 ) ) ) { - int i = newWave(); - *state->waves[i] = LoadWave( lua_tostring( L, 1 ) ); - lua_pushinteger( L, i ); - return 1; - } - else { - lua_pushinteger( L, -1 ); return 1; } + TraceLog( state->logLevelInvalid, "Invalid file '%s'", lua_tostring( L, 1 ) ); + lua_pushnil( L ); + + return 1; } /* @@ -209,78 +69,12 @@ int laudioLoadWave( lua_State *L ) { Load sound from wave data -- Failure return -1 -- Success return int +- Success return Sound */ int laudioLoadSoundFromWave( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.LoadSoundFromWave( Wave wave )" ); - lua_pushinteger( L, -1 ); - return 1; - } - size_t waveId = lua_tointeger( L, 1 ); + Wave *wave = luaL_checkudata( L, 1, "Wave" ); - if ( !validWave( waveId ) ) { - lua_pushinteger( L, -1 ); - return 1; - } - int i = newSound(); - *state->sounds[i] = LoadSoundFromWave( *state->waves[ waveId ] ); - lua_pushinteger( L, i ); - - return 1; -} - -/* -> success = RL.UnloadSound( Sound sound ) - -Unload sound - -- Failure return false -- Success return true -*/ -int laudioUnloadSound( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.UnloadSound( Sound sound )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t soundId = lua_tointeger( L, 1 ); - - if ( !validSound( soundId ) ) { - lua_pushboolean( L, false ); - return 1; - } - UnloadSound( *state->sounds[ soundId ] ); - state->sounds[ soundId ] = NULL; - lua_pushboolean( L, true ); - - return 1; -} - -/* -> success = RL.UnloadWave( Wave wave ) - -Unload wave data - -- Failure return false -- Success return true -*/ -int laudioUnloadWave( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.UnloadWave( Wave wave )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t waveId = lua_tointeger( L, 1 ); - - if ( !validWave( waveId ) ) { - lua_pushboolean( L, false ); - return 1; - } - UnloadWave( *state->waves[ waveId ] ); - state->waves[ waveId ] = NULL; - lua_pushboolean( L, true ); + uluaPushSound( L, LoadSoundFromWave( *wave ) ); return 1; } @@ -290,22 +84,12 @@ int laudioUnloadWave( lua_State *L ) { Export wave data to file, returns true on success -- Failure return false -- Success return true +- Success return bool */ int laudioExportWave( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) || !lua_isstring( L, 2 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.ExportWave( Wave wave, string fileName )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t waveId = lua_tointeger( L, 1 ); + Wave *wave = luaL_checkudata( L, 1, "Wave" ); - if ( !validWave( waveId ) ) { - lua_pushboolean( L, false ); - return 1; - } - lua_pushboolean( L, ExportWave( *state->waves[ waveId ], lua_tostring( L, 2 ) ) ); + lua_pushboolean( L, ExportWave( *wave, luaL_checkstring( L, 2 ) ) ); return 1; } @@ -315,22 +99,12 @@ int laudioExportWave( lua_State *L ) { Export wave sample data to code (.h), returns true on success -- Failure return false - Success return true */ int laudioExportWaveAsCode( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) || !lua_isstring( L, 2 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.ExportWaveAsCode( Wave wave, string fileName )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t waveId = lua_tointeger( L, 1 ); + Wave *wave = luaL_checkudata( L, 1, "Wave" ); - if ( !validWave( waveId ) ) { - lua_pushboolean( L, false ); - return 1; - } - lua_pushboolean( L, ExportWaveAsCode( *state->waves[ waveId ], lua_tostring( L, 2 ) ) ); + lua_pushboolean( L, ExportWaveAsCode( *wave, luaL_checkstring( L, 2 ) ) ); return 1; } @@ -340,107 +114,55 @@ int laudioExportWaveAsCode( lua_State *L ) { */ /* -> success = RL.PlaySound( Sound sound ) +> RL.PlaySound( Sound sound ) Play a sound - -- Failure return false -- Success return true */ int laudioPlaySound( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.PlaySound( Sound sound )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t soundId = lua_tointeger( L, 1 ); + Sound *sound = luaL_checkudata( L, 1, "Sound" ); - if ( !validSound( soundId ) ) { - lua_pushboolean( L, false ); - return 1; - } - PlaySound( *state->sounds[ soundId ] ); - lua_pushboolean( L, true ); + PlaySound( *sound ); - return 1; + return 0; } /* -> success = RL.StopSound( Sound sound ) +> RL.StopSound( Sound sound ) Stop playing a sound - -- Failure return false -- Success return true */ int laudioStopSound( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.StopSound( Sound sound )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t soundId = lua_tointeger( L, 1 ); + Sound *sound = luaL_checkudata( L, 1, "Sound" ); - if ( !validSound( soundId ) ) { - lua_pushboolean( L, false ); - return 1; - } - StopSound( *state->sounds[ soundId ] ); - lua_pushboolean( L, true ); + StopSound( *sound ); - return 1; + return 0; } /* -> success = RL.PauseSound( Sound sound ) +> RL.PauseSound( Sound sound ) Pause a sound - -- Failure return false -- Success return true */ int laudioPauseSound( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.PauseSound( Sound sound )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t soundId = lua_tointeger( L, 1 ); + Sound *sound = luaL_checkudata( L, 1, "Sound" ); - if ( !validSound( soundId ) ) { - lua_pushboolean( L, false ); - return 1; - } - PauseSound( *state->sounds[ soundId ] ); - lua_pushboolean( L, true ); + PauseSound( *sound ); - return 1; + return 0; } /* -> success = RL.ResumeSound( Sound sound ) +> RL.ResumeSound( Sound sound ) Resume a paused sound - -- Failure return false -- Success return true */ int laudioResumeSound( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.ResumeSound( Sound sound )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t soundId = lua_tointeger( L, 1 ); + Sound *sound = luaL_checkudata( L, 1, "Sound" ); - if ( !validSound( soundId ) ) { - lua_pushboolean( L, false ); - return 1; - } - ResumeSound( *state->sounds[ soundId ] ); - lua_pushboolean( L, true ); + ResumeSound( *sound ); - return 1; + return 0; } /* @@ -448,134 +170,72 @@ int laudioResumeSound( lua_State *L ) { Check if a sound is currently playing -- Failure return nil - Success return bool */ int laudioIsSoundPlaying( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.IsSoundPlaying( Sound sound )" ); - lua_pushnil( L ); - return 1; - } - size_t soundId = lua_tointeger( L, 1 ); + Sound *sound = luaL_checkudata( L, 1, "Sound" ); - if ( !validSound( soundId ) ) { - lua_pushnil( L ); - return 1; - } - lua_pushboolean( L, IsSoundPlaying( *state->sounds[ soundId ] ) ); + lua_pushboolean( L, IsSoundPlaying( *sound ) ); return 1; } /* -> success = RL.SetSoundVolume( Sound sound, float volume ) - -Set volume for a sound ( 1.0 is max level ) +> RL.SetSoundVolume( Sound sound, float volume ) -- Failure return false -- Success return true +Set volume for a sound (1.0 is max level) */ int laudioSetSoundVolume( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.SetSoundVolume( Sound sound, float volume )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t soundId = lua_tointeger( L, 1 ); - float volume = lua_tonumber( L, 2 ); + Sound *sound = luaL_checkudata( L, 1, "Sound" ); + float volume = luaL_checknumber( L, 2 ); - if ( !validSound( soundId ) ) { - lua_pushboolean( L, false ); - return 1; - } - SetSoundVolume( *state->sounds[ soundId ], volume ); - lua_pushboolean( L, true ); + SetSoundVolume( *sound, volume ); - return 1; + return 0; } /* -> success = RL.SetSoundPitch( Sound sound, float pitch ) +> RL.SetSoundPitch( Sound sound, float pitch ) -Set pitch for a sound ( 1.0 is base level ) - -- Failure return false -- Success return true +Set pitch for a sound (1.0 is base level) */ int laudioSetSoundPitch( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.SetSoundPitch( Sound sound, float pitch )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t soundId = lua_tointeger( L, 1 ); - float pitch = lua_tonumber( L, 2 ); + Sound *sound = luaL_checkudata( L, 1, "Sound" ); + float pitch = luaL_checknumber( L, 2 ); - if ( !validSound( soundId ) ) { - lua_pushboolean( L, false ); - return 1; - } - SetSoundPitch( *state->sounds[ soundId ], pitch ); - lua_pushboolean( L, true ); + SetSoundPitch( *sound, pitch ); - return 1; + return 0; } /* -> success = RL.SetSoundPan( Sound sound, float pan ) - -Set pan for a sound ( 0.5 is center ) +> RL.SetSoundPan( Sound sound, float pan ) -- Failure return false -- Success return true +Set pan for a sound (0.5 is center) */ int laudioSetSoundPan( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.SetSoundPan( Sound sound, float pitch )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t soundId = lua_tointeger( L, 1 ); - float pan = lua_tonumber( L, 2 ); + Sound *sound = luaL_checkudata( L, 1, "Sound" ); + float pan = luaL_checknumber( L, 2 ); - if ( !validSound( soundId ) ) { - lua_pushboolean( L, false ); - return 1; - } - SetSoundPan( *state->sounds[ soundId ], pan ); - lua_pushboolean( L, true ); + SetSoundPan( *sound, pan ); - return 1; + return 0; } /* -> success = RL.WaveFormat( Wave wave, int sampleRate, int sampleSize, int channels ) +> RL.WaveFormat( Wave wave, int sampleRate, int sampleSize, int channels ) Convert wave data to desired format - -- Failure return false -- Success return true */ int laudioWaveFormat( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_isnumber( L, 3 ) || !lua_isnumber( L, 4 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.WaveFormat( Wave wave, int sampleRate, int sampleSize, int channels )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t waveId = lua_tointeger( L, 1 ); - int sampleRate = lua_tointeger( L, 2 ); - int sampleSize = lua_tointeger( L, 3 ); - int channels = lua_tointeger( L, 4 ); + Wave *wave = luaL_checkudata( L, 1, "Wave" ); + int sampleRate = luaL_checkinteger( L, 2 ); + int sampleSize = luaL_checkinteger( L, 3 ); + int channels = luaL_checkinteger( L, 4 ); - if ( !validWave( waveId ) ) { - lua_pushboolean( L, false ); - return 1; - } - WaveFormat( state->waves[ waveId ], sampleRate, sampleSize, channels ); - lua_pushboolean( L, true ); + WaveFormat( wave, sampleRate, sampleSize, channels ); - return 1; + return 0; } /* @@ -583,54 +243,29 @@ int laudioWaveFormat( lua_State *L ) { Copy a wave to a new wave -- Failure return -1 -- Success return int +- Success return Wave */ int laudioWaveCopy( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.WaveCopy( Wave wave )" ); - lua_pushinteger( L, -1 ); - return 1; - } - size_t waveId = lua_tointeger( L, 1 ); + Wave *wave = luaL_checkudata( L, 1, "Wave" ); - if ( !validWave( waveId ) ) { - lua_pushinteger( L, -1 ); - return 1; - } - int i = newWave(); - *state->waves[i] = WaveCopy( *state->waves[ waveId ] ); - lua_pushinteger( L, i ); + uluaPushWave( L, WaveCopy( *wave ) ); return 1; } /* -> success = RL.WaveCrop( Wave wave, int initSample, int finalSample ) +> RL.WaveCrop( Wave wave, int initSample, int finalSample ) Crop a wave to defined samples range - -- Failure return false -- Success return true */ int laudioWaveCrop( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_isnumber( L, 3 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.WaveCrop( Wave wave, int initSample, int finalSample )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t waveId = lua_tointeger( L, 1 ); - int initSample = lua_tointeger( L, 2 ); - int finalSample = lua_tointeger( L, 3 ); + Wave *wave = luaL_checkudata( L, 1, "Wave" ); + int initSample = luaL_checkinteger( L, 2 ); + int finalSample = luaL_checkinteger( L, 3 ); - if ( !validWave( waveId ) ) { - lua_pushboolean( L, false ); - return 1; - } - WaveCrop( state->waves[ waveId ], initSample, finalSample ); - lua_pushboolean( L, true ); + WaveCrop( wave, initSample, finalSample ); - return 1; + return 0; } /* @@ -642,51 +277,31 @@ int laudioWaveCrop( lua_State *L ) { Load music stream from file -- Failure return -1 -- Success return int +- Success return Music */ int laudioLoadMusicStream( lua_State *L ) { - if ( !lua_isstring( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.LoadMusicStream( string fileName )" ); - lua_pushinteger( L, -1 ); - return 1; - } - if ( !FileExists( lua_tostring( L, 1 ) ) ) { - lua_pushinteger( L, -1 ); + if ( FileExists( luaL_checkstring( L, 1 ) ) ) { + uluaPushMusic( L, LoadMusicStream( lua_tostring( L, 1 ) ) ); + return 1; } - int i = newMusic(); - *state->musics[i] = LoadMusicStream( lua_tostring( L, 1 ) ); - state->musics[i]->looping = true; - lua_pushinteger( L, i ); + TraceLog( state->logLevelInvalid, "Invalid file '%s'", lua_tostring( L, 1 ) ); + lua_pushnil( L ); return 1; } /* -> success = RL.PlayMusicStream( Music music ) +> RL.PlayMusicStream( Music music ) Start music playing - -- Failure return false -- Success return true */ int laudioPlayMusicStream( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.PlayMusicStream( Music music )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); + Music *music = luaL_checkudata( L, 1, "Music" ); - if ( !validMusic( musicId ) ) { - lua_pushboolean( L, false ); - return 1; - } - PlayMusicStream( *state->musics[ musicId ] ); - lua_pushboolean( L, true ); + PlayMusicStream( *music ); - return 1; + return 0; } /* @@ -694,263 +309,136 @@ int laudioPlayMusicStream( lua_State *L ) { Check if music is playing -- Failure return nil - Success return bool */ int laudioIsMusicStreamPlaying( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.IsMusicStreamPlaying( Music music )" ); - lua_pushnil( L ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); + Music *music = luaL_checkudata( L, 1, "Music" ); - if ( !validMusic( musicId ) ) { - lua_pushnil( L ); - return 1; - } - lua_pushboolean( L, IsMusicStreamPlaying( *state->musics[ musicId ] ) ); + lua_pushboolean( L, IsMusicStreamPlaying( *music ) ); return 1; } /* -> success = RL.UpdateMusicStream( Music music ) +> RL.UpdateMusicStream( Music music ) Updates buffers for music streaming - -- Failure return false -- Success return true */ int laudioUpdateMusicStream( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.UpdateMusicStream( Music music )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); + Music *music = luaL_checkudata( L, 1, "Music" ); - if ( !validMusic( musicId ) ) { - lua_pushboolean( L, false ); - return 1; - } - UpdateMusicStream( *state->musics[ musicId ] ); - lua_pushboolean( L, true ); + UpdateMusicStream( *music ); - return 1; + return 0; } /* -> success = RL.StopMusicStream( Music music ) +> RL.StopMusicStream( Music music ) Stop music playing - -- Failure return false -- Success return true */ int laudioStopMusicStream( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.StopMusicStream( Music music )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); + Music *music = luaL_checkudata( L, 1, "Music" ); - if ( !validMusic( musicId ) ) { - lua_pushboolean( L, false ); - return 1; - } - StopMusicStream( *state->musics[ musicId ] ); - lua_pushboolean( L, true ); + StopMusicStream( *music ); - return 1; + return 0; } /* -> success = RL.PauseMusicStream( Music music ) +> RL.PauseMusicStream( Music music ) Pause music playing - -- Failure return false -- Success return true */ int laudioPauseMusicStream( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.PauseMusicStream( Music music )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); + Music *music = luaL_checkudata( L, 1, "Music" ); - if ( !validMusic( musicId ) ) { - lua_pushboolean( L, false ); - return 1; - } - PauseMusicStream( *state->musics[ musicId ] ); - lua_pushboolean( L, true ); + PauseMusicStream( *music ); - return 1; + return 0; } /* -> success = RL.ResumeMusicStream( Music music ) +> RL.ResumeMusicStream( Music music ) Resume playing paused music - -- Failure return false -- Success return true */ int laudioResumeMusicStream( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.ResumeMusicStream( Music music )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); + Music *music = luaL_checkudata( L, 1, "Music" ); - if ( !validMusic( musicId ) ) { - lua_pushboolean( L, false ); - return 1; - } - ResumeMusicStream( *state->musics[ musicId ] ); - lua_pushboolean( L, true ); + ResumeMusicStream( *music ); - return 1; + return 0; } /* -> success = RL.SeekMusicStream( Music music, float position ) - -Seek music to a position ( in seconds ) +> RL.SeekMusicStream( Music music, float position ) -- Failure return false -- Success return true +Seek music to a position (in seconds) */ int laudioSeekMusicStream( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.SeekMusicStream( Music music, float position )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); - float position = lua_tonumber( L, 2 ); + Music *music = luaL_checkudata( L, 1, "Music" ); + float position = luaL_checknumber( L, 2 ); - if ( !validMusic( musicId ) ) { - lua_pushboolean( L, false ); - return 1; - } - SeekMusicStream( *state->musics[ musicId ], position ); - lua_pushboolean( L, true ); + SeekMusicStream( *music, position ); - return 1; + return 0; } /* -> success = RL.SetMusicVolume( Music music, float volume ) +> RL.SetMusicVolume( Music music, float volume ) -Set volume for music ( 1.0 is max level ) - -- Failure return false -- Success return true +Set volume for music (1.0 is max level) */ int laudioSetMusicVolume( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.SetMusicVolume( Music music, float volume )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); - float volume = lua_tonumber( L, 2 ); + Music *music = luaL_checkudata( L, 1, "Music" ); + float volume = luaL_checknumber( L, 2 ); - if ( !validMusic( musicId ) ) { - lua_pushboolean( L, false ); - return 1; - } - SetMusicVolume( *state->musics[ musicId ], volume ); - lua_pushboolean( L, true ); + SetMusicVolume( *music, volume ); - return 1; + return 0; } /* -> success = RL.SetMusicPitch( Music music, float pitch ) - -Set pitch for a music ( 1.0 is base level ) +> RL.SetMusicPitch( Music music, float pitch ) -- Failure return false -- Success return true +Set pitch for a music (1.0 is base level) */ int laudioSetMusicPitch( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.SetMusicPitch( Music music, float pitch )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); - float pitch = lua_tonumber( L, 2 ); + Music *music = luaL_checkudata( L, 1, "Music" ); + float pitch = luaL_checknumber( L, 2 ); - if ( !validMusic( musicId ) ) { - lua_pushboolean( L, false ); - return 1; - } - SetMusicPitch( *state->musics[ musicId ], pitch ); - lua_pushboolean( L, true ); + SetMusicPitch( *music, pitch ); - return 1; + return 0; } /* -> success = RL.SetMusicPan( Music music, float pan ) - -Set pan for a music ( 0.5 is center ) +> RL.SetMusicPan( Music music, float pan ) -- Failure return false -- Success return true +Set pan for a music (0.5 is center) */ int laudioSetMusicPan( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.SetMusicPan( Music music, float pan )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); - float pan = lua_tonumber( L, 2 ); + Music *music = luaL_checkudata( L, 1, "Music" ); + float pan = luaL_checknumber( L, 2 ); - if ( !validMusic( musicId ) ) { - lua_pushboolean( L, false ); - return 1; - } - SetMusicPitch( *state->musics[ musicId ], pan ); - lua_pushboolean( L, true ); + SetMusicPitch( *music, pan ); - return 1; + return 0; } /* -> success = RL.SetMusicLooping( Music music, bool looping ) +> RL.SetMusicLooping( Music music, bool looping ) Set looping for a music - -- Failure return false -- Success return true */ int laudioSetMusicLooping( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) || !lua_isboolean( L, 2 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.SetMusicLooping( Music music, bool looping )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); - bool looping = lua_toboolean( L, 2 ); + Music *music = luaL_checkudata( L, 1, "Music" ); + bool looping = uluaGetBoolean( L, 2 ); - if ( !validMusic( musicId ) ) { - lua_pushboolean( L, false ); - return 1; - } - state->musics[ musicId ]->looping = looping; - lua_pushboolean( L, true ); + music->looping = looping; - return 1; + return 0; } /* @@ -958,22 +446,12 @@ int laudioSetMusicLooping( lua_State *L ) { Get looping of a music -- Failure return nil - Success return bool */ int laudioGetMusicLooping( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.GetMusicLooping( Music music )" ); - lua_pushnil( L ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); + Music *music = luaL_checkudata( L, 1, "Music" ); - if ( !validMusic( musicId ) ) { - lua_pushnil( L ); - return 1; - } - lua_pushboolean( L, state->musics[ musicId ]->looping ); + lua_pushboolean( L, music->looping ); return 1; } @@ -981,49 +459,29 @@ int laudioGetMusicLooping( lua_State *L ) { /* > length = RL.GetMusicTimeLength( Music music ) -Get music time length ( in seconds ) +Get music time length (in seconds) -- Failure return false - Success return float */ int laudioGetMusicTimeLength( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.GetMusicTimeLength( Music music )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); + Music *music = luaL_checkudata( L, 1, "Music" ); - if ( !validMusic( musicId ) ) { - lua_pushboolean( L, false ); - return 1; - } - lua_pushnumber( L, GetMusicTimeLength( *state->musics[ musicId ] ) ); + lua_pushnumber( L, GetMusicTimeLength( *music ) ); return 1; } /* -> played = RL.GetMusicTimePlayed( Music music ) +> timePlayed = RL.GetMusicTimePlayed( Music music ) -Get current music time played ( in seconds ) +Get current music time played (in seconds) -- Failure return false - Success return float */ int laudioGetMusicTimePlayed( lua_State *L ) { - if ( !lua_isnumber( L, 1 ) ) { - TraceLog( state->logLevelInvalid, "%s", "Bad call of function. RL.GetMusicTimePlayed( Music music )" ); - lua_pushboolean( L, false ); - return 1; - } - size_t musicId = lua_tointeger( L, 1 ); + Music *music = luaL_checkudata( L, 1, "Music" ); - if ( !validMusic( musicId ) ) { - lua_pushboolean( L, false ); - return 1; - } - lua_pushnumber( L, GetMusicTimePlayed( *state->musics[ musicId ] ) ); + lua_pushnumber( L, GetMusicTimePlayed( *music ) ); return 1; } |