fiddle_fluidsynth 0.0.1

data/lib/fiddle_fluidsynth/synth/soundfont_management.rb

@@ -0,0 +1,210 @@
+#
+# filename: fiddle-fluidsynth/synth/soundfont_management.rb
+#
+
+
+# References
+# - fluidsynth.org, [API Reference](https://www.fluidsynth.org/api/modules.html)
+#
+class FiddleFluidSynth
+
+  # Functions to load and unload SoundFonts.
+  # ==== References
+  # - API Reference, Synthesizer/[SoundFont Management](https://www.fluidsynth.org/api/group__audio__rendering.html)
+  # - [library fiddle](https://docs.ruby-lang.org/ja/latest/library/fiddle.html)
+  #
+
+  #
+  module C
+
+    # Lifecycle Functions.
+    #
+    #
+
+
+    # Functions.
+    #
+    #
+
+    # Add a SoundFont.
+    extern 'int fluid_synth_add_sfont(fluid_synth_t*, void*)'
+
+    # Get bank offset of a loaded SoundFont.
+    extern 'int fluid_synth_get_bank_offset(fluid_synth_t*, int)'
+
+    # Get SoundFont by index.
+    extern 'fluid_sfont_t* fluid_synth_get_sfont(fluid_synth_t*, unsigned int)'
+
+    # Get SoundFont by ID.
+    extern 'fluid_sfont_t* fluid_synth_get_sfont_by_id(fluid_synth_t*, int)'
+
+    # Get SoundFont by name.
+    extern 'fluid_sfont_t* fluid_synth_get_sfont_by_name(fluid_synth_t*, char*)'
+
+    # Remove a SoundFont from the SoundFont stack without deleting it.
+    extern 'int fluid_synth_remove_sfont(fluid_synth_t*, fluid_sfont_t*)'
+
+    # Offset the bank numbers of a loaded SoundFont, i.e. subtract offset
+    # from any bank number when assigning instruments.
+    extern 'int fluid_synth_set_bank_offset(fluid_synth_t*, int, int)'
+
+    # Count number of loaded SoundFont files.
+    extern 'int fluid_synth_sfcount(fluid_synth_t*)'
+
+    # Load a SoundFont file (filename is interpreted by SoundFont loaders).
+    extern 'int fluid_synth_sfload(fluid_synth_t*, char*, int)'
+
+    # Reload a SoundFont.
+    extern 'int fluid_synth_sfreload(fluid_synth_t*, int)'
+
+    # Schedule a SoundFont for unloading.
+    extern 'int fluid_synth_sfunload(fluid_synth_t*, int, int)'
+
+  end
+end
+
+
+#
+#
+#
+class FiddleFluidSynth
+  module Interface
+    module SoundFont; end
+  end
+end
+
+
+# Lifecycle Functions.
+#
+#
+
+
+# Functions.
+#
+#
+class FiddleFluidSynth
+
+  #
+  def synth_add_sfont( synth=self.synth, sfont: )
+    ret = C.fluid_synth_add_sfont(synth,sfont)
+    ret
+  end
+
+  def synth_get_bank_offset( synth=self.synth, sfid: )
+    ret = C.fluid_synth_get_bank_sfont(synth, sfid)
+    ret
+  end
+
+  #
+  # ==== See Also
+  # - soundfonts/loader.rb/`.#sfont_new()`
+  #
+  def synth_get_sfont( synth=self.synth, num: )
+    ret = C.fluid_synth_get_sfont(synth, num)
+    # ret.extend(Interface::SoundFont)
+    if ret.nil? || ret.null?
+      ret = nil
+    else
+      ret.extend(Interface::SoundFont)
+    end
+    ret
+  end
+
+  #
+  # ==== See Also
+  # - soundfonts/loader.rb/`.#sfont_new()`
+  #
+  # def synth_get_sfont_by_id( synth: , id: )
+  def synth_get_sfont_by_id( synth=self.synth, id: )
+    ret = C.fluid_synth_get_sfont_by_id(synth, id)
+    # ret.extend(Interface::SoundFont)
+    if ret.nil? || ret.null?
+      ret = nil
+    else
+      ret.extend(Interface::SoundFont)
+    end
+    ret
+  end
+
+  #
+  # ==== See Also
+  # - soundfonts/loader.rb/`.#sfont_new()`
+  #
+  def synth_get_sfont_by_name( synth=self.synth, name: )
+    ret = C.fluid_synth_get_sfont_by_name(synth, name)
+    # ret.extend(Interface::SoundFont)
+    if ret.nil? || ret.null?
+      ret = nil
+    else
+      ret.extend(Interface::SoundFont)
+    end
+    ret
+  end
+
+  #
+  def synth_remove_sfont( synth=self.synth, sfont: )
+    ret = C.fluid_synth_remove_sfont(synth,sfont)
+    ret
+  end
+
+  #
+  def synth_set_bank_offset( synth=self.synth, sfid: , offset: )
+    ret = C.fluid_synth_set_bank_offset(synth, sfid, offset)
+    ret
+  end
+
+  #
+  # ==== See Also
+  # - #synth_sfload()
+  #
+  def synth_sfcount( synth = self.synth )
+    ret = C.fluid_synth_sfcount(synth)
+    ret
+  end
+
+  #
+  # def synth_sfload( synth: , filename: , reset_presets: )
+  def synth_sfload( synth=self.synth,
+                    filename: , reset_presets: self.reset_presets,
+                    verbose_f: false )
+    #
+    $stderr.print "(**) loading SoundFont: #{filename}..." if verbose_f
+    if reset_presets
+      _reset_presets = 1
+    else
+      _reset_presets = 0
+    end
+
+    ret = C.fluid_synth_sfload(synth,filename, _reset_presets)
+    if ret == FLUID_FAILED
+      $stderr.puts
+      raise "Cannot load soundfont: #{self.soundfont_full_path}"
+    else
+      $stderr.puts " ok (#{ret})."
+    end
+
+    @sfid_last = ret
+    @sfid_ary << @sfid_last
+
+    $stderr.puts "(**) @sfid_ary: #{@sfid_ary} (SoundFont count:" +
+      " #{self.synth_sfcount(synth)}/synth: 0x#{synth.to_i.to_s(16)})" if verbose_f
+
+    ret
+  end
+
+  def synth_sfreload( synth=self.synth, id: self.sfid)
+    ret = C.fluid_synth_sfreload(synth,id)
+    ret
+  end
+
+  def synth_sfunload( synth=self.synth, id: self.sfid,
+                      reset_presets: self.reset_presets )
+    ret = C.fluid_synth_sfunload(synth,id,reset_presets)
+    ret
+  end
+
+
+end
+
+
+#### endof filename: fiddle-fluidsynth/synth/soundfont_management.rb

