show service stats on index

git-svn-id: svn://presbrey.mit.edu/sql/web/dev@134 a142d4bd-2cfb-0310-9673-cb33a7e74f58

diff --git a/tpl/index.php b/tpl/index.php
index 56e4e823d7d516b77e5961162bcef3aeb55fdeca..26ce4e87b83f677f29dd5c699a36946b65b8c1c9 100644 (file)
--- a/tpl/index.php
+++ b/tpl/index.php
@@ -21,6 +21,35 @@ However, the SIPB MySQL service should not be used to host critical applications
 One nightly backup is available for your locker at <code>/mit/sql/backup/LOCKER_NAME</code>.  You should perform additional backups of your data using the <a href="http://scripts.mit.edu/cron">shortjobs service</a> or <a href="http://scripts.mit.edu/faq/10/how-can-i-back-up-or-restore-my-sql-data">phpMyAdmin</a>.
 </p>
 
+<div style="text-align:center; font-style: italic;">
+<?php
+if (!file_exists('/mit/sql/web_tmp/stat') || filemtime('/mit/sql/web_tmp/stat')+3600<time()) {
+       $x = fetchRows(DBSelect("SHOW STATUS WHERE Variable_name IN ('Questions','Uptime')"),'Variable_name');
+       $v = $x['Questions']['Value'];
+       $t = $x['Uptime']['Value'];
+       file_put_contents('/mit/sql/web_tmp/stat',implode("\n",array($v,$t)));
+} else {
+       $x = file_get_contents('/mit/sql/web_tmp/stat');
+       list($v, $t) = explode("\n", $x);
+}
+$qavg = $v/$t;
+$qunits = array('','k','M','G','T','P','E','Z','Y');
+while (count($qunits) && $v/1000>1) {
+       array_shift($qunits);
+       $v /= 1000;
+}
+printf('sql.mit.edu has served %.3f%s queries', $v, array_shift($qunits));
+
+$qunits = array('minutes', 'hours', 'days');
+$qdiv = array(60, 60, 24);
+while (count($qdiv) && $t/$qdiv[0]>0) {
+       $t /= array_shift($qdiv);
+       $tunits = array_shift($qunits);
+}
+printf(' in the last %.2f %s (%.2f qps)', $t, $tunits, $qavg);
+?>
+</div>
+
 <?php
 include 'foot.php';
 ?>