void fluidsynth_feed_midi (unsigned char *event_data, size_t event_length) { int channel = (event_data[0] & 0x0f); int type = (event_data[0] & 0xf0); switch (type) { case MIDI_NOTE_ON: { int velocity = ((int) (Denemo.project->movement->master_volume * event_data[2])); if (velocity > 0x7F) velocity = 0x7F; fluid_synth_noteon (synth, channel, event_data[1], velocity); } break; case MIDI_NOTE_OFF: fluid_synth_noteoff (synth, channel, event_data[1]); break; case MIDI_CONTROL_CHANGE: fluid_synth_cc (synth, channel, event_data[1], event_data[2]); break; case MIDI_PROGRAM_CHANGE: fluid_synth_program_change (synth, channel, event_data[1]); break; case MIDI_PITCH_BEND: fluid_synth_pitch_bend (synth, channel, event_data[1] + (event_data[2] << 7)); break; case SYS_EXCLUSIVE_MESSAGE1: //g_debug("length %d\n", event_length); fluid_synth_sysex (synth, (const char*) event_data + 1, event_length - 1, NULL, 0, NULL, FALSE); break; default: g_warning ("MIDI message type %x not handled", type); } }
static block_t *DecodeBlock (decoder_t *p_dec, block_t **pp_block) { block_t *p_block; decoder_sys_t *p_sys = p_dec->p_sys; block_t *p_out = NULL; if (pp_block == NULL) return NULL; p_block = *pp_block; if (p_block == NULL) return NULL; *pp_block = NULL; if (p_block->i_pts > VLC_TS_INVALID && !date_Get (&p_sys->end_date)) date_Set (&p_sys->end_date, p_block->i_pts); else if (p_block->i_pts < date_Get (&p_sys->end_date)) { msg_Warn (p_dec, "MIDI message in the past?"); goto drop; } if (p_block->i_buffer < 1) goto drop; uint8_t event = p_block->p_buffer[0]; uint8_t channel = p_block->p_buffer[0] & 0xf; event &= 0xF0; if (event == 0xF0) switch (channel) { case 0: if (p_block->p_buffer[p_block->i_buffer - 1] != 0xF7) { case 7: msg_Warn (p_dec, "fragmented SysEx not implemented"); goto drop; } fluid_synth_sysex (p_sys->synth, (char *)p_block->p_buffer + 1, p_block->i_buffer - 2, NULL, NULL, NULL, 0); break; case 0xF: fluid_synth_system_reset (p_sys->synth); break; } uint8_t p1 = (p_block->i_buffer > 1) ? (p_block->p_buffer[1] & 0x7f) : 0; uint8_t p2 = (p_block->i_buffer > 2) ? (p_block->p_buffer[2] & 0x7f) : 0; switch (event & 0xF0) { case 0x80: fluid_synth_noteoff (p_sys->synth, channel, p1); break; case 0x90: fluid_synth_noteon (p_sys->synth, channel, p1, p2); break; /*case 0xA0: note aftertouch not implemented */ case 0xB0: fluid_synth_cc (p_sys->synth, channel, p1, p2); break; case 0xC0: fluid_synth_program_change (p_sys->synth, channel, p1); break; case 0xD0: fluid_synth_channel_pressure (p_sys->synth, channel, p1); break; case 0xE0: fluid_synth_pitch_bend (p_sys->synth, channel, (p2 << 7) | p1); break; } unsigned samples = (p_block->i_pts - date_Get (&p_sys->end_date)) * 441 / 10000; if (samples == 0) goto drop; p_out = decoder_NewAudioBuffer (p_dec, samples); if (p_out == NULL) goto drop; p_out->i_pts = date_Get (&p_sys->end_date ); p_out->i_length = date_Increment (&p_sys->end_date, samples) - p_out->i_pts; fluid_synth_write_float (p_sys->synth, samples, p_out->p_buffer, 0, 2, p_out->p_buffer, 1, 2); drop: block_Release (p_block); return p_out; }
static void handle_buffer (GstFluidDec * fluiddec, GstBuffer * buffer) { GstMapInfo info; guint8 event; gst_buffer_map (buffer, &info, GST_MAP_READ); event = info.data[0]; switch (event & 0xf0) { case 0xf0: switch (event) { case 0xff: GST_DEBUG_OBJECT (fluiddec, "system reset"); fluid_synth_system_reset (fluiddec->synth); break; case 0xf0: case 0xf7: GST_DEBUG_OBJECT (fluiddec, "sysex 0x%02x", event); GST_MEMDUMP_OBJECT (fluiddec, "bytes ", info.data + 1, info.size - 1); fluid_synth_sysex (fluiddec->synth, (char *) info.data + 1, info.size - 1, NULL, NULL, NULL, 0); break; case 0xf9: GST_LOG_OBJECT (fluiddec, "midi tick"); break; default: GST_WARNING_OBJECT (fluiddec, "unhandled event 0x%02x", event); break; } break; default: { guint8 channel, p1, p2; channel = event & 0x0f; p1 = info.size > 1 ? info.data[1] & 0x7f : 0; p2 = info.size > 2 ? info.data[2] & 0x7f : 0; GST_DEBUG_OBJECT (fluiddec, "event 0x%02x channel %d, 0x%02x 0x%02x", event, channel, p1, p2); switch (event & 0xf0) { case 0x80: fluid_synth_noteoff (fluiddec->synth, channel, p1); break; case 0x90: fluid_synth_noteon (fluiddec->synth, channel, p1, p2); break; case 0xA0: /* aftertouch */ break; case 0xB0: fluid_synth_cc (fluiddec->synth, channel, p1, p2); break; case 0xC0: fluid_synth_program_change (fluiddec->synth, channel, p1); break; case 0xD0: fluid_synth_channel_pressure (fluiddec->synth, channel, p1); break; case 0xE0: fluid_synth_pitch_bend (fluiddec->synth, channel, (p2 << 7) | p1); break; default: break; } break; } } gst_buffer_unmap (buffer, &info); }
void ProcessMidi() { ALuint newtempo = 0; // Process more events std::vector<MidiTrack>::iterator i=Tracks.begin(), end=Tracks.end(); while(i != end) { if(i->Offset >= i->data.size() || i->SamplesLeft >= 1.) { i++; continue; } if(i->data.size() - i->Offset < 3) { i->Offset = i->data.size(); i++; continue; } ALubyte event = i->data[i->Offset++]; ALubyte parm1, parm2; if(!(event&0x80)) { event = i->LastEvent; i->Offset--; } if((event&MIDI_EVENT_MASK) != MIDI_SPECIAL) i->LastEvent = event; parm1 = i->data[i->Offset]; parm2 = i->data[i->Offset+1]; int channel = event&MIDI_CHANNEL_MASK; switch(event&MIDI_EVENT_MASK) { case MIDI_NOTEOFF: fluid_synth_noteoff(fluidSynth, channel, parm1); i->Offset += 2; break; case MIDI_NOTEON: fluid_synth_noteon(fluidSynth, channel, parm1, parm2); i->Offset += 2; break; case MIDI_POLYPRESS: i->Offset += 2; break; case MIDI_CTRLCHANGE: fluid_synth_cc(fluidSynth, channel, parm1, parm2); i->Offset += 2; break; case MIDI_PRGMCHANGE: fluid_synth_program_change(fluidSynth, channel, parm1); i->Offset += 1; break; case MIDI_CHANPRESS: fluid_synth_channel_pressure(fluidSynth, channel, parm1); i->Offset += 1; break; case MIDI_PITCHBEND: fluid_synth_pitch_bend(fluidSynth, channel, (parm1&0x7F) | ((parm2&0x7F)<<7)); i->Offset += 2; break; case MIDI_SPECIAL: switch(event) { case MIDI_SYSEX: { unsigned long len = i->ReadVarLen(); if(i->data.size() - i->Offset < len) { i->Offset = i->data.size(); break; } if(i->data[i->Offset+len-1] == MIDI_SYSEXEND) { char *data = reinterpret_cast<char*>(&i->data[i->Offset]); fluid_synth_sysex(fluidSynth, data, len-1, NULL, NULL, NULL, false); } i->Offset += len; break; } case MIDI_SYSEXEND: { unsigned long len = i->ReadVarLen(); if(i->data.size() - i->Offset < len) { i->Offset = i->data.size(); break; } i->Offset += len; break; } case MIDI_SONGPOS: i->Offset += 2; break; case MIDI_SONGSEL: i->Offset += 1; break; case MIDI_META: { ALubyte metatype = i->data[i->Offset++]; unsigned long val = i->ReadVarLen(); if(i->data.size() - i->Offset < val) { i->Offset = i->data.size(); break; } if(metatype == MIDI_META_EOT) { i->Offset = i->data.size(); break; } if(metatype == MIDI_META_TEMPO && val >= 3) { newtempo = (i->data[i->Offset] << 16) | (i->data[i->Offset+1] << 8) | (i->data[i->Offset+2]); } i->Offset += val; break; } default: /* The rest of the special events don't have any * data bytes */ break; } break; default: /* Shouldn't ever get to here */ break; } unsigned long val = i->ReadVarLen(); i->SamplesLeft += val * samplesPerTick; } if(newtempo) UpdateTempo(newtempo); }
static void FSynth_processQueue(FSynth *self, ALuint64 time) { EvtQueue *queue = &STATIC_CAST(MidiSynth, self)->EventQueue; while(queue->pos < queue->size && queue->events[queue->pos].time <= time) { const MidiEvent *evt = &queue->events[queue->pos]; if(evt->event == SYSEX_EVENT) { static const ALbyte gm2_on[] = { 0x7E, 0x7F, 0x09, 0x03 }; static const ALbyte gm2_off[] = { 0x7E, 0x7F, 0x09, 0x02 }; int handled = 0; fluid_synth_sysex(self->Synth, evt->param.sysex.data, evt->param.sysex.size, NULL, NULL, &handled, 0); if(!handled && evt->param.sysex.size >= (ALsizei)sizeof(gm2_on)) { if(memcmp(evt->param.sysex.data, gm2_on, sizeof(gm2_on)) == 0) self->ForceGM2BankSelect = AL_TRUE; else if(memcmp(evt->param.sysex.data, gm2_off, sizeof(gm2_off)) == 0) self->ForceGM2BankSelect = AL_FALSE; } } else switch((evt->event&0xF0)) { case AL_NOTEOFF_SOFT: fluid_synth_noteoff(self->Synth, (evt->event&0x0F), evt->param.val[0]); break; case AL_NOTEON_SOFT: fluid_synth_noteon(self->Synth, (evt->event&0x0F), evt->param.val[0], evt->param.val[1]); break; case AL_AFTERTOUCH_SOFT: break; case AL_CONTROLLERCHANGE_SOFT: if(self->ForceGM2BankSelect) { int chan = (evt->event&0x0F); if(evt->param.val[0] == 0) { if(evt->param.val[1] == 120 && (chan == 9 || chan == 10)) fluid_synth_set_channel_type(self->Synth, chan, CHANNEL_TYPE_DRUM); else if(evt->param.val[1] == 121) fluid_synth_set_channel_type(self->Synth, chan, CHANNEL_TYPE_MELODIC); break; } if(evt->param.val[0] == 32) { fluid_synth_bank_select(self->Synth, chan, evt->param.val[1]); break; } } fluid_synth_cc(self->Synth, (evt->event&0x0F), evt->param.val[0], evt->param.val[1]); break; case AL_PROGRAMCHANGE_SOFT: fluid_synth_program_change(self->Synth, (evt->event&0x0F), evt->param.val[0]); break; case AL_CHANNELPRESSURE_SOFT: fluid_synth_channel_pressure(self->Synth, (evt->event&0x0F), evt->param.val[0]); break; case AL_PITCHBEND_SOFT: fluid_synth_pitch_bend(self->Synth, (evt->event&0x0F), (evt->param.val[0]&0x7F) | ((evt->param.val[1]&0x7F)<<7)); break; } queue->pos++; } }