# !/usr/bin/env ruby -w

require 'rmagick'
require 'test/unit'
require 'test/unit/ui/console/testrunner' unless RUBY_VERSION[/^1\.9|^2/]

class InfoUT < Test::Unit::TestCase
  def setup
    @info = Magick::Image::Info.new
  end

  def test_options
    # 1-argument form
    assert_nothing_raised { @info['fill'] }
    assert_nil(@info['fill'])

    assert_nothing_raised { @info['fill'] = 'red' }
    assert_equal('red', @info['fill'])

    assert_nothing_raised { @info['fill'] = nil }
    assert_nil(@info['fill'])

    # 2-argument form
    assert_nothing_raised { @info['tiff', 'bits-per-sample'] = 2 }
    assert_equal('2', @info['tiff', 'bits-per-sample'])

    # define and undefine
    assert_nothing_raised { @info.define('tiff', 'bits-per-sample', 4) }
    assert_equal('4', @info['tiff', 'bits-per-sample'])

    assert_nothing_raised { @info.undefine('tiff', 'bits-per-sample') }
    assert_nil(@info['tiff', 'bits-per-sample'])
  end

  def test_antialias
    assert @info.antialias
    assert_nothing_raised { @info.antialias = false }
    assert !@info.antialias
  end

  def test_attenuate
    assert_nothing_raised { @info.attenuate = 10 }
    assert_equal(10, @info.attenuate)
    assert_nothing_raised { @info.attenuate = 5.25 }
    assert_equal(5.25, @info.attenuate)
    assert_nothing_raised { @info.attenuate = nil }
    assert_equal(nil, @info.attenuate)
  end

  def test_authenticate
    assert_nothing_raised { @info.authenticate = 'string' }
    assert_equal('string', @info.authenticate)
  end

  def test_background_color
    assert_nothing_raised { @info.background_color = 'red' }
    red = Magick::Pixel.new(Magick::QuantumRange)
    assert_nothing_raised { @info.background_color = red }
    assert_equal('red', @info.background_color)
    img = Magick::Image.new(20, 20) { self.background_color = 'red' }
    assert_equal('red', img.background_color)
  end

  def test_border_color
    assert_nothing_raised { @info.border_color = 'red' }
    red = Magick::Pixel.new(Magick::QuantumRange)
    assert_nothing_raised { @info.border_color = red }
    assert_equal('red', @info.border_color)
    img = Magick::Image.new(20, 20) { self.border_color = 'red' }
    assert_equal('red', img.border_color)
  end

  def caption
    assert_nothing_raised { @info.caption = 'string' }
    assert_equal('string', @info.caption)
    img = Magick::Image.new(20, 20) { self.caption = 'string' }
    assert_equal('string', img.caption)
  end

  def test_channel
    assert_nothing_raised { @info.channel(Magick::RedChannel) }
    assert_nothing_raised { @info.channel(Magick::RedChannel, Magick::BlueChannel) }
    assert_raise(TypeError) { @info.channel(1) }
    assert_raise(TypeError) { @info.channel(Magick::RedChannel, 1) }
  end

  def test_colorspace
    Magick::ColorspaceType.values.each do |cs|
      assert_nothing_raised { @info.colorspace = cs }
      assert_equal(cs, @info.colorspace)
    end
  end

  def test_comment
    assert_nothing_raised { @info.comment = 'comment' }
    assert_equal('comment', @info.comment)
  end

  def test_compression
    Magick::CompressionType.values.each do |v|
      assert_nothing_raised { @info.compression = v }
      assert_equal(v, @info.compression)
    end
  end

  def test_define
    assert_nothing_raised { @info.define('tiff', 'bits-per-sample', 2) }
    assert_nothing_raised { @info.undefine('tiff', 'bits-per-sample') }
  end

  def test_density
    assert_nothing_raised { @info.density = '72x72' }
    assert_equal('72x72', @info.density)
    assert_nothing_raised { @info.density = Magick::Geometry.new(72, 72) }
    assert_equal('72x72', @info.density)
  end

  def test_delay
    assert_nothing_raised { @info.delay = 60 }
    assert_equal(60, @info.delay)
  end

  def test_depth
    assert_nothing_raised { @info.depth = 8 }
    assert_equal(8, @info.depth)
    assert_nothing_raised { @info.depth = 16 }
    assert_equal(16, @info.depth)
    assert_raise(ArgumentError) { @info.depth = 32 }
  end

  def test_dispose
    Magick::DisposeType.values.each do |v|
      assert_nothing_raised { @info.dispose = v }
      assert_equal(v, @info.dispose)
    end
  end

  def test_dither
    assert_nothing_raised { @info.dither = true }
    assert_equal(true, @info.dither)
    assert_nothing_raised { @info.dither = false }
    assert_equal(false, @info.dither)
  end

  def test_extract
    assert_nothing_raised { @info.extract = '100x100' }
    assert_equal('100x100', @info.extract)
    assert_nothing_raised { @info.extract = Magick::Geometry.new(100, 100) }
    assert_equal('100x100', @info.extract)
  end

  def test_filename
    assert_nothing_raised { @info.filename = 'string' }
    assert_equal('string', @info.filename)
  end

  def test_fill
    assert_nothing_raised { @info.fill }
    assert_nil(@info.fill)

    assert_nothing_raised { @info.fill = 'white' }
    assert_equal('white', @info.fill)

    assert_nothing_raised { @info.fill = nil }
    assert_nil(@info.fill)

    assert_raise(ArgumentError) { @info.fill = 'xxx' }
  end

  def test_font
    assert_nothing_raised { @info.font = 'Arial' }
    assert_equal('Arial', @info.font)
  end

  def test_format
    assert_nothing_raised { @info.format = 'GIF' }
    assert_equal('GIF', @info.format)
  end

  def test_fuzz
    assert_nothing_raised { @info.fuzz = 50 }
    assert_equal(50, @info.fuzz)
    assert_nothing_raised { @info.fuzz = '50%' }
    assert_equal(Magick::QuantumRange * 0.5, @info.fuzz)
  end

  def test_gravity
    Magick::GravityType.values.each do |v|
      assert_nothing_raised { @info.gravity = v }
      assert_equal(v, @info.gravity)
    end
  end

  def test_image_type
    Magick::ImageType.values.each do |v|
      assert_nothing_raised { @info.image_type = v }
      assert_equal(v, @info.image_type)
    end
  end

  def test_interlace
    Magick::InterlaceType.values.each do |v|
      assert_nothing_raised { @info.interlace = v }
      assert_equal(v, @info.interlace)
    end
  end

  def test_label
    assert_nothing_raised { @info.label = 'string' }
    assert_equal('string', @info.label)
  end

  def test_matte_color
    assert_nothing_raised { @info.matte_color = 'red' }
    red = Magick::Pixel.new(Magick::QuantumRange)
    assert_nothing_raised { @info.matte_color = red }
    assert_equal('red', @info.matte_color)
    img = Magick::Image.new(20, 20) { self.matte_color = 'red' }
    assert_equal('red', img.matte_color)
  end

  def test_monitor
    assert_nothing_raised { @info.monitor = -> {} }
    monitor = proc do |mth, q, s|
      assert_equal('resize!', mth)
      assert_instance_of(Fixnum, q)
      assert_instance_of(Fixnum, s)
      true
    end
    img = Magick::Image.new(2000, 2000) { self.monitor = monitor }
    img.resize!(20, 20)
    img.monitor = nil
  end

  def test_monochrome
    assert_nothing_raised { @info.monochrome = true }
    assert @info.monochrome
  end

  def test_orientation
    Magick::OrientationType.values.each do |v|
      assert_nothing_raised { @info.orientation = v }
      assert_equal(v, @info.orientation)
    end
  end

  def test_origin
    assert_nothing_raised { @info.origin = '+10+10' }
    assert_equal('+10+10', @info.origin)
    assert_nothing_raised { @info.origin = Magick::Geometry.new(nil, nil, 10, 10) }
    assert_equal('+10+10', @info.origin)
  end

  def test_page
    assert_nothing_raised { @info.page = '612x792>' }
    assert_equal('612x792>', @info.page)
  end

  def test_pointsize
    assert_nothing_raised { @info.pointsize = 12 }
    assert_equal(12, @info.pointsize)
  end

  def test_quality
    assert_nothing_raised { @info.quality = 75 }
    assert_equal(75, @info.quality)
  end

  def test_sampling_factor
    assert_nothing_raised { @info.sampling_factor = '2x1' }
    assert_equal('2x1', @info.sampling_factor)
  end

  def test_server_name
    assert_nothing_raised { @info.server_name = 'foo' }
    assert_equal('foo', @info.server_name)
  end

  def test_size
    assert_nothing_raised { @info.size = '200x100' }
    assert_equal('200x100', @info.size)
    assert_nothing_raised { @info.size = Magick::Geometry.new(100, 200) }
    assert_equal('100x200', @info.size)
  end

  def test_stroke
    assert_nothing_raised { @info.stroke }
    assert_nil(@info.stroke)

    assert_nothing_raised { @info.stroke = 'white' }
    assert_equal('white', @info.stroke)

    assert_nothing_raised { @info.stroke = nil }
    assert_nil(@info.stroke)

    assert_raise(ArgumentError) { @info.stroke = 'xxx' }
  end

  def test_stroke_width
    assert_nothing_raised { @info.stroke_width = 10 }
    assert_equal(10, @info.stroke_width)
    assert_nothing_raised { @info.stroke_width = 5.25 }
    assert_equal(5.25, @info.stroke_width)
    assert_nothing_raised { @info.stroke_width = nil }
    assert_equal(nil, @info.stroke_width)
  end

  def test_texture
    img = Magick::Image.read('granite:') { self.size = '20x20' }
    assert_nothing_raised { @info.texture = img.first }
  end

  def test_tile_offset
    assert_nothing_raised { @info.tile_offset = '200x100' }
    assert_equal('200x100', @info.tile_offset)
    assert_nothing_raised { @info.tile_offset = Magick::Geometry.new(100, 200) }
    assert_equal('100x200', @info.tile_offset)
  end

  def test_undercolor
    assert_nothing_raised { @info.undercolor }
    assert_nil(@info.undercolor)

    assert_nothing_raised { @info.undercolor = 'white' }
    assert_equal('white', @info.undercolor)

    assert_nothing_raised { @info.undercolor = nil }
    assert_nil(@info.undercolor)

    assert_raise(ArgumentError) { @info.undercolor = 'xxx' }
  end

  def test_units
    Magick::ResolutionType.values.each do |v|
      assert_nothing_raised { @info.units = v }
      assert_equal(v, @info.units)
    end
  end

  def test_view
    assert_nothing_raised { @info.view = 'string' }
    assert_equal('string', @info.view)
  end
end