module Faraday::Deprecate

def self.skip # :nodoc:
  @skip ||= begin
    case ENV['FARADAY_DEPRECATE'].to_s.downcase
    when '1', 'warn' then :warn
    else :skip
    end
  end
  @skip == :skip
end

def self.skip=(value) # :nodoc:
  @skip = value ? :skip : :warn
end

def deprecate(name, repl, ver, custom_message = nil)
  class_eval do
    gem_ver = Gem::Version.new(ver)
    old = "_deprecated_#{name}"
    alias_method old, name
    define_method name do |*args, &block|
      mod = is_a? Module
      target = mod ? "#{self}." : "#{self.class}#"
      target_message = if name == :inherited
                         "Inheriting #{self}"
                       else
                         "#{target}#{name}"
                       end
      msg = [
        "NOTE: #{target_message} is deprecated",
        repl == :none ? ' with no replacement' : "; use #{repl} instead. ",
        "It will be removed in or after version #{gem_ver} ",
        custom_message,
        "\n#{target}#{name} called from #{Gem.location_of_caller.join(':')}"
      ]
      warn "#{msg.join}." unless Faraday::Deprecate.skip
      send old, *args, &block
    end
  end
end

def skip_during
  original = Faraday::Deprecate.skip
  Faraday::Deprecate.skip = true
  yield
ensure
  Faraday::Deprecate.skip = original
end