/* */ #include #include #include #include #include #include #include #include #include #include "lv2/lv2plug.in/ns/ext/time/time.h" #include #include #define NUM_NOTESBUFFER 8 typedef enum { IN = 0, CV1, VELOCITY, TRIGGER, OCTAVE, SEMITONE, CENT, RETRIGGER, PANIC, CHANNEL } PortEnum; typedef struct { // URIDs LV2_URID urid_midiEvent; // atom ports const LV2_Atom_Sequence* port_events_in; int notesPressed; //=========================================== // keep track of active notes uint8_t activeNotesList[NUM_NOTESBUFFER]; uint8_t reTriggerBuffer[NUM_NOTESBUFFER]; uint8_t triggerIndex; uint8_t activeNote; uint8_t activeVelocity; uint8_t reTriggered; size_t notesIndex; bool activePorts; float *pitch; float *velocity; float *trigger; float *octave; float *semitone; float *cent; float *reTrigger; float *panicParam; float *channelParam; bool triggerState; //=========================================== } Data; // Struct for a 3 byte MIDI event typedef struct { LV2_Atom_Event event; uint8_t msg[3]; } LV2_Atom_MIDI; static LV2_Handle instantiate(const LV2_Descriptor* descriptor, double rate, const char* path, const LV2_Feature* const* features) { Data* self = (Data*)calloc(1, sizeof(Data)); // Get host features const LV2_URID_Map* map = NULL; for (int i = 0; features[i]; ++i) { if (!strcmp(features[i]->URI, LV2_URID__map)) { map = (const LV2_URID_Map*)features[i]->data; break; } } if (!map) { free(self); return NULL; } // Map URIs self->urid_midiEvent = map->map(map->handle, LV2_MIDI__MidiEvent); self->notesPressed = 0; //=========================================== memset(self->activeNotesList, 200, sizeof(uint8_t)*NUM_NOTESBUFFER); memset(self->reTriggerBuffer, 0, sizeof(uint8_t)*NUM_NOTESBUFFER); self->triggerIndex = 0; self->reTriggered = 200; self->activeNote = 0; self->activeVelocity = 0; self->activePorts = false; self->notesPressed = 0; self->notesIndex = 0; self->triggerState = false; //=========================================== return self; } static void connect_port(LV2_Handle instance, uint32_t port, void* data) { Data* self = (Data*)instance; switch (port) { case IN: self->port_events_in = (const LV2_Atom_Sequence*)data; break; case CV1: self->pitch = (float*) data; break; case VELOCITY: self->velocity = (float*) data; break; case TRIGGER: self->trigger = (float*) data; break; case OCTAVE: self->octave = (float*) data; break; case SEMITONE: self->semitone = (float*) data; break; case CENT: self->cent = (float*) data; break; case RETRIGGER: self->reTrigger = (float*) data; break; case PANIC: self->panicParam = (float*) data; break; case CHANNEL: self->channelParam = (float*) data; break; } } static void activate(LV2_Handle instance) { } static void panic(Data* self) { for (unsigned i = 0; i < NUM_NOTESBUFFER; i++) { self->activeNotesList[i] = 200; } for (unsigned i = 0; i < NUM_NOTESBUFFER; i++) { self->reTriggerBuffer[i] = 0; } self->triggerIndex = 0; self->reTriggered = 200; self->activeNote = 0; self->activeVelocity = 0; self->activePorts = false; self->notesPressed = 0; self->notesIndex = 0; self->triggerState = false; } static void setPortState(Data* self, int status) { self->activePorts = status; self->triggerState = status; } static void run(LV2_Handle instance, uint32_t sample_count) { Data* self = (Data*)instance; float *pitch = self->pitch; float *velocity = self->velocity; float *trigger = self->trigger; const int8_t octave = (int8_t) round(*(self->octave)); const int8_t semitone = (int8_t) round(*(self->semitone)); const float cC = *self->cent; const uint8_t channel = (uint8_t) round(*(self->channelParam)); bool retrigger = true; if ((int)*self->panicParam == 1) { panic(self); } // Read incoming events LV2_ATOM_SEQUENCE_FOREACH(self->port_events_in, ev) { if (ev->body.type == self->urid_midiEvent) { const uint8_t* const msg = (const uint8_t*)(ev + 1); const uint8_t message_channel = msg[0] & 0x0F; if (message_channel == channel - 1){ const uint8_t status = msg[0] & 0xF0; int storeN = 0; bool emptySlot = false; int notesIndex = NUM_NOTESBUFFER - 1; bool noteFound = false; if (msg[1] == 0x7b) { panic(self); } switch (status) { case LV2_MIDI_MSG_NOTE_ON: while (!emptySlot && storeN < NUM_NOTESBUFFER) { if (self->activeNotesList[storeN] == 200) { self->activeNotesList[storeN] = msg[1]; emptySlot = true; } storeN++; } self->activeNote = msg[1]; self->activeVelocity = msg[2]; self->triggerIndex = (self->triggerIndex + 1) % NUM_NOTESBUFFER; self->reTriggerBuffer[self->triggerIndex] = 1; self->reTriggered = msg[1]; break; case LV2_MIDI_MSG_NOTE_OFF: self->notesPressed--; for (int notesIndex = 0; notesIndex < NUM_NOTESBUFFER; notesIndex++) { if (msg[1] == self->activeNotesList[notesIndex]) { self->activeNotesList[notesIndex] = 200; } } while (!noteFound && notesIndex >= 0) { if (self->activeNotesList[notesIndex] < 200){ self->activeNote = self->activeNotesList[notesIndex]; if(retrigger && self->activeNote != self->reTriggered){ self->reTriggered = msg[1]; } noteFound = true; } notesIndex--; } break; default: break; } } } } int checked_note = 0; bool active_notes_found = false; while(!active_notes_found && checked_note < NUM_NOTESBUFFER) { if (self->activeNotesList[checked_note] != 200) active_notes_found = true; checked_note++; } if (active_notes_found) { setPortState(self, 1); } else { setPortState(self, 0); self->activeVelocity = 0; } for(uint32_t i=0;iactiveNote * 1/12.0f)) * 0.2; velocity[i] = (((float)self->activeVelocity / 127.0)); trigger[i] = ((self->triggerState == true) ? 1.0f : 0.0f); if (self->reTriggerBuffer[self->triggerIndex] == 1 && *self->reTrigger == 1.0) { self->reTriggerBuffer[self->triggerIndex] = 0; trigger[i] = 0.0f; } } } static void cleanup(LV2_Handle instance) { free(instance); } static const LV2_Descriptor descriptor = { .URI = "http://polyeffects.com/lv2/midi_to_cv_mono", .instantiate = instantiate, .connect_port = connect_port, .activate = activate, .run = run, .deactivate = NULL, .cleanup = cleanup, .extension_data = NULL }; LV2_SYMBOL_EXPORT const LV2_Descriptor* lv2_descriptor(uint32_t index) { return (index == 0) ? &descriptor : NULL; }