data/lib/fiddle_fluidsynth/synth/synth.rb

@@ -0,0 +1,114 @@
+#
+# filename: fiddle-fluidsynth/synth/synth.rb
+#
+
+
+# References
+# - fluidstynth.org, [API Reference](https://www.fluidsynth.org/api/modules.html)
+#
+class FiddleFluidSynth
+
+  #
+  module C
+
+    # SoundFont synthesizer.
+    # ==== References
+    # - API Reference, [Synthesizer](https://www.fluidsynth.org/api/group__synth.html)
+    # - [library fiddle](https://docs.ruby-lang.org/ja/latest/library/fiddle.html)
+    #
+
+    # Lifecycle Functions.
+    #
+    #
+
+    # Create new FluidSynth instance.
+    extern 'fluid_synth_t* new_fluid_synth(fluid_settings_t*)'
+
+    # Delete a FluidSynth instance.
+    extern 'void delete_fluid_synth(fluid_synth_t*)'
+
+
+    # Functions.
+    #
+    #
+
+    # Get a textual representation of the last error.
+    extern 'char* fluid_synth_error(fluid_synth_t*)'
+
+    # Get the synth CPU load value.
+    extern 'double fluid_synth_get_cpu_load(fluid_synth_t*)'
+
+  end
+end
+
+
+# Lifecycle Functions.
+#
+#
+class FiddleFluidSynth
+
+  #
+  def self.synth_new( settings )
+    ret = C.new_fluid_synth(settings)
+    ret
+  end
+  def synth_new( settings=self.settings )
+    # ret = C.new_fluid_synth(settings)
+    self.class.synth_new(settings)
+  end
+
+  def self.synth_delete( synth )
+    ret = C.delete_fluid_synth(synth)
+    ret
+  end
+  def synth_delete( synth=self.synth )
+    # ret = C.delete_fluid_synth(synth)
+    # ret
+    self.class.synth_delete(synth)
+  end
+
+end
+
+
+# Functions.
+#
+#
+class FiddleFluidSynth
+
+  #
+  def synth_error( synth=self.synth )
+    deprecated_msg(__method__)
+    ret = C.fluid_synth_error(synth)
+    ret
+  end
+
+  #
+  def synth_get_cpu_load( synth=self.synth )
+    ret = C.fluid_synth_get_cpu_load(synth)
+    ret
+  end
+
+  # in soundfonts/loader.rb:
+  #
+  #  def synth_add_sfloader( synth = self.synth, loader: )
+  #    ret = C.fluid_synth_add_sfloader(synth, loader)
+  #    ret
+  #  end
+  #
+  #  def synth_get_channel_preset( synth = self.synth, ch: )
+  #    ret = C.fluid_synth_get_channel_preset(synth, ch)
+  #    ret
+  #  end
+
+
+  # in settings/settings.rb:
+  #
+  # def synth_get_settings( synth = self.synth )
+  #   self.class.synth_get_settings(synth)
+  # end
+
+
+end
+
+
+#### endof filename: fiddle-fluidsynth/synth/synth.rb

