WebUserAgent#
NAME#
Kernel::System::UnitTest::WebUserAgent - WebUserAgent lib
SYNOPSIS#
All WebUserAgent functions
PUBLIC INTERFACE#
new()#
create an object
use Kernel::System::ObjectManager;
local $Kernel::OM = Kernel::System::ObjectManager->new();
my $UnitTestWebUserAgentObject = $Kernel::OM->Get('Kernel::System::UnitTest::WebUserAgent');
Mock()#
Mocks all outgoing requests to a given mapping.
my $Success = $UnitTestWebUserAgentObject->Mock(
URL => qr/testserver\/success/,
Status => 'OK',
StatusCode => '200',
Header => [ 'Content-Type' => 'application/json' ],
Body => '{ "access_token": "123", "token_type": "ABC" }',
);
Returns:
my $Success = 1;
LastResponseGet()#
Returns the last response of the overwritten user agent.
my %Response = $Object->LastResponseGet();
Returns:
my %Response = (
'Status' => 'OK',
'Body' => '{ "access_token": "123", "token_type": "ABC" }',
'Header' => 'Content-Type: application/json
Client-Date: Wed, 25 Jan 2017 11:10:00 GMT
',
'URL' => 'http://blub/rest',
'StatusCode' => 200
);
LastRequestGet()#
Returns the last request of the overwritten user agent.
my %Request = $Object->LastRequestGet();
Returns:
my %Request = (
'Body' => '=',
'URL' => 'http://blub/rest',
'Method' => 'POST',
'Header' => 'Authorization: Basic AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
User-Agent: OTRS 4.0.x git
Content-Length: 1
Content-Type: application/x-www-form-urlencoded
'
);
Reset()#
Removes all mocks and mocking status.
my $Success = $UnitTestWebUserAgentObject->Reset();
Returns:
my $Success = 1;
_OverwrittenUserAgentRestore()#
Restores overwritten user agent.
my $Success = $UnitTestWebUserAgentObject->_OverwrittenUserAgentRestore();
Returns:
my $Success = 1;