| use Mojo::Base -strict; |
| use Test::Mojo; |
| use Test::More; |
| use Mojo::File qw/path/; |
| use Kalamar::Controller::Search; |
| |
| |
| ##################### |
| # Start Fake server # |
| ##################### |
| my $mount_point = '/realapi/'; |
| $ENV{KALAMAR_API} = $mount_point; |
| |
| my $t = Test::Mojo->new('Kalamar'); |
| |
| # Mount fake backend |
| # Get the fixture path |
| my $fixtures_path = path(Mojo::File->new(__FILE__)->dirname, 'server'); |
| my $fake_backend = $t->app->plugin( |
| Mount => { |
| $mount_point => |
| $fixtures_path->child('mock.pl') |
| } |
| ); |
| # Configure fake backend |
| $fake_backend->pattern->defaults->{app}->log($t->app->log); |
| |
| # Query passed |
| $t->get_ok('/?q=baum') |
| ->status_is(200) |
| ->text_is('#error','') |
| |
| ->text_is('title', 'KorAP: Find »baum« with Poliqarp') |
| ->element_exists('meta[name="DC.title"][content="KorAP: Find »baum« with Poliqarp"]') |
| ->element_exists('body[itemscope][itemtype="http://schema.org/SearchResultsPage"]') |
| |
| # Total results |
| ->text_is('#total-results', 51) |
| |
| # Total pages |
| ->element_count_is('#pagination a', 5) |
| |
| # api_response |
| ->content_like(qr/\"authorized\":null/) |
| ->content_like(qr/\"pubDate\",\"subTitle\",\"author\"/) |
| |
| # No cutOff |
| ->content_unlike(qr!\"cutOff":true!) |
| |
| ->element_exists('li[data-text-sigle=GOE/AGI/00000]') |
| ->element_exists('li:nth-of-type(1) div.flop') |
| ->element_exists('li[data-text-sigle=GOE/AGI/00001]') |
| ->element_exists('li:nth-of-type(2) div.flip') |
| |
| # Match1 |
| ->element_exists('li:nth-of-type(1)' . |
| '[data-match-id="p2030-2031"]' . |
| '[data-text-sigle="GOE/AGI/00000"]' . |
| '[id="GOE/AGI/00000#p2030-2031"]' . |
| '[data-available-info^="base/s=spans"]' . |
| '[data-info^="{"]') |
| ->text_is('li:nth-of-type(1) div.meta', 'GOE/AGI/00000') |
| ->element_exists('li:nth-of-type(1) div.match-main div.match-wrap div.snippet') |
| ->element_exists('li:nth-of-type(1) div.snippet.startMore.endMore') |
| ->text_like('li:nth-of-type(1) div.snippet span.context-left',qr!sie etwas bedeuten!) |
| ->text_like('li:nth-of-type(1) div.snippet span.context-left',qr!sie etwas bedeuten!) |
| ->text_is('li:nth-of-type(1) div.snippet span.match mark','Baum') |
| ->text_like('li:nth-of-type(1) div.snippet span.context-right',qr!es war!) |
| ->text_is('li:nth-of-type(1) p.ref strong', 'Italienische Reise') |
| ->text_like('li:nth-of-type(1) p.ref', qr!by Goethe, Johann Wolfgang!) |
| ->text_is('li:nth-of-type(1) p.ref time[datetime=1982]', 1982) |
| ->text_is('li:nth-of-type(1) p.ref span.sigle', '[GOE/AGI/00000]') |
| ->header_isnt('X-Kalamar-Cache', 'true') |
| ; |
| |
| $t->get_ok('/?q=[orth=das') |
| ->status_is(400) |
| ->text_is('div.notify-error:nth-of-type(1)', '302: Parantheses/brackets unbalanced.') |
| ->element_exists('#search') |
| ->text_like('div.notify-error:nth-of-type(2)', qr!302: Could not parse query .+? \[orth=das.+?!) |
| ; |
| |
| # Check for query error with ql (from remote.t) |
| $t->get_ok('/?q=[orth=das&ql=poliqarp') |
| ->element_exists('.notify-error') |
| ->text_is('.notify-error', '302: Parantheses/brackets unbalanced.') |
| ->content_like(qr!KorAP\.koralQuery =!) |
| ->text_is('.no-results:nth-of-type(1)', 'Unable to perform the action.') |
| ; |
| |
| |
| # Query with partial cache (for total results) |
| $t->get_ok('/?q=baum') |
| ->status_is(200) |
| ->text_is('#error','') |
| ->text_is('title', 'KorAP: Find »baum« with Poliqarp') |
| ->element_exists('meta[name="DC.title"][content="KorAP: Find »baum« with Poliqarp"]') |
| ->element_exists('body[itemscope][itemtype="http://schema.org/SearchResultsPage"]') |
| ->header_isnt('X-Kalamar-Cache', 'true') |
| ->content_like(qr!\"cutOff":true!) |
| ->text_is('#total-results', 51) |
| ; |
| |
| # Query without partial cache (unfortunately) (but no total results) |
| $t->get_ok('/?q=baum&cutoff=true') |
| ->status_is(200) |
| ->text_is('#error','') |
| ->text_is('title', 'KorAP: Find »baum« with Poliqarp') |
| ->element_exists('meta[name="DC.title"][content="KorAP: Find »baum« with Poliqarp"]') |
| ->element_exists('body[itemscope][itemtype="http://schema.org/SearchResultsPage"]') |
| ->header_isnt('X-Kalamar-Cache', 'true') |
| ->content_like(qr!\"cutOff":true!) |
| ->element_exists_not('#total-results') |
| ; |
| |
| # Query with partial cache (but no total results) |
| $t->get_ok('/?q=baum&cutoff=true') |
| ->status_is(200) |
| ->text_is('#error','') |
| ->text_is('title', 'KorAP: Find »baum« with Poliqarp') |
| ->element_exists('meta[name="DC.title"][content="KorAP: Find »baum« with Poliqarp"]') |
| ->element_exists('body[itemscope][itemtype="http://schema.org/SearchResultsPage"]') |
| ->header_is('X-Kalamar-Cache', 'true') |
| ->content_like(qr!\"cutOff":true!) |
| ->element_exists_not('#total-results') |
| ; |
| |
| # Query with full cache |
| $t->get_ok('/?q=baum') |
| ->status_is(200) |
| ->text_is('#error','') |
| ->text_is('title', 'KorAP: Find »baum« with Poliqarp') |
| ->element_exists('meta[name="DC.title"][content="KorAP: Find »baum« with Poliqarp"]') |
| ->element_exists('body[itemscope][itemtype="http://schema.org/SearchResultsPage"]') |
| ->header_is('X-Kalamar-Cache', 'true') |
| ->content_like(qr!\"cutOff":true!) |
| ->text_is('#total-results', 51) |
| ; |
| |
| |
| # Query with page information |
| $t->get_ok('/?q=der&p=1&count=2') |
| ->status_is(200) |
| ->text_is('#error','') |
| ->text_is('title', 'KorAP: Find »der« with Poliqarp') |
| |
| # Total results |
| ->text_is('#total-results', '14,581') |
| |
| # Total pages |
| ->element_count_is('#pagination a', 7) |
| ->text_is('#pagination a:nth-of-type(6) span', 7291) |
| ->content_like(qr!\"count":2!) |
| ->content_like(qr!\"startIndex":0!) |
| ->content_like(qr!\"itemsPerPage":2!) |
| |
| # No caching |
| ->header_isnt('X-Kalamar-Cache', 'true') |
| |
| # Not searched for "der" before |
| ->content_unlike(qr!\"cutOff":true!) |
| ; |
| |
| # Check pagination repetion of page |
| my $next_href = $t->get_ok('/?q=der&p=1&count=2') |
| ->tx->res->dom->at('#pagination a[rel=next]')->attr('href'); |
| like($next_href, qr/p=2/); |
| unlike($next_href, qr/p=1/); |
| |
| # Query with page information - next page |
| $t->get_ok('/?q=der&p=2&count=2') |
| ->status_is(200) |
| ->text_is('#error','') |
| ->text_is('title', 'KorAP: Find »der« with Poliqarp') |
| ->element_exists('#search') |
| |
| # Total results |
| ->text_is('#total-results', '14,581') |
| |
| # Total pages |
| ->element_count_is('#pagination a', 7) |
| ->text_is('#pagination a:nth-of-type(6) span', 7291) |
| ->content_like(qr!\"count":2!) |
| ->content_like(qr!\"itemsPerPage":2!) |
| ->content_like(qr!\"startIndex":2!) |
| |
| # No caching |
| ->header_isnt('X-Kalamar-Cache', 'true') |
| ->content_like(qr!\"cutOff":true!) |
| ; |
| |
| # Query with failing parameters |
| $t->get_ok('/?q=fantastisch&ql=Fabelsprache') |
| ->status_is(400) |
| ->text_is('noscript div.notify-error', 'Parameter "ql" invalid') |
| ->element_exists('#search') |
| ->element_count_is('noscript div.notify-error', 1) |
| ; |
| $t->get_ok('/?q=fantastisch&cutoff=no') |
| ->status_is(400) |
| ->text_is('noscript div.notify-error', 'Parameter "cutoff" invalid') |
| ->element_count_is('noscript div.notify-error', 1) |
| ; |
| $t->get_ok('/?q=fantastisch&p=hui&o=hui&count=-8') |
| ->status_is(400) |
| ->text_like('noscript div.notify-error', qr!Parameter ".+?" invalid!) |
| ->element_count_is('noscript div.notify-error', 3) |
| ; |
| |
| # Query too long |
| my $long_query = 'b' x 2000; |
| $t->get_ok('/?q=' . $long_query) |
| ->status_is(400) |
| ->text_is('#error','') |
| ->text_like('noscript div.notify-error', qr!Parameter ".+?" invalid!) |
| ; |
| |
| # Query with timeout |
| $t->get_ok('/?q=timeout') |
| ->status_is(200) |
| ->text_like('noscript div.notify-warn', qr!Response time exceeded!) |
| ->text_is('#total-results', '> 4,274,841'); |
| ; |
| |
| # Do not cache |
| $t->get_ok('/?q=timeout') |
| ->status_is(200) |
| # ->text_like('noscript div.notify-warning', qr!Response time exceeded!) |
| ->element_exists("input#cq") |
| ->element_exists_not("input#cq[value]") |
| ->text_is('#total-results', '> 4,274,841'); |
| ; |
| |
| $t->app->defaults(no_cache => 1); |
| |
| # Query with collection |
| $t->get_ok('/?q=baum&collection=availability+%3D+%2FCC-BY.*%2F') |
| ->status_is(200) |
| ->element_exists("input#cq[value='availability = /CC-BY.*/']") |
| ->content_like(qr!\"availability\"!) |
| ->text_is('#error','') |
| ; |
| |
| $t->app->hook( |
| after_search => sub { |
| my $c = shift; |
| $c->content_for('after_search_results' => '<p id="special">Funny</p>'); |
| } |
| ); |
| |
| # Query with corpus query |
| $t->get_ok('/?q=baum&cq=availability+%3D+%2FCC-BY.*%2F') |
| ->status_is(200) |
| ->element_exists("input#cq[value='availability = /CC-BY.*/']") |
| ->content_like(qr!\"availability\"!) |
| ->text_is('#error','') |
| ->text_is('#special', 'Funny') |
| ; |
| |
| |
| my $match = { |
| matchID => 'match-FOLK/00070-SE-01/T-04-p5441-5442', |
| textSigle => 'FOLK/00070-SE-01/T-04' |
| }; |
| |
| $match = Kalamar::Controller::Search::_map_match($match); |
| |
| is($match->{matchID}, 'p5441-5442'); |
| |
| |
| done_testing; |
| __END__ |