t2-server 1.1.0 → 1.2.0

data/test/tc_connection_exceptions.rb

@@ -0,0 +1,86 @@
+# Copyright (c) 2014 The University of Manchester, UK.
+#
+# All rights reserved.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+#
+#  * Redistributions of source code must retain the above copyright notice,
+#    this list of conditions and the following disclaimer.
+#
+#  * Redistributions in binary form must reproduce the above copyright notice,
+#    this list of conditions and the following disclaimer in the documentation
+#    and/or other materials provided with the distribution.
+#
+#  * Neither the names of The University of Manchester nor the names of its
+#    contributors may be used to endorse or promote products derived from this
+#    software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
+#
+# Author: Robert Haines
+
+require 'mocked-server-responses/mocks'
+require 't2-server'
+
+class TestConnectionExceptions < Test::Unit::TestCase
+  include T2Server::Mocks
+
+  def test_get_404
+    mock("", :accept => "*/*", :status => 404)
+    connection = T2Server::ConnectionFactory.connect($uri, $conn_params)
+
+    assert_raise(T2Server::AttributeNotFoundError) do
+      connection.GET($uri, "*/*", nil, nil)
+    end
+  end
+
+  def test_put_403
+    mock("", :method => :put, :accept => "*/*", :status => 403)
+
+    connection = T2Server::ConnectionFactory.connect($uri, $conn_params)
+
+    assert_raise(T2Server::AccessForbiddenError) do
+      connection.PUT($uri, "", "*/*", nil)
+    end
+  end
+
+  def test_post_401
+    mock("", :method => :post, :accept => "*/*", :credentials => $userinfo,
+      :status => 401)
+
+    connection = T2Server::ConnectionFactory.connect($uri, $conn_params)
+    assert_raise(T2Server::AuthorizationError) do
+      connection.POST($uri, "", "*/*", $creds)
+    end
+  end
+
+  def test_options_500
+    mock("", :method => :options, :status => 500)
+
+    connection = T2Server::ConnectionFactory.connect($uri, $conn_params)
+    assert_raise(T2Server::UnexpectedServerResponse) do
+      connection.OPTIONS($uri, nil)
+    end
+  end
+
+  def test_network_timeout
+    mock("", :timeout => true)
+
+    connection = T2Server::ConnectionFactory.connect($uri, $conn_params)
+    assert_raise(T2Server::ConnectionError) do
+      connection.GET($uri, "*/*", nil, nil)
+    end
+  end
+
+end

data/test/tc_credentials.rb

@@ -0,0 +1,73 @@
+# Copyright (c) 2014 The University of Manchester, UK.
+#
+# All rights reserved.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+#
+#  * Redistributions of source code must retain the above copyright notice,
+#    this list of conditions and the following disclaimer.
+#
+#  * Redistributions in binary form must reproduce the above copyright notice,
+#    this list of conditions and the following disclaimer in the documentation
+#    and/or other materials provided with the distribution.
+#
+#  * Neither the names of The University of Manchester nor the names of its
+#    contributors may be used to endorse or promote products derived from this
+#    software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
+#
+# Author: Robert Haines
+
+require 't2-server'
+
+class TestCredentials < Test::Unit::TestCase
+
+  USERNAME = "username"
+  PASSWORD = "password"
+  USERINFO = "#{USERNAME}:#{PASSWORD}"
+
+  # This class is used to ensure that the password is set in the credentials.
+  class FakeRequest
+    def basic_auth(user, pass)
+      pass
+    end
+  end
+
+  def test_no_password_exposure
+    creds = T2Server::HttpBasic.new(USERNAME, PASSWORD)
+
+    r_to_s = creds.to_s
+    r_inspect = creds.inspect
+
+    refute r_to_s.include?(PASSWORD)
+    refute r_inspect.include?(PASSWORD)
+  end
+
+  def test_create_basic
+    request = FakeRequest.new
+    creds = T2Server::HttpBasic.new(USERNAME, PASSWORD)
+
+    assert_equal USERNAME, creds.username
+    assert_equal PASSWORD, creds.authenticate(request)
+  end
+
+  def test_parse_basic
+    request = FakeRequest.new
+    creds = T2Server::HttpBasic.parse(USERINFO)
+
+    assert_equal USERNAME, creds.username
+    assert_equal PASSWORD, creds.authenticate(request)
+  end
+end

data/test/tc_interaction.rb

