osheet 0.7.0 → 0.8.0

data/test/xmlss_writer/styles_test.rb

@@ -3,266 +3,255 @@ require 'osheet/xmlss_writer'
 
 module Osheet
 
-  class XmlssWriter::Style < Test::Unit::TestCase
-    context("Xmlss style writer") do
-
-      subject { XmlssWriter::Base.new }
-      before do
-        subject.workbook = Workbook.new {
-          style('.font.size') { font 14 }
-          style('.font.weight') { font :bold }
-          style('.font.style') { font :italic }
-          style('.align.center') { align :center }
-        }
-      end
-
-      should "key styles based off class str and format" do
-        assert_equal '', subject.send(:style_key, '', nil)
-        assert_equal '.awesome', subject.send(:style_key, 'awesome', nil)
-        assert_equal '.awesome.thing', subject.send(:style_key, 'awesome thing', nil)
-        assert_equal '.awesome..something', subject.send(:style_key, 'awesome', 'something')
-        assert_equal '..something', subject.send(:style_key, '', 'something')
-      end
+  class XmlssWriter::StylesTest < Assert::Context
+    before do
+      @writer = XmlssWriter::Base.new
+    end
+    subject { @writer }
 
-      should "not build a style obj when writing styles with no class str or format" do
-        assert_equal nil, subject.send(:style, '')
-      end
+  end
 
-      should "build a style obj and add it to the writers styles" do
-        xmlss_style = subject.send(:style, 'awesome')
-        assert_kind_of ::Xmlss::Style::Base, xmlss_style
-        assert_equal '.awesome', xmlss_style.id
-        assert_equal 1, subject.styles.size
-        assert_equal xmlss_style, subject.styles.first
-      end
+  class XmlssWriter::Style < XmlssWriter::StylesTest
+    desc "Xmlss style writer"
+    before do
+      subject.workbook = Workbook.new {
+        style('.font.size') { font 14 }
+        style('.font.weight') { font :bold }
+        style('.font.style') { font :italic }
+        style('.align.center') { align :center }
+      }
+    end
 
-      should "build a style obj from many matching osheet styles" do
-        xmlss_style = subject.send(:style, 'font size weight style align center')
-        assert_equal 14, xmlss_style.font.size
-        assert_equal true, xmlss_style.font.bold?
-        assert_equal true, xmlss_style.font.italic?
-      end
+    should "key styles based off class str and format" do
+      assert_equal '', subject.send(:style_key, '', nil)
+      assert_equal '.awesome', subject.send(:style_key, 'awesome', nil)
+      assert_equal '.awesome.thing', subject.send(:style_key, 'awesome thing', nil)
+      assert_equal '.awesome..something', subject.send(:style_key, 'awesome', 'something')
+      assert_equal '..something', subject.send(:style_key, '', 'something')
+    end
 
-      should "provide style ids" do
-        assert_equal '', subject.send(:style_id, '')
-        assert_equal '.awesome', subject.send(:style_id, 'awesome')
-        assert_equal '..number_none_0_nocomma_black', subject.send(:style_id, '', Osheet::Format.new(:number))
-        assert_equal 2, subject.styles.size
-      end
+    should "not build a style obj when writing styles with no class str or format" do
+      assert_equal nil, subject.send(:style, '')
+    end
 
+    should "build a style obj and add it to the writers styles" do
+      xmlss_style = subject.send(:style, 'awesome')
+      assert_kind_of ::Xmlss::Style::Base, xmlss_style
+      assert_equal '.awesome', xmlss_style.id
+      assert_equal 1, subject.styles.size
+      assert_equal xmlss_style, subject.styles.first
     end
-  end
 
-  class XmlssWriter::Alignment < Test::Unit::TestCase
-    context("Alignment style writer") do
-
-      subject { XmlssWriter::Base.new }
-      before do
-        subject.workbook = Workbook.new {
-          [
-            :left, :center, :right,
-            :top, :middle, :bottom,
-            :wrap
-          ].each do |s|
-            style(".align.#{s}") { align s }
-          end
-          style('.align.rotate') { align 90 }
-        }
-      end
+    should "build a style obj from many matching osheet styles" do
+      xmlss_style = subject.send(:style, 'font size weight style align center')
+      assert_equal 14, xmlss_style.font.size
+      assert_equal true, xmlss_style.font.bold?
+      assert_equal true, xmlss_style.font.italic?
+    end
 
