mk1mf.pl 39.6 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,
D
typo  
Dr. Stephen Henson 已提交
69
	FIPSCANISTERONLY  => \$mf_fipscanisteronly,
70
	FIPSCANISTERINTERNAL  => \$mf_fipscanisterinternal
71
);
D
Dr. Stephen Henson 已提交
72

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

84 85
$debug = 1 if $mf_platform =~ /^debug-/;

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 137 138 139
	no-rsa no-dsa no-dh			- Skip this public key cipher
	no-ssl2 no-ssl3				- Skip this version of SSL
	just-ssl				- remove all non-ssl keys/digest
	no-asm 					- No x86 asm
140
	no-krb5					- No KRB5
B
Ben Laurie 已提交
141
	no-srp					- No SRP
142 143
	no-ec					- No EC
	no-ecdsa				- No ECDSA
144 145
	no-ecdh					- No ECDH
	no-engine				- No engine
146
	no-hw					- No hw
147
	nasm 					- Use NASM for x86 asm
R
Richard Levitte 已提交
148
	nw-nasm					- Use NASM x86 asm for NetWare
D
Dr. Stephen Henson 已提交
149
	nw-mwasm				- Use Metrowerks x86 asm for NetWare
U
Ulf Möller 已提交
150
	gaswin					- Use GNU as with Mingw32
151 152 153 154
	no-socks				- No socket code
	no-err					- No error strings
	dll/shlib				- Build shared libraries (MS)
	debug					- Debug build
U
Ulf Möller 已提交
155
        profile                                 - Profiling build
156 157 158
	gcc					- Use Gcc (unix)

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

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

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

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

U
Ulf Möller 已提交
178
$no_ssl3=1 if ($no_md5 || $no_sha);
179 180
$no_ssl3=1 if ($no_rsa && $no_dh);

181
$no_ssl2=1 if ($no_md5);
182 183
$no_ssl2=1 if ($no_rsa);

184 185 186 187
$out_def="out";
$inc_def="outinc";
$tmp_def="tmp";

D
Dr. Stephen Henson 已提交
188 189
$perl="perl" unless defined $perl;
$mkdir="-mkdir" unless defined $mkdir;
190 191 192 193

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

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

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

200

201 202
$NT=0;

203
push(@INC,"util/pl","pl");
204

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

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

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

267 268 269 270
$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;

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

273 274
$cflags= "$xcflags$cflags" if $xcflags ne "";

275
$cflags.=" -DOPENSSL_NO_IDEA" if $no_idea;
276
$cflags.=" -DOPENSSL_NO_AES"  if $no_aes;
277
$cflags.=" -DOPENSSL_NO_CAMELLIA"  if $no_camellia;
B
Bodo Möller 已提交
278
$cflags.=" -DOPENSSL_NO_SEED" if $no_seed;
279 280 281 282 283 284 285 286
$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;
$cflags.=" -DOPENSSL_NO_SHA"  if $no_sha;
$cflags.=" -DOPENSSL_NO_SHA1" if $no_sha1;
287
$cflags.=" -DOPENSSL_NO_RIPEMD" if $no_ripemd;
288 289 290 291 292 293 294
$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;
295
$cflags.=" -DOPENSSL_NO_WHIRLPOOL"   if $no_whirlpool;
296 297 298
$cflags.=" -DOPENSSL_NO_SOCK" if $no_sock;
$cflags.=" -DOPENSSL_NO_SSL2" if $no_ssl2;
$cflags.=" -DOPENSSL_NO_SSL3" if $no_ssl3;
299
$cflags.=" -DOPENSSL_NO_TLSEXT" if $no_tlsext;
B
Ben Laurie 已提交
300
$cflags.=" -DOPENSSL_NO_SRP" if $no_srp;
301
$cflags.=" -DOPENSSL_NO_CMS" if $no_cms;
302
$cflags.=" -DOPENSSL_NO_ERR"  if $no_err;
303 304 305
$cflags.=" -DOPENSSL_NO_KRB5" if $no_krb5;
$cflags.=" -DOPENSSL_NO_EC"   if $no_ec;
$cflags.=" -DOPENSSL_NO_ECDSA" if $no_ecdsa;
306
$cflags.=" -DOPENSSL_NO_ECDH" if $no_ecdh;
307
$cflags.=" -DOPENSSL_NO_GOST" if $no_gost;
308
$cflags.=" -DOPENSSL_NO_ENGINE"   if $no_engine;
309
$cflags.=" -DOPENSSL_NO_HW"   if $no_hw;
310
$cflags.=" -DOPENSSL_FIPS"    if $fips;
D
Dr. Stephen Henson 已提交
311
$cflags.=" -DOPENSSL_NO_JPAKE"    if $no_jpake;
312
$cflags.=" -DOPENSSL_NO_EC2M"    if $no_ec2m;
D
Dr. Stephen Henson 已提交
313 314 315
$cflags.= " -DZLIB" if $zlib_opt;
$cflags.= " -DZLIB_SHARED" if $zlib_opt == 2;

D
Dr. Stephen Henson 已提交
316 317 318 319 320 321 322 323 324
if ($no_static_engine)
	{
	$cflags .= " -DOPENSSL_NO_STATIC_ENGINE";
	}
else
	{
	$cflags .= " -DOPENSSL_NO_DYNAMIC_ENGINE";
	}

