static int MIDI_open(Sound_Sample *sample, const char *ext)
{
Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque;
SDL_RWops *rw = internal->rw;
SDL_AudioSpec spec;
MidiSong *song;
spec.channels = 2;
spec.format = AUDIO_S16SYS;
spec.freq = 44100;
spec.samples = 4096;
song = Timidity_LoadSong(rw, &spec);
BAIL_IF_MACRO(song == NULL, "MIDI: Not a MIDI file.", 0);
Timidity_SetVolume(song, 100);
Timidity_Start(song);
SNDDBG(("MIDI: Accepting data stream.\n"));
internal->decoder_private = (void *) song;
sample->actual.channels = 2;
sample->actual.rate = 44100;
sample->actual.format = AUDIO_S16SYS;
sample->flags = SOUND_SAMPLEFLAG_CANSEEK;
return(1); /* we'll handle this data. */
} /* MIDI_open */
void *TIMIDITY_CreateFromRW(SDL_RWops *src, int freesrc)
{
TIMIDITY_Music *music;
SDL_AudioSpec spec;
SDL_bool need_stream = SDL_FALSE;
music = (TIMIDITY_Music *)SDL_calloc(1, sizeof(*music));
if (!music) {
SDL_OutOfMemory();
return NULL;
}
SDL_memcpy(&spec, &music_spec, sizeof(spec));
if (spec.channels > 2) {
need_stream = SDL_TRUE;
spec.channels = 2;
}
music->song = Timidity_LoadSong(src, &spec);
if (!music->song) {
TIMIDITY_Delete(music);
return NULL;
}
if (need_stream) {
music->stream = SDL_NewAudioStream(spec.format, spec.channels, spec.freq,
music_spec.format, music_spec.channels, music_spec.freq);
if (!music->stream) {
TIMIDITY_Delete(music);
return NULL;
}
music->buffer_size = spec.samples * (SDL_AUDIO_BITSIZE(spec.format) / 8) * spec.channels;
music->buffer = SDL_malloc(music->buffer_size);
if (!music->buffer) {
SDL_OutOfMemory();
TIMIDITY_Delete(music);
return NULL;
}
}
if (freesrc) {
SDL_RWclose(src);
}
return music;
}
int main(int argc, char *argv[])
{
SDL_AudioSpec audio;
SDL_RWops *rw;
if (SDL_Init(SDL_INIT_AUDIO) < 0)
{
fprintf(stderr, "Couldn't initialize SDL: %s\n", SDL_GetError());
return 1;
}
atexit(SDL_Quit);
if (argc != 2)
{
fprintf(stderr, "Usage: %s midifile\n", argv[0]);
return 1;
}
audio.freq = 44100;
audio.format = AUDIO_S16SYS;
audio.channels = 2;
audio.samples = 4096;
audio.callback = audio_callback;
if (SDL_OpenAudio(&audio, NULL) < 0)
{
fprintf(stderr, "Couldn't open audio device. %s\n", SDL_GetError());
return 1;
}
if (Timidity_Init() < 0)
{
fprintf(stderr, "Could not initialise TiMidity.\n");
return 1;
}
rw = SDL_RWFromFile(argv[1], "rb");
if (rw == NULL)
{
fprintf(stderr, "Could not create RWops from MIDI file.\n");
return 1;
}
song = Timidity_LoadSong(rw, &audio);
SDL_RWclose(rw);
if (song == NULL)
{
fprintf(stderr, "Could not open MIDI file.\n");
return 1;
}
Timidity_SetVolume(song, 100);
Timidity_Start(song);
SDL_PauseAudio(0);
while (!done_flag)
{
SDL_Delay(10);
}
SDL_PauseAudio(1);
Timidity_FreeSong(song);
Timidity_Exit();
return 0;
}
/* 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
/* 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
bool CTimidityCodec::Init(const std::string& filename, unsigned int filecache,
int& channels, int& samplerate,
int& bitspersample, int64_t& totaltime,
int& bitrate, AEDataFormat& format,
std::vector<AEChannel>& channellist)
{
if (m_soundfont.empty())
return false;
if (!LoadDll(m_usedLibName)) return false;
if (!REGISTER_DLL_SYMBOL(Timidity_Init)) return false;
if (!REGISTER_DLL_SYMBOL(Timidity_Cleanup)) return false;
if (!REGISTER_DLL_SYMBOL(Timidity_GetLength)) return false;
if (!REGISTER_DLL_SYMBOL(Timidity_LoadSong)) return false;
if (!REGISTER_DLL_SYMBOL(Timidity_FreeSong)) return false;
if (!REGISTER_DLL_SYMBOL(Timidity_FillBuffer)) return false;
if (!REGISTER_DLL_SYMBOL(Timidity_Seek)) return false;
if (!REGISTER_DLL_SYMBOL(Timidity_ErrorMsg)) return false;
int res;
if (m_soundfont.find(".sf2") != std::string::npos)
res = Timidity_Init(48000, 16, 2, m_soundfont.c_str(), nullptr); // real soundfont
else
res = Timidity_Init(48000, 16, 2, nullptr, m_soundfont.c_str()); // config file
if (res != 0)
return false;
kodi::vfs::CFile file;
if (!file.OpenFile(filename))
return false;
int len = file.GetLength();
uint8_t* data = new uint8_t[len];
if (!data)
return false;
file.Read(data, len);
const char* tempfile = tmpnam(nullptr);
FILE* f = fopen(tempfile,"wb");
if (!f)
{
delete[] data;
return false;
}
fwrite(data, 1, len, f);
fclose(f);
delete[] data;
m_song = Timidity_LoadSong((char*)tempfile);
unlink(tempfile);
if (!m_song)
return false;
m_pos = 0;
channels = 2;
samplerate = 48000;
bitspersample = 16;
totaltime = Timidity_GetLength(m_song);
format = AE_FMT_S16NE;
channellist = { AE_CH_FL, AE_CH_FR };
bitrate = 0;
return true;
}
