+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) = $sub;
+ if (isset($blocks[$name])) {
+ $html = $blocks[$name];
+ }
+ 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
+
+define('DOCROOT', getcwd().'/');
+