325
#$cflags.=" -DRSAref"  if $rsaref ne "";
326

U
Ulf Möller 已提交
327 328 329 330
## if ($unix)
##	{ $cflags="$c_flags" if ($c_flags ne ""); }
##else
	{ $cflags="$c_flags$cflags" if ($c_flags ne ""); }
331

B
Ben Laurie 已提交
332 333 334 335
if ($orig_platform eq 'copy') {
    $cflags = $mf_cflag;
    $cc = $mf_cc;
}
336

337 338
$ex_libs="$l_flags$ex_libs" if ($l_flags ne "");

D
Dr. Stephen Henson 已提交
339

340 341 342
%shlib_ex_cflags=("SSL" => " -DOPENSSL_BUILD_SHLIBSSL",
		  "CRYPTO" => " -DOPENSSL_BUILD_SHLIBCRYPTO");

343 344
if ($msdos)
	{
345
	$banner ="\t\@echo Make sure you have run 'perl Configure $platform' in the\n";
346 347 348 349 350 351 352 353 354
	$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;
355
$OPENSSLDIR =~ s|/|$o|g;
356

357 358 359 360 361 362
#############################################
# We parse in input file and 'store' info for later printing.
open(IN,"<$infile") || die "unable to open $infile:$!\n";
$_=<IN>;
for (;;)
	{
363
	s/\s*$//; # was chop, didn't work in mixture of perls for Windows...
364 365 366 367 368 369

	($key,$val)=/^([^=]+)=(.*)/;
	if ($key eq "RELATIVE_DIRECTORY")
		{
		if ($lib ne "")
			{
370 371 372 373 374 375 376 377 378 379 380 381 382 383 384
 			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." ";
				}
385 386 387 388 389 390 391 392 393 394
			}
		last if ($val eq "FINISHED");
		$lib="";
		$libobj="";
		$dir=$val;
		}

	if ($key eq "KRB5_INCLUDES")
		{ $cflags .= " $val";}

D
Dr. Stephen Henson 已提交
395
	if ($key eq "ZLIB_INCLUDE")
396
		{ $cflags .= " $val" if $val ne "";}
D
Dr. Stephen Henson 已提交
397 398 399 400

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

401
	if ($key eq "LIBKRB5")
D
Dr. Stephen Henson 已提交
402
		{ $ex_libs .= " $val" if $val ne "";}
403

404
	if ($key eq "TEST" && (!$fipscanisteronly || $dir =~ /^fips/ ))
D
Dr. Stephen Henson 已提交
405
		{ $test.=&var_add($dir,$val, 0); }
406 407

	if (($key eq "PROGS") || ($key eq "E_OBJ"))
D
Dr. Stephen Henson 已提交
408
		{ $e_exe.=&var_add($dir,$val, 0); }
409 410 411 412 413 414

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

	if ($key eq "EXHEADER")
D
Dr. Stephen Henson 已提交
423
		{ $exheader.=&var_add($dir,$val, 1); }
424 425

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

428 429 430
	if ($key eq "LIBOBJ")
	    {
	    if ($dir ne "engines" || !$no_static_engine)
D
Dr. Stephen Henson 已提交
431
		{ $libobj=&var_add($dir,$val, 0); }
432 433 434
	    else
		{ push(@engines_obj,split(/\s+/,&var_add($dir,$val,0))); }
	    }
D
Dr. Stephen Henson 已提交
435 436
	if ($key eq "LIBNAMES" && $dir eq "engines" && $no_static_engine)
 		{ $engines.=$val }
437

438 439 440 441 442 443 444 445 446 447 448 449 450 451 452
	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;}

453 454 455 456 457
	if (!($_=<IN>))
		{ $_="RELATIVE_DIRECTORY=FINISHED\n"; }
	}
close(IN);

D
Dr. Stephen Henson 已提交
458 459 460 461 462 463 464
if ($orig_platform eq 'copy')
	{
	# Remove opensslconf.h so it doesn't get updated if we configure a
	# different branch.
	$exheader =~ s/[^ ]+\/opensslconf.h//;
	$header =~ s/[^ ]+\/opensslconf.h//;
	}
465

466 467 468 469 470 471 472 473
if ($fips)
	{

	foreach (split " ", $fips_ex_obj)
		{
		$fips_exclude_obj{$1} = 1 if (/\/([^\/]*)$/);
		}
	foreach (split " ",
474 475
		"$mf_cpuid_asm $mf_aes_asm $mf_sha_asm $mf_bn_asm " .
		"$mf_des_asm $mf_modes_asm")
476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493
		{
		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"} .= "$_ ";
				}
			}
494
		elsif (!$fipscanisteronly)
495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543
			{
			$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)
		{
544
		$build_targets .= " \$(LIB_D)$o$crypto_compat \$(PREMAIN_DSO_EXE)";
545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566
		$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");
		}
	}

567 568 569 570 571 572
if ($fipscanisteronly)
	{
	$build_targets = "\$(O_FIPSCANISTER) \$(T_EXE)";
	$libs_dep = "";
	}

573 574
$cp2 = $cp unless defined $cp2;

