Bug 29234: Further clean Z3950 Tests
[srvgit] / t / db_dependent / Koha / SearchEngine / Elasticsearch / Reset.t
1 #!/usr/bin/perl
2 #
3 # This file is part of Koha.
4 #
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.
9 #
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.
14 #
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>.
17
18 use Modern::Perl;
19
20 use Test::More tests => 7;
21 use Test::MockModule;
22
23 use Koha::Database;
24 use Koha::Caches;
25
26 my $indexes = {
27     'authorities' => {
28         'Match' => {
29             'label' => 'Match',
30             'type' => '',
31             'weight' => 15,
32             'mandatory' => 0,
33             'mappings' => []
34         }
35     },
36     'biblios' => {
37         'title' => {
38             'label' => 'title',
39             'type' => '',
40             'weight' => 20,
41             'mandatory' => 1,
42             'mapping' => []
43         }
44     }
45 };
46
47 my $yaml = Test::MockModule->new('YAML::XS');
48 $yaml->mock( 'LoadFile', sub { return $indexes; } );
49
50 use_ok('Koha::SearchEngine::Elasticsearch');
51
52 my $schema = Koha::Database->new->schema;
53
54 $schema->storage->txn_begin;
55
56 Koha::SearchFields->search->delete;
57 Koha::SearchMarcMaps->search->delete;
58 $schema->resultset('SearchMarcToField')->search->delete;
59
60
61 Koha::SearchEngine::Elasticsearch->reset_elasticsearch_mappings;
62
63 my $cache = Koha::Caches->get_instance();
64 is( $cache->get_from_cache('elasticsearch_search_fields_staff_client'), undef, 'Cache has been flushed by reset_elasticsearch_mappings' );
65
66 my $search_fields = Koha::SearchFields->search({});
67 is($search_fields->count, 2, 'There is 2 search fields after reset');
68
69 my $match_sf = Koha::SearchFields->search({ name => 'Match' })->next;
70 is($match_sf->weight, '15.00', 'Match search field is weighted with 15');
71 is($match_sf->mandatory, '0', 'Match search field is not mandatory');
72
73 my $title_sf = Koha::SearchFields->search({ name => 'title' })->next;
74 is($title_sf->weight, '20.00', 'Title search field is weighted with 20');
75 is($title_sf->mandatory, '1', 'Title search field is mandatory');
76
77 $schema->storage->txn_rollback;
78
79 Koha::SearchEngine::Elasticsearch->clear_search_fields_cache();