checkpatch: make the CamelCase cache work for non-git trees too
Might as well check include timestamps and cache the include file CamelCase uses for the non-git case too. The camelcase cache file is now named: for git: .checkpatch-camelcase.git.<commit_id> for non-git: .checkpatch-camelcase.date.<YYYYMMDDhhmm> All .checkpatch-camelcase* files are deleted if not current. Signed-off-by: Joe Perches <joe@perches.com> Signed-off-by: Andrew Morton <akpm@linux-foundation.org> Signed-off-by: Linus Torvalds <torvalds@linux-foundation.org>
This commit is contained in:
parent
dcb6b45254
commit
c707a81de7
|
@ -6,6 +6,7 @@
|
|||
# Licensed under the terms of the GNU GPL License version 2
|
||||
|
||||
use strict;
|
||||
use POSIX;
|
||||
|
||||
my $P = $0;
|
||||
$P =~ s@.*/@@g;
|
||||
|
@ -399,37 +400,52 @@ sub seed_camelcase_includes {
|
|||
return if ($camelcase_seeded);
|
||||
|
||||
my $files;
|
||||
my $camelcase_git_file = "";
|
||||
my $camelcase_cache = "";
|
||||
my @include_files = ();
|
||||
|
||||
$camelcase_seeded = 1;
|
||||
|
||||
if (-d ".git") {
|
||||
my $git_last_include_commit = `git log --no-merges --pretty=format:"%h%n" -1 -- include`;
|
||||
chomp $git_last_include_commit;
|
||||
$camelcase_git_file = ".checkpatch-camelcase.$git_last_include_commit";
|
||||
if (-f $camelcase_git_file) {
|
||||
open(my $camelcase_file, '<', "$camelcase_git_file")
|
||||
or warn "$P: Can't read '$camelcase_git_file' $!\n";
|
||||
while (<$camelcase_file>) {
|
||||
chomp;
|
||||
$camelcase{$_} = 1;
|
||||
}
|
||||
close($camelcase_file);
|
||||
|
||||
return;
|
||||
}
|
||||
$files = `git ls-files include`;
|
||||
$camelcase_cache = ".checkpatch-camelcase.git.$git_last_include_commit";
|
||||
} else {
|
||||
my $last_mod_date = 0;
|
||||
$files = `find $root/include -name "*.h"`;
|
||||
@include_files = split('\n', $files);
|
||||
foreach my $file (@include_files) {
|
||||
my $date = POSIX::strftime("%Y%m%d%H%M",
|
||||
localtime((stat $file)[9]));
|
||||
$last_mod_date = $date if ($last_mod_date < $date);
|
||||
}
|
||||
$camelcase_cache = ".checkpatch-camelcase.date.$last_mod_date";
|
||||
}
|
||||
my @include_files = split('\n', $files);
|
||||
|
||||
if ($camelcase_cache ne "" && -f $camelcase_cache) {
|
||||
open(my $camelcase_file, '<', "$camelcase_cache")
|
||||
or warn "$P: Can't read '$camelcase_cache' $!\n";
|
||||
while (<$camelcase_file>) {
|
||||
chomp;
|
||||
$camelcase{$_} = 1;
|
||||
}
|
||||
close($camelcase_file);
|
||||
|
||||
return;
|
||||
}
|
||||
|
||||
if (-d ".git") {
|
||||
$files = `git ls-files "include/*.h"`;
|
||||
@include_files = split('\n', $files);
|
||||
}
|
||||
|
||||
foreach my $file (@include_files) {
|
||||
seed_camelcase_file($file);
|
||||
}
|
||||
$camelcase_seeded = 1;
|
||||
|
||||
if ($camelcase_git_file ne "") {
|
||||
if ($camelcase_cache ne "") {
|
||||
unlink glob ".checkpatch-camelcase.*";
|
||||
open(my $camelcase_file, '>', "$camelcase_git_file")
|
||||
or warn "$P: Can't write '$camelcase_git_file' $!\n";
|
||||
open(my $camelcase_file, '>', "$camelcase_cache")
|
||||
or warn "$P: Can't write '$camelcase_cache' $!\n";
|
||||
foreach (sort { lc($a) cmp lc($b) } keys(%camelcase)) {
|
||||
print $camelcase_file ("$_\n");
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue