mk1mf.pl 38.9 KB
Newer Older
B
Ben Laurie 已提交
1
#!/usr/bin/env perl
2 3 4
# A bit of an evil hack but it post processes the file ../MINFO which
# is generated by `make files` in the top directory.
# This script outputs one mega makefile that has no shell stuff or any
5 6 7 8 9 10
# funny stuff (if the target is not "copy").
# If the target is "copy", then it tries to create a makefile that can be
# safely used with the -j flag and that is compatible with the top-level
# Makefile, in the sense that it uses the same options and assembler files etc.

use Cwd;
11

12
$INSTALLTOP="/usr/local";
13
$OPENSSLDIR="/usr/local/ssl";
14 15
$OPTIONS="";
$ssl_version="";
16
$banner="\t\@echo Building OpenSSL";
17

18
my $no_static_engine = 1;
D
Dr. Stephen Henson 已提交
19
my $engines = "";
20
my @engines_obj = "";
21
my $otherlibs = "";
D
Dr. Stephen Henson 已提交
22 23
local $zlib_opt = 0;	# 0 = no zlib, 1 = static, 2 = dynamic
local $zlib_lib = "";
24 25
local $perl_asm = 0;	# 1 to autobuild asm files from perl scripts

26 27 28 29 30 31 32
local $fips_canister_path = "";
my $fips_premain_dso_exe_path = "";
my $fips_premain_c_path = "";
my $fips_sha1_exe_path = "";

local $fipscanisterbuild = 0;

33 34
my $fipscanisteronly = 0;

35 36 37 38 39
my $fipslibdir = "";
my $baseaddr = "";

my $ex_l_libs = "";

40 41 42
my $build_targets = "lib exe";
my $libs_dep = "\$(O_CRYPTO) \$(O_SSL)";

43 44 45 46 47 48 49 50
# Options to import from top level Makefile

my %mf_import = (
	VERSION	       => \$ssl_version,
	OPTIONS        => \$OPTIONS,
	INSTALLTOP     => \$INSTALLTOP,
	OPENSSLDIR     => \$OPENSSLDIR,
	PLATFORM       => \$mf_platform,
B
Ben Laurie 已提交
51
	CC             => \$mf_cc,
52
	CFLAG	       => \$mf_cflag,
R
Rich Salz 已提交
53
        DEPFLAG        => \$mf_depflag,
54 55 56 57 58 59 60 61 62 63 64 65
	CPUID_OBJ      => \$mf_cpuid_asm,
	BN_ASM	       => \$mf_bn_asm,
	DES_ENC	       => \$mf_des_asm,
	AES_ENC        => \$mf_aes_asm,
	BF_ENC	       => \$mf_bf_asm,
	CAST_ENC       => \$mf_cast_asm,
	RC4_ENC	       => \$mf_rc4_asm,
	RC5_ENC        => \$mf_rc5_asm,
	MD5_ASM_OBJ    => \$mf_md5_asm,
	SHA1_ASM_OBJ   => \$mf_sha_asm,
	RMD160_ASM_OBJ => \$mf_rmd_asm,
	WP_ASM_OBJ     => \$mf_wp_asm,
66
	CMLL_ENC       => \$mf_cm_asm,
67
	MODES_ASM_OBJ  => \$mf_modes_asm,
B
Ben Laurie 已提交
68
        ENGINES_ASM_OBJ=> \$mf_engines_asm,
69
	PERLASM_SCHEME => \$mf_perlasm_scheme,
D
typo  
Dr. Stephen Henson 已提交
70
	FIPSCANISTERONLY  => \$mf_fipscanisteronly,
B
Ben Laurie 已提交
71 72
	FIPSCANISTERINTERNAL  => \$mf_fipscanisterinternal,
	EC_ASM	       => \$mf_ec_asm,
73
);
D
Dr. Stephen Henson 已提交
74

75
open(IN,"<Makefile") || die "unable to open Makefile!\n";
76
while(<IN>) {
77 78
    my ($mf_opt, $mf_ref);
    while (($mf_opt, $mf_ref) = each %mf_import) {
79
    	if (/^$mf_opt\s*=\s*(.*)$/ && !defined($$mfref)) {
80 81 82
	   $$mf_ref = $1;
	}
    }
83
}
U
Ulf Möller 已提交
84
close(IN);
85

86
if ($mf_fipscanisterinternal eq "y") {
87 88 89 90 91 92
	$fips = 1;
	$fipscanisterbuild = 1;
	$fipscanisteronly = 1;
}


93
die "Makefile is not the toplevel Makefile!\n" if $ssl_version eq "";
94

95 96 97
$infile="MINFO";

%ops=(
98
	"VC-WIN32",   "Microsoft Visual C++ [4-6] - Windows NT or 9X",
99 100
	"VC-WIN64I",  "Microsoft C/C++ - Win64/IA-64",
	"VC-WIN64A",  "Microsoft C/C++ - Win64/x64",
R
Richard Levitte 已提交
101
	"VC-CE",   "Microsoft eMbedded Visual C++ 3.0 - Windows CE ONLY",
102
	"VC-NT",   "Microsoft Visual C++ [4-6] - Windows NT ONLY",
103
	"Mingw32", "GNU C++ - Windows NT or 9x",
U
Ulf Möller 已提交
104
	"Mingw32-files", "Create files with DOS copy ...",
105
	"BC-NT",   "Borland C++ 4.5 - Windows NT",
106
	"linux-elf","Linux elf",
107
	"ultrix-mips","DEC mips ultrix",
108
	"FreeBSD","FreeBSD distribution",
109
	"OS2-EMX", "EMX GCC OS/2",
110
	"netware-clib", "CodeWarrior for NetWare - CLib - with WinSock Sockets",
D
Dr. Stephen Henson 已提交
111
	"netware-clib-bsdsock", "CodeWarrior for NetWare - CLib - with BSD Sockets",
112 113
	"netware-libc", "CodeWarrior for NetWare - LibC - with WinSock Sockets",
	"netware-libc-bsdsock", "CodeWarrior for NetWare - LibC - with BSD Sockets",
114
	"default","cc under unix",
B
Ben Laurie 已提交
115 116
	"auto", "auto detect from top level Makefile",
        "copy", "copy from top level Makefile"
117 118
	);

119
$platform="";
120
my $xcflags="";
121 122
foreach (@ARGV)
	{
123
	if (!&read_options && !defined($ops{$_}))
124
		{
125
		print STDERR "unknown option - $_\n";
B
Bodo Möller 已提交
126
		print STDERR "usage: perl mk1mf.pl [options] [system]\n";
127 128 129 130
		print STDERR "\nwhere [system] can be one of the following\n";
		foreach $i (sort keys %ops)
		{ printf STDERR "\t%-10s\t%s\n",$i,$ops{$i}; }
		print STDERR <<"EOF";
131
and [options] can be one of
132 133
	no-md2 no-md4 no-md5 no-sha no-mdc2	- Skip this digest
	no-ripemd
134
	no-rc2 no-rc4 no-rc5 no-idea no-des     - Skip this symetric cipher
B
Bodo Möller 已提交
135
	no-bf no-cast no-aes no-camellia no-seed
136
	no-rsa no-dsa no-dh			- Skip this public key cipher
K
Kurt Roeckx 已提交
137
	no-ssl3					- Skip this version of SSL
138 139
	just-ssl				- remove all non-ssl keys/digest
	no-asm 					- No x86 asm
B
Ben Laurie 已提交
140
	no-srp					- No SRP
141
	no-ec					- No EC
142
	no-engine				- No engine
143
	no-egd					- No EGD
144
	no-hw					- No hw
145 146
	no-async				- No Async (use NULL)
	no-autoalginit				- Don't auto load algorithms in libcrypto
147
	nasm 					- Use NASM for x86 asm
R
Richard Levitte 已提交
148
	nw-nasm					- Use NASM x86 asm for NetWare
D
Dr. Stephen Henson 已提交
149
	nw-mwasm				- Use Metrowerks x86 asm for NetWare
U
Ulf Möller 已提交
150
	gaswin					- Use GNU as with Mingw32
151 152 153 154
	no-socks				- No socket code
	no-err					- No error strings
	dll/shlib				- Build shared libraries (MS)
	debug					- Debug build
U
Ulf Möller 已提交
155
        profile                                 - Profiling build
156 157 158
	gcc					- Use Gcc (unix)

Values that can be set
159
TMP=tmpdir OUT=outdir SRC=srcdir BIN=binpath INC=header-outdir CC=C-compiler
160 161 162 163 164

-L<ex_lib_path> -l<ex_lib>			- extra library flags (unix)
-<ex_cc_flags>					- extra 'cc' flags,
						  added (MS), or replace (unix)
EOF
165
		exit(1);
166
		}
167 168
	$platform=$_;
	}
169
foreach (grep(!/^$/, split(/ /, $OPTIONS)))
170 171
	{
	print STDERR "unknown option - $_\n" if !&read_options;
172 173
	}

D
Dr. Stephen Henson 已提交
174 175
$no_static_engine = 0 if (!$shlib);

176 177
$no_mdc2=1 if ($no_des);

R
Rich Salz 已提交
178
$no_ssl3=1 if ($no_md5);
179 180
$no_ssl3=1 if ($no_rsa && $no_dh);

