xmlss 0.3.1 → 0.4.0

data/lib/xmlss/table.rb

@@ -1,22 +0,0 @@
-require 'xmlss/item_set'
-require 'xmlss/column'
-require 'xmlss/row'
-
-module Xmlss
-  class Table
-
-    include Xmlss::Xml
-    def xml
-      { :node => :table,
-        :children => [:columns, :rows] }
-    end
-
-    attr_accessor :columns, :rows
-
-    def initialize(attrs={})
-      self.columns = Xmlss::ItemSet.new(nil, attrs[:columns] || [])
-      self.rows = Xmlss::ItemSet.new(nil, attrs[:rows] || [])
-    end
-
-  end
-end

data/lib/xmlss/xml.rb

@@ -1,60 +0,0 @@
-require 'nokogiri'
-
-# common methods used for generating XML
-module Xmlss
-  XML_NS   = "xmlns"
-  SHEET_NS = "ss"
-  NS_URI   = "urn:schemas-microsoft-com:office:spreadsheet"
-
-  module Xml
-
-    def xml_builder
-      ::Nokogiri::XML::Builder.new(:encoding => 'UTF-8') do |builder|
-        yield(builder) if block_given?
-      end
-    end
-
-    def build_node(builder, attrs={})
-      unless xml && xml.kind_of?(::Hash)
-        raise ArgumentError, "no xml config provided"
-      end
-      if xml[:node] && !xml[:node].to_s.empty?
-        if xml[:value] && (v = self.send(xml[:value]).to_s)
-          builder.send(Xmlss.classify(xml[:node]), v, build_attributes(attrs))
-        else
-          builder.send(Xmlss.classify(xml[:node]), build_attributes(attrs)) do
-            build_children(builder)
-          end
-        end
-      else
-        build_children(builder)
-      end
-    end
-
-    def xml_save_with(*options)
-      ::Nokogiri::XML::Node::SaveOptions::AS_XML |
-      (options.include?(:format) ? ::Nokogiri::XML::Node::SaveOptions::FORMAT : 0)
-    end
-
-    def build_attributes(attrs={})
-      (xml[:attributes] || []).inject({}) do |xattrs, a|
-        xattrs.merge(if !(xv = Xmlss.xmlify(self.send(a))).nil?
-          {"#{Xmlss::SHEET_NS}:#{Xmlss.classify(a)}" => xv}
-        else
-          {}
-        end)
-      end.merge(attrs)
-    end
-    private :build_attributes
-
-    def build_children(builder)
-      (xml[:children] || []).each do |c|
-        if (child = c.kind_of?(::Symbol) ? self.send(c) : c)
-          child.build_node(builder) if child.respond_to?(:build_node)
-        end
-      end
-    end
-    private :build_children
-
-  end
-end

data/test/item_set_test.rb

@@ -1,27 +0,0 @@
-require "assert"
-require 'xmlss/item_set'
-
-module Xmlss
-  class ItemSetTest < Assert::Context
-    desc "Xmlss::ItemSet"
-    subject { ItemSet.new(:test) }
-
-    should have_reader :name
-
-    should "be an Array" do
-      assert_kind_of ::Array, subject
-      assert_respond_to :each, subject
-      assert_empty subject
-    end
-
-  end
-
-  class ItemSetXmlTest < ItemSetTest
-    desc "for generating XML"
-
-    should have_reader :xml
-    should_build_node
-    should_build_no_attributes_by_default(ItemSet)
-  end
-
-end

data/test/table_test.rb

@@ -1,56 +0,0 @@
-require "assert"
-require 'xmlss/table'
-
-module Xmlss
-  class TableTest < Assert::Context
-    desc "Xmlss::Table"
-    before { @tbl = Table.new }
-    subject { @tbl }
-
-    should have_accessor :columns, :rows
-
-    should "set it's defaults" do
-      assert_equal [], subject.columns
-      assert_equal [], subject.rows
-    end
-
-    should "allow defining a rows/columns at init" do
-      tbl = Table.new({
-        :columns => [Column.new],
-        :rows => [Row.new]
-      })
-
-      assert_equal 1, tbl.columns.size
-      assert_kind_of Column, tbl.columns.first
-      assert_equal 1, tbl.rows.size
-      assert_kind_of Row, tbl.rows.first
-    end
-
-  end
-
-  class TableXmlTest < TableTest
-    desc "for generating XML"
-    should have_reader :xml
-    should_build_node
-
-  end
-
-  class TableRowsColsTest < TableTest
-    desc "when using rows/columns"
-    before do
-      subject.columns << Column.new
-      r = Row.new
-      r.cells << Cell.new
-      subject.rows << r
-    end
-
-    should "should build a table object" do
-      assert_equal 1, subject.columns.size
-      assert_kind_of Column, subject.columns.first
-      assert_equal 1, subject.rows.size
-      assert_kind_of Row, subject.rows.first
-    end
-
-  end
-
-end

