Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 37018: Unit tests

Browse source 
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: wainuiwitikapark <wainuiwitikapark@catalyst.net.nz>
This commit is contained in:
Martin Renvoize 2024-06-05 14:19:06 +01:00 committed by wainuiwitikapark
parent 1fd94e90bc
commit f4cab95872
1 changed files with 53 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

54
t/Koha/REST/Plugin/Query.t
View file

@ -206,6 +206,19 @@ get '/build_query' => sub {
};
};
get '/dbic_validate_operators' => sub {
my ( $c, $args ) = @_;
my $query = $c->req->json->{q};
return try {
$c->dbic_validate_operators( { filtered_params => $query } );
$c->render( json => { filtered_params => $query }, status => 200 );
} catch {
return $c->render( json => { filtered_params => $query }, status => 400 );
};
};
get '/stash_embed' => sub {
my $c = shift;
@ -294,7 +307,7 @@ sub to_model {
# The tests
use Test::More tests => 7;
use Test::More tests => 8;
use Test::Mojo;
subtest 'extract_reserved_params() tests' => sub {
@ -543,3 +556,42 @@ subtest 'stash_overrides() tests' => sub {
->json_is( {} ); # x-koha-ovverride not passed is skipped
};
subtest 'dbic_validate_operators' => sub {
plan tests => 16;
my $t = Test::Mojo->new;
# Valid queries
my $q = {};
$t->get_ok( '/dbic_validate_operators' => json => { q => $q } )->status_is(200);
$q = [];
$t->get_ok( '/dbic_validate_operators' => json => { q => $q } )->status_is(200);
$q = {
firstname => 'Bilbo',
lastname => 'Baggins'
};
$t->get_ok( '/dbic_validate_operators' => json => { q => $q } )->status_is(200);
$q = {
firstname => undef,
lastname => 'Baggins'
};
$t->get_ok( '/dbic_validate_operators' => json => { q => $q } )->status_is(200);
$q = { lastname => [ 'Gaggins', 'Gamgee' ] };
$t->get_ok( '/dbic_validate_operators' => json => { q => $q } )->status_is(200);
$q = { lastname => { '!=' => [ 'Gaggins', 'Gamgee' ] } };
$t->get_ok( '/dbic_validate_operators' => json => { q => $q } )->status_is(200);
$q = { status => { '!=', 'completed', -not_like => 'pending%' } };
$t->get_ok( '/dbic_validate_operators' => json => { q => $q } )->status_is(200);
# Invalid queries
$q = [ { "-and" => [ [ { "biblio_id" => { "like(sleep(1/100000))or" => "%a%" } } ] ] } ];
$t->get_ok( '/dbic_validate_operators' => json => { q => $q } )->status_is(400);
};