annotate admin.php @ 601:a42efdc2cca7

Rename a function.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 27 Oct 2014 10:36:45 +0200
parents eebbc96d7fe5
children 7987aa59c2a0
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
1 <?
136
aeebfedb5709 Add some copyright headers.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
2 //
571
ce11ea112a65 Change the header blurb a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 565
diff changeset
3 // FAPWeb - Simple Web-based Demoparty Management System
136
aeebfedb5709 Add some copyright headers.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
4 // Party administration page frontend module
565
ed2247111fdd Bump copyright years.
Matti Hamalainen <ccr@tnsp.org>
parents: 560
diff changeset
5 // (C) Copyright 2012-2014 Tecnic Software productions (TNSP)
136
aeebfedb5709 Add some copyright headers.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
6 //
32
36392d1d6b5f Moar work.
Matti Hamalainen <ccr@tnsp.org>
parents: 30
diff changeset
7 $sessionType = "admin";
175
8df523e6326a User require_once instead of require.
Matti Hamalainen <ccr@tnsp.org>
parents: 174
diff changeset
8 require_once "mconfig.inc.php";
8df523e6326a User require_once instead of require.
Matti Hamalainen <ccr@tnsp.org>
parents: 174
diff changeset
9 require_once "msite.inc.php";
8df523e6326a User require_once instead of require.
Matti Hamalainen <ccr@tnsp.org>
parents: 174
diff changeset
10 require_once "msession.inc.php";
384
357b81e39ab3 Rename majax.php -> majax.inc.php.
Matti Hamalainen <ccr@tnsp.org>
parents: 378
diff changeset
11 require_once "majax.inc.php";
32
36392d1d6b5f Moar work.
Matti Hamalainen <ccr@tnsp.org>
parents: 30
diff changeset
12
14
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
13 function stCreateSettingsData()
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
14 {
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
15 $args = array();
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
16
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
17 if (($res = stExecSQL("SELECT * FROM settings")) !== FALSE)
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
18 {
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
19 foreach ($res as $item)
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
20 {
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
21 switch ($item["vtype"])
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
22 {
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
23 case VT_STR:
298
2f35c4b90ee7 Fix site settings javascript generator.
Matti Hamalainen <ccr@tnsp.org>
parents: 289
diff changeset
24 case VT_TEXT: $type = 1; break;
2f35c4b90ee7 Fix site settings javascript generator.
Matti Hamalainen <ccr@tnsp.org>
parents: 289
diff changeset
25 case VT_INT: $type = 2; break;
14
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
26 case VT_BOOL: $type = 3; break;
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
27 }
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
28 $args[] = "\"".$item["key"]."\":".$type;
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
29 }
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
30 }
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
31
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
32 echo
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
33 "\n".
601
a42efdc2cca7 Rename a function.
Matti Hamalainen <ccr@tnsp.org>
parents: 599
diff changeset
34 "function jsUpdateSettings()\n".
14
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
35 "{\n".
346
c922e5200c55 Rename makePostArgs() to jsMakePostArgs().
Matti Hamalainen <ccr@tnsp.org>
parents: 345
diff changeset
36 " var args = jsMakePostArgs({".implode(",", $args)."}, \"st\", \"\");\n".
342
3175ec252c73 Rename sendPOSTRequest() to jsSendPOSTRequest().
Matti Hamalainen <ccr@tnsp.org>
parents: 341
diff changeset
37 " jsSendPOSTRequest(\"action=update&type=settings&\"+args);\n".
14
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
38 " return false;\n".
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
39 "}\n";
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
40 }
e36c4d2b09c4 Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 10
diff changeset
41
347
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
42 function stAdminContent()
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
43 {
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
44 echo "<div id=\"adminContent\">\n";
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
45 }
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
46
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
47 // Switch to https first, if needed
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
48 if (!stCheckHTTPS())
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
49 {
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
50 header("Location: https://".$_SERVER["SERVER_NAME"].$_SERVER["REQUEST_URI"]);
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
51 exit;
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
52 }
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
53
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
54 // Start output
591
f7078755dff5 Fix CSS paths for admin and print pages.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
55 $pageCSS = "css/admin.css";
347
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
56 cmPrintPageHeader("FAPWeb Administration",
364
975938f83e59 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 350
diff changeset
57 " <meta http-equiv=\"Pragma\" content=\"no-cache\" />\n",
347
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
58 FALSE);
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
59
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
60
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
61 // Initiate SQL database connection
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
62 if (!stConnectSQLDB())
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
63 {
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
64 // Error occured, bail out early
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
65 cmPrintPageFooter();
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
66 exit;
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
67 }
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
68
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
69 // Fetch non-"hardcoded" settings from SQL database
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
70 stReloadSettings();
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
71
0
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
72 // Check if sessions are enabled
5
76c3b89d7b11 Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 0
diff changeset
73 if (!stChkSetting("admPassword"))
0
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
74 {
347
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
75 stAdminContent();
171
705dabdc37d4 Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents: 136
diff changeset
76 echo
705dabdc37d4 Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents: 136
diff changeset
77 "<h1>Oh noes, admin configuration not done!</h1>\n".
705dabdc37d4 Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents: 136
diff changeset
78 "<p>Better go and prod that, so you get to use the fine admin interface.</p>\n";
347
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
79 cmPrintPageFooter();
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
80 exit;
0
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
81 }
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
82 else
107
6e076b3630a0 Cleanup the code a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 105
diff changeset
83 if (!stAdmSessionAuth(FALSE))
0
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
84 {
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
85 // Perform authentication if we are not in session already
347
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
86 stAdminContent();
5
76c3b89d7b11 Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 0
diff changeset
87 echo
76c3b89d7b11 Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 0
diff changeset
88 "<h1>Party admin login</h1>\n".
596
b09fdf99b54b Add return to main pages link to admin login.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
89 "<p>Please use illegal telepathy over HTTP to provide a ".
b09fdf99b54b Add return to main pages link to admin login.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
90 "password to enter the party administration systembolaget.</p>\n".
b09fdf99b54b Add return to main pages link to admin login.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
91 "\n".
347
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
92 " ".stGetFormStart("admlogin", "admlogin.php").
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
93 " ".stGetFormHiddenInput("mode", "check")."\n".
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
94 " ".stGetFormPasswordInput("admpass", "", "", "autofocus=\"autofocus\"")."\n".
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
95 " ".stGetFormSubmitInput("submit", "Login")."\n".
596
b09fdf99b54b Add return to main pages link to admin login.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
96 " </form>\n".
b09fdf99b54b Add return to main pages link to admin login.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
97 "\n".
b09fdf99b54b Add return to main pages link to admin login.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
98 "<p>[<a href=\"".stGetSetting("defaultPage")."\">Return to the main page</a>].</p>\n";
347
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
99 cmPrintPageFooter();
1ef6cd391590 Move things around a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 346
diff changeset
100 exit;
0
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
101 }
107
6e076b3630a0 Cleanup the code a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 105
diff changeset
102 else
0
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
103 {
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
104 ?>
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
105 <script type="text/javascript">
445
cf7053f04e88 Move tab handling code to majax module.
Matti Hamalainen <ccr@tnsp.org>
parents: 438
diff changeset
106 // <? stCreateSettingsData(); stCommonAJAX("admajax.php", "admlogout.php", FALSE, TRUE); ?>
0
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
107 </script>
599
eebbc96d7fe5 Move javascript code from admin.php to a separate file.
Matti Hamalainen <ccr@tnsp.org>
parents: 596
diff changeset
108 <script type="text/javascript" src="admin.js"></script>
0
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
109
5
76c3b89d7b11 Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 0
diff changeset
110 <!-- ========================== -->
0
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
111
427
707213312891 Moar work.
Matti Hamalainen <ccr@tnsp.org>
parents: 423
diff changeset
112 <div id="adminPopup"></div>
345
7bb36c015926 Move adminContent div.
Matti Hamalainen <ccr@tnsp.org>
parents: 343
diff changeset
113 <div id="adminContent">
7bb36c015926 Move adminContent div.
Matti Hamalainen <ccr@tnsp.org>
parents: 343
diff changeset
114
5
76c3b89d7b11 Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 0
diff changeset
115 <div id="nstatus">-</div>
201
a4be19c4d99d Modularize admin pages tab system.
Matti Hamalainen <ccr@tnsp.org>
parents: 189
diff changeset
116 <div id="tabHeadersCC" class="tabHeaders"></div>
a4be19c4d99d Modularize admin pages tab system.
Matti Hamalainen <ccr@tnsp.org>
parents: 189
diff changeset
117 <div id="tabContentsCC" class="tabContents"></div>
171
705dabdc37d4 Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents: 136
diff changeset
118
0
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
119 <script type="text/javascript">
445
cf7053f04e88 Move tab handling code to majax module.
Matti Hamalainen <ccr@tnsp.org>
parents: 438
diff changeset
120 jsRegisterTab("CC", "Settings", "Settings");
cf7053f04e88 Move tab handling code to majax module.
Matti Hamalainen <ccr@tnsp.org>
parents: 438
diff changeset
121 jsRegisterTab("CC", "News", "News");
cf7053f04e88 Move tab handling code to majax module.
Matti Hamalainen <ccr@tnsp.org>
parents: 438
diff changeset
122 jsRegisterTab("CC", "Attendees", "Attendees");
cf7053f04e88 Move tab handling code to majax module.
Matti Hamalainen <ccr@tnsp.org>
parents: 438
diff changeset
123 jsRegisterTab("CC", "Voting", "Voting");
cf7053f04e88 Move tab handling code to majax module.
Matti Hamalainen <ccr@tnsp.org>
parents: 438
diff changeset
124 jsRegisterTab("CC", "Compos", "Compos");
cf7053f04e88 Move tab handling code to majax module.
Matti Hamalainen <ccr@tnsp.org>
parents: 438
diff changeset
125 jsRegisterTab("CC", "Entries", "Entries");
cf7053f04e88 Move tab handling code to majax module.
Matti Hamalainen <ccr@tnsp.org>
parents: 438
diff changeset
126 jsRegisterTab("CC", "InfoSys", "Infosystem");
cf7053f04e88 Move tab handling code to majax module.
Matti Hamalainen <ccr@tnsp.org>
parents: 438
diff changeset
127 jsUpdateTabList("CC",
263
8c3922a65231 Work on entry admin looks.
Matti Hamalainen <ccr@tnsp.org>
parents: 260
diff changeset
128 "<a class=\"admin\" href=\"admlogout.php\">Logout</a> " +
201
a4be19c4d99d Modularize admin pages tab system.
Matti Hamalainen <ccr@tnsp.org>
parents: 189
diff changeset
129 "<a class=\"admin\" href=\"about\">Mainpage</a>");
445
cf7053f04e88 Move tab handling code to majax module.
Matti Hamalainen <ccr@tnsp.org>
parents: 438
diff changeset
130 jsSwitchActiveTab("CC", "Settings");
0
8019b357cc03 Initial import.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
131 </script>
171
705dabdc37d4 Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents: 136
diff changeset
132 <?
705dabdc37d4 Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents: 136
diff changeset
133 }
705dabdc37d4 Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents: 136
diff changeset
134
705dabdc37d4 Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents: 136
diff changeset
135 cmPrintPageFooter();
705dabdc37d4 Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents: 136
diff changeset
136 ?>