From 63fa2de637659ab56824165e9f2295d9ef5528b0 Mon Sep 17 00:00:00 2001 From: suke Date: Sat, 1 Apr 2006 06:25:41 +0000 Subject: remove 3 test git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@10072 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ext/win32ole/tests/testOLETYPE.rb | 111 ---------------------------- ext/win32ole/tests/testOLETYPELIB.rb | 134 ---------------------------------- ext/win32ole/tests/testOLEVARIABLE.rb | 51 ------------- 3 files changed, 296 deletions(-) delete mode 100644 ext/win32ole/tests/testOLETYPE.rb delete mode 100644 ext/win32ole/tests/testOLETYPELIB.rb delete mode 100644 ext/win32ole/tests/testOLEVARIABLE.rb (limited to 'ext') diff --git a/ext/win32ole/tests/testOLETYPE.rb b/ext/win32ole/tests/testOLETYPE.rb deleted file mode 100644 index 510691484f..0000000000 --- a/ext/win32ole/tests/testOLETYPE.rb +++ /dev/null @@ -1,111 +0,0 @@ -# You need RubyUnit and MS Excel and MSI to run this test script - -require 'rubyunit' - -require 'win32ole' -require 'oleserver' - -class TestOLETYPE < RUNIT::TestCase - include OLESERVER - def test_s_new - type = WIN32OLE_TYPE.new(MS_EXCEL_TYPELIB, 'Application') - assert_instance_of(WIN32OLE_TYPE, type) - end - def test_s_ole_classes - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - assert(classes.size > 0) - end - def test_s_typelibs - libs = WIN32OLE_TYPE.typelibs - assert(libs.include?(MS_EXCEL_TYPELIB)) - assert(libs.include?(MS_XML_TYPELIB)) - end - def test_s_progids - progids = WIN32OLE_TYPE.progids - assert(progids.include?('Excel.Application')) - end - def test_name - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - class_names = classes.collect{|c| - c.name - } - assert(class_names.include?('Application')) - end - - def test_class_to_s - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - class_names = classes.collect{|c| - "#{c}" - } - assert(class_names.include?('Application')) - end - - def test_ole_type - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - app = classes.find {|c| c.name == 'Application'} - assert_equal('Class', app.ole_type) - app = classes.find {|c| c.name == '_Application'} - assert_equal('Dispatch', app.ole_type) - end - def test_typekind - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - app = classes.find {|c| c.name == 'Application'} - assert_equal(5, app.typekind) - end - def test_visible - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - app = classes.find {|c| c.name == 'Application'} - assert(app.visible?) - app = classes.find {|c| c.name == 'IAppEvents'} - assert(!app.visible?) - end - def test_src_type - classes = WIN32OLE_TYPE.ole_classes(MS_XML_TYPELIB) - domnode = classes.find {|c| c.name == 'DOMNodeType'} - assert_equal('tagDOMNodeType', domnode.src_type) - end - def test_helpstring - classes = WIN32OLE_TYPE.ole_classes(MS_XML_TYPELIB) - domdoc = classes.find {|c| c.name == 'DOMDocument'} - assert_equal('W3C-DOM XML Document', domdoc.helpstring) - end - def test_variables - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - xlchart = classes.find {|c| c.name == 'XlChartType'} - assert(xlchart.variables.size > 0) - end - def test_ole_methods - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - worksheet = classes.find {|c| c.name == 'Worksheet'} - assert(worksheet.ole_methods.size > 0) - end - def test_helpfile - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - worksheet = classes.find {|c| c.name == 'Worksheet'} - assert_match(/VBAXL.*\.(CHM|HLP)$/, worksheet.helpfile) - end - def test_helpcontext - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - worksheet = classes.find {|c| c.name == 'Worksheet'} - assert_equal(131088, worksheet.helpcontext) - end - def test_to_s - type = WIN32OLE_TYPE.new(MS_EXCEL_TYPELIB, 'Application') - assert_equal("Application", "#{type}"); - end - def test_ole_typelib - type = WIN32OLE_TYPE.new(MS_EXCEL_TYPELIB, 'Application') - tlib = type.ole_typelib - assert_instance_of(WIN32OLE_TYPELIB, tlib); - assert_equal(MS_EXCEL_TYPELIB, tlib.name); - end - - def test_implemented_ole_types - type = WIN32OLE_TYPE.new(MS_EXCEL_TYPELIB, 'Application') - impltypes = type.implemented_ole_types - assert_instance_of(Array, impltypes); - assert_equal('_Application', impltypes[0].name) - assert_equal('AppEvents', impltypes[1].name) - end - -end diff --git a/ext/win32ole/tests/testOLETYPELIB.rb b/ext/win32ole/tests/testOLETYPELIB.rb deleted file mode 100644 index ceb246930f..0000000000 --- a/ext/win32ole/tests/testOLETYPELIB.rb +++ /dev/null @@ -1,134 +0,0 @@ -require 'test/unit' -require 'win32ole' -require 'oleserver' - -class TestOLETYPELIB < Test::Unit::TestCase - include OLESERVER - def test_exists_typelib - assert(Module.constants.include?("WIN32OLE_TYPELIB")) - end - - def test_s_new - tlib = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB) - end - - def test_s_new_non_exist_tlib - exception_occured = false - msg = "" - begin - tlib = WIN32OLE_TYPELIB.new('NON EXIST TYPELIB') - rescue WIN32OLERuntimeError - msg = $!.to_s - exception_occured = true - end - assert_equal("not found type library `NON EXIST TYPELIB`", msg) - assert(exception_occured) - end - - def test_guid - tlib = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB) - assert_not_equal("", tlib.guid) - end - - def test_s_new_from_guid - tlib = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB); - guid = tlib.guid - tlib2 = WIN32OLE_TYPELIB.new(guid); - assert_equal(tlib.name, tlib2.name); - end - - def test_version - tlib = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB); - assert(tlib.version > 0) - end - - def test_major_version - tlib = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB) - assert(tlib.major_version > 0) - end - - def test_minor_version - tlib = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB) - assert(tlib.minor_version >= 0) - end - - def test_create_tlib_obj - ex = nil - begin - tlib1 = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB) - ex = WIN32OLE.new('Excel.Application') - tlib2 = ex.ole_typelib - assert_equal(tlib1.name, tlib2.name) - assert_equal(tlib1.major_version, tlib2.major_version) - assert_equal(tlib1.minor_version, tlib2.minor_version) - ensure - if ex - ex.quit - end - end - end - - def test_create_tlib_obj2 - ex = nil - begin - tlib1 = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB) - tlib2 = WIN32OLE_TYPELIB.new(tlib1.guid, tlib1.major_version, tlib1.minor_version) - assert_equal(tlib1.name, tlib2.name) - assert_equal(tlib1.major_version, tlib2.major_version) - assert_equal(tlib1.minor_version, tlib2.minor_version) - ensure - if ex - ex.quit - end - end - end - - def test_create_tlib_obj3 - ex = nil - begin - tlib1 = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB) - tlib2 = WIN32OLE_TYPELIB.new(tlib1.guid, tlib1.version) - assert_equal(tlib1.name, tlib2.name) - assert_equal(tlib1.guid, tlib2.guid) - assert_equal(tlib1.major_version, tlib2.major_version) - assert_equal(tlib1.minor_version, tlib2.minor_version) - ensure - if ex - ex.quit - end - end - end - - def test_name - tlib = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB) - assert_equal(MS_EXCEL_TYPELIB, tlib.name) - end - - def test_to_s - tlib = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB) - assert_equal(tlib.name, tlib.to_s) - end - - def test_path - tlib = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB) - assert(/EXCEL/ =~ tlib.path) - end - - def test_ole_classes - tlib = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB) - classes = tlib.ole_classes - assert(classes.instance_of?(Array)) - assert(classes.size > 0) - assert('WIN32OLE_TYPE', classes[0].class) - assert(classes.collect{|i| i.name}.include?('Workbooks')) - end - - def test_s_typelibs - tlibs = WIN32OLE_TYPELIB.typelibs - assert(tlibs.instance_of?(Array)) - assert(tlibs.size > 0) - assert('WIN32OLE_TYPELIB', tlibs[0].class) - tlibnames = tlibs.collect{|i| i.name} - tlibnames.include?('Microsoft Internet Controlls') - end -end diff --git a/ext/win32ole/tests/testOLEVARIABLE.rb b/ext/win32ole/tests/testOLEVARIABLE.rb deleted file mode 100644 index 935bd24cbb..0000000000 --- a/ext/win32ole/tests/testOLEVARIABLE.rb +++ /dev/null @@ -1,51 +0,0 @@ -# You need RubyUnit and MS Excel and MSI to run this test script - -require 'rubyunit' - -require 'win32ole' -require 'oleserver' - -class TestOLEVARIABLE < RUNIT::TestCase - include OLESERVER - def test_name - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - chart = classes.find {|c| c.name == 'XlChartType'} - var_names = chart.variables.collect {|m| m.name} - assert(var_names.size > 0) - assert(var_names.include?('xl3DColumn')) - end - def test_to_s - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - chart = classes.find {|c| c.name == 'XlChartType'} - var_names = chart.variables.collect {|m| "#{m}"} - assert(var_names.size > 0) - assert(var_names.include?('xl3DColumn')) - end - def test_ole_type - tlib = WIN32OLE_TYPELIB.new(MS_EXCEL_TYPELIB) - classes = tlib.ole_classes - # classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - chart = classes.find {|c| c.name == 'XlChartType'} - var = chart.variables.find {|m| m.name == 'xl3DColumn'} - assert_equal('INT', var.ole_type) - end - def test_ole_type_detail - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - chart = classes.find {|c| c.name == 'XlChartType'} - var = chart.variables.find {|m| m.name == 'xl3DColumn'} - assert_equal(['INT'], var.ole_type_detail) - end - - def test_value - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - chart = classes.find {|c| c.name == 'XlChartType'} - var = chart.variables.find {|m| m.name == 'xl3DColumn'} - assert_equal(-4100, var.value) - end - def test_visible - classes = WIN32OLE_TYPE.ole_classes(MS_EXCEL_TYPELIB) - chart = classes.find {|c| c.name == 'XlChartType'} - var = chart.variables.find {|m| m.name == 'xl3DColumn'} - assert(var.visible?) - end -end -- cgit v1.2.3