float* output0;
float* output1;
+ uint32_t n_channels;
+
float srate;
float makeup_gain;
{
AComp* acomp = (AComp*)calloc(1, sizeof(AComp));
+ if (!strcmp (descriptor->URI, ACOMP_URI)) {
+ acomp->n_channels = 1;
+ } else if (!strcmp (descriptor->URI, ACOMP_STEREO_URI)) {
+ acomp->n_channels = 2;
+ } else {
+ free (acomp);
+ return NULL;
+ }
+
for (int i=0; features[i]; ++i) {
#ifdef LV2_EXTENDED
if (!strcmp(features[i]->URI, LV2_INLINEDISPLAY__queue_draw)) {
}
static void
-run_mono(LV2_Handle instance, uint32_t n_samples)
+run(LV2_Handle instance, uint32_t n_samples)
{
AComp* acomp = (AComp*)instance;
- const float* const input = acomp->input0;
+ const float* const ins[2] = { acomp->input0, acomp->input1 };
const float* const sc = acomp->sc;
- float* const output = acomp->output0;
+ float* const outs[2] = { acomp->output0, acomp->output1 };
float srate = acomp->srate;
float width = (6.f * *(acomp->knee)) + 0.01;
float attack_coeff = exp(-1000.f/(*(acomp->attack) * srate));
float release_coeff = exp(-1000.f/(*(acomp->release) * srate));
- float max = 0.f;
- float lgaininp = 0.f;
+ float max_out = 0.f;
float Lgain = 1.f;
float Lxg, Lyg;
float current_gainr;
int usesidechain = (*(acomp->sidechain) <= 0.f) ? 0 : 1;
uint32_t i;
float ingain;
- float in0;
float sc0;
+ float maxabs;
- float ratio = *acomp->ratio;
- float thresdb = *acomp->thresdb;
- float makeup = *acomp->makeup;
- float makeup_target = from_dB(makeup);
- float makeup_gain = acomp->makeup_gain;
-
- const float tau = (1.0 - exp (-2.f * M_PI * 25.f / acomp->srate));
-
- if (*acomp->enable <= 0) {
- ratio = 1.f;
- thresdb = 0.f;
- makeup = 0.f;
- makeup_target = 1.f;
- }
-
-#ifdef LV2_EXTENDED
- if (acomp->v_knee != *acomp->knee) {
- acomp->v_knee = *acomp->knee;
- acomp->need_expose = true;
- }
-
- if (acomp->v_ratio != ratio) {
- acomp->v_ratio = ratio;
- acomp->need_expose = true;
- }
-
- if (acomp->v_thresdb != thresdb) {
- acomp->v_thresdb = thresdb;
- acomp->need_expose = true;
- }
-
- if (acomp->v_makeup != makeup) {
- acomp->v_makeup = makeup;
- acomp->need_expose = true;
- }
-
- bool full_inline = *acomp->full_inline_display > 0.5;
- if (full_inline != acomp->v_full_inline_display) {
- acomp->v_full_inline_display = full_inline;
- acomp->need_expose = true;
- }
-#endif
-
- float in_peak_db = -160.f;
- float max_gainr = 0.f;
-
- for (i = 0; i < n_samples; i++) {
- in0 = input[i];
- sc0 = sc[i];
- ingain = usesidechain ? fabs(sc0) : fabs(in0);
- Lyg = 0.f;
- Lxg = (ingain==0.f) ? -160.f : to_dB(ingain);
- Lxg = sanitize_denormal(Lxg);
-
- if (Lxg > in_peak_db) {
- in_peak_db = Lxg;
- }
-
- if (2.f*(Lxg-thresdb) < -width) {
- Lyg = Lxg;
- } else if (2.f*(Lxg-thresdb) > width) {
- Lyg = thresdb + (Lxg-thresdb)/ratio;
- Lyg = sanitize_denormal(Lyg);
- } else {
- Lyg = Lxg + (1.f/ratio-1.f)*(Lxg-thresdb+width/2.f)*(Lxg-thresdb+width/2.f)/(2.f*width);
- }
-
- current_gainr = Lxg - Lyg;
-
- if (current_gainr < old_gainr) {
- current_gainr = release_coeff*old_gainr + (1.f-release_coeff)*current_gainr;
- } else if (current_gainr > old_gainr) {
- current_gainr = attack_coeff*old_gainr + (1.f-attack_coeff)*current_gainr;
- }
-
- current_gainr = sanitize_denormal(current_gainr);
-
- Lgain = from_dB(-current_gainr);
-
- old_gainr = current_gainr;
-
- *(acomp->gainr) = current_gainr;
- if (current_gainr > max_gainr) {
- max_gainr = current_gainr;
- }
-
- lgaininp = in0 * Lgain;
-
- makeup_gain += tau * (makeup_target - makeup_gain);
- output[i] = lgaininp * makeup_gain;
-
- max = (fabsf(output[i]) > max) ? fabsf(output[i]) : sanitize_denormal(max);
- }
-
- if (fabsf(tau * (makeup_gain - makeup_target)) < FLT_EPSILON*makeup_gain) {
- makeup_gain = makeup_target;
- }
-
- *(acomp->outlevel) = (max < 0.0056f) ? -70.f : to_dB(max);
- *(acomp->inlevel) = in_peak_db;
- acomp->makeup_gain = makeup_gain;
-
-#ifdef LV2_EXTENDED
- acomp->v_gainr = max_gainr;
-
- if (in_peak_db > acomp->v_peakdb) {
- acomp->v_peakdb = in_peak_db;
- acomp->peakdb_samples = 0;
- } else {
- acomp->peakdb_samples += n_samples;
- if ((float)acomp->peakdb_samples/acomp->srate > RESET_PEAK_AFTER_SECONDS) {
- acomp->v_peakdb = in_peak_db;
- acomp->peakdb_samples = 0;
- acomp->need_expose = true;
- }
- }
-
- const float v_lvl_in = in_peak_db;
- const float v_lvl_out = *acomp->outlevel;
-
- float state_x;
-
- const float knee_lim_gr = (1.f - 1.f/ratio) * width/2.f;
-
- if (acomp->v_gainr > knee_lim_gr) {
- state_x = acomp->v_gainr / (1.f - 1.f/ratio) + thresdb;
- } else {
- state_x = sqrt ( (2.f*width*acomp->v_gainr) / (1.f-1.f/ratio) ) + thresdb - width/2.f;
- }
-
- if (fabsf (acomp->v_lvl_out - v_lvl_out) >= .1f ||
- fabsf (acomp->v_lvl_in - v_lvl_in) >= .1f ||
- fabsf (acomp->v_state_x - state_x) >= .1f ) {
- // >= 0.1dB difference
- acomp->need_expose = true;
- acomp->v_lvl_in = v_lvl_in;
- acomp->v_lvl_out = v_lvl_out;
- acomp->v_state_x = state_x;
- }
- if (acomp->need_expose && acomp->queue_draw) {
- acomp->need_expose = false;
- acomp->queue_draw->queue_draw (acomp->queue_draw->handle);
- }
-#endif
-}
-
-static void
-run_stereo(LV2_Handle instance, uint32_t n_samples)
-{
- AComp* acomp = (AComp*)instance;
-
- const float* const input0 = acomp->input0;
- const float* const input1 = acomp->input1;
- const float* const sc = acomp->sc;
- float* const output0 = acomp->output0;
- float* const output1 = acomp->output1;
-
- float srate = acomp->srate;
- float width = (6.f * *(acomp->knee)) + 0.01;
- float attack_coeff = exp(-1000.f/(*(acomp->attack) * srate));
- float release_coeff = exp(-1000.f/(*(acomp->release) * srate));
-
- float max = 0.f;
- float lgaininp = 0.f;
- float rgaininp = 0.f;
- float Lgain = 1.f;
- float Lxg, Lyg;
- float current_gainr;
- float old_gainr = *acomp->gainr;
-
- int usesidechain = (*(acomp->sidechain) <= 0.f) ? 0 : 1;
- uint32_t i;
- float ingain;
- float in0;
- float in1;
- float sc0;
- float maxabslr;
+ uint32_t n_channels = acomp->n_channels;
float ratio = *acomp->ratio;
float thresdb = *acomp->thresdb;
float max_gainr = 0.f;
for (i = 0; i < n_samples; i++) {
- in0 = input0[i];
- in1 = input1[i];
+ maxabs = 0.f;
+ for (uint32_t c=0; c<n_channels; ++c) {
+ maxabs = fmaxf(fabsf(ins[c][i]), maxabs);
+ }
sc0 = sc[i];
- maxabslr = fmaxf(fabs(in0), fabs(in1));
- ingain = usesidechain ? fabs(sc0) : maxabslr;
+ ingain = usesidechain ? fabs(sc0) : maxabs;
Lyg = 0.f;
Lxg = (ingain==0.f) ? -160.f : to_dB(ingain);
Lxg = sanitize_denormal(Lxg);
max_gainr = current_gainr;
}
- lgaininp = in0 * Lgain;
- rgaininp = in1 * Lgain;
-
makeup_gain += tau * (makeup_target - makeup_gain);
- output0[i] = lgaininp * makeup_gain;
- output1[i] = rgaininp * makeup_gain;
-
- max = (fmaxf(fabs(output0[i]), fabs(output1[i])) > max) ? fmaxf(fabs(output0[i]), fabs(output1[i])) : sanitize_denormal(max);
+ for (uint32_t c=0; c<n_channels; ++c) {
+ float out = ins[c][i] * Lgain * makeup_gain;
+ outs[c][i] = out;
+ out = fabsf (out);
+ if (out > max_out) {
+ max_out = out;
+ sanitize_denormal(max_out);
+ }
+ }
}
if (fabsf(tau * (makeup_gain - makeup_target)) < FLT_EPSILON*makeup_gain) {
makeup_gain = makeup_target;
}
- *(acomp->outlevel) = (max < 0.0056f) ? -70.f : to_dB(max);
+ *(acomp->outlevel) = (max_out < 0.0056f) ? -70.f : to_dB(max_out);
*(acomp->inlevel) = in_peak_db;
acomp->makeup_gain = makeup_gain;
return yg;
}
+
+#include "dynamic_display.c"
+
static void
render_inline_full (cairo_t* cr, const AComp* self)
{
const float makeup_thres = self->v_thresdb + self->v_makeup;
- // clear background
- cairo_rectangle (cr, 0, 0, w, h);
- cairo_set_source_rgba (cr, .2, .2, .2, 1.0);
- cairo_fill (cr);
-
- cairo_set_line_width(cr, 1.0);
-
- // draw grid 10dB steps
- const double dash1[] = {1, 2};
- const double dash2[] = {1, 3};
- cairo_save (cr);
- cairo_set_line_cap(cr, CAIRO_LINE_CAP_ROUND);
- cairo_set_dash(cr, dash2, 2, 2);
- cairo_set_source_rgba (cr, 0.5, 0.5, 0.5, 0.5);
+ draw_grid (cr, w,h);
- for (uint32_t d = 1; d < 7; ++d) {
- const float x = -.5 + floorf (w * (d * 10.f / 70.f));
- const float y = -.5 + floorf (h * (d * 10.f / 70.f));
-
- cairo_move_to (cr, x, 0);
- cairo_line_to (cr, x, h);
- cairo_stroke (cr);
-
- cairo_move_to (cr, 0, y);
- cairo_line_to (cr, w, y);
- cairo_stroke (cr);
- }
- cairo_set_source_rgba (cr, 0.5, 0.5, 0.5, 1.0);
- cairo_set_dash(cr, dash1, 2, 2);
if (self->v_thresdb < 0) {
const float y = -.5 + floorf (h * ((makeup_thres - 10.f) / -70.f));
cairo_move_to (cr, 0, y);
cairo_line_to (cr, w, y);
cairo_stroke (cr);
}
- // diagonal unity
- cairo_move_to (cr, 0, h);
- cairo_line_to (cr, w, 0);
- cairo_stroke (cr);
- cairo_restore (cr);
- { // 0, 0
- cairo_set_source_rgba (cr, 0.5, 0.5, 0.5, 0.5);
- const float x = -.5 + floorf (w * (60.f / 70.f));
- const float y = -.5 + floorf (h * (10.f / 70.f));
- cairo_move_to (cr, x, 0);
- cairo_line_to (cr, x, h);
- cairo_stroke (cr);
- cairo_move_to (cr, 0, y);
- cairo_line_to (cr, w, y);
- cairo_stroke (cr);
- }
-
- { // GR
- const float x = -.5 + floorf (w * (62.5f / 70.f));
- const float y = -.5 + floorf (h * (10.0f / 70.f));
- const float wd = floorf (w * (5.f / 70.f));
- const float ht = floorf (h * (55.f / 70.f));
- cairo_rectangle (cr, x, y, wd, ht);
- cairo_fill (cr);
-
- const float h_gr = fminf (ht, floorf (h * self->v_gainr / 70.f));
- cairo_set_source_rgba (cr, 0.95, 0.0, 0.0, 1.0);
- cairo_rectangle (cr, x, y, wd, h_gr);
- cairo_fill (cr);
- cairo_set_source_rgba (cr, 0.5, 0.5, 0.5, 0.5);
- cairo_rectangle (cr, x, y, wd, ht);
- cairo_set_source_rgba (cr, 0.75, 0.75, 0.75, 1.0);
- cairo_stroke (cr);
- }
+ draw_GR_bar (cr, w,h, self->v_gainr);
// draw state
cairo_set_source_rgba (cr, .8, .8, .8, 1.0);
static void
render_inline_only_bars (cairo_t* cr, const AComp* self)
{
- const float w = self->w;
- const float h = self->h;
-
- cairo_rectangle (cr, 0, 0, w, h);
- cairo_set_source_rgba (cr, .2, .2, .2, 1.0);
- cairo_fill (cr);
-
-
- cairo_save (cr);
-
- const float ht = 0.25f * h;
-
- const float x1 = w*0.05;
- const float wd = w - 2.0f*x1;
-
- const float y1 = 0.17*h;
- const float y2 = h - y1 - ht;
-
- cairo_set_source_rgba (cr, 0.5, 0.5, 0.5, 0.5);
-
- cairo_rectangle (cr, x1, y1, wd, ht);
- cairo_fill (cr);
-
- cairo_rectangle (cr, x1, y2, wd, ht);
- cairo_fill (cr);
-
- cairo_set_source_rgba (cr, 0.75, 0.0, 0.0, 1.0);
- const float w_gr = (self->v_gainr > 60.f) ? wd : wd * self->v_gainr * (1.f/60.f);
- cairo_rectangle (cr, x1+wd-w_gr, y2, w_gr, ht);
- cairo_fill (cr);
-
- if (self->v_lvl_in > -60.f) {
- if (self->v_lvl_out > 6.f) {
- cairo_set_source_rgba (cr, 0.75, 0.0, 0.0, 1.0);
- } else if (self->v_lvl_out > 0.f) {
- cairo_set_source_rgba (cr, 0.66, 0.66, 0.0, 1.0);
- } else {
- cairo_set_source_rgba (cr, 0.0, 0.66, 0.0, 1.0);
- }
- const float w_g = (self->v_lvl_in > 10.f) ? wd : wd * (60.f+self->v_lvl_in) / 70.f;
- cairo_rectangle (cr, x1, y1, w_g, ht);
- cairo_fill (cr);
- }
-
- cairo_set_source_rgba (cr, 1.0, 1.0, 1.0, 1.0);
-
- const float tck = 0.33*ht;
-
- cairo_set_line_width (cr, .5);
-
- for (uint32_t d = 1; d < 7; ++d) {
- const float x = x1 + (d * wd * (10.f / 70.f));
-
- cairo_move_to (cr, x, y1);
- cairo_line_to (cr, x, y1+tck);
-
- cairo_move_to (cr, x, y1+ht);
- cairo_line_to (cr, x, y1+ht-tck);
-
- cairo_move_to (cr, x, y2);
- cairo_line_to (cr, x, y2+tck);
-
- cairo_move_to (cr, x, y2+ht);
- cairo_line_to (cr, x, y2+ht-tck);
- }
-
- cairo_stroke (cr);
-
- const float x_0dB = x1 + wd*(60.f/70.f);
-
- cairo_move_to (cr, x_0dB, y1);
- cairo_line_to (cr, x_0dB, y1+ht);
-
- cairo_rectangle (cr, x1, y1, wd, ht);
- cairo_rectangle (cr, x1, y2, wd, ht);
- cairo_stroke (cr);
-
- cairo_set_line_width (cr, 2.0);
-
- // visualize threshold
- const float tr = x1 + wd * (60.f+self->v_thresdb) / 70.f;
- cairo_set_source_rgba (cr, 0.95, 0.95, 0.0, 1.0);
- cairo_move_to (cr, tr, y1);
- cairo_line_to (cr, tr, y1+ht);
- cairo_stroke (cr);
-
- // visualize ratio
- const float reduced_0dB = self->v_thresdb * (1.f - 1.f/self->v_ratio);
- const float rt = x1 + wd * (60.f+reduced_0dB) / 70.f;
- cairo_set_source_rgba (cr, 0.95, 0.0, 0.0, 1.0);
- cairo_move_to (cr, rt, y1);
- cairo_line_to (cr, rt, y1+ht);
- cairo_stroke (cr);
-
- // visualize in peak
- if (self->v_peakdb > -60.f) {
- cairo_set_source_rgba (cr, 0.0, 1.0, 0.0, 1.0);
- const float pk = (self->v_peakdb > 10.f) ? x1+wd : wd * (60.f+self->v_peakdb) / 70.f;
- cairo_move_to (cr, pk, y1);
- cairo_line_to (cr, pk, y1+ht);
- cairo_stroke (cr);
- }
+ draw_inline_bars (cr, self->w, self->h,
+ self->v_thresdb, self->v_ratio,
+ self->v_peakdb, self->v_gainr,
+ self->v_lvl_in, self->v_lvl_out);
}
static LV2_Inline_Display_Image_Surface *
instantiate,
connect_mono,
activate,
- run_mono,
+ run,
deactivate,
cleanup,
extension_data
instantiate,
connect_stereo,
activate,
- run_stereo,
+ run,
deactivate,
cleanup,
extension_data