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

458 459 460 461 462
# Remove opensslconf.h so it doesn't get updated if we configure a
# different branch.
$exheader =~ s/[^ ]+\/opensslconf.h//;
$header =~ s/[^ ]+\/opensslconf.h//;

463 464 465 466 467 468 469 470
if ($fips)
	{

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

564 565 566 567 568 569
if ($fipscanisteronly)
	{
	$build_targets = "\$(O_FIPSCANISTER) \$(T_EXE)";
	$libs_dep = "";
	}

570 571
$cp2 = $cp unless defined $cp2;

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

617
$defs= <<"EOF";
618
# N.B. You MUST use -j on FreeBSD.
619 620
# This makefile has been automatically generated from the OpenSSL distribution.
# This single makefile will build the complete OpenSSL distribution and
621 622 623 624 625 626 627 628 629 630 631
# 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.

632 633
EOF

634 635
$defs .= $preamble if defined $preamble;

636
$defs.= <<"EOF";
637
INSTALLTOP=$INSTALLTOP
638
OPENSSLDIR=$OPENSSLDIR
639 640

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

653
# The OpenSSL directory
654 655 656 657
SRC_D=$src_dir

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

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

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

679 680 681 682 683 684 685 686 687 688 689
# 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

690 691 692 693
######################################################
# You should not need to touch anything below this point
######################################################

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

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

722
L_LIBS= \$(L_SSL) \$(L_CRYPTO) $ex_l_libs
723 724 725 726 727

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

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

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

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

banner:
$banner

\$(TMP_D):
744
	\$(MKDIR) \"\$(TMP_D)\"
745 746 747 748 749 750
# 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)
751 752

\$(LIB_D):
753
	\$(MKDIR) \"\$(LIB_D)\"
754

755
\$(INCO_D): \$(INC_D)
756
	\$(MKDIR) \"\$(INCO_D)\"
757

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

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

766 767
headers: \$(HEADER) \$(EXHEADER)

D
Dr. Stephen Henson 已提交
768
lib: \$(LIBS_DEP) \$(E_SHLIB)
769 770 771

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

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

780 781 782 783 784 785 786
clean:
	\$(RM) \$(TMP_D)$o*.*

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

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

794
EOF
795 796 797 798 799 800 801 802 803 804 805

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

EOF
	}

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

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

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

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

B
Ben Laurie 已提交
842
# Strip off trailing ' '
843 844 845 846 847 848 849 850 851 852 853
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 已提交
854 855
$defs.=&do_defs("HEADER",$header,"\$(INCL_D)","");
$rules.=&do_copy_rule("\$(INCL_D)",$header,"");
856

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

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

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

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

911 912 913
foreach (values %lib_nam)
	{
	$lib_obj=$lib_obj{$_};
914 915
	local($slib)=$shlib;

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

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

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

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

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

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



977
$rules.= &do_lib_rule("\$(SSLOBJ)","\$(O_SSL)",$ssl,$shlib,"\$(SO_SSL)");
978
#$rules.= &do_lib_rule("\$(CRYPTOOBJ)","\$(O_CRYPTO)",$crypto,$shlib,"\$(SO_CRYPTO)");
979

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

	}

988 989 990 991 992 993 994 995 996 997 998 999
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)", "");
1000
		$rules.= &do_lib_rule("\$(CRYPTOOBJ) \$(O_FIPSCANISTER)",
1001 1002 1003 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
			"\$(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);
1036

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

1039
print $defs;
1040 1041 1042 1043 1044

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

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

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

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

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

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

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

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

1134
	@a=grep(!/^engine$/,@a) if $no_engine;
1135
	@a=grep(!/^hw$/,@a) if $no_hw;
1136
	@a=grep(!/(^rsa$)|(^genrsa$)/,@a) if $no_rsa;
1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162
	@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)=@_;
1163
	local($_,$ret,$pf);
1164 1165 1166 1167 1168 1169 1170 1171
	local(*OUT,$tmp,$t);

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

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

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

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

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

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

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

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

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

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

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

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

