mk1mf.pl 38.2 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/ssl";
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 53 54 55 56 57 58 59 60 61 62 63 64 65
	CFLAG	       => \$mf_cflag,
	DEPFLAG	       => \$mf_depflag,
	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 87
$debug = 1 if $mf_platform =~ /^debug-/;

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


95
die "Makefile is not the toplevel Makefile!\n" if $ssl_version eq "";
96

97 98 99
$infile="MINFO";

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

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

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

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

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

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

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

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

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

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

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

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

196

197 198
$NT=0;

199
push(@INC,"util/pl","pl");
200

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

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

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

263 264 265 266
$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;

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

269 270
$cflags= "$xcflags$cflags" if $xcflags ne "";

271
$cflags.=" -DOPENSSL_NO_IDEA" if $no_idea;
272
$cflags.=" -DOPENSSL_NO_AES"  if $no_aes;
273
$cflags.=" -DOPENSSL_NO_CAMELLIA"  if $no_camellia;
B
Bodo Möller 已提交
274
$cflags.=" -DOPENSSL_NO_SEED" if $no_seed;
275 276 277 278 279 280
$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 已提交
281
$cflags.=" -DOPENSSL_NO_RMD160" if $no_ripemd;
282 283 284 285 286 287 288
$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;
289
$cflags.=" -DOPENSSL_NO_WHIRLPOOL"   if $no_whirlpool;
290 291
$cflags.=" -DOPENSSL_NO_SOCK" if $no_sock;
$cflags.=" -DOPENSSL_NO_SSL3" if $no_ssl3;
B
Ben Laurie 已提交
292
$cflags.=" -DOPENSSL_NO_SRP" if $no_srp;
293
$cflags.=" -DOPENSSL_NO_CMS" if $no_cms;
294
$cflags.=" -DOPENSSL_NO_ERR"  if $no_err;
295
$cflags.=" -DOPENSSL_NO_EC"   if $no_ec;
296
$cflags.=" -DOPENSSL_NO_GOST" if $no_gost;
297
$cflags.=" -DOPENSSL_NO_ENGINE"   if $no_engine;
298
$cflags.=" -DOPENSSL_NO_HW"   if $no_hw;
299
$cflags.=" -DOPENSSL_FIPS"    if $fips;
D
Dr. Stephen Henson 已提交
300
$cflags.=" -DOPENSSL_NO_JPAKE"    if $no_jpake;
301
$cflags.=" -DOPENSSL_NO_EC2M"    if $no_ec2m;
D
Dr. Stephen Henson 已提交
302 303 304
$cflags.= " -DZLIB" if $zlib_opt;
$cflags.= " -DZLIB_SHARED" if $zlib_opt == 2;

D
Dr. Stephen Henson 已提交
305 306 307 308 309 310 311 312 313
if ($no_static_engine)
	{
	$cflags .= " -DOPENSSL_NO_STATIC_ENGINE";
	}
else
	{
	$cflags .= " -DOPENSSL_NO_DYNAMIC_ENGINE";
	}

314
#$cflags.=" -DRSAref"  if $rsaref ne "";
315

U
Ulf Möller 已提交
316 317 318 319
## if ($unix)
##	{ $cflags="$c_flags" if ($c_flags ne ""); }
##else
	{ $cflags="$c_flags$cflags" if ($c_flags ne ""); }
320

B
Ben Laurie 已提交
321 322 323 324
if ($orig_platform eq 'copy') {
    $cflags = $mf_cflag;
    $cc = $mf_cc;
}
325

326 327
$ex_libs="$l_flags$ex_libs" if ($l_flags ne "");

D
Dr. Stephen Henson 已提交
328

329 330 331
%shlib_ex_cflags=("SSL" => " -DOPENSSL_BUILD_SHLIBSSL",
		  "CRYPTO" => " -DOPENSSL_BUILD_SHLIBCRYPTO");

