adiwg-mdtranslator 0.8.0

data/lib/adiwg/mdtranslator/readers/adiwgJson/modules_0.8.0/module_taxonomy.rb

@@ -0,0 +1,83 @@
+# unpack taxonomy
+# Reader - ADIwg JSON V1 to internal data structure
+
+# History:
+# 	Stan Smith 2013-11-20 original script
+#   Stan Smith 2014-05-02 fixed assignment problem with taxon general scope
+#   Stan Smith 2014-05-02 fixed assignment problem with taxonomic procedures
+#   Stan Smith 2014-07-07 resolve require statements using Mdtranslator.reader_module
+
+require ADIWG::Mdtranslator.reader_module('module_citation', $response[:readerVersionUsed])
+require ADIWG::Mdtranslator.reader_module('module_responsibleParty', $response[:readerVersionUsed])
+require ADIWG::Mdtranslator.reader_module('module_voucher', $response[:readerVersionUsed])
+require ADIWG::Mdtranslator.reader_module('module_taxonClass', $response[:readerVersionUsed])
+
+module Adiwg_Taxonomy
+
+	def self.unpack(hTaxonomy)
+
+		# instance classes needed in script
+		intMetadataClass = InternalMetadata.new
+		intTaxSys = intMetadataClass.newTaxonSystem
+
+		# taxonomy - taxonomy class system - citation
+		if hTaxonomy.has_key?('classificationSystem')
+			aClassSys = hTaxonomy['classificationSystem']
+			unless aClassSys.empty?
+				aClassSys.each do |hCitation|
+					intTaxSys[:taxClassSys] << Adiwg_Citation.unpack(hCitation)
+				end
+			end
+		end
+
+		# taxonomy - general scope
+		if hTaxonomy.has_key?('taxonGeneralScope')
+			s = hTaxonomy['taxonGeneralScope']
+			if s != ''
+				intTaxSys[:taxGeneralScope] = s
+			end
+		end
+
+		# taxonomy - ID reference system
+		# not supported in JSON schema (defaulted to 'unknown')
+
+		# taxonomy - observers - responsible party
+		if hTaxonomy.has_key?('observer')
+			aObservers = hTaxonomy['observer']
+			unless aObservers.empty?
+				aObservers.each do |observer|
+					intTaxSys[:taxObservers] << Adiwg_ResponsibleParty.unpack(observer)
+				end
+			end
+		end
+
+		# taxonomy - taxonomic procedures
+		if hTaxonomy.has_key?('taxonomicProcedure')
+			s = hTaxonomy['taxonomicProcedure']
+			if s != ''
+				intTaxSys[:taxIdProcedures] = s
+			end
+		end
+
+		# taxonomy - voucher
+		if hTaxonomy.has_key?('voucher')
+			hVoucher = hTaxonomy['voucher']
+			unless hVoucher.empty?
+				intTaxSys[:taxVoucher] = Adiwg_Voucher.unpack(hVoucher)
+			end
+		end
+
+		# taxonomy - classification (recursive)
+		if hTaxonomy.has_key?('taxonClass')
+			aTaxClass = hTaxonomy['taxonClass']
+			unless aTaxClass.empty?
+				aTaxClass.each do |hTaxClass|
+					intTaxSys[:taxClasses] << Adiwg_TaxonCl.unpack(hTaxClass)
+				end
+			end
+		end
+
+		return intTaxSys
+	end
+
+end

data/lib/adiwg/mdtranslator/readers/adiwgJson/modules_0.8.0/module_temporalElement.rb