@@ -0,0 +1,182 @@
+# Copyright (c) 2014 The University of Manchester, UK.
+#
+# All rights reserved.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+#
+#  * Redistributions of source code must retain the above copyright notice,
+#    this list of conditions and the following disclaimer.
+#
+#  * Redistributions in binary form must reproduce the above copyright notice,
+#    this list of conditions and the following disclaimer in the documentation
+#    and/or other materials provided with the distribution.
+#
+#  * Neither the names of The University of Manchester nor the names of its
+#    contributors may be used to endorse or promote products derived from this
+#    software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
+#
+# Author: Robert Haines
+
+require 'mocked-server-responses/mocks'
+require 't2-server'
+
+class TestInteractions < Test::Unit::TestCase
+  include T2Server::Mocks
+
+  WKF_PASS = "test/workflows/pass_through.t2flow"
+
+  # Need to lock down the run UUID so recorded server responses make sense.
+  RUN_UUID = "a341b87f-25cc-4dfd-be36-f5b073a6ba74"
+  RUN_PATH = "/rest/runs/#{RUN_UUID}"
+
+  def setup
+    # Register common mocks.
+    mock("/rest/", :accept => "application/xml", :output => "get-rest.raw")
+    mock("/rest/policy", :accept => "application/xml",
+      :output => "get-rest-policy.raw")
+    mock("/rest/runs", :method => :post, :credentials => $userinfo,
+      :status => 201,
+      :location => "https://localhost/taverna#{RUN_PATH}")
+    mock(RUN_PATH, :accept => "application/xml", :credentials => $userinfo,
+      :output => "get-rest-run.raw")
+    mock("#{RUN_PATH}/input", :accept => "application/xml",
+      :credentials => $userinfo, :output => "get-rest-run-input.raw")
+    mock("#{RUN_PATH}/security", :accept => "application/xml",
+      :credentials => $userinfo, :output => "get-rest-run-security.raw")
+
+    @run = T2Server::Run.create($uri, WKF_PASS, $creds, $conn_params)
+  end
+
+  def test_empty_feed
+    mock("#{RUN_PATH}/interaction", :accept => "application/atom+xml",
+      :credentials => $userinfo,
+      :output => "get-rest-run-interaction-feed-0.raw")
+    assert_equal [], @run.notifications(:all)
+  end
+
+  def test_requests
+    mock("#{RUN_PATH}/interaction", :accept => "application/atom+xml",
+      :credentials => $userinfo,
+      :output => "get-rest-run-interaction-feed-1.raw")
+
+    entries = @run.notifications(:all)
+    requests = @run.notifications(:requests)
+    replies = @run.notifications(:replies)
+
+    assert_equal 2, entries.length
+    assert_equal 2, requests.length
+    assert_equal [], replies
+
+    # No new requests...
+    assert_equal [], @run.notifications
+
+    entries.each do |entry|
+      refute entry.is_reply?
+      refute entry.is_notification?
+      refute entry.has_reply?
+      assert_not_equal "", entry.serial
+      assert_not_nil entry.uri
+      assert_nil entry.reply_to
+    end
+
+    test_input_data = "{ \"test\" : \"value\"}"
+    mock("#{RUN_PATH}/wd/interactions/interaction#{entries[0].id}InputData.json",
+      :credentials => $userinfo, :body => test_input_data)
+
+    assert_equal test_input_data, entries[0].input_data
+  end
+
+  def test_no_request_input_data
+    mock("#{RUN_PATH}/interaction", :accept => "application/atom+xml",
+      :credentials => $userinfo,
+      :output => "get-rest-run-interaction-feed-1.raw")
+
+    entries = @run.notifications
+
+    mock("#{RUN_PATH}/wd/interactions/interaction#{entries[0].id}InputData.json",
+      :credentials => $userinfo, :body => "", :status => 404)
+
+    assert_nothing_raised(T2Server::AttributeNotFoundError) do
+      assert_equal "", entries[0].input_data
+    end
+  end
+
+  def test_reply
+    mock("#{RUN_PATH}/interaction", :accept => "application/atom+xml",
+      :credentials => $userinfo,
+      :output => "get-rest-run-interaction-feed-1.raw")
+
+    test_reply_data = "{ \"test\" : \"value\" }"
+
+    entries = @run.notifications
+
+    mock("#{RUN_PATH}/wd/interactions/interaction#{entries[0].id}OutputData.json",
+      :method => :put, :credentials => $userinfo, :body => test_reply_data)
+
+    # When mocking this POST it doesn't matter (at the moment) what the
+    # returned location is.
+    mock("#{RUN_PATH}/interaction", :method => :post,  :status => 201,
+      :credentials => $userinfo, :location => "https://localhost/taverna")
+
+    entries[0].reply("OK", test_reply_data)
+  end
+
+  def test_replies
+    mock("#{RUN_PATH}/interaction", :accept => "application/atom+xml",
+      :credentials => $userinfo,
+      :output => "get-rest-run-interaction-feed-1.raw")
+
+    entries = @run.notifications(:all)
+    requests = @run.notifications(:requests)
+    replies = @run.notifications(:replies)
+
+    assert_equal 2, entries.length
+    assert_equal 2, requests.length
+    assert_equal [], replies
+
+    mock("#{RUN_PATH}/interaction", :accept => "application/atom+xml",
+      :credentials => $userinfo,
+      :output => "get-rest-run-interaction-feed-2.raw")
+
+    # No new requests...
+    assert_equal [], @run.notifications
+
+    # Refresh local lists.
+    entries = @run.notifications(:all)
+    requests = @run.notifications(:requests)
+    replies = @run.notifications(:replies)
+
+    # One more entry in total.
+    assert_equal 3, entries.length
+
+    # Should not lose a request.
+    assert_equal 2, requests.length
+
+    # Should gain a reply.
+    assert_equal 1, replies.length
+
+    # One request should have a reply.
+    assert requests[0].has_reply?
+    refute requests[1].has_reply?
+
+    refute replies[0].is_notification?
+    refute replies[0].has_reply?
+    assert replies[0].is_reply?
+    assert_equal requests[0].id, replies[0].reply_to
+    assert_equal "", replies[0].input_data
+  end
+
+end

