| Subject: | [PATCH Crypt::SSLeay 0.51] build help for VMS, etc. |
The attached patch to the Makefile.PL locates the libraries and include files in the HP-supplied
SSL kit for OpenVMS. It also adds a const qualifier to the first argument of InfoCallback in the
XS code to silence a compiler warning.
| Subject: | vms_ssleay.patch |
--- Makefile.PL;-0 Tue Apr 22 00:38:06 2003
+++ Makefile.PL Sun Jun 11 17:18:55 2006
@@ -17,6 +17,9 @@ my @POSSIBLE_SSL_DIRS = qw(/usr/local/op
if($^O eq 'MSWin32') {
unshift(@POSSIBLE_SSL_DIRS, 'c:/openssl');
}
+if($^O eq 'VMS') {
+ @POSSIBLE_SSL_DIRS = '/ssl$root';
+}
my @CANDIDATE;
my $open_ssl = 0;
@@ -90,6 +93,9 @@ if($^O =~ /Win32/) {
$SEP = "\\";
$LIBS = "-lssleay32 -llibeay32 -lRSAglue -lrsaref";
+} elsif ($^O eq 'VMS') {
+ $SSL_LIB = '-L/SYS$SHARE';
+ $LIBS = '-lSSL$LIBSSL_SHR32 -lSSL$LIBCRYPTO_SHR32';
} else {
$SSL_LIB = "-L".$SSL_DIR."/lib";
$SEP = "/";
@@ -107,7 +113,7 @@ if($^O =~ /Win32/) {
}
}
-# write include file that determing ssl support
+# write include file that determines ssl support
my $ssl_header_prefix = '';
my $candidate_info = join('; ', @$candidate);
if($candidate->[1] =~ /openssl/i) {
@@ -184,11 +190,12 @@ sub Candidate {
{
if(-e $_) {
$version_file = $_;
+ last;
}
}
return unless defined $version_file;
- $open_ssl = ($version_file =~ /openssl/) ? 1 : 0;
+ $open_ssl = ($version_file =~ /openssl/i) ? 1 : 0;
my $dirname = $inc_dir = dirname($version_file);
return unless (-e "$dirname/ssl.h");
--- SSLeay.xs;-0 Wed May 28 01:55:02 2003
+++ SSLeay.xs Fri Jun 9 19:12:26 2006
@@ -40,7 +40,7 @@ extern "C" {
*/
-static void InfoCallback(SSL *s,int where,int ret)
+static void InfoCallback(const SSL *s,int where,int ret)
{
char *str;
int w;