332 333
if ($msdos)
	{
334
	$banner ="\t\@echo Make sure you have run 'perl Configure $platform' in the\n";
335 336 337 338 339 340 341 342 343
	$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;
344
$OPENSSLDIR =~ s|/|$o|g;
345

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

	($key,$val)=/^([^=]+)=(.*)/;
	if ($key eq "RELATIVE_DIRECTORY")
		{
		if ($lib ne "")
			{
359 360 361 362 363 364 365 366 367 368 369 370 371 372 373
 			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." ";
				}
374 375 376 377 378 379 380
			}
		last if ($val eq "FINISHED");
		$lib="";
		$libobj="";
		$dir=$val;
		}

D
Dr. Stephen Henson 已提交
381
	if ($key eq "ZLIB_INCLUDE")
382
		{ $cflags .= " $val" if $val ne "";}
D
Dr. Stephen Henson 已提交
383 384 385 386

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

387 388 389
	if ($key eq "EX_LIBS")
		{ $ex_libs .= " $val" if $val ne "";}

390 391 392 393 394 395 396 397 398
	# 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; }
		}
399

400
	if ($key eq "EXE_OBJ")
D
Dr. Stephen Henson 已提交
401
		{ $e_exe.=&var_add($dir,$val, 0); }
402 403 404 405 406 407

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

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

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

428 429 430 431 432 433 434 435 436 437 438 439 440 441 442
	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;}

443 444 445 446 447
	if (!($_=<IN>))
		{ $_="RELATIVE_DIRECTORY=FINISHED\n"; }
	}
close(IN);

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

455 456 457 458 459 460 461 462
if ($fips)
	{

	foreach (split " ", $fips_ex_obj)
		{
		$fips_exclude_obj{$1} = 1 if (/\/([^\/]*)$/);
		}
	foreach (split " ",
463 464
		"$mf_cpuid_asm $mf_aes_asm $mf_sha_asm $mf_bn_asm " .
		"$mf_des_asm $mf_modes_asm")
465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482
		{
		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"} .= "$_ ";
				}
			}
483
		elsif (!$fipscanisteronly)
484 485 486 487 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
			{
			$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)
		{
533
		$build_targets .= " \$(LIB_D)$o$crypto_compat \$(PREMAIN_DSO_EXE)";
534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555
		$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");
		}
	}

556 557 558 559 560 561
if ($fipscanisteronly)
	{
	$build_targets = "\$(O_FIPSCANISTER) \$(T_EXE)";
	$libs_dep = "";
	}

562 563
$cp2 = $cp unless defined $cp2;

564
$extra_install= <<"EOF";
565
	\$(CP) \"include${o}openssl${o}*.\[ch\]\" \"\$(INSTALLTOP)${o}include${o}openssl\"
