libcall 0.0.0 → 0.0.2

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: d33e4ff88ea0b7f5200165a946f7a146cf0a1d4781d6fd5583d4ccdf3ec17dcf
-  data.tar.gz: 24d91124d8f8207fca38aabadab15cced21106e649755130180d248491e03eb0
+  metadata.gz: b45f825f6989bd4673b982435ce1bad8ff1b1785785118ffa66c8bdad84b1d7c
+  data.tar.gz: 9a60c1d6d69b2ff7e70a2884b6dfbc8e2b6099c87df40558559fdffffff5c65c
 SHA512:
-  metadata.gz: b79e721348b381ca177f8662ced2a942f7a34b65102a9dc3e8e852ad726c3501e48fadc311f63b7a86eab3113b2081e20c78de1dbbe4b58f2b6249d8541329fc
-  data.tar.gz: 9924983519f2f36b5930edab9ae607419eba0199ad6c3aa7a0707ea06006be7512a3d2b1087985e711eeefc928f4d287f23159ba80df240b130acd16cffcfa12
+  metadata.gz: ed0cde569e1eea83480b744907d3397f6e7abae68b991993090312edc6ccf74d4cf973afbad2dd3402142eccf390a3f992cf2174ad016ea0009d5d8b91e104bd
+  data.tar.gz: 42571c69fd4e1487e17b592ec98afc321ed646e938d9d773a96c4e450f4762c9d49975f7de47a33ba5f747e2e2c1367da00d7a3233ff059a8ab5a70f43a3bb92

data/README.md

