1 files changed, 19 insertions, 0 deletions
diff --git a/elsie.nci.nih.gov/src/checklinks.awk b/elsie.nci.nih.gov/src/checklinks.awk
new file mode 100644
index 0000000..f57f736
--- /dev/null
+++ b/elsie.nci.nih.gov/src/checklinks.awk
@@ -0,0 +1,19 @@
+# Check links in tz tables.
+
+# Contributed by Paul Eggert.
+
+/^Link/ { used[$2] = 1 }
+/^Zone/ { defined[$2] = 1 }
+
+END {
+    status = 0
+
+    for (tz in used) {
+	if (!defined[tz]) {
+	    printf "%s: Link to non-zone\n", tz
+	    status = 1
+	}
+    }
+
+    exit status
+}