/* -*- linux-c -*- Copyright (C) 2004 Tom Szilagyi 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 2 of the License, or (at your option) 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, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. $Id: tap_rotspeak.c,v 1.3 2004/02/21 17:33:36 tszilagyi Exp $ */ #include #include #include #include #include #include "tap_utils.h" /* The Unique ID of the plugin: */ #define ID_STEREO 2149 /* The port numbers for the plugin: */ #define BASSFREQ 0 #define HORNFREQ 1 #define STWIDTH 2 #define HRBAL 3 #define LATENCY 4 #define INPUT_L 5 #define INPUT_R 6 #define OUTPUT_L 7 #define OUTPUT_R 8 /* Total number of ports */ #define PORTCOUNT_STEREO 9 /* * This has to be bigger than 0.3f * sample_rate / (2*PI) for any sample rate. * At 192 kHz 9168 is needed so this should be enough. */ #define PM_DEPTH 9200 /* maximum phase mod freq */ #define PM_FREQ 30.0f /* splitting input signals into low and high freq components */ #define SPLIT_FREQ 1000.0f #define SPLIT_BW 1.0f /* approx. sound velocity in air [m/s] */ #define C_AIR 340.0f /* coefficient between rotating frequency and pitch mod depth (aka. Doppler effect) */ #define FREQ_PITCH 1.6f /* cosine table for fast computations */ float cos_table[1024]; int flagcos = 0; /* The structure used to hold port connection information and state */ typedef struct { float * hornfreq; float * bassfreq; float * stwidth; float * hrbal; float * latency; float * input_L; float * input_R; float * output_L; float * output_R; float * ringbuffer_h_L; unsigned long buflen_h_L; unsigned long pos_h_L; float * ringbuffer_h_R; unsigned long buflen_h_R; unsigned long pos_h_R; float * ringbuffer_b_L; unsigned long buflen_b_L; unsigned long pos_b_L; float * ringbuffer_b_R; unsigned long buflen_b_R; unsigned long pos_b_R; biquad * eq_filter_L; biquad * lp_filter_L; biquad * hp_filter_L; biquad * eq_filter_R; biquad * lp_filter_R; biquad * hp_filter_R; unsigned long sample_rate; float phase_h; float phase_b; float run_adding_gain; } RotSpkr; /* Construct a new plugin instance. */ LV2_Handle instantiate_RotSpkr(const LV2_Descriptor * Descriptor, double SampleRate, const char* bundle_path, const LV2_Feature* const* features) { LV2_Handle * ptr; int i; if(flagcos == 0) { for (i = 0; i < 1024; i++) cos_table[i] = cosf(i * M_PI / 512.0f); flagcos++; } if ((ptr = malloc(sizeof(RotSpkr))) != NULL) { ((RotSpkr *)ptr)->sample_rate = SampleRate; ((RotSpkr *)ptr)->run_adding_gain = 1.0; if ((((RotSpkr *)ptr)->ringbuffer_h_L = calloc(2 * PM_DEPTH, sizeof(float))) == NULL) return NULL; if ((((RotSpkr *)ptr)->ringbuffer_h_R = calloc(2 * PM_DEPTH, sizeof(float))) == NULL) return NULL; ((RotSpkr *)ptr)->buflen_h_L = ceil(0.3f * SampleRate / M_PI); ((RotSpkr *)ptr)->buflen_h_R = ceil(0.3f * SampleRate / M_PI); ((RotSpkr *)ptr)->pos_h_L = 0; ((RotSpkr *)ptr)->pos_h_R = 0; if ((((RotSpkr *)ptr)->ringbuffer_b_L = calloc(2 * PM_DEPTH, sizeof(float))) == NULL) return NULL; if ((((RotSpkr *)ptr)->ringbuffer_b_R = calloc(2 * PM_DEPTH, sizeof(float))) == NULL) return NULL; ((RotSpkr *)ptr)->buflen_b_L = ceil(0.3f * SampleRate / M_PI); ((RotSpkr *)ptr)->buflen_b_R = ceil(0.3f * SampleRate / M_PI); ((RotSpkr *)ptr)->pos_b_L = 0; ((RotSpkr *)ptr)->pos_b_R = 0; if ((((RotSpkr *)ptr)->eq_filter_L = calloc(1, sizeof(biquad))) == NULL) return NULL; if ((((RotSpkr *)ptr)->lp_filter_L = calloc(1, sizeof(biquad))) == NULL) return NULL; if ((((RotSpkr *)ptr)->hp_filter_L = calloc(1, sizeof(biquad))) == NULL) return NULL; if ((((RotSpkr *)ptr)->eq_filter_R = calloc(1, sizeof(biquad))) == NULL) return NULL; if ((((RotSpkr *)ptr)->lp_filter_R = calloc(1, sizeof(biquad))) == NULL) return NULL; if ((((RotSpkr *)ptr)->hp_filter_R = calloc(1, sizeof(biquad))) == NULL) return NULL; return ptr; } return NULL; } void activate_RotSpkr(LV2_Handle Instance) { int i; RotSpkr * ptr; ptr = (RotSpkr *)Instance; for (i = 0; i < 2 * PM_DEPTH; i++) { ptr->ringbuffer_h_L[i] = 0.0f; ptr->ringbuffer_h_R[i] = 0.0f; ptr->ringbuffer_b_L[i] = 0.0f; ptr->ringbuffer_b_R[i] = 0.0f; } ptr->phase_h = 0.0f; ptr->phase_b = 0.0f; biquad_init(ptr->eq_filter_L); biquad_init(ptr->lp_filter_L); biquad_init(ptr->hp_filter_L); biquad_init(ptr->eq_filter_R); biquad_init(ptr->lp_filter_R); biquad_init(ptr->hp_filter_R); eq_set_params(ptr->eq_filter_L, SPLIT_FREQ, +8.0f, SPLIT_BW, ptr->sample_rate); eq_set_params(ptr->eq_filter_R, SPLIT_FREQ, +8.0f, SPLIT_BW, ptr->sample_rate); lp_set_params(ptr->lp_filter_L, SPLIT_FREQ, SPLIT_BW, ptr->sample_rate); lp_set_params(ptr->lp_filter_R, SPLIT_FREQ, SPLIT_BW, ptr->sample_rate); hp_set_params(ptr->hp_filter_L, SPLIT_FREQ, SPLIT_BW, ptr->sample_rate); hp_set_params(ptr->hp_filter_R, SPLIT_FREQ, SPLIT_BW, ptr->sample_rate); } /* Connect a port to a data location. */ void connect_port_RotSpkr(LV2_Handle Instance, uint32_t Port, void * DataLocation) { RotSpkr * ptr; ptr = (RotSpkr *)Instance; switch (Port) { case HORNFREQ: ptr->hornfreq = (float *) DataLocation; break; case BASSFREQ: ptr->bassfreq = (float *) DataLocation; break; case STWIDTH: ptr->stwidth = (float *) DataLocation; break; case HRBAL: ptr->hrbal = (float *) DataLocation; break; case LATENCY: ptr->latency = (float *) DataLocation; break; case INPUT_L: ptr->input_L = (float *) DataLocation; break; case INPUT_R: ptr->input_R = (float *) DataLocation; break; case OUTPUT_L: ptr->output_L = (float *) DataLocation; break; case OUTPUT_R: ptr->output_R = (float *) DataLocation; break; } } void run_RotSpkr(LV2_Handle Instance, uint32_t SampleCount) { RotSpkr * ptr = (RotSpkr *)Instance; float * input_L = ptr->input_L; float * input_R = ptr->input_R; float * output_L = ptr->output_L; float * output_R = ptr->output_R; float freq_h = LIMIT(*(ptr->hornfreq),0.0f,PM_FREQ); float freq_b = LIMIT(*(ptr->bassfreq),0.0f,PM_FREQ); float stwidth = LIMIT(*(ptr->stwidth),0.0f,100.0f); float hrbal = LIMIT(*(ptr->hrbal),0.0f,1.0f); float pmdepth_h = LIMIT(1.0f/(1.0f+FREQ_PITCH*freq_h/C_AIR) * ptr->sample_rate / 200.0f / M_PI / freq_h, 0, ptr->buflen_h_L / 2); float pmdepth_b = LIMIT(1.0f/(1.0f+FREQ_PITCH*freq_b/C_AIR) * ptr->sample_rate / 200.0f / M_PI / freq_b, 0, ptr->buflen_b_L / 2); unsigned long sample_index; float in_L = 0.0f, in_R = 0.0f; float lo_L = 0.0f, lo_R = 0.0f; float hi_L = 0.0f, hi_R = 0.0f; float phase_h_L = 0.0f, phase_b_L = 0.0f; float phase_h_R = 0.0f, phase_b_R = 0.0f; float phase_pm_h_L = 0.0f, phase_pm_b_L = 0.0f; float phase_pm_h_R = 0.0f, phase_pm_b_R = 0.0f; float pm_h_L = 0.0f, pm_b_L = 0.0f; float pm_h_R = 0.0f, pm_b_R = 0.0f; float fpos_h_L = 0.0f, fpos_b_L = 0.0f, fpos_h_R = 0.0f, fpos_b_R = 0.0f; float n_h_L = 0.0f, n_b_L = 0.0f, n_h_R = 0.0f, n_b_R = 0.0f; float rem_h_L = 0.0f, rem_b_L = 0.0f, rem_h_R = 0.0f, rem_b_R = 0.0f; float sa_h_L = 0.0f, sa_b_L = 0.0f, sb_h_L = 0.0f, sb_b_L = 0.0f; float sa_h_R = 0.0f, sa_b_R = 0.0f, sb_h_R = 0.0f, sb_b_R = 0.0f; for (sample_index = 0; sample_index < SampleCount; sample_index++) { in_L = *(input_L++); in_R = *(input_R++); in_L = biquad_run(ptr->eq_filter_L, in_L); in_R = biquad_run(ptr->eq_filter_R, in_R); lo_L = biquad_run(ptr->lp_filter_L, in_L); lo_R = biquad_run(ptr->lp_filter_R, in_R); hi_L = biquad_run(ptr->hp_filter_L, in_L); hi_R = biquad_run(ptr->hp_filter_R, in_R); phase_h_L = 1024.0f * freq_h * sample_index / ptr->sample_rate + ptr->phase_h; while (phase_h_L >= 1024.0f) phase_h_L -= 1024.0f; phase_pm_h_L = phase_h_L + 256.0f; while (phase_pm_h_L >= 1024.0f) phase_pm_h_L -= 1024.0f; phase_h_R = phase_h_L + 512.0f; while (phase_h_R >= 1024.0f) phase_h_R -= 1024.0f; phase_pm_h_R = phase_h_R + 256.0f; while (phase_pm_h_R >= 1024.0f) phase_pm_h_R -= 1024.0f; phase_b_L = 1024.0f * freq_b * sample_index / ptr->sample_rate + ptr->phase_b; while (phase_b_L >= 1024.0f) phase_b_L -= 1024.0f; phase_pm_b_L = phase_b_L + 256.0f; while (phase_pm_b_L >= 1024.0f) phase_pm_b_L -= 1024.0f; phase_b_R = phase_b_L + 512.0f; while (phase_b_R >= 1024.0f) phase_b_R -= 1024.0f; phase_pm_b_R = phase_b_R + 256.0f; while (phase_pm_b_R >= 1024.0f) phase_pm_b_R -= 1024.0f; push_buffer(hi_L, ptr->ringbuffer_h_L, ptr->buflen_h_L, &(ptr->pos_h_L)); push_buffer(hi_R, ptr->ringbuffer_h_R, ptr->buflen_h_R, &(ptr->pos_h_R)); push_buffer(lo_L, ptr->ringbuffer_b_L, ptr->buflen_b_L, &(ptr->pos_b_L)); push_buffer(lo_R, ptr->ringbuffer_b_R, ptr->buflen_b_R, &(ptr->pos_b_R)); fpos_h_L = pmdepth_h * (1.0f - cos_table[(unsigned long) phase_pm_h_L]); n_h_L = floorf(fpos_h_L); rem_h_L = fpos_h_L - n_h_L; sa_h_L = read_buffer(ptr->ringbuffer_h_L, ptr->buflen_h_L, ptr->pos_h_L, (unsigned long) n_h_L); sb_h_L = read_buffer(ptr->ringbuffer_h_L, ptr->buflen_h_L, ptr->pos_h_L, (unsigned long) n_h_L + 1); pm_h_L = (1 - rem_h_L) * sa_h_L + rem_h_L * sb_h_L; fpos_h_R = pmdepth_h * (1.0f - cos_table[(unsigned long) phase_pm_h_R]); n_h_R = floorf(fpos_h_R); rem_h_R = fpos_h_R - n_h_R; sa_h_R = read_buffer(ptr->ringbuffer_h_R, ptr->buflen_h_R, ptr->pos_h_R, (unsigned long) n_h_R); sb_h_R = read_buffer(ptr->ringbuffer_h_R, ptr->buflen_h_R, ptr->pos_h_R, (unsigned long) n_h_R + 1); pm_h_R = (1 - rem_h_R) * sa_h_R + rem_h_R * sb_h_R; fpos_b_L = pmdepth_b * (1.0f - cos_table[(unsigned long) phase_pm_b_L]); n_b_L = floorf(fpos_b_L); rem_b_L = fpos_b_L - n_b_L; sa_b_L = read_buffer(ptr->ringbuffer_b_L, ptr->buflen_b_L, ptr->pos_b_L, (unsigned long) n_b_L); sb_b_L = read_buffer(ptr->ringbuffer_b_L, ptr->buflen_b_L, ptr->pos_b_L, (unsigned long) n_b_L + 1); pm_b_L = (1 - rem_b_L) * sa_b_L + rem_b_L * sb_b_L; fpos_b_R = pmdepth_b * (1.0f - cos_table[(unsigned long) phase_pm_b_R]); n_b_R = floorf(fpos_b_R); rem_b_R = fpos_b_R - n_b_R; sa_b_R = read_buffer(ptr->ringbuffer_b_R, ptr->buflen_b_R, ptr->pos_b_R, (unsigned long) n_b_R); sb_b_R = read_buffer(ptr->ringbuffer_b_R, ptr->buflen_b_R, ptr->pos_b_R, (unsigned long) n_b_R + 1); pm_b_R = (1 - rem_b_R) * sa_b_R + rem_b_R * sb_b_R; *(output_L++) = hrbal * pm_h_L * (1.0f + 0.5f * stwidth/100.0f * cos_table[(unsigned long) phase_h_L]) + (1.0f - hrbal) * pm_b_L * (1.0f + 0.5f * stwidth/100.0f * cos_table[(unsigned long) phase_b_L]); *(output_R++) = hrbal * pm_h_R * (1.0f + 0.5f * stwidth/100.0f * cos_table[(unsigned long) phase_h_R]) + (1.0f - hrbal) * pm_b_R * (1.0f + 0.5f * stwidth/100.0f * cos_table[(unsigned long) phase_b_R]); } ptr->phase_h += 1024.0f * freq_h * sample_index / ptr->sample_rate; while (ptr->phase_h >= 1024.0f) ptr->phase_h -= 1024.0f; ptr->phase_b += 1024.0f * freq_b * sample_index / ptr->sample_rate; while (ptr->phase_b >= 1024.0f) ptr->phase_b -= 1024.0f; *(ptr->latency) = ptr->buflen_h_L / 2; } void set_run_adding_gain_RotSpkr(LV2_Handle Instance, float gain) { RotSpkr * ptr = (RotSpkr *)Instance; ptr->run_adding_gain = gain; } void run_adding_RotSpkr(LV2_Handle Instance, unsigned long SampleCount) { RotSpkr * ptr = (RotSpkr *)Instance; float * input_L = ptr->input_L; float * input_R = ptr->input_R; float * output_L = ptr->output_L; float * output_R = ptr->output_R; float freq_h = LIMIT(*(ptr->hornfreq),0.0f,PM_FREQ); float freq_b = LIMIT(*(ptr->bassfreq),0.0f,PM_FREQ); float stwidth = LIMIT(*(ptr->stwidth),0.0f,100.0f); float hrbal = LIMIT(*(ptr->hrbal),0.0f,1.0f); float pmdepth_h = LIMIT(1.0f/(1.0f+FREQ_PITCH*freq_h/C_AIR) * ptr->sample_rate / 200.0f / M_PI / freq_h, 0, ptr->buflen_h_L / 2); float pmdepth_b = LIMIT(1.0f/(1.0f+FREQ_PITCH*freq_b/C_AIR) * ptr->sample_rate / 200.0f / M_PI / freq_b, 0, ptr->buflen_b_L / 2); unsigned long sample_index; float in_L = 0.0f, in_R = 0.0f; float lo_L = 0.0f, lo_R = 0.0f; float hi_L = 0.0f, hi_R = 0.0f; float phase_h_L = 0.0f, phase_b_L = 0.0f; float phase_h_R = 0.0f, phase_b_R = 0.0f; float phase_pm_h_L = 0.0f, phase_pm_b_L = 0.0f; float phase_pm_h_R = 0.0f, phase_pm_b_R = 0.0f; float pm_h_L = 0.0f, pm_b_L = 0.0f; float pm_h_R = 0.0f, pm_b_R = 0.0f; float fpos_h_L = 0.0f, fpos_b_L = 0.0f, fpos_h_R = 0.0f, fpos_b_R = 0.0f; float n_h_L = 0.0f, n_b_L = 0.0f, n_h_R = 0.0f, n_b_R = 0.0f; float rem_h_L = 0.0f, rem_b_L = 0.0f, rem_h_R = 0.0f, rem_b_R = 0.0f; float sa_h_L = 0.0f, sa_b_L = 0.0f, sb_h_L = 0.0f, sb_b_L = 0.0f; float sa_h_R = 0.0f, sa_b_R = 0.0f, sb_h_R = 0.0f, sb_b_R = 0.0f; for (sample_index = 0; sample_index < SampleCount; sample_index++) { in_L = *(input_L++); in_R = *(input_R++); in_L = biquad_run(ptr->eq_filter_L, in_L); in_R = biquad_run(ptr->eq_filter_R, in_R); lo_L = biquad_run(ptr->lp_filter_L, in_L); lo_R = biquad_run(ptr->lp_filter_R, in_R); hi_L = biquad_run(ptr->hp_filter_L, in_L); hi_R = biquad_run(ptr->hp_filter_R, in_R); phase_h_L = 1024.0f * freq_h * sample_index / ptr->sample_rate + ptr->phase_h; while (phase_h_L >= 1024.0f) phase_h_L -= 1024.0f; phase_pm_h_L = phase_h_L + 256.0f; while (phase_pm_h_L >= 1024.0f) phase_pm_h_L -= 1024.0f; phase_h_R = phase_h_L + 512.0f; while (phase_h_R >= 1024.0f) phase_h_R -= 1024.0f; phase_pm_h_R = phase_h_R + 256.0f; while (phase_pm_h_R >= 1024.0f) phase_pm_h_R -= 1024.0f; phase_b_L = 1024.0f * freq_b * sample_index / ptr->sample_rate + ptr->phase_b; while (phase_b_L >= 1024.0f) phase_b_L -= 1024.0f; phase_pm_b_L = phase_b_L + 256.0f; while (phase_pm_b_L >= 1024.0f) phase_pm_b_L -= 1024.0f; phase_b_R = phase_b_L + 512.0f; while (phase_b_R >= 1024.0f) phase_b_R -= 1024.0f; phase_pm_b_R = phase_b_R + 256.0f; while (phase_pm_b_R >= 1024.0f) phase_pm_b_R -= 1024.0f; push_buffer(hi_L, ptr->ringbuffer_h_L, ptr->buflen_h_L, &(ptr->pos_h_L)); push_buffer(hi_R, ptr->ringbuffer_h_R, ptr->buflen_h_R, &(ptr->pos_h_R)); push_buffer(lo_L, ptr->ringbuffer_b_L, ptr->buflen_b_L, &(ptr->pos_b_L)); push_buffer(lo_R, ptr->ringbuffer_b_R, ptr->buflen_b_R, &(ptr->pos_b_R)); fpos_h_L = pmdepth_h * (1.0f - cos_table[(unsigned long) phase_pm_h_L]); n_h_L = floorf(fpos_h_L); rem_h_L = fpos_h_L - n_h_L; sa_h_L = read_buffer(ptr->ringbuffer_h_L, ptr->buflen_h_L, ptr->pos_h_L, (unsigned long) n_h_L); sb_h_L = read_buffer(ptr->ringbuffer_h_L, ptr->buflen_h_L, ptr->pos_h_L, (unsigned long) n_h_L + 1); pm_h_L = (1 - rem_h_L) * sa_h_L + rem_h_L * sb_h_L; fpos_h_R = pmdepth_h * (1.0f - cos_table[(unsigned long) phase_pm_h_R]); n_h_R = floorf(fpos_h_R); rem_h_R = fpos_h_R - n_h_R; sa_h_R = read_buffer(ptr->ringbuffer_h_R, ptr->buflen_h_R, ptr->pos_h_R, (unsigned long) n_h_R); sb_h_R = read_buffer(ptr->ringbuffer_h_R, ptr->buflen_h_R, ptr->pos_h_R, (unsigned long) n_h_R + 1); pm_h_R = (1 - rem_h_R) * sa_h_R + rem_h_R * sb_h_R; fpos_b_L = pmdepth_b * (1.0f - cos_table[(unsigned long) phase_pm_b_L]); n_b_L = floorf(fpos_b_L); rem_b_L = fpos_b_L - n_b_L; sa_b_L = read_buffer(ptr->ringbuffer_b_L, ptr->buflen_b_L, ptr->pos_b_L, (unsigned long) n_b_L); sb_b_L = read_buffer(ptr->ringbuffer_b_L, ptr->buflen_b_L, ptr->pos_b_L, (unsigned long) n_b_L + 1); pm_b_L = (1 - rem_b_L) * sa_b_L + rem_b_L * sb_b_L; fpos_b_R = pmdepth_b * (1.0f - cos_table[(unsigned long) phase_pm_b_R]); n_b_R = floorf(fpos_b_R); rem_b_R = fpos_b_R - n_b_R; sa_b_R = read_buffer(ptr->ringbuffer_b_R, ptr->buflen_b_R, ptr->pos_b_R, (unsigned long) n_b_R); sb_b_R = read_buffer(ptr->ringbuffer_b_R, ptr->buflen_b_R, ptr->pos_b_R, (unsigned long) n_b_R + 1); pm_b_R = (1 - rem_b_R) * sa_b_R + rem_b_R * sb_b_R; *(output_L++) += ptr->run_adding_gain * hrbal * pm_h_L * (1.0f + 0.5f * stwidth/100.0f * cos_table[(unsigned long) phase_h_L]) + (1.0f - hrbal) * pm_b_L * (1.0f + 0.5f * stwidth/100.0f * cos_table[(unsigned long) phase_b_L]); *(output_R++) += ptr->run_adding_gain * hrbal * pm_h_R * (1.0f + 0.5f * stwidth/100.0f * cos_table[(unsigned long) phase_h_R]) + (1.0f - hrbal) * pm_b_R * (1.0f + 0.5f * stwidth/100.0f * cos_table[(unsigned long) phase_b_R]); } ptr->phase_h += 1024.0f * freq_h * sample_index / ptr->sample_rate; while (ptr->phase_h >= 1024.0f) ptr->phase_h -= 1024.0f; ptr->phase_b += 1024.0f * freq_b * sample_index / ptr->sample_rate; while (ptr->phase_b >= 1024.0f) ptr->phase_b -= 1024.0f; *(ptr->latency) = ptr->buflen_h_L / 2; } /* Throw away an RotSpkr effect instance. */ void cleanup_RotSpkr(LV2_Handle Instance) { RotSpkr * ptr = (RotSpkr *)Instance; free(ptr->ringbuffer_h_L); free(ptr->ringbuffer_h_R); free(ptr->ringbuffer_b_L); free(ptr->ringbuffer_b_R); free(ptr->eq_filter_L); free(ptr->eq_filter_R); free(ptr->lp_filter_L); free(ptr->lp_filter_R); free(ptr->hp_filter_L); free(ptr->hp_filter_R); free(Instance); } const void* extension_data_RotSpkr(const char* uri) { return NULL; } static const LV2_Descriptor Descriptor = { "http://moddevices.com/plugins/tap/rotspeak", instantiate_RotSpkr, connect_port_RotSpkr, activate_RotSpkr, run_RotSpkr, NULL, cleanup_RotSpkr, extension_data_RotSpkr }; LV2_SYMBOL_EXPORT const LV2_Descriptor * lv2_descriptor(uint32_t Index) { switch (Index) { case 0: return &Descriptor; default: return NULL; } } /* _init() is called automatically when the plugin library is first loaded. */ //void //_init() { //int i; //char ** port_names; //LV2_PortDescriptor * port_descriptors; //LV2_PortRangeHint * port_range_hints; //if ((stereo_descriptor = //(LV2_Descriptor *)malloc(sizeof(LV2_Descriptor))) == NULL) //exit(1); //for (i = 0; i < 1024; i++) //cos_table[i] = cosf(i * M_PI / 512.0f); //stereo_descriptor->UniqueID = ID_STEREO; //stereo_descriptor->Label = strdup("tap_rotspeak"); //stereo_descriptor->Properties = LV2_PROPERTY_HARD_RT_CAPABLE; //stereo_descriptor->Name = strdup("TAP Rotary Speaker"); //stereo_descriptor->Maker = strdup("Tom Szilagyi"); //stereo_descriptor->Copyright = strdup("GPL"); //stereo_descriptor->PortCount = PORTCOUNT_STEREO; //if ((port_descriptors = //(LV2_PortDescriptor *)calloc(PORTCOUNT_STEREO, sizeof(LV2_PortDescriptor))) == NULL) //exit(1); //stereo_descriptor->PortDescriptors = (const LV2_PortDescriptor *)port_descriptors; //port_descriptors[HORNFREQ] = LV2_PORT_INPUT | LV2_PORT_CONTROL; //port_descriptors[BASSFREQ] = LV2_PORT_INPUT | LV2_PORT_CONTROL; //port_descriptors[STWIDTH] = LV2_PORT_INPUT | LV2_PORT_CONTROL; //port_descriptors[HRBAL] = LV2_PORT_INPUT | LV2_PORT_CONTROL; //port_descriptors[LATENCY] = LV2_PORT_OUTPUT | LV2_PORT_CONTROL; //port_descriptors[INPUT_L] = LV2_PORT_INPUT | LV2_PORT_AUDIO; //port_descriptors[INPUT_R] = LV2_PORT_INPUT | LV2_PORT_AUDIO; //port_descriptors[OUTPUT_L] = LV2_PORT_OUTPUT | LV2_PORT_AUDIO; //port_descriptors[OUTPUT_R] = LV2_PORT_OUTPUT | LV2_PORT_AUDIO; //if ((port_names = //(char **)calloc(PORTCOUNT_STEREO, sizeof(char *))) == NULL) //exit(1); //stereo_descriptor->PortNames = (const char **)port_names; //port_names[HORNFREQ] = strdup("Horn Frequency [Hz]"); //port_names[BASSFREQ] = strdup("Rotor Frequency [Hz]"); //port_names[STWIDTH] = strdup("Mic Distance [%]"); //port_names[HRBAL] = strdup("Rotor/Horn Mix"); //port_names[LATENCY] = strdup("latency"); //port_names[INPUT_L] = strdup("Input L"); //port_names[INPUT_R] = strdup("Input R"); //port_names[OUTPUT_L] = strdup("Output L"); //port_names[OUTPUT_R] = strdup("Output R"); //if ((port_range_hints = //((LV2_PortRangeHint *)calloc(PORTCOUNT_STEREO, sizeof(LV2_PortRangeHint)))) == NULL) //exit(1); //stereo_descriptor->PortRangeHints = (const LV2_PortRangeHint *)port_range_hints; //port_range_hints[HORNFREQ].HintDescriptor = //(LV2_HINT_BOUNDED_BELOW | //LV2_HINT_BOUNDED_ABOVE | //LV2_HINT_DEFAULT_0); //port_range_hints[BASSFREQ].HintDescriptor = //(LV2_HINT_BOUNDED_BELOW | //LV2_HINT_BOUNDED_ABOVE | //LV2_HINT_DEFAULT_0); //port_range_hints[STWIDTH].HintDescriptor = //(LV2_HINT_BOUNDED_BELOW | //LV2_HINT_BOUNDED_ABOVE | //LV2_HINT_DEFAULT_LOW); //port_range_hints[HRBAL].HintDescriptor = //(LV2_HINT_BOUNDED_BELOW | //LV2_HINT_BOUNDED_ABOVE | //LV2_HINT_DEFAULT_MIDDLE); //port_range_hints[LATENCY].HintDescriptor = //(LV2_HINT_BOUNDED_BELOW | //LV2_HINT_BOUNDED_ABOVE | //LV2_HINT_DEFAULT_MAXIMUM); //port_range_hints[HORNFREQ].LowerBound = 0; //port_range_hints[HORNFREQ].UpperBound = PM_FREQ; //port_range_hints[BASSFREQ].LowerBound = 0; //port_range_hints[BASSFREQ].UpperBound = PM_FREQ; //port_range_hints[STWIDTH].LowerBound = 0; //port_range_hints[STWIDTH].UpperBound = 100.0f; //port_range_hints[HRBAL].LowerBound = 0; //port_range_hints[HRBAL].UpperBound = 1.0f; //port_range_hints[LATENCY].LowerBound = 0; //port_range_hints[LATENCY].UpperBound = PM_DEPTH; //port_range_hints[INPUT_L].HintDescriptor = 0; //port_range_hints[INPUT_R].HintDescriptor = 0; //port_range_hints[OUTPUT_L].HintDescriptor = 0; //port_range_hints[OUTPUT_R].HintDescriptor = 0; //stereo_descriptor->instantiate = instantiate_RotSpkr; //stereo_descriptor->connect_port = connect_port_RotSpkr; //stereo_descriptor->activate = activate_RotSpkr; //stereo_descriptor->run = run_RotSpkr; //stereo_descriptor->run_adding = run_adding_RotSpkr; //stereo_descriptor->set_run_adding_gain = set_run_adding_gain_RotSpkr; //stereo_descriptor->deactivate = NULL; //stereo_descriptor->cleanup = cleanup_RotSpkr; //} //void //delete_descriptor(LV2_Descriptor * descriptor) { //unsigned long index; //if (descriptor) { //free((char *)descriptor->Label); //free((char *)descriptor->Name); //free((char *)descriptor->Maker); //free((char *)descriptor->Copyright); //free((LV2_PortDescriptor *)descriptor->PortDescriptors); //for (index = 0; index < descriptor->PortCount; index++) //free((char *)(descriptor->PortNames[index])); //free((char **)descriptor->PortNames); //free((LV2_PortRangeHint *)descriptor->PortRangeHints); //free(descriptor); //} //} ///* _fini() is called automatically when the library is unloaded. */ //void //_fini() { //delete_descriptor(stereo_descriptor); //} ///* Return a descriptor of the requested plugin type. */ //const LV2_Descriptor * //lv2_descriptor(unsigned long Index) { //switch (Index) { //case 0: //return stereo_descriptor; //default: //return NULL; //} //}