# File lib/earth_power.rb, line 114
def self.convert_inches_mm(value)
  value.to_f * INCHES_TO_MM.to_f
end

# File lib/earth_power.rb, line 118
def self.convert_pounds_g(value)
  value.to_f * POUNDS_TO_G.to_f
end

# File lib/earth_power.rb, line 86
def self.get_default_volume(value)
  case value.to_i
    when 0
      return [250, 180, 20]
    when 1
      return [450, 350, 200]
    when 2
      return [300, 300, 400]
    when 3
      return [400, 400, 600]
    when 4
      return [500, 500, 700]
    else
      return [600, 600, 800]
  end
end

# File lib/earth_power.rb, line 103
def self.get_default_weight(value)
  case value.to_i
    when 0
      return 249
    when 1
      return 4500
    else
      return 9000
  end
end

# File lib/earth_power.rb, line 54
def initialize(earnings, base_cost, purchase, category, sipping_fee, is_fba, is_large_business, is_media, storage_days, weight, volume)
  @earnings = earnings.to_i
  @purchase = purchase.to_i
  @category = category
  @sipping_fee = sipping_fee.to_i
  @is_fba = is_fba.to_i
  @is_media = is_media.to_i
  @volume = volume.clone
  @volume_pattern = get_volume_pattern volume
  @weight = weight.to_i
  @weight_pattern = get_weight_pattern weight.to_i
  @storage_days = storage_days.to_i
  @is_large_business = is_large_business.to_i
  @base_cost = base_cost.to_i
  @total_volume = @volume[0].to_f * @volume[1].to_f * @volume[2].to_f / 1000
end

# File lib/earth_power.rb, line 71
def get_profit
  return 0 if @earnings == 0
  contract_fee = get_contract_fee
  category_fee = get_category_fee
  sales_charge = get_sales_charge
  storage_fee = 0
  agent_sipping_fee = 0
  if @is_fba == 1
    storage_fee = get_storage_fee
    agent_sipping_fee = get_agent_sipping_fee
  end
  result = @earnings - @purchase - contract_fee - category_fee - sales_charge -storage_fee - agent_sipping_fee - @base_cost - @sipping_fee
  result.ceil
end

# File lib/earth_power.rb, line 141
def get_volume_pattern(volume)
  return 0 if recursive_measuring(volume, [250, 180, 20])
  return 1 if recursive_measuring(volume, [450, 350, 200])
  return 2 if recursive_measuring(volume, [300, 300, 400])
  return 3 if recursive_measuring(volume, [400, 400, 600])
  return 4 if recursive_measuring(volume, [500, 500, 700])
  5
end

# File lib/earth_power.rb, line 126
def get_weight_pattern(weight)
  if weight < 250
    0
  elsif weight < 9000
    1
  else
    2
  end
end

# File lib/earth_power.rb, line 228
def get_agent_sipping_fee
  type = get_agent_sipping_type
  weight = SIPPING_TYPE_WEIGHT[type]
  coefficient = 0
  if (type == 6 || type == 8) && (@weight - 2000) > 0
    coefficient = (@weight - 2000) / 1000
  end
  weight += coefficient.ceil * CARRY_OVER_KG.to_i
  # ApiRequest.logging("出荷作業手数料 #{SIPPING_TYPE_PACKING[type]}")
  # ApiRequest.logging("発送重量手数料 #{weight}")
  SIPPING_TYPE_PACKING[type].to_i + weight.to_i
end

# File lib/earth_power.rb, line 250
def get_agent_sipping_type
  if @weight_pattern == 2
    @is_large_item = true
    case @volume_pattern
      when 3
        return SIPPING_TYPE_KEYS[1]
      when 4
        return SIPPING_TYPE_KEYS[2]
      when 5
        return SIPPING_TYPE_KEYS[3]
      else
        return SIPPING_TYPE_KEYS[0]
    end
  end
  if is_expensive
    return SIPPING_TYPE_KEYS[4]
  end
  if @is_media == 1
    case @volume_pattern
      when 0
        return SIPPING_TYPE_KEYS[5]
      else
        return SIPPING_TYPE_KEYS[6]
    end
  end
  case @volume_pattern
    when 0
      return SIPPING_TYPE_KEYS[7]
    else
      return SIPPING_TYPE_KEYS[8]
  end
end

# File lib/earth_power.rb, line 170
def get_category_fee
  case @category
    when '本', '洋書', 'コミック', '雑誌', '古本・古書'
      @is_media = 1
      category_fee = 60
    when 'ミュージック', 'DVD', 'PCソフト', 'ゲーム'
      @is_media = 1
      category_fee = 140
    when 'VHS'
      @is_media = 1
      category_fee = 30
    else
      @is_media = 0
      # category_fee = 100
      category_fee = 0
  end
  category_fee
end

# File lib/earth_power.rb, line 211
def get_contract_fee
  return 0 if @is_large_business == 1
  CONTRACT_FEE
end

# File lib/earth_power.rb, line 193
def get_sales_charge
  earnings = @earnings
  case @category
    when '大型家電', 'パソコン・周辺機器', '楽器・音響機器'
      charge = earnings.to_i * 0.08
    when '本', '洋書', 'コミック', '雑誌', '古本・古書', 'ミュージック', 'VHS', 'DVD', 'ゲーム', 'PCソフト', '文房具・オフィス用品', 'ホーム＆キッチン', 'DIY・工具', 'ホビー', 'おもちゃ', 'スポーツ＆アウトドア', '車＆バイク', 'ベビー＆マタニティ'
      charge = earnings.to_i * 0.15
    when 'Kindleストア'
      charge = earnings.to_i * 0.45
    else
      charge = earnings.to_i * 0.10
  end
  charge
end

# File lib/earth_power.rb, line 219
def get_storage_fee
  STORAGE_COEFFICIENT.to_f * ((@total_volume) / STORAGE_VALUE.to_f) * @storage_days
end

# File lib/earth_power.rb, line 241
def is_expensive
  return true if @earnings > 45000 && @is_large_item == 0
  false
end

# File lib/earth_power.rb, line 151
def recursive_measuring(exactly, expected)
  return true if exactly.empty?
  result = false
  exactly.each_with_index do |value, key|
    expected.each_with_index do |pattern, pattern_key|
      if value <= pattern
        exactly.delete_at key
        expected.delete_at pattern_key
        result = recursive_measuring(exactly, expected)
      end
    end
  end
  result
end