156 lines
4.8 KiB
Perl
Executable File
156 lines
4.8 KiB
Perl
Executable File
# Copyright 2015 Catalyst IT
|
|
#
|
|
# This file is part of Koha.
|
|
#
|
|
# Koha is free software; you can redistribute it and/or modify it
|
|
# under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation; either version 3 of the License, or
|
|
# (at your option) any later version.
|
|
#
|
|
# Koha is distributed in the hope that it will be useful, but
|
|
# WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with Koha; if not, see <http://www.gnu.org/licenses>.
|
|
|
|
use Modern::Perl;
|
|
|
|
use Test::More tests => 14;
|
|
use t::lib::Mocks;
|
|
|
|
use Koha::SearchEngine::Elasticsearch::QueryBuilder;
|
|
use Koha::SearchEngine::Elasticsearch::Indexer;
|
|
|
|
|
|
my $se = Test::MockModule->new( 'Koha::SearchEngine::Elasticsearch' );
|
|
$se->mock( 'get_elasticsearch_mappings', sub {
|
|
my ($self) = @_;
|
|
|
|
my %all_mappings;
|
|
|
|
my $mappings = {
|
|
properties => {
|
|
title => {
|
|
type => 'text'
|
|
},
|
|
title__sort => {
|
|
type => 'text'
|
|
},
|
|
subject => {
|
|
type => 'text'
|
|
},
|
|
itemnumber => {
|
|
type => 'integer'
|
|
},
|
|
sortablenumber => {
|
|
type => 'integer'
|
|
},
|
|
sortablenumber__sort => {
|
|
type => 'integer'
|
|
}
|
|
}
|
|
};
|
|
$all_mappings{$self->index} = $mappings;
|
|
|
|
my $sort_fields = {
|
|
$self->index => {
|
|
title => 1,
|
|
subject => 0,
|
|
itemnumber => 0,
|
|
sortablenumber => 1
|
|
}
|
|
};
|
|
$self->sort_fields($sort_fields->{$self->index});
|
|
|
|
return $all_mappings{$self->index};
|
|
});
|
|
|
|
my $builder = Koha::SearchEngine::Elasticsearch::QueryBuilder->new( { index => 'mydb' } );
|
|
|
|
use_ok('Koha::SearchEngine::Elasticsearch::Search');
|
|
|
|
ok(
|
|
my $searcher = Koha::SearchEngine::Elasticsearch::Search->new(
|
|
{ 'nodes' => ['localhost:9200'], 'index' => 'mydb' }
|
|
),
|
|
'Creating a Koha::SearchEngine::Elasticsearch::Search object'
|
|
);
|
|
|
|
is( $searcher->index, 'mydb', 'Testing basic accessor' );
|
|
|
|
ok( my $query = $builder->build_query('easy'), 'Build a search query');
|
|
|
|
SKIP: {
|
|
|
|
eval { $builder->get_elasticsearch_params; };
|
|
|
|
skip 'Elasticsearch configuration not available', 9
|
|
if $@;
|
|
|
|
Koha::SearchEngine::Elasticsearch::Indexer->new({ index => 'mydb' })->drop_index;
|
|
Koha::SearchEngine::Elasticsearch::Indexer->new({ index => 'mydb' })->create_index;
|
|
|
|
ok( my $results = $searcher->search( $query) , 'Do a search ' );
|
|
|
|
is (my $count = $searcher->count( $query ), 0 , 'Get a count of the results, without returning results ');
|
|
|
|
ok ($results = $searcher->search_compat( $query ), 'Test search_compat' );
|
|
|
|
my ( undef, $scan_query ) = $builder->build_query_compat( undef, ['easy'], [], undef, undef, 1 );
|
|
ok ((undef, $results) = $searcher->search_compat( $scan_query, undef, [], [], 20, 0, undef, undef, undef, 1 ), 'Test search_compat scan query' );
|
|
my $expected = {
|
|
biblioserver => {
|
|
hits => 0,
|
|
RECORDS => []
|
|
}
|
|
};
|
|
is_deeply($results, $expected, 'Scan query results ok');
|
|
|
|
ok (($results,$count) = $searcher->search_auth_compat ( $query ), 'Test search_auth_compat' );
|
|
|
|
is ( $count = $searcher->count_auth_use($searcher,1), 0, 'Testing count_auth_use');
|
|
|
|
is ($searcher->max_result_window, 1000000, 'By default, max_result_window is 1000000');
|
|
|
|
$searcher->get_elasticsearch()->indices->put_settings(
|
|
index => $searcher->index_name,
|
|
body => {
|
|
'index' => {
|
|
'max_result_window' => 12000,
|
|
},
|
|
}
|
|
);
|
|
is ($searcher->max_result_window, 12000, 'max_result_window returns the correct value');
|
|
|
|
subtest "_convert_facets" => sub {
|
|
plan tests => 2;
|
|
|
|
my $es_facets = {
|
|
'ln' => {
|
|
'sum_other_doc_count' => 0,
|
|
'buckets' => [
|
|
{
|
|
'doc_count' => 2,
|
|
'key' => 'eng'
|
|
},
|
|
{
|
|
'doc_count' => 12,
|
|
'key' => ''
|
|
}
|
|
],
|
|
'doc_count_error_upper_bound' => 0
|
|
}
|
|
};
|
|
|
|
my $koha_facets = $searcher->_convert_facets($es_facets);
|
|
is(@{$koha_facets->[0]->{facets}},1,"We only get one facet, blank is removed");
|
|
|
|
$es_facets->{ln}->{buckets}->[1]->{key} = '0';
|
|
$koha_facets = $searcher->_convert_facets($es_facets);
|
|
is(@{$koha_facets->[0]->{facets}},2,"We get two facets, '0' is not removed");
|
|
|
|
};
|
|
}
|