Batch Results Retrieval in Perl

2016-01-21T11:31:27Z

Padro:

<syntaxhighlight lang="perl" line="1" >
#! /usr/bin/perl

########################################################################
#
# Example client to retrieve the results of a batch request to TextServer
#
# Output will be a ZIP file containing results for each input file in
# the requested format (XML, json, conll)
#
########################################################################

use strict;

# import needeed libraries
use HTTP::Request::Common;
use LWP::UserAgent;

print "TextServer username: ";
my $user=<>; chomp $user;
print "TextServer Job Token ID: ";
my $tkid=<>; chomp $tkid;
print "Output ZIP file: ";
my $outfname=<>; chomp $outfname;

# URL for the requested service
my $TextServer_URL = "http://frodo.lsi.upc.edu:8080/TextWS/textservlet/ws";

# create user agent
my $ua = LWP::UserAgent->new;

# send request to check for job termination
print "Polling server for job completion...\n";
my $resp = $ua->post($TextServer_URL."/resultRetrieve",
Content_Type => 'form-data',
Content => [username => $user,
tokenID => $tkid
]
);

if ($resp->code==503 && $resp->decoded_content =~ /^\[TS\-125\]/ ) {
# http status 503, textserver code TS-125 means the job is not finished yet.
print "Job not finished yet\n";
exit();
}

elsif (!$resp->is_success) {
# some other error happened, report it.
die $resp->status_line." - ".$resp->decoded_content."\n";
}

# if status=200, we a got ZIP response, the job is done.
# print zipped respose to output file
open(my $outf, '>', $outfname);
print $outf $resp->decoded_content;
close $outf;
print "Job finished. Results saved to ".$outfname."\n";
</syntaxhighlight>

Batch Results Retrieval in Java

2016-01-21T11:31:02Z

Padro:

<syntaxhighlight lang="java" line="1" >
////////////////////////////////////////////////////////////////////////////
//
// Example client to retrieve the results of a batch request to TextServer
//
// Output will be a ZIP file containing results for each input file in
// the requested format (XML, json, conll)
//
////////////////////////////////////////////////////////////////////////////

import org.apache.http.client.HttpClient;
import org.apache.http.HttpResponse;
import org.apache.http.HttpStatus;
import org.apache.http.entity.mime.content.FileBody;

import org.apache.http.client.methods.HttpPost;
import org.apache.http.entity.mime.MultipartEntityBuilder;
import org.apache.http.impl.client.HttpClientBuilder;
import org.apache.http.util.EntityUtils;

import java.io.File;
import java.io.InputStream;
import java.io.FileOutputStream;

public class RetrieveResults {

// service base URL
static final String textServer_URL = "http://frodo.lsi.upc.edu:8080/TextWS/textservlet/ws";

public static void main(String[] args) throws Exception {

// Get request parameters
System.out.print("TextServer Username: ");
String user = System.console().readLine();
System.out.print("TextServer Job Token ID: ");
String tokenID = System.console().readLine();
System.out.print("Output ZIP file: ");
String outfname = System.console().readLine();

// prepare request to poll for completion and retrieve results
request = new HttpPost(textServer_URL+"/resultRetrieve");
request.setEntity(MultipartEntityBuilder
.create()
.addTextBody("username", user)
.addTextBody("tokenID", tokenID)
.build() );

System.out.println("Polling server for job completion");
response = client.execute(request);
content = EntityUtils.toString(response.getEntity());

// we got an error code, lets see which one
if (response.getStatusLine().getStatusCode()==HttpStatus.SC_SERVICE_UNAVAILABLE &&
content.substring(0,8).equals("[TS-125]") ) {
// SC=503 and TS_code=TS-125 mean job is not finished. keep waiting
System.out.println("Job not finished yet.");
System.exit(0);
}
else if (response.getStatusLine().getStatusCode() != HttpStatus.SC_OK) {
// some unexpected error happened
System.out.println(content);
System.exit(1);
}

// No errors, we got response.
// write the received ZIP result to output file
InputStream sin = response.getEntity().getContent();
byte data[] = new byte[sin.available()];
sin.read(data);

FileOutputStream outf = new FileOutputStream(outfname);
outf.write(data);
outf.close();

System.out.println("Job finished. Results saved to "+outfname);
}
}
</syntaxhighlight>

