/FluidSynthWrapper/fluidsynth-1.0.8/doc/api/html/fluid__synth_8c-source.html
HTML | 3138 lines | 3137 code | 0 blank | 1 comment | 0 complexity | 852e724c5ee1c951e40c9f8660cfb603 MD5 | raw file
Possible License(s): LGPL-2.0, MPL-2.0-no-copyleft-exception
- <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
- <html><head><meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
- <title>libfluidsynth: src/fluid_synth.c Source File</title>
- <link href="doxygen.css" rel="stylesheet" type="text/css">
- <link href="tabs.css" rel="stylesheet" type="text/css">
- </head><body>
- <!-- Generated by Doxygen 1.5.3 -->
- <div class="tabs">
- <ul>
- <li><a href="index.html"><span>Main Page</span></a></li>
- <li><a href="annotated.html"><span>Data Structures</span></a></li>
- <li class="current"><a href="files.html"><span>Files</span></a></li>
- </ul>
- </div>
- <h1>src/fluid_synth.c</h1><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">/* FluidSynth - A Software Synthesizer</span>
- <a name="l00002"></a>00002 <span class="comment"> *</span>
- <a name="l00003"></a>00003 <span class="comment"> * Copyright (C) 2003 Peter Hanappe and others.</span>
- <a name="l00004"></a>00004 <span class="comment"> *</span>
- <a name="l00005"></a>00005 <span class="comment"> * This library is free software; you can redistribute it and/or</span>
- <a name="l00006"></a>00006 <span class="comment"> * modify it under the terms of the GNU Library General Public License</span>
- <a name="l00007"></a>00007 <span class="comment"> * as published by the Free Software Foundation; either version 2 of</span>
- <a name="l00008"></a>00008 <span class="comment"> * the License, or (at your option) any later version.</span>
- <a name="l00009"></a>00009 <span class="comment"> *</span>
- <a name="l00010"></a>00010 <span class="comment"> * This library is distributed in the hope that it will be useful, but</span>
- <a name="l00011"></a>00011 <span class="comment"> * WITHOUT ANY WARRANTY; without even the implied warranty of</span>
- <a name="l00012"></a>00012 <span class="comment"> * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU</span>
- <a name="l00013"></a>00013 <span class="comment"> * Library General Public License for more details.</span>
- <a name="l00014"></a>00014 <span class="comment"> *</span>
- <a name="l00015"></a>00015 <span class="comment"> * You should have received a copy of the GNU Library General Public</span>
- <a name="l00016"></a>00016 <span class="comment"> * License along with this library; if not, write to the Free</span>
- <a name="l00017"></a>00017 <span class="comment"> * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA</span>
- <a name="l00018"></a>00018 <span class="comment"> * 02111-1307, USA</span>
- <a name="l00019"></a>00019 <span class="comment"> */</span>
- <a name="l00020"></a>00020
- <a name="l00021"></a>00021 <span class="preprocessor">#include <math.h></span>
- <a name="l00022"></a>00022
- <a name="l00023"></a>00023 <span class="preprocessor">#include "fluid_synth.h"</span>
- <a name="l00024"></a>00024 <span class="preprocessor">#include "fluid_sys.h"</span>
- <a name="l00025"></a>00025 <span class="preprocessor">#include "fluid_chan.h"</span>
- <a name="l00026"></a>00026 <span class="preprocessor">#include "fluid_tuning.h"</span>
- <a name="l00027"></a>00027 <span class="preprocessor">#include "fluid_settings.h"</span>
- <a name="l00028"></a>00028 <span class="preprocessor">#include "fluid_sfont.h"</span>
- <a name="l00029"></a>00029
- <a name="l00030"></a>00030 <span class="preprocessor">#ifdef TRAP_ON_FPE</span>
- <a name="l00031"></a>00031 <span class="preprocessor"></span><span class="preprocessor">#define _GNU_SOURCE</span>
- <a name="l00032"></a>00032 <span class="preprocessor"></span><span class="preprocessor">#include <fenv.h></span>
- <a name="l00033"></a>00033
- <a name="l00034"></a>00034 <span class="comment">/* seems to not be declared in fenv.h */</span>
- <a name="l00035"></a>00035 <span class="keyword">extern</span> <span class="keywordtype">int</span> feenableexcept (<span class="keywordtype">int</span> excepts);
- <a name="l00036"></a>00036 <span class="preprocessor">#endif</span>
- <a name="l00037"></a>00037 <span class="preprocessor"></span>
- <a name="l00038"></a>00038
- <a name="l00039"></a>00039 <a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>* new_fluid_defsfloader(<span class="keywordtype">void</span>);
- <a name="l00040"></a>00040
- <a name="l00041"></a>00041 <span class="comment">/************************************************************************</span>
- <a name="l00042"></a>00042 <span class="comment"> *</span>
- <a name="l00043"></a>00043 <span class="comment"> * These functions were added after the v1.0 API freeze. They are not</span>
- <a name="l00044"></a>00044 <span class="comment"> * in synth.h. They should be added as soon as a new development</span>
- <a name="l00045"></a>00045 <span class="comment"> * version is started.</span>
- <a name="l00046"></a>00046 <span class="comment"> *</span>
- <a name="l00047"></a>00047 <span class="comment"> ************************************************************************/</span>
- <a name="l00048"></a>00048
- <a name="l00049"></a>00049 <span class="keywordtype">int</span> fluid_synth_program_select2(fluid_synth_t* synth,
- <a name="l00050"></a>00050 <span class="keywordtype">int</span> chan,
- <a name="l00051"></a>00051 <span class="keywordtype">char</span>* sfont_name,
- <a name="l00052"></a>00052 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> bank_num,
- <a name="l00053"></a>00053 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> preset_num);
- <a name="l00054"></a>00054
- <a name="l00055"></a>00055 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* fluid_synth_get_sfont_by_name(fluid_synth_t* synth, <span class="keywordtype">char</span> *name);
- <a name="l00056"></a>00056
- <a name="l00057"></a>00057 <span class="keywordtype">int</span> fluid_synth_set_gen2(fluid_synth_t* synth, <span class="keywordtype">int</span> chan,
- <a name="l00058"></a>00058 <span class="keywordtype">int</span> param, <span class="keywordtype">float</span> value,
- <a name="l00059"></a>00059 <span class="keywordtype">int</span> absolute, <span class="keywordtype">int</span> normalized);
- <a name="l00060"></a>00060
- <a name="l00061"></a>00061
- <a name="l00062"></a>00062 <span class="comment">/***************************************************************</span>
- <a name="l00063"></a>00063 <span class="comment"> *</span>
- <a name="l00064"></a>00064 <span class="comment"> * GLOBAL</span>
- <a name="l00065"></a>00065 <span class="comment"> */</span>
- <a name="l00066"></a>00066
- <a name="l00067"></a>00067 <span class="comment">/* has the synth module been initialized? */</span>
- <a name="l00068"></a>00068 <span class="keyword">static</span> <span class="keywordtype">int</span> fluid_synth_initialized = 0;
- <a name="l00069"></a>00069 <span class="keyword">static</span> <span class="keywordtype">void</span> fluid_synth_init(<span class="keywordtype">void</span>);
- <a name="l00070"></a>00070 <span class="keyword">static</span> <span class="keywordtype">void</span> init_dither(<span class="keywordtype">void</span>);
- <a name="l00071"></a>00071
- <a name="l00072"></a>00072 <span class="comment">/* default modulators</span>
- <a name="l00073"></a>00073 <span class="comment"> * SF2.01 page 52 ff:</span>
- <a name="l00074"></a>00074 <span class="comment"> *</span>
- <a name="l00075"></a>00075 <span class="comment"> * There is a set of predefined default modulators. They have to be</span>
- <a name="l00076"></a>00076 <span class="comment"> * explicitly overridden by the sound font in order to turn them off.</span>
- <a name="l00077"></a>00077 <span class="comment"> */</span>
- <a name="l00078"></a>00078
- <a name="l00079"></a>00079 <a class="code" href="struct__fluid__mod__t.html">fluid_mod_t</a> default_vel2att_mod; <span class="comment">/* SF2.01 section 8.4.1 */</span>
- <a name="l00080"></a>00080 <a class="code" href="struct__fluid__mod__t.html">fluid_mod_t</a> default_vel2filter_mod; <span class="comment">/* SF2.01 section 8.4.2 */</span>
- <a name="l00081"></a>00081 <a class="code" href="struct__fluid__mod__t.html">fluid_mod_t</a> default_at2viblfo_mod; <span class="comment">/* SF2.01 section 8.4.3 */</span>
- <a name="l00082"></a>00082 <a class="code" href="struct__fluid__mod__t.html">fluid_mod_t</a> default_mod2viblfo_mod; <span class="comment">/* SF2.01 section 8.4.4 */</span>
- <a name="l00083"></a>00083 <a class="code" href="struct__fluid__mod__t.html">fluid_mod_t</a> default_att_mod; <span class="comment">/* SF2.01 section 8.4.5 */</span>
- <a name="l00084"></a>00084 <a class="code" href="struct__fluid__mod__t.html">fluid_mod_t</a> default_pan_mod; <span class="comment">/* SF2.01 section 8.4.6 */</span>
- <a name="l00085"></a>00085 <a class="code" href="struct__fluid__mod__t.html">fluid_mod_t</a> default_expr_mod; <span class="comment">/* SF2.01 section 8.4.7 */</span>
- <a name="l00086"></a>00086 <a class="code" href="struct__fluid__mod__t.html">fluid_mod_t</a> default_reverb_mod; <span class="comment">/* SF2.01 section 8.4.8 */</span>
- <a name="l00087"></a>00087 <a class="code" href="struct__fluid__mod__t.html">fluid_mod_t</a> default_chorus_mod; <span class="comment">/* SF2.01 section 8.4.9 */</span>
- <a name="l00088"></a>00088 <a class="code" href="struct__fluid__mod__t.html">fluid_mod_t</a> default_pitch_bend_mod; <span class="comment">/* SF2.01 section 8.4.10 */</span>
- <a name="l00089"></a>00089
- <a name="l00090"></a>00090 <span class="comment">/* reverb presets */</span>
- <a name="l00091"></a>00091 <span class="keyword">static</span> fluid_revmodel_presets_t revmodel_preset[] = {
- <a name="l00092"></a>00092 <span class="comment">/* name */</span> <span class="comment">/* roomsize */</span> <span class="comment">/* damp */</span> <span class="comment">/* width */</span> <span class="comment">/* level */</span>
- <a name="l00093"></a>00093 { <span class="stringliteral">"Test 1"</span>, 0.2f, 0.0f, 0.5f, 0.9f },
- <a name="l00094"></a>00094 { <span class="stringliteral">"Test 2"</span>, 0.4f, 0.2f, 0.5f, 0.8f },
- <a name="l00095"></a>00095 { <span class="stringliteral">"Test 3"</span>, 0.6f, 0.4f, 0.5f, 0.7f },
- <a name="l00096"></a>00096 { <span class="stringliteral">"Test 4"</span>, 0.8f, 0.7f, 0.5f, 0.6f },
- <a name="l00097"></a>00097 { <span class="stringliteral">"Test 5"</span>, 0.8f, 1.0f, 0.5f, 0.5f },
- <a name="l00098"></a>00098 { NULL, 0.0f, 0.0f, 0.0f, 0.0f }
- <a name="l00099"></a>00099 };
- <a name="l00100"></a>00100
- <a name="l00101"></a>00101
- <a name="l00102"></a>00102 <span class="comment">/***************************************************************</span>
- <a name="l00103"></a>00103 <span class="comment"> *</span>
- <a name="l00104"></a>00104 <span class="comment"> * INITIALIZATION & UTILITIES</span>
- <a name="l00105"></a>00105 <span class="comment"> */</span>
- <a name="l00106"></a>00106
- <a name="l00107"></a>00107
- <a name="l00108"></a>00108 <span class="keywordtype">void</span> fluid_synth_settings(fluid_settings_t* settings)
- <a name="l00109"></a>00109 {
- <a name="l00110"></a>00110 fluid_settings_register_str(settings, <span class="stringliteral">"synth.verbose"</span>, <span class="stringliteral">"no"</span>, 0, NULL, NULL);
- <a name="l00111"></a>00111 fluid_settings_register_str(settings, <span class="stringliteral">"synth.dump"</span>, <span class="stringliteral">"no"</span>, 0, NULL, NULL);
- <a name="l00112"></a>00112 fluid_settings_register_str(settings, <span class="stringliteral">"synth.reverb.active"</span>, <span class="stringliteral">"yes"</span>, 0, NULL, NULL);
- <a name="l00113"></a>00113 fluid_settings_register_str(settings, <span class="stringliteral">"synth.chorus.active"</span>, <span class="stringliteral">"yes"</span>, 0, NULL, NULL);
- <a name="l00114"></a>00114 fluid_settings_register_str(settings, <span class="stringliteral">"synth.ladspa.active"</span>, <span class="stringliteral">"no"</span>, 0, NULL, NULL);
- <a name="l00115"></a>00115
- <a name="l00116"></a>00116 fluid_settings_register_int(settings, <span class="stringliteral">"synth.polyphony"</span>,
- <a name="l00117"></a>00117 256, 16, 4096, 0, NULL, NULL);
- <a name="l00118"></a>00118 fluid_settings_register_int(settings, <span class="stringliteral">"synth.midi-channels"</span>,
- <a name="l00119"></a>00119 16, 16, 256, 0, NULL, NULL);
- <a name="l00120"></a>00120 fluid_settings_register_num(settings, <span class="stringliteral">"synth.gain"</span>,
- <a name="l00121"></a>00121 0.2f, 0.0f, 10.0f,
- <a name="l00122"></a>00122 0, NULL, NULL);
- <a name="l00123"></a>00123 fluid_settings_register_int(settings, <span class="stringliteral">"synth.audio-channels"</span>,
- <a name="l00124"></a>00124 1, 1, 256, 0, NULL, NULL);
- <a name="l00125"></a>00125 fluid_settings_register_int(settings, <span class="stringliteral">"synth.audio-groups"</span>,
- <a name="l00126"></a>00126 1, 1, 256, 0, NULL, NULL);
- <a name="l00127"></a>00127 fluid_settings_register_int(settings, <span class="stringliteral">"synth.effects-channels"</span>,
- <a name="l00128"></a>00128 2, 2, 2, 0, NULL, NULL);
- <a name="l00129"></a>00129 fluid_settings_register_num(settings, <span class="stringliteral">"synth.sample-rate"</span>,
- <a name="l00130"></a>00130 44100.0f, 22050.0f, 96000.0f,
- <a name="l00131"></a>00131 0, NULL, NULL);
- <a name="l00132"></a>00132 }
- <a name="l00133"></a>00133
- <a name="l00134"></a>00134 <span class="comment">/*</span>
- <a name="l00135"></a>00135 <span class="comment"> * fluid_version</span>
- <a name="l00136"></a>00136 <span class="comment"> */</span>
- <a name="l00137"></a>00137 <span class="keywordtype">void</span> fluid_version(<span class="keywordtype">int</span> *major, <span class="keywordtype">int</span> *minor, <span class="keywordtype">int</span> *micro)
- <a name="l00138"></a>00138 {
- <a name="l00139"></a>00139 *major = FLUIDSYNTH_VERSION_MAJOR;
- <a name="l00140"></a>00140 *minor = FLUIDSYNTH_VERSION_MINOR;
- <a name="l00141"></a>00141 *micro = FLUIDSYNTH_VERSION_MICRO;
- <a name="l00142"></a>00142 }
- <a name="l00143"></a>00143
- <a name="l00144"></a>00144 <span class="comment">/*</span>
- <a name="l00145"></a>00145 <span class="comment"> * fluid_version_str</span>
- <a name="l00146"></a>00146 <span class="comment"> */</span>
- <a name="l00147"></a>00147 <span class="keywordtype">char</span>* fluid_version_str(<span class="keywordtype">void</span>)
- <a name="l00148"></a>00148 {
- <a name="l00149"></a>00149 <span class="keywordflow">return</span> FLUIDSYNTH_VERSION;
- <a name="l00150"></a>00150 }
- <a name="l00151"></a>00151
- <a name="l00152"></a>00152
- <a name="l00153"></a>00153 <span class="comment">/*</span>
- <a name="l00154"></a>00154 <span class="comment"> * void fluid_synth_init</span>
- <a name="l00155"></a>00155 <span class="comment"> *</span>
- <a name="l00156"></a>00156 <span class="comment"> * Does all the initialization for this module.</span>
- <a name="l00157"></a>00157 <span class="comment"> */</span>
- <a name="l00158"></a>00158 <span class="keyword">static</span> <span class="keywordtype">void</span>
- <a name="l00159"></a>00159 fluid_synth_init()
- <a name="l00160"></a>00160 {
- <a name="l00161"></a>00161 fluid_synth_initialized++;
- <a name="l00162"></a>00162
- <a name="l00163"></a>00163 <span class="preprocessor">#ifdef TRAP_ON_FPE</span>
- <a name="l00164"></a>00164 <span class="preprocessor"></span> <span class="comment">/* Turn on floating point exception traps */</span>
- <a name="l00165"></a>00165 feenableexcept (FE_DIVBYZERO | FE_UNDERFLOW | FE_OVERFLOW | FE_INVALID);
- <a name="l00166"></a>00166 <span class="preprocessor">#endif</span>
- <a name="l00167"></a>00167 <span class="preprocessor"></span>
- <a name="l00168"></a>00168 fluid_conversion_config();
- <a name="l00169"></a>00169
- <a name="l00170"></a>00170 fluid_dsp_float_config();
- <a name="l00171"></a>00171
- <a name="l00172"></a>00172 fluid_sys_config();
- <a name="l00173"></a>00173
- <a name="l00174"></a>00174 init_dither();
- <a name="l00175"></a>00175
- <a name="l00176"></a>00176
- <a name="l00177"></a>00177 <span class="comment">/* SF2.01 page 53 section 8.4.1: MIDI Note-On Velocity to Initial Attenuation */</span>
- <a name="l00178"></a>00178 fluid_mod_set_source1(&default_vel2att_mod, <span class="comment">/* The modulator we are programming here */</span>
- <a name="l00179"></a>00179 FLUID_MOD_VELOCITY, <span class="comment">/* Source. VELOCITY corresponds to 'index=2'. */</span>
- <a name="l00180"></a>00180 FLUID_MOD_GC <span class="comment">/* Not a MIDI continuous controller */</span>
- <a name="l00181"></a>00181 | FLUID_MOD_CONCAVE <span class="comment">/* Curve shape. Corresponds to 'type=1' */</span>
- <a name="l00182"></a>00182 | FLUID_MOD_UNIPOLAR <span class="comment">/* Polarity. Corresponds to 'P=0' */</span>
- <a name="l00183"></a>00183 | FLUID_MOD_NEGATIVE <span class="comment">/* Direction. Corresponds to 'D=1' */</span>
- <a name="l00184"></a>00184 );
- <a name="l00185"></a>00185 fluid_mod_set_source2(&default_vel2att_mod, 0, 0); <span class="comment">/* No 2nd source */</span>
- <a name="l00186"></a>00186 fluid_mod_set_dest(&default_vel2att_mod, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b42db65ad593aeff4e814f9a7b7324c0df" title="Initial volume attenuation.">GEN_ATTENUATION</a>); <span class="comment">/* Target: Initial attenuation */</span>
- <a name="l00187"></a>00187 fluid_mod_set_amount(&default_vel2att_mod, 960.0); <span class="comment">/* Modulation amount: 960 */</span>
- <a name="l00188"></a>00188
- <a name="l00189"></a>00189
- <a name="l00190"></a>00190
- <a name="l00191"></a>00191 <span class="comment">/* SF2.01 page 53 section 8.4.2: MIDI Note-On Velocity to Filter Cutoff</span>
- <a name="l00192"></a>00192 <span class="comment"> * Have to make a design decision here. The specs don't make any sense this way or another.</span>
- <a name="l00193"></a>00193 <span class="comment"> * One sound font, 'Kingston Piano', which has been praised for its quality, tries to</span>
- <a name="l00194"></a>00194 <span class="comment"> * override this modulator with an amount of 0 and positive polarity (instead of what</span>
- <a name="l00195"></a>00195 <span class="comment"> * the specs say, D=1) for the secondary source.</span>
- <a name="l00196"></a>00196 <span class="comment"> * So if we change the polarity to 'positive', one of the best free sound fonts works...</span>
- <a name="l00197"></a>00197 <span class="comment"> */</span>
- <a name="l00198"></a>00198 fluid_mod_set_source1(&default_vel2filter_mod, FLUID_MOD_VELOCITY, <span class="comment">/* Index=2 */</span>
- <a name="l00199"></a>00199 FLUID_MOD_GC <span class="comment">/* CC=0 */</span>
- <a name="l00200"></a>00200 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
- <a name="l00201"></a>00201 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
- <a name="l00202"></a>00202 | FLUID_MOD_NEGATIVE <span class="comment">/* D=1 */</span>
- <a name="l00203"></a>00203 );
- <a name="l00204"></a>00204 fluid_mod_set_source2(&default_vel2filter_mod, FLUID_MOD_VELOCITY, <span class="comment">/* Index=2 */</span>
- <a name="l00205"></a>00205 FLUID_MOD_GC <span class="comment">/* CC=0 */</span>
- <a name="l00206"></a>00206 | FLUID_MOD_SWITCH <span class="comment">/* type=3 */</span>
- <a name="l00207"></a>00207 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
- <a name="l00208"></a>00208 <span class="comment">// do not remove | FLUID_MOD_NEGATIVE /* D=1 */</span>
- <a name="l00209"></a>00209 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
- <a name="l00210"></a>00210 );
- <a name="l00211"></a>00211 fluid_mod_set_dest(&default_vel2filter_mod, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b4e43e689b0b6349a676d26ea3096ed8d2" title="Filter cutoff.">GEN_FILTERFC</a>); <span class="comment">/* Target: Initial filter cutoff */</span>
- <a name="l00212"></a>00212 fluid_mod_set_amount(&default_vel2filter_mod, -2400);
- <a name="l00213"></a>00213
- <a name="l00214"></a>00214
- <a name="l00215"></a>00215
- <a name="l00216"></a>00216 <span class="comment">/* SF2.01 page 53 section 8.4.3: MIDI Channel pressure to Vibrato LFO pitch depth */</span>
- <a name="l00217"></a>00217 fluid_mod_set_source1(&default_at2viblfo_mod, FLUID_MOD_CHANNELPRESSURE, <span class="comment">/* Index=13 */</span>
- <a name="l00218"></a>00218 FLUID_MOD_GC <span class="comment">/* CC=0 */</span>
- <a name="l00219"></a>00219 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
- <a name="l00220"></a>00220 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
- <a name="l00221"></a>00221 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
- <a name="l00222"></a>00222 );
- <a name="l00223"></a>00223 fluid_mod_set_source2(&default_at2viblfo_mod, 0,0); <span class="comment">/* no second source */</span>
- <a name="l00224"></a>00224 fluid_mod_set_dest(&default_at2viblfo_mod, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b499387606556a9024de640b4519f7e559" title="Vibrato LFO to pitch.">GEN_VIBLFOTOPITCH</a>); <span class="comment">/* Target: Vib. LFO => pitch */</span>
- <a name="l00225"></a>00225 fluid_mod_set_amount(&default_at2viblfo_mod, 50);
- <a name="l00226"></a>00226
- <a name="l00227"></a>00227
- <a name="l00228"></a>00228
- <a name="l00229"></a>00229 <span class="comment">/* SF2.01 page 53 section 8.4.4: Mod wheel (Controller 1) to Vibrato LFO pitch depth */</span>
- <a name="l00230"></a>00230 fluid_mod_set_source1(&default_mod2viblfo_mod, 1, <span class="comment">/* Index=1 */</span>
- <a name="l00231"></a>00231 FLUID_MOD_CC <span class="comment">/* CC=1 */</span>
- <a name="l00232"></a>00232 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
- <a name="l00233"></a>00233 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
- <a name="l00234"></a>00234 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
- <a name="l00235"></a>00235 );
- <a name="l00236"></a>00236 fluid_mod_set_source2(&default_mod2viblfo_mod, 0,0); <span class="comment">/* no second source */</span>
- <a name="l00237"></a>00237 fluid_mod_set_dest(&default_mod2viblfo_mod, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b499387606556a9024de640b4519f7e559" title="Vibrato LFO to pitch.">GEN_VIBLFOTOPITCH</a>); <span class="comment">/* Target: Vib. LFO => pitch */</span>
- <a name="l00238"></a>00238 fluid_mod_set_amount(&default_mod2viblfo_mod, 50);
- <a name="l00239"></a>00239
- <a name="l00240"></a>00240
- <a name="l00241"></a>00241
- <a name="l00242"></a>00242 <span class="comment">/* SF2.01 page 55 section 8.4.5: MIDI continuous controller 7 to initial attenuation*/</span>
- <a name="l00243"></a>00243 fluid_mod_set_source1(&default_att_mod, 7, <span class="comment">/* index=7 */</span>
- <a name="l00244"></a>00244 FLUID_MOD_CC <span class="comment">/* CC=1 */</span>
- <a name="l00245"></a>00245 | FLUID_MOD_CONCAVE <span class="comment">/* type=1 */</span>
- <a name="l00246"></a>00246 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
- <a name="l00247"></a>00247 | FLUID_MOD_NEGATIVE <span class="comment">/* D=1 */</span>
- <a name="l00248"></a>00248 );
- <a name="l00249"></a>00249 fluid_mod_set_source2(&default_att_mod, 0, 0); <span class="comment">/* No second source */</span>
- <a name="l00250"></a>00250 fluid_mod_set_dest(&default_att_mod, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b42db65ad593aeff4e814f9a7b7324c0df" title="Initial volume attenuation.">GEN_ATTENUATION</a>); <span class="comment">/* Target: Initial attenuation */</span>
- <a name="l00251"></a>00251 fluid_mod_set_amount(&default_att_mod, 960.0); <span class="comment">/* Amount: 960 */</span>
- <a name="l00252"></a>00252
- <a name="l00253"></a>00253
- <a name="l00254"></a>00254
- <a name="l00255"></a>00255 <span class="comment">/* SF2.01 page 55 section 8.4.6 MIDI continuous controller 10 to Pan Position */</span>
- <a name="l00256"></a>00256 fluid_mod_set_source1(&default_pan_mod, 10, <span class="comment">/* index=10 */</span>
- <a name="l00257"></a>00257 FLUID_MOD_CC <span class="comment">/* CC=1 */</span>
- <a name="l00258"></a>00258 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
- <a name="l00259"></a>00259 | FLUID_MOD_BIPOLAR <span class="comment">/* P=1 */</span>
- <a name="l00260"></a>00260 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
- <a name="l00261"></a>00261 );
- <a name="l00262"></a>00262 fluid_mod_set_source2(&default_pan_mod, 0, 0); <span class="comment">/* No second source */</span>
- <a name="l00263"></a>00263 fluid_mod_set_dest(&default_pan_mod, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b45b713ab8c931017d98f11b5ed5a81fb1" title="Stereo panning.">GEN_PAN</a>); <span class="comment">/* Target: pan */</span>
- <a name="l00264"></a>00264 <span class="comment">/* Amount: 500. The SF specs $8.4.6, p. 55 syas: "Amount = 1000</span>
- <a name="l00265"></a>00265 <span class="comment"> tenths of a percent". The center value (64) corresponds to 50%,</span>
- <a name="l00266"></a>00266 <span class="comment"> so it follows that amount = 50% x 1000/% = 500. */</span>
- <a name="l00267"></a>00267 fluid_mod_set_amount(&default_pan_mod, 500.0);
- <a name="l00268"></a>00268
- <a name="l00269"></a>00269
- <a name="l00270"></a>00270 <span class="comment">/* SF2.01 page 55 section 8.4.7: MIDI continuous controller 11 to initial attenuation*/</span>
- <a name="l00271"></a>00271 fluid_mod_set_source1(&default_expr_mod, 11, <span class="comment">/* index=11 */</span>
- <a name="l00272"></a>00272 FLUID_MOD_CC <span class="comment">/* CC=1 */</span>
- <a name="l00273"></a>00273 | FLUID_MOD_CONCAVE <span class="comment">/* type=1 */</span>
- <a name="l00274"></a>00274 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
- <a name="l00275"></a>00275 | FLUID_MOD_NEGATIVE <span class="comment">/* D=1 */</span>
- <a name="l00276"></a>00276 );
- <a name="l00277"></a>00277 fluid_mod_set_source2(&default_expr_mod, 0, 0); <span class="comment">/* No second source */</span>
- <a name="l00278"></a>00278 fluid_mod_set_dest(&default_expr_mod, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b42db65ad593aeff4e814f9a7b7324c0df" title="Initial volume attenuation.">GEN_ATTENUATION</a>); <span class="comment">/* Target: Initial attenuation */</span>
- <a name="l00279"></a>00279 fluid_mod_set_amount(&default_expr_mod, 960.0); <span class="comment">/* Amount: 960 */</span>
- <a name="l00280"></a>00280
- <a name="l00281"></a>00281
- <a name="l00282"></a>00282
- <a name="l00283"></a>00283 <span class="comment">/* SF2.01 page 55 section 8.4.8: MIDI continuous controller 91 to Reverb send */</span>
- <a name="l00284"></a>00284 fluid_mod_set_source1(&default_reverb_mod, 91, <span class="comment">/* index=91 */</span>
- <a name="l00285"></a>00285 FLUID_MOD_CC <span class="comment">/* CC=1 */</span>
- <a name="l00286"></a>00286 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
- <a name="l00287"></a>00287 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
- <a name="l00288"></a>00288 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
- <a name="l00289"></a>00289 );
- <a name="l00290"></a>00290 fluid_mod_set_source2(&default_reverb_mod, 0, 0); <span class="comment">/* No second source */</span>
- <a name="l00291"></a>00291 fluid_mod_set_dest(&default_reverb_mod, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b48de830acd064933f55e0c1615d1e7f78" title="Reverb send amount.">GEN_REVERBSEND</a>); <span class="comment">/* Target: Reverb send */</span>
- <a name="l00292"></a>00292 fluid_mod_set_amount(&default_reverb_mod, 200); <span class="comment">/* Amount: 200 ('tenths of a percent') */</span>
- <a name="l00293"></a>00293
- <a name="l00294"></a>00294
- <a name="l00295"></a>00295
- <a name="l00296"></a>00296 <span class="comment">/* SF2.01 page 55 section 8.4.9: MIDI continuous controller 93 to Reverb send */</span>
- <a name="l00297"></a>00297 fluid_mod_set_source1(&default_chorus_mod, 93, <span class="comment">/* index=93 */</span>
- <a name="l00298"></a>00298 FLUID_MOD_CC <span class="comment">/* CC=1 */</span>
- <a name="l00299"></a>00299 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
- <a name="l00300"></a>00300 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
- <a name="l00301"></a>00301 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
- <a name="l00302"></a>00302 );
- <a name="l00303"></a>00303 fluid_mod_set_source2(&default_chorus_mod, 0, 0); <span class="comment">/* No second source */</span>
- <a name="l00304"></a>00304 fluid_mod_set_dest(&default_chorus_mod, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b420dc580d6c53d30eb97efe3e910793b6" title="Chorus send amount.">GEN_CHORUSSEND</a>); <span class="comment">/* Target: Chorus */</span>
- <a name="l00305"></a>00305 fluid_mod_set_amount(&default_chorus_mod, 200); <span class="comment">/* Amount: 200 ('tenths of a percent') */</span>
- <a name="l00306"></a>00306
- <a name="l00307"></a>00307
- <a name="l00308"></a>00308
- <a name="l00309"></a>00309 <span class="comment">/* SF2.01 page 57 section 8.4.10 MIDI Pitch Wheel to Initial Pitch ... */</span>
- <a name="l00310"></a>00310 fluid_mod_set_source1(&default_pitch_bend_mod, FLUID_MOD_PITCHWHEEL, <span class="comment">/* Index=14 */</span>
- <a name="l00311"></a>00311 FLUID_MOD_GC <span class="comment">/* CC =0 */</span>
- <a name="l00312"></a>00312 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
- <a name="l00313"></a>00313 | FLUID_MOD_BIPOLAR <span class="comment">/* P=1 */</span>
- <a name="l00314"></a>00314 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
- <a name="l00315"></a>00315 );
- <a name="l00316"></a>00316 fluid_mod_set_source2(&default_pitch_bend_mod, FLUID_MOD_PITCHWHEELSENS, <span class="comment">/* Index = 16 */</span>
- <a name="l00317"></a>00317 FLUID_MOD_GC <span class="comment">/* CC=0 */</span>
- <a name="l00318"></a>00318 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
- <a name="l00319"></a>00319 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
- <a name="l00320"></a>00320 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
- <a name="l00321"></a>00321 );
- <a name="l00322"></a>00322 fluid_mod_set_dest(&default_pitch_bend_mod, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b4b9a5716b5af1baf131a6225da6687ff0" title="Pitch (NOTE: Not a real SoundFont generator).">GEN_PITCH</a>); <span class="comment">/* Destination: Initial pitch */</span>
- <a name="l00323"></a>00323 fluid_mod_set_amount(&default_pitch_bend_mod, 12700.0); <span class="comment">/* Amount: 12700 cents */</span>
- <a name="l00324"></a>00324 }
- <a name="l00325"></a>00325
- <a name="l00326"></a>00326
- <a name="l00327"></a>00327 <span class="keywordtype">int</span> fluid_synth_verify_settings(fluid_settings_t *settings)
- <a name="l00328"></a>00328 {
- <a name="l00329"></a>00329 <span class="keywordflow">return</span> 0;
- <a name="l00330"></a>00330 }
- <a name="l00331"></a>00331
- <a name="l00332"></a>00332 <span class="comment">/***************************************************************</span>
- <a name="l00333"></a>00333 <span class="comment"> *</span>
- <a name="l00334"></a>00334 <span class="comment"> * FLUID SYNTH</span>
- <a name="l00335"></a>00335 <span class="comment"> */</span>
- <a name="l00336"></a>00336
- <a name="l00337"></a>00337 <span class="comment">/*</span>
- <a name="l00338"></a>00338 <span class="comment"> * new_fluid_synth</span>
- <a name="l00339"></a>00339 <span class="comment"> */</span>
- <a name="l00340"></a>00340 fluid_synth_t*
- <a name="l00341"></a>00341 new_fluid_synth(fluid_settings_t *settings)
- <a name="l00342"></a>00342 {
- <a name="l00343"></a>00343 <span class="keywordtype">int</span> i;
- <a name="l00344"></a>00344 fluid_synth_t* synth;
- <a name="l00345"></a>00345 <a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>* loader;
- <a name="l00346"></a>00346
- <a name="l00347"></a>00347 <span class="comment">/* initialize all the conversion tables and other stuff */</span>
- <a name="l00348"></a>00348 <span class="keywordflow">if</span> (fluid_synth_initialized == 0) {
- <a name="l00349"></a>00349 fluid_synth_init();
- <a name="l00350"></a>00350 }
- <a name="l00351"></a>00351
- <a name="l00352"></a>00352 fluid_synth_verify_settings(settings);
- <a name="l00353"></a>00353
- <a name="l00354"></a>00354 <span class="comment">/* allocate a new synthesizer object */</span>
- <a name="l00355"></a>00355 synth = FLUID_NEW(fluid_synth_t);
- <a name="l00356"></a>00356 <span class="keywordflow">if</span> (synth == NULL) {
- <a name="l00357"></a>00357 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Out of memory"</span>);
- <a name="l00358"></a>00358 <span class="keywordflow">return</span> NULL;
- <a name="l00359"></a>00359 }
- <a name="l00360"></a>00360 FLUID_MEMSET(synth, 0, <span class="keyword">sizeof</span>(fluid_synth_t));
- <a name="l00361"></a>00361
- <a name="l00362"></a>00362 fluid_mutex_init(synth->busy);
- <a name="l00363"></a>00363
- <a name="l00364"></a>00364 synth->settings = settings;
- <a name="l00365"></a>00365
- <a name="l00366"></a>00366 synth->with_reverb = fluid_settings_str_equal(settings, <span class="stringliteral">"synth.reverb.active"</span>, <span class="stringliteral">"yes"</span>);
- <a name="l00367"></a>00367 synth->with_chorus = fluid_settings_str_equal(settings, <span class="stringliteral">"synth.chorus.active"</span>, <span class="stringliteral">"yes"</span>);
- <a name="l00368"></a>00368 synth->verbose = fluid_settings_str_equal(settings, <span class="stringliteral">"synth.verbose"</span>, <span class="stringliteral">"yes"</span>);
- <a name="l00369"></a>00369 synth->dump = fluid_settings_str_equal(settings, <span class="stringliteral">"synth.dump"</span>, <span class="stringliteral">"yes"</span>);
- <a name="l00370"></a>00370
- <a name="l00371"></a>00371 fluid_settings_getint(settings, <span class="stringliteral">"synth.polyphony"</span>, &synth->polyphony);
- <a name="l00372"></a>00372 fluid_settings_getnum(settings, <span class="stringliteral">"synth.sample-rate"</span>, &synth->sample_rate);
- <a name="l00373"></a>00373 fluid_settings_getint(settings, <span class="stringliteral">"synth.midi-channels"</span>, &synth->midi_channels);
- <a name="l00374"></a>00374 fluid_settings_getint(settings, <span class="stringliteral">"synth.audio-channels"</span>, &synth->audio_channels);
- <a name="l00375"></a>00375 fluid_settings_getint(settings, <span class="stringliteral">"synth.audio-groups"</span>, &synth->audio_groups);
- <a name="l00376"></a>00376 fluid_settings_getint(settings, <span class="stringliteral">"synth.effects-channels"</span>, &synth->effects_channels);
- <a name="l00377"></a>00377 fluid_settings_getnum(settings, <span class="stringliteral">"synth.gain"</span>, &synth->gain);
- <a name="l00378"></a>00378
- <a name="l00379"></a>00379 <span class="comment">/* register the callbacks */</span>
- <a name="l00380"></a>00380 fluid_settings_register_num(settings, <span class="stringliteral">"synth.gain"</span>,
- <a name="l00381"></a>00381 0.2f, 0.0f, 10.0f, 0,
- <a name="l00382"></a>00382 (fluid_num_update_t) fluid_synth_update_gain, synth);
- <a name="l00383"></a>00383 fluid_settings_register_int(settings, <span class="stringliteral">"synth.polyphony"</span>,
- <a name="l00384"></a>00384 synth->polyphony, 16, 4096, 0,
- <a name="l00385"></a>00385 (fluid_int_update_t) fluid_synth_update_polyphony,
- <a name="l00386"></a>00386 synth);
- <a name="l00387"></a>00387
- <a name="l00388"></a>00388 <span class="comment">/* do some basic sanity checking on the settings */</span>
- <a name="l00389"></a>00389
- <a name="l00390"></a>00390 <span class="keywordflow">if</span> (synth->midi_channels % 16 != 0) {
- <a name="l00391"></a>00391 <span class="keywordtype">int</span> n = synth->midi_channels / 16;
- <a name="l00392"></a>00392 synth->midi_channels = (n + 1) * 16;
- <a name="l00393"></a>00393 fluid_settings_setint(settings, <span class="stringliteral">"synth.midi-channels"</span>, synth->midi_channels);
- <a name="l00394"></a>00394 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Requested number of MIDI channels is not a multiple of 16. "</span>
- <a name="l00395"></a>00395 <span class="stringliteral">"I'll increase the number of channels to the next multiple."</span>);
- <a name="l00396"></a>00396 }
- <a name="l00397"></a>00397
- <a name="l00398"></a>00398 <span class="keywordflow">if</span> (synth->audio_channels < 1) {
- <a name="l00399"></a>00399 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Requested number of audio channels is smaller than 1. "</span>
- <a name="l00400"></a>00400 <span class="stringliteral">"Changing this setting to 1."</span>);
- <a name="l00401"></a>00401 synth->audio_channels = 1;
- <a name="l00402"></a>00402 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (synth->audio_channels > 128) {
- <a name="l00403"></a>00403 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Requested number of audio channels is too big (%d). "</span>
- <a name="l00404"></a>00404 <span class="stringliteral">"Limiting this setting to 128."</span>, synth->audio_channels);
- <a name="l00405"></a>00405 synth->audio_channels = 128;
- <a name="l00406"></a>00406 }
- <a name="l00407"></a>00407
- <a name="l00408"></a>00408 <span class="keywordflow">if</span> (synth->audio_groups < 1) {
- <a name="l00409"></a>00409 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Requested number of audio groups is smaller than 1. "</span>
- <a name="l00410"></a>00410 <span class="stringliteral">"Changing this setting to 1."</span>);
- <a name="l00411"></a>00411 synth->audio_groups = 1;
- <a name="l00412"></a>00412 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (synth->audio_groups > 128) {
- <a name="l00413"></a>00413 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Requested number of audio groups is too big (%d). "</span>
- <a name="l00414"></a>00414 <span class="stringliteral">"Limiting this setting to 128."</span>, synth->audio_groups);
- <a name="l00415"></a>00415 synth->audio_groups = 128;
- <a name="l00416"></a>00416 }
- <a name="l00417"></a>00417
- <a name="l00418"></a>00418 <span class="keywordflow">if</span> (synth->effects_channels != 2) {
- <a name="l00419"></a>00419 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Invalid number of effects channels (%d)."</span>
- <a name="l00420"></a>00420 <span class="stringliteral">"Setting effects channels to 2."</span>, synth->effects_channels);
- <a name="l00421"></a>00421 synth->effects_channels = 2;
- <a name="l00422"></a>00422 }
- <a name="l00423"></a>00423
- <a name="l00424"></a>00424
- <a name="l00425"></a>00425 <span class="comment">/* The number of buffers is determined by the higher number of nr</span>
- <a name="l00426"></a>00426 <span class="comment"> * groups / nr audio channels. If LADSPA is unused, they should be</span>
- <a name="l00427"></a>00427 <span class="comment"> * the same. */</span>
- <a name="l00428"></a>00428 synth->nbuf = synth->audio_channels;
- <a name="l00429"></a>00429 <span class="keywordflow">if</span> (synth->audio_groups > synth->nbuf) {
- <a name="l00430"></a>00430 synth->nbuf = synth->audio_groups;
- <a name="l00431"></a>00431 }
- <a name="l00432"></a>00432
- <a name="l00433"></a>00433 <span class="preprocessor">#ifdef LADSPA</span>
- <a name="l00434"></a>00434 <span class="preprocessor"></span> <span class="comment">/* Create and initialize the Fx unit.*/</span>
- <a name="l00435"></a>00435 synth->LADSPA_FxUnit = new_fluid_LADSPA_FxUnit(synth);
- <a name="l00436"></a>00436 <span class="preprocessor">#endif</span>
- <a name="l00437"></a>00437 <span class="preprocessor"></span>
- <a name="l00438"></a>00438 <span class="comment">/* as soon as the synth is created it starts playing. */</span>
- <a name="l00439"></a>00439 synth->state = FLUID_SYNTH_PLAYING;
- <a name="l00440"></a>00440 synth->sfont = NULL;
- <a name="l00441"></a>00441 synth->noteid = 0;
- <a name="l00442"></a>00442 synth->ticks = 0;
- <a name="l00443"></a>00443 synth->tuning = NULL;
- <a name="l00444"></a>00444
- <a name="l00445"></a>00445 <span class="comment">/* allocate and add the default sfont loader */</span>
- <a name="l00446"></a>00446 loader = new_fluid_defsfloader();
- <a name="l00447"></a>00447
- <a name="l00448"></a>00448 <span class="keywordflow">if</span> (loader == NULL) {
- <a name="l00449"></a>00449 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Failed to create the default SoundFont loader"</span>);
- <a name="l00450"></a>00450 } <span class="keywordflow">else</span> {
- <a name="l00451"></a>00451 fluid_synth_add_sfloader(synth, loader);
- <a name="l00452"></a>00452 }
- <a name="l00453"></a>00453
- <a name="l00454"></a>00454 <span class="comment">/* allocate all channel objects */</span>
- <a name="l00455"></a>00455 synth->channel = FLUID_ARRAY(fluid_channel_t*, synth->midi_channels);
- <a name="l00456"></a>00456 <span class="keywordflow">if</span> (synth->channel == NULL) {
- <a name="l00457"></a>00457 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Out of memory"</span>);
- <a name="l00458"></a>00458 <span class="keywordflow">goto</span> error_recovery;
- <a name="l00459"></a>00459 }
- <a name="l00460"></a>00460 <span class="keywordflow">for</span> (i = 0; i < synth->midi_channels; i++) {
- <a name="l00461"></a>00461 synth->channel[i] = new_fluid_channel(synth, i);
- <a name="l00462"></a>00462 <span class="keywordflow">if</span> (synth->channel[i] == NULL) {
- <a name="l00463"></a>00463 <span class="keywordflow">goto</span> error_recovery;
- <a name="l00464"></a>00464 }
- <a name="l00465"></a>00465 }
- <a name="l00466"></a>00466
- <a name="l00467"></a>00467 <span class="comment">/* allocate all synthesis processes */</span>
- <a name="l00468"></a>00468 synth->nvoice = synth->polyphony;
- <a name="l00469"></a>00469 synth->voice = FLUID_ARRAY(fluid_voice_t*, synth->nvoice);
- <a name="l00470"></a>00470 <span class="keywordflow">if</span> (synth->voice == NULL) {
- <a name="l00471"></a>00471 <span class="keywordflow">goto</span> error_recovery;
- <a name="l00472"></a>00472 }
- <a name="l00473"></a>00473 <span class="keywordflow">for</span> (i = 0; i < synth->nvoice; i++) {
- <a name="l00474"></a>00474 synth->voice[i] = new_fluid_voice(synth->sample_rate);
- <a name="l00475"></a>00475 <span class="keywordflow">if</span> (synth->voice[i] == NULL) {
- <a name="l00476"></a>00476 <span class="keywordflow">goto</span> error_recovery;
- <a name="l00477"></a>00477 }
- <a name="l00478"></a>00478 }
- <a name="l00479"></a>00479
- <a name="l00480"></a>00480 <span class="comment">/* Allocate the sample buffers */</span>
- <a name="l00481"></a>00481 synth->left_buf = NULL;
- <a name="l00482"></a>00482 synth->right_buf = NULL;
- <a name="l00483"></a>00483 synth->fx_left_buf = NULL;
- <a name="l00484"></a>00484 synth->fx_right_buf = NULL;
- <a name="l00485"></a>00485
- <a name="l00486"></a>00486 <span class="comment">/* Left and right audio buffers */</span>
- <a name="l00487"></a>00487
- <a name="l00488"></a>00488 synth->left_buf = FLUID_ARRAY(fluid_real_t*, synth->nbuf);
- <a name="l00489"></a>00489 synth->right_buf = FLUID_ARRAY(fluid_real_t*, synth->nbuf);
- <a name="l00490"></a>00490
- <a name="l00491"></a>00491 <span class="keywordflow">if</span> ((synth->left_buf == NULL) || (synth->right_buf == NULL)) {
- <a name="l00492"></a>00492 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Out of memory"</span>);
- <a name="l00493"></a>00493 <span class="keywordflow">goto</span> error_recovery;
- <a name="l00494"></a>00494 }
- <a name="l00495"></a>00495
- <a name="l00496"></a>00496 FLUID_MEMSET(synth->left_buf, 0, synth->nbuf * <span class="keyword">sizeof</span>(fluid_real_t*));
- <a name="l00497"></a>00497 FLUID_MEMSET(synth->right_buf, 0, synth->nbuf * <span class="keyword">sizeof</span>(fluid_real_t*));
- <a name="l00498"></a>00498
- <a name="l00499"></a>00499 <span class="keywordflow">for</span> (i = 0; i < synth->nbuf; i++) {
- <a name="l00500"></a>00500
- <a name="l00501"></a>00501 synth->left_buf[i] = FLUID_ARRAY(fluid_real_t, FLUID_BUFSIZE);
- <a name="l00502"></a>00502 synth->right_buf[i] = FLUID_ARRAY(fluid_real_t, FLUID_BUFSIZE);
- <a name="l00503"></a>00503
- <a name="l00504"></a>00504 <span class="keywordflow">if</span> ((synth->left_buf[i] == NULL) || (synth->right_buf[i] == NULL)) {
- <a name="l00505"></a>00505 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Out of memory"</span>);
- <a name="l00506"></a>00506 <span class="keywordflow">goto</span> error_recovery;
- <a name="l00507"></a>00507 }
- <a name="l00508"></a>00508 }
- <a name="l00509"></a>00509
- <a name="l00510"></a>00510 <span class="comment">/* Effects audio buffers */</span>
- <a name="l00511"></a>00511
- <a name="l00512"></a>00512 synth->fx_left_buf = FLUID_ARRAY(fluid_real_t*, synth->effects_channels);
- <a name="l00513"></a>00513 synth->fx_right_buf = FLUID_ARRAY(fluid_real_t*, synth->effects_channels);
- <a name="l00514"></a>00514
- <a name="l00515"></a>00515 <span class="keywordflow">if</span> ((synth->fx_left_buf == NULL) || (synth->fx_right_buf == NULL)) {
- <a name="l00516"></a>00516 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Out of memory"</span>);
- <a name="l00517"></a>00517 <span class="keywordflow">goto</span> error_recovery;
- <a name="l00518"></a>00518 }
- <a name="l00519"></a>00519
- <a name="l00520"></a>00520 FLUID_MEMSET(synth->fx_left_buf, 0, 2 * <span class="keyword">sizeof</span>(fluid_real_t*));
- <a name="l00521"></a>00521 FLUID_MEMSET(synth->fx_right_buf, 0, 2 * <span class="keyword">sizeof</span>(fluid_real_t*));
- <a name="l00522"></a>00522
- <a name="l00523"></a>00523 <span class="keywordflow">for</span> (i = 0; i < synth->effects_channels; i++) {
- <a name="l00524"></a>00524 synth->fx_left_buf[i] = FLUID_ARRAY(fluid_real_t, FLUID_BUFSIZE);
- <a name="l00525"></a>00525 synth->fx_right_buf[i] = FLUID_ARRAY(fluid_real_t, FLUID_BUFSIZE);
- <a name="l00526"></a>00526
- <a name="l00527"></a>00527 <span class="keywordflow">if</span> ((synth->fx_left_buf[i] == NULL) || (synth->fx_right_buf[i] == NULL)) {
- <a name="l00528"></a>00528 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Out of memory"</span>);
- <a name="l00529"></a>00529 <span class="keywordflow">goto</span> error_recovery;
- <a name="l00530"></a>00530 }
- <a name="l00531"></a>00531 }
- <a name="l00532"></a>00532
- <a name="l00533"></a>00533
- <a name="l00534"></a>00534 synth->cur = FLUID_BUFSIZE;
- <a name="l00535"></a>00535 synth->dither_index = 0;
- <a name="l00536"></a>00536
- <a name="l00537"></a>00537 <span class="comment">/* allocate the reverb module */</span>
- <a name="l00538"></a>00538 synth->reverb = new_fluid_revmodel();
- <a name="l00539"></a>00539 <span class="keywordflow">if</span> (synth->reverb == NULL) {
- <a name="l00540"></a>00540 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Out of memory"</span>);
- <a name="l00541"></a>00541 <span class="keywordflow">goto</span> error_recovery;
- <a name="l00542"></a>00542 }
- <a name="l00543"></a>00543
- <a name="l00544"></a>00544 fluid_synth_set_reverb(synth,
- <a name="l00545"></a>00545 FLUID_REVERB_DEFAULT_ROOMSIZE,
- <a name="l00546"></a>00546 FLUID_REVERB_DEFAULT_DAMP,
- <a name="l00547"></a>00547 FLUID_REVERB_DEFAULT_WIDTH,
- <a name="l00548"></a>00548 FLUID_REVERB_DEFAULT_LEVEL);
- <a name="l00549"></a>00549
- <a name="l00550"></a>00550 <span class="comment">/* allocate the chorus module */</span>
- <a name="l00551"></a>00551 synth->chorus = new_fluid_chorus(synth->sample_rate);
- <a name="l00552"></a>00552 <span class="keywordflow">if</span> (synth->chorus == NULL) {
- <a name="l00553"></a>00553 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Out of memory"</span>);
- <a name="l00554"></a>00554 <span class="keywordflow">goto</span> error_recovery;
- <a name="l00555"></a>00555 }
- <a name="l00556"></a>00556
- <a name="l00557"></a>00557 <span class="comment">/* FIXME */</span>
- <a name="l00558"></a>00558 synth->start = fluid_curtime();
- <a name="l00559"></a>00559
- <a name="l00560"></a>00560 <span class="keywordflow">return</span> synth;
- <a name="l00561"></a>00561
- <a name="l00562"></a>00562 error_recovery:
- <a name="l00563"></a>00563 delete_fluid_synth(synth);
- <a name="l00564"></a>00564 <span class="keywordflow">return</span> NULL;
- <a name="l00565"></a>00565 }
- <a name="l00566"></a>00566
- <a name="l00567"></a>00567 <span class="comment">/*</span>
- <a name="l00568"></a>00568 <span class="comment"> * delete_fluid_synth</span>
- <a name="l00569"></a>00569 <span class="comment"> */</span>
- <a name="l00570"></a>00570 <span class="keywordtype">int</span>
- <a name="l00571"></a>00571 delete_fluid_synth(fluid_synth_t* synth)
- <a name="l00572"></a>00572 {
- <a name="l00573"></a>00573 <span class="keywordtype">int</span> i, k;
- <a name="l00574"></a>00574 fluid_list_t *list;
- <a name="l00575"></a>00575 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont;
- <a name="l00576"></a>00576 fluid_bank_offset_t* bank_offset;
- <a name="l00577"></a>00577 <a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>* loader;
- <a name="l00578"></a>00578
- <a name="l00579"></a>00579 <span class="keywordflow">if</span> (synth == NULL) {
- <a name="l00580"></a>00580 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l00581"></a>00581 }
- <a name="l00582"></a>00582
- <a name="l00583"></a>00583 fluid_profiling_print();
- <a name="l00584"></a>00584
- <a name="l00585"></a>00585 synth->state = FLUID_SYNTH_STOPPED;
- <a name="l00586"></a>00586
- <a name="l00587"></a>00587 <span class="comment">/* turn off all voices, needed to unload SoundFont data */</span>
- <a name="l00588"></a>00588 <span class="keywordflow">if</span> (synth->voice != NULL) {
- <a name="l00589"></a>00589 <span class="keywordflow">for</span> (i = 0; i < synth->nvoice; i++) {
- <a name="l00590"></a>00590 <span class="keywordflow">if</span> (synth->voice[i] && fluid_voice_is_playing (synth->voice[i]))
- <a name="l00591"></a>00591 fluid_voice_off (synth->voice[i]);
- <a name="l00592"></a>00592 }
- <a name="l00593"></a>00593 }
- <a name="l00594"></a>00594
- <a name="l00595"></a>00595 <span class="comment">/* delete all the SoundFonts */</span>
- <a name="l00596"></a>00596 <span class="keywordflow">for</span> (list = synth->sfont; list; list = fluid_list_next(list)) {
- <a name="l00597"></a>00597 sfont = (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) fluid_list_get(list);
- <a name="l00598"></a>00598 delete_fluid_sfont(sfont);
- <a name="l00599"></a>00599 }
- <a name="l00600"></a>00600
- <a name="l00601"></a>00601 delete_fluid_list(synth->sfont);
- <a name="l00602"></a>00602
- <a name="l00603"></a>00603 <span class="comment">/* and the SoundFont offsets */</span>
- <a name="l00604"></a>00604 <span class="keywordflow">for</span> (list = synth->bank_offsets; list; list = fluid_list_next(list)) {
- <a name="l00605"></a>00605 bank_offset = (fluid_bank_offset_t*) fluid_list_get(list);
- <a name="l00606"></a>00606 FLUID_FREE(bank_offset);
- <a name="l00607"></a>00607 }
- <a name="l00608"></a>00608
- <a name="l00609"></a>00609 delete_fluid_list(synth->bank_offsets);
- <a name="l00610"></a>00610
- <a name="l00611"></a>00611
- <a name="l00612"></a>00612 <span class="comment">/* delete all the SoundFont loaders */</span>
- <a name="l00613"></a>00613
- <a name="l00614"></a>00614 <span class="keywordflow">for</span> (list = synth->loaders; list; list = fluid_list_next(list)) {
- <a name="l00615"></a>00615 loader = (<a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>*) fluid_list_get(list);
- <a name="l00616"></a>00616 fluid_sfloader_delete(loader);
- <a name="l00617"></a>00617 }
- <a name="l00618"></a>00618
- <a name="l00619"></a>00619 delete_fluid_list(synth->loaders);
- <a name="l00620"></a>00620
- <a name="l00621"></a>00621
- <a name="l00622"></a>00622 <span class="keywordflow">if</span> (synth->channel != NULL) {
- <a name="l00623"></a>00623 <span class="keywordflow">for</span> (i = 0; i < synth->midi_channels; i++) {
- <a name="l00624"></a>00624 <span class="keywordflow">if</span> (synth->channel[i] != NULL) {
- <a name="l00625"></a>00625 delete_fluid_channel(synth->channel[i]);
- <a name="l00626"></a>00626 }
- <a name="l00627"></a>00627 }
- <a name="l00628"></a>00628 FLUID_FREE(synth->channel);
- <a name="l00629"></a>00629 }
- <a name="l00630"></a>00630
- <a name="l00631"></a>00631 <span class="keywordflow">if</span> (synth->voice != NULL) {
- <a name="l00632"></a>00632 <span class="keywordflow">for</span> (i = 0; i < synth->nvoice; i++) {
- <a name="l00633"></a>00633 <span class="keywordflow">if</span> (synth->voice[i] != NULL) {
- <a name="l00634"></a>00634 delete_fluid_voice(synth->voice[i]);
- <a name="l00635"></a>00635 }
- <a name="l00636"></a>00636 }
- <a name="l00637"></a>00637 FLUID_FREE(synth->voice);
- <a name="l00638"></a>00638 }
- <a name="l00639"></a>00639
- <a name="l00640"></a>00640 <span class="comment">/* free all the sample buffers */</span>
- <a name="l00641"></a>00641 <span class="keywordflow">if</span> (synth->left_buf != NULL) {
- <a name="l00642"></a>00642 <span class="keywordflow">for</span> (i = 0; i < synth->nbuf; i++) {
- <a name="l00643"></a>00643 <span class="keywordflow">if</span> (synth->left_buf[i] != NULL) {
- <a name="l00644"></a>00644 FLUID_FREE(synth->left_buf[i]);
- <a name="l00645"></a>00645 }
- <a name="l00646"></a>00646 }
- <a name="l00647"></a>00647 FLUID_FREE(synth->left_buf);
- <a name="l00648"></a>00648 }
- <a name="l00649"></a>00649
- <a name="l00650"></a>00650 <span class="keywordflow">if</span> (synth->right_buf != NULL) {
- <a name="l00651"></a>00651 <span class="keywordflow">for</span> (i = 0; i < synth->nbuf; i++) {
- <a name="l00652"></a>00652 <span class="keywordflow">if</span> (synth->right_buf[i] != NULL) {
- <a name="l00653"></a>00653 FLUID_FREE(synth->right_buf[i]);
- <a name="l00654"></a>00654 }
- <a name="l00655"></a>00655 }
- <a name="l00656"></a>00656 FLUID_FREE(synth->right_buf);
- <a name="l00657"></a>00657 }
- <a name="l00658"></a>00658
- <a name="l00659"></a>00659 <span class="keywordflow">if</span> (synth->fx_left_buf != NULL) {
- <a name="l00660"></a>00660 <span class="keywordflow">for</span> (i = 0; i < 2; i++) {
- <a name="l00661"></a>00661 <span class="keywordflow">if</span> (synth->fx_left_buf[i] != NULL) {
- <a name="l00662"></a>00662 FLUID_FREE(synth->fx_left_buf[i]);
- <a name="l00663"></a>00663 }
- <a name="l00664"></a>00664 }
- <a name="l00665"></a>00665 FLUID_FREE(synth->fx_left_buf);
- <a name="l00666"></a>00666 }
- <a name="l00667"></a>00667
- <a name="l00668"></a>00668 <span class="keywordflow">if</span> (synth->fx_right_buf != NULL) {
- <a name="l00669"></a>00669 <span class="keywordflow">for</span> (i = 0; i < 2; i++) {
- <a name="l00670"></a>00670 <span class="keywordflow">if</span> (synth->fx_right_buf[i] != NULL) {
- <a name="l00671"></a>00671 FLUID_FREE(synth->fx_right_buf[i]);
- <a name="l00672"></a>00672 }
- <a name="l00673"></a>00673 }
- <a name="l00674"></a>00674 FLUID_FREE(synth->fx_right_buf);
- <a name="l00675"></a>00675 }
- <a name="l00676"></a>00676
- <a name="l00677"></a>00677 <span class="comment">/* release the reverb module */</span>
- <a name="l00678"></a>00678 <span class="keywordflow">if</span> (synth->reverb != NULL) {
- <a name="l00679"></a>00679 delete_fluid_revmodel(synth->reverb);
- <a name="l00680"></a>00680 }
- <a name="l00681"></a>00681
- <a name="l00682"></a>00682 <span class="comment">/* release the chorus module */</span>
- <a name="l00683"></a>00683 <span class="keywordflow">if</span> (synth->chorus != NULL) {
- <a name="l00684"></a>00684 delete_fluid_chorus(synth->chorus);
- <a name="l00685"></a>00685 }
- <a name="l00686"></a>00686
- <a name="l00687"></a>00687 <span class="comment">/* free the tunings, if any */</span>
- <a name="l00688"></a>00688 <span class="keywordflow">if</span> (synth->tuning != NULL) {
- <a name="l00689"></a>00689 <span class="keywordflow">for</span> (i = 0; i < 128; i++) {
- <a name="l00690"></a>00690 <span class="keywordflow">if</span> (synth->tuning[i] != NULL) {
- <a name="l00691"></a>00691 <span class="keywordflow">for</span> (k = 0; k < 128; k++) {
- <a name="l00692"></a>00692 <span class="keywordflow">if</span> (synth->tuning[i][k] != NULL) {
- <a name="l00693"></a>00693 FLUID_FREE(synth->tuning[i][k]);
- <a name="l00694"></a>00694 }
- <a name="l00695"></a>00695 }
- <a name="l00696"></a>00696 FLUID_FREE(synth->tuning[i]);
- <a name="l00697"></a>00697 }
- <a name="l00698"></a>00698 }
- <a name="l00699"></a>00699 FLUID_FREE(synth->tuning);
- <a name="l00700"></a>00700 }
- <a name="l00701"></a>00701
- <a name="l00702"></a>00702 <span class="preprocessor">#ifdef LADSPA</span>
- <a name="l00703"></a>00703 <span class="preprocessor"></span> <span class="comment">/* Release the LADSPA Fx unit */</span>
- <a name="l00704"></a>00704 fluid_LADSPA_shutdown(synth->LADSPA_FxUnit);
- <a name="l00705"></a>00705 FLUID_FREE(synth->LADSPA_FxUnit);
- <a name="l00706"></a>00706 <span class="preprocessor">#endif</span>
- <a name="l00707"></a>00707 <span class="preprocessor"></span>
- <a name="l00708"></a>00708 fluid_mutex_destroy(synth->busy);
- <a name="l00709"></a>00709
- <a name="l00710"></a>00710 FLUID_FREE(synth);
- <a name="l00711"></a>00711
- <a name="l00712"></a>00712 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l00713"></a>00713 }
- <a name="l00714"></a>00714
- <a name="l00715"></a>00715 <span class="comment">/*</span>
- <a name="l00716"></a>00716 <span class="comment"> * fluid_synth_error</span>
- <a name="l00717"></a>00717 <span class="comment"> *</span>
- <a name="l00718"></a>00718 <span class="comment"> * The error messages are not thread-save, yet. They are still stored</span>
- <a name="l00719"></a>00719 <span class="comment"> * in a global message buffer (see fluid_sys.c).</span>
- <a name="l00720"></a>00720 <span class="comment"> * */</span>
- <a name="l00721"></a>00721 <span class="keywordtype">char</span>*
- <a name="l00722"></a>00722 fluid_synth_error(fluid_synth_t* synth)
- <a name="l00723"></a>00723 {
- <a name="l00724"></a>00724 <span class="keywordflow">return</span> fluid_error();
- <a name="l00725"></a>00725 }
- <a name="l00726"></a>00726
- <a name="l00727"></a>00727 <span class="comment">/*</span>
- <a name="l00728"></a>00728 <span class="comment"> * fluid_synth_noteon</span>
- <a name="l00729"></a>00729 <span class="comment"> */</span>
- <a name="l00730"></a>00730 <span class="keywordtype">int</span>
- <a name="l00731"></a>00731 fluid_synth_noteon(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> key, <span class="keywordtype">int</span> vel)
- <a name="l00732"></a>00732 {
- <a name="l00733"></a>00733 fluid_channel_t* channel;
- <a name="l00734"></a>00734 <span class="keywordtype">int</span> r = FLUID_FAILED;
- <a name="l00735"></a>00735
- <a name="l00736"></a>00736 <span class="comment">/* check the ranges of the arguments */</span>
- <a name="l00737"></a>00737 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l00738"></a>00738 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l00739"></a>00739 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l00740"></a>00740 }
- <a name="l00741"></a>00741
- <a name="l00742"></a>00742 <span class="comment">/* notes with velocity zero go to noteoff */</span>
- <a name="l00743"></a>00743 <span class="keywordflow">if</span> (vel == 0) {
- <a name="l00744"></a>00744 <span class="keywordflow">return</span> fluid_synth_noteoff(synth, chan, key);
- <a name="l00745"></a>00745 }
- <a name="l00746"></a>00746
- <a name="l00747"></a>00747 channel = synth->channel[chan];
- <a name="l00748"></a>00748
- <a name="l00749"></a>00749 <span class="comment">/* make sure this channel has a preset */</span>
- <a name="l00750"></a>00750 <span class="keywordflow">if</span> (channel->preset == NULL) {
- <a name="l00751"></a>00751 <span class="keywordflow">if</span> (synth->verbose) {
- <a name="l00752"></a>00752 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9edfa902517702f2dd8ae849b810175ac4" title="Verbose informational messages.">FLUID_INFO</a>, <span class="stringliteral">"noteon\t%d\t%d\t%d\t%05d\t%.3f\t%.3f\t%.3f\t%d\t%s"</span>,
- <a name="l00753"></a>00753 chan, key, vel, 0,
- <a name="l00754"></a>00754 (<span class="keywordtype">float</span>) synth->ticks / 44100.0f,
- <a name="l00755"></a>00755 (fluid_curtime() - synth->start) / 1000.0f,
- <a name="l00756"></a>00756 0.0f, 0, <span class="stringliteral">"channel has no preset"</span>);
- <a name="l00757"></a>00757 }
- <a name="l00758"></a>00758 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l00759"></a>00759 }
- <a name="l00760"></a>00760
- <a name="l00761"></a>00761 <span class="comment">/* If there is another voice process on the same channel and key,</span>
- <a name="l00762"></a>00762 <span class="comment"> advance it to the release phase. */</span>
- <a name="l00763"></a>00763 fluid_synth_release_voice_on_same_note(synth, chan, key);
- <a name="l00764"></a>00764
- <a name="l00765"></a>00765 <span class="keywordflow">return</span> fluid_synth_start(synth, synth->noteid++, channel->preset, 0, chan, key, vel);
- <a name="l00766"></a>00766 }
- <a name="l00767"></a>00767
- <a name="l00768"></a>00768 <span class="comment">/*</span>
- <a name="l00769"></a>00769 <span class="comment"> * fluid_synth_noteoff</span>
- <a name="l00770"></a>00770 <span class="comment"> */</span>
- <a name="l00771"></a>00771 <span class="keywordtype">int</span>
- <a name="l00772"></a>00772 fluid_synth_noteoff(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> key)
- <a name="l00773"></a>00773 {
- <a name="l00774"></a>00774 <span class="keywordtype">int</span> i;
- <a name="l00775"></a>00775 fluid_voice_t* voice;
- <a name="l00776"></a>00776 <span class="keywordtype">int</span> status = FLUID_FAILED;
- <a name="l00777"></a>00777 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l00778"></a>00778 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l00779"></a>00779
- <a name="l00780"></a>00780 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l00781"></a>00781 voice = synth->voice[i];
- <a name="l00782"></a>00782 <span class="keywordflow">if</span> (_ON(voice) && (voice->chan == chan) && (voice->key == key)) {
- <a name="l00783"></a>00783 <span class="keywordflow">if</span> (synth->verbose) {
- <a name="l00784"></a>00784 <span class="keywordtype">int</span> used_voices = 0;
- <a name="l00785"></a>00785 <span class="keywordtype">int</span> k;
- <a name="l00786"></a>00786 <span class="keywordflow">for</span> (k = 0; k < synth->polyphony; k++) {
- <a name="l00787"></a>00787 <span class="keywordflow">if</span> (!_AVAILABLE(synth->voice[k])) {
- <a name="l00788"></a>00788 used_voices++;
- <a name="l00789"></a>00789 }
- <a name="l00790"></a>00790 }
- <a name="l00791"></a>00791 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9edfa902517702f2dd8ae849b810175ac4" title="Verbose informational messages.">FLUID_INFO</a>, <span class="stringliteral">"noteoff\t%d\t%d\t%d\t%05d\t%.3f\t%.3f\t%.3f\t%d"</span>,
- <a name="l00792"></a>00792 voice->chan, voice->key, 0, voice->id,
- <a name="l00793"></a>00793 (<span class="keywordtype">float</span>) (voice->start_time + voice->ticks) / 44100.0f,
- <a name="l00794"></a>00794 (fluid_curtime() - synth->start) / 1000.0f,
- <a name="l00795"></a>00795 (<span class="keywordtype">float</span>) voice->ticks / 44100.0f,
- <a name="l00796"></a>00796 used_voices);
- <a name="l00797"></a>00797 } <span class="comment">/* if verbose */</span>
- <a name="l00798"></a>00798 fluid_voice_noteoff(voice);
- <a name="l00799"></a>00799 status = FLUID_OK;
- <a name="l00800"></a>00800 } <span class="comment">/* if voice on */</span>
- <a name="l00801"></a>00801 } <span class="comment">/* for all voices */</span>
- <a name="l00802"></a>00802 <span class="keywordflow">return</span> status;
- <a name="l00803"></a>00803 }
- <a name="l00804"></a>00804
- <a name="l00805"></a>00805 <span class="comment">/*</span>
- <a name="l00806"></a>00806 <span class="comment"> * fluid_synth_damp_voices</span>
- <a name="l00807"></a>00807 <span class="comment"> */</span>
- <a name="l00808"></a>00808 <span class="keywordtype">int</span>
- <a name="l00809"></a>00809 fluid_synth_damp_voices(fluid_synth_t* synth, <span class="keywordtype">int</span> chan)
- <a name="l00810"></a>00810 {
- <a name="l00811"></a>00811 <span class="keywordtype">int</span> i;
- <a name="l00812"></a>00812 fluid_voice_t* voice;
- <a name="l00813"></a>00813
- <a name="l00814"></a>00814 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l00815"></a>00815 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l00816"></a>00816
- <a name="l00817"></a>00817 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l00818"></a>00818 voice = synth->voice[i];
- <a name="l00819"></a>00819 <span class="keywordflow">if</span> ((voice->chan == chan) && _SUSTAINED(voice)) {
- <a name="l00820"></a>00820 <span class="comment">/* printf("turned off sustained note: chan=%d, key=%d, vel=%d\n", voice->chan, voice->key, voice->vel); */</span>
- <a name="l00821"></a>00821 fluid_voice_noteoff(voice);
- <a name="l00822"></a>00822 }
- <a name="l00823"></a>00823 }
- <a name="l00824"></a>00824
- <a name="l00825"></a>00825 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l00826"></a>00826 }
- <a name="l00827"></a>00827
- <a name="l00828"></a>00828 <span class="comment">/*</span>
- <a name="l00829"></a>00829 <span class="comment"> * fluid_synth_cc</span>
- <a name="l00830"></a>00830 <span class="comment"> */</span>
- <a name="l00831"></a>00831 <span class="keywordtype">int</span>
- <a name="l00832"></a>00832 fluid_synth_cc(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> num, <span class="keywordtype">int</span> val)
- <a name="l00833"></a>00833 {
- <a name="l00834"></a>00834 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l00835"></a>00835 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l00836"></a>00836
- <a name="l00837"></a>00837 <span class="comment">/* check the ranges of the arguments */</span>
- <a name="l00838"></a>00838 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l00839"></a>00839 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l00840"></a>00840 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l00841"></a>00841 }
- <a name="l00842"></a>00842 <span class="keywordflow">if</span> ((num < 0) || (num >= 128)) {
- <a name="l00843"></a>00843 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Ctrl out of range"</span>);
- <a name="l00844"></a>00844 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l00845"></a>00845 }
- <a name="l00846"></a>00846 <span class="keywordflow">if</span> ((val < 0) || (val >= 128)) {
- <a name="l00847"></a>00847 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Value out of range"</span>);
- <a name="l00848"></a>00848 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l00849"></a>00849 }
- <a name="l00850"></a>00850
- <a name="l00851"></a>00851 <span class="keywordflow">if</span> (synth->verbose) {
- <a name="l00852"></a>00852 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9edfa902517702f2dd8ae849b810175ac4" title="Verbose informational messages.">FLUID_INFO</a>, <span class="stringliteral">"cc\t%d\t%d\t%d"</span>, chan, num, val);
- <a name="l00853"></a>00853 }
- <a name="l00854"></a>00854
- <a name="l00855"></a>00855 <span class="comment">/* set the controller value in the channel */</span>
- <a name="l00856"></a>00856 fluid_channel_cc(synth->channel[chan], num, val);
- <a name="l00857"></a>00857
- <a name="l00858"></a>00858 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l00859"></a>00859 }
- <a name="l00860"></a>00860
- <a name="l00861"></a>00861 <span class="comment">/*</span>
- <a name="l00862"></a>00862 <span class="comment"> * fluid_synth_cc</span>
- <a name="l00863"></a>00863 <span class="comment"> */</span>
- <a name="l00864"></a>00864 <span class="keywordtype">int</span>
- <a name="l00865"></a>00865 fluid_synth_get_cc(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> num, <span class="keywordtype">int</span>* pval)
- <a name="l00866"></a>00866 {
- <a name="l00867"></a>00867 <span class="comment">/* check the ranges of the arguments */</span>
- <a name="l00868"></a>00868 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l00869"></a>00869 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l00870"></a>00870 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l00871"></a>00871 }
- <a name="l00872"></a>00872 <span class="keywordflow">if</span> ((num < 0) || (num >= 128)) {
- <a name="l00873"></a>00873 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Ctrl out of range"</span>);
- <a name="l00874"></a>00874 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l00875"></a>00875 }
- <a name="l00876"></a>00876
- <a name="l00877"></a>00877 *pval = synth->channel[chan]->cc[num];
- <a name="l00878"></a>00878 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l00879"></a>00879 }
- <a name="l00880"></a>00880
- <a name="l00881"></a>00881 <span class="comment">/*</span>
- <a name="l00882"></a>00882 <span class="comment"> * fluid_synth_all_notes_off</span>
- <a name="l00883"></a>00883 <span class="comment"> *</span>
- <a name="l00884"></a>00884 <span class="comment"> * put all notes on this channel into released state.</span>
- <a name="l00885"></a>00885 <span class="comment"> */</span>
- <a name="l00886"></a>00886 <span class="keywordtype">int</span>
- <a name="l00887"></a>00887 fluid_synth_all_notes_off(fluid_synth_t* synth, <span class="keywordtype">int</span> chan)
- <a name="l00888"></a>00888 {
- <a name="l00889"></a>00889 <span class="keywordtype">int</span> i;
- <a name="l00890"></a>00890 fluid_voice_t* voice;
- <a name="l00891"></a>00891
- <a name="l00892"></a>00892 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l00893"></a>00893 voice = synth->voice[i];
- <a name="l00894"></a>00894 <span class="keywordflow">if</span> (_PLAYING(voice) && (voice->chan == chan)) {
- <a name="l00895"></a>00895 fluid_voice_noteoff(voice);
- <a name="l00896"></a>00896 }
- <a name="l00897"></a>00897 }
- <a name="l00898"></a>00898 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l00899"></a>00899 }
- <a name="l00900"></a>00900
- <a name="l00901"></a>00901 <span class="comment">/*</span>
- <a name="l00902"></a>00902 <span class="comment"> * fluid_synth_all_sounds_off</span>
- <a name="l00903"></a>00903 <span class="comment"> *</span>
- <a name="l00904"></a>00904 <span class="comment"> * immediately stop all notes on this channel.</span>
- <a name="l00905"></a>00905 <span class="comment"> */</span>
- <a name="l00906"></a>00906 <span class="keywordtype">int</span>
- <a name="l00907"></a>00907 fluid_synth_all_sounds_off(fluid_synth_t* synth, <span class="keywordtype">int</span> chan)
- <a name="l00908"></a>00908 {
- <a name="l00909"></a>00909 <span class="keywordtype">int</span> i;
- <a name="l00910"></a>00910 fluid_voice_t* voice;
- <a name="l00911"></a>00911
- <a name="l00912"></a>00912 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l00913"></a>00913 voice = synth->voice[i];
- <a name="l00914"></a>00914 <span class="keywordflow">if</span> (_PLAYING(voice) && (voice->chan == chan)) {
- <a name="l00915"></a>00915 fluid_voice_off(voice);
- <a name="l00916"></a>00916 }
- <a name="l00917"></a>00917 }
- <a name="l00918"></a>00918 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l00919"></a>00919 }
- <a name="l00920"></a>00920
- <a name="l00921"></a>00921 <span class="comment">/*</span>
- <a name="l00922"></a>00922 <span class="comment"> * fluid_synth_system_reset</span>
- <a name="l00923"></a>00923 <span class="comment"> *</span>
- <a name="l00924"></a>00924 <span class="comment"> * Purpose:</span>
- <a name="l00925"></a>00925 <span class="comment"> * Respond to the MIDI command 'system reset' (0xFF, big red 'panic' button)</span>
- <a name="l00926"></a>00926 <span class="comment"> */</span>
- <a name="l00927"></a>00927 <span class="keywordtype">int</span>
- <a name="l00928"></a>00928 fluid_synth_system_reset(fluid_synth_t* synth)
- <a name="l00929"></a>00929 {
- <a name="l00930"></a>00930 <span class="keywordtype">int</span> i;
- <a name="l00931"></a>00931 fluid_voice_t* voice;
- <a name="l00932"></a>00932
- <a name="l00933"></a>00933 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l00934"></a>00934 voice = synth->voice[i];
- <a name="l00935"></a>00935 <span class="keywordflow">if</span> (_PLAYING(voice)) {
- <a name="l00936"></a>00936 fluid_voice_off(voice);
- <a name="l00937"></a>00937 }
- <a name="l00938"></a>00938 }
- <a name="l00939"></a>00939
- <a name="l00940"></a>00940 <span class="keywordflow">for</span> (i = 0; i < synth->midi_channels; i++) {
- <a name="l00941"></a>00941 fluid_channel_reset(synth->channel[i]);
- <a name="l00942"></a>00942 }
- <a name="l00943"></a>00943
- <a name="l00944"></a>00944 fluid_chorus_reset(synth->chorus);
- <a name="l00945"></a>00945 fluid_revmodel_reset(synth->reverb);
- <a name="l00946"></a>00946
- <a name="l00947"></a>00947 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l00948"></a>00948 }
- <a name="l00949"></a>00949
- <a name="l00950"></a>00950 <span class="comment">/*</span>
- <a name="l00951"></a>00951 <span class="comment"> * fluid_synth_modulate_voices</span>
- <a name="l00952"></a>00952 <span class="comment"> *</span>
- <a name="l00953"></a>00953 <span class="comment"> * tell all synthesis processes on this channel to update their</span>
- <a name="l00954"></a>00954 <span class="comment"> * synthesis parameters after a control change.</span>
- <a name="l00955"></a>00955 <span class="comment"> */</span>
- <a name="l00956"></a>00956 <span class="keywordtype">int</span>
- <a name="l00957"></a>00957 fluid_synth_modulate_voices(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> is_cc, <span class="keywordtype">int</span> ctrl)
- <a name="l00958"></a>00958 {
- <a name="l00959"></a>00959 <span class="keywordtype">int</span> i;
- <a name="l00960"></a>00960 fluid_voice_t* voice;
- <a name="l00961"></a>00961
- <a name="l00962"></a>00962 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l00963"></a>00963 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l00964"></a>00964
- <a name="l00965"></a>00965 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l00966"></a>00966 voice = synth->voice[i];
- <a name="l00967"></a>00967 <span class="keywordflow">if</span> (voice->chan == chan) {
- <a name="l00968"></a>00968 fluid_voice_modulate(voice, is_cc, ctrl);
- <a name="l00969"></a>00969 }
- <a name="l00970"></a>00970 }
- <a name="l00971"></a>00971 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l00972"></a>00972 }
- <a name="l00973"></a>00973
- <a name="l00974"></a>00974 <span class="comment">/*</span>
- <a name="l00975"></a>00975 <span class="comment"> * fluid_synth_modulate_voices_all</span>
- <a name="l00976"></a>00976 <span class="comment"> *</span>
- <a name="l00977"></a>00977 <span class="comment"> * Tell all synthesis processes on this channel to update their</span>
- <a name="l00978"></a>00978 <span class="comment"> * synthesis parameters after an all control off message (i.e. all</span>
- <a name="l00979"></a>00979 <span class="comment"> * controller have been reset to their default value).</span>
- <a name="l00980"></a>00980 <span class="comment"> */</span>
- <a name="l00981"></a>00981 <span class="keywordtype">int</span>
- <a name="l00982"></a>00982 fluid_synth_modulate_voices_all(fluid_synth_t* synth, <span class="keywordtype">int</span> chan)
- <a name="l00983"></a>00983 {
- <a name="l00984"></a>00984 <span class="keywordtype">int</span> i;
- <a name="l00985"></a>00985 fluid_voice_t* voice;
- <a name="l00986"></a>00986
- <a name="l00987"></a>00987 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l00988"></a>00988 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l00989"></a>00989
- <a name="l00990"></a>00990 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l00991"></a>00991 voice = synth->voice[i];
- <a name="l00992"></a>00992 <span class="keywordflow">if</span> (voice->chan == chan) {
- <a name="l00993"></a>00993 fluid_voice_modulate_all(voice);
- <a name="l00994"></a>00994 }
- <a name="l00995"></a>00995 }
- <a name="l00996"></a>00996 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l00997"></a>00997 }
- <a name="l00998"></a>00998
- <a name="l00999"></a>00999 <span class="comment">/*</span>
- <a name="l01000"></a>01000 <span class="comment"> * fluid_synth_pitch_bend</span>
- <a name="l01001"></a>01001 <span class="comment"> */</span>
- <a name="l01002"></a>01002 <span class="keywordtype">int</span>
- <a name="l01003"></a>01003 fluid_synth_pitch_bend(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> val)
- <a name="l01004"></a>01004 {
- <a name="l01005"></a>01005
- <a name="l01006"></a>01006 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l01007"></a>01007 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l01008"></a>01008
- <a name="l01009"></a>01009 <span class="comment">/* check the ranges of the arguments */</span>
- <a name="l01010"></a>01010 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l01011"></a>01011 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l01012"></a>01012 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01013"></a>01013 }
- <a name="l01014"></a>01014
- <a name="l01015"></a>01015 <span class="keywordflow">if</span> (synth->verbose) {
- <a name="l01016"></a>01016 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9edfa902517702f2dd8ae849b810175ac4" title="Verbose informational messages.">FLUID_INFO</a>, <span class="stringliteral">"pitchb\t%d\t%d"</span>, chan, val);
- <a name="l01017"></a>01017 }
- <a name="l01018"></a>01018
- <a name="l01019"></a>01019 <span class="comment">/* set the pitch-bend value in the channel */</span>
- <a name="l01020"></a>01020 fluid_channel_pitch_bend(synth->channel[chan], val);
- <a name="l01021"></a>01021
- <a name="l01022"></a>01022 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01023"></a>01023 }
- <a name="l01024"></a>01024
- <a name="l01025"></a>01025 <span class="comment">/*</span>
- <a name="l01026"></a>01026 <span class="comment"> * fluid_synth_pitch_bend</span>
- <a name="l01027"></a>01027 <span class="comment"> */</span>
- <a name="l01028"></a>01028 <span class="keywordtype">int</span>
- <a name="l01029"></a>01029 fluid_synth_get_pitch_bend(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span>* ppitch_bend)
- <a name="l01030"></a>01030 {
- <a name="l01031"></a>01031 <span class="comment">/* check the ranges of the arguments */</span>
- <a name="l01032"></a>01032 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l01033"></a>01033 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l01034"></a>01034 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01035"></a>01035 }
- <a name="l01036"></a>01036
- <a name="l01037"></a>01037 *ppitch_bend = synth->channel[chan]->pitch_bend;
- <a name="l01038"></a>01038 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01039"></a>01039 }
- <a name="l01040"></a>01040
- <a name="l01041"></a>01041 <span class="comment">/*</span>
- <a name="l01042"></a>01042 <span class="comment"> * Fluid_synth_pitch_wheel_sens</span>
- <a name="l01043"></a>01043 <span class="comment"> */</span>
- <a name="l01044"></a>01044 <span class="keywordtype">int</span>
- <a name="l01045"></a>01045 fluid_synth_pitch_wheel_sens(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> val)
- <a name="l01046"></a>01046 {
- <a name="l01047"></a>01047
- <a name="l01048"></a>01048 <span class="comment">/* check the ranges of the arguments */</span>
- <a name="l01049"></a>01049 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l01050"></a>01050 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l01051"></a>01051 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01052"></a>01052 }
- <a name="l01053"></a>01053
- <a name="l01054"></a>01054 <span class="keywordflow">if</span> (synth->verbose) {
- <a name="l01055"></a>01055 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9edfa902517702f2dd8ae849b810175ac4" title="Verbose informational messages.">FLUID_INFO</a>, <span class="stringliteral">"pitchsens\t%d\t%d"</span>, chan, val);
- <a name="l01056"></a>01056 }
- <a name="l01057"></a>01057
- <a name="l01058"></a>01058 <span class="comment">/* set the pitch-bend value in the channel */</span>
- <a name="l01059"></a>01059 fluid_channel_pitch_wheel_sens(synth->channel[chan], val);
- <a name="l01060"></a>01060
- <a name="l01061"></a>01061 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01062"></a>01062 }
- <a name="l01063"></a>01063
- <a name="l01064"></a>01064 <span class="comment">/*</span>
- <a name="l01065"></a>01065 <span class="comment"> * fluid_synth_get_pitch_wheel_sens</span>
- <a name="l01066"></a>01066 <span class="comment"> *</span>
- <a name="l01067"></a>01067 <span class="comment"> * Note : this function was added after version 1.0 API freeze.</span>
- <a name="l01068"></a>01068 <span class="comment"> * So its API is not in the synth.h file. It should be added in some later</span>
- <a name="l01069"></a>01069 <span class="comment"> * version of fluidsynth. Maybe v2.0 ? -- Antoine Schmitt May 2003</span>
- <a name="l01070"></a>01070 <span class="comment"> */</span>
- <a name="l01071"></a>01071
- <a name="l01072"></a>01072 <span class="keywordtype">int</span>
- <a name="l01073"></a>01073 fluid_synth_get_pitch_wheel_sens(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span>* pval)
- <a name="l01074"></a>01074 {
- <a name="l01075"></a>01075
- <a name="l01076"></a>01076 <span class="comment">// check the ranges of the arguments</span>
- <a name="l01077"></a>01077 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l01078"></a>01078 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l01079"></a>01079 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01080"></a>01080 }
- <a name="l01081"></a>01081
- <a name="l01082"></a>01082 <span class="comment">// get the pitch-bend value in the channel</span>
- <a name="l01083"></a>01083 *pval = synth->channel[chan]->pitch_wheel_sensitivity;
- <a name="l01084"></a>01084
- <a name="l01085"></a>01085 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01086"></a>01086 }
- <a name="l01087"></a>01087
- <a name="l01088"></a>01088 <span class="comment">/*</span>
- <a name="l01089"></a>01089 <span class="comment"> * fluid_synth_get_preset</span>
- <a name="l01090"></a>01090 <span class="comment"> */</span>
- <a name="l01091"></a>01091 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>*
- <a name="l01092"></a>01092 fluid_synth_get_preset(fluid_synth_t* synth, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> sfontnum,
- <a name="l01093"></a>01093 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> banknum, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> prognum)
- <a name="l01094"></a>01094 {
- <a name="l01095"></a>01095 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset = NULL;
- <a name="l01096"></a>01096 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont = NULL;
- <a name="l01097"></a>01097 fluid_list_t* list = synth->sfont;
- <a name="l01098"></a>01098 <span class="keywordtype">int</span> offset;
- <a name="l01099"></a>01099
- <a name="l01100"></a>01100 sfont = fluid_synth_get_sfont_by_id(synth, sfontnum);
- <a name="l01101"></a>01101
- <a name="l01102"></a>01102 <span class="keywordflow">if</span> (sfont != NULL) {
- <a name="l01103"></a>01103 offset = fluid_synth_get_bank_offset(synth, sfontnum);
- <a name="l01104"></a>01104 preset = fluid_sfont_get_preset(sfont, banknum - offset, prognum);
- <a name="l01105"></a>01105 <span class="keywordflow">if</span> (preset != NULL) {
- <a name="l01106"></a>01106 <span class="keywordflow">return</span> preset;
- <a name="l01107"></a>01107 }
- <a name="l01108"></a>01108 }
- <a name="l01109"></a>01109 <span class="keywordflow">return</span> NULL;
- <a name="l01110"></a>01110 }
- <a name="l01111"></a>01111
- <a name="l01112"></a>01112 <span class="comment">/*</span>
- <a name="l01113"></a>01113 <span class="comment"> * fluid_synth_get_preset2</span>
- <a name="l01114"></a>01114 <span class="comment"> */</span>
- <a name="l01115"></a>01115 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>*
- <a name="l01116"></a>01116 fluid_synth_get_preset2(fluid_synth_t* synth, <span class="keywordtype">char</span>* sfont_name,
- <a name="l01117"></a>01117 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> banknum, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> prognum)
- <a name="l01118"></a>01118 {
- <a name="l01119"></a>01119 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset = NULL;
- <a name="l01120"></a>01120 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont = NULL;
- <a name="l01121"></a>01121 <span class="keywordtype">int</span> offset;
- <a name="l01122"></a>01122
- <a name="l01123"></a>01123 sfont = fluid_synth_get_sfont_by_name(synth, sfont_name);
- <a name="l01124"></a>01124
- <a name="l01125"></a>01125 <span class="keywordflow">if</span> (sfont != NULL) {
- <a name="l01126"></a>01126 offset = fluid_synth_get_bank_offset(synth, fluid_sfont_get_id(sfont));
- <a name="l01127"></a>01127 preset = fluid_sfont_get_preset(sfont, banknum - offset, prognum);
- <a name="l01128"></a>01128 <span class="keywordflow">if</span> (preset != NULL) {
- <a name="l01129"></a>01129 <span class="keywordflow">return</span> preset;
- <a name="l01130"></a>01130 }
- <a name="l01131"></a>01131 }
- <a name="l01132"></a>01132 <span class="keywordflow">return</span> NULL;
- <a name="l01133"></a>01133 }
- <a name="l01134"></a>01134
- <a name="l01135"></a>01135 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* fluid_synth_find_preset(fluid_synth_t* synth,
- <a name="l01136"></a>01136 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> banknum,
- <a name="l01137"></a>01137 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> prognum)
- <a name="l01138"></a>01138 {
- <a name="l01139"></a>01139 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset = NULL;
- <a name="l01140"></a>01140 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont = NULL;
- <a name="l01141"></a>01141 fluid_list_t* list = synth->sfont;
- <a name="l01142"></a>01142 <span class="keywordtype">int</span> offset;
- <a name="l01143"></a>01143
- <a name="l01144"></a>01144 <span class="keywordflow">while</span> (list) {
- <a name="l01145"></a>01145
- <a name="l01146"></a>01146 sfont = (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) fluid_list_get(list);
- <a name="l01147"></a>01147 offset = fluid_synth_get_bank_offset(synth, fluid_sfont_get_id(sfont));
- <a name="l01148"></a>01148 preset = fluid_sfont_get_preset(sfont, banknum - offset, prognum);
- <a name="l01149"></a>01149
- <a name="l01150"></a>01150 <span class="keywordflow">if</span> (preset != NULL) {
- <a name="l01151"></a>01151 preset-><a class="code" href="struct__fluid__preset__t.html#88abb2db089ec85c8793fadf6c6e12c3">sfont</a> = sfont; <span class="comment">/* FIXME */</span>
- <a name="l01152"></a>01152 <span class="keywordflow">return</span> preset;
- <a name="l01153"></a>01153 }
- <a name="l01154"></a>01154
- <a name="l01155"></a>01155 list = fluid_list_next(list);
- <a name="l01156"></a>01156
- <a name="l01157"></a>01157 }
- <a name="l01158"></a>01158 <span class="keywordflow">return</span> NULL;
- <a name="l01159"></a>01159 }
- <a name="l01160"></a>01160
- <a name="l01161"></a>01161
- <a name="l01162"></a>01162 <span class="comment">/*</span>
- <a name="l01163"></a>01163 <span class="comment"> * fluid_synth_program_change</span>
- <a name="l01164"></a>01164 <span class="comment"> */</span>
- <a name="l01165"></a>01165 <span class="keywordtype">int</span>
- <a name="l01166"></a>01166 fluid_synth_program_change(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> prognum)
- <a name="l01167"></a>01167 {
- <a name="l01168"></a>01168 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset = NULL;
- <a name="l01169"></a>01169 fluid_channel_t* channel;
- <a name="l01170"></a>01170 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> banknum;
- <a name="l01171"></a>01171 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> sfont_id;
- <a name="l01172"></a>01172
- <a name="l01173"></a>01173 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l01174"></a>01174 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l01175"></a>01175
- <a name="l01176"></a>01176 <span class="keywordflow">if</span> ((prognum >= 0) && (prognum < FLUID_NUM_PROGRAMS) &&
- <a name="l01177"></a>01177 (chan >= 0) && (chan < synth->midi_channels)) {
- <a name="l01178"></a>01178
- <a name="l01179"></a>01179 channel = synth->channel[chan];
- <a name="l01180"></a>01180 banknum = fluid_channel_get_banknum(channel);
- <a name="l01181"></a>01181
- <a name="l01182"></a>01182 <span class="comment">/* inform the channel of the new program number */</span>
- <a name="l01183"></a>01183 fluid_channel_set_prognum(channel, prognum);
- <a name="l01184"></a>01184
- <a name="l01185"></a>01185 <span class="keywordflow">if</span> (synth->verbose) {
- <a name="l01186"></a>01186 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9edfa902517702f2dd8ae849b810175ac4" title="Verbose informational messages.">FLUID_INFO</a>, <span class="stringliteral">"prog\t%d\t%d\t%d"</span>, chan, banknum, prognum);
- <a name="l01187"></a>01187 }
- <a name="l01188"></a>01188
- <a name="l01189"></a>01189 <span class="comment">/* special handling of channel 10 (or 9 counting from 0). channel</span>
- <a name="l01190"></a>01190 <span class="comment"> 10 is the percussion channel. */</span>
- <a name="l01191"></a>01191 <span class="keywordflow">if</span> (channel->channum == 9) {
- <a name="l01192"></a>01192
- <a name="l01193"></a>01193 <span class="comment">/* try to search the drum instrument first */</span>
- <a name="l01194"></a>01194 preset = fluid_synth_find_preset(synth, banknum | DRUM_INST_MASK, prognum);
- <a name="l01195"></a>01195
- <a name="l01196"></a>01196 <span class="comment">/* if that fails try to search the melodic instrument */</span>
- <a name="l01197"></a>01197 <span class="keywordflow">if</span> (preset == NULL) {
- <a name="l01198"></a>01198 preset = fluid_synth_find_preset(synth, banknum, prognum);
- <a name="l01199"></a>01199 }
- <a name="l01200"></a>01200
- <a name="l01201"></a>01201 } <span class="keywordflow">else</span> {
- <a name="l01202"></a>01202 preset = fluid_synth_find_preset(synth, banknum, prognum);
- <a name="l01203"></a>01203 }
- <a name="l01204"></a>01204
- <a name="l01205"></a>01205 sfont_id = preset? fluid_sfont_get_id(preset-><a class="code" href="struct__fluid__preset__t.html#88abb2db089ec85c8793fadf6c6e12c3">sfont</a>) : 0;
- <a name="l01206"></a>01206 fluid_channel_set_sfontnum(channel, sfont_id);
- <a name="l01207"></a>01207 fluid_channel_set_preset(channel, preset);
- <a name="l01208"></a>01208
- <a name="l01209"></a>01209 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01210"></a>01210 }
- <a name="l01211"></a>01211
- <a name="l01212"></a>01212 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Index out of range (chan=%d, prog=%d)"</span>, chan, prognum);
- <a name="l01213"></a>01213 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01214"></a>01214 }
- <a name="l01215"></a>01215
- <a name="l01216"></a>01216 <span class="comment">/*</span>
- <a name="l01217"></a>01217 <span class="comment"> * fluid_synth_bank_select</span>
- <a name="l01218"></a>01218 <span class="comment"> */</span>
- <a name="l01219"></a>01219 <span class="keywordtype">int</span> fluid_synth_bank_select(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> bank)
- <a name="l01220"></a>01220 {
- <a name="l01221"></a>01221 <span class="keywordflow">if</span> ((chan >= 0) && (chan < synth->midi_channels)) {
- <a name="l01222"></a>01222 fluid_channel_set_banknum(synth->channel[chan], bank);
- <a name="l01223"></a>01223 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01224"></a>01224 }
- <a name="l01225"></a>01225 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01226"></a>01226 }
- <a name="l01227"></a>01227
- <a name="l01228"></a>01228
- <a name="l01229"></a>01229 <span class="comment">/*</span>
- <a name="l01230"></a>01230 <span class="comment"> * fluid_synth_sfont_select</span>
- <a name="l01231"></a>01231 <span class="comment"> */</span>
- <a name="l01232"></a>01232 <span class="keywordtype">int</span> fluid_synth_sfont_select(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> sfont_id)
- <a name="l01233"></a>01233 {
- <a name="l01234"></a>01234 <span class="keywordflow">if</span> ((chan >= 0) && (chan < synth->midi_channels)) {
- <a name="l01235"></a>01235 fluid_channel_set_sfontnum(synth->channel[chan], sfont_id);
- <a name="l01236"></a>01236 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01237"></a>01237 }
- <a name="l01238"></a>01238 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01239"></a>01239 }
- <a name="l01240"></a>01240
- <a name="l01241"></a>01241 <span class="comment">/*</span>
- <a name="l01242"></a>01242 <span class="comment"> * fluid_synth_get_program</span>
- <a name="l01243"></a>01243 <span class="comment"> */</span>
- <a name="l01244"></a>01244 <span class="keywordtype">int</span>
- <a name="l01245"></a>01245 fluid_synth_get_program(fluid_synth_t* synth, <span class="keywordtype">int</span> chan,
- <a name="l01246"></a>01246 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span>* sfont_id, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span>* bank_num, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span>* preset_num)
- <a name="l01247"></a>01247 {
- <a name="l01248"></a>01248 fluid_channel_t* channel;
- <a name="l01249"></a>01249 <span class="keywordflow">if</span> ((chan >= 0) && (chan < synth->midi_channels)) {
- <a name="l01250"></a>01250 channel = synth->channel[chan];
- <a name="l01251"></a>01251 *sfont_id = fluid_channel_get_sfontnum(channel);
- <a name="l01252"></a>01252 *bank_num = fluid_channel_get_banknum(channel);
- <a name="l01253"></a>01253 *preset_num = fluid_channel_get_prognum(channel);
- <a name="l01254"></a>01254 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01255"></a>01255 }
- <a name="l01256"></a>01256 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01257"></a>01257 }
- <a name="l01258"></a>01258
- <a name="l01259"></a>01259 <span class="comment">/*</span>
- <a name="l01260"></a>01260 <span class="comment"> * fluid_synth_program_select</span>
- <a name="l01261"></a>01261 <span class="comment"> */</span>
- <a name="l01262"></a>01262 <span class="keywordtype">int</span> fluid_synth_program_select(fluid_synth_t* synth,
- <a name="l01263"></a>01263 <span class="keywordtype">int</span> chan,
- <a name="l01264"></a>01264 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> sfont_id,
- <a name="l01265"></a>01265 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> bank_num,
- <a name="l01266"></a>01266 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> preset_num)
- <a name="l01267"></a>01267 {
- <a name="l01268"></a>01268 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset = NULL;
- <a name="l01269"></a>01269 fluid_channel_t* channel;
- <a name="l01270"></a>01270
- <a name="l01271"></a>01271 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l01272"></a>01272 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Channel number out of range (chan=%d)"</span>, chan);
- <a name="l01273"></a>01273 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01274"></a>01274 }
- <a name="l01275"></a>01275 channel = synth->channel[chan];
- <a name="l01276"></a>01276
- <a name="l01277"></a>01277 preset = fluid_synth_get_preset(synth, sfont_id, bank_num, preset_num);
- <a name="l01278"></a>01278 <span class="keywordflow">if</span> (preset == NULL) {
- <a name="l01279"></a>01279 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>,
- <a name="l01280"></a>01280 <span class="stringliteral">"There is no preset with bank number %d and preset number %d in SoundFont %d"</span>,
- <a name="l01281"></a>01281 bank_num, preset_num, sfont_id);
- <a name="l01282"></a>01282 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01283"></a>01283 }
- <a name="l01284"></a>01284
- <a name="l01285"></a>01285 <span class="comment">/* inform the channel of the new bank and program number */</span>
- <a name="l01286"></a>01286 fluid_channel_set_sfontnum(channel, sfont_id);
- <a name="l01287"></a>01287 fluid_channel_set_banknum(channel, bank_num);
- <a name="l01288"></a>01288 fluid_channel_set_prognum(channel, preset_num);
- <a name="l01289"></a>01289
- <a name="l01290"></a>01290 fluid_channel_set_preset(channel, preset);
- <a name="l01291"></a>01291
- <a name="l01292"></a>01292 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01293"></a>01293 }
- <a name="l01294"></a>01294
- <a name="l01295"></a>01295 <span class="comment">/*</span>
- <a name="l01296"></a>01296 <span class="comment"> * fluid_synth_program_select2</span>
- <a name="l01297"></a>01297 <span class="comment"> */</span>
- <a name="l01298"></a>01298 <span class="keywordtype">int</span> fluid_synth_program_select2(fluid_synth_t* synth,
- <a name="l01299"></a>01299 <span class="keywordtype">int</span> chan,
- <a name="l01300"></a>01300 <span class="keywordtype">char</span>* sfont_name,
- <a name="l01301"></a>01301 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> bank_num,
- <a name="l01302"></a>01302 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> preset_num)
- <a name="l01303"></a>01303 {
- <a name="l01304"></a>01304 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset = NULL;
- <a name="l01305"></a>01305 fluid_channel_t* channel;
- <a name="l01306"></a>01306 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont = NULL;
- <a name="l01307"></a>01307 <span class="keywordtype">int</span> offset;
- <a name="l01308"></a>01308
- <a name="l01309"></a>01309 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l01310"></a>01310 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Channel number out of range (chan=%d)"</span>, chan);
- <a name="l01311"></a>01311 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01312"></a>01312 }
- <a name="l01313"></a>01313 channel = synth->channel[chan];
- <a name="l01314"></a>01314
- <a name="l01315"></a>01315 sfont = fluid_synth_get_sfont_by_name(synth, sfont_name);
- <a name="l01316"></a>01316 <span class="keywordflow">if</span> (sfont == NULL) {
- <a name="l01317"></a>01317 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Could not find SoundFont %s"</span>, sfont_name);
- <a name="l01318"></a>01318 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01319"></a>01319 }
- <a name="l01320"></a>01320
- <a name="l01321"></a>01321 offset = fluid_synth_get_bank_offset(synth, fluid_sfont_get_id(sfont));
- <a name="l01322"></a>01322 preset = fluid_sfont_get_preset(sfont, bank_num - offset, preset_num);
- <a name="l01323"></a>01323 <span class="keywordflow">if</span> (preset == NULL) {
- <a name="l01324"></a>01324 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>,
- <a name="l01325"></a>01325 <span class="stringliteral">"There is no preset with bank number %d and preset number %d in SoundFont %s"</span>,
- <a name="l01326"></a>01326 bank_num, preset_num, sfont_name);
- <a name="l01327"></a>01327 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01328"></a>01328 }
- <a name="l01329"></a>01329
- <a name="l01330"></a>01330 <span class="comment">/* inform the channel of the new bank and program number */</span>
- <a name="l01331"></a>01331 fluid_channel_set_sfontnum(channel, fluid_sfont_get_id(sfont));
- <a name="l01332"></a>01332 fluid_channel_set_banknum(channel, bank_num);
- <a name="l01333"></a>01333 fluid_channel_set_prognum(channel, preset_num);
- <a name="l01334"></a>01334
- <a name="l01335"></a>01335 fluid_channel_set_preset(channel, preset);
- <a name="l01336"></a>01336
- <a name="l01337"></a>01337 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01338"></a>01338 }
- <a name="l01339"></a>01339
- <a name="l01340"></a>01340 <span class="comment">/*</span>
- <a name="l01341"></a>01341 <span class="comment"> * fluid_synth_update_presets</span>
- <a name="l01342"></a>01342 <span class="comment"> */</span>
- <a name="l01343"></a>01343 <span class="keywordtype">void</span> fluid_synth_update_presets(fluid_synth_t* synth)
- <a name="l01344"></a>01344 {
- <a name="l01345"></a>01345 <span class="keywordtype">int</span> chan;
- <a name="l01346"></a>01346 fluid_channel_t* channel;
- <a name="l01347"></a>01347
- <a name="l01348"></a>01348 <span class="keywordflow">for</span> (chan = 0; chan < synth->midi_channels; chan++) {
- <a name="l01349"></a>01349 channel = synth->channel[chan];
- <a name="l01350"></a>01350 fluid_channel_set_preset(channel,
- <a name="l01351"></a>01351 fluid_synth_get_preset(synth,
- <a name="l01352"></a>01352 fluid_channel_get_sfontnum(channel),
- <a name="l01353"></a>01353 fluid_channel_get_banknum(channel),
- <a name="l01354"></a>01354 fluid_channel_get_prognum(channel)));
- <a name="l01355"></a>01355 }
- <a name="l01356"></a>01356 }
- <a name="l01357"></a>01357
- <a name="l01358"></a>01358
- <a name="l01359"></a>01359 <span class="comment">/*</span>
- <a name="l01360"></a>01360 <span class="comment"> * fluid_synth_update_gain</span>
- <a name="l01361"></a>01361 <span class="comment"> */</span>
- <a name="l01362"></a>01362 <span class="keywordtype">int</span> fluid_synth_update_gain(fluid_synth_t* synth, <span class="keywordtype">char</span>* name, <span class="keywordtype">double</span> value)
- <a name="l01363"></a>01363 {
- <a name="l01364"></a>01364 fluid_synth_set_gain(synth, (<span class="keywordtype">float</span>) value);
- <a name="l01365"></a>01365 <span class="keywordflow">return</span> 0;
- <a name="l01366"></a>01366 }
- <a name="l01367"></a>01367
- <a name="l01368"></a>01368 <span class="comment">/*</span>
- <a name="l01369"></a>01369 <span class="comment"> * fluid_synth_set_gain</span>
- <a name="l01370"></a>01370 <span class="comment"> */</span>
- <a name="l01371"></a>01371 <span class="keywordtype">void</span> fluid_synth_set_gain(fluid_synth_t* synth, <span class="keywordtype">float</span> gain)
- <a name="l01372"></a>01372 {
- <a name="l01373"></a>01373 <span class="keywordtype">int</span> i;
- <a name="l01374"></a>01374
- <a name="l01375"></a>01375 fluid_clip(gain, 0.0f, 10.0f);
- <a name="l01376"></a>01376 synth->gain = gain;
- <a name="l01377"></a>01377
- <a name="l01378"></a>01378 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l01379"></a>01379 fluid_voice_t* voice = synth->voice[i];
- <a name="l01380"></a>01380 <span class="keywordflow">if</span> (_PLAYING(voice)) {
- <a name="l01381"></a>01381 fluid_voice_set_gain(voice, gain);
- <a name="l01382"></a>01382 }
- <a name="l01383"></a>01383 }
- <a name="l01384"></a>01384 }
- <a name="l01385"></a>01385
- <a name="l01386"></a>01386 <span class="comment">/*</span>
- <a name="l01387"></a>01387 <span class="comment"> * fluid_synth_get_gain</span>
- <a name="l01388"></a>01388 <span class="comment"> */</span>
- <a name="l01389"></a>01389 <span class="keywordtype">float</span> fluid_synth_get_gain(fluid_synth_t* synth)
- <a name="l01390"></a>01390 {
- <a name="l01391"></a>01391 <span class="keywordflow">return</span> synth->gain;
- <a name="l01392"></a>01392 }
- <a name="l01393"></a>01393
- <a name="l01394"></a>01394 <span class="comment">/*</span>
- <a name="l01395"></a>01395 <span class="comment"> * fluid_synth_update_polyphony</span>
- <a name="l01396"></a>01396 <span class="comment"> */</span>
- <a name="l01397"></a>01397 <span class="keywordtype">int</span> fluid_synth_update_polyphony(fluid_synth_t* synth, <span class="keywordtype">char</span>* name, <span class="keywordtype">int</span> value)
- <a name="l01398"></a>01398 {
- <a name="l01399"></a>01399 fluid_synth_set_polyphony(synth, value);
- <a name="l01400"></a>01400 <span class="keywordflow">return</span> 0;
- <a name="l01401"></a>01401 }
- <a name="l01402"></a>01402
- <a name="l01403"></a>01403 <span class="comment">/*</span>
- <a name="l01404"></a>01404 <span class="comment"> * fluid_synth_set_polyphony</span>
- <a name="l01405"></a>01405 <span class="comment"> */</span>
- <a name="l01406"></a>01406 <span class="keywordtype">int</span> fluid_synth_set_polyphony(fluid_synth_t* synth, <span class="keywordtype">int</span> polyphony)
- <a name="l01407"></a>01407 {
- <a name="l01408"></a>01408 <span class="keywordtype">int</span> i;
- <a name="l01409"></a>01409
- <a name="l01410"></a>01410 <span class="keywordflow">if</span> (polyphony < 1 || polyphony > synth->nvoice) {
- <a name="l01411"></a>01411 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01412"></a>01412 }
- <a name="l01413"></a>01413
- <a name="l01414"></a>01414 <span class="comment">/* turn off any voices above the new limit */</span>
- <a name="l01415"></a>01415 <span class="keywordflow">for</span> (i = polyphony; i < synth->nvoice; i++) {
- <a name="l01416"></a>01416 fluid_voice_t* voice = synth->voice[i];
- <a name="l01417"></a>01417 <span class="keywordflow">if</span> (_PLAYING(voice)) {
- <a name="l01418"></a>01418 fluid_voice_off(voice);
- <a name="l01419"></a>01419 }
- <a name="l01420"></a>01420 }
- <a name="l01421"></a>01421
- <a name="l01422"></a>01422 synth->polyphony = polyphony;
- <a name="l01423"></a>01423
- <a name="l01424"></a>01424 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01425"></a>01425 }
- <a name="l01426"></a>01426
- <a name="l01427"></a>01427 <span class="comment">/*</span>
- <a name="l01428"></a>01428 <span class="comment"> * fluid_synth_get_polyphony</span>
- <a name="l01429"></a>01429 <span class="comment"> */</span>
- <a name="l01430"></a>01430 <span class="keywordtype">int</span> fluid_synth_get_polyphony(fluid_synth_t* synth)
- <a name="l01431"></a>01431 {
- <a name="l01432"></a>01432 <span class="keywordflow">return</span> synth->polyphony;
- <a name="l01433"></a>01433 }
- <a name="l01434"></a>01434
- <a name="l01435"></a>01435 <span class="comment">/*</span>
- <a name="l01436"></a>01436 <span class="comment"> * fluid_synth_get_internal_buffer_size</span>
- <a name="l01437"></a>01437 <span class="comment"> */</span>
- <a name="l01438"></a>01438 <span class="keywordtype">int</span> fluid_synth_get_internal_bufsize(fluid_synth_t* synth)
- <a name="l01439"></a>01439 {
- <a name="l01440"></a>01440 <span class="keywordflow">return</span> FLUID_BUFSIZE;
- <a name="l01441"></a>01441 }
- <a name="l01442"></a>01442
- <a name="l01443"></a>01443 <span class="comment">/*</span>
- <a name="l01444"></a>01444 <span class="comment"> * fluid_synth_program_reset</span>
- <a name="l01445"></a>01445 <span class="comment"> *</span>
- <a name="l01446"></a>01446 <span class="comment"> * Resend a bank select and a program change for every channel. This</span>
- <a name="l01447"></a>01447 <span class="comment"> * function is called mainly after a SoundFont has been loaded,</span>
- <a name="l01448"></a>01448 <span class="comment"> * unloaded or reloaded. */</span>
- <a name="l01449"></a>01449 <span class="keywordtype">int</span>
- <a name="l01450"></a>01450 fluid_synth_program_reset(fluid_synth_t* synth)
- <a name="l01451"></a>01451 {
- <a name="l01452"></a>01452 <span class="keywordtype">int</span> i;
- <a name="l01453"></a>01453 <span class="comment">/* try to set the correct presets */</span>
- <a name="l01454"></a>01454 <span class="keywordflow">for</span> (i = 0; i < synth->midi_channels; i++){
- <a name="l01455"></a>01455 fluid_synth_program_change(synth, i, fluid_channel_get_prognum(synth->channel[i]));
- <a name="l01456"></a>01456 }
- <a name="l01457"></a>01457 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01458"></a>01458 }
- <a name="l01459"></a>01459
- <a name="l01460"></a>01460 <span class="comment">/*</span>
- <a name="l01461"></a>01461 <span class="comment"> * fluid_synth_set_reverb_preset</span>
- <a name="l01462"></a>01462 <span class="comment"> */</span>
- <a name="l01463"></a>01463 <span class="keywordtype">int</span> fluid_synth_set_reverb_preset(fluid_synth_t* synth, <span class="keywordtype">int</span> num)
- <a name="l01464"></a>01464 {
- <a name="l01465"></a>01465 <span class="keywordtype">int</span> i = 0;
- <a name="l01466"></a>01466 <span class="keywordflow">while</span> (revmodel_preset[i].name != NULL) {
- <a name="l01467"></a>01467 <span class="keywordflow">if</span> (i == num) {
- <a name="l01468"></a>01468 fluid_revmodel_setroomsize(synth->reverb, revmodel_preset[i].roomsize);
- <a name="l01469"></a>01469 fluid_revmodel_setdamp(synth->reverb, revmodel_preset[i].damp);
- <a name="l01470"></a>01470 fluid_revmodel_setwidth(synth->reverb, revmodel_preset[i].width);
- <a name="l01471"></a>01471 fluid_revmodel_setlevel(synth->reverb, revmodel_preset[i].level);
- <a name="l01472"></a>01472 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l01473"></a>01473 }
- <a name="l01474"></a>01474 i++;
- <a name="l01475"></a>01475 }
- <a name="l01476"></a>01476 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l01477"></a>01477 }
- <a name="l01478"></a>01478
- <a name="l01479"></a>01479 <span class="comment">/*</span>
- <a name="l01480"></a>01480 <span class="comment"> * fluid_synth_set_reverb</span>
- <a name="l01481"></a>01481 <span class="comment"> */</span>
- <a name="l01482"></a>01482 <span class="keywordtype">void</span> fluid_synth_set_reverb(fluid_synth_t* synth, <span class="keywordtype">double</span> roomsize, <span class="keywordtype">double</span> damping,
- <a name="l01483"></a>01483 <span class="keywordtype">double</span> width, <span class="keywordtype">double</span> level)
- <a name="l01484"></a>01484 {
- <a name="l01485"></a>01485 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l01486"></a>01486 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l01487"></a>01487
- <a name="l01488"></a>01488 fluid_revmodel_setroomsize(synth->reverb, roomsize);
- <a name="l01489"></a>01489 fluid_revmodel_setdamp(synth->reverb, damping);
- <a name="l01490"></a>01490 fluid_revmodel_setwidth(synth->reverb, width);
- <a name="l01491"></a>01491 fluid_revmodel_setlevel(synth->reverb, level);
- <a name="l01492"></a>01492 }
- <a name="l01493"></a>01493
- <a name="l01494"></a>01494 <span class="comment">/*</span>
- <a name="l01495"></a>01495 <span class="comment"> * fluid_synth_set_chorus</span>
- <a name="l01496"></a>01496 <span class="comment"> */</span>
- <a name="l01497"></a>01497 <span class="keywordtype">void</span> fluid_synth_set_chorus(fluid_synth_t* synth, <span class="keywordtype">int</span> nr, <span class="keywordtype">double</span> level,
- <a name="l01498"></a>01498 <span class="keywordtype">double</span> speed, <span class="keywordtype">double</span> depth_ms, <span class="keywordtype">int</span> type)
- <a name="l01499"></a>01499 {
- <a name="l01500"></a>01500 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l01501"></a>01501 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l01502"></a>01502
- <a name="l01503"></a>01503 fluid_chorus_set_nr(synth->chorus, nr);
- <a name="l01504"></a>01504 fluid_chorus_set_level(synth->chorus, (fluid_real_t)level);
- <a name="l01505"></a>01505 fluid_chorus_set_speed_Hz(synth->chorus, (fluid_real_t)speed);
- <a name="l01506"></a>01506 fluid_chorus_set_depth_ms(synth->chorus, (fluid_real_t)depth_ms);
- <a name="l01507"></a>01507 fluid_chorus_set_type(synth->chorus, type);
- <a name="l01508"></a>01508 fluid_chorus_update(synth->chorus);
- <a name="l01509"></a>01509 }
- <a name="l01510"></a>01510
- <a name="l01511"></a>01511 <span class="comment">/******************************************************</span>
- <a name="l01512"></a>01512 <span class="comment"></span>
- <a name="l01513"></a>01513 <span class="comment">#define COMPRESS 1</span>
- <a name="l01514"></a>01514 <span class="comment">#define COMPRESS_X1 4.0</span>
- <a name="l01515"></a>01515 <span class="comment">#define COMPRESS_Y1 0.6</span>
- <a name="l01516"></a>01516 <span class="comment">#define COMPRESS_X2 10.0</span>
- <a name="l01517"></a>01517 <span class="comment">#define COMPRESS_Y2 1.0</span>
- <a name="l01518"></a>01518 <span class="comment"></span>
- <a name="l01519"></a>01519 <span class="comment"> len2 = 2 * len;</span>
- <a name="l01520"></a>01520 <span class="comment"> alpha1 = COMPRESS_Y1 / COMPRESS_X1;</span>
- <a name="l01521"></a>01521 <span class="comment"> alpha2 = (COMPRESS_Y2 - COMPRESS_Y1) / (COMPRESS_X2 - COMPRESS_X1);</span>
- <a name="l01522"></a>01522 <span class="comment"> if (COMPRESS_X1 == COMPRESS_Y1) {</span>
- <a name="l01523"></a>01523 <span class="comment"> for (j = 0; j < len2; j++) {</span>
- <a name="l01524"></a>01524 <span class="comment"> if (buf[j] > COMPRESS_X1) {</span>
- <a name="l01525"></a>01525 <span class="comment"> if (buf[j] > COMPRESS_X2) {</span>
- <a name="l01526"></a>01526 <span class="comment"> buf[j] = COMPRESS_Y2;</span>
- <a name="l01527"></a>01527 <span class="comment"> } else {</span>
- <a name="l01528"></a>01528 <span class="comment"> buf[j] = COMPRESS_Y1 + alpha2 * (buf[j] - COMPRESS_X1);</span>
- <a name="l01529"></a>01529 <span class="comment"> }</span>
- <a name="l01530"></a>01530 <span class="comment"> } else if (buf[j] < -COMPRESS_X1) {</span>
- <a name="l01531"></a>01531 <span class="comment"> if (buf[j] < -COMPRESS_X2) {</span>
- <a name="l01532"></a>01532 <span class="comment"> buf[j] = -COMPRESS_Y2;</span>
- <a name="l01533"></a>01533 <span class="comment"> } else {</span>
- <a name="l01534"></a>01534 <span class="comment"> buf[j] = -COMPRESS_Y1 + alpha2 * (buf[j] + COMPRESS_X1);</span>
- <a name="l01535"></a>01535 <span class="comment"> }</span>
- <a name="l01536"></a>01536 <span class="comment"> }</span>
- <a name="l01537"></a>01537 <span class="comment"> }</span>
- <a name="l01538"></a>01538 <span class="comment"> } else {</span>
- <a name="l01539"></a>01539 <span class="comment"> for (j = 0; j < len2; j++) {</span>
- <a name="l01540"></a>01540 <span class="comment"> if ((buf[j] >= -COMPRESS_X1) && (buf[j] <= COMPRESS_X1)) {</span>
- <a name="l01541"></a>01541 <span class="comment"> buf[j] *= alpha1;</span>
- <a name="l01542"></a>01542 <span class="comment"> } else if (buf[j] > COMPRESS_X1) {</span>
- <a name="l01543"></a>01543 <span class="comment"> if (buf[j] > COMPRESS_X2) {</span>
- <a name="l01544"></a>01544 <span class="comment"> buf[j] = COMPRESS_Y2;</span>
- <a name="l01545"></a>01545 <span class="comment"> } else {</span>
- <a name="l01546"></a>01546 <span class="comment"> buf[j] = COMPRESS_Y1 + alpha2 * (buf[j] - COMPRESS_X1);</span>
- <a name="l01547"></a>01547 <span class="comment"> }</span>
- <a name="l01548"></a>01548 <span class="comment"> } else {</span>
- <a name="l01549"></a>01549 <span class="comment"> if (buf[j] < -COMPRESS_X2) {</span>
- <a name="l01550"></a>01550 <span class="comment"> buf[j] = -COMPRESS_Y2;</span>
- <a name="l01551"></a>01551 <span class="comment"> } else {</span>
- <a name="l01552"></a>01552 <span class="comment"> buf[j] = -COMPRESS_Y1 + alpha2 * (buf[j] + COMPRESS_X1);</span>
- <a name="l01553"></a>01553 <span class="comment"> }</span>
- <a name="l01554"></a>01554 <span class="comment"> }</span>
- <a name="l01555"></a>01555 <span class="comment"> }</span>
- <a name="l01556"></a>01556 <span class="comment"> }</span>
- <a name="l01557"></a>01557 <span class="comment"></span>
- <a name="l01558"></a>01558 <span class="comment">***************************************************/</span>
- <a name="l01559"></a>01559
- <a name="l01560"></a>01560 <span class="comment">/*</span>
- <a name="l01561"></a>01561 <span class="comment"> * fluid_synth_nwrite_float</span>
- <a name="l01562"></a>01562 <span class="comment"> */</span>
- <a name="l01563"></a>01563 <span class="keywordtype">int</span>
- <a name="l01564"></a>01564 fluid_synth_nwrite_float(fluid_synth_t* synth, <span class="keywordtype">int</span> len,
- <a name="l01565"></a>01565 <span class="keywordtype">float</span>** left, <span class="keywordtype">float</span>** right,
- <a name="l01566"></a>01566 <span class="keywordtype">float</span>** fx_left, <span class="keywordtype">float</span>** fx_right)
- <a name="l01567"></a>01567 {
- <a name="l01568"></a>01568 fluid_real_t** left_in = synth->left_buf;
- <a name="l01569"></a>01569 fluid_real_t** right_in = synth->right_buf;
- <a name="l01570"></a>01570 fluid_real_t** fx_left_in = synth->fx_left_buf;
- <a name="l01571"></a>01571 fluid_real_t** fx_right_in = synth->fx_right_buf;
- <a name="l01572"></a>01572 <span class="keywordtype">double</span> time = fluid_utime();
- <a name="l01573"></a>01573 <span class="keywordtype">int</span> i, num, available, count, bytes;
- <a name="l01574"></a>01574
- <a name="l01575"></a>01575 <span class="comment">/* make sure we're playing */</span>
- <a name="l01576"></a>01576 <span class="keywordflow">if</span> (synth->state != FLUID_SYNTH_PLAYING) {
- <a name="l01577"></a>01577 <span class="keywordflow">return</span> 0;
- <a name="l01578"></a>01578 }
- <a name="l01579"></a>01579
- <a name="l01580"></a>01580 <span class="comment">/* First, take what's still available in the buffer */</span>
- <a name="l01581"></a>01581 count = 0;
- <a name="l01582"></a>01582 num = synth->cur;
- <a name="l01583"></a>01583 <span class="keywordflow">if</span> (synth->cur < FLUID_BUFSIZE) {
- <a name="l01584"></a>01584 available = FLUID_BUFSIZE - synth->cur;
- <a name="l01585"></a>01585
- <a name="l01586"></a>01586 num = (available > len)? len : available;
- <a name="l01587"></a>01587 bytes = num * <span class="keyword">sizeof</span>(float);
- <a name="l01588"></a>01588
- <a name="l01589"></a>01589 <span class="keywordflow">for</span> (i = 0; i < synth->audio_channels; i++) {
- <a name="l01590"></a>01590 FLUID_MEMCPY(left[i], left_in[i] + synth->cur, bytes);
- <a name="l01591"></a>01591 FLUID_MEMCPY(right[i], right_in[i] + synth->cur, bytes);
- <a name="l01592"></a>01592 }
- <a name="l01593"></a>01593 <span class="keywordflow">for</span> (i = 0; i < synth->effects_channels; i++) {
- <a name="l01594"></a>01594 FLUID_MEMCPY(fx_left[i], fx_left_in[i] + synth->cur, bytes);
- <a name="l01595"></a>01595 FLUID_MEMCPY(fx_right[i], fx_right_in[i] + synth->cur, bytes);
- <a name="l01596"></a>01596 }
- <a name="l01597"></a>01597 count += num;
- <a name="l01598"></a>01598 num += synth->cur; <span class="comment">/* if we're now done, num becomes the new synth->cur below */</span>
- <a name="l01599"></a>01599 }
- <a name="l01600"></a>01600
- <a name="l01601"></a>01601 <span class="comment">/* Then, run one_block() and copy till we have 'len' samples */</span>
- <a name="l01602"></a>01602 <span class="keywordflow">while</span> (count < len) {
- <a name="l01603"></a>01603 fluid_synth_one_block(synth, 1);
- <a name="l01604"></a>01604
- <a name="l01605"></a>01605 num = (FLUID_BUFSIZE > len - count)? len - count : FLUID_BUFSIZE;
- <a name="l01606"></a>01606 bytes = num * <span class="keyword">sizeof</span>(float);
- <a name="l01607"></a>01607
- <a name="l01608"></a>01608 <span class="keywordflow">for</span> (i = 0; i < synth->audio_channels; i++) {
- <a name="l01609"></a>01609 FLUID_MEMCPY(left[i] + count, left_in[i], bytes);
- <a name="l01610"></a>01610 FLUID_MEMCPY(right[i] + count, right_in[i], bytes);
- <a name="l01611"></a>01611 }
- <a name="l01612"></a>01612 <span class="keywordflow">for</span> (i = 0; i < synth->effects_channels; i++) {
- <a name="l01613"></a>01613 FLUID_MEMCPY(fx_left[i] + count, fx_left_in[i], bytes);
- <a name="l01614"></a>01614 FLUID_MEMCPY(fx_right[i] + count, fx_right_in[i], bytes);
- <a name="l01615"></a>01615 }
- <a name="l01616"></a>01616
- <a name="l01617"></a>01617 count += num;
- <a name="l01618"></a>01618 }
- <a name="l01619"></a>01619
- <a name="l01620"></a>01620 synth->cur = num;
- <a name="l01621"></a>01621
- <a name="l01622"></a>01622 time = fluid_utime() - time;
- <a name="l01623"></a>01623 synth->cpu_load = 0.5 * (synth->cpu_load +
- <a name="l01624"></a>01624 time * synth->sample_rate / len / 10000.0);
- <a name="l01625"></a>01625
- <a name="l01626"></a>01626 <span class="comment">/* printf("CPU: %.2f\n", synth->cpu_load); */</span>
- <a name="l01627"></a>01627
- <a name="l01628"></a>01628 <span class="keywordflow">return</span> 0;
- <a name="l01629"></a>01629 }
- <a name="l01630"></a>01630
- <a name="l01631"></a>01631 <span class="keywordtype">int</span> fluid_synth_process(fluid_synth_t* synth, <span class="keywordtype">int</span> len,
- <a name="l01632"></a>01632 <span class="keywordtype">int</span> nin, <span class="keywordtype">float</span>** in,
- <a name="l01633"></a>01633 <span class="keywordtype">int</span> nout, <span class="keywordtype">float</span>** out)
- <a name="l01634"></a>01634 {
- <a name="l01635"></a>01635 <span class="keywordflow">return</span> fluid_synth_write_float(synth, len, out[0], 0, 1, out[1], 0, 1);
- <a name="l01636"></a>01636 }
- <a name="l01637"></a>01637
- <a name="l01638"></a>01638
- <a name="l01639"></a>01639 <span class="comment">/*</span>
- <a name="l01640"></a>01640 <span class="comment"> * fluid_synth_write_float</span>
- <a name="l01641"></a>01641 <span class="comment"> */</span>
- <a name="l01642"></a>01642 <span class="keywordtype">int</span>
- <a name="l01643"></a>01643 fluid_synth_write_float(fluid_synth_t* synth, <span class="keywordtype">int</span> len,
- <a name="l01644"></a>01644 <span class="keywordtype">void</span>* lout, <span class="keywordtype">int</span> loff, <span class="keywordtype">int</span> lincr,
- <a name="l01645"></a>01645 <span class="keywordtype">void</span>* rout, <span class="keywordtype">int</span> roff, <span class="keywordtype">int</span> rincr)
- <a name="l01646"></a>01646 {
- <a name="l01647"></a>01647 <span class="keywordtype">int</span> i, j, k, l;
- <a name="l01648"></a>01648 <span class="keywordtype">float</span>* left_out = (<span class="keywordtype">float</span>*) lout;
- <a name="l01649"></a>01649 <span class="keywordtype">float</span>* right_out = (<span class="keywordtype">float</span>*) rout;
- <a name="l01650"></a>01650 fluid_real_t* left_in = synth->left_buf[0];
- <a name="l01651"></a>01651 fluid_real_t* right_in = synth->right_buf[0];
- <a name="l01652"></a>01652 <span class="keywordtype">double</span> time = fluid_utime();
- <a name="l01653"></a>01653
- <a name="l01654"></a>01654 <span class="comment">/* make sure we're playing */</span>
- <a name="l01655"></a>01655 <span class="keywordflow">if</span> (synth->state != FLUID_SYNTH_PLAYING) {
- <a name="l01656"></a>01656 <span class="keywordflow">return</span> 0;
- <a name="l01657"></a>01657 }
- <a name="l01658"></a>01658
- <a name="l01659"></a>01659 l = synth->cur;
- <a name="l01660"></a>01660
- <a name="l01661"></a>01661 <span class="keywordflow">for</span> (i = 0, j = loff, k = roff; i < len; i++, l++, j += lincr, k += rincr) {
- <a name="l01662"></a>01662 <span class="comment">/* fill up the buffers as needed */</span>
- <a name="l01663"></a>01663 <span class="keywordflow">if</span> (l == FLUID_BUFSIZE) {
- <a name="l01664"></a>01664 fluid_synth_one_block(synth, 0);
- <a name="l01665"></a>01665 l = 0;
- <a name="l01666"></a>01666 }
- <a name="l01667"></a>01667
- <a name="l01668"></a>01668 left_out[j] = (float) left_in[l];
- <a name="l01669"></a>01669 right_out[k] = (float) right_in[l];
- <a name="l01670"></a>01670 }
- <a name="l01671"></a>01671
- <a name="l01672"></a>01672 synth->cur = l;
- <a name="l01673"></a>01673
- <a name="l01674"></a>01674 time = fluid_utime() - time;
- <a name="l01675"></a>01675 synth->cpu_load = 0.5 * (synth->cpu_load +
- <a name="l01676"></a>01676 time * synth->sample_rate / len / 10000.0);
- <a name="l01677"></a>01677
- <a name="l01678"></a>01678 <span class="comment">/* printf("CPU: %.2f\n", synth->cpu_load); */</span>
- <a name="l01679"></a>01679
- <a name="l01680"></a>01680 <span class="keywordflow">return</span> 0;
- <a name="l01681"></a>01681 }
- <a name="l01682"></a>01682
- <a name="l01683"></a>01683 <span class="preprocessor">#define DITHER_SIZE 48000</span>
- <a name="l01684"></a>01684 <span class="preprocessor"></span><span class="preprocessor">#define DITHER_CHANNELS 2</span>
- <a name="l01685"></a>01685 <span class="preprocessor"></span>
- <a name="l01686"></a>01686 <span class="keyword">static</span> <span class="keywordtype">float</span> rand_table[DITHER_CHANNELS][DITHER_SIZE];
- <a name="l01687"></a>01687
- <a name="l01688"></a>01688 <span class="keyword">static</span> <span class="keywordtype">void</span> init_dither(<span class="keywordtype">void</span>)
- <a name="l01689"></a>01689 {
- <a name="l01690"></a>01690 <span class="keywordtype">float</span> d, dp;
- <a name="l01691"></a>01691 <span class="keywordtype">int</span> c, i;
- <a name="l01692"></a>01692
- <a name="l01693"></a>01693 <span class="keywordflow">for</span> (c = 0; c < DITHER_CHANNELS; c++) {
- <a name="l01694"></a>01694 dp = 0;
- <a name="l01695"></a>01695 <span class="keywordflow">for</span> (i = 0; i < DITHER_SIZE-1; i++) {
- <a name="l01696"></a>01696 d = rand() / (float)RAND_MAX - 0.5f;
- <a name="l01697"></a>01697 rand_table[c][i] = d - dp;
- <a name="l01698"></a>01698 dp = d;
- <a name="l01699"></a>01699 }
- <a name="l01700"></a>01700 rand_table[c][DITHER_SIZE-1] = 0 - dp;
- <a name="l01701"></a>01701 }
- <a name="l01702"></a>01702 }
- <a name="l01703"></a>01703
- <a name="l01704"></a>01704 <span class="comment">/* A portable replacement for roundf(), seems it may actually be faster too! */</span>
- <a name="l01705"></a>01705 <span class="keyword">static</span> <span class="keyword">inline</span> <span class="keywordtype">int</span>
- <a name="l01706"></a>01706 roundi (<span class="keywordtype">float</span> x)
- <a name="l01707"></a>01707 {
- <a name="l01708"></a>01708 <span class="keywordflow">if</span> (x >= 0.0f)
- <a name="l01709"></a>01709 <span class="keywordflow">return</span> (<span class="keywordtype">int</span>)(x+0.5f);
- <a name="l01710"></a>01710 <span class="keywordflow">else</span>
- <a name="l01711"></a>01711 <span class="keywordflow">return</span> (<span class="keywordtype">int</span>)(x-0.5f);
- <a name="l01712"></a>01712 }
- <a name="l01713"></a>01713
- <a name="l01714"></a>01714 <span class="comment">/*</span>
- <a name="l01715"></a>01715 <span class="comment"> * fluid_synth_write_s16</span>
- <a name="l01716"></a>01716 <span class="comment"> */</span>
- <a name="l01717"></a>01717 <span class="keywordtype">int</span>
- <a name="l01718"></a>01718 fluid_synth_write_s16(fluid_synth_t* synth, <span class="keywordtype">int</span> len,
- <a name="l01719"></a>01719 <span class="keywordtype">void</span>* lout, <span class="keywordtype">int</span> loff, <span class="keywordtype">int</span> lincr,
- <a name="l01720"></a>01720 <span class="keywordtype">void</span>* rout, <span class="keywordtype">int</span> roff, <span class="keywordtype">int</span> rincr)
- <a name="l01721"></a>01721 {
- <a name="l01722"></a>01722 <span class="keywordtype">int</span> i, j, k, cur;
- <a name="l01723"></a>01723 <span class="keywordtype">signed</span> <span class="keywordtype">short</span>* left_out = (<span class="keywordtype">signed</span> <span class="keywordtype">short</span>*) lout;
- <a name="l01724"></a>01724 <span class="keywordtype">signed</span> <span class="keywordtype">short</span>* right_out = (<span class="keywordtype">signed</span> <span class="keywordtype">short</span>*) rout;
- <a name="l01725"></a>01725 fluid_real_t* left_in = synth->left_buf[0];
- <a name="l01726"></a>01726 fluid_real_t* right_in = synth->right_buf[0];
- <a name="l01727"></a>01727 <span class="keywordtype">double</span> prof_ref = fluid_profile_ref();
- <a name="l01728"></a>01728 fluid_real_t left_sample;
- <a name="l01729"></a>01729 fluid_real_t right_sample;
- <a name="l01730"></a>01730 <span class="keywordtype">double</span> time = fluid_utime();
- <a name="l01731"></a>01731 <span class="keywordtype">int</span> di = synth->dither_index;
- <a name="l01732"></a>01732 <span class="keywordtype">double</span> prof_ref_on_block;
- <a name="l01733"></a>01733
- <a name="l01734"></a>01734 <span class="comment">/* make sure we're playing */</span>
- <a name="l01735"></a>01735 <span class="keywordflow">if</span> (synth->state != FLUID_SYNTH_PLAYING) {
- <a name="l01736"></a>01736 <span class="keywordflow">return</span> 0;
- <a name="l01737"></a>01737 }
- <a name="l01738"></a>01738
- <a name="l01739"></a>01739 cur = synth->cur;
- <a name="l01740"></a>01740
- <a name="l01741"></a>01741 <span class="keywordflow">for</span> (i = 0, j = loff, k = roff; i < len; i++, cur++, j += lincr, k += rincr) {
- <a name="l01742"></a>01742
- <a name="l01743"></a>01743 <span class="comment">/* fill up the buffers as needed */</span>
- <a name="l01744"></a>01744 <span class="keywordflow">if</span> (cur == FLUID_BUFSIZE) {
- <a name="l01745"></a>01745 prof_ref_on_block = fluid_profile_ref();
- <a name="l01746"></a>01746
- <a name="l01747"></a>01747 fluid_synth_one_block(synth, 0);
- <a name="l01748"></a>01748 cur = 0;
- <a name="l01749"></a>01749
- <a name="l01750"></a>01750 fluid_profile(FLUID_PROF_ONE_BLOCK, prof_ref_on_block);
- <a name="l01751"></a>01751 }
- <a name="l01752"></a>01752
- <a name="l01753"></a>01753 left_sample = roundi (left_in[cur] * 32766.0f + rand_table[0][di]);
- <a name="l01754"></a>01754 right_sample = roundi (right_in[cur] * 32766.0f + rand_table[1][di]);
- <a name="l01755"></a>01755
- <a name="l01756"></a>01756 di++;
- <a name="l01757"></a>01757 <span class="keywordflow">if</span> (di >= DITHER_SIZE) di = 0;
- <a name="l01758"></a>01758
- <a name="l01759"></a>01759 <span class="comment">/* digital clipping */</span>
- <a name="l01760"></a>01760 <span class="keywordflow">if</span> (left_sample > 32767.0f) left_sample = 32767.0f;
- <a name="l01761"></a>01761 <span class="keywordflow">if</span> (left_sample < -32768.0f) left_sample = -32768.0f;
- <a name="l01762"></a>01762 <span class="keywordflow">if</span> (right_sample > 32767.0f) right_sample = 32767.0f;
- <a name="l01763"></a>01763 <span class="keywordflow">if</span> (right_sample < -32768.0f) right_sample = -32768.0f;
- <a name="l01764"></a>01764
- <a name="l01765"></a>01765 left_out[j] = (<span class="keywordtype">signed</span> short) left_sample;
- <a name="l01766"></a>01766 right_out[k] = (<span class="keywordtype">signed</span> short) right_sample;
- <a name="l01767"></a>01767 }
- <a name="l01768"></a>01768
- <a name="l01769"></a>01769 synth->cur = cur;
- <a name="l01770"></a>01770 synth->dither_index = di; <span class="comment">/* keep dither buffer continous */</span>
- <a name="l01771"></a>01771
- <a name="l01772"></a>01772 fluid_profile(FLUID_PROF_WRITE_S16, prof_ref);
- <a name="l01773"></a>01773
- <a name="l01774"></a>01774
- <a name="l01775"></a>01775 time = fluid_utime() - time;
- <a name="l01776"></a>01776 synth->cpu_load = 0.5 * (synth->cpu_load +
- <a name="l01777"></a>01777 time * synth->sample_rate / len / 10000.0);
- <a name="l01778"></a>01778
- <a name="l01779"></a>01779 <span class="comment">/* printf("CPU: %.2f\n", synth->cpu_load); */</span>
- <a name="l01780"></a>01780
- <a name="l01781"></a>01781 <span class="keywordflow">return</span> 0;
- <a name="l01782"></a>01782 }
- <a name="l01783"></a>01783
- <a name="l01784"></a>01784 <span class="comment">/*</span>
- <a name="l01785"></a>01785 <span class="comment"> * fluid_synth_dither_s16</span>
- <a name="l01786"></a>01786 <span class="comment"> * Converts stereo floating point sample data to signed 16 bit data with</span>
- <a name="l01787"></a>01787 <span class="comment"> * dithering. 'dither_index' parameter is a caller supplied pointer to an</span>
- <a name="l01788"></a>01788 <span class="comment"> * integer which should be initialized to 0 before the first call and passed</span>
- <a name="l01789"></a>01789 <span class="comment"> * unmodified to additional calls which are part of the same synthesis output.</span>
- <a name="l01790"></a>01790 <span class="comment"> * Only used internally currently.</span>
- <a name="l01791"></a>01791 <span class="comment"> */</span>
- <a name="l01792"></a>01792 <span class="keywordtype">void</span>
- <a name="l01793"></a>01793 fluid_synth_dither_s16(<span class="keywordtype">int</span> *dither_index, <span class="keywordtype">int</span> len, <span class="keywordtype">float</span>* lin, <span class="keywordtype">float</span>* rin,
- <a name="l01794"></a>01794 <span class="keywordtype">void</span>* lout, <span class="keywordtype">int</span> loff, <span class="keywordtype">int</span> lincr,
- <a name="l01795"></a>01795 <span class="keywordtype">void</span>* rout, <span class="keywordtype">int</span> roff, <span class="keywordtype">int</span> rincr)
- <a name="l01796"></a>01796 {
- <a name="l01797"></a>01797 <span class="keywordtype">int</span> i, j, k;
- <a name="l01798"></a>01798 <span class="keywordtype">signed</span> <span class="keywordtype">short</span>* left_out = (<span class="keywordtype">signed</span> <span class="keywordtype">short</span>*) lout;
- <a name="l01799"></a>01799 <span class="keywordtype">signed</span> <span class="keywordtype">short</span>* right_out = (<span class="keywordtype">signed</span> <span class="keywordtype">short</span>*) rout;
- <a name="l01800"></a>01800 <span class="keywordtype">double</span> prof_ref = fluid_profile_ref();
- <a name="l01801"></a>01801 fluid_real_t left_sample;
- <a name="l01802"></a>01802 fluid_real_t right_sample;
- <a name="l01803"></a>01803 <span class="keywordtype">int</span> di = *dither_index;
- <a name="l01804"></a>01804
- <a name="l01805"></a>01805 <span class="keywordflow">for</span> (i = 0, j = loff, k = roff; i < len; i++, j += lincr, k += rincr) {
- <a name="l01806"></a>01806
- <a name="l01807"></a>01807 left_sample = roundi (lin[i] * 32766.0f + rand_table[0][di]);
- <a name="l01808"></a>01808 right_sample = roundi (rin[i] * 32766.0f + rand_table[1][di]);
- <a name="l01809"></a>01809
- <a name="l01810"></a>01810 di++;
- <a name="l01811"></a>01811 <span class="keywordflow">if</span> (di >= DITHER_SIZE) di = 0;
- <a name="l01812"></a>01812
- <a name="l01813"></a>01813 <span class="comment">/* digital clipping */</span>
- <a name="l01814"></a>01814 <span class="keywordflow">if</span> (left_sample > 32767.0f) left_sample = 32767.0f;
- <a name="l01815"></a>01815 <span class="keywordflow">if</span> (left_sample < -32768.0f) left_sample = -32768.0f;
- <a name="l01816"></a>01816 <span class="keywordflow">if</span> (right_sample > 32767.0f) right_sample = 32767.0f;
- <a name="l01817"></a>01817 <span class="keywordflow">if</span> (right_sample < -32768.0f) right_sample = -32768.0f;
- <a name="l01818"></a>01818
- <a name="l01819"></a>01819 left_out[j] = (<span class="keywordtype">signed</span> short) left_sample;
- <a name="l01820"></a>01820 right_out[k] = (<span class="keywordtype">signed</span> short) right_sample;
- <a name="l01821"></a>01821 }
- <a name="l01822"></a>01822
- <a name="l01823"></a>01823 *dither_index = di; <span class="comment">/* keep dither buffer continous */</span>
- <a name="l01824"></a>01824
- <a name="l01825"></a>01825 fluid_profile(FLUID_PROF_WRITE_S16, prof_ref);
- <a name="l01826"></a>01826 }
- <a name="l01827"></a>01827
- <a name="l01828"></a>01828 <span class="comment">/*</span>
- <a name="l01829"></a>01829 <span class="comment"> * fluid_synth_one_block</span>
- <a name="l01830"></a>01830 <span class="comment"> */</span>
- <a name="l01831"></a>01831 <span class="keywordtype">int</span>
- <a name="l01832"></a>01832 fluid_synth_one_block(fluid_synth_t* synth, <span class="keywordtype">int</span> do_not_mix_fx_to_out)
- <a name="l01833"></a>01833 {
- <a name="l01834"></a>01834 <span class="keywordtype">int</span> i, auchan;
- <a name="l01835"></a>01835 fluid_voice_t* voice;
- <a name="l01836"></a>01836 fluid_real_t* left_buf;
- <a name="l01837"></a>01837 fluid_real_t* right_buf;
- <a name="l01838"></a>01838 fluid_real_t* reverb_buf;
- <a name="l01839"></a>01839 fluid_real_t* chorus_buf;
- <a name="l01840"></a>01840 <span class="keywordtype">int</span> byte_size = FLUID_BUFSIZE * <span class="keyword">sizeof</span>(fluid_real_t);
- <a name="l01841"></a>01841 <span class="keywordtype">double</span> prof_ref = fluid_profile_ref();
- <a name="l01842"></a>01842
- <a name="l01843"></a>01843 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Here comes the audio thread. Lock the synth. *\/ */</span>
- <a name="l01844"></a>01844
- <a name="l01845"></a>01845 fluid_check_fpe(<span class="stringliteral">"??? Just starting up ???"</span>);
- <a name="l01846"></a>01846
- <a name="l01847"></a>01847 <span class="comment">/* clean the audio buffers */</span>
- <a name="l01848"></a>01848 <span class="keywordflow">for</span> (i = 0; i < synth->nbuf; i++) {
- <a name="l01849"></a>01849 FLUID_MEMSET(synth->left_buf[i], 0, byte_size);
- <a name="l01850"></a>01850 FLUID_MEMSET(synth->right_buf[i], 0, byte_size);
- <a name="l01851"></a>01851 }
- <a name="l01852"></a>01852
- <a name="l01853"></a>01853 <span class="keywordflow">for</span> (i = 0; i < synth->effects_channels; i++) {
- <a name="l01854"></a>01854 FLUID_MEMSET(synth->fx_left_buf[i], 0, byte_size);
- <a name="l01855"></a>01855 FLUID_MEMSET(synth->fx_right_buf[i], 0, byte_size);
- <a name="l01856"></a>01856 }
- <a name="l01857"></a>01857
- <a name="l01858"></a>01858 <span class="comment">/* Set up the reverb / chorus buffers only, when the effect is</span>
- <a name="l01859"></a>01859 <span class="comment"> * enabled on synth level. Nonexisting buffers are detected in the</span>
- <a name="l01860"></a>01860 <span class="comment"> * DSP loop. Not sending the reverb / chorus signal saves some time</span>
- <a name="l01861"></a>01861 <span class="comment"> * in that case. */</span>
- <a name="l01862"></a>01862 reverb_buf = synth->with_reverb ? synth->fx_left_buf[0] : NULL;
- <a name="l01863"></a>01863 chorus_buf = synth->with_chorus ? synth->fx_left_buf[1] : NULL;
- <a name="l01864"></a>01864
- <a name="l01865"></a>01865 fluid_profile(FLUID_PROF_ONE_BLOCK_CLEAR, prof_ref);
- <a name="l01866"></a>01866
- <a name="l01867"></a>01867 <span class="comment">/* call all playing synthesis processes */</span>
- <a name="l01868"></a>01868 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l01869"></a>01869 voice = synth->voice[i];
- <a name="l01870"></a>01870
- <a name="l01871"></a>01871 <span class="keywordflow">if</span> (_PLAYING(voice)) {
- <a name="l01872"></a>01872 <span class="keywordtype">double</span> prof_ref_voice = fluid_profile_ref();
- <a name="l01873"></a>01873
- <a name="l01874"></a>01874 <span class="comment">/* The output associated with a MIDI channel is wrapped around</span>
- <a name="l01875"></a>01875 <span class="comment"> * using the number of audio groups as modulo divider. This is</span>
- <a name="l01876"></a>01876 <span class="comment"> * typically the number of output channels on the 'sound card',</span>
- <a name="l01877"></a>01877 <span class="comment"> * as long as the LADSPA Fx unit is not used. In case of LADSPA</span>
- <a name="l01878"></a>01878 <span class="comment"> * unit, think of it as subgroups on a mixer.</span>
- <a name="l01879"></a>01879 <span class="comment"> *</span>
- <a name="l01880"></a>01880 <span class="comment"> * For example: Assume that the number of groups is set to 2.</span>
- <a name="l01881"></a>01881 <span class="comment"> * Then MIDI channel 1, 3, 5, 7 etc. go to output 1, channels 2,</span>
- <a name="l01882"></a>01882 <span class="comment"> * 4, 6, 8 etc to output 2. Or assume 3 groups: Then MIDI</span>
- <a name="l01883"></a>01883 <span class="comment"> * channels 1, 4, 7, 10 etc go to output 1; 2, 5, 8, 11 etc to</span>
- <a name="l01884"></a>01884 <span class="comment"> * output 2, 3, 6, 9, 12 etc to output 3.</span>
- <a name="l01885"></a>01885 <span class="comment"> */</span>
- <a name="l01886"></a>01886 auchan = fluid_channel_get_num(fluid_voice_get_channel(voice));
- <a name="l01887"></a>01887 auchan %= synth->audio_groups;
- <a name="l01888"></a>01888 left_buf = synth->left_buf[auchan];
- <a name="l01889"></a>01889 right_buf = synth->right_buf[auchan];
- <a name="l01890"></a>01890
- <a name="l01891"></a>01891 fluid_voice_write(voice, left_buf, right_buf, reverb_buf, chorus_buf);
- <a name="l01892"></a>01892
- <a name="l01893"></a>01893 fluid_profile(FLUID_PROF_ONE_BLOCK_VOICE, prof_ref_voice);
- <a name="l01894"></a>01894 }
- <a name="l01895"></a>01895 }
- <a name="l01896"></a>01896
- <a name="l01897"></a>01897 fluid_check_fpe(<span class="stringliteral">"Synthesis processes"</span>);
- <a name="l01898"></a>01898
- <a name="l01899"></a>01899 fluid_profile(FLUID_PROF_ONE_BLOCK_VOICES, prof_ref);
- <a name="l01900"></a>01900
- <a name="l01901"></a>01901 <span class="comment">/* if multi channel output, don't mix the output of the chorus and</span>
- <a name="l01902"></a>01902 <span class="comment"> reverb in the final output. The effects outputs are send</span>
- <a name="l01903"></a>01903 <span class="comment"> separately. */</span>
- <a name="l01904"></a>01904
- <a name="l01905"></a>01905 <span class="keywordflow">if</span> (do_not_mix_fx_to_out) {
- <a name="l01906"></a>01906
- <a name="l01907"></a>01907 <span class="comment">/* send to reverb */</span>
- <a name="l01908"></a>01908 <span class="keywordflow">if</span> (reverb_buf) {
- <a name="l01909"></a>01909 fluid_revmodel_processreplace(synth->reverb, reverb_buf,
- <a name="l01910"></a>01910 synth->fx_left_buf[0], synth->fx_right_buf[0]);
- <a name="l01911"></a>01911 fluid_check_fpe(<span class="stringliteral">"Reverb"</span>);
- <a name="l01912"></a>01912 }
- <a name="l01913"></a>01913
- <a name="l01914"></a>01914 fluid_profile(FLUID_PROF_ONE_BLOCK_REVERB, prof_ref);
- <a name="l01915"></a>01915
- <a name="l01916"></a>01916 <span class="comment">/* send to chorus */</span>
- <a name="l01917"></a>01917 <span class="keywordflow">if</span> (chorus_buf) {
- <a name="l01918"></a>01918 fluid_chorus_processreplace(synth->chorus, chorus_buf,
- <a name="l01919"></a>01919 synth->fx_left_buf[1], synth->fx_right_buf[1]);
- <a name="l01920"></a>01920 fluid_check_fpe(<span class="stringliteral">"Chorus"</span>);
- <a name="l01921"></a>01921 }
- <a name="l01922"></a>01922
- <a name="l01923"></a>01923 } <span class="keywordflow">else</span> {
- <a name="l01924"></a>01924
- <a name="l01925"></a>01925 <span class="comment">/* send to reverb */</span>
- <a name="l01926"></a>01926 <span class="keywordflow">if</span> (reverb_buf) {
- <a name="l01927"></a>01927 fluid_revmodel_processmix(synth->reverb, reverb_buf,
- <a name="l01928"></a>01928 synth->left_buf[0], synth->right_buf[0]);
- <a name="l01929"></a>01929 fluid_check_fpe(<span class="stringliteral">"Reverb"</span>);
- <a name="l01930"></a>01930 }
- <a name="l01931"></a>01931
- <a name="l01932"></a>01932 fluid_profile(FLUID_PROF_ONE_BLOCK_REVERB, prof_ref);
- <a name="l01933"></a>01933
- <a name="l01934"></a>01934 <span class="comment">/* send to chorus */</span>
- <a name="l01935"></a>01935 <span class="keywordflow">if</span> (chorus_buf) {
- <a name="l01936"></a>01936 fluid_chorus_processmix(synth->chorus, chorus_buf,
- <a name="l01937"></a>01937 synth->left_buf[0], synth->right_buf[0]);
- <a name="l01938"></a>01938 fluid_check_fpe(<span class="stringliteral">"Chorus"</span>);
- <a name="l01939"></a>01939 }
- <a name="l01940"></a>01940 }
- <a name="l01941"></a>01941
- <a name="l01942"></a>01942 fluid_profile(FLUID_PROF_ONE_BLOCK_CHORUS, prof_ref);
- <a name="l01943"></a>01943
- <a name="l01944"></a>01944 <span class="preprocessor">#ifdef LADSPA</span>
- <a name="l01945"></a>01945 <span class="preprocessor"></span> <span class="comment">/* Run the signal through the LADSPA Fx unit */</span>
- <a name="l01946"></a>01946 fluid_LADSPA_run(synth->LADSPA_FxUnit, synth->left_buf, synth->right_buf, synth->fx_left_buf, synth->fx_right_buf);
- <a name="l01947"></a>01947 fluid_check_fpe(<span class="stringliteral">"LADSPA"</span>);
- <a name="l01948"></a>01948 <span class="preprocessor">#endif</span>
- <a name="l01949"></a>01949 <span class="preprocessor"></span>
- <a name="l01950"></a>01950 synth->ticks += FLUID_BUFSIZE;
- <a name="l01951"></a>01951
- <a name="l01952"></a>01952 <span class="comment">/* Testcase, that provokes a denormal floating point error */</span>
- <a name="l01953"></a>01953 <span class="preprocessor">#if 0</span>
- <a name="l01954"></a>01954 <span class="preprocessor"></span> {<span class="keywordtype">float</span> num=1;<span class="keywordflow">while</span> (num != 0){num*=0.5;};};
- <a name="l01955"></a>01955 <span class="preprocessor">#endif</span>
- <a name="l01956"></a>01956 <span class="preprocessor"></span> fluid_check_fpe(<span class="stringliteral">"??? Remainder of synth_one_block ???"</span>);
- <a name="l01957"></a>01957
- <a name="l01958"></a>01958 <span class="comment">/* fluid_mutex_unlock(synth->busy); /\* Allow other threads to touch the synth *\/ */</span>
- <a name="l01959"></a>01959
- <a name="l01960"></a>01960 <span class="keywordflow">return</span> 0;
- <a name="l01961"></a>01961 }
- <a name="l01962"></a>01962
- <a name="l01963"></a>01963
- <a name="l01964"></a>01964 <span class="comment">/*</span>
- <a name="l01965"></a>01965 <span class="comment"> * fluid_synth_free_voice_by_kill</span>
- <a name="l01966"></a>01966 <span class="comment"> *</span>
- <a name="l01967"></a>01967 <span class="comment"> * selects a voice for killing. the selection algorithm is a refinement</span>
- <a name="l01968"></a>01968 <span class="comment"> * of the algorithm previously in fluid_synth_alloc_voice.</span>
- <a name="l01969"></a>01969 <span class="comment"> */</span>
- <a name="l01970"></a>01970 fluid_voice_t*
- <a name="l01971"></a>01971 fluid_synth_free_voice_by_kill(fluid_synth_t* synth)
- <a name="l01972"></a>01972 {
- <a name="l01973"></a>01973 <span class="keywordtype">int</span> i;
- <a name="l01974"></a>01974 fluid_real_t best_prio = 999999.;
- <a name="l01975"></a>01975 fluid_real_t this_voice_prio;
- <a name="l01976"></a>01976 fluid_voice_t* voice;
- <a name="l01977"></a>01977 <span class="keywordtype">int</span> best_voice_index=-1;
- <a name="l01978"></a>01978
- <a name="l01979"></a>01979 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l01980"></a>01980 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l01981"></a>01981
- <a name="l01982"></a>01982 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l01983"></a>01983
- <a name="l01984"></a>01984 voice = synth->voice[i];
- <a name="l01985"></a>01985
- <a name="l01986"></a>01986 <span class="comment">/* safeguard against an available voice. */</span>
- <a name="l01987"></a>01987 <span class="keywordflow">if</span> (_AVAILABLE(voice)) {
- <a name="l01988"></a>01988 <span class="keywordflow">return</span> voice;
- <a name="l01989"></a>01989 }
- <a name="l01990"></a>01990
- <a name="l01991"></a>01991 <span class="comment">/* Determine, how 'important' a voice is.</span>
- <a name="l01992"></a>01992 <span class="comment"> * Start with an arbitrary number */</span>
- <a name="l01993"></a>01993 this_voice_prio = 10000.;
- <a name="l01994"></a>01994
- <a name="l01995"></a>01995 <span class="comment">/* Is this voice on the drum channel?</span>
- <a name="l01996"></a>01996 <span class="comment"> * Then it is very important.</span>
- <a name="l01997"></a>01997 <span class="comment"> * Also, forget about the released-note condition:</span>
- <a name="l01998"></a>01998 <span class="comment"> * Typically, drum notes are triggered only very briefly, they run most</span>
- <a name="l01999"></a>01999 <span class="comment"> * of the time in release phase.</span>
- <a name="l02000"></a>02000 <span class="comment"> */</span>
- <a name="l02001"></a>02001 <span class="keywordflow">if</span> (voice->chan == 9){
- <a name="l02002"></a>02002 this_voice_prio += 4000;
- <a name="l02003"></a>02003
- <a name="l02004"></a>02004 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (_RELEASED(voice)){
- <a name="l02005"></a>02005 <span class="comment">/* The key for this voice has been released. Consider it much less important</span>
- <a name="l02006"></a>02006 <span class="comment"> * than a voice, which is still held.</span>
- <a name="l02007"></a>02007 <span class="comment"> */</span>
- <a name="l02008"></a>02008 this_voice_prio -= 2000.;
- <a name="l02009"></a>02009 }
- <a name="l02010"></a>02010
- <a name="l02011"></a>02011 <span class="keywordflow">if</span> (_SUSTAINED(voice)){
- <a name="l02012"></a>02012 <span class="comment">/* The sustain pedal is held down on this channel.</span>
- <a name="l02013"></a>02013 <span class="comment"> * Consider it less important than non-sustained channels.</span>
- <a name="l02014"></a>02014 <span class="comment"> * This decision is somehow subjective. But usually the sustain pedal</span>
- <a name="l02015"></a>02015 <span class="comment"> * is used to play 'more-voices-than-fingers', so it shouldn't hurt</span>
- <a name="l02016"></a>02016 <span class="comment"> * if we kill one voice.</span>
- <a name="l02017"></a>02017 <span class="comment"> */</span>
- <a name="l02018"></a>02018 this_voice_prio -= 1000;
- <a name="l02019"></a>02019 }
- <a name="l02020"></a>02020
- <a name="l02021"></a>02021 <span class="comment">/* We are not enthusiastic about releasing voices, which have just been started.</span>
- <a name="l02022"></a>02022 <span class="comment"> * Otherwise hitting a chord may result in killing notes belonging to that very same</span>
- <a name="l02023"></a>02023 <span class="comment"> * chord.</span>
- <a name="l02024"></a>02024 <span class="comment"> * So subtract the age of the voice from the priority - an older voice is just a little</span>
- <a name="l02025"></a>02025 <span class="comment"> * bit less important than a younger voice.</span>
- <a name="l02026"></a>02026 <span class="comment"> * This is a number between roughly 0 and 100.*/</span>
- <a name="l02027"></a>02027 this_voice_prio -= (synth->noteid - fluid_voice_get_id(voice));
- <a name="l02028"></a>02028
- <a name="l02029"></a>02029 <span class="comment">/* take a rough estimate of loudness into account. Louder voices are more important. */</span>
- <a name="l02030"></a>02030 <span class="keywordflow">if</span> (voice->volenv_section != FLUID_VOICE_ENVATTACK){
- <a name="l02031"></a>02031 this_voice_prio += voice->volenv_val * 1000.;
- <a name="l02032"></a>02032 }
- <a name="l02033"></a>02033
- <a name="l02034"></a>02034 <span class="comment">/* check if this voice has less priority than the previous candidate. */</span>
- <a name="l02035"></a>02035 <span class="keywordflow">if</span> (this_voice_prio < best_prio)
- <a name="l02036"></a>02036 best_voice_index = i,
- <a name="l02037"></a>02037 best_prio = this_voice_prio;
- <a name="l02038"></a>02038 }
- <a name="l02039"></a>02039
- <a name="l02040"></a>02040 <span class="keywordflow">if</span> (best_voice_index < 0) {
- <a name="l02041"></a>02041 <span class="keywordflow">return</span> NULL;
- <a name="l02042"></a>02042 }
- <a name="l02043"></a>02043
- <a name="l02044"></a>02044 voice = synth->voice[best_voice_index];
- <a name="l02045"></a>02045 fluid_voice_off(voice);
- <a name="l02046"></a>02046
- <a name="l02047"></a>02047 <span class="keywordflow">return</span> voice;
- <a name="l02048"></a>02048 }
- <a name="l02049"></a>02049
- <a name="l02050"></a>02050 <span class="comment">/*</span>
- <a name="l02051"></a>02051 <span class="comment"> * fluid_synth_alloc_voice</span>
- <a name="l02052"></a>02052 <span class="comment"> */</span>
- <a name="l02053"></a>02053 fluid_voice_t*
- <a name="l02054"></a>02054 fluid_synth_alloc_voice(fluid_synth_t* synth, <a class="code" href="struct__fluid__sample__t.html">fluid_sample_t</a>* sample, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> key, <span class="keywordtype">int</span> vel)
- <a name="l02055"></a>02055 {
- <a name="l02056"></a>02056 <span class="keywordtype">int</span> i, k;
- <a name="l02057"></a>02057 fluid_voice_t* voice = NULL;
- <a name="l02058"></a>02058 fluid_channel_t* channel = NULL;
- <a name="l02059"></a>02059
- <a name="l02060"></a>02060 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l02061"></a>02061 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l02062"></a>02062
- <a name="l02063"></a>02063 <span class="comment">/* check if there's an available synthesis process */</span>
- <a name="l02064"></a>02064 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l02065"></a>02065 <span class="keywordflow">if</span> (_AVAILABLE(synth->voice[i])) {
- <a name="l02066"></a>02066 voice = synth->voice[i];
- <a name="l02067"></a>02067 <span class="keywordflow">break</span>;
- <a name="l02068"></a>02068 }
- <a name="l02069"></a>02069 }
- <a name="l02070"></a>02070
- <a name="l02071"></a>02071 <span class="comment">/* No success yet? Then stop a running voice. */</span>
- <a name="l02072"></a>02072 <span class="keywordflow">if</span> (voice == NULL) {
- <a name="l02073"></a>02073 voice = fluid_synth_free_voice_by_kill(synth);
- <a name="l02074"></a>02074 }
- <a name="l02075"></a>02075
- <a name="l02076"></a>02076 <span class="keywordflow">if</span> (voice == NULL) {
- <a name="l02077"></a>02077 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Failed to allocate a synthesis process. (chan=%d,key=%d)"</span>, chan, key);
- <a name="l02078"></a>02078 <span class="keywordflow">return</span> NULL;
- <a name="l02079"></a>02079 }
- <a name="l02080"></a>02080
- <a name="l02081"></a>02081 <span class="keywordflow">if</span> (synth->verbose) {
- <a name="l02082"></a>02082 k = 0;
- <a name="l02083"></a>02083 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l02084"></a>02084 <span class="keywordflow">if</span> (!_AVAILABLE(synth->voice[i])) {
- <a name="l02085"></a>02085 k++;
- <a name="l02086"></a>02086 }
- <a name="l02087"></a>02087 }
- <a name="l02088"></a>02088
- <a name="l02089"></a>02089 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9edfa902517702f2dd8ae849b810175ac4" title="Verbose informational messages.">FLUID_INFO</a>, <span class="stringliteral">"noteon\t%d\t%d\t%d\t%05d\t%.3f\t%.3f\t%.3f\t%d"</span>,
- <a name="l02090"></a>02090 chan, key, vel, synth->storeid,
- <a name="l02091"></a>02091 (<span class="keywordtype">float</span>) synth->ticks / 44100.0f,
- <a name="l02092"></a>02092 (fluid_curtime() - synth->start) / 1000.0f,
- <a name="l02093"></a>02093 0.0f,
- <a name="l02094"></a>02094 k);
- <a name="l02095"></a>02095 }
- <a name="l02096"></a>02096
- <a name="l02097"></a>02097 <span class="keywordflow">if</span> (chan >= 0) {
- <a name="l02098"></a>02098 channel = synth->channel[chan];
- <a name="l02099"></a>02099 }
- <a name="l02100"></a>02100
- <a name="l02101"></a>02101 <span class="keywordflow">if</span> (fluid_voice_init(voice, sample, channel, key, vel,
- <a name="l02102"></a>02102 synth->storeid, synth->ticks, synth->gain) != FLUID_OK) {
- <a name="l02103"></a>02103 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Failed to initialize voice"</span>);
- <a name="l02104"></a>02104 <span class="keywordflow">return</span> NULL;
- <a name="l02105"></a>02105 }
- <a name="l02106"></a>02106
- <a name="l02107"></a>02107 <span class="comment">/* add the default modulators to the synthesis process. */</span>
- <a name="l02108"></a>02108 fluid_voice_add_mod(voice, &default_vel2att_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.1 */</span>
- <a name="l02109"></a>02109 fluid_voice_add_mod(voice, &default_vel2filter_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.2 */</span>
- <a name="l02110"></a>02110 fluid_voice_add_mod(voice, &default_at2viblfo_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.3 */</span>
- <a name="l02111"></a>02111 fluid_voice_add_mod(voice, &default_mod2viblfo_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.4 */</span>
- <a name="l02112"></a>02112 fluid_voice_add_mod(voice, &default_att_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.5 */</span>
- <a name="l02113"></a>02113 fluid_voice_add_mod(voice, &default_pan_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.6 */</span>
- <a name="l02114"></a>02114 fluid_voice_add_mod(voice, &default_expr_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.7 */</span>
- <a name="l02115"></a>02115 fluid_voice_add_mod(voice, &default_reverb_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.8 */</span>
- <a name="l02116"></a>02116 fluid_voice_add_mod(voice, &default_chorus_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.9 */</span>
- <a name="l02117"></a>02117 fluid_voice_add_mod(voice, &default_pitch_bend_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.10 */</span>
- <a name="l02118"></a>02118
- <a name="l02119"></a>02119 <span class="keywordflow">return</span> voice;
- <a name="l02120"></a>02120 }
- <a name="l02121"></a>02121
- <a name="l02122"></a>02122 <span class="comment">/*</span>
- <a name="l02123"></a>02123 <span class="comment"> * fluid_synth_kill_by_exclusive_class</span>
- <a name="l02124"></a>02124 <span class="comment"> */</span>
- <a name="l02125"></a>02125 <span class="keywordtype">void</span> fluid_synth_kill_by_exclusive_class(fluid_synth_t* synth, fluid_voice_t* new_voice)
- <a name="l02126"></a>02126 {
- <a name="l02137"></a>02137 <span class="keywordtype">int</span> i;
- <a name="l02138"></a>02138 <span class="keywordtype">int</span> excl_class = _GEN(new_voice,<a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b4900ee448f717ec582dac28ce51d08914" title="Exclusive class number.">GEN_EXCLUSIVECLASS</a>);
- <a name="l02139"></a>02139
- <a name="l02140"></a>02140 <span class="comment">/* Check if the voice belongs to an exclusive class. In that case,</span>
- <a name="l02141"></a>02141 <span class="comment"> previous notes from the same class are released. */</span>
- <a name="l02142"></a>02142
- <a name="l02143"></a>02143 <span class="comment">/* Excl. class 0: No exclusive class */</span>
- <a name="l02144"></a>02144 <span class="keywordflow">if</span> (excl_class == 0) {
- <a name="l02145"></a>02145 <span class="keywordflow">return</span>;
- <a name="l02146"></a>02146 }
- <a name="l02147"></a>02147
- <a name="l02148"></a>02148 <span class="comment">// FLUID_LOG(FLUID_INFO, "Voice belongs to exclusive class (class=%d, ignore_id=%d)", excl_class, ignore_ID);</span>
- <a name="l02149"></a>02149
- <a name="l02150"></a>02150 <span class="comment">/* Kill all notes on the same channel with the same exclusive class */</span>
- <a name="l02151"></a>02151
- <a name="l02152"></a>02152 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l02153"></a>02153 fluid_voice_t* existing_voice = synth->voice[i];
- <a name="l02154"></a>02154
- <a name="l02155"></a>02155 <span class="comment">/* Existing voice does not play? Leave it alone. */</span>
- <a name="l02156"></a>02156 <span class="keywordflow">if</span> (!_PLAYING(existing_voice)) {
- <a name="l02157"></a>02157 <span class="keywordflow">continue</span>;
- <a name="l02158"></a>02158 }
- <a name="l02159"></a>02159
- <a name="l02160"></a>02160 <span class="comment">/* An exclusive class is valid for a whole channel (or preset).</span>
- <a name="l02161"></a>02161 <span class="comment"> * Is the voice on a different channel? Leave it alone. */</span>
- <a name="l02162"></a>02162 <span class="keywordflow">if</span> (existing_voice->chan != new_voice->chan) {
- <a name="l02163"></a>02163 <span class="keywordflow">continue</span>;
- <a name="l02164"></a>02164 }
- <a name="l02165"></a>02165
- <a name="l02166"></a>02166 <span class="comment">/* Existing voice has a different (or no) exclusive class? Leave it alone. */</span>
- <a name="l02167"></a>02167 <span class="keywordflow">if</span> ((<span class="keywordtype">int</span>)_GEN(existing_voice, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b4900ee448f717ec582dac28ce51d08914" title="Exclusive class number.">GEN_EXCLUSIVECLASS</a>) != excl_class) {
- <a name="l02168"></a>02168 <span class="keywordflow">continue</span>;
- <a name="l02169"></a>02169 }
- <a name="l02170"></a>02170
- <a name="l02171"></a>02171 <span class="comment">/* Existing voice is a voice process belonging to this noteon</span>
- <a name="l02172"></a>02172 <span class="comment"> * event (for example: stereo sample)? Leave it alone. */</span>
- <a name="l02173"></a>02173 <span class="keywordflow">if</span> (fluid_voice_get_id(existing_voice) == fluid_voice_get_id(new_voice)) {
- <a name="l02174"></a>02174 <span class="keywordflow">continue</span>;
- <a name="l02175"></a>02175 }
- <a name="l02176"></a>02176
- <a name="l02177"></a>02177 <span class="comment">// FLUID_LOG(FLUID_INFO, "Releasing previous voice of exclusive class (class=%d, id=%d)",</span>
- <a name="l02178"></a>02178 <span class="comment">// (int)_GEN(existing_voice, GEN_EXCLUSIVECLASS), (int)fluid_voice_get_id(existing_voice));</span>
- <a name="l02179"></a>02179
- <a name="l02180"></a>02180 fluid_voice_kill_excl(existing_voice);
- <a name="l02181"></a>02181 };
- <a name="l02182"></a>02182 };
- <a name="l02183"></a>02183
- <a name="l02184"></a>02184 <span class="comment">/*</span>
- <a name="l02185"></a>02185 <span class="comment"> * fluid_synth_start_voice</span>
- <a name="l02186"></a>02186 <span class="comment"> */</span>
- <a name="l02187"></a>02187 <span class="keywordtype">void</span> fluid_synth_start_voice(fluid_synth_t* synth, fluid_voice_t* voice)
- <a name="l02188"></a>02188 {
- <a name="l02189"></a>02189 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l02190"></a>02190 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l02191"></a>02191
- <a name="l02192"></a>02192 <span class="comment">/* Find the exclusive class of this voice. If set, kill all voices</span>
- <a name="l02193"></a>02193 <span class="comment"> * that match the exclusive class and are younger than the first</span>
- <a name="l02194"></a>02194 <span class="comment"> * voice process created by this noteon event. */</span>
- <a name="l02195"></a>02195 fluid_synth_kill_by_exclusive_class(synth, voice);
- <a name="l02196"></a>02196
- <a name="l02197"></a>02197 <span class="comment">/* Start the new voice */</span>
- <a name="l02198"></a>02198
- <a name="l02199"></a>02199 fluid_voice_start(voice);
- <a name="l02200"></a>02200 }
- <a name="l02201"></a>02201
- <a name="l02202"></a>02202 <span class="comment">/*</span>
- <a name="l02203"></a>02203 <span class="comment"> * fluid_synth_add_sfloader</span>
- <a name="l02204"></a>02204 <span class="comment"> */</span>
- <a name="l02205"></a>02205 <span class="keywordtype">void</span> fluid_synth_add_sfloader(fluid_synth_t* synth, <a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>* loader)
- <a name="l02206"></a>02206 {
- <a name="l02207"></a>02207 synth->loaders = fluid_list_prepend(synth->loaders, loader);
- <a name="l02208"></a>02208 }
- <a name="l02209"></a>02209
- <a name="l02210"></a>02210
- <a name="l02211"></a>02211 <span class="comment">/*</span>
- <a name="l02212"></a>02212 <span class="comment"> * fluid_synth_sfload</span>
- <a name="l02213"></a>02213 <span class="comment"> */</span>
- <a name="l02214"></a>02214 <span class="keywordtype">int</span>
- <a name="l02215"></a>02215 fluid_synth_sfload(fluid_synth_t* synth, <span class="keyword">const</span> <span class="keywordtype">char</span>* filename, <span class="keywordtype">int</span> reset_presets)
- <a name="l02216"></a>02216 {
- <a name="l02217"></a>02217 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont;
- <a name="l02218"></a>02218 fluid_list_t* list;
- <a name="l02219"></a>02219 <a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>* loader;
- <a name="l02220"></a>02220
- <a name="l02221"></a>02221 <span class="preprocessor">#if defined(MACOS9)</span>
- <a name="l02222"></a>02222 <span class="preprocessor"></span> fluid_synth_sfunload_macos9(synth);
- <a name="l02223"></a>02223 <span class="preprocessor">#endif</span>
- <a name="l02224"></a>02224 <span class="preprocessor"></span>
- <a name="l02225"></a>02225 <span class="keywordflow">if</span> (filename == NULL) {
- <a name="l02226"></a>02226 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Invalid filename"</span>);
- <a name="l02227"></a>02227 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02228"></a>02228 }
- <a name="l02229"></a>02229
- <a name="l02230"></a>02230 <span class="keywordflow">for</span> (list = synth->loaders; list; list = fluid_list_next(list)) {
- <a name="l02231"></a>02231 loader = (<a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>*) fluid_list_get(list);
- <a name="l02232"></a>02232
- <a name="l02233"></a>02233 sfont = fluid_sfloader_load(loader, filename);
- <a name="l02234"></a>02234
- <a name="l02235"></a>02235 <span class="keywordflow">if</span> (sfont != NULL) {
- <a name="l02236"></a>02236
- <a name="l02237"></a>02237 sfont-><a class="code" href="struct__fluid__sfont__t.html#e955816cff10890c6369ac04733d37fb">id</a> = ++synth->sfont_id;
- <a name="l02238"></a>02238
- <a name="l02239"></a>02239 <span class="comment">/* insert the sfont as the first one on the list */</span>
- <a name="l02240"></a>02240 synth->sfont = fluid_list_prepend(synth->sfont, sfont);
- <a name="l02241"></a>02241
- <a name="l02242"></a>02242 <span class="comment">/* reset the presets for all channels */</span>
- <a name="l02243"></a>02243 <span class="keywordflow">if</span> (reset_presets) {
- <a name="l02244"></a>02244 fluid_synth_program_reset(synth);
- <a name="l02245"></a>02245 }
- <a name="l02246"></a>02246
- <a name="l02247"></a>02247 <span class="keywordflow">return</span> (<span class="keywordtype">int</span>) sfont-><a class="code" href="struct__fluid__sfont__t.html#e955816cff10890c6369ac04733d37fb">id</a>;
- <a name="l02248"></a>02248 }
- <a name="l02249"></a>02249 }
- <a name="l02250"></a>02250
- <a name="l02251"></a>02251 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Failed to load SoundFont \"%s\""</span>, filename);
- <a name="l02252"></a>02252 <span class="keywordflow">return</span> -1;
- <a name="l02253"></a>02253 }
- <a name="l02254"></a>02254
- <a name="l02255"></a>02255 <span class="comment">/*</span>
- <a name="l02256"></a>02256 <span class="comment"> * fluid_synth_sfunload_callback</span>
- <a name="l02257"></a>02257 <span class="comment"> */</span>
- <a name="l02258"></a>02258 <span class="keyword">static</span> <span class="keywordtype">int</span> fluid_synth_sfunload_callback(<span class="keywordtype">void</span>* data, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> msec)
- <a name="l02259"></a>02259 {
- <a name="l02260"></a>02260 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont = (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) data;
- <a name="l02261"></a>02261 <span class="keywordtype">int</span> r = delete_fluid_sfont(sfont);
- <a name="l02262"></a>02262 <span class="keywordflow">if</span> (r == 0) {
- <a name="l02263"></a>02263 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e5542b67c606598020b832c31729175fc" title="Debugging messages.">FLUID_DBG</a>,<span class="stringliteral">"Unloaded SoundFont"</span>);
- <a name="l02264"></a>02264 }
- <a name="l02265"></a>02265 <span class="keywordflow">return</span> r != 0;
- <a name="l02266"></a>02266 }
- <a name="l02267"></a>02267
- <a name="l02268"></a>02268 <span class="comment">/*</span>
- <a name="l02269"></a>02269 <span class="comment"> * fluid_synth_sfunload_macos9</span>
- <a name="l02270"></a>02270 <span class="comment"> */</span>
- <a name="l02271"></a>02271 <span class="keywordtype">void</span> fluid_synth_sfunload_macos9(fluid_synth_t* synth)
- <a name="l02272"></a>02272 {
- <a name="l02273"></a>02273 <span class="preprocessor">#if defined(MACOS9)</span>
- <a name="l02274"></a>02274 <span class="preprocessor"></span> fluid_list_t *list, *next;
- <a name="l02275"></a>02275 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont;
- <a name="l02276"></a>02276
- <a name="l02277"></a>02277 list = synth->unloading;
- <a name="l02278"></a>02278 <span class="keywordflow">while</span> (list) {
- <a name="l02279"></a>02279 next = fluid_list_next(list);
- <a name="l02280"></a>02280 sfont = (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) fluid_list_get(list);
- <a name="l02281"></a>02281 <span class="keywordflow">if</span> (delete_fluid_sfont(sfont) == 0) {
- <a name="l02282"></a>02282 synth->unloading = fluid_list_remove(synth->unloading, sfont);
- <a name="l02283"></a>02283 }
- <a name="l02284"></a>02284 list = next;
- <a name="l02285"></a>02285 }
- <a name="l02286"></a>02286 <span class="preprocessor">#endif</span>
- <a name="l02287"></a>02287 <span class="preprocessor"></span>}
- <a name="l02288"></a>02288
- <a name="l02289"></a>02289 <span class="comment">/*</span>
- <a name="l02290"></a>02290 <span class="comment"> * fluid_synth_sfunload</span>
- <a name="l02291"></a>02291 <span class="comment"> */</span>
- <a name="l02292"></a>02292 <span class="keywordtype">int</span>
- <a name="l02293"></a>02293 fluid_synth_sfunload(fluid_synth_t* synth, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <span class="keywordtype">id</span>, <span class="keywordtype">int</span> reset_presets)
- <a name="l02294"></a>02294 {
- <a name="l02295"></a>02295 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont = fluid_synth_get_sfont_by_id(synth, <span class="keywordtype">id</span>);
- <a name="l02296"></a>02296
- <a name="l02297"></a>02297 <span class="preprocessor">#if defined(MACOS9)</span>
- <a name="l02298"></a>02298 <span class="preprocessor"></span> fluid_synth_sfunload_macos9(synth);
- <a name="l02299"></a>02299 <span class="preprocessor">#endif</span>
- <a name="l02300"></a>02300 <span class="preprocessor"></span>
- <a name="l02301"></a>02301 <span class="keywordflow">if</span> (!sfont) {
- <a name="l02302"></a>02302 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"No SoundFont with id = %d"</span>, <span class="keywordtype">id</span>);
- <a name="l02303"></a>02303 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02304"></a>02304 }
- <a name="l02305"></a>02305
- <a name="l02306"></a>02306 <span class="comment">/* remove the SoundFont from the list */</span>
- <a name="l02307"></a>02307 synth->sfont = fluid_list_remove(synth->sfont, sfont);
- <a name="l02308"></a>02308
- <a name="l02309"></a>02309 <span class="comment">/* reset the presets for all channels */</span>
- <a name="l02310"></a>02310 <span class="keywordflow">if</span> (reset_presets) {
- <a name="l02311"></a>02311 fluid_synth_program_reset(synth);
- <a name="l02312"></a>02312 } <span class="keywordflow">else</span> {
- <a name="l02313"></a>02313 fluid_synth_update_presets(synth);
- <a name="l02314"></a>02314 }
- <a name="l02315"></a>02315
- <a name="l02316"></a>02316 <span class="keywordflow">if</span> (delete_fluid_sfont(sfont) != 0) {
- <a name="l02317"></a>02317 <span class="preprocessor">#if defined(MACOS9)</span>
- <a name="l02318"></a>02318 <span class="preprocessor"></span> synth->unloading = fluid_list_prepend(synth->unloading, sfont);
- <a name="l02319"></a>02319 <span class="preprocessor">#else</span>
- <a name="l02320"></a>02320 <span class="preprocessor"></span> <span class="comment">/* spin off a timer thread to unload the sfont later */</span>
- <a name="l02321"></a>02321 new_fluid_timer(100, fluid_synth_sfunload_callback, sfont, 1, 1);
- <a name="l02322"></a>02322 <span class="preprocessor">#endif</span>
- <a name="l02323"></a>02323 <span class="preprocessor"></span> }
- <a name="l02324"></a>02324
- <a name="l02325"></a>02325 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l02326"></a>02326 }
- <a name="l02327"></a>02327
- <a name="l02328"></a>02328 <span class="comment">/* fluid_synth_sfreload</span>
- <a name="l02329"></a>02329 <span class="comment"> *</span>
- <a name="l02330"></a>02330 <span class="comment"> */</span>
- <a name="l02331"></a>02331 <span class="keywordtype">int</span> fluid_synth_sfreload(fluid_synth_t* synth, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <span class="keywordtype">id</span>)
- <a name="l02332"></a>02332 {
- <a name="l02333"></a>02333 <span class="keywordtype">char</span> filename[1024];
- <a name="l02334"></a>02334 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont;
- <a name="l02335"></a>02335 <span class="keywordtype">int</span> index = 0;
- <a name="l02336"></a>02336 fluid_list_t *list;
- <a name="l02337"></a>02337 <a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>* loader;
- <a name="l02338"></a>02338
- <a name="l02339"></a>02339
- <a name="l02340"></a>02340 sfont = fluid_synth_get_sfont_by_id(synth, <span class="keywordtype">id</span>);
- <a name="l02341"></a>02341 <span class="keywordflow">if</span> (!sfont) {
- <a name="l02342"></a>02342 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"No SoundFont with id = %d"</span>, <span class="keywordtype">id</span>);
- <a name="l02343"></a>02343 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02344"></a>02344 }
- <a name="l02345"></a>02345
- <a name="l02346"></a>02346 <span class="comment">/* find the index of the SoundFont */</span>
- <a name="l02347"></a>02347 list = synth->sfont;
- <a name="l02348"></a>02348 <span class="keywordflow">while</span> (list) {
- <a name="l02349"></a>02349 <span class="keywordflow">if</span> (sfont == (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) fluid_list_get(list)) {
- <a name="l02350"></a>02350 <span class="keywordflow">break</span>;
- <a name="l02351"></a>02351 }
- <a name="l02352"></a>02352 list = fluid_list_next(list);
- <a name="l02353"></a>02353 index++;
- <a name="l02354"></a>02354 }
- <a name="l02355"></a>02355
- <a name="l02356"></a>02356 <span class="comment">/* keep a copy of the SoundFont's filename */</span>
- <a name="l02357"></a>02357 FLUID_STRCPY(filename, fluid_sfont_get_name(sfont));
- <a name="l02358"></a>02358
- <a name="l02359"></a>02359 <span class="keywordflow">if</span> (fluid_synth_sfunload(synth, <span class="keywordtype">id</span>, 0) != FLUID_OK) {
- <a name="l02360"></a>02360 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02361"></a>02361 }
- <a name="l02362"></a>02362
- <a name="l02363"></a>02363 <span class="keywordflow">for</span> (list = synth->loaders; list; list = fluid_list_next(list)) {
- <a name="l02364"></a>02364 loader = (<a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>*) fluid_list_get(list);
- <a name="l02365"></a>02365
- <a name="l02366"></a>02366 sfont = fluid_sfloader_load(loader, filename);
- <a name="l02367"></a>02367
- <a name="l02368"></a>02368 <span class="keywordflow">if</span> (sfont != NULL) {
- <a name="l02369"></a>02369
- <a name="l02370"></a>02370 sfont-><a class="code" href="struct__fluid__sfont__t.html#e955816cff10890c6369ac04733d37fb">id</a> = id;
- <a name="l02371"></a>02371
- <a name="l02372"></a>02372 <span class="comment">/* insert the sfont at the same index */</span>
- <a name="l02373"></a>02373 synth->sfont = fluid_list_insert_at(synth->sfont, index, sfont);
- <a name="l02374"></a>02374
- <a name="l02375"></a>02375 <span class="comment">/* reset the presets for all channels */</span>
- <a name="l02376"></a>02376 fluid_synth_update_presets(synth);
- <a name="l02377"></a>02377
- <a name="l02378"></a>02378 <span class="keywordflow">return</span> sfont-><a class="code" href="struct__fluid__sfont__t.html#e955816cff10890c6369ac04733d37fb">id</a>;
- <a name="l02379"></a>02379 }
- <a name="l02380"></a>02380 }
- <a name="l02381"></a>02381
- <a name="l02382"></a>02382 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Failed to load SoundFont \"%s\""</span>, filename);
- <a name="l02383"></a>02383 <span class="keywordflow">return</span> -1;
- <a name="l02384"></a>02384 }
- <a name="l02385"></a>02385
- <a name="l02386"></a>02386
- <a name="l02387"></a>02387 <span class="comment">/*</span>
- <a name="l02388"></a>02388 <span class="comment"> * fluid_synth_add_sfont</span>
- <a name="l02389"></a>02389 <span class="comment"> */</span>
- <a name="l02390"></a>02390 <span class="keywordtype">int</span> fluid_synth_add_sfont(fluid_synth_t* synth, <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont)
- <a name="l02391"></a>02391 {
- <a name="l02392"></a>02392 sfont-><a class="code" href="struct__fluid__sfont__t.html#e955816cff10890c6369ac04733d37fb">id</a> = ++synth->sfont_id;
- <a name="l02393"></a>02393
- <a name="l02394"></a>02394 <span class="comment">/* insert the sfont as the first one on the list */</span>
- <a name="l02395"></a>02395 synth->sfont = fluid_list_prepend(synth->sfont, sfont);
- <a name="l02396"></a>02396
- <a name="l02397"></a>02397 <span class="comment">/* reset the presets for all channels */</span>
- <a name="l02398"></a>02398 fluid_synth_program_reset(synth);
- <a name="l02399"></a>02399
- <a name="l02400"></a>02400 <span class="keywordflow">return</span> sfont-><a class="code" href="struct__fluid__sfont__t.html#e955816cff10890c6369ac04733d37fb">id</a>;
- <a name="l02401"></a>02401 }
- <a name="l02402"></a>02402
- <a name="l02403"></a>02403
- <a name="l02404"></a>02404 <span class="comment">/*</span>
- <a name="l02405"></a>02405 <span class="comment"> * fluid_synth_remove_sfont</span>
- <a name="l02406"></a>02406 <span class="comment"> */</span>
- <a name="l02407"></a>02407 <span class="keywordtype">void</span> fluid_synth_remove_sfont(fluid_synth_t* synth, <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont)
- <a name="l02408"></a>02408 {
- <a name="l02409"></a>02409 <span class="keywordtype">int</span> sfont_id = fluid_sfont_get_id(sfont);
- <a name="l02410"></a>02410
- <a name="l02411"></a>02411 synth->sfont = fluid_list_remove(synth->sfont, sfont);
- <a name="l02412"></a>02412
- <a name="l02413"></a>02413 <span class="comment">/* remove a possible bank offset */</span>
- <a name="l02414"></a>02414 fluid_synth_remove_bank_offset(synth, sfont_id);
- <a name="l02415"></a>02415
- <a name="l02416"></a>02416 <span class="comment">/* reset the presets for all channels */</span>
- <a name="l02417"></a>02417 fluid_synth_program_reset(synth);
- <a name="l02418"></a>02418 }
- <a name="l02419"></a>02419
- <a name="l02420"></a>02420
- <a name="l02421"></a>02421 <span class="comment">/* fluid_synth_sfcount</span>
- <a name="l02422"></a>02422 <span class="comment"> *</span>
- <a name="l02423"></a>02423 <span class="comment"> * Returns the number of loaded SoundFonts</span>
- <a name="l02424"></a>02424 <span class="comment"> */</span>
- <a name="l02425"></a>02425 <span class="keywordtype">int</span>
- <a name="l02426"></a>02426 fluid_synth_sfcount(fluid_synth_t* synth)
- <a name="l02427"></a>02427 {
- <a name="l02428"></a>02428 <span class="keywordflow">return</span> fluid_list_size(synth->sfont);
- <a name="l02429"></a>02429 }
- <a name="l02430"></a>02430
- <a name="l02431"></a>02431 <span class="comment">/* fluid_synth_get_sfont</span>
- <a name="l02432"></a>02432 <span class="comment"> *</span>
- <a name="l02433"></a>02433 <span class="comment"> * Returns SoundFont num</span>
- <a name="l02434"></a>02434 <span class="comment"> */</span>
- <a name="l02435"></a>02435 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*
- <a name="l02436"></a>02436 fluid_synth_get_sfont(fluid_synth_t* synth, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> num)
- <a name="l02437"></a>02437 {
- <a name="l02438"></a>02438 <span class="keywordflow">return</span> (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) fluid_list_get(fluid_list_nth(synth->sfont, num));
- <a name="l02439"></a>02439 }
- <a name="l02440"></a>02440
- <a name="l02441"></a>02441 <span class="comment">/* fluid_synth_get_sfont_by_id</span>
- <a name="l02442"></a>02442 <span class="comment"> *</span>
- <a name="l02443"></a>02443 <span class="comment"> */</span>
- <a name="l02444"></a>02444 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* fluid_synth_get_sfont_by_id(fluid_synth_t* synth, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <span class="keywordtype">id</span>)
- <a name="l02445"></a>02445 {
- <a name="l02446"></a>02446 fluid_list_t* list = synth->sfont;
- <a name="l02447"></a>02447 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont;
- <a name="l02448"></a>02448
- <a name="l02449"></a>02449 <span class="keywordflow">while</span> (list) {
- <a name="l02450"></a>02450 sfont = (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) fluid_list_get(list);
- <a name="l02451"></a>02451 <span class="keywordflow">if</span> (fluid_sfont_get_id(sfont) == id) {
- <a name="l02452"></a>02452 <span class="keywordflow">return</span> sfont;
- <a name="l02453"></a>02453 }
- <a name="l02454"></a>02454 list = fluid_list_next(list);
- <a name="l02455"></a>02455 }
- <a name="l02456"></a>02456 <span class="keywordflow">return</span> NULL;
- <a name="l02457"></a>02457 }
- <a name="l02458"></a>02458
- <a name="l02459"></a>02459 <span class="comment">/* fluid_synth_get_sfont_by_name</span>
- <a name="l02460"></a>02460 <span class="comment"> *</span>
- <a name="l02461"></a>02461 <span class="comment"> */</span>
- <a name="l02462"></a>02462 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* fluid_synth_get_sfont_by_name(fluid_synth_t* synth, <span class="keywordtype">char</span> *name)
- <a name="l02463"></a>02463 {
- <a name="l02464"></a>02464 fluid_list_t* list = synth->sfont;
- <a name="l02465"></a>02465 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont;
- <a name="l02466"></a>02466
- <a name="l02467"></a>02467 <span class="keywordflow">while</span> (list) {
- <a name="l02468"></a>02468 sfont = (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) fluid_list_get(list);
- <a name="l02469"></a>02469 <span class="keywordflow">if</span> (FLUID_STRCMP(fluid_sfont_get_name(sfont), name) == 0) {
- <a name="l02470"></a>02470 <span class="keywordflow">return</span> sfont;
- <a name="l02471"></a>02471 }
- <a name="l02472"></a>02472 list = fluid_list_next(list);
- <a name="l02473"></a>02473 }
- <a name="l02474"></a>02474 <span class="keywordflow">return</span> NULL;
- <a name="l02475"></a>02475 }
- <a name="l02476"></a>02476
- <a name="l02477"></a>02477 <span class="comment">/*</span>
- <a name="l02478"></a>02478 <span class="comment"> * fluid_synth_get_channel_preset</span>
- <a name="l02479"></a>02479 <span class="comment"> */</span>
- <a name="l02480"></a>02480 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>*
- <a name="l02481"></a>02481 fluid_synth_get_channel_preset(fluid_synth_t* synth, <span class="keywordtype">int</span> chan)
- <a name="l02482"></a>02482 {
- <a name="l02483"></a>02483 <span class="keywordflow">if</span> ((chan >= 0) && (chan < synth->midi_channels)) {
- <a name="l02484"></a>02484 <span class="keywordflow">return</span> fluid_channel_get_preset(synth->channel[chan]);
- <a name="l02485"></a>02485 }
- <a name="l02486"></a>02486
- <a name="l02487"></a>02487 <span class="keywordflow">return</span> NULL;
- <a name="l02488"></a>02488 }
- <a name="l02489"></a>02489
- <a name="l02490"></a>02490 <span class="comment">/*</span>
- <a name="l02491"></a>02491 <span class="comment"> * fluid_synth_get_voicelist</span>
- <a name="l02492"></a>02492 <span class="comment"> */</span>
- <a name="l02493"></a>02493 <span class="keywordtype">void</span>
- <a name="l02494"></a>02494 fluid_synth_get_voicelist(fluid_synth_t* synth, fluid_voice_t* buf[], <span class="keywordtype">int</span> bufsize, <span class="keywordtype">int</span> ID)
- <a name="l02495"></a>02495 {
- <a name="l02496"></a>02496 <span class="keywordtype">int</span> i;
- <a name="l02497"></a>02497 <span class="keywordtype">int</span> count = 0;
- <a name="l02498"></a>02498 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l02499"></a>02499 fluid_voice_t* voice = synth->voice[i];
- <a name="l02500"></a>02500 <span class="keywordflow">if</span> (count >= bufsize) {
- <a name="l02501"></a>02501 <span class="keywordflow">return</span>;
- <a name="l02502"></a>02502 }
- <a name="l02503"></a>02503
- <a name="l02504"></a>02504 <span class="keywordflow">if</span> (_PLAYING(voice) && ((<span class="keywordtype">int</span>)voice->id == ID || ID < 0)) {
- <a name="l02505"></a>02505 buf[count++] = voice;
- <a name="l02506"></a>02506 }
- <a name="l02507"></a>02507 }
- <a name="l02508"></a>02508 <span class="keywordflow">if</span> (count >= bufsize) {
- <a name="l02509"></a>02509 <span class="keywordflow">return</span>;
- <a name="l02510"></a>02510 }
- <a name="l02511"></a>02511 buf[count++] = NULL;
- <a name="l02512"></a>02512 }
- <a name="l02513"></a>02513
- <a name="l02514"></a>02514 <span class="comment">/* Purpose:</span>
- <a name="l02515"></a>02515 <span class="comment"> * Turns on / off the reverb unit in the synth */</span>
- <a name="l02516"></a>02516 <span class="keywordtype">void</span> fluid_synth_set_reverb_on(fluid_synth_t* synth, <span class="keywordtype">int</span> on)
- <a name="l02517"></a>02517 {
- <a name="l02518"></a>02518 synth->with_reverb = on;
- <a name="l02519"></a>02519 }
- <a name="l02520"></a>02520
- <a name="l02521"></a>02521 <span class="comment">/* Purpose:</span>
- <a name="l02522"></a>02522 <span class="comment"> * Turns on / off the chorus unit in the synth */</span>
- <a name="l02523"></a>02523 <span class="keywordtype">void</span> fluid_synth_set_chorus_on(fluid_synth_t* synth, <span class="keywordtype">int</span> on)
- <a name="l02524"></a>02524 {
- <a name="l02525"></a>02525 synth->with_chorus = on;
- <a name="l02526"></a>02526 }
- <a name="l02527"></a>02527
- <a name="l02528"></a>02528 <span class="comment">/* Purpose:</span>
- <a name="l02529"></a>02529 <span class="comment"> * Reports the current setting of the chorus unit. */</span>
- <a name="l02530"></a>02530 <span class="keywordtype">int</span> fluid_synth_get_chorus_nr(fluid_synth_t* synth)
- <a name="l02531"></a>02531 {
- <a name="l02532"></a>02532 <span class="keywordflow">return</span> fluid_chorus_get_nr(synth->chorus);
- <a name="l02533"></a>02533 }
- <a name="l02534"></a>02534
- <a name="l02535"></a>02535 <span class="keywordtype">double</span> fluid_synth_get_chorus_level(fluid_synth_t* synth)
- <a name="l02536"></a>02536 {
- <a name="l02537"></a>02537 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>)fluid_chorus_get_level(synth->chorus);
- <a name="l02538"></a>02538 }
- <a name="l02539"></a>02539
- <a name="l02540"></a>02540 <span class="keywordtype">double</span> fluid_synth_get_chorus_speed_Hz(fluid_synth_t* synth)
- <a name="l02541"></a>02541 {
- <a name="l02542"></a>02542 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>)fluid_chorus_get_speed_Hz(synth->chorus);
- <a name="l02543"></a>02543 }
- <a name="l02544"></a>02544
- <a name="l02545"></a>02545 <span class="keywordtype">double</span> fluid_synth_get_chorus_depth_ms(fluid_synth_t* synth)
- <a name="l02546"></a>02546 {
- <a name="l02547"></a>02547 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>)fluid_chorus_get_depth_ms(synth->chorus);
- <a name="l02548"></a>02548 }
- <a name="l02549"></a>02549
- <a name="l02550"></a>02550 <span class="keywordtype">int</span> fluid_synth_get_chorus_type(fluid_synth_t* synth)
- <a name="l02551"></a>02551 {
- <a name="l02552"></a>02552 <span class="keywordflow">return</span> fluid_chorus_get_type(synth->chorus);
- <a name="l02553"></a>02553 }
- <a name="l02554"></a>02554
- <a name="l02555"></a>02555 <span class="comment">/* Purpose:</span>
- <a name="l02556"></a>02556 <span class="comment"> * Returns the current settings_old of the reverb unit */</span>
- <a name="l02557"></a>02557 <span class="keywordtype">double</span> fluid_synth_get_reverb_roomsize(fluid_synth_t* synth)
- <a name="l02558"></a>02558 {
- <a name="l02559"></a>02559 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>)fluid_revmodel_getroomsize(synth->reverb);
- <a name="l02560"></a>02560 }
- <a name="l02561"></a>02561
- <a name="l02562"></a>02562 <span class="keywordtype">double</span> fluid_synth_get_reverb_damp(fluid_synth_t* synth)
- <a name="l02563"></a>02563 {
- <a name="l02564"></a>02564 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>) fluid_revmodel_getdamp(synth->reverb);
- <a name="l02565"></a>02565 }
- <a name="l02566"></a>02566
- <a name="l02567"></a>02567 <span class="keywordtype">double</span> fluid_synth_get_reverb_level(fluid_synth_t* synth)
- <a name="l02568"></a>02568 {
- <a name="l02569"></a>02569 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>) fluid_revmodel_getlevel(synth->reverb);
- <a name="l02570"></a>02570 }
- <a name="l02571"></a>02571
- <a name="l02572"></a>02572 <span class="keywordtype">double</span> fluid_synth_get_reverb_width(fluid_synth_t* synth)
- <a name="l02573"></a>02573 {
- <a name="l02574"></a>02574 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>) fluid_revmodel_getwidth(synth->reverb);
- <a name="l02575"></a>02575 }
- <a name="l02576"></a>02576
- <a name="l02577"></a>02577 <span class="comment">/* Purpose:</span>
- <a name="l02578"></a>02578 <span class="comment"> *</span>
- <a name="l02579"></a>02579 <span class="comment"> * If the same note is hit twice on the same channel, then the older</span>
- <a name="l02580"></a>02580 <span class="comment"> * voice process is advanced to the release stage. Using a mechanical</span>
- <a name="l02581"></a>02581 <span class="comment"> * MIDI controller, the only way this can happen is when the sustain</span>
- <a name="l02582"></a>02582 <span class="comment"> * pedal is held. In this case the behaviour implemented here is</span>
- <a name="l02583"></a>02583 <span class="comment"> * natural for many instruments. Note: One noteon event can trigger</span>
- <a name="l02584"></a>02584 <span class="comment"> * several voice processes, for example a stereo sample. Don't</span>
- <a name="l02585"></a>02585 <span class="comment"> * release those...</span>
- <a name="l02586"></a>02586 <span class="comment"> */</span>
- <a name="l02587"></a>02587 <span class="keywordtype">void</span> fluid_synth_release_voice_on_same_note(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> key){
- <a name="l02588"></a>02588 <span class="keywordtype">int</span> i;
- <a name="l02589"></a>02589 fluid_voice_t* voice;
- <a name="l02590"></a>02590
- <a name="l02591"></a>02591 <span class="comment">/* fluid_mutex_lock(synth->busy); /\* Don't interfere with the audio thread *\/ */</span>
- <a name="l02592"></a>02592 <span class="comment">/* fluid_mutex_unlock(synth->busy); */</span>
- <a name="l02593"></a>02593
- <a name="l02594"></a>02594 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l02595"></a>02595 voice = synth->voice[i];
- <a name="l02596"></a>02596 <span class="keywordflow">if</span> (_PLAYING(voice)
- <a name="l02597"></a>02597 && (voice->chan == chan)
- <a name="l02598"></a>02598 && (voice->key == key)
- <a name="l02599"></a>02599 && (fluid_voice_get_id(voice) != synth->noteid)) {
- <a name="l02600"></a>02600 fluid_voice_noteoff(voice);
- <a name="l02601"></a>02601 }
- <a name="l02602"></a>02602 }
- <a name="l02603"></a>02603 }
- <a name="l02604"></a>02604
- <a name="l02605"></a>02605 <span class="comment">/* Purpose:</span>
- <a name="l02606"></a>02606 <span class="comment"> * Sets the interpolation method to use on channel chan.</span>
- <a name="l02607"></a>02607 <span class="comment"> * If chan is < 0, then set the interpolation method on all channels.</span>
- <a name="l02608"></a>02608 <span class="comment"> */</span>
- <a name="l02609"></a>02609 <span class="keywordtype">int</span> fluid_synth_set_interp_method(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> interp_method){
- <a name="l02610"></a>02610 <span class="keywordtype">int</span> i;
- <a name="l02611"></a>02611 <span class="keywordflow">for</span> (i = 0; i < synth->midi_channels; i++) {
- <a name="l02612"></a>02612 <span class="keywordflow">if</span> (synth->channel[i] == NULL){
- <a name="l02613"></a>02613 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>, <span class="stringliteral">"Channels don't exist (yet)!"</span>);
- <a name="l02614"></a>02614 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02615"></a>02615 };
- <a name="l02616"></a>02616 <span class="keywordflow">if</span> (chan < 0 || fluid_channel_get_num(synth->channel[i]) == chan){
- <a name="l02617"></a>02617 fluid_channel_set_interp_method(synth->channel[i], interp_method);
- <a name="l02618"></a>02618 };
- <a name="l02619"></a>02619 };
- <a name="l02620"></a>02620 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l02621"></a>02621 };
- <a name="l02622"></a>02622
- <a name="l02623"></a>02623 <span class="comment">/* Purpose:</span>
- <a name="l02624"></a>02624 <span class="comment"> * Returns the number of allocated midi channels</span>
- <a name="l02625"></a>02625 <span class="comment"> */</span>
- <a name="l02626"></a>02626 <span class="keywordtype">int</span>
- <a name="l02627"></a>02627 fluid_synth_count_midi_channels(fluid_synth_t* synth)
- <a name="l02628"></a>02628 {
- <a name="l02629"></a>02629 <span class="keywordflow">return</span> synth->midi_channels;
- <a name="l02630"></a>02630 }
- <a name="l02631"></a>02631
- <a name="l02632"></a>02632 <span class="comment">/* Purpose:</span>
- <a name="l02633"></a>02633 <span class="comment"> * Returns the number of allocated audio channels</span>
- <a name="l02634"></a>02634 <span class="comment"> */</span>
- <a name="l02635"></a>02635 <span class="keywordtype">int</span>
- <a name="l02636"></a>02636 fluid_synth_count_audio_channels(fluid_synth_t* synth)
- <a name="l02637"></a>02637 {
- <a name="l02638"></a>02638 <span class="keywordflow">return</span> synth->audio_channels;
- <a name="l02639"></a>02639 }
- <a name="l02640"></a>02640
- <a name="l02641"></a>02641 <span class="comment">/* Purpose:</span>
- <a name="l02642"></a>02642 <span class="comment"> * Returns the number of allocated audio channels</span>
- <a name="l02643"></a>02643 <span class="comment"> */</span>
- <a name="l02644"></a>02644 <span class="keywordtype">int</span>
- <a name="l02645"></a>02645 fluid_synth_count_audio_groups(fluid_synth_t* synth)
- <a name="l02646"></a>02646 {
- <a name="l02647"></a>02647 <span class="keywordflow">return</span> synth->audio_groups;
- <a name="l02648"></a>02648 }
- <a name="l02649"></a>02649
- <a name="l02650"></a>02650 <span class="comment">/* Purpose:</span>
- <a name="l02651"></a>02651 <span class="comment"> * Returns the number of allocated effects channels</span>
- <a name="l02652"></a>02652 <span class="comment"> */</span>
- <a name="l02653"></a>02653 <span class="keywordtype">int</span>
- <a name="l02654"></a>02654 fluid_synth_count_effects_channels(fluid_synth_t* synth)
- <a name="l02655"></a>02655 {
- <a name="l02656"></a>02656 <span class="keywordflow">return</span> synth->effects_channels;
- <a name="l02657"></a>02657 }
- <a name="l02658"></a>02658
- <a name="l02659"></a>02659 <span class="keywordtype">double</span> fluid_synth_get_cpu_load(fluid_synth_t* synth)
- <a name="l02660"></a>02660 {
- <a name="l02661"></a>02661 <span class="keywordflow">return</span> synth->cpu_load;
- <a name="l02662"></a>02662 }
- <a name="l02663"></a>02663
- <a name="l02664"></a>02664 <span class="keyword">static</span> fluid_tuning_t*
- <a name="l02665"></a>02665 fluid_synth_get_tuning(fluid_synth_t* synth, <span class="keywordtype">int</span> bank, <span class="keywordtype">int</span> prog)
- <a name="l02666"></a>02666 {
- <a name="l02667"></a>02667 <span class="keywordflow">if</span> ((bank < 0) || (bank >= 128)) {
- <a name="l02668"></a>02668 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Bank number out of range"</span>);
- <a name="l02669"></a>02669 <span class="keywordflow">return</span> NULL;
- <a name="l02670"></a>02670 }
- <a name="l02671"></a>02671 <span class="keywordflow">if</span> ((prog < 0) || (prog >= 128)) {
- <a name="l02672"></a>02672 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Program number out of range"</span>);
- <a name="l02673"></a>02673 <span class="keywordflow">return</span> NULL;
- <a name="l02674"></a>02674 }
- <a name="l02675"></a>02675 <span class="keywordflow">if</span> ((synth->tuning == NULL) ||
- <a name="l02676"></a>02676 (synth->tuning[bank] == NULL) ||
- <a name="l02677"></a>02677 (synth->tuning[bank][prog] == NULL)) {
- <a name="l02678"></a>02678 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"No tuning at bank %d, prog %d"</span>, bank, prog);
- <a name="l02679"></a>02679 <span class="keywordflow">return</span> NULL;
- <a name="l02680"></a>02680 }
- <a name="l02681"></a>02681 <span class="keywordflow">return</span> synth->tuning[bank][prog];
- <a name="l02682"></a>02682 }
- <a name="l02683"></a>02683
- <a name="l02684"></a>02684 <span class="keyword">static</span> fluid_tuning_t*
- <a name="l02685"></a>02685 fluid_synth_create_tuning(fluid_synth_t* synth, <span class="keywordtype">int</span> bank, <span class="keywordtype">int</span> prog, <span class="keywordtype">char</span>* name)
- <a name="l02686"></a>02686 {
- <a name="l02687"></a>02687 <span class="keywordflow">if</span> ((bank < 0) || (bank >= 128)) {
- <a name="l02688"></a>02688 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Bank number out of range"</span>);
- <a name="l02689"></a>02689 <span class="keywordflow">return</span> NULL;
- <a name="l02690"></a>02690 }
- <a name="l02691"></a>02691 <span class="keywordflow">if</span> ((prog < 0) || (prog >= 128)) {
- <a name="l02692"></a>02692 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Program number out of range"</span>);
- <a name="l02693"></a>02693 <span class="keywordflow">return</span> NULL;
- <a name="l02694"></a>02694 }
- <a name="l02695"></a>02695 <span class="keywordflow">if</span> (synth->tuning == NULL) {
- <a name="l02696"></a>02696 synth->tuning = FLUID_ARRAY(fluid_tuning_t**, 128);
- <a name="l02697"></a>02697 <span class="keywordflow">if</span> (synth->tuning == NULL) {
- <a name="l02698"></a>02698 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e62d9ddd89d0a853606ce38d195daa99a" title="The synth can&#39;t function correctly any more.">FLUID_PANIC</a>, <span class="stringliteral">"Out of memory"</span>);
- <a name="l02699"></a>02699 <span class="keywordflow">return</span> NULL;
- <a name="l02700"></a>02700 }
- <a name="l02701"></a>02701 FLUID_MEMSET(synth->tuning, 0, 128 * <span class="keyword">sizeof</span>(fluid_tuning_t**));
- <a name="l02702"></a>02702 }
- <a name="l02703"></a>02703
- <a name="l02704"></a>02704 <span class="keywordflow">if</span> (synth->tuning[bank] == NULL) {
- <a name="l02705"></a>02705 synth->tuning[bank] = FLUID_ARRAY(fluid_tuning_t*, 128);
- <a name="l02706"></a>02706 <span class="keywordflow">if</span> (synth->tuning[bank] == NULL) {
- <a name="l02707"></a>02707 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e62d9ddd89d0a853606ce38d195daa99a" title="The synth can&#39;t function correctly any more.">FLUID_PANIC</a>, <span class="stringliteral">"Out of memory"</span>);
- <a name="l02708"></a>02708 <span class="keywordflow">return</span> NULL;
- <a name="l02709"></a>02709 }
- <a name="l02710"></a>02710 FLUID_MEMSET(synth->tuning[bank], 0, 128 * <span class="keyword">sizeof</span>(fluid_tuning_t*));
- <a name="l02711"></a>02711 }
- <a name="l02712"></a>02712
- <a name="l02713"></a>02713 <span class="keywordflow">if</span> (synth->tuning[bank][prog] == NULL) {
- <a name="l02714"></a>02714 synth->tuning[bank][prog] = new_fluid_tuning(name, bank, prog);
- <a name="l02715"></a>02715 <span class="keywordflow">if</span> (synth->tuning[bank][prog] == NULL) {
- <a name="l02716"></a>02716 <span class="keywordflow">return</span> NULL;
- <a name="l02717"></a>02717 }
- <a name="l02718"></a>02718 }
- <a name="l02719"></a>02719
- <a name="l02720"></a>02720 <span class="keywordflow">if</span> ((fluid_tuning_get_name(synth->tuning[bank][prog]) == NULL)
- <a name="l02721"></a>02721 || (FLUID_STRCMP(fluid_tuning_get_name(synth->tuning[bank][prog]), name) != 0)) {
- <a name="l02722"></a>02722 fluid_tuning_set_name(synth->tuning[bank][prog], name);
- <a name="l02723"></a>02723 }
- <a name="l02724"></a>02724
- <a name="l02725"></a>02725 <span class="keywordflow">return</span> synth->tuning[bank][prog];
- <a name="l02726"></a>02726 }
- <a name="l02727"></a>02727
- <a name="l02728"></a>02728 <span class="keywordtype">int</span> fluid_synth_create_key_tuning(fluid_synth_t* synth,
- <a name="l02729"></a>02729 <span class="keywordtype">int</span> bank, <span class="keywordtype">int</span> prog,
- <a name="l02730"></a>02730 <span class="keywordtype">char</span>* name, <span class="keywordtype">double</span>* pitch)
- <a name="l02731"></a>02731 {
- <a name="l02732"></a>02732 fluid_tuning_t* tuning = fluid_synth_create_tuning(synth, bank, prog, name);
- <a name="l02733"></a>02733 <span class="keywordflow">if</span> (tuning == NULL) {
- <a name="l02734"></a>02734 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02735"></a>02735 }
- <a name="l02736"></a>02736 <span class="keywordflow">if</span> (pitch) {
- <a name="l02737"></a>02737 fluid_tuning_set_all(tuning, pitch);
- <a name="l02738"></a>02738 }
- <a name="l02739"></a>02739 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l02740"></a>02740 }
- <a name="l02741"></a>02741
- <a name="l02742"></a>02742
- <a name="l02743"></a>02743 <span class="keywordtype">int</span> fluid_synth_create_octave_tuning(fluid_synth_t* synth,
- <a name="l02744"></a>02744 <span class="keywordtype">int</span> bank, <span class="keywordtype">int</span> prog,
- <a name="l02745"></a>02745 <span class="keywordtype">char</span>* name, <span class="keywordtype">double</span>* pitch)
- <a name="l02746"></a>02746 {
- <a name="l02747"></a>02747 fluid_tuning_t* tuning = fluid_synth_create_tuning(synth, bank, prog, name);
- <a name="l02748"></a>02748 <span class="keywordflow">if</span> (tuning == NULL) {
- <a name="l02749"></a>02749 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02750"></a>02750 }
- <a name="l02751"></a>02751 fluid_tuning_set_octave(tuning, pitch);
- <a name="l02752"></a>02752 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l02753"></a>02753 }
- <a name="l02754"></a>02754
- <a name="l02755"></a>02755 <span class="keywordtype">int</span> fluid_synth_tune_notes(fluid_synth_t* synth, <span class="keywordtype">int</span> bank, <span class="keywordtype">int</span> prog,
- <a name="l02756"></a>02756 <span class="keywordtype">int</span> len, <span class="keywordtype">int</span> *key, <span class="keywordtype">double</span>* pitch, <span class="keywordtype">int</span> apply)
- <a name="l02757"></a>02757 {
- <a name="l02758"></a>02758 fluid_tuning_t* tuning = fluid_synth_get_tuning(synth, bank, prog);
- <a name="l02759"></a>02759 <span class="keywordtype">int</span> i;
- <a name="l02760"></a>02760
- <a name="l02761"></a>02761 <span class="keywordflow">if</span> (tuning == NULL) {
- <a name="l02762"></a>02762 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02763"></a>02763 }
- <a name="l02764"></a>02764
- <a name="l02765"></a>02765 <span class="keywordflow">for</span> (i = 0; i < len; i++) {
- <a name="l02766"></a>02766 fluid_tuning_set_pitch(tuning, key[i], pitch[i]);
- <a name="l02767"></a>02767 }
- <a name="l02768"></a>02768
- <a name="l02769"></a>02769 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l02770"></a>02770 }
- <a name="l02771"></a>02771
- <a name="l02772"></a>02772 <span class="keywordtype">int</span> fluid_synth_select_tuning(fluid_synth_t* synth, <span class="keywordtype">int</span> chan,
- <a name="l02773"></a>02773 <span class="keywordtype">int</span> bank, <span class="keywordtype">int</span> prog)
- <a name="l02774"></a>02774 {
- <a name="l02775"></a>02775 fluid_tuning_t* tuning = fluid_synth_get_tuning(synth, bank, prog);
- <a name="l02776"></a>02776
- <a name="l02777"></a>02777 <span class="keywordflow">if</span> (tuning == NULL) {
- <a name="l02778"></a>02778 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02779"></a>02779 }
- <a name="l02780"></a>02780 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l02781"></a>02781 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l02782"></a>02782 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02783"></a>02783 }
- <a name="l02784"></a>02784
- <a name="l02785"></a>02785 fluid_channel_set_tuning(synth->channel[chan], synth->tuning[bank][prog]);
- <a name="l02786"></a>02786
- <a name="l02787"></a>02787 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l02788"></a>02788 }
- <a name="l02789"></a>02789
- <a name="l02790"></a>02790 <span class="keywordtype">int</span> fluid_synth_reset_tuning(fluid_synth_t* synth, <span class="keywordtype">int</span> chan)
- <a name="l02791"></a>02791 {
- <a name="l02792"></a>02792 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l02793"></a>02793 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l02794"></a>02794 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02795"></a>02795 }
- <a name="l02796"></a>02796
- <a name="l02797"></a>02797 fluid_channel_set_tuning(synth->channel[chan], NULL);
- <a name="l02798"></a>02798
- <a name="l02799"></a>02799 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l02800"></a>02800 }
- <a name="l02801"></a>02801
- <a name="l02802"></a>02802 <span class="keywordtype">void</span> fluid_synth_tuning_iteration_start(fluid_synth_t* synth)
- <a name="l02803"></a>02803 {
- <a name="l02804"></a>02804 synth->cur_tuning = NULL;
- <a name="l02805"></a>02805 }
- <a name="l02806"></a>02806
- <a name="l02807"></a>02807 <span class="keywordtype">int</span> fluid_synth_tuning_iteration_next(fluid_synth_t* synth, <span class="keywordtype">int</span>* bank, <span class="keywordtype">int</span>* prog)
- <a name="l02808"></a>02808 {
- <a name="l02809"></a>02809 <span class="keywordtype">int</span> b = 0, p = 0;
- <a name="l02810"></a>02810
- <a name="l02811"></a>02811 <span class="keywordflow">if</span> (synth->tuning == NULL) {
- <a name="l02812"></a>02812 <span class="keywordflow">return</span> 0;
- <a name="l02813"></a>02813 }
- <a name="l02814"></a>02814
- <a name="l02815"></a>02815 <span class="keywordflow">if</span> (synth->cur_tuning != NULL) {
- <a name="l02816"></a>02816 <span class="comment">/* get the next program number */</span>
- <a name="l02817"></a>02817 b = fluid_tuning_get_bank(synth->cur_tuning);
- <a name="l02818"></a>02818 p = 1 + fluid_tuning_get_prog(synth->cur_tuning);
- <a name="l02819"></a>02819 <span class="keywordflow">if</span> (p >= 128) {
- <a name="l02820"></a>02820 p = 0;
- <a name="l02821"></a>02821 b++;
- <a name="l02822"></a>02822 }
- <a name="l02823"></a>02823 }
- <a name="l02824"></a>02824
- <a name="l02825"></a>02825 <span class="keywordflow">while</span> (b < 128) {
- <a name="l02826"></a>02826 <span class="keywordflow">if</span> (synth->tuning[b] != NULL) {
- <a name="l02827"></a>02827 <span class="keywordflow">while</span> (p < 128) {
- <a name="l02828"></a>02828 <span class="keywordflow">if</span> (synth->tuning[b][p] != NULL) {
- <a name="l02829"></a>02829 synth->cur_tuning = synth->tuning[b][p];
- <a name="l02830"></a>02830 *bank = b;
- <a name="l02831"></a>02831 *prog = p;
- <a name="l02832"></a>02832 <span class="keywordflow">return</span> 1;
- <a name="l02833"></a>02833 }
- <a name="l02834"></a>02834 p++;
- <a name="l02835"></a>02835 }
- <a name="l02836"></a>02836 }
- <a name="l02837"></a>02837 p = 0;
- <a name="l02838"></a>02838 b++;
- <a name="l02839"></a>02839 }
- <a name="l02840"></a>02840
- <a name="l02841"></a>02841 <span class="keywordflow">return</span> 0;
- <a name="l02842"></a>02842 }
- <a name="l02843"></a>02843
- <a name="l02844"></a>02844 <span class="keywordtype">int</span> fluid_synth_tuning_dump(fluid_synth_t* synth, <span class="keywordtype">int</span> bank, <span class="keywordtype">int</span> prog,
- <a name="l02845"></a>02845 <span class="keywordtype">char</span>* name, <span class="keywordtype">int</span> len, <span class="keywordtype">double</span>* pitch)
- <a name="l02846"></a>02846 {
- <a name="l02847"></a>02847 fluid_tuning_t* tuning = fluid_synth_get_tuning(synth, bank, prog);
- <a name="l02848"></a>02848
- <a name="l02849"></a>02849 <span class="keywordflow">if</span> (tuning == NULL) {
- <a name="l02850"></a>02850 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02851"></a>02851 }
- <a name="l02852"></a>02852
- <a name="l02853"></a>02853 <span class="keywordflow">if</span> (name) {
- <a name="l02854"></a>02854 snprintf(name, len - 1, <span class="stringliteral">"%s"</span>, fluid_tuning_get_name(tuning));
- <a name="l02855"></a>02855 name[len - 1] = 0; <span class="comment">/* make sure the string is null terminated */</span>
- <a name="l02856"></a>02856 }
- <a name="l02857"></a>02857 <span class="keywordflow">if</span> (pitch) {
- <a name="l02858"></a>02858 FLUID_MEMCPY(pitch, fluid_tuning_get_all(tuning), 128 * <span class="keyword">sizeof</span>(<span class="keywordtype">double</span>));
- <a name="l02859"></a>02859 }
- <a name="l02860"></a>02860
- <a name="l02861"></a>02861 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l02862"></a>02862 }
- <a name="l02863"></a>02863
- <a name="l02864"></a>02864 fluid_settings_t* fluid_synth_get_settings(fluid_synth_t* synth)
- <a name="l02865"></a>02865 {
- <a name="l02866"></a>02866 <span class="keywordflow">return</span> synth->settings;
- <a name="l02867"></a>02867 }
- <a name="l02868"></a>02868
- <a name="l02869"></a>02869 <span class="keywordtype">int</span> fluid_synth_setstr(fluid_synth_t* synth, <span class="keywordtype">char</span>* name, <span class="keywordtype">char</span>* str)
- <a name="l02870"></a>02870 {
- <a name="l02871"></a>02871 <span class="keywordflow">return</span> fluid_settings_setstr(synth->settings, name, str);
- <a name="l02872"></a>02872 }
- <a name="l02873"></a>02873
- <a name="l02874"></a>02874 <span class="keywordtype">int</span> fluid_synth_getstr(fluid_synth_t* synth, <span class="keywordtype">char</span>* name, <span class="keywordtype">char</span>** str)
- <a name="l02875"></a>02875 {
- <a name="l02876"></a>02876 <span class="keywordflow">return</span> fluid_settings_getstr(synth->settings, name, str);
- <a name="l02877"></a>02877 }
- <a name="l02878"></a>02878
- <a name="l02879"></a>02879 <span class="keywordtype">int</span> fluid_synth_setnum(fluid_synth_t* synth, <span class="keywordtype">char</span>* name, <span class="keywordtype">double</span> val)
- <a name="l02880"></a>02880 {
- <a name="l02881"></a>02881 <span class="keywordflow">return</span> fluid_settings_setnum(synth->settings, name, val);
- <a name="l02882"></a>02882 }
- <a name="l02883"></a>02883
- <a name="l02884"></a>02884 <span class="keywordtype">int</span> fluid_synth_getnum(fluid_synth_t* synth, <span class="keywordtype">char</span>* name, <span class="keywordtype">double</span>* val)
- <a name="l02885"></a>02885 {
- <a name="l02886"></a>02886 <span class="keywordflow">return</span> fluid_settings_getnum(synth->settings, name, val);
- <a name="l02887"></a>02887 }
- <a name="l02888"></a>02888
- <a name="l02889"></a>02889 <span class="keywordtype">int</span> fluid_synth_setint(fluid_synth_t* synth, <span class="keywordtype">char</span>* name, <span class="keywordtype">int</span> val)
- <a name="l02890"></a>02890 {
- <a name="l02891"></a>02891 <span class="keywordflow">return</span> fluid_settings_setint(synth->settings, name, val);
- <a name="l02892"></a>02892 }
- <a name="l02893"></a>02893
- <a name="l02894"></a>02894 <span class="keywordtype">int</span> fluid_synth_getint(fluid_synth_t* synth, <span class="keywordtype">char</span>* name, <span class="keywordtype">int</span>* val)
- <a name="l02895"></a>02895 {
- <a name="l02896"></a>02896 <span class="keywordflow">return</span> fluid_settings_getint(synth->settings, name, val);
- <a name="l02897"></a>02897 }
- <a name="l02898"></a>02898
- <a name="l02899"></a>02899 <span class="keywordtype">int</span>
- <a name="l02900"></a>02900 fluid_synth_set_gen(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> param, <span class="keywordtype">float</span> value)
- <a name="l02901"></a>02901 {
- <a name="l02902"></a>02902 <span class="keywordtype">int</span> i;
- <a name="l02903"></a>02903 fluid_voice_t* voice;
- <a name="l02904"></a>02904
- <a name="l02905"></a>02905 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l02906"></a>02906 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l02907"></a>02907 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02908"></a>02908 }
- <a name="l02909"></a>02909
- <a name="l02910"></a>02910 <span class="keywordflow">if</span> ((param < 0) || (param >= <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b49c372c341b7b1a718f0016f40c615cf3" title="Value defines the count of generators (fluid_gen_type).">GEN_LAST</a>)) {
- <a name="l02911"></a>02911 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Parameter number out of range"</span>);
- <a name="l02912"></a>02912 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02913"></a>02913 }
- <a name="l02914"></a>02914
- <a name="l02915"></a>02915 fluid_channel_set_gen(synth->channel[chan], param, value, 0);
- <a name="l02916"></a>02916
- <a name="l02917"></a>02917 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l02918"></a>02918 voice = synth->voice[i];
- <a name="l02919"></a>02919 <span class="keywordflow">if</span> (voice->chan == chan) {
- <a name="l02920"></a>02920 fluid_voice_set_param(voice, param, value, 0);
- <a name="l02921"></a>02921 }
- <a name="l02922"></a>02922 }
- <a name="l02923"></a>02923
- <a name="l02924"></a>02924 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l02925"></a>02925 }
- <a name="l02926"></a>02926
- <a name="l02950"></a>02950 <span class="keywordtype">int</span>
- <a name="l02951"></a>02951 fluid_synth_set_gen2(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> param,
- <a name="l02952"></a>02952 <span class="keywordtype">float</span> value, <span class="keywordtype">int</span> absolute, <span class="keywordtype">int</span> normalized)
- <a name="l02953"></a>02953 {
- <a name="l02954"></a>02954 <span class="keywordtype">int</span> i;
- <a name="l02955"></a>02955 fluid_voice_t* voice;
- <a name="l02956"></a>02956 <span class="keywordtype">float</span> v;
- <a name="l02957"></a>02957
- <a name="l02958"></a>02958 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l02959"></a>02959 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l02960"></a>02960 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02961"></a>02961 }
- <a name="l02962"></a>02962
- <a name="l02963"></a>02963 <span class="keywordflow">if</span> ((param < 0) || (param >= <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b49c372c341b7b1a718f0016f40c615cf3" title="Value defines the count of generators (fluid_gen_type).">GEN_LAST</a>)) {
- <a name="l02964"></a>02964 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Parameter number out of range"</span>);
- <a name="l02965"></a>02965 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l02966"></a>02966 }
- <a name="l02967"></a>02967
- <a name="l02968"></a>02968 v = (normalized)? fluid_gen_scale(param, value) : value;
- <a name="l02969"></a>02969
- <a name="l02970"></a>02970 fluid_channel_set_gen(synth->channel[chan], param, v, absolute);
- <a name="l02971"></a>02971
- <a name="l02972"></a>02972 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l02973"></a>02973 voice = synth->voice[i];
- <a name="l02974"></a>02974 <span class="keywordflow">if</span> (voice->chan == chan) {
- <a name="l02975"></a>02975 fluid_voice_set_param(voice, param, v, absolute);
- <a name="l02976"></a>02976 }
- <a name="l02977"></a>02977 }
- <a name="l02978"></a>02978
- <a name="l02979"></a>02979 <span class="keywordflow">return</span> FLUID_OK;
- <a name="l02980"></a>02980 }
- <a name="l02981"></a>02981
- <a name="l02982"></a>02982 <span class="keywordtype">float</span> fluid_synth_get_gen(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> param)
- <a name="l02983"></a>02983 {
- <a name="l02984"></a>02984 <span class="keywordflow">if</span> ((chan < 0) || (chan >= synth->midi_channels)) {
- <a name="l02985"></a>02985 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l02986"></a>02986 <span class="keywordflow">return</span> 0.0;
- <a name="l02987"></a>02987 }
- <a name="l02988"></a>02988
- <a name="l02989"></a>02989 <span class="keywordflow">if</span> ((param < 0) || (param >= <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b49c372c341b7b1a718f0016f40c615cf3" title="Value defines the count of generators (fluid_gen_type).">GEN_LAST</a>)) {
- <a name="l02990"></a>02990 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Parameter number out of range"</span>);
- <a name="l02991"></a>02991 <span class="keywordflow">return</span> 0.0;
- <a name="l02992"></a>02992 }
- <a name="l02993"></a>02993
- <a name="l02994"></a>02994 <span class="keywordflow">return</span> fluid_channel_get_gen(synth->channel[chan], param);
- <a name="l02995"></a>02995 }
- <a name="l02996"></a>02996
- <a name="l02997"></a>02997 <span class="comment">/* The synth needs to know the router for the command line handlers (they only</span>
- <a name="l02998"></a>02998 <span class="comment"> * supply the synth as argument)</span>
- <a name="l02999"></a>02999 <span class="comment"> */</span>
- <a name="l03000"></a>03000 <span class="keywordtype">void</span> fluid_synth_set_midi_router(fluid_synth_t* synth, fluid_midi_router_t* router){
- <a name="l03001"></a>03001 synth->midi_router=router;
- <a name="l03002"></a>03002 };
- <a name="l03003"></a>03003
- <a name="l03004"></a>03004 <span class="comment">/* Purpose:</span>
- <a name="l03005"></a>03005 <span class="comment"> * Any MIDI event from the MIDI router arrives here and is handed</span>
- <a name="l03006"></a>03006 <span class="comment"> * to the appropriate function.</span>
- <a name="l03007"></a>03007 <span class="comment"> */</span>
- <a name="l03008"></a>03008 <span class="keywordtype">int</span> fluid_synth_handle_midi_event(<span class="keywordtype">void</span>* data, fluid_midi_event_t* event)
- <a name="l03009"></a>03009 {
- <a name="l03010"></a>03010 fluid_synth_t* synth = (fluid_synth_t*) data;
- <a name="l03011"></a>03011 <span class="keywordtype">int</span> type = <a class="code" href="midi_8h.html#63c2b0009873e8a1761f3a3365b12244" title="Get the event type field of a MIDI event structure.">fluid_midi_event_get_type</a>(event);
- <a name="l03012"></a>03012 <span class="keywordtype">int</span> chan = <a class="code" href="midi_8h.html#d6a5072d25f83834d41205d0c0806b9d" title="Get the channel field of a MIDI event structure.">fluid_midi_event_get_channel</a>(event);
- <a name="l03013"></a>03013
- <a name="l03014"></a>03014 <span class="keywordflow">switch</span>(type) {
- <a name="l03015"></a>03015 <span class="keywordflow">case</span> NOTE_ON:
- <a name="l03016"></a>03016 <span class="keywordflow">return</span> fluid_synth_noteon(synth, chan,
- <a name="l03017"></a>03017 <a class="code" href="midi_8h.html#2ed781f6bc77a94c80d5f33ba63f4b05" title="Get the key field of a MIDI event structure.">fluid_midi_event_get_key</a>(event),
- <a name="l03018"></a>03018 <a class="code" href="midi_8h.html#6462c5c51d6cfa9c328417d2f1f4b6d5" title="Get the velocity field of a MIDI event structure.">fluid_midi_event_get_velocity</a>(event));
- <a name="l03019"></a>03019
- <a name="l03020"></a>03020 <span class="keywordflow">case</span> NOTE_OFF:
- <a name="l03021"></a>03021 <span class="keywordflow">return</span> fluid_synth_noteoff(synth, chan, <a class="code" href="midi_8h.html#2ed781f6bc77a94c80d5f33ba63f4b05" title="Get the key field of a MIDI event structure.">fluid_midi_event_get_key</a>(event));
- <a name="l03022"></a>03022
- <a name="l03023"></a>03023 <span class="keywordflow">case</span> CONTROL_CHANGE:
- <a name="l03024"></a>03024 <span class="keywordflow">return</span> fluid_synth_cc(synth, chan,
- <a name="l03025"></a>03025 <a class="code" href="midi_8h.html#4f50a77de21c9bfa7207617ef3ff3440" title="Get the control number of a MIDI event structure.">fluid_midi_event_get_control</a>(event),
- <a name="l03026"></a>03026 <a class="code" href="midi_8h.html#c0dfb3cc8be8571ecf2d2dd05b92a9b2" title="Get the value field from a MIDI event structure.">fluid_midi_event_get_value</a>(event));
- <a name="l03027"></a>03027
- <a name="l03028"></a>03028 <span class="keywordflow">case</span> PROGRAM_CHANGE:
- <a name="l03029"></a>03029 <span class="keywordflow">return</span> fluid_synth_program_change(synth, chan, <a class="code" href="midi_8h.html#49901971bb418efc14b2de5954b4b200" title="Get the program field of a MIDI event structure.">fluid_midi_event_get_program</a>(event));
- <a name="l03030"></a>03030
- <a name="l03031"></a>03031 <span class="keywordflow">case</span> PITCH_BEND:
- <a name="l03032"></a>03032 <span class="keywordflow">return</span> fluid_synth_pitch_bend(synth, chan, <a class="code" href="midi_8h.html#d1f10dd6f386f2a189b7389fd1fac169" title="Get the pitch field of a MIDI event structure.">fluid_midi_event_get_pitch</a>(event));
- <a name="l03033"></a>03033
- <a name="l03034"></a>03034 <span class="keywordflow">case</span> MIDI_SYSTEM_RESET:
- <a name="l03035"></a>03035 <span class="keywordflow">return</span> fluid_synth_system_reset(synth);
- <a name="l03036"></a>03036 }
- <a name="l03037"></a>03037 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l03038"></a>03038 }
- <a name="l03039"></a>03039
- <a name="l03040"></a>03040
- <a name="l03041"></a>03041 <span class="keywordtype">int</span> fluid_synth_start(fluid_synth_t* synth, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <span class="keywordtype">id</span>, <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset,
- <a name="l03042"></a>03042 <span class="keywordtype">int</span> audio_chan, <span class="keywordtype">int</span> midi_chan, <span class="keywordtype">int</span> key, <span class="keywordtype">int</span> vel)
- <a name="l03043"></a>03043 {
- <a name="l03044"></a>03044 <span class="keywordtype">int</span> r;
- <a name="l03045"></a>03045
- <a name="l03046"></a>03046 <span class="comment">/* check the ranges of the arguments */</span>
- <a name="l03047"></a>03047 <span class="keywordflow">if</span> ((midi_chan < 0) || (midi_chan >= synth->midi_channels)) {
- <a name="l03048"></a>03048 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Channel out of range"</span>);
- <a name="l03049"></a>03049 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l03050"></a>03050 }
- <a name="l03051"></a>03051
- <a name="l03052"></a>03052 <span class="keywordflow">if</span> ((key < 0) || (key >= 128)) {
- <a name="l03053"></a>03053 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Key out of range"</span>);
- <a name="l03054"></a>03054 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l03055"></a>03055 }
- <a name="l03056"></a>03056
- <a name="l03057"></a>03057 <span class="keywordflow">if</span> ((vel <= 0) || (vel >= 128)) {
- <a name="l03058"></a>03058 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e394460be1ec74fce15e1ff683606df0f" title="Warning.">FLUID_WARN</a>, <span class="stringliteral">"Velocity out of range"</span>);
- <a name="l03059"></a>03059 <span class="keywordflow">return</span> FLUID_FAILED;
- <a name="l03060"></a>03060 }
- <a name="l03061"></a>03061
- <a name="l03062"></a>03062 fluid_mutex_lock(synth->busy); <span class="comment">/* One at a time, please */</span>
- <a name="l03063"></a>03063
- <a name="l03064"></a>03064 synth->storeid = id;
- <a name="l03065"></a>03065 r = fluid_preset_noteon(preset, synth, midi_chan, key, vel);
- <a name="l03066"></a>03066
- <a name="l03067"></a>03067 fluid_mutex_unlock(synth->busy);
- <a name="l03068"></a>03068
- <a name="l03069"></a>03069 <span class="keywordflow">return</span> r;
- <a name="l03070"></a>03070 }
- <a name="l03071"></a>03071
- <a name="l03072"></a>03072 <span class="keywordtype">int</span> fluid_synth_stop(fluid_synth_t* synth, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <span class="keywordtype">id</span>)
- <a name="l03073"></a>03073 {
- <a name="l03074"></a>03074 <span class="keywordtype">int</span> i;
- <a name="l03075"></a>03075 fluid_voice_t* voice;
- <a name="l03076"></a>03076 <span class="keywordtype">int</span> status = FLUID_FAILED;
- <a name="l03077"></a>03077 <span class="keywordtype">int</span> count = 0;
- <a name="l03078"></a>03078
- <a name="l03079"></a>03079 <span class="keywordflow">for</span> (i = 0; i < synth->polyphony; i++) {
- <a name="l03080"></a>03080
- <a name="l03081"></a>03081 voice = synth->voice[i];
- <a name="l03082"></a>03082
- <a name="l03083"></a>03083 <span class="keywordflow">if</span> (_ON(voice) && (fluid_voice_get_id(voice) == <span class="keywordtype">id</span>)) {
- <a name="l03084"></a>03084 count++;
- <a name="l03085"></a>03085 fluid_voice_noteoff(voice);
- <a name="l03086"></a>03086 status = FLUID_OK;
- <a name="l03087"></a>03087 }
- <a name="l03088"></a>03088 }
- <a name="l03089"></a>03089
- <a name="l03090"></a>03090 <span class="keywordflow">return</span> status;
- <a name="l03091"></a>03091 }
- <a name="l03092"></a>03092
- <a name="l03093"></a>03093 fluid_bank_offset_t*
- <a name="l03094"></a>03094 fluid_synth_get_bank_offset0(fluid_synth_t* synth, <span class="keywordtype">int</span> sfont_id)
- <a name="l03095"></a>03095 {
- <a name="l03096"></a>03096 fluid_list_t* list = synth->bank_offsets;
- <a name="l03097"></a>03097 fluid_bank_offset_t* offset;
- <a name="l03098"></a>03098
- <a name="l03099"></a>03099 <span class="keywordflow">while</span> (list) {
- <a name="l03100"></a>03100
- <a name="l03101"></a>03101 offset = (fluid_bank_offset_t*) fluid_list_get(list);
- <a name="l03102"></a>03102 <span class="keywordflow">if</span> (offset->sfont_id == sfont_id) {
- <a name="l03103"></a>03103 <span class="keywordflow">return</span> offset;
- <a name="l03104"></a>03104 }
- <a name="l03105"></a>03105
- <a name="l03106"></a>03106 list = fluid_list_next(list);
- <a name="l03107"></a>03107 }
- <a name="l03108"></a>03108
- <a name="l03109"></a>03109 <span class="keywordflow">return</span> NULL;
- <a name="l03110"></a>03110 }
- <a name="l03111"></a>03111
- <a name="l03112"></a>03112 <span class="keywordtype">int</span>
- <a name="l03113"></a>03113 fluid_synth_set_bank_offset(fluid_synth_t* synth, <span class="keywordtype">int</span> sfont_id, <span class="keywordtype">int</span> offset)
- <a name="l03114"></a>03114 {
- <a name="l03115"></a>03115 fluid_bank_offset_t* bank_offset;
- <a name="l03116"></a>03116
- <a name="l03117"></a>03117 bank_offset = fluid_synth_get_bank_offset0(synth, sfont_id);
- <a name="l03118"></a>03118
- <a name="l03119"></a>03119 <span class="keywordflow">if</span> (bank_offset == NULL) {
- <a name="l03120"></a>03120 bank_offset = FLUID_NEW(fluid_bank_offset_t);
- <a name="l03121"></a>03121 <span class="keywordflow">if</span> (bank_offset == NULL) {
- <a name="l03122"></a>03122 <span class="keywordflow">return</span> -1;
- <a name="l03123"></a>03123 }
- <a name="l03124"></a>03124 bank_offset->sfont_id = sfont_id;
- <a name="l03125"></a>03125 bank_offset->offset = offset;
- <a name="l03126"></a>03126 synth->bank_offsets = fluid_list_prepend(synth->bank_offsets, bank_offset);
- <a name="l03127"></a>03127 } <span class="keywordflow">else</span> {
- <a name="l03128"></a>03128 bank_offset->offset = offset;
- <a name="l03129"></a>03129 }
- <a name="l03130"></a>03130
- <a name="l03131"></a>03131 <span class="keywordflow">return</span> 0;
- <a name="l03132"></a>03132 }
- <a name="l03133"></a>03133
- <a name="l03134"></a>03134 <span class="keywordtype">int</span>
- <a name="l03135"></a>03135 fluid_synth_get_bank_offset(fluid_synth_t* synth, <span class="keywordtype">int</span> sfont_id)
- <a name="l03136"></a>03136 {
- <a name="l03137"></a>03137 fluid_bank_offset_t* bank_offset;
- <a name="l03138"></a>03138
- <a name="l03139"></a>03139 bank_offset = fluid_synth_get_bank_offset0(synth, sfont_id);
- <a name="l03140"></a>03140 <span class="keywordflow">return</span> (bank_offset == NULL)? 0 : bank_offset->offset;
- <a name="l03141"></a>03141 }
- <a name="l03142"></a>03142
- <a name="l03143"></a>03143 <span class="keywordtype">void</span>
- <a name="l03144"></a>03144 fluid_synth_remove_bank_offset(fluid_synth_t* synth, <span class="keywordtype">int</span> sfont_id)
- <a name="l03145"></a>03145 {
- <a name="l03146"></a>03146 fluid_bank_offset_t* bank_offset;
- <a name="l03147"></a>03147
- <a name="l03148"></a>03148 bank_offset = fluid_synth_get_bank_offset0(synth, sfont_id);
- <a name="l03149"></a>03149 <span class="keywordflow">if</span> (bank_offset != NULL) {
- <a name="l03150"></a>03150 synth->bank_offsets = fluid_list_remove(synth->bank_offsets, bank_offset);
- <a name="l03151"></a>03151 }
- <a name="l03152"></a>03152 }
- </pre></div><hr size="1"><address style="text-align: right;"><small>Generated on Sat Nov 17 13:40:23 2007 for libfluidsynth by
- <a href="http://www.doxygen.org/index.html">
- <img src="doxygen.png" alt="doxygen" align="middle" border="0"></a> 1.5.3 </small></address>
- </body>
- </html>