#
# Testing OpenWFE
#
# John Mettraux at openwfe.org
#
# Sun Apr 13 19:03:31 JST 2008
#

require 'rubygems'

require 'test/unit'

require 'openwfe/workitem'
require 'openwfe/flowexpressionid'
require 'openwfe/util/xml'

require 'rutest_utils'


class UtilXmlTest < Test::Unit::TestCase

  #def setup
  #end

  #def teardown
  #end

  def test_0

    li = OpenWFE::LaunchItem.new
    li.attributes.delete "___map_type"
    xml = OpenWFE::Xml.launchitem_to_xml li

    assert_equal(
      "<?xml version=\"1.0\" encoding=\"UTF-8\"?><launchitem><workflow_definition_url></workflow_definition_url><attributes><hash></hash></attributes></launchitem>",
      xml)

    li = OpenWFE::Xml.launchitem_from_xml xml

    assert_nil(li.wfdurl)
    assert_equal({}, li.attributes)
  end

  def test_1

    li = OpenWFE::LaunchItem.new
    li.attributes = { "a" => 1, "b" => 2, "c" => [ 1, 2, 3 ]}

    xml = OpenWFE::Xml.launchitem_to_xml li

    assert_equal(
      "<?xml version=\"1.0\" encoding=\"UTF-8\"?><launchitem><workflow_definition_url></workflow_definition_url><attributes><hash><entry><string>a</string><number>1</number></entry><entry><string>b</string><number>2</number></entry><entry><string>c</string><array><number>1</number><number>2</number><number>3</number></array></entry></hash></attributes></launchitem>",
      xml)

    li = OpenWFE::Xml.launchitem_from_xml xml

    assert_equal({ "a" => 1, "b" => 2, "c" => [ 1, 2, 3 ] }, li.attributes)
  end

  def test_2

    wi = OpenWFE::InFlowWorkItem.new
    wi.fei = new_fei

    xml = OpenWFE::Xml.workitem_to_xml wi

    wi1 = OpenWFE::Xml.workitem_from_xml xml

    assert_equal wi.fei, wi1.fei

    #p wi1.fei
  end

  def test_3

    li = OpenWFE::LaunchItem.new
    li.wfdurl = "http://toto"
    li.customer_name = "toto"

    xml = OpenWFE::Xml.launchitem_to_xml li, 2

    li1 = OpenWFE::Xml.launchitem_from_xml xml

    assert_equal li.wfdurl, li1.wfdurl
    assert_equal li.customer_name, li1.customer_name
  end

  def test_4

    a = <<-EOS
<array>
  <string>alpha</string>
  <number>2</number>
  <number>2.3</number>
  <false/>
  <null/>
</array>
    EOS
    a = a.strip

    o = OpenWFE::Xml.from_xml a

    assert_equal [ 'alpha', 2, 2.3, false, nil ], o

    a1 = OpenWFE::Xml.to_xml(o, 2).strip

    assert_equal a, a1
  end

end