function controller_pages($args)
{
default_html(true);
html_add_css(base_url() . 'modules/page_browser/page_browser.css');
if (USE_MIN_FILES) {
html_add_js(base_url() . 'modules/page_browser/page_browser.min.js');
} else {
html_add_js(base_url() . 'modules/page_browser/page_browser.js');
}
html_add_js_var('$.glue.conf.page.startpage', startpage());
$bdy =& body();
elem_attr($bdy, 'id', 'pages');
body_append('<h1>All pages</h1>');
load_modules('glue');
$pns = pagenames(array());
$pns = $pns['#data'];
foreach ($pns as $pn) {
// display only pages with 'head'
if (is_dir(CONTENT_DIR . '/' . $pn . '/head')) {
body_append('<div class="page_browser_entry" id="' . htmlspecialchars($pn, ENT_COMPAT, 'UTF-8') . '"><span class="page_browser_pagename"><a href="' . base_url() . '?' . htmlspecialchars(urlencode($pn), ENT_COMPAT, 'UTF-8') . '">' . htmlspecialchars($pn, ENT_NOQUOTES, 'UTF-8') . '</a></span> ');
if ($pn . '.head' == startpage()) {
body_append('<span id="page_browser_startpage">[startpage]</span> ');
}
}
body_append('</div>');
}
echo html_finalize();
}
function controller_revisions($args)
{
page_canonical($args[0][0]);
$page = $args[0][0];
if (!page_exists($page)) {
hotglue_error(404);
}
// get all revisions of page and determine the current revision's index
load_modules('glue');
$a = expl('.', $page);
$revs = revisions_info(array('pagename' => $a[0], 'sort' => 'time'));
$revs = $revs['#data'];
$cur_rev = false;
for ($i = 0; $i < count($revs); $i++) {
if ($revs[$i]['revision'] == $a[1]) {
$cur_rev = $i;
break;
}
}
if ($cur_rev === false) {
// we didn't find the current revision
hotglue_error(500);
}
default_html(true);
html_add_css(base_url() . 'modules/revisions_browser/revisions_browser.css');
if (USE_MIN_FILES) {
html_add_js(base_url() . 'modules/revisions_browser/revisions_browser.min.js');
} else {
html_add_js(base_url() . 'modules/revisions_browser/revisions_browser.js');
}
html_add_js_var('$.glue.page', $page);
$bdy =& body();
elem_attr($bdy, 'id', 'revisions');
render_page(array('page' => $page, 'edit' => false));
body_append('<div id="revisions_browser_ctrl">');
body_append('<div id="revisions_browser_prev">');
if ($cur_rev + 1 < count($revs)) {
body_append('<a href="' . base_url() . '?' . htmlspecialchars(urlencode($revs[$cur_rev + 1]['page']), ENT_COMPAT, 'UTF-8') . '/revisions">prev</a>');
}
body_append('</div><div id="revisions_browser_cur">');
if (substr($revs[$cur_rev]['revision'], 0, 5) == 'auto-') {
body_append(date('d M y H:i', $revs[$cur_rev]['time']));
} else {
body_append(htmlspecialchars($revs[$cur_rev]['revision'], ENT_NOQUOTES, 'UTF-8'));
}
body_append('<br>');
if ($a[1] == 'head') {
body_append('<a href="' . base_url() . '?' . htmlspecialchars(urlencode($page), ENT_COMPAT, 'UTF-8') . '/edit">back to editing mode</a>');
} else {
body_append('<a id="revisions_browser_revert_btn" href="#">revert</a>');
}
body_append('</div><div id="revisions_browser_next">');
if (0 < $cur_rev) {
body_append('<a href="' . base_url() . '?' . htmlspecialchars(urlencode($revs[$cur_rev - 1]['page']), ENT_COMPAT, 'UTF-8') . '/revisions">next</a>');
}
body_append('</div>');
body_append('</div>');
echo html_finalize();
}
/**
* controller that shows a textarea for editing either a page's or the global
* user-defined css file
*/
function controller_user_css_stylesheet($args)
{
if ($args[0][1] == 'stylesheet') {
// changing page stylesheet
$page = $args[0][0];
page_canonical($page);
if (!page_exists($page)) {
hotglue_error(404);
}
} else {
// changing global stylesheet
$page = false;
}
default_html(true);
html_add_js_var('$.glue.page', $page);
html_add_css(base_url() . 'modules/user_css/user_css.css');
if (USE_MIN_FILES) {
html_add_js(base_url() . 'modules/user_css/user_css.min.js');
} else {
html_add_js(base_url() . 'modules/user_css/user_css.js');
}
$bdy =& body();
elem_attr($bdy, 'id', 'user_css');
if ($page === false) {
body_append('<h1>Global stylesheet</h1>' . nl());
// try to load css
$css = @file_get_contents(CONTENT_DIR . '/usercss');
if ($css === false) {
$css = '';
}
} else {
body_append('<h1>' . htmlspecialchars($page, ENT_NOQUOTES, 'UTF-8') . ' stylesheet</h1>' . nl());
load_modules('glue');
$obj = load_object(array('name' => $page . '.usercss'));
if ($obj['#error']) {
$css = '';
} else {
$css = $obj['#data']['content'];
}
}
// encoding to html must come before the replacement below
$css = htmlspecialchars($css, ENT_NOQUOTES, 'UTF-8');
// replace newline characters by an entity to prevent render_object()
// from adding some indentation
$css = str_replace("\r\n", ' ', $css);
$css = str_replace("\n", ' ', $css);
// why not replace tabs as well why we are at it
$css = str_replace("\t", '	', $css);
body_append('<textarea id="user_css_text" placeholder="enter css code here">' . $css . '</textarea>' . nl());
body_append('<br>' . nl());
body_append('<input id="user_css_save" type="button" value="save">' . nl());
echo html_finalize();
}
/**
* controller that shows a textarea for editing either a page's or the global
* user-defined code files
*/
function controller_user_code_stylesheet($args)
{
if ($args[0][1] == 'code') {
// changing page code
$page = $args[0][0];
page_canonical($page);
if (!page_exists($page)) {
hotglue_error(404);
}
} else {
// changing global code
$page = false;
}
default_html(true);
html_add_js_var('$.glue.page', $page);
html_add_css(base_url() . 'modules/user_code/user_code.css');
if (USE_MIN_FILES) {
html_add_js(base_url() . 'modules/user_code/user_code.min.js');
} else {
html_add_js(base_url() . 'modules/user_code/user_code.js');
}
$bdy =& body();
// create array with names of code elements
$code = array('head' => '', 'body' => '');
elem_attr($bdy, 'id', 'user_code');
if ($page === false) {
body_append('<h1>Global code</h1>' . nl());
// try to load code
foreach ($code as $x => $v) {
$code[$x] = @file_get_contents(CONTENT_DIR . '/user' . $x);
if ($code[$x] === false) {
$code[$x] = '';
}
}
} else {
body_append('<h1>"' . htmlspecialchars(substr($page, 0, strpos($page, '.')), ENT_NOQUOTES, 'UTF-8') . '" page code</h1>' . nl());
load_modules('glue');
foreach ($code as $x => $v) {
$obj = load_object(array('name' => $page . '.user' . $x));
if ($obj['#error']) {
$code[$x] = '';
} else {
$code[$x] = $obj['#data']['content'];
}
}
}
foreach ($code as $k => $v) {
// encoding to html must come before the replacement below
$v = htmlspecialchars($v, ENT_NOQUOTES, 'UTF-8');
// replace newline characters by an entity to prevent render_object()
// from adding some indentation
$v = str_replace("\r\n", ' ', $v);
$v = str_replace("\n", ' ', $v);
// why not replace tabs as well why we are at it
$v = str_replace("\t", '	', $v);
$code[$k] = $v;
}
body_append('<div id=\'text\'>add your custom code to <head> and <body> sections of this ' . ($page ? 'page.' : 'site.') . nl());
body_append('<br>' . nl());
body_append('be cautious - errors in the code below may render the whole ' . ($page ? 'page' : 'site') . ' unusable.</div>' . nl());
body_append('<br>' . nl());
body_append('<div id=\'fake_tags\'><head></div>' . nl());
body_append('<textarea id="user_head_text" placeholder="enter code here">' . $code['head'] . '</textarea>' . nl());
body_append('<br>' . nl());
body_append('<div id=\'fake_tags\'></head><br>' . nl());
body_append('<body></div>' . nl());
body_append('<textarea id="user_body_text" placeholder="enter code here">' . $code['body'] . '</textarea>' . nl());
body_append('<div id=\'fake_tags\'></body></div><br>' . nl());
body_append('<input id="user_code_save" type="button" value="save">' . nl());
echo html_finalize();
}
/**
* show a page
*/
function controller_show($args)
{
// most of these checks are only necessary if the client calls
// page/show directly
page_canonical($args[0][0]);
$page = $args[0][0];
if (!page_exists($page)) {
log_msg('info', 'controller_show: page ' . quot($page) . ' not found, serving 404');
hotglue_error(404);
}
// serve from page if possible
if (0 < CACHE_TIME && is_cached('page', $page, CACHE_TIME)) {
serve_cached('page', $page);
die;
}
// otherwise create page on the fly
load_modules('glue');
default_html(false);
$cache_page = true;
render_page(array('page' => $page, 'edit' => false));
// the $cache_page parameter is set by the html_finalize()
$html = html_finalize($cache_page);
echo $html;
// and cache it
if (0 < CACHE_TIME && $cache_page) {
cache_output('page', $page, $html);
}
}
/**
* return a hotglue-themed error message to the client
*
* the function does not return if successful.
* @param int $code error code
* @param bool $no_header don't output any header
* @return false if the error code is not supported yet
*/
function hotglue_error($code, $no_header = false)
{
if (!$no_header) {
// output header
if (USE_HOTGLUE_ERRORS) {
$header_only = true;
} else {
$header_only = false;
}
if (!http_error($code, $header_only)) {
return false;
}
}
// output informative message
html_flush();
default_html(false);
html_add_css(base_url() . 'css/hotglue_error.css');
$bdy =& body();
elem_attr($bdy, 'id', 'hotglue_error');
body_append(tab(1) . '<div id="paper">' . nl());
body_append(tab(2) . '<div id="wrapper">' . nl());
body_append(tab(3) . '<div id="content">' . nl());
body_append(tab(4) . '<div id="left-nav">' . nl());
body_append(tab(5) . '<img src="' . htmlspecialchars(base_url(), ENT_COMPAT, 'UTF-8') . 'img/hotglue-logo.png" alt="logo">' . nl());
body_append(tab(4) . '</div>' . nl());
body_append(tab(4) . '<div id="main">' . nl());
if ($code == 400) {
body_append(tab(5) . '<h1 id="error-title">ERROR 400, bad request!</h1>' . nl());
} elseif ($code == 401) {
body_append(tab(5) . '<h1 id="error-title">Authorization required!</h1>' . nl());
} elseif ($code == 404) {
body_append(tab(5) . '<h1 id="error-title">ERROR 404, not found!</h1>' . nl());
} elseif ($code == 500) {
body_append(tab(5) . '<h1 id="error-title">ERROR 500, server fault!</h1>' . nl());
}
body_append(tab(5) . '<p>' . nl());
if ($code == 400) {
body_append(tab(6) . 'Something got screwed up...<br>' . nl());
body_append(tab(6) . 'The page is sending a bad request to the server!' . nl());
} elseif ($code == 401) {
body_append(tab(6) . 'You need to be logged in in order to do this.<br>' . nl());
} elseif ($code == 404) {
body_append(tab(6) . 'It looks like you got lost in cyber-space...<br>' . nl());
body_append(tab(6) . 'The page you are trying to reach does not exist!' . nl());
} elseif ($code == 500) {
body_append(tab(6) . 'Are we runnining out of fuel?!<br>' . nl());
body_append(tab(6) . 'Something is causing serious server errors!' . nl());
}
body_append(tab(5) . '</p>' . nl());
body_append(tab(6) . '<a href="' . htmlspecialchars(base_url(), ENT_COMPAT, 'UTF-8') . '" id="home">take me home!</a>' . nl());
body_append(tab(4) . '</div>' . nl());
body_append(tab(3) . '</div>' . nl());
body_append(tab(2) . '</div>' . nl());
body_append(tab(2) . '<div style="position: absolute; left: 200px; top: -10px; z-index: 2;">' . nl());
body_append(tab(3) . '<img src="' . htmlspecialchars(base_url(), ENT_COMPAT, 'UTF-8') . 'img/hotglue-404.png" alt="404">' . nl());
body_append(tab(2) . '</div>' . nl());
body_append(tab(1) . '</div>' . nl());
echo html_finalize();
die;
}