class Net::SMTP

# File net-smtp-0.3.3/lib/net/smtp.rb, line 194
def SMTP.default_port
  25
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 212
def SMTP.default_ssl_context(ssl_context_params = nil)
  context = OpenSSL::SSL::SSLContext.new
  context.set_params(ssl_context_params ? ssl_context_params : {})
  context
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 199
def SMTP.default_submission_port
  587
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 204
def SMTP.default_tls_port
  465
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 241
def initialize(address, port = nil, tls: false, starttls: :auto, tls_verify: true, tls_hostname: nil, ssl_context_params: nil)
  @address = address
  @port = (port || SMTP.default_port)
  @esmtp = true
  @capabilities = nil
  @socket = nil
  @started = false
  @open_timeout = 30
  @read_timeout = 60
  @error_occurred = false
  @debug_output = nil
  @tls = tls
  @starttls = starttls
  @ssl_context_tls = nil
  @ssl_context_starttls = nil
  @tls_verify = tls_verify
  @tls_hostname = tls_hostname
  @ssl_context_params = ssl_context_params
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 518
def SMTP.start(address, port = nil, *args, helo: nil,
               user: nil, secret: nil, password: nil, authtype: nil,
               tls: false, starttls: :auto,
               tls_verify: true, tls_hostname: nil, ssl_context_params: nil,
               &block)
  raise ArgumentError, "wrong number of arguments (given #{args.size + 2}, expected 1..6)" if args.size > 4
  helo ||= args[0] || 'localhost'
  user ||= args[1]
  secret ||= password || args[2]
  authtype ||= args[3]
  new(address, port, tls: tls, starttls: starttls, tls_verify: tls_verify, tls_hostname: tls_hostname, ssl_context_params: ssl_context_params).start(helo: helo, user: user, secret: secret, authtype: authtype, &block)
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 860
def auth_cram_md5(user, secret)
  check_auth_args user, secret
  res = critical {
    res0 = get_response('AUTH CRAM-MD5')
    check_auth_continue res0
    crammed = cram_md5_response(secret, res0.cram_md5_challenge)
    get_response(base64_encode("#{user} #{crammed}"))
  }
  check_auth_response res
  res
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 849
def auth_login(user, secret)
  check_auth_args user, secret
  res = critical {
    check_auth_continue get_response('AUTH LOGIN')
    check_auth_continue get_response(base64_encode(user))
    get_response(base64_encode(secret))
  }
  check_auth_response res
  res
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 840
def auth_plain(user, secret)
  check_auth_args user, secret
  res = critical {
    get_response('AUTH PLAIN ' + base64_encode("\0#{user}\0#{secret}"))
  }
  check_auth_response res
  res
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 834
def authenticate(user, secret, authtype = DEFAULT_AUTH_TYPE)
  check_auth_method authtype
  check_auth_args user, secret
  public_send auth_method(authtype), user, secret
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 294
def capable?(key)
  return nil unless @capabilities
  @capabilities[key] ? true : false
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 329
def capable_auth_types
  return [] unless @capabilities
  return [] unless @capabilities['AUTH']
  @capabilities['AUTH']
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 316
def capable_cram_md5_auth?
  auth_capable?('CRAM-MD5')
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 310
def capable_login_auth?
  auth_capable?('LOGIN')
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 304
def capable_plain_auth?
  auth_capable?('PLAIN')
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 289
def capable_starttls?
  capable?('STARTTLS')
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 998
def data(msgstr = nil, &block)   #:yield: stream
  if msgstr and block
    raise ArgumentError, "message and block are exclusive"
  end
  unless msgstr or block
    raise ArgumentError, "message or block is required"
  end
  res = critical {
    check_continue get_response('DATA')
    socket_sync_bak = @socket.io.sync
    begin
      @socket.io.sync = false
      if msgstr
        @socket.write_message msgstr
      else
        @socket.write_message_by_block(&block)
      end
    ensure
      @socket.io.flush
      @socket.io.sync = socket_sync_bak
    end
    recv_response()
  }
  check_response res
  res
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 442
def debug_output=(arg)
  @debug_output = arg
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 400
def disable_starttls
  @starttls = false
  @ssl_context_starttls = nil
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 356
def disable_tls
  @tls = false
  @ssl_context_tls = nil
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 938
def ehlo(domain)
  getok("EHLO #{domain}")
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 382
def enable_starttls(context = nil)
  raise 'openssl library not installed' unless defined?(OpenSSL::VERSION)
  raise ArgumentError, "SMTPS and STARTTLS is exclusive" if @tls
  @starttls = :always
  @ssl_context_starttls = context
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 391
def enable_starttls_auto(context = nil)
  raise 'openssl library not installed' unless defined?(OpenSSL::VERSION)
  raise ArgumentError, "SMTPS and STARTTLS is exclusive" if @tls
  @starttls = :auto
  @ssl_context_starttls = context
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 345
def enable_tls(context = nil)
  raise 'openssl library not installed' unless defined?(OpenSSL::VERSION)
  raise ArgumentError, "SMTPS and STARTTLS is exclusive" if @starttls == :always
  @tls = true
  @ssl_context_tls = context
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 624
def finish
  raise IOError, 'not yet started' unless started?
  do_finish
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 934
def helo(domain)
  getok("HELO #{domain}")
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 271
def inspect
  "#<#{self.class} #{@address}:#{@port} started=#{@started}>"
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 943
def mailfrom(from_addr)
  addr = Address.new(from_addr)
  getok((["MAIL FROM:<#{addr.address}>"] + addr.parameters).join(' '))
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 818
def open_message_stream(from_addr, *to_addrs, &block)   # :yield: stream
  raise IOError, 'closed session' unless @socket
  mailfrom from_addr
  rcptto_list(to_addrs) {data(&block)}
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 1025
def quit
  getok('QUIT')
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 970
def rcptto(to_addr)
  addr = Address.new(to_addr)
  getok((["RCPT TO:<#{addr.address}>"] + addr.parameters).join(' '))
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 948
def rcptto_list(to_addrs)
  raise ArgumentError, 'mail destination not given' if to_addrs.empty?
  ok_users = []
  unknown_users = []
  to_addrs.flatten.each do |addr|
    begin
      rcptto addr
    rescue SMTPAuthenticationError
      unknown_users << addr.to_s.dump
    else
      ok_users << addr
    end
  end
  raise ArgumentError, 'mail destination not given' if ok_users.empty?
  ret = yield
  unless unknown_users.empty?
    raise SMTPAuthenticationError, "failed to deliver for #{unknown_users.join(', ')}"
  end
  ret
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 423
def read_timeout=(sec)
  @socket.read_timeout = sec if @socket
  @read_timeout = sec
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 926
def rset
  getok('RSET')
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 765
def send_message(msgstr, from_addr, *to_addrs)
  raise IOError, 'closed session' unless @socket
  mailfrom from_addr
  rcptto_list(to_addrs) {data msgstr}
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 591
def start(*args, helo: nil, user: nil, secret: nil, password: nil, authtype: nil)
  raise ArgumentError, "wrong number of arguments (given #{args.size}, expected 0..4)" if args.size > 4
  helo ||= args[0] || 'localhost'
  user ||= args[1]
  secret ||= password || args[2]
  authtype ||= args[3]
  if defined?(OpenSSL::VERSION)
    ssl_context_params = @ssl_context_params || {}
    unless ssl_context_params.has_key?(:verify_mode)
      ssl_context_params[:verify_mode] = @tls_verify ? OpenSSL::SSL::VERIFY_PEER : OpenSSL::SSL::VERIFY_NONE
    end
    if @tls && @ssl_context_tls.nil?
      @ssl_context_tls = SMTP.default_ssl_context(ssl_context_params)
    end
    if @starttls && @ssl_context_starttls.nil?
      @ssl_context_starttls = SMTP.default_ssl_context(ssl_context_params)
    end
  end
  if block_given?
    begin
      do_start helo, user, secret, authtype
      return yield(self)
    ensure
      do_finish
    end
  else
    do_start helo, user, secret, authtype
    return self
  end
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 532
def started?
  @started
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 930
def starttls
  getok('STARTTLS')
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 366
def starttls?
  @starttls
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 371
def starttls_always?
  @starttls == :always
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 376
def starttls_auto?
  @starttls == :auto
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 336
def tls?
  @tls
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 320
def auth_capable?(type)
  return nil unless @capabilities
  return false unless @capabilities['AUTH']
  @capabilities['AUTH'].include?(type)
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 880
def auth_method(type)
  "auth_#{type.to_s.downcase}".intern
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 893
def base64_encode(str)
  # expects "str" may not become too long
  [str].pack('m0')
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 884
def check_auth_args(user, secret, authtype = DEFAULT_AUTH_TYPE)
  unless user
    raise ArgumentError, 'SMTP-AUTH requested but missing user name'
  end
  unless secret
    raise ArgumentError, 'SMTP-AUTH requested but missing secret phrase'
  end
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 1092
def check_auth_continue(res)
  unless res.continue?
    raise res.exception_class.new(res)
  end
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 874
def check_auth_method(type)
  unless respond_to?(auth_method(type), true)
    raise ArgumentError, "wrong authentication type #{type}"
  end
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 1086
def check_auth_response(res)
  unless res.success?
    raise SMTPAuthenticationError.new(res)
  end
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 1080
def check_continue(res)
  unless res.continue?
    raise SMTPUnknownError.new(res, message: "could not get 3xx (#{res.status}: #{res.string})")
  end
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 1074
def check_response(res)
  unless res.success?
    raise res.exception_class.new(res)
  end
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 902
def cram_md5_response(secret, challenge)
  tmp = digest_class::MD5.digest(cram_secret(secret, IMASK) + challenge)
  digest_class::MD5.hexdigest(cram_secret(secret, OMASK) + tmp)
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 909
def cram_secret(secret, mask)
  secret = digest_class::MD5.digest(secret) if secret.size > CRAM_BUFSIZE
  buf = secret.ljust(CRAM_BUFSIZE, "\0")
  0.upto(buf.size - 1) do |i|
    buf[i] = (buf[i].ord ^ mask).chr
  end
  buf
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 1064
def critical
  return Response.parse('200 dummy reply code') if @error_occurred
  begin
    return yield()
  rescue Exception
    @error_occurred = true
    raise
  end
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 631
def digest_class
  @digest_class ||= if defined?(OpenSSL::Digest)
                      OpenSSL::Digest
                    elsif defined?(::Digest)
                      ::Digest
                    else
                      raise '"openssl" or "digest" library is required'
                    end
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 714
def do_finish
  quit if @socket and not @socket.closed? and not @error_occurred