181 182 183 184
$out_def="out";
$inc_def="outinc";
$tmp_def="tmp";

D
Dr. Stephen Henson 已提交
185 186
$perl="perl" unless defined $perl;
$mkdir="-mkdir" unless defined $mkdir;
187
$mv="mv" unless defined $mv;
188 189 190 191

($ssl,$crypto)=("ssl","crypto");
$ranlib="echo ranlib";

192
$cc=(defined($VARS{'CC'}))?$VARS{'CC'}:'cc';
193
$src_dir=(defined($VARS{'SRC'}))?$VARS{'SRC'}: $platform eq 'copy' ? getcwd() : '.';
194 195 196 197
$bin_dir=(defined($VARS{'BIN'}))?$VARS{'BIN'}:'';

# $bin_dir.=$o causes a core dump on my sparc :-(

198

199 200
$NT=0;

201
push(@INC,"util/pl","pl");
202

B
Ben Laurie 已提交
203
if ($platform eq "auto" || $platform eq 'copy') {
204
	$orig_platform = $platform;
205 206 207 208
	$platform = $mf_platform;
	print STDERR "Imported platform $mf_platform\n";
}

209
if (($platform =~ /VC-(.+)/))
210
	{
211 212
	$FLAVOR=$1;
	$NT = 1 if $1 eq "NT";
213 214
	require 'VC-32.pl';
	}
215 216 217 218
elsif ($platform eq "Mingw32")
	{
	require 'Mingw32.pl';
	}
U
Ulf Möller 已提交
219 220 221 222
elsif ($platform eq "Mingw32-files")
	{
	require 'Mingw32f.pl';
	}
223
elsif ($platform eq "BC-NT")
224 225 226 227
	{
	$bc=1;
	require 'BC-32.pl';
	}
228
elsif ($platform eq "FreeBSD")
229 230 231 232
	{
	require 'unix.pl';
	$cflags='-DTERMIO -D_ANSI_SOURCE -O2 -fomit-frame-pointer';
	}
233
elsif ($platform eq "linux-elf")
234 235 236 237 238
	{
	require "unix.pl";
	require "linux.pl";
	$unix=1;
	}
239 240 241 242 243 244
elsif ($platform eq "ultrix-mips")
	{
	require "unix.pl";
	require "ultrix.pl";
	$unix=1;
	}
245 246 247 248 249
elsif ($platform eq "OS2-EMX")
	{
	$wc=1;
	require 'OS2-EMX.pl';
	}
250
elsif (($platform eq "netware-clib") || ($platform eq "netware-libc") ||
D
Dr. Stephen Henson 已提交
251
       ($platform eq "netware-clib-bsdsock") || ($platform eq "netware-libc-bsdsock"))
R
Richard Levitte 已提交
252
	{
253
	$LIBC=1 if $platform eq "netware-libc" || $platform eq "netware-libc-bsdsock";
D
Dr. Stephen Henson 已提交
254
	$BSDSOCK=1 if ($platform eq "netware-libc-bsdsock") || ($platform eq "netware-clib-bsdsock");
R
Richard Levitte 已提交
255 256
	require 'netware.pl';
	}
257 258 259 260 261 262 263 264
else
	{
	require "unix.pl";

	$unix=1;
	$cflags.=' -DTERMIO';
	}

265 266 267 268
$out_dir=(defined($VARS{'OUT'}))?$VARS{'OUT'}:$out_def.($debug?".dbg":"");
$tmp_dir=(defined($VARS{'TMP'}))?$VARS{'TMP'}:$tmp_def.($debug?".dbg":"");
$inc_dir=(defined($VARS{'INC'}))?$VARS{'INC'}:$inc_def;

269 270
$bin_dir=$bin_dir.$o unless ((substr($bin_dir,-1,1) eq $o) || ($bin_dir eq ''));

271 272
$cflags= "$xcflags$cflags" if $xcflags ne "";

273
$cflags.=" -DOPENSSL_NO_IDEA" if $no_idea;
274
$cflags.=" -DOPENSSL_NO_AES"  if $no_aes;
275
$cflags.=" -DOPENSSL_NO_CAMELLIA"  if $no_camellia;
B
Bodo Möller 已提交
276
$cflags.=" -DOPENSSL_NO_SEED" if $no_seed;
277 278 279 280 281 282
$cflags.=" -DOPENSSL_NO_RC2"  if $no_rc2;
$cflags.=" -DOPENSSL_NO_RC4"  if $no_rc4;
$cflags.=" -DOPENSSL_NO_RC5"  if $no_rc5;
$cflags.=" -DOPENSSL_NO_MD2"  if $no_md2;
$cflags.=" -DOPENSSL_NO_MD4"  if $no_md4;
$cflags.=" -DOPENSSL_NO_MD5"  if $no_md5;
R
Rich Salz 已提交
283
$cflags.=" -DOPENSSL_NO_RMD160" if $no_ripemd;
284 285 286 287 288 289 290
$cflags.=" -DOPENSSL_NO_MDC2" if $no_mdc2;
$cflags.=" -DOPENSSL_NO_BF"  if $no_bf;
$cflags.=" -DOPENSSL_NO_CAST" if $no_cast;
$cflags.=" -DOPENSSL_NO_DES"  if $no_des;
$cflags.=" -DOPENSSL_NO_RSA"  if $no_rsa;
$cflags.=" -DOPENSSL_NO_DSA"  if $no_dsa;
$cflags.=" -DOPENSSL_NO_DH"   if $no_dh;
291
$cflags.=" -DOPENSSL_NO_WHIRLPOOL"   if $no_whirlpool;
292 293
$cflags.=" -DOPENSSL_NO_SOCK" if $no_sock;
$cflags.=" -DOPENSSL_NO_SSL3" if $no_ssl3;
B
Ben Laurie 已提交
294
$cflags.=" -DOPENSSL_NO_SRP" if $no_srp;
295
$cflags.=" -DOPENSSL_NO_CMS" if $no_cms;
296
$cflags.=" -DOPENSSL_NO_ERR"  if $no_err;
297
$cflags.=" -DOPENSSL_NO_EC"   if $no_ec;
298
$cflags.=" -DOPENSSL_NO_GOST" if $no_gost;
299
$cflags.=" -DOPENSSL_NO_ENGINE"   if $no_engine;
300
$cflags.=" -DOPENSSL_NO_HW"   if $no_hw;
T
Todd Short 已提交
301
$cflags.=" -DOPENSSL_NO_ASYNC" if $no_async;
302
$cflags.=" -DOPENSSL_NO_AUTOALGINIT" if $no_autoalginit;
303
$cflags.=" -DOPENSSL_FIPS"    if $fips;
D
Dr. Stephen Henson 已提交
304
$cflags.=" -DOPENSSL_NO_JPAKE"    if $no_jpake;
305
$cflags.=" -DOPENSSL_NO_EC2M"    if $no_ec2m;
D
Dr. Stephen Henson 已提交
306 307 308
$cflags.= " -DZLIB" if $zlib_opt;
$cflags.= " -DZLIB_SHARED" if $zlib_opt == 2;

D
Dr. Stephen Henson 已提交
309 310 311 312 313 314 315 316 317
if ($no_static_engine)
	{
	$cflags .= " -DOPENSSL_NO_STATIC_ENGINE";
	}
else
	{
	$cflags .= " -DOPENSSL_NO_DYNAMIC_ENGINE";
	}

318
#$cflags.=" -DRSAref"  if $rsaref ne "";
319

U
Ulf Möller 已提交
320 321 322 323
## if ($unix)
##	{ $cflags="$c_flags" if ($c_flags ne ""); }
##else
	{ $cflags="$c_flags$cflags" if ($c_flags ne ""); }
324

B
Ben Laurie 已提交
325 326 327 328
if ($orig_platform eq 'copy') {
    $cflags = $mf_cflag;
    $cc = $mf_cc;
}
329

330 331
$ex_libs="$l_flags$ex_libs" if ($l_flags ne "");

D
Dr. Stephen Henson 已提交
332

333 334 335
%shlib_ex_cflags=("SSL" => " -DOPENSSL_BUILD_SHLIBSSL",
		  "CRYPTO" => " -DOPENSSL_BUILD_SHLIBCRYPTO");

336 337
if ($msdos)
	{
338
	$banner ="\t\@echo Make sure you have run 'perl Configure $platform' in the\n";
339 340 341 342 343 344 345 346 347
	$banner.="\t\@echo top level directory, if you don't have perl, you will\n";
	$banner.="\t\@echo need to probably edit crypto/bn/bn.h, check the\n";
	$banner.="\t\@echo documentation for details.\n";
	}

# have to do this to allow $(CC) under unix
$link="$bin_dir$link" if ($link !~ /^\$/);

$INSTALLTOP =~ s|/|$o|g;
348
$OPENSSLDIR =~ s|/|$o|g;
349

