mirror of
https://github.com/MariaDB/server.git
synced 2025-07-29 05:21:33 +03:00
WL#4189 mtr.pl v2
- Fix the regex for finding core files ie. anything that starts with "core" - Add collection of *.dmp files on windows.
This commit is contained in:
@ -464,8 +464,9 @@ sub run_test_server ($$$) {
|
|||||||
mtr_report(" - saving '$worker_savedir/' to '$savedir/'");
|
mtr_report(" - saving '$worker_savedir/' to '$savedir/'");
|
||||||
rename($worker_savedir, $savedir);
|
rename($worker_savedir, $savedir);
|
||||||
# Move any core files from e.g. mysqltest
|
# Move any core files from e.g. mysqltest
|
||||||
foreach my $coref (glob("core*"))
|
foreach my $coref (glob("core*"), glob("*.dmp"))
|
||||||
{
|
{
|
||||||
|
mtr_report(" - found '$coref', moving it to '$savedir'");
|
||||||
move($coref, $savedir);
|
move($coref, $savedir);
|
||||||
}
|
}
|
||||||
if ($opt_max_save_core > 0) {
|
if ($opt_max_save_core > 0) {
|
||||||
@ -475,7 +476,9 @@ sub run_test_server ($$$) {
|
|||||||
my $core_file= $File::Find::name;
|
my $core_file= $File::Find::name;
|
||||||
my $core_name= basename($core_file);
|
my $core_name= basename($core_file);
|
||||||
|
|
||||||
if ($core_name =~ "core*"){
|
if ($core_name =~ /^core/ or # Starting with core
|
||||||
|
(IS_WINDOWS and $core_name =~ /\.dmp$/)){
|
||||||
|
# Ending with .dmp
|
||||||
mtr_report(" - found '$core_name'",
|
mtr_report(" - found '$core_name'",
|
||||||
"($num_saved_cores/$opt_max_save_core)");
|
"($num_saved_cores/$opt_max_save_core)");
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user