Test of "api" namespace of XML-RPC API.
[opensuse:spacewalk-testsuite-base.git] / features / support / xmlrpctest.rb
1 #!/usr/ruby
2
3 require 'xmlrpc/client'
4
5 class XMLRPCBaseTest
6   #
7   # Constructor.
8   #
9   def initialize(host)
10     @host = host
11     if !@host
12       raise Exception, "Hostname is missing!"
13     end
14     @connection = XMLRPC::Client.new2("http://" + @host + "/rpc/api")
15   end
16
17
18   #
19   # Authenticate against the $HOST
20   #
21   def auth(luser, password)
22     begin
23       @sid = @connection.call("auth.login", luser, password)
24       puts @sid
25     rescue Exception => exception
26       puts "Login failed. Try harder. :)"
27     end
28   end
29
30   def logout()
31     begin
32       @connection.call("auth.logout", @sid)
33     rescue Exception => exception
34       puts "Well, you finished anyways..."
35     end
36   end
37 end
38
39
40 # Local execution only
41 if __FILE__ == $0
42   test = XMLRPCApiTest.new("hoag.suse.de")
43   if test.getVersion("10.15")
44     puts "yeeaaa!!!"
45   else
46     puts ":-("
47   end
48 end
49