Batch Results Retrieval in Python

2016-01-21T11:30:36Z

Padro:

Batch Results Retrieval in PHP

2016-01-21T11:29:58Z

Padro:

<syntaxhighlight lang="php" line="1" >
#! /usr/bin/php5

<?php

//////////////////////////////////////////////////////////////////
//
// Example client to submit an interactive request to TextServer
// SERVICENAME service.
// Input may be a plain text or a text file. No ZIP files.
// Output will be in the requested format (XML, json, conll)
//
/////////////////////////////////////////////////////////////////

echo 'TextServer Username: '; $user = rtrim(fgets(STDIN));
echo 'TextServer Job Token ID: '; $tkid = rtrim(fgets(STDIN));
echo 'Output ZIP file: '; $outfile = rtrim(fgets(STDIN));

// build request
$TextServer_URL="http://frodo.lsi.upc.edu:8080/TextWS/textservlet/ws";

// prepare request to poll for completion and retrieve results
$h = curl_init();
curl_setopt($h, CURLOPT_URL, $TextServer_URL."/resultRetrieve");
curl_setopt($h, CURLOPT_POST, true);
curl_setopt($h, CURLOPT_POSTFIELDS, array(
'username' => $user,
'tokenID' => $tkid,
) );
curl_setopt($h, CURLOPT_HEADER, false);
curl_setopt($h, CURLOPT_RETURNTRANSFER, 1);

// execute request
$result = curl_exec($h);
// get status
$err = curl_getinfo($h, CURLINFO_HTTP_CODE);
// close connection
curl_close($h);

if ($err == 503 and strpos($result, '[TS-125]')!==FALSE) {
// http status 503, textserver code TS-125 means the job is not finished yet.
print "Job not finished yet\n";
exit(0);
}
else if ($err !== 200) {
// some other unexpected error happened. Report it
print "HTTP ".$err." - ".$result."\n";
exit(1);
}

// response is ok, the job is done and we got the results.
// write results to output ZIP file.
$outf = fopen($outfile, "wb");
fwrite($outf, $result);
fclose($outf);
print "Job finished. Results saved to ".$outfile."\n";

?>
</syntaxhighlight>

Batch Results Retrieval in curl

2016-01-21T11:29:16Z

Padro:

<syntaxhighlight lang="bash" line="1" >
#! /bin/sh

########################################################################
#
# Example client to retrieve results for a batch job previously submitted
#
# Output will be a ZIP file containing results for each input file in
# the requested format (XML, json, conll)
#
########################################################################

# Get query parameters
echo -n "TextServer username: "
read USERNAME
echo -n "TextServer Job Token ID: "
read TKID
echo -n "Output ZIP file: "
read OUTFNAME

TEXTSERVER_URL="http://frodo.lsi.upc.edu:8080/TextWS/textservlet/ws"

echo "Polling server for job completion..."
curl -X POST -s -S \
--form "username=$USERNAME" \
--form "tokenID=$TKID" \
$TEXTSERVER_URL"/resultRetrieve" >$OUTFNAME

if ( grep -q '\[TS-125\]' $OUTFNAME ); then
# server returned HTTP 503, with TextSErver code [TS-125], which means job not finished
echo "Job not finished yet"
rm $OUTFNAME
exit
elif ( grep -q '\[TS-' $OUTFNAME ); then
# some other error from TextServer
cat $OUTFNAME
echo ""
rm $OUTFNAME
exit
fi

# no error, we got the results.
echo "Job finished. Results saved to "$OUTFNAME
</syntaxhighlight>