This commit is contained in:
Chris Johnson 2019-09-15 20:32:42 -04:00
parent 269773482d
commit 25083c28de
44 changed files with 11348 additions and 0 deletions

View file

@ -0,0 +1,161 @@
/* ========================================
* Channel7 - Channel7.h
* Copyright (c) 2016 airwindows, All rights reserved
* ======================================== */
#ifndef __Channel7_H
#include "Channel7.h"
#endif
AudioEffect* createEffectInstance(audioMasterCallback audioMaster) {return new Channel7(audioMaster);}
Channel7::Channel7(audioMasterCallback audioMaster) :
AudioEffectX(audioMaster, kNumPrograms, kNumParameters)
{
consoletype = 0.0;
drive = 0.0;
output = 1.0;
fpd = 17;
iirSampleLA = 0.0;
iirSampleRA = 0.0;
iirSampleLB = 0.0;
iirSampleRB = 0.0;
lastSampleL = 0.0;
lastSampleR = 0.0;
flip = false;
iirAmount = 0.005832;
threshold = 0.33362176; //instantiating with Neve values
//this is reset: values being initialized only once. Startup values, whatever they are.
_canDo.insert("plugAsChannelInsert"); // plug-in can be used as a channel insert effect.
_canDo.insert("plugAsSend"); // plug-in can be used as a send effect.
_canDo.insert("x2in2out");
setNumInputs(kNumInputs);
setNumOutputs(kNumOutputs);
setUniqueID(kUniqueId);
canProcessReplacing(); // supports output replacing
canDoubleReplacing(); // supports double precision processing
programsAreChunks(true);
vst_strncpy (_programName, "Default", kVstMaxProgNameLen); // default program name
}
Channel7::~Channel7() {}
VstInt32 Channel7::getVendorVersion () {return 1000;}
void Channel7::setProgramName(char *name) {vst_strncpy (_programName, name, kVstMaxProgNameLen);}
void Channel7::getProgramName(char *name) {vst_strncpy (name, _programName, kVstMaxProgNameLen);}
//airwindows likes to ignore this stuff. Make your own programs, and make a different plugin rather than
//trying to do versioning and preventing people from using older versions. Maybe they like the old one!
static float pinParameter(float data)
{
if (data < 0.0f) return 0.0f;
if (data > 1.0f) return 1.0f;
return data;
}
VstInt32 Channel7::getChunk (void** data, bool isPreset)
{
float *chunkData = (float *)calloc(kNumParameters, sizeof(float));
chunkData[0] = consoletype;
chunkData[1] = drive;
chunkData[2] = output;
/* Note: The way this is set up, it will break if you manage to save settings on an Intel
machine and load them on a PPC Mac. However, it's fine if you stick to the machine you
started with. */
*data = chunkData;
return kNumParameters * sizeof(float);
}
VstInt32 Channel7::setChunk (void* data, VstInt32 byteSize, bool isPreset)
{
float *chunkData = (float *)data;
consoletype = pinParameter(chunkData[0]);
drive = pinParameter(chunkData[1]);
output = pinParameter(chunkData[2]);
/* We're ignoring byteSize as we found it to be a filthy liar */
/* calculate any other fields you need here - you could copy in
code from setParameter() here. */
return 0;
}
void Channel7::setParameter(VstInt32 index, float value) {
switch (index) {
case kParamA: consoletype = value; break;
case kParamB: drive = value; break;
case kParamC: output = value; break;
default: throw; // unknown parameter, shouldn't happen!
}
//we can also set other defaults here, and do calculations that only have to happen
//once when parameters actually change. Here is the 'popup' setting its (global) values.
//variables can also be set in the processreplacing loop, and there they'll be set every buffersize
//here they're set when a parameter's actually changed, which should be less frequent, but
//you must use global variables in the Channel4.h file to do it.
switch((VstInt32)( consoletype * 2.999 ))
{
case 0: iirAmount = 0.005832; threshold = 0.33362176; break; //Neve
case 1: iirAmount = 0.004096; threshold = 0.59969536; break; //API
case 2: iirAmount = 0.004913; threshold = 0.84934656; break; //SSL
default: break; //should not happen
}
}
float Channel7::getParameter(VstInt32 index) {
switch (index) {
case kParamA: return consoletype; break;
case kParamB: return drive; break;
case kParamC: return output; break;
default: break; // unknown parameter, shouldn't happen!
} return 0.0; //we only need to update the relevant name, this is simple to manage
}
void Channel7::getParameterName(VstInt32 index, char *text) {
switch (index) {
case kParamA: vst_strncpy (text, "Console Type", kVstMaxParamStrLen); break;
case kParamB: vst_strncpy (text, "Drive", kVstMaxParamStrLen); break;
case kParamC: vst_strncpy (text, "Output", kVstMaxParamStrLen); break;
default: break; // unknown parameter, shouldn't happen!
} //this is our labels for displaying in the VST host
}
void Channel7::getParameterDisplay(VstInt32 index, char *text) {
switch (index) {
case kParamA: switch((VstInt32)( consoletype * 2.999 )) //0 to almost edge of # of params
{ case 0: vst_strncpy (text, "Neve", kVstMaxParamStrLen); break;
case 1: vst_strncpy (text, "API", kVstMaxParamStrLen); break;
case 2: vst_strncpy (text, "SSL", kVstMaxParamStrLen); break;
default: break; // unknown parameter, shouldn't happen!
} break; //completed consoletype 'popup' parameter, exit
case kParamB: int2string ((VstInt32)(drive*200), text, kVstMaxParamStrLen); break;
case kParamC: float2string (output, text, kVstMaxParamStrLen); break;
default: break; // unknown parameter, shouldn't happen!
} //this displays the values and handles 'popups' where it's discrete choices
}
void Channel7::getParameterLabel(VstInt32 index, char *text) {
switch (index) {
case kParamA: vst_strncpy (text, "", kVstMaxParamStrLen); break;
case kParamB: vst_strncpy (text, "%", kVstMaxParamStrLen); break; //the percent
case kParamC: vst_strncpy (text, "", kVstMaxParamStrLen); break; //the percent
default: break; // unknown parameter, shouldn't happen!
}
}
VstInt32 Channel7::canDo(char *text)
{ return (_canDo.find(text) == _canDo.end()) ? -1: 1; } // 1 = yes, -1 = no, 0 = don't know
bool Channel7::getEffectName(char* name) {
vst_strncpy(name, "Channel7", kVstMaxProductStrLen); return true;
}
VstPlugCategory Channel7::getPlugCategory() {return kPlugCategEffect;}
bool Channel7::getProductString(char* text) {
vst_strncpy (text, "airwindows Channel7", kVstMaxProductStrLen); return true;
}
bool Channel7::getVendorString(char* text) {
vst_strncpy (text, "airwindows", kVstMaxVendorStrLen); return true;
}

