rubyfromexcel 0.0.4

data/examples/unzipped-sheets/table-test/xl/theme/theme1.xml

@@ -0,0 +1,2 @@
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<a:theme xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main" name="Office Theme"><a:themeElements><a:clrScheme name="Office"><a:dk1><a:sysClr val="windowText" lastClr="000000"/></a:dk1><a:lt1><a:sysClr val="window" lastClr="FFFFFF"/></a:lt1><a:dk2><a:srgbClr val="1F497D"/></a:dk2><a:lt2><a:srgbClr val="EEECE1"/></a:lt2><a:accent1><a:srgbClr val="4F81BD"/></a:accent1><a:accent2><a:srgbClr val="C0504D"/></a:accent2><a:accent3><a:srgbClr val="9BBB59"/></a:accent3><a:accent4><a:srgbClr val="8064A2"/></a:accent4><a:accent5><a:srgbClr val="4BACC6"/></a:accent5><a:accent6><a:srgbClr val="F79646"/></a:accent6><a:hlink><a:srgbClr val="0000FF"/></a:hlink><a:folHlink><a:srgbClr val="800080"/></a:folHlink></a:clrScheme><a:fontScheme name="Office"><a:majorFont><a:latin typeface="Cambria"/><a:ea typeface=""/><a:cs typeface=""/><a:font script="Jpan" typeface="ＭＳ Ｐゴシック"/><a:font script="Hang" typeface="맑은 고딕"/><a:font script="Hans" typeface="宋体"/><a:font script="Hant" typeface="新細明體"/><a:font script="Arab" typeface="Times New Roman"/><a:font script="Hebr" typeface="Times New Roman"/><a:font script="Thai" typeface="Tahoma"/><a:font script="Ethi" typeface="Nyala"/><a:font script="Beng" typeface="Vrinda"/><a:font script="Gujr" typeface="Shruti"/><a:font script="Khmr" typeface="MoolBoran"/><a:font script="Knda" typeface="Tunga"/><a:font script="Guru" typeface="Raavi"/><a:font script="Cans" typeface="Euphemia"/><a:font script="Cher" typeface="Plantagenet Cherokee"/><a:font script="Yiii" typeface="Microsoft Yi Baiti"/><a:font script="Tibt" typeface="Microsoft Himalaya"/><a:font script="Thaa" typeface="MV Boli"/><a:font script="Deva" typeface="Mangal"/><a:font script="Telu" typeface="Gautami"/><a:font script="Taml" typeface="Latha"/><a:font script="Syrc" typeface="Estrangelo Edessa"/><a:font script="Orya" typeface="Kalinga"/><a:font script="Mlym" typeface="Kartika"/><a:font script="Laoo" typeface="DokChampa"/><a:font script="Sinh" typeface="Iskoola Pota"/><a:font script="Mong" typeface="Mongolian Baiti"/><a:font script="Viet" typeface="Times New Roman"/><a:font script="Uigh" typeface="Microsoft Uighur"/></a:majorFont><a:minorFont><a:latin typeface="Calibri"/><a:ea typeface=""/><a:cs typeface=""/><a:font script="Jpan" typeface="ＭＳ Ｐゴシック"/><a:font script="Hang" typeface="맑은 고딕"/><a:font script="Hans" typeface="宋体"/><a:font script="Hant" typeface="新細明體"/><a:font script="Arab" typeface="Arial"/><a:font script="Hebr" typeface="Arial"/><a:font script="Thai" typeface="Tahoma"/><a:font script="Ethi" typeface="Nyala"/><a:font script="Beng" typeface="Vrinda"/><a:font script="Gujr" typeface="Shruti"/><a:font script="Khmr" typeface="DaunPenh"/><a:font script="Knda" typeface="Tunga"/><a:font script="Guru" typeface="Raavi"/><a:font script="Cans" typeface="Euphemia"/><a:font script="Cher" typeface="Plantagenet Cherokee"/><a:font script="Yiii" typeface="Microsoft Yi Baiti"/><a:font script="Tibt" typeface="Microsoft Himalaya"/><a:font script="Thaa" typeface="MV Boli"/><a:font script="Deva" typeface="Mangal"/><a:font script="Telu" typeface="Gautami"/><a:font script="Taml" typeface="Latha"/><a:font script="Syrc" typeface="Estrangelo Edessa"/><a:font script="Orya" typeface="Kalinga"/><a:font script="Mlym" typeface="Kartika"/><a:font script="Laoo" typeface="DokChampa"/><a:font script="Sinh" typeface="Iskoola Pota"/><a:font script="Mong" typeface="Mongolian Baiti"/><a:font script="Viet" typeface="Arial"/><a:font script="Uigh" typeface="Microsoft Uighur"/></a:minorFont></a:fontScheme><a:fmtScheme name="Office"><a:fillStyleLst><a:solidFill><a:schemeClr val="phClr"/></a:solidFill><a:gradFill rotWithShape="1"><a:gsLst><a:gs pos="0"><a:schemeClr val="phClr"><a:tint val="50000"/><a:satMod val="300000"/></a:schemeClr></a:gs><a:gs pos="35000"><a:schemeClr val="phClr"><a:tint val="37000"/><a:satMod val="300000"/></a:schemeClr></a:gs><a:gs pos="100000"><a:schemeClr val="phClr"><a:tint val="15000"/><a:satMod val="350000"/></a:schemeClr></a:gs></a:gsLst><a:lin ang="16200000" scaled="1"/></a:gradFill><a:gradFill rotWithShape="1"><a:gsLst><a:gs pos="0"><a:schemeClr val="phClr"><a:shade val="51000"/><a:satMod val="130000"/></a:schemeClr></a:gs><a:gs pos="80000"><a:schemeClr val="phClr"><a:shade val="93000"/><a:satMod val="130000"/></a:schemeClr></a:gs><a:gs pos="100000"><a:schemeClr val="phClr"><a:shade val="94000"/><a:satMod val="135000"/></a:schemeClr></a:gs></a:gsLst><a:lin ang="16200000" scaled="0"/></a:gradFill></a:fillStyleLst><a:lnStyleLst><a:ln w="9525" cap="flat" cmpd="sng" algn="ctr"><a:solidFill><a:schemeClr val="phClr"><a:shade val="95000"/><a:satMod val="105000"/></a:schemeClr></a:solidFill><a:prstDash val="solid"/></a:ln><a:ln w="25400" cap="flat" cmpd="sng" algn="ctr"><a:solidFill><a:schemeClr val="phClr"/></a:solidFill><a:prstDash val="solid"/></a:ln><a:ln w="38100" cap="flat" cmpd="sng" algn="ctr"><a:solidFill><a:schemeClr val="phClr"/></a:solidFill><a:prstDash val="solid"/></a:ln></a:lnStyleLst><a:effectStyleLst><a:effectStyle><a:effectLst><a:outerShdw blurRad="40000" dist="20000" dir="5400000" rotWithShape="0"><a:srgbClr val="000000"><a:alpha val="38000"/></a:srgbClr></a:outerShdw></a:effectLst></a:effectStyle><a:effectStyle><a:effectLst><a:outerShdw blurRad="40000" dist="23000" dir="5400000" rotWithShape="0"><a:srgbClr val="000000"><a:alpha val="35000"/></a:srgbClr></a:outerShdw></a:effectLst></a:effectStyle><a:effectStyle><a:effectLst><a:outerShdw blurRad="40000" dist="23000" dir="5400000" rotWithShape="0"><a:srgbClr val="000000"><a:alpha val="35000"/></a:srgbClr></a:outerShdw></a:effectLst><a:scene3d><a:camera prst="orthographicFront"><a:rot lat="0" lon="0" rev="0"/></a:camera><a:lightRig rig="threePt" dir="t"><a:rot lat="0" lon="0" rev="1200000"/></a:lightRig></a:scene3d><a:sp3d><a:bevelT w="63500" h="25400"/></a:sp3d></a:effectStyle></a:effectStyleLst><a:bgFillStyleLst><a:solidFill><a:schemeClr val="phClr"/></a:solidFill><a:gradFill rotWithShape="1"><a:gsLst><a:gs pos="0"><a:schemeClr val="phClr"><a:tint val="40000"/><a:satMod val="350000"/></a:schemeClr></a:gs><a:gs pos="40000"><a:schemeClr val="phClr"><a:tint val="45000"/><a:shade val="99000"/><a:satMod val="350000"/></a:schemeClr></a:gs><a:gs pos="100000"><a:schemeClr val="phClr"><a:shade val="20000"/><a:satMod val="255000"/></a:schemeClr></a:gs></a:gsLst><a:path path="circle"><a:fillToRect l="50000" t="-80000" r="50000" b="180000"/></a:path></a:gradFill><a:gradFill rotWithShape="1"><a:gsLst><a:gs pos="0"><a:schemeClr val="phClr"><a:tint val="80000"/><a:satMod val="300000"/></a:schemeClr></a:gs><a:gs pos="100000"><a:schemeClr val="phClr"><a:shade val="30000"/><a:satMod val="200000"/></a:schemeClr></a:gs></a:gsLst><a:path path="circle"><a:fillToRect l="50000" t="50000" r="50000" b="50000"/></a:path></a:gradFill></a:bgFillStyleLst></a:fmtScheme></a:themeElements><a:objectDefaults/><a:extraClrSchemeLst/></a:theme>

