workbook 0.1.1

data/readme.markdown

@@ -0,0 +1,99 @@
+# Workbook
+
+Goal of this gem is to make working with workbooks (spreadsheets) as programmer friendly as possible. Not reinventing a totally new DSL or all kinds of new methodnames, but just borrowing from known concepts such as hashes and arrays (much like (Faster)CSV does)). Workbook is a gem that mimicks a typical spreadsheet, a bundle of sheets, bundled in a *workbook*. A sheet may contain one or more tables (which might  the multi table sheets of Apple Numbers or Excel ranges). Basically:
+
+* Book
+   * Sheet (one or more)
+      * Table (one or more)
+        
+Subsequently a table consists of:
+
+* Table
+   * Row (one or more)
+      * Cell ( wich has may have a (shared) Format )
+	  
+Book, Sheet, Table and Row inherit from the base Array class, and hence walks and quacks as such. The row is extended with hashlike lookups (`row[:id]`) and writers (`row[:id]=`). Values are converted to ruby native types, and optional parsers can be added to improve recognition. 
+
+In addition to offering you this plain structure it allows for importing and writing .xls and .csv files (more to come), and includes the utility to easily create an overview of the differences between two tables and read out basic cell-styling properties as css.
+
+## The Basics
+	  
+Simply initialize a simple spreadsheet using:
+
+    b = Workbook::Book.new
+	
+or
+
+    b = Workbook::Book.open filename
+	   
+Calling
+
+    s = b.sheet
+	t = s.table
+	
+will give you an the first Sheet and Table (if one doesn't exist it is created on the fly).
+
+You can initialize with simple 2-d array like this:
+
+    b = Workbook::Book.new [['a','b'],[1,2],[3,4],[5,6]]
+	t = s.sheet.table
+	
+Subsequently you lookup values in the table like this:
+
+    t[1][:b] 
+	# returns <Workbook::Cel @value=2>
+	
+
+<!-- Feature *to implement*: 
+
+	t['A2']
+	# returns <Workbook::Cel @value=1>
+	
+Feature *to implement*, get a single column:
+
+    t[:b]
+	# returns [<Workbook::Cel @value=2>,<Workbook::Cel @value=4>,<Workbook::Cel @value=6>] 
+	
+On my wishlist: In the future I hope to return the cell value directly, without the intermediate Workbook::Cel class in between.
+	
+	-->
+	
+## Utilities
+
+### Sorting
+
+Sorting leaves the header alone, if it exists, and doesn't complain about comparing strings with dates with floats (Ever found OpenOffice Calc or Excel complainging about its inability to compare integers and strings? We're talking spreadsheet here). When classes are different the following (default) order is used: Numbers, Strings, Dates and Times, Booleans and Nils (empty values).
+
+	t.sort
+	
+*To implement*:
+
+To some extent, sort_by works, it doesn't, however, adhere to the header settings... 
+  
+    t.sort_by {|r| r[:b]}
+	
+### Comparing tables
+	
+Simply call 
+
+	t1.diff t2
+	
+And a new book with a new sheet/table will be returned containing the differences between the two tables.
+	
+## Writing
+
+Currently writing is limited to the following formats. Templating support is still limited.
+	
+	b.to_xls 					# returns a spreadsheet workbook
+	b.write_to_xls filename 	# writes to filename
+	t.to_csv 					# returns a csv-string
+	
+In case you want to display the table in HTML, some conversion is offered to convert text/background properties to css-entities. Internally the hash storing style elements tries to map to CSS where possible.
+	
+## Alternatives
+
+The [ruby toolbox lists plenty of alternatives](https://www.ruby-toolbox.com/search?utf8=%E2%9C%93&q=spreadsheet), that just didn't suit my needs.
+
+## License
+
+MIT... (c) murb / Maarten Brouwers, 2011-2012

data/test/artifacts/simple_csv.csv

@@ -0,0 +1,4 @@
+a,b,c,d
+1,2,3,4
+5,3,2,1
+"asdf",123,12,2001-02-02

data/test/artifacts/simple_excel_csv.csv

@@ -0,0 +1,6 @@
+a;b;c
+1-1-2001;23;1
+asdf;23;asd
+23;asdf;sadf
+12;23;12-02-2011 12:23
+12 asdf;"6/12 ovk getekend terugontv.+>acq ter tekening. 13/12 ovk getekend terugontv.+>Fred ter tekening.";6/12

data/test/helper.rb

@@ -0,0 +1,3 @@
+require 'test/unit'
+require 'rubygems'
+require File.join(File.dirname(__FILE__), '../lib/workbook')

data/test/test_book.rb

@@ -0,0 +1,56 @@
+require File.join(File.dirname(__FILE__), 'helper')
+
+class TestWorkbook < Test::Unit::TestCase
+  def test_sheets
+    w = Workbook::Book.new nil
+    w.push
+    assert_equal(2, w.count)
+  end
+  
+  def test_push
+    w = Workbook::Book.new nil
+    assert_equal([[[]]],w)
+    w = Workbook::Book.new
+    assert_equal(w.count,1)
+    
+    w.push
+    assert_equal(w.first.class,Workbook::Sheet)
+    w.push
+    assert_equal(w.count,3)    
+    s = Workbook::Sheet.new
+    w.push s
+    assert_equal(w.last,s)
+    w = Workbook::Book.new
+    assert_equal(w.sheet.table.class,Workbook::Table)
+  end
+  
+  def test_sheet
+    w = Workbook::Book.new nil
+    s = Workbook::Sheet.new [Workbook::Row.new(Workbook::Table.new)]
+    assert_equal(w.sheet.class,Workbook::Sheet)
+    assert_not_equal(w.sheet, s)
+    w = Workbook::Book.new s
+    assert_equal(w.sheet, s)
+  end
+  
+  def test_template
+    b = Workbook::Book.new
+    raw = "asdf"
+    assert_raise(ArgumentError) { b.template = raw }
+    raw = Workbook::Template.new
+    b.template = raw
+    
+    assert_equal(raw,b.template)
+  end
+  
+  def test_parent_child
+    b = Workbook::Book.new [[1,2,3],[1,2,3]]
+    assert_equal(Workbook::Sheet, b.first.class)
+    assert_equal(b,b.first.book)
+    assert_equal(Workbook::Table, b.first.table.class)
+    assert_equal(b,b.first.table.sheet.book)
+    assert_equal(Workbook::Row, b.first.table.header.class)
+    assert_equal(b,b.first.table.header.table.sheet.book)
+    
+  end
+end

data/test/test_cell.rb

@@ -0,0 +1,82 @@
+require File.join(File.dirname(__FILE__), 'helper')
+
+class TestCell < Test::Unit::TestCase
+
+  
+  def test_init
+    w = Workbook::Cell.new nil
+    assert_equal(nil,w.value)
+    w = Workbook::Cell.new "asdf"
+    assert_equal("asdf",w.value)
+    
+    assert_raise(ArgumentError) { w = Workbook::Cell.new :asdf }
+
+    t = Time.now
+    w = Workbook::Cell.new t
+    assert_equal(t,w.value)
+    
+  end
+ 
+  def test_value
+    w = Workbook::Cell.new nil
+    assert_equal(nil,w.value)
+    w.value = "asdf"
+    assert_equal("asdf",w.value)
+    w.value = Date.new
+    assert_equal(Date.new,w.value) 
+  end
+  
+  def test_comp
+    a = Workbook::Cell.new 1
+    b = Workbook::Cell.new 2
+    assert_equal(-1, a<=>b)
+    a = Workbook::Cell.new "c"
+    b = Workbook::Cell.new "bsdf"
+    assert_equal(1, a<=>b)
+    a = Workbook::Cell.new "c"
+    b = Workbook::Cell.new "c"
+    assert_equal(0, a<=>b)
+    a = Workbook::Cell.new true
+    b = Workbook::Cell.new false
+    assert_equal(-1, a<=>b)
+    a = Workbook::Cell.new "true"
+    b = Workbook::Cell.new "false"
+    assert_equal(1, a<=>b)
+    a = Workbook::Cell.new 1
+    b = Workbook::Cell.new "a"
+    assert_equal(-1, a<=>b)
+    a = Workbook::Cell.new nil
+    b = Workbook::Cell.new "a"
+    assert_equal(1, a<=>b)
+    a = Workbook::Cell.new nil
+    b = Workbook::Cell.new nil
+    assert_equal(0, a<=>b)
+  end
+  
+  def test_cloning_as_expected?
+    a = Workbook::Cell.new 1
+    a.format = Workbook::Format.new({:value=>1})
+    b = a.clone
+    b.value = 2
+    b.format[:value]=2
+    assert_equal(1,a.value)
+    assert_equal(2,b.value)
+    assert_equal(2,a.format[:value])
+    assert_equal(2,b.format[:value])
+  end
+  
+  def test_to_sym
+    c = Workbook::Cell.new "A - B"
+    assert_equal(:a_b, c.to_sym)
+    c = Workbook::Cell.new "A-B"
+    assert_equal(:ab, c.to_sym)
+    c = Workbook::Cell.new "A - c (B123)"
+    assert_equal(:a_c_b123, c.to_sym)
+
+  end
+  
+  def test_nil
+    c = Workbook::Cell.new nil
+    assert_equal(true,c.nil?)
+  end
+end

data/test/test_format.rb

@@ -0,0 +1,59 @@
+require File.join(File.dirname(__FILE__), 'helper')
+
+class TestFormat < Test::Unit::TestCase
+
+  
+  def test_initialize
+    f = Workbook::Format.new {}
+    assert_equal({},f)
+    f = Workbook::Format.new({:background=>:red})
+    assert_equal({:background=>:red},f)
+    f = Workbook::Format.new({:background=>:red})
+    deet = Time.now
+    assert_equal(false,f.has_raw_for?(Time))
+    
+    f.add_raw deet
+    assert_equal(deet,f.raws[Time])
+    assert_equal(true,f.has_raw_for?(Time))
+    
+  end
+  
+  def test_merge
+    a = Workbook::Format.new({:background=>:red})
+    b = Workbook::Format.new({:background=>:yellow, :color=>:green})
+    result = b.clone.merge(a)
+    assert_equal({:background=>:red, :color=>:green},result)
+    assert_equal(true,result.is_a?(Workbook::Format))
+  end
+  
+  def test_remove_raw_on_merge
+    a = Workbook::Format.new({:background=>:red})
+    b = Workbook::Format.new({:background=>:yellow, :color=>:green})
+    b.add_raw Date.new
+    result = b.clone.merge(a)
+    assert_equal({},result.raws)
+  end
+ 
+  def test_has_background_color?
+    a = Workbook::Format.new
+    assert_equal(false,a.has_background_color?)
+    a = Workbook::Format.new({:background_color=>'#ff0000'})
+    assert_equal(true,a.has_background_color?)
+    assert_equal(false,a.has_background_color?('#00ff00'))
+    a = Workbook::Format.new({:background_color=>'#ffffff'})
+    assert_equal(false,a.has_background_color?)
+    a = Workbook::Format.new({:background_color=>'#FFFFFf'})
+    assert_equal(false,a.has_background_color?)
+
+    
+  end
+  
+  def test_to_css
+    a = Workbook::Format.new({:background_color=>'#ffffff'})
+    assert_equal("background: #ffffff",a.to_css)
+    a = Workbook::Format.new({:background_color=>'#fffdff', :color=>:red})
+    assert_equal("background: #fffdff; color: red",a.to_css)
+    
+  end
+  
+end

data/test/test_functional.rb

@@ -0,0 +1,30 @@
+require File.join(File.dirname(__FILE__), 'helper')
+
+class TestFunctional < Test::Unit::TestCase
+  def test_chapter_Initializing
+    b = Workbook::Book.new
+    assert_equal(Workbook::Book, b.class)
+    s = b.sheet
+    assert_equal(Workbook::Sheet, s.class)
+	  t = s.table
+    assert_equal(Workbook::Table, t.class)
+    s = b.sheet[0] = Workbook::Sheet.new([['a','b'],[1,2],[3,4],[5,6]])
+    assert_equal(Workbook::Sheet, s.class)
+    
+    t = s.table
+    assert_equal(Workbook::Table, t.class)
+    assert_equal(Workbook::Row, t.first.class)
+    assert_equal(Workbook::Cell, t.first.first.class)
+    assert_equal(true, t.header.header?)
+    assert_equal(false, t.last.header?)
+    assert_equal(2,t[1][:b].value)
+  end
+ 
+  def test_chapter_Sorting
+    b = Workbook::Book.new
+    s = b.sheet[0] = Workbook::Sheet.new([['a','b'],[1,2],[3,4],[5,6]])
+    t = s.table
+    #t.sort_by {|r| r[:b]}
+    #p t.inspect
+  end
+end

data/test/test_modules_table_diff_sort.rb

@@ -0,0 +1,120 @@
+require File.join(File.dirname(__FILE__), 'helper')
+module Modules
+  class TestTableDiffSort < Test::Unit::TestCase
+    def test_sort
+      time = Time.now
+      b = Workbook::Book.new [[1,2,3],[2,2,3],[true,false,true],["asdf","sdf","as"],[time,2,3],[2,2,2],[22,2,3],[1,2,233]]
+      t = b.sheet.table
+      assert_equal(
+        [ [Workbook::Cell.new(1),Workbook::Cell.new(2),Workbook::Cell.new(3)],
+          [Workbook::Cell.new(1),Workbook::Cell.new(2),Workbook::Cell.new(233)],
+          [Workbook::Cell.new(2),Workbook::Cell.new(2),Workbook::Cell.new(2)],
+          [Workbook::Cell.new(2),Workbook::Cell.new(2),Workbook::Cell.new(3)],
+          [Workbook::Cell.new(22),Workbook::Cell.new(2),Workbook::Cell.new(3)],
+          [Workbook::Cell.new("asdf"),Workbook::Cell.new("sdf"),Workbook::Cell.new("as")],
+          [Workbook::Cell.new(time),Workbook::Cell.new(2),Workbook::Cell.new(3)],
+          [Workbook::Cell.new(true),Workbook::Cell.new(false),Workbook::Cell.new(true)]
+        ],
+          t.sort)
+      
+      ba = Workbook::Book.new [['a','b','c','d'],[1,2,3,4],[4,2,3,4],[3,2,3,4]]
+      sba = ba.sheet.table.sort
+      assert_not_equal(Workbook::Table.new([['a','b','c','d'],[1,2,3,4],[4,2,3,4],[3,2,3,4]]),sba)
+      assert_equal(Workbook::Table.new([['a','b','c','d'],[1,2,3,4],[3,2,3,4],[4,2,3,4]]),sba)
+      
+    end
+    
+    def test_align
+      ba = Workbook::Book.new [['a','b','c','d'],[1,2,3,4],[4,2,3,4],[3,2,3,4]]
+      bb = Workbook::Book.new [['a','b','c','d'],[1,2,3,4],[3,2,3,4],[5,2,3,4]]
+      tself = ba.sheet.table
+      tother = bb.sheet.table
+
+      placeholder_row = tother.placeholder_row
+
+      ba = Workbook::Book.new [['a','b','c','d'],[1,2,3,4],[4,2,3,4],[3,2,3,4]]
+      bb = Workbook::Book.new [['a','b','c','d'],[1,2,3,4],[3,2,3,4],[5,2,3,4]]
+      tself = ba.sheet.table
+      tother = bb.sheet.table
+      align_result = tself.align tother
+      assert_equal("a,b,c,d\n1,2,3,4\n3,2,3,4\n\n5,2,3,4\n",align_result[:other].to_csv)  
+      assert_equal("a,b,c,d\n1,2,3,4\n3,2,3,4\n4,2,3,4\n\n",align_result[:self].to_csv)  
+      
+      ba = Workbook::Book.new [['a','b','c','d'],[1,2,3,4],[3,2,3,4],[5,2,3,4]]
+      bb = Workbook::Book.new [['a','b','c','d'],[1,2,3,4],[2,2,3,4],[5,2,3,4]]
+      tself = ba.sheet.table
+      tother = bb.sheet.table
+      align_result = tself.align tother
+      assert_equal("a,b,c,d\n1,2,3,4\n\n3,2,3,4\n5,2,3,4\n",align_result[:self].to_csv)
+      assert_equal("a,b,c,d\n1,2,3,4\n2,2,3,4\n\n5,2,3,4\n",align_result[:other].to_csv)
+      align_result = tother.align tself
+      assert_equal("a,b,c,d\n1,2,3,4\n\n3,2,3,4\n5,2,3,4\n",align_result[:other].to_csv)
+      assert_equal("a,b,c,d\n1,2,3,4\n2,2,3,4\n\n5,2,3,4\n",align_result[:self].to_csv)
+      
+      tself = Workbook::Book.new([['a','b','c','d'],[1,2,3,4],[1,3,3,4],[3,2,3,4],[5,2,3,4]]).sheet.table
+      tother = Workbook::Book.new([['a','b','c','d'],[1,2,3,4],[2,2,3,4],[5,2,3,4]]).sheet.table
+      align_result = tself.align tother
+      assert_equal("a,b,c,d\n1,2,3,4\n1,3,3,4\n\n3,2,3,4\n5,2,3,4\n",align_result[:self].to_csv)
+      assert_equal("a,b,c,d\n1,2,3,4\n\n2,2,3,4\n\n5,2,3,4\n",align_result[:other].to_csv)
+      tself = Workbook::Book.new([['a','b','c','d'],[1,2,3,4],[3,2,3,4],[5,2,3,4]]).sheet.table
+      tother = Workbook::Book.new([['a','b','c','d'],[1,2,3,4],[1,2,3,4],[1,2,3,4],[2,2,3,4],[5,2,3,4]]).sheet.table
+      align_result = tself.align tother
+      assert_equal("a,b,c,d\n1,2,3,4\n\n\n\n3,2,3,4\n5,2,3,4\n",align_result[:self].to_csv)
+      assert_equal("a,b,c,d\n1,2,3,4\n1,2,3,4\n1,2,3,4\n2,2,3,4\n\n5,2,3,4\n",align_result[:other].to_csv)
+      tself = Workbook::Book.new([['a','b','c','d'],[9,2,3,4],[3,2,3,4],[5,2,3,4]]).sheet.table
+      tother = Workbook::Book.new([['a','b','c','d'],[1,2,3,4],[1,2,3,4],[1,2,3,4],[2,2,3,4],[5,2,3,4]]).sheet.table
+      align_result = tself.align tother
+      assert_equal("a,b,c,d\n\n\n\n\n3,2,3,4\n5,2,3,4\n9,2,3,4\n",align_result[:self].to_csv)
+      assert_equal("a,b,c,d\n1,2,3,4\n1,2,3,4\n1,2,3,4\n2,2,3,4\n\n5,2,3,4\n\n",align_result[:other].to_csv)
+      tself = Workbook::Book.new([['a','b','c','d'],[49,2,3,4],[10,2,3,4],[45,2,3,4]]).sheet.table
+      tother = Workbook::Book.new([['a','b','c','d'],[1,2,3,4],[1,2,3,4],[1,2,3,4],[2,2,3,4],[5,2,3,4]]).sheet.table
+      align_result = tself.align tother
+      assert_equal("a,b,c,d\n\n\n\n\n\n10,2,3,4\n45,2,3,4\n49,2,3,4\n",align_result[:self].to_csv)
+      assert_equal("a,b,c,d\n1,2,3,4\n1,2,3,4\n1,2,3,4\n2,2,3,4\n5,2,3,4\n\n\n\n",align_result[:other].to_csv)
+          
+    end
+    
+    # def test_sort_by
+    #   b = Workbook::Book.new [['a','b','c','d'],[1,2,3,4],[4,2,3,3],[3,2,3,2]]
+    #   y b.sheet.table.sort_by{|r| r[:d]}
+    # end
+    
+    def test_diff
+      ba = Workbook::Book.new [['a','b','c','d'],[1,2,3,4],[4,2,3,4],[3,2,3,4],[3,3,3,4]]
+      bb = Workbook::Book.new [['a','b','c','d'],[1,2,3,4],[3,2,3,4],[5,2,3,4],[3,2,3,4]]
+      # Start:
+      # ba = [['a','b','c','d'],[1,2,3,4],[4,2,3,4],[3,2,3,4],[3,3,3,4]]
+      # bb = [['a','b','c','d'],[1,2,3,4],[3,2,3,4],[5,2,3,4],[3,2,3,4]]
+      # As it starts out with sorting, it is basically a comparison between            
+      #  ba = [['a','b','c','d'],[1,2,3,4],[3,2,3,4],[3,3,3,4],[4,2,3,4],[]]
+      #  bb = [['a','b','c','d'],[1,2,3,4],[3,2,3,4],[3,2,3,4],[],[5,2,3,4]]
+      # then it aligns:
+      #  ba = [['a','b','c','d'],[1,2,3,4],[3,2,3,4],[3,3,3,4],[4,2,3,4],[]]
+      #  bb = [['a','b','c','d'],[1,2,3,4],[3,2,3,4],[3,2,3,4],[],[5,2,3,4]]
+      # hence,
+      expected = [['a','b','c','d'],[1,2,3,4],[3,2,3,4],[3,'3 (was: 2)',3,4],[4,2,3,4],['(was: 5)','(was: 2)','(was: 3)','(was: 4)']]
+      
+      tself = ba.sheet.table
+      tother = bb.sheet.table
+      diff_result = tself.diff tother
+      assert_equal('a',diff_result.sheet.table.header[0].value)
+      assert_equal("a,b,c,d\n1,2,3,4\n3,2,3,4\n3,3 (was: 2),3,4\n4,2,3,4\n(was: 5),(was: 2),(was: 3),(was: 4)\n",diff_result.sheet.table.to_csv)
+      diff_result.write_to_xls({:rewrite_header=>true})
+    end
+    
+    
+    
+    def test_diff_xls
+      (1..8).each do |index| 
+        prev = "test/artifacts/compare#{index}_prev.xls"
+        curr = "test/artifacts/compare#{index}_current.xls"
+      
+        wprev=Workbook::Book.open prev
+        wcurr=Workbook::Book.open curr
+
+        diff = wcurr.sheet.table.diff wprev.sheet.table
+        diff.write_to_xls({:filename=>"compare#{index}.xls"})
+      end
+    end
+  end
+end

data/test/test_modules_type_parser.rb

@@ -0,0 +1,53 @@
+require File.join(File.dirname(__FILE__), 'helper')
+module Modules
+  class TestTypeParser < Test::Unit::TestCase
+    def examples
+      {"2312"=>2312,
+       "12-12-2012"=>Date.new(2012,12,12),
+       "12-12-2012 12:24"=>DateTime.new(2012,12,12,12,24),
+       "2012-12-12 12:24"=>DateTime.new(2012,12,12,12,24),
+       "2011-05-19T15_37_49 - 52349.xml"=>"2011-05-19T15_37_49 - 52349.xml",
+       "20-2-2012 20:52"=>DateTime.new(2012,2,20,20,52),
+       "1-11-2011"=>Date.new(2011,11,1),
+       "jA"=>"jA",
+       "n"=>"n",
+       "12 bomen"=>"12 bomen",
+       "12 bomenasdfasdfsadf"=>"12 bomenasdfasdfsadf",
+       ""=>nil,
+       " "=>nil,
+       "mailto:sadf@asdf.as"=>"sadf@asdf.as"
+       }
+    end
+    
+    def test_parse
+      examples.each do |k,v|
+        assert_equal(v,Workbook::Cell.new(k).parse({:detect_date=>true}))
+      end
+    end
+    
+    def test_custom_parse
+      customparsers = [proc{|v| "#{v}2" }]
+      examples.each do |k,v|
+        c = Workbook::Cell.new(k)
+        c.string_parsers = customparsers
+        assert_not_equal(v,c.parse)
+      end
+      c = Workbook::Cell.new("233")
+      c.string_parsers = customparsers
+      assert_equal("2332",c.parse)
+      c.value = "v"
+      assert_equal("v2",c.parse)
+    end
+    
+    def test_parse!
+      r= Workbook::Row.new
+      r[0] = Workbook::Cell.new "xls_cell"    
+      r[0].parse!    
+      assert_equal("xls_cell",r[0].value)
+      r[1] = Workbook::Cell.new ""    
+      r[1].parse!    
+      assert_equal(nil,r[1].value)
+      
+    end
+  end
+end

data/test/test_readers_csv_reader.rb

@@ -0,0 +1,37 @@
+require File.join(File.dirname(__FILE__), 'helper')
+module Readers
+  class TestCsvWriter < Test::Unit::TestCase
+    def test_open
+      w = Workbook::Book.new
+      w.open 'test/artifacts/simple_csv.csv'
+      # reads
+      #       a,b,c,d
+      #       1,2,3,4
+      #       5,3,2,1
+      #       "asdf",123,12,2001-02-02
+      #       
+      assert_equal([:a,:b,:c,:d],w.sheet.table.header.to_symbols)
+      assert_equal(3,w.sheet.table[2][:b].value)
+      assert_equal("asdf",w.sheet.table[3][:a].value)
+      assert_equal(Date.new(2001,2,2),w.sheet.table[3][:d].value)
+    end
+    def test_excel_csv_open
+      w = Workbook::Book.new
+      w.open("test/artifacts/simple_excel_csv.csv")
+      # reads
+      #   a;b;c
+      #   1-1-2001;23;1
+      #   asdf;23;asd
+      #   23;asdf;sadf
+      #   12;23;12-02-2011 12:23
+      #y w.sheet.table
+      assert_equal([:a,:b,:c],w.sheet.table.header.to_symbols)
+      assert_equal(23,w.sheet.table[2][:b].value)
+      assert_equal("sadf",w.sheet.table[3][:c].value)
+      assert_equal(Date.new(2001,1,1),w.sheet.table[1][:a].value)
+      assert_equal(DateTime.new(2011,2,12,12,23),w.sheet.table[4][:c].value)
+      assert_equal("6/12 ovk getekend terugontv.+>acq ter tekening. 13/12 ovk getekend terugontv.+>Fred ter tekening.", w.sheet.table[5][:b].value)
+      assert_equal(Date.new(2012,6,12),w.sheet.table[5][:c].value)
+    end
+  end
+end

data/test/test_readers_txt_reader.rb

@@ -0,0 +1,49 @@
+require File.join(File.dirname(__FILE__), 'helper')
+module Readers
+  class TestTxtReader < Test::Unit::TestCase
+    # Should one day throw an error..
+    # def test_failure_excel_as_txt_open
+    #   w = Workbook::Book.new
+    #   w.open("test/artifacts/xls_with_txt_extension.txt")
+    #   puts w.sheet.table
+    # end
+    def test_complex_excel_txt_open
+      w = Workbook::Book.new
+      w.open("test/artifacts/sharepoint_download_excel.txt")
+      # reads
+      #   a;b;c
+      #   1-1-2001;23;1
+      #   asdf;23;asd
+      #   23;asdf;sadf
+      #   12;23;12-02-2011 12:23
+      #y w.sheet.table
+      assert_equal([:id,
+ :naam,
+ :locatie_naam,
+ :locatie_rayon,
+ :datum_gesprek,
+ :algehele_indruk,
+ :gemaakt_door,
+ :gemaakt,
+ :titel,
+ :toelichting,
+ :gewenste_migratie_maand,
+ :plek_ing_balie,
+ :plek_tnt_balie,
+ :alternatieve_locaties,
+ :datum_introductie_gesprek,
+ :geen_aanbod_voor_isp,
+ :oplevering_geslaagd_op,
+ :nazorgpunten,
+ :locatie],w.sheet.table.header.to_symbols)
+      assert_equal(Date.new(2011,11,01),w.sheet.table[29][:gewenste_migratie_maand].value)
+      assert_equal("Belt , G (Gerrit)",w.sheet.table[1][:gemaakt_door].value)
+      assert_equal(false,w.sheet.table[1][:geen_aanbod_voor_isp].value)
+      assert_equal(DateTime.new(2011,7,25,11,02),w.sheet.table[4][:gemaakt].value)
+      assert_equal("Roggeveen , PC (Peter)",w.sheet.table[4][:gemaakt_door].value)
+      assert_equal("Groeneveld, R (René)",w.sheet.table[400][:gemaakt_door].value)
+      assert_equal(24208,w.sheet.table[7][:locatie].value)
+    end
+    
+  end
+end

data/test/test_readers_xls_reader.rb

@@ -0,0 +1,26 @@
+require File.join(File.dirname(__FILE__), 'helper')
+module Readers
+  class TestXlsWriter < Test::Unit::TestCase
+    def test_open
+      w = Workbook::Book.new
+      w.open 'test/artifacts/book_with_tabs_and_colours.xls'
+      assert_equal([:vestiging_id,:pirnr_ing,:ing_kantoornaam,:installatiedag_ispapparatuur,:mo_openingsdatum_ing],w.sheet.table.header.to_symbols)
+      assert_equal(90588,w.sheet.table[2][:pirnr_ing].value)
+      assert_equal("#CCFFCC",w.sheet.table[3][:ing_kantoornaam].format[:background_color])
+      assert_equal(8.13671875,w.sheet.table.first[:pirnr_ing].format[:width])
+      assert_equal(3.85546875,w.sheet.table.first[:vestiging_id].format[:width])
+      assert_equal(25.14453125,w.sheet.table.first[:ing_kantoornaam].format[:width])
+      
+      
+    end
+    
+    def test_complex_types
+      w = Workbook::Book.new
+      w.open 'test/artifacts/complex_types.xls'
+      assert_equal(Date.new(2011,11,15), w.sheet.table[2][3].value)
+      assert_equal("http://murb.nl", w.sheet.table[3][2].value)
+      assert_equal("sadfasdfsd", w.sheet.table[4][2].value)
+      assert_equal(1.2, w.sheet.table[3][1].value)
+    end
+  end
+end