diff options
author | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2012-04-17 04:11:17 +0000 |
---|---|---|
committer | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2012-04-17 04:11:17 +0000 |
commit | dad31f6e5047272cea5a65c764281bcaa7284131 (patch) | |
tree | d0a8caf8138c0d965235a915f9d7ee2bbd0e095b | |
parent | 6655667d738d59cc824b264eef4587fe9700af15 (diff) |
* dln.c (rb_w32_check_imported): skip ordinal entries. based on a
patch by phasis68 (Heesob Park) at [ruby-core:44381].
[ruby-core:44371][Bug #6303]
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@35354 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r-- | ChangeLog | 7 | ||||
-rw-r--r-- | dln.c | 4 | ||||
-rw-r--r-- | ext/-test-/win32/dln/dlntest.c | 17 | ||||
-rw-r--r-- | ext/-test-/win32/dln/extconf.rb | 28 | ||||
-rw-r--r-- | ext/-test-/win32/dln/libdlntest.c | 4 | ||||
-rw-r--r-- | ext/-test-/win32/dln/libdlntest.def | 2 | ||||
-rw-r--r-- | test/-ext-/win32/test_dln.rb | 13 |
7 files changed, 69 insertions, 6 deletions
@@ -1,7 +1,8 @@ -Mon Apr 16 21:25:24 2012 Nobuyoshi Nakada <nobu@ruby-lang.org> +Tue Apr 17 13:11:14 2012 Nobuyoshi Nakada <nobu@ruby-lang.org> - * dln.c (rb_w32_check_imported): skip ordinal entries. patched by - phasis68 (Heesob Park) at [ruby-core:44381]. [Bug #6303] + * dln.c (rb_w32_check_imported): skip ordinal entries. based on a + patch by phasis68 (Heesob Park) at [ruby-core:44381]. + [ruby-core:44371][Bug #6303] Mon Apr 16 18:22:14 2012 NARUSE, Yui <naruse@ruby-lang.org> @@ -1214,7 +1214,7 @@ rb_w32_check_imported(HMODULE ext, HMODULE mine) while (desc->Name) { PIMAGE_THUNK_DATA pint = (PIMAGE_THUNK_DATA)((char *)ext + desc->Characteristics); PIMAGE_THUNK_DATA piat = (PIMAGE_THUNK_DATA)((char *)ext + desc->FirstThunk); - while (piat->u1.Function) { + for (; piat->u1.Function; piat++, pint++) { static const char prefix[] = "rb_"; PIMAGE_IMPORT_BY_NAME pii; const char *name; @@ -1226,8 +1226,6 @@ rb_w32_check_imported(HMODULE ext, HMODULE mine) FARPROC addr = GetProcAddress(mine, name); if (addr) return (FARPROC)piat->u1.Function == addr; } - piat++; - pint++; } desc++; } diff --git a/ext/-test-/win32/dln/dlntest.c b/ext/-test-/win32/dln/dlntest.c new file mode 100644 index 0000000000..3e6037ac07 --- /dev/null +++ b/ext/-test-/win32/dln/dlntest.c @@ -0,0 +1,17 @@ +#include <ruby.h> + +extern __declspec(dllimport) void dlntest_ordinal(void); + +static VALUE +dln_dlntest(VALUE self) +{ + dlntest_ordinal(); + return self; +} + +void +Init_dln(void) +{ + VALUE m = rb_define_module_under(rb_define_module("Bug"), "Win32"); + rb_define_module_function(m, "dlntest", dln_dlntest, 0); +} diff --git a/ext/-test-/win32/dln/extconf.rb b/ext/-test-/win32/dln/extconf.rb new file mode 100644 index 0000000000..e7fbd35405 --- /dev/null +++ b/ext/-test-/win32/dln/extconf.rb @@ -0,0 +1,28 @@ +if /mswin|mingw/ =~ RUBY_PLATFORM + $objs = ["dlntest.o"] + + target_prefix = "-test-/win32/" + create_makefile(target_prefix+"dln") + m = File.read("Makefile") + m.sub!(/^OBJS =.*/) {$&+" dlntest.#{$LIBEXT}"} + open("Makefile", "wb") do |mf| + mf.puts m, "\n" + sodir = $extout ? "$(RUBYARCHDIR)/" : '' + mf.print "#{sodir}$(DLLIB): dlntest.#{$LIBEXT}" + mf.puts + mf.puts "dlntest.#{$LIBEXT}: $(topdir)/dlntest.dll" + mf.puts + mf.puts depend_rules("$(topdir)/dlntest.dll: libdlntest.o libdlntest.def") + mf.puts "\t$(ECHO) linking shared-object $(@F)\n" + mf.print "\t-$(Q)$(RM) $@\n" + mf.print "\t-$(Q)$(MAKEDIRS) $(@D)\n" if $extout + link_so = LINK_SO.gsub(/^/, "\t$(Q) ") + link_so.sub!(/\$\(LOCAL_LIBS\)/, '') + link_so.gsub!(/-\$\(arch\)/, '') + link_so.gsub!(/:.so=/, ':.dll=') + link_so.sub!(/\$\(OBJS\)/, "libdlntest.#{$OBJEXT}") + link_so.sub!(/\$\(DEFFILE\)/, "$(srcdir)/libdlntest.def") + mf.puts link_so + mf.puts + end +end diff --git a/ext/-test-/win32/dln/libdlntest.c b/ext/-test-/win32/dln/libdlntest.c new file mode 100644 index 0000000000..040ae8125d --- /dev/null +++ b/ext/-test-/win32/dln/libdlntest.c @@ -0,0 +1,4 @@ +extern __declspec(dllexport) void +dlntest_ordinal(void) +{ +} diff --git a/ext/-test-/win32/dln/libdlntest.def b/ext/-test-/win32/dln/libdlntest.def new file mode 100644 index 0000000000..85bc9c7a55 --- /dev/null +++ b/ext/-test-/win32/dln/libdlntest.def @@ -0,0 +1,2 @@ +EXPORTS +dlntest_ordinal @1 NONAME diff --git a/test/-ext-/win32/test_dln.rb b/test/-ext-/win32/test_dln.rb new file mode 100644 index 0000000000..7ab912af7f --- /dev/null +++ b/test/-ext-/win32/test_dln.rb @@ -0,0 +1,13 @@ +require 'test/unit' +require_relative '../../ruby/envutil' + +module Bug + module Win32 + class TestDln < Test::Unit::TestCase + def test_check_imported + bug = '[Bug #6303]' + assert_in_out_err(['-r-test-/win32/dln', '-eexit'], '', [], [], bug, timeout: 10) + end + end + end +end |