adiwg-mdtranslator 2.10.0 → 2.12.0.pre

data/lib/adiwg/mdtranslator/writers/fgdc/classes/class_phone.rb

@@ -2,8 +2,11 @@
 # FGDC CSDGM writer output in XML
 
 # History:
+#  Stan Smith 2018-03-16 refactored error and warning messaging
 #  Stan Smith 2017-11-28 original script
 
+require_relative '../fgdc_writer'
+
 module ADIWG
    module Mdtranslator
       module Writers
@@ -14,9 +17,10 @@ module ADIWG
                def initialize(xml, hResponseObj)
                   @xml = xml
                   @hResponseObj = hResponseObj
+                  @NameSpace = ADIWG::Mdtranslator::Writers::Fgdc
                end
 
-               def writeXML(aPhones)
+               def writeXML(aPhones, context = nil)
 
                   # phone 10.5 (cntvoice) - voice phone [] (required)
                   # <- hPhone[:phoneNumber] where hPhone[:phoneServiceTypes] = 'voice'
@@ -30,8 +34,7 @@ module ADIWG
                      end
                   end
                   unless haveVoice
-                     @hResponseObj[:writerPass] = false
-                     @hResponseObj[:writerMessages] << 'Contact is missing voice phone'
+                     @NameSpace.issueWarning(5, 'cntvoice', context)
                   end
 
                   # phone 10.6 (cnttdd) - tty phone []

data/lib/adiwg/mdtranslator/writers/fgdc/classes/class_planarGrid.rb

