require 'spec_helper'

describe( RCAP::CAP_1_0::Area ) do
  context( 'on initialisation' ) do
    before( :each ) do
      @area = RCAP::CAP_1_0::Area.new

      @original_area = RCAP::CAP_1_0::Area.new do |area|
        area.area_desc = 'Area Description'
        area.altitude  = 100
        area.ceiling   = 200

        area.add_circle do |circle|
          circle.lattitude = 0
          circle.longitude = 0
          circle.radius    = 100
        end

        area.add_geocode do |geocode|
          geocode.name  = 'name'
          geocode.value = 'value'
        end

        area.add_polygon.add_point do |point|
          point.lattitude = 1
          point.longitude = 2
        end
      end
    end

    # Atomic
    it( 'should not have a area_desc' ){ @area.area_desc.should( be_nil )}
    it( 'should not have a altitude' ){ @area.altitude.should( be_nil )}
    it( 'should not have a ceiling' ){ @area.ceiling.should( be_nil )}

    # Group
    it( 'should have an empty polygons' ){ @area.polygons.should( be_empty )}
    it( 'should have an empty circles' ){ @area.circles.should( be_empty )}
    it( 'should have an empty geocodes' ){ @area.geocodes.should( be_empty )}

    shared_examples_for( "it can parse into a CAP 1.0 Area object" ) do
      it( 'should parse the area_desc correctly' ) do
        @area.area_desc.should == @original_area.area_desc
      end

      it( 'should parse the altitude correctly' ) do
        @area.altitude.should == @original_area.altitude
      end

      it( 'should parse the ceiling correctly' ) do
        @area.ceiling.should == @original_area.ceiling
      end

      it( 'should parse the circles correctly' ) do
        @area.circles.should == @original_area.circles
      end

      it( 'should parse the geocodes correctly' ) do
        @area.geocodes.should == @original_area.geocodes
      end

      it( 'should parse the polygons correctly' ) do
        @area.polygons.should == @original_area.polygons
      end
    end

    context( 'from XML' ) do
      before( :each ) do

        @alert = RCAP::CAP_1_0::Alert.new
        @alert.add_info.areas <<  @original_area
        @xml_string = @alert.to_xml
        @xml_document = REXML::Document.new( @xml_string )
        @info_xml_element = RCAP.xpath_first( @xml_document.root, RCAP::CAP_1_0::Info::XPATH, RCAP::CAP_1_0::Alert::XMLNS )
        @area_xml_element = RCAP.xpath_first( @info_xml_element, RCAP::CAP_1_0::Area::XPATH, RCAP::CAP_1_0::Alert::XMLNS )
        @area = RCAP::CAP_1_0::Area.from_xml_element( @area_xml_element )
      end

      it_should_behave_like( "it can parse into a CAP 1.0 Area object" )
    end

    context( 'from YAML Data' ) do
      before( :each ) do

        @area = RCAP::CAP_1_0::Area.from_yaml_data( YAML.load( @original_area.to_yaml ))
      end

      it_should_behave_like( "it can parse into a CAP 1.0 Area object" )
    end

    context( 'from a hash' ) do
      before( :each ) do

        @area = RCAP::CAP_1_0::Area.from_h( @original_area.to_h )
      end

      it_should_behave_like( "it can parse into a CAP 1.0 Area object" )
    end
  end

  context( 'when exported' ) do
    before( :each ) do
      @area = RCAP::CAP_1_0::Area.new do |area|
        area.area_desc = 'Area Description'
        area.altitude  = 100
        area.ceiling   = 200

        area.add_circle do |circle|
          circle.lattitude = 0
          circle.longitude = 0
          circle.radius    = 100
        end

        area.add_geocode do |geocode|
          geocode.name  = 'name'
          geocode.value = 'value'
        end

        area.add_polygon.add_point do |point|
          point.lattitude = 1
          point.longitude = 1
        end
      end
    end

    context( 'to a hash' ) do
      before( :each ) do
        @area_hash = @area.to_h
      end

      it( 'should export the area description correctly' ) do
        @area_hash[ RCAP::CAP_1_0::Area::AREA_DESC_KEY ].should == @area.area_desc
      end

      it( 'should export the altitude correctly' ) do
        @area_hash[ RCAP::CAP_1_0::Area::ALTITUDE_KEY ].should == @area.altitude
      end

      it( 'should set the ceiling correctly' ) do
        @area_hash[ RCAP::CAP_1_0::Area::CEILING_KEY ].should == @area.ceiling
      end

      it( 'should export the circles correctly' ) do
        @area_hash[ RCAP::CAP_1_0::Area::CIRCLES_KEY ].should == @area.circles.map{ |circle| circle.to_a }
      end

      it( 'should export the geocodes correctly' ) do
        @area_hash[ RCAP::CAP_1_0::Area::GEOCODES_KEY ].should == @area.geocodes.map{ |geocode| geocode.to_h }
      end

      it( 'should export the polygons correctly' ) do
        @area_hash[ RCAP::CAP_1_0::Area::POLYGONS_KEY ].should == @area.polygons.map{ |polygon| polygon.to_h }
      end
    end
  end

  context( 'is not valid if' ) do
    before( :each ) do
      @area = RCAP::CAP_1_0::Area.new do |area|
        area.area_desc = "Cape Town Metropole"
      end
      @area.should( be_valid )
    end

    it( 'does not have an area descrtiption (area_desc)') do
      @area.area_desc = nil
      @area.should_not( be_valid )
    end

    it( 'has a ceiling defined but no altitude' ) do
      @area.ceiling = 1
      @area.altitude = nil
      @area.should_not( be_valid )
    end

    context( 'it contains circles and it' ) do
      before( :each ) do
        @area.add_circle do |circle|
          circle.lattitude = 0
          circle.longitude = 0
          circle.radius = 1
        end
        @area.should( be_valid )
      end

      it( 'has an invalid circle' ) do
        @area.circles.first.lattitude = nil
        @area.should_not( be_valid )
      end
    end

    context( 'it contains polygons and it' ) do
      before( :each ) do
        @polygon = RCAP::CAP_1_0::Polygon.new
        [[ 0, 0], [ 0, 1 ], [ 0, 0 ]].each do |lattitude, longitude|
          @polygon.add_point do |point|
            point.lattitude = lattitude
            point.longitude = longitude
          end
        end

        @area.polygons << @polygon
        @area.should( be_valid )
      end

      it( 'has an invalid polygon' ) do
        @polygon.points.first.lattitude = nil
        @area.should_not( be_valid )
      end
    end

    context( 'it contains geocodes and it' ) do
      before( :each ) do
        @area.add_geocode do |geocode|
          geocode.name = 'foo'
          geocode.value = 'bar'
        end
        @area.should( be_valid )
      end

      it( 'has an invalid geocode' ) do
        @area.geocodes.first.value = nil
        @area.should_not( be_valid )
      end
    end
  end

  describe( 'instance methods' ) do
    before( :each ) do
      @area = RCAP::CAP_1_0::Area.new
    end

    describe( '#add_polygon' ) do
      before( :each ) do
        @polygon = @area.add_polygon
      end

      it( 'should return a CAP 1.0 Polygon' ) do
        @polygon.class.should == RCAP::CAP_1_0::Polygon
      end

      it( 'should add a Polygon to the polygons attribute' ) do
        @area.polygons.size.should == 1
      end
    end

    describe( '#add_circle' ) do
      before( :each ) do
        @circle = @area.add_circle do |circle|
          circle.lattitude = 1
          circle.longitude = 1
          circle.radius = 1
        end
      end

      it( 'should return a CAP 1.0 Circle' ) do
        @circle.class.should == RCAP::CAP_1_0::Circle
        @circle.lattitude.should == 1
        @circle.longitude.should == 1
        @circle.radius.should == 1
      end

      it( 'should add a circle to the circles attribute' ) do
        @area.circles.size.should == 1
      end
    end

    describe( '#add_geocode' ) do
      before( :each ) do
        @geocode = @area.add_geocode do |geocode|
          geocode.name = 'Geocode'
          geocode.value = '123'
        end
      end

      it( 'should return a CAP 1.0 Geocode' ) do
        @geocode.class.should == RCAP::CAP_1_0::Geocode
        @geocode.name.should == 'Geocode'
        @geocode.value.should == '123'
      end

      it( 'should add a geocode to the geocodes attribute' ) do
        @area.geocodes.size.should == 1
      end
    end
  end
end