/* Load a music file */
Mix_Music *Mix_LoadMUS(const char *file)
{
FILE *fp;
char *ext;
Uint8 magic[5], moremagic[9];
Mix_Music *music;
/* Figure out what kind of file this is */
fp = fopen(file, "rb");
if ( (fp == NULL) || !fread(magic, 4, 1, fp) ) {
if ( fp != NULL ) {
fclose(fp);
}
Mix_SetError("Couldn't read from '%s'", file);
return(NULL);
}
if (!fread(moremagic, 8, 1, fp)) {
Mix_SetError("Couldn't read from '%s'", file);
return(NULL);
}
magic[4] = '\0';
moremagic[8] = '\0';
fclose(fp);
/* Figure out the file extension, so we can determine the type */
ext = strrchr(file, '.');
if ( ext ) ++ext; /* skip the dot in the extension */
/* Allocate memory for the music structure */
music = (Mix_Music *)malloc(sizeof(Mix_Music));
if ( music == NULL ) {
Mix_SetError("Out of memory");
return(NULL);
}
music->error = 0;
#ifdef CMD_MUSIC
if ( music_cmd ) {
music->type = MUS_CMD;
music->data.cmd = MusicCMD_LoadSong(music_cmd, file);
if ( music->data.cmd == NULL ) {
music->error = 1;
}
} else
#endif
#ifdef WAV_MUSIC
/* WAVE files have the magic four bytes "RIFF"
AIFF files have the magic 12 bytes "FORM" XXXX "AIFF"
*/
if ( (ext && MIX_string_equals(ext, "WAV")) ||
((strcmp((char *)magic, "RIFF") == 0) && (strcmp((char *)(moremagic+4), "WAVE") == 0)) ||
(strcmp((char *)magic, "FORM") == 0) ) {
music->type = MUS_WAV;
music->data.wave = WAVStream_LoadSong(file, (char *)magic);
if ( music->data.wave == NULL ) {
//Mix_SetError("Unable to load WAV file");
music->error = 1;
}
} else
#endif
#ifdef MID_MUSIC
/* MIDI files have the magic four bytes "MThd" */
if ( (ext && MIX_string_equals(ext, "MID")) ||
(ext && MIX_string_equals(ext, "MIDI")) ||
strcmp((char *)magic, "MThd") == 0 ||
( strcmp((char *)magic, "RIFF") == 0 &&
strcmp((char *)(moremagic+4), "RMID") == 0 ) ) {
music->type = MUS_MID;
#ifdef USE_NATIVE_MIDI
if ( native_midi_ok ) {
music->data.nativemidi = native_midi_loadsong(file);
if ( music->data.nativemidi == NULL ) {
Mix_SetError("%s", native_midi_error());
music->error = 1;
}
} MIDI_ELSE
#endif
#ifdef USE_TIMIDITY_MIDI
if ( timidity_ok ) {
music->data.midi = Timidity_LoadSong(file);
if ( music->data.midi == NULL ) {
Mix_SetError("%s", Timidity_Error());
music->error = 1;
}
} else {
Mix_SetError("%s", Timidity_Error());
music->error = 1;
}
#endif
} else
Mix_Music *Mix_LoadMUSType_RW(SDL_RWops *rw, Mix_MusicType type, int freesrc)
{
Mix_Music *music;
if (!rw) {
Mix_SetError("RWops pointer is NULL");
return NULL;
}
/* If the caller wants auto-detection, figure out what kind of file
* this is. */
if (type == MUS_NONE) {
if ((type = detect_music_type(rw)) == MUS_NONE) {
/* Don't call Mix_SetError() here since detect_music_type()
* does that. */
return NULL;
}
}
/* Allocate memory for the music structure */
music = (Mix_Music *)SDL_malloc(sizeof(Mix_Music));
if (music == NULL ) {
Mix_SetError("Out of memory");
return NULL;
}
music->error = 0;
switch (type) {
#ifdef WAV_MUSIC
case MUS_WAV:
/* The WAVE loader needs the first 4 bytes of the header */
{
Uint8 magic[5];
int start = SDL_RWtell(rw);
if (SDL_RWread(rw, magic, 1, 4) != 4) {
Mix_SetError("Couldn't read from RWops");
return MUS_NONE;
}
SDL_RWseek(rw, start, RW_SEEK_SET);
magic[4] = '\0';
music->type = MUS_WAV;
music->data.wave = WAVStream_LoadSong_RW(rw, (char *)magic, freesrc);
}
if (music->data.wave == NULL) {
music->error = 1;
}
break;
#endif
#ifdef OGG_MUSIC
case MUS_OGG:
music->type = MUS_OGG;
music->data.ogg = OGG_new_RW(rw, freesrc);
if ( music->data.ogg == NULL ) {
music->error = 1;
}
break;
#endif
#ifdef FLAC_MUSIC
case MUS_FLAC:
music->type = MUS_FLAC;
music->data.flac = FLAC_new_RW(rw, freesrc);
if ( music->data.flac == NULL ) {
music->error = 1;
}
break;
#endif
#ifdef MP3_MUSIC
case MUS_MP3:
if ( Mix_Init(MIX_INIT_MP3) ) {
SMPEG_Info info;
music->type = MUS_MP3;
music->data.mp3 = smpeg.SMPEG_new_rwops(rw, &info, 0);
if ( !info.has_audio ) {
Mix_SetError("MPEG file does not have any audio stream.");
music->error = 1;
} else {
smpeg.SMPEG_actualSpec(music->data.mp3, &used_mixer);
}
} else {
music->error = 1;
}
break;
#elif defined(MP3_MAD_MUSIC)
case MUS_MP3:
music->type = MUS_MP3_MAD;
music->data.mp3_mad = mad_openFileRW(rw, &used_mixer, freesrc);
if (music->data.mp3_mad == 0) {
Mix_SetError("Could not initialize MPEG stream.");
music->error = 1;
}
break;
#endif
#ifdef MID_MUSIC
case MUS_MID:
music->type = MUS_MID;
#ifdef USE_NATIVE_MIDI
if ( native_midi_ok ) {
music->data.nativemidi = native_midi_loadsong_RW(rw, freesrc);
if ( music->data.nativemidi == NULL ) {
Mix_SetError("%s", native_midi_error());
music->error = 1;
}
break;
}
#endif
#ifdef USE_FLUIDSYNTH_MIDI
if ( fluidsynth_ok ) {
music->data.fluidsynthmidi = fluidsynth_loadsong_RW(rw, freesrc);
if ( music->data.fluidsynthmidi == NULL ) {
music->error = 1;
}
break;
}
#endif
#ifdef USE_TIMIDITY_MIDI
if ( timidity_ok ) {
music->data.midi = Timidity_LoadSong_RW(rw, freesrc);
if ( music->data.midi == NULL ) {
Mix_SetError("%s", Timidity_Error());
music->error = 1;
}
} else {
Mix_SetError("%s", Timidity_Error());
music->error = 1;
}
#endif
break;
#endif
#if defined(MODPLUG_MUSIC) || defined(MOD_MUSIC)
case MUS_MOD:
music->error = 1;
#ifdef MODPLUG_MUSIC
if ( music->error ) {
music->type = MUS_MODPLUG;
music->data.modplug = modplug_new_RW(rw, freesrc);
if ( music->data.modplug ) {
music->error = 0;
}
}
#endif
#ifdef MOD_MUSIC
if ( music->error ) {
music->type = MUS_MOD;
music->data.module = MOD_new_RW(rw, freesrc);
if ( music->data.module ) {
music->error = 0;
}
}
#endif
break;
#endif
default:
Mix_SetError("Unrecognized music format");
music->error=1;
} /* switch (want) */
if (music->error) {
SDL_free(music);
music=NULL;
}
return(music);
}
/* Initialize the music players with a certain desired audio format */
int open_music(SDL_AudioSpec *mixer)
{
int music_error;
music_error = 0;
#ifdef WAV_MUSIC
if ( WAVStream_Init(mixer) < 0 ) {
++music_error;
}
#endif
#ifdef MOD_MUSIC
/* Set the MikMod music format */
music_swap8 = 0;
music_swap16 = 0;
switch (mixer->format) {
case AUDIO_U8:
case AUDIO_S8: {
if ( mixer->format == AUDIO_S8 ) {
music_swap8 = 1;
}
md_mode = 0;
}
break;
case AUDIO_S16LSB:
case AUDIO_S16MSB: {
/* See if we need to correct MikMod mixing */
#if SDL_BYTEORDER == SDL_LIL_ENDIAN
if ( mixer->format == AUDIO_S16MSB ) {
#else
if ( mixer->format == AUDIO_S16LSB ) {
#endif
music_swap16 = 1;
}
md_mode = DMODE_16BITS;
}
break;
default: {
Mix_SetError("Unknown hardware audio format");
++music_error;
}
}
if ( mixer->channels > 1 ) {
if ( mixer->channels > 2 ) {
Mix_SetError("Hardware uses more channels than mixer");
++music_error;
}
md_mode |= DMODE_STEREO;
}
md_mixfreq = mixer->freq;
md_device = 0;
md_volume = 96;
md_musicvolume = 128;
md_sndfxvolume = 128;
md_pansep = 128;
md_reverb = 0;
MikMod_RegisterAllLoaders();
MikMod_RegisterAllDrivers();
if ( MikMod_Init() ) {
Mix_SetError("%s", MikMod_strerror(MikMod_errno));
++music_error;
}
#endif
#ifdef MID_MUSIC
#ifdef USE_TIMIDITY_MIDI
samplesize = mixer->size / mixer->samples;
if ( Timidity_Init(mixer->freq, mixer->format,
mixer->channels, mixer->samples) == 0 ) {
timidity_ok = 1;
} else {
timidity_ok = 0;
}
#endif
#ifdef USE_NATIVE_MIDI
#ifdef USE_TIMIDITY_MIDI
native_midi_ok = !timidity_ok;
if ( native_midi_ok )
#endif
native_midi_ok = native_midi_detect();
#endif
#endif
#ifdef OGG_MUSIC
if ( OGG_init(mixer) < 0 ) {
++music_error;
}
#endif
#ifdef MP3_MUSIC
/* Keep a copy of the mixer */
used_mixer = *mixer;
#endif
music_playing = NULL;
music_stopped = 0;
if ( music_error ) {
return(-1);
}
Mix_VolumeMusic(SDL_MIX_MAXVOLUME);
/* Calculate the number of ms for each callback */
ms_per_step = (int) (((float)mixer->samples * 1000.0) / mixer->freq);
return(0);
}
/* Portable case-insensitive string compare function */
int MIX_string_equals(const char *str1, const char *str2)
{
while ( *str1 && *str2 ) {
if ( toupper((unsigned char)*str1) !=
toupper((unsigned char)*str2) )
break;
++str1;
++str2;
}
return (!*str1 && !*str2);
}
/* Load a music file */
Mix_Music *Mix_LoadMUS(const char *file)
{
char *ext;
Uint8 magic[5];
Mix_Music *music;
SDL_RWops *src; //maks
/* Figure out what kind of file this is */
/*fp = fopen(file, "rb"); //maks
if ( (fp == NULL) || !fread(magic, 4, 1, fp) ) {
if ( fp != NULL ) {
fclose(fp);
}
Mix_SetError("Couldn't read from '%s'", file);
return(NULL);
}
magic[4] = '\0';
fclose(fp);*/
src = SDL_RWFromFile(file, "rb"); //maks
if ( (src == NULL) || !SDL_RWread(src, magic, 4, 1) ) {
if ( src != NULL ) {
SDL_RWclose(src);
}
Mix_SetError("Couldn't read from '%s'", file);
return(NULL);
}
magic[4] = '\0';
SDL_RWclose(src);
/* Figure out the file extension, so we can determine the type */
ext = strrchr(file, '.');
if ( ext ) ++ext; /* skip the dot in the extension */
/* Allocate memory for the music structure */
music = (Mix_Music *)malloc(sizeof(Mix_Music));
if ( music == NULL ) {
Mix_SetError("Out of memory");
return(NULL);
}
music->error = 0;
#ifdef CMD_MUSIC
if ( music_cmd ) {
music->type = MUS_CMD;
music->data.cmd = MusicCMD_LoadSong(music_cmd, file);
if ( music->data.cmd == NULL ) {
music->error = 1;
}
} else
#endif
#ifdef WAV_MUSIC
/* WAVE files have the magic four bytes "RIFF"
AIFF files have the magic 12 bytes "FORM" XXXX "AIFF"
*/
if ( (ext && MIX_string_equals(ext, "WAV")) ||
(strcmp((char *)magic, "RIFF") == 0) ||
(strcmp((char *)magic, "FORM") == 0) ) {
music->type = MUS_WAV;
music->data.wave = WAVStream_LoadSong(file, (char *)magic);
if ( music->data.wave == NULL ) {
Mix_SetError("Unable to load WAV file");
music->error = 1;
}
} else
#endif
#ifndef _WIN32_WCE
#ifdef MID_MUSIC
/* MIDI files have the magic four bytes "MThd" */
if ( (ext && MIX_string_equals(ext, "MID")) ||
(ext && MIX_string_equals(ext, "MIDI")) ||
strcmp((char *)magic, "MThd") == 0 ) {
music->type = MUS_MID;
#ifdef USE_NATIVE_MIDI
if ( native_midi_ok ) {
music->data.nativemidi = native_midi_loadsong((char *)file);
if ( music->data.nativemidi == NULL ) {
Mix_SetError("%s", native_midi_error());
music->error = 1;
}
} MIDI_ELSE
#endif
#ifdef USE_TIMIDITY_MIDI
if ( timidity_ok ) {
music->data.midi = Timidity_LoadSong((char *)file);
if ( music->data.midi == NULL ) {
Mix_SetError("%s", Timidity_Error());
music->error = 1;
}
} else {
Mix_SetError("%s", Timidity_Error());
music->error = 1;
}
#endif
} else
Mix_Music *Mix_LoadMUSType_RW(SDL_RWops *src, Mix_MusicType type, int freesrc)
{
Mix_Music *music;
Sint64 start;
if (!src) {
Mix_SetError("RWops pointer is NULL");
return NULL;
}
start = SDL_RWtell(src);
/* If the caller wants auto-detection, figure out what kind of file
* this is. */
if (type == MUS_NONE) {
if ((type = detect_music_type(src)) == MUS_NONE) {
/* Don't call Mix_SetError() here since detect_music_type()
* does that. */
if (freesrc) {
SDL_RWclose(src);
}
return NULL;
}
}
/* Allocate memory for the music structure */
music = (Mix_Music *)SDL_malloc(sizeof(Mix_Music));
if (music == NULL ) {
Mix_SetError("Out of memory");
if (freesrc) {
SDL_RWclose(src);
}
return NULL;
}
music->error = 1;
switch (type) {
#ifdef WAV_MUSIC
case MUS_WAV:
music->type = MUS_WAV;
music->data.wave = WAVStream_LoadSong_RW(src, freesrc);
if (music->data.wave) {
music->error = 0;
}
break;
#endif
#ifdef OGG_MUSIC
case MUS_OGG:
music->type = MUS_OGG;
music->data.ogg = OGG_new_RW(src, freesrc);
if (music->data.ogg) {
music->error = 0;
}
break;
#endif
#ifdef FLAC_MUSIC
case MUS_FLAC:
music->type = MUS_FLAC;
music->data.flac = FLAC_new_RW(src, freesrc);
if (music->data.flac) {
music->error = 0;
}
break;
#endif
#ifdef MP3_MUSIC
case MUS_MP3:
if (Mix_Init(MIX_INIT_MP3)) {
SMPEG_Info info;
music->type = MUS_MP3;
music->data.mp3 = smpeg.SMPEG_new_rwops(src, &info, freesrc, 0);
if (!info.has_audio) {
Mix_SetError("MPEG file does not have any audio stream.");
smpeg.SMPEG_delete(music->data.mp3);
/* Deleting the MP3 closed the source if desired */
freesrc = SDL_FALSE;
} else {
smpeg.SMPEG_actualSpec(music->data.mp3, &used_mixer);
music->error = 0;
}
}
break;
#elif defined(MP3_MAD_MUSIC)
case MUS_MP3:
music->type = MUS_MP3_MAD;
music->data.mp3_mad = mad_openFileRW(src, &used_mixer, freesrc);
if (music->data.mp3_mad) {
music->error = 0;
} else {
Mix_SetError("Could not initialize MPEG stream.");
}
break;
#endif
#ifdef MID_MUSIC
case MUS_MID:
music->type = MUS_MID;
#ifdef USE_NATIVE_MIDI
if (native_midi_ok) {
SDL_RWseek(src, start, RW_SEEK_SET);
music->data.nativemidi = native_midi_loadsong_RW(src, freesrc);
if (music->data.nativemidi) {
music->error = 0;
} else {
Mix_SetError("%s", native_midi_error());
}
break;
}
#endif
#ifdef USE_FLUIDSYNTH_MIDI
if (fluidsynth_ok) {
SDL_RWseek(src, start, RW_SEEK_SET);
music->data.fluidsynthmidi = fluidsynth_loadsong_RW(src, freesrc);
if (music->data.fluidsynthmidi) {
music->error = 0;
}
break;
}
#endif
#ifdef USE_TIMIDITY_MIDI
if (timidity_ok) {
SDL_RWseek(src, start, RW_SEEK_SET);
music->data.midi = Timidity_LoadSong_RW(src, freesrc);
if (music->data.midi) {
music->error = 0;
} else {
Mix_SetError("%s", Timidity_Error());
}
} else {
Mix_SetError("%s", Timidity_Error());
}
#endif
break;
#endif
#if defined(MODPLUG_MUSIC) || defined(MOD_MUSIC)
case MUS_MOD:
#ifdef MODPLUG_MUSIC
if (music->error) {
SDL_RWseek(src, start, RW_SEEK_SET);
music->type = MUS_MODPLUG;
music->data.modplug = modplug_new_RW(src, freesrc);
if (music->data.modplug) {
music->error = 0;
}
}
#endif
#ifdef MOD_MUSIC
if (music->error) {
SDL_RWseek(src, start, RW_SEEK_SET);
music->type = MUS_MOD;
music->data.module = MOD_new_RW(src, freesrc);
if (music->data.module) {
music->error = 0;
}
}
#endif
break;
#endif
default:
Mix_SetError("Unrecognized music format");
break;
} /* switch (want) */
if (music->error) {
SDL_free(music);
if (freesrc) {
SDL_RWclose(src);
} else {
SDL_RWseek(src, start, RW_SEEK_SET);
}
music = NULL;
}
return music;
}
