aixm 0.3.1 → 0.3.2

data/spec/lib/aixm/feature/obstacle_group_spec.rb

@@ -0,0 +1,284 @@
+require_relative '../../../spec_helper'
+
+describe AIXM::Feature::ObstacleGroup do
+  describe "unlinked group" do
+    subject do
+      AIXM.obstacle_group(name: "Mirmande éoliennes")
+    end
+
+    describe :initialize do
+      it "sets defaults" do
+        subject = AIXM.obstacle_group(
+          name: "Mirmande éoliennes"
+        )
+        subject.obstacles.must_equal []
+      end
+    end
+
+    describe :name= do
+      it "fails on invalid values" do
+        [:foobar, 123].wont_be_written_to subject, :name
+      end
+
+      it "upcases and transcodes valid values" do
+        subject.name.must_equal 'MIRMANDE EOLIENNES'
+      end
+    end
+
+    describe :add_obstacle do
+      it "adds an obstacle to the group" do
+        subject.add_obstacle(AIXM::Factory.obstacle)
+        subject.obstacles.count.must_equal 1
+        subject.obstacles.first.must_be :grouped?
+        subject.obstacles.first.group.must_equal subject
+      end
+    end
+
+    describe :id do
+      subject do
+        AIXM::Factory.unlinked_obstacle_group
+      end
+
+      it "is derived from the group name" do
+        subject.id.must_equal '462c8d00-981a-0995-09aa-4ba39161bb41'
+        subject.name = 'Oggy'
+        subject.id.must_equal '939de24d-941b-d5a6-3437-df135ddb9906'
+      end
+
+      it "is derived from the xy of the group obstacles" do
+        subject.id.must_equal '462c8d00-981a-0995-09aa-4ba39161bb41'
+        subject.obstacles.first.xy.long = 1
+        subject.id.must_equal '819d6977-5301-14d3-6d2e-1de007d922e1'
+      end
+    end
+
+    describe :to_xml do
+      subject do
+        AIXM::Factory.unlinked_obstacle_group
+      end
+
+      it "builds correct AIXM" do
+        AIXM.aixm!
+        subject.to_xml.must_equal <<~END
+          <!-- Obstacle: [wind_turbine] 44.67501389N 004.87256667E LA TEISSONIERE 1 -->
+          <Obs>
+            <ObsUid>
+              <geoLat>444030.05N</geoLat>
+              <geoLong>0045221.24E</geoLong>
+            </ObsUid>
+            <txtName>LA TEISSONIERE 1</txtName>
+            <txtDescrType>WINDTURBINE</txtDescrType>
+            <codeGroup>Y</codeGroup>
+            <codeLgt>N</codeLgt>
+            <codeDatum>WGE</codeDatum>
+            <valGeoAccuracy>50</valGeoAccuracy>
+            <uomGeoAccuracy>M</uomGeoAccuracy>
+            <valElev>1764</valElev>
+            <valElevAccuracy>33</valElevAccuracy>
+            <valHgt>262</valHgt>
+            <uomDistVer>FT</uomDistVer>
+          </Obs>
+          <!-- Obstacle: [wind_turbine] 44.67946667N 004.87381111E LA TEISSONIERE 2 -->
+          <Obs>
+            <ObsUid>
+              <geoLat>444046.08N</geoLat>
+              <geoLong>0045225.72E</geoLong>
+            </ObsUid>
+            <txtName>LA TEISSONIERE 2</txtName>
+            <txtDescrType>WINDTURBINE</txtDescrType>
+            <codeGroup>Y</codeGroup>
+            <codeLgt>N</codeLgt>
+            <codeDatum>WGE</codeDatum>
+            <valGeoAccuracy>50</valGeoAccuracy>
+            <uomGeoAccuracy>M</uomGeoAccuracy>
+            <valElev>1738</valElev>
+            <valElevAccuracy>33</valElevAccuracy>
+            <valHgt>262</valHgt>
+            <uomDistVer>FT</uomDistVer>
+          </Obs>
+        END
+      end
+
+      it "builds correct OFMX" do
+        AIXM.ofmx!
+        subject.to_xml.must_equal <<~END
+          <!-- Obstacle: [wind_turbine] 44.67501389N 004.87256667E LA TEISSONIERE 1 -->
+          <Obs>
+            <ObsUid>
+              <geoLat>44.67501389N</geoLat>
+              <geoLong>004.87256667E</geoLong>
+            </ObsUid>
+            <txtName>LA TEISSONIERE 1</txtName>
+            <codeType>WINDTURBINE</codeType>
+            <codeLgt>N</codeLgt>
+            <codeMarking>N</codeMarking>
+            <codeDatum>WGE</codeDatum>
+            <valGeoAccuracy>50</valGeoAccuracy>
+            <uomGeoAccuracy>M</uomGeoAccuracy>
+            <valElev>1764</valElev>
+            <valElevAccuracy>33</valElevAccuracy>
+            <valHgt>262</valHgt>
+            <codeHgtAccuracy>N</codeHgtAccuracy>
+            <uomDistVer>FT</uomDistVer>
+            <valRadius>80</valRadius>
+            <uomRadius>M</uomRadius>
+            <codeGroupId>462c8d00-981a-0995-09aa-4ba39161bb41</codeGroupId>
+            <txtGroupName>MIRMANDE EOLIENNES</txtGroupName>
+          </Obs>
+          <!-- Obstacle: [wind_turbine] 44.67946667N 004.87381111E LA TEISSONIERE 2 -->
+          <Obs>
+            <ObsUid>
+              <geoLat>44.67946667N</geoLat>
+              <geoLong>004.87381111E</geoLong>
+            </ObsUid>
+            <txtName>LA TEISSONIERE 2</txtName>
+            <codeType>WINDTURBINE</codeType>
+            <codeLgt>N</codeLgt>
+            <codeMarking>N</codeMarking>
+            <codeDatum>WGE</codeDatum>
+            <valGeoAccuracy>50</valGeoAccuracy>
+            <uomGeoAccuracy>M</uomGeoAccuracy>
+            <valElev>1738</valElev>
+            <valElevAccuracy>33</valElevAccuracy>
+            <valHgt>262</valHgt>
+            <codeHgtAccuracy>N</codeHgtAccuracy>
+            <uomDistVer>FT</uomDistVer>
+            <valRadius>80</valRadius>
+            <uomRadius>M</uomRadius>
+            <codeGroupId>462c8d00-981a-0995-09aa-4ba39161bb41</codeGroupId>
+            <txtGroupName>MIRMANDE EOLIENNES</txtGroupName>
+          </Obs>
+        END
+      end
+    end
+  end
+
+  describe "linked group" do
+    subject do
+      AIXM.obstacle_group(name: "Mirmande éoliennes")
+    end
+
+    describe :add_obstacle do
+      it "adds an obstacle to the group and links it to previous" do
+        subject.add_obstacle(AIXM::Factory.obstacle)
+        subject.add_obstacle(AIXM::Factory.obstacle, linked_to: :previous, link_type: :cable)
+        subject.obstacles.count.must_equal 2
+        subject.obstacles.last.linked_to.must_equal subject.obstacles.first
+        subject.obstacles.last.link_type.must_equal :cable
+      end
+
+      it "adds an obstacle to the group and links it to another obstacle" do
+        subject.add_obstacle(AIXM::Factory.obstacle)
+        subject.add_obstacle(AIXM::Factory.obstacle, linked_to: subject.obstacles.first, link_type: :solid)
+        subject.obstacles.count.must_equal 2
+        subject.obstacles.last.linked_to.must_equal subject.obstacles.first
+        subject.obstacles.last.link_type.must_equal :solid
+      end
+    end
+
+    describe :to_xml do
+      subject do
+        AIXM::Factory.linked_obstacle_group
+      end
+
+      it "builds correct AIXM" do
+        AIXM.aixm!
+        subject.to_xml.must_equal <<~END
+          <!-- Obstacle: [mast] 52.29639722N 002.10675278W DROITWICH LW NORTH -->
+          <Obs>
+            <ObsUid>
+              <geoLat>521747.03N</geoLat>
+              <geoLong>0020624.31W</geoLong>
+            </ObsUid>
+            <txtName>DROITWICH LW NORTH</txtName>
+            <txtDescrType>MAST</txtDescrType>
+            <codeGroup>Y</codeGroup>
+            <codeLgt>N</codeLgt>
+            <codeDatum>WGE</codeDatum>
+            <valGeoAccuracy>0</valGeoAccuracy>
+            <uomGeoAccuracy>M</uomGeoAccuracy>
+            <valElev>848</valElev>
+            <valElevAccuracy>0</valElevAccuracy>
+            <valHgt>700</valHgt>
+            <uomDistVer>FT</uomDistVer>
+          </Obs>
+          <!-- Obstacle: [mast] 52.29457778N 002.10568611W DROITWICH LW NORTH -->
+          <Obs>
+            <ObsUid>
+              <geoLat>521740.48N</geoLat>
+              <geoLong>0020620.47W</geoLong>
+            </ObsUid>
+            <txtName>DROITWICH LW NORTH</txtName>
+            <txtDescrType>MAST</txtDescrType>
+            <codeGroup>Y</codeGroup>
+            <codeLgt>N</codeLgt>
+            <codeDatum>WGE</codeDatum>
+            <valGeoAccuracy>0</valGeoAccuracy>
+            <uomGeoAccuracy>M</uomGeoAccuracy>
+            <valElev>848</valElev>
+            <valElevAccuracy>0</valElevAccuracy>
+            <valHgt>700</valHgt>
+            <uomDistVer>FT</uomDistVer>
+          </Obs>
+        END
+      end
+
+      it "builds correct OFMX" do
+        AIXM.ofmx!
+        subject.to_xml.must_equal <<~END
+          <!-- Obstacle: [mast] 52.29639722N 002.10675278W DROITWICH LW NORTH -->
+          <Obs>
+            <ObsUid>
+              <geoLat>52.29639722N</geoLat>
+              <geoLong>002.10675278W</geoLong>
+            </ObsUid>
+            <txtName>DROITWICH LW NORTH</txtName>
+            <codeType>MAST</codeType>
+            <codeLgt>N</codeLgt>
+            <codeMarking>N</codeMarking>
+            <codeDatum>WGE</codeDatum>
+            <valGeoAccuracy>0</valGeoAccuracy>
+            <uomGeoAccuracy>M</uomGeoAccuracy>
+            <valElev>848</valElev>
+            <valElevAccuracy>0</valElevAccuracy>
+            <valHgt>700</valHgt>
+            <codeHgtAccuracy>Y</codeHgtAccuracy>
+            <uomDistVer>FT</uomDistVer>
+            <valRadius>200</valRadius>
+            <uomRadius>M</uomRadius>
+            <codeGroupId>18e65683-798d-0941-8de4-cb65a6427035</codeGroupId>
+            <txtGroupName>DROITWICH LONGWAVE ANTENNA</txtGroupName>
+          </Obs>
+          <!-- Obstacle: [mast] 52.29457778N 002.10568611W DROITWICH LW NORTH -->
+          <Obs>
+            <ObsUid>
+              <geoLat>52.29457778N</geoLat>
+              <geoLong>002.10568611W</geoLong>
+            </ObsUid>
+            <txtName>DROITWICH LW NORTH</txtName>
+            <codeType>MAST</codeType>
+            <codeLgt>N</codeLgt>
+            <codeMarking>N</codeMarking>
+            <codeDatum>WGE</codeDatum>
+            <valGeoAccuracy>0</valGeoAccuracy>
+            <uomGeoAccuracy>M</uomGeoAccuracy>
+            <valElev>848</valElev>
+            <valElevAccuracy>0</valElevAccuracy>
+            <valHgt>700</valHgt>
+            <codeHgtAccuracy>Y</codeHgtAccuracy>
+            <uomDistVer>FT</uomDistVer>
+            <valRadius>200</valRadius>
+            <uomRadius>M</uomRadius>
+            <codeGroupId>18e65683-798d-0941-8de4-cb65a6427035</codeGroupId>
+            <txtGroupName>DROITWICH LONGWAVE ANTENNA</txtGroupName>
+            <ObsUidLink>
+              <geoLat>52.29639722N</geoLat>
+              <geoLong>002.10675278W</geoLong>
+            </ObsUidLink>
+            <codeLinkType>CABLE</codeLinkType>
+          </Obs>
+        END
+      end
+    end
+  end
+end

