module Gem::GemcutterUtilities

# File lib/rubygems/gemcutter_utilities.rb, line 19
def add_key_option
  add_option('-k', '--key KEYNAME', Symbol,
             'Use the given API key',
             'from ~/.gem/credentials') do |value,options|
    options[:key] = value
  end
end

# File lib/rubygems/gemcutter_utilities.rb, line 30
def add_otp_option
  add_option('--otp CODE',
             'Digit code for multifactor authentication') do |value, options|
    options[:otp] = value
  end
end

# File lib/rubygems/gemcutter_utilities.rb, line 40
def api_key
  if ENV["GEM_HOST_API_KEY"]
    ENV["GEM_HOST_API_KEY"]
  elsif options[:key]
    verify_api_key options[:key]
  elsif Gem.configuration.api_keys.key?(host)
    Gem.configuration.api_keys[host]
  else
    Gem.configuration.rubygems_api_key
  end
end

# File lib/rubygems/gemcutter_utilities.rb, line 110
def get_otp
  say 'You have enabled multi-factor authentication. Please enter OTP code.'
  ask 'Code: '
end

# File lib/rubygems/gemcutter_utilities.rb, line 56
def host
  configured_host = Gem.host unless
    Gem.configuration.disable_default_gem_server

  @host ||=
    begin
      env_rubygems_host = ENV['RUBYGEMS_HOST']
      env_rubygems_host = nil if
        env_rubygems_host and env_rubygems_host.empty?

      env_rubygems_host || configured_host
    end
end

# File lib/rubygems/gemcutter_utilities.rb, line 106
def mfa_unauthorized?(response)
  response.kind_of?(Net::HTTPUnauthorized) && response.body.start_with?('You have enabled multifactor authentication')
end

# File lib/rubygems/gemcutter_utilities.rb, line 75
def rubygems_api_request(method, path, host = nil, allowed_push_host = nil, &block)
  require 'net/http'

  self.host = host if host
  unless self.host
    alert_error "You must specify a gem server"
    terminate_interaction(ERROR_CODE)
  end

  if allowed_push_host
    allowed_host_uri = URI.parse(allowed_push_host)
    host_uri         = URI.parse(self.host)

    unless (host_uri.scheme == allowed_host_uri.scheme) && (host_uri.host == allowed_host_uri.host)
      alert_error "#{self.host.inspect} is not allowed by the gemspec, which only allows #{allowed_push_host.inspect}"
      terminate_interaction(ERROR_CODE)
    end
  end

  uri = URI.parse "#{self.host}/#{path}"

  request_method = Net::HTTP.const_get method.to_s.capitalize
  response = Gem::RemoteFetcher.fetcher.request(uri, request_method, &block)
  return response unless mfa_unauthorized?(response)

  Gem::RemoteFetcher.fetcher.request(uri, request_method) do |req|
    req.add_field "OTP", get_otp
    block.call(req)
  end
end

# File lib/rubygems/gemcutter_utilities.rb, line 190
def set_api_key(host, key)
  if host == Gem::DEFAULT_HOST
    Gem.configuration.rubygems_api_key = key
  else
    Gem.configuration.set_api_key host, key
  end
end

# File lib/rubygems/gemcutter_utilities.rb, line 119
def sign_in(sign_in_host = nil)
  sign_in_host ||= self.host
  return if api_key

  pretty_host = if Gem::DEFAULT_HOST == sign_in_host
                  'RubyGems.org'
                else
                  sign_in_host
                end

  say "Enter your #{pretty_host} credentials."
  say "Don't have an account yet? " +
      "Create one at #{sign_in_host}/sign_up"

  email = ask "   Email: "
  password = ask_for_password "Password: "
  say "\n"

  response = rubygems_api_request(:get, "api/v1/api_key",
                                  sign_in_host) do |request|
    request.basic_auth email, password
    request.add_field "OTP", options[:otp] if options[:otp]
  end

  with_response response do |resp|
    say "Signed in."
    set_api_key host, resp.body
  end
end

# File lib/rubygems/gemcutter_utilities.rb, line 153
def verify_api_key(key)
  if Gem.configuration.api_keys.key? key
    Gem.configuration.api_keys[key]
  else
    alert_error "No such API key. Please add it to your configuration (done automatically on initial `gem push`)."
    terminate_interaction(ERROR_CODE)
  end
end

# File lib/rubygems/gemcutter_utilities.rb, line 169
def with_response(response, error_prefix = nil)
  case response
  when Net::HTTPSuccess then
    if block_given?
      yield response
    else
      say clean_text(response.body)
    end
  else
    message = response.body
    message = "#{error_prefix}: #{message}" if error_prefix

    say clean_text(message)
    terminate_interaction(ERROR_CODE)
  end
end