adiwg-mdtranslator 0.8.0

data/lib/adiwg/mdtranslator/writers/iso19115_2/classes/class_multiGeometry.rb

@@ -0,0 +1,140 @@
+# ISO <<Class>> Multi Geometry
+# writer output in XML
+
+# History:
+# 	Stan Smith 2013-11-12 original script
+# 	Stan Smith 2013-11-13 add line string
+#   Stan Smith 2014-05-30 modified for version 0.5.0
+#   Stan Smith 2014-07-08 modify require statements to function in RubyGem structure
+
+require ADIWG::Mdtranslator.reader_module('module_point', $response[:readerVersionUsed])
+require 'class_point'
+require 'class_lineString'
+require 'class_polygon'
+
+class MultiGeometry
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(hGeoElement)
+
+		# classes used
+		intMetadataClass = InternalMetadata.new
+		pointClass = Point.new(@xml)
+		lineClass = LineString.new(@xml)
+		polygonClass = Polygon.new(@xml)
+
+
+		# gml:MultiGeometry attributes
+		attributes = {}
+
+		# gml:MultiGeometry attributes - gml:id - required
+		mGeoID = hGeoElement[:elementId]
+		if mGeoID.nil?
+			$idCount = $idCount.succ
+			mGeoID = 'multiGeo' + $idCount
+		end
+		attributes['gml:id'] = mGeoID
+
+		# gml:MultiGeometry attributes - srsDimension
+		s = hGeoElement[:elementGeometry][:dimension]
+		if !s.nil?
+			attributes[:srsDimension] = s
+		end
+
+		# gml:MultiGeometry attributes - srsName
+		s = hGeoElement[:elementSrs][:srsName]
+		if !s.nil?
+			attributes[:srsName] = s
+		end
+
+		@xml.tag!('gml:MultiGeometry',attributes) do
+
+			# multi geometry - description
+			s = hGeoElement[:elementDescription]
+			if !s.nil?
+				@xml.tag!('gml:description',s)
+			elsif $showAllTags
+				@xml.tag!('gml:description')
+			end
+
+			# multi geometry - name
+			s = hGeoElement[:elementName]
+			if !s.nil?
+				@xml.tag!('gml:name',s)
+			elsif $showAllTags
+				@xml.tag!('gml:name')
+			end
+
+			# GeoJSON multi-objects need to be broken into independent
+			# ... geometry members for ISO representation
+			geoType = hGeoElement[:elementGeometry][:geoType]
+			case geoType
+				when 'MultiPoint'
+					aPoints = hGeoElement[:elementGeometry][:geometry]
+					if !aPoints.empty?
+						@xml.tag!('gml:geometryMembers') do
+							aPoints.each do |aCoords|
+								intPoint = intMetadataClass.newGeoElement
+								intPoint[:elementSrs] = hGeoElement[:elementSrs]
+								intPoint[:elementGeometry] = Adiwg_Point.unpack(aCoords,'Point')
+								pointClass.writeXML(intPoint)
+							end
+						end
+					end
+				when 'MultiLineString'
+					aLines = hGeoElement[:elementGeometry][:geometry]
+					if !aLines.empty?
+						@xml.tag!('gml:geometryMembers') do
+							aLines.each do |aCoords|
+								intLine = intMetadataClass.newGeoElement
+								intLine[:elementSrs] = hGeoElement[:elementSrs]
+								intLine[:elementGeometry] = Adiwg_LineString.unpack(aCoords,'LineString')
+								lineClass.writeXML(intLine)
+							end
+						end
+					end
+				when 'MultiPolygon'
+					aPolygons = hGeoElement[:elementGeometry][:geometry]
+					if !aPolygons.empty?
+						@xml.tag!('gml:geometryMembers') do
+							aPolygons.each do |aCoords|
+								intPolygon = intMetadataClass.newGeoElement
+								intPolygon[:elementSrs] = hGeoElement[:elementSrs]
+								intPolygon[:elementGeometry] = Adiwg_LineString.unpack(aCoords,'Polygon')
+								polygonClass.writeXML(intPolygon)
+							end
+						end
+					end
+			end
+
+			# multi geometry - geometry members
+			# GeoJSON GeometryCollection
+			# GeoJSON FeatureCollection
+			case geoType
+				when 'MultiGeometry'
+					aGeometry = hGeoElement[:elementGeometry][:geometry]
+					if !aGeometry.empty?
+						@xml.tag!('gml:geometryMembers') do
+							aGeometry.each do |hGeometry|
+								hGeoType = hGeometry[:elementGeometry][:geoType]
+								case hGeoType
+									when 'Point'
+										pointClass.writeXML(hGeometry)
+									when 'LineString'
+										lineClass.writeXML(hGeometry)
+									when 'Polygon'
+										polygonClass.writeXML(hGeometry)
+								end
+							end
+						end
+					end
+			end
+
+		end
+
+	end
+
+end