@@ -0,0 +1,71 @@
+# unpack temporal element
+# Reader - ADIwg JSON V1 to internal data structure
+
+# History:
+# 	Stan Smith 2013-11-14 original script
+# 	Stan Smith 2013-11-15
+# 		. revised to handle temporal elements for both feature
+#		  properties and extents
+# 		. multiple temporal elements are allowed per extent
+# 		. each definition will create a new element
+# 	Stan Smith 2013-12-11 modified to handle single temporal element
+#   Stan Smith 2014-07-07 resolve require statements using Mdtranslator.reader_module
+
+require ADIWG::Mdtranslator.reader_module('module_dateTime', $response[:readerVersionUsed])
+require ADIWG::Mdtranslator.reader_module('module_timeInstant', $response[:readerVersionUsed])
+require ADIWG::Mdtranslator.reader_module('module_timePeriod', $response[:readerVersionUsed])
+
+module Adiwg_TemporalElement
+
+	def self.unpack(hTempElement)
+
+		# instance classes needed in script
+		intMetadataClass = InternalMetadata.new
+		aIntTempElements = Array.new
+
+		# temporal element - date
+		if hTempElement.has_key?('date')
+			aDates = hTempElement['date']
+			unless aDates.empty?
+				aDates.each do |s|
+					intTempEle = intMetadataClass.newTemporalElement
+					intTempEle[:date] = Adiwg_DateTime.unpack(s)
+					aIntTempElements << intTempEle
+				end
+			end
+		end
+
+		# temporal element - time instant
+		if hTempElement.has_key?('timeInstant')
+			aTimeInst = hTempElement['timeInstant']
+			unless aTimeInst.empty?
+				aTimeInst.each do |hTimeInst|
+					if hTimeInst.has_key?('timePosition')
+						s = hTimeInst['timePosition']
+						if s != ''
+							intTempEle = intMetadataClass.newTemporalElement
+							intTempEle[:timeInstant] = Adiwg_TimeInstant.unpack(hTimeInst)
+							aIntTempElements << intTempEle
+						end
+					end
+				end
+			end
+		end
+
+		# temporal element - time period
+		if hTempElement.has_key?('timePeriod')
+			aTimePeriod = hTempElement['timePeriod']
+			unless aTimePeriod.empty?
+				aTimePeriod.each do |hTimePeriod|
+					intTempEle = intMetadataClass.newTemporalElement
+					intTempEle[:timePeriod] = Adiwg_TimePeriod.unpack(hTimePeriod)
+					aIntTempElements << intTempEle
+				end
+			end
+		end
+
+		return aIntTempElements
+
+	end
+
+end

data/lib/adiwg/mdtranslator/readers/adiwgJson/modules_0.8.0/module_timeInstant.rb

@@ -0,0 +1,45 @@
+# unpack time instant
+# Reader - ADIwg JSON V1 to internal data structure
+
+# History:
+# 	Stan Smith 2013-12-11 original script
+#   Stan Smith 2014-07-07 resolve require statements using Mdtranslator.reader_module
+
+require ADIWG::Mdtranslator.reader_module('module_dateTime', $response[:readerVersionUsed])
+
+module Adiwg_TimeInstant
+
+	def self.unpack(hTimeInst)
+
+		# instance classes needed in script
+		intMetadataClass = InternalMetadata.new
+
+		# time instant
+		intTimeInst = intMetadataClass.newTimeInstant
+
+		if hTimeInst.has_key?('id')
+			s = hTimeInst['id']
+			if s != ''
+				intTimeInst[:timeID] = s
+			end
+		end
+
+		if hTimeInst.has_key?('description')
+			s = hTimeInst['description']
+			if s != ''
+				intTimeInst[:description] = s
+			end
+		end
+
+		# time instant will only be inserted if time position provided
+		if hTimeInst.has_key?('timePosition')
+			s = hTimeInst['timePosition']
+			if s != ''
+				intTimeInst[:timePosition] = Adiwg_DateTime.unpack(s)
+			end
+		end
+
+		return intTimeInst
+	end
+
+end

data/lib/adiwg/mdtranslator/readers/adiwgJson/modules_0.8.0/module_timePeriod.rb

@@ -0,0 +1,53 @@
+# unpack time period
+# Reader - ADIwg JSON V1 to internal data structure
+
+# History:
+# 	Stan Smith 2013-12-11 original script
+#   Stan Smith 2014-07-07 resolve require statements using Mdtranslator.reader_module
+
+require ADIWG::Mdtranslator.reader_module('module_dateTime', $response[:readerVersionUsed])
+
+module Adiwg_TimePeriod
+
+	def self.unpack(hTimePeriod)
+
+		# instance classes needed in script
+		intMetadataClass = InternalMetadata.new
+
+		# time period
+		intTimePer = intMetadataClass.newTimePeriod
+
+		if hTimePeriod.has_key?('id')
+			s = hTimePeriod['id']
+			if s != ''
+				intTimePer[:timeID] = s
+			end
+		end
+
+		if hTimePeriod.has_key?('description')
+			s = hTimePeriod['description']
+			if s != ''
+				intTimePer[:description] = s
+			end
+		end
+
+		if hTimePeriod.has_key?('beginPosition')
+			s = hTimePeriod['beginPosition']
+			if s != ''
+				intTimePer[:beginTime] = Adiwg_DateTime.unpack(s)
+
+			end
+		end
+
+		if hTimePeriod.has_key?('endPosition')
+			s = hTimePeriod['endPosition']
+			if s != ''
+				intTimePer[:endTime] = Adiwg_DateTime.unpack(s)
+
+			end
+		end
+
+		return intTimePer
+	end
+
+end

