From b504b2707e0780d5f0b347aef9bead0e516813a2 Mon Sep 17 00:00:00 2001 From: "Arnold D. Robbins" Date: Wed, 8 Jun 2016 22:56:35 +0300 Subject: New helper file, changed-files.awk. --- helpers/ChangeLog | 5 +++++ helpers/changed-files.awk | 19 +++++++++++++++++++ 2 files changed, 24 insertions(+) create mode 100644 helpers/changed-files.awk (limited to 'helpers') diff --git a/helpers/ChangeLog b/helpers/ChangeLog index 7ffbe62e..256ff0be 100644 --- a/helpers/ChangeLog +++ b/helpers/ChangeLog @@ -1,3 +1,8 @@ +2016-06-08 Arnold D. Robbins + + * changed-files.awk: New program. Helps find files that need + copyright updates by scanning ChangeLog files. + 2016-03-07 Arnold D. Robbins * fixdump.awk (translate): Remove extraneous spaces in diff --git a/helpers/changed-files.awk b/helpers/changed-files.awk new file mode 100644 index 00000000..937ecd51 --- /dev/null +++ b/helpers/changed-files.awk @@ -0,0 +1,19 @@ +#! /usr/bin/gawk -f + +/^2014-/ { nextfile } + +/^\t\*/ { + sub(/^\t\*[[:space:]]*/, "") + sub(/[:\[(].*/, "") + gsub(/,/, "") + for (i = 1; i <= NF; i++) { + fname = $i + if (! (fname in names)) + names[fname]++ + } +} + +END { + for (i in names) + print i +} -- cgit v1.2.3