batmud/maputils: www/info.php annotate

annotate www/info.php @ 1148:52550f58cee5

Move alphabetic table printing code to a function in common routines.

author	Matti Hamalainen <ccr@tnsp.org>
date	Thu, 21 Jul 2011 20:35:38 +0300
parents	3bb8253db932
children	02fe48a608d7

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
609 ff42dbb61d1c Updated. Matti Hamalainen <ccr@tnsp.org> parents: 532 diff changeset	39 $locTable = readLocationFiles();
ff42dbb61d1c Updated. Matti Hamalainen <ccr@tnsp.org> parents: 532 diff changeset	40 $wizTable = readWizInfoFiles();
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	41
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	42
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	43 if (isset($_GET["a"])) {
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	44 $coderName = basename($_GET["a"]);
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	45 $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	46 }
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	47
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	48
1115 3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	49 function wizardSort($a, $b)
3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	50 {
3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	51 return strcmp($a["name"], $b["name"]);
3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	52 }
3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	53
3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	54
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	55 /* Print table of wizards
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	56 */
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	57 foreach ($locTable as $location) {
e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	58 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	59 $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	60 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	61 $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	62 $wizTable[$name]["areas"]++;
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	63 }
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 if (count($wizTable) > 0) {
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	67 /* Make alphabetically sorted table of wizards
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	68 */
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	69 foreach ($wizTable as $alpha => $data)
e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	70 $alphaTable[$alpha[0]][] = $data;
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 ksort($alphaTable, SORT_STRING);
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
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	75 /* 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	76 */
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	77 $totalWiz = 0;
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	78 $maxRow = 6;
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	79 foreach ($alphaTable as $alpha => $data) {
e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	80 if (count($data) > 0) {
1115 3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	81 usort($data, "wizardSort");
3dc58d67b7b4 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 1100 diff changeset	82
1148 52550f58cee5 Move alphabetic table printing code to a function in common routines. Matti Hamalainen <ccr@tnsp.org> parents: 1140 diff changeset	83 $letter = strtoupper($alpha);
52550f58cee5 Move alphabetic table printing code to a function in common routines. Matti Hamalainen <ccr@tnsp.org> parents: 1140 diff changeset	84 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	85 echo "<table class=\"loc\">\n";
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	86 $n = 0;
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	87
e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	88 foreach ($data as $wizard) {
896 7cc73b376945 Cleanups, sync. Matti Hamalainen <ccr@tnsp.org> parents: 886 diff changeset	89 if ($n == 0) echo " <tr>\n";
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	90
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	91 $totalWiz++;
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	92
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	93 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	94 (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	95
1007 e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	96 if (isset($wizard["areas"]))
e7e2a8c4b496 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 975 diff changeset	97 echo " (".$wizard["areas"].")";
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 echo "</span></td>\n";
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 $n++;
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	102 if ($n >= $maxRow) {
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	103 echo " </tr>\n";
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	104 $n = 0;
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	105 }
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 if ($n > 0) {
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	108 while ($n++ < $maxRow)
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	109 echo " <td></td>\n";
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	110
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 }
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	113 echo "</table>\n";
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
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	117 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	118
3bb8253db932 New website layout and some minor improvements. Matti Hamalainen <ccr@tnsp.org> parents: 1115 diff changeset	119 /* Print out the alpha link index
3bb8253db932 New website layout and some minor improvements. Matti Hamalainen <ccr@tnsp.org> parents: 1115 diff changeset	120 */
1148 52550f58cee5 Move alphabetic table printing code to a function in common routines. Matti Hamalainen <ccr@tnsp.org> parents: 1140 diff changeset	121 printExtraBoxAlphaList($alphaTable);
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	122 } else {
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	123 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	124 }
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	125 ?>
1140 3bb8253db932 New website layout and some minor improvements. Matti Hamalainen <ccr@tnsp.org> parents: 1115 diff changeset	126 </div>
337 ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	127 </body>
ca191c3a0ce1 Updates and lots of new ugly glue. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	128 </html>

Mercurial > hg > batmud > maputils

annotate www/info.php @ 1148:52550f58cee5