Skip site navigation (1)Skip section navigation (2)
Date:      Mon, 30 Oct 2017 13:56:49 +0000 (UTC)
From:      Mathieu Arnold <mat@FreeBSD.org>
To:        ports-committers@freebsd.org, svn-ports-all@freebsd.org, svn-ports-head@freebsd.org
Subject:   svn commit: r453175 - head/Tools/scripts
Message-ID:  <201710301356.v9UDunsg087924@repo.freebsd.org>

next in thread | raw e-mail | index | archive | help
Author: mat
Date: Mon Oct 30 13:56:49 2017
New Revision: 453175
URL: https://svnweb.freebsd.org/changeset/ports/453175

Log:
  Re-enable blame (was annotate) with svn and git support.
  
  ak@ asked that I remove the unused error array, and I went to have a
  look at what it was actually used for back in the day.  It seemed better
  to re-enable the blame feature instead of removing it.
  
  Sponsored by:	Absolight

Modified:
  head/Tools/scripts/MOVEDlint.awk

Modified: head/Tools/scripts/MOVEDlint.awk
==============================================================================
--- head/Tools/scripts/MOVEDlint.awk	Mon Oct 30 13:04:25 2017	(r453174)
+++ head/Tools/scripts/MOVEDlint.awk	Mon Oct 30 13:56:49 2017	(r453175)
@@ -38,6 +38,14 @@ BEGIN {
     portsdir = ENVIRON["PORTSDIR"] ? ENVIRON["PORTSDIR"] : "/usr/ports"
     if (ARGC == 1) {
         ARGV[ARGC++] = portsdir "/MOVED"
+        if (ENVIRON["BLAME"]) {
+            if (!system("test -d " portsdir "/.svn")) {
+                blame = "cd " portsdir "; svn blame MOVED 2>/dev/null"
+            } else if (!system("test -d " portsdir "/.git")) {
+                blame = "cd " portsdir "; git blame MOVED 2>/dev/null"
+            }
+
+        }
     }
     sort = "/usr/bin/sort -n"
     lastdate="1999-12-31"
@@ -85,11 +93,15 @@ $3 !~ /^20[0-3][0-9]-[01][0-9]-[0-3][0-9]$/ {
     }
 
 #    Produces too many false positives
-#    if ($4 ~ /^[a-z].*/)
+#    if ($4 ~ /^[a-z].*/) {
 #       printf "Initial value of 'reason' is lowercase: %5d (%s)\n", NR, $4 | sort
+#       error[NR] = 1
+#    }
 
-    if ($4 ~ /\.$/)
+    if ($4 ~ /\.$/) {
         printf "%5d: Final character is a dot: (%s)\n", NR, $4 | sort
+        error[NR] = 1
+    }
 }
 
 END {
@@ -101,6 +113,16 @@ END {
     for (port in missing) {
         printf "%5d: %s not found\n", missing[port], port | sort
         error[missing[port]] = 1
+    }
+
+    if (blame) {
+        line = 1
+        while (blame | getline) {
+            if (error[line])
+                printf "%5d!\n%5d! %s\n", line, line, $0 | sort
+            line++
+        }
+        close(blame)
     }
 
     close(sort)



Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201710301356.v9UDunsg087924>