1 // generated from file '../src/LV2/faust/aclipper.dsp' by dsp2cc:
2 // Code generated with Faust (https://faust.grame.fr)
3 
4 #include "clipping.h"
5 
6 namespace aclipper {
7 
8 class Dsp: public PluginLV2 {
9 private:
10 	gx_resample::FixedRateResampler smp;
11 	uint32_t sample_rate;
12 	uint32_t fSampleRate;
13 	FAUSTFLOAT fHslider0;
14 	FAUSTFLOAT	*fHslider0_;
15 	double fRec0[2];
16 	double fConst0;
17 	double fConst4;
18 	double fConst5;
19 	double fConst7;
20 	double fConst8;
21 	double fConst10;
22 	double fConst11;
23 	double fConst12;
24 	double fRec4[3];
25 	double fConst13;
26 	double fConst14;
27 	double fVec0[2];
28 	double fConst16;
29 	double fConst17;
30 	double fConst18;
31 	FAUSTFLOAT fHslider1;
32 	FAUSTFLOAT	*fHslider1_;
33 	double fRec6[2];
34 	double fRec5[2];
35 	double fConst19;
36 	double fRec3[2];
37 	double fConst20;
38 	double fConst21;
39 	double fConst22;
40 	double fRec2[3];
41 	double fConst23;
42 	FAUSTFLOAT fVslider0;
43 	FAUSTFLOAT	*fVslider0_;
44 	double fRec7[2];
45 	double fRec1[2];
46 
47 	void connect(uint32_t port,void* data);
48 	void clear_state_f();
49 	void init(uint32_t sample_rate);
50 	void compute(int count, FAUSTFLOAT *input0, FAUSTFLOAT *output0);
51 
52 	static void clear_state_f_static(PluginLV2*);
53 	static void init_static(uint32_t sample_rate, PluginLV2*);
54 	static void compute_static(int count, FAUSTFLOAT *input0, FAUSTFLOAT *output0, PluginLV2*);
55 	static void del_instance(PluginLV2 *p);
56 	static void connect_static(uint32_t port,void* data, PluginLV2 *p);
57 public:
58 	Dsp();
59 	~Dsp();
60 };
61 
62 
63 
Dsp()64 Dsp::Dsp()
65 	: PluginLV2() {
66 	version = PLUGINLV2_VERSION;
67 	id = "aclipper";
68 	name = N_("Rat");
69 	mono_audio = compute_static;
70 	stereo_audio = 0;
71 	set_samplerate = init_static;
72 	activate_plugin = 0;
73 	connect_ports = connect_static;
74 	clear_state = clear_state_f_static;
75 	delete_instance = del_instance;
76 }
77 
~Dsp()78 Dsp::~Dsp() {
79 }
80 
clear_state_f()81 inline void Dsp::clear_state_f()
82 {
83 	for (int l0 = 0; (l0 < 2); l0 = (l0 + 1)) fRec0[l0] = 0.0;
84 	for (int l1 = 0; (l1 < 3); l1 = (l1 + 1)) fRec4[l1] = 0.0;
85 	for (int l2 = 0; (l2 < 2); l2 = (l2 + 1)) fVec0[l2] = 0.0;
86 	for (int l3 = 0; (l3 < 2); l3 = (l3 + 1)) fRec6[l3] = 0.0;
87 	for (int l4 = 0; (l4 < 2); l4 = (l4 + 1)) fRec5[l4] = 0.0;
88 	for (int l5 = 0; (l5 < 2); l5 = (l5 + 1)) fRec3[l5] = 0.0;
89 	for (int l6 = 0; (l6 < 3); l6 = (l6 + 1)) fRec2[l6] = 0.0;
90 	for (int l7 = 0; (l7 < 2); l7 = (l7 + 1)) fRec7[l7] = 0.0;
91 	for (int l8 = 0; (l8 < 2); l8 = (l8 + 1)) fRec1[l8] = 0.0;
92 }
93 
clear_state_f_static(PluginLV2 * p)94 void Dsp::clear_state_f_static(PluginLV2 *p)
95 {
96 	static_cast<Dsp*>(p)->clear_state_f();
97 }
98 
init(uint32_t RsamplingFreq)99 inline void Dsp::init(uint32_t RsamplingFreq)
100 {
101 	sample_rate = 96000;
102 	smp.setup(RsamplingFreq, sample_rate);
103 	fSampleRate = sample_rate;
104 	fConst0 = std::min<double>(192000.0, std::max<double>(1.0, double(fSampleRate)));
105 	double fConst1 = mydsp_faustpower2_f(fConst0);
106 	double fConst2 = (4.3384046341363998e-10 * fConst0);
107 	double fConst3 = ((fConst0 * (fConst2 + 8.9903789745771695e-09)) + 3.4104193494676199e-08);
108 	fConst4 = (fConst1 / fConst3);
109 	fConst5 = (2.0833287160267799e-05 * fConst0);
110 	double fConst6 = (fConst5 + 2.2163071447093401e-06);
111 	fConst7 = (1.0 / fConst6);
112 	fConst8 = (0.0 - fConst5);
113 	double fConst9 = (3.6486544757381099e-11 * fConst0);
114 	fConst10 = (1.0 / ((fConst0 * (fConst9 + 1.9073341271921e-05)) + 0.00041461982678842101));
115 	fConst11 = (0.00082923965357684201 - (7.2973089514762096e-11 * fConst1));
116 	fConst12 = ((fConst0 * (fConst9 + -1.9073341271921e-05)) + 0.00041461982678842101);
117 	fConst13 = (1.8243272378690499e-05 * fConst0);
118 	fConst14 = (0.0 - fConst13);
119 	double fConst15 = (0.00044179999999999995 * fConst0);
120 	fConst16 = (1.0 / (fConst15 + 1.0));
121 	fConst17 = (1.0 - fConst15);
122 	fConst18 = (9.3999999999999995e-08 * fConst0);
123 	fConst19 = ((2.2163071447093401e-06 - fConst5) / fConst6);
124 	fConst20 = (1.0 / fConst3);
125 	fConst21 = (6.8208386989352305e-08 - (8.6768092682727995e-10 * fConst1));
126 	fConst22 = ((fConst0 * (fConst2 + -8.9903789745771695e-09)) + 3.4104193494676199e-08);
127 	fConst23 = (3.9192399049881199e-05 * fConst0);
128 	clear_state_f();
129 }
130 
init_static(uint32_t sample_rate,PluginLV2 * p)131 void Dsp::init_static(uint32_t sample_rate, PluginLV2 *p)
132 {
133 	static_cast<Dsp*>(p)->init(sample_rate);
134 }
135 
compute(int count,FAUSTFLOAT * input0,FAUSTFLOAT * output0)136 void always_inline Dsp::compute(int count, FAUSTFLOAT *input0, FAUSTFLOAT *output0)
137 {
138 #define fHslider0 (*fHslider0_)
139 #define fHslider1 (*fHslider1_)
140 #define fVslider0 (*fVslider0_)
141 	FAUSTFLOAT buf[smp.max_out_count(count)];
142 	int ReCount = smp.up(count, input0, buf);
143 	double fSlow0 = (0.0070000000000000062 * std::pow(10.0, (0.050000000000000003 * double(fHslider0))));
144 	double fSlow1 = (0.0070000000000000062 * double(fHslider1));
145 	double fSlow2 = (0.0070000000000000062 * (1.0 - double(fVslider0)));
146 	for (int i0 = 0; (i0 < ReCount); i0 = (i0 + 1)) {
147 		fRec0[0] = (fSlow0 + (0.99299999999999999 * fRec0[1]));
148 		fRec4[0] = (double(buf[i0]) - (fConst10 * ((fConst11 * fRec4[1]) + (fConst12 * fRec4[2]))));
149 		double fTemp0 = (((0.00082923965357684201 * fRec4[1]) + (fConst13 * fRec4[0])) + (fConst14 * fRec4[2]));
150 		fVec0[0] = fTemp0;
151 		double fTemp1 = (fConst10 * fTemp0);
152 		fRec6[0] = (fSlow1 + (0.99299999999999999 * fRec6[1]));
153 		double fTemp2 = (fConst18 * ((500000.0 * fRec6[0]) + 5700.0));
154 		fRec5[0] = (0.0 - (fConst16 * ((fConst17 * fRec5[1]) - (fConst10 * ((fTemp0 * (fTemp2 + 1.0)) + (fVec0[1] * (1.0 - fTemp2)))))));
155 		fRec3[0] = (fTemp1 - (double(opamp(double((fRec5[0] - fTemp1)))) + (fConst19 * fRec3[1])));
156 		fRec2[0] = ((fConst7 * ((fConst8 * fRec3[1]) + (fConst5 * fRec3[0]))) - (fConst20 * ((fConst21 * fRec2[1]) + (fConst22 * fRec2[2]))));
157 		double fTemp3 = ((0.75 * fRec6[0]) + 0.5);
158 		double fTemp4 = (0.0 - (9.2680065673288896e-10 * fTemp3));
159 		fRec7[0] = (fSlow2 + (0.99299999999999999 * fRec7[1]));
160 		double fTemp5 = ((fConst0 * ((0.0 - (3.9192399049881199e-05 * fRec7[0])) + 3.9192399049881199e-05)) + 0.059382422802850401);
161 		fRec1[0] = (double(asymhardclip2(double((fConst4 * (((fRec2[0] * fTemp4) + (1.85360131346578e-09 * (fRec2[1] * fTemp3))) + (fRec2[2] * fTemp4)))))) - ((fRec1[1] * ((fConst23 * (fRec7[0] + -1.0)) + 0.059382422802850401)) / fTemp5));
162 		buf[i0] = FAUSTFLOAT((0.059382422802850401 * ((fRec0[0] * (fRec1[0] + fRec1[1])) / fTemp5)));
163 		fRec0[1] = fRec0[0];
164 		fRec4[2] = fRec4[1];
165 		fRec4[1] = fRec4[0];
166 		fVec0[1] = fVec0[0];
167 		fRec6[1] = fRec6[0];
168 		fRec5[1] = fRec5[0];
169 		fRec3[1] = fRec3[0];
170 		fRec2[2] = fRec2[1];
171 		fRec2[1] = fRec2[0];
172 		fRec7[1] = fRec7[0];
173 		fRec1[1] = fRec1[0];
174 	}
175 	smp.down(buf, output0);
176 #undef fHslider0
177 #undef fHslider1
178 #undef fVslider0
179 }
180 
compute_static(int count,FAUSTFLOAT * input0,FAUSTFLOAT * output0,PluginLV2 * p)181 void __rt_func Dsp::compute_static(int count, FAUSTFLOAT *input0, FAUSTFLOAT *output0, PluginLV2 *p)
182 {
183 	static_cast<Dsp*>(p)->compute(count, input0, output0);
184 }
185 
186 
connect(uint32_t port,void * data)187 void Dsp::connect(uint32_t port,void* data)
188 {
189 	switch ((PortIndex)port)
190 	{
191 	case DRIVE:
192 		fHslider1_ = (float*)data; // , 0.5, 0.0, 1.0, 0.01
193 		break;
194 	case LEVEL:
195 		fHslider0_ = (float*)data; // , -2.0, -20.0, 12.0, 0.10000000000000001
196 		break;
197 	case TONE:
198 		fVslider0_ = (float*)data; // , 0.5, 0.0, 1.0, 0.01
199 		break;
200 	default:
201 		break;
202 	}
203 }
204 
connect_static(uint32_t port,void * data,PluginLV2 * p)205 void Dsp::connect_static(uint32_t port,void* data, PluginLV2 *p)
206 {
207 	static_cast<Dsp*>(p)->connect(port, data);
208 }
209 
210 
plugin()211 PluginLV2 *plugin() {
212 	return new Dsp();
213 }
214 
del_instance(PluginLV2 * p)215 void Dsp::del_instance(PluginLV2 *p)
216 {
217 	delete static_cast<Dsp*>(p);
218 }
219 
220 /*
221 typedef enum
222 {
223    DRIVE,
224    LEVEL,
225    TONE,
226 } PortIndex;
227 */
228 
229 } // end namespace aclipper
230