class Measured::Conversion
  ARBITRARY_CONVERSION_PRECISION = 20
  def initialize
    @base_unit = nil
    @units = []
  end

  attr_reader :base_unit, :units

  def set_base(unit_name, aliases: [], case_sensitive: false)
    add_new_unit(unit_name, aliases: aliases, case_sensitive: case_sensitive, base: true)
  end

  def add(unit_name, aliases: [], case_sensitive: false, value:)
    add_new_unit(unit_name, aliases: aliases, case_sensitive: case_sensitive, value: value)
  end

  def unit_names_with_aliases
    @units.map{|u| u.names}.flatten.sort
  end

  def unit_names
    @units.map{|u| u.name}.sort
  end

  def unit_or_alias?(name)
    @units.each{|unit| return true if unit.names_include?(name)}
    false
  end

  def unit?(name)
    @units.each{|unit| return true if unit.name_eql?(name)}
    false
  end

  def to_unit_name(name)
    unit_for(name).name
  end

  def convert(value, from:, to:)
    raise Measured::UnitError, "Source unit #{ from } does not exits." unless unit?(from)
    raise Measured::UnitError, "Converted unit #{ to } does not exits." unless unit?(to)

    from_unit = unit_for(from)
    to_unit = unit_for(to)

    raise Measured::UnitError, "Cannot find conversion entry from #{ from } to #{ to }" unless conversion = conversion_table[from][to]

    BigDecimal(value.to_r * conversion,ARBITRARY_CONVERSION_PRECISION)
  end

  def conversion_table
    @conversion_table ||= Measured::ConversionTable.new(@units).to_h
  end

  private

  def add_new_unit(unit_name, aliases:, case_sensitive: false, value: nil, base: false)
    if base && @base_unit
      raise Measured::UnitError, "Can only have one base unit. Adding #{ unit_name } but already defined #{ @base_unit }."
    elsif !base && !@base_unit
      raise Measured::UnitError, "A base unit has not yet been set."
    end

    check_for_duplicate_unit_names([unit_name] + aliases)

    unit = Measured::Unit.new(unit_name, aliases: aliases, case_sensitive: case_sensitive, value: value)
    @units << unit
    @base_unit = unit if base

    clear_conversion_table

    unit
  end

  def check_for_duplicate_unit_names(names)
    names.each do |name|
      raise Measured::UnitError, "Unit #{ name } has already been added." if unit_or_alias?(name)
    end
  end

  def unit_for(name)
    @units.each do |unit|
      return unit if unit.names_include?(name.to_s)
    end

    raise Measured::UnitError, "Cannot find unit for #{ name }."
  end

  def clear_conversion_table
    @conversion_table = nil
  end

end