From 82a893d82b7c5af829b0f013d5e3a5a6a4c3f8b2 Mon Sep 17 00:00:00 2001
From: nott <nott@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Fri, 10 Apr 2009 17:54:33 +0000
Subject: [PATCH] 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
---
 xCAT/postscripts/aixremoteshell | 11 +----------
 xCATaixSSL.bnd                  |  1 +
 2 files changed, 2 insertions(+), 10 deletions(-)

diff --git a/xCAT/postscripts/aixremoteshell b/xCAT/postscripts/aixremoteshell
index 2268ae08d..3a1b73bdf 100755
--- a/xCAT/postscripts/aixremoteshell
+++ b/xCAT/postscripts/aixremoteshell
@@ -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";
diff --git a/xCATaixSSL.bnd b/xCATaixSSL.bnd
index 7ea766931..568ab2b29 100644
--- a/xCATaixSSL.bnd
+++ b/xCATaixSSL.bnd
@@ -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