1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102
|
# --
# Copyright (C) 2001-2021 OTRS AG, https://otrs.com/
# Copyright (C) 2021 Znuny GmbH, https://znuny.org/
# --
# This software comes with ABSOLUTELY NO WARRANTY. For details, see
# the enclosed file COPYING for license information (GPL). If you
# did not receive this file, see https://www.gnu.org/licenses/gpl-3.0.txt.
# --
use strict;
use warnings;
use utf8;
use vars (qw($Self));
# get selenium object
my $Selenium = $Kernel::OM->Get('Kernel::System::UnitTest::Selenium');
$Selenium->RunTest(
sub {
# get helper object
my $HelperObject = $Kernel::OM->Get('Kernel::System::UnitTest::Helper');
# enable PerformanceLog
$HelperObject->ConfigSettingChange(
Valid => 1,
Key => 'PerformanceLog',
Value => 1
);
# create test user and login
my $TestUserLogin = $HelperObject->TestUserCreate(
Groups => ['admin'],
) || die "Did not get test user";
$Selenium->Login(
Type => 'Agent',
User => $TestUserLogin,
Password => $TestUserLogin,
);
# get script alias
my $ScriptAlias = $Kernel::OM->Get('Kernel::Config')->Get('ScriptAlias');
# navigate to AdminPerformanceLog screen
$Selenium->VerifiedGet("${ScriptAlias}index.pl?Action=AdminPerformanceLog");
# check breadcrumb on Overview screen
$Self->True(
$Selenium->find_element( '.BreadCrumb', 'css' ),
"Breadcrumb is found on Overview screen.",
);
my %RangeBreadcrumb = (
5 => 'Range (last 5 m)',
30 => 'Range (last 30 m)',
60 => 'Range (last 1 h 0 m)',
120 => 'Range (last 2 h 0 m)',
1440 => 'Range (last 1 d 0 h )',
2880 => 'Range (last 2 d 0 h )',
);
# check for Admin on different range time screens
for my $Time (
qw(5 30 60 120 1440 2880)
)
{
# click on Admin
$Selenium->find_element("//a[contains(\@href, \'Interface=Agent;Minute=$Time' )]")->VerifiedClick();
# check screen layout
$Selenium->find_element( "table", 'css' );
$Selenium->find_element( "table thead tr th", 'css' );
$Selenium->find_element( "table tbody tr td", 'css' );
$Selenium->find_element( "div.Progressbar", 'css' )->is_displayed();
# check breadcrumb on Add screen
my $Count = 1;
for my $BreadcrumbText ( 'Performance Log', $RangeBreadcrumb{$Time} ) {
$Self->Is(
$Selenium->execute_script("return \$('.BreadCrumb li:eq($Count)').text().trim()"),
$BreadcrumbText,
"Breadcrumb text '$BreadcrumbText' is found on screen"
);
$Count++;
}
# click on "Go to overview"
$Selenium->find_element("//a[contains(\@href, \'Action=AdminPerformanceLog' )]")->VerifiedClick();
}
# Clean-up.
unlink $Kernel::OM->Get('Kernel::Config')->Get('Home') . "/var/log/Performance.log";
}
);
1;
|