@@ -0,0 +1,146 @@
+# FGDC <<Class>> PlanarReference
+# FGDC CSDGM writer output in XML
+
+# History:
+#  Stan Smith 2018-03-21 original script
+
+require_relative 'class_mapProjectionTags'
+
+module ADIWG
+   module Mdtranslator
+      module Writers
+         module Fgdc
+
+            class PlanarGrid
+
+               def initialize(xml, hResponseObj)
+                  @xml = xml
+                  @hResponseObj = hResponseObj
+               end
+
+               def writeXML(hProjection)
+
+                  # classes used
+                  classTags = MapProjectionTags.new(@xml, @hResponseObj)
+
+                  # planar 4.1.2.2 (gridsys) - grid coordinate system
+                  # <- hProjection.projectionName = oneOf ...
+                  gridSystem = hProjection[:gridSystem]
+                  case gridSystem
+                     when 'utm'
+                        @xml.tag!('gridsys') do
+                           if hProjection[:gridSystemName].nil?
+                              classTags.write_gridName('Universal Transverse Mercator (UTM)')
+                           else
+                              classTags.write_gridName(hProjection[:gridSystemName])
+                           end
+                           @xml.tag!('utm') do
+                              classTags.write_utmZone(hProjection)
+                              @xml.tag!('transmer') do
+                                 classTags.write_scaleFactorCM(hProjection)
+                                 classTags.write_longCM(hProjection)
+                                 classTags.write_latPO(hProjection)
+                                 classTags.write_falseNE(hProjection)
+                              end
+                           end
+                        end
+                     when 'ups'
+                        @xml.tag!('gridsys') do
+                           if hProjection[:gridSystemName].nil?
+                              classTags.write_gridName('Universal Polar Stereographic (UPS)')
+                           else
+                              classTags.write_gridName(hProjection[:gridSystemName])
+                           end
+                           @xml.tag!('ups') do
+                              classTags.write_upsZone(hProjection)
+                              @xml.tag!('polarst') do
+                                 classTags.write_straightFromPole(hProjection)
+                                 if hProjection[:standardParallel1] || hProjection[:standardParallel2]
+                                    classTags.write_standParallel(hProjection)
+                                 elsif hProjection[:scaleFactorAtProjectionOrigin]
+                                    classTags.write_scaleFactorPO(hProjection)
+                                 end
+                                 classTags.write_falseNE(hProjection)
+                              end
+                           end
+                        end
+                     when 'spcs'
+                        @xml.tag!('gridsys') do
+                           if hProjection[:gridSystemName].nil?
+                              classTags.write_gridName('State Plane Coordinate System')
+                           else
+                              classTags.write_gridName(hProjection[:gridSystemName])
+                           end
+                           @xml.tag!('spcs') do
+                              classTags.write_spcsZone(hProjection)
+                              if hProjection[:standardParallel1] || hProjection[:standardParallel2]
+                                 @xml.tag!('lambertc') do
+                                    classTags.write_standParallel(hProjection)
+                                    classTags.write_longCM(hProjection)
+                                    classTags.write_latPO(hProjection)
+                                    classTags.write_falseNE(hProjection)
+                                 end
+                              elsif hProjection[:scaleFactorAtCenterLine]
+                                 @xml.tag!('obqmerc') do
+                                    classTags.write_scaleFactorCL(hProjection)
+                                    if hProjection[:obliqueLinePoints].empty?
+                                       classTags.write_obliqueLineAzimuth(hProjection)
+                                    else
+                                       @xml.tag!('obqlpt') do
+                                          hProjection[:obliqueLinePoints].each do |hLinePt|
+                                             classTags.write_obliqueLinePoint(hLinePt)
+                                          end
+                                       end
+                                    end
+                                    classTags.write_latPO(hProjection)
+                                    classTags.write_falseNE(hProjection)
+                                 end
+                              elsif hProjection[:scaleFactorAtCentralMeridian]
+                                 @xml.tag!('transmer') do
+                                    classTags.write_scaleFactorCM(hProjection)
+                                    classTags.write_longCM(hProjection)
+                                    classTags.write_latPO(hProjection)
+                                    classTags.write_falseNE(hProjection)
+                                 end
+                              else
+                                 @xml.tag!('polycon') do
+                                    classTags.write_longCM(hProjection)
+                                    classTags.write_latPO(hProjection)
+                                    classTags.write_falseNE(hProjection)
+                                 end
+                              end
+                           end
+                        end
+                     when 'arcsys'
+                        @xml.tag!('gridsys') do
+                           if hProjection[:gridSystemName].nil?
+                              classTags.write_gridName('Equal Arc-second Coordinate System')
+                           else
+                              classTags.write_gridName(hProjection[:gridSystemName])
+                           end
+                           @xml.tag!('arcsys') do
+                              classTags.write_arcZone(hProjection)
+                              if hProjection[:standardParallel1] || hProjection[:standardParallel2]
+                                 @xml.tag!('equirect') do
+                                    classTags.write_standParallel(hProjection)
+                                    classTags.write_longCM(hProjection)
+                                    classTags.write_falseNE(hProjection)
+                                 end
+                              elsif hProjection[:latitudeOfProjectionOrigin]
+                                 @xml.tag!('azimequi') do
+                                    classTags.write_longCM(hProjection)
+                                    classTags.write_latPO(hProjection)
+                                    classTags.write_falseNE(hProjection)
+                                 end
+                              end
+                           end
+                        end
+                  end
+
+               end # writeXML
+            end # PlanarGrid
+
+         end
+      end
+   end
+end

data/lib/adiwg/mdtranslator/writers/fgdc/classes/class_planarInfo.rb

