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 *met;
10 sp_tenv *tenv;
11 SPFLOAT freq;
12 } UserData;
13
t_tenv(sp_test * tst,sp_data * sp,const char * hash)14 int t_tenv(sp_test *tst, sp_data *sp, const char *hash)
15 {
16 uint32_t n;
17 int fail = 0;
18
19 UserData ud;
20 sp_srand(sp, 123456);
21
22 sp_tenv_create(&ud.tenv);
23 sp_metro_create(&ud.met);
24 sp_ftbl_create(sp, &ud.ft, 2048);
25 sp_osc_create(&ud.osc);
26
27 sp_tenv_init(sp, ud.tenv);
28 ud.tenv->atk = 0.03;
29 ud.tenv->hold = 0.01;
30 ud.tenv->rel = 0.1;
31 sp_metro_init(sp, ud.met);
32 ud.met->freq = 3;
33 sp_gen_sine(sp, ud.ft);
34 sp_osc_init(sp, ud.osc, ud.ft, 0);
35
36 for(n = 0; n < tst->size; n++) {
37 SPFLOAT trig = 0;
38 SPFLOAT env = 0;
39 SPFLOAT osc = 0;
40 sp_metro_compute(sp, ud.met, NULL, &trig);
41 if(trig) ud.osc->freq = 500 + sp_rand(sp) % 2000;
42 sp_osc_compute(sp, ud.osc, NULL, &osc);
43 sp_tenv_compute(sp, ud.tenv, &trig, &env);
44 sp->out[0] = osc * env;
45 sp_test_add_sample(tst, sp->out[0]);
46 }
47
48 fail = sp_test_verify(tst, hash);
49
50 sp_tenv_destroy(&ud.tenv);
51 sp_metro_destroy(&ud.met);
52 sp_ftbl_destroy(&ud.ft);
53 sp_osc_destroy(&ud.osc);
54
55 if(fail) return SP_NOT_OK;
56 else return SP_OK;
57 }
58