summaryrefslogtreecommitdiff
path: root/openwrt/scripts/configtest.pl
blob: 709d2be74b2e294e5cda2c9626b4ab625a4e854c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
#!/usr/bin/perl
my %change = (
	'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]);
	}
}