-      should "build a style obj with empty alignment settings by default" do
-        assert_equal nil, subject.send(:style, 'align').alignment
-      end
+    should "provide style ids" do
+      assert_equal '', subject.send(:style_id, '')
+      assert_equal '.awesome', subject.send(:style_id, 'awesome')
+      assert_equal '..number_none_0_nocomma_black', subject.send(:style_id, '', Osheet::Format.new(:number))
+      assert_equal 2, subject.styles.size
+    end
 
-      should "build style objs for horizontal alignment settings" do
-        assert_equal ::Xmlss::Style::Alignment.horizontal(:left), subject.send(:style, 'align left').alignment.horizontal
-        assert_equal ::Xmlss::Style::Alignment.horizontal(:center), subject.send(:style, 'align center').alignment.horizontal
-        assert_equal ::Xmlss::Style::Alignment.horizontal(:right), subject.send(:style, 'align right').alignment.horizontal
-      end
+  end
 
-      should "build style objs for vertical alignment settings" do
-        assert_equal ::Xmlss::Style::Alignment.vertical(:top), subject.send(:style, 'align top').alignment.vertical
-        assert_equal ::Xmlss::Style::Alignment.vertical(:center), subject.send(:style, 'align middle').alignment.vertical
-        assert_equal ::Xmlss::Style::Alignment.vertical(:bottom), subject.send(:style, 'align bottom').alignment.vertical
-      end
+  class XmlssWriter::Alignment <  XmlssWriter::StylesTest
+    desc "Alignment style writer"
+    before do
+      subject.workbook = Workbook.new {
+        [
+          :left, :center, :right,
+          :top, :middle, :bottom,
+          :wrap
+        ].each do |s|
+          style(".align.#{s}") { align s }
+        end
+        style('.align.rotate') { align 90 }
+      }
+    end
 
-      should "build style objs for text wrap settings" do
-        assert_equal true, subject.send(:style, 'align wrap').alignment.wrap_text?
-      end
+    should "build a style obj with empty alignment settings by default" do
+      assert_equal nil, subject.send(:style, 'align').alignment
+    end
 
-      should "build style objs for text rotation settings" do
-        assert_equal 90, subject.send(:style, 'align rotate').alignment.rotate
-      end
+    should "build style objs for horizontal alignment settings" do
+      assert_equal ::Xmlss::Style::Alignment.horizontal(:left), subject.send(:style, 'align left').alignment.horizontal
+      assert_equal ::Xmlss::Style::Alignment.horizontal(:center), subject.send(:style, 'align center').alignment.horizontal
+      assert_equal ::Xmlss::Style::Alignment.horizontal(:right), subject.send(:style, 'align right').alignment.horizontal
+    end
 
+    should "build style objs for vertical alignment settings" do
+      assert_equal ::Xmlss::Style::Alignment.vertical(:top), subject.send(:style, 'align top').alignment.vertical
+      assert_equal ::Xmlss::Style::Alignment.vertical(:center), subject.send(:style, 'align middle').alignment.vertical
+      assert_equal ::Xmlss::Style::Alignment.vertical(:bottom), subject.send(:style, 'align bottom').alignment.vertical
     end
-  end
 
-  class XmlssWriter::Font < Test::Unit::TestCase
-    context("Font style writer") do
-
-      subject { XmlssWriter::Base.new }
-      before do
-        subject.workbook = Workbook.new {
-          [ :underline, :double_underline, :accounting_underline, :double_accounting_underline,
-            :subscript, :superscript, :shadow, :strikethrough, :wrap,
-            :bold, :italic
-          ].each do |s|
-            style(".font.#{s}") { font s }
-          end
-          style('.font.size') { font 14 }
-          style('.font.color') { font '#FF0000' }
-        }
-      end
+    should "build style objs for text wrap settings" do
+      assert_equal true, subject.send(:style, 'align wrap').alignment.wrap_text?
+    end
 
-      should "build a style obj with empty font settings by default" do
-        assert_equal nil, subject.send(:style, 'font').font
-      end
+    should "build style objs for text rotation settings" do
+      assert_equal 90, subject.send(:style, 'align rotate').alignment.rotate
+    end
 