View file

@ -0,0 +1,74 @@
/* ========================================
* Channel7 - Channel7.h
* Created 8/12/11 by SPIAdmin
* Copyright (c) 2011 __MyCompanyName__, All rights reserved
* ======================================== */
#ifndef __Channel7_H
#define __Channel7_H
#ifndef __audioeffect__
#include "audioeffectx.h"
#endif
#include <set>
#include <string>
#include <math.h>
enum {
kParamA = 0,
kParamB = 1,
kParamC = 2,
kNumParameters = 3
}; //
const int kNumPrograms = 0;
const int kNumInputs = 2;
const int kNumOutputs = 2;
const unsigned long kUniqueId = 'cha7'; //Change this to what the AU identity is!
class Channel7 :
public AudioEffectX
{
public:
Channel7(audioMasterCallback audioMaster);
~Channel7();
virtual bool getEffectName(char* name); // The plug-in name
virtual VstPlugCategory getPlugCategory(); // The general category for the plug-in
virtual bool getProductString(char* text); // This is a unique plug-in string provided by Steinberg
virtual bool getVendorString(char* text); // Vendor info
virtual VstInt32 getVendorVersion(); // Version number
virtual void processReplacing (float** inputs, float** outputs, VstInt32 sampleFrames);
virtual void processDoubleReplacing (double** inputs, double** outputs, VstInt32 sampleFrames);
virtual void getProgramName(char *name); // read the name from the host
virtual void setProgramName(char *name); // changes the name of the preset displayed in the host
virtual VstInt32 getChunk (void** data, bool isPreset);
virtual VstInt32 setChunk (void* data, VstInt32 byteSize, bool isPreset);
virtual float getParameter(VstInt32 index); // get the parameter value at the specified index
virtual void setParameter(VstInt32 index, float value); // set the parameter at index to value
virtual void getParameterLabel(VstInt32 index, char *text); // label for the parameter (eg dB)
virtual void getParameterName(VstInt32 index, char *text); // name of the parameter
virtual void getParameterDisplay(VstInt32 index, char *text); // text description of the current value
virtual VstInt32 canDo(char *text);
private:
char _programName[kVstMaxProgNameLen + 1];
std::set< std::string > _canDo;
uint32_t fpd;
//default stuff
double iirSampleLA;
double iirSampleRA;
double iirSampleLB;
double iirSampleRB;
double lastSampleL;
double lastSampleR;
double iirAmount;
double threshold;
bool flip;
float consoletype;
float drive; //parameters. Always 0-1, and we scale/alter them elsewhere.
float output;
};
#endif

View file

