-
Notifications
You must be signed in to change notification settings - Fork 4
/
stimuli.c
126 lines (102 loc) · 2.12 KB
/
stimuli.c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
/*
* stimuli.c - Unified control input handling
*
* Copyright 2012 by Werner Almesberger
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, version 3 of the License.
*/
#include <stdlib.h>
#include <string.h>
#include "stimuli.h"
void midi_proc_lin(struct s_midi_ctrl *ct, int value)
{
*ct->var = (float) value/127.0;
}
void midi_proc_accel(struct s_midi_ctrl *ct, int value)
{
if(value < 64) {
ct->last += value;
if(ct->last > 127)
ct->last = 127;
} else {
ct->last -= 128-value;
if(ct->last & 0x80)
ct->last = 0;
}
*ct->var = (float) ct->last/127.0;
}
void stim_midi_ctrl(struct stimuli *s, int chan, int ctrl, int value)
{
struct s_midi_ctrl *ct;
if(s && s->midi[chan]) {
ct = s->midi[chan]->ctrl[ctrl];
if(ct)
ct->proc(ct, value);
}
}
int stim_add(struct stimuli *s, int chan, int ctrl, float *var,
void (*proc)(struct s_midi_ctrl *ct, int value))
{
struct s_midi_chan *ch;
struct s_midi_ctrl *ct;
if(!s->midi[chan]) {
s->midi[chan] = calloc(1, sizeof(struct s_midi_chan));
if(!s->midi[chan])
return 0;
}
ch = s->midi[chan];
if(!ch->ctrl[ctrl]) {
ch->ctrl[ctrl] = calloc(1, sizeof(struct s_midi_ctrl));
if(!ch->ctrl[ctrl])
return 0;
}
ct = ch->ctrl[ctrl];
ct->proc = proc;
ct->var = var;
return 1;
}
struct stimuli *stim_new(void)
{
struct stimuli *s;
s = calloc(1, sizeof(struct stimuli));
if(s)
s->ref = 1;
return s;
}
struct stimuli *stim_get(struct stimuli *s)
{
if(s)
s->ref++;
return s;
}
void stim_put(struct stimuli *s)
{
int i, j;
if(!s)
return;
if(--s->ref)
return;
for(i = 0; i != MIDI_CHANS; i++)
if(s->midi[i]) {
for(j = 0; j != MIDI_CTRLS; j++)
free(s->midi[i]->ctrl[j]);
free(s->midi[i]);
}
free(s);
}
void stim_redirect(struct stimuli *s, const float *old, float *new)
{
int i, j;
struct s_midi_ctrl *ct;
if(!s)
return;
for(i = 0; i != MIDI_CHANS; i++)
if(s->midi[i])
for(j = 0; j != MIDI_CTRLS; j++) {
ct = s->midi[i]->ctrl[j];
if (ct)
ct->var = new+(ct->var-old);
}
}