data/lib/adiwg/mdtranslator/readers/adiwgJson/modules_0.8.0/module_verticalElement.rb

@@ -0,0 +1,53 @@
+# unpack vertical element
+# Reader - ADIwg JSON V1 to internal data structure
+
+# History:
+# 	Stan Smith 2013-11-18 original script
+# 	Stan Smith 2013-12-11 modified to handle single vertical element
+
+module Adiwg_VerticalElement
+
+	def self.unpack(hVertElement)
+
+		# instance classes needed in script
+		intMetadataClass = InternalMetadata.new
+
+		intVertEle = intMetadataClass.newVerticalElement
+
+		# vertical element - minimum value
+		if hVertElement.has_key?('minimumValue')
+			s = hVertElement['minimumValue']
+			if s != ''
+				intVertEle[:minValue] = s
+			end
+		end
+
+		# vertical element - maximum value
+		if hVertElement.has_key?('maximumValue')
+			s = hVertElement['maximumValue']
+			if s != ''
+				intVertEle[:maxValue] = s
+			end
+		end
+
+		# vertical element - vertical crs title attribute
+		if hVertElement.has_key?('verticalCRSTitle')
+			s = hVertElement['verticalCRSTitle']
+			if s != ''
+				intVertEle[:crsTitle] = s
+			end
+		end
+
+		# vertical element - vertical crs link attribute
+		if hVertElement.has_key?('verticalCRSUri')
+			s = hVertElement['verticalCRSUri']
+			if s != ''
+				intVertEle[:crsURI] = s
+			end
+		end
+
+		return intVertEle
+
+	end
+
+end

data/lib/adiwg/mdtranslator/readers/adiwgJson/modules_0.8.0/module_voucher.rb

@@ -0,0 +1,38 @@
+# unpack voucher
+# Reader - ADIwg JSON V1 to internal data structure
+
+# History:
+# 	Stan Smith 2013-11-21 original script
+#   Stan Smith 2014-07-07 resolve require statements using Mdtranslator.reader_module
+
+require ADIWG::Mdtranslator.reader_module('module_responsibleParty', $response[:readerVersionUsed])
+
+module Adiwg_Voucher
+
+	def self.unpack(hVoucher)
+
+		# instance classes needed in script
+		intMetadataClass = InternalMetadata.new
+		intTaxVoucher = intMetadataClass.newTaxonVoucher
+
+		# taxonomy voucher - specimen
+		if hVoucher.has_key?('specimen')
+			s = hVoucher['specimen']
+			if s != ''
+				intTaxVoucher[:specimen] = s
+			end
+		end
+
+		# taxonomy - repository - responsible party
+		if hVoucher.has_key?('repository')
+			hRepository = hVoucher['repository']
+			unless hRepository.empty?
+				intTaxVoucher[:repository] = Adiwg_ResponsibleParty.unpack(hRepository)
+			end
+		end
+
+		return intTaxVoucher
+
+	end
+
+end

data/lib/adiwg/mdtranslator/validator.rb

@@ -0,0 +1,43 @@
+=begin
+* Description: Patches json-schema gem to work on windows
+* Author: Josh Bradley
+* Date: 2014-09-17
+* License: Public Domain
+=end
+
+module JSON
+
+	class Validator
+
+		def load_ref_schema(parent_schema,ref)
+			uri = URI.parse(ref)
+			if uri.relative?
+				uri = parent_schema.uri.clone
+
+				# Check for absolute path
+				path = ref.split("#")[0]
+
+				# This is a self reference and thus the schema does not need to be re-loaded
+				if path.nil? || path == ''
+					return
+				end
+
+				if path && path[0,1] == '/'
+					uri.path = Pathname.new(path).cleanpath.to_s
+				else
+					uri = parent_schema.uri.merge(path)
+				end
+				uri.fragment = ''
+			end
+
+			if Validator.schemas[uri.to_s].nil?
+				schema = JSON::Schema.new(JSON::Validator.parse(open(uri.to_s.chomp('#')).read), uri, @options[:version])
+				Validator.add_schema(schema)
+				build_schemas(schema)
+			end
+
+		end
+
+	end
+
+end

