roo-immersion 1.0.0

data/lib/roo/google.rb

@@ -0,0 +1,379 @@
+require 'gdata/spreadsheet'
+require 'xml'
+
+class GoogleHTTPError < RuntimeError; end
+class GoogleReadError < RuntimeError; end
+class GoogleWriteError < RuntimeError; end
+
+# overwrite some methods from the gdata-gem:
+module GData
+  class Spreadsheet < GData::Base
+    
+    def visibility
+      @headers ? "private" : "public"
+    end
+   
+    def projection
+      @headers ? "full" : "values"
+    end
+    
+    #-- modified
+    def evaluate_cell(cell, sheet_no=1)
+      raise ArgumentError, "invalid cell: #{cell}" unless cell
+      raise ArgumentError, "invalid sheet_no: #{sheet_no}" unless sheet_no >0 and sheet_no.class == Fixnum
+      path = "/feeds/cells/#{@spreadsheet_id}/#{sheet_no}/#{visibility}/#{projection}/#{cell}"
+      doc = Hpricot(request(path))
+      result = (doc/"content").inner_html
+    end
+
+    #-- new
+    def sheetlist
+      path = "/feeds/worksheets/#{@spreadsheet_id}/#{visibility}/#{projection}"
+      doc = Hpricot(request(path))
+      result = []
+      (doc/"content").each { |elem|
+        result << elem.inner_html
+      }
+      if result.size == 0 
+        if (doc/"h2").inner_html =~ /Error/
+          raise GoogleHTTPError, "#{(doc/'h2').inner_html}: #{(doc/'title').inner_html} [key '#{@spreadsheet_id}']"
+        else
+          raise GoogleReadError, "#{doc} [key '#{@spreadsheet_id}']"
+        end  
+      end
+      result
+    end
+
+    #-- new
+    #@@ added sheet_no to definition
+    def save_entry_roo(entry, sheet_no)
+      raise GoogleWriteError, "unable to write to public spreadsheets" if visibility == 'public'
+      path = "/feeds/cells/#{@spreadsheet_id}/#{sheet_no}/#{visibility}/#{projection}"
+      post(path, entry)
+    end
+
+    #-- new
+    def entry_roo(formula, row=1, col=1)
+    <<-XML
+    <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
+
+    #-- new
+    #@@ added sheet_no to definition		
+    def add_to_cell_roo(row,col,value, sheet_no=1)
+      save_entry_roo(entry_roo(value,row,col), sheet_no)
+    end
+   
+    #-- new
+    def get_one_sheet
+      path = "/feeds/cells/#{@spreadsheet_id}/1/#{visibility}/#{projection}"
+      doc = Hpricot(request(path))
+    end
+
+    #new
+    def oben_unten_links_rechts(sheet_no)
+      path = "/feeds/cells/#{@spreadsheet_id}/#{sheet_no}/#{visibility}/#{projection}"
+      doc = Hpricot(request(path))
+      rows = []
+      cols = []
+      (doc/"gs:cell").each {|item|
+        rows.push item['row'].to_i
+        cols.push item['col'].to_i
+      }
+      return rows.min, rows.max, cols.min, cols.max
+    end
+
+    def fulldoc(sheet_no)
+      path = "/feeds/cells/#{@spreadsheet_id}/#{sheet_no}/#{visibility}/#{projection}"
+      doc = Hpricot(request(path))
+      return doc
+    end
+
+  end # class
+end # module
+
+class Google < GenericSpreadsheet
+  attr_accessor :date_format, :datetime_format
+  
+  # Creates a new Google spreadsheet object.
+  def initialize(spreadsheetkey,user=nil,password=nil)
+    @filename = spreadsheetkey
+    @spreadsheetkey = spreadsheetkey
+    @user = user
+    @password = password
+    unless user
+      user = ENV['GOOGLE_MAIL']
+    end
+    unless password
+      password = ENV['GOOGLE_PASSWORD']
+    end
+    @cell = Hash.new {|h,k| h[k]=Hash.new}
+    @cell_type = Hash.new {|h,k| h[k]=Hash.new}
+    @formula = Hash.new
+    @first_row = Hash.new
+    @last_row = Hash.new
+    @first_column = Hash.new
+    @last_column = Hash.new
+    @cells_read = Hash.new
+    @header_line = 1
+    @date_format = '%d/%m/%Y'
+    @datetime_format = '%d/%m/%Y %H:%M:%S' 
+    @time_format = '%H:%M:%S'
+    @gs = GData::Spreadsheet.new(spreadsheetkey)
+    @gs.authenticate(user, password) unless user.empty? || password.empty?
+    @sheetlist = @gs.sheetlist
+    @default_sheet = self.sheets.first
+  end
+
+  # returns an array of sheet names in the spreadsheet
+  def sheets
+    @sheetlist
+  end
+
+  def date?(string)
+    begin
+      Date.strptime(string, @date_format)
+      true
+    rescue
+      false
+    end
+  end
+
+  # is String a time with format HH:MM:SS?
+  def time?(string)
+    begin
+      DateTime.strptime(string, @time_format)
+      true
+    rescue
+      false
+    end
+  end
+
+  def datetime?(string)
+    begin
+      DateTime.strptime(string, @datetime_format)
+      true
+    rescue
+      false
+    end
+  end
+
+  def numeric?(string)
+    string =~ /^[0-9]+[\.]*[0-9]*$/
+  end
+
+  def timestring_to_seconds(value)
+    hms = value.split(':')
+    hms[0].to_i*3600 + hms[1].to_i*60 + hms[2].to_i
+  end
+
+  # Returns the content of a spreadsheet-cell.
+  # (1,1) is the upper left corner.
+  # (1,1), (1,'A'), ('A',1), ('a',1) all refers to the
+  # cell at the first line and first row.
+  def cell(row, col, sheet=nil)
+    sheet = @default_sheet unless sheet
+    check_default_sheet #TODO: 2007-12-16
+    read_cells(sheet) unless @cells_read[sheet]
+    row,col = normalize(row,col)
+    value = @cell[sheet]["#{row},#{col}"]
+    if celltype(row,col,sheet) == :date
+      begin
+        return  Date.strptime(value, @date_format)
+      rescue ArgumentError
+        raise "Invalid Date #{sheet}[#{row},#{col}] #{value} using format '{@date_format}'"
+      end
+    elsif celltype(row,col,sheet) == :datetime
+      begin
+        return  DateTime.strptime(value, @datetime_format)
+      rescue ArgumentError
+        raise "Invalid DateTime #{sheet}[#{row},#{col}] #{value} using format '{@datetime_format}'"
+      end
+    end 
+    return value
+  end
+
+  # returns the type of a cell:
+  # * :float
+  # * :string
+  # * :date
+  # * :percentage
+  # * :formula
+  # * :time
+  # * :datetime
+  def celltype(row, col, sheet=nil)
+    sheet = @default_sheet unless sheet
+    read_cells(sheet) unless @cells_read[sheet]
+    row,col = normalize(row,col)
+    if @formula.size > 0 && @formula[sheet]["#{row},#{col}"]
+      return :formula
+    else
+      @cell_type[sheet]["#{row},#{col}"]
+    end
+  end
+
+  # Returns the formula at (row,col).
+  # Returns nil if there is no formula.
+  # The method #formula? checks if there is a formula.
+  def formula(row,col,sheet=nil)
+    sheet = @default_sheet unless sheet
+    read_cells(sheet) unless @cells_read[sheet]
+    row,col = normalize(row,col)
+    if @formula[sheet]["#{row},#{col}"] == nil
+      return nil
+    else
+      return @formula[sheet]["#{row},#{col}"] 
+    end
+  end
+
+  # true, if there is a formula
+  def formula?(row,col,sheet=nil)
+    sheet = @default_sheet unless sheet
+    read_cells(sheet) unless @cells_read[sheet]
+    row,col = normalize(row,col)
+    formula(row,col) != nil
+  end
+
+  # returns each formula in the selected sheet as an array of elements
+  # [row, col, formula]
+  def formulas(sheet=nil)
+    theformulas = Array.new
+    sheet = @default_sheet unless sheet
+    read_cells(sheet) unless @cells_read[sheet]
+    first_row(sheet).upto(last_row(sheet)) {|row|
+      first_column(sheet).upto(last_column(sheet)) {|col|
+        if formula?(row,col,sheet)
+          f = [row, col, formula(row,col,sheet)]
+          theformulas << f
+        end
+      }
+    }
+    theformulas
+  end
+
+  # true, if the cell is empty
+  def empty?(row, col, sheet=nil)
+    value = cell(row, col, sheet)
+    return true unless value
+    return false if value.class == Date # a date is never empty
+    return false if value.class == Float
+    return false if celltype(row,col,sheet) == :time
+    value.empty?
+  end
+
+  # sets the cell to the content of 'value'
+  # a formula can be set in the form of '=SUM(...)'
+  def set_value(row,col,value,sheet=nil)
+    sheet = @default_sheet unless sheet
+    raise RangeError, "sheet not set" unless sheet
+    #@@ Set and pass sheet_no
+    begin
+      sheet_no = sheets.index(sheet)+1
+    rescue
+      raise RangeError, "invalid sheet '"+sheet.to_s+"'"
+    end
+    row,col = normalize(row,col)
+    @gs.add_to_cell_roo(row,col,value,sheet_no)
+    # re-read the portion of the document that has changed
+    if @cells_read[sheet]
+      key = "#{row},#{col}"
+      (value, value_type) = determine_datatype(value.to_s)
+      @cell[sheet][key] = value 
+      @cell_type[sheet][key] = value_type 
+    end
+  end
+  
+  # returns the first non-empty row in a sheet
+  def first_row(sheet=nil)
+    sheet = @default_sheet unless sheet
+    unless @first_row[sheet]
+      sheet_no = sheets.index(sheet) + 1
+      @first_row[sheet], @last_row[sheet], @first_column[sheet], @last_column[sheet] = @gs.oben_unten_links_rechts(sheet_no)
+    end   
+    return @first_row[sheet]
+  end
+
+  # returns the last non-empty row in a sheet
+  def last_row(sheet=nil)
+    sheet = @default_sheet unless sheet
+    unless @last_row[sheet]
+      sheet_no = sheets.index(sheet) + 1
+      @first_row[sheet], @last_row[sheet], @first_column[sheet], @last_column[sheet] = @gs.oben_unten_links_rechts(sheet_no)
+    end
+    return @last_row[sheet]
+  end
+
+  # returns the first non-empty column in a sheet
+  def first_column(sheet=nil)
+    sheet = @default_sheet unless sheet
+    unless @first_column[sheet]
+      sheet_no = sheets.index(sheet) + 1
+      @first_row[sheet], @last_row[sheet], @first_column[sheet], @last_column[sheet] = @gs.oben_unten_links_rechts(sheet_no)
+    end
+    return @first_column[sheet]
+  end
+
+  # returns the last non-empty column in a sheet
+  def last_column(sheet=nil)
+    sheet = @default_sheet unless sheet
+    unless @last_column[sheet]
+      sheet_no = sheets.index(sheet) + 1
+      @first_row[sheet], @last_row[sheet], @first_column[sheet], @last_column[sheet] = @gs.oben_unten_links_rechts(sheet_no)
+    end
+    return @last_column[sheet]
+  end
+
+  private
+
+  # read all cells in a sheet. 
+  def read_cells(sheet=nil)
+    sheet = @default_sheet unless sheet
+    raise RangeError, "illegal sheet <#{sheet}>" unless sheets.index(sheet)
+    sheet_no = sheets.index(sheet)+1
+    xml = @gs.fulldoc(sheet_no).to_s
+    doc = XML::Parser.string(xml).parse
+    doc.find("//*[local-name()='cell']").each do |item|
+      row = item['row']
+      col = item['col']
+      key = "#{row},#{col}"
+      string_value =  item['inputvalue'] ||  item['inputValue'] 
+      numeric_value = item['numericvalue']  ||  item['numericValue'] 
+      (value, value_type) = determine_datatype(string_value, numeric_value)
+      @cell[sheet][key] = value unless value == "" or value == nil
+      @cell_type[sheet][key] = value_type 
+      @formula[sheet] = {} unless @formula[sheet]
+      @formula[sheet][key] = string_value if value_type == :formula
+    end
+    @cells_read[sheet] = true
+  end
+  
+  def determine_datatype(val, numval=nil)
+    if val.nil? || val[0,1] == '='
+      ty = :formula
+      if numeric?(numval)
+        val = numval.to_f
+      else
+        val = numval
+      end
+    else
+      if datetime?(val)
+        ty = :datetime
+      elsif date?(val)
+        ty = :date
+      elsif numeric?(val) 
+        ty = :float
+        val = val.to_f
+      elsif time?(val)
+        ty = :time
+        val = timestring_to_seconds(val)
+      else
+        ty = :string
+      end
+    end  
+    return val, ty 
+  end
+  
+end # class

