--- deliantra/Deliantra-Client/Client.xs 2007/07/28 00:45:28 1.211 +++ deliantra/Deliantra-Client/Client.xs 2007/07/29 03:58:26 1.212 @@ -27,6 +27,8 @@ #include #include +#define USE_RWOPS 1 // for SDL_mixer:LoadMUS_RW + #include #include #include @@ -114,6 +116,8 @@ #include "pango-fontmap.c" #include "pango-render.c" +typedef IV CFPlus__Channel; +typedef SDL_RWops *CFPlus__RW; typedef Mix_Chunk *CFPlus__MixChunk; typedef Mix_Music *CFPlus__MixMusic; @@ -863,7 +867,7 @@ SDL_Surface *surface, *surface2; SDL_PixelFormat fmt; SDL_RWops *rw = ix - ? SDL_RWFromFile (image, "r") + ? SDL_RWFromFile (image, "rb") : SDL_RWFromConstMem (image, image_len); if (!rw) @@ -2234,26 +2238,86 @@ } } -MODULE = CFPlus PACKAGE = CFPlus::MixChunk - -PROTOTYPES: DISABLE +MODULE = CFPlus PACKAGE = CFPlus::RW -CFPlus::MixChunk +CFPlus::RW new (SV *class, SV *data_sv) CODE: { STRLEN datalen; char *data = SvPVbyte (data_sv, datalen); - RETVAL = Mix_LoadWAV_RW (SDL_RWFromConstMem (data, datalen), 1); + RETVAL = SDL_RWFromConstMem (data, datalen); } OUTPUT: RETVAL +CFPlus::RW +new_from_file (SV *class, const char *path, const char *mode = "rb") + CODE: + RETVAL = SDL_RWFromFile (path, mode); + OUTPUT: + RETVAL + +void +close (CFPlus::RW self) + CODE: + SDL_RWclose (self); + +MODULE = CFPlus PACKAGE = CFPlus::Channel + +PROTOTYPES: DISABLE + +int +volume (CFPlus::Channel self, int volume) + CODE: + RETVAL = Mix_Volume (self, volume); + OUTPUT: + RETVAL + +int +unregister_all_effects (CFPlus::Channel self) + CODE: + RETVAL = Mix_UnregisterAllEffects (self); + OUTPUT: + RETVAL + +int +set_panning (CFPlus::Channel self, int left, int right) + CODE: + RETVAL = Mix_SetPanning (self, left, right); + OUTPUT: + RETVAL + +int +set_distance (CFPlus::Channel self, int distance) + CODE: + RETVAL = Mix_SetDistance (self, distance); + OUTPUT: + RETVAL + +int +set_position (CFPlus::Channel self, int angle, int distance) + CODE: + RETVAL = Mix_SetPosition (self, angle, distance); + OUTPUT: + RETVAL + +int +set_reverse_stereo (CFPlus::Channel self, int flip) + CODE: + RETVAL = Mix_SetReverseStereo (self, flip); + OUTPUT: + RETVAL + +MODULE = CFPlus PACKAGE = CFPlus::MixChunk + +PROTOTYPES: DISABLE + CFPlus::MixChunk -new_from_file (SV *class, char *path) +new (SV *class, CFPlus::RW rwops) CODE: - RETVAL = Mix_LoadWAV (path); + RETVAL = Mix_LoadWAV_RW (rwops, 1); OUTPUT: RETVAL @@ -2269,10 +2333,11 @@ OUTPUT: RETVAL -int +CFPlus::Channel play (CFPlus::MixChunk self, int channel = -1, int loops = 0, int ticks = -1) CODE: RETVAL = Mix_PlayChannelTimed (channel, self, loops, ticks); + Mix_UnregisterAllEffects (RETVAL); OUTPUT: RETVAL @@ -2293,10 +2358,15 @@ OUTPUT: RETVAL +void +halt () + CODE: + Mix_HaltMusic (); + CFPlus::MixMusic -new_from_file (SV *class, char *path) +new (SV *class, CFPlus::RW rwops) CODE: - RETVAL = Mix_LoadMUS (path); + RETVAL = Mix_LoadMUS_RW (rwops); OUTPUT: RETVAL