WSxVO_EMAP_Reference_dsn_test

This is a test of the WSxVO_EMAP_Reference service.
Test filesDownload the files for this test
Test runRun test now
Support reference#1848-1882
###################################################
### Testing script for WSxVO services
### registered at http://www.embraceregistry.net/
###
### author: jrmacias@cnb.csic.es
### date: 20090512
###
### Simply make a dsn query to the Web Service and
### wait for proper response. It evaluates success
### just if the name of the services are found in
### the response
###################################################
Show/hide recent test logs
view log 1 week agoPASSED

Test began: 2012-05-10 23:58:41 Test ended: 2012-05-10 23:59:42 Result : Test passed ------ stderr and stdout follow ------ Operation in progress at /Library/Perl/5.8.8/darwin-thread-multi-2level/XML/LibXML.pm line 587. PassedDownload this log...
view log 1 week agoPASSED

Test began: 2012-05-10 21:49:45 Test ended: 2012-05-10 21:50:46 Result : Test passed ------ stderr and stdout follow ------ Operation in progress at /Library/Perl/5.8.8/darwin-thread-multi-2level/XML/LibXML.pm line 587. PassedDownload this log...
view log 2 weeks agoPASSED

Test began: 2012-05-07 03:49:34 Test ended: 2012-05-07 03:50:35 Result : Test passed ------ stderr and stdout follow ------ Operation in progress at /Library/Perl/5.8.8/darwin-thread-multi-2level/XML/LibXML.pm line 587. PassedDownload this log...
view log 4 weeks agoPASSED

Test began: 2012-04-20 00:28:25 Test ended: 2012-04-20 00:29:25 Result : Test passed ------ stderr and stdout follow ------ Operation in progress at /Library/Perl/5.8.8/darwin-thread-multi-2level/XML/LibXML.pm line 587. PassedDownload this log...
view log 4 weeks agoPASSED

Test began: 2012-04-20 00:13:26 Test ended: 2012-04-20 00:14:27 Result : Test passed ------ stderr and stdout follow ------ Operation in progress at /Library/Perl/5.8.8/darwin-thread-multi-2level/XML/LibXML.pm line 587. PassedDownload this log...
view log 1 month agoPASSED

Test began: 2012-04-11 22:18:53 Test ended: 2012-04-11 22:19:54 Result : Test passed ------ stderr and stdout follow ------ Operation in progress at /Library/Perl/5.8.8/darwin-thread-multi-2level/XML/LibXML.pm line 587. PassedDownload this log...
view log 1 month agoPASSED

Test began: 2012-04-10 21:44:57 Test ended: 2012-04-10 21:45:58 Result : Test passed ------ stderr and stdout follow ------ Operation in progress at /Library/Perl/5.8.8/darwin-thread-multi-2level/XML/LibXML.pm line 587. PassedDownload this log...
view log 2 months agoPASSED

Test began: 2012-03-29 02:55:08 Test ended: 2012-03-29 02:56:08 Result : Test passed ------ stderr and stdout follow ------ Operation in progress at /Library/Perl/5.8.8/darwin-thread-multi-2level/XML/LibXML.pm line 587. PassedDownload this log...
view log 2 months agoPASSED

Test began: 2012-03-26 15:04:34 Test ended: 2012-03-26 15:04:34 Result : Test passed ------ stderr and stdout follow ------ No such file or directory at /Library/Perl/5.8.8/darwin-thread-multi-2level/XML/LibXML.pm line 587. PassedDownload this log...
view log 2 months agoPASSED

Test began: 2012-03-17 15:35:03 Test ended: 2012-03-17 15:36:03 Result : Test passed ------ stderr and stdout follow ------ Operation in progress at /Library/Perl/5.8.8/darwin-thread-multi-2level/XML/LibXML.pm line 587. PassedDownload this log...
This test consists of the following files:
WSxVO_EMAP_Reference_dsn_test.pl
#!/usr/bin/perl
###################################################
### Testing script for WSxVO services
### registered at http://www.embraceregistry.net/
###
### author: jrmacias@cnb.csic.es
### date: 20090512
###
### Simply make a dsn query to the Web Service and
### wait for proper response. It evaluates success
### just if the name of the services are found in
### the response
###################################################
use strict;
# import the modules we need for this test; XML::Compile is included on the server
# by default.
use XML::Compile::WSDL11;
use XML::Compile::Transport::SOAPHTTP;
eval
{
# Retriving and processing the WSDL
my $wsdl = XML::LibXML->new->parse_file('http://biocomp.cnb.csic.es:8092/axis2/services/WSVO_EMAP_Reference?wsdl');
my $proxy = XML::Compile::WSDL11->new($wsdl);
# Generating a request message based on the WSDL
# All the services implement a dsn (data source names) function
my $dsn = $proxy->compileClient('dsn');
# Calling the service and getting the response
my $answer = $dsn->();
# If the response arrived,.. return 0 because the test passed.
# If no answer has arrived,.. return 1 to indicate the test failed.
if ( defined $answer ) {
print "Passed\n";
exit 0;
} else {
print "Failed\n";
exit 1;
}
};
if ($@)
{
if ($@[0] == "WSxVO_EMAP_ReferenceSOAP11port_http"){
print "Passed\n";
exit 0;
} else {
print "Caught an exception\n";
print $@;
exit 2;
}
{
exit 0;
}
### print "Caught an exception\n";
### exit 1;
}
»
- Login to post comments