1 #include "soundpipe.h"
2 #include "md5.h"
3 #include "tap.h"
4 #include "test.h"
5 
6 typedef struct {
7     sp_prop *prop;
8     sp_osc *osc;
9     sp_ftbl *ft;
10     sp_tenv *tenv;
11 } UserData;
12 
t_prop(sp_test * tst,sp_data * sp,const char * hash)13 int t_prop(sp_test *tst, sp_data *sp, const char *hash)
14 {
15     uint32_t n;
16     int fail = 0;
17     SPFLOAT osc = 0, prop = 0, tenv = 0;
18 
19     sp_srand(sp, 1234567);
20     UserData ud;
21 
22     sp_prop_create(&ud.prop);
23     sp_osc_create(&ud.osc);
24     sp_ftbl_create(sp, &ud.ft, 2048);
25     sp_tenv_create(&ud.tenv);
26 
27     sp_prop_init(sp, ud.prop, "2(++)3(+++)-2(-2(++))+5(+++++)");
28     ud.prop->bpm = 80;
29     sp_gen_sine(sp, ud.ft);
30     sp_osc_init(sp, ud.osc, ud.ft, 0);
31     sp_tenv_init(sp, ud.tenv);
32     ud.tenv->atk = 0.01;
33     ud.tenv->hold = 0.01;
34     ud.tenv->rel =  0.2;
35 
36     ud.osc->freq = 500;
37 
38     for(n = 0; n < tst->size; n++) {
39 
40         osc = 0, prop = 0, tenv = 0;
41         ud.prop->bpm = 80;
42         sp_osc_compute(sp, ud.osc, NULL, &osc);
43         sp_prop_compute(sp, ud.prop, NULL, &prop);
44         sp_tenv_compute(sp, ud.tenv, &prop, &tenv);
45         sp->out[0] = osc * tenv;
46         sp_test_add_sample(tst, sp->out[0]);
47     }
48 
49     fail = sp_test_verify(tst, hash);
50 
51     sp_prop_destroy(&ud.prop);
52     sp_ftbl_destroy(&ud.ft);
53     sp_osc_destroy(&ud.osc);
54     sp_tenv_destroy(&ud.tenv);
55 
56     if(fail) return SP_NOT_OK;
57     else return SP_OK;
58 }
59