diff options
Diffstat (limited to 'src/lib/libcrypto/util')
-rw-r--r-- | src/lib/libcrypto/util/extract-names.pl | 2 | ||||
-rw-r--r-- | src/lib/libcrypto/util/mk1mf.pl | 2 | ||||
-rw-r--r-- | src/lib/libcrypto/util/mkdef.pl | 38 | ||||
-rw-r--r-- | src/lib/libcrypto/util/pl/OS2-EMX.pl | 42 |
4 files changed, 59 insertions, 25 deletions
diff --git a/src/lib/libcrypto/util/extract-names.pl b/src/lib/libcrypto/util/extract-names.pl index 9f2ad5ef16..744a8e2324 100644 --- a/src/lib/libcrypto/util/extract-names.pl +++ b/src/lib/libcrypto/util/extract-names.pl | |||
@@ -10,6 +10,8 @@ while(<STDIN>) { | |||
10 | if (/ - /) { | 10 | if (/ - /) { |
11 | s/ - .*//; | 11 | s/ - .*//; |
12 | s/,[ \t]+/,/g; | 12 | s/,[ \t]+/,/g; |
13 | s/^[ \t]+//g; | ||
14 | s/[ \t]+$//g; | ||
13 | push @words, split ','; | 15 | push @words, split ','; |
14 | } | 16 | } |
15 | } | 17 | } |
diff --git a/src/lib/libcrypto/util/mk1mf.pl b/src/lib/libcrypto/util/mk1mf.pl index c538f9dffb..b4bc0457e5 100644 --- a/src/lib/libcrypto/util/mk1mf.pl +++ b/src/lib/libcrypto/util/mk1mf.pl | |||
@@ -277,6 +277,8 @@ $defs= <<"EOF"; | |||
277 | 277 | ||
278 | EOF | 278 | EOF |
279 | 279 | ||
280 | $defs .= $preamble if defined $preamble; | ||
281 | |||
280 | if ($platform eq "VC-CE") | 282 | if ($platform eq "VC-CE") |
281 | { | 283 | { |
282 | $defs.= <<"EOF"; | 284 | $defs.= <<"EOF"; |
diff --git a/src/lib/libcrypto/util/mkdef.pl b/src/lib/libcrypto/util/mkdef.pl index cdd2164c4e..01a1bfda19 100644 --- a/src/lib/libcrypto/util/mkdef.pl +++ b/src/lib/libcrypto/util/mkdef.pl | |||
@@ -1116,27 +1116,55 @@ sub print_test_file | |||
1116 | } | 1116 | } |
1117 | } | 1117 | } |
1118 | 1118 | ||
1119 | sub get_version { | ||
1120 | local *MF; | ||
1121 | my $v = '?'; | ||
1122 | open MF, 'Makefile.ssl' or return $v; | ||
1123 | while (<MF>) { | ||
1124 | $v = $1, last if /^VERSION=(.*?)\s*$/; | ||
1125 | } | ||
1126 | close MF; | ||
1127 | return $v; | ||
1128 | } | ||
1129 | |||
1119 | sub print_def_file | 1130 | sub print_def_file |
1120 | { | 1131 | { |
1121 | (*OUT,my $name,*nums,my @symbols)=@_; | 1132 | (*OUT,my $name,*nums,my @symbols)=@_; |
1122 | my $n = 1; my @e; my @r; my @v; my $prev=""; | 1133 | my $n = 1; my @e; my @r; my @v; my $prev=""; |
1123 | my $liboptions=""; | 1134 | my $liboptions=""; |
1135 | my $libname = $name; | ||
1136 | my $http_vendor = 'www.openssl.org/'; | ||
1137 | my $version = get_version(); | ||
1138 | my $what = "OpenSSL: implementation of Secure Socket Layer"; | ||
1139 | my $description = "$what $version, $name - http://$http_vendor"; | ||
1124 | 1140 | ||
1125 | if ($W32) | 1141 | if ($W32) |
1126 | { $name.="32"; } | 1142 | { $libname.="32"; } |
1127 | elsif ($W16) | 1143 | elsif ($W16) |
1128 | { $name.="16"; } | 1144 | { $libname.="16"; } |
1129 | elsif ($OS2) | 1145 | elsif ($OS2) |
1130 | { $liboptions = "INITINSTANCE\nDATA NONSHARED"; } | 1146 | { # DLL names should not clash on the whole system. |
1147 | # However, they should not have any particular relationship | ||
1148 | # to the name of the static library. Chose descriptive names | ||
1149 | # (must be at most 8 chars). | ||
1150 | my %translate = (ssl => 'open_ssl', crypto => 'cryptssl'); | ||
1151 | $libname = $translate{$name} || $name; | ||
1152 | $liboptions = <<EOO; | ||
1153 | INITINSTANCE | ||
1154 | DATA MULTIPLE NONSHARED | ||
1155 | EOO | ||
1156 | # Vendor field can't contain colon, drat; so we omit http:// | ||
1157 | $description = "\@#$http_vendor:$version#\@$what; DLL for library $name. Build for EMX -Zmtd"; | ||
1158 | } | ||
1131 | 1159 | ||
1132 | print OUT <<"EOF"; | 1160 | print OUT <<"EOF"; |
1133 | ; | 1161 | ; |
1134 | ; Definition file for the DLL version of the $name library from OpenSSL | 1162 | ; Definition file for the DLL version of the $name library from OpenSSL |
1135 | ; | 1163 | ; |
1136 | 1164 | ||
1137 | LIBRARY $name $liboptions | 1165 | LIBRARY $libname $liboptions |
1138 | 1166 | ||
1139 | DESCRIPTION 'OpenSSL $name - http://www.openssl.org/' | 1167 | DESCRIPTION '$description' |
1140 | 1168 | ||
1141 | EOF | 1169 | EOF |
1142 | 1170 | ||
diff --git a/src/lib/libcrypto/util/pl/OS2-EMX.pl b/src/lib/libcrypto/util/pl/OS2-EMX.pl index d695dda623..ddb3524210 100644 --- a/src/lib/libcrypto/util/pl/OS2-EMX.pl +++ b/src/lib/libcrypto/util/pl/OS2-EMX.pl | |||
@@ -3,10 +3,12 @@ | |||
3 | # OS2-EMX.pl - for EMX GCC on OS/2 | 3 | # OS2-EMX.pl - for EMX GCC on OS/2 |
4 | # | 4 | # |
5 | 5 | ||
6 | $o='\\'; | 6 | $o='/'; |
7 | $cp='copy'; | 7 | $cp='cp'; |
8 | $rm='rm -f'; | 8 | $rm='rm -f'; |
9 | 9 | ||
10 | $preamble = "SHELL=sh\n"; | ||
11 | |||
10 | # C compiler stuff | 12 | # C compiler stuff |
11 | 13 | ||
12 | $cc='gcc'; | 14 | $cc='gcc'; |
@@ -48,24 +50,24 @@ $bf_enc_src=""; | |||
48 | 50 | ||
49 | if (!$no_asm) | 51 | if (!$no_asm) |
50 | { | 52 | { |
51 | $bn_asm_obj="crypto\\bn\\asm\\bn-os2$obj crypto\\bn\\asm\\co-os2$obj"; | 53 | $bn_asm_obj="crypto/bn/asm/bn-os2$obj crypto/bn/asm/co-os2$obj"; |
52 | $bn_asm_src="crypto\\bn\\asm\\bn-os2.asm crypto\\bn\\asm\\co-os2.asm"; | 54 | $bn_asm_src="crypto/bn/asm/bn-os2.asm crypto/bn/asm/co-os2.asm"; |
53 | $des_enc_obj="crypto\\des\\asm\\d-os2$obj crypto\\des\\asm\\y-os2$obj"; | 55 | $des_enc_obj="crypto/des/asm/d-os2$obj crypto/des/asm/y-os2$obj"; |
54 | $des_enc_src="crypto\\des\\asm\\d-os2.asm crypto\\des\\asm\\y-os2.asm"; | 56 | $des_enc_src="crypto/des/asm/d-os2.asm crypto/des/asm/y-os2.asm"; |
55 | $bf_enc_obj="crypto\\bf\\asm\\b-os2$obj"; | 57 | $bf_enc_obj="crypto/bf/asm/b-os2$obj"; |
56 | $bf_enc_src="crypto\\bf\\asm\\b-os2.asm"; | 58 | $bf_enc_src="crypto/bf/asm/b-os2.asm"; |
57 | $cast_enc_obj="crypto\\cast\\asm\\c-os2$obj"; | 59 | $cast_enc_obj="crypto/cast/asm/c-os2$obj"; |
58 | $cast_enc_src="crypto\\cast\\asm\\c-os2.asm"; | 60 | $cast_enc_src="crypto/cast/asm/c-os2.asm"; |
59 | $rc4_enc_obj="crypto\\rc4\\asm\\r4-os2$obj"; | 61 | $rc4_enc_obj="crypto/rc4/asm/r4-os2$obj"; |
60 | $rc4_enc_src="crypto\\rc4\\asm\\r4-os2.asm"; | 62 | $rc4_enc_src="crypto/rc4/asm/r4-os2.asm"; |
61 | $rc5_enc_obj="crypto\\rc5\\asm\\r5-os2$obj"; | 63 | $rc5_enc_obj="crypto/rc5/asm/r5-os2$obj"; |
62 | $rc5_enc_src="crypto\\rc5\\asm\\r5-os2.asm"; | 64 | $rc5_enc_src="crypto/rc5/asm/r5-os2.asm"; |
63 | $md5_asm_obj="crypto\\md5\\asm\\m5-os2$obj"; | 65 | $md5_asm_obj="crypto/md5/asm/m5-os2$obj"; |
64 | $md5_asm_src="crypto\\md5\\asm\\m5-os2.asm"; | 66 | $md5_asm_src="crypto/md5/asm/m5-os2.asm"; |
65 | $sha1_asm_obj="crypto\\sha\\asm\\s1-os2$obj"; | 67 | $sha1_asm_obj="crypto/sha/asm/s1-os2$obj"; |
66 | $sha1_asm_src="crypto\\sha\\asm\\s1-os2.asm"; | 68 | $sha1_asm_src="crypto/sha/asm/s1-os2.asm"; |
67 | $rmd160_asm_obj="crypto\\ripemd\\asm\\rm-os2$obj"; | 69 | $rmd160_asm_obj="crypto/ripemd/asm/rm-os2$obj"; |
68 | $rmd160_asm_src="crypto\\ripemd\\asm\\rm-os2.asm"; | 70 | $rmd160_asm_src="crypto/ripemd/asm/rm-os2.asm"; |
69 | } | 71 | } |
70 | 72 | ||
71 | if ($shlib) | 73 | if ($shlib) |