require 'spec_helper'

describe( RCAP::CAP_1_0::Area ) do
  context( 'on initialisation' ) do
    before( :each ) do
      @area = RCAP::CAP_1_0::Area.new
    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
        @original_area = RCAP::CAP_1_0::Area.new( :area_desc => 'Area Description',
                                       :altitude => 100,
                                       :ceiling => 200,
                                       :circles => RCAP::CAP_1_0::Circle.new( :lattitude => 0, :longitude => 0 , :radius => 100 ),
                                       :geocodes => RCAP::CAP_1_0::Geocode.new( :name => 'name', :value => 'value' ),
                                       :polygons => RCAP::CAP_1_0::Polygon.new( :points => RCAP::CAP_1_0::Point.new( :lattitude =>1, :longitude => 1 )))

        @alert = RCAP::CAP_1_0::Alert.new( :infos => RCAP::CAP_1_0::Info.new( :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
        @original_area = RCAP::CAP_1_0::Area.new( :area_desc => 'Area Description',
                                                  :altitude => 100,
                                                  :ceiling => 200,
                                                  :circles => RCAP::CAP_1_0::Circle.new( :lattitude => 0, :longitude => 0 , :radius => 100 ),
                                                  :geocodes => RCAP::CAP_1_0::Geocode.new( :name => 'name', :value => 'value' ),
                                                  :polygons => RCAP::CAP_1_0::Polygon.new( :points => RCAP::CAP_1_0::Point.new( :lattitude =>1, :longitude => 1 )))

        @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
        @original_area = RCAP::CAP_1_0::Area.new( :area_desc => 'Area Description',
                                       :altitude => 100,
                                       :ceiling => 200,
                                       :circles => RCAP::CAP_1_0::Circle.new( :lattitude => 0, :longitude => 0 , :radius => 100 ),
                                       :geocodes => RCAP::CAP_1_0::Geocode.new( :name => 'name', :value => 'value' ),
                                       :polygons => RCAP::CAP_1_0::Polygon.new( :points => RCAP::CAP_1_0::Point.new( :lattitude =>1, :longitude => 1 )))

        @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( :area_desc => 'Area Description',
                             :altitude => 100,
                             :ceiling => 200,
                             :circles => RCAP::CAP_1_0::Circle.new(  :lattitude => 0, :longitude => 0 , :radius => 100 ),
                             :geocodes => RCAP::CAP_1_0::Geocode.new( :name => 'name', :value => 'value' ),
                             :polygons => RCAP::CAP_1_0::Polygon.new( :points => RCAP::CAP_1_0::Point.new( :lattitude =>1, :longitude => 1 )))
    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_h }
      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( :area_desc => "Cape Town Metropole" )
      @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.circles << RCAP::CAP_1_0::Circle.new( :lattitude => 0, :longitude => 0, :radius => 1)
        @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
        @polygon.points.push( RCAP::CAP_1_0::Point.new( :lattitude => 0, :longitude => 0 ),
                             RCAP::CAP_1_0::Point.new( :lattitude => 0, :longitude => 1 ),
                             RCAP::CAP_1_0::Point.new( :lattitude => 0, :longitude => 0 ))
        @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
        @geocode = RCAP::CAP_1_0::Geocode.new( :name => 'foo', :value => 'bar' )
        @area.geocodes << @geocode
        @area.should( be_valid )
      end

      it( 'has an invalid geocode' ) do
        @geocode.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( lattitude: 1, longitude: 1, radius: 1 )
      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( name: 'Geocode', value: '123' )
      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