git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@2316 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
		
			
				
	
	
		
			268 lines
		
	
	
		
			7.0 KiB
		
	
	
	
		
			Perl
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			268 lines
		
	
	
		
			7.0 KiB
		
	
	
	
		
			Perl
		
	
	
		
			Executable File
		
	
	
	
	
#!/usr/bin/perl
 | 
						|
# IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html
 | 
						|
#(C)IBM Corp
 | 
						|
 | 
						|
#
 | 
						|
 | 
						|
#-----------------------------------------------------------------------------
 | 
						|
 | 
						|
=head1   servicenode 
 | 
						|
 | 
						|
 This updates the service node with files necessary to access the 
 | 
						|
 database on the MasterNode and restarts the xcat daemon
 | 
						|
 | 
						|
 On AIX systems this does the service node configuration.
 | 
						|
 | 
						|
=cut
 | 
						|
 | 
						|
#-----------------------------------------------------------------------------
 | 
						|
 | 
						|
# MAIN
 | 
						|
 | 
						|
my $rc=0;
 | 
						|
 | 
						|
$::osname = `uname`;
 | 
						|
chomp $::osname;
 | 
						|
 | 
						|
$::sdate = `/bin/date`;
 | 
						|
chomp $::sdate;
 | 
						|
 | 
						|
$::hname = `hostname`;
 | 
						|
chomp $::hname;
 | 
						|
 | 
						|
if ($::osname eq 'AIX')
 | 
						|
{
 | 
						|
	# AIX service node setup
 | 
						|
	$rc = &setupAIXsn;
 | 
						|
	if ( $rc != 0) {
 | 
						|
		my $msg="$::sdate  servicenode: One or more errors occurred when attempting to configure node $::hname as an xCAT service node.\n";
 | 
						|
		print "$msg\n";
 | 
						|
		`logger -t xcat $msg`;
 | 
						|
	}
 | 
						|
} 
 | 
						|
else
 | 
						|
{
 | 
						|
	# Linux setup
 | 
						|
	#  remove OpenIPMI-tools and tftp
 | 
						|
	#  install xcat from /install/xcat
 | 
						|
	#  Copy Certificates, and config file to apprpriate directories 
 | 
						|
	#  from /install and restart xcatd
 | 
						|
	&runcmd("rpm -e OpenIPMI-tools");
 | 
						|
 | 
						|
	&runcmd("rpm -e tftp-server");
 | 
						|
	if ($ENV{'NODESETSTATE'} eq "install")
 | 
						|
	{
 | 
						|
    	$msg = "Installing xCAT";
 | 
						|
    	`logger -t xcat $msg`;
 | 
						|
    	&runcmd("rpm -ivh /xcatpost/xcat/RPMS/*/*.rpm");
 | 
						|
	}
 | 
						|
	&runcmd("/opt/xcat/sbin/copycerts");
 | 
						|
}
 | 
						|
 | 
						|
exit $rc;
 | 
						|
 | 
						|
#
 | 
						|
# Subroutines
 | 
						|
#
 | 
						|
 | 
						|
# run the command
 | 
						|
sub runcmd
 | 
						|
{
 | 
						|
    my ($cmd) = @_;
 | 
						|
    my $rc=0;
 | 
						|
 | 
						|
    $cmd .= ' 2>&1' ;
 | 
						|
    $::outref = [];
 | 
						|
    $::outref = `$cmd`;
 | 
						|
    if ($?)
 | 
						|
    {
 | 
						|
        $rc = $? >> 8;
 | 
						|
        if ($rc > 0)
 | 
						|
        {
 | 
						|
            my $msg="$cmd returned rc=$rc @$::outref\n";
 | 
						|
            `logger -t xcat $msg`;
 | 
						|
        }
 | 
						|
    }
 | 
						|
	return $rc;
 | 
						|
}
 | 
						|
 | 
						|
# do AIX service node setup
 | 
						|