data/examples/unzipped-sheets/table-test/xl/workbook.xml

@@ -0,0 +1,2 @@
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<workbook xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main" xmlns:r="http://schemas.openxmlformats.org/officeDocument/2006/relationships"><fileVersion appName="xl" lastEdited="4" lowestEdited="4" rupBuild="4505"/><workbookPr defaultThemeVersion="124226"/><bookViews><workbookView xWindow="120" yWindow="45" windowWidth="14175" windowHeight="5325"/></bookViews><sheets><sheet name="Sheet1" sheetId="1" r:id="rId1"/><sheet name="Sheet2" sheetId="2" r:id="rId2"/><sheet name="Sheet3" sheetId="3" r:id="rId3"/></sheets><calcPr calcId="125725"/></workbook>

data/examples/unzipped-sheets/table-test/xl/worksheets/_rels/sheet1.xml.rels

@@ -0,0 +1,2 @@
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<Relationships xmlns="http://schemas.openxmlformats.org/package/2006/relationships"><Relationship Id="rId2" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/table" Target="../tables/table1.xml"/><Relationship Id="rId1" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/printerSettings" Target="../printerSettings/printerSettings1.bin"/></Relationships>

data/examples/unzipped-sheets/table-test/xl/worksheets/sheet1.xml

@@ -0,0 +1,2 @@
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<worksheet xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main" xmlns:r="http://schemas.openxmlformats.org/officeDocument/2006/relationships"><dimension ref="B2:D5"/><sheetViews><sheetView tabSelected="1" workbookViewId="0"><selection activeCell="B15" sqref="B15"/></sheetView></sheetViews><sheetFormatPr defaultRowHeight="12.75"/><cols><col min="2" max="2" width="11.28515625" customWidth="1"/><col min="3" max="3" width="11.85546875" customWidth="1"/><col min="4" max="4" width="11.28515625" customWidth="1"/></cols><sheetData><row r="2" spans="2:4"><c r="B2" t="s"><v>0</v></c><c r="C2" t="s"><v>1</v></c><c r="D2" t="s"><v>2</v></c></row><row r="3" spans="2:4"><c r="B3"><v>1</v></c><c r="C3"><v>2</v></c><c r="D3" s="1"><f>[Column A]+[[Column B ]]</f><v>3</v></c></row><row r="4" spans="2:4"><c r="B4"><v>3</v></c><c r="C4"><v>4</v></c><c r="D4" s="1"><f>[Column A]+[[Column B ]]</f><v>7</v></c></row><row r="5" spans="2:4"><c r="B5"><v>5</v></c><c r="C5"><v>6</v></c><c r="D5" s="1"><f>[Column A]+[[Column B ]]</f><v>11</v></c></row></sheetData><pageMargins left="0.7" right="0.7" top="0.75" bottom="0.75" header="0.3" footer="0.3"/><pageSetup paperSize="9" orientation="portrait" r:id="rId1"/><tableParts count="1"><tablePart r:id="rId2"/></tableParts></worksheet>