566 567 568 569 570 571
	\$(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 已提交
572
	{
573 574 575
	$extra_install = <<"EOF";
	\$(CP) \"\$(O_FIPSCANISTER)\" \"\$(INSTALLTOP)${o}lib\"
	\$(CP) \"\$(O_FIPSCANISTER).sha1\" \"\$(INSTALLTOP)${o}lib\"
576
	\$(CP2) \"fips${o}fips_premain.c\" \"\$(INSTALLTOP)${o}lib\"
577
	\$(CP) \"fips${o}fips_premain.c.sha1\" \"\$(INSTALLTOP)${o}lib\"
578 579
	\$(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\"
580 581 582 583 584 585 586
	\$(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";
587 588 589 590
	\$(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 已提交
591 592 593 594
EOF
	if ($no_static_engine)
		{
		$extra_install .= <<"EOF"
595 596
	\$(MKDIR) \"\$(INSTALLTOP)${o}lib${o}engines\"
	\$(CP) \"\$(E_SHLIB)\" \"\$(INSTALLTOP)${o}lib${o}engines\"
D
Dr. Stephen Henson 已提交
597 598 599 600 601
EOF
		}
	}
else
	{
602
	$extra_install .= <<"EOF";
603 604
	\$(CP) \"\$(O_SSL)\" \"\$(INSTALLTOP)${o}lib\"
	\$(CP) \"\$(O_CRYPTO)\" \"\$(INSTALLTOP)${o}lib\"
D
Dr. Stephen Henson 已提交
605
EOF
D
Dr. Stephen Henson 已提交
606
	$ex_libs .= " $zlib_lib" if $zlib_opt == 1;
D
Dr. Stephen Henson 已提交
607 608
	}

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

611
$defs= <<"EOF";
612
# N.B. You MUST use -j on FreeBSD.
613 614
# This makefile has been automatically generated from the OpenSSL distribution.
# This single makefile will build the complete OpenSSL distribution and
615
# by default leave the 'interesting' output files in .${o}out and the stuff
616 617 618 619 620 621 622 623 624 625
# 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.

626 627
EOF

628 629
$defs .= $preamble if defined $preamble;

630
$defs.= <<"EOF";
631
INSTALLTOP=$INSTALLTOP
632
OPENSSLDIR=$OPENSSLDIR
633 634

# Set your compiler options
635
PLATFORM=$platform
636 637 638 639
CC=$bin_dir${cc}
CFLAG=$cflags
APP_CFLAG=$app_cflag
LIB_CFLAG=$lib_cflag
640
SHLIB_CFLAG=$shl_cflag
641 642 643 644 645 646
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

647
# The OpenSSL directory
648 649 650 651
SRC_D=$src_dir

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

B
Ben Laurie 已提交
655
# The output directory for everything interesting
656 657 658 659
OUT_D=$out_dir
# The output directory for all the temporary muck
TMP_D=$tmp_dir

D
Dr. Stephen Henson 已提交
660
PERL=$perl
661
PERLASM_SCHEME=$mf_perlasm_scheme
662
CP=$cp
663
CP2=$cp2
664 665
RM=$rm
RANLIB=$ranlib
U
Ulf Möller 已提交
666
MKDIR=$mkdir
667 668
MKLIB=$bin_dir$mklib
MLFLAGS=$mlflags
D
Dr. Stephen Henson 已提交
669
$asm_def
670

671 672 673 674 675 676 677 678 679 680 681
# 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

682 683 684 685
######################################################
# You should not need to touch anything below this point
######################################################

686
E_EXE=openssl
687 688 689 690 691 692
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 已提交
693
# ENG_D  - dynamic engine output directory
694 695 696
# Note: if you change these point to different directories then uncomment out
# the lines around the 'NB' comment below.
# 
697 698 699
BIN_D=\$(OUT_D)
TEST_D=\$(OUT_D)
LIB_D=\$(OUT_D)
D
Dr. Stephen Henson 已提交
700
ENG_D=\$(OUT_D)
701 702 703 704 705 706 707 708

# 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
709 710
SO_SSL=    $plib\$(SSL)$so_shlibp
SO_CRYPTO= $plib\$(CRYPTO)$so_shlibp
711 712
L_SSL=     \$(LIB_D)$o$plib\$(SSL)$libp
L_CRYPTO=  \$(LIB_D)$o$plib\$(CRYPTO)$libp
713

714
L_LIBS= \$(L_SSL) \$(L_CRYPTO) $ex_l_libs
715 716 717 718 719

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

720
INC=-I\$(SRC_D)${o}include -I\$(INCL_D) -I\$(SRC_D)${o}crypto${o}include
721 722
APP_CFLAGS=\$(INC) \$(CFLAG) \$(APP_CFLAG)
LIB_CFLAGS=\$(INC) \$(CFLAG) \$(LIB_CFLAG)
723
SHLIB_CFLAGS=\$(INC) \$(CFLAG) \$(LIB_CFLAG) \$(SHLIB_CFLAG)
724
LIBS_DEP=$libs_dep
725 726 727 728 729

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

$rules=<<"EOF";
730
all: banner \$(TMP_D) \$(BIN_D) \$(TEST_D) \$(LIB_D) headers \$(FIPS_SHA1_EXE) $build_targets
731 732 733 734 735

banner:
$banner

\$(TMP_D):
736
	\$(MKDIR) \"\$(TMP_D)\"
737 738 739 740 741 742
# 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)
743 744

\$(LIB_D):
745
	\$(MKDIR) \"\$(LIB_D)\"
746

747 748
# This needs to be invoked once, when the makefile is first constructed, or
# after cleaning.
749
init: \$(TMP_D) \$(LIB_D) \$(BIN_D) \$(TEST_D) headers
750

751
headers: \$(HEADER)
752

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

755 756 757
exe: apps testapps
apps: \$(BIN_D)$o\$(E_EXE)$exep
testapps: \$(T_EXE)
758

D
Dr. Stephen Henson 已提交
759
install: all
760 761 762 763 764
	\$(MKDIR) \"\$(INSTALLTOP)\"
	\$(MKDIR) \"\$(INSTALLTOP)${o}bin\"
	\$(MKDIR) \"\$(INSTALLTOP)${o}include\"
	\$(MKDIR) \"\$(INSTALLTOP)${o}include${o}openssl\"
	\$(MKDIR) \"\$(INSTALLTOP)${o}lib\"
D
Dr. Stephen Henson 已提交
765 766
$extra_install

767 768 769 770 771 772 773
clean:
	\$(RM) \$(TMP_D)$o*.*

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

B
Ben Laurie 已提交
774 775 776 777 778 779
reallyclean:
	\$(RM) -rf \$(TMP_D)
	\$(RM) -rf \$(BIN_D)
	\$(RM) -rf \$(TEST_D)
	\$(RM) -rf \$(LIB_D)

780
EOF
781

782 783
$rules .= &do_rehash_rule("rehash.time", "certs apps");
$rules .= &do_test_rule("test", "rehash.time", "run_tests.pl");
784

785
my $platform_cpp_symbol = "MK1MF_PLATFORM_$platform";
D
Dr. Stephen Henson 已提交
786
$platform_cpp_symbol =~ s/-/_/g;
787
if (open(IN,"crypto/buildinf.h"))
788
	{
789
	# Remove entry for this platform in existing file buildinf.h.
790

791
	my $old_buildinf_h = "";
792 793 794 795 796 797 798 799
	while (<IN>)
		{
		if (/^\#ifdef $platform_cpp_symbol$/)
			{
			while (<IN>) { last if (/^\#endif/); }
			}
		else
			{
800
			$old_buildinf_h .= $_;
801 802
			}
		}
B
Bodo Möller 已提交
803
	close(IN);
804

805 806
	open(OUT,">crypto/buildinf.h") || die "Can't open buildinf.h";
	print OUT $old_buildinf_h;
B
Bodo Möller 已提交
807
	close(OUT);
808 809
	}

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

B
Ben Laurie 已提交
821
# Strip off trailing ' '
822 823 824 825 826
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 已提交
827 828
$defs.=&do_defs("HEADER",$header,"\$(INCL_D)","");
$rules.=&do_copy_rule("\$(INCL_D)",$header,"");
829 830 831 832 833 834 835

$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)');

836 837 838 839 840 841 842 843 844 845 846 847 848 849
# 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 已提交
850
		"\$(APP_CFLAGS)");
851 852
	$rules.=&cc_compile_target("\$(OBJ_D)${o}\$(E_PREMAIN_DSO)$obj",
		"fips${o}fips_premain.c",
A
Andy Polyakov 已提交
853
		"-DFINGERPRINT_PREMAIN_DSO_LOAD \$(APP_CFLAGS)");
854 855
	}

B
Ben Laurie 已提交
856 857 858 859 860 861 862 863 864 865 866 867
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 已提交
868 869 870
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');
871
	# cpuid is included by the crypto dir
B
Ben Laurie 已提交
872
	#$lib_obj{CRYPTO} .= fix_asm($mf_cpuid_asm, 'crypto');
D
Dr. Stephen Henson 已提交
873 874 875 876 877 878
	# 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 已提交
879
	$lib_obj{CRYPTO} .= fix_asm($mf_ec_asm, 'crypto/ec');
D
Dr. Stephen Henson 已提交
880
}
B
Ben Laurie 已提交
881

882 883 884
foreach (values %lib_nam)
	{
	$lib_obj=$lib_obj{$_};
885 886
	local($slib)=$shlib;

887
	$defs.=&do_defs(${_}."OBJ",$lib_obj,"\$(OBJ_D)",$obj);
888
	$lib=($slib)?" \$(SHLIB_CFLAGS)".$shlib_ex_cflags{$_}:" \$(LIB_CFLAGS)";
889
	$rules.=&do_compile_rule("\$(OBJ_D)",$lib_obj{$_},$lib);
890 891
	}

D
 
Dr. Stephen Henson 已提交
892
# hack to add version info on MSVC
D
Dr. Stephen Henson 已提交
893
if (($platform eq "VC-WIN32") || ($platform eq "VC-WIN64A")
894
	|| ($platform eq "VC-WIN64I") || ($platform eq "VC-NT")) {
D
 
Dr. Stephen Henson 已提交
895 896 897 898 899 900 901 902 903 904
    $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
}

905
$defs.=&do_defs("T_EXE",$test,"\$(TEST_D)",$exep);
906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927
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);
	}
928

929
$defs.=&do_defs("E_SHLIB",$engines . $otherlibs,"\$(ENG_D)",$shlibp);
D
Dr. Stephen Henson 已提交
930 931 932

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



942
$rules.= &do_lib_rule("\$(SSLOBJ)","\$(O_SSL)",$ssl,$shlib,"\$(SO_SSL)");
943
#$rules.= &do_lib_rule("\$(CRYPTOOBJ)","\$(O_CRYPTO)",$crypto,$shlib,"\$(SO_CRYPTO)");
944

D
Dr. Stephen Henson 已提交
945
foreach (split(" ",$otherlibs))
946 947 948 949 950 951 952
	{
	my $uc = $_;
	$uc =~ tr /a-z/A-Z/;	
	$rules.= &do_lib_rule("\$(${uc}OBJ)","\$(ENG_D)$o$_$shlibp", "", $shlib, "");

	}

953 954 955 956 957 958 959 960 961 962 963 964
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)", "");
965
		$rules.= &do_lib_rule("\$(CRYPTOOBJ) \$(O_FIPSCANISTER)",
966 967 968 969 970 971 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
			"\$(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);
1001 1002

print $defs;
1003 1004 1005 1006 1007

if ($platform eq "linux-elf") {
    print <<"EOF";
# Generate perlasm output files
%.cpp:
N
Nils Larsch 已提交
1008
	(cd \$(\@D)/..; PERL=perl make -f Makefile asm/\$(\@F))
1009 1010
EOF
}
1011 1012 1013 1014 1015 1016 1017 1018 1019
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 已提交
1020
	local($dir,$val,$keepext)=@_;
1021 1022
	local(@a,$_,$ret);

1023
	return("") if $no_engine && $dir =~ /\/engine/;
1024
	return("") if $no_hw   && $dir =~ /\/hw/;
1025
	return("") if $no_idea && $dir =~ /\/idea/;
1026
	return("") if $no_aes  && $dir =~ /\/aes/;
1027
	return("") if $no_camellia  && $dir =~ /\/camellia/;
B
Bodo Möller 已提交
1028
	return("") if $no_seed && $dir =~ /\/seed/;
1029 1030
	return("") if $no_rc2  && $dir =~ /\/rc2/;
	return("") if $no_rc4  && $dir =~ /\/rc4/;
1031
	return("") if $no_rc5  && $dir =~ /\/rc5/;
1032 1033 1034 1035
	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 已提交
1036
	return("") if $no_ec   && $dir =~ /\/ec/;
1037
	return("") if $no_gost   && $dir =~ /\/ccgost/;
1038
	return("") if $no_cms  && $dir =~ /\/cms/;
D
Dr. Stephen Henson 已提交
1039
	return("") if $no_jpake  && $dir =~ /\/jpake/;
1040
	return("") if !$fips   && $dir =~ /^fips/;
1041 1042 1043 1044 1045 1046 1047 1048 1049 1050
	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/;
1051
	return("") if $no_cast && $dir =~ /\/cast/;
1052
	return("") if $no_whirlpool && $dir =~ /\/whrlpool/;
1053 1054 1055

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

	@a=grep(!/^e_.*_3d$/,@a) if $no_des;
	@a=grep(!/^e_.*_d$/,@a) if $no_des;
1060 1061
	@a=grep(!/^e_.*_ae$/,@a) if $no_idea;
	@a=grep(!/^e_.*_i$/,@a) if $no_aes;
1062
	@a=grep(!/^e_.*_r2$/,@a) if $no_rc2;
1063
	@a=grep(!/^e_.*_r5$/,@a) if $no_rc5;
1064
	@a=grep(!/^e_.*_bf$/,@a) if $no_bf;
1065
	@a=grep(!/^e_.*_c$/,@a) if $no_cast;
1066
	@a=grep(!/^e_rc4$/,@a) if $no_rc4;
1067
	@a=grep(!/^e_camellia$/,@a) if $no_camellia;
B
Bodo Möller 已提交
1068
	@a=grep(!/^e_seed$/,@a) if $no_seed;
1069

D
Dr. Stephen Henson 已提交
1070
	#@a=grep(!/(^s3_)|(^s23_)/,@a) if $no_ssl3;
1071 1072 1073 1074

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

	@a=grep(!/(^md2)|(_md2$)/,@a) if $no_md2;
1075
	@a=grep(!/(^md4)|(_md4$)/,@a) if $no_md4;
1076
	@a=grep(!/(^md5)|(_md5$)/,@a) if $no_md5;
1077
	@a=grep(!/(rmd)|(ripemd)/,@a) if $no_ripemd;
1078 1079

	@a=grep(!/(^d2i_r_)|(^i2d_r_)/,@a) if $no_rsa;
1080
	@a=grep(!/(^p_open$)/,@a) if $no_rsa;
1081 1082 1083 1084 1085 1086 1087 1088 1089 1090

	@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 已提交
1091 1092
	@a=grep(!/(srp)/,@a) if $no_srp;

1093
	@a=grep(!/^engine$/,@a) if $no_engine;
1094
	@a=grep(!/^hw$/,@a) if $no_hw;
1095
	@a=grep(!/(^rsa$)|(^genrsa$)/,@a) if $no_rsa;
1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118
	@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)=@_;
