get_maintainer.pl: Add git-min-percent option
authorJoe Perches <joe@perches.com>
Wed, 29 Jul 2009 22:04:28 +0000 (15:04 -0700)
committerLinus Torvalds <torvalds@linux-foundation.org>
Thu, 30 Jul 2009 02:10:41 +0000 (19:10 -0700)
Allow an option to control the minimum percentage of sign-offs required
before being considered a maintainer.

git-min-percent has a default value of 5

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>
scripts/get_maintainer.pl

index 7fc09fc91e8b8ae362506059f6ab98732827121f..61ef27564ed625387b43e030f2799421f8970791 100755 (executable)
@@ -27,6 +27,7 @@ my $email_git = 1;
 my $email_git_penguin_chiefs = 0;
 my $email_git_min_signatures = 1;
 my $email_git_max_maintainers = 5;
+my $email_git_min_percent = 5;
 my $email_git_since = "1-year-ago";
 my $output_multiline = 1;
 my $output_separator = ", ";
@@ -65,6 +66,7 @@ if (!GetOptions(
                'git-chief-penguins!' => \$email_git_penguin_chiefs,
                'git-min-signatures=i' => \$email_git_min_signatures,
                'git-max-maintainers=i' => \$email_git_max_maintainers,
+               'git-min-percent=i' => \$email_git_min_percent,
                'git-since=s' => \$email_git_since,
                'm!' => \$email_maintainer,
                'n!' => \$email_usename,
@@ -307,6 +309,7 @@ MAINTAINER field selection options:
     --git-chief-penguins => include ${penguin_chiefs}
     --git-min-signatures => number of signatures required (default: 1)
     --git-max-maintainers => maximum maintainers to add (default: 5)
+    --git-min-percent => minimum percentage of commits required (default: 0)
     --git-since => git history to use (default: 1-year-ago)
     --m => include maintainer(s) if any
     --n => include name 'Full Name <addr\@domain.tld>'
@@ -497,6 +500,7 @@ sub recent_git_signoffs {
     my $output = "";
     my $count = 0;
     my @lines = ();
+    my $total_sign_offs;
 
     if (which("git") eq "") {
        warn("$P: git not found.  Add --nogit to options?\n");
@@ -520,17 +524,26 @@ sub recent_git_signoffs {
     $output =~ s/^\s*//gm;
 
     @lines = split("\n", $output);
+
+    $total_sign_offs = 0;
+    foreach my $line (@lines) {
+       if ($line =~ m/([0-9]+)\s+(.*)/) {
+           $total_sign_offs += $1;
+       } else {
+           die("$P: Unexpected git output: ${line}\n");
+       }
+    }
+
     foreach my $line (@lines) {
        if ($line =~ m/([0-9]+)\s+(.*)/) {
            my $sign_offs = $1;
            $line = $2;
            $count++;
            if ($sign_offs < $email_git_min_signatures ||
-               $count > $email_git_max_maintainers) {
+               $count > $email_git_max_maintainers ||
+               $sign_offs * 100 / $total_sign_offs < $email_git_min_percent) {
                last;
            }
-       } else {
-           die("$P: Unexpected git output: ${line}\n");
        }
        if ($line =~ m/(.+)<(.+)>/) {
            my $git_name = $1;