Index: cvs.module
===================================================================
RCS file: /cvs/drupal-contrib/contributions/modules/cvslog/cvs.module,v
retrieving revision 1.226
diff -u -p -r1.226 cvs.module
--- cvs.module	11 Mar 2009 18:09:16 -0000	1.226
+++ cvs.module	11 Apr 2009 23:28:51 -0000
@@ -2845,3 +2845,23 @@ Motivation message:
 
   return $strings;
 }
+
+/**
+ * Return total number of approved CVS accounts.
+ */
+function cvs_get_number_of_accounts() {
+  return db_result(db_query('SELECT count(*) FROM {cvs_accounts} WHERE status = %d', CVS_APPROVED));
+}
+
+/**
+ * Return total number of commits in the past month.
+ *
+ * @param $rid
+ *   Optional repository identifier.
+ * @param $interval
+ *   Optional interval in seconds, defaults to 30 days.
+ */
+function cvs_get_number_of_commits($rid = NULL, $interval = 2592000) {
+  $where = isset($rid) ? ' AND rid = %d' : '';
+  return db_result(db_query('SELECT count(*) FROM {cvs_messages} WHERE created > %d'. $where, $_SERVER['REQUEST_TIME'] - $interval, $rid));
+}