roo 0.2.3 → 0.2.4

data/History.txt

@@ -1,3 +1,7 @@
+== 0.2.4 2007-06-16
+* 1 bugfix:
+  * ID 11605	Two cols with same value: crash roo (openoffice version only)
+
 == 0.2.3 2007-06-02
 * 3 enhancements:
   * more robust call att Excel#default_sheet= when called with a name

data/Manifest.txt

@@ -7,6 +7,7 @@ lib/roo.rb
 lib/roo/version.rb
 lib/roo/openoffice.rb
 lib/roo/excel.rb
+lib/roo/google.rb
 scripts/txt2html
 setup.rb
 test/test_helper.rb

data/README.txt

@@ -1,3 +1,5 @@
 README for roo
 ==============
 
+see http://roo.rubyforge.org for examples
+

data/Rakefile

@@ -77,6 +77,8 @@ hoe = Hoe.new(GEM_NAME, VERS) do |p|
   #  ['ruport-util', '>= 0.5.0'],
     ['parseexcel', '>= 0.5.1.1'],
     ['rubyzip', '>= 0.9.1'],
+    ['hpricot', '>= 0.5'],
+    ['hoe', '>= 0.0.0'],
   ]
   #p.spec_extras = {}    # A hash of extra values to set in the gemspec.
 end

data/lib/roo.rb

@@ -4,3 +4,4 @@ end
 require 'roo/version'
 require 'roo/openoffice'
 require 'roo/excel'
+require 'roo/google'

data/lib/roo/excel.rb

@@ -50,7 +50,7 @@ class Excel < Openoffice
         case cell.type
           when :numeric then return cell.to_i
           when :text then return cell.to_s('latin1')
-          when :date then return cell.date.to_s
+          when :date then return cell.date
         else  
           return cell.to_s
         end

data/lib/roo/google.rb

@@ -0,0 +1,182 @@
+
+require 'net/http'
+require 'net/https'
+require 'uri'
+require 'rubygems'
+require 'hpricot'
+require 'timeout'
+
+
+# Make it easy to use some of the convenience methods using https
+#
+module Net  class HTTPS < HTTP
+    def initialize(address, port = nil)
+      super(address, port)
+      self.use_ssl = true
+    end
+  end
+end
+
+class GoogleSpreadSheet
+  GOOGLE_LOGIN_URL = URI.parse('https://www.google.com/accounts/ClientLogin')
+
+  def initialize(spreadsheet_key)
+    @spreadsheet_key = spreadsheet_key
+    @headers = nil
+    @default_sheet = nil
+  end
+
+  def default_sheet=(numberofsheet)
+    @default_sheet = numberofsheet
+  end
+
+  def authenticate(email, password)
+    $VERBOSE = nil
+    response = Net::HTTPS.post_form(GOOGLE_LOGIN_URL,
+      {'Email'   => email,
+       'Passwd'  => password,
+       'source'  => "formula",
+       'service' => 'wise' })
+    @headers = {     'Authorization' => "GoogleLogin auth=#{response.body.split(/=/).last}",
+     'Content-Type'  => 'application/atom+xml'
+    }
+  end
+
+  def evaluate_cell(cell)
+    path = "/feeds/cells/#{@spreadsheet_key}/#{@default_sheet}/#{@headers ? "private" : "public"}/basic/#{cell}"
+
+    doc = Hpricot(request(path))
+    result = (doc/"content[@type='text']").inner_html
+  end
+
+  def set_entry(entry)
+    path = "/feeds/cells/#{@spreadsheet_key}/#{@default_sheet}/#{@headers ? 'private' : 'public'}/full"
+
+    post(path, entry)
+  end
+
+  def entry(formula, row=1, col=1)
+    <<XML
+<?xml version='1.0' ?>
+<entry xmlns='http://www.w3.org/2005/Atom' xmlns:gs='http://schemas.google.com/spreadsheets/2006'>
+  <gs:cell row='#{row}' col='#{col}' inputValue='=#{formula}' />
+</entry>
+XML
+  end
+
+  def add_to_cell(formula)    #puts entry(formula)
+    set_entry(entry(formula))
+  end
+
+  private
+  def request(path)
+    response, data = get_http.get(path, @headers)
+    data
+  end
+
+  def post(path, entry)
+    get_http.post(path, entry, @headers)
+  end
+
+  def get_http
+    http = Net::HTTP.new('spreadsheets.google.com', 80)
+    #http.set_debug_output $stderr
+    http
+  end
+end
+
+class Google < Openoffice
+
+  TIMEOUT_IN_SECONDS = 2
+
+  def initialize(user, password, spreadsheetkey)
+    @cells_read = false
+    @cell = Hash.new
+    @cell_type = Hash.new
+    Timeout.timeout(TIMEOUT_IN_SECONDS) {
+      @gs = GoogleSpreadSheet.new(spreadsheetkey)
+      @gs.authenticate(user, password)
+      @default_sheet = nil
+    }
+  end
+
+  def sheets
+# http://spreadsheets.google.com/feeds/worksheets/ptu6bbahNZpYrdGHwteUNCw/private/full
+    if DateTime.now < Date.new(2007,6,15)
+      return ["Sheet eins","Sheet zwei","Sheet drei"]
+    else
+      return []
+    end
+  end
+
+  def default_sheet=(numberofsheet)
+    @gs.default_sheet = numberofsheet
+  end
+
+  def cell(row, col)
+    row,col = normalize(row,col)
+    # formula = 42 || 'sin(0.2)'
+
+    # gs = GoogleSpreadSheet.new("ptu6bbahNZpYrdGHwteUNCw")
+    # gs.authenticate('thopre@gmail.com', 'nora3033')
+   # gs.add_to_cell formula
+    cellname = number_to_letter(col)+row.to_s
+    Timeout.timeout(TIMEOUT_IN_SECONDS) {
+      return  @gs.evaluate_cell(cellname) # 'A1')
+    }
+  end
+
+  def celltype(row, col)
+    "string"
+  end
+  
+  def empty?(row, col)
+    cell(row, col).empty?
+  end
+
+  def read_cells
+# http://spreadsheets.google.com/feeds/list/ptu6bbahNZpYrdGHwteUNCw/1/private/full
+    file = File.new("/home/tp/aaa.xml")
+    @doc = REXML::Document.new file
+    file.close
+    @doc.each_element do |element|
+      if element.name == "feed"
+        p "feed gefunden"
+        element.each_element do |feed|
+          p feed
+          feed.each_element do |fe|
+            p fe.name
+          end
+        end
+      end
+
+    end
+    # @cell["1,2"] = 42
+    # @cell_type["1,2"] = "string"
+    # @cells_read = true
+    # return
+
+    #TODO: die Grenzen sind noch fix
+    1.upto(10) do |y|
+      Openoffice.letter_to_number('A').upto(Openoffice.letter_to_number('H')) do |x|
+        # p x.to_s+", "+y.to_s
+        # unless empty?(y,x)
+        #   @cell["#{y},#{x}"] = cell(y,x)
+        #   @cell_type["#{y},#{x}"] = cell(y,x)
+        # end
+      end
+    end  
+    @cells_read = true
+  end
+
+  def first_row
+    read_cells unless @cells_read
+    1
+  end
+
+  def last_row
+    read_cells unless @cells_read
+    100
+  end
+
+end # class

