1 package Koha::REST::V1;
3 # This file is part of Koha.
5 # Koha is free software; you can redistribute it and/or modify it under the
6 # terms of the GNU General Public License as published by the Free Software
7 # Foundation; either version 3 of the License, or (at your option) any later
10 # Koha is distributed in the hope that it will be useful, but WITHOUT ANY
11 # WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
12 # A PARTICULAR PURPOSE. See the GNU General Public License for more details.
14 # You should have received a copy of the GNU General Public License along
15 # with Koha; if not, write to the Free Software Foundation, Inc.,
16 # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
19 use Mojo::Base 'Mojolicious';
21 use C4::Auth qw( check_cookie_auth get_session );
28 my $route = $self->routes->under->to(
32 # ENV{REMOTE_ADDR} is not set here, we need to read the headers
33 my $remote_addr = $c->req->headers->header('x-forwarded-for');
34 my ($status, $sessionID) = check_cookie_auth($c->cookie('CGISESSID'), undef, { remote_addr => $remote_addr });
35 if ($status eq "ok") {
36 my $session = get_session($sessionID);
37 my $user = Koha::Patrons->find($session->param('number'));
38 $c->stash('koha.user' => $user);
45 # Force charset=utf8 in Content-Type header for JSON responses
46 $self->types->type(json => 'application/json; charset=utf8');
48 my $secret_passphrase = C4::Context->config('api_secret_passphrase');
49 if ($secret_passphrase) {
50 $self->secrets([$secret_passphrase]);
53 $self->plugin(Swagger2 => {
55 url => $self->home->rel_file("api/v1/swagger.json"),