-      should "build style objs for font underline settings" do
-        assert_equal ::Xmlss::Style::Font.underline(:single), subject.send(:style, 'font underline').font.underline
-        assert_equal ::Xmlss::Style::Font.underline(:double), subject.send(:style, 'font double_underline').font.underline
-        assert_equal ::Xmlss::Style::Font.underline(:single_accounting), subject.send(:style, 'font accounting_underline').font.underline
-        assert_equal ::Xmlss::Style::Font.underline(:double_accounting), subject.send(:style, 'font double_accounting_underline').font.underline
-      end
+  end
 
-      should "build style objs for font alignment settings" do
-        assert_equal ::Xmlss::Style::Font.alignment(:subscript), subject.send(:style, 'font subscript').font.alignment
-        assert_equal ::Xmlss::Style::Font.alignment(:superscript), subject.send(:style, 'font superscript').font.alignment
-      end
+  class XmlssWriter::Font < XmlssWriter::StylesTest
+    desc "Font style writer"
+    before do
+      subject.workbook = Workbook.new {
+        [ :underline, :double_underline, :accounting_underline, :double_accounting_underline,
+          :subscript, :superscript, :shadow, :strikethrough, :wrap,
+          :bold, :italic
+        ].each do |s|
+          style(".font.#{s}") { font s }
+        end
+        style('.font.size') { font 14 }
+        style('.font.color') { font '#FF0000' }
+      }
+    end
 
-      should "build style objs for font style settings" do
-        assert_equal true, subject.send(:style, 'font bold').font.bold?
-        assert_equal true, subject.send(:style, 'font italic').font.italic?
-        assert_equal true, subject.send(:style, 'font strikethrough').font.strike_through?
-        assert_equal true, subject.send(:style, 'font shadow').font.shadow?
-      end
+    should "build a style obj with empty font settings by default" do
+      assert_equal nil, subject.send(:style, 'font').font
+    end
 
-      should "build style objs for font size" do
-        assert_equal 14, subject.send(:style, 'font size').font.size
-      end
+    should "build style objs for font underline settings" do
+      assert_equal ::Xmlss::Style::Font.underline(:single), subject.send(:style, 'font underline').font.underline
+      assert_equal ::Xmlss::Style::Font.underline(:double), subject.send(:style, 'font double_underline').font.underline
+      assert_equal ::Xmlss::Style::Font.underline(:single_accounting), subject.send(:style, 'font accounting_underline').font.underline
+      assert_equal ::Xmlss::Style::Font.underline(:double_accounting), subject.send(:style, 'font double_accounting_underline').font.underline
+    end
 
-      should "build style objs for font color" do
-        assert_equal '#FF0000', subject.send(:style, 'font color').font.color
-      end
+    should "build style objs for font alignment settings" do
+      assert_equal ::Xmlss::Style::Font.alignment(:subscript), subject.send(:style, 'font subscript').font.alignment
+      assert_equal ::Xmlss::Style::Font.alignment(:superscript), subject.send(:style, 'font superscript').font.alignment
+    end
 
+    should "build style objs for font style settings" do
+      assert_equal true, subject.send(:style, 'font bold').font.bold?
+      assert_equal true, subject.send(:style, 'font italic').font.italic?
+      assert_equal true, subject.send(:style, 'font strikethrough').font.strike_through?
+      assert_equal true, subject.send(:style, 'font shadow').font.shadow?
     end
-  end
 
-  class XmlssWriter::Bg < Test::Unit::TestCase
-    context("Bg writer") do
-
-      subject { XmlssWriter::Base.new }
-      before do
-        subject.workbook = Workbook.new {
-          style('.bg.color') { bg '#FF0000' }
-          style('.bg.pattern-only') { bg :solid }
-          style('.bg.pattern-color') { bg :horz_stripe => '#0000FF' }
-          style('.bg.color-first') { bg '#00FF00', {:horz_stripe => '#0000FF'} }
-          style('.bg.pattern-first') { bg({:horz_stripe => '#0000FF'}, '#00FF00') }
-        }
-      end
+    should "build style objs for font size" do
+      assert_equal 14, subject.send(:style, 'font size').font.size
+    end
 
-      should "build a style obj with empty bg settings by default" do
-        assert_equal nil, subject.send(:style, 'bg').interior
-      end
+    should "build style objs for font color" do
+      assert_equal '#FF0000', subject.send(:style, 'font color').font.color
+    end
 
-      should "build style objs for bg color and auto set the pattern to solid" do
-        assert_equal '#FF0000', subject.send(:style, 'bg color').interior.color
-      end
+  end
 