ensure
  @started = false
  @error_occurred = false
  @socket.close if @socket
  @socket = nil
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 702
def do_helo(helo_domain)
  res = @esmtp ? ehlo(helo_domain) : helo(helo_domain)
  @capabilities = res.capabilities
rescue SMTPError
  if @esmtp
    @esmtp = false
    @error_occurred = false
    retry
  end
  raise
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 650
def do_start(helo_domain, user, secret, authtype)
  raise IOError, 'SMTP session already started' if @started
  if user or secret
    check_auth_method(authtype || DEFAULT_AUTH_TYPE)
    check_auth_args user, secret
  end
  s = tcp_socket(@address, @port)
  logging "Connection opened: #{@address}:#{@port}"
  @socket = new_internet_message_io(tls? ? tlsconnect(s, @ssl_context_tls) : s)
  check_response critical { recv_response() }
  do_helo helo_domain
  if ! tls? and (starttls_always? or (capable_starttls? and starttls_auto?))
    unless capable_starttls?
      raise SMTPUnsupportedCommand, "STARTTLS is not supported on this server"
    end
    starttls
    @socket = new_internet_message_io(tlsconnect(s, @ssl_context_starttls))
    # helo response may be different after STARTTLS
    do_helo helo_domain
  end
  authenticate user, secret, (authtype || DEFAULT_AUTH_TYPE) if user
  @started = true
