1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859 |
- use strict;
- use warnings;
- use FindBin;
- use lib $FindBin::Bin.'/../bin';
- require 'testrail-runs';
- use lib $FindBin::Bin.'/lib';
- use Test::LWP::UserAgent::TestRailMock;
- use Test::More 'tests' => 13;
- use Capture::Tiny qw{capture_merged};
- #check status filters
- my @args = qw{--apiurl http://testrail.local --user test@fake.fake --password fake -j TestProject };
- my ($out,$code) = TestRail::Bin::Runs::run('browser' => $Test::LWP::UserAgent::TestRailMock::mockObject, 'args' => \@args);
- is($code, 0, "Exit code OK looking for runs with passes");
- chomp $out;
- like($out,qr/^OtherOtherSuite\nTestingSuite\nFinalRun\nlockRun\nClosedRun$/,"Gets run correctly looking for passes");
- #check LIFO sort
- @args = qw{--apiurl http://testrail.local --user test@fake.fake --password fake -j TestProject --lifo };
- ($out,$code) = TestRail::Bin::Runs::run('browser' => $Test::LWP::UserAgent::TestRailMock::mockObject, 'args' => \@args);
- is($code, 0, "Exit code OK looking for runs with passes");
- chomp $out;
- like($out,qr/^lockRun\nClosedRun\nTestingSuite\nFinalRun\nOtherOtherSuite$/,"LIFO sort works");
- #check milesort
- @args = qw{--apiurl http://testrail.local --user test@fake.fake --password fake -j TestProject --milesort };
- ($out,$code) = TestRail::Bin::Runs::run('browser' => $Test::LWP::UserAgent::TestRailMock::mockObject, 'args' => \@args);
- is($code, 0, "Exit code OK looking for runs with passes");
- chomp $out;
- like($out,qr/^TestingSuite\nFinalRun\nlockRun\nClosedRun\nOtherOtherSuite$/,"milesort works");
- #check status filters
- @args = qw{--apiurl http://testrail.local --user test@fake.fake --password fake -j TestProject --status passed};
- ($out,$code) = TestRail::Bin::Runs::run('browser' => $Test::LWP::UserAgent::TestRailMock::mockObject, 'args' => \@args);
- is($code, 255, "Exit code OK looking for runs with passes, which should fail to return results");
- chomp $out;
- like($out,qr/no runs found/i,"Gets no runs correctly looking for passes");
- #TODO check configs for real next time
- @args = qw{--apiurl http://testrail.local --user test@fake.fake --password fake -j TestProject --config testConfig --config eee};
- ($out,$code) = TestRail::Bin::Runs::run('browser' => $Test::LWP::UserAgent::TestRailMock::mockObject, 'args' => \@args);
- is($code, 255, "Exit code OK looking for runs with passes");
- chomp $out;
- like($out,qr/no runs found/i,"Gets no run correctly when filtering by unassigned config");
- #Verify no-match returns non path
- @args = qw{--help};
- $0 = $FindBin::Bin.'/../bin/testrail-runs';
- ($out,(undef,$code)) = capture_merged {TestRail::Bin::Runs::run('args' => \@args)};
- is($code, 0, "Exit code OK asking for help");
- like($out,qr/encoding of arguments/i,"Help output OK");
- #Make sure that the binary itself processes args correctly
- $out = `$^X $0 --help`;
- like($out,qr/encoding of arguments/i,"Appears we can run binary successfully");
|