Mercurial > hg > fapweb
annotate show.php @ 125:f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
thingy".
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Tue, 22 Oct 2013 16:20:47 +0300 |
parents | |
children | 71c35d5302c2 |
rev | line source |
---|---|
125
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
1 <? |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
2 // |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
3 // Entry display / show helper module |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
4 // |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
5 $sessionType = "admin"; |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
6 require "mconfig.inc.php"; |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
7 require "msite.inc.php"; |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
8 require "mcommon.inc.php"; |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
9 require "msession.inc.php"; |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
10 |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
11 // Check if we are allowed to execute |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
12 if (!stCheckHTTPS() || !stAdmSessionAuth(TRUE)) |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
13 { |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
14 stSetupCacheControl(); |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
15 |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
16 stSessionEnd(SESS_ADMIN); |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
17 |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
18 stSetStatus(404, "Not Found"); |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
19 |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
20 cmPrintPageHeader("Error"); |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
21 echo "<div class=\"notice\">". |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
22 "<h1>Permission denied</h1>\n". |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
23 "<p>You need to be logged in as administrator to access this data.</p>\n". |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
24 "<p><a href=\"admin\">Click here for login form</a></p>\n". |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
25 "</div>\n"; |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
26 cmPrintPageFooter(); |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
27 exit; |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
28 } |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
29 |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
30 stSetupCacheControl(); |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
31 |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
32 // Initiate SQL database connection |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
33 if (!stConnectSQLDB()) |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
34 die("Could not connect to SQL database."); |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
35 |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
36 // Fetch non-"hardcoded" settings from SQL database |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
37 stReloadSettings(); |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
38 |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
39 cmPrintPageHeader("SHOW DISPLAY", "", FALSE); |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
40 ?> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
41 <script type="text/javascript"> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
42 // <? echo "\n"; include "ajax.js"; ?> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
43 |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
44 </script> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
45 <div id="contents"> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
46 <noscript> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
47 <div class="notice"> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
48 <h1>Javascript required</h1> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
49 <p> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
50 The compo system page requires Javascript to be enabled for the AJAX functionality. |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
51 <br /> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
52 <a href="#">Please enable Javascript and reload this page</a>. |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
53 </p> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
54 </div> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
55 </noscript> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
56 </div> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
57 <script type="text/javascript"> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
58 </script> |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
59 <? |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
60 cmPrintPageFooter(FALSE); |
f364b50e07f7
Some preliminary work on a potential "compo system announcement whatnot
Matti Hamalainen <ccr@tnsp.org>
parents:
diff
changeset
|
61 ?> |