### Copyright 2020 Pixar

###
###    Licensed under the Apache License, Version 2.0 (the "Apache License")
###    with the following modification; you may not use this file except in
###    compliance with the Apache License and the following modification to it:
###    Section 6. Trademarks. is deleted and replaced with:
###
###    6. Trademarks. This License does not grant permission to use the trade
###       names, trademarks, service marks, or product names of the Licensor
###       and its affiliates, except as required to comply with Section 4(c) of
###       the License and to reproduce the content of the NOTICE file.
###
###    You may obtain a copy of the Apache License at
###
###        http://www.apache.org/licenses/LICENSE-2.0
###
###    Unless required by applicable law or agreed to in writing, software
###    distributed under the Apache License with the above modification is
###    distributed on an "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
###    KIND, either express or implied. See the Apache License for the specific
###    language governing permissions and limitations under the Apache License.
###
###

###
module JSS

  module Criteriable

    #####################################
    ### Module Variables
    #####################################

    #####################################
    ### Module Methods
    #####################################

    #####################################
    ### Classes
    #####################################

    ### This class stores an array of {JSS::Criteriable::Criterion} instances
    ### and provides methods for working with them as a group.
    ###
    ### {JSS::APIObject} subclasses that include {JSS::Criteriable} have a :criteria attribute
    ### which holds one Criteria object.
    ###
    ### Objects that contain Criteria objects need to
    ### - call '#container = self' on their Criteria object when its created.
    ### - implement #should_update, which the Criteria object calls when it changes.
    ###
    ### Both of those tasks are handled by the {JSS::Criteriable} module and are mixed in when
    ### it's included.
    ###
    ### See {JSS::Criteriable} for examples
    ###
    class Criteria

      #####################################
      ### Class Constants
      #####################################

      ### Criterion instances we maintain need these attributes.s
      CRITERION_ATTRIBUTES = [:priority, :and_or, :name, :search_type, :value].freeze

      #####################################
      ### Attributes
      #####################################

      ### @return [Array] the group of JSS::Criteriable::Criterion instances making up these Criteria
      attr_reader :criteria

      ### @return [JSS::APIObject subclass] a reference to the object containing these Criteria
      attr_writer :container

      ###
      ### @param new_criteria[Array<JSS::Criteriable::Criterion>]
      ###
      def initialize(new_criteria = [])
        @criteria = []

        # validates the param and fills @criteria
        self.criteria = new_criteria
      end # init

      ###
      ### Provide a whole new array of JSS::Criteriable::Criterion instances for this Criteria
      ###
      ### @param new_criteria[Array<JSS::Criteriable::Criterion>]
      ###
      ### @return [void]
      ###
      def criteria=(new_criteria)
        unless new_criteria.is_a?(Array) && new_criteria.reject { |c| c.is_a?(JSS::Criteriable::Criterion) }.empty?
          raise JSS::InvalidDataError, 'Argument must be an Array of JSS::Criteriable::Criterion instances.'
        end
        new_criteria.each { |nc| criterion_ok? nc }
        @criteria = new_criteria
        set_priorities
        @container.should_update if @container
      end

      # Remove all criterion objects
      #
      # @return [void]
      def clear
        @criteria = []
        @container.should_update if @container
      end

      ###
      ### Add a new criterion to the end of the criteria
      ###
      ### @param criterion[JSS::Criteriable::Criterion] the new Criterion to store
      ###
      ### @return [void]
      ###
      def append_criterion(criterion)
        criterion_ok? criterion
        criterion.priority = @criteria.length
        @criteria << criterion
        @container.should_update if @container
      end

      ###
      ### Add a new criterion to the beginning of the criteria
      ###
      ### @param criterion[JSS::Criteriable::Criterion] the new Criterion to store
      ###
      ### @return [void]
      ###
      def prepend_criterion(criterion)
        criterion_ok? criterion
        @criteria.unshift criterion
        set_priorities
        @container.should_update if @container
      end

      ###
      ### Add a new criterion to the middle of the criteria
      ###
      ### @param priority[Integer] the priority/index before which to insert the new one.
      ###
      ### @param criterion[JSS::Criteriable::Criterion] the new Criterion to store at that index
      ###
      ### @return [void]
      ###
      def insert_criterion(priority, criterion)
        criterion_ok? criterion
        @criteria.insert criterion[:priority], criterion
        set_priorities
        @container.should_update if @container
      end

      ###
      ### Remove a criterion from the criteria
      ###
      ### @param priority[Integer] the priority/index of the criterion to delete
      ###
      ### @return [void]
      ###
      def delete_criterion(priority)
        if @criteria[priority]
          raise JSS::MissingDataError, "Criteria can't be empty" if @criteria.count == 1
          @criteria.delete_at priority
          set_priorities
        end
        @container.should_update if @container
      end

      ###
      ### Change the details of one specific criterion
      ###
      ### @param priority[Integer] the priority/index of the criterion being changed.
      ###   The index must already exist. Otherwise use
      ###   #append_criterion, #prepend_criterion, or #insert_criterion
      ###
      ### @param criterion[JSS::Criteriable::Criterion] the new Criterion to store at that index
      ###
      ### @return [void]
      ###
      def set_criterion(priority, criterion)
        raise JSS::NoSuchItemError, "No current criterion with priority '#{priority}'" unless @criteria[priority]
        criterion_ok? criterion
        @criteria[priority] = criterion
        set_priorities
        @container.should_update if @container
      end

      ###
      ### Set the priorities of the @criteria to match their array indices
      ###
      ### @return [void]
      ###
      def set_priorities
        @criteria.each_index { |ci| @criteria[ci].priority = ci }
      end

      # Remove the various cached data
      # from the instance_variables used to create
      # pretty-print (pp) output.
      #
      # @return [Array] the desired instance_variables
      #
      def pretty_print_instance_variables
        vars = instance_variables.sort
        vars.delete :@container
        vars
      end

      ###
      ### @return [REXML::Element] the xml element for the criteria
      ###
      ### @note This can't be a private method for this class since container classes must call it
      ###
      ### @api private
      ###
      def rest_xml
        cr = REXML::Element.new 'criteria'
        @criteria.each { |c| cr << c.rest_xml }
        cr
      end # rest_xml

      #####################################
      ### Private Instance Methods
      #####################################
      private

      ###
      ### Chech the validity of a criterion.
      ### Note that this doesn't check the :priority
      ### which is set by methods calling this one.
      ###
      ### Return true or raise an error about the problem
      ###
      def criterion_ok?(criterion)
        raise JSS::InvalidDataError, "Duplicate criterion: #{criterion.signature}" if @criteria.select { |c| c == criterion }.count > 1
        raise JSS::InvalidDataError, "Missing :and_or for criterion: #{criterion.signature}" unless criterion.and_or
        raise JSS::InvalidDataError, "Missing :name for criterion: #{criterion.signature}" unless criterion.name
        raise JSS::InvalidDataError, "Missing :search_type for criterion: #{criterion.signature}" unless criterion.search_type
        raise JSS::InvalidDataError, "Missing :value for criterion: #{criterion.signature}" unless criterion.value
        true
      end

    end # class Criteria

  end # module Criteriable

end # module