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

Merge branch 'master' of https://github.com/sunfoxcz/MySQLTuner-perl into sunfoxcz-master

Browse source
This commit is contained in:
Major Hayden 2014-02-21 18:40:15 -06:00
commit 7571672419
1 changed files with 18 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
mysqltuner.pl
View file

@ -296,7 +296,24 @@ sub mysql_setup {
exit 0; exit 0;
} }
} }
if ( -r "/etc/psa/.psa.shadow" and $doremote == 0 ) { my $svcprop = `which svcprop`;
if ( substr($svcprop, 0, 1) =~ "/" ) {
# We are on solaris
(my $mysql_login = `svcprop -p quickbackup/username svc:/network/mysql-quickbackup:default`) =~ s/\s+$//;
(my $mysql_pass = `svcprop -p quickbackup/password svc:/network/mysql-quickbackup:default`) =~ s/\s+$//;
if ( substr($mysql_login, 0, 7) ne "svcprop" ) {
# mysql-quickbackup is installed
$mysqllogin = "-u $mysql_login -p$mysql_pass";
my $loginstatus = `mysqladmin $mysqllogin ping 2>&1`;
if ($loginstatus =~ /mysqld is alive/) {
goodprint "Logged in using credentials from mysql-quickbackup.\n";
return 1;
} else {
badprint "Attempted to use login credentials from mysql-quickbackup, but they failed.\n";
exit 0;
}
}
} elsif ( -r "/etc/psa/.psa.shadow" and $doremote == 0 ) {
# It's a Plesk box, use the available credentials # It's a Plesk box, use the available credentials
$mysqllogin = "-u admin -p`cat /etc/psa/.psa.shadow`"; $mysqllogin = "-u admin -p`cat /etc/psa/.psa.shadow`";
my $loginstatus = `$mysqladmincmd ping $mysqllogin 2>&1`; my $loginstatus = `$mysqladmincmd ping $mysqllogin 2>&1`;