data/examples/unzipped-sheets/table-test/xl/worksheets/sheet2.xml

@@ -0,0 +1,2 @@
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<worksheet xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main" xmlns:r="http://schemas.openxmlformats.org/officeDocument/2006/relationships"><dimension ref="A1"/><sheetViews><sheetView workbookViewId="0"><selection activeCell="B5" sqref="B5"/></sheetView></sheetViews><sheetFormatPr defaultRowHeight="12.75"/><sheetData/><pageMargins left="0.7" right="0.7" top="0.75" bottom="0.75" header="0.3" footer="0.3"/></worksheet>

data/examples/unzipped-sheets/table-test/xl/worksheets/sheet3.xml

@@ -0,0 +1,2 @@
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<worksheet xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main" xmlns:r="http://schemas.openxmlformats.org/officeDocument/2006/relationships"><dimension ref="A1"/><sheetViews><sheetView workbookViewId="0"/></sheetViews><sheetFormatPr defaultRowHeight="12.75"/><sheetData/><pageMargins left="0.7" right="0.7" top="0.75" bottom="0.75" header="0.3" footer="0.3"/></worksheet>

data/lib/cells/array/array_formula_builder.rb

@@ -0,0 +1,58 @@
+module RubyFromExcel
+  class ArrayFormulaBuilder < FormulaBuilder
+  
+    def sum_function(*args)
+      "sum(#{args.map {|a| a.visit(self)}.join(',')})"
+    end
+  
+    def sumif_function(check_range,criteria,sum_range = nil)
+      if sum_range
+        "m(#{criteria.visit(self)}) { |r1| sumif(#{check_range.visit(self)},r1,#{sum_range.visit(self)}) }"
+      else
+        "m(#{criteria.visit(self)}) { |r1| sumif(#{check_range.visit(self)},r1) }"
+      end
+    end
+  
+    def sumifs_function(sum_range,*args)
+      checks = Hash[*args]
+      "m(#{checks.values.map {|a| a.visit(self) }.join(',')}) { |#{checks.values.map.with_index {|a,i| "r#{i+1}"}.join(',')}| sumifs(#{sum_range.visit(self)},#{checks.map.with_index { |a,i| "#{a.first.visit(self)},r#{i+1}" }.join(',')}) }"
+    end
+  
+    def standard_function(name_to_use_in_ruby,args)
+      arg_names = (1..(args.size)).map { |i| "r#{i}" }
+      "m(#{args.map {|a| a.visit(self) }.join(',')}) { |#{arg_names.join(',')}| #{name_to_use_in_ruby}(#{arg_names.join(',')}) }"
+    end
+  
+    def index_function(index_range,*args)
+      arg_names = (1..(args.size)).map { |i| "r#{i}" }
+      "m(#{args.map {|a| a.visit(self) }.join(',')}) { |#{arg_names.join(',')}| index(#{index_range.visit(self)},#{arg_names.join(',')}) }"
+    end
+  
+    def match_function(lookup_value,lookup_array,match_type = nil)
+      if match_type
+        "m(#{lookup_value.visit(self)},#{match_type.visit(self)}) { |r1,r2| match(r1,#{lookup_array.visit(self)},r2) }"
+      else
+        "m(#{lookup_value.visit(self)}) { |r1| match(r1,#{lookup_array.visit(self)}) }"
+      end
+    end
+  
+    def comparison(left,comparison,right)
+      "m(#{left.visit(self)},#{right.visit(self)}) { |r1,r2| r1#{comparison.visit(self)}r2 }"
+    end
+
+    def arithmetic(*strings)
+      matrix_strings = []
+      matrix_string_references = []
+      strings = strings.map do |s|
+        if s.type == :operator
+          s.visit(self)
+        else
+          matrix_strings << s.visit(self)
+          matrix_string_references << "r#{matrix_string_references.size+1}"
+          matrix_string_references.last
+        end
+      end
+      "m(#{matrix_strings.join(',')}) { |#{matrix_string_references.join(',')}| #{strings.join} }"
+    end
+  end
+end

