Some more checks...
[opensuse:spacewalk-testsuite-base.git] / features / step_definitions / xmlrpc_system_steps.rb
1 systest = XMLRPCSystemTest.new(ENV['TESTHOST'])
2 servers = []
3 rabbit = nil
4
5
6 Given /^I am logged in via XML\-RPC\/system as user "([^"]*)" and password "([^"]*)"$/ do |luser, password|
7   systest.login(luser, password)
8 end
9
10 When /^I call system\.listSystems\(\), I should get a list of them\.$/ do
11   # This also assumes the test is called *after* the regular test.
12   servers = systest.listSystems()
13   fail if servers.length < 1
14   rabbit = servers[0]
15 end
16
17 When /^I check a sysinfo by a number of XML\-RPC calls, it just works\. :\-\)$/ do
18   fail if (rabbit == nil or !systest.getSysInfo(rabbit))
19 end
20
21 Then /^I logout from XML\-RPC\/system\.$/ do
22   systest.logout()
23 end