1 // generated from file '../src/LV2/faust/chorus.dsp' by dsp2cc:
2 // Code generated with Faust (https://faust.grame.fr)
3
4
5 namespace chorus {
6 class mydspSIG0 {
7
8 private:
9
10 int iRec9[2];
11
12 public:
13
getNumInputsmydspSIG0()14 int getNumInputsmydspSIG0() {
15 return 0;
16 }
getNumOutputsmydspSIG0()17 int getNumOutputsmydspSIG0() {
18 return 1;
19 }
20
instanceInitmydspSIG0(int sample_rate)21 void instanceInitmydspSIG0(int sample_rate) {
22 for (int l6 = 0; (l6 < 2); l6 = (l6 + 1)) {
23 iRec9[l6] = 0;
24 }
25 }
26
fillmydspSIG0(int count,float * table)27 void fillmydspSIG0(int count, float* table) {
28 for (int i1 = 0; (i1 < count); i1 = (i1 + 1)) {
29 iRec9[0] = (iRec9[1] + 1);
30 table[i1] = std::sin((9.58738019e-05f * float((iRec9[0] + -1))));
31 iRec9[1] = iRec9[0];
32 }
33 }
34
35 };
36
newmydspSIG0()37 static mydspSIG0* newmydspSIG0() { return (mydspSIG0*)new mydspSIG0(); }
deletemydspSIG0(mydspSIG0 * dsp)38 static void deletemydspSIG0(mydspSIG0* dsp) { delete dsp; }
39
40 static float ftbl0mydspSIG0[65536];
41
42
43 class Dsp: public PluginLV2 {
44 private:
45 uint32_t fSampleRate;
46 int IOTA;
47 float *fVec0;
48 FAUSTFLOAT fHslider0;
49 FAUSTFLOAT *fHslider0_;
50 float fRec0[2];
51 float fConst1;
52 FAUSTFLOAT fHslider1;
53 FAUSTFLOAT *fHslider1_;
54 float fRec5[2];
55 FAUSTFLOAT fHslider2;
56 FAUSTFLOAT *fHslider2_;
57 float fRec6[2];
58 float fConst2;
59 FAUSTFLOAT fHslider3;
60 FAUSTFLOAT *fHslider3_;
61 float fRec8[2];
62 float fRec7[2];
63 float fConst3;
64 float fConst4;
65 float fRec1[2];
66 float fRec2[2];
67 float fRec3[2];
68 float fRec4[2];
69 float *fVec1;
70 float fRec10[2];
71 float fRec11[2];
72 float fRec12[2];
73 float fRec13[2];
74
75 bool mem_allocated;
76 void mem_alloc();
77 void mem_free();
78 void connect(uint32_t port,void* data);
79 void clear_state_f();
80 int activate(bool start);
81 void init(uint32_t sample_rate);
82 void compute(int count, FAUSTFLOAT *input0, FAUSTFLOAT *input1, FAUSTFLOAT *output0, FAUSTFLOAT *output1);
83
84 static void clear_state_f_static(PluginLV2*);
85 static int activate_static(bool start, PluginLV2*);
86 static void init_static(uint32_t sample_rate, PluginLV2*);
87 static void compute_static(int count, FAUSTFLOAT *input0, FAUSTFLOAT *input1, FAUSTFLOAT *output0, FAUSTFLOAT *output1, PluginLV2*);
88 static void del_instance(PluginLV2 *p);
89 static void connect_static(uint32_t port,void* data, PluginLV2 *p);
90 public:
91 Dsp();
92 ~Dsp();
93 };
94
95
96
Dsp()97 Dsp::Dsp()
98 : PluginLV2(),
99 fVec0(0),
100 fVec1(0),
101 mem_allocated(false) {
102 version = PLUGINLV2_VERSION;
103 id = "chorus";
104 name = N_("Chorus");
105 mono_audio = 0;
106 stereo_audio = compute_static;
107 set_samplerate = init_static;
108 activate_plugin = activate_static;
109 connect_ports = connect_static;
110 clear_state = clear_state_f_static;
111 delete_instance = del_instance;
112 }
113
~Dsp()114 Dsp::~Dsp() {
115 }
116
clear_state_f()117 inline void Dsp::clear_state_f()
118 {
119 for (int l0 = 0; (l0 < 131072); l0 = (l0 + 1)) fVec0[l0] = 0.0f;
120 for (int l1 = 0; (l1 < 2); l1 = (l1 + 1)) fRec0[l1] = 0.0f;
121 for (int l2 = 0; (l2 < 2); l2 = (l2 + 1)) fRec5[l2] = 0.0f;
122 for (int l3 = 0; (l3 < 2); l3 = (l3 + 1)) fRec6[l3] = 0.0f;
123 for (int l4 = 0; (l4 < 2); l4 = (l4 + 1)) fRec8[l4] = 0.0f;
124 for (int l5 = 0; (l5 < 2); l5 = (l5 + 1)) fRec7[l5] = 0.0f;
125 for (int l7 = 0; (l7 < 2); l7 = (l7 + 1)) fRec1[l7] = 0.0f;
126 for (int l8 = 0; (l8 < 2); l8 = (l8 + 1)) fRec2[l8] = 0.0f;
127 for (int l9 = 0; (l9 < 2); l9 = (l9 + 1)) fRec3[l9] = 0.0f;
128 for (int l10 = 0; (l10 < 2); l10 = (l10 + 1)) fRec4[l10] = 0.0f;
129 for (int l11 = 0; (l11 < 131072); l11 = (l11 + 1)) fVec1[l11] = 0.0f;
130 for (int l12 = 0; (l12 < 2); l12 = (l12 + 1)) fRec10[l12] = 0.0f;
131 for (int l13 = 0; (l13 < 2); l13 = (l13 + 1)) fRec11[l13] = 0.0f;
132 for (int l14 = 0; (l14 < 2); l14 = (l14 + 1)) fRec12[l14] = 0.0f;
133 for (int l15 = 0; (l15 < 2); l15 = (l15 + 1)) fRec13[l15] = 0.0f;
134 }
135
clear_state_f_static(PluginLV2 * p)136 void Dsp::clear_state_f_static(PluginLV2 *p)
137 {
138 static_cast<Dsp*>(p)->clear_state_f();
139 }
140
init(uint32_t sample_rate)141 inline void Dsp::init(uint32_t sample_rate)
142 {
143 mydspSIG0* sig0 = newmydspSIG0();
144 sig0->instanceInitmydspSIG0(sample_rate);
145 sig0->fillmydspSIG0(65536, ftbl0mydspSIG0);
146 deletemydspSIG0(sig0);
147 fSampleRate = sample_rate;
148 float fConst0 = std::min<float>(192000.0f, std::max<float>(1.0f, float(fSampleRate)));
149 fConst1 = (0.5f * fConst0);
150 fConst2 = (1.0f / fConst0);
151 fConst3 = (1000.0f / fConst0);
152 fConst4 = (0.0f - fConst3);
153 IOTA = 0;
154 }
155
init_static(uint32_t sample_rate,PluginLV2 * p)156 void Dsp::init_static(uint32_t sample_rate, PluginLV2 *p)
157 {
158 static_cast<Dsp*>(p)->init(sample_rate);
159 }
160
mem_alloc()161 void Dsp::mem_alloc()
162 {
163 if (!fVec0) fVec0 = new float[131072];
164 if (!fVec1) fVec1 = new float[131072];
165 mem_allocated = true;
166 }
167
mem_free()168 void Dsp::mem_free()
169 {
170 mem_allocated = false;
171 if (fVec0) { delete fVec0; fVec0 = 0; }
172 if (fVec1) { delete fVec1; fVec1 = 0; }
173 }
174
activate(bool start)175 int Dsp::activate(bool start)
176 {
177 if (start) {
178 if (!mem_allocated) {
179 mem_alloc();
180 clear_state_f();
181 }
182 } else if (mem_allocated) {
183 mem_free();
184 }
185 return 0;
186 }
187
activate_static(bool start,PluginLV2 * p)188 int Dsp::activate_static(bool start, PluginLV2 *p)
189 {
190 return static_cast<Dsp*>(p)->activate(start);
191 }
192
compute(int count,FAUSTFLOAT * input0,FAUSTFLOAT * input1,FAUSTFLOAT * output0,FAUSTFLOAT * output1)193 void always_inline Dsp::compute(int count, FAUSTFLOAT *input0, FAUSTFLOAT *input1, FAUSTFLOAT *output0, FAUSTFLOAT *output1)
194 {
195 #define fHslider0 (*fHslider0_)
196 #define fHslider1 (*fHslider1_)
197 #define fHslider2 (*fHslider2_)
198 #define fHslider3 (*fHslider3_)
199 float fSlow0 = (0.00700000022f * float(fHslider0));
200 float fSlow1 = (0.00700000022f * float(fHslider1));
201 float fSlow2 = (0.00700000022f * float(fHslider2));
202 float fSlow3 = (0.00700000022f * float(fHslider3));
203 for (int i0 = 0; (i0 < count); i0 = (i0 + 1)) {
204 float fTemp0 = float(input0[i0]);
205 fVec0[(IOTA & 131071)] = fTemp0;
206 fRec0[0] = (fSlow0 + (0.992999971f * fRec0[1]));
207 fRec5[0] = (fSlow1 + (0.992999971f * fRec5[1]));
208 fRec6[0] = (fSlow2 + (0.992999971f * fRec6[1]));
209 fRec8[0] = (fSlow3 + (0.992999971f * fRec8[1]));
210 float fTemp1 = (fRec7[1] + (fConst2 * fRec8[0]));
211 fRec7[0] = (fTemp1 - std::floor(fTemp1));
212 float fTemp2 = (65536.0f * (fRec7[0] - std::floor(fRec7[0])));
213 float fTemp3 = std::floor(fTemp2);
214 int iTemp4 = int(fTemp3);
215 float fTemp5 = (fConst1 * (fRec5[0] * ((fRec6[0] * (((fTemp3 + (1.0f - fTemp2)) * ftbl0mydspSIG0[(iTemp4 & 65535)]) + ((fTemp2 - fTemp3) * ftbl0mydspSIG0[((iTemp4 + 1) & 65535)]))) + 1.0f)));
216 float fThen1 = (((fRec2[1] == 1.0f) & (fTemp5 != fRec4[1])) ? fConst4 : 0.0f);
217 float fThen3 = (((fRec2[1] == 0.0f) & (fTemp5 != fRec3[1])) ? fConst3 : fThen1);
218 float fElse3 = (((fRec2[1] > 0.0f) & (fRec2[1] < 1.0f)) ? fRec1[1] : 0.0f);
219 float fTemp6 = ((fRec1[1] != 0.0f) ? fElse3 : fThen3);
220 fRec1[0] = fTemp6;
221 fRec2[0] = std::max<float>(0.0f, std::min<float>(1.0f, (fRec2[1] + fTemp6)));
222 fRec3[0] = (((fRec2[1] >= 1.0f) & (fRec4[1] != fTemp5)) ? fTemp5 : fRec3[1]);
223 fRec4[0] = (((fRec2[1] <= 0.0f) & (fRec3[1] != fTemp5)) ? fTemp5 : fRec4[1]);
224 float fTemp7 = fVec0[((IOTA - int(std::min<float>(65536.0f, std::max<float>(0.0f, fRec3[0])))) & 131071)];
225 output0[i0] = FAUSTFLOAT((fTemp0 + (fRec0[0] * (fTemp7 + (fRec2[0] * (fVec0[((IOTA - int(std::min<float>(65536.0f, std::max<float>(0.0f, fRec4[0])))) & 131071)] - fTemp7))))));
226 float fTemp8 = float(input1[i0]);
227 fVec1[(IOTA & 131071)] = fTemp8;
228 float fTemp9 = (65536.0f * (fRec7[0] + (0.25f - std::floor((fRec7[0] + 0.25f)))));
229 float fTemp10 = std::floor(fTemp9);
230 int iTemp11 = int(fTemp10);
231 float fTemp12 = (fConst1 * (fRec5[0] * ((fRec6[0] * (((fTemp10 + (1.0f - fTemp9)) * ftbl0mydspSIG0[(iTemp11 & 65535)]) + ((fTemp9 - fTemp10) * ftbl0mydspSIG0[((iTemp11 + 1) & 65535)]))) + 1.0f)));
232 float fThen7 = (((fRec11[1] == 1.0f) & (fTemp12 != fRec13[1])) ? fConst4 : 0.0f);
233 float fThen9 = (((fRec11[1] == 0.0f) & (fTemp12 != fRec12[1])) ? fConst3 : fThen7);
234 float fElse9 = (((fRec11[1] > 0.0f) & (fRec11[1] < 1.0f)) ? fRec10[1] : 0.0f);
235 float fTemp13 = ((fRec10[1] != 0.0f) ? fElse9 : fThen9);
236 fRec10[0] = fTemp13;
237 fRec11[0] = std::max<float>(0.0f, std::min<float>(1.0f, (fRec11[1] + fTemp13)));
238 fRec12[0] = (((fRec11[1] >= 1.0f) & (fRec13[1] != fTemp12)) ? fTemp12 : fRec12[1]);
239 fRec13[0] = (((fRec11[1] <= 0.0f) & (fRec12[1] != fTemp12)) ? fTemp12 : fRec13[1]);
240 float fTemp14 = fVec1[((IOTA - int(std::min<float>(65536.0f, std::max<float>(0.0f, fRec12[0])))) & 131071)];
241 output1[i0] = FAUSTFLOAT((fTemp8 + (fRec0[0] * (fTemp14 + (fRec11[0] * (fVec1[((IOTA - int(std::min<float>(65536.0f, std::max<float>(0.0f, fRec13[0])))) & 131071)] - fTemp14))))));
242 IOTA = (IOTA + 1);
243 fRec0[1] = fRec0[0];
244 fRec5[1] = fRec5[0];
245 fRec6[1] = fRec6[0];
246 fRec8[1] = fRec8[0];
247 fRec7[1] = fRec7[0];
248 fRec1[1] = fRec1[0];
249 fRec2[1] = fRec2[0];
250 fRec3[1] = fRec3[0];
251 fRec4[1] = fRec4[0];
252 fRec10[1] = fRec10[0];
253 fRec11[1] = fRec11[0];
254 fRec12[1] = fRec12[0];
255 fRec13[1] = fRec13[0];
256 }
257 #undef fHslider0
258 #undef fHslider1
259 #undef fHslider2
260 #undef fHslider3
261 }
262
compute_static(int count,FAUSTFLOAT * input0,FAUSTFLOAT * input1,FAUSTFLOAT * output0,FAUSTFLOAT * output1,PluginLV2 * p)263 void __rt_func Dsp::compute_static(int count, FAUSTFLOAT *input0, FAUSTFLOAT *input1, FAUSTFLOAT *output0, FAUSTFLOAT *output1, PluginLV2 *p)
264 {
265 static_cast<Dsp*>(p)->compute(count, input0, input1, output0, output1);
266 }
267
268
connect(uint32_t port,void * data)269 void Dsp::connect(uint32_t port,void* data)
270 {
271 switch ((PortIndex)port)
272 {
273 case DELAY:
274 fHslider1_ = (float*)data; // , 0.0199999996f, 0.0f, 0.200000003f, 0.00999999978f
275 break;
276 case DEPTH:
277 fHslider2_ = (float*)data; // , 0.0199999996f, 0.0f, 1.0f, 0.00999999978f
278 break;
279 case FREQ:
280 fHslider3_ = (float*)data; // , 3.0f, 0.0f, 10.0f, 0.00999999978f
281 break;
282 case LEVEL:
283 fHslider0_ = (float*)data; // , 0.5f, 0.0f, 1.0f, 0.00999999978f
284 break;
285 default:
286 break;
287 }
288 }
289
connect_static(uint32_t port,void * data,PluginLV2 * p)290 void Dsp::connect_static(uint32_t port,void* data, PluginLV2 *p)
291 {
292 static_cast<Dsp*>(p)->connect(port, data);
293 }
294
295
plugin()296 PluginLV2 *plugin() {
297 return new Dsp();
298 }
299
del_instance(PluginLV2 * p)300 void Dsp::del_instance(PluginLV2 *p)
301 {
302 delete static_cast<Dsp*>(p);
303 }
304
305 /*
306 typedef enum
307 {
308 DELAY,
309 DEPTH,
310 FREQ,
311 LEVEL,
312 } PortIndex;
313 */
314
315 } // end namespace chorus
316