robust_excel_ole 1.1.4 → 1.1.5

data/spec/ruby1.8.6_rspec2.14/general_spec.rb

@@ -0,0 +1,212 @@
+# -*- coding: utf-8 -*-
+
+require File.join(File.dirname(__FILE__), './spec_helper')
+
+$VERBOSE = nil
+
+include General
+include RobustExcelOle
+
+module RobustExcelOle
+
+  describe General do
+
+    before(:all) do
+      excel = Excel.new(:reuse => true)
+      open_books = excel == nil ? 0 : excel.Workbooks.Count
+      puts "*** open books *** : #{open_books}" if open_books > 0
+      Excel.kill_all
+    end
+
+    before do
+      @dir = create_tmpdir
+      @simple_file = @dir + '/workbook.xls'
+      @simple_save_file = @dir + '/workbook_save.xls'
+      @different_file = @dir + '/different_workbook.xls'
+      @simple_file_other_path = @dir + '/more_data/workbook.xls'
+      @another_simple_file = @dir + '/another_workbook.xls'
+      @linked_file = @dir + '/workbook_linked.xlsm'
+      @simple_file_xlsm = @dir + '/workbook.xls'
+      @simple_file_xlsx = @dir + '/workbook.xlsx'
+    end
+
+    after do
+      Excel.kill_all
+      rm_tmp(@dir)
+    end
+
+    describe "methods, own_methods, respond_to?" do
+
+      before do
+        @book1 = Book.open(@simple_file)
+        @ole_workbook_methods = 
+          ["Activate", "ActiveSheet", "Application", "Close", "FullName", "HasPassword", "Name", "Names", 
+            "Password", "Protect", "ProtectSharing", "ProtectStructure", "Protect", "ReadOnly", "Save", 
+            "SaveAs", "Saved", "Sheets", "Unprotect"]
+        @book_methods = ["focus", "add_sheet", "alive?", "close", "filename", "nameval", "ole_object", 
+                         "ole_workbook", "reopen", "save", "save_as", "saved", "set_nameval"]
+        @ole_excel_methods = 
+          ["ActiveCell", "ActiveSheet", "ActiveWorkbook", "Application",  "Calculate", "Cells", "Columns",
+            "DisplayAlerts", "Evaluate", "Hwnd", "Name", "Names", "Quit", "Range", "Ready", "Save", 
+            "Sheets", "UserName", "Value", "Visible", "Workbooks", "Worksheets"]
+        @excel_methods = ["alive?", "book_class", "close", "displayalerts", "recreate", "visible", 
+          "with_displayalerts"] 
+        @ole_sheet_methods = []
+         # ["Activate", "Calculate", "Copy", "Name", "Select", "Evaluate", "Protect", "Unprotect"]
+        @sheet_methods = ["book_class", "col_range", "each", "each_column", "each_column_with_index",
+                          "each_row", "each_row_with_index", "nameval", "rangeval", 
+                          "set_rangeval", "row_range", "set_nameval"]
+      end
+
+      after do
+        @book1.close
+      end
+
+      it "should do methods for book" do
+        ((@ole_workbook_methods + @book_methods) - @book1.methods).should be_empty
+        (Object.instance_methods.select{|m| m =~ /^(?!\_)/} - @book1.methods).should be_empty
+      end
+
+      it "should do own_methods with popular ole_workbook and workbook methods" do
+        ((@ole_workbook_methods + @book_methods) - @book1.own_methods).should be_empty
+        (Object.instance_methods - @book1.own_methods).should == Object.instance_methods 
+      end
+
+      it "should respond to popular workbook methods" do
+        @book_methods.each{|m| @book1.respond_to?(m).should be_true}
+      end
+
+      it "should do methods for excel" do
+        ((@ole_excel_methods + @excel_methods) - @book1.excel.methods).should be_empty
+        (Object.instance_methods.select{|m| m =~ /^(?!\_)/}  - @book1.excel.methods).sort.should be_empty       
+      end
+
+      it "should do own_methods with popular ole_excel and excel methods" do
+        ((@ole_excel_methods + @excel_methods) - @book1.excel.own_methods).should be_empty
+         (Object.instance_methods - @book1.excel.own_methods).should == Object.instance_methods
+      end
+
+      it "should respond to popular excel methods" do
+        @excel_methods.each{|m| @book1.excel.respond_to?(m).should be_true}
+      end
+
+      it "should do methods for sheet" do
+        ((@ole_sheet_methods + @sheet_methods) - @book1.sheet(1).methods).should be_empty
+        (Object.instance_methods.select{|m| m =~ /^(?!\_)/}  - @book1.sheet(1).methods).sort.should be_empty       
+      end
+
+      it "should do own_methods with popular ole_excel and excel methods" do
+        ((@ole_sheet_methods + @sheet_methods) - @book1.sheet(1).own_methods).should == [] #be_empty
+         (Object.instance_methods - @book1.sheet(1).own_methods).should == Object.instance_methods
+      end
+
+      it "should respond to popular sheet methods" do
+        @sheet_methods.each{|m| @book1.sheet(1).respond_to?(m).should be_true}
+      end
+
+    end
+
+    describe "#absolute_path" do
+      
+      context "with standard" do
+        
+        before do
+          @previous_dir = Dir.getwd
+        end
+        
+        after do
+          Dir.chdir @previous_dir
+        end
+
+        it "should return the right absolute paths" do
+          absolute_path("C:/abc").should == "C:\\abc"
+          absolute_path("C:\\abc").should == "C:\\abc"
+          Dir.chdir "C:/windows"
+          absolute_path("C:abc").downcase.should == Dir.pwd.gsub("/","\\").downcase + "\\abc"
+          absolute_path("C:abc").upcase.should   == File.expand_path("abc").gsub("/","\\").upcase
+        end
+
+        it "should return right absolute path name" do
+          filename = 'C:/Dokumente und Einstellungen/Zauberthomas/Eigene Dateien/robust_excel_ole/spec/book_spec.rb'
+          absolute_path(filename).gsub("\\","/").should == filename
+        end
+      end
+    end
+
+    describe "canonize" do
+
+      context "with standard" do
+        
+        it "should reduce slash at the end" do
+          normalize("hallo/").should == "hallo"
+          normalize("/this/is/the/Path/").should == "/this/is/the/Path"
+        end
+
+        it "should save capital letters" do
+          normalize("HALLO/").should == "HALLO"
+          normalize("/This/IS/tHe/patH/").should == "/This/IS/tHe/patH"
+        end
+
+        it "should reduce multiple shlashes" do
+          normalize("/this/is//the/path").should == "/this/is/the/path"
+          normalize("///this/////////is//the/path/////").should == "/this/is/the/path"
+        end
+
+        it "should reduce dots in the paths" do
+          canonize("/this/is/./the/path").should == "/this/is/the/path"
+          canonize("this/.is/./the/pa.th/").should == "this/.is/the/pa.th"
+          canonize("this//.///.//.is/the/pa.th/").should == "this/.is/the/pa.th"
+        end
+
+        it "should change to the upper directory with two dots" do
+          canonize("/this/is/../the/path").should == "/this/the/path"
+          canonize("this../.i.s/.../..the/..../pa.th/").should == "this../.i.s/.../..the/..../pa.th"
+        end
+
+        it "should downcase" do
+          canonize("/This/IS/tHe/path").should == "/this/is/the/path"
+          canonize("///THIS/.///./////iS//the/../PatH/////").should == "/this/is/path"
+        end
+
+        it "should raise an error for no strings" do
+          expect{
+            canonize(1)
+          }.to raise_error(TypeREOError, "No string given to canonize, but 1")
+        end
+
+      end
+    end
+
+    describe "path" do
+
+      it "should create a path" do
+        path1 = "this" / "is" / "a" / "path"
+        path1.should == "this/is/a/path"
+        path2 = "this" / "is" / "a" / "path" / 
+        #path2.should == "this/is/a/path/"
+        path3 = "this" / 
+        #path3.should == "this/"
+        path4 = "this" / nil
+        path4.should == "this"
+      end
+    end
+
+    describe "Object methods" do
+
+      before do
+        @book = Book.open(@simple_file)
+        @sheet = @book.sheet(1)
+      end
+
+      before do
+        @book.close
+      end
+
+      it "should raise an error when asking excel of a sheet" do
+        expect{
+          @sheet.excel
+          }.to raise_error(TypeREOError, "receiver instance is neither an Excel nor a Book")
+      end
+    end
+  end
+end

