t/Search.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;
  21 use t::lib::Mocks;
  22
  23 use Module::Load::Conditional qw/check_install/;
  24
  25 BEGIN {
  26     if ( check_install( module => 'Test::DBIx::Class' ) ) {
  27         plan tests => 3;
  28     } else {
  29         plan skip_all => "Need Test::DBIx::Class"
  30     }
  31 }
  32
  33 # Mock the DB connexion and C4::Context
  34 use Test::DBIx::Class;
  35
  36 use_ok('C4::Search');
  37 can_ok('C4::Search',
  38     qw/_build_initial_query/);
  39
  40 subtest "_build_initial_query tests" => sub {
  41
  42     plan tests => 20;
  43
  44     my ($query,$query_cgi,$query_desc,$previous_operand);
  45     # all params have values
  46     my $params = {
  47         query            => "query",
  48         query_cgi        => "query_cgi",
  49         query_desc       => "query_desc",
  50         operator         => "operator",
  51         parsed_operand   => "parsed_operand",
  52         original_operand => "original_operand",
  53         index            => "index",
  54         index_plus       => "index_plus",
  55         indexes_set      => "indexes_set",
  56         previous_operand => "previous_operand"
  57     };
  58
  59     ($query,$query_cgi,$query_desc,$previous_operand) =
  60         C4::Search::_build_initial_query($params);
  61     is( $query, "query operator parsed_operand",
  62         "\$query built correctly");
  63     is( $query_cgi, "query_cgi&op=%20operator%20&idx=index&q=original_operand",
  64         "\$query_cgi built correctly");
  65     is( $query_desc, "query_desc operator index_plus original_operand",
  66         "\$query_desc build correctly");
  67     is( $previous_operand, "previous_operand",
  68         "\$query build correctly");
  69
  70     # no operator
  71     $params = {
  72         query            => "query",
  73         query_cgi        => "query_cgi",
  74         query_desc       => "query_desc",
  75         operator         => undef,
  76         parsed_operand   => "parsed_operand",
  77         original_operand => "original_operand",
  78         index            => "index",
  79         index_plus       => "index_plus",
  80         indexes_set      => "indexes_set",
  81         previous_operand => "previous_operand"
  82     };
  83
  84     ($query,$query_cgi,$query_desc,$previous_operand) =
  85         C4::Search::_build_initial_query($params);
  86     is( $query, "query and parsed_operand",
  87         "\$query built correctly (no operator)");
  88     is( $query_cgi, "query_cgi&op=%20and%20&idx=index&q=original_operand",
  89         "\$query_cgi built correctly (no operator)");
  90     is( $query_desc, "query_desc and index_plus original_operand",
  91         "\$query_desc build correctly (no operator)");
  92     is( $previous_operand, "previous_operand",
  93         "\$query build correctly (no operator)");
  94
  95     # no previous operand
  96     $params = {
  97         query            => "query",
  98         query_cgi        => "query_cgi",
  99         query_desc       => "query_desc",
 100         operator         => "operator",
 101         parsed_operand   => "parsed_operand",
 102         original_operand => "original_operand",
 103         index            => "index",
 104         index_plus       => "index_plus",
 105         indexes_set      => "indexes_set",
 106         previous_operand => undef
 107     };
 108
 109     ($query,$query_cgi,$query_desc,$previous_operand) =
 110         C4::Search::_build_initial_query($params);
 111     is( $query, "queryparsed_operand",
 112         "\$query built correctly (no previous operand)");
 113     is( $query_cgi, "query_cgi&idx=index&q=original_operand",
 114         "\$query_cgi built correctly (no previous operand)");
 115     is( $query_desc, "query_descindex_plus original_operand",
 116         "\$query_desc build correctly (no previous operand)");
 117     is( $previous_operand, 1,
 118         "\$query build correctly (no previous operand)");
 119
 120     # no index passed
 121     $params = {
 122         query            => "query",
 123         query_cgi        => "query_cgi",
 124         query_desc       => "query_desc",
 125         operator         => "operator",
 126         parsed_operand   => "parsed_operand",
 127         original_operand => "original_operand",
 128         index            => undef,
 129         index_plus       => "index_plus",
 130         indexes_set      => "indexes_set",
 131         previous_operand => "previous_operand"
 132     };
 133
 134     ($query,$query_cgi,$query_desc,$previous_operand) =
 135         C4::Search::_build_initial_query($params);
 136     is( $query, "query operator parsed_operand",
 137         "\$query built correctly (no index passed)");
 138     is( $query_cgi, "query_cgi&op=%20operator%20&q=original_operand",
 139         "\$query_cgi built correctly (no index passed)");
 140     is( $query_desc, "query_desc operator index_plus original_operand",
 141         "\$query_desc build correctly (no index passed)");
 142     is( $previous_operand, "previous_operand",
 143         "\$query build correctly (no index passed)");
 144
 145     # no index_plus passed
 146     $params = {
 147         query            => "query",
 148         query_cgi        => "query_cgi",
 149         query_desc       => "query_desc",
 150         operator         => "operator",
 151         parsed_operand   => "parsed_operand",
 152         original_operand => "original_operand",
 153         index            => "index",
 154         index_plus       => undef,
 155         indexes_set      => "indexes_set",
 156         previous_operand => "previous_operand"
 157     };
 158
 159     ($query,$query_cgi,$query_desc,$previous_operand) =
 160         C4::Search::_build_initial_query($params);
 161     is( $query, "query operator parsed_operand",
 162         "\$query built correctly (no index_plus passed)");
 163     is( $query_cgi, "query_cgi&op=%20operator%20&idx=index&q=original_operand",
 164         "\$query_cgi built correctly (no index_plus passed)");
 165     is( $query_desc, "query_desc operator  original_operand",
 166         "\$query_desc build correctly (no index_plus passed)");
 167     is( $previous_operand, "previous_operand",
 168         "\$query build correctly (no index_plus passed)");
 169
 170 };
 171
 172