add more infor on denial of request in syslog for defect 3097568

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@7984 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2010-10-31 12:44:06 +00:00
parent 9d0063d1e8
commit 8f8173b0a8

View File

@ -1557,6 +1557,7 @@ sub service_connection {
if ($req->{transid}) {
$resp{transid}=$req->{transid}->[0];
}
xCAT::MsgUtils->message("S","Unsupported request: peername=$peername, peerhost=$peerhost,peerfqdn=$peerfqdn,peerport=$peerport, command=".$req->{command}->[0]);
print $sock XMLout(\%resp,RootName => 'xcatresponse',NoAttr=>1);
next;
}
@ -1566,6 +1567,7 @@ sub service_connection {
if ($req->{transid}) {
$resp{transid}=$req->{transid}->[0];
}
xCAT::MsgUtils->message("S","Permission denied for request: peername=$peername, peerhost=$peerhost,peerfqdn=$peerfqdn,peerport=$peerport command= ".$req->{command}->[0]);
my $response=XMLout(\%resp,RootName =>'xcatresponse',NoAttr => 1);
print $sock $response;
next;
@ -1882,7 +1884,7 @@ sub validate {
}
} # end RULE
#Reached end of policy table, reject by default.
xCAT::MsgUtils->message("S","Request matched no policy rule: ".$request->{command}->[0]);
xCAT::MsgUtils->message("S","Request matched no policy rule: peername=$peername, peerhost=$peerhost ".$request->{command}->[0]);
return 0;
}