From d35a4be8e8102f0313da85eb408b8564fdb02941 Mon Sep 17 00:00:00 2001
From: onyx-and-iris <code@onyxandiris.online>
Date: Fri, 7 Jul 2023 02:29:43 +0100
Subject: [PATCH] define the low level bindings

offers a call method for error handling
---
 lib/voicemeeter/cbindings.rb | 104 +++++++++++++++++++++++++++++++++++
 1 file changed, 104 insertions(+)
 create mode 100644 lib/voicemeeter/cbindings.rb

diff --git a/lib/voicemeeter/cbindings.rb b/lib/voicemeeter/cbindings.rb
new file mode 100644
index 0000000..024aa24
--- /dev/null
+++ b/lib/voicemeeter/cbindings.rb
@@ -0,0 +1,104 @@
+require_relative "install"
+require_relative "errors"
+
+module Voicemeeter
+  module CBindings
+    private
+
+    extend FFI::Library
+
+    VM_PATH = Install.get_vmpath()
+
+    ffi_lib VM_PATH.join(
+              "VoicemeeterRemote#{Install::OS_BITS == 64 ? "64" : "32"}.dll"
+            )
+    ffi_convention :stdcall
+
+    attach_function :bind_login, :VBVMR_Login, [], :long
+    attach_function :bind_logout, :VBVMR_Logout, [], :long
+    attach_function :bind_runvm, :VBVMR_RunVoicemeeter, [:long], :long
+    attach_function :bind_type, :VBVMR_GetVoicemeeterType, [:pointer], :long
+    attach_function :bind_version,
+                    :VBVMR_GetVoicemeeterVersion,
+                    [:pointer],
+                    :long
+
+    attach_function :bind_mdirty, :VBVMR_MacroButton_IsDirty, [], :long
+    attach_function :bind_get_buttonstatus,
+                    :VBVMR_MacroButton_GetStatus,
+                    %i[long pointer long],
+                    :long
+    attach_function :bind_set_buttonstatus,
+                    :VBVMR_MacroButton_SetStatus,
+                    %i[long float long],
+                    :long
+
+    attach_function :bind_pdirty, :VBVMR_IsParametersDirty, [], :long
+    attach_function :bind_get_parameter_float,
+                    :VBVMR_GetParameterFloat,
+                    %i[string pointer],
+                    :long
+    attach_function :bind_set_parameter_float,
+                    :VBVMR_SetParameterFloat,
+                    %i[string float],
+                    :long
+
+    attach_function :bind_get_parameter_string,
+                    :VBVMR_GetParameterStringA,
+                    %i[string pointer],
+                    :long
+    attach_function :bind_set_parameter_string,
+                    :VBVMR_SetParameterStringA,
+                    %i[string string],
+                    :long
+
+    attach_function :bind_set_parameter_multi,
+                    :VBVMR_SetParameters,
+                    [:string],
+                    :long
+
+    attach_function :bind_get_level,
+                    :VBVMR_GetLevel,
+                    %i[long long pointer],
+                    :long
+
+    attach_function :bind_get_num_indevices,
+                    :VBVMR_Input_GetDeviceNumber,
+                    [],
+                    :long
+    attach_function :bind_get_desc_indevices,
+                    :VBVMR_Input_GetDeviceDescA,
+                    %i[long pointer pointer pointer],
+                    :long
+
+    attach_function :bind_get_num_outdevices,
+                    :VBVMR_Output_GetDeviceNumber,
+                    [],
+                    :long
+    attach_function :bind_get_desc_outdevices,
+                    :VBVMR_Output_GetDeviceDescA,
+                    %i[long pointer pointer pointer],
+                    :long
+
+    attach_function :bind_get_midi_message,
+                    :VBVMR_GetMidiMessage,
+                    %i[pointer long],
+                    :long
+
+    def call(fn, *args, ok: [0], exp: nil)
+      res = send(fn, *args)
+      if exp.nil?
+        unless ok.include? res
+          raise Errors::VMCAPIError.new("#{fn} returned #{res}")
+        end
+      else
+        unless exp.call(res)
+          raise Errors::VMCAPIError.new("#{fn} returned #{res}")
+        end
+      end
+      res
+    end
+
+    module_function :call
+  end
+end