sub setupAIXsn
 | 
						|
{
 | 
						|
	my $error=0;
 | 
						|
	my $servnode;
 | 
						|
 | 
						|
	# get the name of my service node/NIM master from the /etc/xcatinfo file
 | 
						|
	#  file was created by xcataixpost when the node was first installed
 | 
						|
	if (-f "/etc/xcatinfo") {
 | 
						|
    		my $cmd = "cat /etc/xcatinfo | grep 'XCATSERVER'";
 | 
						|
    		&runcmd($cmd);
 | 
						|
    		my $SNline = $::outref;
 | 
						|
    		my $junk;
 | 
						|
    		($junk, $servnode) =  split(/=/, $SNline);
 | 
						|
    		$servnode =~ s/^\s*//;
 | 
						|
    		chomp $servnode;
 | 
						|
	} else {
 | 
						|
			$msg = "$::sdate servicenode: Could not find /etc/xcatinfo file.\n";
 | 
						|
        	`logger -t xcat $msg`;
 | 
						|
    		$error++;
 | 
						|
	}
 | 
						|
 | 
						|
	my $rcpcmd = "rcp -r $servnode:/etc/hosts /etc";
 | 
						|
	if (&runcmd($rcpcmd) != 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not get /etc/hosts file.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
		$error++;
 | 
						|
	}
 | 
						|
 | 
						|
	# make sure we have enough space in /xcatpost ("/") fs
 | 
						|
	my $dfcmd = "df -m / | grep '\/' |tr -s ' '| cut -f 3 -d ' '";
 | 
						|
	if (&runcmd($dfcmd) != 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not find file system free space.\n";
 | 
						|
		`logger -t xcat $msg`;
 | 
						|
		$error++;
 | 
						|
	}
 | 
						|
	my $freespace = $::outref;
 | 
						|
	if ($freespace <= 220) {
 | 
						|
		# add to "/" fs if needed
 | 
						|
		my $chfscmd = "/usr/sbin/chfs -a size=+220M  /";
 | 
						|
		if (&runcmd($chfscmd) != 0) {
 | 
						|
			$msg = "$::sdate servicenode: Could not increase file system size.\n";
 | 
						|
        	`logger -t xcat $msg`;
 | 
						|
          	$error++;
 | 
						|
		}
 | 
						|
	}
 | 
						|
 | 
						|
	# make sure we have enough space in /usr fs
 | 
						|
    my $dfcmd = "df -m /usr | grep 'usr' |tr -s ' '| cut -f 3 -d ' '";
 | 
						|
    if (&runcmd($dfcmd) != 0) {
 | 
						|
        $msg = "$::sdate servicenode: Could not find file system free space.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
        $error++;
 | 
						|
    }
 | 
						|
    my $freespace = $::outref;
 | 
						|
    if ($freespace <= 2200) {
 | 
						|
        # add to "/usr" fs if needed
 | 
						|
        my $chfscmd = "/usr/sbin/chfs -a size=+2200M  /usr";
 | 
						|
        if (&runcmd($chfscmd) != 0) {
 | 
						|
            $msg = "$::sdate servicenode: Could not increase file system size.\n
 | 
						|
";
 | 
						|
            `logger -t xcat $msg`;
 | 
						|
            $error++;
 | 
						|
        }
 | 
						|
    }
 | 
						|
 | 
						|
	# copy SN software to /xcatpost/AIX/xcatpkgs
 | 
						|
	my $rcpcmd = "mkdir -p /xcatpost/AIX/xcatpkgs; rcp -r $servnode:/install/AIX/xcatpkgs/* /xcatpost/AIX/xcatpkgs";
 | 
						|
    if (&runcmd($rcpcmd) != 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not copy service node software from the management node.\n";
 | 
						|
		`logger -t xcat $msg`;
 | 
						|
        $error++;
 | 
						|
    }
 | 
						|
 | 
						|
	# run inutoc
 | 
						|
	my $inucmd = "inutoc /xcatpost/AIX/xcatpkgs";
 | 
						|
	if (&runcmd($rcpcmd) != 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not run inutoc.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
        $error++;
 | 
						|
    }
 | 
						|
 | 
						|
	# install openssl
 | 
						|
	my $gencmd = "geninstall -IaXY -d /xcatpost/AIX/xcatpkgs -f /xcatpost/AIX/xcatpkgs/xCATinstpSN.bnd";
 | 
						|
	if (&runcmd($gencmd) != 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not install openssl.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
        $error++;
 | 
						|
    }
 | 
						|
 | 
						|
	# install openssh
 | 
						|
	my $gencmd = "geninstall -IaXY -d /xcatpost/AIX/xcatpkgs -f /xcatpost/AIX/xcatpkgs/xCATaixSSH.bnd";
 | 
						|
	if (&runcmd($gencmd) != 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not install openssh.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
        $error++;
 | 
						|
    }
 | 
						|
 | 
						|
	# 
 | 
						|
	# run updatepkg to update RPM's reflection of the software
 | 
						|
    #   installed by installp - may already be done - but won't hurt!
 | 
						|
    if (&runcmd("/usr/sbin/updtvpkg") != 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not run updtvpkg.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
        $error++;
 | 
						|
    }
 | 
						|
 | 
						|
	# install rpms
 | 
						|
	my $rpmcmd = "rpm -U /xcatpost/AIX/xcatpkgs/*.rpm";
 | 
						|
	&runcmd($rpmcmd);
 | 
						|
 | 
						|
	# so conserver will start
 | 
						|
	if (&runcmd("mkdir -p /var/log/consoles")!= 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not make /var/log/consoles.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
		$error++;
 | 
						|
	}
 | 
						|
 | 
						|
	# makes it a service node
 | 
						|
	if (&runcmd("touch /etc/xCATSN") != 0 ) {
 | 
						|
		$msg = "$::sdate servicenode: Could not touch /etc/xCATSN\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
	    $error++;
 | 
						|
    }
 | 
						|
 | 
						|
	# call copycerts
 | 
						|
	if (&runcmd("/opt/xcat/sbin/copycerts") != 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not run copycerts.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
	    $error++;
 | 
						|
    }
 | 
						|
 | 
						|
	# copy the cfgloc file from /xcatpost
 | 
						|
	if (&runcmd("mkdir -p /etc/xcat")!= 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not make /etc/xcat directory.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
        $error++;
 | 
						|
    }
 | 
						|
 | 
						|
	my $sedcmd = "sed -e 's/host=.*|xcatadmin/host=$servnode|xcatadmin/' /xcatpost/etc/xcat/cfgloc > /etc/xcat/cfgloc";
 | 
						|
	if (&runcmd($sedcmd)!= 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not copy cfgloc file.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
        $error++;
 | 
						|
    }
 | 
						|
	
 | 
						|
	# start xcatd
 | 
						|
	if (&runcmd("/opt/xcat/sbin/xcatd &") != 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not start xcatd.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
	    $error++;
 | 
						|
    }
 | 
						|
 | 
						|
	# TODO - add xcatd as system service???
 | 
						|
	# mkssys -s xcatd -p /opt/xcat/sbin/xcatd -u 0 -K
 | 
						|
 | 
						|
	# add xcatd to /etc/inittab???
 | 
						|
	$mkitab_cmd = 'mkitab "xcatd:2:once:/opt/xcat/sbin/xcatd > /dev/console 2>&1"';
 | 
						|
	# $mkitab_cmd = 'mkitab "xcatd:2:once:/usr/bin/startsrc -s xcatd > /dev/console 2>&1"';
 | 
						|
 | 
						|
	if (&runcmd($mkitab_cmd) != 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not add xcatd to /etc/inittab.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
	    $error++;
 | 
						|
    }
 | 
						|
 | 
						|
	# do nim master setup - master fileset already installed
 | 
						|
	if (&runcmd("nim_master_setup -a mk_resource=no") != 0) {
 | 
						|
		$msg = "$::sdate servicenode: Could not run nim_master_setup.\n";
 | 
						|
        `logger -t xcat $msg`;
 | 
						|
	    $error++;
 | 
						|
    }
 | 
						|
 | 
						|
	if ($error > 0) {
 | 
						|
		return $error;
 | 
						|
	}
 | 
						|
 | 
						|
	return 0;
 | 
						|
}
 |