575 576 577 578 579 580 581 582
$extra_install= <<"EOF";
	\$(CP) \"\$(INCO_D)${o}*.\[ch\]\" \"\$(INSTALLTOP)${o}include${o}openssl\"
	\$(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 已提交
583
	{
584 585 586
	$extra_install = <<"EOF";
	\$(CP) \"\$(O_FIPSCANISTER)\" \"\$(INSTALLTOP)${o}lib\"
	\$(CP) \"\$(O_FIPSCANISTER).sha1\" \"\$(INSTALLTOP)${o}lib\"
587
	\$(CP2) \"fips${o}fips_premain.c\" \"\$(INSTALLTOP)${o}lib\"
588 589 590 591 592 593 594 595 596 597
	\$(CP) \"fips${o}fips_premain.c.sha1\" \"\$(INSTALLTOP)${o}lib\"
	\$(CP) \"\$(INCO_D)${o}fips.h\" \"\$(INSTALLTOP)${o}include${o}openssl\"
	\$(CP) \"\$(INCO_D)${o}fips_rand.h\" \"\$(INSTALLTOP)${o}include${o}openssl\"
	\$(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";
598 599 600 601
	\$(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 已提交
602 603 604 605
EOF
	if ($no_static_engine)
		{
		$extra_install .= <<"EOF"
606 607
	\$(MKDIR) \"\$(INSTALLTOP)${o}lib${o}engines\"
	\$(CP) \"\$(E_SHLIB)\" \"\$(INSTALLTOP)${o}lib${o}engines\"
D
Dr. Stephen Henson 已提交
608 609 610 611 612
EOF
		}
	}
else
	{
613
	$extra_install .= <<"EOF";
614 615
	\$(CP) \"\$(O_SSL)\" \"\$(INSTALLTOP)${o}lib\"
	\$(CP) \"\$(O_CRYPTO)\" \"\$(INSTALLTOP)${o}lib\"
D
Dr. Stephen Henson 已提交
616
EOF
D
Dr. Stephen Henson 已提交
617
	$ex_libs .= " $zlib_lib" if $zlib_opt == 1;
D
Dr. Stephen Henson 已提交
618 619
	}

620
$defs= <<"EOF";
621
# N.B. You MUST use -j on FreeBSD.
622 623
# This makefile has been automatically generated from the OpenSSL distribution.
# This single makefile will build the complete OpenSSL distribution and
624 625 626 627 628 629 630 631 632 633 634
# by default leave the 'intertesting' output files in .${o}out and the stuff
# 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.

635 636
EOF

637 638
$defs .= $preamble if defined $preamble;

639
$defs.= <<"EOF";
640
INSTALLTOP=$INSTALLTOP
641
OPENSSLDIR=$OPENSSLDIR
642 643

# Set your compiler options
644
PLATFORM=$platform
645 646 647 648
CC=$bin_dir${cc}
CFLAG=$cflags
APP_CFLAG=$app_cflag
LIB_CFLAG=$lib_cflag
649
SHLIB_CFLAG=$shl_cflag
650 651 652 653 654 655
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

656
# The OpenSSL directory
657 658 659 660
SRC_D=$src_dir

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

B
Ben Laurie 已提交
664
# The output directory for everything interesting
665 666 667
OUT_D=$out_dir
# The output directory for all the temporary muck
TMP_D=$tmp_dir
668 669
# The output directory for the header files
INC_D=$inc_dir
670
INCO_D=$inc_dir${o}openssl
671

D
Dr. Stephen Henson 已提交
672
PERL=$perl
673
CP=$cp
674
CP2=$cp2
675 676
RM=$rm
RANLIB=$ranlib
U
Ulf Möller 已提交
677
MKDIR=$mkdir
678 679
MKLIB=$bin_dir$mklib
MLFLAGS=$mlflags
B
Ben Laurie 已提交
680
#ASM=$bin_dir$asm
681

682 683 684 685 686 687 688 689 690 691 692
# 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

693 694 695 696
######################################################
# You should not need to touch anything below this point
######################################################

697
E_EXE=openssl
698 699 700 701 702 703
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 已提交
704
# ENG_D  - dynamic engine output directory
705 706 707
# Note: if you change these point to different directories then uncomment out
# the lines around the 'NB' comment below.
# 
708 709 710
BIN_D=\$(OUT_D)
TEST_D=\$(OUT_D)
LIB_D=\$(OUT_D)
D
Dr. Stephen Henson 已提交
711
ENG_D=\$(OUT_D)
712 713 714 715 716 717 718 719

# 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
720 721
SO_SSL=    $plib\$(SSL)$so_shlibp
SO_CRYPTO= $plib\$(CRYPTO)$so_shlibp
722 723
L_SSL=     \$(LIB_D)$o$plib\$(SSL)$libp
L_CRYPTO=  \$(LIB_D)$o$plib\$(CRYPTO)$libp
724

725
L_LIBS= \$(L_SSL) \$(L_CRYPTO) $ex_l_libs
726 727 728 729 730

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

731
INC=-I\$(INC_D) -I\$(INCL_D)
732 733
APP_CFLAGS=\$(INC) \$(CFLAG) \$(APP_CFLAG)
LIB_CFLAGS=\$(INC) \$(CFLAG) \$(LIB_CFLAG)
734
SHLIB_CFLAGS=\$(INC) \$(CFLAG) \$(LIB_CFLAG) \$(SHLIB_CFLAG)
735
LIBS_DEP=$libs_dep
736 737 738 739 740

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

$rules=<<"EOF";
741
all: banner \$(TMP_D) \$(BIN_D) \$(TEST_D) \$(LIB_D) \$(INCO_D) headers \$(FIPS_SHA1_EXE) $build_targets
742 743 744 745 746

banner:
$banner

\$(TMP_D):
747
	\$(MKDIR) \"\$(TMP_D)\"
748 749 750 751 752 753
# 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)
754 755

\$(LIB_D):
756
	\$(MKDIR) \"\$(LIB_D)\"
757

758
\$(INCO_D): \$(INC_D)
759
	\$(MKDIR) \"\$(INCO_D)\"
760

761
\$(INC_D):
762
	\$(MKDIR) \"\$(INC_D)\"
763

764 765
# This needs to be invoked once, when the makefile is first constructed, or
# after cleaning.
766
init: \$(TMP_D) \$(LIB_D) \$(INC_D) \$(INCO_D) \$(BIN_D) \$(TEST_D) headers
767
	\$(PERL) \$(SRC_D)/util/copy-if-different.pl "\$(SRC_D)/crypto/opensslconf.h" "\$(INCO_D)/opensslconf.h"
768

769 770
headers: \$(HEADER) \$(EXHEADER)

D
Dr. Stephen Henson 已提交
771
lib: \$(LIBS_DEP) \$(E_SHLIB)
772 773 774

exe: \$(T_EXE) \$(BIN_D)$o\$(E_EXE)$exep

D
Dr. Stephen Henson 已提交
775
install: all
776 777 778 779 780
	\$(MKDIR) \"\$(INSTALLTOP)\"
	\$(MKDIR) \"\$(INSTALLTOP)${o}bin\"
	\$(MKDIR) \"\$(INSTALLTOP)${o}include\"
	\$(MKDIR) \"\$(INSTALLTOP)${o}include${o}openssl\"
	\$(MKDIR) \"\$(INSTALLTOP)${o}lib\"
D
Dr. Stephen Henson 已提交
781 782
$extra_install

783 784 785 786 787 788 789
clean:
	\$(RM) \$(TMP_D)$o*.*

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

B
Ben Laurie 已提交
790 791 792 793 794 795 796
reallyclean:
	\$(RM) -rf \$(TMP_D)
	\$(RM) -rf \$(BIN_D)
	\$(RM) -rf \$(TEST_D)
	\$(RM) -rf \$(LIB_D)
	\$(RM) -rf \$(INC_D)

797
EOF
798 799 800 801 802 803 804 805 806 807 808

if ($orig_platform ne 'copy')
	{
        $rules .= <<"EOF";
test: \$(T_EXE)
	cd \$(BIN_D)
	..${o}ms${o}test

EOF
	}

809
my $platform_cpp_symbol = "MK1MF_PLATFORM_$platform";
D
Dr. Stephen Henson 已提交
810
$platform_cpp_symbol =~ s/-/_/g;
811
if (open(IN,"crypto/buildinf.h"))
812
	{
813
	# Remove entry for this platform in existing file buildinf.h.
814

815
	my $old_buildinf_h = "";
816 817 818 819 820 821 822 823
	while (<IN>)
		{
		if (/^\#ifdef $platform_cpp_symbol$/)
			{
			while (<IN>) { last if (/^\#endif/); }
			}
		else
			{
824
			$old_buildinf_h .= $_;
825 826
			}
		}
B
Bodo Möller 已提交
827
	close(IN);
828

829 830
	open(OUT,">crypto/buildinf.h") || die "Can't open buildinf.h";
	print OUT $old_buildinf_h;
B
Bodo Möller 已提交
831
	close(OUT);
832 833
	}

834
open (OUT,">>crypto/buildinf.h") || die "Can't open buildinf.h";
835 836
printf OUT <<EOF;
#ifdef $platform_cpp_symbol
837
  /* auto-generated/updated by util/mk1mf.pl for crypto/cversion.c */
838 839 840 841 842 843
  #define CFLAGS "$cc $cflags"
  #define PLATFORM "$platform"
EOF
printf OUT "  #define DATE \"%s\"\n", scalar gmtime();
printf OUT "#endif\n";
close(OUT);
844

B
Ben Laurie 已提交
845
# Strip off trailing ' '
846 847 848 849 850 851 852 853 854 855 856
foreach (keys %lib_obj) { $lib_obj{$_}=&clean_up_ws($lib_obj{$_}); }
$test=&clean_up_ws($test);
$e_exe=&clean_up_ws($e_exe);
$exheader=&clean_up_ws($exheader);
$header=&clean_up_ws($header);

# First we strip the exheaders from the headers list
foreach (split(/\s+/,$exheader)){ $h{$_}=1; }
foreach (split(/\s+/,$header))	{ $h.=$_." " unless $h{$_}; }
chop($h); $header=$h;

D
Dr. Stephen Henson 已提交
857 858
$defs.=&do_defs("HEADER",$header,"\$(INCL_D)","");
$rules.=&do_copy_rule("\$(INCL_D)",$header,"");
859

D
Dr. Stephen Henson 已提交
860 861
$defs.=&do_defs("EXHEADER",$exheader,"\$(INCO_D)","");
$rules.=&do_copy_rule("\$(INCO_D)",$exheader,"");
862 863 864 865 866 867 868

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

869 870 871 872 873 874 875 876 877 878 879 880 881 882
# 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 已提交
883
		"\$(APP_CFLAGS)");
884 885
	$rules.=&cc_compile_target("\$(OBJ_D)${o}\$(E_PREMAIN_DSO)$obj",
		"fips${o}fips_premain.c",
A
Andy Polyakov 已提交
886
		"-DFINGERPRINT_PREMAIN_DSO_LOAD \$(APP_CFLAGS)");
887 888
	}

B
Ben Laurie 已提交
889 890 891 892 893 894 895 896 897 898 899 900
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 已提交
901 902 903
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');
904
	# cpuid is included by the crypto dir
B
Ben Laurie 已提交
905
	#$lib_obj{CRYPTO} .= fix_asm($mf_cpuid_asm, 'crypto');
D
Dr. Stephen Henson 已提交
906 907 908 909 910 911 912
	# 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 已提交
913

914 915 916
foreach (values %lib_nam)
	{
	$lib_obj=$lib_obj{$_};
917 918
	local($slib)=$shlib;

919 920 921 922 923 924 925
	if (($_ eq "SSL") && $no_ssl2 && $no_ssl3)
		{
		$rules.="\$(O_SSL):\n\n"; 
		next;
		}

	$defs.=&do_defs(${_}."OBJ",$lib_obj,"\$(OBJ_D)",$obj);
926
	$lib=($slib)?" \$(SHLIB_CFLAGS)".$shlib_ex_cflags{$_}:" \$(LIB_CFLAGS)";
927
	$rules.=&do_compile_rule("\$(OBJ_D)",$lib_obj{$_},$lib);
928 929
	}

D
 
Dr. Stephen Henson 已提交
930
# hack to add version info on MSVC
D
Dr. Stephen Henson 已提交
931
if (($platform eq "VC-WIN32") || ($platform eq "VC-WIN64A")
932
	|| ($platform eq "VC-WIN64I") || ($platform eq "VC-NT")) {
D
 
Dr. Stephen Henson 已提交
933 934 935 936 937 938 939 940 941 942
    $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
}

943
$defs.=&do_defs("T_EXE",$test,"\$(TEST_D)",$exep);
944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965
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);
	}
966

967
$defs.=&do_defs("E_SHLIB",$engines . $otherlibs,"\$(ENG_D)",$shlibp);
D
Dr. Stephen Henson 已提交
968 969 970

foreach (split(/\s+/,$engines))
	{
971
	my $engine = $_;
972
	my @objs   = grep {/e_$engine/} @engines_obj;
973
	$rules.=&do_compile_rule("\$(OBJ_D)",join(" ",@objs),$lib);
974
	map {$_=~s/.*\/([^\/]+)$/\$(OBJ_D)${o}$1$obj/} @objs;
975
	$rules.= &do_lib_rule(join(" ",@objs),"\$(ENG_D)$o$engine$shlibp","",$shlib,"");
D
Dr. Stephen Henson 已提交
976 977 978 979
	}



980
$rules.= &do_lib_rule("\$(SSLOBJ)","\$(O_SSL)",$ssl,$shlib,"\$(SO_SSL)");
981
#$rules.= &do_lib_rule("\$(CRYPTOOBJ)","\$(O_CRYPTO)",$crypto,$shlib,"\$(SO_CRYPTO)");
982

D
Dr. Stephen Henson 已提交
983
foreach (split(" ",$otherlibs))
984 985 986 987 988 989 990
	{
	my $uc = $_;
	$uc =~ tr /a-z/A-Z/;	
	$rules.= &do_lib_rule("\$(${uc}OBJ)","\$(ENG_D)$o$_$shlibp", "", $shlib, "");

	}

991 992 993 994 995 996 997 998 999 1000 1001 1002
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)", "");
1003
		$rules.= &do_lib_rule("\$(CRYPTOOBJ) \$(O_FIPSCANISTER)",
1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038
			"\$(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);
1039

1040 1041
$rules .= get_tests('test/Makefile') if $orig_platform eq 'copy';

1042
print $defs;
1043 1044 1045 1046 1047

if ($platform eq "linux-elf") {
    print <<"EOF";
# Generate perlasm output files
%.cpp:
N
Nils Larsch 已提交
1048
	(cd \$(\@D)/..; PERL=perl make -f Makefile asm/\$(\@F))
1049 1050
EOF
}
1051 1052 1053 1054 1055 1056 1057 1058 1059
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 已提交
1060
	local($dir,$val,$keepext)=@_;
1061 1062
	local(@a,$_,$ret);

1063
	return("") if $no_engine && $dir =~ /\/engine/;
1064
	return("") if $no_hw   && $dir =~ /\/hw/;
1065
	return("") if $no_idea && $dir =~ /\/idea/;
1066
	return("") if $no_aes  && $dir =~ /\/aes/;
1067
	return("") if $no_camellia  && $dir =~ /\/camellia/;
B
Bodo Möller 已提交
1068
	return("") if $no_seed && $dir =~ /\/seed/;
1069 1070
	return("") if $no_rc2  && $dir =~ /\/rc2/;
	return("") if $no_rc4  && $dir =~ /\/rc4/;
1071
	return("") if $no_rc5  && $dir =~ /\/rc5/;
1072 1073 1074 1075
	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 已提交
1076
	return("") if $no_ec   && $dir =~ /\/ec/;
1077
	return("") if $no_gost   && $dir =~ /\/ccgost/;
1078
	return("") if $no_cms  && $dir =~ /\/cms/;
D
Dr. Stephen Henson 已提交
1079
	return("") if $no_jpake  && $dir =~ /\/jpake/;
1080
	return("") if !$fips   && $dir =~ /^fips/;
1081 1082 1083 1084 1085 1086 1087 1088 1089 1090
	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/;
1091
	return("") if $no_cast && $dir =~ /\/cast/;
1092
	return("") if $no_whirlpool && $dir =~ /\/whrlpool/;
1093 1094 1095

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

	@a=grep(!/^e_.*_3d$/,@a) if $no_des;
	@a=grep(!/^e_.*_d$/,@a) if $no_des;
1100 1101
	@a=grep(!/^e_.*_ae$/,@a) if $no_idea;
	@a=grep(!/^e_.*_i$/,@a) if $no_aes;
1102
	@a=grep(!/^e_.*_r2$/,@a) if $no_rc2;
1103
	@a=grep(!/^e_.*_r5$/,@a) if $no_rc5;
1104
	@a=grep(!/^e_.*_bf$/,@a) if $no_bf;
1105
	@a=grep(!/^e_.*_c$/,@a) if $no_cast;
1106
	@a=grep(!/^e_rc4$/,@a) if $no_rc4;
1107
	@a=grep(!/^e_camellia$/,@a) if $no_camellia;
B
Bodo Möller 已提交
1108
	@a=grep(!/^e_seed$/,@a) if $no_seed;
1109

D
Dr. Stephen Henson 已提交
1110 1111
	#@a=grep(!/(^s2_)|(^s23_)/,@a) if $no_ssl2;
	#@a=grep(!/(^s3_)|(^s23_)/,@a) if $no_ssl3;
1112 1113 1114 1115

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

	@a=grep(!/(^md2)|(_md2$)/,@a) if $no_md2;
1116
	@a=grep(!/(^md4)|(_md4$)/,@a) if $no_md4;
1117
	@a=grep(!/(^md5)|(_md5$)/,@a) if $no_md5;
1118
	@a=grep(!/(rmd)|(ripemd)/,@a) if $no_ripemd;
1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134

	@a=grep(!/(^d2i_r_)|(^i2d_r_)/,@a) if $no_rsa;
	@a=grep(!/(^p_open$)|(^p_seal$)/,@a) if $no_rsa;
	@a=grep(!/(^pem_seal$)/,@a) if $no_rsa;

	@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(!/(^sha[^1])|(_sha$)|(m_dss$)/,@a) if $no_sha;
	@a=grep(!/(^sha1)|(_sha1$)|(m_dss1$)/,@a) if $no_sha1;
	@a=grep(!/_mdc2$/,@a) if $no_mdc2;

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

1137
	@a=grep(!/^engine$/,@a) if $no_engine;
1138
	@a=grep(!/^hw$/,@a) if $no_hw;
1139
	@a=grep(!/(^rsa$)|(^genrsa$)/,@a) if $no_rsa;
1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165
	@a=grep(!/(^dsa$)|(^gendsa$)|(^dsaparam$)/,@a) if $no_dsa;
	@a=grep(!/^gendsa$/,@a) if $no_sha1;
	@a=grep(!/(^dh$)|(^gendh$)/,@a) if $no_dh;

	@a=grep(!/(^dh)|(_sha1$)|(m_dss1$)/,@a) if $no_sha1;

	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)=@_;
1166
	local($_,$ret,$pf);
1167 1168 1169 1170 1171 1172 1173 1174
	local(*OUT,$tmp,$t);

	$files =~ s/\//$o/g if $o ne '/';
	$ret="$var="; 
	$n=1;
	$Vars{$var}.="";
	foreach (split(/ /,$files))
		{
1175
		$orig=$_;
1176 1177 1178 1179 1180 1181
		$_=&bname($_) unless /^\$/;
		if ($n++ == 2)
			{
			$n=0;
			$ret.="\\\n\t";
			}
1182 1183 1184
		if (($_ =~ /bss_file/) && ($postfix eq ".h"))
			{ $pf=".c"; }
		else	{ $pf=$postfix; }
1185
		if ($_ =~ /BN_ASM/)	{ $t="$_ "; }
U
Ulf Möller 已提交
1186
		elsif ($_ =~ /BNCO_ASM/){ $t="$_ "; }
1187
		elsif ($_ =~ /AES_ASM/){ $t="$_ "; }
1188 1189 1190 1191 1192 1193 1194 1195
		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="$_ "; }
1196
		elsif ($_ =~ /WHIRLPOOL_ASM/){ $t="$_ "; }
D
Dr. Stephen Henson 已提交
1197
		elsif ($_ =~ /CPUID_ASM/){ $t="$_ "; }
1198
		else	{ $t="$location${o}$_$pf "; }
1199 1200 1201 1202

		$Vars{$var}.="$t ";
		$ret.=$t;
		}
