#-- encoding: UTF-8

#-- copyright
# OpenProject is an open source project management software.
# Copyright (C) 2012-2021 the OpenProject GmbH
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License version 3.
#
# OpenProject is a fork of ChiliProject, which is a fork of Redmine. The copyright follows:
# Copyright (C) 2006-2013 Jean-Philippe Lang
# Copyright (C) 2010-2013 the ChiliProject Team
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
#
# See COPYRIGHT and LICENSE files for more details.
#++

module WorkPackages::Costs
  extend ActiveSupport::Concern

  included do
    belongs_to :budget, inverse_of: :work_packages
    has_many :cost_entries, dependent: :delete_all

    # disabled for now, implements part of ticket blocking
    validate :validate_budget

    after_update :move_cost_entries

    associated_to_ask_before_destruction CostEntry,
                                         ->(work_packages) { CostEntry.on_work_packages(work_packages).count.positive? },
                                         method(:cleanup_cost_entries_before_destruction_of)

    def costs_enabled?
      project&.costs_enabled?
    end

    def validate_budget
      if budget_id_changed? && !(budget_id.blank? || project.budget_ids.include?(budget_id))
        errors.add :budget, :inclusion
      end
    end

    def material_costs
      if respond_to?(:cost_entries_sum) # column has been eager loaded into result set
        cost_entries_sum.to_f
      else
        ::WorkPackage::MaterialCosts.new(user: User.current).costs_of work_packages: self_and_descendants
      end
    end

    def labor_costs
      if respond_to?(:time_entries_sum) # column has been eager loaded into result set
        time_entries_sum.to_f
      else
        ::WorkPackage::LaborCosts.new(user: User.current).costs_of work_packages: self_and_descendants
      end
    end

    def overall_costs
      labor_costs + material_costs
    end

    # Wraps the association to get the Cost Object subject.  Needed for the
    # Query and filtering
    def budget_subject
      budget&.subject
    end

    def move_cost_entries
      return unless saved_change_to_project_id?

      CostEntry
        .where(work_package_id: id)
        .update_all(project_id: project_id)
    end
  end

  class_methods do
    protected

    def cleanup_cost_entries_before_destruction_of(work_packages, user, to_do = { action: 'destroy' })
      work_packages = Array(work_packages)

      return false unless to_do.present?

      case to_do[:action]
      when 'destroy'
        true
        # nothing to do
      when 'nullify'
        work_packages.each do |wp|
          wp.errors.add(:base, :nullify_is_not_valid_for_cost_entries)
        end

        false
      when 'reassign'
        reassign_cost_entries_before_destruction(work_packages, user, to_do[:reassign_to_id])
      else
        false
      end
    end

    def reassign_cost_entries_before_destruction(work_packages, user, ids)
      reassign_to = ::WorkPackage
                      .joins(:project)
                      .merge(Project.allowed_to(user, :edit_cost_entries))
                      .find_by_id(ids)

      if reassign_to.nil?
        work_packages.each do |wp|
          wp.errors.add(:base, :is_not_a_valid_target_for_cost_entries, id: ids)
        end

        false
      else
        condition = "work_package_id = #{reassign_to.id}, project_id = #{reassign_to.project_id}"
        ::WorkPackage.update_cost_entries(work_packages.map(&:id), condition)
      end
    end

    def update_cost_entries(work_packages, action)
      CostEntry.where(work_package_id: work_packages).update_all(action)
    end
  end
end