require File.expand_path(File.join(File.dirname(__FILE__),'helper.rb'))
require 'yaml'

class TestFormat <  Test::Unit::TestCase # < Minitest::Test

  include Numerals

  def test_mutated_copy
    f1 = Format[Rounding[precision: 3, base: 2]]

    f2 = f1.set(rounding: :short)
    assert_equal Rounding[precision: 3, base: 2], f1.rounding
    assert_equal Rounding[:short, base: 2], f2.rounding

    f2 = f1.set_rounding(:short)
    assert_equal Rounding[precision: 3, base: 2], f1.rounding
    assert_equal Rounding[:short, base: 2], f2.rounding

    f2 = f1.set(rounding: { precision: 4 })
    assert_equal Rounding[precision: 3, base: 2], f1.rounding
    assert_equal Rounding[precision: 4, base: 2], f2.rounding

    f2 = f1.set_rounding(precision: 4)
    assert_equal Rounding[precision: 3, base: 2], f1.rounding
    assert_equal Rounding[precision: 4, base: 2], f2.rounding

    f2 = f1.set(rounding: Rounding[:short])
    assert_equal Rounding[precision: 3, base: 2], f1.rounding
    assert_equal Rounding[:short, base: 10], f2.rounding

    f2 = f1.set(Rounding[:short])
    assert_equal Rounding[precision: 3, base: 2], f1.rounding
    assert_equal Rounding[:short, base: 10], f2.rounding

    f2 = f1.set_rounding(Rounding[:short])
    assert_equal Rounding[precision: 3, base: 2], f1.rounding
    assert_equal Rounding[:short, base: 10], f2.rounding
  end

  def test_set_base
    f = Format[base: 2, rounding: :short]
    assert_equal 2, f.base
    assert_equal Rounding[:short, base: 2], f.rounding
    f.set_base! 5
    assert_equal 5, f.base
    assert_equal Rounding[:short, base: 5], f.rounding
    f = f[base: 6]
    assert_equal 6, f.base
    assert_equal Rounding[:short, base: 6], f.rounding
  end

  def test_aspects
    f = Format[exact_input: true, rounding: Rounding[precision: 5]]
    assert_equal true, f.exact_input
    assert_equal Rounding[precision: 5], f.rounding
    assert_equal Format::Mode[], f.mode

    f = Format[:exact_input, Rounding[precision: 5]]
    assert_equal true, f.exact_input
    assert_equal Rounding[precision: 5], f.rounding
    assert_equal Format::Mode[], f.mode

    f = Format[Rounding[precision: 5], exact_input: false]
    assert_equal false, f.exact_input
    assert_equal Rounding[precision: 5], f.rounding
    assert_equal Format::Mode[], f.mode

    f = Format[Rounding[precision: 5], mode: :fixed]
    assert_equal false, f.exact_input
    assert_equal Rounding[precision: 5], f.rounding
    assert_equal Format::Mode[:fixed], f.mode

    f = f[exact_input: true]
    assert_equal true, f.exact_input
    assert_equal Rounding[precision: 5], f.rounding
    assert_equal Format::Mode[:fixed], f.mode

    f = f[rounding: { precision: 6 }]
    assert_equal true, f.exact_input
    assert_equal Rounding[precision: 6], f.rounding
    assert_equal Format::Mode[:fixed], f.mode

    f = f.set_exact_input(false)
    assert_equal false, f.exact_input
    assert_equal Rounding[precision: 6], f.rounding
    assert_equal Format::Mode[:fixed], f.mode

    f = f.set_rounding(precision: 10)
    assert_equal false, f.exact_input
    assert_equal Rounding[precision: 10], f.rounding
    assert_equal Format::Mode[:fixed], f.mode

    f = f.set_rounding(precision: 10).set_mode(:engineering)
    assert_equal false, f.exact_input
    assert_equal Rounding[precision: 10], f.rounding
    assert_equal Format::Mode[:engineering], f.mode
  end

  def test_redefine_aspects
    f = Format[Format::Mode[max_leading: 10]]
    f2 = f[Format::Mode[:scientific]]
    assert_equal :scientific, f2.mode.mode
    assert_equal Format[].mode.max_leading, f2.mode.max_leading
    f2 = f[mode: :scientific]
    assert_equal :scientific, f2.mode.mode
    assert_equal 10, f2.mode.max_leading

    f = Format[Rounding[base: 2]]
    f2 = f[Rounding[:short]]
    assert_equal :short, f2.rounding.precision
    assert_equal 10, f2.rounding.base
    f2 = f[rounding: :short]
    assert_equal :short, f2.rounding.precision
    assert_equal 2, f2.rounding.base

    f = Format[Format::Symbols[plus: 'PLUS']]
    f2 = f[Format::Symbols[nan: 'Not a Number']]
    assert_equal 'Not a Number', f2.symbols.nan
    assert_equal '+', f2.symbols.plus
    f2 = f[symbols: { nan: 'Not a Number' }]
    assert_equal 'Not a Number', f2.symbols.nan
    assert_equal 'PLUS', f2.symbols.plus
  end

  def test_repeat_aspect
    s = Format::Symbols[]
    assert_equal '<', s.repeat_begin
    assert_equal '>', s.repeat_end
    assert_equal '...', s.repeat_suffix
    refute s.repeat_delimited
    assert_equal 3, s.repeat_count
    assert s.repeating

    s.set_repeat! false
    refute s.repeating

    s.set_repeat! true, delimiters: '[', count: 2, suffix: '****'
    assert_equal '[', s.repeat_begin
    assert_nil s.repeat_end
    assert_equal '****', s.repeat_suffix
    refute s.repeat_delimited
    assert_equal 2, s.repeat_count
    assert s.repeating

    s.set_repeat! true, delimiters: ['>', '<'], delimited: true
    assert_equal '>', s.repeat_begin
    assert_equal '<', s.repeat_end
    assert s.repeat_delimited
  end

  def test_padding_aspect
    f = Format[]
    refute f.padded?
    assert_equal :right, f.padding.adjust
    f = f[padding:[10, ' ', :left]]
    assert f.padded?
    assert_equal :left, f.padding.adjust
    assert_equal ' ', f.padding.fill
  end

  def tst_grouping
    f = Format[]
    refute f.grouping?
    f.set_grouping! :thousands
    assert f.grouping?
    assert_equal [3], f.grouping
    f.set_grouping! false
    refute f.grouping?
    assert_equal [], f.grouping
  end

end