@@ -0,0 +1,168 @@
+# FGDC <<Class>> SpatialReference
+# FGDC CSDGM writer output in XML
+
+# History:
+#  Stan Smith 2018-03-20 refactored error and warning messaging
+#  Stan Smith 2018-01-12 original script
+
+require_relative '../fgdc_writer'
+
+module ADIWG
+   module Mdtranslator
+      module Writers
+         module Fgdc
+
+            class PlanarInformation
+
+               def initialize(xml, hResponseObj)
+                  @xml = xml
+                  @hResponseObj = hResponseObj
+                  @NameSpace = ADIWG::Mdtranslator::Writers::Fgdc
+               end
+
+               def writeXML(aRepTypes, aResolutions)
+
+                  # <- spatialReferencesTypes[] (encoding method) 4.1.2.4.1
+                  # <- spatialResolution[].coordinateResolution (coordinate representation) 4.1.2.4.2
+                  # <- spatialResolution[].bearingDistanceResolution (bearing-distance representation) 4.1.2.4.3
+                  # <- spatialResolution[] (distance units) 4.1.2.4.4
+
+                  haveCInfo = false
+                  haveCInfo = true unless aRepTypes.empty?
+                  aResolutions.each do |hResolution|
+                     haveCInfo = true if hResolution[:coordinateResolution]
+                     haveCInfo = true if hResolution[:bearingDistanceResolution]
+                  end
+                  unitOfMeasure = nil
+
+                  # coordinate information 4.1.2.4 (planci) - planar coordinate information
+                  if haveCInfo
+                     @xml.tag!('planci') do
+
+                        # coordinate information 4.1.2.4.1 (plance) - planar coordinate encoding method (required)
+                        # <- spatialRepresentationTypes[].first
+                        unless aRepTypes.empty?
+                           @xml.tag!('plance', aRepTypes[0])
+                        end
+                        if aRepTypes.empty?
+                           @NameSpace.issueWarning(260, 'plance')
+                        end
+
+                        # <- spatialResolutions[] look for coordinateResolution or bearingDistanceResolution
+                        # take first one encountered, only one is permitted in FGDC
+                        aResolutions.each do |hResolution|
+                           unless hResolution[:coordinateResolution].empty?
+                              hCoordRes = hResolution[:coordinateResolution]
+
+                              # coordinate information 4.1.2.4.2 (coordrep) - coordinate representation
+                              @xml.tag!('coordrep') do
+
+                                 # coordinate information 4.1.2.4.2.1 (absres) - abscissa resolution (required)
+                                 unless hCoordRes[:abscissaResolutionX].nil?
+                                    @xml.tag!('absres', hCoordRes[:abscissaResolutionX].to_f)
+                                 end
+                                 if hCoordRes[:abscissaResolutionX].nil?
+                                    @NameSpace.issueWarning(261, 'absres')
+                                 end
+
+                                 # coordinate information 4.1.2.4.2.2 (ordres) - ordinate resolution (required)
+                                 unless hCoordRes[:ordinateResolutionY].nil?
+                                    @xml.tag!('ordres', hCoordRes[:ordinateResolutionY].to_f)
+                                 end
+                                 if hCoordRes[:ordinateResolutionY].nil?
+                                    @NameSpace.issueWarning(262, 'ordres')
+                                 end
+
+                                 # coordinate information 4.1.2.4.4 (plandu) - distance unit of measure (required)
+                                 unless hCoordRes[:unitOfMeasure].nil?
+                                    unitOfMeasure = hCoordRes[:unitOfMeasure]
+                                 end
+                                 if hCoordRes[:unitOfMeasure].nil?
+                                    @NameSpace.issueWarning(263, 'plandu')
+                                 end
+
+                              end
+                              break
+                           end
+
+                           unless hResolution[:bearingDistanceResolution].empty?
+                              hBearRes = hResolution[:bearingDistanceResolution]
+
+                              # coordinate information 4.1.2.4.3 (distbrep) - bearing and distance representation
+                              @xml.tag!('distbrep') do
+
+                                 # coordinate information 4.1.2.4.3.1 (distres) - distance resolution (required)
+                                 unless hBearRes[:distanceResolution].nil?
+                                    @xml.tag!('distres', hBearRes[:distanceResolution].to_f)
+                                 end
+                                 if hBearRes[:distanceResolution].nil?
+                                    @NameSpace.issueWarning(264, 'distres')
+                                 end
+
+                                 # coordinate information 4.1.2.4.3.2 (bearres) - bearing resolution (required)
+                                 unless hBearRes[:bearingResolution].nil?
+                                    @xml.tag!('bearres', hBearRes[:bearingResolution])
+                                 end
+                                 if hBearRes[:bearingResolution].nil?
+                                    @NameSpace.issueWarning(265, 'bearres')
+                                 end
+
+                                 # coordinate information 4.1.2.4.3.3 (bearunit) - bearing units of measure (required)
+                                 unless hBearRes[:bearingUnitOfMeasure].nil?
+                                    @xml.tag!('bearunit', hBearRes[:bearingUnitOfMeasure])
+                                 end
+                                 if hBearRes[:bearingUnitOfMeasure].nil?
+                                    @NameSpace.issueWarning(266, 'bearunit')
+                                 end
+
+                                 # coordinate information 4.1.2.4.3.4 (bearrefd) - bearing units of measure (required)
+                                 unless hBearRes[:bearingReferenceDirection].nil?
+                                    @xml.tag!('bearrefd', hBearRes[:bearingReferenceDirection])
+                                 end
+                                 if hBearRes[:bearingReferenceDirection].nil?
+                                    @NameSpace.issueWarning(267, 'bearrefd')
+                                 end
+
+                                 # coordinate information 4.1.2.4.3.5 (bearrefm) - bearing reference meridian (required)
+                                 unless hBearRes[:bearingReferenceMeridian].nil?
+                                    @xml.tag!('bearrefm', hBearRes[:bearingReferenceMeridian])
+                                 end
+                                 if hBearRes[:bearingReferenceMeridian].nil?
+                                    @NameSpace.issueWarning(268, 'bearrefm')
+                                 end
+
+                                 # coordinate information 4.1.2.4.4 (plandu) - distance unit of measure (required)
+                                 unless hBearRes[:distanceUnitOfMeasure].nil?
+                                    unitOfMeasure = hBearRes[:distanceUnitOfMeasure]
+                                 end
+                                 if hBearRes[:distanceUnitOfMeasure].nil?
+                                    @NameSpace.issueWarning(269, 'plandu')
+                                 end
+
+                              end
+
+                           end
+                        end
+
+                        # planar distance units 4.1.2.4.4 (plandu) - (required)
+                        # value and error messages handled in above code
+                        # just write it out here
+                        unless unitOfMeasure.nil?
+                           @xml.tag!('plandu', unitOfMeasure)
+                        end
+
+                     end
+                  end
+
+                  # error message
+                  unless haveCInfo
+                     @NameSpace.issueWarning(270, nil)
+                  end
+
+               end # writeXML
+            end # CoordinateInformation
+
+         end
+      end
+   end
+end

data/lib/adiwg/mdtranslator/writers/fgdc/classes/class_planarLocal.rb

@@ -0,0 +1,42 @@
+# FGDC <<Class>> PlanarReference
+# FGDC CSDGM writer output in XML
+
+# History:
+#  Stan Smith 2018-03-21 original script
+
+require_relative 'class_mapProjectionTags'
+
+module ADIWG
+   module Mdtranslator
+      module Writers
+         module Fgdc
+
+            class PlanarLocal
+
+               def initialize(xml, hResponseObj)
+                  @xml = xml
+                  @hResponseObj = hResponseObj
+               end
+
+               def writeXML(hProjection)
+
+                  # classes used
+                  classTags = MapProjectionTags.new(@xml, @hResponseObj)
+
+                  # planar 4.1.2.3 (localp) - local planar
+                  projection = hProjection[:projection]
+                  if projection == 'localPlanar'
+                     hProjection[:projectionName] = 'local right-handed planar coordinate system'
+                     @xml.tag!('localp') do
+                        classTags.write_localDesc(hProjection)
+                        classTags.write_localGeoInfo(hProjection)
+                     end
+                  end
+
+               end # writeXML
+            end # PlanarReference
+
+         end
+      end
+   end
+end