data/lib/adiwg/mdtranslator/version.rb

@@ -0,0 +1,7 @@
+module ADIWG
+	module Mdtranslator
+		# current mdtranslator version
+		VERSION = "0.8.0"
+	end
+end
+

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

@@ -0,0 +1,91 @@
+# ISO <<Class>> CI_Address
+# writer output in XML
+
+# History:
+# 	Stan Smith 2013-08-09 original script
+
+class CI_Address
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(hAddress)
+
+		deliveryPoints = hAddress[:deliveryPoints].length
+		eMails = hAddress[:eMailList].length
+
+		if deliveryPoints + eMails > 0
+			@xml.tag!('gmd:CI_Address') do
+				# address - address
+				if deliveryPoints > 0
+
+					# address - delivery points (address lines)
+					aDeliveryPoints = hAddress[:deliveryPoints]
+					aDeliveryPoints.each do |myPoint|
+						@xml.tag!('gmd:deliveryPoint') do
+							@xml.tag!('gco:CharacterString',myPoint)
+						end
+					end
+
+				elsif $showAllTags
+					@xml.tag!('gmd:deliveryPoint')
+				end
+
+				# address - city
+				s = hAddress[:city]
+				if !s.nil?
+					@xml.tag!('gmd:city') do
+						@xml.tag!('gco:CharacterString',s)
+					end
+				elsif $showAllTags
+					@xml.tag!('gmd:city')
+				end
+
+				# address - admin area (state)
+				s = hAddress[:adminArea]
+				if !s.nil?
+					@xml.tag!('gmd:administrativeArea') do
+						@xml.tag!('gco:CharacterString',s)
+					end
+				elsif $showAllTags
+					@xml.tag!('gmd:administrativeArea')
+				end
+
+				# address - postal code
+				s = hAddress[:postalCode]
+				if !s.nil?
+					@xml.tag!('gmd:postalCode') do
+						@xml.tag!('gco:CharacterString',s)
+					end
+				elsif $showAllTags
+					@xml.tag!('gmd:postalCode')
+				end
+
+				# address - country
+				s = hAddress[:country]
+				if !s.nil?
+					@xml.tag!('gmd:country') do
+						@xml.tag!('gco:CharacterString',s)
+					end
+				elsif $showAllTags
+					@xml.tag!('gmd:country')
+				end
+
+				# address - email addresses
+				if eMails > 0
+					hAddress[:eMailList].each do |myEmail|
+						@xml.tag!('gmd:electronicMailAddress') do
+							@xml.tag!('gco:CharacterString',myEmail)
+						end
+					end
+				elsif $showAllTags
+					@xml.tag!('gmd:electronicMailAddress')
+				end
+
+			end
+		end
+
+	end
+
+end

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

@@ -0,0 +1,68 @@
+# ISO <<Class>> MD_AggregateInformation
+# writer output in XML
+
+# History:
+# 	Stan Smith 2014-05-29 original script
+#   Stan Smith 2014-07-08 modify require statements to function in RubyGem structure
+
+require 'code_associationType'
+require 'code_initiativeType'
+require 'class_citation'
+
+class MD_AggregateInformation
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(hAssocRes)
+
+		# aggregate information is being supported in the 19115-1 style,
+		# ... aggregateDataSetIdentifier is being dropped and
+		# ... resource identifiers are being carried inside the
+		# ... citation > identifier section
+
+		# classes used
+		assocCode = DS_AssociationTypeCode.new(@xml)
+		initCode = DS_InitiativeTypeCode.new(@xml)
+		citationClass = CI_Citation.new(@xml)
+
+		@xml.tag!('gmd:MD_AggregateInformation') do
+
+			# aggregate information - aggregate data set name - citation
+			hAssocCit = hAssocRes[:resourceCitation]
+			if !hAssocCit.empty?
+				@xml.tag!('gmd:aggregateDataSetName') do
+					citationClass.writeXML(hAssocCit)
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:aggregateDataSetName')
+			end
+
+			# aggregate information - aggregate data set identifier (use citation > identifier)
+
+			# aggregate information - association type
+			s = hAssocRes[:associationType]
+			if !s.nil?
+				@xml.tag!('gmd:associationType') do
+					assocCode.writeXML(s)
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:associationType')
+			end
+
+			# aggregate information - initiative type
+			s = hAssocRes[:resourceType]
+			if !s.nil?
+				@xml.tag!('gmd:initiativeType') do
+					initCode.writeXML(s)
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:initiativeType')
+			end
+
+		end
+
+	end
+
+end

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

