Added simple sanity checking of the dependencies table.

diff --git a/sanitycheck.cgi b/sanitycheck.cgi
index 969cfd3c448a747e38ca1a170e4a28f20a371a0b..f13fb4a1300e919d526778ae5dc2ddeabe73ac84 100755 (executable)
--- a/sanitycheck.cgi
+++ b/sanitycheck.cgi
@@ -166,3 +166,21 @@ while (@row = FetchSQLData()) {
         Alert("Bad who $who in " . BugLink($id));
     }
 }
+
+
+Status("Checking dependency table");
+
+SendSQL("select blocked, dependson from dependencies");
+while (@row = FetchSQLData()) {
+    my ($blocked, $dependson) = (@row);
+    if (!defined $bugid{$blocked}) {
+        Alert("Bad blocked " . BugLink($blocked));
+    }
+    if (!defined $bugid{$dependson}) {
+        Alert("Bad dependson " . BugLink($dependson));
+    }
+}
+
+
+
+Status("Sanity check completed.");