Mercurial > hg > fapweb
annotate admin.php @ 1114:51f24cb35fc8
s/SET_LEN_/SQL_LEN_/g
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Mon, 14 Oct 2019 10:31:39 +0300 |
parents | 7da8bde9b7be |
children |
rev | line source |
---|---|
1071 | 1 <?php |
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 |
1072 | 5 // (C) Copyright 2012-2017 Tecnic Software productions (TNSP) |
136
aeebfedb5709
Add some copyright headers.
Matti Hamalainen <ccr@tnsp.org>
parents:
126
diff
changeset
|
6 // |
32 | 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"; |
14
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
11 |
614
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
12 |
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
13 function stLoginContent() |
347 | 14 { |
614
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
15 echo "<div id=\"adminContent\">\n<div id=\"adminLogin\">"; |
347 | 16 } |
17 | |
614
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
18 function stLoginFooter() |
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
19 { |
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
20 echo "</div>\n"; |
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
21 cmPrintPageFooter(); |
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
22 } |
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
23 |
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
24 |
347 | 25 // Switch to https first, if needed |
26 if (!stCheckHTTPS()) | |
27 { | |
28 header("Location: https://".$_SERVER["SERVER_NAME"].$_SERVER["REQUEST_URI"]); | |
29 exit; | |
30 } | |
31 | |
32 // Start output | |
591
f7078755dff5
Fix CSS paths for admin and print pages.
Matti Hamalainen <ccr@tnsp.org>
parents:
571
diff
changeset
|
33 $pageCSS = "css/admin.css"; |
347 | 34 cmPrintPageHeader("FAPWeb Administration", |
1070 | 35 " <meta http-equiv=\"Pragma\" content=\"no-cache\" />\n", |
347 | 36 FALSE); |
37 | |
38 | |
39 // Initiate SQL database connection | |
40 if (!stConnectSQLDB()) | |
41 { | |
42 // Error occured, bail out early | |
43 cmPrintPageFooter(); | |
44 exit; | |
45 } | |
46 | |
47 // Fetch non-"hardcoded" settings from SQL database | |
48 stReloadSettings(); | |
49 | |
0 | 50 // Check if sessions are enabled |
5
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
51 if (!stChkSetting("admPassword")) |
0 | 52 { |
614
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
53 stLoginContent(); |
171
705dabdc37d4
Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents:
136
diff
changeset
|
54 echo |
705dabdc37d4
Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents:
136
diff
changeset
|
55 "<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
|
56 "<p>Better go and prod that, so you get to use the fine admin interface.</p>\n"; |
614
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
57 stLoginFooter(); |
347 | 58 exit; |
0 | 59 } |
60 else | |
107 | 61 if (!stAdmSessionAuth(FALSE)) |
0 | 62 { |
63 // Perform authentication if we are not in session already | |
614
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
64 stLoginContent(); |
5
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
65 echo |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
66 "<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
|
67 "<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
|
68 "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
|
69 "\n". |
347 | 70 " ".stGetFormStart("admlogin", "admlogin.php"). |
71 " ".stGetFormHiddenInput("mode", "check")."\n". | |
72 " ".stGetFormPasswordInput("admpass", "", "", "autofocus=\"autofocus\"")."\n". | |
73 " ".stGetFormSubmitInput("submit", "Login")."\n". | |
596
b09fdf99b54b
Add return to main pages link to admin login.
Matti Hamalainen <ccr@tnsp.org>
parents:
591
diff
changeset
|
74 " </form>\n". |
b09fdf99b54b
Add return to main pages link to admin login.
Matti Hamalainen <ccr@tnsp.org>
parents:
591
diff
changeset
|
75 "\n". |
b09fdf99b54b
Add return to main pages link to admin login.
Matti Hamalainen <ccr@tnsp.org>
parents:
591
diff
changeset
|
76 "<p>[<a href=\"".stGetSetting("defaultPage")."\">Return to the main page</a>].</p>\n"; |
614
7987aa59c2a0
Clean up admin login a bit, and add some DOM elements.
Matti Hamalainen <ccr@tnsp.org>
parents:
601
diff
changeset
|
77 stLoginFooter(); |
347 | 78 exit; |
0 | 79 } |
107 | 80 else |
0 | 81 { |
1071 | 82 echo |
83 "<script type=\"text/javascript\" src=\"admajax.js.php\"></script>\n". | |
84 "<script type=\"text/javascript\" src=\"genajax.js\"></script>\n". | |
85 "<div id=\"adminPopup\"></div>\n". | |
86 "<div id=\"adminContent\">\n". | |
87 "<div id=\"nstatus\">-</div>\n". | |
88 "<div id=\"tabHeadersCC\" class=\"tabHeaders\"></div>\n". | |
89 "<div id=\"tabContentsCC\" class=\"tabContents\">\n". | |
90 "<noscript>\n". | |
91 " <h1>Ehm, you need to enable JavaScript to use the admin interface.</h1>\n". | |
92 "</noscript>\n". | |
93 "</div>\n"; | |
171
705dabdc37d4
Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents:
136
diff
changeset
|
94 } |
705dabdc37d4
Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents:
136
diff
changeset
|
95 |
705dabdc37d4
Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents:
136
diff
changeset
|
96 cmPrintPageFooter(); |
705dabdc37d4
Move administration interface page to separate layout, to make things less cramped.
Matti Hamalainen <ccr@tnsp.org>
parents:
136
diff
changeset
|
97 ?> |