From: Michael Andreen <harv@ruin.nu>
Date: Mon, 10 Sep 2007 20:18:22 +0000 (+0200)
Subject: Member specific page
X-Git-Url: https://ruin.nu/git/?a=commitdiff_plain;h=08735a20800451a857b116dfdd127cc9c3edbd45;p=ndwebbie.git

Member specific page
---

diff --git a/NDWeb/Pages/MemberIntel.pm b/NDWeb/Pages/MemberIntel.pm
index 69ced51..fa1552d 100644
--- a/NDWeb/Pages/MemberIntel.pm
+++ b/NDWeb/Pages/MemberIntel.pm
@@ -45,30 +45,39 @@ sub render_body {
 		}
 	}
 
-	my $query = $DBH->prepare(q{SELECT u.uid,u.username,u.attack_points, u.defense_points, n.tick
-		,count(CASE WHEN i.mission = 'Attack' THEN 1 ELSE NULL END) AS attacks
-		,count(CASE WHEN (i.mission = 'Defend' OR i.mission = 'AllyDef') THEN 1 ELSE NULL END) AS defenses
-		FROM users u
-		JOIN groupmembers gm USING (uid)
-		LEFT OUTER JOIN (SELECT DISTINCT ON (planet) planet,tick from scans where type = 'News' ORDER BY planet,tick DESC) n USING (planet)
-		LEFT OUTER JOIN (SELECT * FROM intel WHERE amount = -1) i ON i.sender = u.planet
-		LEFT OUTER JOIN current_planet_stats t ON i.target = t.id
-		WHERE gm.gid = 2
-		GROUP BY u.uid,u.username,u.attack_points, u.defense_points,n.tick
-		ORDER BY attacks DESC,defenses DESC});
-	$query->execute() or $error .= $DBH->errstr;
-	my @members;
-	my $i = 0;
-	while (my $intel = $query->fetchrow_hashref){
-		$i++;
-		$intel->{ODD} = $i % 2;
-		$intel->{OLD} = 'OLD' if (!defined $intel->{tick} || $self->{TICK} > $intel->{tick} + 60);
-		delete $intel->{tick};
-		push @members,$intel;
+	my $user;
+	if (defined param('uid') && param('uid') =~ /^(\d+)$/){
+		my $query = $DBH->prepare(q{SELECT username,uid FROM users WHERE uid = ?
+			});
+		$user = $DBH->selectrow_hashref($query,undef,$1);
 	}
 
-	$BODY->param(Members => \@members);
-
+	if ($user){
+		$BODY->param(UID => $user->{uid});
+	}else{
+		my $query = $DBH->prepare(q{SELECT u.uid,u.username,u.attack_points, u.defense_points, n.tick
+			,count(CASE WHEN i.mission = 'Attack' THEN 1 ELSE NULL END) AS attacks
+			,count(CASE WHEN (i.mission = 'Defend' OR i.mission = 'AllyDef') THEN 1 ELSE NULL END) AS defenses
+			FROM users u
+			JOIN groupmembers gm USING (uid)
+			LEFT OUTER JOIN (SELECT DISTINCT ON (planet) planet,tick from scans where type = 'News' ORDER BY planet,tick DESC) n USING (planet)
+			LEFT OUTER JOIN (SELECT * FROM intel WHERE amount = -1) i ON i.sender = u.planet
+			LEFT OUTER JOIN current_planet_stats t ON i.target = t.id
+			WHERE gm.gid = 2
+			GROUP BY u.uid,u.username,u.attack_points, u.defense_points,n.tick
+			ORDER BY attacks DESC,defenses DESC, attack_points DESC, defense_points DESC});
+		$query->execute() or $error .= $DBH->errstr;
+		my @members;
+		my $i = 0;
+		while (my $intel = $query->fetchrow_hashref){
+			$i++;
+			$intel->{ODD} = $i % 2;
+			$intel->{OLD} = 'OLD' if (!defined $intel->{tick} || $self->{TICK} > $intel->{tick} + 60);
+			delete $intel->{tick};
+			push @members,$intel;
+		}
+		$BODY->param(Members => \@members);
+	}
 	$BODY->param(Error => $error);
 	return $BODY;
 }
diff --git a/templates/memberIntel.tmpl b/templates/memberIntel.tmpl
index 6260dc9..c4637d2 100644
--- a/templates/memberIntel.tmpl
+++ b/templates/memberIntel.tmpl
@@ -1,5 +1,7 @@
 <TMPL_VAR NAME=Error>
-<p><a href="/<TMPL_VAR NAME=PAGE>?show=all">Show all ticks</a></p>
+<!--<p><a href="/<TMPL_VAR NAME=PAGE>?show=all">Show all ticks</a></p>-->
+<TMPL_IF UID>
+<TMPL_ELSE>
 <table>
 	<tr>
 		<th>Member</th><th>Attacks</th><th>Defenses</th><th>Attack Points</th><th>Defense Points</th>
@@ -15,3 +17,4 @@
 	</tr>
 	</TMPL_LOOP>
 </table>
+</TMPL_IF>