-      should "build style objs for bg pattern settings" do
-        assert_equal ::Xmlss::Style::Interior.pattern(:solid), subject.send(:style, 'bg pattern-only').interior.pattern
-        assert_equal nil, subject.send(:style, 'bg pattern-only').interior.pattern_color
-        assert_equal ::Xmlss::Style::Interior.pattern(:horz_stripe), subject.send(:style, 'bg pattern-color').interior.pattern
-        assert_equal '#0000FF', subject.send(:style, 'bg pattern-color').interior.pattern_color
-      end
+  class XmlssWriter::Bg < XmlssWriter::StylesTest
+    desc "Bg writer"
+    before do
+      subject.workbook = Workbook.new {
+        style('.bg.color') { bg '#FF0000' }
+        style('.bg.pattern-only') { bg :solid }
+        style('.bg.pattern-color') { bg :horz_stripe => '#0000FF' }
+        style('.bg.color-first') { bg '#00FF00', {:horz_stripe => '#0000FF'} }
+        style('.bg.pattern-first') { bg({:horz_stripe => '#0000FF'}, '#00FF00') }
+      }
+    end
 
-      should "set pattern to solid when setting bg color" do
-        assert_equal ::Xmlss::Style::Interior.pattern(:solid), subject.send(:style, 'bg color').interior.pattern
-      end
+    should "build a style obj with empty bg settings by default" do
+      assert_equal nil, subject.send(:style, 'bg').interior
+    end
 
-      should "set pattern to pattern setting when first setting bg color then pattern" do
-        assert_equal ::Xmlss::Style::Interior.pattern(:horz_stripe), subject.send(:style, 'bg color-first').interior.pattern
-      end
+    should "build style objs for bg color and auto set the pattern to solid" do
+      assert_equal '#FF0000', subject.send(:style, 'bg color').interior.color
+    end
 
-      should "set pattern to pattern setting when first setting bg pattern then color" do
-        assert_equal ::Xmlss::Style::Interior.pattern(:horz_stripe), subject.send(:style, 'bg pattern-first').interior.pattern
-      end
+    should "build style objs for bg pattern settings" do
+      assert_equal ::Xmlss::Style::Interior.pattern(:solid), subject.send(:style, 'bg pattern-only').interior.pattern
+      assert_equal nil, subject.send(:style, 'bg pattern-only').interior.pattern_color
+      assert_equal ::Xmlss::Style::Interior.pattern(:horz_stripe), subject.send(:style, 'bg pattern-color').interior.pattern
+      assert_equal '#0000FF', subject.send(:style, 'bg pattern-color').interior.pattern_color
+    end
 
+    should "set pattern to solid when setting bg color" do
+      assert_equal ::Xmlss::Style::Interior.pattern(:solid), subject.send(:style, 'bg color').interior.pattern
     end
-  end
 
-  class XmlssWriter::Border < Test::Unit::TestCase
-    context("Font border writer") do
-
-      subject { XmlssWriter::Base.new }
-      before do
-        subject.workbook = Workbook.new {
-          ::Osheet::Style::BORDER_POSITIONS.each do |p|
-            style(".border.#{p}") { send("border_#{p}", :thin) }
-          end
-          [:hairline, :thin, :medium, :thick].each do |w|
-            style(".border.#{w}") { border_top w }
-          end
-          [:none, :continuous, :dash, :dot, :dash_dot, :dash_dot_dot].each do |s|
-            style(".border.#{s}") { border_top s }
-          end
-          style('.border.color') { border_top '#FF0000' }
-          style('.border.all') { border :thick, :dash, '#FF0000' }
-        }
-      end
+    should "set pattern to pattern setting when first setting bg color then pattern" do
+      assert_equal ::Xmlss::Style::Interior.pattern(:horz_stripe), subject.send(:style, 'bg color-first').interior.pattern
+    end
 
-      should "build a style obj with empty border settings by default" do
-        style = subject.send(:style, 'border')
-        assert_kind_of ::Xmlss::ItemSet, style.borders
-        assert_equal [], style.borders
-      end
+    should "set pattern to pattern setting when first setting bg pattern then color" do
+      assert_equal ::Xmlss::Style::Interior.pattern(:horz_stripe), subject.send(:style, 'bg pattern-first').interior.pattern
+    end
 
