Add a new configuration option: COMMITCHECK_EXTRA. This is a

reference to an anonymous subroutine that if defined gets run at
commitcheck time.  It allows the admin to run further checks to
see whether committing is allowed.

1 files changed, 11 insertions, 0 deletions

diff --git a/CVSROOT/commitcheck b/CVSROOT/commitcheck
index aa58ef37d0a6..65e0bc929468 100755
--- a/CVSROOT/commitcheck
+++ b/CVSROOT/commitcheck
@@ -26,6 +26,7 @@ if (@cfg::COMMIT_HOSTS && !grep(/^\Q$hostname\E$/i, @cfg::COMMIT_HOSTS)) {
 	exit 1;
 }
 
+
 # Sanity check to make sure we've been run through the wrapper and are
 # now primary group 'ncvs'.
 #
@@ -36,6 +37,16 @@ unless ( $GRP =~ /^ncvs$/ ) {
 	exit 1;
 }
 
+
+# Run locally defined extra commitchecks.
+if (defined($cfg::COMMITCHECK_EXTRA) && $cfg::COMMITCHECK_EXTRA) {
+	die 'commitcheck: $cfg::COMMITCHECK_EXTRA isn\'t a sub!'
+	    unless ref($cfg::COMMITCHECK_EXTRA) eq "CODE";
+
+	die "Failed commitcheck_extra\n" unless &$cfg::COMMITCHECK_EXTRA();
+}
+
+
 #
 # Ensure the minimum version of cvs is installed.
 #