Configure: engage ARMv8 Montgomery multiplication module.
[openssl.git] / Configure
1 :
2 eval 'exec perl -S $0 ${1+"$@"}'
3     if $running_under_some_shell;
4 ##
5 ##  Configure -- OpenSSL source tree configuration script
6 ##  If editing this file, run this command before committing
7 ##      make -f Makefile.org TABLE
8 ##
9
10 require 5.000;
11 use strict;
12 use File::Basename;
13 use File::Spec::Functions;
14
15 # see INSTALL for instructions.
16
17 my $usage="Usage: Configure [no-<cipher> ...] [enable-<cipher> ...] [experimental-<cipher> ...] [-Dxxx] [-lxxx] [-Lxxx] [-fxxx] [-Kxxx] [no-hw-xxx|no-hw] [[no-]threads] [[no-]shared] [[no-]zlib|zlib-dynamic] [no-asm] [no-dso] [no-krb5] [sctp] [386] [--prefix=DIR] [--openssldir=OPENSSLDIR] [--with-xxx[=vvv]] [--test-sanity] [--config=FILE] os/compiler[:flags]\n";
18
19 # Options:
20 #
21 # --config      add the given configuration file, which will be read after
22 #               any "Configurations*" files that are found in the same
23 #               directory as this script.
24 # --openssldir  install OpenSSL in OPENSSLDIR (Default: DIR/ssl if the
25 #               --prefix option is given; /usr/local/ssl otherwise)
26 # --prefix      prefix for the OpenSSL include, lib and bin directories
27 #               (Default: the OPENSSLDIR directory)
28 #
29 # --install_prefix  Additional prefix for package builders (empty by
30 #               default).  This needn't be set in advance, you can
31 #               just as well use "make INSTALL_PREFIX=/whatever install".
32 #
33 # --with-krb5-dir  Declare where Kerberos 5 lives.  The libraries are expected
34 #               to live in the subdirectory lib/ and the header files in
35 #               include/.  A value is required.
36 # --with-krb5-lib  Declare where the Kerberos 5 libraries live.  A value is
37 #               required.
38 #               (Default: KRB5_DIR/lib)
39 # --with-krb5-include  Declare where the Kerberos 5 header files live.  A
40 #               value is required.
41 #               (Default: KRB5_DIR/include)
42 # --with-krb5-flavor  Declare what flavor of Kerberos 5 is used.  Currently
43 #               supported values are "MIT" and "Heimdal".  A value is required.
44 #
45 # --test-sanity Make a number of sanity checks on the data in this file.
46 #               This is a debugging tool for OpenSSL developers.
47 #
48 # --cross-compile-prefix Add specified prefix to binutils components.
49 #
50 # no-hw-xxx     do not compile support for specific crypto hardware.
51 #               Generic OpenSSL-style methods relating to this support
52 #               are always compiled but return NULL if the hardware
53 #               support isn't compiled.
54 # no-hw         do not compile support for any crypto hardware.
55 # [no-]threads  [don't] try to create a library that is suitable for
56 #               multithreaded applications (default is "threads" if we
57 #               know how to do it)
58 # [no-]shared   [don't] try to create shared libraries when supported.
59 # no-asm        do not use assembler
60 # no-dso        do not compile in any native shared-library methods. This
61 #               will ensure that all methods just return NULL.
62 # no-krb5       do not compile in any KRB5 library or code.
63 # [no-]zlib     [don't] compile support for zlib compression.
64 # zlib-dynamic  Like "zlib", but the zlib library is expected to be a shared
65 #               library and will be loaded in run-time by the OpenSSL library.
66 # sctp          include SCTP support
67 # 386           generate 80386 code
68 # no-sse2       disables IA-32 SSE2 code, above option implies no-sse2
69 # no-<cipher>   build without specified algorithm (rsa, idea, rc5, ...)
70 # -<xxx> +<xxx> compiler options are passed through
71 #
72 # DEBUG_SAFESTACK use type-safe stacks to enforce type-safety on stack items
73 #               provided to stack calls. Generates unique stack functions for
74 #               each possible stack type.
75 # DES_PTR       use pointer lookup vs arrays in the DES in crypto/des/des_locl.h
76 # DES_RISC1     use different DES_ENCRYPT macro that helps reduce register
77 #               dependancies but needs to more registers, good for RISC CPU's
78 # DES_RISC2     A different RISC variant.
79 # DES_UNROLL    unroll the inner DES loop, sometimes helps, somtimes hinders.
80 # DES_INT       use 'int' instead of 'long' for DES_LONG in crypto/des/des.h
81 #               This is used on the DEC Alpha where long is 8 bytes
82 #               and int is 4
83 # BN_LLONG      use the type 'long long' in crypto/bn/bn.h
84 # MD2_CHAR      use 'char' instead of 'int' for MD2_INT in crypto/md2/md2.h
85 # MD2_LONG      use 'long' instead of 'int' for MD2_INT in crypto/md2/md2.h
86 # IDEA_SHORT    use 'short' instead of 'int' for IDEA_INT in crypto/idea/idea.h
87 # IDEA_LONG     use 'long' instead of 'int' for IDEA_INT in crypto/idea/idea.h
88 # RC2_SHORT     use 'short' instead of 'int' for RC2_INT in crypto/rc2/rc2.h
89 # RC2_LONG      use 'long' instead of 'int' for RC2_INT in crypto/rc2/rc2.h
90 # RC4_CHAR      use 'char' instead of 'int' for RC4_INT in crypto/rc4/rc4.h
91 # RC4_LONG      use 'long' instead of 'int' for RC4_INT in crypto/rc4/rc4.h
92 # RC4_INDEX     define RC4_INDEX in crypto/rc4/rc4_locl.h.  This turns on
93 #               array lookups instead of pointer use.
94 # RC4_CHUNK     enables code that handles data aligned at long (natural CPU
95 #               word) boundary.
96 # RC4_CHUNK_LL  enables code that handles data aligned at long long boundary
97 #               (intended for 64-bit CPUs running 32-bit OS).
98 # BF_PTR        use 'pointer arithmatic' for Blowfish (unsafe on Alpha).
99 # BF_PTR2       intel specific version (generic version is more efficient).
100 #
101 # Following are set automatically by this script
102 #
103 # MD5_ASM       use some extra md5 assember,
104 # SHA1_ASM      use some extra sha1 assember, must define L_ENDIAN for x86
105 # RMD160_ASM    use some extra ripemd160 assember,
106 # SHA256_ASM    sha256_block is implemented in assembler
107 # SHA512_ASM    sha512_block is implemented in assembler
108 # AES_ASM       ASE_[en|de]crypt is implemented in assembler
109
110 # Minimum warning options... any contributions to OpenSSL should at least get
111 # past these.
112
113 my $gcc_devteam_warn = "-Wall -pedantic -DPEDANTIC -Wno-long-long -Wsign-compare -Wmissing-prototypes -Wshadow -Wformat -Wtype-limits -Werror -DCRYPTO_MDEBUG_ALL -DCRYPTO_MDEBUG_ABORT -DREF_CHECK -DDEBUG_UNUSED";
114
115 my $clang_disabled_warnings = "-Wno-unused-parameter -Wno-missing-field-initializers -Wno-language-extension-token -Wno-extended-offsetof";
116
117 my $strict_warnings = 0;
118
119 my $x86_gcc_des="DES_PTR DES_RISC1 DES_UNROLL";
120
121 # MD2_CHAR slags pentium pros
122 my $x86_gcc_opts="RC4_INDEX MD2_INT";
123
124 #$bits1="SIXTEEN_BIT ";
125 #$bits2="THIRTY_TWO_BIT ";
126 my $bits1="THIRTY_TWO_BIT ";
127 my $bits2="SIXTY_FOUR_BIT ";
128
129 # As for $BSDthreads. Idea is to maintain "collective" set of flags,
130 # which would cover all BSD flavors. -pthread applies to them all,
131 # but is treated differently. OpenBSD expands is as -D_POSIX_THREAD
132 # -lc_r, which is sufficient. FreeBSD 4.x expands it as -lc_r,
133 # which has to be accompanied by explicit -D_THREAD_SAFE and
134 # sometimes -D_REENTRANT. FreeBSD 5.x expands it as -lc_r, which
135 # seems to be sufficient?
136 my $BSDthreads="-pthread -D_THREAD_SAFE -D_REENTRANT";
137
138 # table of known configurations, read in from files
139 #
140 # The content of each entry can take one of two forms:
141 #
142 # - old style config-string, colon seperated fields with exactly the
143 #   following structure.:
144 #
145 #       $cc : $cflags : $unistd : $thread_cflag : $sys_id : $lflags : $bn_ops : $cpuid_obj : $bn_obj : $ec_obj : $des_obj : $aes_obj : $bf_obj : $md5_obj : $sha1_obj : $cast_obj : $rc4_obj : $rmd160_obj : $rc5_obj : $wp_obj : $cmll_obj : $modes_obj : $engines_obj : $perlasm_scheme : $dso_scheme : $shared_target : $shared_cflag : $shared_ldflag : $shared_extension : $ranlib : $arflags : $multilib
146 #
147 #   We use the stringtohash function - defined below - to combine with the
148 #   fields and form a proper hash table from the string.
149 #
150 # - direct transfer of old style config string to hash table, using the names
151 #   of the fields as keys:
152 #
153 #       {
154 #         cc => $cc,
155 #         cflags => $cflags,
156 #         unistd => $unistd,
157 #         thread_cflag => $thread_cflag,
158 #         sys_id => $sys_id,
159 #         lflags => $lflags,
160 #         bn_ops => $bn_ops,
161 #         cpuid_obj => $cpuid_obj,
162 #         bn_obj => $bn_obj,
163 #         ec_obj => $ec_obj,
164 #         des_obj => $des_obj,
165 #         aes_obj => $aes_obj,
166 #         bf_obj => $bf_obj,
167 #         md5_obj => $md5_obj,
168 #         sha1_obj => $sha1_obj,
169 #         cast_obj => $cast_obj,
170 #         rc4_obj => $rc4_obj,
171 #         rmd160_obj => $rmd160_obj,
172 #         rc5_obj => $rc5_obj,
173 #         wp_obj => $wp_obj,
174 #         cmll_obj => $cmll_obj,
175 #         modes_obj => $modes_obj,
176 #         engines_obj => $engines_obj,
177 #         perlasm_scheme => $perlasm_scheme,
178 #         dso_scheme => $dso_scheme,
179 #         shared_target => $shared_target,
180 #         shared_cflag => $shared_cflag,
181 #         shared_ldflag => $shared_ldflag,
182 #         shared_extension => $shared_extension,
183 #         ranlib => $ranlib,
184 #         arflags => $arflags,
185 #         multilib => $multilib
186 #       }
187 #
188 # - new style config hash table, which has additional attributes for debug
189 #   and non-debug flags to be added to the common flags, for cflags and lflags:
190 #
191 #       {
192 #         cc => $cc,
193 #         cflags => $cflags,
194 #         debug_cflags => $debug_cflags,
195 #         release_cflags => $release_cflags,
196 #         unistd => $unistd,
197 #         thread_cflag => $thread_cflag,
198 #         sys_id => $sys_id,
199 #         lflags => $lflags,
200 #         debug_lflags => $debug_lflags,
201 #         release_lflags => $release_lflags,
202 #         bn_ops => $bn_ops,
203 #         cpuid_obj => $cpuid_obj,
204 #         bn_obj => $bn_obj,
205 #         ec_obj => $ec_obj,
206 #         des_obj => $des_obj,
207 #         aes_obj => $aes_obj,
208 #         bf_obj => $bf_obj,
209 #         md5_obj => $md5_obj,
210 #         sha1_obj => $sha1_obj,
211 #         cast_obj => $cast_obj,
212 #         rc4_obj => $rc4_obj,
213 #         rmd160_obj => $rmd160_obj,
214 #         rc5_obj => $rc5_obj,
215 #         wp_obj => $wp_obj,
216 #         cmll_obj => $cmll_obj,
217 #         modes_obj => $modes_obj,
218 #         engines_obj => $engines_obj,
219 #         dso_scheme => $dso_scheme,
220 #         shared_target => $shared_target,
221 #         shared_cflag => $shared_cflag,
222 #         shared_ldflag => $shared_ldflag,
223 #         shared_extension => $shared_extension,
224 #         ranlib => $ranlib,
225 #         arflags => $arflags,
226 #         multilib => $multilib
227 #       }
228 #
229 # The configuration reader will do what it can to translate everything into
230 # new style config hash tables, including merging $target and debug-$target
231 # if they are similar enough.
232 #
233 # The configuration hashes can refer to templates in two different manners:
234 #
235 # - as part of the hash, one can have a key called 'inherit_from' that
236 #   indicate what other configuration hashes to inherit data from.
237 #   These are resolved recursively.
238 #
239 #   Inheritance works as a set of default values that can be overriden
240 #   by corresponding attribute values in the inheriting configuration.
241 #
242 #   If several configurations are given in the 'inherit_from' array, the
243 #   values of same attribute are concatenated with space separation.
244 #   With this, it's possible to have several smaller templates for
245 #   different configuration aspects that can be combined into a complete
246 #   configuration.
247 #
248 #   Example:
249 #
250 #       "foo" => {
251 #               template => 1,
252 #               haha => "haha",
253 #               hoho => "ho"
254 #       },
255 #       "bar" => {
256 #               template => 1,
257 #               hoho => "ho",
258 #               hehe => "hehe"
259 #       },
260 #       "laughter" => {
261 #               inherit_from => [ "foo", "bar" ],
262 #       }
263 #
264 #       The entry for "foo" will become as follows after processing:
265 #
266 #       "laughter" => {
267 #               haha => "haha",
268 #               hoho => "ho ho",
269 #               hehe => "hehe"
270 #       }
271 #
272 #   Note 1: any entry from the table can be used as a template.
273 #   Note 2: pure templates have the attribute 'template => 1' and cannot
274 #           be used as targets.
275 #
276 # - instead of a string, one can have a code block of the form
277 #   'sub { /* your code here */ }', where the arguments are the list of
278 #   inherited values for that key.  In fact, the concatenation of strings
279 #   is really done by using 'sub { join(" ",@_) }' on the list of inherited
280 #   values.
281 #
282 #   Example:
283 #
284 #       "foo" => {
285 #               template => 1,
286 #               haha => "ha ha",
287 #               hoho => "ho",
288 #               ignored => "This should not appear in the end result",
289 #       },
290 #       "bar" => {
291 #               template => 1,
292 #               haha => "ah",
293 #               hoho => "haho",
294 #               hehe => "hehe"
295 #       },
296 #       "laughter" => {
297 #               inherit_from => [ "foo", "bar" ],
298 #               hehe => sub { join(" ",(@_,"!!!")) },
299 #               ignored => "",
300 #       }
301 #
302 #       The entry for "foo" will become as follows after processing:
303 #
304 #       "laughter" => {
305 #               haha => "ha ha ah",
306 #               hoho => "ho haho",
307 #               hehe => "hehe !!!",
308 #               ignored => ""
309 #       }
310 #
311
312 my %table=(
313
314     # All these templates are merely a translation of the corresponding
315     # variables further up.
316     #
317     # Note: as long as someone might use old style configuration strings,
318     # or we bother supporting that, those variables need to stay
319
320     x86_asm => {
321         template        => 1,
322         cpuid_obj       => "x86cpuid.o",
323         bn_obj          => "bn-586.o co-586.o x86-mont.o x86-gf2m.o",
324         ec_obj          => "ecp_nistz256.o ecp_nistz256-x86.o",
325         des_obj         => "des-586.o crypt586.o",
326         aes_obj         => "aes-586.o vpaes-x86.o aesni-x86.o",
327         bf_obj          => "bf-586.o",
328         md5_obj         => "md5-586.o",
329         sha1_obj        => "sha1-586.o sha256-586.o sha512-586.o",
330         rc4_obj         => "rc4-586.o",
331         rmd160_obj      => "rmd-586.o",
332         rc5_obj         => "rc5-586.o",
333         wp_obj          => "wp_block.o wp-mmx.o",
334         cmll_obj        => "cmll-x86.o",
335         modes_obj       => "ghash-x86.o",
336         engines_obj     => "e_padlock-x86.o"
337     },
338     x86_elf_asm => {
339         template        => 1,
340         inherit_from    => [ "x86_asm" ],
341         perlasm_scheme  => "elf"
342     },
343     x86_64_asm => {
344         template        => 1,
345         cpuid_obj       => "x86_64cpuid.o",
346         bn_obj          => "x86_64-gcc.o x86_64-mont.o x86_64-mont5.o x86_64-gf2m.o rsaz_exp.o rsaz-x86_64.o rsaz-avx2.o",
347         ec_obj          => "ecp_nistz256.o ecp_nistz256-x86_64.o",
348         aes_obj         => "aes-x86_64.o vpaes-x86_64.o bsaes-x86_64.o aesni-x86_64.o aesni-sha1-x86_64.o aesni-sha256-x86_64.o aesni-mb-x86_64.o",
349         md5_obj         => "md5-x86_64.o",
350         sha1_obj        => "sha1-x86_64.o sha256-x86_64.o sha512-x86_64.o sha1-mb-x86_64.o sha256-mb-x86_64.o",
351         rc4_obj         => "rc4-x86_64.o rc4-md5-x86_64.o",
352         wp_obj          => "wp-x86_64.o",
353         cmll_obj        => "cmll-x86_64.o cmll_misc.o",
354         modes_obj       => "ghash-x86_64.o aesni-gcm-x86_64.o",
355         engines_obj     => "e_padlock-x86_64.o"
356     },
357     ia64_asm => {
358         template        => 1,
359         cpuid_obj       => "ia64cpuid.o",
360         bn_obj          => "bn-ia64.o ia64-mont.o",
361         aes_obj         => "aes_core.o aes_cbc.o aes-ia64.o",
362         md5_obj         => "md5-ia64.o",
363         sha1_obj        => "sha1-ia64.o sha256-ia64.o sha512-ia64.o",
364         rc4_obj         => "rc4-ia64.o rc4_skey.o",
365         modes_obj       => "ghash-ia64.o",
366         perlasm_scheme  => "void"
367     },
368     sparcv9_asm => {
369         template        => 1,
370         cpuid_obj       => "sparcv9cap.o sparccpuid.o",
371         bn_obj          => "bn-sparcv9.o sparcv9-mont.o sparcv9a-mont.o vis3-mont.o sparct4-mont.o sparcv9-gf2m.o",
372         des_obj         => "des_enc-sparc.o fcrypt_b.o dest4-sparcv9.o",
373         aes_obj         => "aes_core.o aes_cbc.o aes-sparcv9.o aest4-sparcv9.o",
374         md5_obj         => "md5-sparcv9.o",
375         sha1_obj        => "sha1-sparcv9.o sha256-sparcv9.o sha512-sparcv9.o",
376         cmll_obj        => "camellia.o cmll_misc.o cmll_cbc.o cmllt4-sparcv9.o",
377         modes_obj       => "ghash-sparcv9.o",
378         perlasm_scheme  => "void"
379     },
380     sparcv8_asm => {
381         template        => 1,
382         cpuid_obj       => "",
383         bn_obj          => "sparcv8.o",
384         des_obj         => "des_enc-sparc.o fcrypt_b.o",
385         perlasm_scheme  => "void"
386     },
387     alpha_asm => {
388         template        => 1,
389         cpuid_obj       => "alphacpuid.o",
390         bn_obj          => "bn_asm.o alpha-mont.o",
391         sha1_obj        => "sha1-alpha.o",
392         modes_obj       => "ghash-alpha.o",
393         perlasm_scheme  => "void"
394     },
395     mips32_asm => {
396         template        => 1,
397         bn_obj          => "bn-mips.o mips-mont.o",
398         aes_obj         => "aes_cbc.o aes-mips.o",
399         sha1_obj        => "sha1-mips.o sha256-mips.o",
400     },
401     mips64_asm => {
402         inherit_from    => [ "mips32_asm" ],
403         template        => 1,
404         sha1_obj        => sub { join(" ", @_, "sha512-mips.o") }
405     },
406     s390x_asm => {
407         template        => 1,
408         cpuid_obj       => "s390xcap.o s390xcpuid.o",
409         bn_obj          => "bn-s390x.o s390x-mont.o s390x-gf2m.o",
410         aes_obj         => "aes-s390x.o aes-ctr.o aes-xts.o",
411         sha1_obj        => "sha1-s390x.o sha256-s390x.o sha512-s390x.o",
412         rc4_obj         => "rc4-s390x.o",
413         modes_obj       => "ghash-s390x.o",
414     },
415     armv4_asm => {
416         template        => 1,
417         cpuid_obj       => "armcap.o armv4cpuid.o",
418         bn_obj          => "bn_asm.o armv4-mont.o armv4-gf2m.o",
419         ec_obj          => "ecp_nistz256.o ecp_nistz256-armv4.o",
420         aes_obj         => "aes_cbc.o aes-armv4.o bsaes-armv7.o aesv8-armx.o",
421         sha1_obj        => "sha1-armv4-large.o sha256-armv4.o sha512-armv4.o",
422         modes_obj       => "ghash-armv4.o ghashv8-armx.o",
423         perlasm_scheme  => "void"
424     },
425     aarch64_asm => {
426         template        => 1,
427         cpuid_obj       => "armcap.o arm64cpuid.o mem_clr.o",
428         bn_obj          => "bn_asm.o armv8-mont.o",
429         aes_obj         => "aes_core.o aes_cbc.o aesv8-armx.o vpaes-armv8.o",
430         sha1_obj        => "sha1-armv8.o sha256-armv8.o sha512-armv8.o",
431         modes_obj       => "ghashv8-armx.o",
432     },
433     parisc11_asm => {
434         template        => 1,
435         cpuid_obj       => "pariscid.o",
436         bn_obj          => "bn_asm.o parisc-mont.o",
437         aes_obj         => "aes_core.o aes_cbc.o aes-parisc.o",
438         sha1_obj        => "sha1-parisc.o sha256-parisc.o sha512-parisc.o",
439         rc4_obj         => "rc4-parisc.o",
440         modes_obj       => "ghash-parisc.o",
441         perlasm_scheme  => "32"
442     },
443     parisc20_64_asm => {
444         template        => 1,
445         inherit_from    => [ "parisc11_asm" ],
446         bn_obj          => sub { my $r=join(" ",@_); $r=~s/bn_asm/pa-risc2W/; $r; },
447         perlasm_scheme  => "64",
448     },
449     ppc64_asm => {
450         template        => 1,
451         cpuid_obj       => "ppccpuid.o ppccap.o",
452         bn_obj          => "bn-ppc.o ppc-mont.o ppc64-mont.o",
453         aes_obj         => "aes_core.o aes_cbc.o aes-ppc.o vpaes-ppc.o aesp8-ppc.o",
454         sha1_obj        => "sha1-ppc.o sha256-ppc.o sha512-ppc.o sha256p8-ppc.o sha512p8-ppc.o",
455         modes_obj       => "ghashp8-ppc.o",
456     },
457     ppc32_asm => {
458         inherit_from    => [ "ppc64_asm" ],
459         template        => 1
460     },
461 );
462
463 {   my $no_asm_templates=0;
464     foreach (@ARGV) { $no_asm_templates=1 if (/^\-?no\-asm$/); }
465     sub asm { $no_asm_templates?():@_; }
466 }
467
468
469 sub stringtohash {
470     my $in = shift @_;
471     if (ref($in) eq "HASH") {
472         return $in;
473     }
474     my @stringsequence = (
475         "cc",
476         "cflags",
477         "unistd",
478         "thread_cflag",
479         "sys_id",
480         "lflags",
481         "bn_ops",
482         "cpuid_obj",
483         "bn_obj",
484         "ec_obj",
485         "des_obj",
486         "aes_obj",
487         "bf_obj",
488         "md5_obj",
489         "sha1_obj",
490         "cast_obj",
491         "rc4_obj",
492         "rmd160_obj",
493         "rc5_obj",
494         "wp_obj",
495         "cmll_obj",
496         "modes_obj",
497         "engines_obj",
498         "perlasm_scheme",
499         "dso_scheme",
500         "shared_target",
501         "shared_cflag",
502         "shared_ldflag",
503         "shared_extension",
504         "ranlib",
505         "arflags",
506         "multilib",
507         );
508
509     # return a ref to a hash, that's what the outer braces are for.
510     return { map { shift @stringsequence => $_ } split /:/, $in };
511 };
512
513 # Read configuration target stanzas from a file, so that people can have
514 # local files with their own definitions
515 sub read_config {
516         my $fname = shift;
517         open(CONFFILE, "< $fname")
518                 or die "Can't open configuration file '$fname'!\n";
519         my $x = $/;
520         undef $/;
521         my $content = <CONFFILE>;
522         $/ = $x;
523         close(CONFFILE);
524         my %targets = ();
525         eval $content;
526
527         # Make sure we have debug- targets first
528         my @keys =
529             sort {
530                 my $a_nd = $a =~ m/^debug-/ ? $' :$a;
531                 my $b_nd = $b =~ m/^debug-/ ? $' :$b;
532                 my $res = 0;
533
534                 if (($a_nd == $a) == ($b_nd == $b)) {
535                     # they are both debug- or not, compare them as they are
536                     $res = $a cmp $b;
537                 } elsif ($a_nd != $a) {
538                     # $a is debug-, make it lesser
539                     $res = -1;
540                 } else {
541                     # $b is debug-, make $a greater
542                     $res = 1;
543                 }
544                 $res;
545             } keys %targets;
546
547         foreach (@keys) {
548             if (ref($targets{$_}) ne "HASH") {
549                 # Value is assumed to be a string.  Split it up to
550                 # become a hash table of parameters.  Also, try to
551                 # merge debug- variants with the non-debug target.
552
553                 # Start with converting the value from a string to a
554                 # standardised hash of fields.  Using $tohash is safe,
555                 # if the input is already a hash ref, it's just returned
556                 # back.
557                 $targets{$_} = stringtohash($targets{$_});
558
559                 # If the current target is a debug target, there might
560                 # be a corresponding non-debug target that we can merge
561                 # with.  If it isn't a debug- target, we've already done
562                 # as much merging as we can and do not need to bother
563                 # with that any more.
564                 if ($_ =~ m/^debug-/) {
565                     my $debugkey = $_;
566                     my $nondebugkey = $';
567                     my $debug = $targets{$debugkey};
568                     my $nondebug;
569
570                     if ($targets{$nondebugkey}) {
571                         $nondebug = stringtohash($targets{$nondebugkey});
572                     }
573
574                     if ($nondebug) {
575                         # There's both a debug and non-debug variant of
576                         # this target, so we should try to merge them
577                         # together.
578
579                         # First, check that the non-debug variant isn't
580                         # already built up with all it should have.
581                         if ($nondebug->{debug_cflags}
582                             || $nondebug->{release_cflags}
583                             || $nondebug->{debug_lflags}
584                             || $nondebug->{release_lflags}) {
585                             warn "there's a debug target $debugkey to be merged with a target $nondebugkey, but the latter seems to already have both nodebug and debug information.  This requires human intervention.  Skipping $debugkey...";
586                             next;
587                         }
588
589                         # Now, check similarity.
590                         # For keys they have in common, support that
591                         # cflags and lflags can differ, otherwise they
592                         # must have exactly the same values for them
593                         # to be merged into one.
594                         my $similarenough = 1;
595                         for (keys %{$debug}) {
596                             if ($nondebug->{$_} ne $debug->{$_}
597                                 && $_ !~ m/^[cl]flags$/) {
598                                 $similarenough = 0;
599                                 last;
600                             }
601                         }
602
603                         if ($similarenough) {
604                             # Here's where the magic happens, split the
605                             # options in the debug and non-debug variants
606                             # cflags and ldflags into three strings each,
607                             # one with common flags, one with extra debug
608                             # flags and one with extra non-debug flags.
609
610                             # The result ends up in %h_nondebug, which
611                             # becomes the merged variant when we're done.
612                             # for each of cflags and lflags, they are
613                             # replaced with cflags, debug_cflags,
614                             # release_cflags and similar for lflags.
615                             #
616                             # The purpose is that 'cflags' should be
617                             # used together with 'debug_cflags' or
618                             # 'release_cflags' depending on what the
619                             # user asks for.
620                             foreach (("cflags", "lflags")) {
621                                 my @list_d = split /\s+/, $debug->{$_};
622                                 my @list_nd = split /\s+/, $nondebug->{$_};
623                                 my %presence = (); # bitmap
624                                                    # 1: present in @list_d
625                                                    # 2: present in @list_nd
626                                                    # 3: present in both
627                                 map { $presence{$_} += 1; } @list_d;
628                                 map { $presence{$_} += 2; } @list_nd;
629
630                                 delete $nondebug->{$_};
631                                 # Note: we build from the original lists to
632                                 # preserve order, it might be important
633                                 $nondebug->{"debug-".$_} =
634                                     join(" ",
635                                          grep { $presence{$_} == 1 } @list_d);
636                                 $nondebug->{"nodebug-".$_} =
637                                     join(" ",
638                                          grep { $presence{$_} == 2 } @list_nd);
639                                 $nondebug->{$_} =
640                                     join(" ",
641                                          grep { $presence{$_} == 3 } @list_d);
642                             }
643
644                             $targets{$nondebugkey} = $nondebug;
645                             delete $targets{$debugkey};
646                         }
647                     }
648                 }
649             }
650         }
651
652         %table = (%table, %targets);
653
654         # Local function to resolve inheritance
655         my $resolve_inheritance;
656         $resolve_inheritance =
657             sub {
658                 my $target = shift;
659                 my @breadcrumbs = @_;
660
661                 if (grep { $_ eq $target } @breadcrumbs) {
662                     die "inherit_from loop!  target backtrace:\n  "
663                         ,$target,"\n  ",join("\n  ", @breadcrumbs),"\n";
664                 }
665
666                 # Recurse through all inheritances.  They will be resolved on
667                 # the fly, so when this operation is done, they will all just
668                 # be a bunch of attributes with string values.
669                 # What we get here, though, are keys with references to lists
670                 # of the combined values of them all.  We will deal with lists
671                 # after this stage is done.
672                 my %combined_inheritance = ();
673                 if ($table{$target}->{inherit_from}) {
674                     foreach (@{$table{$target}->{inherit_from}}) {
675                         my %inherited_config =
676                             $resolve_inheritance->($_, $target, @breadcrumbs);
677
678                         # 'template' is a marker that's considered private to
679                         # the config that had it.
680                         delete $inherited_config{template};
681
682                         map {
683                             if (!$combined_inheritance{$_}) {
684                                 $combined_inheritance{$_} = [];
685                             }
686                             push @{$combined_inheritance{$_}}, $inherited_config{$_};
687                         } keys %inherited_config;
688                     }
689                 }
690
691                 # We won't need inherit_from in this target any more, since
692                 # we've resolved all the inheritances that lead to this
693                 delete $table{$target}->{inherit_from};
694
695                 # Now is the time to deal with those lists.  Here's the place
696                 # to decide what shall be done with those lists, all based on
697                 # the values of the target we're currently dealing with.
698                 # - If a value is a coderef, it will be executed with the list
699                 #   of inherited values as arguments.
700                 # - If the corresponding key doesn't have a value at all or is
701                 #   the emoty string, the inherited value list will be run
702                 #   through the default combiner (below), and the result
703                 #   becomes this target's value.
704                 # - Otherwise, this target's value is assumed to be a string
705                 #   that will simply override the inherited list of values.
706                 my $default_combiner = sub { join(' ',@_) };
707
708                 my %all_keys =
709                     map { $_ => 1 } (keys %combined_inheritance,
710                                      keys %{$table{$target}});
711                 foreach (sort keys %all_keys) {
712
713                     # Current target doesn't have a value for the current key?
714                     # Assign it the default combiner, the rest of this loop
715                     # body will handle it just like any other coderef.
716                     if (!exists $table{$target}->{$_}) {
717                         $table{$target}->{$_} = $default_combiner;
718                     }
719
720                     my $valuetype = ref($table{$target}->{$_});
721                     if ($valuetype eq "CODE") {
722                         # CODE reference, execute it with the inherited values
723                         # as arguments.
724                         $table{$target}->{$_} =
725                             $table{$target}->{$_}->(@{$combined_inheritance{$_}});
726                     } elsif ($valuetype eq "") {
727                         # Scalar, just leave it as is.
728                     } else {
729                         # Some other type of reference that we don't handle.
730                         # Better to abort at this point.
731                         die "cannot handle reference type $valuetype,"
732                             ," found in target $target -> $_\n";
733                     }
734                 }
735
736                 # Finally done, return the result.
737                 %{$table{$target}};
738         };
739
740         # Go through all new targets and resolve inheritance and template
741         # references.
742         foreach (keys %targets) {
743             # We're ignoring the returned values here, they are only valuable
744             # to the inner recursion of this function.
745             $resolve_inheritance->($_);
746         }
747 }
748
749 my ($vol, $dir, $dummy) = File::Spec->splitpath($0);
750 my $pattern = File::Spec->catpath($vol, $dir, "Configurations/*.conf");
751 foreach (sort glob($pattern) ) {
752     &read_config($_);
753 }
754
755 my @MK1MF_Builds=qw(VC-WIN64I VC-WIN64A
756                     debug-VC-WIN64I debug-VC-WIN64A
757                     VC-NT VC-CE VC-WIN32 debug-VC-WIN32
758                     BC-32
759                     netware-clib netware-clib-bsdsock
760                     netware-libc netware-libc-bsdsock);
761
762 my $prefix="";
763 my $libdir="";
764 my $openssldir="";
765 my $exe_ext="";
766 my $install_prefix= "$ENV{'INSTALL_PREFIX'}";
767 my $cross_compile_prefix="";
768 my $fipslibdir="/usr/local/ssl/fips-2.0/lib/";
769 my $nofipscanistercheck=0;
770 my $baseaddr="0xFB00000";
771 my $no_threads=0;
772 my $threads=0;
773 my $no_shared=0; # but "no-shared" is default
774 my $zlib=1;      # but "no-zlib" is default
775 my $no_krb5=0;   # but "no-krb5" is implied unless "--with-krb5-..." is used
776 my $no_rfc3779=1; # but "no-rfc3779" is default
777 my $no_asm=0;
778 my $no_dso=0;
779 my $no_gmp=0;
780 my @skip=();
781 my $Makefile="Makefile";
782 my $des_locl="crypto/des/des_locl.h";
783 my $des ="include/openssl/des.h";
784 my $bn  ="include/openssl/bn.h";
785 my $md2 ="include/openssl/md2.h";
786 my $rc4 ="include/openssl/rc4.h";
787 my $rc4_locl="crypto/rc4/rc4_locl.h";
788 my $idea        ="include/openssl/idea.h";
789 my $rc2 ="include/openssl/rc2.h";
790 my $bf  ="crypto/bf/bf_locl.h";
791 my $bn_asm      ="bn_asm.o";
792 my $des_enc="des_enc.o fcrypt_b.o";
793 my $aes_enc="aes_core.o aes_cbc.o";
794 my $bf_enc      ="bf_enc.o";
795 my $cast_enc="c_enc.o";
796 my $rc4_enc="rc4_enc.o rc4_skey.o";
797 my $rc5_enc="rc5_enc.o";
798 my $cmll_enc="camellia.o cmll_misc.o cmll_cbc.o";
799 my $processor="";
800 my $default_ranlib;
801 my $perl;
802 my $fips=0;
803
804 # All of the following is disabled by default (RC5 was enabled before 0.9.8):
805
806 my %disabled = ( # "what"         => "comment" [or special keyword "experimental"]
807                  "deprecated" => "default",
808                  "ec_nistp_64_gcc_128" => "default",
809                  "gmp"            => "default",
810                  "jpake"          => "experimental",
811                  "md2"            => "default",
812                  "rc5"            => "default",
813                  "rfc3779"        => "default",
814                  "sctp"       => "default",
815                  "shared"         => "default",
816                  "ssl-trace"      => "default",
817                  "store"          => "experimental",
818                  "unit-test"      => "default",
819                  "zlib"           => "default",
820                  "zlib-dynamic"   => "default"
821                );
822 my @experimental = ();
823
824 # This is what $depflags will look like with the above defaults
825 # (we need this to see if we should advise the user to run "make depend"):
826 my $default_depflags = " -DOPENSSL_NO_DEPRECATED -DOPENSSL_NO_EC_NISTP_64_GCC_128 -DOPENSSL_NO_GMP -DOPENSSL_NO_JPAKE -DOPENSSL_NO_MD2 -DOPENSSL_NO_RC5 -DOPENSSL_NO_RFC3779 -DOPENSSL_NO_SCTP -DOPENSSL_NO_SSL_TRACE -DOPENSSL_NO_STORE -DOPENSSL_NO_UNIT_TEST";
827
828 # Explicit "no-..." options will be collected in %disabled along with the defaults.
829 # To remove something from %disabled, use "enable-foo" (unless it's experimental).
830 # For symmetry, "disable-foo" is a synonym for "no-foo".
831
832 # For features called "experimental" here, a more explicit "experimental-foo" is needed to enable.
833 # We will collect such requests in @experimental.
834 # To avoid accidental use of experimental features, applications will have to use -DOPENSSL_EXPERIMENTAL_FOO.
835
836
837 my $no_sse2=0;
838
839 &usage if ($#ARGV < 0);
840
841 my $flags;
842 my $depflags;
843 my $openssl_experimental_defines;
844 my $openssl_algorithm_defines;
845 my $openssl_thread_defines;
846 my $openssl_sys_defines="";
847 my $openssl_other_defines;
848 my $libs;
849 my $libkrb5="";
850 my $target;
851 my $options;
852 my $make_depend=0;
853 my %withargs=();
854 my $build_prefix = "release_";
855
856 my @argvcopy=@ARGV;
857 my $argvstring="";
858 my $argv_unprocessed=1;
859
860 while($argv_unprocessed)
861         {
862         $flags="";
863         $depflags="";
864         $openssl_experimental_defines="";
865         $openssl_algorithm_defines="";
866         $openssl_thread_defines="";
867         $openssl_sys_defines="";
868         $openssl_other_defines="";
869         $libs="";
870         $target="";
871         $options="";
872
873         $argv_unprocessed=0;
874         $argvstring=join(' ',@argvcopy);
875
876 PROCESS_ARGS:
877         foreach (@argvcopy)
878                 {
879                 s /^-no-/no-/; # some people just can't read the instructions
880
881                 # rewrite some options in "enable-..." form
882                 s /^-?-?shared$/enable-shared/;
883                 s /^sctp$/enable-sctp/;
884                 s /^threads$/enable-threads/;
885                 s /^zlib$/enable-zlib/;
886                 s /^zlib-dynamic$/enable-zlib-dynamic/;
887
888                 if (/^no-(.+)$/ || /^disable-(.+)$/)
889                         {
890                         if (!($disabled{$1} eq "experimental"))
891                                 {
892                                 if ($1 eq "ssl")
893                                         {
894                                         $disabled{"ssl3"} = "option(ssl)";
895                                         }
896                                 elsif ($1 eq "tls")
897                                         {
898                                         $disabled{"tls1"} = "option(tls)"
899                                         }
900                                 elsif ($1 eq "ssl3-method")
901                                         {
902                                         $disabled{"ssl3-method"} = "option(ssl)";
903                                         $disabled{"ssl3"} = "option(ssl)";
904                                         }
905                                 else
906                                         {
907                                         $disabled{$1} = "option";
908                                         }
909                                 }
910                         }
911                 elsif (/^enable-(.+)$/ || /^experimental-(.+)$/)
912                         {
913                         my $algo = $1;
914                         if ($disabled{$algo} eq "experimental")
915                                 {
916                                 die "You are requesting an experimental feature; please say 'experimental-$algo' if you are sure\n"
917                                         unless (/^experimental-/);
918                                 push @experimental, $algo;
919                                 }
920                         delete $disabled{$algo};
921
922                         $threads = 1 if ($algo eq "threads");
923                         }
924                 elsif (/^--test-sanity$/)
925                         {
926                         exit(&test_sanity());
927                         }
928                 elsif (/^--strict-warnings$/)
929                         {
930                         $strict_warnings = 1;
931                         }
932                 elsif (/^--debug$/)
933                         {
934                         $build_prefix = "debug_";
935                         }
936                 elsif (/^--release$/)
937                         {
938                         $build_prefix = "release_";
939                         }
940                 elsif (/^reconfigure/ || /^reconf/)
941                         {
942                         if (open(IN,"<$Makefile"))
943                                 {
944                                 while (<IN>)
945                                         {
946                                         chomp;
947                                         if (/^CONFIGURE_ARGS=(.*)/)
948                                                 {
949                                                 $argvstring=$1;
950                                                 @argvcopy=split(' ',$argvstring);
951                                                 die "Incorrect data to reconfigure, please do a normal configuration\n"
952                                                         if (grep(/^reconf/,@argvcopy));
953                                                 print "Reconfiguring with: $argvstring\n";
954                                                 $argv_unprocessed=1;
955                                                 close(IN);
956                                                 last PROCESS_ARGS;
957                                                 }
958                                         }
959                                 close(IN);
960                                 }
961                         die "Insufficient data to reconfigure, please do a normal configuration\n";
962                         }
963                 elsif (/^386$/)
964                         { $processor=386; }
965                 elsif (/^fips$/)
966                         {
967                         $fips=1;
968                         }
969                 elsif (/^rsaref$/)
970                         {
971                         # No RSAref support any more since it's not needed.
972                         # The check for the option is there so scripts aren't
973                         # broken
974                         }
975                 elsif (/^nofipscanistercheck$/)
976                         {
977                         $fips = 1;
978                         $nofipscanistercheck = 1;
979                         }
980                 elsif (/^[-+]/)
981                         {
982                         if (/^--prefix=(.*)$/)
983                                 {
984                                 $prefix=$1;
985                                 }
986                         elsif (/^--libdir=(.*)$/)
987                                 {
988                                 $libdir=$1;
989                                 }
990                         elsif (/^--openssldir=(.*)$/)
991                                 {
992                                 $openssldir=$1;
993                                 }
994                         elsif (/^--install.prefix=(.*)$/)
995                                 {
996                                 $install_prefix=$1;
997                                 }
998                         elsif (/^--with-krb5-(dir|lib|include|flavor)=(.*)$/)
999                                 {
1000                                 $withargs{"krb5-".$1}=$2;
1001                                 }
1002                         elsif (/^--with-zlib-lib=(.*)$/)
1003                                 {
1004                                 $withargs{"zlib-lib"}=$1;
1005                                 }
1006                         elsif (/^--with-zlib-include=(.*)$/)
1007                                 {
1008                                 $withargs{"zlib-include"}="-I$1";
1009                                 }
1010                         elsif (/^--with-fipslibdir=(.*)$/)
1011                                 {
1012                                 $fipslibdir="$1/";
1013                                 }
1014                         elsif (/^--with-baseaddr=(.*)$/)
1015                                 {
1016                                 $baseaddr="$1";
1017                                 }
1018                         elsif (/^--cross-compile-prefix=(.*)$/)
1019                                 {
1020                                 $cross_compile_prefix=$1;
1021                                 }
1022                         elsif (/^--config=(.*)$/)
1023                                 {
1024                                 read_config $1;
1025                                 }
1026                         elsif (/^-[lL](.*)$/ or /^-Wl,/)
1027                                 {
1028                                 $libs.=$_." ";
1029                                 }
1030                         else    # common if (/^[-+]/), just pass down...
1031                                 {
1032                                 $_ =~ s/%([0-9a-f]{1,2})/chr(hex($1))/gei;
1033                                 $flags.=$_." ";
1034                                 }
1035                         }
1036                 elsif ($_ =~ /^([^:]+):(.+)$/)
1037                         {
1038                         eval "\$table{\$1} = \"$2\""; # allow $xxx constructs in the string
1039                         $target=$1;
1040                         }
1041                 else
1042                         {
1043                         die "target already defined - $target (offending arg: $_)\n" if ($target ne "");
1044                         $target=$_;
1045                         }
1046
1047                 unless ($_ eq $target || /^no-/ || /^disable-/)
1048                         {
1049                         # "no-..." follows later after implied disactivations
1050                         # have been derived.  (Don't take this too seroiusly,
1051                         # we really only write OPTIONS to the Makefile out of
1052                         # nostalgia.)
1053
1054                         if ($options eq "")
1055                                 { $options = $_; }
1056                         else
1057                                 { $options .= " ".$_; }
1058                         }
1059                 }
1060         }
1061
1062
1063
1064 if ($processor eq "386")
1065         {
1066         $disabled{"sse2"} = "forced";
1067         }
1068
1069 if (!defined($withargs{"krb5-flavor"}) || $withargs{"krb5-flavor"} eq "")
1070         {
1071         $disabled{"krb5"} = "krb5-flavor not specified";
1072         }
1073
1074 if (!defined($disabled{"zlib-dynamic"}))
1075         {
1076         # "zlib-dynamic" was specifically enabled, so enable "zlib"
1077         delete $disabled{"zlib"};
1078         }
1079
1080 if (defined($disabled{"rijndael"}))
1081         {
1082         $disabled{"aes"} = "forced";
1083         }
1084 if (defined($disabled{"des"}))
1085         {
1086         $disabled{"mdc2"} = "forced";
1087         }
1088 if (defined($disabled{"ec"}))
1089         {
1090         $disabled{"ecdsa"} = "forced";
1091         $disabled{"ecdh"} = "forced";
1092         }
1093
1094 # SSL 3.0 and TLS requires MD5 and SHA and either RSA or DSA+DH
1095 if (defined($disabled{"md5"}) || defined($disabled{"sha"})
1096     || (defined($disabled{"rsa"})
1097         && (defined($disabled{"dsa"}) || defined($disabled{"dh"}))))
1098         {
1099         $disabled{"ssl3"} = "forced";
1100         $disabled{"tls1"} = "forced";
1101         }
1102
1103 if (defined($disabled{"tls1"}))
1104         {
1105         $disabled{"tlsext"} = "forced";
1106         }
1107
1108 if (defined($disabled{"ec"}) || defined($disabled{"dsa"})
1109     || defined($disabled{"dh"}))
1110         {
1111         $disabled{"gost"} = "forced";
1112         }
1113
1114 # SRP and HEARTBEATS require TLSEXT
1115 if (defined($disabled{"tlsext"}))
1116         {
1117         $disabled{"srp"} = "forced";
1118         $disabled{"heartbeats"} = "forced";
1119         }
1120
1121 if ($target eq "TABLE") {
1122         foreach $target (sort keys %table) {
1123                 print_table_entry($target, "TABLE");
1124         }
1125         exit 0;
1126 }
1127
1128 if ($target eq "LIST") {
1129         foreach (sort keys %table) {
1130                 print;
1131                 print "\n";
1132         }
1133         exit 0;
1134 }
1135
1136 if ($target eq "HASH") {
1137         print "%table = (\n";
1138         foreach (sort keys %table) {
1139                 print_table_entry($_, "HASH");
1140         }
1141         exit 0;
1142 }
1143
1144 if ($target =~ m/^CygWin32(-.*)$/) {
1145         $target = "Cygwin".$1;
1146 }
1147
1148 print "Configuring for $target\n";
1149
1150 # Support for legacy targets having a name starting with 'debug-'
1151 my ($d, $t) = $target =~ m/^(debug-)?(.*)$/;
1152 if ($d) {
1153     $build_prefix = "debug_";
1154
1155     # If we do not find debug-foo in the table, the target is set to foo,
1156     # but only if the foo target has a noon-empty debug_cflags or debug_lflags
1157     # attribute.
1158     if (!$table{$target} && ($table{$t}->{debug_cflags}
1159                              || $table{$t}->{debug_lflags})) {
1160         $target = $t;
1161     }
1162 }
1163
1164 &usage if (!defined($table{$target})
1165            || $table{$target}->{template}
1166            || ($build_prefix eq "debug_"
1167                && $target !~ /^debug-/
1168                && !($table{$target}->{debug_cflags}
1169                     || $table{$target}->{debug_lflags})));
1170
1171 if ($fips)
1172         {
1173         delete $disabled{"shared"} if ($disabled{"shared"} eq "default");
1174         }
1175
1176 foreach (sort (keys %disabled))
1177         {
1178         $options .= " no-$_";
1179
1180         printf "    no-%-12s %-10s", $_, "[$disabled{$_}]";
1181
1182         if (/^dso$/)
1183                 { $no_dso = 1; }
1184         elsif (/^threads$/)
1185                 { $no_threads = 1; }
1186         elsif (/^shared$/)
1187                 { $no_shared = 1; }
1188         elsif (/^zlib$/)
1189                 { $zlib = 0; }
1190         elsif (/^static-engine$/)
1191                 { }
1192         elsif (/^zlib-dynamic$/)
1193                 { }
1194         elsif (/^sse2$/)
1195                 { $no_sse2 = 1; }
1196         else
1197                 {
1198                 my ($ALGO, $algo);
1199                 ($ALGO = $algo = $_) =~ tr/[\-a-z]/[_A-Z]/;
1200
1201                 if (/^asm$/ || /^err$/ || /^hw$/ || /^hw-/)
1202                         {
1203                         $openssl_other_defines .= "#define OPENSSL_NO_$ALGO\n";
1204                         print " OPENSSL_NO_$ALGO";
1205
1206                         if (/^err$/)    { $flags .= "-DOPENSSL_NO_ERR "; }
1207                         elsif (/^asm$/) { $no_asm = 1; }
1208                         }
1209                 else
1210                         {
1211                         ($ALGO,$algo) = ("RMD160","rmd160") if ($algo eq "ripemd");
1212
1213                         $openssl_algorithm_defines .= "#define OPENSSL_NO_$ALGO\n";
1214                         print " OPENSSL_NO_$ALGO";
1215
1216                         if (/^krb5$/)
1217                                 { $no_krb5 = 1; }
1218                         else
1219                                 {
1220                                 push @skip, $algo;
1221                                 # fix-up crypto/directory name(s)
1222                                 $skip[$#skip]="whrlpool" if $algo eq "whirlpool";
1223                                 $skip[$#skip]="ripemd" if $algo eq "rmd160";
1224
1225                                 print " (skip dir)";
1226
1227                                 $depflags .= " -DOPENSSL_NO_$ALGO";
1228                                 }
1229                         }
1230                 }
1231
1232         print "\n";
1233         }
1234
1235 my $exp_cflags = "";
1236
1237 foreach (sort @experimental)
1238         {
1239         my $ALGO;
1240         ($ALGO = $_) =~ tr/[a-z]/[A-Z]/;
1241
1242         # opensslconf.h will set OPENSSL_NO_... unless OPENSSL_EXPERIMENTAL_... is defined
1243         $openssl_experimental_defines .= "#define OPENSSL_NO_$ALGO\n";
1244         $exp_cflags .= " -DOPENSSL_EXPERIMENTAL_$ALGO";
1245         }
1246
1247 my $IsMK1MF=scalar grep /^$target$/,@MK1MF_Builds;
1248
1249 $exe_ext=".exe" if ($target eq "Cygwin" || $target eq "DJGPP" || $target =~ /^mingw/);
1250 $exe_ext=".nlm" if ($target =~ /netware/);
1251 $exe_ext=".pm"  if ($target =~ /vos/);
1252 $openssldir="/usr/local/ssl" if ($openssldir eq "" and $prefix eq "");
1253 $prefix=$openssldir if $prefix eq "";
1254
1255 $default_ranlib= &which("ranlib") or $default_ranlib="true";
1256 $perl=$ENV{'PERL'} or $perl=&which("perl5") or $perl=&which("perl")
1257   or $perl="perl";
1258 my $make = $ENV{'MAKE'} || "make";
1259
1260 $cross_compile_prefix=$ENV{'CROSS_COMPILE'} if $cross_compile_prefix eq "";
1261
1262 chop $openssldir if $openssldir =~ /\/$/;
1263 chop $prefix if $prefix =~ /.\/$/;
1264
1265 $openssldir=$prefix . "/ssl" if $openssldir eq "";
1266 $openssldir=$prefix . "/" . $openssldir if $openssldir !~ /(^\/|^[a-zA-Z]:[\\\/])/;
1267
1268
1269 print "IsMK1MF=$IsMK1MF\n";
1270
1271 # Allow environment CC to override compiler...
1272 my $cc = $ENV{CC} || $table{$target}->{cc};
1273
1274 # For cflags and lflags, add the debug_ or release_ attributes
1275 # Do it in such a way that no spurious space is appended (hence the grep).
1276 my $cflags = join(" ",
1277                   grep { $_ } ($table{$target}->{cflags},
1278                                $table{$target}->{$build_prefix."cflags"}));
1279 my $lflags = join(" ",
1280                   grep { $_ } ($table{$target}->{lflags},
1281                                $table{$target}->{$build_prefix."lflags"}));
1282
1283 my $unistd = $table{$target}->{unistd};
1284 my $thread_cflag = $table{$target}->{thread_cflag};
1285 my $sys_id = $table{$target}->{sys_id};
1286 my $bn_ops = $table{$target}->{bn_ops};
1287 my $cpuid_obj = $table{$target}->{cpuid_obj};
1288 my $bn_obj = $table{$target}->{bn_obj};
1289 my $ec_obj = $table{$target}->{ec_obj};
1290 my $des_obj = $table{$target}->{des_obj};
1291 my $aes_obj = $table{$target}->{aes_obj};
1292 my $bf_obj = $table{$target}->{bf_obj};
1293 my $md5_obj = $table{$target}->{md5_obj};
1294 my $sha1_obj = $table{$target}->{sha1_obj};
1295 my $cast_obj = $table{$target}->{cast_obj};
1296 my $rc4_obj = $table{$target}->{rc4_obj};
1297 my $rmd160_obj = $table{$target}->{rmd160_obj};
1298 my $rc5_obj = $table{$target}->{rc5_obj};
1299 my $wp_obj = $table{$target}->{wp_obj};
1300 my $cmll_obj = $table{$target}->{cmll_obj};
1301 my $modes_obj = $table{$target}->{modes_obj};
1302 my $engines_obj = $table{$target}->{engines_obj};
1303 my $perlasm_scheme = $table{$target}->{perlasm_scheme};
1304 my $dso_scheme = $table{$target}->{dso_scheme};
1305 my $shared_target = $table{$target}->{shared_target};
1306 my $shared_cflag = $table{$target}->{shared_cflag};
1307 my $shared_ldflag = $table{$target}->{shared_ldflag};
1308 my $shared_extension = $table{$target}->{shared_extension};
1309 my $ranlib = $ENV{'RANLIB'} || $table{$target}->{ranlib};
1310 my $ar = $ENV{'AR'} || "ar";
1311 my $arflags = $table{$target}->{arflags};
1312 my $multilib = $table{$target}->{multilib};
1313
1314 # if $prefix/lib$multilib is not an existing directory, then
1315 # assume that it's not searched by linker automatically, in
1316 # which case adding $multilib suffix causes more grief than
1317 # we're ready to tolerate, so don't...
1318 $multilib="" if !-d "$prefix/lib$multilib";
1319
1320 $libdir="lib$multilib" if $libdir eq "";
1321
1322 $cflags = "$cflags$exp_cflags";
1323
1324 # '%' in $lflags is used to split flags to "pre-" and post-flags
1325 my ($prelflags,$postlflags)=split('%',$lflags);
1326 if (defined($postlflags))       { $lflags=$postlflags;  }
1327 else                            { $lflags=$prelflags; undef $prelflags; }
1328
1329 if ($target =~ /^mingw/ && `$cc --target-help 2>&1` !~ m/\-mno\-cygwin/m)
1330         {
1331         $cflags =~ s/\-mno\-cygwin\s*//;
1332         $shared_ldflag =~ s/\-mno\-cygwin\s*//;
1333         }
1334
1335 if ($target =~ /linux.*\-mips/ && !$no_asm && $flags !~ /\-m(ips|arch=)/) {
1336         # minimally required architecture flags for assembly modules
1337         $cflags="-mips2 $cflags" if ($target =~ /mips32/);
1338         $cflags="-mips3 $cflags" if ($target =~ /mips64/);
1339 }
1340
1341 my $no_shared_warn=0;
1342 my $no_user_cflags=0;
1343
1344 if ($flags ne "")       { $cflags="$flags$cflags"; }
1345 else                    { $no_user_cflags=1;       }
1346
1347 # Kerberos settings.  The flavor must be provided from outside, either through
1348 # the script "config" or manually.
1349 if (!$no_krb5)
1350         {
1351         my ($lresolv, $lpath, $lext);
1352         if ($withargs{"krb5-flavor"} =~ /^[Hh]eimdal$/)
1353                 {
1354                 die "Sorry, Heimdal is currently not supported\n";
1355                 }
1356         ##### HACK to force use of Heimdal.
1357         ##### WARNING: Since we don't really have adequate support for Heimdal,
1358         #####          using this will break the build.  You'll have to make
1359         #####          changes to the source, and if you do, please send
1360         #####          patches to openssl-dev@openssl.org
1361         if ($withargs{"krb5-flavor"} =~ /^force-[Hh]eimdal$/)
1362                 {
1363                 warn "Heimdal isn't really supported.  Your build WILL break\n";
1364                 warn "If you fix the problems, please send a patch to openssl-dev\@openssl.org\n";
1365                 $withargs{"krb5-dir"} = "/usr/heimdal"
1366                         if $withargs{"krb5-dir"} eq "";
1367                 $withargs{"krb5-lib"} = "-L".$withargs{"krb5-dir"}.
1368                         "/lib -lgssapi -lkrb5 -lcom_err"
1369                         if $withargs{"krb5-lib"} eq "" && !$IsMK1MF;
1370                 $cflags="-DKRB5_HEIMDAL $cflags";
1371                 }
1372         if ($withargs{"krb5-flavor"} =~ /^[Mm][Ii][Tt]/)
1373                 {
1374                 $withargs{"krb5-dir"} = "/usr/kerberos"
1375                         if $withargs{"krb5-dir"} eq "";
1376                 $withargs{"krb5-lib"} = "-L".$withargs{"krb5-dir"}.
1377                         "/lib -lgssapi_krb5 -lkrb5 -lcom_err -lk5crypto"
1378                         if $withargs{"krb5-lib"} eq "" && !$IsMK1MF;
1379                 $cflags="-DKRB5_MIT $cflags";
1380                 $withargs{"krb5-flavor"} =~ s/^[Mm][Ii][Tt][._-]*//;
1381                 if ($withargs{"krb5-flavor"} =~ /^1[._-]*[01]/)
1382                         {
1383                         $cflags="-DKRB5_MIT_OLD11 $cflags";
1384                         }
1385                 }
1386         LRESOLV:
1387         foreach $lpath ("/lib", "/usr/lib")
1388                 {
1389                 foreach $lext ("a", "so")
1390                         {
1391                         $lresolv = "$lpath/libresolv.$lext";
1392                         last LRESOLV    if (-r "$lresolv");
1393                         $lresolv = "";
1394                         }
1395                 }
1396         $withargs{"krb5-lib"} .= " -lresolv"
1397                 if ("$lresolv" ne "");
1398         $withargs{"krb5-include"} = "-I".$withargs{"krb5-dir"}."/include"
1399                 if $withargs{"krb5-include"} eq "" &&
1400                    $withargs{"krb5-dir"} ne "";
1401         }
1402
1403 # The DSO code currently always implements all functions so that no
1404 # applications will have to worry about that from a compilation point
1405 # of view. However, the "method"s may return zero unless that platform
1406 # has support compiled in for them. Currently each method is enabled
1407 # by a define "DSO_<name>" ... we translate the "dso_scheme" config
1408 # string entry into using the following logic;
1409 my $dso_cflags;
1410 if (!$no_dso && $dso_scheme ne "")
1411         {
1412         $dso_scheme =~ tr/[a-z]/[A-Z]/;
1413         if ($dso_scheme eq "DLFCN")
1414                 {
1415                 $dso_cflags = "-DDSO_DLFCN -DHAVE_DLFCN_H";
1416                 }
1417         elsif ($dso_scheme eq "DLFCN_NO_H")
1418                 {
1419                 $dso_cflags = "-DDSO_DLFCN";
1420                 }
1421         else
1422                 {
1423                 $dso_cflags = "-DDSO_$dso_scheme";
1424                 }
1425         $cflags = "$dso_cflags $cflags";
1426         }
1427
1428 my $thread_cflags;
1429 my $thread_defines;
1430 if ($thread_cflag ne "(unknown)" && !$no_threads)
1431         {
1432         # If we know how to do it, support threads by default.
1433         $threads = 1;
1434         }
1435 if ($thread_cflag eq "(unknown)" && $threads)
1436         {
1437         # If the user asked for "threads", [s]he is also expected to
1438         # provide any system-dependent compiler options that are
1439         # necessary.
1440         if ($no_user_cflags)
1441                 {
1442                 print "You asked for multi-threading support, but didn't\n";
1443                 print "provide any system-specific compiler options\n";
1444                 exit(1);
1445                 }
1446         $thread_cflags="-DOPENSSL_THREADS $cflags" ;
1447         $thread_defines .= "#define OPENSSL_THREADS\n";
1448         }
1449 else
1450         {
1451         $thread_cflags="-DOPENSSL_THREADS $thread_cflag $cflags";
1452         $thread_defines .= "#define OPENSSL_THREADS\n";
1453 #       my $def;
1454 #       foreach $def (split ' ',$thread_cflag)
1455 #               {
1456 #               if ($def =~ s/^-D// && $def !~ /^_/)
1457 #                       {
1458 #                       $thread_defines .= "#define $def\n";
1459 #                       }
1460 #               }
1461         }
1462
1463 $lflags="$libs$lflags" if ($libs ne "");
1464
1465 if ($no_asm)
1466         {
1467         $cpuid_obj=$bn_obj=$ec_obj=
1468         $des_obj=$aes_obj=$bf_obj=$cast_obj=$rc4_obj=$rc5_obj=$cmll_obj=
1469         $modes_obj=$sha1_obj=$md5_obj=$rmd160_obj=$wp_obj=$engines_obj="";
1470         $cflags=~s/\-D[BL]_ENDIAN//             if ($fips);
1471         $thread_cflags=~s/\-D[BL]_ENDIAN//      if ($fips);
1472         }
1473 elsif (defined($disabled{ec2m}))
1474         {
1475         $bn_obj =~ s/\w+-gf2m.o//;
1476         }
1477
1478 if (!$no_shared)
1479         {
1480         $cast_obj="";   # CAST assembler is not PIC
1481         }
1482
1483 if ($threads)
1484         {
1485         $cflags=$thread_cflags;
1486         $openssl_thread_defines .= $thread_defines;
1487         }
1488
1489 if ($zlib)
1490         {
1491         $cflags = "-DZLIB $cflags";
1492         if (defined($disabled{"zlib-dynamic"}))
1493                 {
1494                 if (defined($withargs{"zlib-lib"}))
1495                         {
1496                         $lflags = "$lflags -L" . $withargs{"zlib-lib"} . " -lz";
1497                         }
1498                 else
1499                         {
1500                         $lflags = "$lflags -lz";
1501                         }
1502                 }
1503         else
1504                 {
1505                 $cflags = "-DZLIB_SHARED $cflags";
1506                 }
1507         }
1508
1509 #Build the library with OPENSSL_USE_DEPRECATED if deprecation is not disabled
1510 if(!defined($disabled{"deprecated"}))
1511         {
1512         $cflags = "-DOPENSSL_USE_DEPRECATED $cflags";
1513         }
1514
1515 # You will find shlib_mark1 and shlib_mark2 explained in Makefile.org
1516 my $shared_mark = "";
1517 if ($shared_target eq "")
1518         {
1519         $no_shared_warn = 1 if !$no_shared && !$fips;
1520         $no_shared = 1;
1521         }
1522 if (!$no_shared)
1523         {
1524         if ($shared_cflag ne "")
1525                 {
1526                 $cflags = "$shared_cflag -DOPENSSL_PIC $cflags";
1527                 }
1528         }
1529
1530 if (!$IsMK1MF)
1531         {
1532         # add {no-}static-engine to options to allow mkdef.pl to work without extra arguments
1533         if ($no_shared)
1534                 {
1535                 $openssl_other_defines.="#define OPENSSL_NO_DYNAMIC_ENGINE\n";
1536                 $options.=" static-engine";
1537                 }
1538         else
1539                 {
1540                 $openssl_other_defines.="#define OPENSSL_NO_STATIC_ENGINE\n";
1541                 $options.=" no-static-engine";
1542                 }
1543         }
1544
1545 $cpuid_obj.=" uplink.o uplink-x86.o" if ($cflags =~ /\-DOPENSSL_USE_APPLINK/);
1546
1547 #
1548 # Platform fix-ups
1549 #
1550 if ($target =~ /\-icc$/)        # Intel C compiler
1551         {
1552         my $iccver=0;
1553         if (open(FD,"$cc -V 2>&1 |"))
1554                 {
1555                 while(<FD>) { $iccver=$1 if (/Version ([0-9]+)\./); }
1556                 close(FD);
1557                 }
1558         if ($iccver>=8)
1559                 {
1560                 $cflags=~s/\-KPIC/-fPIC/;
1561                 # Eliminate unnecessary dependency from libirc.a. This is
1562                 # essential for shared library support, as otherwise
1563                 # apps/openssl can end up in endless loop upon startup...
1564                 $cflags.=" -Dmemcpy=__builtin_memcpy -Dmemset=__builtin_memset";
1565                 }
1566         if ($iccver>=9)
1567                 {
1568                 $lflags.=" -i-static";
1569                 $lflags=~s/\-no_cpprt/-no-cpprt/;
1570                 }
1571         if ($iccver>=10)
1572                 {
1573                 $lflags=~s/\-i\-static/-static-intel/;
1574                 }
1575         if ($iccver>=11)
1576                 {
1577                 $cflags.=" -no-intel-extensions";       # disable Cilk
1578                 $lflags=~s/\-no\-cpprt/-no-cxxlib/;
1579                 }
1580         }
1581
1582 # Unlike other OSes (like Solaris, Linux, Tru64, IRIX) BSD run-time
1583 # linkers (tested OpenBSD, NetBSD and FreeBSD) "demand" RPATH set on
1584 # .so objects. Apparently application RPATH is not global and does
1585 # not apply to .so linked with other .so. Problem manifests itself
1586 # when libssl.so fails to load libcrypto.so. One can argue that we
1587 # should engrave this into Makefile.shared rules or into BSD-* config
1588 # lines above. Meanwhile let's try to be cautious and pass -rpath to
1589 # linker only when --prefix is not /usr.
1590 if ($target =~ /^BSD\-/)
1591         {
1592         $shared_ldflag.=" -Wl,-rpath,\$(LIBRPATH)" if ($prefix !~ m|^/usr[/]*$|);
1593         }
1594
1595 if ($sys_id ne "")
1596         {
1597         #$cflags="-DOPENSSL_SYS_$sys_id $cflags";
1598         $openssl_sys_defines="#define OPENSSL_SYS_$sys_id\n";
1599         }
1600
1601 if ($ranlib eq "")
1602         {
1603         $ranlib = $default_ranlib;
1604         }
1605
1606 #my ($bn1)=split(/\s+/,$bn_obj);
1607 #$bn1 = "" unless defined $bn1;
1608 #$bn1=$bn_asm unless ($bn1 =~ /\.o$/);
1609 #$bn_obj="$bn1";
1610
1611 $cpuid_obj="" if ($processor eq "386");
1612
1613 $bn_obj = $bn_asm unless $bn_obj ne "";
1614 # bn-586 is the only one implementing bn_*_part_words
1615 $cflags.=" -DOPENSSL_BN_ASM_PART_WORDS" if ($bn_obj =~ /bn-586/);
1616 $cflags.=" -DOPENSSL_IA32_SSE2" if (!$no_sse2 && $bn_obj =~ /86/);
1617
1618 $cflags.=" -DOPENSSL_BN_ASM_MONT" if ($bn_obj =~ /-mont/);
1619 $cflags.=" -DOPENSSL_BN_ASM_MONT5" if ($bn_obj =~ /-mont5/);
1620 $cflags.=" -DOPENSSL_BN_ASM_GF2m" if ($bn_obj =~ /-gf2m/);
1621
1622 if ($fips)
1623         {
1624         $openssl_other_defines.="#define OPENSSL_FIPS\n";
1625         }
1626
1627 $cpuid_obj="mem_clr.o"  unless ($cpuid_obj =~ /\.o$/);
1628 $des_obj=$des_enc       unless ($des_obj =~ /\.o$/);
1629 $bf_obj=$bf_enc         unless ($bf_obj =~ /\.o$/);
1630 $cast_obj=$cast_enc     unless ($cast_obj =~ /\.o$/);
1631 $rc4_obj=$rc4_enc       unless ($rc4_obj =~ /\.o$/);
1632 $rc5_obj=$rc5_enc       unless ($rc5_obj =~ /\.o$/);
1633 if ($sha1_obj =~ /\.o$/)
1634         {
1635 #       $sha1_obj=$sha1_enc;
1636         $cflags.=" -DSHA1_ASM"   if ($sha1_obj =~ /sx86/ || $sha1_obj =~ /sha1/);
1637         $cflags.=" -DSHA256_ASM" if ($sha1_obj =~ /sha256/);
1638         $cflags.=" -DSHA512_ASM" if ($sha1_obj =~ /sha512/);
1639         if ($sha1_obj =~ /sse2/)
1640             {   if ($no_sse2)
1641                 {   $sha1_obj =~ s/\S*sse2\S+//;        }
1642                 elsif ($cflags !~ /OPENSSL_IA32_SSE2/)
1643                 {   $cflags.=" -DOPENSSL_IA32_SSE2";    }
1644             }
1645         }
1646 if ($md5_obj =~ /\.o$/)
1647         {
1648 #       $md5_obj=$md5_enc;
1649         $cflags.=" -DMD5_ASM";
1650         }
1651 if ($rmd160_obj =~ /\.o$/)
1652         {
1653 #       $rmd160_obj=$rmd160_enc;
1654         $cflags.=" -DRMD160_ASM";
1655         }
1656 if ($aes_obj =~ /\.o$/)
1657         {
1658         $cflags.=" -DAES_ASM" if ($aes_obj =~ m/\baes\-/);;
1659         # aes-ctr.o is not a real file, only indication that assembler
1660         # module implements AES_ctr32_encrypt...
1661         $cflags.=" -DAES_CTR_ASM" if ($aes_obj =~ s/\s*aes\-ctr\.o//);
1662         # aes-xts.o indicates presence of AES_xts_[en|de]crypt...
1663         $cflags.=" -DAES_XTS_ASM" if ($aes_obj =~ s/\s*aes\-xts\.o//);
1664         $aes_obj =~ s/\s*(vpaes|aesni)\-x86\.o//g if ($no_sse2);
1665         $cflags.=" -DVPAES_ASM" if ($aes_obj =~ m/vpaes/);
1666         $cflags.=" -DBSAES_ASM" if ($aes_obj =~ m/bsaes/);
1667         }
1668 else    {
1669         $aes_obj=$aes_enc;
1670         }
1671 $wp_obj="" if ($wp_obj =~ /mmx/ && $processor eq "386");
1672 if ($wp_obj =~ /\.o$/ && !$disabled{"whirlpool"})
1673         {
1674         $cflags.=" -DWHIRLPOOL_ASM";
1675         }
1676 else    {
1677         $wp_obj="wp_block.o";
1678         }
1679 $cmll_obj=$cmll_enc     unless ($cmll_obj =~ /.o$/);
1680 if ($modes_obj =~ /ghash\-/)
1681         {
1682         $cflags.=" -DGHASH_ASM";
1683         }
1684 if ($ec_obj =~ /ecp_nistz256/)
1685         {
1686         $cflags.=" -DECP_NISTZ256_ASM";
1687         }
1688
1689 # "Stringify" the C flags string.  This permits it to be made part of a string
1690 # and works as well on command lines.
1691 $cflags =~ s/([\\\"])/\\\1/g;
1692
1693 my $version = "unknown";
1694 my $version_num = "unknown";
1695 my $major = "unknown";
1696 my $minor = "unknown";
1697 my $shlib_version_number = "unknown";
1698 my $shlib_version_history = "unknown";
1699 my $shlib_major = "unknown";
1700 my $shlib_minor = "unknown";
1701
1702 open(IN,'<include/openssl/opensslv.h') || die "unable to read opensslv.h:$!\n";
1703 while (<IN>)
1704         {
1705         $version=$1 if /OPENSSL.VERSION.TEXT.*OpenSSL (\S+) /;
1706         $version_num=$1 if /OPENSSL.VERSION.NUMBER.*0x(\S+)/;
1707         $shlib_version_number=$1 if /SHLIB_VERSION_NUMBER *"([^"]+)"/;
1708         $shlib_version_history=$1 if /SHLIB_VERSION_HISTORY *"([^"]*)"/;
1709         }
1710 close(IN);
1711 if ($shlib_version_history ne "") { $shlib_version_history .= ":"; }
1712
1713 if ($version =~ /(^[0-9]*)\.([0-9\.]*)/)
1714         {
1715         $major=$1;
1716         $minor=$2;
1717         }
1718
1719 if ($shlib_version_number =~ /(^[0-9]*)\.([0-9\.]*)/)
1720         {
1721         $shlib_major=$1;
1722         $shlib_minor=$2;
1723         }
1724
1725 if ($strict_warnings)
1726         {
1727         my $wopt;
1728         die "ERROR --strict-warnings requires gcc or clang" unless ($cc =~ /gcc$/ or $cc =~ /clang$/);
1729         foreach $wopt (split /\s+/, $gcc_devteam_warn)
1730                 {
1731                 $cflags .= " $wopt" unless ($cflags =~ /$wopt/)
1732                 }
1733         }
1734
1735 open(IN,"<Makefile.org") || die "unable to read Makefile.org:$!\n";
1736 unlink("$Makefile.new") || die "unable to remove old $Makefile.new:$!\n" if -e "$Makefile.new";
1737 open(OUT,">$Makefile.new") || die "unable to create $Makefile.new:$!\n";
1738 print OUT "### Generated automatically from Makefile.org by Configure.\n\n";
1739 my $sdirs=0;
1740
1741 while (<IN>)
1742         {
1743         chomp;
1744         $sdirs = 1 if /^SDIRS=/;
1745         if ($sdirs) {
1746                 my $dir;
1747                 foreach $dir (@skip) {
1748                         s/(\s)$dir /$1/;
1749                         s/\s$dir$//;
1750                         }
1751                 }
1752         $sdirs = 0 unless /\\$/;
1753         s/fips // if (/^DIRS=/ && !$fips);
1754         s/engines // if (/^DIRS=/ && $disabled{"engine"});
1755         s/ccgost// if (/^ENGDIRS=/ && $disabled{"gost"});
1756         s/^VERSION=.*/VERSION=$version/;
1757         s/^MAJOR=.*/MAJOR=$major/;
1758         s/^MINOR=.*/MINOR=$minor/;
1759         s/^SHLIB_VERSION_NUMBER=.*/SHLIB_VERSION_NUMBER=$shlib_version_number/;
1760         s/^SHLIB_VERSION_HISTORY=.*/SHLIB_VERSION_HISTORY=$shlib_version_history/;
1761         s/^SHLIB_MAJOR=.*/SHLIB_MAJOR=$shlib_major/;
1762         s/^SHLIB_MINOR=.*/SHLIB_MINOR=$shlib_minor/;
1763         s/^SHLIB_EXT=.*/SHLIB_EXT=$shared_extension/;
1764         s/^INSTALLTOP=.*$/INSTALLTOP=$prefix/;
1765         s/^MULTILIB=.*$/MULTILIB=$multilib/;
1766         s/^OPENSSLDIR=.*$/OPENSSLDIR=$openssldir/;
1767         s/^LIBDIR=.*$/LIBDIR=$libdir/;
1768         s/^INSTALL_PREFIX=.*$/INSTALL_PREFIX=$install_prefix/;
1769         s/^PLATFORM=.*$/PLATFORM=$target/;
1770         s/^OPTIONS=.*$/OPTIONS=$options/;
1771         s/^CONFIGURE_ARGS=.*$/CONFIGURE_ARGS=$argvstring/;
1772         if ($cross_compile_prefix)
1773                 {
1774                 s/^CC=.*$/CROSS_COMPILE= $cross_compile_prefix\nCC= \$\(CROSS_COMPILE\)$cc/;
1775                 s/^AR=\s*/AR= \$\(CROSS_COMPILE\)/;
1776                 s/^NM=\s*/NM= \$\(CROSS_COMPILE\)/;
1777                 s/^RANLIB=\s*/RANLIB= \$\(CROSS_COMPILE\)/;
1778                 s/^MAKEDEPPROG=.*$/MAKEDEPPROG= \$\(CROSS_COMPILE\)$cc/ if $cc eq "gcc";
1779                 }
1780         else    {
1781                 s/^CC=.*$/CC= $cc/;
1782                 s/^AR=\s*ar/AR= $ar/;
1783                 s/^RANLIB=.*/RANLIB= $ranlib/;
1784                 s/^MAKEDEPPROG=.*$/MAKEDEPPROG= $cc/ if $cc eq "gcc" || ($cc eq 'cc' && $target =~ /darwin/);
1785                 }
1786         s/^CFLAG=.*$/CFLAG= $cflags/;
1787         s/^DEPFLAG=.*$/DEPFLAG=$depflags/;
1788         s/^PEX_LIBS=.*$/PEX_LIBS= $prelflags/;
1789         s/^EX_LIBS=.*$/EX_LIBS= $lflags/;
1790         s/^EXE_EXT=.*$/EXE_EXT= $exe_ext/;
1791         s/^CPUID_OBJ=.*$/CPUID_OBJ= $cpuid_obj/;
1792         s/^BN_ASM=.*$/BN_ASM= $bn_obj/;
1793         s/^EC_ASM=.*$/EC_ASM= $ec_obj/;
1794         s/^DES_ENC=.*$/DES_ENC= $des_obj/;
1795         s/^AES_ENC=.*$/AES_ENC= $aes_obj/;
1796         s/^BF_ENC=.*$/BF_ENC= $bf_obj/;
1797         s/^CAST_ENC=.*$/CAST_ENC= $cast_obj/;
1798         s/^RC4_ENC=.*$/RC4_ENC= $rc4_obj/;
1799         s/^RC5_ENC=.*$/RC5_ENC= $rc5_obj/;
1800         s/^MD5_ASM_OBJ=.*$/MD5_ASM_OBJ= $md5_obj/;
1801         s/^SHA1_ASM_OBJ=.*$/SHA1_ASM_OBJ= $sha1_obj/;
1802         s/^RMD160_ASM_OBJ=.*$/RMD160_ASM_OBJ= $rmd160_obj/;
1803         s/^WP_ASM_OBJ=.*$/WP_ASM_OBJ= $wp_obj/;
1804         s/^CMLL_ENC=.*$/CMLL_ENC= $cmll_obj/;
1805         s/^MODES_ASM_OBJ.=*$/MODES_ASM_OBJ= $modes_obj/;
1806         s/^ENGINES_ASM_OBJ.=*$/ENGINES_ASM_OBJ= $engines_obj/;
1807         s/^PERLASM_SCHEME=.*$/PERLASM_SCHEME= $perlasm_scheme/;
1808         s/^PROCESSOR=.*/PROCESSOR= $processor/;
1809         s/^ARFLAGS=.*/ARFLAGS= $arflags/;
1810         s/^PERL=.*/PERL= $perl/;
1811         s/^KRB5_INCLUDES=.*/KRB5_INCLUDES=$withargs{"krb5-include"}/;
1812         s/^LIBKRB5=.*/LIBKRB5=$withargs{"krb5-lib"}/;
1813         s/^LIBZLIB=.*/LIBZLIB=$withargs{"zlib-lib"}/;
1814         s/^ZLIB_INCLUDE=.*/ZLIB_INCLUDE=$withargs{"zlib-include"}/;
1815         s/^FIPSLIBDIR=.*/FIPSLIBDIR=$fipslibdir/;
1816         s/^FIPSCANLIB=.*/FIPSCANLIB=libcrypto/ if $fips;
1817         s/^SHARED_FIPS=.*/SHARED_FIPS=/;
1818         s/^SHLIBDIRS=.*/SHLIBDIRS= crypto ssl/;
1819         s/^BASEADDR=.*/BASEADDR=$baseaddr/;
1820         s/^SHLIB_TARGET=.*/SHLIB_TARGET=$shared_target/;
1821         s/^SHLIB_MARK=.*/SHLIB_MARK=$shared_mark/;
1822         s/^SHARED_LIBS=.*/SHARED_LIBS=\$(SHARED_CRYPTO) \$(SHARED_SSL)/ if (!$no_shared);
1823         if ($shared_extension ne "" && $shared_extension =~ /^\.s([ol])\.[^\.]*$/)
1824                 {
1825                 my $sotmp = $1;
1826                 s/^SHARED_LIBS_LINK_EXTS=.*/SHARED_LIBS_LINK_EXTS=.s$sotmp/;
1827                 }
1828         elsif ($shared_extension ne "" && $shared_extension =~ /^\.[^\.]*\.dylib$/)
1829                 {
1830                 s/^SHARED_LIBS_LINK_EXTS=.*/SHARED_LIBS_LINK_EXTS=.dylib/;
1831                 }
1832         elsif ($shared_extension ne "" && $shared_extension =~ /^\.s([ol])\.[^\.]*\.[^\.]*$/)
1833                 {
1834                 my $sotmp = $1;
1835                 s/^SHARED_LIBS_LINK_EXTS=.*/SHARED_LIBS_LINK_EXTS=.s$sotmp.\$(SHLIB_MAJOR) .s$sotmp/;
1836                 }
1837         elsif ($shared_extension ne "" && $shared_extension =~ /^\.[^\.]*\.[^\.]*\.dylib$/)
1838                 {
1839                 s/^SHARED_LIBS_LINK_EXTS=.*/SHARED_LIBS_LINK_EXTS=.\$(SHLIB_MAJOR).dylib .dylib/;
1840                 }
1841         s/^SHARED_LDFLAGS=.*/SHARED_LDFLAGS=$shared_ldflag/;
1842         print OUT $_."\n";
1843         }
1844 close(IN);
1845 close(OUT);
1846 rename($Makefile,"$Makefile.bak") || die "unable to rename $Makefile\n" if -e $Makefile;
1847 rename("$Makefile.new",$Makefile) || die "unable to rename $Makefile.new\n";
1848
1849 print "CC            =$cc\n";
1850 print "CFLAG         =$cflags\n";
1851 print "EX_LIBS       =$lflags\n";
1852 print "CPUID_OBJ     =$cpuid_obj\n";
1853 print "BN_ASM        =$bn_obj\n";
1854 print "EC_ASM        =$ec_obj\n";
1855 print "DES_ENC       =$des_obj\n";
1856 print "AES_ENC       =$aes_obj\n";
1857 print "BF_ENC        =$bf_obj\n";
1858 print "CAST_ENC      =$cast_obj\n";
1859 print "RC4_ENC       =$rc4_obj\n";
1860 print "RC5_ENC       =$rc5_obj\n";
1861 print "MD5_OBJ_ASM   =$md5_obj\n";
1862 print "SHA1_OBJ_ASM  =$sha1_obj\n";
1863 print "RMD160_OBJ_ASM=$rmd160_obj\n";
1864 print "CMLL_ENC      =$cmll_obj\n";
1865 print "MODES_OBJ     =$modes_obj\n";
1866 print "ENGINES_OBJ   =$engines_obj\n";
1867 print "PROCESSOR     =$processor\n";
1868 print "RANLIB        =$ranlib\n";
1869 print "ARFLAGS       =$arflags\n";
1870 print "PERL          =$perl\n";
1871 print "KRB5_INCLUDES =",$withargs{"krb5-include"},"\n"
1872         if $withargs{"krb5-include"} ne "";
1873
1874 my $des_ptr=0;
1875 my $des_risc1=0;
1876 my $des_risc2=0;
1877 my $des_unroll=0;
1878 my $bn_ll=0;
1879 my $def_int=2;
1880 my $rc4_int=$def_int;
1881 my $md2_int=$def_int;
1882 my $idea_int=$def_int;
1883 my $rc2_int=$def_int;
1884 my $rc4_idx=0;
1885 my $rc4_chunk=0;
1886 my $bf_ptr=0;
1887 my @type=("char","short","int","long");
1888 my ($b64l,$b64,$b32,$b16,$b8)=(0,0,1,0,0);
1889 my $export_var_as_fn=0;
1890
1891 my $des_int;
1892
1893 foreach (sort split(/\s+/,$bn_ops))
1894         {
1895         $des_ptr=1 if /DES_PTR/;
1896         $des_risc1=1 if /DES_RISC1/;
1897         $des_risc2=1 if /DES_RISC2/;
1898         $des_unroll=1 if /DES_UNROLL/;
1899         $des_int=1 if /DES_INT/;
1900         $bn_ll=1 if /BN_LLONG/;
1901         $rc4_int=0 if /RC4_CHAR/;
1902         $rc4_int=3 if /RC4_LONG/;
1903         $rc4_idx=1 if /RC4_INDEX/;
1904         $rc4_chunk=1 if /RC4_CHUNK/;
1905         $rc4_chunk=2 if /RC4_CHUNK_LL/;
1906         $md2_int=0 if /MD2_CHAR/;
1907         $md2_int=3 if /MD2_LONG/;
1908         $idea_int=1 if /IDEA_SHORT/;
1909         $idea_int=3 if /IDEA_LONG/;
1910         $rc2_int=1 if /RC2_SHORT/;
1911         $rc2_int=3 if /RC2_LONG/;
1912         $bf_ptr=1 if $_ eq "BF_PTR";
1913         $bf_ptr=2 if $_ eq "BF_PTR2";
1914         ($b64l,$b64,$b32,$b16,$b8)=(0,1,0,0,0) if /SIXTY_FOUR_BIT/;
1915         ($b64l,$b64,$b32,$b16,$b8)=(1,0,0,0,0) if /SIXTY_FOUR_BIT_LONG/;
1916         ($b64l,$b64,$b32,$b16,$b8)=(0,0,1,0,0) if /THIRTY_TWO_BIT/;
1917         ($b64l,$b64,$b32,$b16,$b8)=(0,0,0,1,0) if /SIXTEEN_BIT/;
1918         ($b64l,$b64,$b32,$b16,$b8)=(0,0,0,0,1) if /EIGHT_BIT/;
1919         $export_var_as_fn=1 if /EXPORT_VAR_AS_FN/;
1920         }
1921
1922 open(IN,'<crypto/opensslconf.h.in') || die "unable to read crypto/opensslconf.h.in:$!\n";
1923 unlink("include/openssl/opensslconf.h.new") || die "unable to remove old include/openssl/opensslconf.h.new:$!\n" if -e "include/openssl/opensslconf.h.new";
1924 open(OUT,'>include/openssl/opensslconf.h.new') || die "unable to create include/openssl/opensslconf.h.new:$!\n";
1925 print OUT "/* opensslconf.h */\n";
1926 print OUT "/* WARNING: Generated automatically from opensslconf.h.in by Configure. */\n\n";
1927
1928 print OUT "#ifdef  __cplusplus\n";
1929 print OUT "extern \"C\" {\n";
1930 print OUT "#endif\n";
1931 print OUT "/* OpenSSL was configured with the following options: */\n";
1932 my $openssl_algorithm_defines_trans = $openssl_algorithm_defines;
1933 $openssl_experimental_defines =~ s/^\s*#\s*define\s+OPENSSL_NO_(.*)/#ifndef OPENSSL_EXPERIMENTAL_$1\n# ifndef OPENSSL_NO_$1\n#  define OPENSSL_NO_$1\n# endif\n#endif/mg;
1934 $openssl_algorithm_defines_trans =~ s/^\s*#\s*define\s+OPENSSL_(.*)/# if defined(OPENSSL_$1) \&\& !defined($1)\n#  define $1\n# endif/mg;
1935 $openssl_algorithm_defines =~ s/^\s*#\s*define\s+(.*)/#ifndef $1\n# define $1\n#endif/mg;
1936 $openssl_algorithm_defines = "   /* no ciphers excluded */\n" if $openssl_algorithm_defines eq "";
1937 $openssl_thread_defines =~ s/^\s*#\s*define\s+(.*)/#ifndef $1\n# define $1\n#endif/mg;
1938 $openssl_sys_defines =~ s/^\s*#\s*define\s+(.*)/#ifndef $1\n# define $1\n#endif/mg;
1939 $openssl_other_defines =~ s/^\s*#\s*define\s+(.*)/#ifndef $1\n# define $1\n#endif/mg;
1940 print OUT $openssl_sys_defines;
1941 print OUT "#ifndef OPENSSL_DOING_MAKEDEPEND\n\n";
1942 print OUT $openssl_experimental_defines;
1943 print OUT "\n";
1944 print OUT $openssl_algorithm_defines;
1945 print OUT "\n#endif /* OPENSSL_DOING_MAKEDEPEND */\n\n";
1946 print OUT $openssl_thread_defines;
1947 print OUT $openssl_other_defines,"\n";
1948
1949 print OUT "/* The OPENSSL_NO_* macros are also defined as NO_* if the application\n";
1950 print OUT "   asks for it.  This is a transient feature that is provided for those\n";
1951 print OUT "   who haven't had the time to do the appropriate changes in their\n";
1952 print OUT "   applications.  */\n";
1953 print OUT "#ifdef OPENSSL_ALGORITHM_DEFINES\n";
1954 print OUT $openssl_algorithm_defines_trans;
1955 print OUT "#endif\n\n";
1956
1957 print OUT "#define OPENSSL_CPUID_OBJ\n\n" if ($cpuid_obj ne "mem_clr.o");
1958
1959 while (<IN>)
1960         {
1961         if      (/^#define\s+OPENSSLDIR/)
1962                 {
1963                 my $foo = $openssldir;
1964                 $foo =~ s/\\/\\\\/g;
1965                 print OUT "#define OPENSSLDIR \"$foo\"\n";
1966                 }
1967         elsif   (/^#define\s+ENGINESDIR/)
1968                 {
1969                 my $foo = "$prefix/$libdir/engines";
1970                 $foo =~ s/\\/\\\\/g;
1971                 print OUT "#define ENGINESDIR \"$foo\"\n";
1972                 }
1973         elsif   (/^#((define)|(undef))\s+OPENSSL_EXPORT_VAR_AS_FUNCTION/)
1974                 { printf OUT "#undef OPENSSL_EXPORT_VAR_AS_FUNCTION\n"
1975                         if $export_var_as_fn;
1976                   printf OUT "#%s OPENSSL_EXPORT_VAR_AS_FUNCTION\n",
1977                         ($export_var_as_fn)?"define":"undef"; }
1978         elsif   (/^#define\s+OPENSSL_UNISTD/)
1979                 {
1980                 $unistd = "<unistd.h>" if $unistd eq "";
1981                 print OUT "#define OPENSSL_UNISTD $unistd\n";
1982                 }
1983         elsif   (/^#((define)|(undef))\s+SIXTY_FOUR_BIT_LONG/)
1984                 { printf OUT "#%s SIXTY_FOUR_BIT_LONG\n",($b64l)?"define":"undef"; }
1985         elsif   (/^#((define)|(undef))\s+SIXTY_FOUR_BIT/)
1986                 { printf OUT "#%s SIXTY_FOUR_BIT\n",($b64)?"define":"undef"; }
1987         elsif   (/^#((define)|(undef))\s+THIRTY_TWO_BIT/)
1988                 { printf OUT "#%s THIRTY_TWO_BIT\n",($b32)?"define":"undef"; }
1989         elsif   (/^#((define)|(undef))\s+SIXTEEN_BIT/)
1990                 { printf OUT "#%s SIXTEEN_BIT\n",($b16)?"define":"undef"; }
1991         elsif   (/^#((define)|(undef))\s+EIGHT_BIT/)
1992                 { printf OUT "#%s EIGHT_BIT\n",($b8)?"define":"undef"; }
1993         elsif   (/^#((define)|(undef))\s+BN_LLONG\s*$/)
1994                 { printf OUT "#%s BN_LLONG\n",($bn_ll)?"define":"undef"; }
1995         elsif   (/^\#define\s+DES_LONG\s+.*/)
1996                 { printf OUT "#define DES_LONG unsigned %s\n",
1997                         ($des_int)?'int':'long'; }
1998         elsif   (/^\#(define|undef)\s+DES_PTR/)
1999                 { printf OUT "#%s DES_PTR\n",($des_ptr)?'define':'undef'; }
2000         elsif   (/^\#(define|undef)\s+DES_RISC1/)
2001                 { printf OUT "#%s DES_RISC1\n",($des_risc1)?'define':'undef'; }
2002         elsif   (/^\#(define|undef)\s+DES_RISC2/)
2003                 { printf OUT "#%s DES_RISC2\n",($des_risc2)?'define':'undef'; }
2004         elsif   (/^\#(define|undef)\s+DES_UNROLL/)
2005                 { printf OUT "#%s DES_UNROLL\n",($des_unroll)?'define':'undef'; }
2006         elsif   (/^#define\s+RC4_INT\s/)
2007                 { printf OUT "#define RC4_INT unsigned %s\n",$type[$rc4_int]; }
2008         elsif   (/^#undef\s+RC4_CHUNK/)
2009                 {
2010                 printf OUT "#undef RC4_CHUNK\n" if $rc4_chunk==0;
2011                 printf OUT "#define RC4_CHUNK unsigned long\n" if $rc4_chunk==1;
2012                 printf OUT "#define RC4_CHUNK unsigned long long\n" if $rc4_chunk==2;
2013                 }
2014         elsif   (/^#((define)|(undef))\s+RC4_INDEX/)
2015                 { printf OUT "#%s RC4_INDEX\n",($rc4_idx)?"define":"undef"; }
2016         elsif (/^#(define|undef)\s+I386_ONLY/)
2017                 { printf OUT "#%s I386_ONLY\n", ($processor eq "386")?
2018                         "define":"undef"; }
2019         elsif   (/^#define\s+MD2_INT\s/)
2020                 { printf OUT "#define MD2_INT unsigned %s\n",$type[$md2_int]; }
2021         elsif   (/^#define\s+IDEA_INT\s/)
2022                 {printf OUT "#define IDEA_INT unsigned %s\n",$type[$idea_int];}
2023         elsif   (/^#define\s+RC2_INT\s/)
2024                 {printf OUT "#define RC2_INT unsigned %s\n",$type[$rc2_int];}
2025         elsif (/^#(define|undef)\s+BF_PTR/)
2026                 {
2027                 printf OUT "#undef BF_PTR\n" if $bf_ptr == 0;
2028                 printf OUT "#define BF_PTR\n" if $bf_ptr == 1;
2029                 printf OUT "#define BF_PTR2\n" if $bf_ptr == 2;
2030                 }
2031         else
2032                 { print OUT $_; }
2033         }
2034 close(IN);
2035 print OUT "#ifdef  __cplusplus\n";
2036 print OUT "}\n";
2037 print OUT "#endif\n";
2038 close(OUT);
2039 rename("include/openssl/opensslconf.h","include/openssl/opensslconf.h.bak") || die "unable to rename include/openssl/opensslconf.h\n" if -e "include/openssl/opensslconf.h";
2040 rename("include/openssl/opensslconf.h.new","include/openssl/opensslconf.h") || die "unable to rename include/openssl/opensslconf.h.new\n";
2041
2042
2043 # Fix the date
2044
2045 print "SIXTY_FOUR_BIT_LONG mode\n" if $b64l;
2046 print "SIXTY_FOUR_BIT mode\n" if $b64;
2047 print "THIRTY_TWO_BIT mode\n" if $b32;
2048 print "SIXTEEN_BIT mode\n" if $b16;
2049 print "EIGHT_BIT mode\n" if $b8;
2050 print "DES_PTR used\n" if $des_ptr;
2051 print "DES_RISC1 used\n" if $des_risc1;
2052 print "DES_RISC2 used\n" if $des_risc2;
2053 print "DES_UNROLL used\n" if $des_unroll;
2054 print "DES_INT used\n" if $des_int;
2055 print "BN_LLONG mode\n" if $bn_ll;
2056 print "RC4 uses u$type[$rc4_int]\n" if $rc4_int != $def_int;
2057 print "RC4_INDEX mode\n" if $rc4_idx;
2058 print "RC4_CHUNK is undefined\n" if $rc4_chunk==0;
2059 print "RC4_CHUNK is unsigned long\n" if $rc4_chunk==1;
2060 print "RC4_CHUNK is unsigned long long\n" if $rc4_chunk==2;
2061 print "MD2 uses u$type[$md2_int]\n" if $md2_int != $def_int;
2062 print "IDEA uses u$type[$idea_int]\n" if $idea_int != $def_int;
2063 print "RC2 uses u$type[$rc2_int]\n" if $rc2_int != $def_int;
2064 print "BF_PTR used\n" if $bf_ptr == 1;
2065 print "BF_PTR2 used\n" if $bf_ptr == 2;
2066
2067 if($IsMK1MF) {
2068         open (OUT,">crypto/buildinf.h") || die "Can't open buildinf.h";
2069         printf OUT <<EOF;
2070 #ifndef MK1MF_BUILD
2071   /* auto-generated by Configure for crypto/cversion.c:
2072    * for Unix builds, crypto/Makefile.ssl generates functional definitions;
2073    * Windows builds (and other mk1mf builds) compile cversion.c with
2074    * -DMK1MF_BUILD and use definitions added to this file by util/mk1mf.pl. */
2075   #error "Windows builds (PLATFORM=$target) use mk1mf.pl-created Makefiles"
2076 #endif
2077 EOF
2078         close(OUT);
2079 } else {
2080         my $make_command = "$make PERL=\'$perl\'";
2081         my $make_targets = "";
2082         $make_targets .= " depend" if $depflags ne $default_depflags && $make_depend;
2083         (system $make_command.$make_targets) == 0 or die "make $make_targets failed"
2084                 if $make_targets ne "";
2085         if ( $perl =~ m@^/@) {
2086             &dofile("tools/c_rehash",$perl,'^#!/', '#!%s','^my \$dir;$', 'my $dir = "' . $openssldir . '";', '^my \$prefix;$', 'my $prefix = "' . $prefix . '";');
2087             &dofile("apps/CA.pl",$perl,'^#!/', '#!%s');
2088         } else {
2089             # No path for Perl known ...
2090             &dofile("tools/c_rehash",'/usr/local/bin/perl','^#!/', '#!%s','^my \$dir;$', 'my $dir = "' . $openssldir . '";',  '^my \$prefix;$', 'my $prefix = "' . $prefix . '";');
2091             &dofile("apps/CA.pl",'/usr/local/bin/perl','^#!/', '#!%s');
2092         }
2093         if ($depflags ne $default_depflags && !$make_depend) {
2094                 print <<EOF;
2095
2096 Since you've disabled or enabled at least one algorithm, you need to do
2097 the following before building:
2098
2099         make depend
2100 EOF
2101         }
2102 }
2103
2104 # create the ms/version32.rc file if needed
2105 if ($IsMK1MF && ($target !~ /^netware/)) {
2106         my ($v1, $v2, $v3, $v4);
2107         if ($version_num =~ /(^[0-9a-f]{1})([0-9a-f]{2})([0-9a-f]{2})([0-9a-f]{2})/i) {
2108                 $v1=hex $1;
2109                 $v2=hex $2;
2110                 $v3=hex $3;
2111                 $v4=hex $4;
2112         }
2113         open (OUT,">ms/version32.rc") || die "Can't open ms/version32.rc";
2114         print OUT <<EOF;
2115 #include <winver.h>
2116
2117 LANGUAGE 0x09,0x01
2118
2119 1 VERSIONINFO
2120   FILEVERSION $v1,$v2,$v3,$v4
2121   PRODUCTVERSION $v1,$v2,$v3,$v4
2122   FILEFLAGSMASK 0x3fL
2123 #ifdef _DEBUG
2124   FILEFLAGS 0x01L
2125 #else
2126   FILEFLAGS 0x00L
2127 #endif
2128   FILEOS VOS__WINDOWS32
2129   FILETYPE VFT_DLL
2130   FILESUBTYPE 0x0L
2131 BEGIN
2132     BLOCK "StringFileInfo"
2133     BEGIN
2134         BLOCK "040904b0"
2135         BEGIN
2136             // Required:
2137             VALUE "CompanyName", "The OpenSSL Project, http://www.openssl.org/\\0"
2138             VALUE "FileDescription", "OpenSSL Shared Library\\0"
2139             VALUE "FileVersion", "$version\\0"
2140 #if defined(CRYPTO)
2141             VALUE "InternalName", "libeay32\\0"
2142             VALUE "OriginalFilename", "libeay32.dll\\0"
2143 #elif defined(SSL)
2144             VALUE "InternalName", "ssleay32\\0"
2145             VALUE "OriginalFilename", "ssleay32.dll\\0"
2146 #endif
2147             VALUE "ProductName", "The OpenSSL Toolkit\\0"
2148             VALUE "ProductVersion", "$version\\0"
2149             // Optional:
2150             //VALUE "Comments", "\\0"
2151             VALUE "LegalCopyright", "Copyright Â© 1998-2005 The OpenSSL Project. Copyright Â© 1995-1998 Eric A. Young, Tim J. Hudson. All rights reserved.\\0"
2152             //VALUE "LegalTrademarks", "\\0"
2153             //VALUE "PrivateBuild", "\\0"
2154             //VALUE "SpecialBuild", "\\0"
2155         END
2156     END
2157     BLOCK "VarFileInfo"
2158     BEGIN
2159         VALUE "Translation", 0x409, 0x4b0
2160     END
2161 END
2162 EOF
2163         close(OUT);
2164   }
2165
2166 print <<EOF;
2167
2168 Configured for $target.
2169 EOF
2170
2171 print <<\EOF if (!$no_threads && !$threads);
2172
2173 The library could not be configured for supporting multi-threaded
2174 applications as the compiler options required on this system are not known.
2175 See file INSTALL for details if you need multi-threading.
2176 EOF
2177
2178 print <<\EOF if ($no_shared_warn);
2179
2180 You gave the option 'shared'.  Normally, that would give you shared libraries.
2181 Unfortunately, the OpenSSL configuration doesn't include shared library support
2182 for this platform yet, so it will pretend you gave the option 'no-shared'.  If
2183 you can inform the developpers (openssl-dev\@openssl.org) how to support shared
2184 libraries on this platform, they will at least look at it and try their best
2185 (but please first make sure you have tried with a current version of OpenSSL).
2186 EOF
2187
2188 exit(0);
2189
2190 sub usage
2191         {
2192         print STDERR $usage;
2193         print STDERR "\npick os/compiler from:\n";
2194         my $j=0;
2195         my $i;
2196         my $k=0;
2197         foreach $i (sort keys %table)
2198                 {
2199                 next if $i =~ /^debug/;
2200                 $k += length($i) + 1;
2201                 if ($k > 78)
2202                         {
2203                         print STDERR "\n";
2204                         $k=length($i);
2205                         }
2206                 print STDERR $i . " ";
2207                 }
2208         foreach $i (sort keys %table)
2209                 {
2210                 next if $i !~ /^debug/;
2211                 $k += length($i) + 1;
2212                 if ($k > 78)
2213                         {
2214                         print STDERR "\n";
2215                         $k=length($i);
2216                         }
2217                 print STDERR $i . " ";
2218                 }
2219         print STDERR "\n\nNOTE: If in doubt, on Unix-ish systems use './config'.\n";
2220         exit(1);
2221         }
2222
2223 sub which
2224         {
2225         my($name)=@_;
2226         my $path;
2227         foreach $path (split /:/, $ENV{PATH})
2228                 {
2229                 if (-f "$path/$name$exe_ext" and -x _)
2230                         {
2231                         return "$path/$name$exe_ext" unless ($name eq "perl" and
2232                          system("$path/$name$exe_ext -e " . '\'exit($]<5.0);\''));
2233                         }
2234                 }
2235         }
2236
2237 sub dofile
2238         {
2239         my $f; my $p; my %m; my @a; my $k; my $ff;
2240         ($f,$p,%m)=@_;
2241
2242         open(IN,"<$f.in") || open(IN,"<$f") || die "unable to open $f:$!\n";
2243         @a=<IN>;
2244         close(IN);
2245         foreach $k (keys %m)
2246                 {
2247                 grep(/$k/ && ($_=sprintf($m{$k}."\n",$p)),@a);
2248                 }
2249         open(OUT,">$f.new") || die "unable to open $f.new:$!\n";
2250         print OUT @a;
2251         close(OUT);
2252         rename($f,"$f.bak") || die "unable to rename $f\n" if -e $f;
2253         rename("$f.new",$f) || die "unable to rename $f.new\n";
2254         }
2255
2256 sub print_table_entry
2257         {
2258         my $target = shift;
2259         my $type = shift;
2260
2261         # Don't print the templates
2262         return if $table{$target}->{template};
2263
2264         if ($type eq "TABLE") {
2265             print <<EOF
2266
2267 *** $target
2268 \$cc           = $table{$target}->{cc}
2269 \$cflags       = $table{$target}->{cflags}
2270 \$debug_cflags   = $table{$target}->{debug_cflags}
2271 \$release_cflags = $table{$target}->{release_cflags}
2272 \$unistd       = $table{$target}->{unistd}
2273 \$thread_cflag = $table{$target}->{thread_cflag}
2274 \$sys_id       = $table{$target}->{sys_id}
2275 \$lflags       = $table{$target}->{lflags}
2276 \$debug_lflags   = $table{$target}->{debug_lflags}
2277 \$release_lflags = $table{$target}->{release_lflags}
2278 \$bn_ops       = $table{$target}->{bn_ops}
2279 \$cpuid_obj    = $table{$target}->{cpuid_obj}
2280 \$bn_obj       = $table{$target}->{bn_obj}
2281 \$ec_obj       = $table{$target}->{ec_obj}
2282 \$des_obj      = $table{$target}->{des_obj}
2283 \$aes_obj      = $table{$target}->{aes_obj}
2284 \$bf_obj       = $table{$target}->{bf_obj}
2285 \$md5_obj      = $table{$target}->{md5_obj}
2286 \$sha1_obj     = $table{$target}->{sha1_obj}
2287 \$cast_obj     = $table{$target}->{cast_obj}
2288 \$rc4_obj      = $table{$target}->{rc4_obj}
2289 \$rmd160_obj   = $table{$target}->{rmd160_obj}
2290 \$rc5_obj      = $table{$target}->{rc5_obj}
2291 \$wp_obj       = $table{$target}->{wp_obj}
2292 \$cmll_obj     = $table{$target}->{cmll_obj}
2293 \$modes_obj    = $table{$target}->{modes_obj}
2294 \$engines_obj  = $table{$target}->{engines_obj}
2295 \$perlasm_scheme = $table{$target}->{perlasm_scheme}
2296 \$dso_scheme   = $table{$target}->{dso_scheme}
2297 \$shared_target= $table{$target}->{shared_target}
2298 \$shared_cflag = $table{$target}->{shared_cflag}
2299 \$shared_ldflag = $table{$target}->{shared_ldflag}
2300 \$shared_extension = $table{$target}->{shared_extension}
2301 \$ranlib       = $table{$target}->{ranlib}
2302 \$arflags      = $table{$target}->{arflags}
2303 \$multilib     = $table{$target}->{multilib}
2304 EOF
2305         } elsif ($type eq "HASH") {
2306             my @sequence = (
2307                 "cc",
2308                 "cflags",
2309                 "debug_cflags",
2310                 "release_cflags",
2311                 "unistd",
2312                 "thread_cflag",
2313                 "sys_id",
2314                 "lflags",
2315                 "debug_lflags",
2316                 "release_lflags",
2317                 "bn_ops",
2318                 "cpuid_obj",
2319                 "bn_obj",
2320                 "ec_obj",
2321                 "des_obj",
2322                 "aes_obj",
2323                 "bf_obj",
2324                 "md5_obj",
2325                 "sha1_obj",
2326                 "cast_obj",
2327                 "rc4_obj",
2328                 "rmd160_obj",
2329                 "rc5_obj",
2330                 "wp_obj",
2331                 "cmll_obj",
2332                 "modes_obj",
2333                 "engines_obj",
2334                 "perlasm_scheme",
2335                 "dso_scheme",
2336                 "shared_target",
2337                 "shared_cflag",
2338                 "shared_ldflag",
2339                 "shared_extension",
2340                 "ranlib",
2341                 "arflags",
2342                 "multilib",
2343                 );
2344             my $largest =
2345                 length((sort { length($a) <=> length($b) } @sequence)[-1]);
2346             print "    '$target' => {\n";
2347             foreach (@sequence) {
2348                 if ($table{$target}->{$_}) {
2349                     print "      '",$_,"'"," " x ($largest - length($_))," => '",$table{$target}->{$_},"',\n";
2350                 }
2351             }
2352             print "    },\n";
2353         }
2354         }
2355
2356 sub test_sanity
2357         {
2358         my $errorcnt = 0;
2359
2360         print STDERR "=" x 70, "\n";
2361         print STDERR "=== SANITY TESTING!\n";
2362         print STDERR "=== No configuration will be done, all other arguments will be ignored!\n";
2363         print STDERR "=" x 70, "\n";
2364
2365         foreach $target (sort keys %table)
2366                 {
2367                 my $pre_dso_scheme = "perlasm_scheme";
2368                 my $dso_scheme = "dso_scheme";
2369                 my $post_dso_scheme = "shared_target";
2370
2371
2372                 if ($table{$target}->{$pre_dso_scheme} =~ /^(beos|dl|dlfcn|win32|vms)$/)
2373                         {
2374                         $errorcnt++;
2375                         print STDERR "SANITY ERROR: '$target' has the dso_scheme values\n";
2376                         print STDERR "              in the previous field\n";
2377                         }
2378                 elsif ($table{$target}->{$post_dso_scheme} =~ /^(beos|dl|dlfcn|win32|vms)$/)
2379                         {
2380                         $errorcnt++;
2381                         print STDERR "SANITY ERROR: '$target' has the dso_scheme values\n";
2382                         print STDERR "              in the following field\n";
2383                         }
2384                 elsif ($table{$target}->{$dso_scheme} !~ /^(beos|dl|dlfcn|win32|vms|)$/)
2385                         {
2386                         $errorcnt++;
2387                         print STDERR "SANITY ERROR: '$target' has the dso_scheme field = ",$table{$target}->{$dso_scheme},"\n";
2388                         print STDERR "              valid values are 'beos', 'dl', 'dlfcn', 'win32' and 'vms'\n";
2389                         }
2390                 }
2391         print STDERR "No sanity errors detected!\n" if $errorcnt == 0;
2392         return $errorcnt;
2393         }