aboutsummaryrefslogtreecommitdiffstats
path: root/plugins/MacAU/VinylDither/VinylDither.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/MacAU/VinylDither/VinylDither.cpp')
-rwxr-xr-xplugins/MacAU/VinylDither/VinylDither.cpp274
1 files changed, 274 insertions, 0 deletions
diff --git a/plugins/MacAU/VinylDither/VinylDither.cpp b/plugins/MacAU/VinylDither/VinylDither.cpp
new file mode 100755
index 0000000..dbbc63c
--- /dev/null
+++ b/plugins/MacAU/VinylDither/VinylDither.cpp
@@ -0,0 +1,274 @@
+/*
+* File: VinylDither.cpp
+*
+* Version: 1.0
+*
+* Created: 11/17/16
+*
+* Copyright: Copyright � 2016 Airwindows, All Rights Reserved
+*
+* Disclaimer: IMPORTANT: This Apple software is supplied to you by Apple Computer, Inc. ("Apple") in
+* consideration of your agreement to the following terms, and your use, installation, modification
+* or redistribution of this Apple software constitutes acceptance of these terms. If you do
+* not agree with these terms, please do not use, install, modify or redistribute this Apple
+* software.
+*
+* In consideration of your agreement to abide by the following terms, and subject to these terms,
+* Apple grants you a personal, non-exclusive license, under Apple's copyrights in this
+* original Apple software (the "Apple Software"), to use, reproduce, modify and redistribute the
+* Apple Software, with or without modifications, in source and/or binary forms; provided that if you
+* redistribute the Apple Software in its entirety and without modifications, you must retain this
+* notice and the following text and disclaimers in all such redistributions of the Apple Software.
+* Neither the name, trademarks, service marks or logos of Apple Computer, Inc. may be used to
+* endorse or promote products derived from the Apple Software without specific prior written
+* permission from Apple. Except as expressly stated in this notice, no other rights or
+* licenses, express or implied, are granted by Apple herein, including but not limited to any
+* patent rights that may be infringed by your derivative works or by other works in which the
+* Apple Software may be incorporated.
+*
+* The Apple Software is provided by Apple on an "AS IS" basis. APPLE MAKES NO WARRANTIES, EXPRESS OR
+* IMPLIED, INCLUDING WITHOUT LIMITATION THE IMPLIED WARRANTIES OF NON-INFRINGEMENT, MERCHANTABILITY
+* AND FITNESS FOR A PARTICULAR PURPOSE, REGARDING THE APPLE SOFTWARE OR ITS USE AND OPERATION ALONE
+* OR IN COMBINATION WITH YOUR PRODUCTS.
+*
+* IN NO EVENT SHALL APPLE BE LIABLE FOR ANY SPECIAL, INDIRECT, INCIDENTAL OR CONSEQUENTIAL
+* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
+* OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) ARISING IN ANY WAY OUT OF THE USE,
+* REPRODUCTION, MODIFICATION AND/OR DISTRIBUTION OF THE APPLE SOFTWARE, HOWEVER CAUSED AND WHETHER
+* UNDER THEORY OF CONTRACT, TORT (INCLUDING NEGLIGENCE), STRICT LIABILITY OR OTHERWISE, EVEN
+* IF APPLE HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+*
+*/
+/*=============================================================================
+ VinylDither.cpp
+
+=============================================================================*/
+#include "VinylDither.h"
+
+
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+
+COMPONENT_ENTRY(VinylDither)
+
+
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+// VinylDither::VinylDither
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+VinylDither::VinylDither(AudioUnit component)
+ : AUEffectBase(component)
+{
+ CreateElements();
+ Globals()->UseIndexedParameters(kNumberOfParameters);
+
+#if AU_DEBUG_DISPATCHER
+ mDebugDispatcher = new AUDebugDispatcher (this);
+#endif
+
+}
+
+
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+// VinylDither::GetParameterValueStrings
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+ComponentResult VinylDither::GetParameterValueStrings(AudioUnitScope inScope,
+ AudioUnitParameterID inParameterID,
+ CFArrayRef * outStrings)
+{
+
+ return kAudioUnitErr_InvalidProperty;
+}
+
+
+
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+// VinylDither::GetParameterInfo
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+ComponentResult VinylDither::GetParameterInfo(AudioUnitScope inScope,
+ AudioUnitParameterID inParameterID,
+ AudioUnitParameterInfo &outParameterInfo )
+{
+ ComponentResult result = noErr;
+
+ outParameterInfo.flags = kAudioUnitParameterFlag_IsWritable
+ | kAudioUnitParameterFlag_IsReadable;
+
+ if (inScope == kAudioUnitScope_Global) {
+ switch(inParameterID)
+ {
+ default:
+ result = kAudioUnitErr_InvalidParameter;
+ break;
+ }
+ } else {
+ result = kAudioUnitErr_InvalidParameter;
+ }
+
+
+
+ return result;
+}
+
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+// VinylDither::GetPropertyInfo
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+ComponentResult VinylDither::GetPropertyInfo (AudioUnitPropertyID inID,
+ AudioUnitScope inScope,
+ AudioUnitElement inElement,
+ UInt32 & outDataSize,
+ Boolean & outWritable)
+{
+ return AUEffectBase::GetPropertyInfo (inID, inScope, inElement, outDataSize, outWritable);
+}
+
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+// VinylDither::GetProperty
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+ComponentResult VinylDither::GetProperty( AudioUnitPropertyID inID,
+ AudioUnitScope inScope,
+ AudioUnitElement inElement,
+ void * outData )
+{
+ return AUEffectBase::GetProperty (inID, inScope, inElement, outData);
+}
+
+// VinylDither::Initialize
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+ComponentResult VinylDither::Initialize()
+{
+ ComponentResult result = AUEffectBase::Initialize();
+ if (result == noErr)
+ Reset(kAudioUnitScope_Global, 0);
+ return result;
+}
+
+#pragma mark ____VinylDitherEffectKernel
+
+
+
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+// VinylDither::VinylDitherKernel::Reset()
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+void VinylDither::VinylDitherKernel::Reset()
+{
+ NSOdd = 0.0;
+ prev = 0.0;
+ ns[0] = 0;
+ ns[1] = 0;
+ ns[2] = 0;
+ ns[3] = 0;
+ ns[4] = 0;
+ ns[5] = 0;
+ ns[6] = 0;
+ ns[7] = 0;
+ ns[8] = 0;
+ ns[9] = 0;
+ ns[10] = 0;
+ ns[11] = 0;
+ ns[12] = 0;
+ ns[13] = 0;
+ ns[14] = 0;
+ ns[15] = 0;
+}
+
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+// VinylDither::VinylDitherKernel::Process
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+void VinylDither::VinylDitherKernel::Process( const Float32 *inSourceP,
+ Float32 *inDestP,
+ UInt32 inFramesToProcess,
+ UInt32 inNumChannels,
+ bool &ioSilence )
+{
+ UInt32 nSampleFrames = inFramesToProcess;
+ const Float32 *sourceP = inSourceP;
+ Float32 *destP = inDestP;
+
+ long double inputSample;
+ Float64 absSample;
+
+
+ while (nSampleFrames-- > 0) {
+ inputSample = *sourceP;
+ if (inputSample<1.2e-38 && -inputSample<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;
+ inputSample = 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.
+ }
+
+
+ inputSample *= 8388608.0;
+ //0-1 is now one bit, now we dither
+
+ absSample = ((rand()/(double)RAND_MAX) - 0.5);
+ ns[0] += absSample; ns[0] /= 2; absSample -= ns[0];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[1] += absSample; ns[1] /= 2; absSample -= ns[1];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[2] += absSample; ns[2] /= 2; absSample -= ns[2];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[3] += absSample; ns[3] /= 2; absSample -= ns[3];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[4] += absSample; ns[4] /= 2; absSample -= ns[4];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[5] += absSample; ns[5] /= 2; absSample -= ns[5];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[6] += absSample; ns[6] /= 2; absSample -= ns[6];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[7] += absSample; ns[7] /= 2; absSample -= ns[7];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[8] += absSample; ns[8] /= 2; absSample -= ns[8];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[9] += absSample; ns[9] /= 2; absSample -= ns[9];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[10] += absSample; ns[10] /= 2; absSample -= ns[10];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[11] += absSample; ns[11] /= 2; absSample -= ns[11];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[12] += absSample; ns[12] /= 2; absSample -= ns[12];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[13] += absSample; ns[13] /= 2; absSample -= ns[13];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[14] += absSample; ns[14] /= 2; absSample -= ns[14];
+ absSample += ((rand()/(double)RAND_MAX) - 0.5);
+ ns[15] += absSample; ns[15] /= 2; absSample -= ns[15];
+ //install noise and then shape it
+ absSample += inputSample;
+
+ //NSOdd /= 1.0001; //NSDensity
+
+ if (NSOdd > 0) NSOdd -= 0.97;
+ if (NSOdd < 0) NSOdd += 0.97;
+
+ NSOdd -= (NSOdd * NSOdd * NSOdd * 0.475);
+
+ NSOdd += prev;
+ absSample += (NSOdd*0.475);
+ prev = floor(absSample) - inputSample;
+ inputSample = floor(absSample);
+ //TenNines dither
+
+ inputSample /= 8388608.0;
+ *destP = inputSample;
+ sourceP += inNumChannels; destP += inNumChannels;
+ }
+}
+