Lines Matching +full:open +full:- +full:source
2 # SPDX-License-Identifier: GPL-2.0
4 # Copyright 2005-2009 - Steven Rostedt
22 # 2. Change directory to the directory holding the source of the
38 # cd /usr/src/linux-2.6.10
39 # cp /boot/config-2.6.10-1-686-smp .config
59 my $uname = `uname -r`;
72 "file" => "/boot/config-$uname",
76 "file" => "/boot/vmlinuz-$uname",
77 "exec" => "scripts/extract-ikconfig",
78 "test" => "scripts/extract-ikconfig",
82 "exec" => "scripts/extract-ikconfig",
83 "test" => "scripts/extract-ikconfig",
87 "exec" => "scripts/extract-ikconfig",
88 "test" => "scripts/extract-ikconfig",
92 "exec" => "scripts/extract-ikconfig",
93 "test" => "scripts/extract-ikconfig",
97 "exec" => "scripts/extract-ikconfig",
98 "test" => "scripts/extract-ikconfig",
104 my $file = $conf->{"file"};
106 next if ( ! -f "$file");
108 if (defined($conf->{"test"})) {
109 `$conf->{"test"} $conf->{"file"} 2>/dev/null`;
113 my $exec = $conf->{"exec"};
117 open(my $infile, '-|', "$exec $file") || die "Failed to run $exec $file";
134 # Get the build source and top level Kconfig file (passed in)
139 my @makefiles = `find $ksource -name Makefile -or -name Kbuild 2>/dev/null`;
164 my $source = "$ksource/$kconfig";
168 while ($source =~ /\$\((\w+)\)/ && $last_source ne $source) {
170 $last_source = $source;
171 $source =~ s/\$\($env\)/$ENV{$env}/;
174 open(my $kinfile, '<', $source) || die "Can't open $source";
192 if (/^source\s+"?([^"]+)/) {
251 $deps =~ s/^[^a-zA-Z0-9_]*//;
252 $deps =~ s/[^a-zA-Z0-9_]*$//;
254 my @deps = split /[^a-zA-Z0-9_]+/, $deps;
260 $iflevel-- if ($iflevel);
263 } elsif (/^\s*(---)?help(---)?\s*$/ || /^(comment|choice|menu)\b/) {
303 open(my $infile, '<', $makefile) || die "Can't open $makefile";
321 # collect objects after obj-$(CONFIG_FOO_BAR)
322 if (/obj-\$[({](CONFIG_[^})]*)[)}]\s*[+:]?=\s*(.*)/) {
332 $obj =~ s/-/_/g;
358 if ( ! -f $lsmod_file) {
359 if ( -f $ENV{'objtree'}."/".$lsmod_file) {
366 my $otype = ( -x $lsmod_file) ? '-|' : '<';
367 open($linfile, $otype, $lsmod_file);
375 if ( -x "$dir/lsmod" ) {
385 open($linfile, '-|', $lsmod) || die "Can not call lsmod with $lsmod";
397 # a loaded module. This is a direct obj-${CONFIG_FOO} += bar.o
426 my $valid = "A-Za-z_0-9";
651 } elsif ($orig_cert ne $default_cert && ! -f $orig_cert) {
665 if (! -f $orig_keys) {