add parameter list to the Allowing and Denying syslog entries

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5298 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2010-02-25 16:00:09 +00:00
parent 2eecc8dd5f
commit f3ec425b0d

View File

@ -1638,12 +1638,24 @@ sub validate {
if ($rule->{rule} =~ /allow/i or $rule->{rule} =~ /accept/i) {
my $logst = "xCAT: Allowing ".$request->{command}->[0];
if ($request->{noderange} && defined($request->{noderange}->[0])) { $logst .= " to ".$request->{noderange}->[0]; }
# add each argument
my $args = $request->{arg};
foreach my $argument (@$args){
$logst .= " " . $argument;
}
if ($peername) { $logst .= " for " . $peername };
if ($peerhost) { $logst .= " from " . $peerhost };
xCAT::MsgUtils->message("S",$logst);
return 1;
} else {
my $logst = "xCAT: Denying ".$request->{command}->[0];
# add each argument
my $args = $request->{arg};
foreach my $argument (@$args){
$logst .= " " . $argument;
}
if ($peername) { $logst .= " for " . $peername };
if ($peerhost) { $logst .= " from " . $peerhost };
xCAT::MsgUtils->message("S",$logst);