PageRenderTime 215ms CodeModel.GetById 21ms RepoModel.GetById 0ms app.codeStats 1ms

/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
  1. <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
  2. <html><head><meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
  3. <title>libfluidsynth: src/fluid_synth.c Source File</title>
  4. <link href="doxygen.css" rel="stylesheet" type="text/css">
  5. <link href="tabs.css" rel="stylesheet" type="text/css">
  6. </head><body>
  7. <!-- Generated by Doxygen 1.5.3 -->
  8. <div class="tabs">
  9. <ul>
  10. <li><a href="index.html"><span>Main&nbsp;Page</span></a></li>
  11. <li><a href="annotated.html"><span>Data&nbsp;Structures</span></a></li>
  12. <li class="current"><a href="files.html"><span>Files</span></a></li>
  13. </ul>
  14. </div>
  15. <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>
  16. <a name="l00002"></a>00002 <span class="comment"> *</span>
  17. <a name="l00003"></a>00003 <span class="comment"> * Copyright (C) 2003 Peter Hanappe and others.</span>
  18. <a name="l00004"></a>00004 <span class="comment"> *</span>
  19. <a name="l00005"></a>00005 <span class="comment"> * This library is free software; you can redistribute it and/or</span>
  20. <a name="l00006"></a>00006 <span class="comment"> * modify it under the terms of the GNU Library General Public License</span>
  21. <a name="l00007"></a>00007 <span class="comment"> * as published by the Free Software Foundation; either version 2 of</span>
  22. <a name="l00008"></a>00008 <span class="comment"> * the License, or (at your option) any later version.</span>
  23. <a name="l00009"></a>00009 <span class="comment"> *</span>
  24. <a name="l00010"></a>00010 <span class="comment"> * This library is distributed in the hope that it will be useful, but</span>
  25. <a name="l00011"></a>00011 <span class="comment"> * WITHOUT ANY WARRANTY; without even the implied warranty of</span>
  26. <a name="l00012"></a>00012 <span class="comment"> * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU</span>
  27. <a name="l00013"></a>00013 <span class="comment"> * Library General Public License for more details.</span>
  28. <a name="l00014"></a>00014 <span class="comment"> *</span>
  29. <a name="l00015"></a>00015 <span class="comment"> * You should have received a copy of the GNU Library General Public</span>
  30. <a name="l00016"></a>00016 <span class="comment"> * License along with this library; if not, write to the Free</span>
  31. <a name="l00017"></a>00017 <span class="comment"> * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA</span>
  32. <a name="l00018"></a>00018 <span class="comment"> * 02111-1307, USA</span>
  33. <a name="l00019"></a>00019 <span class="comment"> */</span>
  34. <a name="l00020"></a>00020
  35. <a name="l00021"></a>00021 <span class="preprocessor">#include &lt;math.h&gt;</span>
  36. <a name="l00022"></a>00022
  37. <a name="l00023"></a>00023 <span class="preprocessor">#include "fluid_synth.h"</span>
  38. <a name="l00024"></a>00024 <span class="preprocessor">#include "fluid_sys.h"</span>
  39. <a name="l00025"></a>00025 <span class="preprocessor">#include "fluid_chan.h"</span>
  40. <a name="l00026"></a>00026 <span class="preprocessor">#include "fluid_tuning.h"</span>
  41. <a name="l00027"></a>00027 <span class="preprocessor">#include "fluid_settings.h"</span>
  42. <a name="l00028"></a>00028 <span class="preprocessor">#include "fluid_sfont.h"</span>
  43. <a name="l00029"></a>00029
  44. <a name="l00030"></a>00030 <span class="preprocessor">#ifdef TRAP_ON_FPE</span>
  45. <a name="l00031"></a>00031 <span class="preprocessor"></span><span class="preprocessor">#define _GNU_SOURCE</span>
  46. <a name="l00032"></a>00032 <span class="preprocessor"></span><span class="preprocessor">#include &lt;fenv.h&gt;</span>
  47. <a name="l00033"></a>00033
  48. <a name="l00034"></a>00034 <span class="comment">/* seems to not be declared in fenv.h */</span>
  49. <a name="l00035"></a>00035 <span class="keyword">extern</span> <span class="keywordtype">int</span> feenableexcept (<span class="keywordtype">int</span> excepts);
  50. <a name="l00036"></a>00036 <span class="preprocessor">#endif</span>
  51. <a name="l00037"></a>00037 <span class="preprocessor"></span>
  52. <a name="l00038"></a>00038
  53. <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>);
  54. <a name="l00040"></a>00040
  55. <a name="l00041"></a>00041 <span class="comment">/************************************************************************</span>
  56. <a name="l00042"></a>00042 <span class="comment"> *</span>
  57. <a name="l00043"></a>00043 <span class="comment"> * These functions were added after the v1.0 API freeze. They are not</span>
  58. <a name="l00044"></a>00044 <span class="comment"> * in synth.h. They should be added as soon as a new development</span>
  59. <a name="l00045"></a>00045 <span class="comment"> * version is started.</span>
  60. <a name="l00046"></a>00046 <span class="comment"> *</span>
  61. <a name="l00047"></a>00047 <span class="comment"> ************************************************************************/</span>
  62. <a name="l00048"></a>00048
  63. <a name="l00049"></a>00049 <span class="keywordtype">int</span> fluid_synth_program_select2(fluid_synth_t* synth,
  64. <a name="l00050"></a>00050 <span class="keywordtype">int</span> chan,
  65. <a name="l00051"></a>00051 <span class="keywordtype">char</span>* sfont_name,
  66. <a name="l00052"></a>00052 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> bank_num,
  67. <a name="l00053"></a>00053 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> preset_num);
  68. <a name="l00054"></a>00054
  69. <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);
  70. <a name="l00056"></a>00056
  71. <a name="l00057"></a>00057 <span class="keywordtype">int</span> fluid_synth_set_gen2(fluid_synth_t* synth, <span class="keywordtype">int</span> chan,
  72. <a name="l00058"></a>00058 <span class="keywordtype">int</span> param, <span class="keywordtype">float</span> value,
  73. <a name="l00059"></a>00059 <span class="keywordtype">int</span> absolute, <span class="keywordtype">int</span> normalized);
  74. <a name="l00060"></a>00060
  75. <a name="l00061"></a>00061
  76. <a name="l00062"></a>00062 <span class="comment">/***************************************************************</span>
  77. <a name="l00063"></a>00063 <span class="comment"> *</span>
  78. <a name="l00064"></a>00064 <span class="comment"> * GLOBAL</span>
  79. <a name="l00065"></a>00065 <span class="comment"> */</span>
  80. <a name="l00066"></a>00066
  81. <a name="l00067"></a>00067 <span class="comment">/* has the synth module been initialized? */</span>
  82. <a name="l00068"></a>00068 <span class="keyword">static</span> <span class="keywordtype">int</span> fluid_synth_initialized = 0;
  83. <a name="l00069"></a>00069 <span class="keyword">static</span> <span class="keywordtype">void</span> fluid_synth_init(<span class="keywordtype">void</span>);
  84. <a name="l00070"></a>00070 <span class="keyword">static</span> <span class="keywordtype">void</span> init_dither(<span class="keywordtype">void</span>);
  85. <a name="l00071"></a>00071
  86. <a name="l00072"></a>00072 <span class="comment">/* default modulators</span>
  87. <a name="l00073"></a>00073 <span class="comment"> * SF2.01 page 52 ff:</span>
  88. <a name="l00074"></a>00074 <span class="comment"> *</span>
  89. <a name="l00075"></a>00075 <span class="comment"> * There is a set of predefined default modulators. They have to be</span>
  90. <a name="l00076"></a>00076 <span class="comment"> * explicitly overridden by the sound font in order to turn them off.</span>
  91. <a name="l00077"></a>00077 <span class="comment"> */</span>
  92. <a name="l00078"></a>00078
  93. <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>
  94. <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>
  95. <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>
  96. <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>
  97. <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>
  98. <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>
  99. <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>
  100. <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>
  101. <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>
  102. <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>
  103. <a name="l00089"></a>00089
  104. <a name="l00090"></a>00090 <span class="comment">/* reverb presets */</span>
  105. <a name="l00091"></a>00091 <span class="keyword">static</span> fluid_revmodel_presets_t revmodel_preset[] = {
  106. <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>
  107. <a name="l00093"></a>00093 { <span class="stringliteral">"Test 1"</span>, 0.2f, 0.0f, 0.5f, 0.9f },
  108. <a name="l00094"></a>00094 { <span class="stringliteral">"Test 2"</span>, 0.4f, 0.2f, 0.5f, 0.8f },
  109. <a name="l00095"></a>00095 { <span class="stringliteral">"Test 3"</span>, 0.6f, 0.4f, 0.5f, 0.7f },
  110. <a name="l00096"></a>00096 { <span class="stringliteral">"Test 4"</span>, 0.8f, 0.7f, 0.5f, 0.6f },
  111. <a name="l00097"></a>00097 { <span class="stringliteral">"Test 5"</span>, 0.8f, 1.0f, 0.5f, 0.5f },
  112. <a name="l00098"></a>00098 { NULL, 0.0f, 0.0f, 0.0f, 0.0f }
  113. <a name="l00099"></a>00099 };
  114. <a name="l00100"></a>00100
  115. <a name="l00101"></a>00101
  116. <a name="l00102"></a>00102 <span class="comment">/***************************************************************</span>
  117. <a name="l00103"></a>00103 <span class="comment"> *</span>
  118. <a name="l00104"></a>00104 <span class="comment"> * INITIALIZATION &amp; UTILITIES</span>
  119. <a name="l00105"></a>00105 <span class="comment"> */</span>
  120. <a name="l00106"></a>00106
  121. <a name="l00107"></a>00107
  122. <a name="l00108"></a>00108 <span class="keywordtype">void</span> fluid_synth_settings(fluid_settings_t* settings)
  123. <a name="l00109"></a>00109 {
  124. <a name="l00110"></a>00110 fluid_settings_register_str(settings, <span class="stringliteral">"synth.verbose"</span>, <span class="stringliteral">"no"</span>, 0, NULL, NULL);
  125. <a name="l00111"></a>00111 fluid_settings_register_str(settings, <span class="stringliteral">"synth.dump"</span>, <span class="stringliteral">"no"</span>, 0, NULL, NULL);
  126. <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);
  127. <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);
  128. <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);
  129. <a name="l00115"></a>00115
  130. <a name="l00116"></a>00116 fluid_settings_register_int(settings, <span class="stringliteral">"synth.polyphony"</span>,
  131. <a name="l00117"></a>00117 256, 16, 4096, 0, NULL, NULL);
  132. <a name="l00118"></a>00118 fluid_settings_register_int(settings, <span class="stringliteral">"synth.midi-channels"</span>,
  133. <a name="l00119"></a>00119 16, 16, 256, 0, NULL, NULL);
  134. <a name="l00120"></a>00120 fluid_settings_register_num(settings, <span class="stringliteral">"synth.gain"</span>,
  135. <a name="l00121"></a>00121 0.2f, 0.0f, 10.0f,
  136. <a name="l00122"></a>00122 0, NULL, NULL);
  137. <a name="l00123"></a>00123 fluid_settings_register_int(settings, <span class="stringliteral">"synth.audio-channels"</span>,
  138. <a name="l00124"></a>00124 1, 1, 256, 0, NULL, NULL);
  139. <a name="l00125"></a>00125 fluid_settings_register_int(settings, <span class="stringliteral">"synth.audio-groups"</span>,
  140. <a name="l00126"></a>00126 1, 1, 256, 0, NULL, NULL);
  141. <a name="l00127"></a>00127 fluid_settings_register_int(settings, <span class="stringliteral">"synth.effects-channels"</span>,
  142. <a name="l00128"></a>00128 2, 2, 2, 0, NULL, NULL);
  143. <a name="l00129"></a>00129 fluid_settings_register_num(settings, <span class="stringliteral">"synth.sample-rate"</span>,
  144. <a name="l00130"></a>00130 44100.0f, 22050.0f, 96000.0f,
  145. <a name="l00131"></a>00131 0, NULL, NULL);
  146. <a name="l00132"></a>00132 }
  147. <a name="l00133"></a>00133
  148. <a name="l00134"></a>00134 <span class="comment">/*</span>
  149. <a name="l00135"></a>00135 <span class="comment"> * fluid_version</span>
  150. <a name="l00136"></a>00136 <span class="comment"> */</span>
  151. <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)
  152. <a name="l00138"></a>00138 {
  153. <a name="l00139"></a>00139 *major = FLUIDSYNTH_VERSION_MAJOR;
  154. <a name="l00140"></a>00140 *minor = FLUIDSYNTH_VERSION_MINOR;
  155. <a name="l00141"></a>00141 *micro = FLUIDSYNTH_VERSION_MICRO;
  156. <a name="l00142"></a>00142 }
  157. <a name="l00143"></a>00143
  158. <a name="l00144"></a>00144 <span class="comment">/*</span>
  159. <a name="l00145"></a>00145 <span class="comment"> * fluid_version_str</span>
  160. <a name="l00146"></a>00146 <span class="comment"> */</span>
  161. <a name="l00147"></a>00147 <span class="keywordtype">char</span>* fluid_version_str(<span class="keywordtype">void</span>)
  162. <a name="l00148"></a>00148 {
  163. <a name="l00149"></a>00149 <span class="keywordflow">return</span> FLUIDSYNTH_VERSION;
  164. <a name="l00150"></a>00150 }
  165. <a name="l00151"></a>00151
  166. <a name="l00152"></a>00152
  167. <a name="l00153"></a>00153 <span class="comment">/*</span>
  168. <a name="l00154"></a>00154 <span class="comment"> * void fluid_synth_init</span>
  169. <a name="l00155"></a>00155 <span class="comment"> *</span>
  170. <a name="l00156"></a>00156 <span class="comment"> * Does all the initialization for this module.</span>
  171. <a name="l00157"></a>00157 <span class="comment"> */</span>
  172. <a name="l00158"></a>00158 <span class="keyword">static</span> <span class="keywordtype">void</span>
  173. <a name="l00159"></a>00159 fluid_synth_init()
  174. <a name="l00160"></a>00160 {
  175. <a name="l00161"></a>00161 fluid_synth_initialized++;
  176. <a name="l00162"></a>00162
  177. <a name="l00163"></a>00163 <span class="preprocessor">#ifdef TRAP_ON_FPE</span>
  178. <a name="l00164"></a>00164 <span class="preprocessor"></span> <span class="comment">/* Turn on floating point exception traps */</span>
  179. <a name="l00165"></a>00165 feenableexcept (FE_DIVBYZERO | FE_UNDERFLOW | FE_OVERFLOW | FE_INVALID);
  180. <a name="l00166"></a>00166 <span class="preprocessor">#endif</span>
  181. <a name="l00167"></a>00167 <span class="preprocessor"></span>
  182. <a name="l00168"></a>00168 fluid_conversion_config();
  183. <a name="l00169"></a>00169
  184. <a name="l00170"></a>00170 fluid_dsp_float_config();
  185. <a name="l00171"></a>00171
  186. <a name="l00172"></a>00172 fluid_sys_config();
  187. <a name="l00173"></a>00173
  188. <a name="l00174"></a>00174 init_dither();
  189. <a name="l00175"></a>00175
  190. <a name="l00176"></a>00176
  191. <a name="l00177"></a>00177 <span class="comment">/* SF2.01 page 53 section 8.4.1: MIDI Note-On Velocity to Initial Attenuation */</span>
  192. <a name="l00178"></a>00178 fluid_mod_set_source1(&amp;default_vel2att_mod, <span class="comment">/* The modulator we are programming here */</span>
  193. <a name="l00179"></a>00179 FLUID_MOD_VELOCITY, <span class="comment">/* Source. VELOCITY corresponds to 'index=2'. */</span>
  194. <a name="l00180"></a>00180 FLUID_MOD_GC <span class="comment">/* Not a MIDI continuous controller */</span>
  195. <a name="l00181"></a>00181 | FLUID_MOD_CONCAVE <span class="comment">/* Curve shape. Corresponds to 'type=1' */</span>
  196. <a name="l00182"></a>00182 | FLUID_MOD_UNIPOLAR <span class="comment">/* Polarity. Corresponds to 'P=0' */</span>
  197. <a name="l00183"></a>00183 | FLUID_MOD_NEGATIVE <span class="comment">/* Direction. Corresponds to 'D=1' */</span>
  198. <a name="l00184"></a>00184 );
  199. <a name="l00185"></a>00185 fluid_mod_set_source2(&amp;default_vel2att_mod, 0, 0); <span class="comment">/* No 2nd source */</span>
  200. <a name="l00186"></a>00186 fluid_mod_set_dest(&amp;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>
  201. <a name="l00187"></a>00187 fluid_mod_set_amount(&amp;default_vel2att_mod, 960.0); <span class="comment">/* Modulation amount: 960 */</span>
  202. <a name="l00188"></a>00188
  203. <a name="l00189"></a>00189
  204. <a name="l00190"></a>00190
  205. <a name="l00191"></a>00191 <span class="comment">/* SF2.01 page 53 section 8.4.2: MIDI Note-On Velocity to Filter Cutoff</span>
  206. <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>
  207. <a name="l00193"></a>00193 <span class="comment"> * One sound font, 'Kingston Piano', which has been praised for its quality, tries to</span>
  208. <a name="l00194"></a>00194 <span class="comment"> * override this modulator with an amount of 0 and positive polarity (instead of what</span>
  209. <a name="l00195"></a>00195 <span class="comment"> * the specs say, D=1) for the secondary source.</span>
  210. <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>
  211. <a name="l00197"></a>00197 <span class="comment"> */</span>
  212. <a name="l00198"></a>00198 fluid_mod_set_source1(&amp;default_vel2filter_mod, FLUID_MOD_VELOCITY, <span class="comment">/* Index=2 */</span>
  213. <a name="l00199"></a>00199 FLUID_MOD_GC <span class="comment">/* CC=0 */</span>
  214. <a name="l00200"></a>00200 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
  215. <a name="l00201"></a>00201 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
  216. <a name="l00202"></a>00202 | FLUID_MOD_NEGATIVE <span class="comment">/* D=1 */</span>
  217. <a name="l00203"></a>00203 );
  218. <a name="l00204"></a>00204 fluid_mod_set_source2(&amp;default_vel2filter_mod, FLUID_MOD_VELOCITY, <span class="comment">/* Index=2 */</span>
  219. <a name="l00205"></a>00205 FLUID_MOD_GC <span class="comment">/* CC=0 */</span>
  220. <a name="l00206"></a>00206 | FLUID_MOD_SWITCH <span class="comment">/* type=3 */</span>
  221. <a name="l00207"></a>00207 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
  222. <a name="l00208"></a>00208 <span class="comment">// do not remove | FLUID_MOD_NEGATIVE /* D=1 */</span>
  223. <a name="l00209"></a>00209 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
  224. <a name="l00210"></a>00210 );
  225. <a name="l00211"></a>00211 fluid_mod_set_dest(&amp;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>
  226. <a name="l00212"></a>00212 fluid_mod_set_amount(&amp;default_vel2filter_mod, -2400);
  227. <a name="l00213"></a>00213
  228. <a name="l00214"></a>00214
  229. <a name="l00215"></a>00215
  230. <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>
  231. <a name="l00217"></a>00217 fluid_mod_set_source1(&amp;default_at2viblfo_mod, FLUID_MOD_CHANNELPRESSURE, <span class="comment">/* Index=13 */</span>
  232. <a name="l00218"></a>00218 FLUID_MOD_GC <span class="comment">/* CC=0 */</span>
  233. <a name="l00219"></a>00219 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
  234. <a name="l00220"></a>00220 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
  235. <a name="l00221"></a>00221 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
  236. <a name="l00222"></a>00222 );
  237. <a name="l00223"></a>00223 fluid_mod_set_source2(&amp;default_at2viblfo_mod, 0,0); <span class="comment">/* no second source */</span>
  238. <a name="l00224"></a>00224 fluid_mod_set_dest(&amp;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 =&gt; pitch */</span>
  239. <a name="l00225"></a>00225 fluid_mod_set_amount(&amp;default_at2viblfo_mod, 50);
  240. <a name="l00226"></a>00226
  241. <a name="l00227"></a>00227
  242. <a name="l00228"></a>00228
  243. <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>
  244. <a name="l00230"></a>00230 fluid_mod_set_source1(&amp;default_mod2viblfo_mod, 1, <span class="comment">/* Index=1 */</span>
  245. <a name="l00231"></a>00231 FLUID_MOD_CC <span class="comment">/* CC=1 */</span>
  246. <a name="l00232"></a>00232 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
  247. <a name="l00233"></a>00233 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
  248. <a name="l00234"></a>00234 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
  249. <a name="l00235"></a>00235 );
  250. <a name="l00236"></a>00236 fluid_mod_set_source2(&amp;default_mod2viblfo_mod, 0,0); <span class="comment">/* no second source */</span>
  251. <a name="l00237"></a>00237 fluid_mod_set_dest(&amp;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 =&gt; pitch */</span>
  252. <a name="l00238"></a>00238 fluid_mod_set_amount(&amp;default_mod2viblfo_mod, 50);
  253. <a name="l00239"></a>00239
  254. <a name="l00240"></a>00240
  255. <a name="l00241"></a>00241
  256. <a name="l00242"></a>00242 <span class="comment">/* SF2.01 page 55 section 8.4.5: MIDI continuous controller 7 to initial attenuation*/</span>
  257. <a name="l00243"></a>00243 fluid_mod_set_source1(&amp;default_att_mod, 7, <span class="comment">/* index=7 */</span>
  258. <a name="l00244"></a>00244 FLUID_MOD_CC <span class="comment">/* CC=1 */</span>
  259. <a name="l00245"></a>00245 | FLUID_MOD_CONCAVE <span class="comment">/* type=1 */</span>
  260. <a name="l00246"></a>00246 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
  261. <a name="l00247"></a>00247 | FLUID_MOD_NEGATIVE <span class="comment">/* D=1 */</span>
  262. <a name="l00248"></a>00248 );
  263. <a name="l00249"></a>00249 fluid_mod_set_source2(&amp;default_att_mod, 0, 0); <span class="comment">/* No second source */</span>
  264. <a name="l00250"></a>00250 fluid_mod_set_dest(&amp;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>
  265. <a name="l00251"></a>00251 fluid_mod_set_amount(&amp;default_att_mod, 960.0); <span class="comment">/* Amount: 960 */</span>
  266. <a name="l00252"></a>00252
  267. <a name="l00253"></a>00253
  268. <a name="l00254"></a>00254
  269. <a name="l00255"></a>00255 <span class="comment">/* SF2.01 page 55 section 8.4.6 MIDI continuous controller 10 to Pan Position */</span>
  270. <a name="l00256"></a>00256 fluid_mod_set_source1(&amp;default_pan_mod, 10, <span class="comment">/* index=10 */</span>
  271. <a name="l00257"></a>00257 FLUID_MOD_CC <span class="comment">/* CC=1 */</span>
  272. <a name="l00258"></a>00258 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
  273. <a name="l00259"></a>00259 | FLUID_MOD_BIPOLAR <span class="comment">/* P=1 */</span>
  274. <a name="l00260"></a>00260 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
  275. <a name="l00261"></a>00261 );
  276. <a name="l00262"></a>00262 fluid_mod_set_source2(&amp;default_pan_mod, 0, 0); <span class="comment">/* No second source */</span>
  277. <a name="l00263"></a>00263 fluid_mod_set_dest(&amp;default_pan_mod, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b45b713ab8c931017d98f11b5ed5a81fb1" title="Stereo panning.">GEN_PAN</a>); <span class="comment">/* Target: pan */</span>
  278. <a name="l00264"></a>00264 <span class="comment">/* Amount: 500. The SF specs $8.4.6, p. 55 syas: "Amount = 1000</span>
  279. <a name="l00265"></a>00265 <span class="comment"> tenths of a percent". The center value (64) corresponds to 50%,</span>
  280. <a name="l00266"></a>00266 <span class="comment"> so it follows that amount = 50% x 1000/% = 500. */</span>
  281. <a name="l00267"></a>00267 fluid_mod_set_amount(&amp;default_pan_mod, 500.0);
  282. <a name="l00268"></a>00268
  283. <a name="l00269"></a>00269
  284. <a name="l00270"></a>00270 <span class="comment">/* SF2.01 page 55 section 8.4.7: MIDI continuous controller 11 to initial attenuation*/</span>
  285. <a name="l00271"></a>00271 fluid_mod_set_source1(&amp;default_expr_mod, 11, <span class="comment">/* index=11 */</span>
  286. <a name="l00272"></a>00272 FLUID_MOD_CC <span class="comment">/* CC=1 */</span>
  287. <a name="l00273"></a>00273 | FLUID_MOD_CONCAVE <span class="comment">/* type=1 */</span>
  288. <a name="l00274"></a>00274 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
  289. <a name="l00275"></a>00275 | FLUID_MOD_NEGATIVE <span class="comment">/* D=1 */</span>
  290. <a name="l00276"></a>00276 );
  291. <a name="l00277"></a>00277 fluid_mod_set_source2(&amp;default_expr_mod, 0, 0); <span class="comment">/* No second source */</span>
  292. <a name="l00278"></a>00278 fluid_mod_set_dest(&amp;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>
  293. <a name="l00279"></a>00279 fluid_mod_set_amount(&amp;default_expr_mod, 960.0); <span class="comment">/* Amount: 960 */</span>
  294. <a name="l00280"></a>00280
  295. <a name="l00281"></a>00281
  296. <a name="l00282"></a>00282
  297. <a name="l00283"></a>00283 <span class="comment">/* SF2.01 page 55 section 8.4.8: MIDI continuous controller 91 to Reverb send */</span>
  298. <a name="l00284"></a>00284 fluid_mod_set_source1(&amp;default_reverb_mod, 91, <span class="comment">/* index=91 */</span>
  299. <a name="l00285"></a>00285 FLUID_MOD_CC <span class="comment">/* CC=1 */</span>
  300. <a name="l00286"></a>00286 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
  301. <a name="l00287"></a>00287 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
  302. <a name="l00288"></a>00288 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
  303. <a name="l00289"></a>00289 );
  304. <a name="l00290"></a>00290 fluid_mod_set_source2(&amp;default_reverb_mod, 0, 0); <span class="comment">/* No second source */</span>
  305. <a name="l00291"></a>00291 fluid_mod_set_dest(&amp;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>
  306. <a name="l00292"></a>00292 fluid_mod_set_amount(&amp;default_reverb_mod, 200); <span class="comment">/* Amount: 200 ('tenths of a percent') */</span>
  307. <a name="l00293"></a>00293
  308. <a name="l00294"></a>00294
  309. <a name="l00295"></a>00295
  310. <a name="l00296"></a>00296 <span class="comment">/* SF2.01 page 55 section 8.4.9: MIDI continuous controller 93 to Reverb send */</span>
  311. <a name="l00297"></a>00297 fluid_mod_set_source1(&amp;default_chorus_mod, 93, <span class="comment">/* index=93 */</span>
  312. <a name="l00298"></a>00298 FLUID_MOD_CC <span class="comment">/* CC=1 */</span>
  313. <a name="l00299"></a>00299 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
  314. <a name="l00300"></a>00300 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
  315. <a name="l00301"></a>00301 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
  316. <a name="l00302"></a>00302 );
  317. <a name="l00303"></a>00303 fluid_mod_set_source2(&amp;default_chorus_mod, 0, 0); <span class="comment">/* No second source */</span>
  318. <a name="l00304"></a>00304 fluid_mod_set_dest(&amp;default_chorus_mod, <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b420dc580d6c53d30eb97efe3e910793b6" title="Chorus send amount.">GEN_CHORUSSEND</a>); <span class="comment">/* Target: Chorus */</span>
  319. <a name="l00305"></a>00305 fluid_mod_set_amount(&amp;default_chorus_mod, 200); <span class="comment">/* Amount: 200 ('tenths of a percent') */</span>
  320. <a name="l00306"></a>00306
  321. <a name="l00307"></a>00307
  322. <a name="l00308"></a>00308
  323. <a name="l00309"></a>00309 <span class="comment">/* SF2.01 page 57 section 8.4.10 MIDI Pitch Wheel to Initial Pitch ... */</span>
  324. <a name="l00310"></a>00310 fluid_mod_set_source1(&amp;default_pitch_bend_mod, FLUID_MOD_PITCHWHEEL, <span class="comment">/* Index=14 */</span>
  325. <a name="l00311"></a>00311 FLUID_MOD_GC <span class="comment">/* CC =0 */</span>
  326. <a name="l00312"></a>00312 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
  327. <a name="l00313"></a>00313 | FLUID_MOD_BIPOLAR <span class="comment">/* P=1 */</span>
  328. <a name="l00314"></a>00314 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
  329. <a name="l00315"></a>00315 );
  330. <a name="l00316"></a>00316 fluid_mod_set_source2(&amp;default_pitch_bend_mod, FLUID_MOD_PITCHWHEELSENS, <span class="comment">/* Index = 16 */</span>
  331. <a name="l00317"></a>00317 FLUID_MOD_GC <span class="comment">/* CC=0 */</span>
  332. <a name="l00318"></a>00318 | FLUID_MOD_LINEAR <span class="comment">/* type=0 */</span>
  333. <a name="l00319"></a>00319 | FLUID_MOD_UNIPOLAR <span class="comment">/* P=0 */</span>
  334. <a name="l00320"></a>00320 | FLUID_MOD_POSITIVE <span class="comment">/* D=0 */</span>
  335. <a name="l00321"></a>00321 );
  336. <a name="l00322"></a>00322 fluid_mod_set_dest(&amp;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>
  337. <a name="l00323"></a>00323 fluid_mod_set_amount(&amp;default_pitch_bend_mod, 12700.0); <span class="comment">/* Amount: 12700 cents */</span>
  338. <a name="l00324"></a>00324 }
  339. <a name="l00325"></a>00325
  340. <a name="l00326"></a>00326
  341. <a name="l00327"></a>00327 <span class="keywordtype">int</span> fluid_synth_verify_settings(fluid_settings_t *settings)
  342. <a name="l00328"></a>00328 {
  343. <a name="l00329"></a>00329 <span class="keywordflow">return</span> 0;
  344. <a name="l00330"></a>00330 }
  345. <a name="l00331"></a>00331
  346. <a name="l00332"></a>00332 <span class="comment">/***************************************************************</span>
  347. <a name="l00333"></a>00333 <span class="comment"> *</span>
  348. <a name="l00334"></a>00334 <span class="comment"> * FLUID SYNTH</span>
  349. <a name="l00335"></a>00335 <span class="comment"> */</span>
  350. <a name="l00336"></a>00336
  351. <a name="l00337"></a>00337 <span class="comment">/*</span>
  352. <a name="l00338"></a>00338 <span class="comment"> * new_fluid_synth</span>
  353. <a name="l00339"></a>00339 <span class="comment"> */</span>
  354. <a name="l00340"></a>00340 fluid_synth_t*
  355. <a name="l00341"></a>00341 new_fluid_synth(fluid_settings_t *settings)
  356. <a name="l00342"></a>00342 {
  357. <a name="l00343"></a>00343 <span class="keywordtype">int</span> i;
  358. <a name="l00344"></a>00344 fluid_synth_t* synth;
  359. <a name="l00345"></a>00345 <a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>* loader;
  360. <a name="l00346"></a>00346
  361. <a name="l00347"></a>00347 <span class="comment">/* initialize all the conversion tables and other stuff */</span>
  362. <a name="l00348"></a>00348 <span class="keywordflow">if</span> (fluid_synth_initialized == 0) {
  363. <a name="l00349"></a>00349 fluid_synth_init();
  364. <a name="l00350"></a>00350 }
  365. <a name="l00351"></a>00351
  366. <a name="l00352"></a>00352 fluid_synth_verify_settings(settings);
  367. <a name="l00353"></a>00353
  368. <a name="l00354"></a>00354 <span class="comment">/* allocate a new synthesizer object */</span>
  369. <a name="l00355"></a>00355 synth = FLUID_NEW(fluid_synth_t);
  370. <a name="l00356"></a>00356 <span class="keywordflow">if</span> (synth == NULL) {
  371. <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>);
  372. <a name="l00358"></a>00358 <span class="keywordflow">return</span> NULL;
  373. <a name="l00359"></a>00359 }
  374. <a name="l00360"></a>00360 FLUID_MEMSET(synth, 0, <span class="keyword">sizeof</span>(fluid_synth_t));
  375. <a name="l00361"></a>00361
  376. <a name="l00362"></a>00362 fluid_mutex_init(synth-&gt;busy);
  377. <a name="l00363"></a>00363
  378. <a name="l00364"></a>00364 synth-&gt;settings = settings;
  379. <a name="l00365"></a>00365
  380. <a name="l00366"></a>00366 synth-&gt;with_reverb = fluid_settings_str_equal(settings, <span class="stringliteral">"synth.reverb.active"</span>, <span class="stringliteral">"yes"</span>);
  381. <a name="l00367"></a>00367 synth-&gt;with_chorus = fluid_settings_str_equal(settings, <span class="stringliteral">"synth.chorus.active"</span>, <span class="stringliteral">"yes"</span>);
  382. <a name="l00368"></a>00368 synth-&gt;verbose = fluid_settings_str_equal(settings, <span class="stringliteral">"synth.verbose"</span>, <span class="stringliteral">"yes"</span>);
  383. <a name="l00369"></a>00369 synth-&gt;dump = fluid_settings_str_equal(settings, <span class="stringliteral">"synth.dump"</span>, <span class="stringliteral">"yes"</span>);
  384. <a name="l00370"></a>00370
  385. <a name="l00371"></a>00371 fluid_settings_getint(settings, <span class="stringliteral">"synth.polyphony"</span>, &amp;synth-&gt;polyphony);
  386. <a name="l00372"></a>00372 fluid_settings_getnum(settings, <span class="stringliteral">"synth.sample-rate"</span>, &amp;synth-&gt;sample_rate);
  387. <a name="l00373"></a>00373 fluid_settings_getint(settings, <span class="stringliteral">"synth.midi-channels"</span>, &amp;synth-&gt;midi_channels);
  388. <a name="l00374"></a>00374 fluid_settings_getint(settings, <span class="stringliteral">"synth.audio-channels"</span>, &amp;synth-&gt;audio_channels);
  389. <a name="l00375"></a>00375 fluid_settings_getint(settings, <span class="stringliteral">"synth.audio-groups"</span>, &amp;synth-&gt;audio_groups);
  390. <a name="l00376"></a>00376 fluid_settings_getint(settings, <span class="stringliteral">"synth.effects-channels"</span>, &amp;synth-&gt;effects_channels);
  391. <a name="l00377"></a>00377 fluid_settings_getnum(settings, <span class="stringliteral">"synth.gain"</span>, &amp;synth-&gt;gain);
  392. <a name="l00378"></a>00378
  393. <a name="l00379"></a>00379 <span class="comment">/* register the callbacks */</span>
  394. <a name="l00380"></a>00380 fluid_settings_register_num(settings, <span class="stringliteral">"synth.gain"</span>,
  395. <a name="l00381"></a>00381 0.2f, 0.0f, 10.0f, 0,
  396. <a name="l00382"></a>00382 (fluid_num_update_t) fluid_synth_update_gain, synth);
  397. <a name="l00383"></a>00383 fluid_settings_register_int(settings, <span class="stringliteral">"synth.polyphony"</span>,
  398. <a name="l00384"></a>00384 synth-&gt;polyphony, 16, 4096, 0,
  399. <a name="l00385"></a>00385 (fluid_int_update_t) fluid_synth_update_polyphony,
  400. <a name="l00386"></a>00386 synth);
  401. <a name="l00387"></a>00387
  402. <a name="l00388"></a>00388 <span class="comment">/* do some basic sanity checking on the settings */</span>
  403. <a name="l00389"></a>00389
  404. <a name="l00390"></a>00390 <span class="keywordflow">if</span> (synth-&gt;midi_channels % 16 != 0) {
  405. <a name="l00391"></a>00391 <span class="keywordtype">int</span> n = synth-&gt;midi_channels / 16;
  406. <a name="l00392"></a>00392 synth-&gt;midi_channels = (n + 1) * 16;
  407. <a name="l00393"></a>00393 fluid_settings_setint(settings, <span class="stringliteral">"synth.midi-channels"</span>, synth-&gt;midi_channels);
  408. <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>
  409. <a name="l00395"></a>00395 <span class="stringliteral">"I'll increase the number of channels to the next multiple."</span>);
  410. <a name="l00396"></a>00396 }
  411. <a name="l00397"></a>00397
  412. <a name="l00398"></a>00398 <span class="keywordflow">if</span> (synth-&gt;audio_channels &lt; 1) {
  413. <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>
  414. <a name="l00400"></a>00400 <span class="stringliteral">"Changing this setting to 1."</span>);
  415. <a name="l00401"></a>00401 synth-&gt;audio_channels = 1;
  416. <a name="l00402"></a>00402 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (synth-&gt;audio_channels &gt; 128) {
  417. <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>
  418. <a name="l00404"></a>00404 <span class="stringliteral">"Limiting this setting to 128."</span>, synth-&gt;audio_channels);
  419. <a name="l00405"></a>00405 synth-&gt;audio_channels = 128;
  420. <a name="l00406"></a>00406 }
  421. <a name="l00407"></a>00407
  422. <a name="l00408"></a>00408 <span class="keywordflow">if</span> (synth-&gt;audio_groups &lt; 1) {
  423. <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>
  424. <a name="l00410"></a>00410 <span class="stringliteral">"Changing this setting to 1."</span>);
  425. <a name="l00411"></a>00411 synth-&gt;audio_groups = 1;
  426. <a name="l00412"></a>00412 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (synth-&gt;audio_groups &gt; 128) {
  427. <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>
  428. <a name="l00414"></a>00414 <span class="stringliteral">"Limiting this setting to 128."</span>, synth-&gt;audio_groups);
  429. <a name="l00415"></a>00415 synth-&gt;audio_groups = 128;
  430. <a name="l00416"></a>00416 }
  431. <a name="l00417"></a>00417
  432. <a name="l00418"></a>00418 <span class="keywordflow">if</span> (synth-&gt;effects_channels != 2) {
  433. <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>
  434. <a name="l00420"></a>00420 <span class="stringliteral">"Setting effects channels to 2."</span>, synth-&gt;effects_channels);
  435. <a name="l00421"></a>00421 synth-&gt;effects_channels = 2;
  436. <a name="l00422"></a>00422 }
  437. <a name="l00423"></a>00423
  438. <a name="l00424"></a>00424
  439. <a name="l00425"></a>00425 <span class="comment">/* The number of buffers is determined by the higher number of nr</span>
  440. <a name="l00426"></a>00426 <span class="comment"> * groups / nr audio channels. If LADSPA is unused, they should be</span>
  441. <a name="l00427"></a>00427 <span class="comment"> * the same. */</span>
  442. <a name="l00428"></a>00428 synth-&gt;nbuf = synth-&gt;audio_channels;
  443. <a name="l00429"></a>00429 <span class="keywordflow">if</span> (synth-&gt;audio_groups &gt; synth-&gt;nbuf) {
  444. <a name="l00430"></a>00430 synth-&gt;nbuf = synth-&gt;audio_groups;
  445. <a name="l00431"></a>00431 }
  446. <a name="l00432"></a>00432
  447. <a name="l00433"></a>00433 <span class="preprocessor">#ifdef LADSPA</span>
  448. <a name="l00434"></a>00434 <span class="preprocessor"></span> <span class="comment">/* Create and initialize the Fx unit.*/</span>
  449. <a name="l00435"></a>00435 synth-&gt;LADSPA_FxUnit = new_fluid_LADSPA_FxUnit(synth);
  450. <a name="l00436"></a>00436 <span class="preprocessor">#endif</span>
  451. <a name="l00437"></a>00437 <span class="preprocessor"></span>
  452. <a name="l00438"></a>00438 <span class="comment">/* as soon as the synth is created it starts playing. */</span>
  453. <a name="l00439"></a>00439 synth-&gt;state = FLUID_SYNTH_PLAYING;
  454. <a name="l00440"></a>00440 synth-&gt;sfont = NULL;
  455. <a name="l00441"></a>00441 synth-&gt;noteid = 0;
  456. <a name="l00442"></a>00442 synth-&gt;ticks = 0;
  457. <a name="l00443"></a>00443 synth-&gt;tuning = NULL;
  458. <a name="l00444"></a>00444
  459. <a name="l00445"></a>00445 <span class="comment">/* allocate and add the default sfont loader */</span>
  460. <a name="l00446"></a>00446 loader = new_fluid_defsfloader();
  461. <a name="l00447"></a>00447
  462. <a name="l00448"></a>00448 <span class="keywordflow">if</span> (loader == NULL) {
  463. <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>);
  464. <a name="l00450"></a>00450 } <span class="keywordflow">else</span> {
  465. <a name="l00451"></a>00451 fluid_synth_add_sfloader(synth, loader);
  466. <a name="l00452"></a>00452 }
  467. <a name="l00453"></a>00453
  468. <a name="l00454"></a>00454 <span class="comment">/* allocate all channel objects */</span>
  469. <a name="l00455"></a>00455 synth-&gt;channel = FLUID_ARRAY(fluid_channel_t*, synth-&gt;midi_channels);
  470. <a name="l00456"></a>00456 <span class="keywordflow">if</span> (synth-&gt;channel == NULL) {
  471. <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>);
  472. <a name="l00458"></a>00458 <span class="keywordflow">goto</span> error_recovery;
  473. <a name="l00459"></a>00459 }
  474. <a name="l00460"></a>00460 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;midi_channels; i++) {
  475. <a name="l00461"></a>00461 synth-&gt;channel[i] = new_fluid_channel(synth, i);
  476. <a name="l00462"></a>00462 <span class="keywordflow">if</span> (synth-&gt;channel[i] == NULL) {
  477. <a name="l00463"></a>00463 <span class="keywordflow">goto</span> error_recovery;
  478. <a name="l00464"></a>00464 }
  479. <a name="l00465"></a>00465 }
  480. <a name="l00466"></a>00466
  481. <a name="l00467"></a>00467 <span class="comment">/* allocate all synthesis processes */</span>
  482. <a name="l00468"></a>00468 synth-&gt;nvoice = synth-&gt;polyphony;
  483. <a name="l00469"></a>00469 synth-&gt;voice = FLUID_ARRAY(fluid_voice_t*, synth-&gt;nvoice);
  484. <a name="l00470"></a>00470 <span class="keywordflow">if</span> (synth-&gt;voice == NULL) {
  485. <a name="l00471"></a>00471 <span class="keywordflow">goto</span> error_recovery;
  486. <a name="l00472"></a>00472 }
  487. <a name="l00473"></a>00473 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;nvoice; i++) {
  488. <a name="l00474"></a>00474 synth-&gt;voice[i] = new_fluid_voice(synth-&gt;sample_rate);
  489. <a name="l00475"></a>00475 <span class="keywordflow">if</span> (synth-&gt;voice[i] == NULL) {
  490. <a name="l00476"></a>00476 <span class="keywordflow">goto</span> error_recovery;
  491. <a name="l00477"></a>00477 }
  492. <a name="l00478"></a>00478 }
  493. <a name="l00479"></a>00479
  494. <a name="l00480"></a>00480 <span class="comment">/* Allocate the sample buffers */</span>
  495. <a name="l00481"></a>00481 synth-&gt;left_buf = NULL;
  496. <a name="l00482"></a>00482 synth-&gt;right_buf = NULL;
  497. <a name="l00483"></a>00483 synth-&gt;fx_left_buf = NULL;
  498. <a name="l00484"></a>00484 synth-&gt;fx_right_buf = NULL;
  499. <a name="l00485"></a>00485
  500. <a name="l00486"></a>00486 <span class="comment">/* Left and right audio buffers */</span>
  501. <a name="l00487"></a>00487
  502. <a name="l00488"></a>00488 synth-&gt;left_buf = FLUID_ARRAY(fluid_real_t*, synth-&gt;nbuf);
  503. <a name="l00489"></a>00489 synth-&gt;right_buf = FLUID_ARRAY(fluid_real_t*, synth-&gt;nbuf);
  504. <a name="l00490"></a>00490
  505. <a name="l00491"></a>00491 <span class="keywordflow">if</span> ((synth-&gt;left_buf == NULL) || (synth-&gt;right_buf == NULL)) {
  506. <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>);
  507. <a name="l00493"></a>00493 <span class="keywordflow">goto</span> error_recovery;
  508. <a name="l00494"></a>00494 }
  509. <a name="l00495"></a>00495
  510. <a name="l00496"></a>00496 FLUID_MEMSET(synth-&gt;left_buf, 0, synth-&gt;nbuf * <span class="keyword">sizeof</span>(fluid_real_t*));
  511. <a name="l00497"></a>00497 FLUID_MEMSET(synth-&gt;right_buf, 0, synth-&gt;nbuf * <span class="keyword">sizeof</span>(fluid_real_t*));
  512. <a name="l00498"></a>00498
  513. <a name="l00499"></a>00499 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;nbuf; i++) {
  514. <a name="l00500"></a>00500
  515. <a name="l00501"></a>00501 synth-&gt;left_buf[i] = FLUID_ARRAY(fluid_real_t, FLUID_BUFSIZE);
  516. <a name="l00502"></a>00502 synth-&gt;right_buf[i] = FLUID_ARRAY(fluid_real_t, FLUID_BUFSIZE);
  517. <a name="l00503"></a>00503
  518. <a name="l00504"></a>00504 <span class="keywordflow">if</span> ((synth-&gt;left_buf[i] == NULL) || (synth-&gt;right_buf[i] == NULL)) {
  519. <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>);
  520. <a name="l00506"></a>00506 <span class="keywordflow">goto</span> error_recovery;
  521. <a name="l00507"></a>00507 }
  522. <a name="l00508"></a>00508 }
  523. <a name="l00509"></a>00509
  524. <a name="l00510"></a>00510 <span class="comment">/* Effects audio buffers */</span>
  525. <a name="l00511"></a>00511
  526. <a name="l00512"></a>00512 synth-&gt;fx_left_buf = FLUID_ARRAY(fluid_real_t*, synth-&gt;effects_channels);
  527. <a name="l00513"></a>00513 synth-&gt;fx_right_buf = FLUID_ARRAY(fluid_real_t*, synth-&gt;effects_channels);
  528. <a name="l00514"></a>00514
  529. <a name="l00515"></a>00515 <span class="keywordflow">if</span> ((synth-&gt;fx_left_buf == NULL) || (synth-&gt;fx_right_buf == NULL)) {
  530. <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>);
  531. <a name="l00517"></a>00517 <span class="keywordflow">goto</span> error_recovery;
  532. <a name="l00518"></a>00518 }
  533. <a name="l00519"></a>00519
  534. <a name="l00520"></a>00520 FLUID_MEMSET(synth-&gt;fx_left_buf, 0, 2 * <span class="keyword">sizeof</span>(fluid_real_t*));
  535. <a name="l00521"></a>00521 FLUID_MEMSET(synth-&gt;fx_right_buf, 0, 2 * <span class="keyword">sizeof</span>(fluid_real_t*));
  536. <a name="l00522"></a>00522
  537. <a name="l00523"></a>00523 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;effects_channels; i++) {
  538. <a name="l00524"></a>00524 synth-&gt;fx_left_buf[i] = FLUID_ARRAY(fluid_real_t, FLUID_BUFSIZE);
  539. <a name="l00525"></a>00525 synth-&gt;fx_right_buf[i] = FLUID_ARRAY(fluid_real_t, FLUID_BUFSIZE);
  540. <a name="l00526"></a>00526
  541. <a name="l00527"></a>00527 <span class="keywordflow">if</span> ((synth-&gt;fx_left_buf[i] == NULL) || (synth-&gt;fx_right_buf[i] == NULL)) {
  542. <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>);
  543. <a name="l00529"></a>00529 <span class="keywordflow">goto</span> error_recovery;
  544. <a name="l00530"></a>00530 }
  545. <a name="l00531"></a>00531 }
  546. <a name="l00532"></a>00532
  547. <a name="l00533"></a>00533
  548. <a name="l00534"></a>00534 synth-&gt;cur = FLUID_BUFSIZE;
  549. <a name="l00535"></a>00535 synth-&gt;dither_index = 0;
  550. <a name="l00536"></a>00536
  551. <a name="l00537"></a>00537 <span class="comment">/* allocate the reverb module */</span>
  552. <a name="l00538"></a>00538 synth-&gt;reverb = new_fluid_revmodel();
  553. <a name="l00539"></a>00539 <span class="keywordflow">if</span> (synth-&gt;reverb == NULL) {
  554. <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>);
  555. <a name="l00541"></a>00541 <span class="keywordflow">goto</span> error_recovery;
  556. <a name="l00542"></a>00542 }
  557. <a name="l00543"></a>00543
  558. <a name="l00544"></a>00544 fluid_synth_set_reverb(synth,
  559. <a name="l00545"></a>00545 FLUID_REVERB_DEFAULT_ROOMSIZE,
  560. <a name="l00546"></a>00546 FLUID_REVERB_DEFAULT_DAMP,
  561. <a name="l00547"></a>00547 FLUID_REVERB_DEFAULT_WIDTH,
  562. <a name="l00548"></a>00548 FLUID_REVERB_DEFAULT_LEVEL);
  563. <a name="l00549"></a>00549
  564. <a name="l00550"></a>00550 <span class="comment">/* allocate the chorus module */</span>
  565. <a name="l00551"></a>00551 synth-&gt;chorus = new_fluid_chorus(synth-&gt;sample_rate);
  566. <a name="l00552"></a>00552 <span class="keywordflow">if</span> (synth-&gt;chorus == NULL) {
  567. <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>);
  568. <a name="l00554"></a>00554 <span class="keywordflow">goto</span> error_recovery;
  569. <a name="l00555"></a>00555 }
  570. <a name="l00556"></a>00556
  571. <a name="l00557"></a>00557 <span class="comment">/* FIXME */</span>
  572. <a name="l00558"></a>00558 synth-&gt;start = fluid_curtime();
  573. <a name="l00559"></a>00559
  574. <a name="l00560"></a>00560 <span class="keywordflow">return</span> synth;
  575. <a name="l00561"></a>00561
  576. <a name="l00562"></a>00562 error_recovery:
  577. <a name="l00563"></a>00563 delete_fluid_synth(synth);
  578. <a name="l00564"></a>00564 <span class="keywordflow">return</span> NULL;
  579. <a name="l00565"></a>00565 }
  580. <a name="l00566"></a>00566
  581. <a name="l00567"></a>00567 <span class="comment">/*</span>
  582. <a name="l00568"></a>00568 <span class="comment"> * delete_fluid_synth</span>
  583. <a name="l00569"></a>00569 <span class="comment"> */</span>
  584. <a name="l00570"></a>00570 <span class="keywordtype">int</span>
  585. <a name="l00571"></a>00571 delete_fluid_synth(fluid_synth_t* synth)
  586. <a name="l00572"></a>00572 {
  587. <a name="l00573"></a>00573 <span class="keywordtype">int</span> i, k;
  588. <a name="l00574"></a>00574 fluid_list_t *list;
  589. <a name="l00575"></a>00575 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont;
  590. <a name="l00576"></a>00576 fluid_bank_offset_t* bank_offset;
  591. <a name="l00577"></a>00577 <a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>* loader;
  592. <a name="l00578"></a>00578
  593. <a name="l00579"></a>00579 <span class="keywordflow">if</span> (synth == NULL) {
  594. <a name="l00580"></a>00580 <span class="keywordflow">return</span> FLUID_OK;
  595. <a name="l00581"></a>00581 }
  596. <a name="l00582"></a>00582
  597. <a name="l00583"></a>00583 fluid_profiling_print();
  598. <a name="l00584"></a>00584
  599. <a name="l00585"></a>00585 synth-&gt;state = FLUID_SYNTH_STOPPED;
  600. <a name="l00586"></a>00586
  601. <a name="l00587"></a>00587 <span class="comment">/* turn off all voices, needed to unload SoundFont data */</span>
  602. <a name="l00588"></a>00588 <span class="keywordflow">if</span> (synth-&gt;voice != NULL) {
  603. <a name="l00589"></a>00589 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;nvoice; i++) {
  604. <a name="l00590"></a>00590 <span class="keywordflow">if</span> (synth-&gt;voice[i] &amp;&amp; fluid_voice_is_playing (synth-&gt;voice[i]))
  605. <a name="l00591"></a>00591 fluid_voice_off (synth-&gt;voice[i]);
  606. <a name="l00592"></a>00592 }
  607. <a name="l00593"></a>00593 }
  608. <a name="l00594"></a>00594
  609. <a name="l00595"></a>00595 <span class="comment">/* delete all the SoundFonts */</span>
  610. <a name="l00596"></a>00596 <span class="keywordflow">for</span> (list = synth-&gt;sfont; list; list = fluid_list_next(list)) {
  611. <a name="l00597"></a>00597 sfont = (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) fluid_list_get(list);
  612. <a name="l00598"></a>00598 delete_fluid_sfont(sfont);
  613. <a name="l00599"></a>00599 }
  614. <a name="l00600"></a>00600
  615. <a name="l00601"></a>00601 delete_fluid_list(synth-&gt;sfont);
  616. <a name="l00602"></a>00602
  617. <a name="l00603"></a>00603 <span class="comment">/* and the SoundFont offsets */</span>
  618. <a name="l00604"></a>00604 <span class="keywordflow">for</span> (list = synth-&gt;bank_offsets; list; list = fluid_list_next(list)) {
  619. <a name="l00605"></a>00605 bank_offset = (fluid_bank_offset_t*) fluid_list_get(list);
  620. <a name="l00606"></a>00606 FLUID_FREE(bank_offset);
  621. <a name="l00607"></a>00607 }
  622. <a name="l00608"></a>00608
  623. <a name="l00609"></a>00609 delete_fluid_list(synth-&gt;bank_offsets);
  624. <a name="l00610"></a>00610
  625. <a name="l00611"></a>00611
  626. <a name="l00612"></a>00612 <span class="comment">/* delete all the SoundFont loaders */</span>
  627. <a name="l00613"></a>00613
  628. <a name="l00614"></a>00614 <span class="keywordflow">for</span> (list = synth-&gt;loaders; list; list = fluid_list_next(list)) {
  629. <a name="l00615"></a>00615 loader = (<a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>*) fluid_list_get(list);
  630. <a name="l00616"></a>00616 fluid_sfloader_delete(loader);
  631. <a name="l00617"></a>00617 }
  632. <a name="l00618"></a>00618
  633. <a name="l00619"></a>00619 delete_fluid_list(synth-&gt;loaders);
  634. <a name="l00620"></a>00620
  635. <a name="l00621"></a>00621
  636. <a name="l00622"></a>00622 <span class="keywordflow">if</span> (synth-&gt;channel != NULL) {
  637. <a name="l00623"></a>00623 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;midi_channels; i++) {
  638. <a name="l00624"></a>00624 <span class="keywordflow">if</span> (synth-&gt;channel[i] != NULL) {
  639. <a name="l00625"></a>00625 delete_fluid_channel(synth-&gt;channel[i]);
  640. <a name="l00626"></a>00626 }
  641. <a name="l00627"></a>00627 }
  642. <a name="l00628"></a>00628 FLUID_FREE(synth-&gt;channel);
  643. <a name="l00629"></a>00629 }
  644. <a name="l00630"></a>00630
  645. <a name="l00631"></a>00631 <span class="keywordflow">if</span> (synth-&gt;voice != NULL) {
  646. <a name="l00632"></a>00632 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;nvoice; i++) {
  647. <a name="l00633"></a>00633 <span class="keywordflow">if</span> (synth-&gt;voice[i] != NULL) {
  648. <a name="l00634"></a>00634 delete_fluid_voice(synth-&gt;voice[i]);
  649. <a name="l00635"></a>00635 }
  650. <a name="l00636"></a>00636 }
  651. <a name="l00637"></a>00637 FLUID_FREE(synth-&gt;voice);
  652. <a name="l00638"></a>00638 }
  653. <a name="l00639"></a>00639
  654. <a name="l00640"></a>00640 <span class="comment">/* free all the sample buffers */</span>
  655. <a name="l00641"></a>00641 <span class="keywordflow">if</span> (synth-&gt;left_buf != NULL) {
  656. <a name="l00642"></a>00642 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;nbuf; i++) {
  657. <a name="l00643"></a>00643 <span class="keywordflow">if</span> (synth-&gt;left_buf[i] != NULL) {
  658. <a name="l00644"></a>00644 FLUID_FREE(synth-&gt;left_buf[i]);
  659. <a name="l00645"></a>00645 }
  660. <a name="l00646"></a>00646 }
  661. <a name="l00647"></a>00647 FLUID_FREE(synth-&gt;left_buf);
  662. <a name="l00648"></a>00648 }
  663. <a name="l00649"></a>00649
  664. <a name="l00650"></a>00650 <span class="keywordflow">if</span> (synth-&gt;right_buf != NULL) {
  665. <a name="l00651"></a>00651 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;nbuf; i++) {
  666. <a name="l00652"></a>00652 <span class="keywordflow">if</span> (synth-&gt;right_buf[i] != NULL) {
  667. <a name="l00653"></a>00653 FLUID_FREE(synth-&gt;right_buf[i]);
  668. <a name="l00654"></a>00654 }
  669. <a name="l00655"></a>00655 }
  670. <a name="l00656"></a>00656 FLUID_FREE(synth-&gt;right_buf);
  671. <a name="l00657"></a>00657 }
  672. <a name="l00658"></a>00658
  673. <a name="l00659"></a>00659 <span class="keywordflow">if</span> (synth-&gt;fx_left_buf != NULL) {
  674. <a name="l00660"></a>00660 <span class="keywordflow">for</span> (i = 0; i &lt; 2; i++) {
  675. <a name="l00661"></a>00661 <span class="keywordflow">if</span> (synth-&gt;fx_left_buf[i] != NULL) {
  676. <a name="l00662"></a>00662 FLUID_FREE(synth-&gt;fx_left_buf[i]);
  677. <a name="l00663"></a>00663 }
  678. <a name="l00664"></a>00664 }
  679. <a name="l00665"></a>00665 FLUID_FREE(synth-&gt;fx_left_buf);
  680. <a name="l00666"></a>00666 }
  681. <a name="l00667"></a>00667
  682. <a name="l00668"></a>00668 <span class="keywordflow">if</span> (synth-&gt;fx_right_buf != NULL) {
  683. <a name="l00669"></a>00669 <span class="keywordflow">for</span> (i = 0; i &lt; 2; i++) {
  684. <a name="l00670"></a>00670 <span class="keywordflow">if</span> (synth-&gt;fx_right_buf[i] != NULL) {
  685. <a name="l00671"></a>00671 FLUID_FREE(synth-&gt;fx_right_buf[i]);
  686. <a name="l00672"></a>00672 }
  687. <a name="l00673"></a>00673 }
  688. <a name="l00674"></a>00674 FLUID_FREE(synth-&gt;fx_right_buf);
  689. <a name="l00675"></a>00675 }
  690. <a name="l00676"></a>00676
  691. <a name="l00677"></a>00677 <span class="comment">/* release the reverb module */</span>
  692. <a name="l00678"></a>00678 <span class="keywordflow">if</span> (synth-&gt;reverb != NULL) {
  693. <a name="l00679"></a>00679 delete_fluid_revmodel(synth-&gt;reverb);
  694. <a name="l00680"></a>00680 }
  695. <a name="l00681"></a>00681
  696. <a name="l00682"></a>00682 <span class="comment">/* release the chorus module */</span>
  697. <a name="l00683"></a>00683 <span class="keywordflow">if</span> (synth-&gt;chorus != NULL) {
  698. <a name="l00684"></a>00684 delete_fluid_chorus(synth-&gt;chorus);
  699. <a name="l00685"></a>00685 }
  700. <a name="l00686"></a>00686
  701. <a name="l00687"></a>00687 <span class="comment">/* free the tunings, if any */</span>
  702. <a name="l00688"></a>00688 <span class="keywordflow">if</span> (synth-&gt;tuning != NULL) {
  703. <a name="l00689"></a>00689 <span class="keywordflow">for</span> (i = 0; i &lt; 128; i++) {
  704. <a name="l00690"></a>00690 <span class="keywordflow">if</span> (synth-&gt;tuning[i] != NULL) {
  705. <a name="l00691"></a>00691 <span class="keywordflow">for</span> (k = 0; k &lt; 128; k++) {
  706. <a name="l00692"></a>00692 <span class="keywordflow">if</span> (synth-&gt;tuning[i][k] != NULL) {
  707. <a name="l00693"></a>00693 FLUID_FREE(synth-&gt;tuning[i][k]);
  708. <a name="l00694"></a>00694 }
  709. <a name="l00695"></a>00695 }
  710. <a name="l00696"></a>00696 FLUID_FREE(synth-&gt;tuning[i]);
  711. <a name="l00697"></a>00697 }
  712. <a name="l00698"></a>00698 }
  713. <a name="l00699"></a>00699 FLUID_FREE(synth-&gt;tuning);
  714. <a name="l00700"></a>00700 }
  715. <a name="l00701"></a>00701
  716. <a name="l00702"></a>00702 <span class="preprocessor">#ifdef LADSPA</span>
  717. <a name="l00703"></a>00703 <span class="preprocessor"></span> <span class="comment">/* Release the LADSPA Fx unit */</span>
  718. <a name="l00704"></a>00704 fluid_LADSPA_shutdown(synth-&gt;LADSPA_FxUnit);
  719. <a name="l00705"></a>00705 FLUID_FREE(synth-&gt;LADSPA_FxUnit);
  720. <a name="l00706"></a>00706 <span class="preprocessor">#endif</span>
  721. <a name="l00707"></a>00707 <span class="preprocessor"></span>
  722. <a name="l00708"></a>00708 fluid_mutex_destroy(synth-&gt;busy);
  723. <a name="l00709"></a>00709
  724. <a name="l00710"></a>00710 FLUID_FREE(synth);
  725. <a name="l00711"></a>00711
  726. <a name="l00712"></a>00712 <span class="keywordflow">return</span> FLUID_OK;
  727. <a name="l00713"></a>00713 }
  728. <a name="l00714"></a>00714
  729. <a name="l00715"></a>00715 <span class="comment">/*</span>
  730. <a name="l00716"></a>00716 <span class="comment"> * fluid_synth_error</span>
  731. <a name="l00717"></a>00717 <span class="comment"> *</span>
  732. <a name="l00718"></a>00718 <span class="comment"> * The error messages are not thread-save, yet. They are still stored</span>
  733. <a name="l00719"></a>00719 <span class="comment"> * in a global message buffer (see fluid_sys.c).</span>
  734. <a name="l00720"></a>00720 <span class="comment"> * */</span>
  735. <a name="l00721"></a>00721 <span class="keywordtype">char</span>*
  736. <a name="l00722"></a>00722 fluid_synth_error(fluid_synth_t* synth)
  737. <a name="l00723"></a>00723 {
  738. <a name="l00724"></a>00724 <span class="keywordflow">return</span> fluid_error();
  739. <a name="l00725"></a>00725 }
  740. <a name="l00726"></a>00726
  741. <a name="l00727"></a>00727 <span class="comment">/*</span>
  742. <a name="l00728"></a>00728 <span class="comment"> * fluid_synth_noteon</span>
  743. <a name="l00729"></a>00729 <span class="comment"> */</span>
  744. <a name="l00730"></a>00730 <span class="keywordtype">int</span>
  745. <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)
  746. <a name="l00732"></a>00732 {
  747. <a name="l00733"></a>00733 fluid_channel_t* channel;
  748. <a name="l00734"></a>00734 <span class="keywordtype">int</span> r = FLUID_FAILED;
  749. <a name="l00735"></a>00735
  750. <a name="l00736"></a>00736 <span class="comment">/* check the ranges of the arguments */</span>
  751. <a name="l00737"></a>00737 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  752. <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>);
  753. <a name="l00739"></a>00739 <span class="keywordflow">return</span> FLUID_FAILED;
  754. <a name="l00740"></a>00740 }
  755. <a name="l00741"></a>00741
  756. <a name="l00742"></a>00742 <span class="comment">/* notes with velocity zero go to noteoff */</span>
  757. <a name="l00743"></a>00743 <span class="keywordflow">if</span> (vel == 0) {
  758. <a name="l00744"></a>00744 <span class="keywordflow">return</span> fluid_synth_noteoff(synth, chan, key);
  759. <a name="l00745"></a>00745 }
  760. <a name="l00746"></a>00746
  761. <a name="l00747"></a>00747 channel = synth-&gt;channel[chan];
  762. <a name="l00748"></a>00748
  763. <a name="l00749"></a>00749 <span class="comment">/* make sure this channel has a preset */</span>
  764. <a name="l00750"></a>00750 <span class="keywordflow">if</span> (channel-&gt;preset == NULL) {
  765. <a name="l00751"></a>00751 <span class="keywordflow">if</span> (synth-&gt;verbose) {
  766. <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>,
  767. <a name="l00753"></a>00753 chan, key, vel, 0,
  768. <a name="l00754"></a>00754 (<span class="keywordtype">float</span>) synth-&gt;ticks / 44100.0f,
  769. <a name="l00755"></a>00755 (fluid_curtime() - synth-&gt;start) / 1000.0f,
  770. <a name="l00756"></a>00756 0.0f, 0, <span class="stringliteral">"channel has no preset"</span>);
  771. <a name="l00757"></a>00757 }
  772. <a name="l00758"></a>00758 <span class="keywordflow">return</span> FLUID_FAILED;
  773. <a name="l00759"></a>00759 }
  774. <a name="l00760"></a>00760
  775. <a name="l00761"></a>00761 <span class="comment">/* If there is another voice process on the same channel and key,</span>
  776. <a name="l00762"></a>00762 <span class="comment"> advance it to the release phase. */</span>
  777. <a name="l00763"></a>00763 fluid_synth_release_voice_on_same_note(synth, chan, key);
  778. <a name="l00764"></a>00764
  779. <a name="l00765"></a>00765 <span class="keywordflow">return</span> fluid_synth_start(synth, synth-&gt;noteid++, channel-&gt;preset, 0, chan, key, vel);
  780. <a name="l00766"></a>00766 }
  781. <a name="l00767"></a>00767
  782. <a name="l00768"></a>00768 <span class="comment">/*</span>
  783. <a name="l00769"></a>00769 <span class="comment"> * fluid_synth_noteoff</span>
  784. <a name="l00770"></a>00770 <span class="comment"> */</span>
  785. <a name="l00771"></a>00771 <span class="keywordtype">int</span>
  786. <a name="l00772"></a>00772 fluid_synth_noteoff(fluid_synth_t* synth, <span class="keywordtype">int</span> chan, <span class="keywordtype">int</span> key)
  787. <a name="l00773"></a>00773 {
  788. <a name="l00774"></a>00774 <span class="keywordtype">int</span> i;
  789. <a name="l00775"></a>00775 fluid_voice_t* voice;
  790. <a name="l00776"></a>00776 <span class="keywordtype">int</span> status = FLUID_FAILED;
  791. <a name="l00777"></a>00777 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  792. <a name="l00778"></a>00778 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  793. <a name="l00779"></a>00779
  794. <a name="l00780"></a>00780 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  795. <a name="l00781"></a>00781 voice = synth-&gt;voice[i];
  796. <a name="l00782"></a>00782 <span class="keywordflow">if</span> (_ON(voice) &amp;&amp; (voice-&gt;chan == chan) &amp;&amp; (voice-&gt;key == key)) {
  797. <a name="l00783"></a>00783 <span class="keywordflow">if</span> (synth-&gt;verbose) {
  798. <a name="l00784"></a>00784 <span class="keywordtype">int</span> used_voices = 0;
  799. <a name="l00785"></a>00785 <span class="keywordtype">int</span> k;
  800. <a name="l00786"></a>00786 <span class="keywordflow">for</span> (k = 0; k &lt; synth-&gt;polyphony; k++) {
  801. <a name="l00787"></a>00787 <span class="keywordflow">if</span> (!_AVAILABLE(synth-&gt;voice[k])) {
  802. <a name="l00788"></a>00788 used_voices++;
  803. <a name="l00789"></a>00789 }
  804. <a name="l00790"></a>00790 }
  805. <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>,
  806. <a name="l00792"></a>00792 voice-&gt;chan, voice-&gt;key, 0, voice-&gt;id,
  807. <a name="l00793"></a>00793 (<span class="keywordtype">float</span>) (voice-&gt;start_time + voice-&gt;ticks) / 44100.0f,
  808. <a name="l00794"></a>00794 (fluid_curtime() - synth-&gt;start) / 1000.0f,
  809. <a name="l00795"></a>00795 (<span class="keywordtype">float</span>) voice-&gt;ticks / 44100.0f,
  810. <a name="l00796"></a>00796 used_voices);
  811. <a name="l00797"></a>00797 } <span class="comment">/* if verbose */</span>
  812. <a name="l00798"></a>00798 fluid_voice_noteoff(voice);
  813. <a name="l00799"></a>00799 status = FLUID_OK;
  814. <a name="l00800"></a>00800 } <span class="comment">/* if voice on */</span>
  815. <a name="l00801"></a>00801 } <span class="comment">/* for all voices */</span>
  816. <a name="l00802"></a>00802 <span class="keywordflow">return</span> status;
  817. <a name="l00803"></a>00803 }
  818. <a name="l00804"></a>00804
  819. <a name="l00805"></a>00805 <span class="comment">/*</span>
  820. <a name="l00806"></a>00806 <span class="comment"> * fluid_synth_damp_voices</span>
  821. <a name="l00807"></a>00807 <span class="comment"> */</span>
  822. <a name="l00808"></a>00808 <span class="keywordtype">int</span>
  823. <a name="l00809"></a>00809 fluid_synth_damp_voices(fluid_synth_t* synth, <span class="keywordtype">int</span> chan)
  824. <a name="l00810"></a>00810 {
  825. <a name="l00811"></a>00811 <span class="keywordtype">int</span> i;
  826. <a name="l00812"></a>00812 fluid_voice_t* voice;
  827. <a name="l00813"></a>00813
  828. <a name="l00814"></a>00814 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  829. <a name="l00815"></a>00815 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  830. <a name="l00816"></a>00816
  831. <a name="l00817"></a>00817 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  832. <a name="l00818"></a>00818 voice = synth-&gt;voice[i];
  833. <a name="l00819"></a>00819 <span class="keywordflow">if</span> ((voice-&gt;chan == chan) &amp;&amp; _SUSTAINED(voice)) {
  834. <a name="l00820"></a>00820 <span class="comment">/* printf("turned off sustained note: chan=%d, key=%d, vel=%d\n", voice-&gt;chan, voice-&gt;key, voice-&gt;vel); */</span>
  835. <a name="l00821"></a>00821 fluid_voice_noteoff(voice);
  836. <a name="l00822"></a>00822 }
  837. <a name="l00823"></a>00823 }
  838. <a name="l00824"></a>00824
  839. <a name="l00825"></a>00825 <span class="keywordflow">return</span> FLUID_OK;
  840. <a name="l00826"></a>00826 }
  841. <a name="l00827"></a>00827
  842. <a name="l00828"></a>00828 <span class="comment">/*</span>
  843. <a name="l00829"></a>00829 <span class="comment"> * fluid_synth_cc</span>
  844. <a name="l00830"></a>00830 <span class="comment"> */</span>
  845. <a name="l00831"></a>00831 <span class="keywordtype">int</span>
  846. <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)
  847. <a name="l00833"></a>00833 {
  848. <a name="l00834"></a>00834 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  849. <a name="l00835"></a>00835 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  850. <a name="l00836"></a>00836
  851. <a name="l00837"></a>00837 <span class="comment">/* check the ranges of the arguments */</span>
  852. <a name="l00838"></a>00838 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  853. <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>);
  854. <a name="l00840"></a>00840 <span class="keywordflow">return</span> FLUID_FAILED;
  855. <a name="l00841"></a>00841 }
  856. <a name="l00842"></a>00842 <span class="keywordflow">if</span> ((num &lt; 0) || (num &gt;= 128)) {
  857. <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>);
  858. <a name="l00844"></a>00844 <span class="keywordflow">return</span> FLUID_FAILED;
  859. <a name="l00845"></a>00845 }
  860. <a name="l00846"></a>00846 <span class="keywordflow">if</span> ((val &lt; 0) || (val &gt;= 128)) {
  861. <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>);
  862. <a name="l00848"></a>00848 <span class="keywordflow">return</span> FLUID_FAILED;
  863. <a name="l00849"></a>00849 }
  864. <a name="l00850"></a>00850
  865. <a name="l00851"></a>00851 <span class="keywordflow">if</span> (synth-&gt;verbose) {
  866. <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);
  867. <a name="l00853"></a>00853 }
  868. <a name="l00854"></a>00854
  869. <a name="l00855"></a>00855 <span class="comment">/* set the controller value in the channel */</span>
  870. <a name="l00856"></a>00856 fluid_channel_cc(synth-&gt;channel[chan], num, val);
  871. <a name="l00857"></a>00857
  872. <a name="l00858"></a>00858 <span class="keywordflow">return</span> FLUID_OK;
  873. <a name="l00859"></a>00859 }
  874. <a name="l00860"></a>00860
  875. <a name="l00861"></a>00861 <span class="comment">/*</span>
  876. <a name="l00862"></a>00862 <span class="comment"> * fluid_synth_cc</span>
  877. <a name="l00863"></a>00863 <span class="comment"> */</span>
  878. <a name="l00864"></a>00864 <span class="keywordtype">int</span>
  879. <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)
  880. <a name="l00866"></a>00866 {
  881. <a name="l00867"></a>00867 <span class="comment">/* check the ranges of the arguments */</span>
  882. <a name="l00868"></a>00868 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  883. <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>);
  884. <a name="l00870"></a>00870 <span class="keywordflow">return</span> FLUID_FAILED;
  885. <a name="l00871"></a>00871 }
  886. <a name="l00872"></a>00872 <span class="keywordflow">if</span> ((num &lt; 0) || (num &gt;= 128)) {
  887. <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>);
  888. <a name="l00874"></a>00874 <span class="keywordflow">return</span> FLUID_FAILED;
  889. <a name="l00875"></a>00875 }
  890. <a name="l00876"></a>00876
  891. <a name="l00877"></a>00877 *pval = synth-&gt;channel[chan]-&gt;cc[num];
  892. <a name="l00878"></a>00878 <span class="keywordflow">return</span> FLUID_OK;
  893. <a name="l00879"></a>00879 }
  894. <a name="l00880"></a>00880
  895. <a name="l00881"></a>00881 <span class="comment">/*</span>
  896. <a name="l00882"></a>00882 <span class="comment"> * fluid_synth_all_notes_off</span>
  897. <a name="l00883"></a>00883 <span class="comment"> *</span>
  898. <a name="l00884"></a>00884 <span class="comment"> * put all notes on this channel into released state.</span>
  899. <a name="l00885"></a>00885 <span class="comment"> */</span>
  900. <a name="l00886"></a>00886 <span class="keywordtype">int</span>
  901. <a name="l00887"></a>00887 fluid_synth_all_notes_off(fluid_synth_t* synth, <span class="keywordtype">int</span> chan)
  902. <a name="l00888"></a>00888 {
  903. <a name="l00889"></a>00889 <span class="keywordtype">int</span> i;
  904. <a name="l00890"></a>00890 fluid_voice_t* voice;
  905. <a name="l00891"></a>00891
  906. <a name="l00892"></a>00892 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  907. <a name="l00893"></a>00893 voice = synth-&gt;voice[i];
  908. <a name="l00894"></a>00894 <span class="keywordflow">if</span> (_PLAYING(voice) &amp;&amp; (voice-&gt;chan == chan)) {
  909. <a name="l00895"></a>00895 fluid_voice_noteoff(voice);
  910. <a name="l00896"></a>00896 }
  911. <a name="l00897"></a>00897 }
  912. <a name="l00898"></a>00898 <span class="keywordflow">return</span> FLUID_OK;
  913. <a name="l00899"></a>00899 }
  914. <a name="l00900"></a>00900
  915. <a name="l00901"></a>00901 <span class="comment">/*</span>
  916. <a name="l00902"></a>00902 <span class="comment"> * fluid_synth_all_sounds_off</span>
  917. <a name="l00903"></a>00903 <span class="comment"> *</span>
  918. <a name="l00904"></a>00904 <span class="comment"> * immediately stop all notes on this channel.</span>
  919. <a name="l00905"></a>00905 <span class="comment"> */</span>
  920. <a name="l00906"></a>00906 <span class="keywordtype">int</span>
  921. <a name="l00907"></a>00907 fluid_synth_all_sounds_off(fluid_synth_t* synth, <span class="keywordtype">int</span> chan)
  922. <a name="l00908"></a>00908 {
  923. <a name="l00909"></a>00909 <span class="keywordtype">int</span> i;
  924. <a name="l00910"></a>00910 fluid_voice_t* voice;
  925. <a name="l00911"></a>00911
  926. <a name="l00912"></a>00912 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  927. <a name="l00913"></a>00913 voice = synth-&gt;voice[i];
  928. <a name="l00914"></a>00914 <span class="keywordflow">if</span> (_PLAYING(voice) &amp;&amp; (voice-&gt;chan == chan)) {
  929. <a name="l00915"></a>00915 fluid_voice_off(voice);
  930. <a name="l00916"></a>00916 }
  931. <a name="l00917"></a>00917 }
  932. <a name="l00918"></a>00918 <span class="keywordflow">return</span> FLUID_OK;
  933. <a name="l00919"></a>00919 }
  934. <a name="l00920"></a>00920
  935. <a name="l00921"></a>00921 <span class="comment">/*</span>
  936. <a name="l00922"></a>00922 <span class="comment"> * fluid_synth_system_reset</span>
  937. <a name="l00923"></a>00923 <span class="comment"> *</span>
  938. <a name="l00924"></a>00924 <span class="comment"> * Purpose:</span>
  939. <a name="l00925"></a>00925 <span class="comment"> * Respond to the MIDI command 'system reset' (0xFF, big red 'panic' button)</span>
  940. <a name="l00926"></a>00926 <span class="comment"> */</span>
  941. <a name="l00927"></a>00927 <span class="keywordtype">int</span>
  942. <a name="l00928"></a>00928 fluid_synth_system_reset(fluid_synth_t* synth)
  943. <a name="l00929"></a>00929 {
  944. <a name="l00930"></a>00930 <span class="keywordtype">int</span> i;
  945. <a name="l00931"></a>00931 fluid_voice_t* voice;
  946. <a name="l00932"></a>00932
  947. <a name="l00933"></a>00933 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  948. <a name="l00934"></a>00934 voice = synth-&gt;voice[i];
  949. <a name="l00935"></a>00935 <span class="keywordflow">if</span> (_PLAYING(voice)) {
  950. <a name="l00936"></a>00936 fluid_voice_off(voice);
  951. <a name="l00937"></a>00937 }
  952. <a name="l00938"></a>00938 }
  953. <a name="l00939"></a>00939
  954. <a name="l00940"></a>00940 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;midi_channels; i++) {
  955. <a name="l00941"></a>00941 fluid_channel_reset(synth-&gt;channel[i]);
  956. <a name="l00942"></a>00942 }
  957. <a name="l00943"></a>00943
  958. <a name="l00944"></a>00944 fluid_chorus_reset(synth-&gt;chorus);
  959. <a name="l00945"></a>00945 fluid_revmodel_reset(synth-&gt;reverb);
  960. <a name="l00946"></a>00946
  961. <a name="l00947"></a>00947 <span class="keywordflow">return</span> FLUID_OK;
  962. <a name="l00948"></a>00948 }
  963. <a name="l00949"></a>00949
  964. <a name="l00950"></a>00950 <span class="comment">/*</span>
  965. <a name="l00951"></a>00951 <span class="comment"> * fluid_synth_modulate_voices</span>
  966. <a name="l00952"></a>00952 <span class="comment"> *</span>
  967. <a name="l00953"></a>00953 <span class="comment"> * tell all synthesis processes on this channel to update their</span>
  968. <a name="l00954"></a>00954 <span class="comment"> * synthesis parameters after a control change.</span>
  969. <a name="l00955"></a>00955 <span class="comment"> */</span>
  970. <a name="l00956"></a>00956 <span class="keywordtype">int</span>
  971. <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)
  972. <a name="l00958"></a>00958 {
  973. <a name="l00959"></a>00959 <span class="keywordtype">int</span> i;
  974. <a name="l00960"></a>00960 fluid_voice_t* voice;
  975. <a name="l00961"></a>00961
  976. <a name="l00962"></a>00962 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  977. <a name="l00963"></a>00963 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  978. <a name="l00964"></a>00964
  979. <a name="l00965"></a>00965 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  980. <a name="l00966"></a>00966 voice = synth-&gt;voice[i];
  981. <a name="l00967"></a>00967 <span class="keywordflow">if</span> (voice-&gt;chan == chan) {
  982. <a name="l00968"></a>00968 fluid_voice_modulate(voice, is_cc, ctrl);
  983. <a name="l00969"></a>00969 }
  984. <a name="l00970"></a>00970 }
  985. <a name="l00971"></a>00971 <span class="keywordflow">return</span> FLUID_OK;
  986. <a name="l00972"></a>00972 }
  987. <a name="l00973"></a>00973
  988. <a name="l00974"></a>00974 <span class="comment">/*</span>
  989. <a name="l00975"></a>00975 <span class="comment"> * fluid_synth_modulate_voices_all</span>
  990. <a name="l00976"></a>00976 <span class="comment"> *</span>
  991. <a name="l00977"></a>00977 <span class="comment"> * Tell all synthesis processes on this channel to update their</span>
  992. <a name="l00978"></a>00978 <span class="comment"> * synthesis parameters after an all control off message (i.e. all</span>
  993. <a name="l00979"></a>00979 <span class="comment"> * controller have been reset to their default value).</span>
  994. <a name="l00980"></a>00980 <span class="comment"> */</span>
  995. <a name="l00981"></a>00981 <span class="keywordtype">int</span>
  996. <a name="l00982"></a>00982 fluid_synth_modulate_voices_all(fluid_synth_t* synth, <span class="keywordtype">int</span> chan)
  997. <a name="l00983"></a>00983 {
  998. <a name="l00984"></a>00984 <span class="keywordtype">int</span> i;
  999. <a name="l00985"></a>00985 fluid_voice_t* voice;
  1000. <a name="l00986"></a>00986
  1001. <a name="l00987"></a>00987 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  1002. <a name="l00988"></a>00988 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  1003. <a name="l00989"></a>00989
  1004. <a name="l00990"></a>00990 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  1005. <a name="l00991"></a>00991 voice = synth-&gt;voice[i];
  1006. <a name="l00992"></a>00992 <span class="keywordflow">if</span> (voice-&gt;chan == chan) {
  1007. <a name="l00993"></a>00993 fluid_voice_modulate_all(voice);
  1008. <a name="l00994"></a>00994 }
  1009. <a name="l00995"></a>00995 }
  1010. <a name="l00996"></a>00996 <span class="keywordflow">return</span> FLUID_OK;
  1011. <a name="l00997"></a>00997 }
  1012. <a name="l00998"></a>00998
  1013. <a name="l00999"></a>00999 <span class="comment">/*</span>
  1014. <a name="l01000"></a>01000 <span class="comment"> * fluid_synth_pitch_bend</span>
  1015. <a name="l01001"></a>01001 <span class="comment"> */</span>
  1016. <a name="l01002"></a>01002 <span class="keywordtype">int</span>
  1017. <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)
  1018. <a name="l01004"></a>01004 {
  1019. <a name="l01005"></a>01005
  1020. <a name="l01006"></a>01006 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  1021. <a name="l01007"></a>01007 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  1022. <a name="l01008"></a>01008
  1023. <a name="l01009"></a>01009 <span class="comment">/* check the ranges of the arguments */</span>
  1024. <a name="l01010"></a>01010 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  1025. <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>);
  1026. <a name="l01012"></a>01012 <span class="keywordflow">return</span> FLUID_FAILED;
  1027. <a name="l01013"></a>01013 }
  1028. <a name="l01014"></a>01014
  1029. <a name="l01015"></a>01015 <span class="keywordflow">if</span> (synth-&gt;verbose) {
  1030. <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);
  1031. <a name="l01017"></a>01017 }
  1032. <a name="l01018"></a>01018
  1033. <a name="l01019"></a>01019 <span class="comment">/* set the pitch-bend value in the channel */</span>
  1034. <a name="l01020"></a>01020 fluid_channel_pitch_bend(synth-&gt;channel[chan], val);
  1035. <a name="l01021"></a>01021
  1036. <a name="l01022"></a>01022 <span class="keywordflow">return</span> FLUID_OK;
  1037. <a name="l01023"></a>01023 }
  1038. <a name="l01024"></a>01024
  1039. <a name="l01025"></a>01025 <span class="comment">/*</span>
  1040. <a name="l01026"></a>01026 <span class="comment"> * fluid_synth_pitch_bend</span>
  1041. <a name="l01027"></a>01027 <span class="comment"> */</span>
  1042. <a name="l01028"></a>01028 <span class="keywordtype">int</span>
  1043. <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)
  1044. <a name="l01030"></a>01030 {
  1045. <a name="l01031"></a>01031 <span class="comment">/* check the ranges of the arguments */</span>
  1046. <a name="l01032"></a>01032 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  1047. <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>);
  1048. <a name="l01034"></a>01034 <span class="keywordflow">return</span> FLUID_FAILED;
  1049. <a name="l01035"></a>01035 }
  1050. <a name="l01036"></a>01036
  1051. <a name="l01037"></a>01037 *ppitch_bend = synth-&gt;channel[chan]-&gt;pitch_bend;
  1052. <a name="l01038"></a>01038 <span class="keywordflow">return</span> FLUID_OK;
  1053. <a name="l01039"></a>01039 }
  1054. <a name="l01040"></a>01040
  1055. <a name="l01041"></a>01041 <span class="comment">/*</span>
  1056. <a name="l01042"></a>01042 <span class="comment"> * Fluid_synth_pitch_wheel_sens</span>
  1057. <a name="l01043"></a>01043 <span class="comment"> */</span>
  1058. <a name="l01044"></a>01044 <span class="keywordtype">int</span>
  1059. <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)
  1060. <a name="l01046"></a>01046 {
  1061. <a name="l01047"></a>01047
  1062. <a name="l01048"></a>01048 <span class="comment">/* check the ranges of the arguments */</span>
  1063. <a name="l01049"></a>01049 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  1064. <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>);
  1065. <a name="l01051"></a>01051 <span class="keywordflow">return</span> FLUID_FAILED;
  1066. <a name="l01052"></a>01052 }
  1067. <a name="l01053"></a>01053
  1068. <a name="l01054"></a>01054 <span class="keywordflow">if</span> (synth-&gt;verbose) {
  1069. <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);
  1070. <a name="l01056"></a>01056 }
  1071. <a name="l01057"></a>01057
  1072. <a name="l01058"></a>01058 <span class="comment">/* set the pitch-bend value in the channel */</span>
  1073. <a name="l01059"></a>01059 fluid_channel_pitch_wheel_sens(synth-&gt;channel[chan], val);
  1074. <a name="l01060"></a>01060
  1075. <a name="l01061"></a>01061 <span class="keywordflow">return</span> FLUID_OK;
  1076. <a name="l01062"></a>01062 }
  1077. <a name="l01063"></a>01063
  1078. <a name="l01064"></a>01064 <span class="comment">/*</span>
  1079. <a name="l01065"></a>01065 <span class="comment"> * fluid_synth_get_pitch_wheel_sens</span>
  1080. <a name="l01066"></a>01066 <span class="comment"> *</span>
  1081. <a name="l01067"></a>01067 <span class="comment"> * Note : this function was added after version 1.0 API freeze.</span>
  1082. <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>
  1083. <a name="l01069"></a>01069 <span class="comment"> * version of fluidsynth. Maybe v2.0 ? -- Antoine Schmitt May 2003</span>
  1084. <a name="l01070"></a>01070 <span class="comment"> */</span>
  1085. <a name="l01071"></a>01071
  1086. <a name="l01072"></a>01072 <span class="keywordtype">int</span>
  1087. <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)
  1088. <a name="l01074"></a>01074 {
  1089. <a name="l01075"></a>01075
  1090. <a name="l01076"></a>01076 <span class="comment">// check the ranges of the arguments</span>
  1091. <a name="l01077"></a>01077 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  1092. <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>);
  1093. <a name="l01079"></a>01079 <span class="keywordflow">return</span> FLUID_FAILED;
  1094. <a name="l01080"></a>01080 }
  1095. <a name="l01081"></a>01081
  1096. <a name="l01082"></a>01082 <span class="comment">// get the pitch-bend value in the channel</span>
  1097. <a name="l01083"></a>01083 *pval = synth-&gt;channel[chan]-&gt;pitch_wheel_sensitivity;
  1098. <a name="l01084"></a>01084
  1099. <a name="l01085"></a>01085 <span class="keywordflow">return</span> FLUID_OK;
  1100. <a name="l01086"></a>01086 }
  1101. <a name="l01087"></a>01087
  1102. <a name="l01088"></a>01088 <span class="comment">/*</span>
  1103. <a name="l01089"></a>01089 <span class="comment"> * fluid_synth_get_preset</span>
  1104. <a name="l01090"></a>01090 <span class="comment"> */</span>
  1105. <a name="l01091"></a>01091 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>*
  1106. <a name="l01092"></a>01092 fluid_synth_get_preset(fluid_synth_t* synth, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> sfontnum,
  1107. <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)
  1108. <a name="l01094"></a>01094 {
  1109. <a name="l01095"></a>01095 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset = NULL;
  1110. <a name="l01096"></a>01096 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont = NULL;
  1111. <a name="l01097"></a>01097 fluid_list_t* list = synth-&gt;sfont;
  1112. <a name="l01098"></a>01098 <span class="keywordtype">int</span> offset;
  1113. <a name="l01099"></a>01099
  1114. <a name="l01100"></a>01100 sfont = fluid_synth_get_sfont_by_id(synth, sfontnum);
  1115. <a name="l01101"></a>01101
  1116. <a name="l01102"></a>01102 <span class="keywordflow">if</span> (sfont != NULL) {
  1117. <a name="l01103"></a>01103 offset = fluid_synth_get_bank_offset(synth, sfontnum);
  1118. <a name="l01104"></a>01104 preset = fluid_sfont_get_preset(sfont, banknum - offset, prognum);
  1119. <a name="l01105"></a>01105 <span class="keywordflow">if</span> (preset != NULL) {
  1120. <a name="l01106"></a>01106 <span class="keywordflow">return</span> preset;
  1121. <a name="l01107"></a>01107 }
  1122. <a name="l01108"></a>01108 }
  1123. <a name="l01109"></a>01109 <span class="keywordflow">return</span> NULL;
  1124. <a name="l01110"></a>01110 }
  1125. <a name="l01111"></a>01111
  1126. <a name="l01112"></a>01112 <span class="comment">/*</span>
  1127. <a name="l01113"></a>01113 <span class="comment"> * fluid_synth_get_preset2</span>
  1128. <a name="l01114"></a>01114 <span class="comment"> */</span>
  1129. <a name="l01115"></a>01115 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>*
  1130. <a name="l01116"></a>01116 fluid_synth_get_preset2(fluid_synth_t* synth, <span class="keywordtype">char</span>* sfont_name,
  1131. <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)
  1132. <a name="l01118"></a>01118 {
  1133. <a name="l01119"></a>01119 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset = NULL;
  1134. <a name="l01120"></a>01120 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont = NULL;
  1135. <a name="l01121"></a>01121 <span class="keywordtype">int</span> offset;
  1136. <a name="l01122"></a>01122
  1137. <a name="l01123"></a>01123 sfont = fluid_synth_get_sfont_by_name(synth, sfont_name);
  1138. <a name="l01124"></a>01124
  1139. <a name="l01125"></a>01125 <span class="keywordflow">if</span> (sfont != NULL) {
  1140. <a name="l01126"></a>01126 offset = fluid_synth_get_bank_offset(synth, fluid_sfont_get_id(sfont));
  1141. <a name="l01127"></a>01127 preset = fluid_sfont_get_preset(sfont, banknum - offset, prognum);
  1142. <a name="l01128"></a>01128 <span class="keywordflow">if</span> (preset != NULL) {
  1143. <a name="l01129"></a>01129 <span class="keywordflow">return</span> preset;
  1144. <a name="l01130"></a>01130 }
  1145. <a name="l01131"></a>01131 }
  1146. <a name="l01132"></a>01132 <span class="keywordflow">return</span> NULL;
  1147. <a name="l01133"></a>01133 }
  1148. <a name="l01134"></a>01134
  1149. <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,
  1150. <a name="l01136"></a>01136 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> banknum,
  1151. <a name="l01137"></a>01137 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> prognum)
  1152. <a name="l01138"></a>01138 {
  1153. <a name="l01139"></a>01139 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset = NULL;
  1154. <a name="l01140"></a>01140 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont = NULL;
  1155. <a name="l01141"></a>01141 fluid_list_t* list = synth-&gt;sfont;
  1156. <a name="l01142"></a>01142 <span class="keywordtype">int</span> offset;
  1157. <a name="l01143"></a>01143
  1158. <a name="l01144"></a>01144 <span class="keywordflow">while</span> (list) {
  1159. <a name="l01145"></a>01145
  1160. <a name="l01146"></a>01146 sfont = (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) fluid_list_get(list);
  1161. <a name="l01147"></a>01147 offset = fluid_synth_get_bank_offset(synth, fluid_sfont_get_id(sfont));
  1162. <a name="l01148"></a>01148 preset = fluid_sfont_get_preset(sfont, banknum - offset, prognum);
  1163. <a name="l01149"></a>01149
  1164. <a name="l01150"></a>01150 <span class="keywordflow">if</span> (preset != NULL) {
  1165. <a name="l01151"></a>01151 preset-&gt;<a class="code" href="struct__fluid__preset__t.html#88abb2db089ec85c8793fadf6c6e12c3">sfont</a> = sfont; <span class="comment">/* FIXME */</span>
  1166. <a name="l01152"></a>01152 <span class="keywordflow">return</span> preset;
  1167. <a name="l01153"></a>01153 }
  1168. <a name="l01154"></a>01154
  1169. <a name="l01155"></a>01155 list = fluid_list_next(list);
  1170. <a name="l01156"></a>01156
  1171. <a name="l01157"></a>01157 }
  1172. <a name="l01158"></a>01158 <span class="keywordflow">return</span> NULL;
  1173. <a name="l01159"></a>01159 }
  1174. <a name="l01160"></a>01160
  1175. <a name="l01161"></a>01161
  1176. <a name="l01162"></a>01162 <span class="comment">/*</span>
  1177. <a name="l01163"></a>01163 <span class="comment"> * fluid_synth_program_change</span>
  1178. <a name="l01164"></a>01164 <span class="comment"> */</span>
  1179. <a name="l01165"></a>01165 <span class="keywordtype">int</span>
  1180. <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)
  1181. <a name="l01167"></a>01167 {
  1182. <a name="l01168"></a>01168 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset = NULL;
  1183. <a name="l01169"></a>01169 fluid_channel_t* channel;
  1184. <a name="l01170"></a>01170 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> banknum;
  1185. <a name="l01171"></a>01171 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> sfont_id;
  1186. <a name="l01172"></a>01172
  1187. <a name="l01173"></a>01173 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  1188. <a name="l01174"></a>01174 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  1189. <a name="l01175"></a>01175
  1190. <a name="l01176"></a>01176 <span class="keywordflow">if</span> ((prognum &gt;= 0) &amp;&amp; (prognum &lt; FLUID_NUM_PROGRAMS) &amp;&amp;
  1191. <a name="l01177"></a>01177 (chan &gt;= 0) &amp;&amp; (chan &lt; synth-&gt;midi_channels)) {
  1192. <a name="l01178"></a>01178
  1193. <a name="l01179"></a>01179 channel = synth-&gt;channel[chan];
  1194. <a name="l01180"></a>01180 banknum = fluid_channel_get_banknum(channel);
  1195. <a name="l01181"></a>01181
  1196. <a name="l01182"></a>01182 <span class="comment">/* inform the channel of the new program number */</span>
  1197. <a name="l01183"></a>01183 fluid_channel_set_prognum(channel, prognum);
  1198. <a name="l01184"></a>01184
  1199. <a name="l01185"></a>01185 <span class="keywordflow">if</span> (synth-&gt;verbose) {
  1200. <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);
  1201. <a name="l01187"></a>01187 }
  1202. <a name="l01188"></a>01188
  1203. <a name="l01189"></a>01189 <span class="comment">/* special handling of channel 10 (or 9 counting from 0). channel</span>
  1204. <a name="l01190"></a>01190 <span class="comment"> 10 is the percussion channel. */</span>
  1205. <a name="l01191"></a>01191 <span class="keywordflow">if</span> (channel-&gt;channum == 9) {
  1206. <a name="l01192"></a>01192
  1207. <a name="l01193"></a>01193 <span class="comment">/* try to search the drum instrument first */</span>
  1208. <a name="l01194"></a>01194 preset = fluid_synth_find_preset(synth, banknum | DRUM_INST_MASK, prognum);
  1209. <a name="l01195"></a>01195
  1210. <a name="l01196"></a>01196 <span class="comment">/* if that fails try to search the melodic instrument */</span>
  1211. <a name="l01197"></a>01197 <span class="keywordflow">if</span> (preset == NULL) {
  1212. <a name="l01198"></a>01198 preset = fluid_synth_find_preset(synth, banknum, prognum);
  1213. <a name="l01199"></a>01199 }
  1214. <a name="l01200"></a>01200
  1215. <a name="l01201"></a>01201 } <span class="keywordflow">else</span> {
  1216. <a name="l01202"></a>01202 preset = fluid_synth_find_preset(synth, banknum, prognum);
  1217. <a name="l01203"></a>01203 }
  1218. <a name="l01204"></a>01204
  1219. <a name="l01205"></a>01205 sfont_id = preset? fluid_sfont_get_id(preset-&gt;<a class="code" href="struct__fluid__preset__t.html#88abb2db089ec85c8793fadf6c6e12c3">sfont</a>) : 0;
  1220. <a name="l01206"></a>01206 fluid_channel_set_sfontnum(channel, sfont_id);
  1221. <a name="l01207"></a>01207 fluid_channel_set_preset(channel, preset);
  1222. <a name="l01208"></a>01208
  1223. <a name="l01209"></a>01209 <span class="keywordflow">return</span> FLUID_OK;
  1224. <a name="l01210"></a>01210 }
  1225. <a name="l01211"></a>01211
  1226. <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);
  1227. <a name="l01213"></a>01213 <span class="keywordflow">return</span> FLUID_FAILED;
  1228. <a name="l01214"></a>01214 }
  1229. <a name="l01215"></a>01215
  1230. <a name="l01216"></a>01216 <span class="comment">/*</span>
  1231. <a name="l01217"></a>01217 <span class="comment"> * fluid_synth_bank_select</span>
  1232. <a name="l01218"></a>01218 <span class="comment"> */</span>
  1233. <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)
  1234. <a name="l01220"></a>01220 {
  1235. <a name="l01221"></a>01221 <span class="keywordflow">if</span> ((chan &gt;= 0) &amp;&amp; (chan &lt; synth-&gt;midi_channels)) {
  1236. <a name="l01222"></a>01222 fluid_channel_set_banknum(synth-&gt;channel[chan], bank);
  1237. <a name="l01223"></a>01223 <span class="keywordflow">return</span> FLUID_OK;
  1238. <a name="l01224"></a>01224 }
  1239. <a name="l01225"></a>01225 <span class="keywordflow">return</span> FLUID_FAILED;
  1240. <a name="l01226"></a>01226 }
  1241. <a name="l01227"></a>01227
  1242. <a name="l01228"></a>01228
  1243. <a name="l01229"></a>01229 <span class="comment">/*</span>
  1244. <a name="l01230"></a>01230 <span class="comment"> * fluid_synth_sfont_select</span>
  1245. <a name="l01231"></a>01231 <span class="comment"> */</span>
  1246. <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)
  1247. <a name="l01233"></a>01233 {
  1248. <a name="l01234"></a>01234 <span class="keywordflow">if</span> ((chan &gt;= 0) &amp;&amp; (chan &lt; synth-&gt;midi_channels)) {
  1249. <a name="l01235"></a>01235 fluid_channel_set_sfontnum(synth-&gt;channel[chan], sfont_id);
  1250. <a name="l01236"></a>01236 <span class="keywordflow">return</span> FLUID_OK;
  1251. <a name="l01237"></a>01237 }
  1252. <a name="l01238"></a>01238 <span class="keywordflow">return</span> FLUID_FAILED;
  1253. <a name="l01239"></a>01239 }
  1254. <a name="l01240"></a>01240
  1255. <a name="l01241"></a>01241 <span class="comment">/*</span>
  1256. <a name="l01242"></a>01242 <span class="comment"> * fluid_synth_get_program</span>
  1257. <a name="l01243"></a>01243 <span class="comment"> */</span>
  1258. <a name="l01244"></a>01244 <span class="keywordtype">int</span>
  1259. <a name="l01245"></a>01245 fluid_synth_get_program(fluid_synth_t* synth, <span class="keywordtype">int</span> chan,
  1260. <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)
  1261. <a name="l01247"></a>01247 {
  1262. <a name="l01248"></a>01248 fluid_channel_t* channel;
  1263. <a name="l01249"></a>01249 <span class="keywordflow">if</span> ((chan &gt;= 0) &amp;&amp; (chan &lt; synth-&gt;midi_channels)) {
  1264. <a name="l01250"></a>01250 channel = synth-&gt;channel[chan];
  1265. <a name="l01251"></a>01251 *sfont_id = fluid_channel_get_sfontnum(channel);
  1266. <a name="l01252"></a>01252 *bank_num = fluid_channel_get_banknum(channel);
  1267. <a name="l01253"></a>01253 *preset_num = fluid_channel_get_prognum(channel);
  1268. <a name="l01254"></a>01254 <span class="keywordflow">return</span> FLUID_OK;
  1269. <a name="l01255"></a>01255 }
  1270. <a name="l01256"></a>01256 <span class="keywordflow">return</span> FLUID_FAILED;
  1271. <a name="l01257"></a>01257 }
  1272. <a name="l01258"></a>01258
  1273. <a name="l01259"></a>01259 <span class="comment">/*</span>
  1274. <a name="l01260"></a>01260 <span class="comment"> * fluid_synth_program_select</span>
  1275. <a name="l01261"></a>01261 <span class="comment"> */</span>
  1276. <a name="l01262"></a>01262 <span class="keywordtype">int</span> fluid_synth_program_select(fluid_synth_t* synth,
  1277. <a name="l01263"></a>01263 <span class="keywordtype">int</span> chan,
  1278. <a name="l01264"></a>01264 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> sfont_id,
  1279. <a name="l01265"></a>01265 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> bank_num,
  1280. <a name="l01266"></a>01266 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> preset_num)
  1281. <a name="l01267"></a>01267 {
  1282. <a name="l01268"></a>01268 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset = NULL;
  1283. <a name="l01269"></a>01269 fluid_channel_t* channel;
  1284. <a name="l01270"></a>01270
  1285. <a name="l01271"></a>01271 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  1286. <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);
  1287. <a name="l01273"></a>01273 <span class="keywordflow">return</span> FLUID_FAILED;
  1288. <a name="l01274"></a>01274 }
  1289. <a name="l01275"></a>01275 channel = synth-&gt;channel[chan];
  1290. <a name="l01276"></a>01276
  1291. <a name="l01277"></a>01277 preset = fluid_synth_get_preset(synth, sfont_id, bank_num, preset_num);
  1292. <a name="l01278"></a>01278 <span class="keywordflow">if</span> (preset == NULL) {
  1293. <a name="l01279"></a>01279 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>,
  1294. <a name="l01280"></a>01280 <span class="stringliteral">"There is no preset with bank number %d and preset number %d in SoundFont %d"</span>,
  1295. <a name="l01281"></a>01281 bank_num, preset_num, sfont_id);
  1296. <a name="l01282"></a>01282 <span class="keywordflow">return</span> FLUID_FAILED;
  1297. <a name="l01283"></a>01283 }
  1298. <a name="l01284"></a>01284
  1299. <a name="l01285"></a>01285 <span class="comment">/* inform the channel of the new bank and program number */</span>
  1300. <a name="l01286"></a>01286 fluid_channel_set_sfontnum(channel, sfont_id);
  1301. <a name="l01287"></a>01287 fluid_channel_set_banknum(channel, bank_num);
  1302. <a name="l01288"></a>01288 fluid_channel_set_prognum(channel, preset_num);
  1303. <a name="l01289"></a>01289
  1304. <a name="l01290"></a>01290 fluid_channel_set_preset(channel, preset);
  1305. <a name="l01291"></a>01291
  1306. <a name="l01292"></a>01292 <span class="keywordflow">return</span> FLUID_OK;
  1307. <a name="l01293"></a>01293 }
  1308. <a name="l01294"></a>01294
  1309. <a name="l01295"></a>01295 <span class="comment">/*</span>
  1310. <a name="l01296"></a>01296 <span class="comment"> * fluid_synth_program_select2</span>
  1311. <a name="l01297"></a>01297 <span class="comment"> */</span>
  1312. <a name="l01298"></a>01298 <span class="keywordtype">int</span> fluid_synth_program_select2(fluid_synth_t* synth,
  1313. <a name="l01299"></a>01299 <span class="keywordtype">int</span> chan,
  1314. <a name="l01300"></a>01300 <span class="keywordtype">char</span>* sfont_name,
  1315. <a name="l01301"></a>01301 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> bank_num,
  1316. <a name="l01302"></a>01302 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> preset_num)
  1317. <a name="l01303"></a>01303 {
  1318. <a name="l01304"></a>01304 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>* preset = NULL;
  1319. <a name="l01305"></a>01305 fluid_channel_t* channel;
  1320. <a name="l01306"></a>01306 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont = NULL;
  1321. <a name="l01307"></a>01307 <span class="keywordtype">int</span> offset;
  1322. <a name="l01308"></a>01308
  1323. <a name="l01309"></a>01309 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  1324. <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);
  1325. <a name="l01311"></a>01311 <span class="keywordflow">return</span> FLUID_FAILED;
  1326. <a name="l01312"></a>01312 }
  1327. <a name="l01313"></a>01313 channel = synth-&gt;channel[chan];
  1328. <a name="l01314"></a>01314
  1329. <a name="l01315"></a>01315 sfont = fluid_synth_get_sfont_by_name(synth, sfont_name);
  1330. <a name="l01316"></a>01316 <span class="keywordflow">if</span> (sfont == NULL) {
  1331. <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);
  1332. <a name="l01318"></a>01318 <span class="keywordflow">return</span> FLUID_FAILED;
  1333. <a name="l01319"></a>01319 }
  1334. <a name="l01320"></a>01320
  1335. <a name="l01321"></a>01321 offset = fluid_synth_get_bank_offset(synth, fluid_sfont_get_id(sfont));
  1336. <a name="l01322"></a>01322 preset = fluid_sfont_get_preset(sfont, bank_num - offset, preset_num);
  1337. <a name="l01323"></a>01323 <span class="keywordflow">if</span> (preset == NULL) {
  1338. <a name="l01324"></a>01324 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9ebc0ff48d192b3b0fc721946ccf095d25" title="Serious error occurred.">FLUID_ERR</a>,
  1339. <a name="l01325"></a>01325 <span class="stringliteral">"There is no preset with bank number %d and preset number %d in SoundFont %s"</span>,
  1340. <a name="l01326"></a>01326 bank_num, preset_num, sfont_name);
  1341. <a name="l01327"></a>01327 <span class="keywordflow">return</span> FLUID_FAILED;
  1342. <a name="l01328"></a>01328 }
  1343. <a name="l01329"></a>01329
  1344. <a name="l01330"></a>01330 <span class="comment">/* inform the channel of the new bank and program number */</span>
  1345. <a name="l01331"></a>01331 fluid_channel_set_sfontnum(channel, fluid_sfont_get_id(sfont));
  1346. <a name="l01332"></a>01332 fluid_channel_set_banknum(channel, bank_num);
  1347. <a name="l01333"></a>01333 fluid_channel_set_prognum(channel, preset_num);
  1348. <a name="l01334"></a>01334
  1349. <a name="l01335"></a>01335 fluid_channel_set_preset(channel, preset);
  1350. <a name="l01336"></a>01336
  1351. <a name="l01337"></a>01337 <span class="keywordflow">return</span> FLUID_OK;
  1352. <a name="l01338"></a>01338 }
  1353. <a name="l01339"></a>01339
  1354. <a name="l01340"></a>01340 <span class="comment">/*</span>
  1355. <a name="l01341"></a>01341 <span class="comment"> * fluid_synth_update_presets</span>
  1356. <a name="l01342"></a>01342 <span class="comment"> */</span>
  1357. <a name="l01343"></a>01343 <span class="keywordtype">void</span> fluid_synth_update_presets(fluid_synth_t* synth)
  1358. <a name="l01344"></a>01344 {
  1359. <a name="l01345"></a>01345 <span class="keywordtype">int</span> chan;
  1360. <a name="l01346"></a>01346 fluid_channel_t* channel;
  1361. <a name="l01347"></a>01347
  1362. <a name="l01348"></a>01348 <span class="keywordflow">for</span> (chan = 0; chan &lt; synth-&gt;midi_channels; chan++) {
  1363. <a name="l01349"></a>01349 channel = synth-&gt;channel[chan];
  1364. <a name="l01350"></a>01350 fluid_channel_set_preset(channel,
  1365. <a name="l01351"></a>01351 fluid_synth_get_preset(synth,
  1366. <a name="l01352"></a>01352 fluid_channel_get_sfontnum(channel),
  1367. <a name="l01353"></a>01353 fluid_channel_get_banknum(channel),
  1368. <a name="l01354"></a>01354 fluid_channel_get_prognum(channel)));
  1369. <a name="l01355"></a>01355 }
  1370. <a name="l01356"></a>01356 }
  1371. <a name="l01357"></a>01357
  1372. <a name="l01358"></a>01358
  1373. <a name="l01359"></a>01359 <span class="comment">/*</span>
  1374. <a name="l01360"></a>01360 <span class="comment"> * fluid_synth_update_gain</span>
  1375. <a name="l01361"></a>01361 <span class="comment"> */</span>
  1376. <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)
  1377. <a name="l01363"></a>01363 {
  1378. <a name="l01364"></a>01364 fluid_synth_set_gain(synth, (<span class="keywordtype">float</span>) value);
  1379. <a name="l01365"></a>01365 <span class="keywordflow">return</span> 0;
  1380. <a name="l01366"></a>01366 }
  1381. <a name="l01367"></a>01367
  1382. <a name="l01368"></a>01368 <span class="comment">/*</span>
  1383. <a name="l01369"></a>01369 <span class="comment"> * fluid_synth_set_gain</span>
  1384. <a name="l01370"></a>01370 <span class="comment"> */</span>
  1385. <a name="l01371"></a>01371 <span class="keywordtype">void</span> fluid_synth_set_gain(fluid_synth_t* synth, <span class="keywordtype">float</span> gain)
  1386. <a name="l01372"></a>01372 {
  1387. <a name="l01373"></a>01373 <span class="keywordtype">int</span> i;
  1388. <a name="l01374"></a>01374
  1389. <a name="l01375"></a>01375 fluid_clip(gain, 0.0f, 10.0f);
  1390. <a name="l01376"></a>01376 synth-&gt;gain = gain;
  1391. <a name="l01377"></a>01377
  1392. <a name="l01378"></a>01378 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  1393. <a name="l01379"></a>01379 fluid_voice_t* voice = synth-&gt;voice[i];
  1394. <a name="l01380"></a>01380 <span class="keywordflow">if</span> (_PLAYING(voice)) {
  1395. <a name="l01381"></a>01381 fluid_voice_set_gain(voice, gain);
  1396. <a name="l01382"></a>01382 }
  1397. <a name="l01383"></a>01383 }
  1398. <a name="l01384"></a>01384 }
  1399. <a name="l01385"></a>01385
  1400. <a name="l01386"></a>01386 <span class="comment">/*</span>
  1401. <a name="l01387"></a>01387 <span class="comment"> * fluid_synth_get_gain</span>
  1402. <a name="l01388"></a>01388 <span class="comment"> */</span>
  1403. <a name="l01389"></a>01389 <span class="keywordtype">float</span> fluid_synth_get_gain(fluid_synth_t* synth)
  1404. <a name="l01390"></a>01390 {
  1405. <a name="l01391"></a>01391 <span class="keywordflow">return</span> synth-&gt;gain;
  1406. <a name="l01392"></a>01392 }
  1407. <a name="l01393"></a>01393
  1408. <a name="l01394"></a>01394 <span class="comment">/*</span>
  1409. <a name="l01395"></a>01395 <span class="comment"> * fluid_synth_update_polyphony</span>
  1410. <a name="l01396"></a>01396 <span class="comment"> */</span>
  1411. <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)
  1412. <a name="l01398"></a>01398 {
  1413. <a name="l01399"></a>01399 fluid_synth_set_polyphony(synth, value);
  1414. <a name="l01400"></a>01400 <span class="keywordflow">return</span> 0;
  1415. <a name="l01401"></a>01401 }
  1416. <a name="l01402"></a>01402
  1417. <a name="l01403"></a>01403 <span class="comment">/*</span>
  1418. <a name="l01404"></a>01404 <span class="comment"> * fluid_synth_set_polyphony</span>
  1419. <a name="l01405"></a>01405 <span class="comment"> */</span>
  1420. <a name="l01406"></a>01406 <span class="keywordtype">int</span> fluid_synth_set_polyphony(fluid_synth_t* synth, <span class="keywordtype">int</span> polyphony)
  1421. <a name="l01407"></a>01407 {
  1422. <a name="l01408"></a>01408 <span class="keywordtype">int</span> i;
  1423. <a name="l01409"></a>01409
  1424. <a name="l01410"></a>01410 <span class="keywordflow">if</span> (polyphony &lt; 1 || polyphony &gt; synth-&gt;nvoice) {
  1425. <a name="l01411"></a>01411 <span class="keywordflow">return</span> FLUID_FAILED;
  1426. <a name="l01412"></a>01412 }
  1427. <a name="l01413"></a>01413
  1428. <a name="l01414"></a>01414 <span class="comment">/* turn off any voices above the new limit */</span>
  1429. <a name="l01415"></a>01415 <span class="keywordflow">for</span> (i = polyphony; i &lt; synth-&gt;nvoice; i++) {
  1430. <a name="l01416"></a>01416 fluid_voice_t* voice = synth-&gt;voice[i];
  1431. <a name="l01417"></a>01417 <span class="keywordflow">if</span> (_PLAYING(voice)) {
  1432. <a name="l01418"></a>01418 fluid_voice_off(voice);
  1433. <a name="l01419"></a>01419 }
  1434. <a name="l01420"></a>01420 }
  1435. <a name="l01421"></a>01421
  1436. <a name="l01422"></a>01422 synth-&gt;polyphony = polyphony;
  1437. <a name="l01423"></a>01423
  1438. <a name="l01424"></a>01424 <span class="keywordflow">return</span> FLUID_OK;
  1439. <a name="l01425"></a>01425 }
  1440. <a name="l01426"></a>01426
  1441. <a name="l01427"></a>01427 <span class="comment">/*</span>
  1442. <a name="l01428"></a>01428 <span class="comment"> * fluid_synth_get_polyphony</span>
  1443. <a name="l01429"></a>01429 <span class="comment"> */</span>
  1444. <a name="l01430"></a>01430 <span class="keywordtype">int</span> fluid_synth_get_polyphony(fluid_synth_t* synth)
  1445. <a name="l01431"></a>01431 {
  1446. <a name="l01432"></a>01432 <span class="keywordflow">return</span> synth-&gt;polyphony;
  1447. <a name="l01433"></a>01433 }
  1448. <a name="l01434"></a>01434
  1449. <a name="l01435"></a>01435 <span class="comment">/*</span>
  1450. <a name="l01436"></a>01436 <span class="comment"> * fluid_synth_get_internal_buffer_size</span>
  1451. <a name="l01437"></a>01437 <span class="comment"> */</span>
  1452. <a name="l01438"></a>01438 <span class="keywordtype">int</span> fluid_synth_get_internal_bufsize(fluid_synth_t* synth)
  1453. <a name="l01439"></a>01439 {
  1454. <a name="l01440"></a>01440 <span class="keywordflow">return</span> FLUID_BUFSIZE;
  1455. <a name="l01441"></a>01441 }
  1456. <a name="l01442"></a>01442
  1457. <a name="l01443"></a>01443 <span class="comment">/*</span>
  1458. <a name="l01444"></a>01444 <span class="comment"> * fluid_synth_program_reset</span>
  1459. <a name="l01445"></a>01445 <span class="comment"> *</span>
  1460. <a name="l01446"></a>01446 <span class="comment"> * Resend a bank select and a program change for every channel. This</span>
  1461. <a name="l01447"></a>01447 <span class="comment"> * function is called mainly after a SoundFont has been loaded,</span>
  1462. <a name="l01448"></a>01448 <span class="comment"> * unloaded or reloaded. */</span>
  1463. <a name="l01449"></a>01449 <span class="keywordtype">int</span>
  1464. <a name="l01450"></a>01450 fluid_synth_program_reset(fluid_synth_t* synth)
  1465. <a name="l01451"></a>01451 {
  1466. <a name="l01452"></a>01452 <span class="keywordtype">int</span> i;
  1467. <a name="l01453"></a>01453 <span class="comment">/* try to set the correct presets */</span>
  1468. <a name="l01454"></a>01454 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;midi_channels; i++){
  1469. <a name="l01455"></a>01455 fluid_synth_program_change(synth, i, fluid_channel_get_prognum(synth-&gt;channel[i]));
  1470. <a name="l01456"></a>01456 }
  1471. <a name="l01457"></a>01457 <span class="keywordflow">return</span> FLUID_OK;
  1472. <a name="l01458"></a>01458 }
  1473. <a name="l01459"></a>01459
  1474. <a name="l01460"></a>01460 <span class="comment">/*</span>
  1475. <a name="l01461"></a>01461 <span class="comment"> * fluid_synth_set_reverb_preset</span>
  1476. <a name="l01462"></a>01462 <span class="comment"> */</span>
  1477. <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)
  1478. <a name="l01464"></a>01464 {
  1479. <a name="l01465"></a>01465 <span class="keywordtype">int</span> i = 0;
  1480. <a name="l01466"></a>01466 <span class="keywordflow">while</span> (revmodel_preset[i].name != NULL) {
  1481. <a name="l01467"></a>01467 <span class="keywordflow">if</span> (i == num) {
  1482. <a name="l01468"></a>01468 fluid_revmodel_setroomsize(synth-&gt;reverb, revmodel_preset[i].roomsize);
  1483. <a name="l01469"></a>01469 fluid_revmodel_setdamp(synth-&gt;reverb, revmodel_preset[i].damp);
  1484. <a name="l01470"></a>01470 fluid_revmodel_setwidth(synth-&gt;reverb, revmodel_preset[i].width);
  1485. <a name="l01471"></a>01471 fluid_revmodel_setlevel(synth-&gt;reverb, revmodel_preset[i].level);
  1486. <a name="l01472"></a>01472 <span class="keywordflow">return</span> FLUID_OK;
  1487. <a name="l01473"></a>01473 }
  1488. <a name="l01474"></a>01474 i++;
  1489. <a name="l01475"></a>01475 }
  1490. <a name="l01476"></a>01476 <span class="keywordflow">return</span> FLUID_FAILED;
  1491. <a name="l01477"></a>01477 }
  1492. <a name="l01478"></a>01478
  1493. <a name="l01479"></a>01479 <span class="comment">/*</span>
  1494. <a name="l01480"></a>01480 <span class="comment"> * fluid_synth_set_reverb</span>
  1495. <a name="l01481"></a>01481 <span class="comment"> */</span>
  1496. <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,
  1497. <a name="l01483"></a>01483 <span class="keywordtype">double</span> width, <span class="keywordtype">double</span> level)
  1498. <a name="l01484"></a>01484 {
  1499. <a name="l01485"></a>01485 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  1500. <a name="l01486"></a>01486 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  1501. <a name="l01487"></a>01487
  1502. <a name="l01488"></a>01488 fluid_revmodel_setroomsize(synth-&gt;reverb, roomsize);
  1503. <a name="l01489"></a>01489 fluid_revmodel_setdamp(synth-&gt;reverb, damping);
  1504. <a name="l01490"></a>01490 fluid_revmodel_setwidth(synth-&gt;reverb, width);
  1505. <a name="l01491"></a>01491 fluid_revmodel_setlevel(synth-&gt;reverb, level);
  1506. <a name="l01492"></a>01492 }
  1507. <a name="l01493"></a>01493
  1508. <a name="l01494"></a>01494 <span class="comment">/*</span>
  1509. <a name="l01495"></a>01495 <span class="comment"> * fluid_synth_set_chorus</span>
  1510. <a name="l01496"></a>01496 <span class="comment"> */</span>
  1511. <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,
  1512. <a name="l01498"></a>01498 <span class="keywordtype">double</span> speed, <span class="keywordtype">double</span> depth_ms, <span class="keywordtype">int</span> type)
  1513. <a name="l01499"></a>01499 {
  1514. <a name="l01500"></a>01500 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  1515. <a name="l01501"></a>01501 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  1516. <a name="l01502"></a>01502
  1517. <a name="l01503"></a>01503 fluid_chorus_set_nr(synth-&gt;chorus, nr);
  1518. <a name="l01504"></a>01504 fluid_chorus_set_level(synth-&gt;chorus, (fluid_real_t)level);
  1519. <a name="l01505"></a>01505 fluid_chorus_set_speed_Hz(synth-&gt;chorus, (fluid_real_t)speed);
  1520. <a name="l01506"></a>01506 fluid_chorus_set_depth_ms(synth-&gt;chorus, (fluid_real_t)depth_ms);
  1521. <a name="l01507"></a>01507 fluid_chorus_set_type(synth-&gt;chorus, type);
  1522. <a name="l01508"></a>01508 fluid_chorus_update(synth-&gt;chorus);
  1523. <a name="l01509"></a>01509 }
  1524. <a name="l01510"></a>01510
  1525. <a name="l01511"></a>01511 <span class="comment">/******************************************************</span>
  1526. <a name="l01512"></a>01512 <span class="comment"></span>
  1527. <a name="l01513"></a>01513 <span class="comment">#define COMPRESS 1</span>
  1528. <a name="l01514"></a>01514 <span class="comment">#define COMPRESS_X1 4.0</span>
  1529. <a name="l01515"></a>01515 <span class="comment">#define COMPRESS_Y1 0.6</span>
  1530. <a name="l01516"></a>01516 <span class="comment">#define COMPRESS_X2 10.0</span>
  1531. <a name="l01517"></a>01517 <span class="comment">#define COMPRESS_Y2 1.0</span>
  1532. <a name="l01518"></a>01518 <span class="comment"></span>
  1533. <a name="l01519"></a>01519 <span class="comment"> len2 = 2 * len;</span>
  1534. <a name="l01520"></a>01520 <span class="comment"> alpha1 = COMPRESS_Y1 / COMPRESS_X1;</span>
  1535. <a name="l01521"></a>01521 <span class="comment"> alpha2 = (COMPRESS_Y2 - COMPRESS_Y1) / (COMPRESS_X2 - COMPRESS_X1);</span>
  1536. <a name="l01522"></a>01522 <span class="comment"> if (COMPRESS_X1 == COMPRESS_Y1) {</span>
  1537. <a name="l01523"></a>01523 <span class="comment"> for (j = 0; j &lt; len2; j++) {</span>
  1538. <a name="l01524"></a>01524 <span class="comment"> if (buf[j] &gt; COMPRESS_X1) {</span>
  1539. <a name="l01525"></a>01525 <span class="comment"> if (buf[j] &gt; COMPRESS_X2) {</span>
  1540. <a name="l01526"></a>01526 <span class="comment"> buf[j] = COMPRESS_Y2;</span>
  1541. <a name="l01527"></a>01527 <span class="comment"> } else {</span>
  1542. <a name="l01528"></a>01528 <span class="comment"> buf[j] = COMPRESS_Y1 + alpha2 * (buf[j] - COMPRESS_X1);</span>
  1543. <a name="l01529"></a>01529 <span class="comment"> }</span>
  1544. <a name="l01530"></a>01530 <span class="comment"> } else if (buf[j] &lt; -COMPRESS_X1) {</span>
  1545. <a name="l01531"></a>01531 <span class="comment"> if (buf[j] &lt; -COMPRESS_X2) {</span>
  1546. <a name="l01532"></a>01532 <span class="comment"> buf[j] = -COMPRESS_Y2;</span>
  1547. <a name="l01533"></a>01533 <span class="comment"> } else {</span>
  1548. <a name="l01534"></a>01534 <span class="comment"> buf[j] = -COMPRESS_Y1 + alpha2 * (buf[j] + COMPRESS_X1);</span>
  1549. <a name="l01535"></a>01535 <span class="comment"> }</span>
  1550. <a name="l01536"></a>01536 <span class="comment"> }</span>
  1551. <a name="l01537"></a>01537 <span class="comment"> }</span>
  1552. <a name="l01538"></a>01538 <span class="comment"> } else {</span>
  1553. <a name="l01539"></a>01539 <span class="comment"> for (j = 0; j &lt; len2; j++) {</span>
  1554. <a name="l01540"></a>01540 <span class="comment"> if ((buf[j] &gt;= -COMPRESS_X1) &amp;&amp; (buf[j] &lt;= COMPRESS_X1)) {</span>
  1555. <a name="l01541"></a>01541 <span class="comment"> buf[j] *= alpha1;</span>
  1556. <a name="l01542"></a>01542 <span class="comment"> } else if (buf[j] &gt; COMPRESS_X1) {</span>
  1557. <a name="l01543"></a>01543 <span class="comment"> if (buf[j] &gt; COMPRESS_X2) {</span>
  1558. <a name="l01544"></a>01544 <span class="comment"> buf[j] = COMPRESS_Y2;</span>
  1559. <a name="l01545"></a>01545 <span class="comment"> } else {</span>
  1560. <a name="l01546"></a>01546 <span class="comment"> buf[j] = COMPRESS_Y1 + alpha2 * (buf[j] - COMPRESS_X1);</span>
  1561. <a name="l01547"></a>01547 <span class="comment"> }</span>
  1562. <a name="l01548"></a>01548 <span class="comment"> } else {</span>
  1563. <a name="l01549"></a>01549 <span class="comment"> if (buf[j] &lt; -COMPRESS_X2) {</span>
  1564. <a name="l01550"></a>01550 <span class="comment"> buf[j] = -COMPRESS_Y2;</span>
  1565. <a name="l01551"></a>01551 <span class="comment"> } else {</span>
  1566. <a name="l01552"></a>01552 <span class="comment"> buf[j] = -COMPRESS_Y1 + alpha2 * (buf[j] + COMPRESS_X1);</span>
  1567. <a name="l01553"></a>01553 <span class="comment"> }</span>
  1568. <a name="l01554"></a>01554 <span class="comment"> }</span>
  1569. <a name="l01555"></a>01555 <span class="comment"> }</span>
  1570. <a name="l01556"></a>01556 <span class="comment"> }</span>
  1571. <a name="l01557"></a>01557 <span class="comment"></span>
  1572. <a name="l01558"></a>01558 <span class="comment">***************************************************/</span>
  1573. <a name="l01559"></a>01559
  1574. <a name="l01560"></a>01560 <span class="comment">/*</span>
  1575. <a name="l01561"></a>01561 <span class="comment"> * fluid_synth_nwrite_float</span>
  1576. <a name="l01562"></a>01562 <span class="comment"> */</span>
  1577. <a name="l01563"></a>01563 <span class="keywordtype">int</span>
  1578. <a name="l01564"></a>01564 fluid_synth_nwrite_float(fluid_synth_t* synth, <span class="keywordtype">int</span> len,
  1579. <a name="l01565"></a>01565 <span class="keywordtype">float</span>** left, <span class="keywordtype">float</span>** right,
  1580. <a name="l01566"></a>01566 <span class="keywordtype">float</span>** fx_left, <span class="keywordtype">float</span>** fx_right)
  1581. <a name="l01567"></a>01567 {
  1582. <a name="l01568"></a>01568 fluid_real_t** left_in = synth-&gt;left_buf;
  1583. <a name="l01569"></a>01569 fluid_real_t** right_in = synth-&gt;right_buf;
  1584. <a name="l01570"></a>01570 fluid_real_t** fx_left_in = synth-&gt;fx_left_buf;
  1585. <a name="l01571"></a>01571 fluid_real_t** fx_right_in = synth-&gt;fx_right_buf;
  1586. <a name="l01572"></a>01572 <span class="keywordtype">double</span> time = fluid_utime();
  1587. <a name="l01573"></a>01573 <span class="keywordtype">int</span> i, num, available, count, bytes;
  1588. <a name="l01574"></a>01574
  1589. <a name="l01575"></a>01575 <span class="comment">/* make sure we're playing */</span>
  1590. <a name="l01576"></a>01576 <span class="keywordflow">if</span> (synth-&gt;state != FLUID_SYNTH_PLAYING) {
  1591. <a name="l01577"></a>01577 <span class="keywordflow">return</span> 0;
  1592. <a name="l01578"></a>01578 }
  1593. <a name="l01579"></a>01579
  1594. <a name="l01580"></a>01580 <span class="comment">/* First, take what's still available in the buffer */</span>
  1595. <a name="l01581"></a>01581 count = 0;
  1596. <a name="l01582"></a>01582 num = synth-&gt;cur;
  1597. <a name="l01583"></a>01583 <span class="keywordflow">if</span> (synth-&gt;cur &lt; FLUID_BUFSIZE) {
  1598. <a name="l01584"></a>01584 available = FLUID_BUFSIZE - synth-&gt;cur;
  1599. <a name="l01585"></a>01585
  1600. <a name="l01586"></a>01586 num = (available &gt; len)? len : available;
  1601. <a name="l01587"></a>01587 bytes = num * <span class="keyword">sizeof</span>(float);
  1602. <a name="l01588"></a>01588
  1603. <a name="l01589"></a>01589 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;audio_channels; i++) {
  1604. <a name="l01590"></a>01590 FLUID_MEMCPY(left[i], left_in[i] + synth-&gt;cur, bytes);
  1605. <a name="l01591"></a>01591 FLUID_MEMCPY(right[i], right_in[i] + synth-&gt;cur, bytes);
  1606. <a name="l01592"></a>01592 }
  1607. <a name="l01593"></a>01593 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;effects_channels; i++) {
  1608. <a name="l01594"></a>01594 FLUID_MEMCPY(fx_left[i], fx_left_in[i] + synth-&gt;cur, bytes);
  1609. <a name="l01595"></a>01595 FLUID_MEMCPY(fx_right[i], fx_right_in[i] + synth-&gt;cur, bytes);
  1610. <a name="l01596"></a>01596 }
  1611. <a name="l01597"></a>01597 count += num;
  1612. <a name="l01598"></a>01598 num += synth-&gt;cur; <span class="comment">/* if we're now done, num becomes the new synth-&gt;cur below */</span>
  1613. <a name="l01599"></a>01599 }
  1614. <a name="l01600"></a>01600
  1615. <a name="l01601"></a>01601 <span class="comment">/* Then, run one_block() and copy till we have 'len' samples */</span>
  1616. <a name="l01602"></a>01602 <span class="keywordflow">while</span> (count &lt; len) {
  1617. <a name="l01603"></a>01603 fluid_synth_one_block(synth, 1);
  1618. <a name="l01604"></a>01604
  1619. <a name="l01605"></a>01605 num = (FLUID_BUFSIZE &gt; len - count)? len - count : FLUID_BUFSIZE;
  1620. <a name="l01606"></a>01606 bytes = num * <span class="keyword">sizeof</span>(float);
  1621. <a name="l01607"></a>01607
  1622. <a name="l01608"></a>01608 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;audio_channels; i++) {
  1623. <a name="l01609"></a>01609 FLUID_MEMCPY(left[i] + count, left_in[i], bytes);
  1624. <a name="l01610"></a>01610 FLUID_MEMCPY(right[i] + count, right_in[i], bytes);
  1625. <a name="l01611"></a>01611 }
  1626. <a name="l01612"></a>01612 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;effects_channels; i++) {
  1627. <a name="l01613"></a>01613 FLUID_MEMCPY(fx_left[i] + count, fx_left_in[i], bytes);
  1628. <a name="l01614"></a>01614 FLUID_MEMCPY(fx_right[i] + count, fx_right_in[i], bytes);
  1629. <a name="l01615"></a>01615 }
  1630. <a name="l01616"></a>01616
  1631. <a name="l01617"></a>01617 count += num;
  1632. <a name="l01618"></a>01618 }
  1633. <a name="l01619"></a>01619
  1634. <a name="l01620"></a>01620 synth-&gt;cur = num;
  1635. <a name="l01621"></a>01621
  1636. <a name="l01622"></a>01622 time = fluid_utime() - time;
  1637. <a name="l01623"></a>01623 synth-&gt;cpu_load = 0.5 * (synth-&gt;cpu_load +
  1638. <a name="l01624"></a>01624 time * synth-&gt;sample_rate / len / 10000.0);
  1639. <a name="l01625"></a>01625
  1640. <a name="l01626"></a>01626 <span class="comment">/* printf("CPU: %.2f\n", synth-&gt;cpu_load); */</span>
  1641. <a name="l01627"></a>01627
  1642. <a name="l01628"></a>01628 <span class="keywordflow">return</span> 0;
  1643. <a name="l01629"></a>01629 }
  1644. <a name="l01630"></a>01630
  1645. <a name="l01631"></a>01631 <span class="keywordtype">int</span> fluid_synth_process(fluid_synth_t* synth, <span class="keywordtype">int</span> len,
  1646. <a name="l01632"></a>01632 <span class="keywordtype">int</span> nin, <span class="keywordtype">float</span>** in,
  1647. <a name="l01633"></a>01633 <span class="keywordtype">int</span> nout, <span class="keywordtype">float</span>** out)
  1648. <a name="l01634"></a>01634 {
  1649. <a name="l01635"></a>01635 <span class="keywordflow">return</span> fluid_synth_write_float(synth, len, out[0], 0, 1, out[1], 0, 1);
  1650. <a name="l01636"></a>01636 }
  1651. <a name="l01637"></a>01637
  1652. <a name="l01638"></a>01638
  1653. <a name="l01639"></a>01639 <span class="comment">/*</span>
  1654. <a name="l01640"></a>01640 <span class="comment"> * fluid_synth_write_float</span>
  1655. <a name="l01641"></a>01641 <span class="comment"> */</span>
  1656. <a name="l01642"></a>01642 <span class="keywordtype">int</span>
  1657. <a name="l01643"></a>01643 fluid_synth_write_float(fluid_synth_t* synth, <span class="keywordtype">int</span> len,
  1658. <a name="l01644"></a>01644 <span class="keywordtype">void</span>* lout, <span class="keywordtype">int</span> loff, <span class="keywordtype">int</span> lincr,
  1659. <a name="l01645"></a>01645 <span class="keywordtype">void</span>* rout, <span class="keywordtype">int</span> roff, <span class="keywordtype">int</span> rincr)
  1660. <a name="l01646"></a>01646 {
  1661. <a name="l01647"></a>01647 <span class="keywordtype">int</span> i, j, k, l;
  1662. <a name="l01648"></a>01648 <span class="keywordtype">float</span>* left_out = (<span class="keywordtype">float</span>*) lout;
  1663. <a name="l01649"></a>01649 <span class="keywordtype">float</span>* right_out = (<span class="keywordtype">float</span>*) rout;
  1664. <a name="l01650"></a>01650 fluid_real_t* left_in = synth-&gt;left_buf[0];
  1665. <a name="l01651"></a>01651 fluid_real_t* right_in = synth-&gt;right_buf[0];
  1666. <a name="l01652"></a>01652 <span class="keywordtype">double</span> time = fluid_utime();
  1667. <a name="l01653"></a>01653
  1668. <a name="l01654"></a>01654 <span class="comment">/* make sure we're playing */</span>
  1669. <a name="l01655"></a>01655 <span class="keywordflow">if</span> (synth-&gt;state != FLUID_SYNTH_PLAYING) {
  1670. <a name="l01656"></a>01656 <span class="keywordflow">return</span> 0;
  1671. <a name="l01657"></a>01657 }
  1672. <a name="l01658"></a>01658
  1673. <a name="l01659"></a>01659 l = synth-&gt;cur;
  1674. <a name="l01660"></a>01660
  1675. <a name="l01661"></a>01661 <span class="keywordflow">for</span> (i = 0, j = loff, k = roff; i &lt; len; i++, l++, j += lincr, k += rincr) {
  1676. <a name="l01662"></a>01662 <span class="comment">/* fill up the buffers as needed */</span>
  1677. <a name="l01663"></a>01663 <span class="keywordflow">if</span> (l == FLUID_BUFSIZE) {
  1678. <a name="l01664"></a>01664 fluid_synth_one_block(synth, 0);
  1679. <a name="l01665"></a>01665 l = 0;
  1680. <a name="l01666"></a>01666 }
  1681. <a name="l01667"></a>01667
  1682. <a name="l01668"></a>01668 left_out[j] = (float) left_in[l];
  1683. <a name="l01669"></a>01669 right_out[k] = (float) right_in[l];
  1684. <a name="l01670"></a>01670 }
  1685. <a name="l01671"></a>01671
  1686. <a name="l01672"></a>01672 synth-&gt;cur = l;
  1687. <a name="l01673"></a>01673
  1688. <a name="l01674"></a>01674 time = fluid_utime() - time;
  1689. <a name="l01675"></a>01675 synth-&gt;cpu_load = 0.5 * (synth-&gt;cpu_load +
  1690. <a name="l01676"></a>01676 time * synth-&gt;sample_rate / len / 10000.0);
  1691. <a name="l01677"></a>01677
  1692. <a name="l01678"></a>01678 <span class="comment">/* printf("CPU: %.2f\n", synth-&gt;cpu_load); */</span>
  1693. <a name="l01679"></a>01679
  1694. <a name="l01680"></a>01680 <span class="keywordflow">return</span> 0;
  1695. <a name="l01681"></a>01681 }
  1696. <a name="l01682"></a>01682
  1697. <a name="l01683"></a>01683 <span class="preprocessor">#define DITHER_SIZE 48000</span>
  1698. <a name="l01684"></a>01684 <span class="preprocessor"></span><span class="preprocessor">#define DITHER_CHANNELS 2</span>
  1699. <a name="l01685"></a>01685 <span class="preprocessor"></span>
  1700. <a name="l01686"></a>01686 <span class="keyword">static</span> <span class="keywordtype">float</span> rand_table[DITHER_CHANNELS][DITHER_SIZE];
  1701. <a name="l01687"></a>01687
  1702. <a name="l01688"></a>01688 <span class="keyword">static</span> <span class="keywordtype">void</span> init_dither(<span class="keywordtype">void</span>)
  1703. <a name="l01689"></a>01689 {
  1704. <a name="l01690"></a>01690 <span class="keywordtype">float</span> d, dp;
  1705. <a name="l01691"></a>01691 <span class="keywordtype">int</span> c, i;
  1706. <a name="l01692"></a>01692
  1707. <a name="l01693"></a>01693 <span class="keywordflow">for</span> (c = 0; c &lt; DITHER_CHANNELS; c++) {
  1708. <a name="l01694"></a>01694 dp = 0;
  1709. <a name="l01695"></a>01695 <span class="keywordflow">for</span> (i = 0; i &lt; DITHER_SIZE-1; i++) {
  1710. <a name="l01696"></a>01696 d = rand() / (float)RAND_MAX - 0.5f;
  1711. <a name="l01697"></a>01697 rand_table[c][i] = d - dp;
  1712. <a name="l01698"></a>01698 dp = d;
  1713. <a name="l01699"></a>01699 }
  1714. <a name="l01700"></a>01700 rand_table[c][DITHER_SIZE-1] = 0 - dp;
  1715. <a name="l01701"></a>01701 }
  1716. <a name="l01702"></a>01702 }
  1717. <a name="l01703"></a>01703
  1718. <a name="l01704"></a>01704 <span class="comment">/* A portable replacement for roundf(), seems it may actually be faster too! */</span>
  1719. <a name="l01705"></a>01705 <span class="keyword">static</span> <span class="keyword">inline</span> <span class="keywordtype">int</span>
  1720. <a name="l01706"></a>01706 roundi (<span class="keywordtype">float</span> x)
  1721. <a name="l01707"></a>01707 {
  1722. <a name="l01708"></a>01708 <span class="keywordflow">if</span> (x &gt;= 0.0f)
  1723. <a name="l01709"></a>01709 <span class="keywordflow">return</span> (<span class="keywordtype">int</span>)(x+0.5f);
  1724. <a name="l01710"></a>01710 <span class="keywordflow">else</span>
  1725. <a name="l01711"></a>01711 <span class="keywordflow">return</span> (<span class="keywordtype">int</span>)(x-0.5f);
  1726. <a name="l01712"></a>01712 }
  1727. <a name="l01713"></a>01713
  1728. <a name="l01714"></a>01714 <span class="comment">/*</span>
  1729. <a name="l01715"></a>01715 <span class="comment"> * fluid_synth_write_s16</span>
  1730. <a name="l01716"></a>01716 <span class="comment"> */</span>
  1731. <a name="l01717"></a>01717 <span class="keywordtype">int</span>
  1732. <a name="l01718"></a>01718 fluid_synth_write_s16(fluid_synth_t* synth, <span class="keywordtype">int</span> len,
  1733. <a name="l01719"></a>01719 <span class="keywordtype">void</span>* lout, <span class="keywordtype">int</span> loff, <span class="keywordtype">int</span> lincr,
  1734. <a name="l01720"></a>01720 <span class="keywordtype">void</span>* rout, <span class="keywordtype">int</span> roff, <span class="keywordtype">int</span> rincr)
  1735. <a name="l01721"></a>01721 {
  1736. <a name="l01722"></a>01722 <span class="keywordtype">int</span> i, j, k, cur;
  1737. <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;
  1738. <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;
  1739. <a name="l01725"></a>01725 fluid_real_t* left_in = synth-&gt;left_buf[0];
  1740. <a name="l01726"></a>01726 fluid_real_t* right_in = synth-&gt;right_buf[0];
  1741. <a name="l01727"></a>01727 <span class="keywordtype">double</span> prof_ref = fluid_profile_ref();
  1742. <a name="l01728"></a>01728 fluid_real_t left_sample;
  1743. <a name="l01729"></a>01729 fluid_real_t right_sample;
  1744. <a name="l01730"></a>01730 <span class="keywordtype">double</span> time = fluid_utime();
  1745. <a name="l01731"></a>01731 <span class="keywordtype">int</span> di = synth-&gt;dither_index;
  1746. <a name="l01732"></a>01732 <span class="keywordtype">double</span> prof_ref_on_block;
  1747. <a name="l01733"></a>01733
  1748. <a name="l01734"></a>01734 <span class="comment">/* make sure we're playing */</span>
  1749. <a name="l01735"></a>01735 <span class="keywordflow">if</span> (synth-&gt;state != FLUID_SYNTH_PLAYING) {
  1750. <a name="l01736"></a>01736 <span class="keywordflow">return</span> 0;
  1751. <a name="l01737"></a>01737 }
  1752. <a name="l01738"></a>01738
  1753. <a name="l01739"></a>01739 cur = synth-&gt;cur;
  1754. <a name="l01740"></a>01740
  1755. <a name="l01741"></a>01741 <span class="keywordflow">for</span> (i = 0, j = loff, k = roff; i &lt; len; i++, cur++, j += lincr, k += rincr) {
  1756. <a name="l01742"></a>01742
  1757. <a name="l01743"></a>01743 <span class="comment">/* fill up the buffers as needed */</span>
  1758. <a name="l01744"></a>01744 <span class="keywordflow">if</span> (cur == FLUID_BUFSIZE) {
  1759. <a name="l01745"></a>01745 prof_ref_on_block = fluid_profile_ref();
  1760. <a name="l01746"></a>01746
  1761. <a name="l01747"></a>01747 fluid_synth_one_block(synth, 0);
  1762. <a name="l01748"></a>01748 cur = 0;
  1763. <a name="l01749"></a>01749
  1764. <a name="l01750"></a>01750 fluid_profile(FLUID_PROF_ONE_BLOCK, prof_ref_on_block);
  1765. <a name="l01751"></a>01751 }
  1766. <a name="l01752"></a>01752
  1767. <a name="l01753"></a>01753 left_sample = roundi (left_in[cur] * 32766.0f + rand_table[0][di]);
  1768. <a name="l01754"></a>01754 right_sample = roundi (right_in[cur] * 32766.0f + rand_table[1][di]);
  1769. <a name="l01755"></a>01755
  1770. <a name="l01756"></a>01756 di++;
  1771. <a name="l01757"></a>01757 <span class="keywordflow">if</span> (di &gt;= DITHER_SIZE) di = 0;
  1772. <a name="l01758"></a>01758
  1773. <a name="l01759"></a>01759 <span class="comment">/* digital clipping */</span>
  1774. <a name="l01760"></a>01760 <span class="keywordflow">if</span> (left_sample &gt; 32767.0f) left_sample = 32767.0f;
  1775. <a name="l01761"></a>01761 <span class="keywordflow">if</span> (left_sample &lt; -32768.0f) left_sample = -32768.0f;
  1776. <a name="l01762"></a>01762 <span class="keywordflow">if</span> (right_sample &gt; 32767.0f) right_sample = 32767.0f;
  1777. <a name="l01763"></a>01763 <span class="keywordflow">if</span> (right_sample &lt; -32768.0f) right_sample = -32768.0f;
  1778. <a name="l01764"></a>01764
  1779. <a name="l01765"></a>01765 left_out[j] = (<span class="keywordtype">signed</span> short) left_sample;
  1780. <a name="l01766"></a>01766 right_out[k] = (<span class="keywordtype">signed</span> short) right_sample;
  1781. <a name="l01767"></a>01767 }
  1782. <a name="l01768"></a>01768
  1783. <a name="l01769"></a>01769 synth-&gt;cur = cur;
  1784. <a name="l01770"></a>01770 synth-&gt;dither_index = di; <span class="comment">/* keep dither buffer continous */</span>
  1785. <a name="l01771"></a>01771
  1786. <a name="l01772"></a>01772 fluid_profile(FLUID_PROF_WRITE_S16, prof_ref);
  1787. <a name="l01773"></a>01773
  1788. <a name="l01774"></a>01774
  1789. <a name="l01775"></a>01775 time = fluid_utime() - time;
  1790. <a name="l01776"></a>01776 synth-&gt;cpu_load = 0.5 * (synth-&gt;cpu_load +
  1791. <a name="l01777"></a>01777 time * synth-&gt;sample_rate / len / 10000.0);
  1792. <a name="l01778"></a>01778
  1793. <a name="l01779"></a>01779 <span class="comment">/* printf("CPU: %.2f\n", synth-&gt;cpu_load); */</span>
  1794. <a name="l01780"></a>01780
  1795. <a name="l01781"></a>01781 <span class="keywordflow">return</span> 0;
  1796. <a name="l01782"></a>01782 }
  1797. <a name="l01783"></a>01783
  1798. <a name="l01784"></a>01784 <span class="comment">/*</span>
  1799. <a name="l01785"></a>01785 <span class="comment"> * fluid_synth_dither_s16</span>
  1800. <a name="l01786"></a>01786 <span class="comment"> * Converts stereo floating point sample data to signed 16 bit data with</span>
  1801. <a name="l01787"></a>01787 <span class="comment"> * dithering. 'dither_index' parameter is a caller supplied pointer to an</span>
  1802. <a name="l01788"></a>01788 <span class="comment"> * integer which should be initialized to 0 before the first call and passed</span>
  1803. <a name="l01789"></a>01789 <span class="comment"> * unmodified to additional calls which are part of the same synthesis output.</span>
  1804. <a name="l01790"></a>01790 <span class="comment"> * Only used internally currently.</span>
  1805. <a name="l01791"></a>01791 <span class="comment"> */</span>
  1806. <a name="l01792"></a>01792 <span class="keywordtype">void</span>
  1807. <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,
  1808. <a name="l01794"></a>01794 <span class="keywordtype">void</span>* lout, <span class="keywordtype">int</span> loff, <span class="keywordtype">int</span> lincr,
  1809. <a name="l01795"></a>01795 <span class="keywordtype">void</span>* rout, <span class="keywordtype">int</span> roff, <span class="keywordtype">int</span> rincr)
  1810. <a name="l01796"></a>01796 {
  1811. <a name="l01797"></a>01797 <span class="keywordtype">int</span> i, j, k;
  1812. <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;
  1813. <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;
  1814. <a name="l01800"></a>01800 <span class="keywordtype">double</span> prof_ref = fluid_profile_ref();
  1815. <a name="l01801"></a>01801 fluid_real_t left_sample;
  1816. <a name="l01802"></a>01802 fluid_real_t right_sample;
  1817. <a name="l01803"></a>01803 <span class="keywordtype">int</span> di = *dither_index;
  1818. <a name="l01804"></a>01804
  1819. <a name="l01805"></a>01805 <span class="keywordflow">for</span> (i = 0, j = loff, k = roff; i &lt; len; i++, j += lincr, k += rincr) {
  1820. <a name="l01806"></a>01806
  1821. <a name="l01807"></a>01807 left_sample = roundi (lin[i] * 32766.0f + rand_table[0][di]);
  1822. <a name="l01808"></a>01808 right_sample = roundi (rin[i] * 32766.0f + rand_table[1][di]);
  1823. <a name="l01809"></a>01809
  1824. <a name="l01810"></a>01810 di++;
  1825. <a name="l01811"></a>01811 <span class="keywordflow">if</span> (di &gt;= DITHER_SIZE) di = 0;
  1826. <a name="l01812"></a>01812
  1827. <a name="l01813"></a>01813 <span class="comment">/* digital clipping */</span>
  1828. <a name="l01814"></a>01814 <span class="keywordflow">if</span> (left_sample &gt; 32767.0f) left_sample = 32767.0f;
  1829. <a name="l01815"></a>01815 <span class="keywordflow">if</span> (left_sample &lt; -32768.0f) left_sample = -32768.0f;
  1830. <a name="l01816"></a>01816 <span class="keywordflow">if</span> (right_sample &gt; 32767.0f) right_sample = 32767.0f;
  1831. <a name="l01817"></a>01817 <span class="keywordflow">if</span> (right_sample &lt; -32768.0f) right_sample = -32768.0f;
  1832. <a name="l01818"></a>01818
  1833. <a name="l01819"></a>01819 left_out[j] = (<span class="keywordtype">signed</span> short) left_sample;
  1834. <a name="l01820"></a>01820 right_out[k] = (<span class="keywordtype">signed</span> short) right_sample;
  1835. <a name="l01821"></a>01821 }
  1836. <a name="l01822"></a>01822
  1837. <a name="l01823"></a>01823 *dither_index = di; <span class="comment">/* keep dither buffer continous */</span>
  1838. <a name="l01824"></a>01824
  1839. <a name="l01825"></a>01825 fluid_profile(FLUID_PROF_WRITE_S16, prof_ref);
  1840. <a name="l01826"></a>01826 }
  1841. <a name="l01827"></a>01827
  1842. <a name="l01828"></a>01828 <span class="comment">/*</span>
  1843. <a name="l01829"></a>01829 <span class="comment"> * fluid_synth_one_block</span>
  1844. <a name="l01830"></a>01830 <span class="comment"> */</span>
  1845. <a name="l01831"></a>01831 <span class="keywordtype">int</span>
  1846. <a name="l01832"></a>01832 fluid_synth_one_block(fluid_synth_t* synth, <span class="keywordtype">int</span> do_not_mix_fx_to_out)
  1847. <a name="l01833"></a>01833 {
  1848. <a name="l01834"></a>01834 <span class="keywordtype">int</span> i, auchan;
  1849. <a name="l01835"></a>01835 fluid_voice_t* voice;
  1850. <a name="l01836"></a>01836 fluid_real_t* left_buf;
  1851. <a name="l01837"></a>01837 fluid_real_t* right_buf;
  1852. <a name="l01838"></a>01838 fluid_real_t* reverb_buf;
  1853. <a name="l01839"></a>01839 fluid_real_t* chorus_buf;
  1854. <a name="l01840"></a>01840 <span class="keywordtype">int</span> byte_size = FLUID_BUFSIZE * <span class="keyword">sizeof</span>(fluid_real_t);
  1855. <a name="l01841"></a>01841 <span class="keywordtype">double</span> prof_ref = fluid_profile_ref();
  1856. <a name="l01842"></a>01842
  1857. <a name="l01843"></a>01843 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Here comes the audio thread. Lock the synth. *\/ */</span>
  1858. <a name="l01844"></a>01844
  1859. <a name="l01845"></a>01845 fluid_check_fpe(<span class="stringliteral">"??? Just starting up ???"</span>);
  1860. <a name="l01846"></a>01846
  1861. <a name="l01847"></a>01847 <span class="comment">/* clean the audio buffers */</span>
  1862. <a name="l01848"></a>01848 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;nbuf; i++) {
  1863. <a name="l01849"></a>01849 FLUID_MEMSET(synth-&gt;left_buf[i], 0, byte_size);
  1864. <a name="l01850"></a>01850 FLUID_MEMSET(synth-&gt;right_buf[i], 0, byte_size);
  1865. <a name="l01851"></a>01851 }
  1866. <a name="l01852"></a>01852
  1867. <a name="l01853"></a>01853 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;effects_channels; i++) {
  1868. <a name="l01854"></a>01854 FLUID_MEMSET(synth-&gt;fx_left_buf[i], 0, byte_size);
  1869. <a name="l01855"></a>01855 FLUID_MEMSET(synth-&gt;fx_right_buf[i], 0, byte_size);
  1870. <a name="l01856"></a>01856 }
  1871. <a name="l01857"></a>01857
  1872. <a name="l01858"></a>01858 <span class="comment">/* Set up the reverb / chorus buffers only, when the effect is</span>
  1873. <a name="l01859"></a>01859 <span class="comment"> * enabled on synth level. Nonexisting buffers are detected in the</span>
  1874. <a name="l01860"></a>01860 <span class="comment"> * DSP loop. Not sending the reverb / chorus signal saves some time</span>
  1875. <a name="l01861"></a>01861 <span class="comment"> * in that case. */</span>
  1876. <a name="l01862"></a>01862 reverb_buf = synth-&gt;with_reverb ? synth-&gt;fx_left_buf[0] : NULL;
  1877. <a name="l01863"></a>01863 chorus_buf = synth-&gt;with_chorus ? synth-&gt;fx_left_buf[1] : NULL;
  1878. <a name="l01864"></a>01864
  1879. <a name="l01865"></a>01865 fluid_profile(FLUID_PROF_ONE_BLOCK_CLEAR, prof_ref);
  1880. <a name="l01866"></a>01866
  1881. <a name="l01867"></a>01867 <span class="comment">/* call all playing synthesis processes */</span>
  1882. <a name="l01868"></a>01868 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  1883. <a name="l01869"></a>01869 voice = synth-&gt;voice[i];
  1884. <a name="l01870"></a>01870
  1885. <a name="l01871"></a>01871 <span class="keywordflow">if</span> (_PLAYING(voice)) {
  1886. <a name="l01872"></a>01872 <span class="keywordtype">double</span> prof_ref_voice = fluid_profile_ref();
  1887. <a name="l01873"></a>01873
  1888. <a name="l01874"></a>01874 <span class="comment">/* The output associated with a MIDI channel is wrapped around</span>
  1889. <a name="l01875"></a>01875 <span class="comment"> * using the number of audio groups as modulo divider. This is</span>
  1890. <a name="l01876"></a>01876 <span class="comment"> * typically the number of output channels on the 'sound card',</span>
  1891. <a name="l01877"></a>01877 <span class="comment"> * as long as the LADSPA Fx unit is not used. In case of LADSPA</span>
  1892. <a name="l01878"></a>01878 <span class="comment"> * unit, think of it as subgroups on a mixer.</span>
  1893. <a name="l01879"></a>01879 <span class="comment"> *</span>
  1894. <a name="l01880"></a>01880 <span class="comment"> * For example: Assume that the number of groups is set to 2.</span>
  1895. <a name="l01881"></a>01881 <span class="comment"> * Then MIDI channel 1, 3, 5, 7 etc. go to output 1, channels 2,</span>
  1896. <a name="l01882"></a>01882 <span class="comment"> * 4, 6, 8 etc to output 2. Or assume 3 groups: Then MIDI</span>
  1897. <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>
  1898. <a name="l01884"></a>01884 <span class="comment"> * output 2, 3, 6, 9, 12 etc to output 3.</span>
  1899. <a name="l01885"></a>01885 <span class="comment"> */</span>
  1900. <a name="l01886"></a>01886 auchan = fluid_channel_get_num(fluid_voice_get_channel(voice));
  1901. <a name="l01887"></a>01887 auchan %= synth-&gt;audio_groups;
  1902. <a name="l01888"></a>01888 left_buf = synth-&gt;left_buf[auchan];
  1903. <a name="l01889"></a>01889 right_buf = synth-&gt;right_buf[auchan];
  1904. <a name="l01890"></a>01890
  1905. <a name="l01891"></a>01891 fluid_voice_write(voice, left_buf, right_buf, reverb_buf, chorus_buf);
  1906. <a name="l01892"></a>01892
  1907. <a name="l01893"></a>01893 fluid_profile(FLUID_PROF_ONE_BLOCK_VOICE, prof_ref_voice);
  1908. <a name="l01894"></a>01894 }
  1909. <a name="l01895"></a>01895 }
  1910. <a name="l01896"></a>01896
  1911. <a name="l01897"></a>01897 fluid_check_fpe(<span class="stringliteral">"Synthesis processes"</span>);
  1912. <a name="l01898"></a>01898
  1913. <a name="l01899"></a>01899 fluid_profile(FLUID_PROF_ONE_BLOCK_VOICES, prof_ref);
  1914. <a name="l01900"></a>01900
  1915. <a name="l01901"></a>01901 <span class="comment">/* if multi channel output, don't mix the output of the chorus and</span>
  1916. <a name="l01902"></a>01902 <span class="comment"> reverb in the final output. The effects outputs are send</span>
  1917. <a name="l01903"></a>01903 <span class="comment"> separately. */</span>
  1918. <a name="l01904"></a>01904
  1919. <a name="l01905"></a>01905 <span class="keywordflow">if</span> (do_not_mix_fx_to_out) {
  1920. <a name="l01906"></a>01906
  1921. <a name="l01907"></a>01907 <span class="comment">/* send to reverb */</span>
  1922. <a name="l01908"></a>01908 <span class="keywordflow">if</span> (reverb_buf) {
  1923. <a name="l01909"></a>01909 fluid_revmodel_processreplace(synth-&gt;reverb, reverb_buf,
  1924. <a name="l01910"></a>01910 synth-&gt;fx_left_buf[0], synth-&gt;fx_right_buf[0]);
  1925. <a name="l01911"></a>01911 fluid_check_fpe(<span class="stringliteral">"Reverb"</span>);
  1926. <a name="l01912"></a>01912 }
  1927. <a name="l01913"></a>01913
  1928. <a name="l01914"></a>01914 fluid_profile(FLUID_PROF_ONE_BLOCK_REVERB, prof_ref);
  1929. <a name="l01915"></a>01915
  1930. <a name="l01916"></a>01916 <span class="comment">/* send to chorus */</span>
  1931. <a name="l01917"></a>01917 <span class="keywordflow">if</span> (chorus_buf) {
  1932. <a name="l01918"></a>01918 fluid_chorus_processreplace(synth-&gt;chorus, chorus_buf,
  1933. <a name="l01919"></a>01919 synth-&gt;fx_left_buf[1], synth-&gt;fx_right_buf[1]);
  1934. <a name="l01920"></a>01920 fluid_check_fpe(<span class="stringliteral">"Chorus"</span>);
  1935. <a name="l01921"></a>01921 }
  1936. <a name="l01922"></a>01922
  1937. <a name="l01923"></a>01923 } <span class="keywordflow">else</span> {
  1938. <a name="l01924"></a>01924
  1939. <a name="l01925"></a>01925 <span class="comment">/* send to reverb */</span>
  1940. <a name="l01926"></a>01926 <span class="keywordflow">if</span> (reverb_buf) {
  1941. <a name="l01927"></a>01927 fluid_revmodel_processmix(synth-&gt;reverb, reverb_buf,
  1942. <a name="l01928"></a>01928 synth-&gt;left_buf[0], synth-&gt;right_buf[0]);
  1943. <a name="l01929"></a>01929 fluid_check_fpe(<span class="stringliteral">"Reverb"</span>);
  1944. <a name="l01930"></a>01930 }
  1945. <a name="l01931"></a>01931
  1946. <a name="l01932"></a>01932 fluid_profile(FLUID_PROF_ONE_BLOCK_REVERB, prof_ref);
  1947. <a name="l01933"></a>01933
  1948. <a name="l01934"></a>01934 <span class="comment">/* send to chorus */</span>
  1949. <a name="l01935"></a>01935 <span class="keywordflow">if</span> (chorus_buf) {
  1950. <a name="l01936"></a>01936 fluid_chorus_processmix(synth-&gt;chorus, chorus_buf,
  1951. <a name="l01937"></a>01937 synth-&gt;left_buf[0], synth-&gt;right_buf[0]);
  1952. <a name="l01938"></a>01938 fluid_check_fpe(<span class="stringliteral">"Chorus"</span>);
  1953. <a name="l01939"></a>01939 }
  1954. <a name="l01940"></a>01940 }
  1955. <a name="l01941"></a>01941
  1956. <a name="l01942"></a>01942 fluid_profile(FLUID_PROF_ONE_BLOCK_CHORUS, prof_ref);
  1957. <a name="l01943"></a>01943
  1958. <a name="l01944"></a>01944 <span class="preprocessor">#ifdef LADSPA</span>
  1959. <a name="l01945"></a>01945 <span class="preprocessor"></span> <span class="comment">/* Run the signal through the LADSPA Fx unit */</span>
  1960. <a name="l01946"></a>01946 fluid_LADSPA_run(synth-&gt;LADSPA_FxUnit, synth-&gt;left_buf, synth-&gt;right_buf, synth-&gt;fx_left_buf, synth-&gt;fx_right_buf);
  1961. <a name="l01947"></a>01947 fluid_check_fpe(<span class="stringliteral">"LADSPA"</span>);
  1962. <a name="l01948"></a>01948 <span class="preprocessor">#endif</span>
  1963. <a name="l01949"></a>01949 <span class="preprocessor"></span>
  1964. <a name="l01950"></a>01950 synth-&gt;ticks += FLUID_BUFSIZE;
  1965. <a name="l01951"></a>01951
  1966. <a name="l01952"></a>01952 <span class="comment">/* Testcase, that provokes a denormal floating point error */</span>
  1967. <a name="l01953"></a>01953 <span class="preprocessor">#if 0</span>
  1968. <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;};};
  1969. <a name="l01955"></a>01955 <span class="preprocessor">#endif</span>
  1970. <a name="l01956"></a>01956 <span class="preprocessor"></span> fluid_check_fpe(<span class="stringliteral">"??? Remainder of synth_one_block ???"</span>);
  1971. <a name="l01957"></a>01957
  1972. <a name="l01958"></a>01958 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); /\* Allow other threads to touch the synth *\/ */</span>
  1973. <a name="l01959"></a>01959
  1974. <a name="l01960"></a>01960 <span class="keywordflow">return</span> 0;
  1975. <a name="l01961"></a>01961 }
  1976. <a name="l01962"></a>01962
  1977. <a name="l01963"></a>01963
  1978. <a name="l01964"></a>01964 <span class="comment">/*</span>
  1979. <a name="l01965"></a>01965 <span class="comment"> * fluid_synth_free_voice_by_kill</span>
  1980. <a name="l01966"></a>01966 <span class="comment"> *</span>
  1981. <a name="l01967"></a>01967 <span class="comment"> * selects a voice for killing. the selection algorithm is a refinement</span>
  1982. <a name="l01968"></a>01968 <span class="comment"> * of the algorithm previously in fluid_synth_alloc_voice.</span>
  1983. <a name="l01969"></a>01969 <span class="comment"> */</span>
  1984. <a name="l01970"></a>01970 fluid_voice_t*
  1985. <a name="l01971"></a>01971 fluid_synth_free_voice_by_kill(fluid_synth_t* synth)
  1986. <a name="l01972"></a>01972 {
  1987. <a name="l01973"></a>01973 <span class="keywordtype">int</span> i;
  1988. <a name="l01974"></a>01974 fluid_real_t best_prio = 999999.;
  1989. <a name="l01975"></a>01975 fluid_real_t this_voice_prio;
  1990. <a name="l01976"></a>01976 fluid_voice_t* voice;
  1991. <a name="l01977"></a>01977 <span class="keywordtype">int</span> best_voice_index=-1;
  1992. <a name="l01978"></a>01978
  1993. <a name="l01979"></a>01979 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  1994. <a name="l01980"></a>01980 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  1995. <a name="l01981"></a>01981
  1996. <a name="l01982"></a>01982 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  1997. <a name="l01983"></a>01983
  1998. <a name="l01984"></a>01984 voice = synth-&gt;voice[i];
  1999. <a name="l01985"></a>01985
  2000. <a name="l01986"></a>01986 <span class="comment">/* safeguard against an available voice. */</span>
  2001. <a name="l01987"></a>01987 <span class="keywordflow">if</span> (_AVAILABLE(voice)) {
  2002. <a name="l01988"></a>01988 <span class="keywordflow">return</span> voice;
  2003. <a name="l01989"></a>01989 }
  2004. <a name="l01990"></a>01990
  2005. <a name="l01991"></a>01991 <span class="comment">/* Determine, how 'important' a voice is.</span>
  2006. <a name="l01992"></a>01992 <span class="comment"> * Start with an arbitrary number */</span>
  2007. <a name="l01993"></a>01993 this_voice_prio = 10000.;
  2008. <a name="l01994"></a>01994
  2009. <a name="l01995"></a>01995 <span class="comment">/* Is this voice on the drum channel?</span>
  2010. <a name="l01996"></a>01996 <span class="comment"> * Then it is very important.</span>
  2011. <a name="l01997"></a>01997 <span class="comment"> * Also, forget about the released-note condition:</span>
  2012. <a name="l01998"></a>01998 <span class="comment"> * Typically, drum notes are triggered only very briefly, they run most</span>
  2013. <a name="l01999"></a>01999 <span class="comment"> * of the time in release phase.</span>
  2014. <a name="l02000"></a>02000 <span class="comment"> */</span>
  2015. <a name="l02001"></a>02001 <span class="keywordflow">if</span> (voice-&gt;chan == 9){
  2016. <a name="l02002"></a>02002 this_voice_prio += 4000;
  2017. <a name="l02003"></a>02003
  2018. <a name="l02004"></a>02004 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (_RELEASED(voice)){
  2019. <a name="l02005"></a>02005 <span class="comment">/* The key for this voice has been released. Consider it much less important</span>
  2020. <a name="l02006"></a>02006 <span class="comment"> * than a voice, which is still held.</span>
  2021. <a name="l02007"></a>02007 <span class="comment"> */</span>
  2022. <a name="l02008"></a>02008 this_voice_prio -= 2000.;
  2023. <a name="l02009"></a>02009 }
  2024. <a name="l02010"></a>02010
  2025. <a name="l02011"></a>02011 <span class="keywordflow">if</span> (_SUSTAINED(voice)){
  2026. <a name="l02012"></a>02012 <span class="comment">/* The sustain pedal is held down on this channel.</span>
  2027. <a name="l02013"></a>02013 <span class="comment"> * Consider it less important than non-sustained channels.</span>
  2028. <a name="l02014"></a>02014 <span class="comment"> * This decision is somehow subjective. But usually the sustain pedal</span>
  2029. <a name="l02015"></a>02015 <span class="comment"> * is used to play 'more-voices-than-fingers', so it shouldn't hurt</span>
  2030. <a name="l02016"></a>02016 <span class="comment"> * if we kill one voice.</span>
  2031. <a name="l02017"></a>02017 <span class="comment"> */</span>
  2032. <a name="l02018"></a>02018 this_voice_prio -= 1000;
  2033. <a name="l02019"></a>02019 }
  2034. <a name="l02020"></a>02020
  2035. <a name="l02021"></a>02021 <span class="comment">/* We are not enthusiastic about releasing voices, which have just been started.</span>
  2036. <a name="l02022"></a>02022 <span class="comment"> * Otherwise hitting a chord may result in killing notes belonging to that very same</span>
  2037. <a name="l02023"></a>02023 <span class="comment"> * chord.</span>
  2038. <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>
  2039. <a name="l02025"></a>02025 <span class="comment"> * bit less important than a younger voice.</span>
  2040. <a name="l02026"></a>02026 <span class="comment"> * This is a number between roughly 0 and 100.*/</span>
  2041. <a name="l02027"></a>02027 this_voice_prio -= (synth-&gt;noteid - fluid_voice_get_id(voice));
  2042. <a name="l02028"></a>02028
  2043. <a name="l02029"></a>02029 <span class="comment">/* take a rough estimate of loudness into account. Louder voices are more important. */</span>
  2044. <a name="l02030"></a>02030 <span class="keywordflow">if</span> (voice-&gt;volenv_section != FLUID_VOICE_ENVATTACK){
  2045. <a name="l02031"></a>02031 this_voice_prio += voice-&gt;volenv_val * 1000.;
  2046. <a name="l02032"></a>02032 }
  2047. <a name="l02033"></a>02033
  2048. <a name="l02034"></a>02034 <span class="comment">/* check if this voice has less priority than the previous candidate. */</span>
  2049. <a name="l02035"></a>02035 <span class="keywordflow">if</span> (this_voice_prio &lt; best_prio)
  2050. <a name="l02036"></a>02036 best_voice_index = i,
  2051. <a name="l02037"></a>02037 best_prio = this_voice_prio;
  2052. <a name="l02038"></a>02038 }
  2053. <a name="l02039"></a>02039
  2054. <a name="l02040"></a>02040 <span class="keywordflow">if</span> (best_voice_index &lt; 0) {
  2055. <a name="l02041"></a>02041 <span class="keywordflow">return</span> NULL;
  2056. <a name="l02042"></a>02042 }
  2057. <a name="l02043"></a>02043
  2058. <a name="l02044"></a>02044 voice = synth-&gt;voice[best_voice_index];
  2059. <a name="l02045"></a>02045 fluid_voice_off(voice);
  2060. <a name="l02046"></a>02046
  2061. <a name="l02047"></a>02047 <span class="keywordflow">return</span> voice;
  2062. <a name="l02048"></a>02048 }
  2063. <a name="l02049"></a>02049
  2064. <a name="l02050"></a>02050 <span class="comment">/*</span>
  2065. <a name="l02051"></a>02051 <span class="comment"> * fluid_synth_alloc_voice</span>
  2066. <a name="l02052"></a>02052 <span class="comment"> */</span>
  2067. <a name="l02053"></a>02053 fluid_voice_t*
  2068. <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)
  2069. <a name="l02055"></a>02055 {
  2070. <a name="l02056"></a>02056 <span class="keywordtype">int</span> i, k;
  2071. <a name="l02057"></a>02057 fluid_voice_t* voice = NULL;
  2072. <a name="l02058"></a>02058 fluid_channel_t* channel = NULL;
  2073. <a name="l02059"></a>02059
  2074. <a name="l02060"></a>02060 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  2075. <a name="l02061"></a>02061 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  2076. <a name="l02062"></a>02062
  2077. <a name="l02063"></a>02063 <span class="comment">/* check if there's an available synthesis process */</span>
  2078. <a name="l02064"></a>02064 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  2079. <a name="l02065"></a>02065 <span class="keywordflow">if</span> (_AVAILABLE(synth-&gt;voice[i])) {
  2080. <a name="l02066"></a>02066 voice = synth-&gt;voice[i];
  2081. <a name="l02067"></a>02067 <span class="keywordflow">break</span>;
  2082. <a name="l02068"></a>02068 }
  2083. <a name="l02069"></a>02069 }
  2084. <a name="l02070"></a>02070
  2085. <a name="l02071"></a>02071 <span class="comment">/* No success yet? Then stop a running voice. */</span>
  2086. <a name="l02072"></a>02072 <span class="keywordflow">if</span> (voice == NULL) {
  2087. <a name="l02073"></a>02073 voice = fluid_synth_free_voice_by_kill(synth);
  2088. <a name="l02074"></a>02074 }
  2089. <a name="l02075"></a>02075
  2090. <a name="l02076"></a>02076 <span class="keywordflow">if</span> (voice == NULL) {
  2091. <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);
  2092. <a name="l02078"></a>02078 <span class="keywordflow">return</span> NULL;
  2093. <a name="l02079"></a>02079 }
  2094. <a name="l02080"></a>02080
  2095. <a name="l02081"></a>02081 <span class="keywordflow">if</span> (synth-&gt;verbose) {
  2096. <a name="l02082"></a>02082 k = 0;
  2097. <a name="l02083"></a>02083 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  2098. <a name="l02084"></a>02084 <span class="keywordflow">if</span> (!_AVAILABLE(synth-&gt;voice[i])) {
  2099. <a name="l02085"></a>02085 k++;
  2100. <a name="l02086"></a>02086 }
  2101. <a name="l02087"></a>02087 }
  2102. <a name="l02088"></a>02088
  2103. <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>,
  2104. <a name="l02090"></a>02090 chan, key, vel, synth-&gt;storeid,
  2105. <a name="l02091"></a>02091 (<span class="keywordtype">float</span>) synth-&gt;ticks / 44100.0f,
  2106. <a name="l02092"></a>02092 (fluid_curtime() - synth-&gt;start) / 1000.0f,
  2107. <a name="l02093"></a>02093 0.0f,
  2108. <a name="l02094"></a>02094 k);
  2109. <a name="l02095"></a>02095 }
  2110. <a name="l02096"></a>02096
  2111. <a name="l02097"></a>02097 <span class="keywordflow">if</span> (chan &gt;= 0) {
  2112. <a name="l02098"></a>02098 channel = synth-&gt;channel[chan];
  2113. <a name="l02099"></a>02099 }
  2114. <a name="l02100"></a>02100
  2115. <a name="l02101"></a>02101 <span class="keywordflow">if</span> (fluid_voice_init(voice, sample, channel, key, vel,
  2116. <a name="l02102"></a>02102 synth-&gt;storeid, synth-&gt;ticks, synth-&gt;gain) != FLUID_OK) {
  2117. <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>);
  2118. <a name="l02104"></a>02104 <span class="keywordflow">return</span> NULL;
  2119. <a name="l02105"></a>02105 }
  2120. <a name="l02106"></a>02106
  2121. <a name="l02107"></a>02107 <span class="comment">/* add the default modulators to the synthesis process. */</span>
  2122. <a name="l02108"></a>02108 fluid_voice_add_mod(voice, &amp;default_vel2att_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.1 */</span>
  2123. <a name="l02109"></a>02109 fluid_voice_add_mod(voice, &amp;default_vel2filter_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.2 */</span>
  2124. <a name="l02110"></a>02110 fluid_voice_add_mod(voice, &amp;default_at2viblfo_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.3 */</span>
  2125. <a name="l02111"></a>02111 fluid_voice_add_mod(voice, &amp;default_mod2viblfo_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.4 */</span>
  2126. <a name="l02112"></a>02112 fluid_voice_add_mod(voice, &amp;default_att_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.5 */</span>
  2127. <a name="l02113"></a>02113 fluid_voice_add_mod(voice, &amp;default_pan_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.6 */</span>
  2128. <a name="l02114"></a>02114 fluid_voice_add_mod(voice, &amp;default_expr_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.7 */</span>
  2129. <a name="l02115"></a>02115 fluid_voice_add_mod(voice, &amp;default_reverb_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.8 */</span>
  2130. <a name="l02116"></a>02116 fluid_voice_add_mod(voice, &amp;default_chorus_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.9 */</span>
  2131. <a name="l02117"></a>02117 fluid_voice_add_mod(voice, &amp;default_pitch_bend_mod, FLUID_VOICE_DEFAULT); <span class="comment">/* SF2.01 $8.4.10 */</span>
  2132. <a name="l02118"></a>02118
  2133. <a name="l02119"></a>02119 <span class="keywordflow">return</span> voice;
  2134. <a name="l02120"></a>02120 }
  2135. <a name="l02121"></a>02121
  2136. <a name="l02122"></a>02122 <span class="comment">/*</span>
  2137. <a name="l02123"></a>02123 <span class="comment"> * fluid_synth_kill_by_exclusive_class</span>
  2138. <a name="l02124"></a>02124 <span class="comment"> */</span>
  2139. <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)
  2140. <a name="l02126"></a>02126 {
  2141. <a name="l02137"></a>02137 <span class="keywordtype">int</span> i;
  2142. <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>);
  2143. <a name="l02139"></a>02139
  2144. <a name="l02140"></a>02140 <span class="comment">/* Check if the voice belongs to an exclusive class. In that case,</span>
  2145. <a name="l02141"></a>02141 <span class="comment"> previous notes from the same class are released. */</span>
  2146. <a name="l02142"></a>02142
  2147. <a name="l02143"></a>02143 <span class="comment">/* Excl. class 0: No exclusive class */</span>
  2148. <a name="l02144"></a>02144 <span class="keywordflow">if</span> (excl_class == 0) {
  2149. <a name="l02145"></a>02145 <span class="keywordflow">return</span>;
  2150. <a name="l02146"></a>02146 }
  2151. <a name="l02147"></a>02147
  2152. <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>
  2153. <a name="l02149"></a>02149
  2154. <a name="l02150"></a>02150 <span class="comment">/* Kill all notes on the same channel with the same exclusive class */</span>
  2155. <a name="l02151"></a>02151
  2156. <a name="l02152"></a>02152 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  2157. <a name="l02153"></a>02153 fluid_voice_t* existing_voice = synth-&gt;voice[i];
  2158. <a name="l02154"></a>02154
  2159. <a name="l02155"></a>02155 <span class="comment">/* Existing voice does not play? Leave it alone. */</span>
  2160. <a name="l02156"></a>02156 <span class="keywordflow">if</span> (!_PLAYING(existing_voice)) {
  2161. <a name="l02157"></a>02157 <span class="keywordflow">continue</span>;
  2162. <a name="l02158"></a>02158 }
  2163. <a name="l02159"></a>02159
  2164. <a name="l02160"></a>02160 <span class="comment">/* An exclusive class is valid for a whole channel (or preset).</span>
  2165. <a name="l02161"></a>02161 <span class="comment"> * Is the voice on a different channel? Leave it alone. */</span>
  2166. <a name="l02162"></a>02162 <span class="keywordflow">if</span> (existing_voice-&gt;chan != new_voice-&gt;chan) {
  2167. <a name="l02163"></a>02163 <span class="keywordflow">continue</span>;
  2168. <a name="l02164"></a>02164 }
  2169. <a name="l02165"></a>02165
  2170. <a name="l02166"></a>02166 <span class="comment">/* Existing voice has a different (or no) exclusive class? Leave it alone. */</span>
  2171. <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) {
  2172. <a name="l02168"></a>02168 <span class="keywordflow">continue</span>;
  2173. <a name="l02169"></a>02169 }
  2174. <a name="l02170"></a>02170
  2175. <a name="l02171"></a>02171 <span class="comment">/* Existing voice is a voice process belonging to this noteon</span>
  2176. <a name="l02172"></a>02172 <span class="comment"> * event (for example: stereo sample)? Leave it alone. */</span>
  2177. <a name="l02173"></a>02173 <span class="keywordflow">if</span> (fluid_voice_get_id(existing_voice) == fluid_voice_get_id(new_voice)) {
  2178. <a name="l02174"></a>02174 <span class="keywordflow">continue</span>;
  2179. <a name="l02175"></a>02175 }
  2180. <a name="l02176"></a>02176
  2181. <a name="l02177"></a>02177 <span class="comment">// FLUID_LOG(FLUID_INFO, "Releasing previous voice of exclusive class (class=%d, id=%d)",</span>
  2182. <a name="l02178"></a>02178 <span class="comment">// (int)_GEN(existing_voice, GEN_EXCLUSIVECLASS), (int)fluid_voice_get_id(existing_voice));</span>
  2183. <a name="l02179"></a>02179
  2184. <a name="l02180"></a>02180 fluid_voice_kill_excl(existing_voice);
  2185. <a name="l02181"></a>02181 };
  2186. <a name="l02182"></a>02182 };
  2187. <a name="l02183"></a>02183
  2188. <a name="l02184"></a>02184 <span class="comment">/*</span>
  2189. <a name="l02185"></a>02185 <span class="comment"> * fluid_synth_start_voice</span>
  2190. <a name="l02186"></a>02186 <span class="comment"> */</span>
  2191. <a name="l02187"></a>02187 <span class="keywordtype">void</span> fluid_synth_start_voice(fluid_synth_t* synth, fluid_voice_t* voice)
  2192. <a name="l02188"></a>02188 {
  2193. <a name="l02189"></a>02189 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  2194. <a name="l02190"></a>02190 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  2195. <a name="l02191"></a>02191
  2196. <a name="l02192"></a>02192 <span class="comment">/* Find the exclusive class of this voice. If set, kill all voices</span>
  2197. <a name="l02193"></a>02193 <span class="comment"> * that match the exclusive class and are younger than the first</span>
  2198. <a name="l02194"></a>02194 <span class="comment"> * voice process created by this noteon event. */</span>
  2199. <a name="l02195"></a>02195 fluid_synth_kill_by_exclusive_class(synth, voice);
  2200. <a name="l02196"></a>02196
  2201. <a name="l02197"></a>02197 <span class="comment">/* Start the new voice */</span>
  2202. <a name="l02198"></a>02198
  2203. <a name="l02199"></a>02199 fluid_voice_start(voice);
  2204. <a name="l02200"></a>02200 }
  2205. <a name="l02201"></a>02201
  2206. <a name="l02202"></a>02202 <span class="comment">/*</span>
  2207. <a name="l02203"></a>02203 <span class="comment"> * fluid_synth_add_sfloader</span>
  2208. <a name="l02204"></a>02204 <span class="comment"> */</span>
  2209. <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)
  2210. <a name="l02206"></a>02206 {
  2211. <a name="l02207"></a>02207 synth-&gt;loaders = fluid_list_prepend(synth-&gt;loaders, loader);
  2212. <a name="l02208"></a>02208 }
  2213. <a name="l02209"></a>02209
  2214. <a name="l02210"></a>02210
  2215. <a name="l02211"></a>02211 <span class="comment">/*</span>
  2216. <a name="l02212"></a>02212 <span class="comment"> * fluid_synth_sfload</span>
  2217. <a name="l02213"></a>02213 <span class="comment"> */</span>
  2218. <a name="l02214"></a>02214 <span class="keywordtype">int</span>
  2219. <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)
  2220. <a name="l02216"></a>02216 {
  2221. <a name="l02217"></a>02217 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont;
  2222. <a name="l02218"></a>02218 fluid_list_t* list;
  2223. <a name="l02219"></a>02219 <a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>* loader;
  2224. <a name="l02220"></a>02220
  2225. <a name="l02221"></a>02221 <span class="preprocessor">#if defined(MACOS9)</span>
  2226. <a name="l02222"></a>02222 <span class="preprocessor"></span> fluid_synth_sfunload_macos9(synth);
  2227. <a name="l02223"></a>02223 <span class="preprocessor">#endif</span>
  2228. <a name="l02224"></a>02224 <span class="preprocessor"></span>
  2229. <a name="l02225"></a>02225 <span class="keywordflow">if</span> (filename == NULL) {
  2230. <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>);
  2231. <a name="l02227"></a>02227 <span class="keywordflow">return</span> FLUID_FAILED;
  2232. <a name="l02228"></a>02228 }
  2233. <a name="l02229"></a>02229
  2234. <a name="l02230"></a>02230 <span class="keywordflow">for</span> (list = synth-&gt;loaders; list; list = fluid_list_next(list)) {
  2235. <a name="l02231"></a>02231 loader = (<a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>*) fluid_list_get(list);
  2236. <a name="l02232"></a>02232
  2237. <a name="l02233"></a>02233 sfont = fluid_sfloader_load(loader, filename);
  2238. <a name="l02234"></a>02234
  2239. <a name="l02235"></a>02235 <span class="keywordflow">if</span> (sfont != NULL) {
  2240. <a name="l02236"></a>02236
  2241. <a name="l02237"></a>02237 sfont-&gt;<a class="code" href="struct__fluid__sfont__t.html#e955816cff10890c6369ac04733d37fb">id</a> = ++synth-&gt;sfont_id;
  2242. <a name="l02238"></a>02238
  2243. <a name="l02239"></a>02239 <span class="comment">/* insert the sfont as the first one on the list */</span>
  2244. <a name="l02240"></a>02240 synth-&gt;sfont = fluid_list_prepend(synth-&gt;sfont, sfont);
  2245. <a name="l02241"></a>02241
  2246. <a name="l02242"></a>02242 <span class="comment">/* reset the presets for all channels */</span>
  2247. <a name="l02243"></a>02243 <span class="keywordflow">if</span> (reset_presets) {
  2248. <a name="l02244"></a>02244 fluid_synth_program_reset(synth);
  2249. <a name="l02245"></a>02245 }
  2250. <a name="l02246"></a>02246
  2251. <a name="l02247"></a>02247 <span class="keywordflow">return</span> (<span class="keywordtype">int</span>) sfont-&gt;<a class="code" href="struct__fluid__sfont__t.html#e955816cff10890c6369ac04733d37fb">id</a>;
  2252. <a name="l02248"></a>02248 }
  2253. <a name="l02249"></a>02249 }
  2254. <a name="l02250"></a>02250
  2255. <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);
  2256. <a name="l02252"></a>02252 <span class="keywordflow">return</span> -1;
  2257. <a name="l02253"></a>02253 }
  2258. <a name="l02254"></a>02254
  2259. <a name="l02255"></a>02255 <span class="comment">/*</span>
  2260. <a name="l02256"></a>02256 <span class="comment"> * fluid_synth_sfunload_callback</span>
  2261. <a name="l02257"></a>02257 <span class="comment"> */</span>
  2262. <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)
  2263. <a name="l02259"></a>02259 {
  2264. <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;
  2265. <a name="l02261"></a>02261 <span class="keywordtype">int</span> r = delete_fluid_sfont(sfont);
  2266. <a name="l02262"></a>02262 <span class="keywordflow">if</span> (r == 0) {
  2267. <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>);
  2268. <a name="l02264"></a>02264 }
  2269. <a name="l02265"></a>02265 <span class="keywordflow">return</span> r != 0;
  2270. <a name="l02266"></a>02266 }
  2271. <a name="l02267"></a>02267
  2272. <a name="l02268"></a>02268 <span class="comment">/*</span>
  2273. <a name="l02269"></a>02269 <span class="comment"> * fluid_synth_sfunload_macos9</span>
  2274. <a name="l02270"></a>02270 <span class="comment"> */</span>
  2275. <a name="l02271"></a>02271 <span class="keywordtype">void</span> fluid_synth_sfunload_macos9(fluid_synth_t* synth)
  2276. <a name="l02272"></a>02272 {
  2277. <a name="l02273"></a>02273 <span class="preprocessor">#if defined(MACOS9)</span>
  2278. <a name="l02274"></a>02274 <span class="preprocessor"></span> fluid_list_t *list, *next;
  2279. <a name="l02275"></a>02275 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont;
  2280. <a name="l02276"></a>02276
  2281. <a name="l02277"></a>02277 list = synth-&gt;unloading;
  2282. <a name="l02278"></a>02278 <span class="keywordflow">while</span> (list) {
  2283. <a name="l02279"></a>02279 next = fluid_list_next(list);
  2284. <a name="l02280"></a>02280 sfont = (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) fluid_list_get(list);
  2285. <a name="l02281"></a>02281 <span class="keywordflow">if</span> (delete_fluid_sfont(sfont) == 0) {
  2286. <a name="l02282"></a>02282 synth-&gt;unloading = fluid_list_remove(synth-&gt;unloading, sfont);
  2287. <a name="l02283"></a>02283 }
  2288. <a name="l02284"></a>02284 list = next;
  2289. <a name="l02285"></a>02285 }
  2290. <a name="l02286"></a>02286 <span class="preprocessor">#endif</span>
  2291. <a name="l02287"></a>02287 <span class="preprocessor"></span>}
  2292. <a name="l02288"></a>02288
  2293. <a name="l02289"></a>02289 <span class="comment">/*</span>
  2294. <a name="l02290"></a>02290 <span class="comment"> * fluid_synth_sfunload</span>
  2295. <a name="l02291"></a>02291 <span class="comment"> */</span>
  2296. <a name="l02292"></a>02292 <span class="keywordtype">int</span>
  2297. <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)
  2298. <a name="l02294"></a>02294 {
  2299. <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>);
  2300. <a name="l02296"></a>02296
  2301. <a name="l02297"></a>02297 <span class="preprocessor">#if defined(MACOS9)</span>
  2302. <a name="l02298"></a>02298 <span class="preprocessor"></span> fluid_synth_sfunload_macos9(synth);
  2303. <a name="l02299"></a>02299 <span class="preprocessor">#endif</span>
  2304. <a name="l02300"></a>02300 <span class="preprocessor"></span>
  2305. <a name="l02301"></a>02301 <span class="keywordflow">if</span> (!sfont) {
  2306. <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>);
  2307. <a name="l02303"></a>02303 <span class="keywordflow">return</span> FLUID_FAILED;
  2308. <a name="l02304"></a>02304 }
  2309. <a name="l02305"></a>02305
  2310. <a name="l02306"></a>02306 <span class="comment">/* remove the SoundFont from the list */</span>
  2311. <a name="l02307"></a>02307 synth-&gt;sfont = fluid_list_remove(synth-&gt;sfont, sfont);
  2312. <a name="l02308"></a>02308
  2313. <a name="l02309"></a>02309 <span class="comment">/* reset the presets for all channels */</span>
  2314. <a name="l02310"></a>02310 <span class="keywordflow">if</span> (reset_presets) {
  2315. <a name="l02311"></a>02311 fluid_synth_program_reset(synth);
  2316. <a name="l02312"></a>02312 } <span class="keywordflow">else</span> {
  2317. <a name="l02313"></a>02313 fluid_synth_update_presets(synth);
  2318. <a name="l02314"></a>02314 }
  2319. <a name="l02315"></a>02315
  2320. <a name="l02316"></a>02316 <span class="keywordflow">if</span> (delete_fluid_sfont(sfont) != 0) {
  2321. <a name="l02317"></a>02317 <span class="preprocessor">#if defined(MACOS9)</span>
  2322. <a name="l02318"></a>02318 <span class="preprocessor"></span> synth-&gt;unloading = fluid_list_prepend(synth-&gt;unloading, sfont);
  2323. <a name="l02319"></a>02319 <span class="preprocessor">#else</span>
  2324. <a name="l02320"></a>02320 <span class="preprocessor"></span> <span class="comment">/* spin off a timer thread to unload the sfont later */</span>
  2325. <a name="l02321"></a>02321 new_fluid_timer(100, fluid_synth_sfunload_callback, sfont, 1, 1);
  2326. <a name="l02322"></a>02322 <span class="preprocessor">#endif</span>
  2327. <a name="l02323"></a>02323 <span class="preprocessor"></span> }
  2328. <a name="l02324"></a>02324
  2329. <a name="l02325"></a>02325 <span class="keywordflow">return</span> FLUID_OK;
  2330. <a name="l02326"></a>02326 }
  2331. <a name="l02327"></a>02327
  2332. <a name="l02328"></a>02328 <span class="comment">/* fluid_synth_sfreload</span>
  2333. <a name="l02329"></a>02329 <span class="comment"> *</span>
  2334. <a name="l02330"></a>02330 <span class="comment"> */</span>
  2335. <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>)
  2336. <a name="l02332"></a>02332 {
  2337. <a name="l02333"></a>02333 <span class="keywordtype">char</span> filename[1024];
  2338. <a name="l02334"></a>02334 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont;
  2339. <a name="l02335"></a>02335 <span class="keywordtype">int</span> index = 0;
  2340. <a name="l02336"></a>02336 fluid_list_t *list;
  2341. <a name="l02337"></a>02337 <a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>* loader;
  2342. <a name="l02338"></a>02338
  2343. <a name="l02339"></a>02339
  2344. <a name="l02340"></a>02340 sfont = fluid_synth_get_sfont_by_id(synth, <span class="keywordtype">id</span>);
  2345. <a name="l02341"></a>02341 <span class="keywordflow">if</span> (!sfont) {
  2346. <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>);
  2347. <a name="l02343"></a>02343 <span class="keywordflow">return</span> FLUID_FAILED;
  2348. <a name="l02344"></a>02344 }
  2349. <a name="l02345"></a>02345
  2350. <a name="l02346"></a>02346 <span class="comment">/* find the index of the SoundFont */</span>
  2351. <a name="l02347"></a>02347 list = synth-&gt;sfont;
  2352. <a name="l02348"></a>02348 <span class="keywordflow">while</span> (list) {
  2353. <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)) {
  2354. <a name="l02350"></a>02350 <span class="keywordflow">break</span>;
  2355. <a name="l02351"></a>02351 }
  2356. <a name="l02352"></a>02352 list = fluid_list_next(list);
  2357. <a name="l02353"></a>02353 index++;
  2358. <a name="l02354"></a>02354 }
  2359. <a name="l02355"></a>02355
  2360. <a name="l02356"></a>02356 <span class="comment">/* keep a copy of the SoundFont's filename */</span>
  2361. <a name="l02357"></a>02357 FLUID_STRCPY(filename, fluid_sfont_get_name(sfont));
  2362. <a name="l02358"></a>02358
  2363. <a name="l02359"></a>02359 <span class="keywordflow">if</span> (fluid_synth_sfunload(synth, <span class="keywordtype">id</span>, 0) != FLUID_OK) {
  2364. <a name="l02360"></a>02360 <span class="keywordflow">return</span> FLUID_FAILED;
  2365. <a name="l02361"></a>02361 }
  2366. <a name="l02362"></a>02362
  2367. <a name="l02363"></a>02363 <span class="keywordflow">for</span> (list = synth-&gt;loaders; list; list = fluid_list_next(list)) {
  2368. <a name="l02364"></a>02364 loader = (<a class="code" href="struct__fluid__sfloader__t.html">fluid_sfloader_t</a>*) fluid_list_get(list);
  2369. <a name="l02365"></a>02365
  2370. <a name="l02366"></a>02366 sfont = fluid_sfloader_load(loader, filename);
  2371. <a name="l02367"></a>02367
  2372. <a name="l02368"></a>02368 <span class="keywordflow">if</span> (sfont != NULL) {
  2373. <a name="l02369"></a>02369
  2374. <a name="l02370"></a>02370 sfont-&gt;<a class="code" href="struct__fluid__sfont__t.html#e955816cff10890c6369ac04733d37fb">id</a> = id;
  2375. <a name="l02371"></a>02371
  2376. <a name="l02372"></a>02372 <span class="comment">/* insert the sfont at the same index */</span>
  2377. <a name="l02373"></a>02373 synth-&gt;sfont = fluid_list_insert_at(synth-&gt;sfont, index, sfont);
  2378. <a name="l02374"></a>02374
  2379. <a name="l02375"></a>02375 <span class="comment">/* reset the presets for all channels */</span>
  2380. <a name="l02376"></a>02376 fluid_synth_update_presets(synth);
  2381. <a name="l02377"></a>02377
  2382. <a name="l02378"></a>02378 <span class="keywordflow">return</span> sfont-&gt;<a class="code" href="struct__fluid__sfont__t.html#e955816cff10890c6369ac04733d37fb">id</a>;
  2383. <a name="l02379"></a>02379 }
  2384. <a name="l02380"></a>02380 }
  2385. <a name="l02381"></a>02381
  2386. <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);
  2387. <a name="l02383"></a>02383 <span class="keywordflow">return</span> -1;
  2388. <a name="l02384"></a>02384 }
  2389. <a name="l02385"></a>02385
  2390. <a name="l02386"></a>02386
  2391. <a name="l02387"></a>02387 <span class="comment">/*</span>
  2392. <a name="l02388"></a>02388 <span class="comment"> * fluid_synth_add_sfont</span>
  2393. <a name="l02389"></a>02389 <span class="comment"> */</span>
  2394. <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)
  2395. <a name="l02391"></a>02391 {
  2396. <a name="l02392"></a>02392 sfont-&gt;<a class="code" href="struct__fluid__sfont__t.html#e955816cff10890c6369ac04733d37fb">id</a> = ++synth-&gt;sfont_id;
  2397. <a name="l02393"></a>02393
  2398. <a name="l02394"></a>02394 <span class="comment">/* insert the sfont as the first one on the list */</span>
  2399. <a name="l02395"></a>02395 synth-&gt;sfont = fluid_list_prepend(synth-&gt;sfont, sfont);
  2400. <a name="l02396"></a>02396
  2401. <a name="l02397"></a>02397 <span class="comment">/* reset the presets for all channels */</span>
  2402. <a name="l02398"></a>02398 fluid_synth_program_reset(synth);
  2403. <a name="l02399"></a>02399
  2404. <a name="l02400"></a>02400 <span class="keywordflow">return</span> sfont-&gt;<a class="code" href="struct__fluid__sfont__t.html#e955816cff10890c6369ac04733d37fb">id</a>;
  2405. <a name="l02401"></a>02401 }
  2406. <a name="l02402"></a>02402
  2407. <a name="l02403"></a>02403
  2408. <a name="l02404"></a>02404 <span class="comment">/*</span>
  2409. <a name="l02405"></a>02405 <span class="comment"> * fluid_synth_remove_sfont</span>
  2410. <a name="l02406"></a>02406 <span class="comment"> */</span>
  2411. <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)
  2412. <a name="l02408"></a>02408 {
  2413. <a name="l02409"></a>02409 <span class="keywordtype">int</span> sfont_id = fluid_sfont_get_id(sfont);
  2414. <a name="l02410"></a>02410
  2415. <a name="l02411"></a>02411 synth-&gt;sfont = fluid_list_remove(synth-&gt;sfont, sfont);
  2416. <a name="l02412"></a>02412
  2417. <a name="l02413"></a>02413 <span class="comment">/* remove a possible bank offset */</span>
  2418. <a name="l02414"></a>02414 fluid_synth_remove_bank_offset(synth, sfont_id);
  2419. <a name="l02415"></a>02415
  2420. <a name="l02416"></a>02416 <span class="comment">/* reset the presets for all channels */</span>
  2421. <a name="l02417"></a>02417 fluid_synth_program_reset(synth);
  2422. <a name="l02418"></a>02418 }
  2423. <a name="l02419"></a>02419
  2424. <a name="l02420"></a>02420
  2425. <a name="l02421"></a>02421 <span class="comment">/* fluid_synth_sfcount</span>
  2426. <a name="l02422"></a>02422 <span class="comment"> *</span>
  2427. <a name="l02423"></a>02423 <span class="comment"> * Returns the number of loaded SoundFonts</span>
  2428. <a name="l02424"></a>02424 <span class="comment"> */</span>
  2429. <a name="l02425"></a>02425 <span class="keywordtype">int</span>
  2430. <a name="l02426"></a>02426 fluid_synth_sfcount(fluid_synth_t* synth)
  2431. <a name="l02427"></a>02427 {
  2432. <a name="l02428"></a>02428 <span class="keywordflow">return</span> fluid_list_size(synth-&gt;sfont);
  2433. <a name="l02429"></a>02429 }
  2434. <a name="l02430"></a>02430
  2435. <a name="l02431"></a>02431 <span class="comment">/* fluid_synth_get_sfont</span>
  2436. <a name="l02432"></a>02432 <span class="comment"> *</span>
  2437. <a name="l02433"></a>02433 <span class="comment"> * Returns SoundFont num</span>
  2438. <a name="l02434"></a>02434 <span class="comment"> */</span>
  2439. <a name="l02435"></a>02435 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*
  2440. <a name="l02436"></a>02436 fluid_synth_get_sfont(fluid_synth_t* synth, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> num)
  2441. <a name="l02437"></a>02437 {
  2442. <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-&gt;sfont, num));
  2443. <a name="l02439"></a>02439 }
  2444. <a name="l02440"></a>02440
  2445. <a name="l02441"></a>02441 <span class="comment">/* fluid_synth_get_sfont_by_id</span>
  2446. <a name="l02442"></a>02442 <span class="comment"> *</span>
  2447. <a name="l02443"></a>02443 <span class="comment"> */</span>
  2448. <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>)
  2449. <a name="l02445"></a>02445 {
  2450. <a name="l02446"></a>02446 fluid_list_t* list = synth-&gt;sfont;
  2451. <a name="l02447"></a>02447 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont;
  2452. <a name="l02448"></a>02448
  2453. <a name="l02449"></a>02449 <span class="keywordflow">while</span> (list) {
  2454. <a name="l02450"></a>02450 sfont = (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) fluid_list_get(list);
  2455. <a name="l02451"></a>02451 <span class="keywordflow">if</span> (fluid_sfont_get_id(sfont) == id) {
  2456. <a name="l02452"></a>02452 <span class="keywordflow">return</span> sfont;
  2457. <a name="l02453"></a>02453 }
  2458. <a name="l02454"></a>02454 list = fluid_list_next(list);
  2459. <a name="l02455"></a>02455 }
  2460. <a name="l02456"></a>02456 <span class="keywordflow">return</span> NULL;
  2461. <a name="l02457"></a>02457 }
  2462. <a name="l02458"></a>02458
  2463. <a name="l02459"></a>02459 <span class="comment">/* fluid_synth_get_sfont_by_name</span>
  2464. <a name="l02460"></a>02460 <span class="comment"> *</span>
  2465. <a name="l02461"></a>02461 <span class="comment"> */</span>
  2466. <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)
  2467. <a name="l02463"></a>02463 {
  2468. <a name="l02464"></a>02464 fluid_list_t* list = synth-&gt;sfont;
  2469. <a name="l02465"></a>02465 <a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>* sfont;
  2470. <a name="l02466"></a>02466
  2471. <a name="l02467"></a>02467 <span class="keywordflow">while</span> (list) {
  2472. <a name="l02468"></a>02468 sfont = (<a class="code" href="struct__fluid__sfont__t.html">fluid_sfont_t</a>*) fluid_list_get(list);
  2473. <a name="l02469"></a>02469 <span class="keywordflow">if</span> (FLUID_STRCMP(fluid_sfont_get_name(sfont), name) == 0) {
  2474. <a name="l02470"></a>02470 <span class="keywordflow">return</span> sfont;
  2475. <a name="l02471"></a>02471 }
  2476. <a name="l02472"></a>02472 list = fluid_list_next(list);
  2477. <a name="l02473"></a>02473 }
  2478. <a name="l02474"></a>02474 <span class="keywordflow">return</span> NULL;
  2479. <a name="l02475"></a>02475 }
  2480. <a name="l02476"></a>02476
  2481. <a name="l02477"></a>02477 <span class="comment">/*</span>
  2482. <a name="l02478"></a>02478 <span class="comment"> * fluid_synth_get_channel_preset</span>
  2483. <a name="l02479"></a>02479 <span class="comment"> */</span>
  2484. <a name="l02480"></a>02480 <a class="code" href="struct__fluid__preset__t.html">fluid_preset_t</a>*
  2485. <a name="l02481"></a>02481 fluid_synth_get_channel_preset(fluid_synth_t* synth, <span class="keywordtype">int</span> chan)
  2486. <a name="l02482"></a>02482 {
  2487. <a name="l02483"></a>02483 <span class="keywordflow">if</span> ((chan &gt;= 0) &amp;&amp; (chan &lt; synth-&gt;midi_channels)) {
  2488. <a name="l02484"></a>02484 <span class="keywordflow">return</span> fluid_channel_get_preset(synth-&gt;channel[chan]);
  2489. <a name="l02485"></a>02485 }
  2490. <a name="l02486"></a>02486
  2491. <a name="l02487"></a>02487 <span class="keywordflow">return</span> NULL;
  2492. <a name="l02488"></a>02488 }
  2493. <a name="l02489"></a>02489
  2494. <a name="l02490"></a>02490 <span class="comment">/*</span>
  2495. <a name="l02491"></a>02491 <span class="comment"> * fluid_synth_get_voicelist</span>
  2496. <a name="l02492"></a>02492 <span class="comment"> */</span>
  2497. <a name="l02493"></a>02493 <span class="keywordtype">void</span>
  2498. <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)
  2499. <a name="l02495"></a>02495 {
  2500. <a name="l02496"></a>02496 <span class="keywordtype">int</span> i;
  2501. <a name="l02497"></a>02497 <span class="keywordtype">int</span> count = 0;
  2502. <a name="l02498"></a>02498 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  2503. <a name="l02499"></a>02499 fluid_voice_t* voice = synth-&gt;voice[i];
  2504. <a name="l02500"></a>02500 <span class="keywordflow">if</span> (count &gt;= bufsize) {
  2505. <a name="l02501"></a>02501 <span class="keywordflow">return</span>;
  2506. <a name="l02502"></a>02502 }
  2507. <a name="l02503"></a>02503
  2508. <a name="l02504"></a>02504 <span class="keywordflow">if</span> (_PLAYING(voice) &amp;&amp; ((<span class="keywordtype">int</span>)voice-&gt;id == ID || ID &lt; 0)) {
  2509. <a name="l02505"></a>02505 buf[count++] = voice;
  2510. <a name="l02506"></a>02506 }
  2511. <a name="l02507"></a>02507 }
  2512. <a name="l02508"></a>02508 <span class="keywordflow">if</span> (count &gt;= bufsize) {
  2513. <a name="l02509"></a>02509 <span class="keywordflow">return</span>;
  2514. <a name="l02510"></a>02510 }
  2515. <a name="l02511"></a>02511 buf[count++] = NULL;
  2516. <a name="l02512"></a>02512 }
  2517. <a name="l02513"></a>02513
  2518. <a name="l02514"></a>02514 <span class="comment">/* Purpose:</span>
  2519. <a name="l02515"></a>02515 <span class="comment"> * Turns on / off the reverb unit in the synth */</span>
  2520. <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)
  2521. <a name="l02517"></a>02517 {
  2522. <a name="l02518"></a>02518 synth-&gt;with_reverb = on;
  2523. <a name="l02519"></a>02519 }
  2524. <a name="l02520"></a>02520
  2525. <a name="l02521"></a>02521 <span class="comment">/* Purpose:</span>
  2526. <a name="l02522"></a>02522 <span class="comment"> * Turns on / off the chorus unit in the synth */</span>
  2527. <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)
  2528. <a name="l02524"></a>02524 {
  2529. <a name="l02525"></a>02525 synth-&gt;with_chorus = on;
  2530. <a name="l02526"></a>02526 }
  2531. <a name="l02527"></a>02527
  2532. <a name="l02528"></a>02528 <span class="comment">/* Purpose:</span>
  2533. <a name="l02529"></a>02529 <span class="comment"> * Reports the current setting of the chorus unit. */</span>
  2534. <a name="l02530"></a>02530 <span class="keywordtype">int</span> fluid_synth_get_chorus_nr(fluid_synth_t* synth)
  2535. <a name="l02531"></a>02531 {
  2536. <a name="l02532"></a>02532 <span class="keywordflow">return</span> fluid_chorus_get_nr(synth-&gt;chorus);
  2537. <a name="l02533"></a>02533 }
  2538. <a name="l02534"></a>02534
  2539. <a name="l02535"></a>02535 <span class="keywordtype">double</span> fluid_synth_get_chorus_level(fluid_synth_t* synth)
  2540. <a name="l02536"></a>02536 {
  2541. <a name="l02537"></a>02537 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>)fluid_chorus_get_level(synth-&gt;chorus);
  2542. <a name="l02538"></a>02538 }
  2543. <a name="l02539"></a>02539
  2544. <a name="l02540"></a>02540 <span class="keywordtype">double</span> fluid_synth_get_chorus_speed_Hz(fluid_synth_t* synth)
  2545. <a name="l02541"></a>02541 {
  2546. <a name="l02542"></a>02542 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>)fluid_chorus_get_speed_Hz(synth-&gt;chorus);
  2547. <a name="l02543"></a>02543 }
  2548. <a name="l02544"></a>02544
  2549. <a name="l02545"></a>02545 <span class="keywordtype">double</span> fluid_synth_get_chorus_depth_ms(fluid_synth_t* synth)
  2550. <a name="l02546"></a>02546 {
  2551. <a name="l02547"></a>02547 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>)fluid_chorus_get_depth_ms(synth-&gt;chorus);
  2552. <a name="l02548"></a>02548 }
  2553. <a name="l02549"></a>02549
  2554. <a name="l02550"></a>02550 <span class="keywordtype">int</span> fluid_synth_get_chorus_type(fluid_synth_t* synth)
  2555. <a name="l02551"></a>02551 {
  2556. <a name="l02552"></a>02552 <span class="keywordflow">return</span> fluid_chorus_get_type(synth-&gt;chorus);
  2557. <a name="l02553"></a>02553 }
  2558. <a name="l02554"></a>02554
  2559. <a name="l02555"></a>02555 <span class="comment">/* Purpose:</span>
  2560. <a name="l02556"></a>02556 <span class="comment"> * Returns the current settings_old of the reverb unit */</span>
  2561. <a name="l02557"></a>02557 <span class="keywordtype">double</span> fluid_synth_get_reverb_roomsize(fluid_synth_t* synth)
  2562. <a name="l02558"></a>02558 {
  2563. <a name="l02559"></a>02559 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>)fluid_revmodel_getroomsize(synth-&gt;reverb);
  2564. <a name="l02560"></a>02560 }
  2565. <a name="l02561"></a>02561
  2566. <a name="l02562"></a>02562 <span class="keywordtype">double</span> fluid_synth_get_reverb_damp(fluid_synth_t* synth)
  2567. <a name="l02563"></a>02563 {
  2568. <a name="l02564"></a>02564 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>) fluid_revmodel_getdamp(synth-&gt;reverb);
  2569. <a name="l02565"></a>02565 }
  2570. <a name="l02566"></a>02566
  2571. <a name="l02567"></a>02567 <span class="keywordtype">double</span> fluid_synth_get_reverb_level(fluid_synth_t* synth)
  2572. <a name="l02568"></a>02568 {
  2573. <a name="l02569"></a>02569 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>) fluid_revmodel_getlevel(synth-&gt;reverb);
  2574. <a name="l02570"></a>02570 }
  2575. <a name="l02571"></a>02571
  2576. <a name="l02572"></a>02572 <span class="keywordtype">double</span> fluid_synth_get_reverb_width(fluid_synth_t* synth)
  2577. <a name="l02573"></a>02573 {
  2578. <a name="l02574"></a>02574 <span class="keywordflow">return</span> (<span class="keywordtype">double</span>) fluid_revmodel_getwidth(synth-&gt;reverb);
  2579. <a name="l02575"></a>02575 }
  2580. <a name="l02576"></a>02576
  2581. <a name="l02577"></a>02577 <span class="comment">/* Purpose:</span>
  2582. <a name="l02578"></a>02578 <span class="comment"> *</span>
  2583. <a name="l02579"></a>02579 <span class="comment"> * If the same note is hit twice on the same channel, then the older</span>
  2584. <a name="l02580"></a>02580 <span class="comment"> * voice process is advanced to the release stage. Using a mechanical</span>
  2585. <a name="l02581"></a>02581 <span class="comment"> * MIDI controller, the only way this can happen is when the sustain</span>
  2586. <a name="l02582"></a>02582 <span class="comment"> * pedal is held. In this case the behaviour implemented here is</span>
  2587. <a name="l02583"></a>02583 <span class="comment"> * natural for many instruments. Note: One noteon event can trigger</span>
  2588. <a name="l02584"></a>02584 <span class="comment"> * several voice processes, for example a stereo sample. Don't</span>
  2589. <a name="l02585"></a>02585 <span class="comment"> * release those...</span>
  2590. <a name="l02586"></a>02586 <span class="comment"> */</span>
  2591. <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){
  2592. <a name="l02588"></a>02588 <span class="keywordtype">int</span> i;
  2593. <a name="l02589"></a>02589 fluid_voice_t* voice;
  2594. <a name="l02590"></a>02590
  2595. <a name="l02591"></a>02591 <span class="comment">/* fluid_mutex_lock(synth-&gt;busy); /\* Don't interfere with the audio thread *\/ */</span>
  2596. <a name="l02592"></a>02592 <span class="comment">/* fluid_mutex_unlock(synth-&gt;busy); */</span>
  2597. <a name="l02593"></a>02593
  2598. <a name="l02594"></a>02594 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  2599. <a name="l02595"></a>02595 voice = synth-&gt;voice[i];
  2600. <a name="l02596"></a>02596 <span class="keywordflow">if</span> (_PLAYING(voice)
  2601. <a name="l02597"></a>02597 &amp;&amp; (voice-&gt;chan == chan)
  2602. <a name="l02598"></a>02598 &amp;&amp; (voice-&gt;key == key)
  2603. <a name="l02599"></a>02599 &amp;&amp; (fluid_voice_get_id(voice) != synth-&gt;noteid)) {
  2604. <a name="l02600"></a>02600 fluid_voice_noteoff(voice);
  2605. <a name="l02601"></a>02601 }
  2606. <a name="l02602"></a>02602 }
  2607. <a name="l02603"></a>02603 }
  2608. <a name="l02604"></a>02604
  2609. <a name="l02605"></a>02605 <span class="comment">/* Purpose:</span>
  2610. <a name="l02606"></a>02606 <span class="comment"> * Sets the interpolation method to use on channel chan.</span>
  2611. <a name="l02607"></a>02607 <span class="comment"> * If chan is &lt; 0, then set the interpolation method on all channels.</span>
  2612. <a name="l02608"></a>02608 <span class="comment"> */</span>
  2613. <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){
  2614. <a name="l02610"></a>02610 <span class="keywordtype">int</span> i;
  2615. <a name="l02611"></a>02611 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;midi_channels; i++) {
  2616. <a name="l02612"></a>02612 <span class="keywordflow">if</span> (synth-&gt;channel[i] == NULL){
  2617. <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>);
  2618. <a name="l02614"></a>02614 <span class="keywordflow">return</span> FLUID_FAILED;
  2619. <a name="l02615"></a>02615 };
  2620. <a name="l02616"></a>02616 <span class="keywordflow">if</span> (chan &lt; 0 || fluid_channel_get_num(synth-&gt;channel[i]) == chan){
  2621. <a name="l02617"></a>02617 fluid_channel_set_interp_method(synth-&gt;channel[i], interp_method);
  2622. <a name="l02618"></a>02618 };
  2623. <a name="l02619"></a>02619 };
  2624. <a name="l02620"></a>02620 <span class="keywordflow">return</span> FLUID_OK;
  2625. <a name="l02621"></a>02621 };
  2626. <a name="l02622"></a>02622
  2627. <a name="l02623"></a>02623 <span class="comment">/* Purpose:</span>
  2628. <a name="l02624"></a>02624 <span class="comment"> * Returns the number of allocated midi channels</span>
  2629. <a name="l02625"></a>02625 <span class="comment"> */</span>
  2630. <a name="l02626"></a>02626 <span class="keywordtype">int</span>
  2631. <a name="l02627"></a>02627 fluid_synth_count_midi_channels(fluid_synth_t* synth)
  2632. <a name="l02628"></a>02628 {
  2633. <a name="l02629"></a>02629 <span class="keywordflow">return</span> synth-&gt;midi_channels;
  2634. <a name="l02630"></a>02630 }
  2635. <a name="l02631"></a>02631
  2636. <a name="l02632"></a>02632 <span class="comment">/* Purpose:</span>
  2637. <a name="l02633"></a>02633 <span class="comment"> * Returns the number of allocated audio channels</span>
  2638. <a name="l02634"></a>02634 <span class="comment"> */</span>
  2639. <a name="l02635"></a>02635 <span class="keywordtype">int</span>
  2640. <a name="l02636"></a>02636 fluid_synth_count_audio_channels(fluid_synth_t* synth)
  2641. <a name="l02637"></a>02637 {
  2642. <a name="l02638"></a>02638 <span class="keywordflow">return</span> synth-&gt;audio_channels;
  2643. <a name="l02639"></a>02639 }
  2644. <a name="l02640"></a>02640
  2645. <a name="l02641"></a>02641 <span class="comment">/* Purpose:</span>
  2646. <a name="l02642"></a>02642 <span class="comment"> * Returns the number of allocated audio channels</span>
  2647. <a name="l02643"></a>02643 <span class="comment"> */</span>
  2648. <a name="l02644"></a>02644 <span class="keywordtype">int</span>
  2649. <a name="l02645"></a>02645 fluid_synth_count_audio_groups(fluid_synth_t* synth)
  2650. <a name="l02646"></a>02646 {
  2651. <a name="l02647"></a>02647 <span class="keywordflow">return</span> synth-&gt;audio_groups;
  2652. <a name="l02648"></a>02648 }
  2653. <a name="l02649"></a>02649
  2654. <a name="l02650"></a>02650 <span class="comment">/* Purpose:</span>
  2655. <a name="l02651"></a>02651 <span class="comment"> * Returns the number of allocated effects channels</span>
  2656. <a name="l02652"></a>02652 <span class="comment"> */</span>
  2657. <a name="l02653"></a>02653 <span class="keywordtype">int</span>
  2658. <a name="l02654"></a>02654 fluid_synth_count_effects_channels(fluid_synth_t* synth)
  2659. <a name="l02655"></a>02655 {
  2660. <a name="l02656"></a>02656 <span class="keywordflow">return</span> synth-&gt;effects_channels;
  2661. <a name="l02657"></a>02657 }
  2662. <a name="l02658"></a>02658
  2663. <a name="l02659"></a>02659 <span class="keywordtype">double</span> fluid_synth_get_cpu_load(fluid_synth_t* synth)
  2664. <a name="l02660"></a>02660 {
  2665. <a name="l02661"></a>02661 <span class="keywordflow">return</span> synth-&gt;cpu_load;
  2666. <a name="l02662"></a>02662 }
  2667. <a name="l02663"></a>02663
  2668. <a name="l02664"></a>02664 <span class="keyword">static</span> fluid_tuning_t*
  2669. <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)
  2670. <a name="l02666"></a>02666 {
  2671. <a name="l02667"></a>02667 <span class="keywordflow">if</span> ((bank &lt; 0) || (bank &gt;= 128)) {
  2672. <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>);
  2673. <a name="l02669"></a>02669 <span class="keywordflow">return</span> NULL;
  2674. <a name="l02670"></a>02670 }
  2675. <a name="l02671"></a>02671 <span class="keywordflow">if</span> ((prog &lt; 0) || (prog &gt;= 128)) {
  2676. <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>);
  2677. <a name="l02673"></a>02673 <span class="keywordflow">return</span> NULL;
  2678. <a name="l02674"></a>02674 }
  2679. <a name="l02675"></a>02675 <span class="keywordflow">if</span> ((synth-&gt;tuning == NULL) ||
  2680. <a name="l02676"></a>02676 (synth-&gt;tuning[bank] == NULL) ||
  2681. <a name="l02677"></a>02677 (synth-&gt;tuning[bank][prog] == NULL)) {
  2682. <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);
  2683. <a name="l02679"></a>02679 <span class="keywordflow">return</span> NULL;
  2684. <a name="l02680"></a>02680 }
  2685. <a name="l02681"></a>02681 <span class="keywordflow">return</span> synth-&gt;tuning[bank][prog];
  2686. <a name="l02682"></a>02682 }
  2687. <a name="l02683"></a>02683
  2688. <a name="l02684"></a>02684 <span class="keyword">static</span> fluid_tuning_t*
  2689. <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)
  2690. <a name="l02686"></a>02686 {
  2691. <a name="l02687"></a>02687 <span class="keywordflow">if</span> ((bank &lt; 0) || (bank &gt;= 128)) {
  2692. <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>);
  2693. <a name="l02689"></a>02689 <span class="keywordflow">return</span> NULL;
  2694. <a name="l02690"></a>02690 }
  2695. <a name="l02691"></a>02691 <span class="keywordflow">if</span> ((prog &lt; 0) || (prog &gt;= 128)) {
  2696. <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>);
  2697. <a name="l02693"></a>02693 <span class="keywordflow">return</span> NULL;
  2698. <a name="l02694"></a>02694 }
  2699. <a name="l02695"></a>02695 <span class="keywordflow">if</span> (synth-&gt;tuning == NULL) {
  2700. <a name="l02696"></a>02696 synth-&gt;tuning = FLUID_ARRAY(fluid_tuning_t**, 128);
  2701. <a name="l02697"></a>02697 <span class="keywordflow">if</span> (synth-&gt;tuning == NULL) {
  2702. <a name="l02698"></a>02698 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e62d9ddd89d0a853606ce38d195daa99a" title="The synth can&amp;#39;t function correctly any more.">FLUID_PANIC</a>, <span class="stringliteral">"Out of memory"</span>);
  2703. <a name="l02699"></a>02699 <span class="keywordflow">return</span> NULL;
  2704. <a name="l02700"></a>02700 }
  2705. <a name="l02701"></a>02701 FLUID_MEMSET(synth-&gt;tuning, 0, 128 * <span class="keyword">sizeof</span>(fluid_tuning_t**));
  2706. <a name="l02702"></a>02702 }
  2707. <a name="l02703"></a>02703
  2708. <a name="l02704"></a>02704 <span class="keywordflow">if</span> (synth-&gt;tuning[bank] == NULL) {
  2709. <a name="l02705"></a>02705 synth-&gt;tuning[bank] = FLUID_ARRAY(fluid_tuning_t*, 128);
  2710. <a name="l02706"></a>02706 <span class="keywordflow">if</span> (synth-&gt;tuning[bank] == NULL) {
  2711. <a name="l02707"></a>02707 FLUID_LOG(<a class="code" href="log_8h.html#a341232c15addd9c336131984840ed9e62d9ddd89d0a853606ce38d195daa99a" title="The synth can&amp;#39;t function correctly any more.">FLUID_PANIC</a>, <span class="stringliteral">"Out of memory"</span>);
  2712. <a name="l02708"></a>02708 <span class="keywordflow">return</span> NULL;
  2713. <a name="l02709"></a>02709 }
  2714. <a name="l02710"></a>02710 FLUID_MEMSET(synth-&gt;tuning[bank], 0, 128 * <span class="keyword">sizeof</span>(fluid_tuning_t*));
  2715. <a name="l02711"></a>02711 }
  2716. <a name="l02712"></a>02712
  2717. <a name="l02713"></a>02713 <span class="keywordflow">if</span> (synth-&gt;tuning[bank][prog] == NULL) {
  2718. <a name="l02714"></a>02714 synth-&gt;tuning[bank][prog] = new_fluid_tuning(name, bank, prog);
  2719. <a name="l02715"></a>02715 <span class="keywordflow">if</span> (synth-&gt;tuning[bank][prog] == NULL) {
  2720. <a name="l02716"></a>02716 <span class="keywordflow">return</span> NULL;
  2721. <a name="l02717"></a>02717 }
  2722. <a name="l02718"></a>02718 }
  2723. <a name="l02719"></a>02719
  2724. <a name="l02720"></a>02720 <span class="keywordflow">if</span> ((fluid_tuning_get_name(synth-&gt;tuning[bank][prog]) == NULL)
  2725. <a name="l02721"></a>02721 || (FLUID_STRCMP(fluid_tuning_get_name(synth-&gt;tuning[bank][prog]), name) != 0)) {
  2726. <a name="l02722"></a>02722 fluid_tuning_set_name(synth-&gt;tuning[bank][prog], name);
  2727. <a name="l02723"></a>02723 }
  2728. <a name="l02724"></a>02724
  2729. <a name="l02725"></a>02725 <span class="keywordflow">return</span> synth-&gt;tuning[bank][prog];
  2730. <a name="l02726"></a>02726 }
  2731. <a name="l02727"></a>02727
  2732. <a name="l02728"></a>02728 <span class="keywordtype">int</span> fluid_synth_create_key_tuning(fluid_synth_t* synth,
  2733. <a name="l02729"></a>02729 <span class="keywordtype">int</span> bank, <span class="keywordtype">int</span> prog,
  2734. <a name="l02730"></a>02730 <span class="keywordtype">char</span>* name, <span class="keywordtype">double</span>* pitch)
  2735. <a name="l02731"></a>02731 {
  2736. <a name="l02732"></a>02732 fluid_tuning_t* tuning = fluid_synth_create_tuning(synth, bank, prog, name);
  2737. <a name="l02733"></a>02733 <span class="keywordflow">if</span> (tuning == NULL) {
  2738. <a name="l02734"></a>02734 <span class="keywordflow">return</span> FLUID_FAILED;
  2739. <a name="l02735"></a>02735 }
  2740. <a name="l02736"></a>02736 <span class="keywordflow">if</span> (pitch) {
  2741. <a name="l02737"></a>02737 fluid_tuning_set_all(tuning, pitch);
  2742. <a name="l02738"></a>02738 }
  2743. <a name="l02739"></a>02739 <span class="keywordflow">return</span> FLUID_OK;
  2744. <a name="l02740"></a>02740 }
  2745. <a name="l02741"></a>02741
  2746. <a name="l02742"></a>02742
  2747. <a name="l02743"></a>02743 <span class="keywordtype">int</span> fluid_synth_create_octave_tuning(fluid_synth_t* synth,
  2748. <a name="l02744"></a>02744 <span class="keywordtype">int</span> bank, <span class="keywordtype">int</span> prog,
  2749. <a name="l02745"></a>02745 <span class="keywordtype">char</span>* name, <span class="keywordtype">double</span>* pitch)
  2750. <a name="l02746"></a>02746 {
  2751. <a name="l02747"></a>02747 fluid_tuning_t* tuning = fluid_synth_create_tuning(synth, bank, prog, name);
  2752. <a name="l02748"></a>02748 <span class="keywordflow">if</span> (tuning == NULL) {
  2753. <a name="l02749"></a>02749 <span class="keywordflow">return</span> FLUID_FAILED;
  2754. <a name="l02750"></a>02750 }
  2755. <a name="l02751"></a>02751 fluid_tuning_set_octave(tuning, pitch);
  2756. <a name="l02752"></a>02752 <span class="keywordflow">return</span> FLUID_OK;
  2757. <a name="l02753"></a>02753 }
  2758. <a name="l02754"></a>02754
  2759. <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,
  2760. <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)
  2761. <a name="l02757"></a>02757 {
  2762. <a name="l02758"></a>02758 fluid_tuning_t* tuning = fluid_synth_get_tuning(synth, bank, prog);
  2763. <a name="l02759"></a>02759 <span class="keywordtype">int</span> i;
  2764. <a name="l02760"></a>02760
  2765. <a name="l02761"></a>02761 <span class="keywordflow">if</span> (tuning == NULL) {
  2766. <a name="l02762"></a>02762 <span class="keywordflow">return</span> FLUID_FAILED;
  2767. <a name="l02763"></a>02763 }
  2768. <a name="l02764"></a>02764
  2769. <a name="l02765"></a>02765 <span class="keywordflow">for</span> (i = 0; i &lt; len; i++) {
  2770. <a name="l02766"></a>02766 fluid_tuning_set_pitch(tuning, key[i], pitch[i]);
  2771. <a name="l02767"></a>02767 }
  2772. <a name="l02768"></a>02768
  2773. <a name="l02769"></a>02769 <span class="keywordflow">return</span> FLUID_OK;
  2774. <a name="l02770"></a>02770 }
  2775. <a name="l02771"></a>02771
  2776. <a name="l02772"></a>02772 <span class="keywordtype">int</span> fluid_synth_select_tuning(fluid_synth_t* synth, <span class="keywordtype">int</span> chan,
  2777. <a name="l02773"></a>02773 <span class="keywordtype">int</span> bank, <span class="keywordtype">int</span> prog)
  2778. <a name="l02774"></a>02774 {
  2779. <a name="l02775"></a>02775 fluid_tuning_t* tuning = fluid_synth_get_tuning(synth, bank, prog);
  2780. <a name="l02776"></a>02776
  2781. <a name="l02777"></a>02777 <span class="keywordflow">if</span> (tuning == NULL) {
  2782. <a name="l02778"></a>02778 <span class="keywordflow">return</span> FLUID_FAILED;
  2783. <a name="l02779"></a>02779 }
  2784. <a name="l02780"></a>02780 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  2785. <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>);
  2786. <a name="l02782"></a>02782 <span class="keywordflow">return</span> FLUID_FAILED;
  2787. <a name="l02783"></a>02783 }
  2788. <a name="l02784"></a>02784
  2789. <a name="l02785"></a>02785 fluid_channel_set_tuning(synth-&gt;channel[chan], synth-&gt;tuning[bank][prog]);
  2790. <a name="l02786"></a>02786
  2791. <a name="l02787"></a>02787 <span class="keywordflow">return</span> FLUID_OK;
  2792. <a name="l02788"></a>02788 }
  2793. <a name="l02789"></a>02789
  2794. <a name="l02790"></a>02790 <span class="keywordtype">int</span> fluid_synth_reset_tuning(fluid_synth_t* synth, <span class="keywordtype">int</span> chan)
  2795. <a name="l02791"></a>02791 {
  2796. <a name="l02792"></a>02792 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  2797. <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>);
  2798. <a name="l02794"></a>02794 <span class="keywordflow">return</span> FLUID_FAILED;
  2799. <a name="l02795"></a>02795 }
  2800. <a name="l02796"></a>02796
  2801. <a name="l02797"></a>02797 fluid_channel_set_tuning(synth-&gt;channel[chan], NULL);
  2802. <a name="l02798"></a>02798
  2803. <a name="l02799"></a>02799 <span class="keywordflow">return</span> FLUID_OK;
  2804. <a name="l02800"></a>02800 }
  2805. <a name="l02801"></a>02801
  2806. <a name="l02802"></a>02802 <span class="keywordtype">void</span> fluid_synth_tuning_iteration_start(fluid_synth_t* synth)
  2807. <a name="l02803"></a>02803 {
  2808. <a name="l02804"></a>02804 synth-&gt;cur_tuning = NULL;
  2809. <a name="l02805"></a>02805 }
  2810. <a name="l02806"></a>02806
  2811. <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)
  2812. <a name="l02808"></a>02808 {
  2813. <a name="l02809"></a>02809 <span class="keywordtype">int</span> b = 0, p = 0;
  2814. <a name="l02810"></a>02810
  2815. <a name="l02811"></a>02811 <span class="keywordflow">if</span> (synth-&gt;tuning == NULL) {
  2816. <a name="l02812"></a>02812 <span class="keywordflow">return</span> 0;
  2817. <a name="l02813"></a>02813 }
  2818. <a name="l02814"></a>02814
  2819. <a name="l02815"></a>02815 <span class="keywordflow">if</span> (synth-&gt;cur_tuning != NULL) {
  2820. <a name="l02816"></a>02816 <span class="comment">/* get the next program number */</span>
  2821. <a name="l02817"></a>02817 b = fluid_tuning_get_bank(synth-&gt;cur_tuning);
  2822. <a name="l02818"></a>02818 p = 1 + fluid_tuning_get_prog(synth-&gt;cur_tuning);
  2823. <a name="l02819"></a>02819 <span class="keywordflow">if</span> (p &gt;= 128) {
  2824. <a name="l02820"></a>02820 p = 0;
  2825. <a name="l02821"></a>02821 b++;
  2826. <a name="l02822"></a>02822 }
  2827. <a name="l02823"></a>02823 }
  2828. <a name="l02824"></a>02824
  2829. <a name="l02825"></a>02825 <span class="keywordflow">while</span> (b &lt; 128) {
  2830. <a name="l02826"></a>02826 <span class="keywordflow">if</span> (synth-&gt;tuning[b] != NULL) {
  2831. <a name="l02827"></a>02827 <span class="keywordflow">while</span> (p &lt; 128) {
  2832. <a name="l02828"></a>02828 <span class="keywordflow">if</span> (synth-&gt;tuning[b][p] != NULL) {
  2833. <a name="l02829"></a>02829 synth-&gt;cur_tuning = synth-&gt;tuning[b][p];
  2834. <a name="l02830"></a>02830 *bank = b;
  2835. <a name="l02831"></a>02831 *prog = p;
  2836. <a name="l02832"></a>02832 <span class="keywordflow">return</span> 1;
  2837. <a name="l02833"></a>02833 }
  2838. <a name="l02834"></a>02834 p++;
  2839. <a name="l02835"></a>02835 }
  2840. <a name="l02836"></a>02836 }
  2841. <a name="l02837"></a>02837 p = 0;
  2842. <a name="l02838"></a>02838 b++;
  2843. <a name="l02839"></a>02839 }
  2844. <a name="l02840"></a>02840
  2845. <a name="l02841"></a>02841 <span class="keywordflow">return</span> 0;
  2846. <a name="l02842"></a>02842 }
  2847. <a name="l02843"></a>02843
  2848. <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,
  2849. <a name="l02845"></a>02845 <span class="keywordtype">char</span>* name, <span class="keywordtype">int</span> len, <span class="keywordtype">double</span>* pitch)
  2850. <a name="l02846"></a>02846 {
  2851. <a name="l02847"></a>02847 fluid_tuning_t* tuning = fluid_synth_get_tuning(synth, bank, prog);
  2852. <a name="l02848"></a>02848
  2853. <a name="l02849"></a>02849 <span class="keywordflow">if</span> (tuning == NULL) {
  2854. <a name="l02850"></a>02850 <span class="keywordflow">return</span> FLUID_FAILED;
  2855. <a name="l02851"></a>02851 }
  2856. <a name="l02852"></a>02852
  2857. <a name="l02853"></a>02853 <span class="keywordflow">if</span> (name) {
  2858. <a name="l02854"></a>02854 snprintf(name, len - 1, <span class="stringliteral">"%s"</span>, fluid_tuning_get_name(tuning));
  2859. <a name="l02855"></a>02855 name[len - 1] = 0; <span class="comment">/* make sure the string is null terminated */</span>
  2860. <a name="l02856"></a>02856 }
  2861. <a name="l02857"></a>02857 <span class="keywordflow">if</span> (pitch) {
  2862. <a name="l02858"></a>02858 FLUID_MEMCPY(pitch, fluid_tuning_get_all(tuning), 128 * <span class="keyword">sizeof</span>(<span class="keywordtype">double</span>));
  2863. <a name="l02859"></a>02859 }
  2864. <a name="l02860"></a>02860
  2865. <a name="l02861"></a>02861 <span class="keywordflow">return</span> FLUID_OK;
  2866. <a name="l02862"></a>02862 }
  2867. <a name="l02863"></a>02863
  2868. <a name="l02864"></a>02864 fluid_settings_t* fluid_synth_get_settings(fluid_synth_t* synth)
  2869. <a name="l02865"></a>02865 {
  2870. <a name="l02866"></a>02866 <span class="keywordflow">return</span> synth-&gt;settings;
  2871. <a name="l02867"></a>02867 }
  2872. <a name="l02868"></a>02868
  2873. <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)
  2874. <a name="l02870"></a>02870 {
  2875. <a name="l02871"></a>02871 <span class="keywordflow">return</span> fluid_settings_setstr(synth-&gt;settings, name, str);
  2876. <a name="l02872"></a>02872 }
  2877. <a name="l02873"></a>02873
  2878. <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)
  2879. <a name="l02875"></a>02875 {
  2880. <a name="l02876"></a>02876 <span class="keywordflow">return</span> fluid_settings_getstr(synth-&gt;settings, name, str);
  2881. <a name="l02877"></a>02877 }
  2882. <a name="l02878"></a>02878
  2883. <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)
  2884. <a name="l02880"></a>02880 {
  2885. <a name="l02881"></a>02881 <span class="keywordflow">return</span> fluid_settings_setnum(synth-&gt;settings, name, val);
  2886. <a name="l02882"></a>02882 }
  2887. <a name="l02883"></a>02883
  2888. <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)
  2889. <a name="l02885"></a>02885 {
  2890. <a name="l02886"></a>02886 <span class="keywordflow">return</span> fluid_settings_getnum(synth-&gt;settings, name, val);
  2891. <a name="l02887"></a>02887 }
  2892. <a name="l02888"></a>02888
  2893. <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)
  2894. <a name="l02890"></a>02890 {
  2895. <a name="l02891"></a>02891 <span class="keywordflow">return</span> fluid_settings_setint(synth-&gt;settings, name, val);
  2896. <a name="l02892"></a>02892 }
  2897. <a name="l02893"></a>02893
  2898. <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)
  2899. <a name="l02895"></a>02895 {
  2900. <a name="l02896"></a>02896 <span class="keywordflow">return</span> fluid_settings_getint(synth-&gt;settings, name, val);
  2901. <a name="l02897"></a>02897 }
  2902. <a name="l02898"></a>02898
  2903. <a name="l02899"></a>02899 <span class="keywordtype">int</span>
  2904. <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)
  2905. <a name="l02901"></a>02901 {
  2906. <a name="l02902"></a>02902 <span class="keywordtype">int</span> i;
  2907. <a name="l02903"></a>02903 fluid_voice_t* voice;
  2908. <a name="l02904"></a>02904
  2909. <a name="l02905"></a>02905 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  2910. <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>);
  2911. <a name="l02907"></a>02907 <span class="keywordflow">return</span> FLUID_FAILED;
  2912. <a name="l02908"></a>02908 }
  2913. <a name="l02909"></a>02909
  2914. <a name="l02910"></a>02910 <span class="keywordflow">if</span> ((param &lt; 0) || (param &gt;= <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b49c372c341b7b1a718f0016f40c615cf3" title="Value defines the count of generators (fluid_gen_type).">GEN_LAST</a>)) {
  2915. <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>);
  2916. <a name="l02912"></a>02912 <span class="keywordflow">return</span> FLUID_FAILED;
  2917. <a name="l02913"></a>02913 }
  2918. <a name="l02914"></a>02914
  2919. <a name="l02915"></a>02915 fluid_channel_set_gen(synth-&gt;channel[chan], param, value, 0);
  2920. <a name="l02916"></a>02916
  2921. <a name="l02917"></a>02917 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  2922. <a name="l02918"></a>02918 voice = synth-&gt;voice[i];
  2923. <a name="l02919"></a>02919 <span class="keywordflow">if</span> (voice-&gt;chan == chan) {
  2924. <a name="l02920"></a>02920 fluid_voice_set_param(voice, param, value, 0);
  2925. <a name="l02921"></a>02921 }
  2926. <a name="l02922"></a>02922 }
  2927. <a name="l02923"></a>02923
  2928. <a name="l02924"></a>02924 <span class="keywordflow">return</span> FLUID_OK;
  2929. <a name="l02925"></a>02925 }
  2930. <a name="l02926"></a>02926
  2931. <a name="l02950"></a>02950 <span class="keywordtype">int</span>
  2932. <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,
  2933. <a name="l02952"></a>02952 <span class="keywordtype">float</span> value, <span class="keywordtype">int</span> absolute, <span class="keywordtype">int</span> normalized)
  2934. <a name="l02953"></a>02953 {
  2935. <a name="l02954"></a>02954 <span class="keywordtype">int</span> i;
  2936. <a name="l02955"></a>02955 fluid_voice_t* voice;
  2937. <a name="l02956"></a>02956 <span class="keywordtype">float</span> v;
  2938. <a name="l02957"></a>02957
  2939. <a name="l02958"></a>02958 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  2940. <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>);
  2941. <a name="l02960"></a>02960 <span class="keywordflow">return</span> FLUID_FAILED;
  2942. <a name="l02961"></a>02961 }
  2943. <a name="l02962"></a>02962
  2944. <a name="l02963"></a>02963 <span class="keywordflow">if</span> ((param &lt; 0) || (param &gt;= <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b49c372c341b7b1a718f0016f40c615cf3" title="Value defines the count of generators (fluid_gen_type).">GEN_LAST</a>)) {
  2945. <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>);
  2946. <a name="l02965"></a>02965 <span class="keywordflow">return</span> FLUID_FAILED;
  2947. <a name="l02966"></a>02966 }
  2948. <a name="l02967"></a>02967
  2949. <a name="l02968"></a>02968 v = (normalized)? fluid_gen_scale(param, value) : value;
  2950. <a name="l02969"></a>02969
  2951. <a name="l02970"></a>02970 fluid_channel_set_gen(synth-&gt;channel[chan], param, v, absolute);
  2952. <a name="l02971"></a>02971
  2953. <a name="l02972"></a>02972 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  2954. <a name="l02973"></a>02973 voice = synth-&gt;voice[i];
  2955. <a name="l02974"></a>02974 <span class="keywordflow">if</span> (voice-&gt;chan == chan) {
  2956. <a name="l02975"></a>02975 fluid_voice_set_param(voice, param, v, absolute);
  2957. <a name="l02976"></a>02976 }
  2958. <a name="l02977"></a>02977 }
  2959. <a name="l02978"></a>02978
  2960. <a name="l02979"></a>02979 <span class="keywordflow">return</span> FLUID_OK;
  2961. <a name="l02980"></a>02980 }
  2962. <a name="l02981"></a>02981
  2963. <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)
  2964. <a name="l02983"></a>02983 {
  2965. <a name="l02984"></a>02984 <span class="keywordflow">if</span> ((chan &lt; 0) || (chan &gt;= synth-&gt;midi_channels)) {
  2966. <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>);
  2967. <a name="l02986"></a>02986 <span class="keywordflow">return</span> 0.0;
  2968. <a name="l02987"></a>02987 }
  2969. <a name="l02988"></a>02988
  2970. <a name="l02989"></a>02989 <span class="keywordflow">if</span> ((param &lt; 0) || (param &gt;= <a class="code" href="gen_8h.html#d17a24ae3b25f3b8cc5762f818eef9b49c372c341b7b1a718f0016f40c615cf3" title="Value defines the count of generators (fluid_gen_type).">GEN_LAST</a>)) {
  2971. <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>);
  2972. <a name="l02991"></a>02991 <span class="keywordflow">return</span> 0.0;
  2973. <a name="l02992"></a>02992 }
  2974. <a name="l02993"></a>02993
  2975. <a name="l02994"></a>02994 <span class="keywordflow">return</span> fluid_channel_get_gen(synth-&gt;channel[chan], param);
  2976. <a name="l02995"></a>02995 }
  2977. <a name="l02996"></a>02996
  2978. <a name="l02997"></a>02997 <span class="comment">/* The synth needs to know the router for the command line handlers (they only</span>
  2979. <a name="l02998"></a>02998 <span class="comment"> * supply the synth as argument)</span>
  2980. <a name="l02999"></a>02999 <span class="comment"> */</span>
  2981. <a name="l03000"></a>03000 <span class="keywordtype">void</span> fluid_synth_set_midi_router(fluid_synth_t* synth, fluid_midi_router_t* router){
  2982. <a name="l03001"></a>03001 synth-&gt;midi_router=router;
  2983. <a name="l03002"></a>03002 };
  2984. <a name="l03003"></a>03003
  2985. <a name="l03004"></a>03004 <span class="comment">/* Purpose:</span>
  2986. <a name="l03005"></a>03005 <span class="comment"> * Any MIDI event from the MIDI router arrives here and is handed</span>
  2987. <a name="l03006"></a>03006 <span class="comment"> * to the appropriate function.</span>
  2988. <a name="l03007"></a>03007 <span class="comment"> */</span>
  2989. <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)
  2990. <a name="l03009"></a>03009 {
  2991. <a name="l03010"></a>03010 fluid_synth_t* synth = (fluid_synth_t*) data;
  2992. <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);
  2993. <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);
  2994. <a name="l03013"></a>03013
  2995. <a name="l03014"></a>03014 <span class="keywordflow">switch</span>(type) {
  2996. <a name="l03015"></a>03015 <span class="keywordflow">case</span> NOTE_ON:
  2997. <a name="l03016"></a>03016 <span class="keywordflow">return</span> fluid_synth_noteon(synth, chan,
  2998. <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),
  2999. <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));
  3000. <a name="l03019"></a>03019
  3001. <a name="l03020"></a>03020 <span class="keywordflow">case</span> NOTE_OFF:
  3002. <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));
  3003. <a name="l03022"></a>03022
  3004. <a name="l03023"></a>03023 <span class="keywordflow">case</span> CONTROL_CHANGE:
  3005. <a name="l03024"></a>03024 <span class="keywordflow">return</span> fluid_synth_cc(synth, chan,
  3006. <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),
  3007. <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));
  3008. <a name="l03027"></a>03027
  3009. <a name="l03028"></a>03028 <span class="keywordflow">case</span> PROGRAM_CHANGE:
  3010. <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));
  3011. <a name="l03030"></a>03030
  3012. <a name="l03031"></a>03031 <span class="keywordflow">case</span> PITCH_BEND:
  3013. <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));
  3014. <a name="l03033"></a>03033
  3015. <a name="l03034"></a>03034 <span class="keywordflow">case</span> MIDI_SYSTEM_RESET:
  3016. <a name="l03035"></a>03035 <span class="keywordflow">return</span> fluid_synth_system_reset(synth);
  3017. <a name="l03036"></a>03036 }
  3018. <a name="l03037"></a>03037 <span class="keywordflow">return</span> FLUID_FAILED;
  3019. <a name="l03038"></a>03038 }
  3020. <a name="l03039"></a>03039
  3021. <a name="l03040"></a>03040
  3022. <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,
  3023. <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)
  3024. <a name="l03043"></a>03043 {
  3025. <a name="l03044"></a>03044 <span class="keywordtype">int</span> r;
  3026. <a name="l03045"></a>03045
  3027. <a name="l03046"></a>03046 <span class="comment">/* check the ranges of the arguments */</span>
  3028. <a name="l03047"></a>03047 <span class="keywordflow">if</span> ((midi_chan &lt; 0) || (midi_chan &gt;= synth-&gt;midi_channels)) {
  3029. <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>);
  3030. <a name="l03049"></a>03049 <span class="keywordflow">return</span> FLUID_FAILED;
  3031. <a name="l03050"></a>03050 }
  3032. <a name="l03051"></a>03051
  3033. <a name="l03052"></a>03052 <span class="keywordflow">if</span> ((key &lt; 0) || (key &gt;= 128)) {
  3034. <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>);
  3035. <a name="l03054"></a>03054 <span class="keywordflow">return</span> FLUID_FAILED;
  3036. <a name="l03055"></a>03055 }
  3037. <a name="l03056"></a>03056
  3038. <a name="l03057"></a>03057 <span class="keywordflow">if</span> ((vel &lt;= 0) || (vel &gt;= 128)) {
  3039. <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>);
  3040. <a name="l03059"></a>03059 <span class="keywordflow">return</span> FLUID_FAILED;
  3041. <a name="l03060"></a>03060 }
  3042. <a name="l03061"></a>03061
  3043. <a name="l03062"></a>03062 fluid_mutex_lock(synth-&gt;busy); <span class="comment">/* One at a time, please */</span>
  3044. <a name="l03063"></a>03063
  3045. <a name="l03064"></a>03064 synth-&gt;storeid = id;
  3046. <a name="l03065"></a>03065 r = fluid_preset_noteon(preset, synth, midi_chan, key, vel);
  3047. <a name="l03066"></a>03066
  3048. <a name="l03067"></a>03067 fluid_mutex_unlock(synth-&gt;busy);
  3049. <a name="l03068"></a>03068
  3050. <a name="l03069"></a>03069 <span class="keywordflow">return</span> r;
  3051. <a name="l03070"></a>03070 }
  3052. <a name="l03071"></a>03071
  3053. <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>)
  3054. <a name="l03073"></a>03073 {
  3055. <a name="l03074"></a>03074 <span class="keywordtype">int</span> i;
  3056. <a name="l03075"></a>03075 fluid_voice_t* voice;
  3057. <a name="l03076"></a>03076 <span class="keywordtype">int</span> status = FLUID_FAILED;
  3058. <a name="l03077"></a>03077 <span class="keywordtype">int</span> count = 0;
  3059. <a name="l03078"></a>03078
  3060. <a name="l03079"></a>03079 <span class="keywordflow">for</span> (i = 0; i &lt; synth-&gt;polyphony; i++) {
  3061. <a name="l03080"></a>03080
  3062. <a name="l03081"></a>03081 voice = synth-&gt;voice[i];
  3063. <a name="l03082"></a>03082
  3064. <a name="l03083"></a>03083 <span class="keywordflow">if</span> (_ON(voice) &amp;&amp; (fluid_voice_get_id(voice) == <span class="keywordtype">id</span>)) {
  3065. <a name="l03084"></a>03084 count++;
  3066. <a name="l03085"></a>03085 fluid_voice_noteoff(voice);
  3067. <a name="l03086"></a>03086 status = FLUID_OK;
  3068. <a name="l03087"></a>03087 }
  3069. <a name="l03088"></a>03088 }
  3070. <a name="l03089"></a>03089
  3071. <a name="l03090"></a>03090 <span class="keywordflow">return</span> status;
  3072. <a name="l03091"></a>03091 }
  3073. <a name="l03092"></a>03092
  3074. <a name="l03093"></a>03093 fluid_bank_offset_t*
  3075. <a name="l03094"></a>03094 fluid_synth_get_bank_offset0(fluid_synth_t* synth, <span class="keywordtype">int</span> sfont_id)
  3076. <a name="l03095"></a>03095 {
  3077. <a name="l03096"></a>03096 fluid_list_t* list = synth-&gt;bank_offsets;
  3078. <a name="l03097"></a>03097 fluid_bank_offset_t* offset;
  3079. <a name="l03098"></a>03098
  3080. <a name="l03099"></a>03099 <span class="keywordflow">while</span> (list) {
  3081. <a name="l03100"></a>03100
  3082. <a name="l03101"></a>03101 offset = (fluid_bank_offset_t*) fluid_list_get(list);
  3083. <a name="l03102"></a>03102 <span class="keywordflow">if</span> (offset-&gt;sfont_id == sfont_id) {
  3084. <a name="l03103"></a>03103 <span class="keywordflow">return</span> offset;
  3085. <a name="l03104"></a>03104 }
  3086. <a name="l03105"></a>03105
  3087. <a name="l03106"></a>03106 list = fluid_list_next(list);
  3088. <a name="l03107"></a>03107 }
  3089. <a name="l03108"></a>03108
  3090. <a name="l03109"></a>03109 <span class="keywordflow">return</span> NULL;
  3091. <a name="l03110"></a>03110 }
  3092. <a name="l03111"></a>03111
  3093. <a name="l03112"></a>03112 <span class="keywordtype">int</span>
  3094. <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)
  3095. <a name="l03114"></a>03114 {
  3096. <a name="l03115"></a>03115 fluid_bank_offset_t* bank_offset;
  3097. <a name="l03116"></a>03116
  3098. <a name="l03117"></a>03117 bank_offset = fluid_synth_get_bank_offset0(synth, sfont_id);
  3099. <a name="l03118"></a>03118
  3100. <a name="l03119"></a>03119 <span class="keywordflow">if</span> (bank_offset == NULL) {
  3101. <a name="l03120"></a>03120 bank_offset = FLUID_NEW(fluid_bank_offset_t);
  3102. <a name="l03121"></a>03121 <span class="keywordflow">if</span> (bank_offset == NULL) {
  3103. <a name="l03122"></a>03122 <span class="keywordflow">return</span> -1;
  3104. <a name="l03123"></a>03123 }
  3105. <a name="l03124"></a>03124 bank_offset-&gt;sfont_id = sfont_id;
  3106. <a name="l03125"></a>03125 bank_offset-&gt;offset = offset;
  3107. <a name="l03126"></a>03126 synth-&gt;bank_offsets = fluid_list_prepend(synth-&gt;bank_offsets, bank_offset);
  3108. <a name="l03127"></a>03127 } <span class="keywordflow">else</span> {
  3109. <a name="l03128"></a>03128 bank_offset-&gt;offset = offset;
  3110. <a name="l03129"></a>03129 }
  3111. <a name="l03130"></a>03130
  3112. <a name="l03131"></a>03131 <span class="keywordflow">return</span> 0;
  3113. <a name="l03132"></a>03132 }
  3114. <a name="l03133"></a>03133
  3115. <a name="l03134"></a>03134 <span class="keywordtype">int</span>
  3116. <a name="l03135"></a>03135 fluid_synth_get_bank_offset(fluid_synth_t* synth, <span class="keywordtype">int</span> sfont_id)
  3117. <a name="l03136"></a>03136 {
  3118. <a name="l03137"></a>03137 fluid_bank_offset_t* bank_offset;
  3119. <a name="l03138"></a>03138
  3120. <a name="l03139"></a>03139 bank_offset = fluid_synth_get_bank_offset0(synth, sfont_id);
  3121. <a name="l03140"></a>03140 <span class="keywordflow">return</span> (bank_offset == NULL)? 0 : bank_offset-&gt;offset;
  3122. <a name="l03141"></a>03141 }
  3123. <a name="l03142"></a>03142
  3124. <a name="l03143"></a>03143 <span class="keywordtype">void</span>
  3125. <a name="l03144"></a>03144 fluid_synth_remove_bank_offset(fluid_synth_t* synth, <span class="keywordtype">int</span> sfont_id)
  3126. <a name="l03145"></a>03145 {
  3127. <a name="l03146"></a>03146 fluid_bank_offset_t* bank_offset;
  3128. <a name="l03147"></a>03147
  3129. <a name="l03148"></a>03148 bank_offset = fluid_synth_get_bank_offset0(synth, sfont_id);
  3130. <a name="l03149"></a>03149 <span class="keywordflow">if</span> (bank_offset != NULL) {
  3131. <a name="l03150"></a>03150 synth-&gt;bank_offsets = fluid_list_remove(synth-&gt;bank_offsets, bank_offset);
  3132. <a name="l03151"></a>03151 }
  3133. <a name="l03152"></a>03152 }
  3134. </pre></div><hr size="1"><address style="text-align: right;"><small>Generated on Sat Nov 17 13:40:23 2007 for libfluidsynth by&nbsp;
  3135. <a href="http://www.doxygen.org/index.html">
  3136. <img src="doxygen.png" alt="doxygen" align="middle" border="0"></a> 1.5.3 </small></address>
  3137. </body>
  3138. </html>