data/test/xml_test.rb

@@ -1,81 +0,0 @@
-require "assert"
-require 'test/thing'
-
-module Xmlss
-  class XmlTest < Assert::Context
-    desc "Xmlss::Xml"
-    before { @thing = Thing.new }
-    subject { @thing }
-
-    should "should provide proper namespace constants" do
-      assert_equal "xmlns", Xmlss::XML_NS
-      assert_equal "ss", Xmlss::SHEET_NS
-      assert_equal "urn:schemas-microsoft-com:office:spreadsheet", Xmlss::NS_URI
-    end
-
-    should "bark if you use xml generation without configuring" do
-      assert_raises ArgumentError do
-        ::Nokogiri::XML::Builder.new do |builder|
-          subject.build_node(builder)
-        end
-      end
-    end
-
-  end
-
-  class XmlConfigTest < XmlTest
-    desc "with config"
-    before do
-      subject.xml = {
-        :node => :thing,
-        :attributes => [:one, :two, :three],
-        :children => [:child_nodes]
-      }
-      subject.one = true
-      subject.two = "two"
-      subject.three = ""
-    end
-
-    should "build it's node" do
-      assert_nothing_raised do
-        ::Nokogiri::XML::Builder.new do |builder|
-          subject.build_node(builder)
-        end
-      end
-    end
-
-    should "build with no whitespace formatting by default" do
-      assert_equal(
-        "<?xml version=\"1.0\"?>\n<Thing ss:One=\"1\" ss:Two=\"two\"><Nodes/></Thing>\n",
-        ::Nokogiri::XML::Builder.new do |builder|
-          subject.build_node(builder)
-        end.to_xml({:save_with => subject.xml_save_with})
-      )
-    end
-
-    should "build with whitespace formatting if specified" do
-      assert_equal(
-        "<?xml version=\"1.0\"?>\n<Thing ss:One=\"1\" ss:Two=\"two\">\n  <Nodes/>\n</Thing>\n",
-        ::Nokogiri::XML::Builder.new do |builder|
-          subject.build_node(builder)
-        end.to_xml({:save_with => subject.xml_save_with(:format)})
-      )
-    end
-
-    should "generate build attributes based on it's own attributes" do
-      assert_nothing_raised do
-        subject.send :build_attributes
-      end
-      attrs = subject.send :build_attributes
-
-      assert_kind_of ::Hash, attrs
-      assert attrs.has_key?("#{Xmlss::SHEET_NS}:One")
-      assert_equal 1, attrs["#{Xmlss::SHEET_NS}:One"]
-      assert attrs.has_key?("#{Xmlss::SHEET_NS}:Two")
-      assert_equal 'two', attrs["#{Xmlss::SHEET_NS}:Two"]
-      assert !attrs.has_key?("#{Xmlss::SHEET_NS}:Three")
-    end
-
-  end
-
-end

data/test/xmlss_test.rb

@@ -1,31 +0,0 @@
-require "assert"
-
-class XmlssTest < Assert::Context
-  desc "Xmlss helpers"
-  subject { Xmlss }
-
-  should "be provided" do
-    assert_respond_to :classify, subject
-    assert_respond_to :xmlify, subject
-  end
-
-  should "classify underscored strings" do
-    assert_nothing_raised do
-      subject.send(:classify, 'poo')
-    end
-    assert_equal "Poo", subject.send(:classify, 'poo')
-    assert_equal "MorePoo", subject.send(:classify, 'more_poo')
-  end
-
-  should "filter values for use in XML" do
-    assert_nothing_raised do
-      subject.send(:xmlify, 'poo')
-    end
-
-    assert_equal 1, subject.send(:xmlify, true)
-    assert_equal nil, subject.send(:xmlify, false)
-    assert_equal nil, subject.send(:xmlify, "")
-    assert_equal "poo", subject.send(:xmlify, 'poo')
-  end
-
-end