1334 1335 1336

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

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

sub read_options
	{
1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400
	# 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,
1401
		"no-camellia" => \$no_camellia,
B
Bodo Möller 已提交
1402
		"no-seed" => \$no_seed,
1403 1404 1405 1406 1407 1408 1409 1410 1411 1412
		"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,
1413
		"no-whirlpool" => \$no_whirlpool,
1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426
		"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,
1427
		"no-tlsext" => \$no_tlsext,
B
Ben Laurie 已提交
1428
		"no-srp" => \$no_srp,
1429
		"no-cms" => \$no_cms,
D
Dr. Stephen Henson 已提交
1430
		"no-jpake" => \$no_jpake,
1431
		"no-ec2m" => \$no_ec2m,
D
Dr. Stephen Henson 已提交
1432
		"no-ec_nistp_64_gcc_128" => 0,
1433 1434 1435 1436 1437 1438
		"no-err" => \$no_err,
		"no-sock" => \$no_sock,
		"no-krb5" => \$no_krb5,
		"no-ec" => \$no_ec,
		"no-ecdsa" => \$no_ecdsa,
		"no-ecdh" => \$no_ecdh,
1439
		"no-gost" => \$no_gost,
1440 1441 1442 1443 1444 1445
		"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 已提交
1446
			  \$no_aes, \$no_camellia, \$no_seed, \$no_srp],
1447 1448 1449 1450 1451
		"rsaref" => 0,
		"gcc" => \$gcc,
		"debug" => \$debug,
		"profile" => \$profile,
		"shlib" => \$shlib,
1452
		"dll" => \$shlib,
1453
		"shared" => 0,
D
Dr. Stephen Henson 已提交
1454
		"no-sctp" => 0,
1455
		"no-gmp" => 0,
1456
		"no-rfc3779" => 0,
D
Dr. Stephen Henson 已提交
1457
		"no-montasm" => 0,
1458
		"no-shared" => 0,
D
Dr. Stephen Henson 已提交
1459
		"no-store" => 0,
1460 1461
		"no-zlib" => 0,
		"no-zlib-dynamic" => 0,
1462
		"no-ssl-trace" => 0,
1463 1464
		"fips" => \$fips,
		"fipscanisterbuild" => [\$fips, \$fipscanisterbuild],
1465
		"fipscanisteronly" => [\$fips, \$fipscanisterbuild, \$fipscanisteronly],
1466
		"fipscheck" => [\$fips, \$fipscanisterbuild, \$fipscanisteronly],
1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482
		);

	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;
				}
			}
		}
1483
	elsif (/^no-comp$/) { $xcflags = "-DOPENSSL_NO_COMP $xcflags"; }
D
Dr. Stephen Henson 已提交
1484
	elsif (/^enable-zlib$/) { $zlib_opt = 1 if $zlib_opt == 0 }
1485 1486
	elsif (/^enable-zlib-dynamic$/)
		{
D
Dr. Stephen Henson 已提交
1487
		$zlib_opt = 2;
1488
		}
D
Dr. Stephen Henson 已提交
1489 1490 1491 1492 1493 1494 1495 1496
	elsif (/^no-static-engine/)
		{
		$no_static_engine = 1;
		}
	elsif (/^enable-static-engine/)
		{
		$no_static_engine = 0;
		}
1497 1498 1499 1500 1501 1502 1503 1504 1505 1506
	# 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;
1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518
		}
	# 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";
		
1519
		}
1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535
	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"
				}
			}
		}
1536 1537 1538 1539
	elsif (/^([^=]*)=(.*)$/){ $VARS{$1}=$2; }
	elsif (/^-[lL].*$/)	{ $l_flags.="$_ "; }
	elsif ((!/^-help/) && (!/^-h/) && (!/^-\?/) && /^-.*$/)
		{ $c_flags.="$_ "; }
1540 1541
	else { return(0); }
	return(1);
1542
	}
1543 1544 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

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