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
6 # under the terms of the GNU General Public License as published by
7 # the Free Software Foundation; either version 3 of the License, or
8 # (at your option) any later version.
10 # Koha is distributed in the hope that it will be useful, but
11 # WITHOUT ANY WARRANTY; without even the implied warranty of
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 # GNU General Public License for more details.
15 # You should have received a copy of the GNU General Public License
16 # along with Koha; if not, see <http://www.gnu.org/licenses>.
20 use Mojo::Base 'Mojolicious';
24 use JSON::Validator::OpenAPI::Mojolicious;
29 Koha::REST::V1 - Main v.1 REST api class
37 Overloaded Mojolicious->startup method. It is called at application startup.
45 before_dispatch => sub {
48 # Remove /api/v1/app.pl/ from the path
49 $c->req->url->base->path('/');
52 $c->res->headers->header( 'Access-Control-Allow-Origin' =>
53 C4::Context->preference('AccessControlAllowOrigin') )
54 if C4::Context->preference('AccessControlAllowOrigin');
58 # Force charset=utf8 in Content-Type header for JSON responses
59 $self->types->type( json => 'application/json; charset=utf8' );
61 $self->types->type( marcxml => 'application/marcxml+xml' );
62 $self->types->type( mij => 'application/marc-in-json' );
63 $self->types->type( marc => 'application/marc' );
65 my $secret_passphrase = C4::Context->config('api_secret_passphrase');
66 if ($secret_passphrase) {
67 $self->secrets([$secret_passphrase]);
70 my $validator = JSON::Validator::OpenAPI::Mojolicious->new;
72 push @{$self->routes->namespaces}, 'Koha::Plugin';
74 # Try to load and merge all schemas first and validate the result just once.
76 my $swagger_schema = $self->home->rel_file("api/swagger-v2-schema.json");
78 $spec = $validator->bundle(
81 schema => $self->home->rel_file("api/v1/swagger/swagger.json")
86 'Koha::REST::Plugin::PluginRoutes' => {
90 ) unless C4::Context->needs_install; # load only if Koha is installed
95 route => $self->routes->under('/api/v1')->to('Auth#under'),
96 schema => ( $swagger_schema ) ? $swagger_schema : undef,
98 1, # required by our spec because $ref directly under
99 # Paths-, Parameters-, Definitions- & Info-object
100 # is not allowed by the OpenAPI specification.
105 # Validation of the complete spec failed. Resort to validation one-by-one
108 # JSON::Validator uses confess, so trim call stack from the message.
109 carp "Warning: Could not load REST API spec bundle: " . ($_ =~ /\A(.*?)$/ms)[0];
112 $validator->load_and_validate_schema(
113 $self->home->rel_file("api/v1/swagger/swagger.json"),
115 allow_invalid_ref => 1,
116 schema => ( $swagger_schema ) ? $swagger_schema : undef,
120 $spec = $validator->schema->data;
122 'Koha::REST::Plugin::PluginRoutes' => {
124 validator => $validator
126 ) unless C4::Context->needs_install; # load only if Koha is installed
131 route => $self->routes->under('/api/v1')->to('Auth#under'),
133 1, # required by our spec because $ref directly under
134 # Paths-, Parameters-, Definitions- & Info-object
135 # is not allowed by the OpenAPI specification.
140 # JSON::Validator uses confess, so trim call stack from the message.
141 croak "Could not load REST API spec: " . ($_ =~ /\A(.*?)$/ms)[0];
145 $self->plugin( 'Koha::REST::Plugin::Pagination' );
146 $self->plugin( 'Koha::REST::Plugin::Query' );
147 $self->plugin( 'Koha::REST::Plugin::Objects' );
148 $self->plugin( 'Koha::REST::Plugin::Exceptions' );