D
 
Dr. Stephen Henson 已提交
1203
	# hack to add version info on MSVC
D
Dr. Stephen Henson 已提交
1204
	if ($shlib && (($platform eq "VC-WIN32") || ($platfrom eq "VC-WIN64I") || ($platform eq "VC-WIN64A") || ($platform eq "VC-NT")))
D
 
Dr. Stephen Henson 已提交
1205 1206 1207 1208 1209 1210
		{
		if ($var eq "CRYPTOOBJ")
			{ $ret.="\$(OBJ_D)\\\$(CRYPTO).res "; }
		elsif ($var eq "SSLOBJ")
			{ $ret.="\$(OBJ_D)\\\$(SSL).res "; }
		}
D
Dr. Stephen Henson 已提交
1211
	chomp($ret);
1212 1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223
	$ret.="\n\n";
	return($ret);
	}

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

1224 1225 1226 1227 1228 1229 1230
# return the leading path
sub dname
	{
	my $ret=shift;
	$ret =~ s/(^.*)[\\\/][^\\\/]+$/$1/;
	return($ret);
	}
1231 1232 1233 1234 1235 1236 1237

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

1240 1241 1242 1243
	$files =~ s/\//$o/g if $o ne '/';
	foreach (split(/\s+/,$files))
		{
		$n=&bname($_);
1244 1245 1246 1247 1248 1249
		$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
1250
		       ($s=~s/sha256/sha512/ and -f $s) or
1251 1252 1253 1254 1255 1256 1257 1258 1259
		       -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 已提交
1260 1261 1262 1263 1264
		elsif (defined &special_compile_target and
		       ($s=special_compile_target($_)))
			{
			$ret.=$s;
			}
1265
		else	{ die "no rule for $_"; }
1266 1267 1268 1269 1270 1271
		}
	return($ret);
	}

