X-Git-Url: https://git.enpas.org/?a=blobdiff_plain;f=openwrt%2Fscripts%2Fconfigtest.pl;h=476bba7dcec12623839cc36901ba54a5cbc80cd5;hb=b5d886dade07591079c5fab06d574e06530aee30;hp=61fe8a7b629bead1d21747ec86e421ae9de0b810;hpb=d2b94be30cae972e5bd43f530e7d9fb44c5173d0;p=openwrt.git

diff --git a/openwrt/scripts/configtest.pl b/openwrt/scripts/configtest.pl
index 61fe8a7b62..476bba7dce 100755
--- a/openwrt/scripts/configtest.pl
+++ b/openwrt/scripts/configtest.pl
@@ -1,11 +1,28 @@
 #!/usr/bin/perl
-
 my %change = (
-	'ROOTFS' => 'make linux-dirclean'
+	'^BUSYBOX' => 'make package/busybox-clean',
+	'OPENVPN_' => 'make package/openvpn-clean',
+	'SYSCONF_' => 'make package/base-files-clean target_clean',
+	'' => 'make target_clean'
+);
+
+my @configfiles = (
+#	['package/linux/linux.config', 'build_mipsel/linux/.config' =>
+#		'make -C package linux-clean']
 );
 
+
+
 foreach my $change (keys %change) {
 	my $v1 = `grep '$change' .config.test`;
 	my $v2 = `grep '$change' .config`;
 	$v1 eq $v2 or system($change{$change});
 }
+
+foreach my $file (@configfiles) {
+	if ((-f $file->[0]) and (-f $file->[1])) {
+		my @s1 = stat $file->[0];
+		my @s2 = stat $file->[1];
+		$s1[9] > $s2[9] and system($file->[2]);
+	}
+}