mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
* ext/openssl/lib/net/ftptls.rb, ext/openssl/lib/net/telnets.rb:
half-finished libraries are discontinued. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@14130 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
parent
9bc20bef7a
commit
990bec9702
3 changed files with 5 additions and 304 deletions
|
@ -1,3 +1,8 @@
|
|||
Fri Dec 7 20:21:35 2007 GOTOU Yuuzou <gotoyuzo@notwork.org>
|
||||
|
||||
* ext/openssl/lib/net/ftptls.rb, ext/openssl/lib/net/telnets.rb:
|
||||
half-finished libraries are discontinued.
|
||||
|
||||
Fri Dec 7 15:44:40 2007 Tanaka Akira <akr@fsij.org>
|
||||
|
||||
* lib/pp.rb: use Hash for recursion check as inspect.
|
||||
|
|
|
@ -1,53 +0,0 @@
|
|||
=begin
|
||||
= $RCSfile$ -- SSL/TLS enhancement for Net::HTTP.
|
||||
|
||||
= Info
|
||||
'OpenSSL for Ruby 2' project
|
||||
Copyright (C) 2003 Blaz Grilc <farmer@gmx.co.uk>
|
||||
All rights reserved.
|
||||
|
||||
= Licence
|
||||
This program is licenced under the same licence as Ruby.
|
||||
(See the file 'LICENCE'.)
|
||||
|
||||
= Requirements
|
||||
|
||||
= Version
|
||||
$Id$
|
||||
|
||||
= Notes
|
||||
Tested on FreeBSD 5-CURRENT and 4-STABLE
|
||||
- ruby 1.6.8 (2003-01-17) [i386-freebsd5]
|
||||
- OpenSSL 0.9.7a Feb 19 2003
|
||||
- ruby-openssl-0.2.0.p0
|
||||
tested on ftp server: glftpd 1.30
|
||||
=end
|
||||
|
||||
require 'socket'
|
||||
require 'openssl'
|
||||
require 'net/ftp'
|
||||
|
||||
module Net
|
||||
class FTPTLS < FTP
|
||||
def connect(host, port=FTP_PORT)
|
||||
@hostname = host
|
||||
super
|
||||
end
|
||||
|
||||
def login(user = "anonymous", passwd = nil, acct = nil)
|
||||
store = OpenSSL::X509::Store.new
|
||||
store.set_default_paths
|
||||
ctx = OpenSSL::SSL::SSLContext.new('SSLv23')
|
||||
ctx.cert_store = store
|
||||
ctx.verify_mode = OpenSSL::SSL::VERIFY_PEER
|
||||
ctx.key = nil
|
||||
ctx.cert = nil
|
||||
voidcmd("AUTH TLS")
|
||||
@sock = OpenSSL::SSL::SSLSocket.new(@sock, ctx)
|
||||
@sock.connect
|
||||
@sock.post_connection_check(@hostname)
|
||||
super(user, passwd, acct)
|
||||
voidcmd("PBSZ 0")
|
||||
end
|
||||
end
|
||||
end
|
|
@ -1,251 +0,0 @@
|
|||
=begin
|
||||
= $RCSfile$ -- SSL/TLS enhancement for Net::Telnet.
|
||||
|
||||
= Info
|
||||
'OpenSSL for Ruby 2' project
|
||||
Copyright (C) 2001 GOTOU YUUZOU <gotoyuzo@notwork.org>
|
||||
All rights reserved.
|
||||
|
||||
= Licence
|
||||
This program is licenced under the same licence as Ruby.
|
||||
(See the file 'LICENCE'.)
|
||||
|
||||
= Version
|
||||
$Id$
|
||||
|
||||
2001/11/06: Contiributed to Ruby/OpenSSL project.
|
||||
|
||||
== class Net::Telnet
|
||||
|
||||
This class will initiate SSL/TLS session automaticaly if the server
|
||||
sent OPT_STARTTLS. Some options are added for SSL/TLS.
|
||||
|
||||
host = Net::Telnet::new({
|
||||
"Host" => "localhost",
|
||||
"Port" => "telnets",
|
||||
## follows are new options.
|
||||
'CertFile' => "user.crt",
|
||||
'KeyFile' => "user.key",
|
||||
'CAFile' => "/some/where/certs/casert.pem",
|
||||
'CAPath' => "/some/where/caserts",
|
||||
'VerifyMode' => SSL::VERIFY_PEER,
|
||||
'VerifyCallback' => verify_proc
|
||||
})
|
||||
|
||||
Or, the new options ('Cert', 'Key' and 'CACert') are available from
|
||||
Michal Rokos's OpenSSL module.
|
||||
|
||||
cert_data = File.open("user.crt"){|io| io.read }
|
||||
pkey_data = File.open("user.key"){|io| io.read }
|
||||
cacert_data = File.open("your_ca.pem"){|io| io.read }
|
||||
host = Net::Telnet::new({
|
||||
"Host" => "localhost",
|
||||
"Port" => "telnets",
|
||||
'Cert' => OpenSSL::X509::Certificate.new(cert_data)
|
||||
'Key' => OpenSSL::PKey::RSA.new(pkey_data)
|
||||
'CACert' => OpenSSL::X509::Certificate.new(cacert_data)
|
||||
'CAFile' => "/some/where/certs/casert.pem",
|
||||
'CAPath' => "/some/where/caserts",
|
||||
'VerifyMode' => SSL::VERIFY_PEER,
|
||||
'VerifyCallback' => verify_proc
|
||||
})
|
||||
|
||||
This class is expected to be a superset of usual Net::Telnet.
|
||||
=end
|
||||
|
||||
require "net/telnet"
|
||||
require "openssl"
|
||||
|
||||
module Net
|
||||
class Telnet
|
||||
attr_reader :ssl
|
||||
|
||||
OPT_STARTTLS = 46.chr # "\056" # "\x2e" # Start TLS
|
||||
TLS_FOLLOWS = 1.chr # "\001" # "\x01" # FOLLOWS (for STARTTLS)
|
||||
|
||||
alias preprocess_orig preprocess
|
||||
|
||||
def ssl?; @ssl; end
|
||||
|
||||
def preprocess(string)
|
||||
# combine CR+NULL into CR
|
||||
string = string.gsub(/#{CR}#{NULL}/no, CR) if @options["Telnetmode"]
|
||||
|
||||
# combine EOL into "\n"
|
||||
string = string.gsub(/#{EOL}/no, "\n") unless @options["Binmode"]
|
||||
|
||||
string.gsub(/#{IAC}(
|
||||
[#{IAC}#{AO}#{AYT}#{DM}#{IP}#{NOP}]|
|
||||
[#{DO}#{DONT}#{WILL}#{WONT}][#{OPT_BINARY}-#{OPT_EXOPL}]|
|
||||
#{SB}[#{OPT_BINARY}-#{OPT_EXOPL}]
|
||||
(#{IAC}#{IAC}|[^#{IAC}])+#{IAC}#{SE}
|
||||
)/xno) do
|
||||
if IAC == $1 # handle escaped IAC characters
|
||||
IAC
|
||||
elsif AYT == $1 # respond to "IAC AYT" (are you there)
|
||||
self.write("nobody here but us pigeons" + EOL)
|
||||
''
|
||||
elsif DO[0] == $1[0] # respond to "IAC DO x"
|
||||
if OPT_BINARY[0] == $1[1]
|
||||
@telnet_option["BINARY"] = true
|
||||
self.write(IAC + WILL + OPT_BINARY)
|
||||
elsif OPT_STARTTLS[0] == $1[1]
|
||||
self.write(IAC + WILL + OPT_STARTTLS)
|
||||
self.write(IAC + SB + OPT_STARTTLS + TLS_FOLLOWS + IAC + SE)
|
||||
else
|
||||
self.write(IAC + WONT + $1[1..1])
|
||||
end
|
||||
''
|
||||
elsif DONT[0] == $1[0] # respond to "IAC DON'T x" with "IAC WON'T x"
|
||||
self.write(IAC + WONT + $1[1..1])
|
||||
''
|
||||
elsif WILL[0] == $1[0] # respond to "IAC WILL x"
|
||||
if OPT_BINARY[0] == $1[1]
|
||||
self.write(IAC + DO + OPT_BINARY)
|
||||
elsif OPT_ECHO[0] == $1[1]
|
||||
self.write(IAC + DO + OPT_ECHO)
|
||||
elsif OPT_SGA[0] == $1[1]
|
||||
@telnet_option["SGA"] = true
|
||||
self.write(IAC + DO + OPT_SGA)
|
||||
else
|
||||
self.write(IAC + DONT + $1[1..1])
|
||||
end
|
||||
''
|
||||
elsif WONT[0] == $1[0] # respond to "IAC WON'T x"
|
||||
if OPT_ECHO[0] == $1[1]
|
||||
self.write(IAC + DONT + OPT_ECHO)
|
||||
elsif OPT_SGA[0] == $1[1]
|
||||
@telnet_option["SGA"] = false
|
||||
self.write(IAC + DONT + OPT_SGA)
|
||||
else
|
||||
self.write(IAC + DONT + $1[1..1])
|
||||
end
|
||||
''
|
||||
elsif SB[0] == $1[0] # respond to "IAC SB xxx IAC SE"
|
||||
if OPT_STARTTLS[0] == $1[1] && TLS_FOLLOWS[0] == $2[0]
|
||||
@sock = OpenSSL::SSL::SSLSocket.new(@sock)
|
||||
@sock.cert = @options['Cert'] unless @sock.cert
|
||||
@sock.key = @options['Key'] unless @sock.key
|
||||
@sock.ca_cert = @options['CACert']
|
||||
@sock.ca_file = @options['CAFile']
|
||||
@sock.ca_path = @options['CAPath']
|
||||
@sock.timeout = @options['Timeout']
|
||||
@sock.verify_mode = @options['VerifyMode']
|
||||
@sock.verify_callback = @options['VerifyCallback']
|
||||
@sock.verify_depth = @options['VerifyDepth']
|
||||
@sock.connect
|
||||
if @options['VerifyMode'] != OpenSSL::SSL::VERIFY_NONE
|
||||
@sock.post_connection_check(@options['Host'])
|
||||
end
|
||||
@ssl = true
|
||||
end
|
||||
''
|
||||
else
|
||||
''
|
||||
end
|
||||
end
|
||||
end # preprocess
|
||||
|
||||
alias waitfor_org waitfor
|
||||
|
||||
def waitfor(options)
|
||||
time_out = @options["Timeout"]
|
||||
waittime = @options["Waittime"]
|
||||
|
||||
if options.kind_of?(Hash)
|
||||
prompt = if options.has_key?("Match")
|
||||
options["Match"]
|
||||
elsif options.has_key?("Prompt")
|
||||
options["Prompt"]
|
||||
elsif options.has_key?("String")
|
||||
Regexp.new( Regexp.quote(options["String"]) )
|
||||
end
|
||||
time_out = options["Timeout"] if options.has_key?("Timeout")
|
||||
waittime = options["Waittime"] if options.has_key?("Waittime")
|
||||
else
|
||||
prompt = options
|
||||
end
|
||||
|
||||
if time_out == false
|
||||
time_out = nil
|
||||
end
|
||||
|
||||
line = ''
|
||||
buf = ''
|
||||
@rest = '' unless @rest
|
||||
|
||||
until(prompt === line and not IO::select([@sock], nil, nil, waittime))
|
||||
unless IO::select([@sock], nil, nil, time_out)
|
||||
raise TimeoutError, "timed-out; wait for the next data"
|
||||
end
|
||||
begin
|
||||
c = @rest + @sock.sysread(1024 * 1024)
|
||||
@dumplog.log_dump('<', c) if @options.has_key?("Dump_log")
|
||||
if @options["Telnetmode"]
|
||||
pos = 0
|
||||
catch(:next){
|
||||
while true
|
||||
case c[pos]
|
||||
when IAC[0]
|
||||
case c[pos+1]
|
||||
when DO[0], DONT[0], WILL[0], WONT[0]
|
||||
throw :next unless c[pos+2]
|
||||
pos += 3
|
||||
when SB[0]
|
||||
ret = detect_sub_negotiation(c, pos)
|
||||
throw :next unless ret
|
||||
pos = ret
|
||||
when nil
|
||||
throw :next
|
||||
else
|
||||
pos += 2
|
||||
end
|
||||
when nil
|
||||
throw :next
|
||||
else
|
||||
pos += 1
|
||||
end
|
||||
end
|
||||
}
|
||||
|
||||
buf = preprocess(c[0...pos])
|
||||
@rest = c[pos..-1]
|
||||
end
|
||||
@log.print(buf) if @options.has_key?("Output_log")
|
||||
line.concat(buf)
|
||||
yield buf if block_given?
|
||||
rescue EOFError # End of file reached
|
||||
if line == ''
|
||||
line = nil
|
||||
yield nil if block_given?
|
||||
end
|
||||
break
|
||||
end
|
||||
end
|
||||
line
|
||||
end
|
||||
|
||||
private
|
||||
|
||||
def detect_sub_negotiation(data, pos)
|
||||
return nil if data.length < pos+6 # IAC SB x param IAC SE
|
||||
pos += 3
|
||||
while true
|
||||
case data[pos]
|
||||
when IAC[0]
|
||||
if data[pos+1] == SE[0]
|
||||
pos += 2
|
||||
return pos
|
||||
else
|
||||
pos += 2
|
||||
end
|
||||
when nil
|
||||
return nil
|
||||
else
|
||||
pos += 1
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
end
|
||||
end
|
Loading…
Reference in a new issue