From 1aaeeb326e754c5c5db83fbf35f780f729a9dfed Mon Sep 17 00:00:00 2001 From: shyouhei Date: Sat, 17 Feb 2018 09:51:23 +0000 Subject: long long is a C99ism so SIZEOF_LONG_LONG is not always available. We have to check its defined?-ness before using. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@62450 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ext/fiddle/lib/fiddle/import.rb | 9 ++++++--- ext/fiddle/lib/fiddle/pack.rb | 21 ++++++++++++++------- ext/fiddle/lib/fiddle/value.rb | 27 ++++++++++++++++++--------- 3 files changed, 38 insertions(+), 19 deletions(-) (limited to 'ext/fiddle/lib') diff --git a/ext/fiddle/lib/fiddle/import.rb b/ext/fiddle/lib/fiddle/import.rb index 59ab3ee6f7..ae44914ec3 100644 --- a/ext/fiddle/lib/fiddle/import.rb +++ b/ext/fiddle/lib/fiddle/import.rb @@ -115,8 +115,6 @@ module Fiddle return SIZEOF_INT when TYPE_LONG return SIZEOF_LONG - when TYPE_LONG_LONG - return SIZEOF_LONG_LONG when TYPE_FLOAT return SIZEOF_FLOAT when TYPE_DOUBLE @@ -124,7 +122,12 @@ module Fiddle when TYPE_VOIDP return SIZEOF_VOIDP else - raise(DLError, "unknown type: #{ty}") + if defined?(TYPE_LONG_LONG) and + ty == TYPE_LONG_LONG + return SIZEOF_LONG_LONG + else + raise(DLError, "unknown type: #{ty}") + end end when Class if( ty.instance_methods().include?(:to_ptr) ) diff --git a/ext/fiddle/lib/fiddle/pack.rb b/ext/fiddle/lib/fiddle/pack.rb index 3c9e3c8ad7..5467d3de4b 100644 --- a/ext/fiddle/lib/fiddle/pack.rb +++ b/ext/fiddle/lib/fiddle/pack.rb @@ -18,7 +18,7 @@ module Fiddle } PACK_MAP = { - TYPE_VOIDP => ((SIZEOF_VOIDP == SIZEOF_LONG_LONG) ? "q" : "l!"), + TYPE_VOIDP => "l!", TYPE_CHAR => "c", TYPE_SHORT => "s!", TYPE_INT => "i!", @@ -48,6 +48,7 @@ module Fiddle ALIGN_MAP[TYPE_LONG_LONG] = ALIGN_MAP[-TYPE_LONG_LONG] = ALIGN_LONG_LONG PACK_MAP[TYPE_LONG_LONG] = PACK_MAP[-TYPE_LONG_LONG] = "q" SIZE_MAP[TYPE_LONG_LONG] = SIZE_MAP[-TYPE_LONG_LONG] = SIZEOF_LONG_LONG + PACK_MAP[TYPE_VOIDP] = PACK_MAP[TYPE_LONG_LONG] # override end def align(addr, align) @@ -80,10 +81,13 @@ module Fiddle case SIZEOF_VOIDP when SIZEOF_LONG ary.pack(@template) - when SIZEOF_LONG_LONG - ary.pack(@template) else - raise(RuntimeError, "sizeof(void*)?") + if defined?(TYPE_LONG_LONG) and + SIZEOF_VOIDP == SIZEOF_LONG_LONG + ary.pack(@template) + else + raise(RuntimeError, "sizeof(void*)?") + end end end @@ -91,10 +95,13 @@ module Fiddle case SIZEOF_VOIDP when SIZEOF_LONG ary.join().unpack(@template) - when SIZEOF_LONG_LONG - ary.join().unpack(@template) else - raise(RuntimeError, "sizeof(void*)?") + if defined?(TYPE_LONG_LONG) and + SIZEOF_VOIDP == SIZEOF_LONG_LONG + ary.join().unpack(@template) + else + raise(RuntimeError, "sizeof(void*)?") + end end end diff --git a/ext/fiddle/lib/fiddle/value.rb b/ext/fiddle/lib/fiddle/value.rb index a043b9b066..01fec1c206 100644 --- a/ext/fiddle/lib/fiddle/value.rb +++ b/ext/fiddle/lib/fiddle/value.rb @@ -13,10 +13,13 @@ module Fiddle [val].pack("i!").unpack("I!")[0] when TYPE_LONG [val].pack("l!").unpack("L!")[0] - when TYPE_LONG_LONG - [val].pack("q").unpack("Q")[0] else - val + if defined?(TYPE_LONG_LONG) and + ty.abs == TYPE_LONG_LONG + [val].pack("q").unpack("Q")[0] + else + val + end end end @@ -30,10 +33,13 @@ module Fiddle [val].pack("I!").unpack("i!")[0] when TYPE_LONG [val].pack("L!").unpack("l!")[0] - when TYPE_LONG_LONG - [val].pack("Q").unpack("q")[0] else - val + if defined?(TYPE_LONG_LONG) and + ty.abs == TYPE_LONG_LONG + [val].pack("Q").unpack("q")[0] + else + val + end end end @@ -75,10 +81,13 @@ module Fiddle case SIZEOF_VOIDP when SIZEOF_LONG return [arg].pack("p").unpack("l!")[0] - when SIZEOF_LONG_LONG - return [arg].pack("p").unpack("q")[0] else - raise(RuntimeError, "sizeof(void*)?") + if defined?(SIZEOF_LONG_LONG) and + SIZEOF_VOIDP == SIZEOF_LONG_LONG + return [arg].pack("p").unpack("q")[0] + else + raise(RuntimeError, "sizeof(void*)?") + end end end when Float, Integer -- cgit v1.2.3