arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fix defect 3393889, allow longhostname in policy table

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@13141 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2012-06-21 16:12:18 +00:00
parent d0e29a67e6
commit 7625dab575
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
xCAT-server/lib/perl/xCAT/xcatd.pm
View File

@ -38,7 +38,7 @@ This program module file, is a set of utilities used by xCAT daemon.
Error:
none
Example:
if(xCAT::XCATd->validate($peername,$peerhost,$req)) {
if(xCAT::XCATd->validate($peername,$peerhost,$req,$peerhostorg,\@deferredmsgargs)) {
.
.
Comments:
@ -54,6 +54,7 @@ sub validate {
my $peername=shift;
my $peerhost=shift;
my $request=shift;
my $peerhostorg=shift;
my $deferredmsgargs=shift;
# now check the policy table if user can run the command
@ -70,7 +71,7 @@ sub validate {
# check to see if peerhost is trusted
foreach $rule (@$policies) {
if (($rule->{name} and ($rule->{name} eq $peerhost)) && ($rule->{rule}=~ /trusted/i)) {
if (($rule->{name} and (($rule->{name} eq $peerhost) || ($rule->{name} eq $peerhostorg))) && ($rule->{rule}=~ /trusted/i)) {
$peerstatus="Trusted";
last;
}