data/lib/roo/openoffice.rb

@@ -0,0 +1,451 @@
+require 'xml'
+require 'fileutils'
+require 'zip/zipfilesystem'
+require 'date'
+require 'base64'
+require 'cgi'
+
+class Openoffice < GenericSpreadsheet
+
+  @@nr = 0
+
+  # initialization and opening of a spreadsheet file
+  # values for packed: :zip
+  def initialize(filename, packed=nil, file_warning=:error) #, create = false)
+    @file_warning = file_warning
+    super()
+    @tmpdir = "oo_"+$$.to_s
+    @tmpdir = File.join(ENV['ROO_TMP'], @tmpdir) if ENV['ROO_TMP'] 
+    unless File.exists?(@tmpdir)
+      FileUtils::mkdir(@tmpdir)
+    end
+    filename = open_from_uri(filename) if filename[0,7] == "http://"
+    filename = unzip(filename) if packed and packed == :zip
+    begin
+      file_type_check(filename,'.ods','an openoffice')
+      #if create and ! File.exists?(filename)
+      #  self.create_openoffice(filename)
+      #end
+      @cells_read = Hash.new
+      #TODO: @cells_read[:default] = false
+      @filename = filename
+      unless File.file?(@filename)
+        raise IOError, "file #{@filename} does not exist"
+      end
+      @@nr += 1
+      @file_nr = @@nr
+      extract_content
+      file = File.new(File.join(@tmpdir, @file_nr.to_s+"_roo_content.xml"))
+      @doc = XML::Parser.io(file).parse
+      file.close
+    ensure
+      #if ENV["roo_local"] != "thomas-p"
+      FileUtils::rm_r(@tmpdir)
+      #end
+    end
+    @default_sheet = self.sheets.first
+    @cell = Hash.new
+    @cell_type = Hash.new
+    @formula = Hash.new
+    @first_row = Hash.new
+    @last_row = Hash.new
+    @first_column = Hash.new
+    @last_column = Hash.new
+    @style = Hash.new
+    @style_defaults = Hash.new { |h,k| h[k] = [] }
+    @style_definitions = Hash.new 
+    @header_line = 1
+  end
+
+  # creates a new empty openoffice-spreadsheet file
+  def create_openoffice(filename) #:nodoc:
+    #TODO: a better way for creating the file contents
+    # now you have to call mkbase64...rb to create an include file with all
+    # the empty files in an openoffice zip-file
+    load 'base64include.rb'
+    # puts @@empty_spreadsheet
+    f = File.open(filename,'wb')
+    f.print(Base64.decode64(@@empty_spreadsheet))
+    f.close
+  end
+
+  # Returns the content of a spreadsheet-cell.
+  # (1,1) is the upper left corner.
+  # (1,1), (1,'A'), ('A',1), ('a',1) all refers to the
+  # cell at the first line and first row.
+  def cell(row, col, sheet=nil)
+    sheet = @default_sheet unless sheet
+    read_cells(sheet) unless @cells_read[sheet]
+    row,col = normalize(row,col)
+    if celltype(row,col,sheet) == :date
+      yyyy,mm,dd = @cell[sheet][[row,col]].split('-')
+      return Date.new(yyyy.to_i,mm.to_i,dd.to_i)
+    end
+    @cell[sheet][[row,col]]
+  end
+
+  # Returns the formula at (row,col).
+  # Returns nil if there is no formula.
+  # The method #formula? checks if there is a formula.
+  def formula(row,col,sheet=nil)
+    sheet = @default_sheet unless sheet
+    read_cells(sheet) unless @cells_read[sheet]
+    row,col = normalize(row,col)
+    if @formula[sheet][[row,col]] == nil
+      return nil
+    else
+      return @formula[sheet][[row,col]]["oooc:".length..-1]
+    end
+  end
+
+  # true, if there is a formula
+  def formula?(row,col,sheet=nil)
+    sheet = @default_sheet unless sheet
+    read_cells(sheet) unless @cells_read[sheet]
+    row,col = normalize(row,col)
+    formula(row,col) != nil
+  end
+  
+  class Font
+    attr_accessor :bold, :italic, :underline
+    
+    def bold? 
+      @bold == 'bold'
+    end
+
+    def italic? 
+      @italic == 'italic'
+    end
+    
+    def underline? 
+      @underline != nil
+    end
+  end
+
+  # Given a cell, return the cell's style 
+  def font(row, col, sheet=nil)
+    sheet = @default_sheet unless sheet
+    read_cells(sheet) unless @cells_read[sheet]
+    row,col = normalize(row,col)
+    style_name = @style[sheet][[row,col]] || @style_defaults[sheet][col - 1] || 'Default'
+    @style_definitions[style_name]
+  end 
+  
+  # set a cell to a certain value
+  # (this will not be saved back to the spreadsheet file!)
+  def set(row,col,value,sheet=nil) #:nodoc:
+    sheet = @default_sheet unless sheet
+    read_cells(sheet) unless @cells_read[sheet]
+    row,col = normalize(row,col)
+    set_value(row,col,value,sheet)
+    if value.class == Fixnum
+      set_type(row,col,:float,sheet)
+    elsif value.class == String
+      set_type(row,col,:string,sheet)
+    elsif value.class == Float
+      set_type(row,col,:string,sheet)
+    else
+      raise ArgumentError, "Type for "+value.to_s+" not set"
+    end
+  end
+
+  # returns the type of a cell:
+  # * :float
+  # * :string
+  # * :date
+  # * :percentage
+  # * :formula
+  # * :time
+  # * :datetime
+  def celltype(row,col,sheet=nil)
+    sheet = @default_sheet unless sheet
+    read_cells(sheet) unless @cells_read[sheet]
+    row,col = normalize(row,col)
+    if @formula[sheet][[row,col]]
+      return :formula
+    else
+      @cell_type[sheet][[row,col]]
+    end
+  end
+
+  def sheets
+    return_sheets = []
+    @doc.find("//*[local-name()='table']").each do |sheet|
+      return_sheets << sheet.attributes['name']
+    end
+    return_sheets
+  end
+    
+  # version of the openoffice document
+  # at 2007 this is always "1.0"
+  def officeversion
+    oo_version
+    @officeversion
+  end
+
+  # shows the internal representation of all cells
+  # mainly for debugging purposes
+  def to_s(sheet=nil)
+    sheet = @default_sheet unless sheet
+    read_cells(sheet) unless @cells_read[sheet]
+    @cell[sheet].inspect
+  end
+
+  # save spreadsheet
+  def save #:nodoc:
+    42
+  end
+
+  # returns each formula in the selected sheet as an array of elements
+  # [row, col, formula]
+  def formulas(sheet=nil)
+    theformulas = Array.new
+    sheet = @default_sheet unless sheet
+    read_cells(sheet) unless @cells_read[sheet]
+    first_row(sheet).upto(last_row(sheet)) {|row|
+      first_column(sheet).upto(last_column(sheet)) {|col|
+        if formula?(row,col,sheet)
+          f = [row, col, formula(row,col,sheet)]
+          theformulas << f
+        end
+      }
+    }
+    theformulas
+  end
+
+  private
+
+  # read the version of the OO-Version
+  def oo_version
+    @doc.find("//*[local-name()='document-content']").each do |office|
+      @officeversion = office.attributes['version']
+    end
+  end
+
+  # helper function to set the internal representation of cells
+  def set_cell_values(sheet,x,y,i,v,vt,formula,table_cell,str_v,style_name)
+    key = [y,x+i]    
+    @cell_type[sheet] = {} unless @cell_type[sheet]
+    @cell_type[sheet][key] = Openoffice.oo_type_2_roo_type(vt)
+    @formula[sheet] = {} unless @formula[sheet]
+    @formula[sheet][key] = formula  if formula
+    @cell[sheet]    = {} unless @cell[sheet]
+    @style[sheet] = {} unless @style[sheet]
+    @style[sheet][key] = style_name
+    case @cell_type[sheet][key]
+    when :float
+      @cell[sheet][key] = (v.to_s.include?('.') ? v.to_f : v.to_i)
+    when :string
+      @cell[sheet][key] = str_v
+    when :date
+      if table_cell.attributes['date-value'].size != "XXXX-XX-XX".size
+        #-- dann ist noch eine Uhrzeit vorhanden
+        #-- "1961-11-21T12:17:18"
+        @cell[sheet][key] = DateTime.parse(table_cell.attributes['date-value'])
+        @cell_type[sheet][key] = :datetime
+      else
+        @cell[sheet][key] = table_cell.attributes['date-value']
+      end
+    when :percentage
+      @cell[sheet][key] = v.to_f
+    when :time
+      hms = v.split(':')
+      @cell[sheet][key] = hms[0].to_i*3600 + hms[1].to_i*60 + hms[2].to_i
+    else
+      @cell[sheet][key] = v
+    end
+  end
+
+  # read all cells in the selected sheet
+  #--
+  # the following construct means '4 blanks'
+  # some content <text:s text:c="3"/>
+  #++
+  def read_cells(sheet=nil)
+    sheet = @default_sheet unless sheet
+    sheet_found = false
+    raise ArgumentError, "Error: sheet '#{sheet||'nil'}' not valid" if @default_sheet == nil and sheet==nil
+    raise RangeError unless self.sheets.include? sheet
+
+    @doc.find("//*[local-name()='table']").each do |ws|
+      if sheet == ws.attributes['name']
+        sheet_found = true
+        col = 1
+        row = 1
+        ws.each_element do |table_element|
+          case table_element.name
+          when 'table-column'
+            @style_defaults[sheet] << table_element.attributes['default-cell-style-name'] 
+          when 'table-row'
+            if table_element.attributes['number-rows-repeated']
+              skip_row = table_element.attributes['number-rows-repeated'].to_i
+              row = row + skip_row - 1
+            end
+            table_element.each_element do |cell|
+              skip_col = cell.attributes['number-columns-repeated']
+              formula = cell.attributes['formula']
+              vt = cell.attributes['value-type']
+              v =  cell.attributes['value']
+              style_name = cell.attributes['style-name']
+              if vt == 'string'
+                str_v  = ''
+                # insert \n if there is more than one paragraph
+                para_count = 0
+                cell.each_element do |str|
+                  if str.name == 'p'
+                    v = str.content
+                    str_v += "\n" if para_count > 0
+                    para_count += 1
+                    if str.children.size > 1
+                      str_v += children_to_string(str.children)
+                    else
+                      str.children.each do |child|
+                        str_v += child.content #.text
+                      end
+                    end
+                    str_v.gsub!(/&apos;/,"'")  # special case not supported by unescapeHTML
+                    str_v = CGI.unescapeHTML(str_v)
+                  end # == 'p'
+                 end
+              elsif vt == 'time'
+                cell.each_element do |str|
+                  if str.name == 'p'
+                    v = str.content
+                  end
+                end
+              elsif vt == '' or vt == nil
+                #
+              elsif vt == 'date'
+                #
+              elsif vt == 'percentage'
+                #
+              elsif vt == 'float'
+                #
+              elsif vt == 'boolean'
+                v = cell.attributes['boolean-value']
+                #
+              else
+                # raise "unknown type #{vt}"
+              end
+              if skip_col
+                if v != nil or cell.attributes['date-value']
+                  0.upto(skip_col.to_i-1) do |i|
+                    set_cell_values(sheet,col,row,i,v,vt,formula,cell,str_v,style_name)
+                  end
+                end
+                col += (skip_col.to_i - 1)
+              end # if skip
+              set_cell_values(sheet,col,row,0,v,vt,formula,cell,str_v,style_name)
+              col += 1
+            end    
+            row += 1
+            col = 1
+          end
+        end
+      end
+    end
+    
+    @doc.find("//*[local-name()='automatic-styles']").each do |style|
+      read_styles(style)
+    end
+    if !sheet_found
+      raise RangeError
+    end
+    @cells_read[sheet] = true
+  end
+
+  def read_styles(style_elements)
+    @style_definitions['Default'] = Openoffice::Font.new
+    style_elements.each do |style|
+      next unless style.name == 'style'
+      style_name = style.attributes['name']
+      style.each do |properties|
+        font = Openoffice::Font.new
+        font.bold = properties.attributes['font-weight']
+        font.italic = properties.attributes['font-style']
+        font.underline = properties.attributes['text-underline-style']
+        @style_definitions[style_name] = font
+      end    
+    end
+  end
+  
+  # Checks if the default_sheet exists. If not an RangeError exception is
+  # raised
+  def check_default_sheet
+    sheet_found = false
+    raise ArgumentError, "Error: default_sheet not set" if @default_sheet == nil
+    sheet_found = true if sheets.include?(@default_sheet)
+    if ! sheet_found
+      raise RangeError, "sheet '#{@default_sheet}' not found"
+    end
+  end
+
+  def process_zipfile(zip, path='')
+    if zip.file.file? path
+      if path == "content.xml"
+        open(File.join(@tmpdir, @file_nr.to_s+'_roo_content.xml'),'wb') {|f|
+          f << zip.read(path)
+        }
+      end
+    else
+      unless path.empty?
+        path += '/'
+      end
+      zip.dir.foreach(path) do |filename|
+        process_zipfile(zip, path+filename)
+      end
+    end
+  end
+
+  def extract_content
+    Zip::ZipFile.open(@filename) do |zip|
+      process_zipfile(zip)
+    end
+  end
+
+  def set_value(row,col,value,sheet=nil)
+    sheet = @default_value unless sheet
+    @cell[sheet][[row,col]] = value
+  end
+
+  def set_type(row,col,type,sheet=nil)
+    sheet = @default_value unless sheet
+    @cell_type[sheet][[row,col]] = type
+  end
+
+  A_ROO_TYPE = {
+    "float"      => :float,
+    "string"     => :string,
+    "date"       => :date,
+    "percentage" => :percentage,
+    "time"       => :time,
+  }
+
+  def Openoffice.oo_type_2_roo_type(ootype)
+    return A_ROO_TYPE[ootype]
+  end
+ 
+  # helper method to convert compressed spaces and other elements within
+  # an text into a string
+  def children_to_string(children)
+    result = ''
+    children.each {|child|
+      if child.text?
+        result = result + child.content
+      else
+        if child.name == 's'
+          compressed_spaces = child.attributes['c'].to_i
+          # no explicit number means a count of 1:
+          if compressed_spaces == 0
+            compressed_spaces = 1
+          end
+          result = result + " "*compressed_spaces
+        else
+          result = result + child.content
+        end
+      end
+    }
+    result
+  end
+
+end # class