350 351 352 353 354 355
#############################################
# We parse in input file and 'store' info for later printing.
open(IN,"<$infile") || die "unable to open $infile:$!\n";
$_=<IN>;
for (;;)
	{
356
	s/\s*$//; # was chop, didn't work in mixture of perls for Windows...
357 358 359 360 361 362

	($key,$val)=/^([^=]+)=(.*)/;
	if ($key eq "RELATIVE_DIRECTORY")
		{
		if ($lib ne "")
			{
363 364 365 366 367 368 369 370 371 372 373 374 375 376 377
 			if ($fips && $dir =~ /^fips/)
 				{
 				$uc = "FIPS";
 				}
 			else
 				{
 				$uc=$lib;
 				$uc =~ s/^lib(.*)\.a/$1/;
 				$uc =~ tr/a-z/A-Z/;
				}
			if (($uc ne "FIPS") || $fipscanisterbuild)
				{
				$lib_nam{$uc}=$uc;
				$lib_obj{$uc}.=$libobj." ";
				}
378 379 380 381 382 383 384
			}
		last if ($val eq "FINISHED");
		$lib="";
		$libobj="";
		$dir=$val;
		}

D
Dr. Stephen Henson 已提交
385
	if ($key eq "ZLIB_INCLUDE")
386
		{ $cflags .= " $val" if $val ne "";}
D
Dr. Stephen Henson 已提交
387 388 389 390

	if ($key eq "LIBZLIB")
		{ $zlib_lib = "$val" if $val ne "";}

391 392 393
	if ($key eq "EX_LIBS")
		{ $ex_libs .= " $val" if $val ne "";}

394 395 396 397 398 399 400 401 402
	# There was a condition here before:
	#       !$fipscanisteronly || $dir =~ /^fips/
	# It currently fills no function and needs to be rewritten anyway, so
	# removed for now.
	if ($dir eq "test" && $key eq "EXE")
		{
		foreach my $t (split /\s+/, $val) {
			$test.=&var_add($dir,$t, 0) if $t; }
		}
403

404
	if ($key eq "EXE_OBJ")
D
Dr. Stephen Henson 已提交
405
		{ $e_exe.=&var_add($dir,$val, 0); }
406 407 408 409 410 411

	if ($key eq "LIB")
		{
		$lib=$val;
		$lib =~ s/^.*\/([^\/]+)$/$1/;
		}
412 413 414 415 416 417
	if ($key eq "LIBNAME" && $no_static_engine)
		{
		$lib=$val;
		$lib =~ s/^.*\/([^\/]+)$/$1/;
		$otherlibs .= " $lib";
		}
418 419

	if ($key eq "HEADER")
D
Dr. Stephen Henson 已提交
420
		{ $header.=&var_add($dir,$val, 1); }
421

422 423 424
	if ($key eq "LIBOBJ")
	    {
	    if ($dir ne "engines" || !$no_static_engine)
D
Dr. Stephen Henson 已提交
425
		{ $libobj=&var_add($dir,$val, 0); }
426 427 428
	    else
		{ push(@engines_obj,split(/\s+/,&var_add($dir,$val,0))); }
	    }
D
Dr. Stephen Henson 已提交
429 430
	if ($key eq "LIBNAMES" && $dir eq "engines" && $no_static_engine)
 		{ $engines.=$val }
431

432 433 434 435 436 437 438 439 440 441 442 443 444 445 446
	if ($key eq "FIPS_EX_OBJ")
		{ 
		$fips_ex_obj=&var_add("crypto",$val,0);
		}

	if ($key eq "FIPSLIBDIR")
		{
		$fipslibdir=$val;
		$fipslibdir =~ s/\/$//;
		$fipslibdir =~ s/\//$o/g;
		}

	if ($key eq "BASEADDR")
		{ $baseaddr=$val;}

447 448 449 450 451
	if (!($_=<IN>))
		{ $_="RELATIVE_DIRECTORY=FINISHED\n"; }
	}
close(IN);

D
Dr. Stephen Henson 已提交
452 453 454 455 456 457
if ($orig_platform eq 'copy')
	{
	# Remove opensslconf.h so it doesn't get updated if we configure a
	# different branch.
	$header =~ s/[^ ]+\/opensslconf.h//;
	}
458

459 460 461 462 463 464 465 466
if ($fips)
	{

	foreach (split " ", $fips_ex_obj)
		{
		$fips_exclude_obj{$1} = 1 if (/\/([^\/]*)$/);
		}
	foreach (split " ",
467 468
		"$mf_cpuid_asm $mf_aes_asm $mf_sha_asm $mf_bn_asm " .
		"$mf_des_asm $mf_modes_asm")
469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486
		{
		s/\.o//;
		$fips_exclude_obj{$_} = 1;
		}
	my @ltmp = split " ", $lib_obj{"CRYPTO"};


	$lib_obj{"CRYPTO"} = "";

	foreach(@ltmp)
		{
		if (/\/([^\/]*)$/ && exists $fips_exclude_obj{$1})
			{
			if ($fipscanisterbuild)
				{
				$lib_obj{"FIPS"} .= "$_ ";
				}
			}
487
		elsif (!$fipscanisteronly)
488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536
			{
			$lib_obj{"CRYPTO"} .= "$_ ";
			}
		}

	}

if ($fipscanisterbuild)
	{
	$fips_canister_path = "\$(LIB_D)${o}fipscanister.lib" if $fips_canister_path eq "";
	$fips_premain_c_path = "\$(LIB_D)${o}fips_premain.c";
	}
else
	{
	if ($fips_canister_path eq "")
		{
		$fips_canister_path = "\$(FIPSLIB_D)${o}fipscanister.lib";
		}

	if ($fips_premain_c_path eq "")
		{
		$fips_premain_c_path = "\$(FIPSLIB_D)${o}fips_premain.c";
		}
	}

if ($fips)
	{
	if ($fips_sha1_exe_path eq "")
		{
		$fips_sha1_exe_path =
			"\$(BIN_D)${o}fips_standalone_sha1$exep";
		}
	}
	else
	{
	$fips_sha1_exe_path = "";
	}

if ($fips_premain_dso_exe_path eq "")
	{
	$fips_premain_dso_exe_path = "\$(BIN_D)${o}fips_premain_dso$exep";
	}

#	$ex_build_targets .= "\$(BIN_D)${o}\$(E_PREMAIN_DSO)$exep" if ($fips);

if ($fips)
	{
	if (!$shlib)
		{
537
		$build_targets .= " \$(LIB_D)$o$crypto_compat \$(PREMAIN_DSO_EXE)";
538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559
		$ex_l_libs .= " \$(O_FIPSCANISTER)";
		$ex_libs_dep .= " \$(O_FIPSCANISTER)" if $fipscanisterbuild;
		}
	if ($fipscanisterbuild)
		{
		$fipslibdir = "\$(LIB_D)";
		}
	else
		{
		if ($fipslibdir eq "")
			{
			open (IN, "util/fipslib_path.txt") || fipslib_error();
			$fipslibdir = <IN>;
			chomp $fipslibdir;
			close IN;
			}
		fips_check_files($fipslibdir,
				"fipscanister.lib", "fipscanister.lib.sha1",
				"fips_premain.c", "fips_premain.c.sha1");
		}
	}

560 561 562 563 564 565
if ($fipscanisteronly)
	{
	$build_targets = "\$(O_FIPSCANISTER) \$(T_EXE)";
	$libs_dep = "";
	}

566 567
$cp2 = $cp unless defined $cp2;

568
$extra_install= <<"EOF";
569
	\$(CP) \"include${o}openssl${o}*.\[ch\]\" \"\$(INSTALLTOP)${o}include${o}openssl\"
570 571 572 573 574 575
	\$(CP) \"\$(BIN_D)$o\$(E_EXE)$exep \$(INSTALLTOP)${o}bin\"
	\$(MKDIR) \"\$(OPENSSLDIR)\"
	\$(CP) apps${o}openssl.cnf \"\$(OPENSSLDIR)\"
EOF

if ($fipscanisteronly)
D
Dr. Stephen Henson 已提交
576
	{
577 578 579
	$extra_install = <<"EOF";
	\$(CP) \"\$(O_FIPSCANISTER)\" \"\$(INSTALLTOP)${o}lib\"
	\$(CP) \"\$(O_FIPSCANISTER).sha1\" \"\$(INSTALLTOP)${o}lib\"
580
	\$(CP2) \"fips${o}fips_premain.c\" \"\$(INSTALLTOP)${o}lib\"
581
	\$(CP) \"fips${o}fips_premain.c.sha1\" \"\$(INSTALLTOP)${o}lib\"
582 583
	\$(CP) \"include${o}openssl${o}fips.h\" \"\$(INSTALLTOP)${o}include${o}openssl\"
	\$(CP) \"include${o}openssl${o}fips_rand.h\" \"\$(INSTALLTOP)${o}include${o}openssl\"
584 585 586 587 588 589 590
	\$(CP) "\$(BIN_D)${o}fips_standalone_sha1$exep" \"\$(INSTALLTOP)${o}bin\"
	\$(CP) \"util${o}fipslink.pl\" \"\$(INSTALLTOP)${o}bin\"
EOF
	}
