-function abort($body, $status = NULL) {
- if ($status) header("HTTP/1.1 $status");
- print "$body\n";
- exit;
-}
-
-function getoutput($blocks = [])
-{
- $doc = ob_get_clean();
-
- if (!empty($blocks['warn'])) {
- $warn = '<p class="warn">[[warn]]</p>';
- if ($offset = strpos($doc, '</h2>')) {
- $doc = substr_replace($doc, "\n\n".$warn, $offset + 5, 0);
- }
- else {
- $doc = $warn . "\n\n" . $doc;
- }
- }
-
- return preg_replace_callback(
- '< \[\[ ([^] ]+) ([^]]*) \]\] >x',
- function ($sub) use ($blocks) {
- list ($placeholder, $name, $params) = $sub;
- if (isset($blocks[$name])) {
- $html = $blocks[$name];
- }
- elseif (file_exists("$name.php")) {
- ob_start();
- $Page = $GLOBALS['Page'];
- $Args = $GLOBALS['Args'];
- foreach (explode(' ', $params) as $param) {
- if ($set = strpos($param, '=')) {
- $_GET[ substr($param, 0, $set) ] = substr($param, $set + 1);
- }
- elseif (!empty($param)) {
- $Args .= '/'.$param;
- }
- }
- include "$name.php";
- $html = ob_get_clean();
- }
- else {
- $html = '<strong class="warn"><em>'.$name.'</em> ontbreekt</strong>';
- }
- return sprintf('<!--BLOCK:%s-->%s<!--/-->',
- is_numeric($name) ? '' : $placeholder, # edit replacement
- preg_replace('{<!--[^-]*-->}', '', $html) # contents
- );
- },
- $doc
- );
-}
-
-# custom error handling