Project

General

Profile

Actions
Copy link

Feature #3625

closed

improvement of sample in lib/imap.rb: --starttls option

Feature #3625: improvement of sample in lib/imap.rb: --starttls option

Added by nobu (Nobuyoshi Nakada) over 15 years ago. Updated over 14 years ago.

Status:
Closed
Assignee:
-
Target version:
-
[ruby-dev:41888]

Description

=begin
なかだです。

lib/net/imap.rbを直接実行すると使える簡易IMAPクライアントを、
starttlsに対応させてみました。


Index: lib/net/imap.rb

--- lib/net/imap.rb (revision 28780)
+++ lib/net/imap.rb (working copy)
@@ -3472,7 +3472,8 @@ if FILE == $0
$auth = "login"
$ssl = false

  • $starttls = false

    def usage

  • $stderr.print <<EOF
  • <<EOF
    usage: #{$0} [options]

@@ -3481,4 +3482,5 @@ usage: #{$0} [options]
--user=USER specifies user
--auth=AUTH specifies auth type

  • --starttls use starttls
    --ssl use ssl
    EOF
    @@ -3511,4 +3513,5 @@ EOF
    ['--user', GetoptLong::REQUIRED_ARGUMENT],
    ['--auth', GetoptLong::REQUIRED_ARGUMENT],
  •                 ['--starttls', GetoptLong::NO_ARGUMENT],
                ['--ssl', GetoptLong::NO_ARGUMENT])
    begin
    @@ -3523,20 +3526,20 @@ EOF
    when "--ssl"
    $ssl = true
  •  when "--starttls"

  •    $starttls = true
 when "--debug"
   Net::IMAP.debug = true
 when "--help"
   usage

  •    exit(1)

  •    exit
 end
    end
    rescue
  • usage
  • exit(1)
  • abort usage
    end
$host = ARGV.shift
unless $host
  • usage
  • exit(1)
  • abort usage
    end

@@ -3543,4 +3546,5 @@
imap = Net::IMAP.new($host, :port => $port, :ssl => $ssl)
begin

  • imap.starttls if $starttls
    password = get_password
    imap.authenticate($auth, $user, password)

--
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
中田 伸悦
=end

Actions
Copy link

Also available in: PDF Atom