From 7a30b107a62f6c1fb92a0cd033d37612e78d014f Mon Sep 17 00:00:00 2001
From: =?utf8?q?Bj=C3=B8rn=20Rustad?= <rustadbjornen@gmail.com>
Date: Tue, 20 Aug 2013 23:15:16 +0200
Subject: [PATCH] Show current standings

---
 lib/Duplo/Race.pm           | 22 ++++++++++++++++++++++
 templates/race/race.html.ep |  7 +++++++
 2 files changed, 29 insertions(+)

diff --git a/lib/Duplo/Race.pm b/lib/Duplo/Race.pm
index ba6f615..329fa2a 100644
--- a/lib/Duplo/Race.pm
+++ b/lib/Duplo/Race.pm
@@ -114,6 +114,27 @@ sub race {
 		AND
 		  \"user\" = ?
 		", undef, $race, $user);
+
+	my $standings_ref = $dbh->selectall_arrayref("
+		SELECT
+		  foo.race,
+		  mt.manager_team,
+		  mt.name,
+		  SUM(points) AS sum
+		FROM (
+		  SELECT
+		    stage.race,
+		    manager_team,
+		    (stage_team(stage, manager_team)).points
+		  FROM stage, manager_team
+		  WHERE stage.race = ?
+		) AS foo
+		JOIN
+		  manager_team AS mt
+		ON (foo.manager_team = mt.manager_team)
+		GROUP BY foo.race, mt.manager_team
+		ORDER BY sum DESC
+		", { Slice => {} }, $race);
 		
 	return $self->render(
 		race      => $race_ref,
@@ -123,6 +144,7 @@ sub race {
 		my_team   => $my_team_ref,
 		riders    => $riders_ref,
 		directors => $directors_ref,
+		standings => $standings_ref,
 	);
 }
 
diff --git a/templates/race/race.html.ep b/templates/race/race.html.ep
index 73fcfe9..b21839f 100644
--- a/templates/race/race.html.ep
+++ b/templates/race/race.html.ep
@@ -14,6 +14,13 @@
 </p>
 % }
 
+<h3>Standings</h3>
+<ul>
+% for my $t (@{ $standings }) {
+<li><%= $t->{'name'} %> – <%= $t->{'sum'} %></li>
+% }
+</ul>
+
 <h3>Stages</h3>
 <table class="table table-condensed">
   % my $num = 1;
-- 
2.47.3