From 4be26cbac7c0b76d6d77783cfb114206b1a7716b Mon Sep 17 00:00:00 2001 From: Don Zickus Date: Mon, 6 Nov 2017 16:55:26 -0500 Subject: configs: Create symlinks to used scripts As part of the config re-organization, put the scripts needed to create the config files in the configs/ directory. At the top level create symlinks for those scripts. This allows the kernel.spec file to find the scripts it needs and work correctly. No code changes. --- merge.pl | 67 +--------------------------------------------------------------- 1 file changed, 1 insertion(+), 66 deletions(-) mode change 100755 => 120000 merge.pl (limited to 'merge.pl') diff --git a/merge.pl b/merge.pl deleted file mode 100755 index 8c318156a..000000000 --- a/merge.pl +++ /dev/null @@ -1,66 +0,0 @@ -#! /usr/bin/perl - -my @args=@ARGV; -my %configvalues; -my @configoptions; -my $configcounter = 0; - -# optionally print out the architecture as the first line of our output -my $arch = $args[2]; -if (defined $arch) { - print "# $arch\n"; -} - -# first, read the override file - -open (FILE,"$args[0]") || die "Could not open $args[0]"; -while () { - my $str = $_; - my $configname; - - if (/\# ([\w]+) is not set/) { - $configname = $1; - } elsif (/([\w]+)=/) { - $configname = $1; - } - - if (defined($configname) && !exists($configvalues{$configname})) { - $configvalues{$configname} = $str; - $configoptions[$configcounter] = $configname; - $configcounter ++; - } -}; - -# now, read and output the entire configfile, except for the overridden -# parts... for those the new value is printed. - -open (FILE2,"$args[1]") || die "Could not open $args[1]"; -while () { - my $configname; - - if (/\# ([\w]+) is not set/) { - $configname = $1; - } elsif (/([\w]+)=/) { - $configname = $1; - } - - if (defined($configname) && exists($configvalues{$configname})) { - print "$configvalues{$configname}"; - delete($configvalues{$configname}); - } else { - print "$_"; - } -} - -# now print the new values from the overridden configfile -my $counter = 0; - -while ($counter < $configcounter) { - my $configname = $configoptions[$counter]; - if (exists($configvalues{$configname})) { - print "$configvalues{$configname}"; - } - $counter++; -} - -1; diff --git a/merge.pl b/merge.pl new file mode 120000 index 000000000..b77225dd2 --- /dev/null +++ b/merge.pl @@ -0,0 +1 @@ +configs/merge.pl \ No newline at end of file -- cgit