1119
	local($_,$ret,$pf);
1120 1121 1122 1123 1124 1125 1126 1127
	local(*OUT,$tmp,$t);

	$files =~ s/\//$o/g if $o ne '/';
	$ret="$var="; 
	$n=1;
	$Vars{$var}.="";
	foreach (split(/ /,$files))
		{
1128
		$orig=$_;
1129 1130 1131 1132 1133 1134
		$_=&bname($_) unless /^\$/;
		if ($n++ == 2)
			{
			$n=0;
			$ret.="\\\n\t";
			}
1135 1136 1137
		if (($_ =~ /bss_file/) && ($postfix eq ".h"))
			{ $pf=".c"; }
		else	{ $pf=$postfix; }
1138
		if ($_ =~ /BN_ASM/)	{ $t="$_ "; }
U
Ulf Möller 已提交
1139
		elsif ($_ =~ /BNCO_ASM/){ $t="$_ "; }
1140
		elsif ($_ =~ /AES_ASM/){ $t="$_ "; }
1141 1142 1143 1144 1145 1146 1147 1148
		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="$_ "; }
1149
		elsif ($_ =~ /WHIRLPOOL_ASM/){ $t="$_ "; }
D
Dr. Stephen Henson 已提交
1150
		elsif ($_ =~ /CPUID_ASM/){ $t="$_ "; }
