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

Change use of Management Server term to Management Node.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@946 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2008-03-31 15:52:36 +00:00
parent 1a512ac299
commit 40b8590c41
1 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
perl-xCAT-2.0/xCAT/Utils.pm
View File

@ -1009,8 +1009,8 @@ sub isServiceNode
#-------------------------------------------------------------------------------
=head3 isMS
checks for the /etc/xCATMS file , if it exists is a Management Server
=head3 isMN
checks for the /etc/xCATMN file , if it exists it is a Management Server
Arguments:
none
@ -1022,16 +1022,16 @@ sub isServiceNode
Error:
none
Example:
$return=(xCAT::Utils->isMS())
$return=(xCAT::Utils->isMN())
Comments:
none
=cut
#-------------------------------------------------------------------------------
sub isMS
sub isMN
{
my $value;
if (-e "/etc/xCATMS")
if (-e "/etc/xCATMN")
{
return 1;
}
@ -1839,8 +1839,8 @@ sub get_site_Master
input: list of nodenames and/or node ipaddresses
service name
"MS" or "Node" determines if you want the Service node as known
by the MS or by the node.
"MN" or "Node" determines if you want the Service node as known
by the Management Node or by the node.
recognized service names: xcat,tftpserver,
nfsserver,conserver,monserver
@ -1859,7 +1859,7 @@ sub get_site_Master
Error:
$::ERROR_RC=0 no error $::ERROR_RC=1 error
example: $sn =xCAT::Utils->get_ServiceNode(@nodes,$service,"MS");
example: $sn =xCAT::Utils->get_ServiceNode(@nodes,$service,"MN");
=cut
@ -1876,10 +1876,10 @@ sub get_ServiceNode
my $snattribute;
$::ERROR_RC = 0;
# determine if the request is for the service node as known by the MS
# determine if the request is for the service node as known by the MN
# or the node
if ($request eq "MS")
if ($request eq "MN")
{
$snattribute = "servicenode";
}
@ -1943,7 +1943,7 @@ sub get_ServiceNode
if ($sn and $sn->{$service})
{
# see if both MS and Node address in attribute
# see if both MN and Node address in attribute
my ($msattr, $nodeattr) = split ',', $sn->{$service};
my $key = $msattr;
if ($request eq "Node")
@ -2007,7 +2007,7 @@ sub get_ServiceNode
if ($sn and $sn->{'conserver'})
{
# see if both MS and Node address in attribute
# see if both MN and Node address in attribute
my ($msattr, $nodeattr) = split ',', $sn->{'conserver'};
my $key = $msattr;
if ($request eq "Node")