xCAT/xcat-core
2
0
Fork 0
mirror of https://github.com/xcat2/xcat-core.git synced 2025-10-31 11:22:27 +00:00
Code Issues Releases Wiki Activity

fix issue 5701, support site.httpport setting for xcatmn check

Browse Source
This commit is contained in:
xuweibj
2018-10-17 22:37:21 -04:00
parent 51bd7fea27
commit 344c05f658
2 changed files with 23 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
xCAT-probe/lib/perl/probe_utils.pm
View File

@@ -286,10 +286,20 @@ sub is_firewall_open {
sub is_http_ready {
my $mnip = shift;
$mnip = shift if (($mnip) && ($mnip =~ /probe_utils/));
my $httpport = shift;
my $installdir = shift;
my $errormsg_ref = shift;
my $http = "http://$mnip/$installdir/postscripts/syslog";
my $http_status = `netstat -tunlp | grep -e "httpd" -e "apache" | grep "LISTEN" 2>&1`;
if (!$http_status) {
$$errormsg_ref = "No HTTP listening status get by command 'netstat'";
return 0;
} elsif ($http_status !~ /\S*\s+\S*\s+\S*\s+\S*$httpport\s+.+/) {
$$errormsg_ref = "The port defined in 'site' table HTTP is not listening";
return 0;
}
my $http = "http://$mnip:$httpport/$installdir/postscripts/syslog";
my %httperror = (
"400" => "The request $http could not be understood by the server due to malformed syntax",
"401" => "The request requires user authentication.",

16
xCAT-probe/subcmds/xcatmn
View File

@@ -715,10 +715,18 @@ sub check_http_service {
push @$error_ref, "HTTP check need 'wget' tool, please install 'wget' tool and try again";
} else {
{
my $installdir = `lsdef -t site -i installdir -c 2>&1 | awk -F'=' '{print \$2}'`;
chomp($installdir);
my $httpinfo = `lsdef -t site -i installdir,httpport -c 2>&1`;
my $installdir = "";
my $httpport = 80;
if ($httpinfo =~ /clustersite: installdir=(\S*)/) {
$installdir = $1;
}
if ($httpinfo =~ /clustersite: httpport=(\S*)/) {
$httpport = $1;
}
unless($installdir){
push @$error_ref, "HTTP work path(installdir) isn't configured in 'sit' table";
push @$error_ref, "HTTP work path(installdir) isn't configured in 'site' table";
last;
}
@@ -728,7 +736,7 @@ sub check_http_service {
}
my $errormsg;
unless(probe_utils->is_http_ready("$serverip", $installdir, \$errormsg)) {
unless(probe_utils->is_http_ready("$serverip", $httpport, $installdir, \$errormsg)) {
push @$error_ref, "$errormsg";
last;
}