This commit is contained in:
@@ -0,0 +1,128 @@
|
||||
require 'em_test_helper'
|
||||
|
||||
class TestProcesses < Test::Unit::TestCase
|
||||
|
||||
if !windows? && !jruby?
|
||||
|
||||
# EM::DeferrableChildProcess is a sugaring of a common use-case
|
||||
# involving EM::popen.
|
||||
# Call the #open method on EM::DeferrableChildProcess, passing
|
||||
# a command-string. #open immediately returns an EM::Deferrable
|
||||
# object. It also schedules the forking of a child process, which
|
||||
# will execute the command passed to #open.
|
||||
# When the forked child terminates, the Deferrable will be signalled
|
||||
# and execute its callbacks, passing the data that the child process
|
||||
# wrote to stdout.
|
||||
#
|
||||
def test_deferrable_child_process
|
||||
ls = ""
|
||||
EM.run {
|
||||
d = EM::DeferrableChildProcess.open( "ls -ltr" )
|
||||
d.callback {|data_from_child|
|
||||
ls = data_from_child
|
||||
EM.stop
|
||||
}
|
||||
}
|
||||
assert( ls.length > 0)
|
||||
end
|
||||
|
||||
def setup
|
||||
$out = nil
|
||||
$status = nil
|
||||
end
|
||||
|
||||
def test_em_system
|
||||
EM.run{
|
||||
EM.system('ls'){ |out,status| $out, $status = out, status; EM.stop }
|
||||
}
|
||||
|
||||
assert( $out.length > 0 )
|
||||
assert_equal(0, $status.exitstatus)
|
||||
assert_kind_of(Process::Status, $status)
|
||||
end
|
||||
|
||||
def test_em_system_pid
|
||||
$pids = []
|
||||
|
||||
EM.run{
|
||||
$pids << EM.system('echo hi', proc{ |out,status|$pids << status.pid; EM.stop })
|
||||
}
|
||||
|
||||
assert_equal $pids[0], $pids[1]
|
||||
end
|
||||
|
||||
def test_em_system_with_proc
|
||||
EM.run{
|
||||
EM.system('ls', proc{ |out,status| $out, $status = out, status; EM.stop })
|
||||
}
|
||||
|
||||
assert( $out.length > 0 )
|
||||
assert_equal(0, $status.exitstatus)
|
||||
assert_kind_of(Process::Status, $status)
|
||||
end
|
||||
|
||||
def test_em_system_with_two_procs
|
||||
EM.run{
|
||||
EM.system('sh', proc{ |process|
|
||||
process.send_data("echo hello\n")
|
||||
process.send_data("exit\n")
|
||||
}, proc{ |out,status|
|
||||
$out = out
|
||||
$status = status
|
||||
EM.stop
|
||||
})
|
||||
}
|
||||
|
||||
assert_equal("hello\n", $out)
|
||||
end
|
||||
|
||||
def test_em_system_cmd_arguments
|
||||
EM.run{
|
||||
EM.system('echo', '1', '2', 'version', proc{ |process|
|
||||
}, proc{ |out,status|
|
||||
$out = out
|
||||
$status = status
|
||||
EM.stop
|
||||
})
|
||||
}
|
||||
|
||||
assert_match(/1 2 version/i, $out)
|
||||
end
|
||||
|
||||
def test_em_system_spaced_arguments
|
||||
EM.run{
|
||||
EM.system('ruby', '-e', 'puts "hello"', proc{ |out,status|
|
||||
$out = out
|
||||
EM.stop
|
||||
})
|
||||
}
|
||||
|
||||
assert_equal("hello\n", $out)
|
||||
end
|
||||
|
||||
def test_em_popen_pause_resume
|
||||
c_rx = 0
|
||||
|
||||
test_client = Module.new do
|
||||
define_method :receive_data do |data|
|
||||
c_rx += 1
|
||||
pause
|
||||
EM.add_timer(0.5) { EM.stop }
|
||||
end
|
||||
end
|
||||
|
||||
EM.run do
|
||||
EM.popen('echo 1', test_client)
|
||||
end
|
||||
|
||||
assert_equal 1, c_rx
|
||||
end
|
||||
else
|
||||
warn "EM.popen not implemented, skipping tests in #{__FILE__}"
|
||||
|
||||
# Because some rubies will complain if a TestCase class has no tests
|
||||
def test_em_popen_unsupported
|
||||
assert true
|
||||
end
|
||||
end
|
||||
end
|
||||
Reference in New Issue
Block a user