1151
		else	{ $t="$location${o}$_$pf "; }
1152 1153 1154 1155

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

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

1177 1178 1179 1180 1181 1182 1183
# return the leading path
sub dname
	{
	my $ret=shift;
	$ret =~ s/(^.*)[\\\/][^\\\/]+$/$1/;
	return($ret);
	}
1184 1185 1186 1187 1188 1189 1190

##############################################################
# 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)=@_;
1191 1192
	local($ret,$_,$n,$d,$s);

1193 1194 1195 1196
	$files =~ s/\//$o/g if $o ne '/';
	foreach (split(/\s+/,$files))
		{
		$n=&bname($_);
1197 1198 1199 1200 1201 1202
		$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
1203
		       ($s=~s/sha256/sha512/ and -f $s) or
1204 1205 1206 1207 1208 1209 1210 1211 1212
		       -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 已提交
1213 1214 1215 1216 1217
		elsif (defined &special_compile_target and
		       ($s=special_compile_target($_)))
			{
			$ret.=$s;
			}
1218
		else	{ die "no rule for $_"; }
1219 1220 1221 1222 1223 1224
		}
	return($ret);
	}

##############################################################
# do a rule for each file that says 'compile' to new direcory
1225 1226 1227
sub perlasm_compile_target
	{
	my($target,$source,$bname)=@_;
B
Ben Laurie 已提交
1228 1229 1230 1231

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

1232 1233
	my($ret);
	$bname =~ s/(.*)\.[^\.]$/$1/;
D
Dr. Stephen Henson 已提交
1234
	$ret ="\$(TMP_D)$o$bname$asm_suffix: $source\n";
1235
	$ret.="\t\$(PERL) $source $asmtype \$(CFLAG) >\$\@\n";
1236
	if ($fipscanisteronly)
1237
		{
D
Dr. Stephen Henson 已提交
1238
		$ret .= "\t\$(PERL) util$o.pl . \$@ norunasm \$(CFLAG)\n";
1239 1240
		}
	$ret .= "\n";
D
Dr. Stephen Henson 已提交
1241 1242
	$ret.="$target: \$(TMP_D)$o$bname$asm_suffix\n";
	$ret.="\t\$(ASM) $afile\$\@ \$(TMP_D)$o$bname$asm_suffix\n\n";
1243 1244 1245 1246 1247 1248 1249 1250 1251 1252
	return($ret);
	}

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

	$bname =~ s/(.*)\.[^\.]$/$1/;
	$ret ="\$(TMP_D)$o$bname.asm: $source\n";