data/lib/cells/array/array_formula_cell.rb

@@ -0,0 +1,27 @@
+module RubyFromExcel
+  class ArrayFormulaCell < FormulaCell
+  
+    def ArrayFormulaCell.from_other_cell(cell)
+      afc = ArrayFormulaCell.new(cell.worksheet)
+      afc.reference = cell.reference
+      afc.xml_value = cell.xml_value
+      afc.xml_type =  cell.xml_type
+      afc
+    end
+  
+    attr_accessor :array_formula_reference
+    attr_accessor :array_formula_offset
+  
+    def parse_xml(xml)
+      # No
+    end
+  
+    def work_out_dependencies
+      # No
+    end
+  
+    def ruby_value
+      "@#{reference.to_ruby} ||= #{array_formula_reference}.array_formula_offset(#{array_formula_offset.join(',')})"
+    end
+  end
+end

data/lib/cells/array/arraying_formula_cell.rb

@@ -0,0 +1,67 @@
+require_relative 'array_formula_builder'
+
+module RubyFromExcel
+  class ArrayingFormulaCell < FormulaCell
+  
+    attr_accessor :array_range
+    attr_accessor :array_formula_reference
+    attr_accessor :array_formula_offset
+
+    def parse_xml(xml)
+      super
+      self.array_range = Area.new(worksheet,*xml.at_css("f")['ref'].split(':'))
+    end
+
+    def alter_other_cells_if_required
+     self.array_formula_offset = [0,0]
+     self.array_formula_reference = reference.to_ruby + "_array"
+     array_formula_from_this_cell_onto_range
+    end
+  
+    def array_formula_from_this_cell_onto_range
+      each_array_formula do |array_formula_reference,value_cell|
+        array_cell = ArrayFormulaCell.from_other_cell(value_cell)
+        array_formula_onto_cell array_cell
+        worksheet.replace_cell(array_formula_reference,array_cell)
+      end
+    end
+  
+    def array_formula_onto_cell(cell)
+      cell.array_formula_reference = self.array_formula_reference
+      cell.array_formula_offset = offset_from(cell)
+    end
+  
+    def offset_from(cell)
+      cell.reference - self.reference
+    end
+  
+    def work_out_dependencies
+      super
+      each_array_formula do |array_formula_reference,array_cell|
+        next unless array_cell
+        array_cell.dependencies = self.dependencies
+      end
+    end
+  
+    def each_array_formula
+      array_range.to_reference_enum.each do |array_formula_reference|
+        next if array_formula_reference == reference.to_s
+        yield array_formula_reference, worksheet.cell(array_formula_reference)
+      end
+    end
+  
+    def to_ruby(r = RubyScriptWriter.new)
+      r.put_simple_method array_formula_reference, "@#{array_formula_reference} ||= #{ruby_array_value}"
+      r.put_simple_method reference.to_ruby, ruby_value
+      r.to_s
+    end
+  
+    def ruby_value
+      "@#{reference.to_ruby} ||= #{array_formula_reference}.array_formula_offset(#{array_formula_offset.join(',')})"
+    end
+  
+    def ruby_array_value
+      ast.visit(ArrayFormulaBuilder.new(self))
+    end
+  end
+end

