]> git.ipfire.org Git - thirdparty/openssl.git/blame - Configure
Bug fix.
[thirdparty/openssl.git] / Configure
CommitLineData
a4ed5532 1:
4f9b306c 2eval 'exec perl -S $0 ${1+"$@"}'
a4ed5532
RE
3 if $running_under_some_shell;
4##
5## Configure -- OpenSSL source tree configuration script
6##
1641cb60 7
448cb8b5 8require 5.000;
1641cb60
BL
9use strict;
10
22a4f969 11# see INSTALL for instructions.
462ba4f6 12
5f8d5c96 13my $usage="Usage: Configure [-Dxxx] [-lxxx] [-Lxxx] [-fxxx] [-Kxxx] [rsaref] [no-threads] [no-asm] [386] [--prefix=DIR] [--openssldir=OPENSSLDIR] os/compiler[:flags]\n";
462ba4f6 14
434c5dd3 15# Options:
462ba4f6
UM
16# --openssldir install OpenSSL in OPENSSLDIR (Default: DIR/ssl if the
17# --prefix option is given; /usr/local/ssl otherwise)
18# --prefix prefix for the OpenSSL include, lib and bin directories
19# (Default: the OPENSSLDIR directory)
22a4f969 20# rsaref use RSAref
5f8d5c96
BM
21# [no-]threads [don't] try to create a library that is suitable for
22# multithreaded applications (default is "threads" if we
23# know how to do it)
a723979d 24# no-asm do not use assembler
22a4f969 25# 386 generate 80386 code
79df9d62 26# no-<cipher> build without specified algorithm (rsa, idea, rc5, ...)
434c5dd3
UM
27# -D, -L, -l, -f, -K: compiler options are passed through
28#
d02b48c6
RE
29# DES_PTR use pointer lookup vs arrays in the DES in crypto/des/des_locl.h
30# DES_RISC1 use different DES_ENCRYPT macro that helps reduce register
31# dependancies but needs to more registers, good for RISC CPU's
32# DES_RISC2 A different RISC variant.
33# DES_UNROLL unroll the inner DES loop, sometimes helps, somtimes hinders.
34# DES_INT use 'int' instead of 'long' for DES_LONG in crypto/des/des.h
35# This is used on the DEC Alpha where long is 8 bytes
36# and int is 4
37# BN_LLONG use the type 'long long' in crypto/bn/bn.h
58964a49
RE
38# MD2_CHAR use 'char' instead of 'int' for MD2_INT in crypto/md2/md2.h
39# MD2_LONG use 'long' instead of 'int' for MD2_INT in crypto/md2/md2.h
d02b48c6
RE
40# IDEA_SHORT use 'short' instead of 'int' for IDEA_INT in crypto/idea/idea.h
41# IDEA_LONG use 'long' instead of 'int' for IDEA_INT in crypto/idea/idea.h
42# RC2_SHORT use 'short' instead of 'int' for RC2_INT in crypto/rc2/rc2.h
43# RC2_LONG use 'long' instead of 'int' for RC2_INT in crypto/rc2/rc2.h
44# RC4_CHAR use 'char' instead of 'int' for RC4_INT in crypto/rc4/rc4.h
45# RC4_LONG use 'long' instead of 'int' for RC4_INT in crypto/rc4/rc4.h
58964a49 46# RC4_INDEX define RC4_INDEX in crypto/rc4/rc4_locl.h. This turns on
d02b48c6
RE
47# array lookups instead of pointer use.
48# BF_PTR use 'pointer arithmatic' for Blowfish (unsafe on Alpha).
995e79e3 49# BF_PTR2 intel specific version (generic version is more efficient).
58964a49
RE
50# MD5_ASM use some extra md5 assember,
51# SHA1_ASM use some extra sha1 assember, must define L_ENDIAN for x86
52# RMD160_ASM use some extra ripemd160 assember,
d02b48c6 53
1641cb60 54my $x86_gcc_des="DES_PTR DES_RISC1 DES_UNROLL";
d02b48c6
RE
55
56# MD2_CHAR slags pentium pros
995e79e3 57my $x86_gcc_opts="RC4_INDEX MD2_INT";
d02b48c6
RE
58
59# MODIFY THESE PARAMETERS IF YOU ARE GOING TO USE THE 'util/speed.sh SCRIPT
60# Don't worry about these normally
61
1641cb60
BL
62my $tcc="cc";
63my $tflags="-fast -Xa";
64my $tbn_mul="";
65my $tlib="-lnsl -lsocket";
d02b48c6
RE
66#$bits1="SIXTEEN_BIT ";
67#$bits2="THIRTY_TWO_BIT ";
1641cb60
BL
68my $bits1="THIRTY_TWO_BIT ";
69my $bits2="SIXTY_FOUR_BIT ";
d02b48c6 70
1641cb60
BL
71my $x86_sol_asm="asm/bn86-sol.o asm/co86-sol.o:asm/dx86-sol.o asm/yx86-sol.o:asm/bx86-sol.o:asm/mx86-sol.o:asm/sx86-sol.o:asm/cx86-sol.o:asm/rx86-sol.o:asm/rm86-sol.o:asm/r586-sol.o";
72my $x86_elf_asm="asm/bn86-elf.o asm/co86-elf.o:asm/dx86-elf.o asm/yx86-elf.o:asm/bx86-elf.o:asm/mx86-elf.o:asm/sx86-elf.o:asm/cx86-elf.o:asm/rx86-elf.o:asm/rm86-elf.o:asm/r586-elf.o";
73my $x86_out_asm="asm/bn86-out.o asm/co86-out.o:asm/dx86-out.o asm/yx86-out.o:asm/bx86-out.o:asm/mx86-out.o:asm/sx86-out.o:asm/cx86-out.o:asm/rx86-out.o:asm/rm86-out.o:asm/r586-out.o";
74my $x86_bsdi_asm="asm/bn86bsdi.o asm/co86bsdi.o:asm/dx86bsdi.o asm/yx86bsdi.o:asm/bx86bsdi.o:asm/mx86bsdi.o:asm/sx86bsdi.o:asm/cx86bsdi.o:asm/rx86bsdi.o:asm/rm86bsdi.o:asm/r586bsdi.o";
58964a49
RE
75
76# -DB_ENDIAN slows things down on a sparc for md5, but helps sha1.
77# So the md5_locl.h file has an undef B_ENDIAN if sun is defined
d02b48c6
RE
78
79#config-string CC : CFLAGS : LDFLAGS : special header file mods:bn_asm \
80# des_asm:bf_asm
1641cb60 81my %table=(
5f8d5c96
BM
82#"b", "$tcc:$tflags::$tlib:$bits1:$tbn_mul::",
83#"bl-4c-2c", "$tcc:$tflags::$tlib:${bits1}BN_LLONG RC4_CHAR MD2_CHAR:$tbn_mul::",
84#"bl-4c-ri", "$tcc:$tflags::$tlib:${bits1}BN_LLONG RC4_CHAR RC4_INDEX:$tbn_mul::",
85#"b2-is-ri-dp", "$tcc:$tflags::$tlib:${bits2}IDEA_SHORT RC4_INDEX DES_PTR:$tbn_mul::",
d02b48c6 86
22a4f969 87# Our development configs
5f8d5c96
BM
88"purify", "purify gcc:-g -DPURIFY -Wall:(unknown):-lsocket -lnsl::::",
89"debug", "gcc:-DBN_DEBUG -DREF_CHECK -DCRYPTO_MDEBUG -ggdb -g2 -Wformat -Wshadow -Wmissing-prototypes -Wmissing-declarations -Werror:(unknown):-lefence::::",
90"debug-ben", "gcc:-DBN_DEBUG -DREF_CHECK -DCRYPTO_MDEBUG -O2 -pedantic -Wall -Wshadow -Werror -pipe:(unknown):::::",
91"debug-ben-strict", "gcc:-DBN_DEBUG -DREF_CHECK -DCRYPTO_MDEBUG -DCONST_STRICT -O2 -Wall -Wshadow -Werror -Wpointer-arith -Wcast-qual -Wwrite-strings -pipe:(unknown):::::",
92"debug-rse","cc:-DTERMIOS -DL_ENDIAN -pipe -O -g -ggdb3 -Wall:(unknown)::BN_LLONG $x86_gcc_des $x86_gcc_opts:$x86_elf_asm",
93"dist", "cc:-O:(unknown):::::",
d02b48c6
RE
94
95# Basic configs that should work on any box
5f8d5c96
BM
96"gcc", "gcc:-O3:(unknown)::BN_LLONG:::",
97"cc", "cc:-O:(unknown):::::",
d02b48c6 98
22a4f969 99# Solaris setups
5f8d5c96
BM
100"solaris-x86-gcc","gcc:-O3 -fomit-frame-pointer -m486 -Wall -DL_ENDIAN:-D_REENTRANT:-lsocket -lnsl:BN_LLONG $x86_gcc_des $x86_gcc_opts:$x86_sol_asm",
101"solaris-sparc-gcc","gcc:-O3 -fomit-frame-pointer -mv8 -Wall -DB_ENDIAN:-D_REENTRANT:-lsocket -lnsl:BN_LLONG RC4_CHAR DES_UNROLL BF_PTR:asm/sparcv8.o::",
102"debug-solaris-sparc-gcc","gcc:-O3 -g -mv8 -Wall -DB_ENDIAN:-D_REENTRANT:-lsocket -lnsl:BN_LLONG RC4_CHAR DES_UNROLL BF_PTR:::",
22a4f969 103
d02b48c6
RE
104# DO NOT use /xO[34] on sparc with SC3.0.
105# It is broken, and will not pass the tests
5f8d5c96 106"solaris-sparc-cc","cc:-fast -O -Xa -DB_ENDIAN:-D_REENTRANT:\
22a4f969 107 -lsocket -lnsl:BN_LLONG RC4_CHAR DES_PTR DES_UNROLL BF_PTR:::",
d02b48c6
RE
108# SC4.0 is ok, better than gcc, except for the bignum stuff.
109# -fast slows things like DES down quite a lot
5f8d5c96 110"solaris-sparc-sc4","cc:-xO5 -Xa -DB_ENDIAN:-D_REENTRANT:-lsocket -lnsl:\
22a4f969 111 BN_LLONG RC4_CHAR DES_PTR DES_RISC1 DES_UNROLL BF_PTR:::",
836b286f 112"solaris-usparc-sc4","cc:-xtarget=ultra -xarch=v8plus -Xa -xO2 -DB_ENDIAN:\
5f8d5c96 113 -D_REENTRANT:-lsocket -lnsl:\
22a4f969 114 BN_LLONG RC4_CHAR DES_PTR DES_RISC1 DES_UNROLL BF_PTR:asm/sparcv8.o::",
462ba4f6
UM
115#"solaris-sparc-sc4-pic","cc:-xO5 -Xa -DB_ENDIAN -KPIC:-lsocket -lnsl:\
116# BN_LLONG RC4_CHAR DES_PTR DES_RISC1 DES_UNROLL BF_PTR:::",
d02b48c6
RE
117
118# Sunos configs, assuming sparc for the gcc one.
5f8d5c96
BM
119##"sunos-cc", "cc:-O4 -DNOPROTO -DNOCONST:(unknown)::DES_UNROLL:::",
120"sunos-gcc","gcc:-O3 -mv8:(unknown)::BN_LLONG RC4_CHAR DES_UNROLL DES_PTR DES_RISC1:::",
d02b48c6
RE
121
122# SGI configurations. If the box is rather old (r3000 cpu), you will
123# probably have to remove the '-mips2' flag. I've only been using
124# IRIX 5.[23].
dfeab068
RE
125# I've recently done 32 and 64 bit mips assember, it make this RSA
126# 3 times faster, use if at all possible.
127#"irix-gcc","gcc:-O2 -mips2::SIXTY_FOUR_BIT BN_LLONG RC4_INDEX RC4_CHAR:::",
5f8d5c96
BM
128"irix-gcc","gcc:-O2 -DTERMIOS -DB_ENDIAN:(unknown)::BN_LLONG MD2_CHAR RC4_INDEX RC4_CHAR DES_UNROLL DES_RISC2 DES_PTR BF_PTR:::",
129"irix64-gcc","gcc:-mips3 -O2 -DTERMIOS -DB_ENDIAN:(unknown)::MD2_CHAR RC4_INDEX RC4_CHAR DES_UNROLL DES_RISC2 DES_PTR BF_PTR SIXTY_FOUR_BIT:::",
130"irix-cc", "cc:-O2 -use_readonly_const -DTERMIOS -DB_ENDIAN:(unknown)::BN_LLONG DES_PTR DES_RISC2 DES_UNROLL BF_PTR:::",
131"irix64-cc", "cc:-O2 -use_readonly_const -DTERMIOS -DB_ENDIAN:(unknown)::DES_PTR DES_RISC2 DES_UNROLL BF_PTR SIXTY_FOUR_BIT:::",
132"debug-irix-cc", "cc:-w2 -g -DCRYPTO_MDEBUG -DTERMIOS -DB_ENDIAN:(unknown):::::",
dfeab068 133# This is the n64 mode build.
5f8d5c96 134"irix-n64-cc", "cc:-64 -O2 -use_readonly_const -DTERMIOS:(unknown)::DES_RISC2 DES_UNROLL SIXTY_FOUR_BIT:::",
d02b48c6
RE
135
136# HPUX config. I've been building on HPUX 9, so the options may be
22a4f969 137# different on version 10.
5f8d5c96
BM
138"hpux-cc", "cc:-DB_ENDIAN -D_HPUX_SOURCE -Aa -Ae +ESlit +O4 -Wl,-a,archive:(unknown)::DES_PTR DES_UNROLL DES_RISC1:::",
139##"hpux-kr-cc", "cc:-DB_ENDIAN -DNOCONST -DNOPROTO -D_HPUX_SOURCE:(unknown)::DES_PTR DES_UNROLL:::",
140"hpux-gcc", "gcc:-DB_ENDIAN -O3:(unknown)::BN_LLONG DES_PTR DES_UNROLL DES_RISC1:::",
13e91dd3 141# HPUX from www.globus.org
5f8d5c96
BM
142"hpux11-32bit-cc","cc:+DA2.0 -DB_ENDIAN -D_HPUX_SOURCE -Aa -Ae +ESlit:(unknown)::DES_PTR DES_UNROLL DES_RISC1:::",
143"hpux11-64bit-cc","cc:+DA2.0W -g -D_HPUX_SOURCE -Aa -Ae +ESlit:(unknown)::SIXTY_FOUR_BIT_LONG MD2_CHAR RC4_INDEX RC4_CHAR DES_UNROLL DES_RISC1 DES_INT :::",
d02b48c6 144
dfeab068 145# Dec Alpha, OSF/1 - the alpha164-cc is the flags for a 21164A with
d02b48c6 146# the new compiler
dfeab068 147# For gcc, the following gave a %50 speedup on a 164 over the 'DES_INT' version
5f8d5c96
BM
148"alpha-gcc","gcc:-O3:(unknown)::SIXTY_FOUR_BIT_LONG DES_UNROLL DES_RISC1:::",
149"alpha-cc", "cc:-std1 -tune host -O4 -readonly_strings:(unknown)::SIXTY_FOUR_BIT_LONG:::",
150"alpha164-cc", "cc:-std1 -tune host -fast -readonly_strings:(unknown)::SIXTY_FOUR_BIT_LONG:::",
22a4f969 151# assembler versions -- currently defunct:
5f8d5c96
BM
152##"alpha-gcc","gcc:-O3:(unknown)::SIXTY_FOUR_BIT_LONG DES_UNROLL DES_RISC1:asm/alpha.o::",
153##"alpha-cc", "cc:-tune host -O4 -readonly_strings:(unknown)::SIXTY_FOUR_BIT_LONG:asm/alpha.o::",
154##"alpha164-cc", "cc:-tune host -fast -readonly_strings:(unknown)::SIXTY_FOUR_BIT_LONG:asm/alpha.o::",
155##"OpenBSD-alpha","gcc:-DTERMIOS -O3 -fomit-frame-pointer:(unknown):SIXTY_FOUR_BIT_LONG DES_INT DES_PTR DES_RISC2:asm/alpha.o::",
d02b48c6
RE
156
157# The intel boxes :-), It would be worth seeing if bsdi-gcc can use the
58964a49 158# bn86-elf.o file file since it is hand tweaked assembler.
5f8d5c96
BM
159"linux-elf", "gcc:-DL_ENDIAN -DTERMIO -O3 -fomit-frame-pointer -m486 -Wall:-D_REENTRANT::BN_LLONG $x86_gcc_des $x86_gcc_opts:$x86_elf_asm",
160"debug-linux-elf","gcc:-DREF_CHECK -DCRYPTO_MDEBUG -DL_ENDIAN -DTERMIO -g -m486 -Wall:-D_REENTRANT:-lefence:BN_LLONG $x86_gcc_des $x86_gcc_opts:$x86_elf_asm",
161"linux-aout", "gcc:-DL_ENDIAN -DTERMIO -O3 -fomit-frame-pointer -m486 -Wall:(unknown)::BN_LLONG $x86_gcc_des $x86_gcc_opts:$x86_out_asm",
162"linux-mips", "gcc:-DL_ENDIAN -DTERMIO -O3 -fomit-frame-pointer -Wall:(unknown)::BN_LLONG:::",
163"linux-ppc", "gcc:-DB_ENDIAN -DTERMIO -O3 -fomit-frame-pointer -Wall:(unknown)::::",
164"NetBSD-sparc", "gcc:-DTERMIOS -O3 -fomit-frame-pointer -mv8 -Wall -DB_ENDIAN:(unknown)::BN_LLONG MD2_CHAR RC4_INDEX DES_UNROLL:::",
165"NetBSD-m68", "gcc:-DTERMIOS -O3 -fomit-frame-pointer -Wall -DB_ENDIAN:(unknown)::BN_LLONG MD2_CHAR RC4_INDEX DES_UNROLL:::",
166"NetBSD-x86", "gcc:-DTERMIOS -D_ANSI_SOURCE -O3 -fomit-frame-pointer -m486 -Wall:(unknown)::BN_LLONG $x86_gcc_des $x86_gcc_opts:",
167#"FreeBSD", "gcc:-DTERMIOS -DL_ENDIAN -D_ANSI_SOURCE -fomit-frame-pointer -O3 -m486 -Wall:(unknown)::BN_LLONG $x86_gcc_des $x86_gcc_opts:$x86_out_asm",
168"FreeBSD", "gcc:-DTERMIOS -DL_ENDIAN -fomit-frame-pointer -O3 -m486 -Wall:(unknown)::BN_LLONG $x86_gcc_des $x86_gcc_opts:$x86_out_asm",
169"FreeBSD-elf", "gcc:-DTERMIOS -DL_ENDIAN -fomit-frame-pointer -O3 -m486 -Wall:(unknown)::BN_LLONG $x86_gcc_des $x86_gcc_opts:$x86_elf_asm",
170"bsdi-gcc", "gcc:-O3 -ffast-math -DL_ENDIAN -DPERL5 -m486:(unknown)::RSA_LLONG $x86_gcc_des $x86_gcc_opts:$x86_bsdi_asm",
171"nextstep", "cc:-O3 -Wall:(unknown)::BN_LLONG $x86_gcc_des ${x86_gcc_opts}:::",
58964a49 172# NCR MP-RAS UNIX ver 02.03.01
5f8d5c96 173"ncr-scde","cc:-O6 -Xa -Hoff=BEHAVED -686 -Hwide -Hiw:(unknown):-lsocket -lnsl:$x86_gcc_des ${x86_gcc_opts}:::",
d02b48c6
RE
174
175# UnixWare 2.0
5f8d5c96
BM
176"unixware-2.0","cc:-O -DFILIO_H:(unknown):-lsocket -lnsl:$x86_gcc_des ${x86_gcc_opts}:::",
177"unixware-2.0-pentium","cc:-O -DFILIO_H -Kpentium -Kthread:(unknown):-lsocket -lnsl:MD2_CHAR RC4_INDEX ${x86_gcc_des}::",
d02b48c6
RE
178
179# IBM's AIX.
5f8d5c96
BM
180"aix-cc", "cc:-O -DAIX -DB_ENDIAN:(unknown)::BN_LLONG RC4_CHAR:::",
181"aix-gcc", "gcc:-O3 -DAIX -DB_ENDIAN:(unknown)::BN_LLONG RC4_CHAR:::",
d02b48c6 182
58964a49
RE
183#
184# Cray T90 (SDSC)
185# It's Big-endian, but the algorithms work properly when B_ENDIAN is NOT
186# defined. The T90 ints and longs are 8 bytes long, and apparently the
187# B_ENDIAN code assumes 4 byte ints. Fortunately, the non-B_ENDIAN and
188# non L_ENDIAN code aligns the bytes in each word correctly.
189#
190# The BIT_FIELD_LIMITS define is to avoid two fatal compiler errors:
191#'Taking the address of a bit field is not allowed. '
192#'An expression with bit field exists as the operand of "sizeof" '
193# (written by Wayne Schroeder <schroede@SDSC.EDU>)
5f8d5c96 194"cray-t90-cc", "cc: -DBIT_FIELD_LIMITS -DTERMIOS:(unknown)::SIXTY_FOUR_BIT_LONG DES_INT:::",
58964a49 195
13e91dd3
RE
196#
197# Cray T3E (Research Center Juelich, beckman@acl.lanl.gov)
198#
199# The BIT_FIELD_LIMITS define was written for the C90 (it seems). I added
200# another use. Basically, the problem is that the T3E uses some bit fields
201# for some st_addr stuff, and then sizeof and address-of fails
202# I could not use the ams/alpha.o option because the Cray assembler, 'cam'
203# did not like it.
5f8d5c96 204"cray-t3e", "cc: -DBIT_FIELD_LIMITS -DTERMIOS:(unknown)::SIXTY_FOUR_BIT_LONG DES_INT:::",
13e91dd3 205
d02b48c6 206# DGUX, 88100.
5f8d5c96
BM
207"dgux-R3-gcc", "gcc:-O3 -fomit-frame-pointer:(unknown)::RC4_INDEX DES_UNROLL:::",
208"dgux-R4-gcc", "gcc:-O3 -fomit-frame-pointer:(unknown):-lnsl -lsocket:RC4_INDEX:RC4_INDEX DES_UNROLL:::",
209"dgux-R4-x86-gcc", "gcc:-O3 -fomit-frame-pointer -DL_ENDIAN:(unknown):-lnsl -lsocket:BN_LLONG $x86_gcc_des $x86_gcc_opts:$x86_elf_asm",
d02b48c6 210
dfeab068
RE
211# SCO 5 - Ben Laurie <ben@algroup.co.uk> says the -O breaks the
212# SCO cc.
5f8d5c96 213"sco5-cc", "cc::(unknown):-lsocket:$x86_gcc_des ${x86_gcc_opts}:::", # des options?
d02b48c6
RE
214
215# Sinix RM400
5f8d5c96 216"SINIX-N","/usr/ucb/cc:-O2 -misaligned:(unknown):-lucb:RC4_INDEX RC4_CHAR:::",
d02b48c6
RE
217
218# Windows NT, Microsoft Visual C++ 4.0
219
5f8d5c96
BM
220"VC-NT","cl::(unknown)::BN_LLONG RC4_INDEX ${x86_gcc_opts}:::",
221"VC-WIN32","cl::(unknown)::BN_LLONG RC4_INDEX ${x86_gcc_opts}:::",
222"VC-WIN16","cl::(unknown)::MD2_CHAR DES_UNROLL DES_PTR RC4_INDEX THIRTY_TWO_BIT:::",
223"VC-W31-16","cl::(unknown)::BN_LLONG MD2_CHAR DES_UNROLL DES_PTR RC4_INDEX SIXTEEN_BIT:::",
224"VC-W31-32","cl::(unknown)::BN_LLONG MD2_CHAR DES_UNROLL DES_PTR RC4_INDEX THIRTY_TWO_BIT:::",
225"VC-MSDOS","cl::(unknown)::BN_LLONG MD2_CHAR DES_UNROLL DES_PTR RC4_INDEX SIXTEEN_BIT:::",
d02b48c6
RE
226
227# Borland C++ 4.5
5f8d5c96
BM
228"BC-32","bcc32::(unknown)::BN_LLONG DES_PTR RC4_INDEX:::",
229"BC-16","bcc::(unknown)::BN_LLONG DES_PTR RC4_INDEX SIXTEEN_BIT:::",
dfeab068 230
e04a6c2b 231# CygWin32
5f8d5c96 232"CygWin32", "gcc:-DTERMIOS -DL_ENDIAN -fomit-frame-pointer -O3 -m486 -Wall:(unknown)::BN_LLONG $x86_gcc_des $x86_gcc_opts:",
e04a6c2b 233
22a4f969 234# Ultrix from Bernhard Simon <simon@zid.tuwien.ac.at>
5f8d5c96
BM
235"ultrix-cc","cc:-std1 -O -Olimit 1000 -DL_ENDIAN:(unknown)::::::",
236"ultrix-gcc","gcc:-O3 -DL_ENDIAN:(unknown)::::::",
22a4f969 237# K&R C is no longer supported; you need gcc on old Ultrix installations
5f8d5c96 238##"ultrix","cc:-O2 -DNOPROTO -DNOCONST -DL_ENDIAN:(unknown)::::::",
dfeab068
RE
239
240# Some OpenBSD from Bob Beck <beck@obtuse.com>
5f8d5c96
BM
241"OpenBSD-alpha","gcc:-DTERMIOS -O3 -fomit-frame-pointer:(unknown):SIXTY_FOUR_BIT_LONG DES_INT DES_PTR DES_RISC2:::",
242"OpenBSD-x86", "gcc:-DL_ENDIAN -DTERMIOS -O3 -fomit-frame-pointer -m486:(unknown)::BN_LLONG $x86_gcc_des $x86_gcc_opts:$x86_out_asm",
243"OpenBSD", "gcc:-DTERMIOS -O3 -fomit-frame-pointer:(unknown)::BN_LLONG RC2_CHAR RC4_INDEX DES_UNROLL:::",
244"OpenBSD-mips","gcc:-O2 -DL_ENDIAN:(unknown):BN_LLONG MD2_CHAR RC4_INDEX RC4_CHAR DES_UNROLL DES_RISC2 DES_PTR BF_PTR::::",
22a4f969 245
d02b48c6
RE
246);
247
efadf60f
BL
248my @WinTargets=qw(VC-NT VC-WIN32 VC-WIN16 VC-W31-16 VC-W31-32 VC-MSDOS BC-32
249 BC-16 CygWin32);
250
462ba4f6
UM
251my $installprefix="";
252my $openssldir="";
5f8d5c96
BM
253my $no_threads=0;
254my $threads=0;
1641cb60 255my $no_asm=0;
f5d7a031 256my @skip=();
1641cb60
BL
257my $Makefile="Makefile.ssl";
258my $des_locl="crypto/des/des_locl.h";
259my $des ="crypto/des/des.h";
260my $bn ="crypto/bn/bn.h";
261my $md2 ="crypto/md2/md2.h";
262my $rc4 ="crypto/rc4/rc4.h";
263my $rc4_locl="crypto/rc4/rc4_locl.h";
264my $idea ="crypto/idea/idea.h";
265my $rc2 ="crypto/rc2/rc2.h";
266my $bf ="crypto/bf/bf_locl.h";
267my $bn_asm ="bn_asm.o";
268my $des_enc="des_enc.o fcrypt_b.o";
269my $bf_enc ="bf_enc.o";
270my $cast_enc="c_enc.o";
271my $rc4_enc="rc4_enc.o";
272my $rc5_enc="rc5_enc.o";
273my $md5_obj="";
274my $sha1_obj="";
275my $rmd160_obj="";
2613c1fa 276my $processor="";
99aab161
UM
277my $ranlib;
278my $perl;
279
280$ranlib=&which("ranlib") or $ranlib="true";
281$perl=&which("perl5") or $perl=&which("perl");
d02b48c6 282
462ba4f6 283&usage if ($#ARGV < 0);
d02b48c6 284
1641cb60 285my $flags="";
f5d7a031 286my $depflags="";
1641cb60
BL
287my $libs="";
288my $target="";
d02b48c6
RE
289foreach (@ARGV)
290 {
462ba4f6 291 if (/^no-asm$/)
dfeab068 292 { $no_asm=1; }
5f8d5c96
BM
293 elsif (/^no-threads$/)
294 { $no_threads=1; }
295 elsif (/^threads$/)
296 { $threads=1; }
f5d7a031
UM
297 elsif (/^no-(.+)$/)
298 {
299 my $algo=$1;
300 push @skip,$algo;
301 $algo =~ tr/[a-z]/[A-Z]/;
302 $flags .= "-DNO_$algo ";
303 $depflags .= "-DNO_$algo ";
304 }
462ba4f6 305 elsif (/^386$/)
2613c1fa 306 { $processor=386; }
462ba4f6 307 elsif (/^rsaref$/)
5fbe91d8
UM
308 {
309 $libs.= "-lRSAglue -lrsaref ";
310 $flags.= "-DRSAref ";
311 }
462ba4f6 312 elsif (/^-/)
d02b48c6 313 {
462ba4f6 314 if (/^-[lL](.*)$/)
d02b48c6
RE
315 {
316 $libs.=$_." ";
317 }
462ba4f6 318 elsif (/^-[DfK](.*)$/)
d02b48c6
RE
319 {
320 $flags.=$_." ";
321 }
462ba4f6 322 elsif (/^--prefix=(.*)$/)
3eb0ed6d 323 {
462ba4f6
UM
324 $installprefix=$1;
325 }
326 elsif (/^--openssldir=(.*)$/)
327 {
328 $openssldir=$1;
3eb0ed6d 329 }
d02b48c6
RE
330 else
331 {
462ba4f6 332 print STDERR $usage;
45050a7f 333 exit(1);
d02b48c6
RE
334 }
335 }
116e3153
RE
336 elsif ($_ =~ /^([^:]+):(.+)$/) {
337 eval "\$table{\$1} = \"$2\""; # allow $xxx constructs in the string
338 $target=$1;
339 }
d02b48c6
RE
340 else
341 {
342 die "target already defined - $target\n" if ($target ne "");
343 $target=$_;
d02b48c6 344 }
462ba4f6 345}
d02b48c6 346
462ba4f6
UM
347&usage if (!defined($table{$target}));
348
a1e464f9
DSH
349my $IsWindows=scalar grep /^$target$/,@WinTargets;
350
462ba4f6
UM
351$openssldir="/usr/local/ssl" if ($openssldir eq "" and $installprefix eq "");
352$installprefix=$openssldir if $installprefix eq "";
353
354chop $openssldir if $openssldir =~ /\/$/;
355chop $installprefix if $installprefix =~ /\/$/;
356
357$openssldir=$installprefix . "/ssl" if $openssldir eq "";
358$openssldir=$installprefix . "/" . $openssldir if $openssldir !~ /^\//;
d02b48c6 359
efadf60f
BL
360
361print "IsWindows=$IsWindows\n";
362
5f8d5c96 363(my $cc,my $cflags,my $thread_cflag,my $lflags,my $bn_ops,my $bn_obj,my $des_obj,my $bf_obj,
1641cb60 364 $md5_obj,$sha1_obj,my $cast_obj,my $rc4_obj,$rmd160_obj,my $rc5_obj)=
df0af1a7 365 split(/\s*:\s*/,$table{$target} . ":" x 20 , -1);
d02b48c6 366$cflags="$flags$cflags" if ($flags ne "");
5f8d5c96
BM
367
368my $thread_cflags;
369if ($thread_cflag ne "(unknown)" && !$no_threads)
370 {
371 # If we know how to do it, support threads by default.
372 $threads = 1;
373 }
374if ($thread_cflag eq "(unknown)")
375 {
376 # If the user asked for "threads", hopefully they also provided
377 # any system-dependent compiler options that are necessary.
378 $thread_cflags="-DTHREADS $cflags"
379 }
380else
381 {
382 $thread_cflags="-DTHREADS $thread_cflag $cflags"
383 }
384
d02b48c6
RE
385$lflags="$libs$lflags"if ($libs ne "");
386
dfeab068
RE
387if ($no_asm)
388 {
389 $bn_obj=$des_obj=$bf_obj=$cast_obj=$rc4_obj=$rc5_obj="";
390 $sha1_obj=$md5_obj=$rmd160_obj="";
391 }
392
5f8d5c96
BM
393if ($threads)
394 {
395 $cflags=$thread_cflags;
396 }
397
1750ebcb
DSH
398#my ($bn1)=split(/\s+/,$bn_obj);
399#$bn1 = "" unless defined $bn1;
400#$bn1=$bn_asm unless ($bn1 =~ /\.o$/);
401#$bn_obj="$bn1";
402
403$bn_obj = $bn_asm unless $bn_obj ne "";
dfeab068 404
58964a49
RE
405$des_obj=$des_enc unless ($des_obj =~ /\.o$/);
406$bf_obj=$bf_enc unless ($bf_obj =~ /\.o$/);
407$cast_obj=$cast_enc unless ($cast_obj =~ /\.o$/);
408$rc4_obj=$rc4_enc unless ($rc4_obj =~ /\.o$/);
409$rc5_obj=$rc5_enc unless ($rc5_obj =~ /\.o$/);
410if ($sha1_obj =~ /\.o$/)
411 {
412# $sha1_obj=$sha1_enc;
413 $cflags.=" -DSHA1_ASM";
414 }
415if ($md5_obj =~ /\.o$/)
416 {
417# $md5_obj=$md5_enc;
418 $cflags.=" -DMD5_ASM";
419 }
420if ($rmd160_obj =~ /\.o$/)
421 {
422# $rmd160_obj=$rmd160_enc;
423 $cflags.=" -DRMD160_ASM";
424 }
d02b48c6 425
0973910f
UM
426my $version = "unknown";
427my $major = "unknown";
428my $minor = "unknown";
429
430open(IN,'<crypto/opensslv.h') || die "unable to read opensslv.h:$!\n";
431while (<IN>)
432 {
433 $version=$1 if /OPENSSL.VERSION.TEXT.*OpenSSL (\S+) /;
434 }
435close(IN);
436
437if ($version =~ /(^[0-9]*)\.([\0-9\.]*)/)
438 {
439 $major=$1;
440 $minor=$2;
441 }
442
f2d4be3b
BL
443open(IN,'<Makefile.org') || die "unable to read Makefile.org:$!\n";
444open(OUT,">$Makefile") || die "unable to create $Makefile:$!\n";
f5d7a031 445my $sdirs=0;
d02b48c6
RE
446while (<IN>)
447 {
448 chop;
f5d7a031
UM
449 $sdirs = 1 if /^SDIRS=/;
450 $sdirs = 0 unless /\\$/;
451 if ($sdirs) {
452 my $dir;
453 foreach $dir (@skip) {
454 s/$dir//;
455 }
456 }
0973910f
UM
457 s/^VERSION=.*/VERSION=$version/;
458 s/^MAJOR=.*/MAJOR=$major/;
459 s/^MINOR=.*/MINOR=$minor/;
462ba4f6
UM
460 s/^INSTALLTOP=.*$/INSTALLTOP=$installprefix/;
461 s/^OPENSSLDIR=.*$/OPENSSLDIR=$openssldir/;
dfeab068 462 s/^PLATFORM=.*$/PLATFORM=$target/;
d02b48c6
RE
463 s/^CC=.*$/CC= $cc/;
464 s/^CFLAG=.*$/CFLAG= $cflags/;
f5d7a031 465 s/^DEPFLAG=.*$/DEPFLAG= $depflags/;
d02b48c6 466 s/^EX_LIBS=.*$/EX_LIBS= $lflags/;
06287285 467 s/^BN_ASM=.*$/BN_ASM= $bn_obj/;
d02b48c6
RE
468 s/^DES_ENC=.*$/DES_ENC= $des_obj/;
469 s/^BF_ENC=.*$/BF_ENC= $bf_obj/;
58964a49
RE
470 s/^CAST_ENC=.*$/CAST_ENC= $cast_obj/;
471 s/^RC4_ENC=.*$/RC4_ENC= $rc4_obj/;
472 s/^RC5_ENC=.*$/RC5_ENC= $rc5_obj/;
473 s/^MD5_ASM_OBJ=.*$/MD5_ASM_OBJ= $md5_obj/;
474 s/^SHA1_ASM_OBJ=.*$/SHA1_ASM_OBJ= $sha1_obj/;
475 s/^RMD160_ASM_OBJ=.*$/RMD160_ASM_OBJ= $rmd160_obj/;
2613c1fa 476 s/^PROCESSOR=.*/PROCESSOR= $processor/;
99aab161
UM
477 s/^RANLIB=.*/RANLIB= $ranlib/;
478 s/^PERL=.*/PERL= $perl/;
d02b48c6
RE
479 print OUT $_."\n";
480 }
481close(IN);
482close(OUT);
f2d4be3b 483
58964a49
RE
484print "CC =$cc\n";
485print "CFLAG =$cflags\n";
486print "EX_LIBS =$lflags\n";
06287285 487print "BN_ASM =$bn_obj\n";
58964a49
RE
488print "DES_ENC =$des_obj\n";
489print "BF_ENC =$bf_obj\n";
490print "CAST_ENC =$cast_obj\n";
491print "RC4_ENC =$rc4_obj\n";
492print "RC5_ENC =$rc5_obj\n";
493print "MD5_OBJ_ASM =$md5_obj\n";
494print "SHA1_OBJ_ASM =$sha1_obj\n";
495print "RMD160_OBJ_ASM=$rmd160_obj\n";
2613c1fa 496print "PROCESSOR =$processor\n";
99aab161
UM
497print "RANLIB =$ranlib\n";
498print "PERL =$perl\n";
d02b48c6 499
1641cb60
BL
500my $des_ptr=0;
501my $des_risc1=0;
502my $des_risc2=0;
503my $des_unroll=0;
504my $bn_ll=0;
505my $def_int=2;
506my $rc4_int=$def_int;
507my $md2_int=$def_int;
508my $idea_int=$def_int;
509my $rc2_int=$def_int;
510my $rc4_idx=0;
511my $bf_ptr=0;
512my @type=("char","short","int","long");
513my ($b64l,$b64,$b32,$b16,$b8)=(0,0,1,0,0);
514
515my $des_int;
d02b48c6
RE
516
517foreach (sort split(/\s+/,$bn_ops))
518 {
519 $des_ptr=1 if /DES_PTR/;
520 $des_risc1=1 if /DES_RISC1/;
521 $des_risc2=1 if /DES_RISC2/;
522 $des_unroll=1 if /DES_UNROLL/;
523 $des_int=1 if /DES_INT/;
524 $bn_ll=1 if /BN_LLONG/;
525 $rc4_int=0 if /RC4_CHAR/;
526 $rc4_int=3 if /RC4_LONG/;
527 $rc4_idx=1 if /RC4_INDEX/;
528 $md2_int=0 if /MD2_CHAR/;
529 $md2_int=3 if /MD2_LONG/;
530 $idea_int=1 if /IDEA_SHORT/;
531 $idea_int=3 if /IDEA_LONG/;
532 $rc2_int=1 if /RC2_SHORT/;
533 $rc2_int=3 if /RC2_LONG/;
534 $bf_ptr=1 if $_ eq "BF_PTR";
535 $bf_ptr=2 if $_ eq "BF_PTR2";
d02b48c6 536 ($b64l,$b64,$b32,$b16,$b8)=(0,1,0,0,0) if /SIXTY_FOUR_BIT/;
58964a49 537 ($b64l,$b64,$b32,$b16,$b8)=(1,0,0,0,0) if /SIXTY_FOUR_BIT_LONG/;
d02b48c6
RE
538 ($b64l,$b64,$b32,$b16,$b8)=(0,0,1,0,0) if /THIRTY_TWO_BIT/;
539 ($b64l,$b64,$b32,$b16,$b8)=(0,0,0,1,0) if /SIXTEEN_BIT/;
540 ($b64l,$b64,$b32,$b16,$b8)=(0,0,0,0,1) if /EIGHT_BIT/;
541 }
542
8e10f2b3
UM
543open(IN,'<crypto/opensslconf.h.in') || die "unable to read crypto/opensslconf.h.in:$!\n";
544open(OUT,'>crypto/opensslconf.h') || die "unable to create crypto/opensslconf.h:$!\n";
d02b48c6
RE
545while (<IN>)
546 {
cd46aa4a 547 if (/^#define\s+OPENSSLDIR/)
8e945b5e 548 { print OUT "#define OPENSSLDIR \"$openssldir\"\n"; }
462ba4f6 549 elsif (/^#((define)|(undef))\s+SIXTY_FOUR_BIT_LONG/)
d02b48c6
RE
550 { printf OUT "#%s SIXTY_FOUR_BIT_LONG\n",($b64l)?"define":"undef"; }
551 elsif (/^#((define)|(undef))\s+SIXTY_FOUR_BIT/)
552 { printf OUT "#%s SIXTY_FOUR_BIT\n",($b64)?"define":"undef"; }
553 elsif (/^#((define)|(undef))\s+THIRTY_TWO_BIT/)
554 { printf OUT "#%s THIRTY_TWO_BIT\n",($b32)?"define":"undef"; }
555 elsif (/^#((define)|(undef))\s+SIXTEEN_BIT/)
556 { printf OUT "#%s SIXTEEN_BIT\n",($b16)?"define":"undef"; }
557 elsif (/^#((define)|(undef))\s+EIGHT_BIT/)
558 { printf OUT "#%s EIGHT_BIT\n",($b8)?"define":"undef"; }
559 elsif (/^#((define)|(undef))\s+BN_LLONG\s*$/)
560 { printf OUT "#%s BN_LLONG\n",($bn_ll)?"define":"undef"; }
8e10f2b3 561 elsif (/^\#define\s+DES_LONG\s+.*/)
d02b48c6
RE
562 { printf OUT "#define DES_LONG unsigned %s\n",
563 ($des_int)?'int':'long'; }
8e10f2b3 564 elsif (/^\#(define|undef)\s+DES_PTR/)
d02b48c6
RE
565 { printf OUT "#%s DES_PTR\n",($des_ptr)?'define':'undef'; }
566 elsif (/^\#(define|undef)\s+DES_RISC1/)
567 { printf OUT "#%s DES_RISC1\n",($des_risc1)?'define':'undef'; }
568 elsif (/^\#(define|undef)\s+DES_RISC2/)
569 { printf OUT "#%s DES_RISC2\n",($des_risc2)?'define':'undef'; }
570 elsif (/^\#(define|undef)\s+DES_UNROLL/)
571 { printf OUT "#%s DES_UNROLL\n",($des_unroll)?'define':'undef'; }
8e10f2b3 572 elsif (/^#define\s+RC4_INT\s/)
d02b48c6 573 { printf OUT "#define RC4_INT unsigned %s\n",$type[$rc4_int]; }
8e10f2b3 574 elsif (/^#((define)|(undef))\s+RC4_INDEX/)
d02b48c6 575 { printf OUT "#%s RC4_INDEX\n",($rc4_idx)?"define":"undef"; }
8e10f2b3 576 elsif (/^#define\s+MD2_INT\s/)
d02b48c6 577 { printf OUT "#define MD2_INT unsigned %s\n",$type[$md2_int]; }
8e10f2b3 578 elsif (/^#define\s+IDEA_INT\s/)
d02b48c6 579 {printf OUT "#define IDEA_INT unsigned %s\n",$type[$idea_int];}
8e10f2b3 580 elsif (/^#define\s+RC2_INT\s/)
d02b48c6 581 {printf OUT "#define RC2_INT unsigned %s\n",$type[$rc2_int];}
8e10f2b3 582 elsif (/^#(define|undef)\s+BF_PTR/)
d02b48c6
RE
583 {
584 printf OUT "#undef BF_PTR\n" if $bf_ptr == 0;
585 printf OUT "#define BF_PTR\n" if $bf_ptr == 1;
586 printf OUT "#define BF_PTR2\n" if $bf_ptr == 2;
8e10f2b3 587 }
d02b48c6
RE
588 else
589 { print OUT $_; }
590 }
5dfc369f
UM
591close(IN);
592close(OUT);
9becf666
DSH
593
594# Fix the date
595
d02b48c6
RE
596print "SIXTY_FOUR_BIT_LONG mode\n" if $b64l;
597print "SIXTY_FOUR_BIT mode\n" if $b64;
598print "THIRTY_TWO_BIT mode\n" if $b32;
599print "SIXTEEN_BIT mode\n" if $b16;
600print "EIGHT_BIT mode\n" if $b8;
601print "DES_PTR used\n" if $des_ptr;
602print "DES_RISC1 used\n" if $des_risc1;
603print "DES_RISC2 used\n" if $des_risc2;
604print "DES_UNROLL used\n" if $des_unroll;
605print "DES_INT used\n" if $des_int;
606print "BN_LLONG mode\n" if $bn_ll;
607print "RC4 uses u$type[$rc4_int]\n" if $rc4_int != $def_int;
608print "RC4_INDEX mode\n" if $rc4_idx;
609print "MD2 uses u$type[$md2_int]\n" if $md2_int != $def_int;
610print "IDEA uses u$type[$idea_int]\n" if $idea_int != $def_int;
611print "RC2 uses u$type[$rc2_int]\n" if $rc2_int != $def_int;
612print "BF_PTR used\n" if $bf_ptr == 1;
613print "BF_PTR2 used\n" if $bf_ptr == 2;
cba5068d 614
8e10f2b3
UM
615if($IsWindows) {
616 open (OUT,">crypto/date.h") || die "Can't open date.h";
617 printf OUT "#define DATE \"%s\"\n", scalar gmtime();
618 close(OUT);
a1e464f9 619} else {
1314c344
BM
620 if ( $perl =~ /./ ) {
621 (system "make -f Makefile.ssl PERL=\'$perl\' links") == 0 or exit $?;
622 } else {
623 (system 'make -f Makefile.ssl links') == 0 or exit $?;
624 }
f5d7a031 625 (system 'make depend') == 0 or exit $? if $depflags ne "";
a1e464f9
DSH
626 &dofile("tools/c_rehash",$openssldir,'^DIR=', 'DIR=%s',);
627 &dofile("util/mk1mf.pl",$openssldir,
628 ('^\$INSTALLTOP=','$INSTALLTOP="%s";',));
8e10f2b3
UM
629}
630
462ba4f6 631
a1e464f9 632my $pwd;
cba5068d 633
a1e464f9 634if($IsWindows) {
5f8d5c96 635 $pwd="(current directory)";
a1e464f9
DSH
636} else {
637 $pwd =`pwd`;
638 chop($pwd);
639}
ec577822
BM
640print <<EOF;
641
642NOTE: The OpenSSL header files have been moved from include/*.h
643to include/openssl/*.h. To include OpenSSL header files, now
644directives of the form
645 #include <openssl/foo.h>
646should be used instead of #include <foo.h>.
647These new file locations allow installing the OpenSSL header
648files in /usr/local/include/openssl/ and should help avoid
649conflicts with other libraries.
650
651To compile programs that use the old form <foo.h>,
652usually an additional compiler option will suffice: E.g., add
462ba4f6 653 -I$installprefix/include/openssl
ec577822
BM
654or
655 -I$pwd/include/openssl
09be75a4
BM
656to the CFLAGS in the Makefile of the program that you want to compile
657(and leave all the original -I...'s in place!).
ec577822
BM
658
659Please make sure that no old OpenSSL header files are around:
660The include directory should now be empty except for the openssl
661subdirectory.
5f8d5c96
BM
662
663EOF
664
665print <<\EOF if (!$no_threads && !$threads);
666
667The library could not be configured for supporting multi-threaded
668applications as the compiler options required on this system are not known.
669See file INSTALL for details.
670
ec577822
BM
671EOF
672
d02b48c6
RE
673exit(0);
674
462ba4f6 675sub usage
d02b48c6 676 {
462ba4f6 677 print STDERR $usage;
d02b48c6 678 print STDERR "pick os/compiler from:";
1641cb60 679 my $j=0;
6457ad15
BL
680 my $i;
681 foreach $i (sort keys %table)
d02b48c6 682 {
462ba4f6
UM
683 next if $i =~ /^debug/;
684 print STDERR "\n" if ($j++ % 4) == 0;
685 printf(STDERR "%-18s ",$i);
686 }
687 foreach $i (sort keys %table)
688 {
689 next if $i !~ /^debug/;
d02b48c6
RE
690 print STDERR "\n" if ($j++ % 4) == 0;
691 printf(STDERR "%-18s ",$i);
692 }
693 print STDERR "\n";
462ba4f6 694 exit(1);
d02b48c6
RE
695 }
696
99aab161
UM
697sub which
698 {
699 my($name)=@_;
700 my $path;
701 foreach $path (split /:/, $ENV{PATH})
702 {
703 if (-x "$path/$name")
704 {
a5a47e4a
UM
705 return "$path/$name" unless ($name eq "perl" and
706 system("$path/$name -e " . '\'exit($]<5.0);\''));
99aab161
UM
707 }
708 }
709 }
710
462ba4f6
UM
711sub dofile
712 {
713 my $f; my $p; my %m; my @a; my $k; my $ff;
714 ($f,$p,%m)=@_;
715
716 open(IN,"<$f") || die "unable to open $f:$!\n";
717 @a=<IN>;
718 close(IN);
719 foreach $k (keys %m)
720 {
721 grep(/$k/ && ($_=sprintf($m{$k}."\n",$p)),@a);
722 }
723 ($ff=$f) =~ s/\..*$//;
724 open(OUT,">$ff.new") || die "unable to open $f:$!\n";
725 print OUT @a;
726 close(OUT);
727 rename($f,"$ff.bak") || die "unable to rename $f\n";
728 rename("$ff.new",$f) || die "unable to rename $ff.new\n";
729 }