elsif ($shlib)
	{
	$extra_install .= <<"EOF";
591 592 593 594
	\$(CP) \"\$(O_SSL)\" \"\$(INSTALLTOP)${o}bin\"
	\$(CP) \"\$(O_CRYPTO)\" \"\$(INSTALLTOP)${o}bin\"
	\$(CP) \"\$(L_SSL)\" \"\$(INSTALLTOP)${o}lib\"
	\$(CP) \"\$(L_CRYPTO)\" \"\$(INSTALLTOP)${o}lib\"
D
Dr. Stephen Henson 已提交
595 596 597 598
EOF
	if ($no_static_engine)
		{
		$extra_install .= <<"EOF"
599 600
	\$(MKDIR) \"\$(INSTALLTOP)${o}lib${o}engines\"
	\$(CP) \"\$(E_SHLIB)\" \"\$(INSTALLTOP)${o}lib${o}engines\"
D
Dr. Stephen Henson 已提交
601 602 603 604 605
EOF
		}
	}
else
	{
606
	$extra_install .= <<"EOF";
607 608
	\$(CP) \"\$(O_SSL)\" \"\$(INSTALLTOP)${o}lib\"
	\$(CP) \"\$(O_CRYPTO)\" \"\$(INSTALLTOP)${o}lib\"
D
Dr. Stephen Henson 已提交
609
EOF
D
Dr. Stephen Henson 已提交
610
	$ex_libs .= " $zlib_lib" if $zlib_opt == 1;
D
Dr. Stephen Henson 已提交
611 612
	}

D
Dr. Stephen Henson 已提交
613 614
my $asm_def = $orig_platform eq 'copy' ? "" : "ASM=$bin_dir$asm";

615
$defs= <<"EOF";
616
# N.B. You MUST use -j on FreeBSD.
617 618
# This makefile has been automatically generated from the OpenSSL distribution.
# This single makefile will build the complete OpenSSL distribution and
619
# by default leave the 'interesting' output files in .${o}out and the stuff
620 621 622 623 624 625 626 627 628 629
# that needs deleting in .${o}tmp.
# The file was generated by running 'make makefile.one', which
# does a 'make files', which writes all the environment variables from all
# the makefiles to the file call MINFO.  This file is used by
# util${o}mk1mf.pl to generate makefile.one.
# The 'makefile per directory' system suites me when developing this
# library and also so I can 'distribute' indervidual library sections.
# The one monster makefile better suits building in non-unix
# environments.

630 631
EOF

632 633
$defs .= $preamble if defined $preamble;

634
$defs.= <<"EOF";
635
INSTALLTOP=$INSTALLTOP
636
OPENSSLDIR=$OPENSSLDIR
637 638

# Set your compiler options
639
PLATFORM=$platform
640 641 642 643
CC=$bin_dir${cc}
CFLAG=$cflags
APP_CFLAG=$app_cflag
LIB_CFLAG=$lib_cflag
644
SHLIB_CFLAG=$shl_cflag
645 646 647 648 649 650
APP_EX_OBJ=$app_ex_obj
SHLIB_EX_OBJ=$shlib_ex_obj
# add extra libraries to this define, for solaris -lsocket -lnsl would
# be added
EX_LIBS=$ex_libs

651
# The OpenSSL directory
652 653 654 655
SRC_D=$src_dir

LINK=$link
LFLAGS=$lflags
D
 
Dr. Stephen Henson 已提交
656
RSC=$rsc
657
FIPSLINK=\$(PERL) util${o}fipslink.pl
658

B
Ben Laurie 已提交
659
# The output directory for everything interesting
660 661 662 663
OUT_D=$out_dir
# The output directory for all the temporary muck
TMP_D=$tmp_dir

D
Dr. Stephen Henson 已提交
664
PERL=$perl
665
PERLASM_SCHEME=$mf_perlasm_scheme
666
CP=$cp
667
CP2=$cp2
668
RM=$rm
669
MV=$mv
670
RANLIB=$ranlib
U
Ulf Möller 已提交
671
MKDIR=$mkdir
672 673
MKLIB=$bin_dir$mklib
MLFLAGS=$mlflags
D
Dr. Stephen Henson 已提交
674
$asm_def
675

676 677 678 679 680 681 682 683 684 685 686
# FIPS validated module and support file locations

E_PREMAIN_DSO=fips_premain_dso

FIPSLIB_D=$fipslibdir
BASEADDR=$baseaddr
FIPS_PREMAIN_SRC=$fips_premain_c_path
O_FIPSCANISTER=$fips_canister_path
FIPS_SHA1_EXE=$fips_sha1_exe_path
PREMAIN_DSO_EXE=$fips_premain_dso_exe_path

687 688 689 690
######################################################
# You should not need to touch anything below this point
######################################################

691
E_EXE=openssl
692 693 694 695 696 697
SSL=$ssl
CRYPTO=$crypto

# BIN_D  - Binary output directory
# TEST_D - Binary test file output directory
# LIB_D  - library output directory
D
Dr. Stephen Henson 已提交
698
# ENG_D  - dynamic engine output directory
699 700 701
# Note: if you change these point to different directories then uncomment out
# the lines around the 'NB' comment below.
# 
702 703 704
BIN_D=\$(OUT_D)
TEST_D=\$(OUT_D)
LIB_D=\$(OUT_D)
D
Dr. Stephen Henson 已提交
705
ENG_D=\$(OUT_D)
706 707 708 709 710 711 712 713

# INCL_D - local library directory
# OBJ_D  - temp object file directory
OBJ_D=\$(TMP_D)
INCL_D=\$(TMP_D)

O_SSL=     \$(LIB_D)$o$plib\$(SSL)$shlibp
O_CRYPTO=  \$(LIB_D)$o$plib\$(CRYPTO)$shlibp
714 715
SO_SSL=    $plib\$(SSL)$so_shlibp
SO_CRYPTO= $plib\$(CRYPTO)$so_shlibp
716 717
L_SSL=     \$(LIB_D)$o$plib\$(SSL)$libp
L_CRYPTO=  \$(LIB_D)$o$plib\$(CRYPTO)$libp
718

719
L_LIBS= \$(L_SSL) \$(L_CRYPTO) $ex_l_libs
720 721 722 723 724

######################################################
# Don't touch anything below this point
######################################################

725
INC=-I\$(SRC_D)${o}include -I\$(INCL_D) -I\$(SRC_D)${o}crypto${o}include
726 727
APP_CFLAGS=\$(INC) \$(CFLAG) \$(APP_CFLAG)
LIB_CFLAGS=\$(INC) \$(CFLAG) \$(LIB_CFLAG)
728
SHLIB_CFLAGS=\$(INC) \$(CFLAG) \$(LIB_CFLAG) \$(SHLIB_CFLAG)
729
LIBS_DEP=$libs_dep
730 731 732 733 734

#############################################
EOF

$rules=<<"EOF";
735
all: banner \$(TMP_D) \$(BIN_D) \$(TEST_D) \$(LIB_D) headers \$(FIPS_SHA1_EXE) $build_targets
736 737 738 739 740

banner:
$banner

\$(TMP_D):
741
	\$(MKDIR) \"\$(TMP_D)\"
742 743 744 745 746 747
# NB: uncomment out these lines if BIN_D, TEST_D and LIB_D are different
#\$(BIN_D):
#	\$(MKDIR) \$(BIN_D)
#
#\$(TEST_D):
#	\$(MKDIR) \$(TEST_D)
748 749

\$(LIB_D):
750
	\$(MKDIR) \"\$(LIB_D)\"
751

752 753
# This needs to be invoked once, when the makefile is first constructed, or
# after cleaning.
754
init: \$(TMP_D) \$(LIB_D) \$(BIN_D) \$(TEST_D) headers
755

756
headers: \$(HEADER)
757

D
Dr. Stephen Henson 已提交
758
lib: \$(LIBS_DEP) \$(E_SHLIB)
759

760 761
exe: apps tools testapps
apps: \$(BIN_D)$o\$(E_EXE)$exep \$(BIN_D)${o}CA.pl
762
testapps: \$(T_EXE)
763
tools: \$(BIN_D)${o}c_rehash
764

D
Dr. Stephen Henson 已提交
765
install: all
766 767 768 769 770
	\$(MKDIR) \"\$(INSTALLTOP)\"
	\$(MKDIR) \"\$(INSTALLTOP)${o}bin\"
	\$(MKDIR) \"\$(INSTALLTOP)${o}include\"
	\$(MKDIR) \"\$(INSTALLTOP)${o}include${o}openssl\"
	\$(MKDIR) \"\$(INSTALLTOP)${o}lib\"
D
Dr. Stephen Henson 已提交
771 772
$extra_install

773 774 775 776 777 778 779
clean:
	\$(RM) \$(TMP_D)$o*.*

vclean:
	\$(RM) \$(TMP_D)$o*.*
	\$(RM) \$(OUT_D)$o*.*

B
Ben Laurie 已提交
780 781 782 783 784 785
reallyclean:
	\$(RM) -rf \$(TMP_D)
	\$(RM) -rf \$(BIN_D)
	\$(RM) -rf \$(TEST_D)
	\$(RM) -rf \$(LIB_D)

786
EOF
787

788
$rules .= &do_rehash_rule("rehash.time", "certs/demo apps tools");
789
$rules .= &do_test_rule("test", "rehash.time", "run_tests.pl");
790