data/lib/adiwg/mdtranslator/writers/iso19115_2/classes/class_onlineResource.rb

@@ -0,0 +1,78 @@
+# ISO <<Class>> CI_OnlineResource
+# writer output in XML
+
+# History:
+# 	Stan Smith 2013-08-14 original script
+#   Stan Smith 2014-07-08 modify require statements to function in RubyGem structure
+#   Stan Smith 2014-08-14 added protocol to onlineResource
+
+require 'code_onlineFunction'
+
+class CI_OnlineResource
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(hOlResource)
+
+		# classes used
+		olFunctionCode = CI_OnLineFunctionCode.new(@xml)
+
+		@xml.tag! 'gmd:CI_OnlineResource' do
+
+			# online resource - link - required
+			s = hOlResource[:olResURI]
+			if s.nil?
+				@xml.tag!('gmd:linkage',{'gco:nilReason'=>'missing'})
+			else
+				@xml.tag!('gmd:linkage') do
+					@xml.tag!('gmd:URL',s)
+				end
+			end
+
+			# online resource - protocol
+			s = hOlResource[:olResProtocol]
+			if !s.nil?
+				@xml.tag!('gmd:protocol') do
+					@xml.tag!('gco:CharacterString',s)
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:protocol')
+			end
+
+			# online resource - link name
+			s = hOlResource[:olResName]
+			if !s.nil?
+				@xml.tag!('gmd:name') do
+					@xml.tag!('gco:CharacterString',s)
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:name')
+			end
+
+			# online resource - link description
+			s = hOlResource[:olResDesc]
+			if !s.nil?
+				@xml.tag!('gmd:description') do
+					@xml.tag!('gco:CharacterString',s)
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:description')
+			end
+
+			# online resource - link function - CI_OnLineFunctionCode
+			s = hOlResource[:olResFunction]
+			if !s.nil?
+				@xml.tag!('gmd:function') do
+					olFunctionCode.writeXML(s)
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:function')
+			end
+
+		end
+
+	end
+
+end

data/lib/adiwg/mdtranslator/writers/iso19115_2/classes/class_point.rb

@@ -0,0 +1,74 @@
+# ISO <<Class>> Point
+# writer output in XML
+
+# History:
+# 	Stan Smith 2013-11-01 original script
+#   Stan Smith 2014-05-30 modified for version 0.5.0
+#   Stan Smith 2014-07-08 modify require statements to function in RubyGem structure
+
+require ADIWG::Mdtranslator.reader_module('module_coordinates', $response[:readerVersionUsed])
+
+class Point
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(hGeoElement)
+
+		# gml:Point attributes
+		attributes = {}
+
+		# gml:Point attributes - gml:id - required
+		pointID = hGeoElement[:elementId]
+		if pointID.nil?
+			$idCount = $idCount.succ
+			pointID = 'point' + $idCount
+		end
+		attributes['gml:id'] = pointID
+
+		# gml:Point attributes - srsDimension
+		s = hGeoElement[:elementGeometry][:dimension]
+		if !s.nil?
+			attributes[:srsDimension] = s
+		end
+
+		# gml:Point attributes - srsName
+		s = hGeoElement[:elementSrs][:srsName]
+		if !s.nil?
+			attributes[:srsName] = s
+		end
+
+		@xml.tag!('gml:Point',attributes) do
+
+			# point - description
+			s = hGeoElement[:elementDescription]
+			if !s.nil?
+				@xml.tag!('gml:description',s)
+			elsif $showAllTags
+				@xml.tag!('gml:description')
+			end
+
+			# point - name
+			s = hGeoElement[:elementName]
+			if !s.nil?
+				@xml.tag!('gml:name',s)
+			elsif $showAllTags
+				@xml.tag!('gml:name')
+			end
+
+			# point - coordinates - required
+			# gml does not support nilReason for coordinates
+			# convert coordinate string from geoJSON to gml
+			s = hGeoElement[:elementGeometry][:geometry]
+			if !s.nil?
+				s = Adiwg_Coordinates.unpack(s)
+				@xml.tag!('gml:coordinates',s)
+			else
+				@xml.tag!('gml:coordinates')
+			end
+		end
+
+	end
+
+end

