page.php

   1 <?php
   2 error_reporting(E_ALL);
   3 ini_set('display_errors', TRUE);
   4
   5 function abort($body, $status = NULL) {
   6         if ($status) header("HTTP/1.1 $status");
   7         print "$body\n";
   8         exit;
   9 }
  10
  11 function placeholder_include($name, $params = [])
  12 {
  13         $path = stream_resolve_include_path("widget/$name.php");
  14         if (!file_exists($path)) {
  15                 return '<strong class="warn"><em>'.$name.'</em> ontbreekt</strong>';
  16         }
  17
  18         ob_start();
  19         $Page = $GLOBALS['Page'] . $GLOBALS['Args'];
  20         $Args = '';
  21         $Place = $GLOBALS['Place'];
  22         foreach ($params as $param) {
  23                 if ($set = strpos($param, '=')) {
  24                         $Place[ substr($param, 0, $set) ] = substr($param, $set + 1);
  25                 }
  26                 elseif (!empty($param)) {
  27                         $Args .= '/'.$param;
  28                 }
  29         }
  30         try {
  31                 include "widget/$name.php";
  32                 return ob_get_clean();
  33         }
  34         catch (Exception $e) {
  35                 return sprintf('<strong class="warn">%s</strong>',
  36                         "fout in <em>$name</em>: {$e->getMessage()}"
  37                 );
  38         }
  39 }
  40
  41 function getoutput($blocks = [])
  42 {
  43         $doc = ob_get_clean();
  44
  45         if (!empty($blocks['warn'])) {
  46                 $warn = '<p class="warn">[[warn]]</p>';
  47                 if ($offset = strpos($doc, '</h2>')) {
  48                         $doc = substr_replace($doc, "\n\n".$warn, $offset + 5, 0);
  49                 }
  50                 else {
  51                         $doc = $warn . "\n\n" . $doc;
  52                 }
  53         }
  54
  55         # keep either login or logout parts depending on user level
  56         global $User;
  57         $hideclass = empty($User) ? 'login' : 'logout';
  58         $doc = preg_replace('{\s*<([a-z]+) class="'.$hideclass.'">.*?</\1>}s', '', $doc);
  59
  60         return preg_replace_callback(
  61                 '{ (?<! <!--BLOCK: ) \[\[ ([^] ]+) ([^]]*) \]\] }x',
  62                 function ($sub) use ($blocks) {
  63                         list ($placeholder, $name, $params) = $sub;
  64                         if (isset($blocks[$name])) {
  65                                 $html = $blocks[$name];
  66                         }
  67                         else {
  68                                 $html = placeholder_include($name, explode(' ', $params));
  69                         }
  70                         return sprintf('<!--BLOCK:%s-->%s<!--/-->',
  71                                 is_numeric($name) ? '' : $placeholder, # edit replacement
  72                                 preg_replace('{<!--[^-]*-->}', '', $html) # contents
  73                         );
  74                 },
  75                 $doc
  76         );
  77 }
  78
  79 # custom error handling
  80
  81 define('DOCROOT', getcwd());
  82 set_include_path(implode(PATH_SEPARATOR, [ DOCROOT, __DIR__ ]));
  83
  84 function fail($error)
  85 {
  86         http_response_code(500);
  87         if (!isset($Article)) {
  88                 $Article = new ArchiveArticle(NULL);
  89                 $Article->title = 'Fout';
  90         }
  91         include_once 'page.inc.php';
  92         ob_start();
  93         require '500.inc.html';
  94         print getoutput(['debug' => $error]);
  95 }
  96
  97 set_exception_handler('fail');
  98
  99 define('E_FATAL', E_ERROR | E_CORE_ERROR | E_COMPILE_ERROR | E_USER_ERROR);
 100
 101 set_error_handler(function ($level, $error, $file, $line) {
 102         if ($level & E_FATAL) {
 103                 fail($error);
 104                 return;
 105         }
 106         return FALSE;
 107 });
 108
 109 register_shutdown_function(function () {
 110         # display failure page for fatal exceptions
 111         $error = error_get_last();
 112         if (!($error['type'] & E_FATAL)) return;
 113         fail("Fatal: $error[message] in $error[file]:$error[line]");
 114 });
 115
 116 error_reporting(error_reporting() & ~E_FATAL);
 117
 118 # user login and control
 119
 120 $User = NULL;
 121 include_once 'auth.inc.php';
 122 $Edit = isset($_GET['edit']);
 123
 124 # distinguish subpage Args from topmost Page script
 125
 126 $Args = '';
 127 $Page = preg_replace('/\?.*/', '', @$_SERVER['PATH_INFO'] ?: $_SERVER['REQUEST_URI']);
 128 $Page = urldecode(trim($Page, '/')) ?: 'index';
 129 while (TRUE) {
 130         if (file_exists("$Page/.private")) {
 131                 # access restriction
 132                 if (empty($User)) {
 133                         http_response_code(303);
 134                         $target = urlencode($_SERVER['REQUEST_URI']);
 135                         header("Location: /login?goto=$target");
 136                         exit;
 137                 }
 138                 $PageAccess = $Page;
 139         }
 140
 141         if (file_exists("$Page/index.php")) {
 142                 break;
 143         }
 144
 145         $up = strrpos($Page, '/');
 146         $Args = substr($Page, $up) . $Args;
 147         $Page = substr($Page, 0, $up);
 148         if ($up === FALSE) {
 149                 break;
 150         }
 151 }
 152
 153 $staticpage = NULL;
 154 if (file_exists("$Page$Args.html")) {
 155         $staticpage = "$Page$Args.html";
 156         if (is_link($staticpage)) {
 157                 $target = preg_replace('/\.html$/', '', readlink($staticpage));
 158                 header("HTTP/1.1 302 Shorthand");
 159                 header("Location: $target");
 160                 exit;
 161         }
 162 }
 163 elseif (file_exists("$Page$Args/index.html")) {
 164         $staticpage = "$Page$Args/index.html";
 165 }
 166 elseif ($User and $User->admin("edit $Page$Args")) {
 167         $staticpage = (file_exists("$Page/template.inc.html") ? "$Page/template.inc.html" : 'template.inc.html');
 168 }
 169
 170 # prepare page contents
 171
 172 require_once('article.inc.php');
 173 $Article = new ArchiveArticle($staticpage);
 174
 175 ob_start(); # page body
 176 $Place = [
 177         'user'  => $User ? $User->login : '',
 178         'url'   => htmlspecialchars($_SERVER['REQUEST_URI']),
 179 ];
 180
 181 if (isset($Article->raw)) {
 182         if ($User and $User->admin("edit $Page$Args")) {
 183                 # restore meta tags in static contents for editing
 184                 foreach (array_reverse($Article->meta) as $metaprop => $val) {
 185                         $Article->raw = sprintf(
 186                                 '<meta property="%s" content="%s" />'."\n",
 187                                 $metaprop, $val
 188                         ) . $Article->raw;
 189                 }
 190         }
 191         $Article->raw = '<div class="static">'."\n\n".$Article->raw."</div>\n\n";
 192 }
 193
 194 # output dynamic and/or static html
 195
 196 if (!$Page or require("./$Page/index.php")) {
 197         # static contents
 198         if (isset($Article->raw)) {
 199                 print $Article->raw;
 200         }
 201         else {
 202                 # no resulting output
 203                 http_response_code(404);
 204                 @require '404.inc.html';
 205         }
 206 }
 207
 208 include_once 'page.inc.php';
 209