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