2014-05-24 20:07:19 -04:00
|
|
|
require_relative "utils"
|
|
|
|
|
2014-12-12 22:05:43 -05:00
|
|
|
if defined?(OpenSSL::TestUtils)
|
2014-05-24 20:07:19 -04:00
|
|
|
|
|
|
|
class OpenSSL::TestPartialRecordRead < OpenSSL::SSLTestCase
|
|
|
|
def test_partial_tls_record_read_nonblock
|
2014-11-13 07:46:58 -05:00
|
|
|
start_server(OpenSSL::SSL::VERIFY_NONE, true, :server_proc =>
|
2014-05-24 20:07:19 -04:00
|
|
|
Proc.new do |server_ctx, server_ssl|
|
2014-05-29 06:32:19 -04:00
|
|
|
begin
|
|
|
|
server_ssl.io.write("\x01") # the beginning of a TLS record
|
|
|
|
sleep 6 # do not finish prematurely before the read by the client is attempted
|
|
|
|
ensure
|
|
|
|
server_ssl.close
|
|
|
|
end
|
2014-11-03 04:10:28 -05:00
|
|
|
end
|
2014-05-24 20:07:19 -04:00
|
|
|
) do |server, port|
|
|
|
|
sock = TCPSocket.new("127.0.0.1", port)
|
|
|
|
ssl = OpenSSL::SSL::SSLSocket.new(sock)
|
2014-05-29 06:32:19 -04:00
|
|
|
ssl.sync_close = true
|
|
|
|
begin
|
|
|
|
ssl.connect
|
|
|
|
sleep 3 # wait is required for the (incomplete) TLS record to arrive at the client socket
|
2014-05-24 20:07:19 -04:00
|
|
|
|
2014-05-29 06:32:19 -04:00
|
|
|
# Should raise a IO::WaitReadable since a full TLS record is not available for reading.
|
|
|
|
assert_raise(IO::WaitReadable) { ssl.read_nonblock(1) }
|
|
|
|
ensure
|
|
|
|
ssl.close
|
|
|
|
end
|
2014-05-24 20:07:19 -04:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|