1253 1254 1255
	$ret.="\t\$(CC) -E \$(CFLAG) $source >\$\@\n";
	$ret.="\t\$(PERL) util\\fipsas.pl . \$@ norunasm \$(CFLAG)\n" if $fipscanisteronly;
	$ret.="\n";
1256 1257 1258 1259 1260
	$ret.="$target: \$(TMP_D)$o$bname.asm\n";
	$ret.="\t\$(ASM) $afile\$\@ \$(TMP_D)$o$bname.asm\n\n";
	return($ret);
	}

1261 1262 1263 1264 1265
sub cc_compile_target
	{
	local($target,$source,$ex_flags)=@_;
	local($ret);
	
1266
	$ex_flags.=" -DMK1MF_BUILD -D$platform_cpp_symbol" if ($source =~ /cversion/);
1267 1268
	$target =~ s/\//$o/g if $o ne "/";
	$source =~ s/\//$o/g if $o ne "/";
1269
	$ret ="$target: \$(SRC_D)$o$source\n\t";
B
Ben Laurie 已提交
1270
	$ret.="\$(CC)";
D
Dr. Stephen Henson 已提交
1271 1272
	$ret.= " -MMD" if $orig_platform eq "copy";
	$ret.= " ${ofile}$target $ex_flags -c \$(SRC_D)$o$source\n\n";
1273
	$target =~ s/\.o$/.d/;
D
Dr. Stephen Henson 已提交
1274
	$ret.=".sinclude \"$target\"\n\n" if $orig_platform eq "copy";
1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287
	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);
