[<prev] [next>] [thread-next>] [day] [month] [year] [list]
Message-Id: <274efab2332ad2308ab5de85a95d255f6e2de5f3.1462711962.git.joe@perches.com>
Date: Sun, 8 May 2016 05:55:46 -0700
From: Joe Perches <joe@...ches.com>
To: Andrew Morton <akpm@...ux-foundation.org>,
Andy Whitcroft <apw@...onical.com>
Cc: "Du, Changbin" <changbin.du@...el.com>,
linux-kernel@...r.kernel.org
Subject: [PATCH 1/2] checkpatch: Reduce number of `git log` calls with --git
checkpatch currently calls git log multiple times to first get the
<revision range> sha1 values and again to get the subject for each
individual sha1 commit.
Always get the sha1 and subject at the same time instead.
Store the subject in a sha1 hash to avoid the second git log exec.
Signed-off-by: Joe Perches <joe@...ches.com>
---
scripts/checkpatch.pl | 23 +++++++++++++----------
1 file changed, 13 insertions(+), 10 deletions(-)
diff --git a/scripts/checkpatch.pl b/scripts/checkpatch.pl
index 8fc9edd..9283662 100755
--- a/scripts/checkpatch.pl
+++ b/scripts/checkpatch.pl
@@ -28,6 +28,7 @@ my $terse = 0;
my $showfile = 0;
my $file = 0;
my $git = 0;
+my %git_commits = ();
my $check = 0;
my $check_orig = 0;
my $summary = 1;
@@ -806,23 +807,25 @@ die "$P: No git repository found\n" if ($git && !-e ".git");
if ($git) {
my @commits = ();
- for my $commit_expr (@ARGV) {
+ foreach my $commit_expr (@ARGV) {
my $git_range;
if ($commit_expr =~ m/-/) {
my @tmp = split(/-/, $commit_expr);
- die "$P: incorrect git commits expression $commit_expr$!\n"
+ die "$P: incorrect git commit expression '$commit_expr' $!\n"
if (@tmp != 2);
$git_range = "-$tmp[1] $tmp[0]";
} elsif ($commit_expr =~ m/\.\./) {
$git_range = "$commit_expr";
- }
- if (defined $git_range) {
- my $lines = `git log --no-merges --pretty=format:'%H' $git_range`;
- foreach my $line (split(/\n/, $lines)) {
- unshift(@commits, $line);
- }
} else {
- unshift(@commits, $commit_expr);
+ $git_range = "-1 $commit_expr";
+ }
+ my $lines = `git log --no-color --no-merges --pretty=format:'%H %s' $git_range`;
+ foreach my $line (split(/\n/, $lines)) {
+ $line =~ /(^\w+) (.*)/;
+ my $sha1 = $1;
+ my $subject = $2;
+ unshift(@commits, $sha1);
+ $git_commits{$sha1} = $subject;
}
}
die "$P: no git commits after extraction!\n" if (@commits == 0);
@@ -847,7 +850,7 @@ for my $filename (@ARGV) {
if ($filename eq '-') {
$vname = 'Your patch';
} elsif ($git) {
- $vname = "Commit " . substr($filename, 0, 12) . `git log -1 --pretty=format:' ("%s")' $filename`;
+ $vname = "Commit " . substr($filename, 0, 12) . ' ("' . $git_commits{$filename} . '")';
} else {
$vname = $filename;
}
--
2.8.0.rc4.16.g56331f8
Powered by blists - more mailing lists