data/lib/adiwg/mdtranslator/writers/iso19115_2/classes/class_polygon.rb

@@ -0,0 +1,94 @@
+# ISO <<Class>> Polygon
+# writer output in XML
+
+# History:
+# 	Stan Smith 2013-11-18 original script
+#   Stan Smith 2014-05-30 modified for version 0.5.0
+#   Stan Smith 2014-07-08 modify require statements to function in RubyGem structure
+
+require ADIWG::Mdtranslator.reader_module('module_coordinates', $response[:readerVersionUsed])
+
+class Polygon
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(hGeoElement)
+
+		# gml:Polygon attributes
+		attributes = {}
+
+		# gml:Polygon attributes - gml:id - required
+		lineID = hGeoElement[:elementId]
+		if lineID.nil?
+			$idCount = $idCount.succ
+			lineID = 'polygon' + $idCount
+		end
+		attributes['gml:id'] = lineID
+
+		# gml:Polygon attributes - srsDimension
+		s = hGeoElement[:elementGeometry][:dimension]
+		if !s.nil?
+			attributes[:srsDimension] = s
+		end
+
+		# gml:Polygon attributes - srsName
+		s = hGeoElement[:elementSrs][:srsName]
+		if !s.nil?
+			attributes[:srsName] = s
+		end
+
+		@xml.tag!('gml:Polygon',attributes) do
+
+			# polygon - description
+			s = hGeoElement[:elementDescription]
+			if !s.nil?
+				@xml.tag!('gml:description',s)
+			elsif $showAllTags
+				@xml.tag!('gml:description')
+			end
+
+			# polygon - name
+			s = hGeoElement[:elementName]
+			if !s.nil?
+				@xml.tag!('gml:name',s)
+			elsif $showAllTags
+				@xml.tag!('gml:name')
+			end
+
+
+			# polygon - exterior ring
+			# convert coordinate string from geoJSON to gml
+			aCoords = hGeoElement[:elementGeometry][:geometry][:exteriorRing]
+			if !aCoords.empty?
+				s = Adiwg_Coordinates.unpack(aCoords)
+				@xml.tag!('gml:exterior') do
+					@xml.tag!('gml:LinearRing') do
+						@xml.tag!('gml:coordinates',s)
+					end
+				end
+			else
+				@xml.tag!('gml:exterior')
+			end
+
+			# polygon - interior ring
+			# convert coordinate string from geoJSON to gml
+			# XSDs do not all gml:interior to be displayed empty
+			aRings = hGeoElement[:elementGeometry][:geometry][:exclusionRings]
+			unless aRings.empty?
+				aRings.each do |aRing|
+					s = Adiwg_Coordinates.unpack(aRing)
+					@xml.tag!('gml:interior') do
+						@xml.tag!('gml:LinearRing') do
+							@xml.tag!('gml:coordinates', s)
+						end
+					end
+				end
+			end
+
+		end
+
+	end
+
+end

data/lib/adiwg/mdtranslator/writers/iso19115_2/classes/class_processStep.rb

