1 // generated from file '../src/LV2/faust/stereodelay.dsp' by dsp2cc:
2 // Code generated with Faust (https://faust.grame.fr)
3
4
5 namespace stereodelay {
6
7 class Dsp: public PluginLV2 {
8 private:
9 uint32_t fSampleRate;
10 int IOTA;
11 float *fVec0;
12 FAUSTFLOAT fVslider0;
13 FAUSTFLOAT *fVslider0_;
14 int iVec1[2];
15 float fRec0[2];
16 float fConst1;
17 FAUSTFLOAT fVslider1;
18 FAUSTFLOAT *fVslider1_;
19 float fRec1[2];
20 float fRec2[2];
21 float fRec3[2];
22 float fRec4[2];
23 FAUSTFLOAT fCheckbox0;
24 FAUSTFLOAT *fCheckbox0_;
25 float fConst2;
26 FAUSTFLOAT fHslider0;
27 FAUSTFLOAT *fHslider0_;
28 float fRec5[2];
29 float fRec6[2];
30 float *fVec2;
31 FAUSTFLOAT fVslider2;
32 FAUSTFLOAT *fVslider2_;
33 float fRec7[2];
34 FAUSTFLOAT fVslider3;
35 FAUSTFLOAT *fVslider3_;
36 float fRec8[2];
37 float fRec9[2];
38 float fRec10[2];
39 float fRec11[2];
40
41 bool mem_allocated;
42 void mem_alloc();
43 void mem_free();
44 void connect(uint32_t port,void* data);
45 void clear_state_f();
46 int activate(bool start);
47 void init(uint32_t sample_rate);
48 void compute(int count, FAUSTFLOAT *input0, FAUSTFLOAT *input1, FAUSTFLOAT *output0, FAUSTFLOAT *output1);
49
50 static void clear_state_f_static(PluginLV2*);
51 static int activate_static(bool start, PluginLV2*);
52 static void init_static(uint32_t sample_rate, PluginLV2*);
53 static void compute_static(int count, FAUSTFLOAT *input0, FAUSTFLOAT *input1, FAUSTFLOAT *output0, FAUSTFLOAT *output1, PluginLV2*);
54 static void del_instance(PluginLV2 *p);
55 static void connect_static(uint32_t port,void* data, PluginLV2 *p);
56 public:
57 Dsp();
58 ~Dsp();
59 };
60
61
62
Dsp()63 Dsp::Dsp()
64 : PluginLV2(),
65 fVec0(0),
66 fVec2(0),
67 mem_allocated(false) {
68 version = PLUGINLV2_VERSION;
69 id = "stereodelay";
70 name = N_("Stereo Delay");
71 mono_audio = 0;
72 stereo_audio = compute_static;
73 set_samplerate = init_static;
74 activate_plugin = activate_static;
75 connect_ports = connect_static;
76 clear_state = clear_state_f_static;
77 delete_instance = del_instance;
78 }
79
~Dsp()80 Dsp::~Dsp() {
81 }
82
clear_state_f()83 inline void Dsp::clear_state_f()
84 {
85 for (int l0 = 0; (l0 < 524288); l0 = (l0 + 1)) fVec0[l0] = 0.0f;
86 for (int l1 = 0; (l1 < 2); l1 = (l1 + 1)) iVec1[l1] = 0;
87 for (int l2 = 0; (l2 < 2); l2 = (l2 + 1)) fRec0[l2] = 0.0f;
88 for (int l3 = 0; (l3 < 2); l3 = (l3 + 1)) fRec1[l3] = 0.0f;
89 for (int l4 = 0; (l4 < 2); l4 = (l4 + 1)) fRec2[l4] = 0.0f;
90 for (int l5 = 0; (l5 < 2); l5 = (l5 + 1)) fRec3[l5] = 0.0f;
91 for (int l6 = 0; (l6 < 2); l6 = (l6 + 1)) fRec4[l6] = 0.0f;
92 for (int l7 = 0; (l7 < 2); l7 = (l7 + 1)) fRec5[l7] = 0.0f;
93 for (int l8 = 0; (l8 < 2); l8 = (l8 + 1)) fRec6[l8] = 0.0f;
94 for (int l9 = 0; (l9 < 524288); l9 = (l9 + 1)) fVec2[l9] = 0.0f;
95 for (int l10 = 0; (l10 < 2); l10 = (l10 + 1)) fRec7[l10] = 0.0f;
96 for (int l11 = 0; (l11 < 2); l11 = (l11 + 1)) fRec8[l11] = 0.0f;
97 for (int l12 = 0; (l12 < 2); l12 = (l12 + 1)) fRec9[l12] = 0.0f;
98 for (int l13 = 0; (l13 < 2); l13 = (l13 + 1)) fRec10[l13] = 0.0f;
99 for (int l14 = 0; (l14 < 2); l14 = (l14 + 1)) fRec11[l14] = 0.0f;
100 }
101
clear_state_f_static(PluginLV2 * p)102 void Dsp::clear_state_f_static(PluginLV2 *p)
103 {
104 static_cast<Dsp*>(p)->clear_state_f();
105 }
106
init(uint32_t sample_rate)107 inline void Dsp::init(uint32_t sample_rate)
108 {
109 fSampleRate = sample_rate;
110 float fConst0 = std::min<float>(192000.0f, std::max<float>(1.0f, float(fSampleRate)));
111 fConst1 = (0.00100000005f * fConst0);
112 fConst2 = (6.28318548f / fConst0);
113 IOTA = 0;
114 }
115
init_static(uint32_t sample_rate,PluginLV2 * p)116 void Dsp::init_static(uint32_t sample_rate, PluginLV2 *p)
117 {
118 static_cast<Dsp*>(p)->init(sample_rate);
119 }
120
mem_alloc()121 void Dsp::mem_alloc()
122 {
123 if (!fVec0) fVec0 = new float[524288];
124 if (!fVec2) fVec2 = new float[524288];
125 mem_allocated = true;
126 }
127
mem_free()128 void Dsp::mem_free()
129 {
130 mem_allocated = false;
131 if (fVec0) { delete fVec0; fVec0 = 0; }
132 if (fVec2) { delete fVec2; fVec2 = 0; }
133 }
134
activate(bool start)135 int Dsp::activate(bool start)
136 {
137 if (start) {
138 if (!mem_allocated) {
139 mem_alloc();
140 clear_state_f();
141 }
142 } else if (mem_allocated) {
143 mem_free();
144 }
145 return 0;
146 }
147
activate_static(bool start,PluginLV2 * p)148 int Dsp::activate_static(bool start, PluginLV2 *p)
149 {
150 return static_cast<Dsp*>(p)->activate(start);
151 }
152
compute(int count,FAUSTFLOAT * input0,FAUSTFLOAT * input1,FAUSTFLOAT * output0,FAUSTFLOAT * output1)153 void always_inline Dsp::compute(int count, FAUSTFLOAT *input0, FAUSTFLOAT *input1, FAUSTFLOAT *output0, FAUSTFLOAT *output1)
154 {
155 #define fVslider0 (*fVslider0_)
156 #define fVslider1 (*fVslider1_)
157 #define fCheckbox0 (*fCheckbox0_)
158 #define fHslider0 (*fHslider0_)
159 #define fVslider2 (*fVslider2_)
160 #define fVslider3 (*fVslider3_)
161 float fSlow0 = (0.00100000005f * std::pow(10.0f, (0.0500000007f * float(fVslider0))));
162 float fSlow1 = (fConst1 * float(fVslider1));
163 float fSlow2 = float(fCheckbox0);
164 float fSlow3 = (fConst2 * float(fHslider0));
165 float fSlow4 = std::sin(fSlow3);
166 float fSlow5 = std::cos(fSlow3);
167 float fSlow6 = (0.00100000005f * std::pow(10.0f, (0.0500000007f * float(fVslider2))));
168 float fSlow7 = (fConst1 * float(fVslider3));
169 for (int i0 = 0; (i0 < count); i0 = (i0 + 1)) {
170 float fTemp0 = float(input0[i0]);
171 fVec0[(IOTA & 524287)] = fTemp0;
172 iVec1[0] = 1;
173 fRec0[0] = (fSlow0 + (0.999000013f * fRec0[1]));
174 float fThen1 = (((fRec2[1] == 1.0f) & (fSlow1 != fRec4[1])) ? -0.0009765625f : 0.0f);
175 float fThen3 = (((fRec2[1] == 0.0f) & (fSlow1 != fRec3[1])) ? 0.0009765625f : fThen1);
176 float fElse3 = (((fRec2[1] > 0.0f) & (fRec2[1] < 1.0f)) ? fRec1[1] : 0.0f);
177 float fTemp1 = ((fRec1[1] != 0.0f) ? fElse3 : fThen3);
178 fRec1[0] = fTemp1;
179 fRec2[0] = std::max<float>(0.0f, std::min<float>(1.0f, (fRec2[1] + fTemp1)));
180 fRec3[0] = (((fRec2[1] >= 1.0f) & (fRec4[1] != fSlow1)) ? fSlow1 : fRec3[1]);
181 fRec4[0] = (((fRec2[1] <= 0.0f) & (fRec3[1] != fSlow1)) ? fSlow1 : fRec4[1]);
182 float fTemp2 = fVec0[((IOTA - int(std::min<float>(262144.0f, std::max<float>(0.0f, fRec3[0])))) & 524287)];
183 fRec5[0] = ((fSlow4 * fRec6[1]) + (fSlow5 * fRec5[1]));
184 fRec6[0] = ((float((1 - iVec1[1])) + (fSlow5 * fRec6[1])) - (fSlow4 * fRec5[1]));
185 output0[i0] = FAUSTFLOAT((fTemp0 + ((fRec0[0] * (fTemp2 + (fRec2[0] * (fVec0[((IOTA - int(std::min<float>(262144.0f, std::max<float>(0.0f, fRec4[0])))) & 524287)] - fTemp2)))) * (1.0f - (fSlow2 * fRec5[0])))));
186 float fTemp3 = float(input1[i0]);
187 fVec2[(IOTA & 524287)] = fTemp3;
188 fRec7[0] = (fSlow6 + (0.999000013f * fRec7[1]));
189 float fThen7 = (((fRec9[1] == 1.0f) & (fSlow7 != fRec11[1])) ? -0.0009765625f : 0.0f);
190 float fThen9 = (((fRec9[1] == 0.0f) & (fSlow7 != fRec10[1])) ? 0.0009765625f : fThen7);
191 float fElse9 = (((fRec9[1] > 0.0f) & (fRec9[1] < 1.0f)) ? fRec8[1] : 0.0f);
192 float fTemp4 = ((fRec8[1] != 0.0f) ? fElse9 : fThen9);
193 fRec8[0] = fTemp4;
194 fRec9[0] = std::max<float>(0.0f, std::min<float>(1.0f, (fRec9[1] + fTemp4)));
195 fRec10[0] = (((fRec9[1] >= 1.0f) & (fRec11[1] != fSlow7)) ? fSlow7 : fRec10[1]);
196 fRec11[0] = (((fRec9[1] <= 0.0f) & (fRec10[1] != fSlow7)) ? fSlow7 : fRec11[1]);
197 float fTemp5 = fVec2[((IOTA - int(std::min<float>(262144.0f, std::max<float>(0.0f, fRec10[0])))) & 524287)];
198 output1[i0] = FAUSTFLOAT((fTemp3 + ((fRec7[0] * (fTemp5 + (fRec9[0] * (fVec2[((IOTA - int(std::min<float>(262144.0f, std::max<float>(0.0f, fRec11[0])))) & 524287)] - fTemp5)))) * (1.0f - (fSlow2 * (0.0f - fRec5[0]))))));
199 IOTA = (IOTA + 1);
200 iVec1[1] = iVec1[0];
201 fRec0[1] = fRec0[0];
202 fRec1[1] = fRec1[0];
203 fRec2[1] = fRec2[0];
204 fRec3[1] = fRec3[0];
205 fRec4[1] = fRec4[0];
206 fRec5[1] = fRec5[0];
207 fRec6[1] = fRec6[0];
208 fRec7[1] = fRec7[0];
209 fRec8[1] = fRec8[0];
210 fRec9[1] = fRec9[0];
211 fRec10[1] = fRec10[0];
212 fRec11[1] = fRec11[0];
213 }
214 #undef fVslider0
215 #undef fVslider1
216 #undef fCheckbox0
217 #undef fHslider0
218 #undef fVslider2
219 #undef fVslider3
220 }
221
compute_static(int count,FAUSTFLOAT * input0,FAUSTFLOAT * input1,FAUSTFLOAT * output0,FAUSTFLOAT * output1,PluginLV2 * p)222 void __rt_func Dsp::compute_static(int count, FAUSTFLOAT *input0, FAUSTFLOAT *input1, FAUSTFLOAT *output0, FAUSTFLOAT *output1, PluginLV2 *p)
223 {
224 static_cast<Dsp*>(p)->compute(count, input0, input1, output0, output1);
225 }
226
227
connect(uint32_t port,void * data)228 void Dsp::connect(uint32_t port,void* data)
229 {
230 switch ((PortIndex)port)
231 {
232 // static const value_pair fCheckbox0_values[] = {{"linear"},{"pingpong"},{0}};
233 case INVERT:
234 fCheckbox0_ = (float*)data; // , 0.0, 0.0, 1.0, 1.0
235 break;
236 case LFOFREQ:
237 fHslider0_ = (float*)data; // , 0.200000003f, 0.0f, 5.0f, 0.00999999978f
238 break;
239 case L_DELAY:
240 fVslider1_ = (float*)data; // , 0.0f, 0.0f, 5000.0f, 10.0f
241 break;
242 case L_GAIN:
243 fVslider0_ = (float*)data; // , 0.0f, -20.0f, 20.0f, 0.100000001f
244 break;
245 case R_DELAY:
246 fVslider3_ = (float*)data; // , 0.0f, 0.0f, 5000.0f, 10.0f
247 break;
248 case R_GAIN:
249 fVslider2_ = (float*)data; // , 0.0f, -20.0f, 20.0f, 0.100000001f
250 break;
251 default:
252 break;
253 }
254 }
255
connect_static(uint32_t port,void * data,PluginLV2 * p)256 void Dsp::connect_static(uint32_t port,void* data, PluginLV2 *p)
257 {
258 static_cast<Dsp*>(p)->connect(port, data);
259 }
260
261
plugin()262 PluginLV2 *plugin() {
263 return new Dsp();
264 }
265
del_instance(PluginLV2 * p)266 void Dsp::del_instance(PluginLV2 *p)
267 {
268 delete static_cast<Dsp*>(p);
269 }
270
271 /*
272 typedef enum
273 {
274 LFOFREQ,
275 INVERT,
276 L_DELAY,
277 L_GAIN,
278 R_DELAY,
279 R_GAIN,
280 } PortIndex;
281 */
282
283 } // end namespace stereodelay
284