ensure
  unless @started
    # authentication failed, cancel connection.
    s.close if s
    @socket = nil
  end
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 1048
def get_response(reqline)
  validate_line reqline
  @socket.writeline reqline
  recv_response()
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 1038
def getok(reqline)
  validate_line reqline
  res = critical {
    @socket.writeline reqline
    recv_response()
  }
  check_response res
  res
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 1177
def logging(msg)
  @debug_output << msg + "\n" if @debug_output
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 697
def new_internet_message_io(s)
  InternetMessageIO.new(s, read_timeout: @read_timeout,
                        debug_output: @debug_output)
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 1054
def recv_response
  buf = ''.dup
  while true
    line = @socket.readline
    buf << line << "\n"
    break unless line[3,1] == '-'   # "210-PIPELINING"
  end
  Response.parse(buf)
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 680
def ssl_socket(socket, context)
  OpenSSL::SSL::SSLSocket.new socket, context
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 641
def tcp_socket(address, port)
  begin
    Socket.tcp address, port, nil, nil, connect_timeout: @open_timeout
  rescue Errno::ETIMEDOUT #raise Net:OpenTimeout instead for compatibility with previous versions
    raise Net::OpenTimeout, "Timeout to open TCP connection to "\
      "#{address}:#{port} (exceeds #{@open_timeout} seconds)"
  end
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 684
def tlsconnect(s, context)
  verified = false
  s = ssl_socket(s, context)
  logging "TLS connection started"
  s.sync_close = true
  s.hostname = @tls_hostname || @address
  ssl_socket_connect(s, @open_timeout)
  verified = true
  s
ensure
  s.close unless verified
end

# File net-smtp-0.3.3/lib/net/smtp.rb, line 1031
def validate_line(line)
  # A bare CR or LF is not allowed in RFC5321.
  if /[\r\n]/ =~ line
    raise ArgumentError, "A line must not contain CR or LF"
  end
end