data/lib/cells/array/single_cell_array_formula_builder.rb

@@ -0,0 +1,9 @@
+module RubyFromExcel
+  class SingleCellArrayFormulaBuilder < ArrayFormulaBuilder
+  
+    def formula(*expressions)
+      expressions.map { |e| e.visit(self) }.join
+    end
+    
+  end
+end

data/lib/cells/array/single_cell_array_formula_cell.rb

@@ -0,0 +1,11 @@
+require_relative 'single_cell_array_formula_builder'
+
+module RubyFromExcel
+  class SingleCellArrayFormulaCell < FormulaCell
+    
+    def ruby_value
+      "@#{reference.to_ruby} ||= #{ast.visit(SingleCellArrayFormulaBuilder.new(self))}"
+    end
+  
+  end
+end

data/lib/cells/cell.rb

@@ -0,0 +1,98 @@
+module RubyFromExcel
+  class Cell
+  
+    attr_accessor :worksheet, :reference, :dependencies, :xml_value, :xml_type
+  
+    def initialize(worksheet,xml = nil)
+      self.worksheet = worksheet
+      parse_xml xml
+    end
+  
+    def parse_xml(xml)
+      return nil unless xml
+      self.reference = Reference.new(xml['r'],worksheet)
+      self.xml_value = xml.at_css("v").content
+      self.xml_type = xml['t']
+    end
+  
+    def alter_other_cells_if_required
+      # nil
+    end
+  
+    def work_out_dependencies
+      self.dependencies = []
+    end
+  
+    def to_ruby(r = RubyScriptWriter.new)
+      r.put_simple_method reference.to_ruby, ruby_value
+      r.to_s
+    end
+
+    def to_test(r = RubySpecWriter.new)
+      r.put_spec "cell #{reference.to_ruby} should equal #{value}" do
+        r.puts "#{worksheet}.#{reference.to_ruby}.should #{test}"
+      end
+      r.to_s
+    end
+  
+    def test
+      return "== #{value}" if xml_type
+      "be_close(#{value.to_f},#{tolerance_for(value.to_f)})"
+    end
+  
+    def tolerance_for(value,tolerance = 0.1, maximum = 1e-8)
+      tolerance = value.abs * tolerance
+      tolerance = maximum if tolerance < maximum
+      tolerance
+    end
+  
+    def can_be_replaced_with_value?
+      false
+    end
+  
+    def value
+      value = xml_value
+      case xml_type
+      when 'str'
+        return value.inspect
+      when 's'
+        return SharedStrings.shared_string_for(value.to_i).inspect
+      when 'e'
+        return ":#{value.gsub(/[^a-zA-Z]/,'').downcase}"
+      when 'b'
+        return 'true' if value == '1'
+        return 'false' if value == '0'
+        return Formula.parse(value).visit(FormulaBuilder.new)
+      else
+        return Formula.parse(value).visit(FormulaBuilder.new)
+      end
+    end
+  
+    def value_for_including
+      value = xml_value
+      case xml_type
+      when 'str'
+        return value
+      when 's'
+        return SharedStrings.shared_string_for(value.to_i)
+      when 'e'
+        return ":#{value.gsub(/[^a-zA-Z]/,'').downcase}"
+      when 'b'
+        return 'true' if value == '1'
+        return 'false' if value == '0'
+        return Formula.parse(value).visit(FormulaBuilder.new)
+      else
+        return Formula.parse(value).visit(FormulaBuilder.new)
+      end    
+    end
+  
+    def to_s
+      "#{worksheet}.#{reference}"
+    end
+  
+    def inspect
+      "(cell: #{to_s} with formula:#{respond_to?(:ast) ? ast.inspect : "na"} and value '#{value}' of type '#{xml_type}')"
+    end
+  
+  end
+end

