mirror of
https://github.com/openssl/openssl.git
synced 2024-11-23 18:13:39 +08:00
Fix the perl code to get FIPSMODULENAME
Reviewed-by: Tomas Mraz <tomas@openssl.org> (Merged from https://github.com/openssl/openssl/pull/14320)
This commit is contained in:
parent
e25b4db754
commit
c9b0214ede
@ -122,12 +122,13 @@ SHLIB_TARGET={- $target{shared_target} -}
|
||||
LIBS={- join(", ", map { "-\n\t".$_.".OLB" } @libs) -}
|
||||
SHLIBS={- join(", ", map { "-\n\t".$_.".EXE" } @shlibs) -}
|
||||
FIPSMODULENAME={- # We do some extra checking here, as there should be only one
|
||||
use File::Basename;
|
||||
my @fipsmodules =
|
||||
grep { !$unified_info{attributes}->{modules}->{$_}->{noinst}
|
||||
&& $unified_info{attributes}->{modules}->{$_}->{fips} }
|
||||
@{$unified_info{modules}};
|
||||
die "More that one FIPS module" if scalar @fipsmodules > 1;
|
||||
join(", ", map { basename platform->dso($_) } @fipsmodules) -}
|
||||
join(", ", map { basename(platform->dso($_)) } @fipsmodules) -}
|
||||
MODULES={- join(", ", map { "-\n\t".$_.".EXE" } @{$unified_info{modules}}) -}
|
||||
PROGRAMS={- join(", ", map { "-\n\t".$_.".EXE" } @{$unified_info{programs}}) -}
|
||||
SCRIPTS={- join(", ", map { "-\n\t".$_ } @{$unified_info{scripts}}) -}
|
||||
|
@ -89,12 +89,13 @@ MODULES={- join(" \\\n" . ' ' x 8,
|
||||
map { platform->dso($_) }
|
||||
@{$unified_info{modules}})) -}
|
||||
FIPSMODULENAME={- # We do some extra checking here, as there should be only one
|
||||
use File::Basename;
|
||||
my @fipsmodules =
|
||||
grep { !$unified_info{attributes}->{modules}->{$_}->{noinst}
|
||||
&& $unified_info{attributes}->{modules}->{$_}->{fips} }
|
||||
@{$unified_info{modules}};
|
||||
die "More that one FIPS module" if scalar @fipsmodules > 1;
|
||||
join(" ", map { basename platform->dso($_) } @fipsmodules) -}
|
||||
join(" ", map { basename(platform->dso($_)) } @fipsmodules) -}
|
||||
|
||||
PROGRAMS={- join(" \\\n" . ' ' x 9,
|
||||
fill_lines(" ", $COLUMNS - 9,
|
||||
|
@ -52,12 +52,13 @@ MODULES={- our @MODULES = map { platform->dso($_) } @{$unified_info{modules}};
|
||||
join(" ", @MODULES) -}
|
||||
MODULEPDBS={- join(" ", map { platform->dsopdb($_) } @{$unified_info{modules}}) -}
|
||||
FIPSMODULENAME={- # We do some extra checking here, as there should be only one
|
||||
use File::Basename;
|
||||
my @fipsmodules =
|
||||
grep { !$unified_info{attributes}->{modules}->{$_}->{noinst}
|
||||
&& $unified_info{attributes}->{modules}->{$_}->{fips} }
|
||||
@{$unified_info{modules}};
|
||||
die "More that one FIPS module" if scalar @fipsmodules > 1;
|
||||
join(" ", map { basename platform->dso($_) } @fipsmodules) -}
|
||||
join(" ", map { basename(platform->dso($_)) } @fipsmodules) -}
|
||||
PROGRAMS={- our @PROGRAMS = map { platform->bin($_) } @{$unified_info{programs}}; join(" ", @PROGRAMS) -}
|
||||
PROGRAMPDBS={- join(" ", map { $_.".pdb" } @{$unified_info{programs}}) -}
|
||||
SCRIPTS={- our @SCRIPTS = @{$unified_info{scripts}}; join(" ", @SCRIPTS) -}
|
||||
|
Loading…
Reference in New Issue
Block a user