@@ -0,0 +1,75 @@
+# ISO <<Class>> EX_BoundingPolygon
+# writer output in XML
+
+# History:
+# 	Stan Smith 2013-11-01 original script
+# 	Stan Smith 2013-11-12 added multi geometry
+# 	Stan Smith 2013-11-13 added line string
+# 	Stan Smith 2013-11-18 added polygon
+#   Stan Smith 2014-05-30 modified for version 0.5.0
+#   Stan Smith 2014-05-30 added multi-point, multi-linestring, multi-polygon support
+#   Stan Smith 2014-07-08 modify require statements to function in RubyGem structure
+
+require 'class_point'
+require 'class_lineString'
+require 'class_multiGeometry'
+require 'class_polygon'
+
+class EX_BoundingPolygon
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(hGeoElement)
+
+		# classes used by MD_Metadata
+		pointClass = Point.new(@xml)
+		lineClass = LineString.new(@xml)
+		multiGeoClass = MultiGeometry.new(@xml)
+		polygonClass = Polygon.new(@xml)
+
+		hGeometry = hGeoElement[:elementGeometry]
+		polyType = hGeometry[:geoType]
+
+		@xml.tag!('gmd:EX_BoundingPolygon') do
+
+			# bounding polygon - extent type - required
+			extentType = hGeoElement[:elementIncludeData]
+			if extentType.nil?
+				@xml.tag!('gmd:extentTypeCode',{'gco:nilReason'=>'missing'})
+			elsif extentType == true || extentType == false
+				@xml.tag!('gmd:extentTypeCode') do
+					@xml.tag!('gco:Boolean',extentType)
+				end
+			else
+				@xml.tag!('gmd:extentTypeCode',{'gco:nilReason'=>extentType})
+			end
+
+			# bounding polygon - polygon - required
+			if hGeometry[:geometry].empty?
+				@xml.tag!('gmd:polygon', {'gco:nilReason' => 'missing'})
+			else
+				@xml.tag!('gmd:polygon') do
+					case polyType
+						when 'Point'
+							pointClass.writeXML(hGeoElement)
+						when 'LineString'
+							lineClass.writeXML(hGeoElement)
+						when 'Polygon'
+							polygonClass.writeXML(hGeoElement)
+						when 'MultiPoint', 'MultiLineString', 'MultiPolygon', 'MultiGeometry'
+							multiGeoClass.writeXML(hGeoElement)
+						when 'MultiGeometry'
+							multiGeoClass.writeXML(hGeoElement)
+						else
+							# log - the bounding polygon type is not supported
+					end
+				end
+			end
+
+		end
+
+	end
+
+end

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

@@ -0,0 +1,51 @@
+# ISO <<Class>> MD_BrowseGraphic
+# writer output in XML
+
+# History:
+# 	Stan Smith 2013-10-17 original script
+
+class MD_BrowseGraphic
+
+	def initialize(xml)
+		@xml = xml
+	end
+
+	def writeXML(graphic)
+
+		@xml.tag!('gmd:MD_BrowseGraphic') do
+
+			# browse graphic - file name - required
+			s = graphic[:bGName]
+			if !s.nil?
+				@xml.tag!('gmd:fileName') do
+					@xml.tag!('gco:CharacterString',s)
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:fileName')
+			end
+
+			# browse graphic - file description
+			s = graphic[:bGDescription]
+			if !s.nil?
+				@xml.tag!('gmd:fileDescription') do
+					@xml.tag!('gco:CharacterString',s)
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:fileDescription')
+			end
+
+			# browse graphic - file type
+			s = graphic[:bGType]
+			if !s.nil?
+				@xml.tag!('gmd:fileType') do
+					@xml.tag!('gco:CharacterString',s)
+				end
+			elsif $showAllTags
+				@xml.tag!('gmd:fileType')
+			end
+
+		end
+
+	end
+
+end