require File.expand_path(File.join(File.dirname(__FILE__), '..', '..', '..', 'spec_helper'))
require 'meac_control/xml/response'

describe MEACControl::XML::Response do
  before(:each) do
    @string_ok = fixture_read('get-response-ok.xml')
    @string_error = fixture_read('get-response-error.xml')
    @request = mock('xml_request')
  end

  it "creates a response from a xml string" do
    response = MEACControl::XML::Response.new(@string_ok)
    response.xml.should  be_a(Nokogiri::XML::Document)
  end

  it "creates a response from a xml string and a request object" do
    response = MEACControl::XML::Response.new(@string_ok, @request)
    response.xml.should  be_a(Nokogiri::XML::Document)
  end

  it "will raise an error if the XML response has no root node" do
    lambda { MEACControl::XML::Response.new('foo') }.should raise_error(MEACControl::XML::InvalidResponse)
  end

  describe "#request" do
    it "returns the request object" do
      response = MEACControl::XML::Response.new(@string_ok, @request)
      response.request.should == @request
    end
  end

  describe "#to_xml" do
    it "returns the response xml string" do
      response = MEACControl::XML::Response.new(@string_ok)
      response.to_xml.should == @string_ok
    end
  end

  describe "#ok?" do
    it "returns true if the response has no error messages" do
      response = MEACControl::XML::Response.new(@string_ok)
      response.ok?.should be_true
    end

    it "returns false if the response has an error message" do
      response = MEACControl::XML::Response.new(@string_error)
      response.ok?.should be_false
    end
  end

  describe "#errors?" do
    it "returns true if the response has an error message" do
      response = MEACControl::XML::Response.new(@string_error)
      response.errors?.should be_true
    end

    it "returns false if the response has no error message" do
      response = MEACControl::XML::Response.new(@string_ok)
      response.errors?.should be_false
    end
  end

  describe "#errors" do
    it "returns a list of hashes with the error messages" do
      response = MEACControl::XML::Response.new(@string_error)
      response.errors.should == [{'Point' => 'geRequest', 'Code' => '0102', 'Message' => 'Insufficiency Attribute'}]
    end
  end

  describe "#error_messages" do
    it "returns a list of error message strings" do
      response = MEACControl::XML::Response.new(@string_error)
      response.error_messages.should == ['Insufficiency Attribute']
    end
  end
end