INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ:1
This is a test of the INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ service.
Test filesDownload the files for this test
Test runRun test now
Support reference#1171-1607
INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ service test (automatically generated $Rev: 20 $)
Show/hide recent test logs
view log 3 days agoFAILED
Test began: 2012-05-16 10:48:10 Test ended: 2012-05-16 10:48:12 Result : Test failure ------ stderr and stdout follow ------ ERROR[INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ][on call]: 404 Not FoundDownload this log...404 Not Found 404 Not Found
view log 6 days agoFAILED
Test began: 2012-05-13 06:11:38 Test ended: 2012-05-13 06:11:40 Result : Test failure ------ stderr and stdout follow ------ ERROR[INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ][on call]: 404 Not FoundDownload this log...404 Not Found 404 Not Found
view log 1 week agoFAILED
Test began: 2012-05-11 06:26:56 Test ended: 2012-05-11 06:26:58 Result : Test failure ------ stderr and stdout follow ------ ERROR[INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ][on call]: 404 Not FoundDownload this log...404 Not Found 404 Not Found
view log 3 weeks agoFAILED
Test began: 2012-04-30 11:44:16 Test ended: 2012-04-30 11:44:18 Result : Test failure ------ stderr and stdout follow ------ ERROR[INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ][on call]: 404 Not FoundDownload this log...404 Not Found 404 Not Found
view log 1 month agoFAILED
Test began: 2012-04-18 15:47:42 Test ended: 2012-04-18 15:47:43 Result : Test failure ------ stderr and stdout follow ------ ERROR[INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ][on call]: 404 Not FoundDownload this log...404 Not Found 404 Not Found
view log 1 month agoFAILED
Test began: 2012-04-14 11:36:28 Test ended: 2012-04-14 11:36:30 Result : Test failure ------ stderr and stdout follow ------ ERROR[INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ][on call]: 404 Not FoundDownload this log...404 Not Found 404 Not Found
view log 1 month agoFAILED
Test began: 2012-04-11 04:23:25 Test ended: 2012-04-11 04:23:27 Result : Test failure ------ stderr and stdout follow ------ ERROR[INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ][on call]: 404 Not FoundDownload this log...404 Not Found 404 Not Found
view log 1 month agoFAILED
Test began: 2012-04-09 06:21:19 Test ended: 2012-04-09 06:21:20 Result : Test failure ------ stderr and stdout follow ------ ERROR[INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ][on call]: 404 Not FoundDownload this log...404 Not Found 404 Not Found
view log 2 months agoFAILED
Test began: 2012-03-24 02:09:46 Test ended: 2012-03-24 02:09:47 Result : Test failure ------ stderr and stdout follow ------ ERROR[INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ][on call]: 404 Not FoundDownload this log...404 Not Found 404 Not Found
view log 2 months agoFAILED
Test began: 2012-03-19 20:15:24 Test ended: 2012-03-19 20:15:26 Result : Test failure ------ stderr and stdout follow ------ ERROR[INB-dev:mmb.pcb.ub.es:getLindemannFromPCZ][on call]: 404 Not FoundDownload this log...404 Not Found 404 Not Found
This test consists of the following files:
INBtemplateTester.pl
#!/usr/bin/perl -W
# $Id: INBtemplateTester.pl 19 2009-04-21 16:14:57Z jmfernandez $
use LWP::UserAgent;
use XML::LibXML;
use strict;
my($EMBRACETESTagent)='INB EMBRACETestBot 0.1';
my(%TESThash)=(
'INB' => 'http://www.inab.org',
'INB-dev' => 'http://moby-dev.inab.org'
);
my($ua)=LWP::UserAgent->new('agent'=>$EMBRACETESTagent);
my($TESTkey)='INB-dev';
my($TESTauthURI)='mmb.pcb.ub.es';
my($TESTserviceName)='getLindemannFromPCZ';
my($compname)="$TESTkey:$TESTauthURI:$TESTserviceName";
if(exists($TESThash{$TESTkey})) {
my($requri)=$TESThash{$TESTkey}."/cgi-bin/runTestResults?authURI=$TESTauthURI&serviceName=$TESTserviceName";
my($resp)=$ua->get($requri);
if($resp->is_success()) {
my($testStat)=2; # By default, a warning
my($testMessage)='No test has been set for this service in INB';
eval {
my($parser)=XML::LibXML->new();
my($resdoc)=$parser->parse_string($resp->decoded_content());
my($root)=$resdoc->documentElement();
foreach my $child ($root->childNodes()) {
if($child->nodeType() == XML::LibXML::XML_ELEMENT_NODE) {
my($status)=$child->getAttribute('result');
$testStat=($status eq 'ok')?0:(($status eq 'warning')?2:1);
$testMessage=$child->textContent();
last;
}
}
};
if($@) {
print "ERROR[$compname][parsing XML]: ",$@,"\n";
exit 1;
} else {
print "Message[$compname]: ",$testMessage,"\n";
exit $testStat;
}
} else {
print "ERROR[$compname][on call]: ",$resp->status_line(),"\t",$resp->content(),"\n";
exit 1;
}
} else {
print 'FATAL INTERNAL ERROR [',$compname,']($Rev: 19 $). Please contact with the reponsible.',"\n";
exit 1;
}
»
- Login to post comments