module RubyProf::ExcludeCommonMethods

def self.apply!(profile)
  ##

  #  Kernel Methods

  ##

  exclude_methods(profile, Kernel, [
    :dup,
    :initialize_dup,
    :tap,
    :send,
    :public_send,
  ])
  ##

  #  Fundamental Types

  ##

  exclude_methods(profile, BasicObject,  :!=)
  exclude_methods(profile, Kernel,       :"block_given?")
  exclude_methods(profile, Method,       :[])
  exclude_methods(profile, Module,       :new)
  exclude_methods(profile, Class,        :new)
  exclude_methods(profile, Proc,         :call, :yield)
  exclude_methods(profile, Range,        :each)
  ##

  #  Value Types

  ##

  exclude_methods(profile, Integer, [
    :times,
    :succ,
    :<
  ])
  exclude_methods(profile, String, [
    :sub,
    :sub!,
    :gsub,
    :gsub!,
  ])
  ##

  #  Emumerables

  ##

  exclude_enumerable(profile, Enumerable)
  exclude_enumerable(profile, Enumerator)
  ##

  #  Collections

  ##

  exclude_enumerable(profile, Array, [
    :each_index,
    :map!,
    :select!,
    :reject!,
    :collect!,
    :sort!,
    :sort_by!,
    :index,
    :delete_if,
    :keep_if,
    :drop_while,
    :uniq,
    :uniq!,
    :"==",
    :eql?,
    :hash,
    :to_json,
    :as_json,
    :encode_json,
  ])
  exclude_enumerable(profile, Hash, [
    :dup,
    :initialize_dup,
    :fetch,
    :"[]",
    :"[]=",
    :each_key,
    :each_value,
    :each_pair,
    :map!,
    :select!,
    :reject!,
    :collect!,
    :delete_if,
    :keep_if,
    :slice,
    :slice!,
    :except,
    :except!,
    :"==",
    :eql?,
    :hash,
    :to_json,
    :as_json,
    :encode_json,
  ])
  exclude_enumerable(profile, Set, [
    :map!,
    :select!,
    :reject!,
    :collect!,
    :classify,
    :delete_if,
    :keep_if,
    :divide,
    :"==",
    :eql?,
    :hash,
    :to_json,
    :as_json,
    :encode_json,
  ])
  ##

  #  Garbage Collection

  ##

  exclude_singleton_methods(profile, GC, [
    :start
  ])
  ##

  #  Unicorn

  ##

  if defined?(Unicorn)
    exclude_methods(profile, Unicorn::HttpServer, :process_client)
  end
  if defined?(Unicorn::OobGC)
    exclude_methods(profile, Unicorn::OobGC, :process_client)
  end
  ##

  #  New Relic

  ##

  if defined?(NewRelic::Agent)
    if defined?(NewRelic::Agent::Instrumentation::MiddlewareTracing)
      exclude_methods(profile, NewRelic::Agent::Instrumentation::MiddlewareTracing, [
        :call
      ])
    end
    if defined?(NewRelic::Agent::MethodTracerHelpers)
      exclude_methods(profile, NewRelic::Agent::MethodTracerHelpers, [
        :trace_execution_scoped,
        :log_errors,
      ])
      exclude_singleton_methods(profile, NewRelic::Agent::MethodTracerHelpers, [
        :trace_execution_scoped,
        :log_errors,
      ])
    end
    if defined?(NewRelic::Agent::MethodTracer)
      exclude_methods(profile, NewRelic::Agent::MethodTracer, [
        :trace_execution_scoped,
        :trace_execution_unscoped,
      ])
    end
  end
    ##

    #  Miscellaneous Methods

    ##

  if defined?(Mustache)
    exclude_methods(profile, Mustache::Context, [
      :fetch
    ])
  end
end

def self.exclude_enumerable(profile, mod, *method_or_methods)
  exclude_methods(profile, mod, [:each, *method_or_methods])
  exclude_methods(profile, mod, ENUMERABLE_NAMES)
end

def self.exclude_methods(profile, mod, *method_or_methods)
  profile.exclude_methods!(mod, method_or_methods)
end

def self.exclude_singleton_methods(profile, mod, *method_or_methods)
  profile.exclude_singleton_methods!(mod, method_or_methods)
end