data/lib/cells/cells.rb

@@ -0,0 +1,9 @@
+require_relative 'cell'
+require_relative 'value/value_cell'
+require_relative 'formula/formula_cell'
+require_relative 'formula/simple_formula_cell'
+require_relative 'shared/sharing_formula_cell'
+require_relative 'shared/shared_formula_cell'
+require_relative 'array/arraying_formula_cell'
+require_relative 'array/array_formula_cell'
+require_relative 'array/single_cell_array_formula_cell'

data/lib/cells/formula/formula_cell.rb

@@ -0,0 +1,18 @@
+module RubyFromExcel
+  class FormulaCell < Cell
+    attr_accessor :ast
+  
+    def parse_xml(xml)
+      super
+      self.ast = Formula.parse(xml.at_css("f").content)
+    end
+  
+    def work_out_dependencies
+      self.dependencies ||= ast.visit(DependencyBuilder.new(self))
+    end
+    
+    def ruby_value
+      "@#{reference.to_ruby} ||= #{ast.visit(FormulaBuilder.new(self))}"
+    end
+  end
+end

data/lib/cells/formula/simple_formula_cell.rb

@@ -0,0 +1,4 @@
+module RubyFromExcel
+  class SimpleFormulaCell < FormulaCell
+  end
+end

data/lib/cells/shared/shared_formula_builder.rb

@@ -0,0 +1,15 @@
+module RubyFromExcel
+  class SharedFormulaBuilder < FormulaBuilder
+    attr_accessor :shared_formula_offset
+  
+    def initialize(formula_cell = nil, shared_formula_offset = nil)
+      super formula_cell
+      self.shared_formula_offset = shared_formula_offset
+    end
+  
+    def cell(reference)
+      Reference.new(reference).shift!(shared_formula_offset).to_ruby
+    end
+  
+  end
+end

data/lib/cells/shared/shared_formula_cell.rb

@@ -0,0 +1,20 @@
+require_relative 'shared_formula_builder'
+
+module RubyFromExcel
+  class SharedFormulaCell < FormulaCell
+    attr_accessor :shared_formula
+    attr_accessor :shared_formula_offset
+    
+    def parse_formula
+      # No
+    end
+  
+    def work_out_dependencies
+      self.dependencies ||= shared_formula.visit(SharedFormulaDependencyBuilder.new(self,shared_formula_offset))
+    end
+  
+    def ruby_value
+      "@#{reference.to_ruby} ||= #{shared_formula.visit(SharedFormulaBuilder.new(self, shared_formula_offset))}"
+    end
+  end
+end

data/lib/cells/shared/sharing_formula_cell.rb

@@ -0,0 +1,36 @@
+module RubyFromExcel
+  class SharingFormulaCell < FormulaCell
+  
+    attr_accessor :sharing_range
+  
+    def parse_xml(xml)
+      super
+      sharing_range = xml.at_css("f")['ref']
+      sharing_range = "#{sharing_range}:#{sharing_range}" unless sharing_range =~ /:/
+      self.sharing_range = Area.new(worksheet,*sharing_range.split(':'))
+    end
+  
+    def alter_other_cells_if_required
+      share_formula
+    end
+  
+    def share_formula
+      sharing_range.to_reference_enum.each do |shared_formula_reference|
+        next if shared_formula_reference == reference.to_s
+        share_formula_with_cell  worksheet.cell(shared_formula_reference)
+      end
+    end
+  
+    def share_formula_with_cell(cell)
+      return unless cell
+      return unless cell.is_a?(SharedFormulaCell)
+      cell.shared_formula = self.ast
+      cell.shared_formula_offset = offset_from(cell)
+    end
+  
+    def offset_from(cell)
+      cell.reference - self.reference
+    end
+
+  end
+end

data/lib/cells/value/value_cell.rb

@@ -0,0 +1,24 @@
+module RubyFromExcel
+  class ValueCell < Cell
+  
+    def self.for(other_cell)
+      vc = ValueCell.new(other_cell.worksheet)
+      vc.reference = other_cell.reference
+      vc.xml_value = other_cell.xml_value
+      vc.xml_type = other_cell.xml_type
+      vc
+    end
+  
+    def ruby_value
+      value
+    end
+  
+    def can_be_replaced_with_value?
+      true
+    end
+  
+    def to_test( r = RubySpecWriter.new)
+      nil # i.e., don't bother with tests for simple_values
+    end  
+  end
+end

data/lib/excelfile/excelfile.rb

@@ -0,0 +1,6 @@
+require_relative 'table'
+require_relative 'shared_strings'
+require_relative 'sheet_names'
+require_relative 'relationships'
+require_relative 'worksheet'
+require_relative 'workbook'

data/lib/excelfile/relationships.rb

@@ -0,0 +1,24 @@
+module RubyFromExcel
+  class Relationships < Hash
+  
+    attr_reader :shared_strings
+  
+    def self.for_file(filename)
+      root_directory = File.dirname(filename)
+      relationships_xml_file = File.join(root_directory,'_rels',"#{File.basename(filename)}.rels")
+      return Relationships.new unless File.exist?(relationships_xml_file)
+      xml = File.open(relationships_xml_file) { |f| Nokogiri::XML(f) }
+      Relationships.new(xml,root_directory)
+    end
+  
+    def initialize(xml = nil, root_directory = nil)
+      return unless xml
+      xml.css("Relationship").each do |relationship|
+        filename = root_directory ? File.expand_path(File.join(root_directory,relationship['Target'])) : relationship['Target']
+        self[relationship['Id']] = filename
+        @shared_strings = filename if relationship['Type'] == "http://schemas.openxmlformats.org/officeDocument/2006/relationships/sharedStrings"
+      end
+    end
+  
+  end
+end

data/lib/excelfile/shared_strings.rb

@@ -0,0 +1,21 @@
+# FIXME: This is obviously bad programming. What if we multithread?!
+module RubyFromExcel
+  class SharedStrings < Array
+    include Singleton
+  
+    def self.shared_string_for(index)
+      self.instance.shared_string_for(index)
+    end
+  
+    def load_strings_from_xml(xml)
+      xml.css("si").each do |si|
+        push si.css("t").map(&:content).join
+      end
+    end
+  
+    def shared_string_for(index)
+      at(index.to_i)
+    end
+  
+  end
+end

data/lib/excelfile/sheet_names.rb

@@ -0,0 +1,6 @@
+# FIXME: This is obviously bad programming. What if we multithread?!
+module RubyFromExcel
+  class SheetNames < Hash
+    include Singleton
+  end
+end

data/lib/excelfile/table.rb