@ -0,0 +1,220 @@
/* ========================================
* Channel7 - Channel7.h
* Copyright (c) 2016 airwindows, All rights reserved
* ======================================== */
#ifndef __Channel7_H
#include "Channel7.h"
#endif
void Channel7::processReplacing(float **inputs, float **outputs, VstInt32 sampleFrames)
{
float* in1 = inputs[0];
float* in2 = inputs[1];
float* out1 = outputs[0];
float* out2 = outputs[1];
double overallscale = 1.0;
overallscale /= 44100.0;
overallscale *= getSampleRate();
double localiirAmount = iirAmount / overallscale;
double localthreshold = threshold; //we've learned not to try and adjust threshold for sample rate
double density = drive*2.0; //0-2
double phattity = density - 1.0;
if (density > 1.0) density = 1.0; //max out at full wet for Spiral aspect
if (phattity < 0.0) phattity = 0.0; //
while (--sampleFrames >= 0)
{
long double inputSampleL = *in1;
long double inputSampleR = *in2;
if (fabs(inputSampleL)<1.18e-37) inputSampleL = fpd * 1.18e-37;
if (fabs(inputSampleR)<1.18e-37) inputSampleR = fpd * 1.18e-37;
if (flip)
{
iirSampleLA = (iirSampleLA * (1 - localiirAmount)) + (inputSampleL * localiirAmount);
inputSampleL = inputSampleL - iirSampleLA;
iirSampleRA = (iirSampleRA * (1 - localiirAmount)) + (inputSampleR * localiirAmount);
inputSampleR = inputSampleR - iirSampleRA;
}
else
{
iirSampleLB = (iirSampleLB * (1 - localiirAmount)) + (inputSampleL * localiirAmount);
inputSampleL = inputSampleL - iirSampleLB;
iirSampleRB = (iirSampleRB * (1 - localiirAmount)) + (inputSampleR * localiirAmount);
inputSampleR = inputSampleR - iirSampleRB;
}
//highpass section
long double drySampleL = inputSampleL;
long double drySampleR = inputSampleR;
if (inputSampleL > 1.0) inputSampleL = 1.0;
if (inputSampleL < -1.0) inputSampleL = -1.0;
long double phatSampleL = sin(inputSampleL * 1.57079633);
inputSampleL *= 1.2533141373155;
//clip to 1.2533141373155 to reach maximum output, or 1.57079633 for pure sine 'phat' version
long double distSampleL = sin(inputSampleL * fabs(inputSampleL)) / ((inputSampleL == 0.0) ?1:fabs(inputSampleL));
inputSampleL = distSampleL; //purest form is full Spiral
if (density < 1.0) inputSampleL = (drySampleL*(1-density))+(distSampleL*density); //fade Spiral aspect
if (phattity > 0.0) inputSampleL = (inputSampleL*(1-phattity))+(phatSampleL*phattity); //apply original Density on top
if (inputSampleR > 1.0) inputSampleR = 1.0;
if (inputSampleR < -1.0) inputSampleR = -1.0;
long double phatSampleR = sin(inputSampleR * 1.57079633);
inputSampleR *= 1.2533141373155;
//clip to 1.2533141373155 to reach maximum output, or 1.57079633 for pure sine 'phat' version
long double distSampleR = sin(inputSampleR * fabs(inputSampleR)) / ((inputSampleR == 0.0) ?1:fabs(inputSampleR));
inputSampleR = distSampleR; //purest form is full Spiral
if (density < 1.0) inputSampleR = (drySampleR*(1-density))+(distSampleR*density); //fade Spiral aspect
if (phattity > 0.0) inputSampleR = (inputSampleR*(1-phattity))+(phatSampleR*phattity); //apply original Density on top
double clamp = inputSampleL - lastSampleL;
if (clamp > localthreshold)
inputSampleL = lastSampleL + localthreshold;
if (-clamp > localthreshold)
inputSampleL = lastSampleL - localthreshold;
lastSampleL = inputSampleL;
clamp = inputSampleR - lastSampleR;
if (clamp > localthreshold)
inputSampleR = lastSampleR + localthreshold;
if (-clamp > localthreshold)
inputSampleR = lastSampleR - localthreshold;
lastSampleR = inputSampleR;
//slew section
flip = !flip;
if (output < 1.0) {
inputSampleL *= output;
inputSampleR *= output;
}
//begin 32 bit stereo floating point dither
int expon; frexpf((float)inputSampleL, &expon);
fpd ^= fpd << 13; fpd ^= fpd >> 17; fpd ^= fpd << 5;
inputSampleL += ((double(fpd)-uint32_t(0x7fffffff)) * 5.5e-36l * pow(2,expon+62));
frexpf((float)inputSampleR, &expon);
fpd ^= fpd << 13; fpd ^= fpd >> 17; fpd ^= fpd << 5;
inputSampleR += ((double(fpd)-uint32_t(0x7fffffff)) * 5.5e-36l * pow(2,expon+62));
//end 32 bit stereo floating point dither
*out1 = inputSampleL;
*out2 = inputSampleR;
*in1++;
*in2++;
*out1++;
*out2++;
}
}
void Channel7::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 localiirAmount = iirAmount / overallscale;
double localthreshold = threshold; //we've learned not to try and adjust threshold for sample rate
double density = drive*2.0; //0-2
double phattity = density - 1.0;
if (density > 1.0) density = 1.0; //max out at full wet for Spiral aspect
if (phattity < 0.0) phattity = 0.0; //
while (--sampleFrames >= 0)
{
long double inputSampleL = *in1;
long double inputSampleR = *in2;
if (fabs(inputSampleL)<1.18e-43) inputSampleL = fpd * 1.18e-43;
if (fabs(inputSampleR)<1.18e-43) inputSampleR = fpd * 1.18e-43;
if (flip)
{
iirSampleLA = (iirSampleLA * (1 - localiirAmount)) + (inputSampleL * localiirAmount);
inputSampleL = inputSampleL - iirSampleLA;
iirSampleRA = (iirSampleRA * (1 - localiirAmount)) + (inputSampleR * localiirAmount);
inputSampleR = inputSampleR - iirSampleRA;
}
else
{
iirSampleLB = (iirSampleLB * (1 - localiirAmount)) + (inputSampleL * localiirAmount);
inputSampleL = inputSampleL - iirSampleLB;
iirSampleRB = (iirSampleRB * (1 - localiirAmount)) + (inputSampleR * localiirAmount);
inputSampleR = inputSampleR - iirSampleRB;
}
//highpass section
long double drySampleL = inputSampleL;
long double drySampleR = inputSampleR;
if (inputSampleL > 1.0) inputSampleL = 1.0;
if (inputSampleL < -1.0) inputSampleL = -1.0;
long double phatSampleL = sin(inputSampleL * 1.57079633);
inputSampleL *= 1.2533141373155;
//clip to 1.2533141373155 to reach maximum output, or 1.57079633 for pure sine 'phat' version
long double distSampleL = sin(inputSampleL * fabs(inputSampleL)) / ((inputSampleL == 0.0) ?1:fabs(inputSampleL));
inputSampleL = distSampleL; //purest form is full Spiral
if (density < 1.0) inputSampleL = (drySampleL*(1-density))+(distSampleL*density); //fade Spiral aspect
if (phattity > 0.0) inputSampleL = (inputSampleL*(1-phattity))+(phatSampleL*phattity); //apply original Density on top
if (inputSampleR > 1.0) inputSampleR = 1.0;
if (inputSampleR < -1.0) inputSampleR = -1.0;
long double phatSampleR = sin(inputSampleR * 1.57079633);
inputSampleR *= 1.2533141373155;
//clip to 1.2533141373155 to reach maximum output, or 1.57079633 for pure sine 'phat' version
long double distSampleR = sin(inputSampleR * fabs(inputSampleR)) / ((inputSampleR == 0.0) ?1:fabs(inputSampleR));
inputSampleR = distSampleR; //purest form is full Spiral
if (density < 1.0) inputSampleR = (drySampleR*(1-density))+(distSampleR*density); //fade Spiral aspect
if (phattity > 0.0) inputSampleR = (inputSampleR*(1-phattity))+(phatSampleR*phattity); //apply original Density on top
double clamp = inputSampleL - lastSampleL;
if (clamp > localthreshold)
inputSampleL = lastSampleL + localthreshold;
if (-clamp > localthreshold)
inputSampleL = lastSampleL - localthreshold;
lastSampleL = inputSampleL;
clamp = inputSampleR - lastSampleR;
if (clamp > localthreshold)
inputSampleR = lastSampleR + localthreshold;
if (-clamp > localthreshold)
inputSampleR = lastSampleR - localthreshold;
lastSampleR = inputSampleR;
//slew section
flip = !flip;
if (output < 1.0) {
inputSampleL *= output;
inputSampleR *= output;
}
//begin 64 bit stereo floating point dither
int expon; frexp((double)inputSampleL, &expon);
fpd ^= fpd << 13; fpd ^= fpd >> 17; fpd ^= fpd << 5;
inputSampleL += ((double(fpd)-uint32_t(0x7fffffff)) * 1.1e-44l * pow(2,expon+62));
frexp((double)inputSampleR, &expon);
fpd ^= fpd << 13; fpd ^= fpd >> 17; fpd ^= fpd << 5;
inputSampleR += ((double(fpd)-uint32_t(0x7fffffff)) * 1.1e-44l * pow(2,expon+62));
//end 64 bit stereo floating point dither
*out1 = inputSampleL;
*out2 = inputSampleR;
*in1++;
*in2++;
*out1++;
*out2++;
}
}