1288 1289
	@s=split(/\s+/,$src);

1290 1291 1292

	for ($i=0; $i<=$#s; $i++)
		{
1293 1294 1295 1296 1297 1298 1299 1300 1301 1302 1303 1304 1305
		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";
1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325
		}
	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);
	}

1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338
# 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);
	
	$files =~ s/\//$o/g if $o ne '/';
	foreach (split(/\s+/,$files))
		{
		$n=&bname($_);
		if ($n =~ /bss_file/)
			{ $pp=".c"; }
		else	{ $pp=$p; }
1339
		$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";
1340 1341 1342
		}
	return($ret);
	}
1343

1344 1345 1346
# Options picked up from the OPTIONS line in the top level Makefile
# generated by Configure.

1347 1348
sub read_options
	{
1349 1350
	# Many options are handled in a similar way. In particular
	# no-xxx sets zero or more scalars to 1.
1351 1352 1353 1354
	# 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.
1355 1356 1357 1358 1359 1360 1361

	my %valid_options = (
		"no-rc2" => \$no_rc2,
		"no-rc4" => \$no_rc4,
		"no-rc5" => \$no_rc5,
		"no-idea" => \$no_idea,
		"no-aes" => \$no_aes,
1362
		"no-camellia" => \$no_camellia,
B
Bodo Möller 已提交
1363
		"no-seed" => \$no_seed,
1364 1365 1366 1367 1368 1369 1370 1371
		"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,
1372
		"no-whirlpool" => \$no_whirlpool,
1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383
		"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,
1384
		"no-ssl3-method" => 0,
B
Ben Laurie 已提交
1385
		"no-srp" => \$no_srp,
1386
		"no-cms" => \$no_cms,
D
Dr. Stephen Henson 已提交
1387
		"no-jpake" => \$no_jpake,
1388
		"no-ec2m" => \$no_ec2m,
D
Dr. Stephen Henson 已提交
1389
		"no-ec_nistp_64_gcc_128" => 0,
1390 1391 1392
		"no-err" => \$no_err,
		"no-sock" => \$no_sock,
		"no-ec" => \$no_ec,
1393
		"no-gost" => \$no_gost,
1394 1395 1396 1397
		"no-engine" => \$no_engine,
		"no-hw" => \$no_hw,
		"just-ssl" =>
			[\$no_rc2, \$no_idea, \$no_des, \$no_bf, \$no_cast,
R
Rich Salz 已提交
1398
			  \$no_md2, \$no_mdc2, \$no_dsa, \$no_dh,
K
Kurt Roeckx 已提交
1399
			  \$no_err, \$no_ripemd, \$no_rc5,
B
Ben Laurie 已提交
1400
			  \$no_aes, \$no_camellia, \$no_seed, \$no_srp],
1401 1402 1403 1404 1405
		"rsaref" => 0,
		"gcc" => \$gcc,
		"debug" => \$debug,
		"profile" => \$profile,
		"shlib" => \$shlib,
1406
		"dll" => \$shlib,
1407
		"shared" => 0,
D
Dr. Stephen Henson 已提交
1408
		"no-sctp" => 0,
M
Matt Caswell 已提交
1409
		"no-srtp" => 0,
1410
		"no-gmp" => 0,
1411
		"no-rfc3779" => 0,
D
Dr. Stephen Henson 已提交
1412
		"no-montasm" => 0,
1413
		"no-shared" => 0,
D
Dr. Stephen Henson 已提交
1414
		"no-store" => 0,
1415 1416
		"no-zlib" => 0,
		"no-zlib-dynamic" => 0,
1417
		"no-ssl-trace" => 0,
1418
		"no-unit-test" => 0,
M
Matt Caswell 已提交
1419
		"no-deprecated" => 0,
M
Matt Caswell 已提交
1420
		"no-ocb" => 0,
1421 1422
		"fips" => \$fips,
		"fipscanisterbuild" => [\$fips, \$fipscanisterbuild],
1423
		"fipscanisteronly" => [\$fips, \$fipscanisterbuild, \$fipscanisteronly],
1424
		"fipscheck" => [\$fips, \$fipscanisterbuild, \$fipscanisteronly],
1425 1426 1427 1428 1429 1430 1431 1432 1433 1434 1435 1436 1437 1438 1439 1440
		);

	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;
				}
			}
		}
