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";
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
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
	nasm 					- Use NASM for x86 asm
R
Richard Levitte 已提交
146
	nw-nasm					- Use NASM x86 asm for NetWare
D
Dr. Stephen Henson 已提交
147
	nw-mwasm				- Use Metrowerks x86 asm for NetWare
U
Ulf Möller 已提交
148
	gaswin					- Use GNU as with Mingw32
149 150 151 152
	no-socks				- No socket code
	no-err					- No error strings
	dll/shlib				- Build shared libraries (MS)
	debug					- Debug build
U
Ulf Möller 已提交
153
        profile                                 - Profiling build
154 155 156
	gcc					- Use Gcc (unix)

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

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

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

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

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

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

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

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

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

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

195

196 197
$NT=0;

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

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

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

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

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

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

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

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

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

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

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

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

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

D
Dr. Stephen Henson 已提交
327

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

625 626
EOF

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

banner:
$banner

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

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

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

750
headers: \$(HEADER)
751

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

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

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

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

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

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

779
EOF
780

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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



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

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

	}

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

print $defs;
1002 1003 1004 1005 1006

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1288 1289 1290

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

1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336
# 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; }
1337
		$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";
1338 1339 1340
		}
	return($ret);
	}
1341

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

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

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

	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;
				}
			}
		}
1442
	elsif (/^no-comp$/) { $xcflags = "-DOPENSSL_NO_COMP $xcflags"; }
D
Dr. Stephen Henson 已提交
1443
	elsif (/^enable-zlib$/) { $zlib_opt = 1 if $zlib_opt == 0 }
1444 1445
	elsif (/^enable-zlib-dynamic$/)
		{
D
Dr. Stephen Henson 已提交
1446
		$zlib_opt = 2;
1447
		}
D
Dr. Stephen Henson 已提交
1448 1449 1450 1451 1452 1453 1454 1455
	elsif (/^no-static-engine/)
		{
		$no_static_engine = 1;
		}
	elsif (/^enable-static-engine/)
		{
		$no_static_engine = 0;
		}
1456 1457 1458 1459 1460 1461 1462 1463 1464 1465
	# 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;
1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477
		}
	# 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";
		
1478
		}
1479 1480 1481 1482
	elsif (/^([^=]*)=(.*)$/){ $VARS{$1}=$2; }
	elsif (/^-[lL].*$/)	{ $l_flags.="$_ "; }
	elsif ((!/^-help/) && (!/^-h/) && (!/^-\?/) && /^-.*$/)
		{ $c_flags.="$_ "; }
1483 1484
	else { return(0); }
	return(1);
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 1513

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