# frozen_string_literal: false
require "test/unit"
require "webrick/utils"

class TestWEBrickUtils < Test::Unit::TestCase
  def teardown
    WEBrick::Utils::TimeoutHandler.terminate
    super
  end

  def assert_expired(m)
    Thread.handle_interrupt(Timeout::Error => :never, EX => :never) do
      assert_empty(m::TimeoutHandler.instance.instance_variable_get(:@timeout_info))
    end
  end

  def assert_not_expired(m)
    Thread.handle_interrupt(Timeout::Error => :never, EX => :never) do
      assert_not_empty(m::TimeoutHandler.instance.instance_variable_get(:@timeout_info))
    end
  end

  EX = Class.new(StandardError)

  def test_no_timeout
    m = WEBrick::Utils
    assert_equal(:foo, m.timeout(10){ :foo })
    assert_expired(m)
  end

  def test_nested_timeout_outer
    m = WEBrick::Utils
    i = 0
    assert_raise(Timeout::Error){
      m.timeout(1){
        assert_raise(Timeout::Error){ m.timeout(0.1){ i += 1; sleep(1) } }
        assert_not_expired(m)
        i += 1
        sleep(2)
      }
    }
    assert_equal(2, i)
    assert_expired(m)
  end

  def test_timeout_default_exception
    m = WEBrick::Utils
    assert_raise(Timeout::Error){ m.timeout(0.01){ sleep } }
    assert_expired(m)
  end

  def test_timeout_custom_exception
    m = WEBrick::Utils
    ex = EX
    assert_raise(ex){ m.timeout(0.01, ex){ sleep } }
    assert_expired(m)
  end

  def test_nested_timeout_inner_custom_exception
    m = WEBrick::Utils
    ex = EX
    i = 0
    assert_raise(ex){
      m.timeout(10){
        m.timeout(0.01, ex){ i += 1; sleep }
      }
      sleep
    }
    assert_equal(1, i)
    assert_expired(m)
  end

  def test_nested_timeout_outer_custom_exception
    m = WEBrick::Utils
    ex = EX
    i = 0
    assert_raise(Timeout::Error){
      m.timeout(0.01){
        m.timeout(1.0, ex){ i += 1; sleep }
      }
      sleep
    }
    assert_equal(1, i)
    assert_expired(m)
  end

  def test_create_listeners
    addr = listener_address(0)
    port = addr.slice!(1)
    assert_kind_of(Integer, port, "dynamically chosen port number")
    assert_equal(["AF_INET", "127.0.0.1", "127.0.0.1"], addr)

    assert_equal(["AF_INET", port, "127.0.0.1", "127.0.0.1"],
                 listener_address(port),
                 "specific port number")

    assert_equal(["AF_INET", port, "127.0.0.1", "127.0.0.1"],
                 listener_address(port.to_s),
                 "specific port number string")
  end

  def listener_address(port)
    listeners = WEBrick::Utils.create_listeners("127.0.0.1", port)
    srv = listeners.first
    assert_kind_of TCPServer, srv
    srv.addr
  ensure
    listeners.each(&:close) if listeners
  end
end