Changes to allow ssh setup on AIX compute nodes.

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@3169 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
nott 2009-04-10 17:54:33 +00:00
parent 7b67891f42
commit 82a893d82b
2 changed files with 2 additions and 10 deletions

View File

@ -23,17 +23,10 @@
# setup the ssh keys on the node
# end
BEGIN
{
$::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : '/opt/xcat';
}
use lib "$::XCATROOT/lib/perl";
# MAIN
use strict;
use IO::Socket;
use IO::Socket::SSL;
use xCAT::Utils;
my $rc = 0;
# Override from site table
@ -262,8 +255,6 @@ sub getresponse
}
close ($sock);
#debug
#print "resp = \'$response\'\n";
kill 2, $lpid;
if ($response) {
@ -284,7 +275,7 @@ sub openlistener
# fork a child process to open a socket to listen for communication
# from the server
my $pid = xCAT::Utils->xfork;
my $pid = fork;
unless (defined $pid) {
# fork failed
$msg = "aixremoteshell: Could not fork process.\n";

View File

@ -6,4 +6,5 @@ I:openssl.base
I:openssl.license
# RPMs
R:perl-Net_SSLeay.pm-1.30-1.aix5.3.ppc.rpm
R:perl-IO-Socket-SSL-1.06-1.aix5.3.ppc.rpm