Lines Matching +full:re +full:- +full:config
1 #! {- $config{HASHBANGPERL} -}
2 # -*- mode: perl -*-
3 {-
24 (my $vol, my $dirs, my $file) = File::Spec->splitpath($path);
25 my @dirs = File::Spec->splitdir($dirs);
29 $dirs = File::Spec::Unix->catdir('', $vol, @dirs);
30 $path = File::Spec::Unix->catpath('', $dirs, $file);
36 return _fixup_path(File::Spec->catdir($config{sourcedir}, @_))
39 return _fixup_path(File::Spec->catfile($config{sourcedir}, @_))
43 -}
52 %config %target %disabled %withargs %unified_info
56 our %config = ({- dump_data(\%config, indent => 0); -});
57 our %target = ({- dump_data(\%target, indent => 0); -});
58 our @disablables = ({- dump_data(\@disablables, indent => 0) -});
59 our @disablables_int = ({- dump_data(\@disablables_int, indent => 0) -});
60 our %disabled = ({- dump_data(\%disabled, indent => 0); -});
61 our %withargs = ({- dump_data(\%withargs, indent => 0); -});
62 our %unified_info = ({- dump_data(\%unified_info, indent => 0); -});
66 tls => [{- dump_data(\@tls, indent => 0) -}],
67 dtls => [{- dump_data(\@dtls, indent => 0) -}],
71 my @makevars = ({- dump_data(\@makevars, indent => 0); -});
72 my %disabled_info = ({- dump_data(\%disabled_info, indent => 0); -});
73 my @user_crossable = qw( {- join (' ', @user_crossable) -} );
84 use lib '{- sourcedir('util', 'perl') -}';
85 use OpenSSL::fallback '{- sourcefile('external', 'perl', 'MODULES.txt') -}';
90 # With no arguments, re-create the build file
94 my $buildfile = $config{build_file};
99 .join(", ", @{$config{build_file_templates}}),
103 config => \%config,
112 use lib '{- sourcedir('Configurations') -}';
117 foreach (@{$config{build_file_templates}}) {
129 use lib '{- sourcedir('util', 'perl') -}';
130 use lib '{- sourcedir('Configurations') -}';
131 use lib '{- $config{builddir} -}';
138 $tmpl = OpenSSL::Template->new(TYPE => 'FILE',
140 $tmpl->fill_in(FILENAME => $_,
157 catfile($config{sourcedir}, 'include', 'openssl', 'configuration.h.in');
160 $tmpl = OpenSSL::Template->new(TYPE => 'FILE',
162 $tmpl->fill_in(FILENAME => $_,
174 # avoid some data. This doesn't affect the mtime field, so we're not
179 if (-f $configuration_h) {
220 'command-line|c' => \$cmdline,
224 'make-variables|m' => \$makevars,
225 'build-parameters|b' => \$buildparams,
233 # We allow extra arguments with --query. That allows constructs like
235 # ./configdata.pm --query 'get_sources(@ARGV)' file1 file2 file3
239 For more information, do '$0 --help'
245 pod2usage(-exitval => 0,
246 -verbose => 1);
249 pod2usage(-exitval => 0,
250 -verbose => 2);
255 $config{PERL},
256 catfile($config{sourcedir}, 'Configure'),
257 @{$config{perlargv}}), "\n";
259 print ' ',$config{perl_cmd},"\n";
260 print ' ',$config{perl_version},' for ',$config{perl_archname},"\n";
277 print " $what", ' ' x ($longest - length($what) + 1),
278 "[$disabled{$what}]", ' ' x ($longest2 - length($disabled{$what}) + 1);
279 print $disabled_info{$what}->{macro}
280 if $disabled_info{$what}->{macro};
282 join(', ', @{$disabled_info{$what}->{skipped}}),
284 if $disabled_info{$what}->{skipped};
304 print '[ ', join(', ', $quotify->(@{$target{$_}})), " ],\n";
306 print $quotify->($target{$_}), ",\n"
312 foreach (sort keys %{$config{perlenv}}) {
313 print ' ',$_,' = ',($config{perlenv}->{$_} || ''),"\n";
320 $prefix = $config{CROSS_COMPILE}
323 print ' ',$var,' ' x (16 - length $var),'= ',
324 (ref $config{$var} eq 'ARRAY'
325 ? join(' ', @{$config{$var}})
326 : $prefix.$config{$var}),
328 if defined $config{$var};
331 my @buildfile = ($config{builddir}, $config{build_file});
333 unless file_name_is_absolute($config{builddir});
344 my @buildfile = ($config{builddir}, $config{build_file});
346 unless file_name_is_absolute($config{builddir});
351 foreach (@{$config{build_file_templates}}) {
354 unless file_name_is_absolute($config{sourcedir});
360 print 'Reconfiguring with: ', join(' ',@{$config{perlargv}}), "\n";
361 foreach (sort keys %{$config{perlenv}}) {
362 print ' ',$_,' = ',($config{perlenv}->{$_} || ""),"\n";
367 exec $^X,catfile($config{sourcedir}, 'Configure'),'reconf';
370 use OpenSSL::Config::Query;
372 my $confquery = OpenSSL::Config::Query->new(info => \%unified_info,
373 config => \%config);
374 my $result = eval "\$confquery->$query";
382 print "$_ : \\\n ", join(" \\\n ", @{$result->{$_}}), "\n"
396 configdata.pm - configuration data for OpenSSL builds
417 re-run the configuration process.
423 %config Configured things.
424 %target The OpenSSL config target with all inheritances
428 %withargs All data given through --with-THING options.
436 =item B<--help>
440 =item B<--man>
444 =item B<--dump> | B<-d>
446 Print all relevant configuration data. This is equivalent to B<--command-line>
447 B<--options> B<--target> B<--environment> B<--make-variables>
448 B<--build-parameters>.
450 =item B<--command-line> | B<-c>
454 =item B<--options> | B<-o>
459 =item B<--target> | B<-t>
461 Print the config attributes for this config target.
463 =item B<--environment> | B<-e>
467 =item B<--make-variables> | B<-m>
471 =item B<--build-parameters> | B<-b>
475 =item B<--reconfigure> | B<--reconf> | B<-r>
477 Re-run the configuration process.
479 =item B<--verbose> | B<-v>