3 Ann Hell Ex Machina - Music Software
4 Copyright (C) 2003/2005 Angel Ortega <angel@triptico.com>
6 ss_ins.c - Software synthesizer's instruments
8 This program is free software; you can redistribute it and/or
9 modify it under the terms of the GNU General Public License
10 as published by the Free Software Foundation; either version 2
11 of the License, or (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
22 http://www.triptico.com
37 #include "ss_output.h"
47 /* grows a dynamic array */
48 #define GROW(b,n,t) b=(t *)realloc(b,((n) + 1) * sizeof(t))
51 * ss_ins_init - Initializes an instrument.
54 * Initializes an instrument structure.
56 void ss_ins_init(struct ss_ins
* i
)
58 memset(i
, '\0', sizeof(struct ss_ins
));
60 /* default channels: stereo left and right, full volume */
61 ss_ins_set_channel(i
, 0, 1.0);
62 ss_ins_set_channel(i
, 1, 1.0);
64 /* sustain shouldn't be 0 to avoid end of note clicks */
65 ss_ins_set_sustain(i
, 50.0);
70 * ss_ins_add_layer - Adds a layer to an instrument.
72 * @w: wave describing the layer
74 * Adds a layer to an instrument.
76 * Returns 0 if the layer was added successfully.
78 void ss_ins_add_layer(struct ss_ins
* i
, struct ss_wave
* w
)
83 GROW(i
->layers
, i
->n_layers
, struct ss_wave
);
85 l
=&i
->layers
[i
->n_layers
];
87 memcpy(l
, w
, sizeof(struct ss_wave
));
94 * ss_ins_set_channel - Sets the volume for an instrument's channel.
96 * @channel: channel number
99 * Sets the volume for an instrument's channel. If the channel does
100 * not exist, it's created and space allocated for it in the volume and
101 * effect dynamic arrays.
103 void ss_ins_set_channel(struct ss_ins
* i
, int channel
, float vol
)
105 /* if channel is new, alloc space for it */
106 if(channel
<= i
->n_channels
)
110 GROW(i
->vols
, channel
, float);
111 GROW(i
->effs
, channel
, struct ss_eff
*);
113 /* fill newly allocated space */
114 for(n
=i
->n_channels
;n
<= channel
;n
++)
120 i
->n_channels
=channel
+ 1;
124 i
->vols
[channel
]=vol
;
129 * ss_ins_set_sustain - Sets the sustain for an instrument.
131 * @sustain: the sustain time in milliseconds
133 * Sets the sustain for an instrument. @sustain is expressed in
136 void ss_ins_set_sustain(struct ss_ins
* i
, double sustain
)
143 * ss_ins_note_on - Plays a note.
145 * @note: MIDI note to be played
149 * Locates a layer to play a note, and starts generators to
150 * play it. The @note is expressed as a MIDI note and the
151 * desired volume (from 0 to 1) stored in @vol. The note @id
152 * should be a positive, unique identifier for this note; no two
153 * simultaneously playing notes should share this id.
155 * Returns the number of generators that were activated.
157 int ss_ins_note_on(struct ss_ins
* i
, int note
, float vol
, int note_id
)
165 note_freq
=ss_note_frequency(note
);
168 for(n
=0;n
< i
->n_layers
;n
++)
172 if(note_freq
< w
->min_freq
|| note_freq
> w
->max_freq
)
175 /* get a free generator, or fail */
176 if((g
=ss_gen_alloc(&i
->gens
)) == NULL
)
179 /* start the generator */
180 ss_gen_play(g
, note_freq
, vol
, note_id
, w
);
183 ss_gen_sustain(g
, i
->sustain
);
185 /* TEST: portamento */
187 g
->portamento
=-0.000001;
197 * ss_ins_note_off - Releases a note.
199 * @note_id: the id of the note to be released
201 * Releases a note. The generators associated to it will enter release mode.
203 void ss_ins_note_off(struct ss_ins
* i
, int note_id
)
207 /* releases all generators with that note_id */
208 for(g
=i
->gens
;g
!= NULL
;g
=g
->next
)
210 if(g
->note_id
== note_id
)
217 * ss_ins_frame - Generates a frame of samples.
219 * @frame: array where the output samples will be stored
221 * Generates a frame of samples mixing all the active generators
224 void ss_ins_frame(struct ss_ins
* i
, float frame
[])
229 float l_frame
[SS_MAX_CHANNELS
];
231 /* resets this local frame */
232 ss_output_init_frame(l_frame
);
234 /* loops through the generators */
235 for(g
=i
->gens
;g
!= NULL
;g
=t
)
239 /* if the generator has stopped, free it */
240 if(ss_gen_frame(g
, i
->n_channels
, l_frame
))
241 ss_gen_free(&i
->gens
, g
);
244 /* loops through the effects and remixes */
245 for(n
=0;n
< i
->n_channels
;n
++)
247 frame
[n
] += ss_eff_process(i
->effs
[n
], l_frame
[n
]);
248 frame
[n
] *= i
->vols
[n
];