Lines Matching refs:_
327 unshift @argvcopy, "no-$_" if ! -d catdir($srcdir, 'crypto', $_);
374 &read_config($_);
387 &read_config($_);
646 sub { 0 == scalar grep { !$disabled{$_} } @dtls }
650 sub { 0 == scalar grep { !$disabled{$_} } @tls }
831 $_ = shift @argvcopy;
874 && !grep { $word eq $_ } @disablables)
876 $unsupported_options{$_} = 1;
922 $deprecated_options{$_} = 1;
930 $deprecated_options{$_} = 1;
1081 if ! grep { $x eq $_ } @known_seed_sources;
1109 push @{$useradd{LDLIBS}}, $_;
1113 push @{$useradd{LDLIBS}}, $_, shift(@argvcopy);
1117 push @{$useradd{LDFLAGS}}, $_;
1125 push @{$useradd{LDFLAGS}}, $_, $rpath;
1129 push @{$useradd{LDFLAGS}}, $_;
1148 $_ =~ s/%([0-9a-f]{1,2})/chr(hex($1))/gei;
1149 push @{$useradd{CFLAGS}}, $_;
1150 push @{$useradd{CXXFLAGS}}, $_;
1158 $_ =~ s/%([0-9a-f]{1,2})/chr(hex($1))/gei;
1159 push @{$useradd{CFLAGS}}, $_;
1160 push @{$useradd{CXXFLAGS}}, $_;
1165 $target=$_;
1167 unless ($_ eq $target || /^no-/ || /^disable-/)
1175 { $config{options} = $_; }
1177 { $config{options} .= " ".$_; }
1195 if (grep { scalar @$_ > 0 } values %useradd) {
1202 $v += 1 if $cmdvars{$_};
1203 $v += 2 if @{$useradd{$_}};
1204 $_ => $v }
1208 if (grep { $_ & 1 } values %detected_vars) {
1209 my $names = join(', ', grep { $detected_vars{$_} > 0 }
1224 grep { defined $_ && (ref $_ ne 'ARRAY' || @$_) } values %useradd;
1226 my $value = $cmdvars{$_};
1227 $value //= env($_) unless $anyuseradd;
1229 defined $user_synonyms{$_} ? $cmdvars{$user_synonyms{$_}} : undef;
1230 $value //= defined $user_synonyms{$_} ? env($user_synonyms{$_}) : undef
1234 if (ref $user{$_} eq 'ARRAY') {
1235 if ($_ eq 'CPPDEFINES' || $_ eq 'CPPINCLUDES') {
1236 $user{$_} = [ split /$list_separator_re/, $value ];
1238 $user{$_} = [ $value ];
1240 } elsif (!defined $user{$_}) {
1241 $user{$_} = $value;
1260 $disabled{$_} = 'system' unless defined $disabled{$_};
1273 for (@_) {
1274 $disabled{$_} = $disable_type;
1277 my @tocheckfor = (@_ ? @_ : keys %disabled);
1285 foreach (grep { !defined($disabled{$_}) } @$descendents) {
1286 $new_tocheckfor{$_} = 1; $disabled{$_} = "cascade";
1295 our $die = sub { die @_; };
1297 local $die = sub { warn @_; };
1299 print_table_entry($_, "TABLE");
1306 print $_,"\n" unless $table{$_}->{template};
1312 local $die = sub { warn @_; };
1315 print_table_entry($_, "HASH");
1327 if (scalar(grep { $_ eq 'egd' } @seed_sources) > 0) {
1330 if (scalar(grep { $_ eq 'none' } @seed_sources) > 0) {
1353 map { (my $x = $_) =~ tr|[\-a-z]|[_A-Z]|; "OPENSSL_RAND_SEED_$x" }
1383 $found=$_ if $table{$_} && !$table{$_}->{template};
1402 $target{$target_attr_translate{$_}} = $target{$_}
1403 if $target{$_};
1404 delete $target{$_};
1409 my %conf_files = map { $_ => 1 } (@{$target{_conf_fname_int}});
1417 } elsif (!grep { $feature eq $_ } @disablables) {
1426 } elsif (!grep { $feature eq $_ } @disablables) {
1448 my $ref_type = ref $user{$_};
1457 die "Too many arguments for \$mkvalue" if @_;
1473 $config{$_} =
1474 $mkvalue->($ref_type, $user{$_})
1475 || $mkvalue->($ref_type, $target{$_});
1476 delete $config{$_} unless defined $config{$_};
1484 unless ref $useradd{$_} eq 'ARRAY';
1486 if (defined $config{$_}) {
1487 push @{$config{$_}}, @{$useradd{$_}};
1489 $config{$_} = [ @{$useradd{$_}} ];
1500 if (grep { $_ =~ /(?:^|\s)-static(?:\s|$)/ } @{$config{LDFLAGS}}) {
1543 && !grep { $_ =~ /-m(ips|arch=)/ } (@{$config{CFLAGS}})) {
1581 (my $checks = $_) =~ s/^-fsanitize=//;
1585 memory => 'msan' } -> {$_};
1650 delete $config{$_};
1651 $target{$_} = "";
1738 $config{bn_ll}=1 if $_ eq 'BN_LLONG';
1739 $config{rc4_int}="unsigned char" if $_ eq 'RC4_CHAR';
1741 =(0,1,0) if $_ eq 'SIXTY_FOUR_BIT';
1743 =(1,0,0) if $_ eq 'SIXTY_FOUR_BIT_LONG';
1745 =(0,0,1) if $_ eq 'THIRTY_TWO_BIT';
1754 if $disabled{deprecated} && $config{api} >= $apitable->{$_};
1763 $config{cflags} = [ map { (my $x = $_) =~ s/([\\\"])/\\$1/g; $x }
1765 $config{cxxflags} = [ map { (my $x = $_) =~ s/([\\\"])/\\$1/g; $x }
1794 $config{CFLAGS} = [ map { $_ eq '--ossl-strict-warnings'
1796 : ( $_ ) }
1801 if (grep { $_ eq 'afalgeng' } @{$target{enable}}) {
1883 $target{$_} = defined $target{$_}
1884 ? add($si->{$_})->($target{$_})
1885 : $si->{$_};
1916 if (!grep { $what eq $_ } ( 'buildtest-c++', 'fips', 'threads', 'shared',
1997 $local_config_envname . ':' . $_;
1999 catfile(env($local_config_envname), $_);
2006 ( map { cleanfile($srcdir, catfile("Configurations", $_), $blddir, 1) }
2010 for $_ (@build_file_templates) {
2011 $build_file_template = $_;
2135 my @goals = @_;
2166 my @values = @_;
2330 print STDERR "DEBUG: Parsing ",join(" ", @_),"\n";
2742 unless grep { $_ eq $i } @{$unified_info{includes}->{$dest}->{$spot}};
2765 $unified_copy{$_} = { %{$unified_info{$_}} }
2766 if defined($unified_info{$_});
2767 delete $unified_info{$_};
2781 sub { grep !/\.a$/, @_ },
2796 my $prodselect = $intent->{$kind}->{prodselect} // sub { @_ };
2801 map { $_ => [ keys %{$unified_copy{sources}->{$_}} ] }
2802 map { keys %{$unified_copy{$_}->{$prod}} }
2808 if ($_ =~ /\.(o|res)$/) {
2811 catfile(dirname($_),
2814 . '-' . basename($_));
2816 foreach my $src (@{$prod_sources{$_}}) {
2821 && defined $attrs->{$prod}->{$_}) {
2823 $attrs->{$prod}->{$_};
2824 delete $attrs->{$prod}->{$_};
2826 foreach my $objsrc (keys %{$attrs->{$_} // {}}) {
2828 $attrs->{$_}->{$objsrc};
2829 delete $attrs->{$_}->{$objsrc};
2833 foreach my $deps (keys %{$unified_info{depends}->{$_}}) {
2834 $unified_info{depends}->{$_}->{$deps} = -1;
2840 defined($unified_info{includes}->{$_}->{$k});
2841 my @incs = @{$unified_info{includes}->{$_}->{$k}};
2845 $unified_info{$dst}->{$prod}->{$_} = 1;
2861 $unified_info{$_} = [ sort keys %{$unified_info{$_}} ];
2869 grep { $unified_info{$l1}->{$l2}->{$_} > 0 }
2881 = [ map { $_.$unified_info{defines}->{$dest}->{$_} }
2894 unless grep { $_ eq $inc } @{$unified_info{includes}->{$dest}};
2912 "docs" => [ (map { @{$unified_info{imagedocs}->{$_} // []} }
2914 (map { @{$unified_info{htmldocs}->{$_} // []} }
2916 (map { @{$unified_info{mandocs}->{$_} // []} }
2925 my $d = dirname($_);
2936 push @{$unified_info{dirinfo}->{$d}->{deps}}, $_
2940 push @{$unified_info{dirinfo}->{$_}->{products}->{$type}},
2950 my $src = $_;
2951 (my $obj = $_) =~ s/_(asm|aux)_src$/_obj/;
3035 die @_ if $^S; # To prevent the added message in eval blocks
3037 my @message = ( <<"_____", @_ );
3076 my %opts = @_;
3088 my @stuff = @_;
3098 my @flags = @_;
3103 my @flags = @_;
3120 my $res = $_;
3134 } (@_);
3141 join($separator, grep { defined($_) && $_ ne "" } @values);
3146 if (ref($_[$#_]) eq "HASH") {
3150 my @x = @_;
3151 sub { _add($separator, @x, @_) };
3155 if (ref($_[$#_]) eq "HASH") {
3159 my @x = @_;
3160 sub { _add($separator, @_, @x) };
3198 $preexisting{$_} = 1 if $table{$_};
3210 if (ref($targets{$_}) ne "HASH") {
3211 if (ref($targets{$_}) eq "") {
3216 delete $targets{$_};
3218 $targets{$_}->{_conf_fname_int} = add([ $fname ]);
3231 my @breadcrumbs = @_;
3235 if (grep { $_ eq $target } @breadcrumbs) {
3253 map { ref($_) eq "CODE" ? $_->() : $_ } @{$table{$target}->{inherit_from}};
3255 my %inherited_config = resolve_config($_, $target, @breadcrumbs);
3262 if (!$combined_inheritance{$_}) {
3263 $combined_inheritance{$_} = [];
3265 push @{$combined_inheritance{$_}}, $inherited_config{$_};
3288 map { $_ => 1 } (keys %combined_inheritance,
3307 return [ map { process_values($_, $inherited, $target, $entry) }
3404 my ($name)=@_;
3415 my $fullpath = catfile($_, "$name$target{exe_extension}");
3426 my %opts = @_;
3497 if (ref($target{$_}) eq "ARRAY") {
3498 printf "\$%-12s = %s\n", $_, join(" ", @{$target{$_}});
3500 printf "\$%-12s = %s\n", $_, $target{$_};
3508 if ($target{$_}) {
3509 if (ref($target{$_}) eq "ARRAY") {
3510 …print " '",$_,"'"," " x ($largest - length($_))," => [ ",join(", ", map { "'$_'" } @{$target{…
3512 print " '",$_,"'"," " x ($largest - length($_))," => '",$target{$_},"',\n";
3573 die "samedir expects two arguments\n" unless scalar @_ == 2;
3575 my @stat0 = stat($_[0]); # First argument
3576 my @stat1 = stat($_[1]); # Second argument
3608 return map { $processor->($_); } @_;
3623 $_ = "";
3627 $_ = $line_concat->($saved_line, $_);
3631 $saved_line = $_;
3634 return $_;
3636 die "$filename ending with continuation line\n" if $_;
3654 $_ = "";
3655 while (defined($_ = shift @array)) {
3658 $_ = $line_concat->($saved_line, $_);
3662 $saved_line = $_;
3665 return $_;
3667 die "input text ending with continuation line\n" if $_;
3678 my %collectors = @_;
3680 while(defined($_ = $lineiterator->())) {
3684 $collectors{"BEFORE"}->($_);
3693 $collectors{"OTHERWISE"}->($lineiterator, $_)
3697 $collectors{"AFTER"}->($_);
