batmud/maputils: www/info.php annotate

annotate www/info.php @ 1150:02fe48a608d7

Use APC for caching of location and wizard data.

author	Matti Hamalainen <ccr@tnsp.org>
date	Thu, 21 Jul 2011 20:38:06 +0300
parents	52550f58cee5
children	ab28c4ddf8b0

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");
1140 3bb8253db932 New website layout and some minor improvements. Matti Hamalainen <ccr@tnsp.org> parents: 1115 diff changeset	8
3bb8253db932 New website layout and some minor improvements. Matti Hamalainen <ccr@tnsp.org> parents: 1115 diff changeset	9 require "menu.inc.php";
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	10 ?>
1140 3bb8253db932 New website layout and some minor improvements. Matti Hamalainen <ccr@tnsp.org> parents: 1115 diff changeset	11 <div id="contents">
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	12 <h1>Wizards of the Realm</h1>
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	13
886 b29e058120f5 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 678 diff changeset	14 <div class="attnbox">
516 0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	15 <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	16 lists areas accessible from outworld. Thus areas only accessible via some
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	17 other fashion are not listed. Also, maintainerships of some areas are not
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	18 clear, and may be credited to wrong wizard(s).
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	19 <br />
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	20
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	21 <b>Notice #2</b>: Not everyone who has once been immortal is listed.
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	22 Some purged and/or remorted wizards without known contributions are unlisted.
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	23 <br />
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	24
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	25 <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	26 incorrect. Sorry for that. Please report to <? burl("Ggr") ?>, if you have Knowledge(tm).
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	27 </div>
1140 3bb8253db932 New website layout and some minor improvements. Matti Hamalainen <ccr@tnsp.org> parents: 1115 diff changeset	28 <hr />
516 0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	29 <div style="text-align: center;">
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	30 <table style="background: black;">
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	31 <tr>
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	32 <td style="background: #474">Entry has information about the wizard.</td>
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	33 <td style="background: #744">No wizard information entry.</td>
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	34 </tr>
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	35 </table>
0fba99438f1b Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 504 diff changeset	36 </div>
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
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");
02fe48a608d7 Use APC for caching of location and wizard data. Matti Hamalainen <ccr@tnsp.org> parents: 1148 diff changeset	40 if (empty($locTable)) {
02fe48a608d7 Use APC for caching of location and wizard data. Matti Hamalainen <ccr@tnsp.org> parents: 1148 diff changeset	41 $locTable = readLocationFiles();
02fe48a608d7 Use APC for caching of location and wizard data. Matti Hamalainen <ccr@tnsp.org> parents: 1148 diff changeset	42 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	43 }
02fe48a608d7 Use APC for caching of location and wizard data. Matti Hamalainen <ccr@tnsp.org> parents: 1148 diff changeset	44 $wizTable = apc_fetch("wizTable");
02fe48a608d7 Use APC for caching of location and wizard data. Matti Hamalainen <ccr@tnsp.org> parents: 1148 diff changeset	45 if (empty($wizTable)) {
02fe48a608d7 Use APC for caching of location and wizard data. Matti Hamalainen <ccr@tnsp.org> parents: 1148 diff changeset	46 $wizTable = readWizInfoFiles();
02fe48a608d7 Use APC for caching of location and wizard data. Matti Hamalainen <ccr@tnsp.org> parents: 1148 diff changeset	47 apc_store("wizTable", $wizTable, 3600);
02fe48a608d7 Use APC for caching of location and wizard data. Matti Hamalainen <ccr@tnsp.org> parents: 1148 diff changeset	48 }
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	49
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	50
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	51 if (isset($_GET["a"])) {
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	52 $coderName = basename($_GET["a"]);
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	53 $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	54 }
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
1115 3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	57 function wizardSort($a, $b)
3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	58 {
3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	59 return strcmp($a["name"], $b["name"]);
3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	60 }
3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	61
3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	62
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	63 /* Print table of wizards
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	64 */
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	65 foreach ($locTable as $location) {
e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	66 foreach ($location["coders"] as $wiz) {
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	67 $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	68 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	69 $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	70 $wizTable[$name]["areas"]++;
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	71 }
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	72 }
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	73
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	74 if (count($wizTable) > 0) {
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	75 /* Make alphabetically sorted table of wizards
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	76 */
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	77 foreach ($wizTable as $alpha => $data)
e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	78 $alphaTable[$alpha[0]][] = $data;
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	79
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	80 ksort($alphaTable, SORT_STRING);
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	81
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	82
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	83 /* 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	84 */
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	85 $totalWiz = 0;
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	86 $maxRow = 6;
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	87 foreach ($alphaTable as $alpha => $data) {
e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	88 if (count($data) > 0) {
1115 3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	89 usort($data, "wizardSort");
3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	90
1148 52550f58cee5 Move alphabetic table printing code to a function in common routines. Matti Hamalainen <ccr@tnsp.org> parents: 1140 diff changeset	91 $letter = strtoupper($alpha);
52550f58cee5 Move alphabetic table printing code to a function in common routines. Matti Hamalainen <ccr@tnsp.org> parents: 1140 diff changeset	92 echo "<h3><a name=\"".$letter."\"></a>".$letter."</h3>\n";
1140 3bb8253db932 New website layout and some minor improvements. Matti Hamalainen <ccr@tnsp.org> parents: 1115 diff changeset	93 echo "<table class=\"loc\">\n";
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	94 $n = 0;
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	95
e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	96 foreach ($data as $wizard) {
896 7cc73b376945 Cleanups, sync. Matti Hamalainen <ccr@tnsp.org> parents: 886 diff changeset	97 if ($n == 0) echo " <tr>\n";
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	98
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	99 $totalWiz++;
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	100
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	101 printf(" <td width=\"%d%%\" style=\"background: %s;\"><a href=\"loc.php?a=%s\">%s</a> <span style=\"color: #f80;\">",
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	102 (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	103
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	104 if (isset($wizard["areas"]))
e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	105 echo " (".$wizard["areas"].")";
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	106
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	107 echo "</span></td>\n";
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	108
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	109 $n++;
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	110 if ($n >= $maxRow) {
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	111 echo " </tr>\n";
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	112 $n = 0;
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	113 }
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 if ($n > 0) {
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	116 while ($n++ < $maxRow)
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	117 echo " <td></td>\n";
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	118
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	119 echo " </tr>\n";
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	120 }
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	121 echo "</table>\n";
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	122 }
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 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	126
3bb8253db932 New website layout and some minor improvements. Matti Hamalainen <ccr@tnsp.org> parents: 1115 diff changeset	127 /* Print out the alpha link index
3bb8253db932 New website layout and some minor improvements. Matti Hamalainen <ccr@tnsp.org> parents: 1115 diff changeset	128 */
1148 52550f58cee5 Move alphabetic table printing code to a function in common routines. Matti Hamalainen <ccr@tnsp.org> parents: 1140 diff changeset	129 printExtraBoxAlphaList($alphaTable);
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	130 } else {
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	131 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	132 }
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	133 ?>
1140 3bb8253db932 New website layout and some minor improvements. Matti Hamalainen <ccr@tnsp.org> parents: 1115 diff changeset	134 </div>
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	135 </body>
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	136 </html>

Mercurial > hg > batmud > maputils

annotate www/info.php @ 1150:02fe48a608d7