@@ -0,0 +1,81 @@
+# ISO <<Class>> LI_ProcessStep
+# writer output in XML
+
+# History:
+# 	Stan Smith 2013-11-20 original script
+#   Stan Smith 2014-07-09 modify require statements to function in RubyGem structure
+
+require 'module_dateTimeFun'
+require 'class_responsibleParty'
+
+class LI_ProcessStep
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(hProcessStep)
+
+		# classes used
+		rPartyClass = CI_ResponsibleParty.new(@xml)
+
+		# process step - id
+		attributes = {}
+		s = hProcessStep[:stepID]
+		unless s.nil?
+			attributes['id' => s]
+		end
+		@xml.tag!('gmd:LI_ProcessStep',attributes) do
+
+			# process step - description - required
+			s = hProcessStep[:stepDescription]
+			if s.nil?
+				@xml.tag!('gmd:description',{'gco:nilReason'=>'missing'})
+			else
+				@xml.tag!('gmd:description') do
+					@xml.tag!('gco:CharacterString',s)
+				end
+			end
+
+			# process step - rationale
+			s = hProcessStep[:stepRationale]
+			if !s.nil?
+				@xml.tag!('gmd:rationale') do
+					@xml.tag!('gco:CharacterString',s)
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:rationale')
+			end
+
+			# process step - datetime
+			hDateTime = hProcessStep[:stepDateTime]
+			if !hDateTime.empty?
+				date = hDateTime[:dateTime]
+				dateResolution = hDateTime[:dateResolution]
+				s = AdiwgDateTimeFun.stringDateTimeFromDateTime(date,dateResolution)
+				if s != 'ERROR'
+					@xml.tag!('gmd:dateTime') do
+						@xml.tag!('gco:DateTime',s)
+					end
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:dateTime')
+			end
+
+			# process step - processor - CI_ResponsibleParty
+			aProcessors = hProcessStep[:stepProcessors]
+			if !aProcessors.empty?
+				aProcessors.each do |rParty|
+					@xml.tag!('gmd:processor') do
+						rPartyClass.writeXML(rParty)
+					end
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:processor')
+			end
+
+		end
+
+	end
+
+end

data/lib/adiwg/mdtranslator/writers/iso19115_2/classes/class_referenceIdentifier.rb

@@ -0,0 +1,42 @@
+# ISO <<Class>> RS_Identifier
+# writer
+# output for ISO 19115-2 XML
+
+# History:
+# 	Stan Smith 2014-09-03 original script
+
+class RS_Identifier
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(refId, refType)
+
+		@xml.tag!('gmd:RS_Identifier') do
+
+			# identity - code - required
+			# identifiers can be name, epsg number, wkt
+			case refType
+				when 'name'
+					@xml.tag!('gmd:code') do
+						@xml.tag!('gco:CharacterString', refId)
+					end
+
+				when 'epsg'
+					@xml.tag!('gmd:code') do
+						s = 'urn:ocg:def:crs:EPSG::' + refId.to_s
+						@xml.tag!('gco:CharacterString', s)
+					end
+
+				when 'wkt'
+					@xml.tag!('gmd:code') do
+						s = 'WKT::' + refId
+						@xml.tag!('gco:CharacterString', s)
+					end
+			end
+		end
+
+	end
+
+end

data/lib/adiwg/mdtranslator/writers/iso19115_2/classes/class_referenceSystem.rb

@@ -0,0 +1,29 @@
+# ISO <<Class>> MD_ReferenceSystem
+# writer
+# output for ISO 19115-2 XML
+
+# History:
+# 	Stan Smith 2014-09-03 original script
+
+require 'class_referenceIdentifier'
+
+class MD_ReferenceSystem
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(refSystem, refType)
+
+		# classes used by MD_Metadata
+		refIdClass = RS_Identifier.new(@xml)
+
+		@xml.tag!('gmd:MD_ReferenceSystem') do
+			@xml.tag!('gmd:referenceSystemIdentifier') do
+				refIdClass.writeXML(refSystem, refType)
+			end
+		end
+
+	end
+
+end

data/lib/adiwg/mdtranslator/writers/iso19115_2/classes/class_resolution.rb

