2004-03-06 20:08:21 +03:00
|
|
|
=begin
|
|
|
|
|
|
|
|
= $RCSfile$ -- SSL/TLS enhancement for Net::HTTP.
|
|
|
|
|
|
|
|
== 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'.)
|
|
|
|
|
|
|
|
== Requirements
|
|
|
|
This program requires Net 1.2.0 or higher version.
|
|
|
|
You can get it from RAA or Ruby's CVS repository.
|
|
|
|
|
|
|
|
== Version
|
|
|
|
$Id$
|
|
|
|
|
|
|
|
2001-11-06: Contiributed to Ruby/OpenSSL project.
|
|
|
|
2004-03-06: Some code is merged in to net/http.
|
|
|
|
|
|
|
|
== Example
|
|
|
|
|
|
|
|
Here is a simple HTTP client:
|
|
|
|
|
|
|
|
require 'net/http'
|
|
|
|
require 'uri'
|
|
|
|
|
|
|
|
uri = URI.parse(ARGV[0] || 'http://localhost/')
|
|
|
|
http = Net::HTTP.new(uri.host, uri.port)
|
|
|
|
http.start {
|
|
|
|
http.request_get(uri.path) {|res|
|
|
|
|
print res.body
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
It can be replaced by the following code:
|
|
|
|
|
|
|
|
require 'net/https'
|
|
|
|
require 'uri'
|
|
|
|
|
|
|
|
uri = URI.parse(ARGV[0] || 'https://localhost/')
|
|
|
|
http = Net::HTTP.new(uri.host, uri.port)
|
|
|
|
http.use_ssl = true if uri.scheme == "https" # enable SSL/TLS
|
|
|
|
http.start {
|
|
|
|
http.request_get(uri.path) {|res|
|
|
|
|
print res.body
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
== class Net::HTTP
|
|
|
|
|
|
|
|
=== Instance Methods
|
|
|
|
|
|
|
|
: use_ssl?
|
|
|
|
returns true if use SSL/TLS with HTTP.
|
|
|
|
|
|
|
|
: use_ssl=((|true_or_false|))
|
|
|
|
sets use_ssl.
|
|
|
|
|
|
|
|
: peer_cert
|
|
|
|
return the X.509 certificates the server presented.
|
|
|
|
|
|
|
|
: key, key=((|key|))
|
|
|
|
Sets an OpenSSL::PKey::RSA or OpenSSL::PKey::DSA object.
|
2008-06-04 13:37:38 +04:00
|
|
|
(This method is appeared in Michal Rokos's OpenSSL extension.)
|
2004-03-06 20:08:21 +03:00
|
|
|
|
|
|
|
: cert, cert=((|cert|))
|
|
|
|
Sets an OpenSSL::X509::Certificate object as client certificate
|
2008-06-04 13:37:38 +04:00
|
|
|
(This method is appeared in Michal Rokos's OpenSSL extension).
|
2004-03-06 20:08:21 +03:00
|
|
|
|
|
|
|
: ca_file, ca_file=((|path|))
|
|
|
|
Sets path of a CA certification file in PEM format.
|
|
|
|
The file can contrain several CA certificats.
|
|
|
|
|
|
|
|
: ca_path, ca_path=((|path|))
|
|
|
|
Sets path of a CA certification directory containing certifications
|
|
|
|
in PEM format.
|
|
|
|
|
|
|
|
: verify_mode, verify_mode=((|mode|))
|
|
|
|
Sets the flags for server the certification verification at
|
|
|
|
begining of SSL/TLS session.
|
|
|
|
OpenSSL::SSL::VERIFY_NONE or OpenSSL::SSL::VERIFY_PEER is acceptable.
|
|
|
|
|
|
|
|
: verify_callback, verify_callback=((|proc|))
|
|
|
|
Sets the verify callback for the server certification verification.
|
|
|
|
|
|
|
|
: verify_depth, verify_depth=((|num|))
|
|
|
|
Sets the maximum depth for the certificate chain verification.
|
|
|
|
|
|
|
|
: cert_store, cert_store=((|store|))
|
|
|
|
Sets the X509::Store to verify peer certificate.
|
|
|
|
|
|
|
|
: ssl_timeout, ssl_timeout=((|sec|))
|
|
|
|
Sets the SSL timeout seconds.
|
|
|
|
|
|
|
|
=end
|
|
|
|
|
|
|
|
require 'net/http'
|
|
|
|
require 'openssl'
|
|
|
|
|
|
|
|
module Net
|
|
|
|
class HTTP
|
|
|
|
remove_method :use_ssl?
|
|
|
|
def use_ssl?
|
|
|
|
@use_ssl
|
|
|
|
end
|
|
|
|
|
|
|
|
# Turn on/off SSL.
|
|
|
|
# This flag must be set before starting session.
|
|
|
|
# If you change use_ssl value after session started,
|
|
|
|
# a Net::HTTP object raises IOError.
|
|
|
|
def use_ssl=(flag)
|
|
|
|
flag = (flag ? true : false)
|
2007-12-20 19:21:22 +03:00
|
|
|
if started? and @use_ssl != flag
|
|
|
|
raise IOError, "use_ssl value changed, but session already started"
|
2004-03-06 20:08:21 +03:00
|
|
|
end
|
|
|
|
@use_ssl = flag
|
|
|
|
end
|
|
|
|
|
2007-12-20 19:21:22 +03:00
|
|
|
SSL_ATTRIBUTES = %w(
|
|
|
|
ssl_version key cert ca_file ca_path cert_store ciphers
|
|
|
|
verify_mode verify_callback verify_depth ssl_timeout
|
|
|
|
)
|
|
|
|
attr_accessor *SSL_ATTRIBUTES
|
2004-03-06 20:08:21 +03:00
|
|
|
|
|
|
|
def peer_cert
|
2007-12-20 19:21:22 +03:00
|
|
|
if not use_ssl? or not @socket
|
|
|
|
return nil
|
|
|
|
end
|
2004-03-06 20:08:21 +03:00
|
|
|
@socket.io.peer_cert
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|