[EP-tech] Sending out Error Statuses with Error codes

Tue Jun 26 17:32:28 BST 2018

Apologies - that was only ½ helpful…
This is the other bit that I think you need:
https://perl.apache.org/docs/2.0/api/Apache2/Response.html#C_custom_response_

Cheers,
John

From: John Salter
Sent: 26 June 2018 17:27
To: eprints-tech at ecs.soton.ac.uk
Subject: RE: Sending out Error Statuses with Error codes

Hi Adam,
You need the 'mod_perl2 User's Guide' by Bekman and Brandt… :o)

Or hopefully this:
https://perl.apache.org/docs/2.0/api/Apache2/RequestRec.html#C_err_headers_out_

Cheers,
John

From: eprints-tech-bounces at ecs.soton.ac.uk<mailto:eprints-tech-bounces at ecs.soton.ac.uk> [mailto:eprints-tech-bounces at ecs.soton.ac.uk] On Behalf Of Adam Field
Sent: 26 June 2018 17:01
To: eprints-tech at ecs.soton.ac.uk<mailto:eprints-tech at ecs.soton.ac.uk>
Subject: [EP-tech] Sending out Error Statuses with Error codes

Hi

                I’m working on an API that spits out objects in JSON, and I have a function that handles errors.  I can’t seem to get it to behave, and I wonder if anyone can offer me any advice.

sub api_error
{
        my ($repo, $code, $message) = @_;

        my $r = $repo->request;

        $r->status($code);
        EPrints::Apache::AnApache::send_status_line( $r, $code );
        $r->content_type('application/json');

        my $json = JSON->new;
        my $content = $json->encode(
        {
                status => $code,
                message => $message
        }
        );

        $r->err_headers_out->{'Content-Length'} = length $content;

#       binmode(STDOUT, ":utf8");
#       print $content;

        return $code;
}

Using CURL to look at the headers and body, I get this:

HTTP/1.1 400 Bad Request
Date: Tue, 26 Jun 2018 15:48:51 GMT
Server: Apache/2.4.7 (Ubuntu)
Content-Length: 120
Connection: close
Content-Type: text/html; charset=iso-8859-1

<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN">
<html><head>
<title>400 Bad Request</title>
</head><body>
<h1>Bad Request</h1>
<p>Your browser sent a request that this server could not understand.<br />
</p>
<hr>
<address>Apache/2.4.7 (Ubuntu) Server at sherpaneo-test.sherpa.ac.uk Port 443</address>
</body></html>

If I uncomment the two commented lines, I get this:

HTTP/1.1 200 OK
Date: Tue, 26 Jun 2018 15:48:36 GMT
Server: Apache/2.4.7 (Ubuntu)
Content-Length: 120
Content-Type: application/json

{"message":"unrecognised api key in 'api-key' at /usr/share/eprints3/lib/plugins/SherpaAPI.pm line 470.\n","status":400}

Essentially, if I output anything to STDOUT, something (maybe MOD Perl) switches the status to ‘200 OK’.  How can I get the status code from the first version, and the body from the second?  Any ideas?

Cheers

--
Adam Field
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mailman.ecs.soton.ac.uk/pipermail/eprints-tech/attachments/20180626/0c94b7ea/attachment-0001.html 