-      should "build style objs with identical settings for all positions when using 'border'" do
-        style = subject.send(:style, 'border all')
-        assert_equal 4, style.borders.size
-        assert_equal 1, style.borders.collect{|p| p.weight}.uniq.size
-        assert_equal 1, style.borders.collect{|p| p.line_style}.uniq.size
-        assert_equal 1, style.borders.collect{|p| p.color}.uniq.size
-      end
+  end
 
-      should "build style objs for border specific positions" do
+  class XmlssWriter::Border < XmlssWriter::StylesTest
+    desc "Font border writer"
+    before do
+      subject.workbook = Workbook.new {
         ::Osheet::Style::BORDER_POSITIONS.each do |p|
-          assert_equal ::Xmlss::Style::Border.position(p), subject.send(:style, "border #{p}").borders.first.position
+          style(".border.#{p}") { send("border_#{p}", :thin) }
         end
-      end
-
-      should "build style objs for border weight settings" do
         [:hairline, :thin, :medium, :thick].each do |w|
-          assert_equal ::Xmlss::Style::Border.weight(w), subject.send(:style, "border #{w}").borders.first.weight
+          style(".border.#{w}") { border_top w }
         end
-      end
-
-      should "build style objs for border style settings" do
         [:none, :continuous, :dash, :dot, :dash_dot, :dash_dot_dot].each do |s|
-          assert_equal ::Xmlss::Style::Border.line_style(s), subject.send(:style, "border #{s}").borders.first.line_style
+          style(".border.#{s}") { border_top s }
         end
-      end
+        style('.border.color') { border_top '#FF0000' }
+        style('.border.all') { border :thick, :dash, '#FF0000' }
+      }
+    end
 
-      should "build style objs for border color" do
-        assert_equal '#FF0000', subject.send(:style, 'border color').borders.first.color
-      end
+    should "build a style obj with empty border settings by default" do
+      style = subject.send(:style, 'border')
+      assert_kind_of ::Xmlss::ItemSet, style.borders
+      assert_equal [], style.borders
+    end
 
+    should "build style objs with identical settings for all positions when using 'border'" do
+      style = subject.send(:style, 'border all')
+      assert_equal 4, style.borders.size
+      assert_equal 1, style.borders.collect{|p| p.weight}.uniq.size
+      assert_equal 1, style.borders.collect{|p| p.line_style}.uniq.size
+      assert_equal 1, style.borders.collect{|p| p.color}.uniq.size
     end
-  end
 
-  class XmlssWriter::NumberFormat < Test::Unit::TestCase
-    context("Xmlss style number format writer") do
+    should "build style objs for border specific positions" do
+      ::Osheet::Style::BORDER_POSITIONS.each do |p|
+        assert_equal ::Xmlss::Style::Border.position(p), subject.send(:style, "border #{p}").borders.first.position
+      end
+    end
 
-      subject { XmlssWriter::Base.new }
+    should "build style objs for border weight settings" do
+      [:hairline, :thin, :medium, :thick].each do |w|
+        assert_equal ::Xmlss::Style::Border.weight(w), subject.send(:style, "border #{w}").borders.first.weight
+      end
+    end
 
-      should "build a style obj with formatting" do
-        assert_equal '@', subject.send(:style, '', Osheet::Format.new(:text)).number_format.format
-        assert_equal 'mm/dd/yy', subject.send(:style, '', Osheet::Format.new(:datetime, 'mm/dd/yy')).number_format.format
+    should "build style objs for border style settings" do
+      [:none, :continuous, :dash, :dot, :dash_dot, :dash_dot_dot].each do |s|
+        assert_equal ::Xmlss::Style::Border.line_style(s), subject.send(:style, "border #{s}").borders.first.line_style
       end
+    end
 
+    should "build style objs for border color" do
+      assert_equal '#FF0000', subject.send(:style, 'border color').borders.first.color
     end
+
   end
 
+  class XmlssWriter::NumberFormat < XmlssWriter::StylesTest
+    desc "Xmlss style number format writer"
+
+    should "build a style obj with formatting" do
+      assert_equal '@', subject.send(:style, '', Osheet::Format.new(:text)).number_format.format
+      assert_equal 'mm/dd/yy', subject.send(:style, '', Osheet::Format.new(:datetime, 'mm/dd/yy')).number_format.format
+    end
+
+  end
 
 end