data/spec/lib/aixm/feature/obstacle_spec.rb

@@ -0,0 +1,285 @@
+require_relative '../../../spec_helper'
+
+describe AIXM::Feature::Obstacle do
+  subject do
+    AIXM::Factory.obstacle
+  end
+
+  describe :initialize do
+    it "sets defaults" do
+      subject = AIXM.obstacle(
+        type: :tower,
+        xy: AIXM.xy(lat: %q(48°51'29.7"N), long: %q(002°17'40.52"E)),
+        radius: AIXM.d(88, :m),
+        z: AIXM.z(1187 , :qnh)
+      )
+      subject.wont_be :lighting
+      subject.wont_be :marking
+      subject.wont_be :height_accurate
+    end
+  end
+
+  describe :name= do
+    it "fails on invalid values" do
+      [:foobar, 123].wont_be_written_to subject, :name
+    end
+
+    it "upcases and transcodes valid values" do
+      subject.tap { |s| s.name = 'Teufelsbrücke' }.name.must_equal 'TEUFELSBRUECKE'
+    end
+  end
+
+  describe :type= do
+    it "fails on invalid values" do
+      [nil, :foobar].wont_be_written_to subject, :type
+    end
+
+    it "looks up valid values" do
+      subject.tap { |s| s.type = :WINDTURBINE }.type.must_equal :wind_turbine
+      subject.tap { |s| s.type = :TOWER }.type.must_equal :tower
+    end
+  end
+
+  describe :xy= do
+    macro :xy
+
+    it "fails on nil values" do
+      [nil].wont_be_written_to subject, :xy
+    end
+  end
+
+  describe :radius= do
+    it "fails on invalid values" do
+      [nil, :foobar, 123, AIXM.d(0, :m)].wont_be_written_to subject, :radius
+    end
+
+    it "accepts valid values" do
+      [AIXM::Factory.d].must_be_written_to subject, :radius
+    end
+  end
+
+  describe :z= do
+    macro :z_qnh
+
+    it "fails on nil values" do
+      [nil].wont_be_written_to subject, :z
+    end
+  end
+
+  describe :lighting= do
+    it "fails on invalid values" do
+      [:foobar, 123].wont_be_written_to subject, :lighting
+    end
+
+    it "accepts valid values" do
+      [true, false, nil].must_be_written_to subject, :lighting
+    end
+  end
+
+  describe :lighting_remarks= do
+    it "accepts nil value" do
+      [nil].must_be_written_to subject, :lighting_remarks
+    end
+
+    it "stringifies valid values" do
+      subject.tap { |s| s.lighting_remarks = 'foobar' }.lighting_remarks.must_equal 'foobar'
+      subject.tap { |s| s.lighting_remarks = 123 }.lighting_remarks.must_equal '123'
+    end
+  end
+
+  describe :marking= do
+    it "fails on invalid values" do
+      [:foobar, 123].wont_be_written_to subject, :marking
+    end
+
+    it "accepts valid values" do
+      [true, false, nil].must_be_written_to subject, :marking
+    end
+  end
+
+  describe :marking_remarks= do
+    it "accepts nil value" do
+      [nil].must_be_written_to subject, :marking_remarks
+    end
+
+    it "stringifies valid values" do
+      subject.tap { |s| s.marking_remarks = 'foobar' }.marking_remarks.must_equal 'foobar'
+      subject.tap { |s| s.marking_remarks = 123 }.marking_remarks.must_equal '123'
+    end
+  end
+
+  describe :height= do
+    it "fails on invalid values" do
+      [:foobar, 123, AIXM.d(0, :m)].wont_be_written_to subject, :height
+    end
+
+    it "accepts valid values" do
+      [nil, AIXM::Factory.d].must_be_written_to subject, :height
+    end
+  end
+
+  describe :xy_accuracy= do
+    it "fails on invalid values" do
+      [:foobar, 123].wont_be_written_to subject, :xy_accuracy
+    end
+
+    it "accepts valid values" do
+      [nil, AIXM::Factory.d, AIXM.d(0, :m)].must_be_written_to subject, :xy_accuracy
+    end
+  end
+
+  describe :z_accuracy= do
+    it "fails on invalid values" do
+      [:foobar, 123].wont_be_written_to subject, :z_accuracy
+    end
+
+    it "accepts valid values" do
+      [nil, AIXM::Factory.d, AIXM.d(0, :m)].must_be_written_to subject, :z_accuracy
+    end
+  end
+
+  describe :height_accurate= do
+    it "fails on invalid values" do
+      [:foobar, 123].wont_be_written_to subject, :height_accurate
+    end
+
+    it "accepts valid values" do
+      [true, false, nil].must_be_written_to subject, :height_accurate
+    end
+  end
+
+  describe :valid_from= do
+    it "fails on invalid values" do
+      ['foobar', '2018-01-77'].wont_be_written_to subject, :valid_from
+    end
+
+    it "accepts nil value" do
+      [nil].must_be_written_to subject, :valid_from
+    end
+
+    it "parses dates and times" do
+      string = '2018-01-01 12:00:00 +0100'
+      subject.tap { |s| s.valid_from = string }.valid_from.must_equal Time.parse(string)
+    end
+  end
+
+  describe :valid_until= do
+    it "fails on invalid values" do
+      ['foobar', '2018-01-77'].wont_be_written_to subject, :valid_until
+    end
+
+    it "accepts nil value" do
+      [nil].must_be_written_to subject, :valid_until
+    end
+
+    it "parses dates and times" do
+      string = '2018-01-01 12:00:00 +0100'
+      subject.tap { |s| s.valid_until = string }.valid_until.must_equal Time.parse(string)
+    end
+  end
+
+  describe :remarks= do
+    macro :remarks
+  end
+
+  describe :clustered? do
+    it "returns false if no height is set" do
+      subject.tap { |s| s.height = nil }.wont_be :clustered?
+    end
+
+    it "returns true if radius is bigger than height" do
+      subject.tap { |s| s.radius, s.height = AIXM.d(2, :m), AIXM.d(1, :m) }.must_be :clustered?
+    end
+
+    it "returns false if radius is smaller than height" do
+      subject.tap { |s| s.radius, s.height = AIXM.d(1, :m), AIXM.d(2, :m) }.wont_be :clustered?
+    end
+  end
+
+  describe :grouped? do
+    it "returns false since obstacles are not grouped" do
+      subject.wont_be :grouped?
+    end
+  end
+
+  describe :to_xml do
+    it "builds correct AIXM" do
+      AIXM.aixm!
+      subject.to_xml.must_equal <<~END
+        <!-- Obstacle: [tower] 48.85825000N 002.29458889E EIFFEL TOWER -->
+        <Obs>
+          <ObsUid>
+            <geoLat>485129.70N</geoLat>
+            <geoLong>0021740.52E</geoLong>
+          </ObsUid>
+          <txtName>EIFFEL TOWER</txtName>
+          <txtDescrType>TOWER</txtDescrType>
+          <codeGroup>N</codeGroup>
+          <codeLgt>Y</codeLgt>
+          <txtDescrLgt>red strobes</txtDescrLgt>
+          <codeDatum>WGE</codeDatum>
+          <valGeoAccuracy>2</valGeoAccuracy>
+          <uomGeoAccuracy>M</uomGeoAccuracy>
+          <valElev>1187</valElev>
+          <valElevAccuracy>3</valElevAccuracy>
+          <valHgt>1063</valHgt>
+          <uomDistVer>FT</uomDistVer>
+          <txtRmk>Temporary light installations (white strobes, gyro light etc)</txtRmk>
+        </Obs>
+      END
+    end
+
+    it "builds correct OFMX" do
+      AIXM.ofmx!
+      subject.to_xml.must_equal <<~END
+        <!-- Obstacle: [tower] 48.85825000N 002.29458889E EIFFEL TOWER -->
+        <Obs>
+          <ObsUid>
+            <geoLat>48.85825000N</geoLat>
+            <geoLong>002.29458889E</geoLong>
+          </ObsUid>
+          <txtName>EIFFEL TOWER</txtName>
+          <codeType>TOWER</codeType>
+          <codeLgt>Y</codeLgt>
+          <txtDescrLgt>red strobes</txtDescrLgt>
+          <codeDatum>WGE</codeDatum>
+          <valGeoAccuracy>2</valGeoAccuracy>
+          <uomGeoAccuracy>M</uomGeoAccuracy>
+          <valElev>1187</valElev>
+          <valElevAccuracy>3</valElevAccuracy>
+          <valHgt>1063</valHgt>
+          <codeHgtAccuracy>Y</codeHgtAccuracy>
+          <uomDistVer>FT</uomDistVer>
+          <valRadius>88</valRadius>
+          <uomRadius>M</uomRadius>
+          <datetimeValidWef>2018-01-01T12:00:00+01:00</datetimeValidWef>
+          <datetimeValidTil>2019-01-01T12:00:00+01:00</datetimeValidTil>
+          <txtRmk>Temporary light installations (white strobes, gyro light etc)</txtRmk>
+        </Obs>
+      END
+    end
+  end
+end
+
+describe AIXM::Feature::Obstacle::Grouped do
+  subject do
+    AIXM::Factory.unlinked_obstacle_group.obstacles.first
+  end
+
+  describe :grouped? do
+    it "returns true since obstacles are grouped" do
+      subject.must_be :grouped?
+    end
+  end
+
+  describe :linked? do
+    it "returns false for unlinked obstacles" do
+      subject.wont_be :linked?
+    end
+
+    it "returns true for linked obstacles" do
+      subject = AIXM::Factory.linked_obstacle_group.obstacles.last
+      subject.must_be :linked?
+    end
+  end
+end