@@ -1,6 +1,7 @@
 # libcall
 
 [![test](https://github.com/kojix2/libcall/actions/workflows/main.yml/badge.svg)](https://github.com/kojix2/libcall/actions/workflows/main.yml)
+[![Gem Version](https://badge.fury.io/rb/libcall.svg)](https://badge.fury.io/rb/libcall)
 [![Lines of Code](https://img.shields.io/endpoint?url=https%3A%2F%2Ftokei.kojix2.net%2Fbadge%2Fgithub%2Fkojix2%2Flibcall%2Flines)](https://tokei.kojix2.net/github/kojix2/libcall)
 
 Call C functions in shared libraries from the command line.
@@ -11,31 +12,51 @@ Call C functions in shared libraries from the command line.
 gem install libcall
 ```
 
+**Windows**: Supports DLLs (e.g., `msvcrt.dll`, `kernel32.dll`). Searches in System32, PATH, and MSYS2/MinGW directories. For building custom DLLs, RubyInstaller with DevKit is recommended.
+
 ## Usage
 
 ```sh
-libcall [OPTIONS] <LIBRARY> <FUNCTION> [ARGS...]
+libcall [OPTIONS] <LIBRARY> <FUNCTION> (TYPE VALUE)...
 ```
 
 ### Quick Examples
 
 ```sh
-# Math function with type suffix
-libcall -lm sqrt 16.0f64 -r f64
+# TYPE VALUE pairs
+libcall -lm -r f64 sqrt double 16
 # => 4.0
 
-# Custom library
-libcall ./mylib.so add 10i32 20i32 -r i32
-# => 30
+# libc strlen
+libcall -lc strlen string "hello" -r usize
+# => 5
+```
+
+### Argument Syntax
+
+Pass arguments as TYPE VALUE pairs (single-token suffix style has been removed):
+
+- Examples: `int 10`, `double -3.14`, `string "hello"`
+- Negative values are safe (not treated as options): `int -23`
+
+Pointers and null:
+
+- Use `ptr` (or `pointer`) to pass raw addresses as integers
+- Use `null`, `nil`, `NULL`, or `0` to pass a null pointer
+
+```sh
+# Pass a null pointer to a function taking const char*
+libcall -ltest str_length ptr null -r i32
+# => 0
 ```
 
-### Type Syntax
+End of options `--`:
 
-Use Rust-style type suffixes:
+- Use `--` to stop option parsing if a value starts with `-`
 
-- Integers: `42i32`, `100u64`, `255u8`
-- Floats: `3.14f64`, `2.5f32`
-- Strings: `"hello"`
+```sh
+libcall -lc getenv string -- -r -r cstr
+```
 
 ### Options
 
@@ -48,40 +69,95 @@ Use Rust-style type suffixes:
 - `-h, --help` - show help
 - `-v, --version` - show version
 
+Library search:
+
+- `-L` adds search paths; `-l` resolves by name
+- On Linux and macOS, `LD_LIBRARY_PATH` / `DYLD_LIBRARY_PATH` are honored
+
 ### More Examples
 
 ```sh
 # JSON output
-libcall --json -lm sqrt 9.0f64 -r f64
+libcall --json -lm sqrt double 9.0 -r f64
 
 # Dry run
-libcall --dry-run ./mylib.so test 42i32 -r void
+libcall --dry-run -lc getpid -r int
+
+# Output parameter with libm
+libcall -lm modf double -3.14 out:double -r f64
 
-# Using -L and -l (like gcc)
-libcall -lmylib -L./build add 10i32 20i32 -r i32
+# TYPE/VALUE pairs with -r after function
+libcall -lm fabs double -5.5 -r f64
+# => 5.5
+
+# Windows: calling C runtime functions
+libcall msvcrt.dll sqrt double 16.0 -r f64
+# => 4.0
+
+# Windows: accessing environment variables
+libcall msvcrt.dll getenv string "PATH" -r cstr
 ```
 
 ## Type Reference
 
-| Suffix | Type            | Range/Note         |
-| ------ | --------------- | ------------------ |
-| `i8`   | signed 8-bit    | -128 to 127        |
-| `u8`   | unsigned 8-bit  | 0 to 255           |
-| `i16`  | signed 16-bit   | -32768 to 32767    |
-| `u16`  | unsigned 16-bit | 0 to 65535         |
-| `i32`  | signed 32-bit   | standard int       |
-| `u32`  | unsigned 32-bit | unsigned int       |
-| `i64`  | signed 64-bit   | long long          |
-| `u64`  | unsigned 64-bit | unsigned long long |
-| `f32`  | 32-bit float    | single precision   |
-| `f64`  | 64-bit float    | double precision   |
+| Short (suffix) | Formal (C)                          | Note/Range         |
+| -------------- | ----------------------------------- | ------------------ |
+| `i8`           | `char` (≈ `int8_t`)                 | -128 to 127        |
+| `u8`           | `unsigned char` (≈ `uint8_t`)       | 0 to 255           |
+| `i16`          | `short` (≈ `int16_t`)               | -32768 to 32767    |
+| `u16`          | `unsigned short` (≈ `uint16_t`)     | 0 to 65535         |
+| `i32`          | `int` (≈ `int32_t`)                 | typical 32-bit int |
+| `u32`          | `unsigned int` (≈ `uint32_t`)       | unsigned 32-bit    |
+| `i64`          | `long long` (≈ `int64_t`)           | 64-bit             |
+| `u64`          | `unsigned long long` (≈ `uint64_t`) | 64-bit             |
+| `f32`          | `float`                             | single precision   |
+| `f64`          | `double`                            | double precision   |
+
+Also supported:
+
+- `string`: C string argument (char\*)
+- `cstr`: C string return (char\*)
+- `ptr`/`pointer`: void\* pointer
 
 ## pkg-config Support
 
 Set `PKG_CONFIG_PATH` and use package names with `-l`:
 
 ```sh
-PKG_CONFIG_PATH=/path/to/pkgconfig libcall -lmypackage func 42i32 -r i32
+PKG_CONFIG_PATH=/path/to/pkgconfig libcall -lmypackage func i32 42 -r i32
+```
+
+## Output parameters (out:TYPE)
+
+You can pass output pointers by specifying `out:TYPE`. The pointer is allocated automatically, passed to the function, and printed after the call.
+
+```sh
+# double frexp(double x, int* exp)
+libcall -lm frexp double 8.0 out:int -r f64
+
+# JSON includes an "outputs" array
+libcall --json -lm frexp double 8.0 out:int -r f64
+```
+
+## Arrays
+
+- Input arrays: `TYPE[]` takes a comma-separated value list.
+
+```sh
+# zlib (Linux/macOS): uLong crc32(uLong crc, const Bytef* buf, uInt len)
+libcall -lz crc32 uint 0 uchar[] 104,101,108,108,111 uint 5 -r uint
+```
+
+- Output arrays: `out:TYPE[N]` allocates N elements and prints them after the call.
+
+```sh
+# Linux (libc): ssize_t getrandom(void* buf, size_t buflen, unsigned int flags)
+libcall -lc getrandom out:uchar[16] size_t 16 uint 0 -r long
+```
+
+```sh
+# macOS (libSystem): void arc4random_buf(void* buf, size_t nbytes)
+libcall -lSystem arc4random_buf out:uchar[16] size_t 16 -r void
 ```
 
 ## Warning

data/lib/libcall/caller.rb

@@ -3,35 +3,66 @@
 require 'fiddle'
 
 module Libcall
+  # Execute C function calls via Fiddle FFI
   class Caller
-    attr_reader :lib_path, :func_name, :return_type, :args
+    attr_reader :lib_path, :func_name, :return_type, :arg_pairs
 
-    def initialize(lib_path, func_name, args: [], return_type: :void)
+    def initialize(lib_path, func_name, arg_pairs: [], return_type: :void)
       @lib_path = lib_path
       @func_name = func_name
       @return_type = return_type
-      @args = args
+      @arg_pairs = arg_pairs
     end
 
     def call
       arg_types = []
       arg_values = []
+      out_refs = []
 
-      args.each do |arg|
-        type_sym, value = Parser.parse_arg(arg)
-        arg_types << Parser.fiddle_type(type_sym)
-        arg_values << value
+      arg_pairs.each_with_index do |(type_sym, value), idx|
+        arg_types << TypeMap.to_fiddle_type(type_sym)
+
+        if type_sym.is_a?(Array)
+          case type_sym.first
+          when :out
+            inner = type_sym[1]
+            ptr = TypeMap.allocate_output_pointer(inner)
+            out_refs << { index: idx, kind: :out, type: inner, ptr: ptr }
+            arg_values << ptr.to_i
+          when :array
+            base = type_sym[1]
+            values = Array(value)
+            ptr = TypeMap.allocate_array(base, values.length)
+            TypeMap.write_array(ptr, base, values)
+            arg_values << ptr.to_i
+          when :out_array
+            base = type_sym[1]
+            count = type_sym[2]
+            ptr = TypeMap.allocate_array(base, count)
+            out_refs << { index: idx, kind: :out_array, base: base, count: count, ptr: ptr }
+            arg_values << ptr.to_i
+          else
+            raise Error, "Unknown array/output form: #{type_sym.inspect}"
+          end
+        else
+          arg_values << value
+        end
       end
 
-      ret_type = Parser.fiddle_type(return_type)
+      ret_type = TypeMap.to_fiddle_type(return_type)
 
       handle = Fiddle.dlopen(lib_path)
       func_ptr = handle[func_name]
       func = Fiddle::Function.new(func_ptr, arg_types, ret_type)
 
-      result = func.call(*arg_values)
+      raw_result = func.call(*arg_values)
+      formatted_result = format_result(raw_result, return_type)
 
-      format_result(result, return_type)
+      if out_refs.empty?
+        formatted_result
+      else
+        { result: formatted_result, outputs: read_output_values(out_refs) }
+      end
     rescue Fiddle::DLError => e
       raise Error, "Failed to load library or function: #{e.message}"
     end
@@ -59,5 +90,22 @@ module Libcall
         result
       end
     end
+
+    def read_output_values(out_refs)
+      out_refs.map do |ref|
+        case ref[:kind]
+        when :out
+          value = TypeMap.read_output_pointer(ref[:ptr], ref[:type])
+          { index: ref[:index], type: ref[:type].to_s, value: value }
+        when :out_array
+          base = ref[:base]
+          count = ref[:count]
+          values = TypeMap.read_array(ref[:ptr], base, count)
+          { index: ref[:index], type: "#{base}[#{count}]", value: values }
+        else
+          raise Error, "Unknown out reference kind: #{ref[:kind]}"
+        end
+      end
+    end
   end
 end

data/lib/libcall/cli.rb

@@ -1,10 +1,29 @@
 # frozen_string_literal: true
 
-require 'optparse'
 require 'json'
+require_relative 'platform'
 
 module Libcall
+  # Command-line interface for calling C functions from shared libraries
   class CLI
+    PLATFORM_EXAMPLES = {
+      windows: <<~EXAMPLES.chomp,
+        libcall -lmsvcrt puts string "Hello from libcall" -r int
+        libcall -lKernel32 GetTickCount -r uint32
+        libcall -lmsvcrt getenv string "PATH" -r string
+      EXAMPLES
+      darwin: <<~EXAMPLES.chomp,
+        libcall -lSystem getpid -r int
+        libcall -lSystem puts string "Hello from libcall" -r int
+        libcall -lSystem getenv string "PATH" -r string
+      EXAMPLES
+      unix: <<~EXAMPLES.chomp
+        libcall -lm sqrt double 16 -r double
+        libcall -lc getpid -r int
+        libcall -lc getenv string "PATH" -r string
+      EXAMPLES
+    }.freeze
+
     def initialize(argv)
       @argv = argv
       @options = {
@@ -19,41 +38,31 @@ module Libcall
     end
 
     def run
-      parse_options!
-
-      if @argv.empty?
-        puts @parser.help
-        exit 1
-      end
+      lib_path, func_name, arg_pairs = scan_argv!(@argv)
 
-      # Resolve library path
+      # Resolve library path if a library name (-l) was given
       if @options[:lib_name]
         finder = LibraryFinder.new(lib_paths: @options[:lib_paths])
         lib_path = finder.find(@options[:lib_name])
-      else
-        lib_path = @options[:lib] || @argv.shift
       end
 
-      func_name = @argv.shift
-      args = @argv
-
       if lib_path.nil? || func_name.nil?
         warn 'Error: Missing required arguments'
-        warn 'Usage: libcall <LIBRARY> <FUNCTION> [ARGS...]'
+        warn 'Usage: libcall [OPTIONS] <LIBRARY> <FUNCTION> (TYPE VALUE)...'
         exit 1
       end
 
       if @options[:verbose]
         warn "Library: #{lib_path}"
         warn "Function: #{func_name}"
-        warn "Arguments: #{args.inspect}"
+        warn "Arguments: #{arg_pairs.inspect}"
         warn "Return type: #{@options[:return_type]}"
       end
 
       if @options[:dry_run]
-        dry_run_info(lib_path, func_name, args)
+        dry_run_info(lib_path, func_name, arg_pairs)
       else
-        execute_call(lib_path, func_name, args)
+        execute_call(lib_path, func_name, arg_pairs)
       end
     rescue Error => e
       warn "Error: #{e.message}"
@@ -66,111 +75,228 @@ module Libcall
 
     private
 
-    def parse_options!
-      @parser = OptionParser.new do |opts|
-        opts.banner = <<~BANNER
-          Usage: libcall [OPTIONS] <LIBRARY> <FUNCTION> [ARGS...]
+    def parse_options_banner
+      examples = if Platform.windows?
+                   PLATFORM_EXAMPLES[:windows]
+                 elsif Platform.darwin?
+                   PLATFORM_EXAMPLES[:darwin]
+                 else
+                   PLATFORM_EXAMPLES[:unix]
+                 end
 
-          Call C functions in shared libraries from the command line.
+      <<~BANNER
+        Usage: libcall [OPTIONS] <LIBRARY> <FUNCTION> (TYPE VALUE)...
 
-          Examples:
-            libcall /lib/libm.so.6 sqrt 16.0f64 -r f64
-            libcall -lm sqrt 16.0f64 -r f64
-            libcall -lsum -L. add 10i32 20i32 -r i32
-            libcall --dry-run ./mylib.so test 42u64 -r void
+        Call C functions in shared libraries from the command line.
 
-          Options:
-        BANNER
+        Arguments are passed as TYPE VALUE pairs.
 
-        opts.on('--dry-run', 'Validate arguments without executing') do
-          @options[:dry_run] = true
-        end
+        Examples:
+          #{examples.lines.map { |line| line.chomp }.join("\n  ")}
 
-        opts.on('--json', 'Output result as JSON') do
-          @options[:json] = true
-        end
+        Options:
+          -l, --lib LIBRARY        Library name to search for (e.g., -lm for libm)
+          -L, --lib-path PATH      Add directory to library search path
+          -r, --ret TYPE           Return type (default: void)
+              --dry-run            Show what would be executed without calling
+              --json               Output result in JSON format
+              --verbose            Show detailed information
+          -h, --help               Show this help message
+          -v, --version            Show version information
+      BANNER
+    end
+
+    # Custom scanner that supports:
+    # - Known flags anywhere (before/after function name)
+    # - Negative numbers as values (not mistaken for options)
+    # - TYPE VALUE pairs
+    def scan_argv!(argv)
+      lib_path = nil
+      func_name = nil
+      arg_pairs = []
+
+      positional_only = false
+      i = 0
+      while i < argv.length
+        tok = argv[i]
 
-        opts.on('--verbose', 'Show detailed information') do
-          @options[:verbose] = true
+        # End-of-options marker: switch to positional-only mode
+        if tok == '--'
+          positional_only = true
+          i += 1
+          next
         end
 
-        opts.on('-l', '--lib LIBRARY', 'Library name (searches in standard paths)') do |lib|
-          @options[:lib_name] = lib
+        # Try to handle as a known option (only if not in positional-only mode)
+        unless positional_only
+          option_consumed = handle_option!(tok, argv, i)
+          if option_consumed > 0
+            i += option_consumed
+            next
+          end
         end
 
-        opts.on('-L', '--lib-path PATH', 'Add library search path') do |path|
-          @options[:lib_paths] << path
+        # Positional resolution for <LIBRARY> and <FUNCTION>
+        if lib_path.nil? && @options[:lib_name].nil?
+          lib_path = tok
+          i += 1
+          next
         end
 
-        opts.on('-r', '--ret TYPE', 'Return type (void, i32, f64, cstr, etc.)') do |type|
-          @options[:return_type] = Parser.parse_return_type(type)
+        if func_name.nil?
+          func_name = tok
+          i += 1
+          next
         end
 
-        opts.on('-h', '--help', 'Show help') do
-          puts opts
-          exit
+        # After function name: parse TYPE VALUE pairs (or TYPE-only for out:TYPE)
+        type_tok = tok
+        i += 1
+
+        type_sym = Parser.parse_type(type_tok)
+
+        # TYPE that represents an output pointer/array does not require a value
+        if type_sym.is_a?(Array) && %i[out out_array].include?(type_sym.first)
+          arg_pairs << [type_sym, nil]
+          next
         end
 
-        opts.on('-v', '--version', 'Show version') do
-          puts "libcall #{Libcall::VERSION}"
-          exit
+        # Allow `--` between TYPE and VALUE to switch to positional-only
+        while i < argv.length && argv[i] == '--'
+          positional_only = true
+          i += 1
         end
+
+        raise Error, "Missing value for argument of type #{type_tok}" if i >= argv.length
+
+        value_tok = argv[i]
+        value = Parser.coerce_value(type_sym, value_tok)
+        arg_pairs << [type_sym, value]
+        i += 1
       end
 
-      @parser.permute!(@argv)
+      [lib_path, func_name, arg_pairs]
     end
 
-    def dry_run_info(lib_path, func_name, args)
-      info = {
-        library: lib_path,
-        function: func_name,
-        arguments: [],
-        return_type: @options[:return_type].to_s
-      }
+    # Handle known option flags and return number of consumed tokens (0 if not an option)
+    # rubocop:disable Metrics/CyclomaticComplexity, Metrics/MethodLength, Metrics/AbcSize
+    def handle_option!(tok, argv, i)
+      case tok
+      when '--dry-run'
+        @options[:dry_run] = true
+        1
+      when '--json'
+        @options[:json] = true
+        1
+      when '--verbose'
+        @options[:verbose] = true
+        1
+      when '-h', '--help'
+        puts parse_options_banner
+        exit 0
+      when '-v', '--version'
+        puts "libcall #{Libcall::VERSION}"
+        exit 0
+      when '-l', '--lib'
+        raise Error, 'Missing value for -l/--lib' if i + 1 >= argv.length
 
-      args.each_with_index do |arg, i|
-        type_sym, value = Parser.parse_arg(arg)
-        info[:arguments] << {
-          index: i,
-          raw: arg,
-          type: type_sym.to_s,
-          value: value
-        }
+        @options[:lib_name] = argv[i + 1]
+        2
+      when /\A-l(.+)\z/
+        @options[:lib_name] = ::Regexp.last_match(1)
+        1
+      when '-L', '--lib-path'
+        raise Error, 'Missing value for -L/--lib-path' if i + 1 >= argv.length
+
+        @options[:lib_paths] << argv[i + 1]
+        2
+      when '-r', '--ret'
+        raise Error, 'Missing value for -r/--ret' if i + 1 >= argv.length
+
+        @options[:return_type] = Parser.parse_return_type(argv[i + 1])
+        2
+      when /\A-r(.+)\z/
+        @options[:return_type] = Parser.parse_return_type(::Regexp.last_match(1))
+        1
+      else
+        0 # Not an option
       end
+    end
+    # rubocop:enable Metrics/CyclomaticComplexity, Metrics/MethodLength, Metrics/AbcSize
+
+    def dry_run_info(lib_path, func_name, arg_pairs)
+      info = build_info_hash(lib_path, func_name, arg_pairs)
 
       if @options[:json]
         puts JSON.pretty_generate(info)
       else
-        puts "Library:  #{info[:library]}"
-        puts "Function: #{info[:function]}"
-        puts "Return:   #{info[:return_type]}"
-        unless info[:arguments].empty?
-          puts 'Arguments:'
-          info[:arguments].each do |arg|
-            puts "  [#{arg[:index]}] #{arg[:raw]} => #{arg[:type]} (#{arg[:value].inspect})"
-          end
-        end
+        print_info(info)
+      end
+    end
+
+    def build_info_hash(lib_path, func_name, arg_pairs)
+      {
+        library: lib_path,
+        function: func_name,
+        arguments: arg_pairs.map.with_index do |(type_sym, value), i|
+          {
+            index: i,
+            type: type_sym.to_s,
+            value: value
+          }
+        end,
+        return_type: @options[:return_type].to_s
+      }
+    end
+
+    def print_info(info)
+      puts "Library:  #{info[:library]}"
+      puts "Function: #{info[:function]}"
+      puts "Return:   #{info[:return_type]}"
+      return if info[:arguments].empty?
+
+      puts 'Arguments:'
+      info[:arguments].each do |arg|
+        puts "  [#{arg[:index]}] #{arg[:type]} = #{arg[:value].inspect}"
       end
     end
 
-    def execute_call(lib_path, func_name, args)
+    def execute_call(lib_path, func_name, arg_pairs)
       caller = Caller.new(
         lib_path,
         func_name,
-        args: args,
+        arg_pairs: arg_pairs,
         return_type: @options[:return_type]
       )
 
       result = caller.call
+      output_result(lib_path, func_name, result)
+    end
 
+    def output_result(lib_path, func_name, result)
       if @options[:json]
         output = {
           library: lib_path,
           function: func_name,
-          return_type: @options[:return_type].to_s,
-          result: result
+          return_type: @options[:return_type].to_s
         }
+
+        if result.is_a?(Hash) && result.key?(:outputs)
+          output[:result] = result[:result]
+          output[:outputs] = result[:outputs]
+        else
+          output[:result] = result
+        end
+
         puts JSON.pretty_generate(output, allow_nan: true)
+      elsif result.is_a?(Hash) && result.key?(:outputs)
+        puts "Result: #{result[:result]}" unless result[:result].nil?
+        unless result[:outputs].empty?
+          puts 'Output parameters:'
+          result[:outputs].each do |out|
+            puts "  [#{out[:index]}] #{out[:type]} = #{out[:value]}"
+          end
+        end
       else
         puts result unless result.nil?
       end

data/lib/libcall/library_finder.rb

@@ -1,6 +1,7 @@
 # frozen_string_literal: true
 
 require 'fiddle'
+require_relative 'platform'
 
 begin
   require 'pkg-config'
@@ -9,6 +10,7 @@ rescue LoadError
 end
 
 module Libcall
+  # Find shared libraries by name using standard search paths and pkg-config
   class LibraryFinder
     def initialize(lib_paths: [])
       @lib_paths = lib_paths
@@ -18,29 +20,23 @@ module Libcall
     # Find library by name (e.g., "m" -> "/lib/x86_64-linux-gnu/libm.so.6")
     def find(lib_name)
       # If it's a path, return as-is
-      return File.expand_path(lib_name) if lib_name.include?('/') || lib_name.include?('\\')
-      return File.expand_path(lib_name) if File.file?(lib_name)
+      return File.expand_path(lib_name) if path_like?(lib_name)
 
       search_paths = @lib_paths + @default_paths
 
       if defined?(PKGConfig)
-        pkg_exists = if PKGConfig.respond_to?(:exist?)
-                       PKGConfig.exist?(lib_name)
-                     else
-                       PKGConfig.respond_to?(:have_package) ? PKGConfig.have_package(lib_name) : false
-                     end
+        pkg_exists = begin
+          PKGConfig.public_send(
+            PKGConfig.respond_to?(:exist?) ? :exist? : :have_package,
+            lib_name
+          )
+        rescue StandardError
+          false
+        end
 
         if pkg_exists
-          lib_dirs = if PKGConfig.respond_to?(:libs_only_L)
-                       PKGConfig.libs_only_L(lib_name).to_s.split.map { |p| p.start_with?('-L') ? p[2..] : p }
-                     else
-                       PKGConfig.libs(lib_name).to_s.split.select { |t| t.start_with?('-L') }.map { |t| t[2..] }
-                     end
-          lib_names = if PKGConfig.respond_to?(:libs_only_l)
-                        PKGConfig.libs_only_l(lib_name).to_s.split.map { |l| l.start_with?('-l') ? l[2..] : l }
-                      else
-                        PKGConfig.libs(lib_name).to_s.split.select { |t| t.start_with?('-l') }.map { |t| t[2..] }
-                      end
+          lib_dirs = extract_pkg_config_flags(lib_name, 'L')
+          lib_names = extract_pkg_config_flags(lib_name, 'l')
 
           search_paths = lib_dirs + search_paths
 
@@ -61,36 +57,65 @@ module Libcall
 
     private
 
+    def path_like?(name)
+      name.include?('/') || name.include?('\\') || File.file?(name)
+    end
+
+    # Extract -L or -l flags from pkg-config output, normalized without the dash prefix
+    def extract_pkg_config_flags(lib_name, flag_char)
+      base = if flag_char == 'L' && PKGConfig.respond_to?(:libs_only_L)
+               PKGConfig.libs_only_L(lib_name)
+             elsif flag_char == 'l' && PKGConfig.respond_to?(:libs_only_l)
+               PKGConfig.libs_only_l(lib_name)
+             else
+               PKGConfig.libs(lib_name)
+             end
+
+      base.to_s.split
+          .select { |t| t.start_with?("-#{flag_char}") }
+          .map { |t| t[2..] }
+    end
+
     def default_library_paths
-      paths = []
+      (Platform.windows? ? windows_library_paths : unix_library_paths)
+        .select { |p| Dir.exist?(p) }
+    end
 
-      # Standard library paths
-      paths << '/lib'
-      paths << '/usr/lib'
-      paths << '/usr/local/lib'
-
-      # Architecture-specific paths
-      if RUBY_PLATFORM =~ /x86_64/
-        paths << '/lib/x86_64-linux-gnu'
-        paths << '/usr/lib/x86_64-linux-gnu'
-      elsif RUBY_PLATFORM =~ /aarch64|arm64/
-        paths << '/lib/aarch64-linux-gnu'
-        paths << '/usr/lib/aarch64-linux-gnu'
+    def windows_library_paths
+      paths = %w[C:/Windows/System32 C:/Windows/SysWOW64]
+
+      # MSYS2/MinGW paths
+      if ENV['MSYSTEM']
+        msys_prefix = ENV['MINGW_PREFIX'] || 'C:/msys64/mingw64'
+        paths.concat(["#{msys_prefix}/bin", "#{msys_prefix}/lib"])
       end
 
-      # macOS paths
-      if RUBY_PLATFORM =~ /darwin/
-        paths << '/usr/local/lib'
-        paths << '/opt/homebrew/lib'
+      # Add PATH directories on Windows
+      paths.concat(ENV['PATH'].split(';').map { |p| p.tr('\\', '/') }) if ENV['PATH']
+
+      paths
+    end
+
+    def unix_library_paths
+      # Standard library paths
+      paths = %w[/lib /usr/lib /usr/local/lib]
+
+      # Architecture-specific paths (Linux)
+      case Platform.architecture
+      when 'x86_64'
+        paths.concat(%w[/lib/x86_64-linux-gnu /usr/lib/x86_64-linux-gnu])
+      when 'aarch64'
+        paths.concat(%w[/lib/aarch64-linux-gnu /usr/lib/aarch64-linux-gnu])
       end
 
-      # LD_LIBRARY_PATH
-      paths.concat(ENV['LD_LIBRARY_PATH'].split(':')) if ENV['LD_LIBRARY_PATH']
+      # macOS paths
+      paths.concat(%w[/usr/local/lib /opt/homebrew/lib]) if Platform.darwin?
 
-      # DYLD_LIBRARY_PATH (macOS)
-      paths.concat(ENV['DYLD_LIBRARY_PATH'].split(':')) if ENV['DYLD_LIBRARY_PATH']
+      # Environment-based paths
+      paths.concat(ENV.fetch('LD_LIBRARY_PATH', '').split(':'))
+      paths.concat(ENV.fetch('DYLD_LIBRARY_PATH', '').split(':'))
 
-      paths.select { |p| Dir.exist?(p) }
+      paths
     end
 
     def resolve_by_name_in_paths(lib_name, search_paths)
@@ -101,24 +126,19 @@ module Libcall
       end
 
       # Try with lib prefix and common extensions
-      extensions = ['', '.so', '.dylib', '.dll']
-      prefixes = lib_name.start_with?('lib') ? [''] : ['lib']
-
-      prefixes.each do |prefix|
-        extensions.each do |ext|
-          name = "#{prefix}#{lib_name}#{ext}"
-          search_paths.each do |path|
-            full_path = File.join(path, name)
-            return File.expand_path(full_path) if File.file?(full_path)
-
-            # Check for versioned libraries (libm.so.6, etc.)
-            next if ext.empty?
-
-            pattern = File.join(path, "#{name}.*")
-            matches = Dir.glob(pattern).select { |f| File.file?(f) }
-            return File.expand_path(matches.first) unless matches.empty?
-          end
-        end
+      prefixes = lib_name.start_with?('lib') ? [''] : ['lib', '']
+      extensions = Platform.library_extensions
+
+      prefixes.product(extensions, search_paths).each do |prefix, ext, path|
+        name = "#{prefix}#{lib_name}#{ext}"
+        full_path = File.join(path, name)
+        return File.expand_path(full_path) if File.file?(full_path)
+
+        # Check for versioned libraries (libm.so.6, etc.)
+        next if ext.empty?
+
+        matches = Dir.glob(File.join(path, "#{name}.*")).select { |f| File.file?(f) }
+        return File.expand_path(matches.first) unless matches.empty?
       end
 
       nil

data/lib/libcall/parser.rb

@@ -1,100 +1,101 @@
 # frozen_string_literal: true
 
+require_relative 'type_map'
+
 module Libcall
+  # Parse and coerce TYPE VALUE argument pairs for FFI calls
   class Parser
-    TYPE_MAP = {
-      'i8' => :char,
-      'u8' => :uchar,
-      'i16' => :short,
-      'u16' => :ushort,
-      'i32' => :int,
-      'u32' => :uint,
-      'i64' => :long_long,
-      'u64' => :ulong_long,
-      'isize' => :long,
-      'usize' => :ulong,
-      'f32' => :float,
-      'f64' => :double,
-      'cstr' => :string,
-      'ptr' => :voidp,
-      'void' => :void,
-      'int' => :int,
-      'uint' => :uint,
-      'long' => :long,
-      'ulong' => :ulong,
-      'float' => :float,
-      'double' => :double,
-      'char' => :char,
-      'str' => :string
-    }.freeze
-
-    def self.parse_arg(arg)
-      return [:string, ''] if arg.empty?
-
-      if (arg.start_with?('"') && arg.end_with?('"')) ||
-         (arg.start_with?("'") && arg.end_with?("'"))
-        return [:string, arg[1...-1]]
+    # Pair-only API helpers
+    def self.parse_type(type_str)
+      # Output array spec: out:TYPE[N]
+      if type_str.start_with?('out:') && type_str.match(/^out:(.+)\[(\d+)\]$/)
+        base = Regexp.last_match(1)
+        count = Regexp.last_match(2).to_i
+        base_sym = TypeMap.lookup(base)
+        raise Error, "Unknown output array type: #{base}" unless base_sym
+
+        return [:out_array, base_sym, count]
       end
 
-      if arg =~ /^([-+]?(?:\d+\.?\d*|\d*\.\d+))([a-z]\d+|[a-z]+)$/i
-        value_str = ::Regexp.last_match(1)
-        type_str = ::Regexp.last_match(2)
+      # Input array spec: TYPE[] (value as comma-separated list)
+      if type_str.end_with?('[]')
+        base = type_str[0..-3]
+        base_sym = TypeMap.lookup(base)
+        raise Error, "Unknown array base type: #{base}" unless base_sym
 
-        type_sym = TYPE_MAP[type_str]
-        raise Error, "Unknown type suffix: #{type_str}" unless type_sym
+        return [:array, base_sym]
+      end
 
-        value = if %i[float double].include?(type_sym)
-                  value_str.to_f
-                else
-                  value_str.to_i
-                end
+      # Output pointer spec: out:TYPE (e.g., out:int, out:f64)
+      if type_str.start_with?('out:')
+        inner = type_str.sub(/^out:/, '')
+        inner_sym = TypeMap.lookup(inner)
+        raise Error, "Unknown type in out: #{inner}" unless inner_sym
 
-        return [type_sym, value]
+        return [:out, inner_sym]
       end
 
-      if arg =~ /^[-+]?\d+$/
-        [:int, arg.to_i]
-      elsif arg =~ /^[-+]?(?:\d+\.\d*|\d*\.\d+)$/
-        [:double, arg.to_f]
-      else
-        raise Error, "Cannot parse argument: #{arg}"
-      end
+      type_sym = TypeMap.lookup(type_str)
+      raise Error, "Unknown type: #{type_str}" unless type_sym
+
+      type_sym
     end
 
     def self.parse_return_type(type_str)
       return :void if type_str.nil? || type_str.empty? || type_str == 'void'
 
-      type_sym = TYPE_MAP[type_str]
+      type_sym = TypeMap.lookup(type_str)
       raise Error, "Unknown return type: #{type_str}" unless type_sym
 
       type_sym
     end
 
-    def self.parse_signature(sig)
-      raise Error, "Invalid signature format: #{sig}" unless sig =~ /^([a-z]\w*)\((.*)\)$/i
+    def self.coerce_value(type_sym, token)
+      # Input array values: comma-separated
+      if type_sym.is_a?(Array) && type_sym.first == :array
+        base = type_sym[1]
+        return [] if token.nil? || token.empty?
+
+        return token.split(',').map { |t| coerce_single_value(base, t.strip) }
+      end
+
+      case type_sym
+      when *TypeMap::FLOAT_TYPES
+        Float(token)
+      when *TypeMap::INTEGER_TYPES
+        Integer(token)
+      when :voidp
+        # Accept common null tokens for pointer types
+        return 0 if token =~ /\A(null|nil|NULL|0)\z/
 
-      ret_type = parse_return_type(::Regexp.last_match(1))
-      arg_types = ::Regexp.last_match(2).split(',').map(&:strip).reject(&:empty?).map do |t|
-        TYPE_MAP[t] or raise Error, "Unknown type in signature: #{t}"
+        Integer(token)
+      when :string
+        strip_quotes(token)
+      when :void
+        raise Error, 'void cannot be used as an argument type'
+      else
+        raise Error, "Unknown type for coercion: #{type_sym}"
       end
-      [ret_type, arg_types]
     end
 
-    def self.fiddle_type(type_sym)
+    def self.coerce_single_value(type_sym, token)
       case type_sym
-      when :void then Fiddle::TYPE_VOID
-      when :char then Fiddle::TYPE_CHAR
-      when :uchar then Fiddle::TYPE_UCHAR
-      when :short then Fiddle::TYPE_SHORT
-      when :ushort then Fiddle::TYPE_USHORT
-      when :int, :uint then Fiddle::TYPE_INT
-      when :long, :ulong then Fiddle::TYPE_LONG
-      when :long_long, :ulong_long then Fiddle::TYPE_LONG_LONG
-      when :float then Fiddle::TYPE_FLOAT
-      when :double then Fiddle::TYPE_DOUBLE
-      when :voidp, :string then Fiddle::TYPE_VOIDP
+      when *TypeMap::FLOAT_TYPES
+        Float(token)
+      when *TypeMap::INTEGER_TYPES
+        Integer(token)
+      when :string
+        strip_quotes(token)
+      else
+        raise Error, "Unknown element type for coercion: #{type_sym}"
+      end
+    end
+
+    def self.strip_quotes(token)
+      if (token.start_with?('"') && token.end_with?('"')) || (token.start_with?("'") && token.end_with?("'"))
+        token[1...-1]
       else
-        raise Error, "Unknown Fiddle type: #{type_sym}"
+        token
       end
     end
   end

data/lib/libcall/platform.rb

@@ -0,0 +1,43 @@
+# frozen_string_literal: true
+
+module Libcall
+  # Platform detection utilities
+  module Platform
+    # Check if running on Windows
+    def self.windows?
+      RUBY_PLATFORM =~ /mswin|mingw|cygwin/
+    end
+
+    # Check if running on macOS
+    def self.darwin?
+      RUBY_PLATFORM =~ /darwin/
+    end
+
+    # Check if running on Unix-like system (Linux, BSD, etc.)
+    def self.unix?
+      !windows?
+    end
+
+    # Get platform-specific library extensions
+    def self.library_extensions
+      if windows?
+        ['', '.dll', '.so', '.a']
+      elsif darwin?
+        ['', '.dylib', '.so', '.a']
+      else
+        ['', '.so', '.a']
+      end
+    end
+
+    # Get architecture string
+    def self.architecture
+      if RUBY_PLATFORM =~ /x86_64/
+        'x86_64'
+      elsif RUBY_PLATFORM =~ /aarch64|arm64/
+        'aarch64'
+      else
+        'unknown'
+      end
+    end
+  end
+end

data/lib/libcall/type_map.rb

@@ -0,0 +1,209 @@
+# frozen_string_literal: true
+
+require 'fiddle'
+
+module Libcall
+  # Type mapping for FFI calls
+  module TypeMap
+    # Map from string type names to FFI type symbols
+    MAP = {
+      # Short type names (Rust-like)
+      'i8' => :char,
+      'u8' => :uchar,
+      'i16' => :short,
+      'u16' => :ushort,
+      'i32' => :int,
+      'u32' => :uint,
+      'i64' => :long_long,
+      'u64' => :ulong_long,
+      'isize' => :long,
+      'usize' => :ulong,
+      'f32' => :float,
+      'f64' => :double,
+      # Pointer types
+      'cstr' => :string,
+      'ptr' => :voidp,
+      'pointer' => :voidp,
+      'void' => :void,
+      # Common C type names
+      'char' => :char,
+      'short' => :short,
+      'ushort' => :ushort,
+      'int' => :int,
+      'uint' => :uint,
+      'long' => :long,
+      'ulong' => :ulong,
+      'float' => :float,
+      'double' => :double,
+      # Extended type names (stdint-like)
+      'int8' => :char,
+      'uint8' => :uchar,
+      'int16' => :short,
+      'uint16' => :ushort,
+      'int32' => :int,
+      'uint32' => :uint,
+      'int64' => :long_long,
+      'uint64' => :ulong_long,
+      'float32' => :float,
+      'float64' => :double,
+      # Size and pointer-sized integers
+      'size_t' => :ulong,
+      'ssize_t' => :long,
+      'intptr' => :long,
+      'uintptr' => :ulong,
+      'intptr_t' => :long,
+      'uintptr_t' => :ulong,
+      'ptrdiff_t' => :long,
+      # Boolean
+      'bool' => :int,
+      # String aliases
+      'str' => :string,
+      'string' => :string
+    }.freeze
+
+    # Integer type symbols
+    INTEGER_TYPES = %i[
+      int uint
+      long ulong
+      long_long ulong_long
+      char uchar
+      short ushort
+    ].freeze
+
+    # Floating point type symbols
+    FLOAT_TYPES = %i[float double].freeze
+
+    # Look up FFI type symbol from string
+    def self.lookup(type_str)
+      MAP[type_str]
+    end
+
+    # Check if type symbol is an integer type
+    def self.integer_type?(type_sym)
+      INTEGER_TYPES.include?(type_sym)
+    end
+
+    # Check if type symbol is a floating point type
+    def self.float_type?(type_sym)
+      FLOAT_TYPES.include?(type_sym)
+    end
+
+    # Convert type symbol to Fiddle type constant
+    def self.to_fiddle_type(type_sym)
+      # Array and output parameters are passed as pointers
+      if type_sym.is_a?(Array)
+        tag = type_sym.first
+        return Fiddle::TYPE_VOIDP if %i[out array out_array].include?(tag)
+      end
+
+      case type_sym
+      when :void then Fiddle::TYPE_VOID
+      when :char then Fiddle::TYPE_CHAR
+      when :uchar then Fiddle::TYPE_UCHAR
+      when :short then Fiddle::TYPE_SHORT
+      when :ushort then Fiddle::TYPE_USHORT
+      when :int, :uint then Fiddle::TYPE_INT
+      when :long, :ulong then Fiddle::TYPE_LONG
+      when :long_long, :ulong_long then Fiddle::TYPE_LONG_LONG
+      when :float then Fiddle::TYPE_FLOAT
+      when :double then Fiddle::TYPE_DOUBLE
+      when :voidp, :string then Fiddle::TYPE_VOIDP
+      else
+        raise Error, "Unknown Fiddle type: #{type_sym}"
+      end
+    end
+
+    # Get the size in bytes for a type symbol
+    def self.sizeof(type_sym)
+      case type_sym
+      when :char, :uchar then Fiddle::SIZEOF_CHAR
+      when :short, :ushort then Fiddle::SIZEOF_SHORT
+      when :int, :uint then Fiddle::SIZEOF_INT
+      when :long, :ulong then Fiddle::SIZEOF_LONG
+      when :long_long, :ulong_long then Fiddle::SIZEOF_LONG_LONG
+      when :float then Fiddle::SIZEOF_FLOAT
+      when :double then Fiddle::SIZEOF_DOUBLE
+      when :voidp, :string then Fiddle::SIZEOF_VOIDP
+      else
+        raise Error, "Cannot get size for type: #{type_sym}"
+      end
+    end
+
+    # Allocate a pointer for output parameter
+    def self.allocate_output_pointer(type_sym)
+      ptr = Fiddle::Pointer.malloc(sizeof(type_sym))
+      # For out:string, we pass char**. Initialize inner pointer to NULL for safety.
+      ptr[0, Fiddle::SIZEOF_VOIDP] = [0].pack('J') if type_sym == :string
+      ptr
+    end
+
+    # Read value from output pointer
+    def self.read_output_pointer(ptr, type_sym)
+      case type_sym
+      when :char then ptr[0, Fiddle::SIZEOF_CHAR].unpack1('c')
+      when :uchar then ptr[0, Fiddle::SIZEOF_CHAR].unpack1('C')
+      when :short then ptr[0, Fiddle::SIZEOF_SHORT].unpack1('s')
+      when :ushort then ptr[0, Fiddle::SIZEOF_SHORT].unpack1('S')
+      when :int then ptr[0, Fiddle::SIZEOF_INT].unpack1('i')
+      when :uint then ptr[0, Fiddle::SIZEOF_INT].unpack1('I')
+      when :long then ptr[0, Fiddle::SIZEOF_LONG].unpack1('l!')
+      when :ulong then ptr[0, Fiddle::SIZEOF_LONG].unpack1('L!')
+      when :long_long then ptr[0, Fiddle::SIZEOF_LONG_LONG].unpack1('q')
+      when :ulong_long then ptr[0, Fiddle::SIZEOF_LONG_LONG].unpack1('Q')
+      when :float then ptr[0, Fiddle::SIZEOF_FLOAT].unpack1('f')
+      when :double then ptr[0, Fiddle::SIZEOF_DOUBLE].unpack1('d')
+      when :string
+        addr = ptr[0, Fiddle::SIZEOF_VOIDP].unpack1('J')
+        return '(null)' if addr.zero?
+
+        begin
+          Fiddle::Pointer.new(addr).to_s
+        rescue StandardError
+          format('0x%x', addr)
+        end
+      when :voidp then format('0x%x', ptr[0, Fiddle::SIZEOF_VOIDP].unpack1('J'))
+      else
+        raise Error, "Cannot read output value for type: #{type_sym}"
+      end
+    end
+
+    # Allocate memory for an array of base type and count elements
+    def self.allocate_array(base_type, count)
+      Fiddle::Pointer.malloc(sizeof(base_type) * count)
+    end
+
+    def self.write_array(ptr, base_type, values)
+      return if values.nil? || values.empty?
+
+      bytes = sizeof(base_type) * values.length
+      ptr[0, bytes] = values.pack(pack_template(base_type) + values.length.to_s)
+    end
+
+    def self.read_array(ptr, base_type, count)
+      return [] if count <= 0
+
+      bytes = sizeof(base_type) * count
+      raw = ptr[0, bytes]
+      raw.unpack(pack_template(base_type) + count.to_s)
+    end
+
+    def self.pack_template(base_type)
+      case base_type
+      when :char then 'c'
+      when :uchar then 'C'
+      when :short then 's'
+      when :ushort then 'S'
+      when :int then 'i'
+      when :uint then 'I'
+      when :long then 'l!'
+      when :ulong then 'L!'
+      when :long_long then 'q'
+      when :ulong_long then 'Q'
+      when :float then 'f'
+      when :double then 'd'
+      else
+        raise Error, "Unsupported array base type: #{base_type}"
+      end
+    end
+  end
+end

data/lib/libcall/version.rb

@@ -1,5 +1,5 @@
 # frozen_string_literal: true
 
 module Libcall
-  VERSION = '0.0.0'
+  VERSION = '0.0.2'
 end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: libcall
 version: !ruby/object:Gem::Version
-  version: 0.0.0
+  version: 0.0.2
 platform: ruby
 authors:
 - kojix2
@@ -51,6 +51,8 @@ files:
 - lib/libcall/cli.rb
 - lib/libcall/library_finder.rb
 - lib/libcall/parser.rb
+- lib/libcall/platform.rb
+- lib/libcall/type_map.rb
 - lib/libcall/version.rb
 homepage: https://github.com/kojix2/libcall
 licenses: