axlsx 1.0.0

data/test/doc_props/tc_app.rb~

@@ -0,0 +1,19 @@
+require 'test/unit'
+require 'axlsx.rb'
+
+class TestApp < Test::Unit::TestCase
+  def setup    
+  end
+  def teardown
+  end
+  
+  def test_valid_document
+    schema = Nokogiri::XML::Schema(File.open(Axlsx::APP_XSD))
+    doc = Nokogiri::XML(Axlsx::App.new.to_xml)
+    errors = []
+    schema.validate(doc).each do |error|
+      errors << error
+    end
+    assert_equal(errors.size, 0, "app.xml invalid" + errors.map{ |e| e.message }.to_s)
+  end
+end

data/test/doc_props/tc_core.rb

@@ -0,0 +1,34 @@
+require 'test/unit'
+require 'axlsx.rb'
+
+class TestCore < Test::Unit::TestCase
+  
+  def setup    
+    @core = Axlsx::Core.new
+    @doc = Nokogiri::XML(@core.to_xml)
+  end
+
+  def test_valid_document
+    schema = Nokogiri::XML::Schema(File.open(Axlsx::CORE_XSD))
+    errors = []
+    schema.validate(@doc).each do |error|
+      puts error.message
+      errors << error
+    end
+    assert_equal(errors.size, 0, "core.xml Invalid" + errors.map{ |e| e.message }.to_s)
+  end
+
+  def test_populates_created
+    assert_equal(@doc.xpath('//dcterms:created').text, Time.now.strftime('%Y-%m-%dT%H:%M:%S'), "dcterms:created incorrect")
+  end
+ 
+  def test_populates_default_name
+    assert_equal(@doc.xpath('//dc:creator').text, "axlsx", "Default name not populated")
+  end
+
+  def test_creator_as_option
+    c = Axlsx::Core.new :creator => "some guy"
+    doc = Nokogiri::XML(c.to_xml)
+    assert(doc.xpath('//dc:creator').text == "some guy")
+  end
+end

data/test/drawing/tc_axis.rb

@@ -0,0 +1,39 @@
+require 'test/unit'
+require 'axlsx.rb'
+
+class TestAxis < Test::Unit::TestCase
+  def setup    
+    @axis = Axlsx::Axis.new 12345, 54321
+  end
+  def teardown
+  end
+
+  def test_initialization
+    assert_equal(@axis.axPos, :l, "axis position default incorrect")
+    assert_equal(@axis.tickLblPos, :nextTo, "tick label position default incorrect")
+    assert_equal(@axis.tickLblPos, :nextTo, "tick label position default incorrect")
+    assert_equal(@axis.crosses, :autoZero, "tick label position default incorrect")
+    assert(@axis.scaling.is_a?(Axlsx::Scaling) && @axis.scaling.orientation == :minMax, "scaling default incorrect")
+  end
+
+  def test_axis_position
+    assert_raise(ArgumentError, "requires valid axis position") { @axis.axPos = :nowhere }
+    assert_nothing_raised("accepts valid axis position") { @axis.axPos = :r }
+  end
+
+  def test_tick_label_position
+    assert_raise(ArgumentError, "requires valid tick label position") { @axis.tickLblPos = :nowhere }
+    assert_nothing_raised("accepts valid tick label position") { @axis.tickLblPos = :high }
+  end
+
+  def test_format_code
+    assert_raise(ArgumentError, "requires valid format code") { @axis.format_code = 1 }
+    assert_nothing_raised("accepts valid format code") { @axis.tickLblPos = :high }
+  end
+
+  def test_crosses
+    assert_raise(ArgumentError, "requires valid crosses") { @axis.crosses = 1 }
+    assert_nothing_raised("accepts valid crosses") { @axis.crosses = :min }
+  end
+
+end

data/test/drawing/tc_bar_3D_chart.rb

@@ -0,0 +1,66 @@
+require 'test/unit'
+require 'axlsx.rb'
+
+class TestBar3DChart < Test::Unit::TestCase
+
+  def setup
+    @p = Axlsx::Package.new
+    ws = @p.workbook.add_worksheet
+    @row = ws.add_row :values=>["one", 1, Time.now]
+    @chart = ws.add_chart Axlsx::Bar3DChart, :title => "fishery"
+  end
+
+  def teardown
+  end
+
+  def test_initialization    
+    assert_equal(@chart.grouping, :clustered, "grouping defualt incorrect")
+    assert_equal(@chart.series_type, Axlsx::BarSeries, "series type incorrect")
+    assert_equal(@chart.barDir, :bar, " bar direction incorrect")
+    assert(@chart.catAxis.is_a?(Axlsx::CatAxis), "category axis not created")
+    assert(@chart.valAxis.is_a?(Axlsx::ValAxis), "value access not created")
+  end
+
+  def test_bar_direction
+    assert_raise(ArgumentError, "require valid bar direction") { @chart.barDir = :left }
+    assert_nothing_raised("allow valid bar direction") { @chart.barDir = :col }
+    assert(@chart.barDir == :col)
+  end
+
+ def test_grouping
+   assert_raise(ArgumentError, "require valid grouping") { @chart.grouping = :inverted }
+   assert_nothing_raised("allow valid grouping") { @chart.grouping = :standard }
+   assert(@chart.grouping == :standard)
+ end
+
+
+ def test_gapWidth
+   assert_raise(ArgumentError, "require valid gap width") { @chart.gapWidth = 200 }
+   assert_nothing_raised("allow valid gapWidth") { @chart.gapWidth = "200%" }
+   assert(@chart.gapWidth == "200%")
+ end
+
+ def test_gapDepth
+   assert_raise(ArgumentError, "require valid gapDepth") { @chart.gapDepth = 200 }
+   assert_nothing_raised("allow valid gapDepth") { @chart.gapDepth = "200%" }
+   assert(@chart.gapDepth == "200%")
+ end
+
+  def test_shape
+    assert_raise(ArgumentError, "require valid shape") { @chart.shape = :star }
+    assert_nothing_raised("allow valid shape") { @chart.shape = :cone }
+    assert(@chart.shape == :cone)
+  end
+
+  def test_to_xml
+    schema = Nokogiri::XML::Schema(File.open(Axlsx::DRAWING_XSD))
+    doc = Nokogiri::XML(@chart.to_xml)
+    errors = []
+    schema.validate(doc).each do |error|
+      errors.push error
+      puts error.message
+    end
+    assert(errors.empty?, "error free validation")
+  end  
+  
+end

data/test/drawing/tc_bar_3D_chart.rb~

@@ -0,0 +1,4 @@
+require 'test/unit'
+require 'axlsx.rb'
+
+class TestBar3DChart < Test::Unit::TestCase

data/test/drawing/tc_bar_series.rb

@@ -0,0 +1,34 @@
+require 'test/unit'
+require 'axlsx.rb'
+
+class TestBarSeries < Test::Unit::TestCase
+
+  def setup
+    p = Axlsx::Package.new
+    @ws = p.workbook.add_worksheet :name=>"hmmm"
+    chart = @ws.drawing.add_chart Axlsx::Bar3DChart, :title => "fishery"
+    @series = chart.add_series :data=>[0,1,2], :labels=>["zero", "one", "two"], :title=>"bob"
+  end
+  
+  def test_initialize
+    assert_equal(@series.title, "bob", "series title has been applied")
+    assert_equal(@series.data, [0,1,2], "data option applied")
+    assert_equal(@series.labels, ["zero", "one","two"], "labels option applied")    
+    assert_equal(@series.shape, :box, "series shape has been applied")   
+  end
+
+  def test_data
+    assert_equal(@series.data, [0,1,2])
+  end
+
+  def test_labels
+    assert_equal(@series.labels, ["zero", "one", "two"])
+  end
+
+  def test_shape
+    assert_raise(ArgumentError, "require valid shape") { @series.shape = :teardropt }
+    assert_nothing_raised("allow valid shape") { @series.shape = :cone }
+    assert(@series.shape == :cone)
+  end
+
+end

data/test/drawing/tc_bar_series.rb~

@@ -0,0 +1,31 @@
+require 'test/unit'
+require 'axlsx.rb'
+
+class TestSeries < Test::Unit::TestCase
+
+  def setup
+    p = Axlsx::Package.new
+    @ws = p.workbook.add_worksheet :name=>"hmmm"
+    chart = @ws.drawing.add_chart Axlsx::Bar3DChart, :title => "fishery"
+    @series = chart.add_series :data=>[0,1,2], :labels=>["zero", "one", "two"], :title=>"bob"
+  end
+  
+  def test_initialize
+    assert_equal(@series.title, "bob", "series title has been applied")
+    assert_equal(@series.data, [0,1,2], "data option applied")
+    assert_equal(@series.labels, ["zero", "one","two"], "labels option applied")    
+  end
+
+  def test_range
+    labels = @ws.add_row :values=>["one", "two", "three"]
+    data = @ws.add_row :values=>[1,2,3]
+    s = @series.chart.add_series :data=>data.cells, :labels=>labels.cells
+    assert_equal(s.send(:range, s.data), "#{@ws.name}!$A$2:$C$2", "range is created created from cells")
+    assert_equal(s.send(:range, s.labels), "#{@ws.name}!$A$1:$C$1", "range is created from cells")
+    assert_equal(@series.send(:range, @series.data), "", "no range if the data is a simple array")
+  end
+  
+  def test_index
+    assert_equal(@series.index, @series.chart.series.index(@series))
+  end
+end

data/test/drawing/tc_cat_axis.rb

@@ -0,0 +1,32 @@
+require 'test/unit'
+require 'axlsx.rb'
+
+class TestCatAxis < Test::Unit::TestCase
+  def setup    
+    @axis = Axlsx::CatAxis.new 12345, 54321
+  end
+  def teardown
+  end
+
+  def test_initialization
+    assert_equal(@axis.auto, true, "axis auto default incorrect")
+    assert_equal(@axis.lblAlgn, :ctr, "label align default incorrect")
+    assert_equal(@axis.lblOffset, "100%", "label offset default incorrect")
+  end
+
+  def test_auto
+    assert_raise(ArgumentError, "requires valid auto") { @axis.auto = :nowhere }
+    assert_nothing_raised("accepts valid auto") { @axis.auto = false }
+  end
+
+  def test_lblAlgn
+    assert_raise(ArgumentError, "requires valid label alignment") { @axis.lblAlgn = :nowhere }
+    assert_nothing_raised("accepts valid label alignment") { @axis.lblAlgn = :r }
+  end
+
+  def test_lblOffset
+    assert_raise(ArgumentError, "requires valid label offset") { @axis.lblOffset = 100 }
+    assert_nothing_raised("accepts valid label offset") { @axis.lblOffset = "20%" }
+  end
+
+end

data/test/drawing/tc_cat_axis.rb~

@@ -0,0 +1,39 @@
+require 'test/unit'
+require 'axlsx.rb'
+
+class TestAxis < Test::Unit::TestCase
+  def setup    
+    @axis = Axlsx::Axis.new 12345, 54321
+  end
+  def teardown
+  end
+
+  def test_initialization
+    assert_equal(@axis.axPos, :l, "axis position default incorrect")
+    assert_equal(@axis.tickLblPos, :nextTo, "tick label position default incorrect")
+    assert_equal(@axis.tickLblPos, :nextTo, "tick label position default incorrect")
+    assert_equal(@axis.crosses, :autoZero, "tick label position default incorrect")
+    assert(@axis.scaling.is_a?(Axlsx::Scaling) && @axis.scaling.orientation == :minMax, "scaling default incorrect")
+  end
+
+  def test_axis_position
+    assert_raise(ArgumentError, "requires valid axis position") { @axis.axPos = :nowhere }
+    assert_nothing_raised("accepts valid axis position") { @axis.axPos = :r }
+  end
+
+  def test_tick_label_position
+    assert_raise(ArgumentError, "requires valid tick label position") { @axis.tickLblPos = :nowhere }
+    assert_nothing_raised("accepts valid tick label position") { @axis.tickLblPos = :high }
+  end
+
+  def test_format_code
+    assert_raise(ArgumentError, "requires valid format code") { @axis.format_code = 1 }
+    assert_nothing_raised("accepts valid format code") { @axis.tickLblPos = :high }
+  end
+
+  def test_crosses
+    assert_raise(ArgumentError, "requires valid crosses") { @axis.crosses = 1 }
+    assert_nothing_raised("accepts valid crosses") { @axis.crosses = :min }
+  end
+
+end

data/test/drawing/tc_chart.rb

@@ -0,0 +1,59 @@
+require 'test/unit'
+require 'axlsx.rb'
+
+class TestChart < Test::Unit::TestCase
+
+  def setup
+    @p = Axlsx::Package.new
+    ws = @p.workbook.add_worksheet
+    @row = ws.add_row :values=>["one", 1, Time.now]
+    @chart = ws.add_chart Axlsx::Bar3DChart, :title => "fishery"
+  end
+
+  def teardown
+  end
+
+  def test_initialization
+    assert_equal(@p.workbook.charts.last,@chart, "the chart is in the workbook")
+    assert_equal(@chart.title.text, "fishery", "the title option has been applied")
+    assert((@chart.series.is_a?(Axlsx::SimpleTypedList) && @chart.series.empty?), "The series is initialized and empty") 
+  end
+
+  def test_title
+    @chart.title.text = 'wowzer'
+    assert_equal(@chart.title.text, "wowzer", "the title text via a string")
+    assert_equal(@chart.title.cell, nil, "the title cell is nil as we set the title with text.")
+    @chart.title.cell = @row.cells.first
+    assert_equal(@chart.title.text, "one", "the title text was set via cell reference")
+    assert_equal(@chart.title.cell, @row.cells.first)
+  end
+
+
+  def test_add_series    
+    s = @chart.add_series :data=>[0,1,2,3], :labels => ["one", 1, "anything"], :title=>"bob"
+    assert_equal(@chart.series.last, s, "series has been added to chart series collection")
+    assert_equal(s.title, "bob", "series title has been applied")
+    assert_equal(s.data, [0,1,2,3], "data option applied")
+    assert_equal(s.labels, ["one",1,"anything"], "labels option applied")    
+  end  
+  
+  def test_create_range
+    
+  end
+
+  def test_pn
+    assert_equal(@chart.pn, "charts/chart1.xml")
+  end
+ 
+  def test_to_xml
+    schema = Nokogiri::XML::Schema(File.open(Axlsx::DRAWING_XSD))
+    doc = Nokogiri::XML(@chart.to_xml)
+    errors = []
+    schema.validate(doc).each do |error|
+      errors.push error
+      puts error.message
+    end
+    assert(errors.empty?, "error free validation")
+  end  
+  
+end

data/test/drawing/tc_chart.rb~

@@ -0,0 +1,58 @@
+require 'test/unit'
+require 'axlsx.rb'
+
+class TestChart < Test::Unit::TestCase
+
+  def setup
+    @p = Axlsx::Package.new
+    ws = @p.workbook.add_worksheet
+    @row = ws.add_row :values=>["one", 1, Time.now]
+    @chart = ws.add_chart Axlsx::Bar3DChart, :title => "fishery"
+  end
+
+  def teardown
+  end
+
+  def test_initialization
+    assert_equal(@p.workbook.charts.last,@chart, "the chart is in the workbook")
+    assert_equal(@chart.title.text, "fishery", "the title option has been applied")
+    assert((@chart.series.is_a?(Axlsx::SimpleTypedList) && @chart.series.empty?), "The series is initialized and empty") 
+  end
+
+  def test_title
+    @chart.title.text = 'wowzer'
+    assert_equal(@chart.title.text, "wowzer", "the title text via a string")
+    assert_equal(@chart.title.cell, nil, "the title cell is nil as we set the title with text.")
+    @chart.title.cell = @row.cells.first
+    assert_equal(@chart.title.text, "one", "the title text was set via cell reference")
+    assert_equal(@chart.title.cell, @row.cells.first)
+  end
+
+  def test_add_series    
+    s = @chart.add_series :data=>[0,1,2,3], :labels => ["one", 1, "anything"], :title=>"bob"
+    assert_equal(@chart.series.last, s, "series has been added to chart series collection")
+    assert_equal(s.title, "bob", "series title has been applied")
+    assert_equal(s.data, [0,1,2,3], "data option applied")
+    assert_equal(s.labels, ["one",1,"anything"], "labels option applied")    
+  end  
+  
+  def test_create_range
+    
+  end
+
+  def test_pn
+    assert_equal(@chart.pn, "charts/chart1.xml")
+  end
+ 
+  def test_to_xml
+    schema = Nokogiri::XML::Schema(File.open(Axlsx::DRAWING_XSD))
+    doc = Nokogiri::XML(@chart.to_xml)
+    errors = []
+    schema.validate(doc).each do |error|
+      errors.push error
+      puts error.message
+    end
+    assert(errors.empty?, "error free validation")
+  end  
+  
+end

data/test/drawing/tc_drawing.rb

@@ -0,0 +1,71 @@
+require 'test/unit'
+require 'axlsx.rb'
+
+class TestDrawing < Test::Unit::TestCase
+  def setup    
+    p = Axlsx::Package.new
+    @ws = p.workbook.add_worksheet
+
+  end
+
+  def test_initialization
+    assert(@ws.workbook.drawings.empty?)
+    assert_equal(@ws.drawing, @ws.workbook.drawings.last, "drawing is added to workbook")
+    assert(@ws.drawing.anchors.is_a?(Axlsx::SimpleTypedList) && @ws.drawing.anchors.empty?, "anchor list is created and empty")
+  end
+
+  def test_add_chart
+    chart = @ws.add_chart(Axlsx::Pie3DChart, :title=>"bob", :start_at=>[0,0], :end_at=>[1,1])
+    assert(chart.is_a?(Axlsx::Pie3DChart), "must create a chart")
+    assert_equal(@ws.workbook.charts.last, chart, "must be added to workbook charts collection")
+    assert_equal(@ws.drawing.anchors.last.graphic_frame.chart, chart, "an anchor has been created and holds a reference to this chart")
+    anchor = @ws.drawing.anchors.last
+    assert_equal([anchor.from.row, anchor.from.col], [0,0], "options for start at are applied")
+    assert_equal([anchor.to.row, anchor.to.col], [1,1], "options for start at are applied")
+    assert_equal(chart.title.text, "bob", "option for title is applied")
+  end
+  
+  def test_charts
+    assert(@ws.drawing.charts.empty?)
+    chart = @ws.add_chart(Axlsx::Pie3DChart, :title=>"bob", :start_at=>[0,0], :end_at=>[1,1])
+    assert_equal(@ws.drawing.charts.last, chart, "add chart is returned")
+    chart = @ws.add_chart(Axlsx::Pie3DChart, :title=>"nancy", :start_at=>[1,5], :end_at=>[5,10])
+    assert_equal(@ws.drawing.charts.last, chart, "add chart is returned")   
+  end
+
+  def test_pn
+    assert_equal(@ws.drawing.pn, "drawings/drawing1.xml")
+  end
+
+  def test_rels_pn
+    assert_equal(@ws.drawing.rels_pn, "drawings/_rels/drawing1.xml.rels")
+  end
+
+  def test_rId
+    assert_equal(@ws.drawing.rId, "rId1")
+  end
+  
+  def test_index
+    assert_equal(@ws.drawing.index, @ws.workbook.drawings.index(@ws.drawing))
+  end
+
+  def test_relationships
+    assert(@ws.drawing.relationships.empty?)
+    chart = @ws.add_chart(Axlsx::Pie3DChart, :title=>"bob", :start_at=>[0,0], :end_at=>[1,1])
+    assert_equal(@ws.drawing.relationships.size, 1, "adding a chart adds a relationship")
+    chart = @ws.add_chart(Axlsx::Pie3DChart, :title=>"nancy", :start_at=>[1,5], :end_at=>[5,10])
+    assert_equal(@ws.drawing.relationships.size, 2, "adding a chart adds a relationship")
+  end
+
+  def test_to_xml
+    schema = Nokogiri::XML::Schema(File.open(Axlsx::DRAWING_XSD))
+    doc = Nokogiri::XML(@ws.drawing.to_xml)
+    errors = []
+    schema.validate(doc).each do |error|
+      errors.push error
+      puts error.message
+    end
+    assert(errors.empty?, "error free validation")
+  end
+
+end