puma/test/helpers/integration.rb

403 lines
12 KiB
Ruby

# frozen_string_literal: true
require "puma/control_cli"
require "json"
require "open3"
require "io/wait"
require_relative 'tmp_path'
# Only single mode tests go here. Cluster and pumactl tests
# have their own files, use those instead
class TestIntegration < Minitest::Test
include TmpPath
DARWIN = RUBY_PLATFORM.include? 'darwin'
HOST = "127.0.0.1"
TOKEN = "xxyyzz"
RESP_READ_LEN = 65_536
RESP_READ_TIMEOUT = 10
RESP_SPLIT = "\r\n\r\n"
BASE = defined?(Bundler) ? "bundle exec #{Gem.ruby} -Ilib" :
"#{Gem.ruby} -Ilib"
def setup
@server = nil
@pid = nil
@ios_to_close = []
@bind_path = tmp_path('.sock')
end
def teardown
if @server && defined?(@control_tcp_port) && Puma.windows?
cli_pumactl 'stop'
elsif @server && @pid && !Puma.windows?
stop_server @pid, signal: :INT
end
if @ios_to_close
@ios_to_close.each do |io|
begin
io.close if io.is_a?(IO) && !io.closed?
rescue
ensure
io = nil
end
end
end
if @bind_path
refute File.exist?(@bind_path), "Bind path must be removed after stop"
File.unlink(@bind_path) rescue nil
end
# wait until the end for OS buffering?
if @server
begin
@server.close unless @server.closed?
rescue
ensure
@server = nil
end
end
end
private
def silent_and_checked_system_command(*args)
assert(system(*args, out: File::NULL, err: File::NULL))
end
def cli_server(argv, unix: false, config: nil, merge_err: false)
if config
config_file = Tempfile.new(%w(config .rb))
config_file.write config
config_file.close
config = "-C #{config_file.path}"
end
puma_path = File.expand_path '../../../bin/puma', __FILE__
if unix
cmd = "#{BASE} #{puma_path} #{config} -b unix://#{@bind_path} #{argv}"
else
@tcp_port = UniquePort.call
cmd = "#{BASE} #{puma_path} #{config} -b tcp://#{HOST}:#{@tcp_port} #{argv}"
end
if merge_err
@server = IO.popen(cmd, "r", :err=>[:child, :out])
else
@server = IO.popen(cmd, "r")
end
wait_for_server_to_boot
@pid = @server.pid
@server
end
# rescue statements are just in case method is called with a server
# that is already stopped/killed, especially since Process.wait2 is
# blocking
def stop_server(pid = @pid, signal: :TERM)
begin
Process.kill signal, pid
rescue Errno::ESRCH
end
begin
Process.wait2 pid
rescue Errno::ECHILD
end
end
def restart_server_and_listen(argv)
cli_server argv
connection = connect
initial_reply = read_body(connection)
restart_server connection
[initial_reply, read_body(connect)]
end
# reuses an existing connection to make sure that works
def restart_server(connection, log: false)
Process.kill :USR2, @pid
connection.write "GET / HTTP/1.1\r\n\r\n" # trigger it to start by sending a new request
wait_for_server_to_boot(log: log)
end
# wait for server to say it booted
# @server and/or @server.gets may be nil on slow CI systems
def wait_for_server_to_boot(log: false)
sleep 0.05 until @server.is_a?(IO)
@server.wait_readable 1
if log
puts "Waiting for server to boot..."
begin
line = @server && @server.gets
puts line if line && line.strip != ''
end until line && line.include?('Ctrl-C')
puts "Server booted!"
else
true until (@server.gets || '').include?('Ctrl-C')
end
end
def connect(path = nil, unix: false)
s = unix ? UNIXSocket.new(@bind_path) : TCPSocket.new(HOST, @tcp_port)
@ios_to_close << s
s << "GET /#{path} HTTP/1.1\r\n\r\n"
s
end
# use only if all socket writes are fast
# does not wait for a read
def fast_connect(path = nil, unix: false)
s = unix ? UNIXSocket.new(@bind_path) : TCPSocket.new(HOST, @tcp_port)
@ios_to_close << s
fast_write s, "GET /#{path} HTTP/1.1\r\n\r\n"
s
end
def fast_write(io, str)
n = 0
while true
begin
n = io.syswrite str
rescue Errno::EAGAIN, Errno::EWOULDBLOCK => e
if !IO.select(nil, [io], nil, 5)
raise e
end
retry
rescue Errno::EPIPE, SystemCallError, IOError => e
raise e
end
return if n == str.bytesize
str = str.byteslice(n..-1)
end
end
def read_body(connection, timeout = nil)
read_response(connection, timeout).last
end
def read_response(connection, timeout = nil)
timeout ||= RESP_READ_TIMEOUT
content_length = nil
chunked = nil
response = ''.dup
t_st = Process.clock_gettime Process::CLOCK_MONOTONIC
if connection.to_io.wait_readable timeout
loop do
begin
part = connection.read_nonblock(RESP_READ_LEN, exception: false)
case part
when String
unless content_length || chunked
chunked ||= part.include? "\r\nTransfer-Encoding: chunked\r\n"
content_length = (t = part[/^Content-Length: (\d+)/i , 1]) ? t.to_i : nil
end
response << part
hdrs, body = response.split RESP_SPLIT, 2
unless body.nil?
# below could be simplified, but allows for debugging...
ret =
if content_length
body.bytesize == content_length
elsif chunked
body.end_with? "\r\n0\r\n\r\n"
elsif !hdrs.empty? && !body.empty?
true
else
false
end
if ret
return [hdrs, body]
end
end
sleep 0.000_1
when :wait_readable, :wait_writable # :wait_writable for ssl
sleep 0.000_2
when nil
raise EOFError
end
if timeout < Process.clock_gettime(Process::CLOCK_MONOTONIC) - t_st
raise Timeout::Error, 'Client Read Timeout'
end
end
end
else
raise Timeout::Error, 'Client Read Timeout'
end
end
# gets worker pids from @server output
def get_worker_pids(phase = 0, size = workers)
pids = []
re = /PID: (\d+)\) booted in [.0-9]+s, phase: #{phase}/
while pids.size < size
if pid = @server.gets[re, 1]
pids << pid
end
end
pids.map(&:to_i)
end
# used to define correct 'refused' errors
def thread_run_refused(unix: false)
if unix
DARWIN ? [IOError, Errno::ENOENT, Errno::EPIPE] :
[IOError, Errno::ENOENT]
else
# Errno::ECONNABORTED is thrown intermittently on TCPSocket.new
DARWIN ? [IOError, Errno::ECONNREFUSED, Errno::EPIPE, Errno::EBADF, EOFError, Errno::ECONNABORTED] :
[IOError, Errno::ECONNREFUSED, Errno::EPIPE]
end
end
def cli_pumactl(argv, unix: false)
arg =
if unix
%W[-C unix://#{@control_path} -T #{TOKEN} #{argv}]
else
%W[-C tcp://#{HOST}:#{@control_tcp_port} -T #{TOKEN} #{argv}]
end
r, w = IO.pipe
Thread.new { Puma::ControlCLI.new(arg, w, w).run }.join
w.close
@ios_to_close << r
r
end
def get_stats
read_pipe = cli_pumactl "stats"
JSON.parse(read_pipe.readlines.last)
end
def hot_restart_does_not_drop_connections(num_threads: 1, total_requests: 500)
skipped = true
skip_if :jruby, suffix: <<-MSG
- file descriptors are not preserved on exec on JRuby; connection reset errors are expected during restarts
MSG
skip_if :truffleruby, suffix: ' - Undiagnosed failures on TruffleRuby'
args = "-w #{workers} -t 0:5 -q test/rackup/hello_with_delay.ru"
if Puma.windows?
@control_tcp_port = UniquePort.call
cli_server "--control-url tcp://#{HOST}:#{@control_tcp_port} --control-token #{TOKEN} #{args}"
else
cli_server args
end
skipped = false
replies = Hash.new 0
refused = thread_run_refused unix: false
message = 'A' * 16_256 # 2^14 - 128
mutex = Mutex.new
restart_count = 0
client_threads = []
num_requests = (total_requests/num_threads).to_i
num_threads.times do |thread|
client_threads << Thread.new do
num_requests.times do |req_num|
begin
socket = TCPSocket.new HOST, @tcp_port
fast_write socket, "POST / HTTP/1.1\r\nContent-Length: #{message.bytesize}\r\n\r\n#{message}"
body = read_body(socket, 10)
if body == "Hello World"
mutex.synchronize {
replies[:success] += 1
replies[:restart] += 1 if restart_count > 0
}
else
mutex.synchronize { replies[:unexpected_response] += 1 }
end
rescue Errno::ECONNRESET, Errno::EBADF, Errno::ENOTCONN
# connection was accepted but then closed
# client would see an empty response
# Errno::EBADF Windows may not be able to make a connection
mutex.synchronize { replies[:reset] += 1 }
rescue *refused, IOError
# IOError intermittently thrown by Ubuntu, add to allow retry
mutex.synchronize { replies[:refused] += 1 }
rescue ::Timeout::Error
mutex.synchronize { replies[:read_timeout] += 1 }
ensure
if socket.is_a?(IO) && !socket.closed?
begin
socket.close
rescue Errno::EBADF
end
end
end
end
# STDOUT.puts "#{thread} #{replies[:success]}"
end
end
run = true
restart_thread = Thread.new do
sleep 0.30 # let some connections in before 1st restart
while run
if Puma.windows?
cli_pumactl 'restart'
else
Process.kill :USR2, @pid
end
sleep 0.5
wait_for_server_to_boot
restart_count += 1
sleep(Puma.windows? ? 3.0 : 1.0)
end
end
client_threads.each(&:join)
run = false
restart_thread.join
if Puma.windows?
cli_pumactl 'stop'
Process.wait @server.pid
@server = nil
end
msg = (" %4d unexpected_response\n" % replies.fetch(:unexpected_response,0)).dup
msg << " %4d refused\n" % replies.fetch(:refused,0)
msg << " %4d read timeout\n" % replies.fetch(:read_timeout,0)
msg << " %4d reset\n" % replies.fetch(:reset,0)
msg << " %4d success\n" % replies.fetch(:success,0)
msg << " %4d success after restart\n" % replies.fetch(:restart,0)
msg << " %4d restart count\n" % restart_count
reset = replies[:reset]
if Puma.windows?
# 5 is default thread count in Puma?
reset_max = num_threads * restart_count
assert_operator reset_max, :>=, reset, "#{msg}Expected reset_max >= reset errors"
assert_operator 40, :>=, replies[:refused], "#{msg}Too many refused connections"
else
assert_equal 0, reset, "#{msg}Expected no reset errors"
assert_equal 0, replies[:refused], "#{msg}Expected no refused connections"
end
assert_equal 0, replies[:unexpected_response], "#{msg}Unexpected response"
assert_equal 0, replies[:read_timeout], "#{msg}Expected no read timeouts"
if Puma.windows?
assert_equal (num_threads * num_requests) - reset - replies[:refused], replies[:success]
else
assert_equal (num_threads * num_requests), replies[:success]
end
ensure
return if skipped
if passed?
msg = " restart_count #{restart_count}, reset #{reset}, success after restart #{replies[:restart]}"
$debugging_info << "#{full_name}\n#{msg}\n"
else
client_threads.each { |thr| thr.kill if thr.is_a? Thread }
$debugging_info << "#{full_name}\n#{msg}\n"
end
end
end