TestRail-API/t/arg_types.t
use strict;
use warnings;
use TestRail::API;
use Test::More 'tests' => 145;
use Test::Fatal;
use Class::Inspector;
use Test::LWP::UserAgent;
use HTTP::Response;
use Capture::Tiny qw{capture};
my $tr = TestRail::API->new('http://hokum.bogus','bogus','bogus',undef,1);
$tr->{'browser'} = Test::LWP::UserAgent->new();
$tr->{'browser'}->map_response(qr/.*/, HTTP::Response->new('500', 'ERROR', ['Content-Type' => 'text/plain'], ''));
#No-arg functions
is( exception { capture { $tr->getCaseTypes() } },undef,'getCaseTypes returns no error when no arguments are passed');
is( exception { capture { $tr->getPossibleTestStatuses() } },undef,'getPossibleTestStatuses returns no error when no arguments are passed');
is( exception { capture { $tr->getPriorities() } },undef,'getPriorities returns no error when no arguments are passed');
is( exception { capture { $tr->getProjects() } },undef,'getProjects returns no error when no arguments are passed');
is( exception { capture { $tr->getTestResultFields() } },undef,'getTestResultFields returns no error when no arguments are passed');
is( exception { capture { $tr->getUsers() } },undef,'getUsers returns no error when no arguments are passed');
isnt( exception { capture { $tr->createCase() } },undef,'createCase returns error when no arguments are passed');
isnt( exception { capture { $tr->createMilestone() } },undef,'createMilestone returns error when no arguments are passed');
isnt( exception { capture { $tr->createPlan() } },undef,'createPlan returns error when no arguments are passed');
isnt( exception { capture { $tr->createProject() } },undef,'createProject returns error when no arguments are passed');
isnt( exception { capture { $tr->createRun() } },undef,'createRun returns error when no arguments are passed');
isnt( exception { capture { $tr->createSection() } },undef,'createSection returns error when no arguments are passed');
isnt( exception { capture { $tr->createTestResults() } },undef,'createTestResults returns error when no arguments are passed');
isnt( exception { capture { $tr->createTestSuite() } },undef,'createTestSuite returns error when no arguments are passed');
isnt( exception { capture { $tr->deleteCase() } },undef,'deleteCase returns error when no arguments are passed');
isnt( exception { capture { $tr->deleteMilestone() } },undef,'deleteMilestone returns error when no arguments are passed');
isnt( exception { capture { $tr->deletePlan() } },undef,'deletePlan returns error when no arguments are passed');
isnt( exception { capture { $tr->deleteProject() } },undef,'deleteProject returns error when no arguments are passed');
isnt( exception { capture { $tr->deleteRun() } },undef,'deleteRun returns error when no arguments are passed');
isnt( exception { capture { $tr->deleteSection() } },undef,'deleteSection returns error when no arguments are passed');
isnt( exception { capture { $tr->deleteTestSuite() } },undef,'deleteTestSuite returns error when no arguments are passed');
isnt( exception { capture { $tr->getCaseByID() } },undef,'getCaseByID returns error when no arguments are passed');
isnt( exception { capture { $tr->getCaseByName() } },undef,'getCaseByName returns error when no arguments are passed');
isnt( exception { capture { $tr->getCaseTypeByName() } },undef,'getCaseTypeByName returns error when no arguments are passed');
isnt( exception { capture { $tr->getCases() } },undef,'getCases returns error when no arguments are passed');
isnt( exception { capture { $tr->getMilestoneByID() } },undef,'getMilestoneByID returns error when no arguments are passed');
isnt( exception { capture { $tr->getMilestoneByName() } },undef,'getMilestoneByName returns error when no arguments are passed');
isnt( exception { capture { $tr->getPlanByID() } },undef,'getPlanByID returns error when no arguments are passed');
isnt( exception { capture { $tr->getPlanByName() } },undef,'getPlanByName returns error when no arguments are passed');
isnt( exception { capture { $tr->getPriorityByName() } },undef,'getPriorityByName returns error when no arguments are passed');
isnt( exception { capture { $tr->getProjectByID() } },undef,'getProjectByID returns error when no arguments are passed');
isnt( exception { capture { $tr->getProjectByName() } },undef,'getProjectByName returns error when no arguments are passed');
isnt( exception { capture { $tr->getRunByID() } },undef,'getRunByID returns error when no arguments are passed');
isnt( exception { capture { $tr->getRunByName() } },undef,'getRunByName returns error when no arguments are passed');
isnt( exception { capture { $tr->getSectionByID() } },undef,'getSectionByID returns error when no arguments are passed');
isnt( exception { capture { $tr->getSectionByName() } },undef,'getSectionByName returns error when no arguments are passed');
isnt( exception { capture { $tr->sectionNamesToIds() } },undef,'sectionNamesToIds returns error when no arguments are passed');
isnt( exception { capture { $tr->getTestByID() } },undef,'getTestByID returns error when no arguments are passed');
isnt( exception { capture { $tr->getTestByName() } },undef,'getTestByName returns error when no arguments are passed');
isnt( exception { capture { $tr->getTestResults() } },undef,'getTestResults returns error when no arguments are passed');
isnt( exception { capture { $tr->getTestResultFieldByName() } },undef,'getTestResultFieldByName returns error when no arguments are passed');
isnt( exception { capture { $tr->getTestSuiteByID() } },undef,'getTestSuiteByID returns error when no arguments are passed');
isnt( exception { capture { $tr->getTestSuiteByName() } },undef,'getTestSuiteByName returns error when no arguments are passed');
isnt( exception { capture { $tr->getUserByEmail() } },0,'getUserByEmail returns error when no arguments are passed');
isnt( exception { capture { $tr->getUserByID() } },0,'getUserByID returns error when no arguments are passed');
isnt( exception { capture { $tr->getUserByName() } },0,'getUserByName returns error when no arguments are passed');
isnt( exception { capture { $tr->getTests() } },undef,'getTests returns error when no arguments are passed');
isnt( exception { capture { $tr->getTestSuites() } },undef,'getTestSuites returns error when no arguments are passed');
isnt( exception { capture { $tr->getSections() } },undef,'getSections returns error when no arguments are passed');
isnt( exception { capture { $tr->getRuns() } },undef,'getRuns returns error when no arguments are passed');
isnt( exception { capture { $tr->getRunsPaginated() } },undef,'getRunsPaginated returns error when no arguments are passed');
isnt( exception { capture { $tr->getPlans() } },undef,'getPlans returns error when no arguments are passed');
isnt( exception { capture { $tr->getPlansPaginated() } },undef,'getPlansPaginated returns error when no arguments are passed');
isnt( exception { capture { $tr->getMilestones() } },undef,'getMilestones returns error when no arguments are passed');
isnt( exception { capture { $tr->getConfigurationGroups() } },undef,'getConfigurations returns error when no arguments are passed');
isnt( exception { capture { $tr->getConfigurations() } },undef,'getConfigurationGroups returns error when no arguments are passed');
isnt( exception { capture { $tr->getChildRuns() } },undef,'getChildRuns returns error when no arguments are passed');
isnt( exception { capture { $tr->getChildRunByName() } },undef,'getChildRunByName returns error when no arguments are passed');
isnt( exception { capture { $tr->createRunInPlan() } },undef,'createRunInPlan returns error when no arguments are passed');
isnt( exception { capture { $tr->translateConfigNamesToIds() } }, undef,'translateConfigNamesToIds returns error when no arguments are passed');
isnt( exception { capture { $tr->userNamesToIds() } }, undef,'userNamesToIds returns error when no arguments are passed');
isnt( exception { capture { $tr->statusNamesToIds() } }, undef,'statusNamesToIds returns error when no arguments are passed');
isnt( exception { capture { $tr->getRunSummary() } }, undef,'getRunSummary returns error when no arguments are passed');
isnt( exception { capture { $tr->getPlanSummary() } }, undef,'getPlanSummary returns error when no arguments are passed');
isnt( exception { capture { $tr->bulkAddResults() } }, undef,'bulkAddResults returns error when no arguments are passed');
#1-arg functions
is(exception { capture { $tr->deleteCase(1) } }, undef,'deleteCase returns no error when int arg passed');
is(exception { capture { $tr->deleteMilestone(1) } }, undef,'deleteMilestone returns no error when int arg passed');
is(exception { capture { $tr->deletePlan(1) } }, undef,'deletePlan returns no error when int arg passed');
is(exception { capture { $tr->deleteProject(1) } }, undef,'deleteProject returns no error when int arg passed');
is(exception { capture { $tr->deleteRun(1) } }, undef,'deleteRun returns no error when int arg passed');
is(exception { capture { $tr->deleteSection(1) } }, undef,'deleteSection returns no error when int arg passed');
is(exception { capture { $tr->deleteTestSuite(1) } }, undef,'deleteTestSuite returns no error when int arg passed');
is(exception { capture { $tr->getCaseByID(1) } }, undef,'getCaseByID returns no error when int arg passed');
is(exception { capture { $tr->getRuns(1) } }, undef,'getRuns returns no error when int arg passed');
is(exception { capture { $tr->getRunsPaginated(1) } }, undef,'getRunsPaginated returns no error when int arg passed');
is(exception { capture { $tr->getSectionByID(1) } }, undef,'getSectionByID returns no error when int arg passed');
is(exception { capture { $tr->getTestByID(1) } }, undef,'getTestByID returns no error when int arg passed');
is(exception { capture { $tr->getTestSuiteByID(1) } }, undef,'getTestSuiteByID returns no error when int arg passed');
is(exception { capture { $tr->getPlans(1) } }, undef,'getPlans returns no error when int arg passed');
is(exception { capture { $tr->getPlansPaginated(1) } }, undef,'getPlansPaginated returns no error when int arg passed');
is(exception { capture { $tr->getProjectByID(1) } }, undef,'getProjectByID returns no error when int arg passed');
is(exception { capture { $tr->getRunByID(1) } }, undef,'getRunByID returns no error when int arg passed');
is(exception { capture { $tr->getTestSuites(1) } }, undef,'getTestSuites returns no error when int arg passed');
is(exception { capture { $tr->getTests(1) } }, undef,'getTests returns no error when int arg passed');
is(exception { capture { $tr->getUserByID(1) } }, undef,'getUserByID returns no error when int arg passed');
is(exception { capture { $tr->getMilestones(1) } }, undef,'getMilestones returns no error when int arg passed');
is(exception { capture { $tr->getPlanByID(1) } }, undef,'getPlanByID returns no error when int arg passed');
is(exception { capture { $tr->getProjectByName('fake') } }, undef,'getProjectByName returns no error when string arg passed');
is(exception { capture { $tr->getUserByEmail('tickle') } }, undef,'getUserByEmail returns no error when string arg passed');
is(exception { capture { $tr->getUserByName('zap') } }, undef,'getUserByName returns no error when string arg passed');
is(exception { capture { $tr->getCaseTypeByName('zap') } }, undef,'getCaseTypeByName returns no error when string arg passed');
is(exception { capture { $tr->createProject('zippy') } }, undef,'createProject returns no error when string arg passed');
is(exception { capture { $tr->getTestResults(1) } }, undef,'getTestResults with 1 arg returns no error');
is(exception { capture { $tr->getMilestoneByID(1) } }, undef,'getMilestoneByID with 1 arg returns no error');
is(exception { capture { $tr->getConfigurationGroups(1) } },undef,'getConfigurationGroups with 1 arg returns no error');
is(exception { capture { $tr->getConfigurations(1) } }, undef,'getConfigurations with 1 arg returns no error');
is(exception { capture { $tr->getChildRuns({}) } }, undef,'getChildRuns returns no error when 1 argument passed');
isnt(exception { capture { $tr->createCase(1) } }, undef,'createCase with 1 arg returns error');
isnt(exception { capture { $tr->createMilestone(1) } }, undef,'createMilestone with 1 arg returns error');
isnt(exception { capture { $tr->createPlan(1) } }, undef,'createPlan with 1 arg returns error');
isnt(exception { capture { $tr->createRun(1) } }, undef,'createRun with 1 arg returns error');
isnt(exception { capture { $tr->createSection(1) } }, undef,'createSection with 1 arg returns error');
isnt(exception { capture { $tr->createTestResults(1) } }, undef,'createTestResults with 1 arg returns error');
isnt(exception { capture { $tr->createTestSuite(1) } }, undef,'createTestSuite with 1 arg returns error');
isnt(exception { capture { $tr->getCaseByName(1) } }, undef,'getCaseByName with 1 arg returns error');
isnt(exception { capture { $tr->getCases(1) } }, undef,'getCases with 1 arg returns error');
isnt(exception { capture { $tr->getMilestoneByName(1) } }, undef,'getMilestoneByName with 1 arg returns error');
isnt(exception { capture { $tr->getPlanByName(1) } }, undef,'getPlanByName with 1 arg returns error');
isnt(exception { capture { $tr->getRunByName(1) } }, undef,'getRunByName with 1 arg returns error');
isnt(exception { capture { $tr->getSectionByName(1) } }, undef,'getSectionByName with 1 arg returns error');
isnt(exception { capture { $tr->getSections(1) } }, undef,'getSections with 1 arg returns error');
isnt(exception { capture { $tr->sectionNamesToIds(1) } },undef,'sectionNamesToIds returns error when 1 arguments are passed');
isnt(exception { capture { $tr->getTestByName(1) } }, undef,'getTestByName with 1 arg returns error');
isnt(exception { capture { $tr->getTestSuiteByName(1) } }, undef,'getTestSuiteByName with 1 arg returns error');
isnt(exception { capture { $tr->getChildRunByName({}) } },undef,'getChildRunByName returns error when 1 argument passed');
isnt( exception { capture { $tr->createRunInPlan(1) } },undef,'createRunInPlan returns error when 1 argument passed');
isnt( exception { capture { $tr->translateConfigNamesToIds(1) } }, undef,'translateConfigNamesToIds returns error when 1 argument passed');
isnt( exception { capture { $tr->bulkAddResults(1) } }, undef,'bulkAddResults returns error when 1 argument is passed');
#2 arg functions
is(exception { capture { $tr->createMilestone(1,'whee') } }, undef,'createMilestone with 2 args returns no error');
is(exception { capture { $tr->createPlan(1,'whee') } }, undef,'createPlan with 2 args returns no error');
is(exception { capture { $tr->createTestResults(1,1) } }, undef,'createTestResults with 2 args returns no error');
is(exception { capture { $tr->createTestSuite(1,'zugzug') } }, undef,'createTestSuite with 2 args returns no error');
is(exception { capture { $tr->getMilestoneByName(1,'hug') } }, undef,'getMilestoneByName with 2 args returns no error');
is(exception { capture { $tr->getPlanByName(1,'nugs') } }, undef,'getPlanByName with 2 args returns no error');
is(exception { capture { $tr->getRunByName(1,'zoom') } }, undef,'getRunByName with 2 args returns no error');
is(exception { capture { $tr->getSections(1,1) } }, undef,'getSections with 2 args returns no error');
is(exception { capture { $tr->getTestByName(1,'poo') } }, undef,'getTestByName with 2 args returns no error');
is(exception { capture { $tr->getTestSuiteByName(1,'zap') } }, undef,'getTestSuiteByName with 2 args returns no error');
is(exception { capture { $tr->createCase(1,'whee') } }, undef,'createCase with 2 args returns no error');
is(exception { capture { $tr->getChildRunByName({},'whee') } },undef,'getChildRunByName returns no error when 2 arguments passed');
is(exception { capture { $tr->bulkAddResults(1,[]) } }, undef,'bulkAddResults returns no error when 2 arguments passed');
is(exception { capture { $tr->getCases(1,2) } }, undef,'getCases with 2 args returns error');
isnt(exception { capture { $tr->createRun(1,1) } }, undef,'createRun with 2 args returns error');
isnt(exception { capture { $tr->createSection(1,1) } }, undef,'createSection with 2 args returns error');
isnt(exception { capture { $tr->getCaseByName(1,1) } }, undef,'getCaseByName with 2 args returns error');
isnt(exception { capture { $tr->getSectionByName(1,1) } }, undef,'getSectionByName with 2 args returns error');
isnt(exception { capture { $tr->sectionNamesToIds(1,1) } },undef,'sectionNamesToIds returns error when 2 arguments are passed');
isnt( exception { capture { $tr->createRunInPlan(1,1) } },undef,'createRunInPlan returns error when 2 arguments passed');
#3 arg functions
is(exception { capture { $tr->createRun(1,1,'whee') } }, undef,'createRun with 3 args returns no error');
is(exception { capture { $tr->createSection(1,1,'whee') } }, undef,'createSection with 3 args returns no error');
is(exception { capture { $tr->getCases(1,2,{}) } }, undef,'getCases with 3 args returns no error');
is(exception { capture { $tr->getSectionByName(1,1,'zip') } }, undef,'getSectionByName with 3 args returns no error');
is(exception { capture { $tr->createRunInPlan(1,1,'nugs') } },undef,'createRunInPlan with 3 args returns no error');
is(exception { capture { $tr->getCaseByName(1,1,'whee') } }, undef,'getCaseByName with 3 args returns no error');
#4 arg functions
is(exception { capture { $tr->getCaseByName(1,1,'hug', {}) } }, undef,'getCaseByName with 4 args returns no error');