restructuring of boca's git

1 files changed, 357 insertions, 0 deletions

diff --git a/src/fscore.php b/src/fscore.php
new file mode 100644
index 0000000..d2b203e
--- /dev/null
+++ b/src/fscore.php
@@ -0,0 +1,357 @@
+<?php
+////////////////////////////////////////////////////////////////////////////////
+//BOCA Online Contest Administrator
+//    Copyright (C) 2003-2012 by BOCA Development Team (bocasystem@gmail.com)
+//
+//    This program is free software: you can redistribute it and/or modify
+//    it under the terms of the GNU General Public License as published by
+//    the Free Software Foundation, either version 3 of the License, or
+//    (at your option) any later version.
+//
+//    This program is distributed in the hope that it will be useful,
+//    but WITHOUT ANY WARRANTY; without even the implied warranty of
+//    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+//    GNU General Public License for more details.
+//    You should have received a copy of the GNU General Public License
+//    along with this program.  If not, see <http://www.gnu.org/licenses/>.
+////////////////////////////////////////////////////////////////////////////////
+// Last modified 02/nov/2012 by cassio@ime.usp.br
+
+////////////////////////////funcoes para placar///////////////////////////////////////////////
+function ScoreCMP($a,$b) {
+	if ($a["totalcount"]=="") $a["totalcount"]=0;
+	if ($b["totalcount"]=="") $b["totalcount"]=0;
+	if ($a["totaltime"]=="") $a["totaltime"]=0;
+	if ($b["totaltime"]=="") $b["totaltime"]=0;
+
+	if ($a["totalcount"]>$b["totalcount"]) return 1;
+	else if ($a["totalcount"]<$b["totalcount"]) return -1;
+	else {
+		if ($a["totaltime"]<$b["totaltime"]) return 1;
+		else if ($a["totaltime"]>$b["totaltime"]) return -1;
+		else {
+			if(isset($a["first"]) && $a["first"] != 0) {
+				if($a["first"]<$b["first"]) return 1;
+				else if($a["first"]>$b["first"]) return -1;
+			}
+			if ($a["user"]<$b["user"]) return 1;
+			else if ($a["user"]>$b["user"]) return -1;
+			else return 0;
+		}
+	}
+}
+function ordena($a) {
+	$r = array();
+	for ($i=0; $i<count($a); $i++) {
+		$max=null;
+		reset($a);
+		while ( list ($e, $c) = each($a) ) {
+			if ($a[$e]!=null && ($max==null || ScoreCMP($a[$e],$max) > 0)) {
+			     $j=0;
+			     for(;$j<$i;$j++)
+			       if($r[$j]['user']==$a[$e]['user'] && $r[$j]['site']==$a[$e]['site']) break;
+			     if($j>=$i) {
+				$max = $a[$e];
+				$maxe = $e;
+			     }
+			}
+		}
+		if ($max==null) break;
+		$r[$i] = $max;
+		$a[$maxe] = null;
+	}
+	return $r;
+}
+function DBScore($contest, $verifylastmile, $hor=-1, $globalsite='0') {
+	$c = DBConnect();
+	$r = DBExec($c, "select sitenumber as number from sitetable where contestnumber=$contest and siteactive='t'",
+	     "DBScore(get site)");
+	$n = DBnlines($r);
+	if ($n == 0) {
+		LOGError("Unable to get site information. No active sites available (contest=$contest)");
+		MSGError("Unable to get site information. No active sites available. Contact an admin now!");
+		exit;
+	}
+	$a = array();
+	$resp = array();
+	$whichsites=explode(',',$globalsite);
+	for ($i=0;$i<$n;$i++) {
+		$a = DBRow($r,$i);
+		if(in_array($a["number"], $whichsites) || in_array(0,$whichsites)) {
+			list($resp1,$data0) = DBScoreSite($contest, $a["number"], $verifylastmile, $hor);
+			$resp =  array_merge($resp, $resp1);
+		}
+	}
+	$ds = DIRECTORY_SEPARATOR;
+	if($ds=="") $ds = "/";
+	$probs=DBGetProblems($contest); $nprobs=count($probs);
+
+	$scoreitems = glob($_SESSION['locr'] . $ds . "private" .$ds . "remotescores" . $ds . "score*.dat", GLOB_NOSORT);
+	array_multisort(array_map('filemtime', $scoreitems), SORT_NUMERIC, SORT_DESC, $scoreitems);
+
+	foreach ($scoreitems as $fname) {
+		$namear=explode('_',$fname);
+		$overloadsite=-1;
+		if(isset($namear[3]) && is_numeric($namear[2])) $overloadsite=$namear[2];
+		$fc=file_get_contents($fname);
+		if(($arr = unserialize(base64_decode($fc)))===false) {
+			LOGError("File " . sanitizeText($fname) . " is not compatible");
+		} else { 
+			if(is_array($arr)) {
+				if(isset($arr['site'])) {
+					$site=$arr['site']; //if($overloadsite>0) $site=$overloadsite;
+					if(!in_array($site, $whichsites) && !in_array(0,$whichsites)) continue;
+					$fine=1;
+					reset($resp);
+					while(list($e, $c) = each($resp)) {
+						if($resp[$e]['site']==$site) { $fine=0; break; }					
+					}
+					if($fine) {
+						list($arr,$data0) = DBScoreSite($contest, $site, $verifylastmile, $hor, $arr);
+						reset($arr);
+						while(list($ee,$cc) = each($arr)) {
+							if($site != $arr[$ee]['site']) {
+								$arr[$ee]=null;
+								unset($arr[$ee]);
+							} else {
+								// just to make the color of the other site changed to the color of the problem in this site
+								while(list($e2,$c2) = each($arr[$ee]["problem"])) {
+									for($prob=0; $prob<$nprobs; $prob++) {
+										if($probs[$prob]['number']==$e2) {
+											$arr[$ee]['problem'][$e2]['color'] = $probs[$prob]['color'];
+											$arr[$ee]['problem'][$e2]['colorname'] = $probs[$prob]['colorname'];
+											break;
+										}
+									}
+								}
+							}
+						}
+						$resp = array_merge($resp, $arr);
+					}
+				} else {
+// old version -- just for compatibility ---
+					while(list($ee,$cc) = each($arr)) {
+						$fine=1;
+						reset($resp);
+						while(list($e, $c) = each($resp)) {
+							if($resp[$e]['site']==$arr[$ee]['site']) { $fine=0; break; }
+						}
+						if($fine==0) $arr[$ee]=null;
+						else {
+							// just to make the color of the other site changed to the color of the problem in this site
+							while(list($e2,$c2) = each($arr[$ee]["problem"])) {
+								for($prob=0; $prob<$nprobs; $prob++) {
+									if($probs[$prob]['number']==$e2) {
+										$arr[$ee]['problem'][$e2]['color'] = $probs[$prob]['color'];
+										$arr[$ee]['problem'][$e2]['colorname'] = $probs[$prob]['colorname'];
+										break;
+									}
+								}
+							}
+						}
+					}
+					$resp = array_merge($resp, $arr);
+// ---- end of old version ---
+				}
+			}
+//		MSGError("got scores from $fname");
+		}
+	}
+	if (($result = ordena ($resp)) === false) {
+		LOGError("Error while sorting scores (contest=$contest).");
+		MSGError("Error while sorting scores. Contact an admin now!");
+	}
+	return $result;
+}
+
+function DBBalloon($contest, $site, $user, $problem, $localsite=true, $c=null) {
+	if($c==null)
+		$c = DBConnect();
+	if (($b = DBSiteInfo($contest, $site, $c)) == null)
+		exit;
+	if ($localsite) {
+		if (($blocal = DBSiteInfo($contest, $_SESSION["usertable"]["usersitenumber"], $c)) == null)
+			exit;
+	} else $blocal = $b;
+	if (($ct = DBContestInfo($contest,$c)) == null)
+		exit;
+
+	$t = time();
+	$ta = $blocal["currenttime"];
+//	if ($verifylastmile)
+	$tf = $b["sitelastmilescore"];
+//	else {
+//		$tf = $b["siteduration"];
+//	}
+	$r = DBExec($c, "select r.rundatediff as time, a.yes as yes from " .
+		"runtable as r, answertable as a where r.runanswer=a.answernumber and " .
+		"a.contestnumber=$contest and r.usernumber=$user and r.runproblem=$problem and " .
+		"r.contestnumber=$contest and r.runsitenumber=$site and (r.runstatus ~ 'judged' or r.runstatus ~ 'judged+') and " .
+		"r.rundatediff>=0 and r.rundatediff<=$tf and r.rundatediffans<=$ta " . 
+		"order by r.rundatediff", "DBBalloon(get runs)");
+	$n = DBnlines($r);
+	for ($i=0;$i<$n;$i++) {
+		$a = DBRow($r,$i);
+		if($a["yes"]=='t') return true;
+	}
+	return false;
+}
+function DBRecentNews($contest, $site, $verifylastmile, $minutes=3) {
+	if (($b = DBSiteInfo($contest, $site)) == null)
+		exit;
+	if (($blocal = DBSiteInfo($contest, $_SESSION["usertable"]["usersitenumber"])) == null)
+		exit;
+	if (($ct = DBContestInfo($contest)) == null)
+		exit;
+
+	$t = time();
+	$ta = $blocal["currenttime"];
+	$taa = $ta - $minutes*60;
+	if ($verifylastmile)
+		$tf = $b["sitelastmilescore"];
+	else {
+		$tf = $b["siteduration"];
+	}
+
+	$c = DBConnect();
+	$r = DBExec($c, "select a.yes as yes, p.problemcolor as color, p.problemcolorname as colorname, u.userfullname as userfullname, " .
+		"u.usernumber as usernumber, p.problemnumber as problemnumber, p.problemname, (r.rundatediffans>$ta) as fut, min(r.rundatediff) as time from " .
+		"runtable as r, answertable as a, problemtable as p, usertable as u where r.runanswer=a.answernumber and " .
+		"p.contestnumber=$contest and a.contestnumber=$contest and r.usernumber = u.usernumber and u.usertype='team' and " .
+		"p.problemnumber=r.runproblem and r.contestnumber=$contest and r.runsitenumber=$site and u.userenabled='t' and " .
+		"r.rundatediff>=$taa and r.rundatediff<=$tf and r.rundatediff<=$ta and u.contestnumber=$contest and u.usersitenumber=$site and " . 
+                "((a.yes='t' and r.rundatediffans<=$ta) or (r.rundatediffans>$ta)) " .
+		"group by a.yes,p.problemcolor,p.problemcolorname,p.problemname,u.userfullname,u.usernumber,p.problemnumber,fut order by time", "DBRecentNews(get runs)");
+	$n = DBnlines($r);
+        $a = array();
+	for ($i=0;$i<$n;$i++) {
+		$a[$i] = DBRow($r,$i);
+		if($a[$i]["fut"]=='t' && $a[$i]["yes"]=='t') $a[$i]["yes"]='f';
+	}
+	return $a;
+}
+function DBScoreSite($contest, $site, $verifylastmile, $hor=-1, $data=null) {
+	if (($blocal = DBSiteInfo($contest, $_SESSION["usertable"]["usersitenumber"])) == null)
+		exit;
+	if (($b = DBSiteInfo($contest, $site, null, false)) == null)
+		$b=$blocal;
+	if (($ct = DBContestInfo($contest)) == null)
+		exit;
+
+	$t = time();
+	$ta = $blocal["currenttime"];
+	if($hor >= 0) $ta = $hor;
+	if ($verifylastmile)
+		$tf = $b["sitelastmilescore"];
+	else {
+		$tf = $b["siteduration"];
+	}
+	if($data != null && is_numeric($data)) {
+		if($data < $ta) $ta = $data;
+		$data=null;
+	}
+
+	$data0=array();
+	if($data==null) {
+		$c = DBConnect();
+		$resp = array();
+        $r = DBExec($c, "select * from usertable where contestnumber=$contest and usersitenumber=$site and ".
+					"usertype='team' and userlastlogin is not null and userenabled='t'", "DBScoreSite(get users)");
+		$n = DBnlines($r);
+		for ($i=0;$i<$n;$i++) {
+			$a = DBRow($r,$i);
+			$resp[$a["usernumber"]]["user"]=$a["usernumber"];
+			$resp[$a["usernumber"]]["site"]=$a["usersitenumber"];
+			$resp[$a["usernumber"]]["username"]=$a["username"];
+			$resp[$a["usernumber"]]["usertype"]=$a["usertype"];
+			$resp[$a["usernumber"]]["userfullname"]=$a["userfullname"];
+			$resp[$a["usernumber"]]["totaltime"]=0;
+			$resp[$a["usernumber"]]["totalcount"]=0;
+			$resp[$a["usernumber"]]["problem"]=array();
+		}
+		$r = DBExec($c, "select r.usernumber as user, p.problemname as problemname, r.runproblem as problem, ".
+					"p.problemcolor as color, p.problemcolorname as colorname, " .
+					"r.rundatediff as time, r.rundatediffans as anstime, a.yes as yes, r.runanswer as answer from " .
+					"runtable as r, answertable as a, problemtable as p where r.runanswer=a.answernumber and " .
+					"a.contestnumber=$contest and p.problemnumber=r.runproblem and p.contestnumber=$contest and " .
+					"r.contestnumber=$contest and r.runsitenumber=$site and (r.runstatus ~ 'judged' or r.runstatus ~ 'judged+') and " .
+					"r.rundatediff>=0 and r.rundatediff<=$tf and r.rundatediffans<=$ta " . 
+					"order by r.usernumber, r.runproblem, r.rundatediff", "DBScoreSite(get runs)");
+		$n = DBnlines($r);
+		$a = array();
+		for ($i=0;$i<$n;$i++) {
+			$a[$i] = DBRow($r,$i);
+		}
+		$data0['n']=$n;
+		$data0['resp']=$resp;
+		$data0['a']=$a;
+		$data0['site']=$site;
+	} else {
+		$resp=$data['resp'];
+		$n=$data['n'];
+		$a=$data['a'];
+	}
+
+	$i=0;
+	while ($i<$n) {
+		if($a[$i]["anstime"] > $ta) { $i++; continue; }
+		$user = $a[$i]["user"];
+		$problem = $a[$i]["problem"];
+		$time = 0;
+		$k = 0;
+		if(!isset($resp[$user])) { $i++; continue; }
+		$resp[$user]["user"] = $user;
+		$resp[$user]["site"] = $site;
+		$resp[$user]["problem"][$problem]["name"] = $a[$i]["problemname"];
+		$resp[$user]["problem"][$problem]["color"] = $a[$i]["color"];
+		$resp[$user]["problem"][$problem]["colorname"] = $a[$i]["colorname"];
+		$resp[$user]["problem"][$problem]["solved"] = false;
+		$resp[$user]["problem"][$problem]["judging"] = false;
+		$resp[$user]["problem"][$problem]["time"] = 0;
+		$resp[$user]["problem"][$problem]["penalty"] = 0;
+		$resp[$user]["problem"][$problem]["count"] = 0;
+
+		while ($i<$n && $a[$i]["anstime"] <= $ta && $a[$i]["user"]==$user && $a[$i]["problem"]==$problem && $a[$i]["yes"]!='t') {
+			$time += (int) (($ct["contestpenalty"])/60);
+			$k++;
+			$i++;
+		}
+		
+		$resp[$user]["problem"][$problem]["count"] = $k;
+		if ($i>=$n) break; 
+		if($a[$i]["anstime"] <= $ta && $a[$i]["user"]==$user && $a[$i]["problem"]==$problem && $a[$i]["yes"]=='t') {
+			$timet = (int) (($a[$i]["time"])/60);
+			if(!isset($resp[$user]["first"]) || $timet < $resp[$user]["first"])
+				$resp[$user]["first"] = $timet;
+			$time += $timet;
+			$resp[$user]["problem"][$problem]["time"] = $timet;
+			$resp[$user]["problem"][$problem]["penalty"] = $time;
+			$resp[$user]["problem"][$problem]["solved"] = true;
+			$resp[$user]["problem"][$problem]["count"]++;
+			$resp[$user]["totaltime"] += $time;
+			$resp[$user]["totalcount"]++;
+		}
+		while ($i<$n && $a[$i]["user"]==$user && $a[$i]["problem"]==$problem) {
+			$i++;
+		}
+	}
+
+	if($data==null) {
+		$aa = DBRecentNews($contest, $site, $verifylastmile, $ta);
+		$data0['aa']=$aa;
+	} else $aa=$data['aa'];
+
+	for($i=0; $i<count($aa); $i++) {
+		if($aa[$i]["fut"]=='t') {
+			$resp[$aa[$i]["usernumber"]]["problem"][$aa[$i]["problemnumber"]]["judging"] = true;
+		}
+	}
+
+	if (($result = ordena ($resp)) === false) {
+		LOGError("Error while sorting scores (contest=$contest, site=$site).");
+		MSGError("Error while sorting scores. Contact an admin now!");
+	}
+	return array($result,$data0);
+}
+// eof
+?>