##############################################################
# do a rule for each file that says 'compile' to new direcory
1272 1273 1274
sub perlasm_compile_target
	{
	my($target,$source,$bname)=@_;
B
Ben Laurie 已提交
1275 1276 1277 1278

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

1279 1280
	my($ret);
	$bname =~ s/(.*)\.[^\.]$/$1/;
D
Dr. Stephen Henson 已提交
1281
	$ret ="\$(TMP_D)$o$bname$asm_suffix: $source\n";
1282
	$ret.="\t\$(PERL) $source $asmtype \$(CFLAG) >\$\@\n";
1283
	if ($fipscanisteronly)
1284
		{
D
Dr. Stephen Henson 已提交
1285
		$ret .= "\t\$(PERL) util$o.pl . \$@ norunasm \$(CFLAG)\n";
1286 1287
		}
	$ret .= "\n";
D
Dr. Stephen Henson 已提交
1288 1289
	$ret.="$target: \$(TMP_D)$o$bname$asm_suffix\n";
	$ret.="\t\$(ASM) $afile\$\@ \$(TMP_D)$o$bname$asm_suffix\n\n";
1290 1291 1292 1293 1294 1295 1296 1297 1298 1299
	return($ret);
	}

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

	$bname =~ s/(.*)\.[^\.]$/$1/;
	$ret ="\$(TMP_D)$o$bname.asm: $source\n";