1441
	elsif (/^no-comp$/) { $xcflags = "-DOPENSSL_NO_COMP $xcflags"; }
D
Dr. Stephen Henson 已提交
1442
	elsif (/^enable-zlib$/) { $zlib_opt = 1 if $zlib_opt == 0 }
1443 1444
	elsif (/^enable-zlib-dynamic$/)
		{
D
Dr. Stephen Henson 已提交
1445
		$zlib_opt = 2;
1446
		}
D
Dr. Stephen Henson 已提交
1447 1448 1449 1450 1451 1452 1453 1454
	elsif (/^no-static-engine/)
		{
		$no_static_engine = 1;
		}
	elsif (/^enable-static-engine/)
		{
		$no_static_engine = 0;
		}
1455 1456 1457 1458 1459 1460 1461 1462 1463 1464
	# 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;
1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476
		}
	# 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";
		
1477
		}
1478 1479 1480 1481
	elsif (/^([^=]*)=(.*)$/){ $VARS{$1}=$2; }
	elsif (/^-[lL].*$/)	{ $l_flags.="$_ "; }
	elsif ((!/^-help/) && (!/^-h/) && (!/^-\?/) && /^-.*$/)
		{ $c_flags.="$_ "; }
1482 1483
	else { return(0); }
	return(1);
1484
	}
1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512

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);
	}