1 #include "soundpipe.h"
2 #include "md5.h"
3 #include "tap.h"
4 #include "test.h"
5
6 typedef struct{
7 sp_osc *osc;
8 sp_ftbl *ft;
9 sp_metro *mt;
10 sp_tenv *te;
11 sp_rpt *rpt;
12 sp_maygate *mg;
13 } UserData;
14
t_rpt(sp_test * tst,sp_data * sp,const char * hash)15 int t_rpt(sp_test *tst, sp_data *sp, const char *hash)
16 {
17 uint32_t n;
18 int fail = 0;
19
20 UserData ud;
21 int tempo = 120;
22 SPFLOAT met, osc, env, rpt, maygate, trig, dry;
23
24 sp_rpt_create(&ud.rpt);
25 sp_maygate_create(&ud.mg);
26 sp_osc_create(&ud.osc);
27 sp_ftbl_create(sp, &ud.ft, 4096);
28 sp_metro_create(&ud.mt);
29 sp_tenv_create(&ud.te);
30
31
32 sp_maygate_init(sp, ud.mg);
33 ud.mg->prob = 0.5;
34 sp_gen_sine(sp, ud.ft);
35 sp_osc_init(sp, ud.osc, ud.ft, 0);
36 sp_metro_init(sp, ud.mt);
37 ud.mt->freq = tempo / 60.0;
38 sp_rpt_init(sp, ud.rpt, 1.0);
39 ud.rpt->bpm = tempo;
40 ud.rpt->div = 8;
41 ud.rpt->rep = 4;
42 sp_tenv_init(sp, ud.te);
43 ud.te->atk = 0.001;
44 ud.te->hold = 0.1;
45 ud.te->rel = 0.1;
46
47
48 /* allocate / initialize modules here */
49
50 for(n = 0; n < tst->size; n++) {
51 sp_metro_compute(sp, ud.mt, NULL, &met);
52 sp_tenv_compute(sp, ud.te, &met, &env);
53 sp_osc_compute(sp, ud.osc, NULL, &osc);
54 dry = osc * env;
55 sp_maygate_compute(sp, ud.mg, &met, &maygate);
56 trig = met * maygate;
57 sp_rpt_compute(sp, ud.rpt, &trig, &dry, &rpt);
58 sp_test_add_sample(tst, rpt);
59 }
60
61 fail = sp_test_verify(tst, hash);
62
63 /* destroy functions here */
64
65 sp_maygate_destroy(&ud.mg);
66 sp_tenv_destroy(&ud.te);
67 sp_metro_destroy(&ud.mt);
68 sp_ftbl_destroy(&ud.ft);
69 sp_osc_destroy(&ud.osc);
70 sp_rpt_destroy(&ud.rpt);
71
72 if(fail) return SP_NOT_OK;
73 else return SP_OK;
74 }
75