1300 1301 1302
	$ret.="\t\$(CC) -E \$(CFLAG) $source >\$\@\n";
	$ret.="\t\$(PERL) util\\fipsas.pl . \$@ norunasm \$(CFLAG)\n" if $fipscanisteronly;
	$ret.="\n";
1303 1304 1305 1306 1307
	$ret.="$target: \$(TMP_D)$o$bname.asm\n";
	$ret.="\t\$(ASM) $afile\$\@ \$(TMP_D)$o$bname.asm\n\n";
	return($ret);
	}

1308 1309 1310 1311 1312
sub cc_compile_target
	{
	local($target,$source,$ex_flags)=@_;
	local($ret);
	
1313
	$ex_flags.=" -DMK1MF_BUILD -D$platform_cpp_symbol" if ($source =~ /cversion/);
1314 1315
	$target =~ s/\//$o/g if $o ne "/";
	$source =~ s/\//$o/g if $o ne "/";
1316
	$ret ="$target: \$(SRC_D)$o$source\n\t";
B
Ben Laurie 已提交
1317
	$ret.="\$(CC)";
D
Dr. Stephen Henson 已提交
1318 1319
	$ret.= " -MMD" if $orig_platform eq "copy";
	$ret.= " ${ofile}$target $ex_flags -c \$(SRC_D)$o$source\n\n";
1320
	$target =~ s/\.o$/.d/;
D
Dr. Stephen Henson 已提交
1321
	$ret.=".sinclude \"$target\"\n\n" if $orig_platform eq "copy";
1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334
	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);
