use Mojo::Base 'Mojolicious::Controller';
+use C4::Circulation qw( barcodedecode );
+
use Koha::Items;
-use Try::Tiny;
+use List::MoreUtils qw( any );
+use Try::Tiny qw( catch try );
=head1 NAME
);
}
catch {
- unless ( blessed $_ && $_->can('rethrow') ) {
+ $c->unhandled_exception($_);
+ };
+}
+
+=head3 get
+
+Controller function that handles retrieving a single Koha::Item
+
+=cut
+
+sub get {
+ my $c = shift->openapi->valid_input or return;
+
+ try {
+ my $item = Koha::Items->find($c->validation->param('item_id'));
+ unless ( $item ) {
return $c->render(
- status => 500,
- openapi => {
- error =>
- "Something went wrong, check Koha logs for details."
- }
+ status => 404,
+ openapi => { error => 'Item not found'}
+ );
+ }
+ return $c->render( status => 200, openapi => $item->to_api );
+ }
+ catch {
+ $c->unhandled_exception($_);
+ };
+}
+
+=head3 delete
+
+Controller function that handles deleting a single Koha::Item
+
+=cut
+
+sub delete {
+ my $c = shift->openapi->valid_input or return;
+
+ return try {
+ my $item = Koha::Items->find($c->validation->param('item_id'));
+ unless ( $item ) {
+ return $c->render(
+ status => 404,
+ openapi => { error => 'Item not found'}
);
}
+
+ my $safe_to_delete = $item->safe_to_delete;
+
+ if ( !$safe_to_delete ) {
+
+ # Pick the first error, if any
+ my ( $error ) = grep { $_->type eq 'error' } @{ $safe_to_delete->messages };
+
+ unless ( $error ) {
+ Koha::Exception->throw('Koha::Item->safe_to_delete returned false but carried no error message');
+ }
+
+ my $errors = {
+ book_on_loan => { code => 'checked_out', description => 'The item is checked out' },
+ book_reserved => { code => 'found_hold', description => 'Waiting or in-transit hold for the item' },
+ last_item_for_hold => { code => 'last_item_for_hold', description => 'The item is the last one on a record on which a biblio-level hold is placed' },
+ linked_analytics => { code => 'linked_analytics', description => 'The item has linked analytic records' },
+ not_same_branch => { code => 'not_same_branch', description => 'The item is blocked by independent branches' },
+ };
+
+ if ( any { $error->message eq $_ } keys %{$errors} ) {
+
+ my $code = $error->message;
+
+ return $c->render(
+ status => 409,
+ openapi => {
+ error => $errors->{ $code }->{description},
+ error_code => $errors->{ $code }->{code},
+ }
+ );
+ } else {
+ Koha::Exception->throw( 'Koha::Patron->safe_to_delete carried an unexpected message: ' . $error->message );
+ }
+ }
+
+ $item->safe_delete;
+
return $c->render(
- status => 500,
- openapi => { error => "$_" }
+ status => 204,
+ openapi => q{}
);
+ }
+ catch {
+ $c->unhandled_exception($_);
};
}
+=head3 pickup_locations
-=head3 get
+Method that returns the possible pickup_locations for a given item
+used for building the dropdown selector
-Controller function that handles retrieving a single Koha::Item
+=cut
+
+sub pickup_locations {
+ my $c = shift->openapi->valid_input or return;
+
+ my $item_id = $c->validation->param('item_id');
+ my $item = Koha::Items->find( $item_id );
+
+ unless ($item) {
+ return $c->render(
+ status => 404,
+ openapi => { error => "Item not found" }
+ );
+ }
+
+ my $patron_id = delete $c->validation->output->{patron_id};
+ my $patron = Koha::Patrons->find( $patron_id );
+
+ unless ($patron) {
+ return $c->render(
+ status => 400,
+ openapi => { error => "Patron not found" }
+ );
+ }
+
+ return try {
+
+ my $pl_set = $item->pickup_locations( { patron => $patron } );
+
+ my @response = ();
+ if ( C4::Context->preference('AllowHoldPolicyOverride') ) {
+
+ my $libraries_rs = Koha::Libraries->search( { pickup_location => 1 } );
+ my $libraries = $c->objects->search($libraries_rs);
+
+ @response = map {
+ my $library = $_;
+ $library->{needs_override} = (
+ any { $_->branchcode eq $library->{library_id} }
+ @{ $pl_set->as_list }
+ )
+ ? Mojo::JSON->false
+ : Mojo::JSON->true;
+ $library;
+ } @{$libraries};
+ }
+ else {
+
+ my $pickup_locations = $c->objects->search($pl_set);
+ @response = map { $_->{needs_override} = Mojo::JSON->false; $_; } @{$pickup_locations};
+ }
+
+ return $c->render(
+ status => 200,
+ openapi => \@response
+ );
+ }
+ catch {
+ $c->unhandled_exception($_);
+ };
+}
+
+=head3 bundled_items
+
+Controller function that handles bundled_items Koha::Item objects
=cut
-sub get {
+sub bundled_items {
my $c = shift->openapi->valid_input or return;
- my $item;
- try {
- $item = Koha::Items->find($c->validation->param('item_id'));
- return $c->render( status => 200, openapi => $item->to_api );
+ my $item_id = $c->validation->param('item_id');
+ my $item = Koha::Items->find( $item_id );
+
+ unless ($item) {
+ return $c->render(
+ status => 404,
+ openapi => { error => "Item not found" }
+ );
+ }
+
+ return try {
+ my $items_set = $item->bundle_items;
+ my $items = $c->objects->search( $items_set );
+ return $c->render(
+ status => 200,
+ openapi => $items
+ );
+ }
+ catch {
+ $c->unhandled_exception($_);
+ };
+}
+
+=head3 add_to_bundle
+
+Controller function that handles adding items to this bundle
+
+=cut
+
+sub add_to_bundle {
+ my $c = shift->openapi->valid_input or return;
+
+ my $item_id = $c->validation->param('item_id');
+ my $item = Koha::Items->find( $item_id );
+
+ unless ($item) {
+ return $c->render(
+ status => 404,
+ openapi => { error => "Item not found" }
+ );
+ }
+
+ my $bundle_item_id = $c->validation->param('body')->{'external_id'};
+ $bundle_item_id = barcodedecode($bundle_item_id);
+ my $bundle_item = Koha::Items->find( { barcode => $bundle_item_id } );
+
+ unless ($bundle_item) {
+ return $c->render(
+ status => 404,
+ openapi => { error => "Bundle item not found" }
+ );
+ }
+
+ return try {
+ my $link = $item->add_to_bundle($bundle_item);
+ return $c->render(
+ status => 201,
+ openapi => $bundle_item
+ );
}
catch {
- unless ( defined $item ) {
- return $c->render( status => 404,
- openapi => { error => 'Item not found'} );
+ if ( ref($_) eq 'Koha::Exceptions::Object::DuplicateID' ) {
+ return $c->render(
+ status => 409,
+ openapi => {
+ error => 'Item is already bundled',
+ key => $_->duplicate_id
+ }
+ );
}
- if ( $_->isa('DBIx::Class::Exception') ) {
- return $c->render( status => 500,
- openapi => { error => $_->{msg} } );
+ elsif ( ref($_) eq 'Koha::Exceptions::Item::Bundle::IsBundle' ) {
+ return $c->render(
+ status => 400,
+ openapi => {
+ error => 'Bundles cannot be nested'
+ }
+ );
}
else {
- return $c->render( status => 500,
- openapi => { error => "Something went wrong, check the logs."} );
+ $c->unhandled_exception($_);
}
};
}
+=head3 remove_from_bundle
+
+Controller function that handles removing items from this bundle
+
+=cut
+
+sub remove_from_bundle {
+ my $c = shift->openapi->valid_input or return;
+
+ my $item_id = $c->validation->param('item_id');
+ my $item = Koha::Items->find( $item_id );
+
+ unless ($item) {
+ return $c->render(
+ status => 404,
+ openapi => { error => "Item not found" }
+ );
+ }
+
+ my $bundle_item_id = $c->validation->param('bundled_item_id');
+ $bundle_item_id = barcodedecode($bundle_item_id);
+ my $bundle_item = Koha::Items->find( { itemnumber => $bundle_item_id } );
+
+ unless ($bundle_item) {
+ return $c->render(
+ status => 404,
+ openapi => { error => "Bundle item not found" }
+ );
+ }
+
+ $bundle_item->remove_from_bundle;
+ return $c->render(
+ status => 204,
+ openapi => q{}
+ );
+}
+
1;