1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
|
#include <cstdio>
#include <chrono>
#include <thread>
#include <fluidsynth.h>
#include "qmpmidiplay.hpp"
void CMidiPlayer::fluidInitialize(const char* sf)
{
settings=new_fluid_settings();
fluid_settings_setstr(settings,"audio.driver","pulseaudio");
fluid_settings_setint(settings,"synth.cpu-cores",1);
fluid_settings_setint(settings,"synth.min-note-length",0);
fluid_settings_setint(settings,"synth.polyphony",256);
synth=new_fluid_synth(settings);
adriver=new_fluid_audio_driver(settings,synth);
fluid_synth_sfload(synth,sf,1);
}
void CMidiPlayer::fluidDeinitialize()
{
if(!synth||!adriver||!settings)return;
delete_fluid_audio_driver(adriver);
delete_fluid_synth(synth);
delete_fluid_settings(settings);
synth=NULL;settings=NULL;adriver=NULL;
}
void CMidiPlayer::processEvent(const SEvent *e)
{
switch(e->type&0xF0)
{
case 0x80://Note off
fluid_synth_noteoff(synth,e->type&0x0F,e->p1);
break;
case 0x90://Note on
fluid_synth_noteon(synth,e->type&0x0F,e->p1,e->p2);
break;
case 0xB0://CC
fluid_synth_cc(synth,e->type&0x0F,e->p1,e->p2);
break;
case 0xC0://PC
fluid_synth_program_change(synth,e->type&0x0F,e->p1);
break;
case 0xE0://PW
fluid_synth_pitch_bend(synth,e->type&0x0F,e->p1);
break;
case 0xF0://Meta/SysEx
if((e->type&0x0F)==0x0F)
{
switch(e->p1)
{
case 0x51:
ctempo=e->p2;dpt=ctempo*1000/divs;
break;
case 0x58:
break;
case 0x59:
break;
case 0x01:case 0x02:case 0x03:
case 0x04:case 0x05:case 0x06:
case 0x07:
if(e->str)puts(e->str);
break;
}
}
break;
}
}
void CMidiPlayer::processEventStub(const SEvent *e)
{
if(e->type==0xFF&&e->p1==0x51)
{ctempo=e->p2;dpt=ctempo*1000/divs;}
}
void CMidiPlayer::playEvents()
{
for(uint32_t ct=midiFile->getEvent(0)->time;tceptr<midiFile->getEventCount();)
{
while(tcpaused)std::this_thread::sleep_for(std::chrono::milliseconds(100));
while(!tcstop&&tceptr<midiFile->getEventCount()&&ct==midiFile->getEvent(tceptr)->time)
processEvent(midiFile->getEvent(tceptr++));
if(tcstop||tceptr>=midiFile->getEventCount())break;
if(resumed)resumed=false;
else
std::this_thread::sleep_for(std::chrono::nanoseconds(midiFile->getEvent(tceptr)->time-ct)*dpt);
ct=midiFile->getEvent(tceptr)->time;
}
while(!tcstop&&synth&&fluid_synth_get_active_voice_count(synth)>0)std::this_thread::sleep_for(std::chrono::microseconds(100));
finished=1;
}
void CMidiPlayer::fileTimer1Pass()
{
ftime=.0;ctempo=0x7A120;dpt=ctempo*1000/divs;
for(uint32_t eptr=0,ct=midiFile->getEvent(0)->time;eptr<midiFile->getEventCount();)
{
while(eptr<midiFile->getEventCount()&&ct==midiFile->getEvent(eptr)->time)
processEventStub(midiFile->getEvent(eptr++));
if(eptr>=midiFile->getEventCount())break;
ftime+=(midiFile->getEvent(eptr)->time-ct)*dpt/1e9;
ct=midiFile->getEvent(eptr)->time;
}
}
void CMidiPlayer::fileTimer2Pass()
{
memset(stamps,0,sizeof(stamps));
double ctime=.0;uint32_t c=1;ctempo=0x7A120;dpt=ctempo*1000/divs;
for(uint32_t eptr=0,ct=midiFile->getEvent(0)->time;eptr<midiFile->getEventCount();)
{
while(eptr<midiFile->getEventCount()&&ct==midiFile->getEvent(eptr)->time)
processEventStub(midiFile->getEvent(eptr++));
if(eptr>=midiFile->getEventCount())break;
ctime+=(midiFile->getEvent(eptr)->time-ct)*dpt/1e9;
while(ctime>ftime*c/100.){stamps[c++]=eptr;if(c>100)throw;}
ct=midiFile->getEvent(eptr)->time;
}
while(c<101)stamps[c++]=midiFile->getEventCount();
}
CMidiPlayer::CMidiPlayer()
{
midiFile=NULL;resumed=false;
settings=NULL;synth=NULL;adriver=NULL;
}
void CMidiPlayer::playerPanic()
{
//for(int i=0;i<16;++i)fluid_synth_cc(synth,i,123,0);//not supported?
//fluid_synth_system_reset(synth);//reverts to default presets...
for(int i=0;i<16;++i)fluid_synth_all_notes_off(synth,i);
//for(int i=0;i<16;++i)for(int j=0;j<128;++j)fluid_synth_noteoff(synth,i,j);
}
void CMidiPlayer::playerLoadFile(const char* fn)
{
midiFile=new CMidiFile(fn);
divs=midiFile->getDivision();
fileTimer1Pass();
fileTimer2Pass();
}
void CMidiPlayer::playerInit()
{
ctempo=0x7A120;ctsn=4;ctsd=2;dpt=ctempo*1000/divs;
tceptr=0;tcstop=0;tcpaused=0;finished=0;
fluidInitialize("/media/Files/FluidR3_Ext.sf2");
}
void CMidiPlayer::playerDeinit()
{
tceptr=0;tcstop=1;tcpaused=0;
fluidDeinitialize();
}
void CMidiPlayer::playerThread()
{
playEvents();
}
uint32_t CMidiPlayer::getStamp(int id){return stamps[id];}
uint32_t CMidiPlayer::getTCeptr(){return tceptr;}
void CMidiPlayer::setTCeptr(uint32_t ep){tceptr=ep;}
double CMidiPlayer::getFtime(){return ftime;}
uint32_t CMidiPlayer::getTCpaused(){return tcpaused;}
void CMidiPlayer::setTCpaused(uint32_t ps){tcpaused=ps;}
uint32_t CMidiPlayer::isFinished(){return finished;}
void CMidiPlayer::setResumed(){resumed=true;}
void CMidiPlayer::setGain(double gain){if(settings)fluid_settings_setnum(settings,"synth.gain",gain);}
int CMidiPlayer::getPolyphone(){return synth?fluid_synth_get_active_voice_count(synth):0;}
int CMidiPlayer::getMaxPolyphone(){return synth?fluid_synth_get_polyphony(synth):0;}
void CMidiPlayer::setMaxPolyphone(int p){if(synth)fluid_synth_set_polyphony(synth,p);}
|
