diff options
author | aycabta <aycabta@gmail.com> | 2019-04-30 12:47:40 +0900 |
---|---|---|
committer | aycabta <aycabta@gmail.com> | 2019-04-30 12:53:20 +0900 |
commit | 3be5907e734f9c88af577bb0b0e8ec2d66b7b2f7 (patch) | |
tree | ae428c0d6d39c93cf1355a1771ca4d473ffa1cd2 /lib/reline/windows.rb | |
parent | 319eee0f4a13d29a82eeffa348b8a3b5685e2f6e (diff) |
Move Win32API to Reline::Win32API
Diffstat (limited to 'lib/reline/windows.rb')
-rw-r--r-- | lib/reline/windows.rb | 72 |
1 files changed, 35 insertions, 37 deletions
diff --git a/lib/reline/windows.rb b/lib/reline/windows.rb index 868679ef9b..f65c527ccd 100644 --- a/lib/reline/windows.rb +++ b/lib/reline/windows.rb @@ -1,46 +1,44 @@ require 'fiddle/import' -class Win32API - DLL = {} - TYPEMAP = {"0" => Fiddle::TYPE_VOID, "S" => Fiddle::TYPE_VOIDP, "I" => Fiddle::TYPE_LONG} - POINTER_TYPE = Fiddle::SIZEOF_VOIDP == Fiddle::SIZEOF_LONG_LONG ? 'q*' : 'l!*' - - WIN32_TYPES = "VPpNnLlIi" - DL_TYPES = "0SSI" - - def initialize(dllname, func, import, export = "0", calltype = :stdcall) - @proto = [import].join.tr(WIN32_TYPES, DL_TYPES).sub(/^(.)0*$/, '\1') - import = @proto.chars.map {|win_type| TYPEMAP[win_type.tr(WIN32_TYPES, DL_TYPES)]} - export = TYPEMAP[export.tr(WIN32_TYPES, DL_TYPES)] - calltype = Fiddle::Importer.const_get(:CALL_TYPE_TO_ABI)[calltype] - - handle = DLL[dllname] ||= - begin - Fiddle.dlopen(dllname) - rescue Fiddle::DLError - raise unless File.extname(dllname).empty? - Fiddle.dlopen(dllname + ".dll") - end - - @func = Fiddle::Function.new(handle[func], import, export, calltype) - rescue Fiddle::DLError => e - raise LoadError, e.message, e.backtrace - end +module Reline + class Win32API + DLL = {} + TYPEMAP = {"0" => Fiddle::TYPE_VOID, "S" => Fiddle::TYPE_VOIDP, "I" => Fiddle::TYPE_LONG} + POINTER_TYPE = Fiddle::SIZEOF_VOIDP == Fiddle::SIZEOF_LONG_LONG ? 'q*' : 'l!*' + + WIN32_TYPES = "VPpNnLlIi" + DL_TYPES = "0SSI" + + def initialize(dllname, func, import, export = "0", calltype = :stdcall) + @proto = [import].join.tr(WIN32_TYPES, DL_TYPES).sub(/^(.)0*$/, '\1') + import = @proto.chars.map {|win_type| TYPEMAP[win_type.tr(WIN32_TYPES, DL_TYPES)]} + export = TYPEMAP[export.tr(WIN32_TYPES, DL_TYPES)] + calltype = Fiddle::Importer.const_get(:CALL_TYPE_TO_ABI)[calltype] + + handle = DLL[dllname] ||= + begin + Fiddle.dlopen(dllname) + rescue Fiddle::DLError + raise unless File.extname(dllname).empty? + Fiddle.dlopen(dllname + ".dll") + end + + @func = Fiddle::Function.new(handle[func], import, export, calltype) + rescue Fiddle::DLError => e + raise LoadError, e.message, e.backtrace + end - def call(*args) - import = @proto.split("") - args.each_with_index do |x, i| - args[i], = [x == 0 ? nil : x].pack("p").unpack(POINTER_TYPE) if import[i] == "S" - args[i], = [x].pack("I").unpack("i") if import[i] == "I" + def call(*args) + import = @proto.split("") + args.each_with_index do |x, i| + args[i], = [x == 0 ? nil : x].pack("p").unpack(POINTER_TYPE) if import[i] == "S" + args[i], = [x].pack("I").unpack("i") if import[i] == "I" + end + ret, = @func.call(*args) + return ret || 0 end - ret, = @func.call(*args) - return ret || 0 end - alias Call call -end - -module Reline VK_LMENU = 0xA4 STD_OUTPUT_HANDLE = -11 @@getwch = Win32API.new('msvcrt', '_getwch', [], 'I') |