Mercurial > hg > batmud > maputils

annotate www/info.php @ 1646:2cbce82aa3c3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use full <?php ?> tag, misc cleanups.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 08 Aug 2016 23:18:46 +0300
parents 6d620441af7f
children 9d51b4138e7d
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1646
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
1 <?php
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
2 require "config.inc.php";
1272
Matti Hamalainen <ccr@tnsp.org>
parents: 1150
diff changeset
3 require "world.inc.php";
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
4 require "common.inc.php";
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
5
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
6 /* Page start
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
7 */
1620
6d620441af7f Rename various functions, and other cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1391
diff changeset
8 mpPrintPageHeader($pageTitle." - Wizards of the Realm");
1140
3bb8253db932 New website layout and some minor improvements.
Matti Hamalainen <ccr@tnsp.org>
parents: 1115
diff changeset
9
3bb8253db932 New website layout and some minor improvements.
Matti Hamalainen <ccr@tnsp.org>
parents: 1115
diff changeset
10 require "menu.inc.php";
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
11
1646
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
12 echo
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
13 "<div id=\"contents\">\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
14 "<h1>Wizards of the Realm</h1>\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
15 "<div class=\"attnbox\">\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
16 " <b>Notice #1</b>: The area counts are not really accurate, as the database only ".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
17 "lists areas accessible from outworld. Thus areas only accessible via some ".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
18 "other fashion are not listed. Also, maintainerships of some areas are not ".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
19 "clear, and may be credited to wrong wizard(s).\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
20 " <br />\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
21 "\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
22 " <b>Notice #2</b>: Not everyone who has once been immortal is listed. ".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
23 "Some purged and/or remorted wizards without known contributions are unlisted.\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
24 " <br />\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
25 "\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
26 " <b>Notice #3</b>: It is certainly possible, that some of this information is ".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
27 "incorrect. Sorry for that. Please report to ".burl("Ggr").", if you have Knowledge(tm).\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
28 "</div>\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
29 "<hr />\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
30 "<div style=\"text-align: center;\">\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
31 " <table style=\"background: black;\">\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
32 " <tr>\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
33 " <td style=\"background: #474\">Entry has information about the wizard.</td>\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
34 " <td style=\"background: #744\">No wizard information entry.</td>\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
35 " </tr>\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
36 " </table>\n".
2cbce82aa3c3 Use full <?php ?> tag, misc cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1620
diff changeset
37 "</div>\n";
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
38
1150
02fe48a608d7 Use APC for caching of location and wizard data.
Matti Hamalainen <ccr@tnsp.org>
parents: 1148
diff changeset
39 $locTable = apc_fetch("info_locTable");
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
40 if (empty($locTable))
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
41 {
1620
6d620441af7f Rename various functions, and other cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1391
diff changeset
42 $locTable = mpReadLocationFiles();
1150
02fe48a608d7 Use APC for caching of location and wizard data.
Matti Hamalainen <ccr@tnsp.org>
parents: 1148
diff changeset
43 apc_store("info_locTable", $locTable, 3600);
02fe48a608d7 Use APC for caching of location and wizard data.
Matti Hamalainen <ccr@tnsp.org>
parents: 1148
diff changeset
44 }
02fe48a608d7 Use APC for caching of location and wizard data.
Matti Hamalainen <ccr@tnsp.org>
parents: 1148
diff changeset
45 $wizTable = apc_fetch("wizTable");
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
46 if (empty($wizTable))
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
47 {
1620
6d620441af7f Rename various functions, and other cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1391
diff changeset
48 $wizTable = mpReadWizInfoFiles();
1150
02fe48a608d7 Use APC for caching of location and wizard data.
Matti Hamalainen <ccr@tnsp.org>
parents: 1148
diff changeset
49 apc_store("wizTable", $wizTable, 3600);
02fe48a608d7 Use APC for caching of location and wizard data.
Matti Hamalainen <ccr@tnsp.org>
parents: 1148
diff changeset
50 }
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
51
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
52
1115
Matti Hamalainen <ccr@tnsp.org>
parents: 1100
diff changeset
53 function wizardSort($a, $b)
Matti Hamalainen <ccr@tnsp.org>
parents: 1100
diff changeset
54 {
Matti Hamalainen <ccr@tnsp.org>
parents: 1100
diff changeset
55 return strcmp($a["name"], $b["name"]);
Matti Hamalainen <ccr@tnsp.org>
parents: 1100
diff changeset
56 }
Matti Hamalainen <ccr@tnsp.org>
parents: 1100
diff changeset
57
Matti Hamalainen <ccr@tnsp.org>
parents: 1100
diff changeset
58
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
59 /* Print table of wizards
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
60 */
1334
73dd95d63e7a Upstream sync.
Matti Hamalainen <ccr@tnsp.org>
parents: 1272
diff changeset
61 foreach ($locTable as $location)
73dd95d63e7a Upstream sync.
Matti Hamalainen <ccr@tnsp.org>
parents: 1272
diff changeset
62 {
73dd95d63e7a Upstream sync.
Matti Hamalainen <ccr@tnsp.org>
parents: 1272
diff changeset
63 foreach ($location["coders"] as $wiz)
73dd95d63e7a Upstream sync.
Matti Hamalainen <ccr@tnsp.org>
parents: 1272
diff changeset
64 {
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
65 $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
66 if (!isset($wizTable[$name]))
1334
73dd95d63e7a Upstream sync.
Matti Hamalainen <ccr@tnsp.org>
parents: 1272
diff changeset
67 $wizTable[$name] = array("name" => $name, "areas" => 0);
73dd95d63e7a Upstream sync.
Matti Hamalainen <ccr@tnsp.org>
parents: 1272
diff changeset
68 $wizTable[$name]["areas"]++;
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
69 }
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
70 }
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
71
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
72 if (count($wizTable) > 0)
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
73 {
1007
Matti Hamalainen <ccr@tnsp.org>
parents: 975
diff changeset
74 /* Make alphabetically sorted table of wizards
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
75 */
1007
Matti Hamalainen <ccr@tnsp.org>
parents: 975
diff changeset
76 foreach ($wizTable as $alpha => $data)
Matti Hamalainen <ccr@tnsp.org>
parents: 975
diff changeset
77 $alphaTable[$alpha[0]][] = $data;
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
78
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
79 ksort($alphaTable, SORT_STRING);
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
80
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
81
1007
Matti Hamalainen <ccr@tnsp.org>
parents: 975
diff changeset
82 /* Print wizards alphabetically per first character of name
337
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 $totalWiz = 0;
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
85 $maxRow = 6;
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
86 foreach ($alphaTable as $alpha => $data)
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
87 if (count($data) > 0)
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
88 {
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
89 usort($data, "wizardSort");
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
90
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
91 $letter = strtoupper($alpha);
1391
7fcea2fce0be More fixes.
Matti Hamalainen <ccr@tnsp.org>
parents: 1387
diff changeset
92 echo "<h3><a id=\"ch".$letter."\"></a>".$letter."</h3>\n";
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
93 echo "<table class=\"loc\">\n";
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
94 $n = 0;
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
95
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
96 foreach ($data as $wizard)
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
97 {
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
98 if ($n == 0) echo " <tr>\n";
1115
Matti Hamalainen <ccr@tnsp.org>
parents: 1100
diff changeset
99
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
100 $totalWiz++;
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
101
1391
7fcea2fce0be More fixes.
Matti Hamalainen <ccr@tnsp.org>
parents: 1387
diff changeset
102 printf(" <td style=\"width: %d%%; background: %s;\">".
7fcea2fce0be More fixes.
Matti Hamalainen <ccr@tnsp.org>
parents: 1387
diff changeset
103 "<a href=\"loc.php?a=%s\">%s</a> <span style=\"color: #f80;\">",
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
104 (100 / $maxRow), (count($wizard) > 2 || isset($wizard["desc"])) ? "#474" : "#744", $wizard["name"], $wizard["name"]);
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
105
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
106 if ($wizard["areas"] > 0)
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
107 echo " (".$wizard["areas"].")";
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
108
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
109 echo "</span></td>\n";
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
110
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
111 $n++;
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
112 if ($n >= $maxRow)
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
113 {
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
114 echo " </tr>\n";
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
115 $n = 0;
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
116 }
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
117 }
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
118
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
119 if ($n > 0)
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
120 {
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
121 while ($n++ < $maxRow)
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
122 echo " <td></td>\n";
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
123 echo " </tr>\n";
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
124 }
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
125 echo "</table>\n";
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
126 }
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
127
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
128 echo "<p><b>".$totalWiz."</b> wizards.</p>\n";
1140
3bb8253db932 New website layout and some minor improvements.
Matti Hamalainen <ccr@tnsp.org>
parents: 1115
diff changeset
129
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
130 // Print out the alpha link index
1620
6d620441af7f Rename various functions, and other cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1391
diff changeset
131 mpPrintExtraBoxAlphaList("ch", $alphaTable);
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
132 }
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
133 else
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
134 {
337
ca191c3a0ce1 Updates and lots of new ugly glue.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
135 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
136 }
1387
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
137
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
138 cmPrintPageFooter();
2b6b38e94bb2 Various minor code cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 1334
diff changeset
139 ?>