@@ -0,0 +1,46 @@
+# ISO <<Class>> MD_Resolution
+# writer output in XML
+
+# History:
+# 	Stan Smith 2013-11-19 original script
+
+class MD_Resolution
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(hResolution)
+
+		@xml.tag!('gmd:MD_Resolution') do
+
+			# resolution - specific equivalent scale
+			# resolution - distance
+			# one or the other is required, but not both
+			scale = hResolution[:equivalentScale]
+			distance = hResolution[:distance]
+			uom = hResolution[:distanceUOM]
+			if !scale.nil?
+				@xml.tag!('gmd:equivalentScale') do
+					@xml.tag!('gmd:MD_RepresentativeFraction') do
+						@xml.tag!('gmd:denominator') do
+							@xml.tag!('gco:Integer',scale)
+						end
+					end
+				end
+			elsif !distance.nil?
+				@xml.tag!('gmd:distance') do
+					attributes = {}
+					attributes['uom'] = uom if uom
+					@xml.tag!('gco:Distance',attributes,distance)
+				end
+			else
+				@xml.tag!('gmd:equivalentScale',{'gco:nilReason'=>'missing'})
+				@xml.tag!('gmd:distance',{'gco:nilReason'=>'missing'})
+			end
+
+		end
+
+	end
+
+end

data/lib/adiwg/mdtranslator/writers/iso19115_2/classes/class_responsibleParty.rb

@@ -0,0 +1,90 @@
+# ISO <<Class>> CI_ResponsibleParty
+# writer output in XML
+
+# History:
+# 	Stan Smith 2013-08-13 original script
+#   Stan Smith 2014-05-14 modified for JSON schema 0.4.0
+#   Stan Smith 2014-07-08 modify require statements to function in RubyGem structure
+
+require 'code_role'
+require 'class_contact'
+
+class CI_ResponsibleParty
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(rParty)
+
+		# classes used in MD_Metadata
+		ciContactClass = CI_Contact.new(@xml)
+		ciRoleCode = CI_RoleCode.new(@xml)
+
+		# search array of responsible party for matches in contact object
+		rpID = rParty[:contactID]
+		unless rpID.nil?
+			hContact = ciContactClass.getContact(rpID)
+			unless hContact.empty?
+				@xml.tag!('gmd:CI_ResponsibleParty') do
+
+					# responsible party - individual name
+					s = hContact[:indName]
+					if !s.nil?
+						@xml.tag!('gmd:individualName') do
+							@xml.tag!('gco:CharacterString', hContact[:indName])
+						end
+					elsif $showAllTags
+						@xml.tag!('gmd:individualName')
+					end
+
+					# responsible party - organization name
+					s = hContact[:orgName]
+					if !s.nil?
+						@xml.tag!('gmd:organisationName') do
+							@xml.tag!('gco:CharacterString', hContact[:orgName])
+						end
+					elsif $showAllTags
+						@xml.tag!('gmd:organisationName')
+					end
+
+					# responsible party - position name
+					s = hContact[:position]
+					if !s.nil?
+						@xml.tag!('gmd:positionName') do
+							@xml.tag!('gco:CharacterString', hContact[:position])
+						end
+					elsif $showAllTags
+						@xml.tag!('gmd:positionName')
+					end
+
+					# responsible party - contact info
+					# the following elements belong to CI_Contact
+					if !(hContact[:phones].empty? &&
+						 hContact[:address].empty? &&
+						 hContact[:onlineRes].empty? &&
+						 hContact[:contactInstructions].nil?)
+						@xml.tag!('gmd:contactInfo') do
+							ciContactClass.writeXML(hContact)
+						end
+					elsif $showAllTags
+						@xml.tag!('gmd:contactInfo')
+					end
+
+					# responsible party - role - required
+					s = rParty[:roleName]
+					if s.nil?
+						xml.tag!('gmd:role', {'gco:nilReason' => 'missing'})
+					else
+						@xml.tag! 'gmd:role' do
+							ciRoleCode.writeXML(s)
+						end
+					end
+
+				end
+			end
+		end
+
+	end
+
+end