# unpack distribution info
# Reader - ADIwg JSON V1 to internal data structure

# History:
# 	Stan Smith 2013-09-23 original script
# 	Stan Smith 2013-11-27 changed to receive single distributor rather than array
# 	Stan Smith 2013-12-18 changed to unpack contact using responsible party
#   Stan Smith 2014-05-02 changed to support responsible party as hash, not array
#   Stan Smith 2014-07-08 resolve require statements using Mdtranslator.reader_module

require ADIWG::Mdtranslator.reader_module('module_onlineResource', $response[:readerVersionUsed])
require ADIWG::Mdtranslator.reader_module('module_dateTime', $response[:readerVersionUsed])
require ADIWG::Mdtranslator.reader_module('module_responsibleParty', $response[:readerVersionUsed])

module Md_DistributionInfo

	def self.unpack(hDistributor)

		# instance classes needed in script
		intMetadataClass = InternalMetadata.new
		intDistributor = intMetadataClass.newDistributor

		# distributor - distribution contact
		if hDistributor.has_key?('distributorContact')
			hContact = hDistributor['distributorContact']
			unless hContact.empty?
				intDistributor[:distContact] = Md_ResponsibleParty.unpack(hContact)
			end
		end

		# distributor - distribution order process
		if hDistributor.has_key?('distributionOrderProcess')
			aDistOrder = hDistributor['distributionOrderProcess']
			unless aDistOrder.empty?
				aDistOrder.each do |distOrderProcess|

					intDistOrder = intMetadataClass.newDistOrder

					if distOrderProcess.has_key?('fees')
						s = distOrderProcess['fees']
						if s != ''
							intDistOrder[:fees] = s
						end
					end

					if distOrderProcess.has_key?('plannedAvailabilityDateTime')
						s = distOrderProcess['plannedAvailabilityDateTime']
						if s != ''
							intDistOrder[:plannedDateTime] = Md_DateTime.unpack(s)
						end
					end

					if distOrderProcess.has_key?('orderingInstructions')
						s = distOrderProcess['orderingInstructions']
						if s != ''
							intDistOrder[:orderInstructions] = s
						end
					end

					if distOrderProcess.has_key?('turnaround')
						s = distOrderProcess['turnaround']
						if s != ''
							intDistOrder[:turnaround] = s
						end
					end

					intDistributor[:distOrderProc] << intDistOrder

				end
			end
		end

		# distributor - distribution format
		if hDistributor.has_key?('distributorFormat')
			aDistFormat = hDistributor['distributorFormat']
			unless aDistFormat.empty?

				aDistFormat.each do |distFormat|
					intResFormat = intMetadataClass.newResourceFormat

					if distFormat.has_key?('formatName')
						s = distFormat['formatName']
						if s != ''
							intResFormat[:formatName] = s
						end
					end

					if distFormat.has_key?('version')
						s = distFormat['version']
						if s != ''
							intResFormat[:formatVersion] = s
						end
					end

					intDistributor[:distFormat] << intResFormat
				end
			end
		end

		# distributor - distribution transfer options
		if hDistributor.has_key?('distributorTransferOptions')
			aDistTransOpt = hDistributor['distributorTransferOptions']
			unless aDistTransOpt.empty?

				aDistTransOpt.each do |distTransOpt|
					intTransOpt = intMetadataClass.newDigitalTransOption

					if distTransOpt.has_key?('online')
						aOnlineOption = distTransOpt['online']
						aOnlineOption.each do |hOlOption|
							intTransOpt[:online] << Md_OnlineResource.unpack(hOlOption)
						end
					end

					if distTransOpt.has_key?('offline')
						intOfflineOpt = intMetadataClass.newMedium
						distOfflineOpt = distTransOpt['offline']
						if distOfflineOpt.has_key?('name')
							s = distOfflineOpt['name']
							if s != ''
								intOfflineOpt[:mediumName] = s
							end
						end

						if distOfflineOpt.has_key?('mediumFormat')
							s = distOfflineOpt['mediumFormat']
							if s != ''
								intOfflineOpt[:mediumFormat] = s
							end
						end

						if distOfflineOpt.has_key?('mediumNote')
							s = distOfflineOpt['mediumNote']
							if s != ''
								intOfflineOpt[:mediumNote] = s
							end
						end

						intTransOpt[:offline] = intOfflineOpt
					end

					intDistributor[:distTransOption] << intTransOpt
				end
			end
		end

		return intDistributor
	end

end