1335 1336
	@s=split(/\s+/,$src);

1337 1338 1339

	for ($i=0; $i<=$#s; $i++)
		{
1340 1341 1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352
		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";
1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372
		}
	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);
	}

1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385
# 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; }
1386
		$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";
1387 1388 1389
		}
	return($ret);
	}
1390 1391 1392

sub read_options
	{
1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403
	# Many options are handled in a similar way. In particular
	# no-xxx sets zero or more scalars to 1.
	# Process these using a hash containing the option name and
	# reference to the scalars to set.

	my %valid_options = (
		"no-rc2" => \$no_rc2,
		"no-rc4" => \$no_rc4,
		"no-rc5" => \$no_rc5,
		"no-idea" => \$no_idea,
		"no-aes" => \$no_aes,
1404
		"no-camellia" => \$no_camellia,
B
Bodo Möller 已提交
1405
		"no-seed" => \$no_seed,
1406 1407 1408 1409 1410 1411 1412 1413 1414 1415
		"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-sha" => \$no_sha,
		"no-sha1" => \$no_sha1,
		"no-ripemd" => \$no_ripemd,
		"no-mdc2" => \$no_mdc2,
1416
		"no-whirlpool" => \$no_whirlpool,
1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429
		"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-hmac" => \$no_hmac,
		"no-asm" => \$no_asm,
		"nasm" => \$nasm,
		"nw-nasm" => \$nw_nasm,
		"nw-mwasm" => \$nw_mwasm,
		"gaswin" => \$gaswin,
		"no-ssl2" => \$no_ssl2,
		"no-ssl3" => \$no_ssl3,
1430
		"no-tlsext" => \$no_tlsext,
B
Ben Laurie 已提交
1431
		"no-srp" => \$no_srp,
1432
		"no-cms" => \$no_cms,
D
Dr. Stephen Henson 已提交
1433
		"no-jpake" => \$no_jpake,
1434
		"no-ec2m" => \$no_ec2m,
D
Dr. Stephen Henson 已提交
1435
		"no-ec_nistp_64_gcc_128" => 0,
1436 1437 1438 1439 1440 1441
		"no-err" => \$no_err,
		"no-sock" => \$no_sock,
		"no-krb5" => \$no_krb5,
		"no-ec" => \$no_ec,
		"no-ecdsa" => \$no_ecdsa,
		"no-ecdh" => \$no_ecdh,
1442
		"no-gost" => \$no_gost,
1443 1444 1445 1446 1447 1448
		"no-engine" => \$no_engine,
		"no-hw" => \$no_hw,
		"just-ssl" =>
			[\$no_rc2, \$no_idea, \$no_des, \$no_bf, \$no_cast,
			  \$no_md2, \$no_sha, \$no_mdc2, \$no_dsa, \$no_dh,
			  \$no_ssl2, \$no_err, \$no_ripemd, \$no_rc5,
B
Ben Laurie 已提交
1449
			  \$no_aes, \$no_camellia, \$no_seed, \$no_srp],
1450 1451 1452 1453 1454
		"rsaref" => 0,
		"gcc" => \$gcc,
		"debug" => \$debug,
		"profile" => \$profile,
		"shlib" => \$shlib,
1455
		"dll" => \$shlib,
1456
		"shared" => 0,
D
Dr. Stephen Henson 已提交
1457
		"no-sctp" => 0,
1458
		"no-gmp" => 0,
1459
		"no-rfc3779" => 0,
D
Dr. Stephen Henson 已提交
1460
		"no-montasm" => 0,
1461
		"no-shared" => 0,
D
Dr. Stephen Henson 已提交
1462
		"no-store" => 0,
1463 1464
		"no-zlib" => 0,
		"no-zlib-dynamic" => 0,
1465
		"no-ssl-trace" => 0,
1466 1467
		"fips" => \$fips,
		"fipscanisterbuild" => [\$fips, \$fipscanisterbuild],
1468
		"fipscanisteronly" => [\$fips, \$fipscanisterbuild, \$fipscanisteronly],
1469
		"fipscheck" => [\$fips, \$fipscanisterbuild, \$fipscanisteronly],
1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485
		);

	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;
				}
			}
		}