data/test/{tc_misc.rb → tc_misc_live.rb}

@@ -34,10 +34,12 @@ require 't2-server'
 
 class TestMisc < Test::Unit::TestCase
 
+  WKF_MISS_O = "test/workflows/missing_outputs.t2flow"
+
   # Test a run with the missing output data bug to check that the library can
   # workaround it ok. Bug is: http://dev.mygrid.org.uk/issues/browse/T2-2100
   def test_missing_ports
-    T2Server::Run.create($uri, $wkf_miss_o, $creds, $conn_params) do |run|
+    T2Server::Run.create($uri, WKF_MISS_O, $creds, $conn_params) do |run|
       assert_nothing_raised { run.start }
       assert(run.running?)
       run.wait

data/test/tc_params.rb

@@ -1,4 +1,4 @@
-# Copyright (c) 2010, 2011 The University of Manchester, UK.
+# Copyright (c) 2010-2014 The University of Manchester, UK.
 #
 # All rights reserved.
 #
@@ -34,13 +34,91 @@ require 't2-server'
 
 class TestParams < Test::Unit::TestCase
 
-  def test_params
+  CERT_DIR  = "test/workflows/secure"
+  SERVER_PK = "#{CERT_DIR}/heater-pk.pem"
+  CLNT_CERT = "#{CERT_DIR}/user-cert.p12"
+  CLNT_PASS = "testcert"
+
+  def test_base_params
     params = T2Server::ConnectionParameters.new
 
     params[:verify_peer] = true
-    assert_not_nil(params[:verify_peer])
+    assert_not_nil params[:verify_peer]
 
     params[:not_a_chance] = true
-    assert_nil(params[:not_a_chance])
+    assert_nil params[:not_a_chance]
   end
+
+  def test_insecure
+    params = T2Server::InsecureSSLConnectionParameters.new
+
+    assert_not_nil params[:verify_peer]
+    refute params[:verify_peer]
+
+    assert_nothing_raised do
+      T2Server::Server.new("#{$uri}/insecure", params)
+    end
+  end
+
+  def test_ssl3
+    params = T2Server::SSL3ConnectionParameters.new
+
+    assert_not_nil params[:verify_peer]
+    assert params[:verify_peer]
+
+    assert_not_nil params[:ssl_version]
+    assert_equal :SSLv3, params[:ssl_version]
+
+    assert_nothing_raised do
+      T2Server::Server.new("#{$uri}/ssl3", params)
+    end
+  end
+
+  def test_custom_ca
+    uri_suffix = 0
+
+    [CERT_DIR, SERVER_PK, Dir.new(CERT_DIR), File.new(SERVER_PK)].each do |c|
+      params = T2Server::CustomCASSLConnectionParameters.new(c)
+
+      assert_not_nil params[:verify_peer]
+      assert params[:verify_peer]
+
+      if c.instance_of?(Dir) || File.directory?(c)
+        assert_not_nil params[:ca_path]
+        assert_equal CERT_DIR, params[:ca_path]
+      else
+        assert_not_nil params[:ca_file]
+        assert_equal SERVER_PK, params[:ca_file]
+      end
+
+      assert_nothing_raised do
+        T2Server::Server.new("#{$uri}/ca/#{uri_suffix}", params)
+      end
+
+      uri_suffix += 1
+    end
+  end
+
+  def test_client_cert
+    uri_suffix = 0
+
+    [CLNT_CERT, File.new(CLNT_CERT)].each do |c|
+      params = T2Server::ClientAuthSSLConnectionParameters.new(c, CLNT_PASS)
+
+      assert_not_nil params[:verify_peer]
+      assert params[:verify_peer]
+
+      assert_not_nil params[:client_certificate]
+      assert_equal CLNT_CERT, params[:client_certificate]
+      assert_not_nil params[:client_password]
+      assert_equal CLNT_PASS, params[:client_password]
+
+      assert_nothing_raised do
+        T2Server::Server.new("#{$uri}/client/#{uri_suffix}", params)
+      end
+
+      uri_suffix += 1
+    end
+  end
+
 end