summaryrefslogtreecommitdiffstats
path: root/configs
diff options
context:
space:
mode:
authorLaura Abbott <labbott@fedoraproject.org>2016-11-10 10:16:25 -0800
committerLaura Abbott <labbott@fedoraproject.org>2016-12-06 12:07:10 -0800
commit1b7eeb80190501aaf226e90e8f58f994cfc3efe0 (patch)
tree9ff96082cc146fb0ea946c6a111b61e90f9dd7f6 /configs
parentfe324f69901af83cb16ee086f3d284e67ed36e33 (diff)
downloadkernel-1b7eeb80190501aaf226e90e8f58f994cfc3efe0.tar.gz
kernel-1b7eeb80190501aaf226e90e8f58f994cfc3efe0.tar.xz
kernel-1b7eeb80190501aaf226e90e8f58f994cfc3efe0.zip
Change method of configuration generation
The existing method of managing configuration files gets unweildy. Changing individual lines in text files gets difficult without manual organization. Switch to a method of configuration generation that's inspired from the method used inside Red Hat. Each configuration option gets its own file which are then combined to form the configuration files. This makes confirming what's actually enabled much easier.
Diffstat (limited to 'configs')
-rwxr-xr-xconfigs/merge.pl66
1 files changed, 66 insertions, 0 deletions
diff --git a/configs/merge.pl b/configs/merge.pl
new file mode 100755
index 000000000..8c318156a
--- /dev/null
+++ b/configs/merge.pl
@@ -0,0 +1,66 @@
+#! /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 (<FILE>) {
+ 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 (<FILE2>) {
+ 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;