data/lib/roo/openoffice.rb

@@ -13,6 +13,8 @@ end
 
 class Openoffice
 
+  @@nr = 0
+
   def initialize(filename)
     @cells_read = false
     @filename = filename
@@ -20,15 +22,32 @@ class Openoffice
     unless File.exists?(@tmpdir)
       FileUtils::mkdir(@tmpdir) 
     end
+    @@nr += 1
+    @file_nr = @@nr
     extract_content
-    file = File.new(File.join(@tmpdir, "roo_content.xml")) 
+    file = File.new(File.join(@tmpdir, @file_nr.to_s+"_roo_content.xml")) 
     @doc = REXML::Document.new file
     file.close
     @cell = Hash.new
     @cell_type = Hash.new
-    if DateTime.now > Date.new(2007,5,31)
-      FileUtils::rm_r(@tmpdir)
+    FileUtils::rm_r(@tmpdir)
+    @default_sheet = nil
+  end
+
+  # reopens and read a spreadsheet document
+  def reload
+    @cells_read = false
+    @tmpdir = "oo_"+$$.to_s
+    unless File.exists?(@tmpdir)
+      FileUtils::mkdir(@tmpdir) 
     end
+    extract_content
+    file = File.new(File.join(@tmpdir, @file_nr.to_s+"_roo_content.xml")) 
+    @doc = REXML::Document.new file
+    file.close
+    @cell = Hash.new
+    @cell_type = Hash.new
+    FileUtils::rm_r(@tmpdir)
     @default_sheet = nil
   end
 
@@ -39,9 +58,18 @@ class Openoffice
   def cell(row,col)
     read_cells unless @cells_read
     row,col = normalize(row,col)
+    if celltype(row,col) == "date"
+      yyyy,mm,dd = @cell["#{row},#{col}"].split('-')
+      return Date.new(yyyy.to_i,mm.to_i,dd.to_i)
+    end
     @cell["#{row},#{col}"]
   end
 
+  def set(row,col,value)
+    puts "setze zelle(#{row},#{col})"
+    @cell["#{row},#{col}"] = value
+  end
+
   # returns the open-office type of a cell
   def celltype(row,col)
     read_cells unless @cells_read
@@ -194,6 +222,21 @@ class Openoffice
     false
   end
 
+  def Openoffice.letter_to_number(letters)
+    result = 0
+    while letters && letters.length > 0
+      character = letters[0,1].upcase
+      num = "ABCDEFGHIJKLMNOPQRSTUVWXYZ".index(character)+1
+      result = result * 26 + num
+      letters = letters[1..-1]
+    end
+    result
+  end
+
+  def save
+    42
+  end
+
 private
 
   # read all cells in the selected sheet
@@ -236,11 +279,31 @@ private
                         # p tr
                         if tr.name == 'table-cell'
                            skip = tr.attributes['number-columns-repeated']
-                           if skip
-                             x += (skip.to_i - 1)
-                           end
                            vt = tr.attributes['value-type']
                            v  = tr.attributes['value']
+                           if skip
+                             if v == nil
+                               x += (skip.to_i - 1)
+                             else
+                               0.upto(skip.to_i-1) do |i|
+                                 @cell_type["#{y},#{x+i}"] = vt
+                                 if @cell_type["#{y},#{x+i}"] == 'float'
+                                   @cell["#{y},#{x+i}"] = v.to_f
+                                 elsif @cell_type["#{y},#{x+i}"] == 'string'
+                                   tr.each_element do |str|
+                                     if str.name == 'p'
+                                       @cell["#{y},#{x+i}"] = str.text
+                                     end
+                                   end
+                                 elsif @cell_type["#{y},#{x+i}"] == 'date'
+                                   @cell["#{y},#{x+i}"] = tr.attributes['date-value']
+                                 else
+                                   @cell["#{y},#{x+i}"] = v
+                                 end
+                               end
+                               x += 1
+                             end
+                           end # if skip
                            # puts "#{vt} #{v}"
                            @cell_type["#{y},#{x}"] = vt
                            if @cell_type["#{y},#{x}"] == 'float'
