module Comable
  class Order < ActiveRecord::Base
    include Comable::Checkout

    belongs_to :customer, class_name: Comable::Customer.name, autosave: false
    belongs_to :payment_method, class_name: Comable::PaymentMethod.name, autosave: false
    belongs_to :shipment_method, class_name: Comable::ShipmentMethod.name, autosave: false
    belongs_to :bill_address, class_name: Comable::Address.name, autosave: true, dependent: :destroy
    belongs_to :ship_address, class_name: Comable::Address.name, autosave: true, dependent: :destroy
    has_many :order_details, dependent: :destroy, class_name: Comable::OrderDetail.name, inverse_of: :order

    accepts_nested_attributes_for :bill_address
    accepts_nested_attributes_for :ship_address
    accepts_nested_attributes_for :order_details

    define_model_callbacks :complete
    before_validation :generate_guest_token, on: :create
    before_validation :clone_addresses_from_customer, on: :create
    after_complete :clone_addresses_to_customer

    scope :complete, -> { where.not(completed_at: nil) }
    scope :incomplete, -> { where(completed_at: nil) }
    scope :by_customer, -> (customer) { where(customer_id: customer) }
    scope :this_month, -> { where(completed_at: Time.now.beginning_of_month..Time.now.end_of_month) }
    scope :this_week, -> { where(completed_at: Time.now.beginning_of_week..Time.now.end_of_week) }
    scope :last_week, -> { where(completed_at: 1.week.ago.beginning_of_week..1.week.ago.end_of_week) }

    delegate :full_name, to: :bill_address, allow_nil: true, prefix: :bill
    delegate :full_name, to: :ship_address, allow_nil: true, prefix: :ship

    class << self
      def morris_keys
        %w( count price )
      end

      def to_morris
        this = (Rails::VERSION::MAJOR == 3) ? scoped : all
        this.group_by { |order| order.completed_at.to_date }.map do |date, orders|
          { date: date, count: orders.count, price: orders.sum(&:total_price) }
        end.to_json
      end
    end

    def complete
      ActiveRecord::Base.transaction do
        run_callbacks :complete do
          save_to_complete.tap { |completed| self.completed_at = nil unless completed }
        end
      end
    end

    def complete!
      Rails.logger.debug '[DEPRECATED] #complete! is deprecated. Please use #next_state method.'
      fail Comable::InvalidOrder unless complete
      self
    end

    def completed?
      !completed_at.nil?
    end

    # TODO: switch to state_machine
    def completing?
      completed_at && completed_at_was.nil?
    end

    def soldout_stocks
      order_details.to_a.select(&:soldout_stock?)
    end

    # 時価商品合計を取得
    def current_item_total_price
      order_details.to_a.sum(&:current_subtotal_price)
    end

    # 売価商品合計を取得
    def item_total_price
      order_details.to_a.sum(&:subtotal_price)
    end

    # 時価送料を取得
    def current_shipment_fee
      shipment_method.try(:fee) || 0
    end

    # 時価合計を取得
    def current_total_price
      current_item_total_price + current_shipment_fee
    end

    private

    def save_to_complete
      self.completed_at = Time.now
      self.shipment_fee = current_shipment_fee
      self.total_price = current_total_price
      generate_code

      order_details.each(&:complete)

      save
    end

    def generate_code
      self.code = loop do
        random_token = "C#{Array.new(11) { rand(9) }.join}"
        break random_token unless self.class.exists?(code: random_token)
      end
    end

    def generate_guest_token
      return if customer
      self.guest_token ||= loop do
        random_token = SecureRandom.urlsafe_base64(nil, false)
        break random_token unless self.class.exists?(guest_token: random_token)
      end
    end

    def clone_addresses_from_customer
      return unless customer
      self.bill_address ||= customer.bill_address.try(:clone)
      self.ship_address ||= customer.ship_address.try(:clone)
    end

    def clone_addresses_to_customer
      return unless customer
      customer.update_bill_address_by bill_address
      customer.update_ship_address_by ship_address
    end
  end
end