percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2026-04-17 01:01:39 +08:00
Code Issues Packages Projects Releases Wiki Activity

PR-160 - added support for operf if present, and if CMD_OPCONTROL is not set

Browse Source 
- Added test case
This commit is contained in:
Sveta Smirnova
2024-01-26 18:14:29 +03:00
parent 3fa1d8dfed
commit 6330cf0f53
1 changed files with 33 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
t/pt-stalk/pt-stalk.t
View File

@@ -956,6 +956,39 @@ like(
"numastat collection has data"
);
# ###########################################################################
# Test if option operf collection works
# ###########################################################################
# ./bin/pt-stalk --no-stalk --iterations=1 --sleep=1 --dest=tmp/pt-stalk --collect-oprofile -- --user=msandbox --password=msandbox --port=12345 --host=127.0.0.1 ^C
SKIP: {
my $operf = `which operf`;
chomp $operf;
skip "--collect-oprofile tests require operf" unless -x "$operf";
cleanup();
$retval = system("$trunk/bin/pt-stalk --no-stalk --run-time 10 --sleep 2 --dest $dest --pid $pid_file --iterations 1 --collect-oprofile -- --defaults-file=$cnf >$log_file 2>&1");
PerconaTest::wait_until(sub { !-f $pid_file });
$output = `ls $dest`;
like(
$output,
qr/opreport/,
"operf data collected"
) or diag($output);
$output = `cat $dest/*-opreport`;
like(
$output,
qr/(mysqld)/,
"operf collection has data"
);
}
# #############################################################################
# Done.
# #############################################################################