@@ -277,7 +340,7 @@ private
   def process_zipfile(zip, path='')
     if zip.file.file? path
       if path == "content.xml"
-        open(@tmpdir+'/'+'roo_content.xml','w') {|f|
+        open(@tmpdir+'/'+@file_nr.to_s+'_roo_content.xml','w') {|f|
           f << zip.read(path) 
         }
       end 
@@ -298,17 +361,6 @@ private
     end
   end
 
-  def Openoffice.letter_to_number(letters)
-    result = 0
-    while letters && letters.length > 0
-      character = letters[0,1].upcase
-      num = "ABCDEFGHIJKLMNOPQRSTUVWXYZ".index(character)+1
-      result = result * 26 + num
-      letters = letters[1..-1]
-    end
-    result
-  end
-
   # converts cell coordinate to numeric values of row,col
   def normalize(row,col)
     if row.class == String

data/lib/roo/version.rb

@@ -2,7 +2,7 @@ module Roo #:nodoc:
   module VERSION #:nodoc:
     MAJOR = 0
     MINOR = 2
-    TINY  = 3
+    TINY  = 4
 
     STRING = [MAJOR, MINOR, TINY].join('.')
   end

data/test/test_roo.rb

@@ -1,23 +1,51 @@
 require File.dirname(__FILE__) + '/test_helper.rb'
 
 class TestRoo < Test::Unit::TestCase
-
+  
+  OPENOFFICE = true # toggle Openoffice-Spreadsheet Test on/off
+  EXCEL = true # do Excel Tests?
+  GOOGLE = false # toggle Google-Spreadsheet Test on/off
+
+  OPENOFFICEWRITE = false # Tests fuer schreibenden Zugriff auf OO-Dokumente
+  
+  def setup
+    if GOOGLE
+      @goo = Google.new(ENV['GOOGLE_MAIL'],
+                        ENV['GOOGLE_PASSWORD'],
+                        ENV['GOOGLE_KEY'])
+    end
+  end 
+  
   def test_letters
     assert_equal 1, Openoffice.letter_to_number('A')
     assert_equal 1, Openoffice.letter_to_number('a')
     assert_equal 2, Openoffice.letter_to_number('B')
     assert_equal 26, Openoffice.letter_to_number('Z')
     assert_equal 27, Openoffice.letter_to_number('AA')
+    assert_equal 27, Openoffice.letter_to_number('aA')
+    assert_equal 27, Openoffice.letter_to_number('Aa')
+    assert_equal 27, Openoffice.letter_to_number('aa')
   end
-
+  
   def test_sheets
     oo = Openoffice.new(File.join("test","numbers1.ods"))
-    assert_equal ["Tabelle1","Name of Sheet 2","Sheet3"], oo.sheets
+    assert_equal ["Tabelle1","Name of Sheet 2","Sheet3","Sheet4"], oo.sheets
     #--
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    assert_equal ["Tabelle1","Name of Sheet 2","Sheet3"], oo.sheets
+    if EXCEL
+if DateTime.now > Date.new(2007,6,30)
+      oo = Excel.new(File.join("test","numbers1.xls"))
+      assert_equal ["Tabelle1","Name of Sheet 2","Sheet3"], oo.sheets
+end
+    end
+    #-- Google
+    if GOOGLE
+      if DateTime.now > Date.new(2007,6,10)
+        assert_equal "Testspreadsheet Roo", @goo.title
+      end
+      assert_equal ["Sheet eins","Sheet zwei","Sheet drei"], @goo.sheets
+    end
   end
-
+  
   def test_cell
     oo = Openoffice.new(File.join("test","numbers1.ods"))
     oo.default_sheet = oo.sheets.first
@@ -34,274 +62,477 @@ class TestRoo < Test::Unit::TestCase
     assert_equal "string", oo.celltype(2,6)
     assert_equal 11, oo.cell(2,7)
     assert_equal "float", oo.celltype(2,7)
-
+    
     assert_equal 10, oo.cell(4,1)
     assert_equal 11, oo.cell(4,2)
     assert_equal 12, oo.cell(4,3)
     assert_equal 13, oo.cell(4,4)
     assert_equal 14, oo.cell(4,5)
-
+    
     assert_equal 10, oo.cell(4,'A')
     assert_equal 11, oo.cell(4,'B')
     assert_equal 12, oo.cell(4,'C')
     assert_equal 13, oo.cell(4,'D')
     assert_equal 14, oo.cell(4,'E')
-
+    
     assert_equal "date", oo.celltype(5,1)
-    assert_equal "1961-11-21", oo.cell(5,1)
-
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = 1 # oo.sheets.first
-    assert_equal 1, oo.cell(1,1)
-    assert_equal 2, oo.cell(1,2)
-    assert_equal 3, oo.cell(1,3)
-    assert_equal 4, oo.cell(1,4)
-    assert_equal 5, oo.cell(2,1)
-    assert_equal 6, oo.cell(2,2)
-    assert_equal 7, oo.cell(2,3)
-    assert_equal 8, oo.cell(2,4)
-    assert_equal 9, oo.cell(2,5)
-    assert_equal "test", oo.cell(2,6)
-    assert_equal "string", oo.celltype(2,6)
-    assert_equal 11, oo.cell(2,7)
-    assert_equal "float", oo.celltype(2,7)
-
-    assert_equal 10, oo.cell(4,1)
-    assert_equal 11, oo.cell(4,2)
-    assert_equal 12, oo.cell(4,3)
-    assert_equal 13, oo.cell(4,4)
-    assert_equal 14, oo.cell(4,5)
-
-    assert_equal 10, oo.cell(4,'A')
-    assert_equal 11, oo.cell(4,'B')
-    assert_equal 12, oo.cell(4,'C')
-    assert_equal 13, oo.cell(4,'D')
-    assert_equal 14, oo.cell(4,'E')
-
-    assert_equal "date", oo.celltype(5,1)
-    assert_equal "1961-11-21", oo.cell(5,1)
-  end
-
-  def test_cell_address
-    oo = Openoffice.new(File.join("test/numbers1.ods"))
-    oo.default_sheet = oo.sheets.first
-    assert_equal "tata", oo.cell(6,1)
-    assert_equal "tata", oo.cell(6,'A')
-    assert_equal "tata", oo.cell('A',6)
-    assert_equal "tata", oo.cell(6,'a')
-    assert_equal "tata", oo.cell('a',6)
-
-    assert_equal "thisisc8", oo.cell(8,3)
-    assert_equal "thisisc8", oo.cell(8,'C')
-    assert_equal "thisisc8", oo.cell('C',8)
-    assert_equal "thisisc8", oo.cell(8,'c')
-    assert_equal "thisisc8", oo.cell('c',8)
-
-    assert_equal "thisisd9", oo.cell('d',9)
-    assert_equal "thisisa11", oo.cell('a',11)
-
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = 1 # oo.sheets.first
-    assert_equal "tata", oo.cell(6,1)
-    assert_equal "tata", oo.cell(6,'A')
-    assert_equal "tata", oo.cell('A',6)
-    assert_equal "tata", oo.cell(6,'a')
-    assert_equal "tata", oo.cell('a',6)
-
-    assert_equal "thisisc8", oo.cell(8,3)
-    assert_equal "thisisc8", oo.cell(8,'C')
-    assert_equal "thisisc8", oo.cell('C',8)
-    assert_equal "thisisc8", oo.cell(8,'c')
-    assert_equal "thisisc8", oo.cell('c',8)
-
-    assert_equal "thisisd9", oo.cell('d',9)
-    assert_equal "thisisa11", oo.cell('a',11)
-  end
-
-  # Version of the (XML) office document
-  # please note that "1.0" is returned even if it was created with OpenOffice V. 2.0
-  def test_officeversion
-    #-- OpenOffice
-    oo = Openoffice.new(File.join("test","numbers1.ods"))
-    assert_equal "1.0", oo.officeversion
-    #-- Excel
-    if DateTime.now > Date.new(2007,6,15)
+    assert_equal Date.new(1961,11,21), oo.cell(5,1)
+    assert_equal "1961-11-21", oo.cell(5,1).to_s
+    
+    if EXCEL
       oo = Excel.new(File.join("test","numbers1.xls"))
+      oo.default_sheet = 1 # oo.sheets.first
+      assert_equal 1, oo.cell(1,1)
+      assert_equal 2, oo.cell(1,2)
+      assert_equal 3, oo.cell(1,3)
+      assert_equal 4, oo.cell(1,4)
+      assert_equal 5, oo.cell(2,1)
+      assert_equal 6, oo.cell(2,2)
+      assert_equal 7, oo.cell(2,3)
+      assert_equal 8, oo.cell(2,4)
+      assert_equal 9, oo.cell(2,5)
+      assert_equal "test", oo.cell(2,6)
+      assert_equal "string", oo.celltype(2,6)
+      assert_equal 11, oo.cell(2,7)
+      assert_equal "float", oo.celltype(2,7)
+      
+      assert_equal 10, oo.cell(4,1)
+      assert_equal 11, oo.cell(4,2)
+      assert_equal 12, oo.cell(4,3)
+      assert_equal 13, oo.cell(4,4)
+      assert_equal 14, oo.cell(4,5)
+      
+      assert_equal 10, oo.cell(4,'A')
+      assert_equal 11, oo.cell(4,'B')
+      assert_equal 12, oo.cell(4,'C')
+      assert_equal 13, oo.cell(4,'D')
+      assert_equal 14, oo.cell(4,'E')
+      
+      assert_equal "date", oo.celltype(5,1)
+      assert_equal Date.new(1961,11,21), oo.cell(5,1)
+      assert_equal "1961-11-21", oo.cell(5,1).to_s
+    end
+    
+    if GOOGLE
+      @goo.default_sheet = 1 # @goo.sheets.first
+      assert_equal 1, @goo.cell(1,1).to_i
+      assert_equal 2, @goo.cell(1,2).to_i
+      assert_equal 3, @goo.cell(1,3).to_i
+      assert_equal 4, @goo.cell(1,4).to_i
+      assert_equal 5, @goo.cell(2,1).to_i
+      assert_equal 6, @goo.cell(2,2).to_i
+      assert_equal 7, @goo.cell(2,3).to_i
+      assert_equal 8, @goo.cell(2,4).to_i
+      assert_equal 9, @goo.cell(2,5).to_i
+      assert_equal "test", @goo.cell(2,6)
+      assert_equal "string", @goo.celltype(2,6)
+      assert_equal 11, @goo.cell(2,7).to_i
+      if DateTime.now > Date.new(2007,6,15)
+        assert_equal "float", @goo.celltype(2,7)
+      end
+      
+      assert_equal 10, @goo.cell(4,1).to_i
+      assert_equal 11, @goo.cell(4,2).to_i
+      assert_equal 12, @goo.cell(4,3).to_i
+      assert_equal 13, @goo.cell(4,4).to_i
+      assert_equal 14, @goo.cell(4,5).to_i
+      
+      assert_equal 10, @goo.cell(4,'A').to_i
+      assert_equal 11, @goo.cell(4,'B').to_i
+      assert_equal 12, @goo.cell(4,'C').to_i
+      assert_equal 13, @goo.cell(4,'D').to_i
+      assert_equal 14, @goo.cell(4,'E').to_i
+      
+      if DateTime.now > Date.new(2007,6,15)
+        assert_equal "date", @goo.celltype(5,1)
+      end
+      if DateTime.now > Date.new(2007,6,15)
+        assert_equal Date.new(1961,11,21), @goo.cell(5,1)
+        assert_equal "1961-11-21", @goo.cell(5,1).to_s
+      else
+        assert_equal "21/11/1961", @goo.cell(5,1)
+      end
+      end # GOOGLE
+    end
+    
+    def test_cell_address
+      oo = Openoffice.new(File.join("test/numbers1.ods"))
+      oo.default_sheet = oo.sheets.first
+      assert_equal "tata", oo.cell(6,1)
+      assert_equal "tata", oo.cell(6,'A')
+      assert_equal "tata", oo.cell('A',6)
+      assert_equal "tata", oo.cell(6,'a')
+      assert_equal "tata", oo.cell('a',6)
+      
+      assert_equal "thisisc8", oo.cell(8,3)
+      assert_equal "thisisc8", oo.cell(8,'C')
+      assert_equal "thisisc8", oo.cell('C',8)
+      assert_equal "thisisc8", oo.cell(8,'c')
+      assert_equal "thisisc8", oo.cell('c',8)
+      
+      assert_equal "thisisd9", oo.cell('d',9)
+      assert_equal "thisisa11", oo.cell('a',11)
+      
+      if EXCEL
+        oo = Excel.new(File.join("test","numbers1.xls"))
+        oo.default_sheet = 1 # oo.sheets.first
+        assert_equal "tata", oo.cell(6,1)
+        assert_equal "tata", oo.cell(6,'A')
+        assert_equal "tata", oo.cell('A',6)
+        assert_equal "tata", oo.cell(6,'a')
+        assert_equal "tata", oo.cell('a',6)
+        
+        assert_equal "thisisc8", oo.cell(8,3)
+        assert_equal "thisisc8", oo.cell(8,'C')
+        assert_equal "thisisc8", oo.cell('C',8)
+        assert_equal "thisisc8", oo.cell(8,'c')
+        assert_equal "thisisc8", oo.cell('c',8)
+        
+        assert_equal "thisisd9", oo.cell('d',9)
+        assert_equal "thisisa11", oo.cell('a',11)
+      end
+      
+      if GOOGLE
+        @goo.default_sheet = 1 # @goo.sheets.first
+        assert_equal "tata", @goo.cell(6,1)
+        assert_equal "tata", @goo.cell(6,'A')
+        assert_equal "tata", @goo.cell('A',6)
+        assert_equal "tata", @goo.cell(6,'a')
+        assert_equal "tata", @goo.cell('a',6)
+        
+        assert_equal "thisisc8", @goo.cell(8,3)
+        assert_equal "thisisc8", @goo.cell(8,'C')
+        assert_equal "thisisc8", @goo.cell('C',8)
+        assert_equal "thisisc8", @goo.cell(8,'c')
+        assert_equal "thisisc8", @goo.cell('c',8)
+        
+        assert_equal "thisisd9", @goo.cell('d',9)
+        assert_equal "thisisa11", @goo.cell('a',11)
+      end
+    end
+    
+    # Version of the (XML) office document
+    # please note that "1.0" is returned even if it was created with OpenOffice V. 2.0
+    def test_officeversion
+      #-- OpenOffice
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
       assert_equal "1.0", oo.officeversion
+      if EXCEL
+        # excel does not have a officeversion
+        # is there a similar version number which ist considerable
+        #-- Excel
+        #if DateTime.now > Date.new(2007,6,15)
+        #  oo = Excel.new(File.join("test","numbers1.xls"))
+        #  assert_equal "1.0", oo.officeversion
+        #end
+      end
+      #-- Google
+      if GOOGLE
+        if DateTime.now > Date.new(2007,6,15)
+          assert_equal "1.0", @goo.officeversion
+        end
+      end
     end
-  end
-
-  def test_rows
-    #-- OpenOffice
-    oo = Openoffice.new(File.join("test","numbers1.ods"))
-    oo.default_sheet = oo.sheets.first
-    assert_equal 41, oo.cell('a',12)
-    assert_equal 42, oo.cell('b',12)
-    assert_equal 43, oo.cell('c',12)
-    assert_equal 44, oo.cell('d',12)
-    assert_equal 45, oo.cell('e',12)
-    assert_equal [41.0,42.0,43.0,44.0,45.0], oo.row(12)
-    if DateTime.now > Date.new(2007,6,17)
-    #-- Excel
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = 1 # oo.sheets.first
-    assert_equal 41, oo.cell('a',12)
-    assert_equal 42, oo.cell('b',12)
-    assert_equal 43, oo.cell('c',12)
-    assert_equal 44, oo.cell('d',12)
-    assert_equal 45, oo.cell('e',12)
-    assert_equal [41.0,42.0,43.0,44.0,45.0], oo.row(12)
+    
+    def test_rows
+      #-- OpenOffice
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = oo.sheets.first
+      assert_equal 41, oo.cell('a',12)
+      assert_equal 42, oo.cell('b',12)
+      assert_equal 43, oo.cell('c',12)
+      assert_equal 44, oo.cell('d',12)
+      assert_equal 45, oo.cell('e',12)
+      assert_equal [41.0,42.0,43.0,44.0,45.0], oo.row(12)
+      if EXCEL
+        if DateTime.now > Date.new(2007,6,17)
+          #-- Excel
+          oo = Excel.new(File.join("test","numbers1.xls"))
+          oo.default_sheet = 1 # oo.sheets.first
+          assert_equal 41, oo.cell('a',12)
+          assert_equal 42, oo.cell('b',12)
+          assert_equal 43, oo.cell('c',12)
+          assert_equal 44, oo.cell('d',12)
+          assert_equal 45, oo.cell('e',12)
+          assert_equal [41.0,42.0,43.0,44.0,45.0], oo.row(12)
+        end
+      end
+      if DateTime.now > Date.new(2007,6,17)
+        #-- GOOGLE
+        if GOOGLE
+          oo = Google.new(File.join("test","numbers1.xls"))
+          oo.default_sheet = 1 # oo.sheets.first
+          assert_equal 41, oo.cell('a',12)
+          assert_equal 42, oo.cell('b',12)
+          assert_equal 43, oo.cell('c',12)
+          assert_equal 44, oo.cell('d',12)
+          assert_equal 45, oo.cell('e',12)
+          assert_equal [41.0,42.0,43.0,44.0,45.0], oo.row(12)
+        end
+      end
     end
-  end
-
-  def test_last_row
-    #-- OpenOffice
-    oo = Openoffice.new(File.join("test","numbers1.ods"))
-    oo.default_sheet = oo.sheets.first
-    assert_equal 18, oo.last_row
-    #-- Excel
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = 1 # oo.sheets.first
-    assert_equal 18, oo.last_row
-  end
-
-  def test_last_column
-    #-- OpenOffice
-    oo = Openoffice.new(File.join("test","numbers1.ods"))
-    oo.default_sheet = oo.sheets.first
-    assert_equal 7, oo.last_column
-    #-- Excel
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = 1 # oo.sheets.first
-    assert_equal 7, oo.last_column
-  end
-
-  def test_last_column_as_letter
-    #-- OpenOffice
-    oo = Openoffice.new(File.join("test","numbers1.ods"))
-    oo.default_sheet = oo.sheets.first
-    assert_equal 'G', oo.last_column_as_letter
-    #-- Excel
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = 1 # oo.sheets.first
-    assert_equal 'G', oo.last_column_as_letter
-  end
-
-  def test_first_row
-    #-- OpenOffice
-    oo = Openoffice.new(File.join("test","numbers1.ods"))
-    oo.default_sheet = oo.sheets.first
-    assert_equal 1, oo.first_row
-    #-- Excel
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = 1 # oo.sheets.first
-    assert_equal 1, oo.first_row
-  end
-
-  def test_first_column
-    #-- OpenOffice
-    oo = Openoffice.new(File.join("test","numbers1.ods"))
-    oo.default_sheet = oo.sheets.first
-    assert_equal 1, oo.first_column
-    #-- Excel
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = 1 # oo.sheets.first
-    assert_equal 1, oo.first_column
-  end
-
-  def test_first_column_as_letter
-    #-- OpenOffice
-    oo = Openoffice.new(File.join("test","numbers1.ods"))
-    oo.default_sheet = oo.sheets.first
-    assert_equal 'A', oo.first_column_as_letter
-    #-- Excel
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = 1 # oo.sheets.first
-    assert_equal 'A', oo.first_column_as_letter
-  end
-
-  def test_sheetname
-    #-- OpenOffice
-    oo = Openoffice.new(File.join("test","numbers1.ods"))
-    oo.default_sheet = "Name of Sheet 2"
-    assert_equal 'I am sheet 2', oo.cell('C',5)
-    if DateTime.now > Date.new(2007,6,16)
-    #-- Excel
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = "Name of Sheet 2"
-    assert_equal 'I am sheet 2', oo.cell('C',5)
+    
+    def test_last_row
+      #-- OpenOffice
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = oo.sheets.first
+      assert_equal 18, oo.last_row
+      if EXCEL
+        #-- Excel
+        oo = Excel.new(File.join("test","numbers1.xls"))
+        oo.default_sheet = 1 # oo.sheets.first
+        assert_equal 18, oo.last_row
+      end
+      if GOOGLE
+        #-- Google
+        @goo.default_sheet = @goo.sheets.first
+        assert_equal 18, @goo.last_row
+        assert_equal "xxx", @goo.to_s, @goo.to_s
+      end
+    end
+    
+    def test_last_column
+      #-- OpenOffice
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = oo.sheets.first
+      assert_equal 7, oo.last_column
+      if EXCEL
+        #-- Excel
+        oo = Excel.new(File.join("test","numbers1.xls"))
+        oo.default_sheet = 1 # oo.sheets.first
+        assert_equal 7, oo.last_column
+      end
+      if GOOGLE
+        #-- Google
+        @goo.default_sheet = @goo.sheets.first
+        assert_equal 7, @goo.last_column
+      end
+    end
+    
+    def test_last_column_as_letter
+      #-- OpenOffice
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = oo.sheets.first
+      assert_equal 'G', oo.last_column_as_letter
+      if EXCEL
+        #-- Excel
+        oo = Excel.new(File.join("test","numbers1.xls"))
+        oo.default_sheet = 1 # oo.sheets.first
+        assert_equal 'G', oo.last_column_as_letter
+      end
+      if GOOGLE
+        #-- Google
+        @goo.default_sheet = @goo.sheets.first
+        assert_equal 'G', @goo.last_column_as_letter
+      end
+    end
+    
+    def test_first_row
+      #-- OpenOffice
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = oo.sheets.first
+      assert_equal 1, oo.first_row
+      if EXCEL
+        #-- Excel
+        oo = Excel.new(File.join("test","numbers1.xls"))
+        oo.default_sheet = 1 # oo.sheets.first
+        assert_equal 1, oo.first_row
+      end
+      if GOOGLE
+        #-- Google
+        @goo.default_sheet = @goo.sheets.first
+        assert_equal 1, @goo.first_row
+      end
+    end
+    
+    def test_first_column
+      #-- OpenOffice
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = oo.sheets.first
+      assert_equal 1, oo.first_column
+      if EXCEL
+        #-- Excel
+        oo = Excel.new(File.join("test","numbers1.xls"))
+        oo.default_sheet = 1 # oo.sheets.first
+        assert_equal 1, oo.first_column
+      end
+      if GOOGLE
+        #-- Google
+        @goo.default_sheet = 1 # @goo.sheets.first
+        assert_equal 1, @goo.first_column
+      end
+    end
+    
+    def test_first_column_as_letter
+      #-- OpenOffice
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = oo.sheets.first
+      assert_equal 'A', oo.first_column_as_letter
+      if EXCEL
+        #-- Excel
+        oo = Excel.new(File.join("test","numbers1.xls"))
+        oo.default_sheet = 1 # oo.sheets.first
+        assert_equal 'A', oo.first_column_as_letter
+      end
+      if GOOGLE
+        #-- Google
+        @goo.default_sheet = @goo.sheets.first
+        assert_equal 'A', @goo.first_column_as_letter
+      end
+    end
+    
+    def test_sheetname
+      #-- OpenOffice
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = "Name of Sheet 2"
+      assert_equal 'I am sheet 2', oo.cell('C',5)
+      if DateTime.now > Date.new(2007,6,16)
+        #-- Excel
+        if DateTime.now > Date.new(2007,6,30)
+        oo = Excel.new(File.join("test","numbers1.xls"))
+        oo.default_sheet = "Name of Sheet 2"
+        assert_equal 'I am sheet 2', oo.cell('C',5)
+        end
+      end
+    end
+    
+    def test_boundaries
+      #-- OpenOffice
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = "Name of Sheet 2"
+      assert_equal 2, oo.first_column
+      assert_equal 'B', oo.first_column_as_letter
+      assert_equal 5, oo.first_row
+      assert_equal 'E', oo.last_column_as_letter
+      assert_equal 14, oo.last_row
+      assert_equal 'E', oo.first_row_as_letter
+      assert_equal 'N', oo.last_row_as_letter
+      if EXCEL
+        #-- Excel
+        oo = Excel.new(File.join("test","numbers1.xls"))
+        oo.default_sheet = 2 # "Name of Sheet 2"
+        assert_equal 2, oo.first_column
+        assert_equal 'B', oo.first_column_as_letter
+        assert_equal 5, oo.first_row
+        assert_equal 'E', oo.last_column_as_letter
+        assert_equal 14, oo.last_row
+        assert_equal 'E', oo.first_row_as_letter
+        assert_equal 'N', oo.last_row_as_letter
+      end
+    end
+    
+    def test_multiple_letters
+      #-- OpenOffice
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = "Sheet3"
+      assert_equal "i am AA", oo.cell('AA',1)
+      assert_equal "i am AB", oo.cell('AB',1)
+      assert_equal "i am BA", oo.cell('BA',1)
+      assert_equal 'BA', oo.last_column_as_letter
+      assert_equal "i am BA", oo.cell(1,'BA')
+      if EXCEL
+        #-- Excel
+        oo = Excel.new(File.join("test","numbers1.xls"))
+        oo.default_sheet = 3 # "Sheet3"
+        assert_equal "i am AA", oo.cell('AA',1)
+        assert_equal "i am AB", oo.cell('AB',1)
+        assert_equal "i am BA", oo.cell('BA',1)
+        assert_equal 'BA', oo.last_column_as_letter
+        assert_equal "i am BA", oo.cell(1,'BA')
+      end
+    end
+    
+    def test_setting_cell
+      assert true
+    end
+    
+    def test_argument_error
+      if EXCEL
+        oo = Excel.new(File.join("test","numbers1.xls"))
+        assert_raise(ArgumentError) {
+          oo.default_sheet = "first sheet"
+        }
+        assert_nothing_raised(ArgumentError) {
+          oo.default_sheet = 1
+        }
+      end
+    end
+    
+    def test_empty_eh
+      #-- OpenOffice
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = oo.sheets.first
+      assert oo.empty?('a',14)
+      assert ! oo.empty?('a',15)
+      assert oo.empty?('a',20)
+      if EXCEL
+        #-- Excel
+        oo = Excel.new(File.join("test","numbers1.xls"))
+        oo.default_sheet = 1
+        assert oo.empty?('a',14)
+        assert ! oo.empty?('a',15)
+        assert oo.empty?('a',20)
+      end
     end
-  end
 
-  def test_boundaries
-    #-- OpenOffice
-    oo = Openoffice.new(File.join("test","numbers1.ods"))
-    oo.default_sheet = "Name of Sheet 2"
-    assert_equal 2, oo.first_column
-    assert_equal 'B', oo.first_column_as_letter
-    assert_equal 5, oo.first_row
-    assert_equal 'E', oo.last_column_as_letter
-    assert_equal 14, oo.last_row
-    assert_equal 'E', oo.first_row_as_letter
-    assert_equal 'N', oo.last_row_as_letter
-    #-- Excel
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = 2 # "Name of Sheet 2"
-    assert_equal 2, oo.first_column
-    assert_equal 'B', oo.first_column_as_letter
-    assert_equal 5, oo.first_row
-    assert_equal 'E', oo.last_column_as_letter
-    assert_equal 14, oo.last_row
-    assert_equal 'E', oo.first_row_as_letter
-    assert_equal 'N', oo.last_row_as_letter
-  end
+    def test_writeopenoffice
+      if OPENOFFICEWRITE
+      File.cp(File.join("test","numbers1.ods"),
+              File.join("test","numbers2.ods"))
+      File.cp(File.join("test","numbers2.ods"),
+              File.join("test","bak_numbers2.ods"))
+      oo = Openoffice.new(File.join("test","numbers2.ods"))
+      oo.default_sheet = oo.sheets.first
+      oo.first_row.upto(oo.last_row) {|y|
+        oo.first_column.upto(oo.last_column) {|x|
+          unless oo.empty?(y,x) 
+            oo.set(y, x, oo.cell(y,x) + 7) if oo.celltype(y,x) == "float"
+          end
+        }
+      }
+      oo.save
+ 
+      oo1 = Openoffice.new(File.join("test","numbers2.ods"))
+      oo2 = Openoffice.new(File.join("test","bak_numbers2.ods"))
+      p oo2.to_s
+      assert_equal 999, oo2.cell('a',1), oo2.cell('a',1)
+      assert_equal oo2.cell('a',1) + 7, oo1.cell('a',1)
+      assert_equal oo2.cell('b',1)+7, oo1.cell('b',1)
+      assert_equal oo2.cell('c',1)+7, oo1.cell('c',1)
+      assert_equal oo2.cell('d',1)+7, oo1.cell('d',1)
+      assert_equal oo2.cell('a',2)+7, oo1.cell('a',2)
+      assert_equal oo2.cell('b',2)+7, oo1.cell('b',2)
+      assert_equal oo2.cell('c',2)+7, oo1.cell('c',2)
+      assert_equal oo2.cell('d',2)+7, oo1.cell('d',2)
+      assert_equal oo2.cell('e',2)+7, oo1.cell('e',2)
+      
+      File.cp(File.join("test","bak_numbers2.ods"),
+              File.join("test","numbers2.ods"))
+      end
+    end
 
-  def test_multiple_letters
-    #-- OpenOffice
-    oo = Openoffice.new(File.join("test","numbers1.ods"))
-    oo.default_sheet = "Sheet3"
-    assert_equal "i am AA", oo.cell('AA',1)
-    assert_equal "i am AB", oo.cell('AB',1)
-    assert_equal "i am BA", oo.cell('BA',1)
-    assert_equal 'BA', oo.last_column_as_letter
-    assert_equal "i am BA", oo.cell(1,'BA')
-    #-- Excel
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = 3 # "Sheet3"
-    assert_equal "i am AA", oo.cell('AA',1)
-    assert_equal "i am AB", oo.cell('AB',1)
-    assert_equal "i am BA", oo.cell('BA',1)
-    assert_equal 'BA', oo.last_column_as_letter
-    assert_equal "i am BA", oo.cell(1,'BA')
-  end
+    def test_reload
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = oo.sheets.first
+      assert_equal 1, oo.cell(1,1)
 
-  def test_setting_cell
-assert true
-  end
+if DateTime.now < Date.new(2007, 6, 15)
+      oo.reload
+      assert_equal 2, oo.cell(1,1)
+end
+    end
 
-  def test_argument_error
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    assert_raise(ArgumentError) {
-      oo.default_sheet = "first sheet"
-    }
-    assert_nothing_raised(ArgumentError) {
-      oo.default_sheet = 1
-    }
-  end
+    def test_bug_contiguous_cells
+      if OPENOFFICE
+      oo = Openoffice.new(File.join("test","numbers1.ods"))
+      oo.default_sheet = "Sheet4"
+      assert_equal Date.new(2007,06,16), oo.cell('a',1) 
+      assert_equal 10, oo.cell('b',1)
+      assert_equal 10, oo.cell('c',1)
+      assert_equal 10, oo.cell('d',1)
+      assert_equal 10, oo.cell('e',1)
+     end
 
-  def test_empty_eh
-    #-- OpenOffice
-    oo = Openoffice.new(File.join("test","numbers1.ods"))
-    oo.default_sheet = oo.sheets.first
-    assert oo.empty?('a',14)
-    assert ! oo.empty?('a',15)
-    assert oo.empty?('a',20)
-    #-- Excel
-    oo = Excel.new(File.join("test","numbers1.xls"))
-    oo.default_sheet = 1
-    assert oo.empty?('a',14)
-    assert ! oo.empty?('a',15)
-    assert oo.empty?('a',20)
+    end
 
-  end
-end
+  end # class