github
/
ruby
зеркало из https://github.com/github/ruby.git
1
0
Форкнуть 0
Код Задачи Пакеты Проекты Релизы Вики Активность

svn:eol-style LF 

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@18222 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nobu 2008-07-25 14:49:53 +00:00
Родитель f421f68484
Коммит 0841c2e67b
2 изменённых файлов: 84 добавлений и 84 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

22
test/win32ole/err_in_callback.rb
Просмотреть файл

@ -1,11 +1,11 @@
require 'win32ole' require 'win32ole'
ie = WIN32OLE.new('InternetExplorer.Application') ie = WIN32OLE.new('InternetExplorer.Application')
ie.visible = true ie.visible = true
WIN32OLE_EVENT.message_loop WIN32OLE_EVENT.message_loop
sleep 0.2 sleep 0.2
ev = WIN32OLE_EVENT.new(ie) ev = WIN32OLE_EVENT.new(ie)
ev.on_event('BeforeNavigate2') {|*args| ev.on_event('BeforeNavigate2') {|*args|
foo foo
} }
ie.navigate(ARGV.shift) ie.navigate(ARGV.shift)

146
test/win32ole/test_err_in_callback.rb
Просмотреть файл

@ -1,73 +1,73 @@
# #
# test Win32OLE avoids cfp consistency error when the exception raised # test Win32OLE avoids cfp consistency error when the exception raised
# in WIN32OLE_EVENT handler block. [ruby-dev:35450] # in WIN32OLE_EVENT handler block. [ruby-dev:35450]
# #
begin begin
require 'win32ole' require 'win32ole'
rescue LoadError rescue LoadError
end end
require 'rbconfig' require 'rbconfig'
require 'mkmf' require 'mkmf'
require 'test/unit' require 'test/unit'
if defined?(WIN32OLE) if defined?(WIN32OLE)
class TestErrInCallBack < Test::Unit::TestCase class TestErrInCallBack < Test::Unit::TestCase
def setup def setup
@ruby = nil @ruby = nil
if File.exist?("./" + CONFIG["RUBY_INSTALL_NAME"] + CONFIG["EXEEXT"]) if File.exist?("./" + CONFIG["RUBY_INSTALL_NAME"] + CONFIG["EXEEXT"])
@ruby = "./" + CONFIG["RUBY_INSTALL_NAME"] @ruby = "./" + CONFIG["RUBY_INSTALL_NAME"]
@iopt = $:.map {|e| @iopt = $:.map {|e|
" -I " + e " -I " + e
}.join("") }.join("")
@script = File.dirname(__FILE__) + "/err_in_callback.rb" @script = File.dirname(__FILE__) + "/err_in_callback.rb"
@param = create_temp_html @param = create_temp_html
@param = "file:///" + @param.gsub(/\\/, '/') @param = "file:///" + @param.gsub(/\\/, '/')
end end
end end
def create_temp_html def create_temp_html
fso = WIN32OLE.new('Scripting.FileSystemObject') fso = WIN32OLE.new('Scripting.FileSystemObject')
dummy_file = fso.GetTempName + ".html" dummy_file = fso.GetTempName + ".html"
cfolder = fso.getFolder(".") cfolder = fso.getFolder(".")
@str = "This is test HTML file for Win32OLE (#{Time.now})" @str = "This is test HTML file for Win32OLE (#{Time.now})"
f = cfolder.CreateTextFile(dummy_file) f = cfolder.CreateTextFile(dummy_file)
f.writeLine("<html><body><div id='str'>#{@str}</div></body></html>") f.writeLine("<html><body><div id='str'>#{@str}</div></body></html>")
f.close f.close
dummy_path = cfolder.path + "\\" + dummy_file dummy_path = cfolder.path + "\\" + dummy_file
dummy_path dummy_path
end end
def test_err_in_callback def test_err_in_callback
if @ruby if @ruby
r = `#{@ruby} #{@iopt} #{@script} #{@param}` r = `#{@ruby} #{@iopt} #{@script} #{@param}`
assert_match(/NameError/, r) assert_match(/NameError/, r)
end end
end end
def ie_quit def ie_quit
sh = WIN32OLE.new('Shell.Application') sh = WIN32OLE.new('Shell.Application')
sh.windows.each do |w| sh.windows.each do |w|
if w.ole_type.name == 'IWebBrowser2' if w.ole_type.name == 'IWebBrowser2'
20.times do |i| 20.times do |i|
if w.locationURL != "" && w.document if w.locationURL != "" && w.document
break break
end end
WIN32OLE_EVENT.message_loop WIN32OLE_EVENT.message_loop
sleep 1 sleep 1
end end
e = w.document.getElementById("str") e = w.document.getElementById("str")
if e && e.innerHTML == @str if e && e.innerHTML == @str
w.quit w.quit
WIN32OLE_EVENT.message_loop WIN32OLE_EVENT.message_loop
sleep 0.2 sleep 0.2
end end
end end
end end
end end
def teardown def teardown
WIN32OLE_EVENT.message_loop WIN32OLE_EVENT.message_loop
ie_quit ie_quit
end end
end end
end end