#!/usr/bin/env ruby
# encoding: UTF-8

require File.expand_path("../test_helper", __FILE__)

class AliasTest < TestCase
  class TestMe
    def some_method
      sleep(0.1)
    end

    alias :some_method_original :some_method
    def some_method
      some_method_original
    end
  end

  def test_alias
    result = RubyProf::Profile.profile(measure_mode: RubyProf::WALL_TIME) do
      TestMe.new.some_method
    end

    methods = result.threads.first.methods
    assert_equal(6, methods.count)

    # Method 0
    method = methods[0]
    assert_equal('AliasTest#test_alias', method.full_name)
    assert_equal(20, method.line)
    refute(method.recursive?)

    assert_equal(0, method.call_trees.callers.count)

    assert_equal(2, method.call_trees.callees.count)
    call_tree = method.call_trees.callees[0]
    assert_equal('Class#new', call_tree.target.full_name)
    assert_equal(20, call_tree.line)

    call_tree = method.call_trees.callees[1]
    assert_equal('AliasTest::TestMe#some_method', call_tree.target.full_name)
    assert_equal(20, call_tree.line)

    # Method 1
    method = methods[1]
    assert_equal('Class#new', method.full_name)
    assert_equal(0, method.line)
    refute(method.recursive?)

    assert_equal(1, method.call_trees.callers.count)
    call_tree = method.call_trees.callers[0]
    assert_equal('AliasTest#test_alias', call_tree.parent.target.full_name)
    assert_equal(20, call_tree.line)

    assert_equal(1, method.call_trees.callees.count)
    call_tree = method.call_trees.callees[0]
    assert_equal('BasicObject#initialize', call_tree.target.full_name)
    assert_equal(0, call_tree.line)

    # Method 2
    method = methods[2]
    assert_equal('BasicObject#initialize', method.full_name)
    assert_equal(0, method.line)
    refute(method.recursive?)

    assert_equal(1, method.call_trees.callers.count)
    call_tree = method.call_trees.callers[0]
    assert_equal('Class#new', call_tree.parent.target.full_name)
    assert_equal(0, call_tree.line)

    assert_equal(0, method.call_trees.callees.count)

    # Method 3
    method = methods[3]
    assert_equal('AliasTest::TestMe#some_method', method.full_name)
    assert_equal(13, method.line)
    refute(method.recursive?)

    assert_equal(1, method.call_trees.callers.count)
    call_tree = method.call_trees.callers[0]
    assert_equal('AliasTest#test_alias', call_tree.parent.target.full_name)
    assert_equal(20, call_tree.line)

    assert_equal(1, method.call_trees.callees.count)
    call_tree = method.call_trees.callees[0]
    assert_equal('AliasTest::TestMe#some_method_original', call_tree.target.full_name)
    assert_equal(14, call_tree.line)

    # Method 4
    method = methods[4]
    assert_equal('AliasTest::TestMe#some_method_original', method.full_name)
    assert_equal(8, method.line)
    refute(method.recursive?)

    assert_equal(1, method.call_trees.callers.count)
    call_tree = method.call_trees.callers[0]
    assert_equal('AliasTest::TestMe#some_method', call_tree.parent.target.full_name)
    assert_equal(14, call_tree.line)

    assert_equal(1, method.call_trees.callees.count)
    call_tree = method.call_trees.callees[0]
    assert_equal('Kernel#sleep', call_tree.target.full_name)
    assert_equal(9, call_tree.line)

    # Method 5
    method = methods[5]
    assert_equal('Kernel#sleep', method.full_name)
    assert_equal(0, method.line)
    refute(method.recursive?)

    assert_equal(1, method.call_trees.callers.count)
    call_tree = method.call_trees.callers[0]
    assert_equal('AliasTest::TestMe#some_method_original', call_tree.parent.target.full_name)
    assert_equal(9, call_tree.line)

    assert_equal(0, method.call_trees.callees.count)
  end
end