data/spec/ruby1.8.6_rspec2.14/range_spec.rb

@@ -0,0 +1,131 @@
+# -*- cdoing: utf-8 -*-
+require File.join(File.dirname(__FILE__), './spec_helper')
+
+include RobustExcelOle
+
+describe RobustExcelOle::Range do
+
+  before(:all) do
+    excel = Excel.new(:reuse => true)
+    open_books = excel == nil ? 0 : excel.Workbooks.Count
+    puts "*** open books *** : #{open_books}" if open_books > 0
+    Excel.kill_all
+  end
+
+  before do
+    @dir = create_tmpdir
+    @book = Book.open(@dir + '/workbook.xls', :force_excel => :new)
+    @sheet = @book.sheet(2)
+    @range = RobustExcelOle::Range.new(@sheet.ole_worksheet.UsedRange.Rows(1))
+  end
+
+  after do
+    @book.close
+    Excel.kill_all
+    rm_tmp(@dir)
+  end
+
+  describe "#each" do
+    it "items is RobustExcelOle::Cell" do
+      @range.each do |cell|
+        cell.should be_kind_of RobustExcelOle::Cell
+      end
+    end
+  end
+
+  describe "#values" do
+    context "with (0..2)" do
+      it { @range.values(0..2).should eq ['simple', 'file', 'sheet2'] }
+    end
+
+    context "with (1..2)" do
+      it { @range.values(1..2).should eq ['file', 'sheet2'] }
+    end
+
+    context "with (2..2)" do
+      it { @range.values(2..2).should eq ['sheet2'] }
+    end
+
+    context "with no arguments" do
+      it { @range.values.should eq ['simple', 'file', 'sheet2'] }
+    end
+
+    context "when instance is column range" do
+      before do
+        @sheet = @book.sheet(1)
+        @range = RobustExcelOle::Range.new(@sheet.ole_worksheet.UsedRange.Columns(1))
+      end
+      it { @range.values.should eq ['foo', 'foo', 'matz'] }
+    end
+
+    context "read 'merge_cells.xls'" do
+      before do
+        @merge_cells_book = Book.open("#{@dir}/merge_cells.xls", :force_excel => :new)
+        @merge_cells_sheet = @merge_cells_book.sheet(1)
+      end
+
+      after do
+        @merge_cells_book.close
+      end
+
+      context "only merged_cell" do
+        before do
+          @only_merged_range = @merge_cells_sheet.row_range(4)
+        end
+
+        context "without argument" do
+          it { @only_merged_range.values.should eq ['merged', 'merged', 'merged', 'merged'] }
+        end
+
+        context "with (1..2)" do
+          it { @only_merged_range.values(2..3).should eq ['merged', 'merged'] }
+        end
+
+      end
+
+      context "mix merged cell and no merge cell" do
+        before do
+          @mix_merged_no_merged_range = @merge_cells_sheet.row_range(2)
+        end
+
+        context "without argument" do
+          it { @mix_merged_no_merged_range.values.should eq ['first merged', 'first merged', 'first merged', nil] }
+        end
+
+        context "with (2..3)" do
+          it { @mix_merged_no_merged_range.values(2..3).should eq ['first merged', nil] }
+        end
+
+      end
+    end
+  end
+
+  describe "#[]" do
+    context "access [0]" do
+      it { @range[0].should be_kind_of RobustExcelOle::Cell }
+      it { @range[0].value.should eq 'simple' }
+    end
+
+    context "access [2]" do
+      it { @range[2].value.should eq 'sheet2' }
+    end
+
+    context "access [0] and [1] and [2]" do
+      it "should get every values" do
+        @range[0].value.should eq 'simple'
+        @range[1].value.should eq 'file'
+        @range[2].value.should eq 'sheet2'
+      end
+    end
+  end
+
+  describe "#method_missing" do
+    it "can access COM method" do
+      @range.Range(@range.Cells.Item(1), @range.Cells.Item(3)).value.should eq [@range.values(0..2)]
+    end
+
+    context "unknown method" do
+      it { expect { @range.hogehogefoo}.to raise_error }
+    end
+  end
+end

