1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
ruby--ruby/test/dl/test_callback.rb
tenderlove c1fb6a82dc * ext/fiddle/handle.c: Make Fiddle independent of DL, copy DL::Handle
to Fiddle::Handle.
* ext/fiddle/pointer.c: Make Fiddle independent of DL, copy
  DL::Pointer to Fiddle::Pointer.
* test/fiddle/test_func.rb: relevent tests
* test/fiddle/test_handle.rb: ditto
* test/fiddle/test_pointer.rb: ditto
* ext/dl/lib/dl/struct.rb: use Fiddle::Pointer if available
* ext/fiddle/extconf.rb: check for dlfcn.h
* ext/fiddle/fiddle.c: add constants for sizeof() things
* ext/fiddle/fiddle.h: include dlfcn.h
* ext/fiddle/function.c: expose a C function for creating new
  Fiddle::Function objects.
* ext/fiddle/lib/fiddle.rb: include constants for dl backwards compat
* ext/fiddle/lib/fiddle/function.rb: read the pointer from the
  function for dl backwards compat.
* test/dl/test_callback.rb: check the addresses of the pointers rather
  than their types.
* test/fiddle/helper.rb: remove dependency on dl
* test/fiddle/test_closure.rb: ditto
* test/fiddle/test_fiddle.rb: ditto

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@37907 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2012-11-27 19:54:50 +00:00

72 lines
1.7 KiB
Ruby

require_relative 'test_base'
require_relative '../ruby/envutil'
require 'dl/callback'
require 'dl/func'
module DL
class TestCallback < TestBase
include DL
def test_remove_callback_failed
assert_equal(false, remove_callback(0, TYPE_VOIDP))
end
def test_remove_callback
addr = set_callback(TYPE_VOIDP, 1) do |str|
str
end
assert remove_callback(addr, TYPE_VOIDP), 'callback removed'
end
def test_callback_return_value
addr = set_callback(TYPE_VOIDP, 1) do |str|
str
end
func = CFunc.new(addr, TYPE_VOIDP, 'test')
f = Function.new(func, [TYPE_VOIDP])
ptr = CPtr['blah']
assert_equal ptr.to_i, f.call(ptr).to_i
end
def test_callback_return_arbitrary
foo = 'foo'
addr = set_callback(TYPE_VOIDP, 1) do |ptr|
CPtr[foo].to_i
end
func = CFunc.new(addr, TYPE_VOIDP, 'test')
f = Function.new(func, [TYPE_VOIDP])
ptr = CPtr['foo']
assert_equal 'foo', f.call(ptr).to_s
end
def test_callback_with_string
called_with = nil
addr = set_callback(TYPE_VOID, 1) do |str|
called_with = dlunwrap(str)
end
func = CFunc.new(addr, TYPE_VOID, 'test')
f = Function.new(func, [TYPE_VOIDP])
# Don't remove local variable arg.
# This necessary to protect objects from GC.
arg = 'foo'
f.call(dlwrap(arg))
assert_equal arg, called_with
end
def test_call_callback
called = false
addr = set_callback(TYPE_VOID, 1) do |foo|
called = true
end
func = CFunc.new(addr, TYPE_VOID, 'test')
f = Function.new(func, [TYPE_VOIDP])
f.call(nil)
assert called, 'function should be called'
end
end
end