mirror of
https://github.com/ZDoom/gzdoom.git
synced 2024-11-29 15:22:08 +00:00
777 lines
25 KiB
C++
777 lines
25 KiB
C++
|
/*
|
||
|
* libOPNMIDI is a free MIDI to WAV conversion library with OPN2 (YM2612) emulation
|
||
|
*
|
||
|
* MIDI parser and player (Original code from ADLMIDI): Copyright (c) 2010-2014 Joel Yliluoma <bisqwit@iki.fi>
|
||
|
* OPNMIDI Library and YM2612 support: Copyright (c) 2017-2018 Vitaly Novichkov <admin@wohlnet.ru>
|
||
|
*
|
||
|
* Library is based on the ADLMIDI, a MIDI player for Linux and Windows with OPL3 emulation:
|
||
|
* http://iki.fi/bisqwit/source/adlmidi.html
|
||
|
*
|
||
|
* This program is free software: you can redistribute it and/or modify
|
||
|
* it under the terms of the GNU General Public License as published by
|
||
|
* the Free Software Foundation, either version 3 of the License, or
|
||
|
* any later version.
|
||
|
*
|
||
|
* This program is distributed in the hope that it will be useful,
|
||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
|
* GNU General Public License for more details.
|
||
|
*
|
||
|
* You should have received a copy of the GNU General Public License
|
||
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||
|
*/
|
||
|
|
||
|
#include "opnmidi_private.hpp"
|
||
|
|
||
|
#define MaxCards 100
|
||
|
#define MaxCards_STR "100"
|
||
|
|
||
|
static OPN2_Version opn2_version = {
|
||
|
OPNMIDI_VERSION_MAJOR,
|
||
|
OPNMIDI_VERSION_MINOR,
|
||
|
OPNMIDI_VERSION_PATCHLEVEL
|
||
|
};
|
||
|
|
||
|
/*---------------------------EXPORTS---------------------------*/
|
||
|
|
||
|
OPNMIDI_EXPORT struct OPN2_MIDIPlayer *opn2_init(long sample_rate)
|
||
|
{
|
||
|
OPN2_MIDIPlayer *midi_device;
|
||
|
midi_device = (OPN2_MIDIPlayer *)malloc(sizeof(OPN2_MIDIPlayer));
|
||
|
if(!midi_device)
|
||
|
{
|
||
|
OPN2MIDI_ErrorString = "Can't initialize OPNMIDI: out of memory!";
|
||
|
return NULL;
|
||
|
}
|
||
|
|
||
|
OPNMIDIplay *player = new OPNMIDIplay(static_cast<unsigned long>(sample_rate));
|
||
|
if(!player)
|
||
|
{
|
||
|
free(midi_device);
|
||
|
OPN2MIDI_ErrorString = "Can't initialize OPNMIDI: out of memory!";
|
||
|
return NULL;
|
||
|
}
|
||
|
midi_device->opn2_midiPlayer = player;
|
||
|
opn2RefreshNumCards(midi_device);
|
||
|
return midi_device;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT int opn2_setNumChips(OPN2_MIDIPlayer *device, int numCards)
|
||
|
{
|
||
|
if(device == NULL)
|
||
|
return -2;
|
||
|
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->m_setup.NumCards = static_cast<unsigned int>(numCards);
|
||
|
if(play->m_setup.NumCards < 1 || play->m_setup.NumCards > MaxCards)
|
||
|
{
|
||
|
play->setErrorString("number of chips may only be 1.." MaxCards_STR ".\n");
|
||
|
return -1;
|
||
|
}
|
||
|
|
||
|
play->opn.NumCards = play->m_setup.NumCards;
|
||
|
opn2_reset(device);
|
||
|
|
||
|
return opn2RefreshNumCards(device);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT int opn2_getNumChips(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(device == NULL)
|
||
|
return -2;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(play)
|
||
|
return (int)play->m_setup.NumCards;
|
||
|
return -2;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT int opn2_openBankFile(OPN2_MIDIPlayer *device, const char *filePath)
|
||
|
{
|
||
|
if(device && device->opn2_midiPlayer)
|
||
|
{
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->m_setup.tick_skip_samples_delay = 0;
|
||
|
if(!play->LoadBank(filePath))
|
||
|
{
|
||
|
std::string err = play->getErrorString();
|
||
|
if(err.empty())
|
||
|
play->setErrorString("OPN2 MIDI: Can't load file");
|
||
|
return -1;
|
||
|
}
|
||
|
else return opn2RefreshNumCards(device);
|
||
|
}
|
||
|
OPN2MIDI_ErrorString = "Can't load file: OPN2 MIDI is not initialized";
|
||
|
return -1;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT int opn2_openBankData(OPN2_MIDIPlayer *device, const void *mem, long size)
|
||
|
{
|
||
|
if(device && device->opn2_midiPlayer)
|
||
|
{
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->m_setup.tick_skip_samples_delay = 0;
|
||
|
if(!play->LoadBank(mem, static_cast<size_t>(size)))
|
||
|
{
|
||
|
std::string err = play->getErrorString();
|
||
|
if(err.empty())
|
||
|
play->setErrorString("OPN2 MIDI: Can't load data from memory");
|
||
|
return -1;
|
||
|
}
|
||
|
else return 0;
|
||
|
}
|
||
|
|
||
|
OPN2MIDI_ErrorString = "Can't load file: OPN2 MIDI is not initialized";
|
||
|
return -1;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_setScaleModulators(OPN2_MIDIPlayer *device, int smod)
|
||
|
{
|
||
|
if(!device) return;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->m_setup.ScaleModulators = smod;
|
||
|
play->opn.ScaleModulators = play->m_setup.ScaleModulators;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_setLoopEnabled(OPN2_MIDIPlayer *device, int loopEn)
|
||
|
{
|
||
|
if(!device) return;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->m_setup.loopingIsEnabled = (loopEn != 0);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_setLogarithmicVolumes(struct OPN2_MIDIPlayer *device, int logvol)
|
||
|
{
|
||
|
if(!device) return;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->m_setup.LogarithmicVolumes = static_cast<unsigned int>(logvol);
|
||
|
play->opn.LogarithmicVolumes = play->m_setup.LogarithmicVolumes;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_setVolumeRangeModel(OPN2_MIDIPlayer *device, int volumeModel)
|
||
|
{
|
||
|
if(!device) return;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->m_setup.VolumeModel = volumeModel;
|
||
|
play->opn.ChangeVolumeRangesModel(static_cast<OPNMIDI_VolumeModels>(volumeModel));
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT int opn2_openFile(OPN2_MIDIPlayer *device, const char *filePath)
|
||
|
{
|
||
|
if(device && device->opn2_midiPlayer)
|
||
|
{
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->m_setup.tick_skip_samples_delay = 0;
|
||
|
if(!play->LoadMIDI(filePath))
|
||
|
{
|
||
|
std::string err = play->getErrorString();
|
||
|
if(err.empty())
|
||
|
play->setErrorString("OPN2 MIDI: Can't load file");
|
||
|
return -1;
|
||
|
}
|
||
|
else return 0;
|
||
|
}
|
||
|
|
||
|
OPN2MIDI_ErrorString = "Can't load file: OPN2 MIDI is not initialized";
|
||
|
return -1;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT int opn2_openData(OPN2_MIDIPlayer *device, const void *mem, unsigned long size)
|
||
|
{
|
||
|
if(device && device->opn2_midiPlayer)
|
||
|
{
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->m_setup.tick_skip_samples_delay = 0;
|
||
|
if(!play->LoadMIDI(mem, static_cast<size_t>(size)))
|
||
|
{
|
||
|
std::string err = play->getErrorString();
|
||
|
if(err.empty())
|
||
|
play->setErrorString("OPN2 MIDI: Can't load data from memory");
|
||
|
return -1;
|
||
|
}
|
||
|
else return 0;
|
||
|
}
|
||
|
|
||
|
OPN2MIDI_ErrorString = "Can't load file: OPN2 MIDI is not initialized";
|
||
|
return -1;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT const char *opn2_emulatorName()
|
||
|
{
|
||
|
#ifdef USE_LEGACY_EMULATOR
|
||
|
return "GENS 2.10 YM2612";
|
||
|
#else
|
||
|
return "Nuked OPN2 YM3438";
|
||
|
#endif
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT const char *opn2_linkedLibraryVersion()
|
||
|
{
|
||
|
return OPNMIDI_VERSION;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT const OPN2_Version *opn2_linkedVersion()
|
||
|
{
|
||
|
return &opn2_version;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT const char *opn2_errorString()
|
||
|
{
|
||
|
return OPN2MIDI_ErrorString.c_str();
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT const char *opn2_errorInfo(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return opn2_errorString();
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!play)
|
||
|
return opn2_errorString();
|
||
|
return play->getErrorString().c_str();
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT const char *opn2_getMusicTitle(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return "";
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!play)
|
||
|
return "";
|
||
|
return play->musTitle.c_str();
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_close(OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(device->opn2_midiPlayer)
|
||
|
delete reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
device->opn2_midiPlayer = NULL;
|
||
|
free(device);
|
||
|
device = NULL;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_reset(OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->m_setup.tick_skip_samples_delay = 0;
|
||
|
play->opn.Reset(play->m_setup.PCM_RATE);
|
||
|
play->ch.clear();
|
||
|
play->ch.resize(play->opn.NumChannels);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT double opn2_totalTimeLength(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return -1.0;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(play)
|
||
|
return play->timeLength();
|
||
|
else
|
||
|
return -1.0;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT double opn2_loopStartTime(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return -1.0;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(play)
|
||
|
return play->getLoopStart();
|
||
|
else
|
||
|
return -1.0;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT double opn2_loopEndTime(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return -1.0;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(play)
|
||
|
return play->getLoopEnd();
|
||
|
else
|
||
|
return -1.0;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT double opn2_positionTell(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return -1.0;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(play)
|
||
|
return play->tell();
|
||
|
else
|
||
|
return -1.0;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_positionSeek(struct OPN2_MIDIPlayer *device, double seconds)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(play)
|
||
|
return play->seek(seconds);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_positionRewind(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(play)
|
||
|
return play->rewind();
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_setTempo(struct OPN2_MIDIPlayer *device, double tempo)
|
||
|
{
|
||
|
if(!device || (tempo <= 0.0))
|
||
|
return;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(play)
|
||
|
return play->setTempo(tempo);
|
||
|
}
|
||
|
|
||
|
|
||
|
|
||
|
OPNMIDI_EXPORT const char *opn2_metaMusicTitle(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return "";
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(play)
|
||
|
return play->musTitle.c_str();
|
||
|
else
|
||
|
return "";
|
||
|
}
|
||
|
|
||
|
|
||
|
OPNMIDI_EXPORT const char *opn2_metaMusicCopyright(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return "";
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(play)
|
||
|
return play->musCopyright.c_str();
|
||
|
else
|
||
|
return "";
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT size_t opn2_metaTrackTitleCount(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return 0;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(play)
|
||
|
return play->musTrackTitles.size();
|
||
|
else
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT const char *opn2_metaTrackTitle(struct OPN2_MIDIPlayer *device, size_t index)
|
||
|
{
|
||
|
if(!device)
|
||
|
return 0;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(index >= play->musTrackTitles.size())
|
||
|
return "INVALID";
|
||
|
return play->musTrackTitles[index].c_str();
|
||
|
}
|
||
|
|
||
|
|
||
|
OPNMIDI_EXPORT size_t opn2_metaMarkerCount(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return 0;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(play)
|
||
|
return play->musMarkers.size();
|
||
|
else
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT Opn2_MarkerEntry opn2_metaMarker(struct OPN2_MIDIPlayer *device, size_t index)
|
||
|
{
|
||
|
struct Opn2_MarkerEntry marker;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!device || !play || (index >= play->musMarkers.size()))
|
||
|
{
|
||
|
marker.label = "INVALID";
|
||
|
marker.pos_time = 0.0;
|
||
|
marker.pos_ticks = 0;
|
||
|
return marker;
|
||
|
}
|
||
|
else
|
||
|
{
|
||
|
OPNMIDIplay::MIDI_MarkerEntry &mk = play->musMarkers[index];
|
||
|
marker.label = mk.label.c_str();
|
||
|
marker.pos_time = mk.pos_time;
|
||
|
marker.pos_ticks = (unsigned long)mk.pos_ticks;
|
||
|
}
|
||
|
return marker;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_setRawEventHook(struct OPN2_MIDIPlayer *device, OPN2_RawEventHook rawEventHook, void *userData)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->hooks.onEvent = rawEventHook;
|
||
|
play->hooks.onEvent_userData = userData;
|
||
|
}
|
||
|
|
||
|
/* Set note hook */
|
||
|
OPNMIDI_EXPORT void opn2_setNoteHook(struct OPN2_MIDIPlayer *device, OPN2_NoteHook noteHook, void *userData)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->hooks.onNote = noteHook;
|
||
|
play->hooks.onNote_userData = userData;
|
||
|
}
|
||
|
|
||
|
/* Set debug message hook */
|
||
|
OPNMIDI_EXPORT void opn2_setDebugMessageHook(struct OPN2_MIDIPlayer *device, OPN2_DebugMessageHook debugMessageHook, void *userData)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *play = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
play->hooks.onDebugMessage = debugMessageHook;
|
||
|
play->hooks.onDebugMessage_userData = userData;
|
||
|
}
|
||
|
|
||
|
|
||
|
|
||
|
inline static void SendStereoAudio(int &samples_requested,
|
||
|
ssize_t &in_size,
|
||
|
short *_in,
|
||
|
ssize_t out_pos,
|
||
|
short *_out)
|
||
|
{
|
||
|
if(!in_size)
|
||
|
return;
|
||
|
size_t offset = static_cast<size_t>(out_pos);
|
||
|
size_t inSamples = static_cast<size_t>(in_size * 2);
|
||
|
size_t maxSamples = static_cast<size_t>(samples_requested) - offset;
|
||
|
size_t toCopy = std::min(maxSamples, inSamples);
|
||
|
std::memcpy(_out + out_pos, _in, toCopy * sizeof(short));
|
||
|
}
|
||
|
|
||
|
|
||
|
OPNMIDI_EXPORT int opn2_play(OPN2_MIDIPlayer *device, int sampleCount, short *out)
|
||
|
{
|
||
|
sampleCount -= sampleCount % 2; //Avoid even sample requests
|
||
|
if(sampleCount < 0)
|
||
|
return 0;
|
||
|
if(!device)
|
||
|
return 0;
|
||
|
|
||
|
OPNMIDIplay * player = (reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer));
|
||
|
OPNMIDIplay::Setup &setup = player->m_setup;
|
||
|
|
||
|
ssize_t gotten_len = 0;
|
||
|
ssize_t n_periodCountStereo = 512;
|
||
|
//ssize_t n_periodCountPhys = n_periodCountStereo * 2;
|
||
|
int left = sampleCount;
|
||
|
bool hasSkipped = setup.tick_skip_samples_delay > 0;
|
||
|
|
||
|
while(left > 0)
|
||
|
{
|
||
|
{//
|
||
|
const double eat_delay = setup.delay < setup.maxdelay ? setup.delay : setup.maxdelay;
|
||
|
if(hasSkipped)
|
||
|
{
|
||
|
size_t samples = setup.tick_skip_samples_delay > sampleCount ? sampleCount : setup.tick_skip_samples_delay;
|
||
|
n_periodCountStereo = samples / 2;
|
||
|
}
|
||
|
else
|
||
|
{
|
||
|
setup.delay -= eat_delay;
|
||
|
setup.carry += setup.PCM_RATE * eat_delay;
|
||
|
n_periodCountStereo = static_cast<ssize_t>(setup.carry);
|
||
|
setup.carry -= n_periodCountStereo;
|
||
|
}
|
||
|
|
||
|
//if(setup.SkipForward > 0)
|
||
|
// setup.SkipForward -= 1;
|
||
|
//else
|
||
|
{
|
||
|
if((player->atEnd) && (setup.delay <= 0.0))
|
||
|
break;//Stop to fetch samples at reaching the song end with disabled loop
|
||
|
|
||
|
ssize_t leftSamples = left / 2;
|
||
|
if(n_periodCountStereo > leftSamples)
|
||
|
{
|
||
|
setup.tick_skip_samples_delay = (n_periodCountStereo - leftSamples) * 2;
|
||
|
n_periodCountStereo = leftSamples;
|
||
|
}
|
||
|
//! Count of stereo samples
|
||
|
ssize_t in_generatedStereo = (n_periodCountStereo > 512) ? 512 : n_periodCountStereo;
|
||
|
//! Total count of samples
|
||
|
ssize_t in_generatedPhys = in_generatedStereo * 2;
|
||
|
//! Unsigned total sample count
|
||
|
//fill buffer with zeros
|
||
|
int16_t *out_buf = player->outBuf;
|
||
|
std::memset(out_buf, 0, static_cast<size_t>(in_generatedPhys) * sizeof(int16_t));
|
||
|
unsigned int chips = player->opn.NumCards;
|
||
|
if(chips == 1)
|
||
|
{
|
||
|
#ifdef USE_LEGACY_EMULATOR
|
||
|
player->opn.cardsOP2[0]->run(int(in_generatedStereo), out_buf);
|
||
|
#else
|
||
|
OPN2_GenerateStream(player->opn.cardsOP2[0], out_buf, (Bit32u)in_generatedStereo);
|
||
|
#endif
|
||
|
}
|
||
|
else/* if(n_periodCountStereo > 0)*/
|
||
|
{
|
||
|
/* Generate data from every chip and mix result */
|
||
|
for(unsigned card = 0; card < chips; ++card)
|
||
|
{
|
||
|
#ifdef USE_LEGACY_EMULATOR
|
||
|
player->opn.cardsOP2[card]->run(int(in_generatedStereo), out_buf);
|
||
|
#else
|
||
|
OPN2_GenerateStreamMix(player->opn.cardsOP2[card], out_buf, (Bit32u)in_generatedStereo);
|
||
|
#endif
|
||
|
}
|
||
|
}
|
||
|
/* Process it */
|
||
|
SendStereoAudio(sampleCount, in_generatedStereo, out_buf, gotten_len, out);
|
||
|
|
||
|
left -= (int)in_generatedPhys;
|
||
|
gotten_len += (in_generatedPhys) /* - setup.stored_samples*/;
|
||
|
}
|
||
|
if(hasSkipped)
|
||
|
{
|
||
|
setup.tick_skip_samples_delay -= n_periodCountStereo * 2;
|
||
|
hasSkipped = setup.tick_skip_samples_delay > 0;
|
||
|
}
|
||
|
else
|
||
|
setup.delay = player->Tick(eat_delay, setup.mindelay);
|
||
|
}//
|
||
|
}
|
||
|
|
||
|
return static_cast<int>(gotten_len);
|
||
|
}
|
||
|
|
||
|
|
||
|
OPNMIDI_EXPORT int opn2_generate(struct OPN2_MIDIPlayer *device, int sampleCount, short *out)
|
||
|
{
|
||
|
sampleCount -= sampleCount % 2; //Avoid even sample requests
|
||
|
if(sampleCount < 0)
|
||
|
return 0;
|
||
|
if(!device)
|
||
|
return 0;
|
||
|
|
||
|
OPNMIDIplay * player = (reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer));
|
||
|
OPNMIDIplay::Setup &setup = player->m_setup;
|
||
|
|
||
|
ssize_t gotten_len = 0;
|
||
|
ssize_t n_periodCountStereo = 512;
|
||
|
|
||
|
int left = sampleCount;
|
||
|
double delay = double(sampleCount) / double(setup.PCM_RATE);
|
||
|
|
||
|
while(left > 0)
|
||
|
{
|
||
|
{//
|
||
|
const double eat_delay = delay < setup.maxdelay ? delay : setup.maxdelay;
|
||
|
delay -= eat_delay;
|
||
|
setup.carry += setup.PCM_RATE * eat_delay;
|
||
|
n_periodCountStereo = static_cast<ssize_t>(setup.carry);
|
||
|
setup.carry -= n_periodCountStereo;
|
||
|
|
||
|
{
|
||
|
ssize_t leftSamples = left / 2;
|
||
|
if(n_periodCountStereo > leftSamples)
|
||
|
n_periodCountStereo = leftSamples;
|
||
|
//! Count of stereo samples
|
||
|
ssize_t in_generatedStereo = (n_periodCountStereo > 512) ? 512 : n_periodCountStereo;
|
||
|
//! Total count of samples
|
||
|
ssize_t in_generatedPhys = in_generatedStereo * 2;
|
||
|
//! Unsigned total sample count
|
||
|
//fill buffer with zeros
|
||
|
int16_t *out_buf = player->outBuf;
|
||
|
std::memset(out_buf, 0, static_cast<size_t>(in_generatedPhys) * sizeof(int16_t));
|
||
|
unsigned int chips = player->opn.NumCards;
|
||
|
if(chips == 1)
|
||
|
{
|
||
|
#ifdef USE_LEGACY_EMULATOR
|
||
|
player->opn.cardsOP2[0]->run(int(in_generatedStereo), out_buf);
|
||
|
#else
|
||
|
OPN2_GenerateStream(player->opn.cardsOP2[0], out_buf, (Bit32u)in_generatedStereo);
|
||
|
#endif
|
||
|
}
|
||
|
else/* if(n_periodCountStereo > 0)*/
|
||
|
{
|
||
|
/* Generate data from every chip and mix result */
|
||
|
for(unsigned card = 0; card < chips; ++card)
|
||
|
{
|
||
|
#ifdef USE_LEGACY_EMULATOR
|
||
|
player->opn.cardsOP2[card]->run(int(in_generatedStereo), out_buf);
|
||
|
#else
|
||
|
OPN2_GenerateStreamMix(player->opn.cardsOP2[card], out_buf, (Bit32u)in_generatedStereo);
|
||
|
#endif
|
||
|
}
|
||
|
}
|
||
|
/* Process it */
|
||
|
SendStereoAudio(sampleCount, in_generatedStereo, out_buf, gotten_len, out);
|
||
|
|
||
|
left -= (int)in_generatedPhys;
|
||
|
gotten_len += (in_generatedPhys) /* - setup.stored_samples*/;
|
||
|
}
|
||
|
|
||
|
player->TickIteratos(eat_delay);
|
||
|
}//
|
||
|
}
|
||
|
|
||
|
return static_cast<int>(gotten_len);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT double opn2_tickEvents(struct OPN2_MIDIPlayer *device, double seconds, double granuality)
|
||
|
{
|
||
|
if(!device)
|
||
|
return -1.0;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return -1.0;
|
||
|
return player->Tick(seconds, granuality);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT int opn2_atEnd(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return 1;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return 1;
|
||
|
return (int)player->atEnd;
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_panic(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return;
|
||
|
player->realTime_panic();
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_rt_resetState(struct OPN2_MIDIPlayer *device)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return;
|
||
|
player->realTime_ResetState();
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT int opn2_rt_noteOn(struct OPN2_MIDIPlayer *device, OPN2_UInt8 channel, OPN2_UInt8 note, OPN2_UInt8 velocity)
|
||
|
{
|
||
|
if(!device)
|
||
|
return 0;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return 0;
|
||
|
return (int)player->realTime_NoteOn(channel, note, velocity);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_rt_noteOff(struct OPN2_MIDIPlayer *device, OPN2_UInt8 channel, OPN2_UInt8 note)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return;
|
||
|
player->realTime_NoteOff(channel, note);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_rt_noteAfterTouch(struct OPN2_MIDIPlayer *device, OPN2_UInt8 channel, OPN2_UInt8 note, OPN2_UInt8 atVal)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return;
|
||
|
player->realTime_NoteAfterTouch(channel, note, atVal);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_rt_channelAfterTouch(struct OPN2_MIDIPlayer *device, OPN2_UInt8 channel, OPN2_UInt8 atVal)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return;
|
||
|
player->realTime_ChannelAfterTouch(channel, atVal);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_rt_controllerChange(struct OPN2_MIDIPlayer *device, OPN2_UInt8 channel, OPN2_UInt8 type, OPN2_UInt8 value)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return;
|
||
|
player->realTime_Controller(channel, type, value);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_rt_patchChange(struct OPN2_MIDIPlayer *device, OPN2_UInt8 channel, OPN2_UInt8 patch)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return;
|
||
|
player->realTime_PatchChange(channel, patch);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_rt_pitchBend(struct OPN2_MIDIPlayer *device, OPN2_UInt8 channel, OPN2_UInt16 pitch)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return;
|
||
|
player->realTime_PitchBend(channel, pitch);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_rt_pitchBendML(struct OPN2_MIDIPlayer *device, OPN2_UInt8 channel, OPN2_UInt8 msb, OPN2_UInt8 lsb)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return;
|
||
|
player->realTime_PitchBend(channel, msb, lsb);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_rt_bankChangeLSB(struct OPN2_MIDIPlayer *device, OPN2_UInt8 channel, OPN2_UInt8 lsb)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return;
|
||
|
player->realTime_BankChangeLSB(channel, lsb);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_rt_bankChangeMSB(struct OPN2_MIDIPlayer *device, OPN2_UInt8 channel, OPN2_UInt8 msb)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return;
|
||
|
player->realTime_BankChangeMSB(channel, msb);
|
||
|
}
|
||
|
|
||
|
OPNMIDI_EXPORT void opn2_rt_bankChange(struct OPN2_MIDIPlayer *device, OPN2_UInt8 channel, OPN2_SInt16 bank)
|
||
|
{
|
||
|
if(!device)
|
||
|
return;
|
||
|
OPNMIDIplay *player = reinterpret_cast<OPNMIDIplay *>(device->opn2_midiPlayer);
|
||
|
if(!player)
|
||
|
return;
|
||
|
player->realTime_BankChange(channel, (uint16_t)bank);
|
||
|
}
|