module ActiveSupport::Deprecation::Reporting

def allow(allowed_warnings = :all, if: true, &block)
  conditional = binding.local_variable_get(:if)
  conditional = conditional.call if conditional.respond_to?(:call)
  if conditional
    @explicitly_allowed_warnings.bind(allowed_warnings, &block)
  else
    yield
  end
end

def begin_silence # :nodoc:
  @silence_counter.value += 1
end

def deprecated_method_warning(method_name, message = nil)
  warning = "#{method_name} is deprecated and will be removed from #{gem_name} #{deprecation_horizon}"
  case message
  when Symbol then "#{warning} (use #{message} instead)"
  when String then "#{warning} (#{message})"
  else warning
  end
end

def deprecation_caller_message(callstack)
  file, line, method = extract_callstack(callstack)
  if file
    if line && method
      "(called from #{method} at #{file}:#{line})"
    else
      "(called from #{file}:#{line})"
    end
  end
end

def deprecation_message(callstack, message = nil)
  message ||= "You are using deprecated behavior which will be removed from the next major or minor release."
  "DEPRECATION WARNING: #{message} #{deprecation_caller_message(callstack)}"
end

def deprecation_warning(deprecated_method_name, message = nil, caller_backtrace = nil)
  caller_backtrace ||= caller_locations(2)
  deprecated_method_warning(deprecated_method_name, message).tap do |msg|
    warn(msg, caller_backtrace)
  end
end

def end_silence # :nodoc:
  @silence_counter.value -= 1
end

def extract_callstack(callstack)
  return [] if callstack.empty?
  offending_line = callstack.find { |frame|
    # Code generated with `eval` doesn't have an `absolute_path`, e.g. templates.
    path = frame.absolute_path || frame.path
    path && !ignored_callstack?(path)
  } || callstack.first
  [offending_line.path, offending_line.lineno, offending_line.label]
end

def ignored_callstack?(path)
  path.start_with?(RAILS_GEM_ROOT, LIB_DIR) || path.include?("<internal:")
end

def silence(&block)
  begin_silence
  block.call
ensure
  end_silence
end

def silenced
  @silenced || @silence_counter.value.nonzero?
end

def warn(message = nil, callstack = nil)
  return if silenced
  callstack ||= caller_locations(2)
  deprecation_message(callstack, message).tap do |full_message|
    if deprecation_disallowed?(message)
      disallowed_behavior.each { |b| b.call(full_message, callstack, self) }
    else
      behavior.each { |b| b.call(full_message, callstack, self) }
    end
  end
end