+function abort($body, $status = NULL) {
+ if ($status) header("HTTP/1.1 $status");
+ print "$body\n";
+ exit;
+}
+
+function placeholder_include($name, $params = [])
+{
+ $path = stream_resolve_include_path("widget/$name.php");
+ if (!file_exists($path)) {
+ return '<strong class="warn"><em>'.$name.'</em> ontbreekt</strong>';
+ }
+
+ ob_start();
+ $Page = $GLOBALS['Page'] . $GLOBALS['Args'];
+ $Args = '';
+ $Place = $GLOBALS['Place'];
+ foreach ($params as $param) {
+ if ($set = strpos($param, '=')) {
+ $Place[ substr($param, 0, $set) ] = substr($param, $set + 1);
+ }
+ elseif (!empty($param)) {
+ $Args .= '/'.$param;
+ }
+ }
+ try {
+ include "widget/$name.php";
+ return ob_get_clean();
+ }
+ catch (Exception $e) {
+ return sprintf('<strong class="warn">%s</strong>',
+ "fout in <em>$name</em>: {$e->getMessage()}"
+ );
+ }
+}
+
+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;
+ }
+ }
+
+ # keep either login or logout parts depending on user level
+ global $User;
+ $hideclass = $User && property_exists($User, 'login') && $User->login ? 'logout' : 'login';
+ $doc = preg_replace('{\s*<([a-z]+) class="'.$hideclass.'">.*?</\1>}s', '', $doc);
+
+ return preg_replace_callback(
+ '{ \[\[ ([^] ]+) ([^]]*) \]\] }x',
+ function ($sub) use ($blocks) {
+ list ($placeholder, $name, $params) = $sub;
+ $html = $blocks[$name] ??
+ placeholder_include($name, explode(' ', $params));
+ if (empty($html) or $html[0] != '<') {
+ $html = "<span>$html</span>";
+ }
+ $attr = sprintf(' data-dyn="%s"', is_numeric($name) ? '' : $name.$params);
+ # contents with identifier in first tag
+ return preg_replace( '/(?=>)/', $attr, $html, 1);
+ },
+ $doc
+ );
+}
+
+# custom error handling
+
+define('DOCROOT', getcwd());
+set_include_path(implode(PATH_SEPARATOR, [ DOCROOT, __DIR__ ]));
+