annotate www/info.php @ 975:af0fc3a965dc

Fix all the web-interface PHP crap to work with the new LOC file format. Urgh. This shit could really use some refactoring cleanup.
author Matti Hamalainen <ccr@tnsp.org>
date Sun, 13 Jun 2010 23:39:52 +0000
parents 7cc73b376945
children e7e2a8c4b496
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
1 <?
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
2 require "config.inc.php";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
3 require "common.inc.php";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
4
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
5 /* Page start
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
6 */
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
7 printPageHeader($pageTitle." - Wizards of the Realm");
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
8 //echo "<div><b>DEVELOPMENT VERSION</b></div>";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
9 ?>
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
10 <h1>Wizards of the Realm</h1>
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
11
886
Matti Hamalainen <ccr@tnsp.org>
parents: 678
diff changeset
12 <div class="attnbox">
516
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
13 <table>
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
14 <tr>
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
15 <td>
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
16 <b>Notice #1</b>: The area counts are not really accurate, as the database only
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
17 lists areas accessible from outworld. Thus areas only accessible via some
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
18 other fashion are not listed. Also, maintainerships of some areas are not
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
19 clear, and may be credited to wrong wizard(s).
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
20 <br />
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
21
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
22 <b>Notice #2</b>: Not everyone who has once been immortal is listed.
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
23 Some purged and/or remorted wizards without known contributions are unlisted.
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
24 <br />
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
25
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
26 <b>Notice #3</b>: It is certainly possible, that some of this information is
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
27 incorrect. Sorry for that. Please report to <? burl("Ggr") ?>, if you have Knowledge(tm).
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
28 </td>
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
29 <td>
678
Matti Hamalainen <ccr@tnsp.org>
parents: 609
diff changeset
30
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
31 <script type="text/javascript"><!--
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
32 google_ad_client = "pub-0261199601131882";
678
Matti Hamalainen <ccr@tnsp.org>
parents: 609
diff changeset
33 /* 120x240, created 1/10/09 */
Matti Hamalainen <ccr@tnsp.org>
parents: 609
diff changeset
34 google_ad_slot = "4993882951";
Matti Hamalainen <ccr@tnsp.org>
parents: 609
diff changeset
35 google_ad_width = 120;
Matti Hamalainen <ccr@tnsp.org>
parents: 609
diff changeset
36 google_ad_height = 240;
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
37 //-->
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
38 </script>
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
39 <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
40 </script>
678
Matti Hamalainen <ccr@tnsp.org>
parents: 609
diff changeset
41
516
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
42 </td>
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
43 </tr>
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
44 </table>
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
45 </div>
516
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
46 <div style="text-align: center;">
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
47 <table style="background: black;">
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
48 <tr>
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
49 <td style="background: #474">Entry has information about the wizard.</td>
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
50 <td style="background: #744">No wizard information entry.</td>
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
51 </tr>
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
52 </table>
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
53 [<a href="<? echo $pageIndex ?>">Back to main page</a>]<br />
0fba99438f1b Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 504
diff changeset
54 </div>
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
55 <?
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
56
609
ff42dbb61d1c Updated.
Matti Hamalainen <ccr@tnsp.org>
parents: 532
diff changeset
57 $locTable = readLocationFiles();
ff42dbb61d1c Updated.
Matti Hamalainen <ccr@tnsp.org>
parents: 532
diff changeset
58 $wizTable = readWizInfoFiles();
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
59
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
60
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
61 if (isset($_GET["a"])) {
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
62 $coderName = basename($_GET["a"]);
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
63 $coderName = strtoupper(substr($coderName, 0, 1)).strtolower(substr($coderName, 1));
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
64 }
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
65
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
66
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
67 /* Print table of wizards
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
68 */
896
7cc73b376945 Cleanups, sync.
Matti Hamalainen <ccr@tnsp.org>
parents: 886
diff changeset
69 foreach ($locTable as $key => $value) {
975
af0fc3a965dc Fix all the web-interface PHP crap to work with the new LOC file format. Urgh. This shit could really use some refactoring cleanup.
Matti Hamalainen <ccr@tnsp.org>
parents: 896
diff changeset
70 foreach ($value["coders"] as $wiz) {
af0fc3a965dc Fix all the web-interface PHP crap to work with the new LOC file format. Urgh. This shit could really use some refactoring cleanup.
Matti Hamalainen <ccr@tnsp.org>
parents: 896
diff changeset
71 $name = $wiz["name"];
af0fc3a965dc Fix all the web-interface PHP crap to work with the new LOC file format. Urgh. This shit could really use some refactoring cleanup.
Matti Hamalainen <ccr@tnsp.org>
parents: 896
diff changeset
72 if (!isset($wizTable[$name]))
af0fc3a965dc Fix all the web-interface PHP crap to work with the new LOC file format. Urgh. This shit could really use some refactoring cleanup.
Matti Hamalainen <ccr@tnsp.org>
parents: 896
diff changeset
73 $wizTable[$name] = array("name" => $name);
af0fc3a965dc Fix all the web-interface PHP crap to work with the new LOC file format. Urgh. This shit could really use some refactoring cleanup.
Matti Hamalainen <ccr@tnsp.org>
parents: 896
diff changeset
74 $wizTable[$name]["areas"]++;
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
75 }
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
76 }
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
77
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
78 if (count($wizTable) > 0) {
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
79 /* Make alphabetical table
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
80 */
896
7cc73b376945 Cleanups, sync.
Matti Hamalainen <ccr@tnsp.org>
parents: 886
diff changeset
81 foreach ($wizTable as $key => $value)
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
82 $alphaTable[$key[0]][] = $value;
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
83
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
84 ksort($alphaTable, SORT_STRING);
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
85
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
86
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
87 /* Print wizards per first character
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
88 */
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
89 $totalWiz = 0;
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
90 $maxRow = 6;
896
7cc73b376945 Cleanups, sync.
Matti Hamalainen <ccr@tnsp.org>
parents: 886
diff changeset
91 foreach ($alphaTable as $key => $value) {
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
92 if (count($value) > 0) {
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
93 asort($value);
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
94 echo "<h3><a name=\"".strtolower($key)."\"></a>".$key."</h3>\n";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
95 echo "<table class=\"loc\" width=\"95%\">\n";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
96 $n = 0;
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
97 while (list($ik, $iv) = each($value)) {
896
7cc73b376945 Cleanups, sync.
Matti Hamalainen <ccr@tnsp.org>
parents: 886
diff changeset
98 if ($n == 0) echo " <tr>\n";
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
99
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
100 $totalWiz++;
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
101
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
102 printf(" <td width=\"%d%%\" style=\"background: %s;\"><a href=\"loc.php?a=%s\">%s</a> <span style=\"color: #f80;\">",
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
103 (100 / $maxRow), (count($iv) > 2 || isset($iv["desc"])) ? "#474" : "#744", $iv["name"], $iv["name"]);
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
104
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
105 if (isset($iv["areas"]))
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
106 echo " (".$iv["areas"].")";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
107
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
108 echo "</span></td>\n";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
109
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
110 $n++;
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
111 if ($n >= $maxRow) {
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
112 echo " </tr>\n";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
113 $n = 0;
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
114 }
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
115 }
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
116 if ($n > 0) {
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
117 while ($n++ < $maxRow)
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
118 echo " <td></td>\n";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
119
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
120 echo " </tr>\n";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
121 }
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
122 echo "</table>\n";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
123 }
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
124 }
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
125
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
126 echo "<p><b>".$totalWiz."</b> wizards.</p>\n";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
127 } else {
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
128 echo "<p><b>No wizards known!</b></p>\n";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
129 }
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
130
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
131 // Google Analytics
532
Matti Hamalainen <ccr@tnsp.org>
parents: 516
diff changeset
132 require "urchin.inc.php";
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
133 ?>
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
134 </body>
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
135 </html>