require File.join(File.dirname(__FILE__), *%w[.. spec_helper])

describe 'Blather::XMPPNode' do
  it 'generates a new node' do
    n = XMPPNode.new 'foo'
    n.element_name.must_equal 'foo'
  end

  it 'generates a node based on the current name' do
    class Foo < XMPPNode; end
    Foo.name = 'foo'
    Foo.new.element_name.must_equal 'foo'
  end

  it 'sets the namespace on creation' do
    class Foo < XMPPNode; end
    Foo.ns = 'foo'
    Foo.new('foo').namespace.must_equal 'foo'
  end

  it 'registers sub classes' do
    class Foo < XMPPNode; register 'foo', 'foo:bar'; end
    Foo.name.must_equal 'foo'
    Foo.ns.must_equal 'foo:bar'
    XMPPNode.class_from_registration('foo', 'foo:bar').must_equal Foo
  end

  it 'imports another node' do
    class Foo < XMPPNode; register 'foo', 'foo:bar'; end
    n = XMPPNode.new('foo')
    n.namespace = 'foo:bar'
    XMPPNode.import(n).must_be_kind_of Foo
  end

  it 'provides an attribute_reader' do
    class Foo < XMPPNode
      attribute_reader :foo
    end
    f = Foo.new
    f.must_respond_to :foo
    f.foo.must_be_nil
    f.attributes[:foo] = 'bar'
    f.foo.must_equal :bar
  end

  it 'provides an attribute_reader and not convert to syms' do
    class Foo < XMPPNode
      attribute_reader :foo, :to_sym => false
    end
    f = Foo.new
    f.must_respond_to :foo
    f.foo.must_be_nil
    f.attributes[:foo] = 'bar'
    f.foo.must_equal 'bar'
  end

  it 'provides an attribute_writer' do
    class Foo < XMPPNode
      attribute_writer :foo
    end
    f = Foo.new
    f.attributes[:foo].must_be_nil
    f.foo = 'bar'
    f.attributes[:foo].must_equal 'bar'
  end

  it 'provides an attribute_accessor' do
    class Foo < XMPPNode
      attribute_accessor :foo
      attribute_accessor :bar, :to_sym => false
    end
    f = Foo.new
    f.must_respond_to :foo
    f.foo.must_be_nil
    f.foo = 'bar'
    f.foo.must_equal :bar

    f.must_respond_to :bar
    f.bar.must_be_nil
    f.bar = 'baz'
    f.bar.must_equal 'baz'
  end

  it 'can convert itself into a stanza' do
    class Foo < XMPPNode; register 'foo'; end
    n = XMPPNode.new('foo')
    n.to_stanza.must_be_kind_of Foo
  end

  it 'provides "attr_accessor" for namespace' do
    n = XMPPNode.new('foo')
    n.namespace.must_be_nil

    n.namespace = 'foo:bar'
    n.namespace.must_equal 'foo:bar'
  end

  it 'will remove a child element' do
    n = XMPPNode.new 'foo'
    n << XMPPNode.new('bar')
    n << XMPPNode.new('bar')

    n.find(:bar).size.must_equal 2
    n.remove_child 'bar'
    n.find(:bar).size.must_equal 1
  end

  it 'will remove a child with a specific xmlns' do
    n = XMPPNode.new 'foo'
    n << XMPPNode.new('bar')
    c = XMPPNode.new('bar')
    c.namespace = 'foo:bar'
    n << c

    n.find(:bar).size.must_equal 2
    n.remove_child 'bar', 'foo:bar'
    n.find(:bar).size.must_equal 1
    n.find(:bar).first.namespace.must_be_nil
  end

  it 'will remove all child elements' do
    n = XMPPNode.new 'foo'
    n << XMPPNode.new('bar')
    n << XMPPNode.new('bar')

    n.find(:bar).size.must_equal 2
    n.remove_children 'bar'
    n.find(:bar).size.must_equal 0
  end

  it 'provides a helper to grab content from a child' do
    n = XMPPNode.new 'foo'
    n << XMPPNode.new('bar', 'baz')
    n.content_from(:bar).must_equal 'baz'
  end

  it 'provides a copy mechanism' do
    n = XMPPNode.new 'foo'
    n2 = n.copy
    n2.object_id.wont_equal n.object_id
    n2.element_name.must_equal n.element_name
  end

  it 'provides an inhert mechanism' do
    n = XMPPNode.new 'foo'
    n2 = XMPPNode.new 'foo', 'bar'
    n2['foo'] = 'bar'

    n.inherit(n2)
    n['foo'].must_equal 'bar'
    n.content.must_equal 'bar'
  end

  it 'provides a mechanism to inherit attrs' do
    n = XMPPNode.new 'foo'
    n2 = XMPPNode.new 'foo'
    n2['foo'] = 'bar'

    n.inherit_attrs(n2.attributes)
    n['foo'].must_equal 'bar'
  end

  it 'cuts line breaks out of #to_xml' do
    n = XMPPNode.new 'foo'
    n << XMPPNode.new('bar', 'baz')
    n.to_xml.scan(">\n<").size.must_equal 0
  end

  it 'overrides #find to find without xpath' do
    n = XMPPNode.new 'foo'
    n << XMPPNode.new('bar', 'baz')
    n.find(:bar).must_be_kind_of Array

    XML::Document.new.root = n
    n.find(:bar).must_be_kind_of XML::XPath::Object
  end

  it 'can find using a symbol' do
    n = XMPPNode.new 'foo'
    n << XMPPNode.new('bar', 'baz')
    n.find(:bar).first.to_s.must_equal "<bar>baz</bar>"
  end
end