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

Release 1.8.8 #579

Browse source
This commit is contained in:
Jean-Marie Renouard 2022-01-30 15:38:54 +01:00
parent 49218c8c4c
commit b164a9b054
1 changed files with 20 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

27
mysqltuner.pl
View file

@ -1,5 +1,5 @@
#!/usr/bin/env perl #!/usr/bin/env perl
# mysqltuner.pl - Version 1.8.7 # mysqltuner.pl - Version 1.8.8
# High Performance MySQL Tuning Script # High Performance MySQL Tuning Script
# Copyright (C) 2006-2021 Major Hayden - major@mhtx.net # Copyright (C) 2006-2021 Major Hayden - major@mhtx.net
# #
@ -56,7 +56,7 @@ use Cwd 'abs_path';
#use Env; #use Env;
# Set up a few variables for use in the script # Set up a few variables for use in the script
my $tunerversion = "1.8.7"; my $tunerversion = "1.8.8";
my ( @adjvars, @generalrec ); my ( @adjvars, @generalrec );
# Set defaults # Set defaults
@ -3774,8 +3774,20 @@ sub mysqsl_pfs {
# Performance Schema # Performance Schema
$myvar{'performance_schema'} = 'OFF' $myvar{'performance_schema'} = 'OFF'
unless defined( $myvar{'performance_schema'} ); unless defined( $myvar{'performance_schema'} );
unless ( $myvar{'performance_schema'} eq 'ON' ) { if ($myvar{'performance_schema'} eq 'OFF') {
badprint "Performance_schema should be activated.";
push( @adjvars, "performance_schema=ON" );
push( @generalrec,
"Performance schema should be activated for better diagnostics"
);
} else {
infoprint "Performance_schema is activated.";
}
# IF PFS is eanbled
unless ( $myvar{'performance_schema'} ne 'ON' ) {
infoprint "Performance schema is disabled."; infoprint "Performance schema is disabled.";
# REc enable PFS for diagnostics only
if ( mysql_version_ge( 5, 6 ) ) { if ( mysql_version_ge( 5, 6 ) ) {
push( @generalrec, push( @generalrec,
"Performance schema should be activated for better diagnostics" "Performance schema should be activated for better diagnostics"
@ -3798,9 +3810,10 @@ sub mysqsl_pfs {
push( @generalrec, push( @generalrec,
"Performance schema shouldn't be activated for MariaDB 10.0 for performance issue" "Performance schema shouldn't be activated for MariaDB 10.0 for performance issue"
); );
push( @adjvars, "performance_schema = OFF disable PFS" ); push( @adjvars, "performance_schema = OFF" );
return; return;
} }
unless ( grep /^sys$/, select_array("SHOW DATABASES") ) { unless ( grep /^sys$/, select_array("SHOW DATABASES") ) {
infoprint "Sys schema isn't installed."; infoprint "Sys schema isn't installed.";
push( @generalrec, push( @generalrec,
@ -3808,7 +3821,7 @@ sub mysqsl_pfs {
) unless ( mysql_version_le( 5, 6 ) ); ) unless ( mysql_version_le( 5, 6 ) );
push( @generalrec, push( @generalrec,
"Consider installing Sys schema from https://github.com/FromDual/mariadb-sys for MariaDB" "Consider installing Sys schema from https://github.com/FromDual/mariadb-sys for MariaDB"
) unless ( mysql_version_eq( 10, 0 ) or mysql_version_eq( 5, 5 ) ); ) unless ( mysql_version_ge( 10, 0 ) );
return; return;
} }
@ -6323,7 +6336,7 @@ ENDSQL
); );
my $current_type = my $current_type =
uc($ctype) . ( $isnull eq 'NO' ? " NOT NULL" : "NULL" ); uc($ctype) . ( $isnull eq 'NO' ? " NOT NULL" : " NULL" );
my $optimal_type = ''; my $optimal_type = '';
infoprint " +-- Column $tbname.$_: $current_type"; infoprint " +-- Column $tbname.$_: $current_type";
if ( $opt{colstat} == 1 ) { if ( $opt{colstat} == 1 ) {
@ -6747,7 +6760,7 @@ __END__
=head1 NAME =head1 NAME
MySQLTuner 1.8.7 - MySQL High Performance Tuning Script MySQLTuner 1.8.8 - MySQL High Performance Tuning Script
=head1 IMPORTANT USAGE GUIDELINES =head1 IMPORTANT USAGE GUIDELINES