hhf/MySQLTuner-perl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

add fixes to get_os_release for debian 6/7/8

Browse source
This commit is contained in:
Sergei A Mamonov 2016-03-30 14:44:30 +03:00
parent 598da33e91
commit 45c468f324
1 changed files with 25 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
mysqltuner.pl
View file

@ -1062,12 +1062,33 @@ sub get_other_process_memory {
}
sub get_os_release {
return "Unknown OS release" unless -f "/etc/system-release";
if( -f "/etc/system-release") {
my @info_release = get_file_contents "/etc/system-release";
remove_cr @info_release;
return $info_release[0];
}
if ( -f "/etc/os-release") {
my @info_release = get_file_contents "/etc/os-release";
remove_cr @info_release;
my $os_relase = $info_release[0];
$os_relase =~ s/.*="//;
$os_relase =~ s/"$//;
return $os_relase;
}
if ( -f "/etc/issue") {
my @info_release = get_file_contents "/etc/issue";
remove_cr @info_release;
my $os_relase = $info_release[0];
$os_relase =~ s/\s+\\n.*//;
return $os_relase;
}
return "Unknown OS release";
}
sub get_fs_info() {
my @sinfo = `df -P | grep '%'`;
shift @sinfo;