1486
	elsif (/^no-comp$/) { $xcflags = "-DOPENSSL_NO_COMP $xcflags"; }
D
Dr. Stephen Henson 已提交
1487
	elsif (/^enable-zlib$/) { $zlib_opt = 1 if $zlib_opt == 0 }
1488 1489
	elsif (/^enable-zlib-dynamic$/)
		{
D
Dr. Stephen Henson 已提交
1490
		$zlib_opt = 2;
1491
		}
D
Dr. Stephen Henson 已提交
1492 1493 1494 1495 1496 1497 1498 1499
	elsif (/^no-static-engine/)
		{
		$no_static_engine = 1;
		}
	elsif (/^enable-static-engine/)
		{
		$no_static_engine = 0;
		}
1500 1501 1502 1503 1504 1505 1506 1507 1508 1509
	# 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;
1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521
		}
	# 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";
		
1522
		}
1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538
	elsif (/^--with-krb5-flavor=(.*)$/)
		{
		my $krb5_flavor = $1;
		if ($krb5_flavor =~ /^force-[Hh]eimdal$/)
			{
			$xcflags="-DKRB5_HEIMDAL $xcflags";
			}
		elsif ($krb5_flavor =~ /^MIT/i)
			{
			$xcflags="-DKRB5_MIT $xcflags";
		 	if ($krb5_flavor =~ /^MIT[._-]*1[._-]*[01]/i)
				{
				$xcflags="-DKRB5_MIT_OLD11 $xcflags"
				}
			}
		}
1539 1540 1541 1542
	elsif (/^([^=]*)=(.*)$/){ $VARS{$1}=$2; }
	elsif (/^-[lL].*$/)	{ $l_flags.="$_ "; }
	elsif ((!/^-help/) && (!/^-h/) && (!/^-\?/) && /^-.*$/)
		{ $c_flags.="$_ "; }
1543 1544
	else { return(0); }
	return(1);
1545
	}
1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573

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