data/spec/ruby1.8.6_rspec2.14/reo_common_spec.rb

@@ -0,0 +1,130 @@
+# -*- coding: utf-8 -*-
+
+require File.join(File.dirname(__FILE__), './spec_helper')
+require File.expand_path( '../../lib/robust_excel_ole/reo_common', __FILE__)
+
+$VERBOSE = nil
+
+include General
+include RobustExcelOle
+
+module RobustExcelOle
+
+  describe REOCommon do
+
+    it "should simple test" do
+      puts "a"
+    end
+
+    before(:all) do
+      excel = Excel.new(:reuse => true)
+      open_books = excel == nil ? 0 : excel.Workbooks.Count
+      puts "*** open books *** : #{open_books}" if open_books > 0
+      Excel.kill_all
+    end
+
+    before do
+      @dir = create_tmpdir
+      @simple_file = @dir + '/workbook.xls'
+      @simple_save_file = @dir + '/workbook_save.xls'
+      @different_file = @dir + '/different_workbook.xls'
+      @simple_file_other_path = @dir + '/more_data/workbook.xls'
+      @another_simple_file = @dir + '/another_workbook.xls'
+      @linked_file = @dir + '/workbook_linked.xlsm'
+      @simple_file_xlsm = @dir + '/workbook.xls'
+      @simple_file_xlsx = @dir + '/workbook.xlsx'
+    end
+
+    after do
+      Excel.kill_all
+      #rm_tmp(@dir)
+    end
+
+    describe "trace" do
+
+      it "should put some number" do
+        a = 4
+        REOCommon::trace "some text #{a}"
+      end
+
+      it "should put another text" do
+        b = Book.open(@simple_file)
+        REOCommon::trace "book: #{b}"
+      end
+    end
+
+    describe "own_methods" do
+
+      before do
+        @book1 = Book.open(@simple_file)
+        @ole_workbook_methods = 
+          ["Activate", "ActiveSheet", "Application", "Close", "FullName", "HasPassword", "Name", "Names", 
+            "Password", "Protect", "ProtectSharing", "ProtectStructure", "Protect", "ReadOnly", "Save", 
+            "SaveAs", "Saved", "Sheets", "Unprotect"]
+        @book_methods = ["focus", "add_sheet", "alive?", "close", "filename", "nameval", "ole_object", 
+                         "ole_workbook", "reopen", "save", "save_as", "saved", "set_nameval"]
+        @ole_excel_methods = 
+          ["ActiveCell", "ActiveSheet", "ActiveWorkbook", "Application",  "Calculate", "Cells", "Columns",
+            "DisplayAlerts", "Evaluate", "Hwnd", "Name", "Names", "Quit", "Range", "Ready", "Save", 
+            "Sheets", "UserName", "Value", "Visible", "Workbooks", "Worksheets"]
+        @excel_methods = ["alive?", "book_class", "close", "displayalerts", "recreate", "visible", "with_displayalerts"] 
+      end
+
+      after do
+        @book1.close
+      end
+
+      it "should do own_methods with popular ole_workbook and workbook methods" do
+        ((@ole_workbook_methods + @book_methods) - @book1.own_methods).should be_empty
+        (Object.instance_methods - @book1.own_methods).should == Object.instance_methods 
+      end
+
+      it "should do own_methods with popular ole_excel and excel methods" do
+        ((@ole_excel_methods + @excel_methods) - @book1.excel.own_methods).should be_empty
+         (Object.instance_methods - @book1.excel.own_methods).should == Object.instance_methods
+      end
+
+    end
+
+    describe "Object methods" do
+
+      before do
+        @book = Book.open(@simple_file)
+        @sheet = @book.sheet(1)
+      end
+
+      before do
+        @book.close
+      end
+
+      it "should raise an error when asking excel of a sheet" do
+        expect{
+          @sheet.excel
+          }.to raise_error(TypeREOError, "receiver instance is neither an Excel nor a Book")
+      end
+
+    end
+
+    describe "misc" do
+
+      LOG_TO_STDOUT = true
+      REOCommon::trace "foo"
+
+      LOG_TO_STDOUT = false
+      REOCommon::trace "foo"
+
+      REO_LOG_DIR = ""
+      REOCommon::trace "foo"
+
+      REO_LOG_DIR = "C:"
+      REOCommon::trace "foo"
+
+      REOCommon::tr1 "foo"
+
+      h = {:a => {:c => 4}, :b => 2}
+      REOCommon::puts_hash(h)
+ 
+    end
+
+  end
+end