data/lib/fiddle_fluidsynth/synth/voice_control.rb

@@ -0,0 +1,94 @@
+#
+# filename: fiddle-fluidstynth/synth/voice_control.rb
+#
+
+
+# References
+# - fluidsynth.org, [API Reference](https://www.fluidsynth.org/api/modules.html)
+#
+class FiddleFluidSynth
+
+  # Low-level access to synthesis voices.
+  # ==== References
+  # - API Reference, Synthesizer/[Voice Control](https://www.fluidsynth.org/api/group__voice__control.html)
+  # - [library fiddle](https://docs.ruby-lang.org/ja/latest/library/fiddle.html)
+  #
+
+  #
+  module C
+
+    # Lifecycle Functions.
+    #
+    #
+
+
+    # Functions.
+    #
+    #
+
+    # Allocate a synthesis voice.
+    extern 'fluid_voice_t* fluid_synth_alloc_voice' +
+      '(fluid_synth_t*, fluid_sample_t*, int, int, int)'
+
+    # Get list of currently playing voices.
+    extern 'void fluid_synth_get_voicelist' +
+      '(fluid_synth_t*, fluid_voice_t*, int, int)'
+
+    # Create and start voices using an arbitrary preset and a MIDI note
+    # on event.
+    extern 'int fluid_synth_start' +
+      '(fluid_synth_t*, unsigned int, fluid_preset_t*, int, int, int, int)'
+
+    # Activate a voice previously allocated with fluid_synth_alloc_voice().
+    extern 'void fluid_synth_start_voice(fluid_synth_t*, fluid_voice_t*)'
+
+    # Stop notes for a given note event voice ID.
+    extern 'int fluid_synth_stop(fluid_synth_t*, unsigned int)'
+
+
+  end
+end
+
+
+# Lifecycle Functions.
+#
+#
+
+
+# Functions.
+#
+#
+class FiddleFluidSynth
+
+  #
+  def synth_alloc_voice( synth=self.synth, sample: , ch: , key: , vel: )
+    ret = C.fluid_synth_alloc_voice(synth,sample,ch,key,vel)
+    ret
+  end
+
+  def synth_get_voicelist( synth=self.synth, buf: , bufsize: , id: )
+    ret = C.fluid_synth_get_voicelist(synth,buf,bufsize,id)
+    ret
+  end
+
+  def synth_start( synth=self.synth,
+                   id: , preset: , audio_ch: , ch: , key: , vel: )
+    ret = C.fluid_synth_start(synth, id, preset, audio_ch, ch, key, vel)
+    ret
+  end
+
+  def synth_start_voice( synth=self.synth, voice: )
+    ret = C.fluid_synth_start_voice(synth, voice)
+    ret
+  end
+
+  def synth_stop( synth=self.synth, voice_id: )
+    ret = C.fluid_synth_stop(synth, voice_id)
+    ret
+  end
+
+
+end
+
+
+#### endof filename: fiddle-fluidstynth/synth/voice_control.rb

data/lib/fiddle_fluidsynth/synth.rb

