-Fix p commands to use unified client-cred.pem file

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@1376 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2008-05-13 18:42:25 +00:00
parent 3215c065e6
commit 8955e48f0a
4 changed files with 8 additions and 8 deletions

View File

@ -34,8 +34,8 @@ unless (@ARGV) {
my $noderange = $ARGV[0];
my $client = IO::Socket::SSL->new(
PeerAddr=>$xcathost,
SSL_key_file=>$ENV{HOME}."/.xcat/client-key.pem",
SSL_cert_file=>$ENV{HOME}."/.xcat/client-cert.pem",
SSL_key_file=>$ENV{HOME}."/.xcat/client-cred.pem",
SSL_cert_file=>$ENV{HOME}."/.xcat/client-cred.pem",
SSL_ca_file => $ENV{HOME}."/.xcat/ca.pem",
SSL_use_cert => 1,
#SSL_verify_mode => 1,

View File

@ -35,8 +35,8 @@ unless (@ARGV) {
(my $noderange,my $destloc) = split(/:/,$ARGV[1]);
my $client = IO::Socket::SSL->new(
PeerAddr=>$xcathost,
SSL_key_file=>$ENV{HOME}."/.xcat/client-key.pem",
SSL_cert_file=>$ENV{HOME}."/.xcat/client-cert.pem",
SSL_key_file=>$ENV{HOME}."/.xcat/client-cred.pem",
SSL_cert_file=>$ENV{HOME}."/.xcat/client-cred.pem",
SSL_ca_file => $ENV{HOME}."/.xcat/ca.pem",
SSL_use_cert => 1,
#SSL_verify_mode => 1,

View File

@ -35,8 +35,8 @@ unless (@ARGV) {
(my $noderange,my $destloc) = split(/:/,$ARGV[1]);
my $client = IO::Socket::SSL->new(
PeerAddr=>$xcathost,
SSL_key_file=>$ENV{HOME}."/.xcat/client-key.pem",
SSL_cert_file=>$ENV{HOME}."/.xcat/client-cert.pem",
SSL_key_file=>$ENV{HOME}."/.xcat/client-cred.pem",
SSL_cert_file=>$ENV{HOME}."/.xcat/client-cred.pem",
SSL_ca_file => $ENV{HOME}."/.xcat/ca.pem",
SSL_use_cert => 1,
#SSL_verify_mode => 1,

View File

@ -48,8 +48,8 @@ if ($::NONODECHECK) {
else {
my $client = IO::Socket::SSL->new(
PeerAddr=>$xcathost,
SSL_key_file=>$ENV{HOME}."/.xcat/client-key.pem",
SSL_cert_file=>$ENV{HOME}."/.xcat/client-cert.pem",
SSL_key_file=>$ENV{HOME}."/.xcat/client-cred.pem",
SSL_cert_file=>$ENV{HOME}."/.xcat/client-cred.pem",
SSL_ca_file => $ENV{HOME}."/.xcat/ca.pem",
SSL_use_cert => 1,
#SSL_verify_mode => 1,