129 lines
3.0 KiB
Ruby
129 lines
3.0 KiB
Ruby
|
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
|