791
my $platform_cpp_symbol = "MK1MF_PLATFORM_$platform";
D
Dr. Stephen Henson 已提交
792
$platform_cpp_symbol =~ s/-/_/g;
793
if (open(IN,"crypto/buildinf.h"))
794
	{
795
	# Remove entry for this platform in existing file buildinf.h.
796

797
	my $old_buildinf_h = "";
798 799 800 801 802 803 804 805
	while (<IN>)
		{
		if (/^\#ifdef $platform_cpp_symbol$/)
			{
			while (<IN>) { last if (/^\#endif/); }
			}
		else
			{
806
			$old_buildinf_h .= $_;
807 808
			}
		}
B
Bodo Möller 已提交
809
	close(IN);
810

811 812
	open(OUT,">crypto/buildinf.h") || die "Can't open buildinf.h";
	print OUT $old_buildinf_h;
B
Bodo Möller 已提交
813
	close(OUT);
814 815
	}

816
open (OUT,">>crypto/buildinf.h") || die "Can't open buildinf.h";
817
printf OUT <<"EOF";
818
#ifdef $platform_cpp_symbol
819
  /* auto-generated/updated by util/mk1mf.pl for crypto/cversion.c */
820
  #define CFLAGS "compiler: $cc $cflags"
821 822 823 824 825
  #define PLATFORM "$platform"
EOF
printf OUT "  #define DATE \"%s\"\n", scalar gmtime();
printf OUT "#endif\n";
close(OUT);
826

B
Ben Laurie 已提交
827
# Strip off trailing ' '
828 829 830 831 832
foreach (keys %lib_obj) { $lib_obj{$_}=&clean_up_ws($lib_obj{$_}); }
$test=&clean_up_ws($test);
$e_exe=&clean_up_ws($e_exe);
$header=&clean_up_ws($header);

D
Dr. Stephen Henson 已提交
833 834
$defs.=&do_defs("HEADER",$header,"\$(INCL_D)","");
$rules.=&do_copy_rule("\$(INCL_D)",$header,"");
835 836 837 838 839 840 841

$defs.=&do_defs("T_OBJ",$test,"\$(OBJ_D)",$obj);
$rules.=&do_compile_rule("\$(OBJ_D)",$test,"\$(APP_CFLAGS)");

$defs.=&do_defs("E_OBJ",$e_exe,"\$(OBJ_D)",$obj);
$rules.=&do_compile_rule("\$(OBJ_D)",$e_exe,'-DMONOLITH $(APP_CFLAGS)');

842 843 844 845 846 847 848 849 850 851 852 853 854 855
# Special case rules for fips_start and fips_end fips_premain_dso

if ($fips)
	{
	if ($fipscanisterbuild)
		{
		$rules.=&cc_compile_target("\$(OBJ_D)${o}fips_start$obj",
			"fips${o}fips_canister.c",
			"-DFIPS_START \$(SHLIB_CFLAGS)");
		$rules.=&cc_compile_target("\$(OBJ_D)${o}fips_end$obj",
			"fips${o}fips_canister.c", "\$(SHLIB_CFLAGS)");
		}
	$rules.=&cc_compile_target("\$(OBJ_D)${o}fips_standalone_sha1$obj",
		"fips${o}sha${o}fips_standalone_sha1.c",
A
Andy Polyakov 已提交
856
		"\$(APP_CFLAGS)");
857 858
	$rules.=&cc_compile_target("\$(OBJ_D)${o}\$(E_PREMAIN_DSO)$obj",
		"fips${o}fips_premain.c",
A
Andy Polyakov 已提交
859
		"-DFINGERPRINT_PREMAIN_DSO_LOAD \$(APP_CFLAGS)");
860 861
	}

B
Ben Laurie 已提交
862 863 864 865 866 867 868 869 870 871 872 873
sub fix_asm
	{
	my($asm, $dir) = @_;

	$asm = " $asm";
	$asm =~ s/\s+/ $dir\//g;
	$asm =~ s/\.o//g;
	$asm =~ s/^ //;

	return $asm . ' ';
	}

D
Dr. Stephen Henson 已提交
874 875 876
if ($orig_platform eq 'copy') {
	$lib_obj{CRYPTO} .= fix_asm($mf_md5_asm, 'crypto/md5');
	$lib_obj{CRYPTO} .= fix_asm($mf_bn_asm, 'crypto/bn');
877
	# cpuid is included by the crypto dir
B
Ben Laurie 已提交
878
	#$lib_obj{CRYPTO} .= fix_asm($mf_cpuid_asm, 'crypto');
D
Dr. Stephen Henson 已提交
879 880 881 882 883 884
	# AES asm files end up included by the aes dir itself
	#$lib_obj{CRYPTO} .= fix_asm($mf_aes_asm, 'crypto/aes');
	$lib_obj{CRYPTO} .= fix_asm($mf_sha_asm, 'crypto/sha');
	$lib_obj{CRYPTO} .= fix_asm($mf_engines_asm, 'engines');
	$lib_obj{CRYPTO} .= fix_asm($mf_rc4_asm, 'crypto/rc4');
	$lib_obj{CRYPTO} .= fix_asm($mf_modes_asm, 'crypto/modes');
B
Ben Laurie 已提交
885
	$lib_obj{CRYPTO} .= fix_asm($mf_ec_asm, 'crypto/ec');
D
Dr. Stephen Henson 已提交
886
}
B
Ben Laurie 已提交
887

888 889 890
foreach (values %lib_nam)
	{
	$lib_obj=$lib_obj{$_};
891 892
	local($slib)=$shlib;

893
	$defs.=&do_defs(${_}."OBJ",$lib_obj,"\$(OBJ_D)",$obj);
894
	$lib=($slib)?" \$(SHLIB_CFLAGS)".$shlib_ex_cflags{$_}:" \$(LIB_CFLAGS)";
895
	$rules.=&do_compile_rule("\$(OBJ_D)",$lib_obj{$_},$lib);
896 897
	}

D
 
Dr. Stephen Henson 已提交
898
# hack to add version info on MSVC
D
Dr. Stephen Henson 已提交
899
if (($platform eq "VC-WIN32") || ($platform eq "VC-WIN64A")
900
	|| ($platform eq "VC-WIN64I") || ($platform eq "VC-NT")) {
D
 
Dr. Stephen Henson 已提交
901 902 903 904 905 906 907 908 909 910
    $rules.= <<"EOF";
\$(OBJ_D)\\\$(CRYPTO).res: ms\\version32.rc
	\$(RSC) /fo"\$(OBJ_D)\\\$(CRYPTO).res" /d CRYPTO ms\\version32.rc

\$(OBJ_D)\\\$(SSL).res: ms\\version32.rc
	\$(RSC) /fo"\$(OBJ_D)\\\$(SSL).res" /d SSL ms\\version32.rc

EOF
}

911
$defs.=&do_defs("T_EXE",$test,"\$(TEST_D)",$exep);
912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933
foreach (split(/\s+/,$test))
	{
	my $t_libs;
	$t=&bname($_);
	my $ltype;
	# Check to see if test program is FIPS
	if ($fips && /fips/)
		{
		# If fips perform static link to 
		# $(O_FIPSCANISTER)
		$t_libs = "\$(O_FIPSCANISTER)";
		$ltype = 2;
		}
	else
		{
		$t_libs = "\$(L_LIBS)";
		$ltype = 0;
		}

	$tt="\$(OBJ_D)${o}$t${obj}";
	$rules.=&do_link_rule("\$(TEST_D)$o$t$exep",$tt,"\$(LIBS_DEP)","$t_libs \$(EX_LIBS)", $ltype);
	}
934

935
$defs.=&do_defs("E_SHLIB",$engines . $otherlibs,"\$(ENG_D)",$shlibp);
D
Dr. Stephen Henson 已提交
936 937 938

foreach (split(/\s+/,$engines))
	{
939
	my $engine = $_;
940
	my @objs   = grep {/e_$engine/} @engines_obj;
941
	$rules.=&do_compile_rule("\$(OBJ_D)",join(" ",@objs),$lib);
942
	map {$_=~s/.*\/([^\/]+)$/\$(OBJ_D)${o}$1$obj/} @objs;
943
	$rules.= &do_lib_rule(join(" ",@objs),"\$(ENG_D)$o$engine$shlibp","",$shlib,"");
D
Dr. Stephen Henson 已提交
944 945 946 947
	}



948
$rules.= &do_lib_rule("\$(SSLOBJ)","\$(O_SSL)",$ssl,$shlib,"\$(SO_SSL)");
949
#$rules.= &do_lib_rule("\$(CRYPTOOBJ)","\$(O_CRYPTO)",$crypto,$shlib,"\$(SO_CRYPTO)");
950

D
Dr. Stephen Henson 已提交
951
foreach (split(" ",$otherlibs))
952 953 954 955 956 957 958
	{
	my $uc = $_;
	$uc =~ tr /a-z/A-Z/;	
	$rules.= &do_lib_rule("\$(${uc}OBJ)","\$(ENG_D)$o$_$shlibp", "", $shlib, "");

	}

959 960 961 962 963 964 965 966 967 968 969 970
if ($fips)
	{
	if ($shlib)
		{
		$rules.= &do_lib_rule("\$(CRYPTOOBJ) \$(O_FIPSCANISTER)",
				"\$(O_CRYPTO)", "$crypto",
				$shlib, "\$(SO_CRYPTO)", "\$(BASEADDR)");
		}
	else
		{
		$rules.= &do_lib_rule("\$(CRYPTOOBJ)",
			"\$(O_CRYPTO)",$crypto,$shlib,"\$(SO_CRYPTO)", "");
971
		$rules.= &do_lib_rule("\$(CRYPTOOBJ) \$(O_FIPSCANISTER)",
972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006
			"\$(LIB_D)$o$crypto_compat",$crypto,$shlib,"\$(SO_CRYPTO)", "");
		}
	}
	else
	{
	$rules.= &do_lib_rule("\$(CRYPTOOBJ)","\$(O_CRYPTO)",$crypto,$shlib,
							"\$(SO_CRYPTO)");
	}

if ($fips)
	{
	if ($fipscanisterbuild)
		{
		$rules.= &do_rlink_rule("\$(O_FIPSCANISTER)",
					"\$(OBJ_D)${o}fips_start$obj",
					"\$(FIPSOBJ)",
					"\$(OBJ_D)${o}fips_end$obj",
					"\$(FIPS_SHA1_EXE)", "");
		# FIXME
		$rules.=&do_link_rule("\$(FIPS_SHA1_EXE)",
					"\$(OBJ_D)${o}fips_standalone_sha1$obj \$(OBJ_D)${o}sha1dgst$obj $sha1_asm_obj",
					"","\$(EX_LIBS)", 1);
		}
	else
		{
		$rules.=&do_link_rule("\$(FIPS_SHA1_EXE)",
					"\$(OBJ_D)${o}fips_standalone_sha1$obj \$(O_FIPSCANISTER)",
					"","", 1);

		}
	$rules.=&do_link_rule("\$(PREMAIN_DSO_EXE)","\$(OBJ_D)${o}\$(E_PREMAIN_DSO)$obj \$(CRYPTOOBJ) \$(O_FIPSCANISTER)","","\$(EX_LIBS)", 1);
	
	}

$rules.=&do_link_rule("\$(BIN_D)$o\$(E_EXE)$exep","\$(E_OBJ)","\$(LIBS_DEP)","\$(L_LIBS) \$(EX_LIBS)", ($fips && !$shlib) ? 2 : 0);
1007

1008 1009 1010
$rules.=&do_dofile_rule("\$(BIN_D)","c_rehash","tools/c_rehash.in");
$rules.=&do_dofile_rule("\$(BIN_D)","CA.pl","apps/CA.pl.in");

1011
print $defs;
1012 1013 1014 1015 1016

if ($platform eq "linux-elf") {
    print <<"EOF";
# Generate perlasm output files
%.cpp:
N
Nils Larsch 已提交
1017
	(cd \$(\@D)/..; PERL=perl make -f Makefile asm/\$(\@F))
1018 1019
EOF
}
1020 1021 1022 1023 1024 1025 1026 1027 1028
print "###################################################################\n";
print $rules;

###############################################
# strip off any trailing .[och] and append the relative directory
# also remembering to do nothing if we are in one of the dropped
# directories
sub var_add
	{
D
Dr. Stephen Henson 已提交
1029
	local($dir,$val,$keepext)=@_;
1030 1031
	local(@a,$_,$ret);

1032
	return("") if $no_engine && $dir =~ /\/engine/;
1033
	return("") if $no_hw   && $dir =~ /\/hw/;
1034
	return("") if $no_idea && $dir =~ /\/idea/;
1035
	return("") if $no_aes  && $dir =~ /\/aes/;
1036
	return("") if $no_camellia  && $dir =~ /\/camellia/;
B
Bodo Möller 已提交
1037
	return("") if $no_seed && $dir =~ /\/seed/;
1038 1039
	return("") if $no_rc2  && $dir =~ /\/rc2/;
	return("") if $no_rc4  && $dir =~ /\/rc4/;
1040
	return("") if $no_rc5  && $dir =~ /\/rc5/;
1041 1042 1043 1044
	return("") if $no_rsa  && $dir =~ /\/rsa/;
	return("") if $no_rsa  && $dir =~ /^rsaref/;
	return("") if $no_dsa  && $dir =~ /\/dsa/;
	return("") if $no_dh   && $dir =~ /\/dh/;
D
Dr. Stephen Henson 已提交
1045
	return("") if $no_ec   && $dir =~ /\/ec/;
1046
	return("") if $no_cms  && $dir =~ /\/cms/;
D
Dr. Stephen Henson 已提交
1047
	return("") if $no_jpake  && $dir =~ /\/jpake/;
1048
	return("") if !$fips   && $dir =~ /^fips/;
1049 1050 1051 1052 1053 1054 1055 1056 1057 1058
	if ($no_des && $dir =~ /\/des/)
		{
		if ($val =~ /read_pwd/)
			{ return("$dir/read_pwd "); }
		else
			{ return(""); }
		}
	return("") if $no_mdc2 && $dir =~ /\/mdc2/;
	return("") if $no_sock && $dir =~ /\/proxy/;
	return("") if $no_bf   && $dir =~ /\/bf/;
1059
	return("") if $no_cast && $dir =~ /\/cast/;
1060
	return("") if $no_whirlpool && $dir =~ /\/whrlpool/;
1061 1062 1063

	$val =~ s/^\s*(.*)\s*$/$1/;
	@a=split(/\s+/,$val);
D
Dr. Stephen Henson 已提交
1064
	grep(s/\.[och]$//,@a) unless $keepext;
1065 1066 1067

	@a=grep(!/^e_.*_3d$/,@a) if $no_des;
	@a=grep(!/^e_.*_d$/,@a) if $no_des;
1068 1069
	@a=grep(!/^e_.*_ae$/,@a) if $no_idea;
	@a=grep(!/^e_.*_i$/,@a) if $no_aes;
1070
	@a=grep(!/^e_.*_r2$/,@a) if $no_rc2;
1071
	@a=grep(!/^e_.*_r5$/,@a) if $no_rc5;
1072
	@a=grep(!/^e_.*_bf$/,@a) if $no_bf;
1073
	@a=grep(!/^e_.*_c$/,@a) if $no_cast;
1074
	@a=grep(!/^e_rc4$/,@a) if $no_rc4;
1075
	@a=grep(!/^e_camellia$/,@a) if $no_camellia;
B
Bodo Möller 已提交
1076
	@a=grep(!/^e_seed$/,@a) if $no_seed;
1077

D
Dr. Stephen Henson 已提交
1078
	#@a=grep(!/(^s3_)|(^s23_)/,@a) if $no_ssl3;
1079 1080 1081 1082

	@a=grep(!/(_sock$)|(_acpt$)|(_conn$)|(^pxy_)/,@a) if $no_sock;

	@a=grep(!/(^md2)|(_md2$)/,@a) if $no_md2;
1083
	@a=grep(!/(^md4)|(_md4$)/,@a) if $no_md4;
1084
	@a=grep(!/(^md5)|(_md5$)/,@a) if $no_md5;
1085
	@a=grep(!/(rmd)|(ripemd)/,@a) if $no_ripemd;
1086 1087

	@a=grep(!/(^d2i_r_)|(^i2d_r_)/,@a) if $no_rsa;
1088
	@a=grep(!/(^p_open$)/,@a) if $no_rsa;
1089 1090 1091 1092 1093 1094 1095 1096 1097 1098

	@a=grep(!/(m_dss$)|(m_dss1$)/,@a) if $no_dsa;
	@a=grep(!/(^d2i_s_)|(^i2d_s_)|(_dsap$)/,@a) if $no_dsa;

	@a=grep(!/^n_pkey$/,@a) if $no_rsa || $no_rc4;

	@a=grep(!/_dhp$/,@a) if $no_dh;

	@a=grep(!/_mdc2$/,@a) if $no_mdc2;

B
Ben Laurie 已提交
1099 1100
	@a=grep(!/(srp)/,@a) if $no_srp;

1101
	@a=grep(!/^engine$/,@a) if $no_engine;
1102
	@a=grep(!/^hw$/,@a) if $no_hw;
1103
	@a=grep(!/(^rsa$)|(^genrsa$)/,@a) if $no_rsa;
1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126
	@a=grep(!/(^dsa$)|(^gendsa$)|(^dsaparam$)/,@a) if $no_dsa;
	@a=grep(!/(^dh$)|(^gendh$)/,@a) if $no_dh;

	grep($_="$dir/$_",@a);
	@a=grep(!/(^|\/)s_/,@a) if $no_sock;
	@a=grep(!/(^|\/)bio_sock/,@a) if $no_sock;
	$ret=join(' ',@a)." ";
	return($ret);
	}

# change things so that each 'token' is only separated by one space
sub clean_up_ws
	{
	local($w)=@_;

	$w =~ s/^\s*(.*)\s*$/$1/;
	$w =~ s/\s+/ /g;
	return($w);
	}

sub do_defs
	{
	local($var,$files,$location,$postfix)=@_;
1127
	local($_,$ret,$pf);
1128 1129 1130 1131 1132 1133 1134 1135
	local(*OUT,$tmp,$t);

	$files =~ s/\//$o/g if $o ne '/';
	$ret="$var="; 
	$n=1;
	$Vars{$var}.="";
	foreach (split(/ /,$files))
		{
1136
		$orig=$_;
1137 1138 1139 1140 1141 1142
		$_=&bname($_) unless /^\$/;
		if ($n++ == 2)
			{
			$n=0;
			$ret.="\\\n\t";
			}
1143 1144 1145
		if (($_ =~ /bss_file/) && ($postfix eq ".h"))
			{ $pf=".c"; }
		else	{ $pf=$postfix; }
1146
		if ($_ =~ /BN_ASM/)	{ $t="$_ "; }
U
Ulf Möller 已提交
1147
		elsif ($_ =~ /BNCO_ASM/){ $t="$_ "; }
1148
		elsif ($_ =~ /AES_ASM/){ $t="$_ "; }
1149 1150 1151 1152 1153 1154 1155 1156
		elsif ($_ =~ /DES_ENC/)	{ $t="$_ "; }
		elsif ($_ =~ /BF_ENC/)	{ $t="$_ "; }
		elsif ($_ =~ /CAST_ENC/){ $t="$_ "; }
		elsif ($_ =~ /RC4_ENC/)	{ $t="$_ "; }
		elsif ($_ =~ /RC5_ENC/)	{ $t="$_ "; }
		elsif ($_ =~ /MD5_ASM/)	{ $t="$_ "; }
		elsif ($_ =~ /SHA1_ASM/){ $t="$_ "; }
		elsif ($_ =~ /RMD160_ASM/){ $t="$_ "; }
1157
		elsif ($_ =~ /WHIRLPOOL_ASM/){ $t="$_ "; }
D
Dr. Stephen Henson 已提交
1158
		elsif ($_ =~ /CPUID_ASM/){ $t="$_ "; }
1159
		else	{ $t="$location${o}$_$pf "; }
1160 1161 1162 1163

		$Vars{$var}.="$t ";
		$ret.=$t;
		}
D
 
Dr. Stephen Henson 已提交
1164
	# hack to add version info on MSVC
D
Dr. Stephen Henson 已提交
1165
	if ($shlib && (($platform eq "VC-WIN32") || ($platfrom eq "VC-WIN64I") || ($platform eq "VC-WIN64A") || ($platform eq "VC-NT")))
D
 
Dr. Stephen Henson 已提交
1166 1167 1168 1169 1170 1171
		{
		if ($var eq "CRYPTOOBJ")
			{ $ret.="\$(OBJ_D)\\\$(CRYPTO).res "; }
		elsif ($var eq "SSLOBJ")
			{ $ret.="\$(OBJ_D)\\\$(SSL).res "; }
		}
D
Dr. Stephen Henson 已提交
1172
	chomp($ret);
1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183 1184
	$ret.="\n\n";
	return($ret);
	}

# return the name with the leading path removed
sub bname
	{
	local($ret)=@_;
	$ret =~ s/^.*[\\\/]([^\\\/]+)$/$1/;
	return($ret);
	}

1185 1186 1187 1188 1189 1190 1191
# return the leading path
sub dname
	{
	my $ret=shift;
	$ret =~ s/(^.*)[\\\/][^\\\/]+$/$1/;
	return($ret);
	}
1192 1193 1194 1195 1196 1197 1198

##############################################################
# do a rule for each file that says 'compile' to new direcory
# compile the files in '$files' into $to
sub do_compile_rule
	{
	local($to,$files,$ex)=@_;
1199 1200
	local($ret,$_,$n,$d,$s);

1201 1202 1203 1204
	$files =~ s/\//$o/g if $o ne '/';
	foreach (split(/\s+/,$files))
		{
		$n=&bname($_);
1205 1206 1207 1208 1209 1210
		$d=&dname($_);
		if (-f "${_}.c")
			{
			$ret.=&cc_compile_target("$to${o}$n$obj","${_}.c",$ex)
			}
		elsif (-f ($s="${d}${o}asm${o}${n}.pl") or
1211
		       ($s=~s/sha256/sha512/ and -f $s) or
1212 1213 1214 1215 1216 1217 1218 1219 1220
		       -f ($s="${d}${o}${n}.pl"))
			{
			$ret.=&perlasm_compile_target("$to${o}$n$obj",$s,$n);
			}
		elsif (-f ($s="${d}${o}asm${o}${n}.S") or
		       -f ($s="${d}${o}${n}.S"))
			{
			$ret.=&Sasm_compile_target("$to${o}$n$obj",$s,$n);
			}
B
Ben Laurie 已提交
1221 1222 1223 1224 1225
		elsif (defined &special_compile_target and
		       ($s=special_compile_target($_)))
			{
			$ret.=$s;
			}
1226
		else	{ die "no rule for $_"; }
1227 1228 1229 1230 1231 1232
		}
	return($ret);
	}

##############################################################
# do a rule for each file that says 'compile' to new direcory
1233 1234 1235
sub perlasm_compile_target
	{
	my($target,$source,$bname)=@_;
B
Ben Laurie 已提交
1236 1237 1238 1239

	return platform_perlasm_compile_target($target, $source, $bname)
	    if defined &platform_perlasm_compile_target;

1240 1241
	my($ret);
	$bname =~ s/(.*)\.[^\.]$/$1/;
D
Dr. Stephen Henson 已提交
1242
	$ret ="\$(TMP_D)$o$bname$asm_suffix: $source\n";
1243
	$ret.="\t\$(PERL) $source $asmtype \$(CFLAG) >\$\@\n";
1244
	if ($fipscanisteronly)
1245
		{
D
Dr. Stephen Henson 已提交
1246
		$ret .= "\t\$(PERL) util$o.pl . \$@ norunasm \$(CFLAG)\n";
1247 1248
		}
	$ret .= "\n";
D
Dr. Stephen Henson 已提交
1249 1250
	$ret.="$target: \$(TMP_D)$o$bname$asm_suffix\n";
	$ret.="\t\$(ASM) $afile\$\@ \$(TMP_D)$o$bname$asm_suffix\n\n";
1251 1252 1253 1254 1255 1256 1257 1258 1259 1260
	return($ret);
	}

sub Sasm_compile_target
	{
	my($target,$source,$bname)=@_;
	my($ret);

	$bname =~ s/(.*)\.[^\.]$/$1/;
	$ret ="\$(TMP_D)$o$bname.asm: $source\n";
1261 1262 1263
	$ret.="\t\$(CC) -E \$(CFLAG) $source >\$\@\n";
	$ret.="\t\$(PERL) util\\fipsas.pl . \$@ norunasm \$(CFLAG)\n" if $fipscanisteronly;
	$ret.="\n";
1264 1265 1266 1267 1268
	$ret.="$target: \$(TMP_D)$o$bname.asm\n";
	$ret.="\t\$(ASM) $afile\$\@ \$(TMP_D)$o$bname.asm\n\n";
	return($ret);
	}

1269 1270 1271 1272 1273
sub cc_compile_target
	{
	local($target,$source,$ex_flags)=@_;
	local($ret);
	
1274
	$ex_flags.=" -DMK1MF_BUILD -D$platform_cpp_symbol" if ($source =~ /cversion/);
1275 1276
	$target =~ s/\//$o/g if $o ne "/";
	$source =~ s/\//$o/g if $o ne "/";
1277
	$ret ="$target: \$(SRC_D)$o$source\n\t";
B
Ben Laurie 已提交
1278
	$ret.="\$(CC)";
D
Dr. Stephen Henson 已提交
1279 1280
	$ret.= " -MMD" if $orig_platform eq "copy";
	$ret.= " ${ofile}$target $ex_flags -c \$(SRC_D)$o$source\n\n";
1281
	$target =~ s/\.o$/.d/;
D
Dr. Stephen Henson 已提交
1282
	$ret.=".sinclude \"$target\"\n\n" if $orig_platform eq "copy";
1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295
	return($ret);
	}

##############################################################
sub do_asm_rule
	{
	local($target,$src)=@_;
	local($ret,@s,@t,$i);

	$target =~ s/\//$o/g if $o ne "/";
	$src =~ s/\//$o/g if $o ne "/";

	@t=split(/\s+/,$target);
1296 1297
	@s=split(/\s+/,$src);

1298 1299 1300

	for ($i=0; $i<=$#s; $i++)
		{
1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313
		my $objfile = $t[$i];
		my $srcfile = $s[$i];

		if ($perl_asm == 1)
			{
			my $plasm = $objfile;
			$plasm =~ s/${obj}/.pl/;
			$ret.="$srcfile: $plasm\n";
			$ret.="\t\$(PERL) $plasm $asmtype \$(CFLAG) >$srcfile\n\n";
			}

		$ret.="$objfile: $srcfile\n";
		$ret.="\t\$(ASM) $afile$objfile \$(SRC_D)$o$srcfile\n\n";
1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333
		}
	return($ret);
	}

sub do_shlib_rule
	{
	local($n,$def)=@_;
	local($ret,$nn);
	local($t);

	($nn=$n) =~ tr/a-z/A-Z/;
	$ret.="$n.dll: \$(${nn}OBJ)\n";
	if ($vc && $w32)
		{
		$ret.="\t\$(MKSHLIB) $efile$n.dll $def @<<\n  \$(${nn}OBJ_F)\n<<\n";
		}
	$ret.="\n";
	return($ret);
	}

1334 1335 1336 1337 1338 1339
# do a rule for each file that says 'copy' to new direcory on change
sub do_copy_rule
	{
	local($to,$files,$p)=@_;
	local($ret,$_,$n,$pp);
	
1340

1341 1342 1343 1344 1345 1346 1347
	$files =~ s/\//$o/g if $o ne '/';
	foreach (split(/\s+/,$files))
		{
		$n=&bname($_);
		if ($n =~ /bss_file/)
			{ $pp=".c"; }
		else	{ $pp=$p; }
1348
		$ret.="$to${o}$n$pp: \$(SRC_D)$o$_$pp\n\t\$(PERL) \$(SRC_D)${o}util${o}copy-if-different.pl \"\$(SRC_D)$o$_$pp\" \"$to${o}$n$pp\"\n\n";
1349 1350 1351
		}
	return($ret);
	}
1352

1353 1354 1355 1356 1357 1358 1359 1360
sub do_dofile_rule
	{
	(my $to, my $file, my $tmpl) = @_;

	$file =~ s|/|$o|g if $o ne '/';
	return <<"EOF";
$to${o}$file: $tmpl
	\$(PERL) "-I." "-Mconfigdata" util/dofile.pl "$tmpl" > "$to${o}$file.new"
1361
	\$(MV) "$to${o}$file.new" "$to${o}$file"
1362 1363 1364
EOF
	}

1365 1366 1367
# Options picked up from the OPTIONS line in the top level Makefile
# generated by Configure.

1368 1369
sub read_options
	{
1370 1371
	# Many options are handled in a similar way. In particular
	# no-xxx sets zero or more scalars to 1.
1372 1373 1374 1375
	# Process these using the %valid_options hash containing the option
	# name and reference to the scalars to set. In some cases the option
	# needs no special handling and can be ignored: this is done by
	# setting the value to 0.
1376 1377 1378 1379 1380 1381 1382

	my %valid_options = (
		"no-rc2" => \$no_rc2,
		"no-rc4" => \$no_rc4,
		"no-rc5" => \$no_rc5,
		"no-idea" => \$no_idea,
		"no-aes" => \$no_aes,
1383
		"no-camellia" => \$no_camellia,
B
Bodo Möller 已提交
1384
		"no-seed" => \$no_seed,
1385 1386 1387 1388 1389 1390 1391 1392
		"no-des" => \$no_des,
		"no-bf" => \$no_bf,
		"no-cast" => \$no_cast,
		"no-md2" => \$no_md2,
		"no-md4" => \$no_md4,
		"no-md5" => \$no_md5,
		"no-ripemd" => \$no_ripemd,
		"no-mdc2" => \$no_mdc2,
1393
		"no-whirlpool" => \$no_whirlpool,
1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404
		"no-patents" => 
			[\$no_rc2, \$no_rc4, \$no_rc5, \$no_idea, \$no_rsa],
		"no-rsa" => \$no_rsa,
		"no-dsa" => \$no_dsa,
		"no-dh" => \$no_dh,
		"no-asm" => \$no_asm,
		"nasm" => \$nasm,
		"nw-nasm" => \$nw_nasm,
		"nw-mwasm" => \$nw_mwasm,
		"gaswin" => \$gaswin,
		"no-ssl3" => \$no_ssl3,
1405
		"no-ssl3-method" => 0,
B
Ben Laurie 已提交
1406
		"no-srp" => \$no_srp,
1407
		"no-cms" => \$no_cms,
D
Dr. Stephen Henson 已提交
1408
		"no-jpake" => \$no_jpake,
1409
		"no-ec2m" => \$no_ec2m,
D
Dr. Stephen Henson 已提交
1410
		"no-ec_nistp_64_gcc_128" => 0,
1411 1412 1413
		"no-err" => \$no_err,
		"no-sock" => \$no_sock,
		"no-ec" => \$no_ec,
1414
		"no-gost" => \$no_gost,
1415
		"no-engine" => \$no_engine,
1416
		"no-egd" => 0,
1417
		"no-hw" => \$no_hw,
T
Todd Short 已提交
1418
		"no-async" => \$no_async,
1419
		"no-autoalginit" => \$no_autoalginit,
1420 1421
		"just-ssl" =>
			[\$no_rc2, \$no_idea, \$no_des, \$no_bf, \$no_cast,
R
Rich Salz 已提交
1422
			  \$no_md2, \$no_mdc2, \$no_dsa, \$no_dh,
K
Kurt Roeckx 已提交
1423
			  \$no_err, \$no_ripemd, \$no_rc5,
B
Ben Laurie 已提交
1424
			  \$no_aes, \$no_camellia, \$no_seed, \$no_srp],
1425 1426 1427
		"rsaref" => 0,
		"gcc" => \$gcc,
		"debug" => \$debug,
1428
		"--debug" => \$debug,
1429 1430
		"profile" => \$profile,
		"shlib" => \$shlib,
1431
		"dll" => \$shlib,
1432
		"shared" => 0,
D
Dr. Stephen Henson 已提交
1433
		"no-sctp" => 0,
M
Matt Caswell 已提交
1434
		"no-srtp" => 0,
1435
		"no-gmp" => 0,
1436
		"no-rfc3779" => 0,
D
Dr. Stephen Henson 已提交
1437
		"no-montasm" => 0,
1438
		"no-shared" => 0,
D
Dr. Stephen Henson 已提交
1439
		"no-store" => 0,
1440 1441
		"no-zlib" => 0,
		"no-zlib-dynamic" => 0,
1442
		"no-ssl-trace" => 0,
1443
		"no-unit-test" => 0,
M
Matt Caswell 已提交
1444
		"no-deprecated" => 0,
M
Matt Caswell 已提交
1445
		"no-ocb" => 0,
D
Dr. Stephen Henson 已提交
1446
		"no-crypto-mdebug" => 0,
1447 1448
		"fips" => \$fips,
		"fipscanisterbuild" => [\$fips, \$fipscanisterbuild],
1449
		"fipscanisteronly" => [\$fips, \$fipscanisterbuild, \$fipscanisteronly],
1450
		"fipscheck" => [\$fips, \$fipscanisterbuild, \$fipscanisteronly],
1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466
		);

	if (exists $valid_options{$_})
		{
		my $r = $valid_options{$_};
		if ( ref $r eq "SCALAR")
			{ $$r = 1;}
		elsif ( ref $r eq "ARRAY")
			{
			my $r2;
			foreach $r2 (@$r)
				{
				$$r2 = 1;
				}
			}
		}
1467
	elsif (/^no-comp$/) { $xcflags = "-DOPENSSL_NO_COMP $xcflags"; }
D
Dr. Stephen Henson 已提交
1468
	elsif (/^enable-zlib$/) { $zlib_opt = 1 if $zlib_opt == 0 }
1469 1470
	elsif (/^enable-zlib-dynamic$/)
		{
D
Dr. Stephen Henson 已提交
1471
		$zlib_opt = 2;
1472
		}
D
Dr. Stephen Henson 已提交
1473 1474 1475 1476 1477 1478 1479 1480
	elsif (/^no-static-engine/)
		{
		$no_static_engine = 1;
		}
	elsif (/^enable-static-engine/)
		{
		$no_static_engine = 0;
		}
1481 1482 1483 1484 1485 1486 1487 1488 1489 1490
	# There are also enable-xxx options which correspond to
	# the no-xxx. Since the scalars are enabled by default
	# these can be ignored.
	elsif (/^enable-/)
		{
		my $t = $_;
		$t =~ s/^enable/no/;
		if (exists $valid_options{$t})
			{return 1;}
		return 0;
1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502
		}
	# experimental-xxx is mostly like enable-xxx, but opensslconf.v
	# will still set OPENSSL_NO_xxx unless we set OPENSSL_EXPERIMENTAL_xxx.
	# (No need to fail if we don't know the algorithm -- this is for adventurous users only.)
	elsif (/^experimental-/)
		{
		my $algo, $ALGO;
		($algo = $_) =~ s/^experimental-//;
		($ALGO = $algo) =~ tr/[a-z]/[A-Z]/;

		$xcflags="-DOPENSSL_EXPERIMENTAL_$ALGO $xcflags";
		
1503
		}
1504 1505 1506 1507
	elsif (/^([^=]*)=(.*)$/){ $VARS{$1}=$2; }
	elsif (/^-[lL].*$/)	{ $l_flags.="$_ "; }
	elsif ((!/^-help/) && (!/^-h/) && (!/^-\?/) && /^-.*$/)
		{ $c_flags.="$_ "; }
1508 1509
	else { return(0); }
	return(1);
1510
	}
1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538

sub fipslib_error
	{
	print STDERR "***FIPS module directory sanity check failed***\n";
	print STDERR "FIPS module build failed, or was deleted\n";
	print STDERR "Please rebuild FIPS module.\n"; 
	exit 1;
	}

sub fips_check_files
	{
	my $dir = shift @_;
	my $ret = 1;
	if (!-d $dir)
		{
		print STDERR "FIPS module directory $dir does not exist\n";
		fipslib_error();
		}
	foreach (@_)
		{
		if (!-f "$dir${o}$_")
			{
			print STDERR "FIPS module file $_ does not exist!\n";
			$ret = 0;
			}
		}
	fipslib_error() if ($ret == 0);
	}