@@ -0,0 +1,116 @@
+module RubyFromExcel
+  
+  class TableNotFoundException < Exception
+  end
+
+  class Table
+  
+    def self.reference_for(table_name,structured_reference,cell_making_the_reference = nil)
+      return ":ref" unless tables.include?(table_name)
+      tables[table_name].reference_for(structured_reference,cell_making_the_reference)
+    end
+  
+    def self.reference_for_local_reference(cell,structured_reference)
+      table = tables.find { |n,t| t.include?(cell) }
+      return ":ref" unless table
+      table.last.reference_for(structured_reference,cell.reference)
+    end
+  
+    def self.tables
+      @@tables ||= {}
+    end
+  
+    def self.add(table)
+      tables[table.name] = table
+    end
+
+    attr_reader :worksheet, :name, :reference, :column_name_array, :number_of_total_rows, :all, :data, :headers, :totals, :column_names  
+  
+    def self.from_xml(worksheet,xml)
+      Table.new(worksheet,xml['name'],xml['ref'],xml.css('tableColumn').map {|c| c['name']}.to_a,xml['totalsRowCount'])
+    end
+  
+    def initialize(worksheet,name,reference,column_name_array,number_of_total_rows)
+      @worksheet = worksheet
+      @name = name
+      @reference = reference
+      @column_name_array = column_name_array
+      @number_of_total_rows = number_of_total_rows
+      @all = Area.new(worksheet,*reference.split(':'))
+      index_of_first_total_row = -number_of_total_rows.to_i
+      @data = @all.rows(1,index_of_first_total_row - 1)
+      @headers = @all.row(0)
+      @totals = @all.rows(index_of_first_total_row,-1)
+      @column_names = {}
+      column_name_array.each_with_index do |name,index|
+        @column_names[name.strip] = index # column['id'].to_i
+      end
+      Table.add(self)
+    end
+  
+    def column(name)
+      name = $1 if name.to_s =~ /^(\d+)\.0+$/
+      return :na unless column = column_names[name]
+      data.column(column)
+    end
+  
+    def reference_for(structured_reference,cell_making_the_reference = nil)
+      structured_reference.strip!
+      return this_row(cell_making_the_reference) if structured_reference == '#This Row'
+      if structured_reference =~ /\[(.*?)\],\[(.*?)\]/
+        return this_row_intersection(cell_making_the_reference,area_for_simple_reference($2)) if $1 == '#This Row'
+        return all.column(column_names[$2]) if $1 == '#All'
+        return intersection(area_for_simple_reference($1),area_for_simple_reference($2))
+      end
+      if cell_making_the_reference
+        if cell_making_the_reference.worksheet == self.worksheet
+          if data.include?(cell_making_the_reference)
+            case structured_reference
+            when /#totals/i, /#headers/i
+              return this_column_intersection(cell_making_the_reference,area_for_simple_reference(structured_reference))
+            when /^#/i
+              return area_for_simple_reference(structured_reference) 
+            else
+              return this_row_intersection(cell_making_the_reference,area_for_simple_reference(structured_reference))
+            end
+          end
+        end
+      end
+      return area_for_simple_reference(structured_reference) 
+    end
+  
+    def inspect
+      %Q{'Table.new(#{worksheet},#{name.inspect},#{reference.inspect},#{column_name_array.inspect},#{number_of_total_rows})'}
+    end  
+  
+    def include?(cell)
+      @all.include_cell?(cell)
+    end
+  
+    private
+  
+    def this_row(cell_making_the_reference)
+      data.row(cell_making_the_reference.row_number - data.start_cell.row_number)
+    end
+  
+    def this_row_intersection(cell_making_the_reference,column_area)
+      "#{worksheet}.#{Reference.ruby_for(column_area.start_cell.column_number,cell_making_the_reference.row_number)}"
+    end
+  
+    def this_column_intersection(cell_making_the_reference,row_area)
+  "#{worksheet}.#{Reference.ruby_for(cell_making_the_reference.column_number,row_area.start_cell.row_number)}"
+    end
+  
+    def intersection(row_area,colum_area)
+      row_area, colum_area = colum_area, row_area unless row_area.single_row?
+      "#{worksheet}.#{Reference.ruby_for(colum_area.start_cell.column_number,row_area.start_cell.row_number)}"
+    end
+  
+    def area_for_simple_reference(structured_reference)
+      structured_reference.strip!
+      return self.send(structured_reference.downcase[1..-1]) if structured_reference.start_with?('#')
+      column(structured_reference)
+    end
+  
+  end
+end