NYULibraries/exlibris-primo

module Exlibris
  module Primo
    module Pnx
      #
      # Handle PNX dedupmgr elements
      #
      module DedupMgr

        def self.included(klass)
          klass.class_eval do
            extend ClassAttributes
          end
        end

        module ClassAttributes
          def duplicated_control_attributes
            @duplicated_control_attributes ||= self.superclass.respond_to?(:duplicated_control_attributes) ?
              self.superclass.duplicated_control_attributes.dup : []
          end

          def add_duplicated_control_attributes *elements
            elements.each do |element|
              duplicated_control_attributes << element unless duplicated_control_attributes.include? element
            end
          end
          protected :add_duplicated_control_attributes

          def remove_duplicated_control_attributes *elements
            duplicated_control_attributes.delete_if do |element|
              elements.include? element
            end
          end
          protected :remove_duplicated_control_attributes
        end

        #
        # Is the record a dedupmrg record?
        #
        def dedupmgr?
          @dedupmgr ||= recordid.match /\Adedupmrg/
        end

        #
        # Return the class level duplicated control attributes
        #
        def duplicated_control_attributes
          @duplicated_control_attributes ||= self.class.duplicated_control_attributes
        end
        protected :duplicated_control_attributes

        #
        # Dynamically set the duplicated control attributes.
        #
        def method_missing(method, *args, &block)
          if(duplicated_control_attributes.include? method)
            control_attribute = method.id2name.singularize
            self.class.send(:define_method, method) do
              variable_name = "@#{method}"
              if !instance_variable_defined?(variable_name)
                if dedupmgr?
                  value = map_values_to_origins(control_attribute)
                elsif respond_to?(control_attribute)
                  value = {recordid => send(control_attribute)}
                else
                  value = {recordid => nil}
                end
                instance_variable_set(variable_name, value)
              end
              instance_variable_get(variable_name)
            end
            send method, *args, &block
          else
            super
          end
        end

        #
        # Tell users we respond to pluralized PNX control elements
        #
        def respond_to?(method, include_private=false)
          (duplicated_control_attributes.include? method) ? true : super
        end

        #
        # Map values to origins for the given field
        #
        def map_values_to_origins(field)
          values_to_origins_map = {}
          xml.root.xpath("control/#{field}").each do |element|
            # Parse subfields, O is origin, V is value
            subfields = parse_subfields(element.inner_text)
            # Map values to the origin
            values_to_origins_map[subfields["O"]] = subfields["V"]
          end
          values_to_origins_map
        end
        private :map_values_to_origins
      end
    end
  end
end