@@ -0,0 +1,18 @@
+#
+# filename: soundfonts.rb
+#
+
+# [Synthesizer](https://www.fluidsynth.org/api/group__synth.html)
+#
+#
+require_relative "./synth/synth"
+
+#
+require_relative "./synth/audio_rendering"
+require_relative "./synth/effect"
+require_relative "./synth/midi"
+require_relative "./synth/soundfont_management"
+require_relative "./synth/params"
+require_relative "./synth/voice_control"
+
+####

data/lib/fiddle_fluidsynth/types/types.rb

@@ -0,0 +1,131 @@
+#
+# filename: fiddle-fluidstynth/types/types.rb
+#
+
+
+# References
+# - fluidsynth.org, [API Reference](https://www.fluidsynth.org/api/modules.html)
+#
+class FiddleFluidSynth
+
+  # Type declarations.
+  # ==== References
+  # - API References, [Types](https://www.fluidsynth.org/api/group__Types.html)
+  # - [library fiddle](https://docs.ruby-lang.org/ja/latest/library/fiddle.html)
+  #
+
+  #
+  module C
+
+    # these typealias-es are just for readability.
+    #
+    #
+
+    #
+    #
+    #
+    typealias 'size_t', 'unsigned int'
+
+
+
+    # Audio driver instance.
+    typealias 'fluid_audio_driver_t', 'void'
+
+    # Shell Command Handler.
+    typealias 'fluid_cmd_handler_t', 'void'
+
+    # Command handler hash table.
+    typealias 'fluid_cmd_hash_t', 'void'
+
+    # Sequencer event.
+    typealias 'fluid_event_t', 'void'
+
+    # Callback struct to perform custom file loading of soundfonts.
+    typealias 'fluid_file_callbacks_t', 'void'
+
+    # Audio file renderer instance.
+    typealias 'fluid_file_renderer_t', 'void'
+
+    # Input stream descriptor.
+    typealias 'fluid_istream_t', 'int'
+
+    # LADSPA effects instance.
+    typealias 'fluid_ladspa_fx_t', 'void'
+
+    # A typedef for C99's type long long, which is at least 64-bit wide,
+    # as guaranteed by the C99.
+    typealias 'fluid_long_long_t', 'long long'
+
+    # MIDI driver instance.
+    typealias 'fluid_midi_driver_t', 'void'
+
+    # MIDI event.
+    typealias 'fluid_midi_event_t', 'void'
+
+    # MIDI router rule.
+    typealias 'fluid_midi_router_rule_t', 'void'
+
+    # MIDI router instance.
+    typealias 'fluid_midi_router_t', 'void'
+
+    # SoundFont modulator.
+    typealias 'fluid_mod_t', 'void'
+
+    # Output stream descriptor.
+    typealias  'fluid_ostream_t', 'int'
+
+    # MIDI player instance.
+    typealias 'fluid_player_t', 'void'
+
+    # SoundFont preset.
+    typealias 'fluid_preset_t', 'void'
+
+    # SoundFont sample.
+    typealias 'fluid_sample_t', 'void'
+
+    # Unique client IDs used by the sequencer and fluid_event_t, obtained
+    # by fluid_sequencer_register_client() and
+    # fluid_sequencer_register_fluidsynth()
+    typealias 'fluid_seq_id_t', 'short'
+
+    # Sequencer instance.
+    typealias 'fluid_sequencer_t', 'void'
+
+    # TCP/IP shell server instance.
+    typealias 'fluid_server_t', 'void'
+
+    # Configuration settings instance.
+    typealias 'fluid_settings_t', 'void'
+
+    # SoundFont loader plugin.
+    typealias 'fluid_sfloader_t', 'void'
+
+    # SoundFont.
+    typealias 'fluid_sfont_t', 'void'
+
+    # Command shell.
+    typealias 'fluid_shell_t', 'void'
+
+    # Synthesizer instance.
+    typealias 'fluid_synth_t', 'void'
+
+    # Synthesis voice instance.
+    typealias 'fluid_voice_t', 'void'
+
+
+  end
+end
+
+
+#
+#
+#
+class FiddleFluidSynth
+
+  # typedefs are declaration only in header file. So we must NOT define here...
+  # nothing to do.
+
+end
+
+
+#### endof filename: fiddle-fluidstynth/types/types.rb

data/lib/fiddle_fluidsynth/types.rb

@@ -0,0 +1,10 @@
+#
+# filename: soundfonts.rb
+#
+
+# [Types](https://www.fluidsynth.org/api/group__Types.html)
+#
+#
+require_relative "./types/types"
+
+####