aboutsummaryrefslogtreecommitdiffstats
path: root/plugins/LinuxVST/src/HighImpact/HighImpactProc.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/LinuxVST/src/HighImpact/HighImpactProc.cpp')
-rwxr-xr-xplugins/LinuxVST/src/HighImpact/HighImpactProc.cpp379
1 files changed, 379 insertions, 0 deletions
diff --git a/plugins/LinuxVST/src/HighImpact/HighImpactProc.cpp b/plugins/LinuxVST/src/HighImpact/HighImpactProc.cpp
new file mode 100755
index 0000000..037bbe9
--- /dev/null
+++ b/plugins/LinuxVST/src/HighImpact/HighImpactProc.cpp
@@ -0,0 +1,379 @@
+/* ========================================
+ * HighImpact - HighImpact.h
+ * Copyright (c) 2016 airwindows, All rights reserved
+ * ======================================== */
+
+#ifndef __HighImpact_H
+#include "HighImpact.h"
+#endif
+
+void HighImpact::processReplacing(float **inputs, float **outputs, VstInt32 sampleFrames)
+{
+ float* in1 = inputs[0];
+ float* in2 = inputs[1];
+ float* out1 = outputs[0];
+ float* out2 = outputs[1];
+
+ float fpTemp;
+ long double fpOld = 0.618033988749894848204586; //golden ratio!
+ long double fpNew = 1.0 - fpOld;
+
+ long double inputSampleL;
+ long double inputSampleR;
+ long double drySampleL;
+ long double drySampleR;
+
+ double density = A*5.0;
+ double out = density / 5.0;
+ double sustain = 1.0 - (1.0/(1.0 + (density*A)));
+ double bridgerectifier;
+ double count;
+ double output = B;
+ double wet = C;
+ double dry = 1.0-wet;
+ double clamp;
+ double threshold = (1.25 - out);
+
+ while (--sampleFrames >= 0)
+ {
+ inputSampleL = *in1;
+ inputSampleR = *in2;
+ if (inputSampleL<1.2e-38 && -inputSampleL<1.2e-38) {
+ static int noisesource = 0;
+ //this declares a variable before anything else is compiled. It won't keep assigning
+ //it to 0 for every sample, it's as if the declaration doesn't exist in this context,
+ //but it lets me add this denormalization fix in a single place rather than updating
+ //it in three different locations. The variable isn't thread-safe but this is only
+ //a random seed and we can share it with whatever.
+ noisesource = noisesource % 1700021; noisesource++;
+ int residue = noisesource * noisesource;
+ residue = residue % 170003; residue *= residue;
+ residue = residue % 17011; residue *= residue;
+ residue = residue % 1709; residue *= residue;
+ residue = residue % 173; residue *= residue;
+ residue = residue % 17;
+ double applyresidue = residue;
+ applyresidue *= 0.00000001;
+ applyresidue *= 0.00000001;
+ inputSampleL = applyresidue;
+ }
+ if (inputSampleR<1.2e-38 && -inputSampleR<1.2e-38) {
+ static int noisesource = 0;
+ noisesource = noisesource % 1700021; noisesource++;
+ int residue = noisesource * noisesource;
+ residue = residue % 170003; residue *= residue;
+ residue = residue % 17011; residue *= residue;
+ residue = residue % 1709; residue *= residue;
+ residue = residue % 173; residue *= residue;
+ residue = residue % 17;
+ double applyresidue = residue;
+ applyresidue *= 0.00000001;
+ applyresidue *= 0.00000001;
+ inputSampleR = applyresidue;
+ //this denormalization routine produces a white noise at -300 dB which the noise
+ //shaping will interact with to produce a bipolar output, but the noise is actually
+ //all positive. That should stop any variables from going denormal, and the routine
+ //only kicks in if digital black is input. As a final touch, if you save to 24-bit
+ //the silence will return to being digital black again.
+ }
+ drySampleL = inputSampleL;
+ drySampleR = inputSampleR;
+
+ count = density;
+ while (count > 1.0)
+ {
+ bridgerectifier = fabs(inputSampleL)*1.57079633;
+ if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
+ //max value for sine function
+ bridgerectifier = sin(bridgerectifier);
+ if (inputSampleL > 0.0) inputSampleL = bridgerectifier;
+ else inputSampleL = -bridgerectifier;
+
+ bridgerectifier = fabs(inputSampleR)*1.57079633;
+ if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
+ //max value for sine function
+ bridgerectifier = sin(bridgerectifier);
+ if (inputSampleR > 0.0) inputSampleR = bridgerectifier;
+ else inputSampleR = -bridgerectifier;
+
+ count = count - 1.0;
+ }
+ //we have now accounted for any really high density settings.
+
+ while (out > 1.0) out = out - 1.0;
+
+ bridgerectifier = fabs(inputSampleL)*1.57079633;
+ if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
+ //max value for sine function
+ if (density > 0) bridgerectifier = sin(bridgerectifier);
+ else bridgerectifier = 1-cos(bridgerectifier);
+ //produce either boosted or starved version
+ if (inputSampleL > 0) inputSampleL = (inputSampleL*(1-out))+(bridgerectifier*out);
+ else inputSampleL = (inputSampleL*(1-out))-(bridgerectifier*out);
+ //blend according to density control
+
+ bridgerectifier = fabs(inputSampleR)*1.57079633;
+ if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
+ //max value for sine function
+ if (density > 0) bridgerectifier = sin(bridgerectifier);
+ else bridgerectifier = 1-cos(bridgerectifier);
+ //produce either boosted or starved version
+ if (inputSampleR > 0) inputSampleR = (inputSampleR*(1-out))+(bridgerectifier*out);
+ else inputSampleR = (inputSampleR*(1-out))-(bridgerectifier*out);
+ //blend according to density control
+
+
+ //done first density. Next, sustain-reducer
+ bridgerectifier = fabs(inputSampleL)*1.57079633;
+ if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
+ bridgerectifier = 1-cos(bridgerectifier);
+ if (inputSampleL > 0) inputSampleL = (inputSampleL*(1-sustain))+(bridgerectifier*sustain);
+ else inputSampleL = (inputSampleL*(1-sustain))-(bridgerectifier*sustain);
+ //done sustain removing, converted to Slew inputs
+
+ //done first density. Next, sustain-reducer
+ bridgerectifier = fabs(inputSampleR)*1.57079633;
+ if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
+ bridgerectifier = 1-cos(bridgerectifier);
+ if (inputSampleR > 0) inputSampleR = (inputSampleR*(1-sustain))+(bridgerectifier*sustain);
+ else inputSampleR = (inputSampleR*(1-sustain))-(bridgerectifier*sustain);
+ //done sustain removing, converted to Slew inputs
+
+ clamp = inputSampleL - lastSampleL;
+ if (clamp > threshold)
+ inputSampleL = lastSampleL + threshold;
+ if (-clamp > threshold)
+ inputSampleL = lastSampleL - threshold;
+ lastSampleL = inputSampleL;
+
+ clamp = inputSampleR - lastSampleR;
+ if (clamp > threshold)
+ inputSampleR = lastSampleR + threshold;
+ if (-clamp > threshold)
+ inputSampleR = lastSampleR - threshold;
+ lastSampleR = inputSampleR;
+
+ if (output < 1.0) {inputSampleL *= output; inputSampleR *= output;}
+ if (wet < 1.0) {
+ inputSampleL = (drySampleL * dry)+(inputSampleL*wet);
+ inputSampleR = (drySampleR * dry)+(inputSampleR*wet);
+ }
+ //nice little output stage template: if we have another scale of floating point
+ //number, we really don't want to meaninglessly multiply that by 1.0.
+
+ //noise shaping to 32-bit floating point
+ if (fpFlip) {
+ fpTemp = inputSampleL;
+ fpNShapeLA = (fpNShapeLA*fpOld)+((inputSampleL-fpTemp)*fpNew);
+ inputSampleL += fpNShapeLA;
+ fpTemp = inputSampleR;
+ fpNShapeRA = (fpNShapeRA*fpOld)+((inputSampleR-fpTemp)*fpNew);
+ inputSampleR += fpNShapeRA;
+ }
+ else {
+ fpTemp = inputSampleL;
+ fpNShapeLB = (fpNShapeLB*fpOld)+((inputSampleL-fpTemp)*fpNew);
+ inputSampleL += fpNShapeLB;
+ fpTemp = inputSampleR;
+ fpNShapeRB = (fpNShapeRB*fpOld)+((inputSampleR-fpTemp)*fpNew);
+ inputSampleR += fpNShapeRB;
+ }
+ fpFlip = !fpFlip;
+ //end noise shaping on 32 bit output
+
+ *out1 = inputSampleL;
+ *out2 = inputSampleR;
+
+ *in1++;
+ *in2++;
+ *out1++;
+ *out2++;
+ }
+}
+
+void HighImpact::processDoubleReplacing(double **inputs, double **outputs, VstInt32 sampleFrames)
+{
+ double* in1 = inputs[0];
+ double* in2 = inputs[1];
+ double* out1 = outputs[0];
+ double* out2 = outputs[1];
+
+ double overallscale = 1.0;
+ overallscale /= 44100.0;
+ overallscale *= getSampleRate();
+ double fpTemp; //this is different from singlereplacing
+ long double fpOld = 0.618033988749894848204586; //golden ratio!
+ long double fpNew = 1.0 - fpOld;
+
+ long double inputSampleL;
+ long double inputSampleR;
+ long double drySampleL;
+ long double drySampleR;
+
+ double density = A*5.0;
+ double out = density / 5.0;
+ double sustain = 1.0 - (1.0/(1.0 + (density*A)));
+ double bridgerectifier;
+ double count;
+ double output = B;
+ double wet = C;
+ double dry = 1.0-wet;
+ double clamp;
+ double threshold = (1.25 - out);
+
+ while (--sampleFrames >= 0)
+ {
+ inputSampleL = *in1;
+ inputSampleR = *in2;
+ if (inputSampleL<1.2e-38 && -inputSampleL<1.2e-38) {
+ static int noisesource = 0;
+ //this declares a variable before anything else is compiled. It won't keep assigning
+ //it to 0 for every sample, it's as if the declaration doesn't exist in this context,
+ //but it lets me add this denormalization fix in a single place rather than updating
+ //it in three different locations. The variable isn't thread-safe but this is only
+ //a random seed and we can share it with whatever.
+ noisesource = noisesource % 1700021; noisesource++;
+ int residue = noisesource * noisesource;
+ residue = residue % 170003; residue *= residue;
+ residue = residue % 17011; residue *= residue;
+ residue = residue % 1709; residue *= residue;
+ residue = residue % 173; residue *= residue;
+ residue = residue % 17;
+ double applyresidue = residue;
+ applyresidue *= 0.00000001;
+ applyresidue *= 0.00000001;
+ inputSampleL = applyresidue;
+ }
+ if (inputSampleR<1.2e-38 && -inputSampleR<1.2e-38) {
+ static int noisesource = 0;
+ noisesource = noisesource % 1700021; noisesource++;
+ int residue = noisesource * noisesource;
+ residue = residue % 170003; residue *= residue;
+ residue = residue % 17011; residue *= residue;
+ residue = residue % 1709; residue *= residue;
+ residue = residue % 173; residue *= residue;
+ residue = residue % 17;
+ double applyresidue = residue;
+ applyresidue *= 0.00000001;
+ applyresidue *= 0.00000001;
+ inputSampleR = applyresidue;
+ //this denormalization routine produces a white noise at -300 dB which the noise
+ //shaping will interact with to produce a bipolar output, but the noise is actually
+ //all positive. That should stop any variables from going denormal, and the routine
+ //only kicks in if digital black is input. As a final touch, if you save to 24-bit
+ //the silence will return to being digital black again.
+ }
+ drySampleL = inputSampleL;
+ drySampleR = inputSampleR;
+
+ count = density;
+ while (count > 1.0)
+ {
+ bridgerectifier = fabs(inputSampleL)*1.57079633;
+ if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
+ //max value for sine function
+ bridgerectifier = sin(bridgerectifier);
+ if (inputSampleL > 0.0) inputSampleL = bridgerectifier;
+ else inputSampleL = -bridgerectifier;
+
+ bridgerectifier = fabs(inputSampleR)*1.57079633;
+ if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
+ //max value for sine function
+ bridgerectifier = sin(bridgerectifier);
+ if (inputSampleR > 0.0) inputSampleR = bridgerectifier;
+ else inputSampleR = -bridgerectifier;
+
+ count = count - 1.0;
+ }
+ //we have now accounted for any really high density settings.
+
+ while (out > 1.0) out = out - 1.0;
+
+ bridgerectifier = fabs(inputSampleL)*1.57079633;
+ if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
+ //max value for sine function
+ if (density > 0) bridgerectifier = sin(bridgerectifier);
+ else bridgerectifier = 1-cos(bridgerectifier);
+ //produce either boosted or starved version
+ if (inputSampleL > 0) inputSampleL = (inputSampleL*(1-out))+(bridgerectifier*out);
+ else inputSampleL = (inputSampleL*(1-out))-(bridgerectifier*out);
+ //blend according to density control
+
+ bridgerectifier = fabs(inputSampleR)*1.57079633;
+ if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
+ //max value for sine function
+ if (density > 0) bridgerectifier = sin(bridgerectifier);
+ else bridgerectifier = 1-cos(bridgerectifier);
+ //produce either boosted or starved version
+ if (inputSampleR > 0) inputSampleR = (inputSampleR*(1-out))+(bridgerectifier*out);
+ else inputSampleR = (inputSampleR*(1-out))-(bridgerectifier*out);
+ //blend according to density control
+
+
+ //done first density. Next, sustain-reducer
+ bridgerectifier = fabs(inputSampleL)*1.57079633;
+ if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
+ bridgerectifier = 1-cos(bridgerectifier);
+ if (inputSampleL > 0) inputSampleL = (inputSampleL*(1-sustain))+(bridgerectifier*sustain);
+ else inputSampleL = (inputSampleL*(1-sustain))-(bridgerectifier*sustain);
+ //done sustain removing, converted to Slew inputs
+
+ //done first density. Next, sustain-reducer
+ bridgerectifier = fabs(inputSampleR)*1.57079633;
+ if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
+ bridgerectifier = 1-cos(bridgerectifier);
+ if (inputSampleR > 0) inputSampleR = (inputSampleR*(1-sustain))+(bridgerectifier*sustain);
+ else inputSampleR = (inputSampleR*(1-sustain))-(bridgerectifier*sustain);
+ //done sustain removing, converted to Slew inputs
+
+ clamp = inputSampleL - lastSampleL;
+ if (clamp > threshold)
+ inputSampleL = lastSampleL + threshold;
+ if (-clamp > threshold)
+ inputSampleL = lastSampleL - threshold;
+ lastSampleL = inputSampleL;
+
+ clamp = inputSampleR - lastSampleR;
+ if (clamp > threshold)
+ inputSampleR = lastSampleR + threshold;
+ if (-clamp > threshold)
+ inputSampleR = lastSampleR - threshold;
+ lastSampleR = inputSampleR;
+
+ if (output < 1.0) {inputSampleL *= output; inputSampleR *= output;}
+ if (wet < 1.0) {
+ inputSampleL = (drySampleL * dry)+(inputSampleL*wet);
+ inputSampleR = (drySampleR * dry)+(inputSampleR*wet);
+ }
+ //nice little output stage template: if we have another scale of floating point
+ //number, we really don't want to meaninglessly multiply that by 1.0.
+
+ //noise shaping to 64-bit floating point
+ if (fpFlip) {
+ fpTemp = inputSampleL;
+ fpNShapeLA = (fpNShapeLA*fpOld)+((inputSampleL-fpTemp)*fpNew);
+ inputSampleL += fpNShapeLA;
+ fpTemp = inputSampleR;
+ fpNShapeRA = (fpNShapeRA*fpOld)+((inputSampleR-fpTemp)*fpNew);
+ inputSampleR += fpNShapeRA;
+ }
+ else {
+ fpTemp = inputSampleL;
+ fpNShapeLB = (fpNShapeLB*fpOld)+((inputSampleL-fpTemp)*fpNew);
+ inputSampleL += fpNShapeLB;
+ fpTemp = inputSampleR;
+ fpNShapeRB = (fpNShapeRB*fpOld)+((inputSampleR-fpTemp)*fpNew);
+ inputSampleR += fpNShapeRB;
+ }
+ fpFlip = !fpFlip;
+ //end noise shaping on 64 bit output
+
+ *out1 = inputSampleL;
+ *out2 = inputSampleR;
+
+ *in1++;
+ *in2++;
+ *out1++;
+ *out2++;
+ }
+} \ No newline at end of file