wrreport.body.php

   1 <?php
   2
   3
   4 // Init
   5 // ----
   6
   7 function wrReportParserInit() {
   8         global $wgParser;
   9         wfLoadExtensionMessages('WrReport');
  10         $wgParser->setHook('bahnberichtformular', 'bahnberichtformularParserHook');
  11         $wgParser->setHook('bahnberichte', 'bahnberichteParserHook');
  12         $wgParser->setHook('bahnbewertung', 'bahnbewertungParserHook');
  13         return true;
  14 }
  15
  16
  17 // Tool functions
  18 // --------------
  19
  20 /// Forces a regeneration of region overview pages ('Tirol', 'Vorarlberg', ...)
  21 function wrRecacheRegions() {
  22         $dbr = wfGetDB(DB_SLAVE);
  23         // SELECT cl_from FROM categorylinks where cl_to = 'Region'
  24         $res = $dbr->select('categorylinks', 'cl_from', array('cl_to' => 'Region'));
  25         $page_ids = array();
  26         while ($row = $dbr->fetchObject($res)) $page_ids[] = $row->cl_from;
  27         $dbr->freeResult($res);
  28
  29         $titles = Title::newFromIDs($page_ids);
  30         foreach ($titles as $title) $title->invalidateCache();
  31 }
  32
  33
  34
  35 // Render Functions
  36 // ----------------
  37
  38 /// \brief Returns a form to enter a report (string containing HTML).
  39 ///
  40 /// All parameters have to be UTF-8 encoded.
  41 /// \param $page_title Name of the sledding run.
  42 /// \return UTF-8 encoded HTML form
  43 function wrReportFormRender($hide_save_button = TRUE, $page_title = NULL, $date_report = NULL, $condition = NULL, $description = NULL, $author_name = NULL, $page_title_list = NULL) {
  44         if ($page_title) $page_title = htmlspecialchars($page_title);
  45         // Date options
  46         $daynames = array('Heute', 'Gestern', 'Vorgestern', 'Vor 3 Tagen', 'Vor 4 Tagen');
  47         $date_options = '';
  48         $date_selected = false;
  49         $time = time(); // number of seconds since the Unix Epoch (January 1 1970 00:00:00 GMT)
  50         for ($day=0; $day!=5; ++$day) {
  51                 $date = strtotime("-$day days", $time);
  52                 $date_f = strftime("%Y-%m-%d", $date); // Formats it according to locale, that is set to CET.
  53                 $date_options .= '<option value="' . $date_f . '"';
  54                 if ((is_null($date_report) && $day == 0) || (!is_null($date_report) && $date_report == $date_f)) {
  55                         $date_options .= ' selected="selected"';
  56                         $date_selected = true;
  57                 }
  58                 $date_options .= '>' . htmlspecialchars($daynames[$day]) . ' (' . strftime('%d.%m.', $date) . ')</option>' . "\n";
  59         }
  60         if (!$date_selected) {
  61                 $date_options = '<option value="' . $date_report . '" selected="selected">' . htmlspecialchars($date_report) . "</option>\n" . $date_options;
  62         }
  63
  64         // Condition options
  65         $condition_options = '';
  66         global $wrConditions; // $wrConditions = array(1 => 'Sehr gut', 2 => 'Gut', 3 => utf8_encode('Mittelmäßig'), 4 => 'Schlecht', 5 => 'Geht nicht');
  67         $condition_options .= utf8_encode('<option value="">(keine Beurteilung)</option>') . "\n";
  68         foreach ($wrConditions as $condition_num => $condition_text) {
  69                 $condition_options .= "<option value=\"$condition_num\"";
  70                 if ($condition == $condition_num) $condition_options .= ' selected="selected"';
  71                 $condition_options .= '>' . htmlspecialchars($condition_text) . "</option>\n";
  72         }
  73         $description_html = htmlspecialchars($description);
  74
  75         // Buttons
  76         // I would like to do it this way, but due to a bug of internet explorer, the <button> element is not useable.
  77         //   $buttons = '<button name="action" type="submit" value="preview">Vorschau';
  78         //   if ($hide_save_button) $buttons .= ' &amp; Speichern';
  79         //   $buttons .= '</button>';
  80         //   if (!$hide_save_button) $buttons .= '<button name="action" type="submit" value="store">Speichern</button>';
  81         // Workaround: User <input type="submit"/>
  82         $buttons = '<input name="preview" type="submit" value="Vorschau';
  83         if ($hide_save_button) $buttons .= ' &amp; Speichern';
  84         $buttons .= '" /> ';
  85         if (!$hide_save_button) $buttons .= '<input name="store" type="submit" value="Speichern"/>';
  86
  87         $specialPageName = wfMsg('wrreport'); // 'Bahnberichte'
  88         $title = Title::newFromText($specialPageName, NS_SPECIAL);
  89         $specialPageUrl = $title->getLocalURL(); // e.g. '/wiki/Spezial:Bahnberichte'
  90
  91         $form = <<<EOT
  92 <form action="$specialPageUrl" method="post">
  93 <table class="wrreportform" summary="Formular zum Eintragen eines Rodelbahnberichtes">
  94         <tr class="oddrow"><th>Rodelbahn</th><td>$page_title<input type="hidden" name="page_title" value="$page_title"/></td></tr>
  95         <tr class="evenrow"><th>Datum des Rodelns</th>
  96         <td>
  97         <select name="date_report">
  98         $date_options
  99         </select>
 100         </td>
 101         </tr>
 102         <tr class="oddrow"><th>Bahnzustand*</th><td><select name="condition">
 103         $condition_options
 104         </select></td></tr>
 105         <tr class="evenrow"><th>Meinung</th><td><textarea name="description" cols="50" rows="7">$description_html</textarea></td></tr>
 106         <tr class="oddrow"><th>Autor/in</th><td><input name="author_name" maxlength="30" size="30" value="$author_name" /></td></tr>
 107         <tr class="evenrow"><th>Bericht abschicken</th><td>$buttons</td></tr>
 108 </table>
 109 </form>
 110 EOT;
 111         return $form;
 112 }
 113
 114
 115 /// \brief Renders the form to delete a report
 116 ///
 117 /// All in and output strings should be/are UTF-8 encoded.
 118 function wrDeleteReportFormRender($reportid, $delete_person_name, $delete_reason_public, $delete_invisible) {
 119         // Buttons
 120         $buttons = '<input name="deletepreview" type="submit" value="Vorschau" /> ';
 121         $buttons .= utf8_encode('<input name="delete" type="submit" value="Löschen"/>');
 122         $buttons .= '<input name="reportid" type="hidden" value="' . $reportid . '"/>';
 123         // $buttons .= '<input name="delete_invisible" type="hidden" value="' . $delete_invisible . '"/>'; // who is allowed to do so?
 124         $summary = utf8_encode('Formular zum Löschen eines Schneelageberichtes');
 125         $reason = utf8_encode('Begründung');
 126         $delete_reason_public_html = htmlspecialchars($delete_reason_public);
 127         $delete_person_name_html = htmlspecialchars($delete_person_name);
 128
 129         $specialPageName = wfMsg('wrreport'); // 'Bahnberichte'
 130         $title = Title::newFromText($specialPageName, NS_SPECIAL);
 131         $specialPageUrl = $title->getLocalURL(); // e.g. '/wiki/Spezial:Bahnberichte'
 132
 133         $form = <<<EOT
 134 <form action="$specialPageUrl" method="post">
 135 <table class="wrreportform" summary="$summary">
 136         <tr class="evenrow"><th>$reason</th><td><textarea name="delete_reason_public" cols="50" rows="7">$delete_reason_public_html</textarea></td></tr>
 137         <tr class="oddrow"><th>Name</th><td><input name="delete_person_name" maxlength="30" size="30" value="$delete_person_name" /></td></tr>
 138         <tr class="evenrow"><th>Aktion</th><td>$buttons</td></tr>
 139 </table>
 140 </form>
 141 EOT;
 142         return $form;
 143 }
 144
 145
 146
 147 // Constants for wrReportTableRender2
 148 define(WRREPORT_COMPACT_PAGE, 1); ///< includes the page name
 149 define(WRREPORT_COMPACT, 2);      ///< shown on a single page
 150 define(WRREPORT_DETAIL, 3);       ///< more columns
 151
 152 /// \brief Renders a table header ("private" sub-function of wrReportTableRender2)
 153 ///
 154 /// \param $format row format like WRREPORT_COMPACT
 155 /// \param $showActions boolean to indicate whether an actions column should be created
 156 /// \return UTF-8 encoded titles of HTML table
 157 function wrReportTableTitleRender2($format, $showActions) {
 158         $out = '<tr>';
 159         if ($format == WRREPORT_DETAIL) $out .= '<th>ID</th>';
 160         if ($format != WRREPORT_COMPACT) $out .= '<th>Bahn</th>';
 161         $out .= '<th>Datum</th>';
 162         if ($format == WRREPORT_DETAIL) $out .= '<th>Datum Eintrag</th>';
 163         if ($format == WRREPORT_DETAIL) $out .= '<th>Datum Ungültig</th>';
 164         $out .= '<th>Zustand</th>';
 165         $out .= '<th>Beschreibung</th>';
 166         $out .= '<th>Autor</th>';
 167         if ($showActions) $out .= '<th>Aktion</th>';
 168         return utf8_encode($out . "</tr>\n");
 169 }
 170
 171
 172 /// \brief Renders a table row ("private" sub-function of wrReportTableRender2)
 173 ///
 174 /// \param $row associative array of table columns like one row in the wrreport table
 175 /// \param $format row format like WRREPORT_COMPACT
 176 /// \param $showActions boolean to indicate whether an actions column should be created
 177 /// \return UTF-8 encoded titles of HTML table
 178 function wrReportTableRowRender2($row, $format, $showActions) {
 179         extract($row);
 180
 181         $out = '<tr>';
 182         // $id
 183         if ($format == WRREPORT_DETAIL) $out .= '<td>' . $id . '</td>';
 184         // $page_title
 185         if ($format != WRREPORT_COMPACT) $out .= '<td>' . wrCommonSandboxParse('[[' . $page_title . ']]') . '</td>';
 186         // $date_report
 187         $dayOfWeek = array('Mo', 'Di', 'Mi', 'Do', 'Fr', 'Sa', 'So');
 188         $date_report = strtotime($date_report);
 189         $date_report = $dayOfWeek[strftime('%u', $date_report)-1] . strftime(', %d.%m.', $date_report);
 190         $out .= '<td>' . $date_report . '</td>';
 191         // $date_entry
 192         if ($format == WRREPORT_DETAIL) $out .= '<td>' . date('Y-m-d, H:i', strtotime($date_entry)) . '</td>';
 193         // $date_invalid
 194         if ($format == WRREPORT_DETAIL) $out .= '<td>' . date('Y-m-d, H:i', strtotime($date_invalid)) . '</td>';
 195         // $condition
 196         global $wrConditions;
 197         $condition_text = '---';
 198         if (isset($wrConditions[$condition])) $condition_text = $wrConditions[$condition];
 199         $out .= '<td>';
 200         if ($delete_date) $out .= utf8_encode('<em>Gelöscht</em>');
 201         else $out .= htmlspecialchars($condition_text);
 202         $out .= '</td>';
 203         // $description
 204         $out .= '<td class="wrreportdescription">';
 205         if ($delete_date) $out .= utf8_encode('<em>Gelöscht</em>');
 206         else $out .= wrCommonSandboxParse($description);
 207         $out .= '</td>';
 208         // $author_name
 209         $out .= '<td>';
 210         if ($delete_date) $out .= utf8_encode('<em>Gelöscht</em>');
 211         else $out .= htmlspecialchars($author_name);
 212         $out .= '</td>';
 213         // actions
 214         // wiki/Spezial:Bahnberichte?action=deletepreview&reportid=42
 215         if ($showActions) {
 216                 $out .= '<td>';
 217                 if (!isset($row['delete_date'])) {
 218                         $specialPageName = wfMsg('wrreport'); // 'Bahnberichte'
 219                         $title = Title::newFromText($specialPageName, NS_SPECIAL);
 220                         $specialPageUrl = $title->getLocalURL(); // e.g. '/wiki/Spezial:Bahnberichte'
 221                         $out .= "<a href=\"$specialPageUrl?action=deletepreview&amp;reportid=" . $row['id'] . '">' . utf8_encode('Löschen...') . '</a>';
 222                 }
 223                 $out .= '</td>';
 224         }
 225         return $out . "</tr>\n";
 226 }
 227
 228
 229 /// \brief Renders the report table. Call wrReportGetReports for the $rows parameter.
 230 ///
 231 /// \param $rows array of associative row arrays
 232 /// \param $format row format like WRREPORT_TABLE_SHORT
 233 function wrReportTableRender2($rows, $format, $showActions) {
 234         $out = "<table class=\"wrreporttable\">\n" . wrReportTableTitleRender2($format, $showActions);
 235         foreach ($rows as $key => $row) $out .= wrReportTableRowRender2($row, $format, $showActions);
 236         return $out . "</table>\n";
 237 }
 238
 239
 240 /// Returns an array with column names
 241 function wrReportGetColumnNames() {
 242         return array('id', 'page_id', 'page_title', 'date_report', 'date_entry', 'date_invalid', 'condition', 'description', 'author_name', 'author_username', 'delete_date', 'delete_person_name', 'delete_person_ip', 'delete_person_userid', 'delete_person_username', 'delete_reason_public', 'delete_invisible');
 243 }
 244
 245
 246 /// \brief Returns reports as associative array.
 247 ///
 248 /// Examples:
 249 ///   $conditions = array('page_title' => 'Birgitzer Alm', 'date_invalid > now()');
 250 ///   $order = 'date_report desc, date_entry desc';
 251 function wrReportGetReports($conditions, $order) {
 252         $dbr = wfGetDB(DB_SLAVE);
 253         $columns = wrReportGetColumnNames();
 254         global $wgDBtype;
 255         if ($wgDBtype == "mysql") // "condition" is a reserved word in mysql
 256                  for ($i = 0; $i != count($columns); ++$i) $columns[$i] = sprintf('`%s`', $columns[$i]);
 257         $res = $dbr->select('wrreport', $columns, $conditions, 'wrReportGetReports', array('ORDER BY' => 'date_report desc, date_entry desc'));
 258         $result = array();
 259         while ($row = $dbr->fetchRow($res)) $result[] = $row;
 260         $dbr->freeResult($res);
 261         return $result;
 262 }
 263
 264
 265 /// \brief It returns an array of the "condition" (as number) and the date of the "most recent" report of the specified page (to decode as list($condition, $date));
 266 ///
 267 /// If no condition is present, array(NULL, NULL) is returned
 268 function wrReportConditionRender($page_title) {
 269         $dbr = wfGetDB(DB_SLAVE);
 270         $cond = 'condition';
 271         global $wgDBtype;
 272         // select wrreport.id as report_id, `condition`, date_report from wrreport where page_title='Axamer Lizum' and `condition` is not null and date_invalid > now() and delete_date is null order by date_report desc, date_entry desc limit 1;
 273         if ($wgDBtype == "mysql") $cond = "`$cond`"; // "condition" is a reserved word in mysql
 274         $res = $dbr->select(
 275                 'wrreport',
 276                 array('wrreport.id as report_id', $cond, 'date_report'),
 277                 array('page_title' => $page_title, "$cond is not null", 'date_invalid > now()', 'delete_date is null'),
 278                 'wrReportConditionRender',
 279                 array('ORDER BY' => 'date_report desc, date_entry desc', 'LIMIT' => '1')
 280         );
 281         if ($res->numRows() <= 0) {
 282                 $dbr->freeResult($res);
 283                 return array(NULL, NULL);
 284         }
 285         $row = $dbr->fetchObject($res);
 286         $date = $row->date_report;
 287         if ($date) $date = strtotime($date);
 288         $dbr->freeResult($res);
 289         return array($row->condition, $date);
 290 }
 291
 292
 293 /// \brief Returns true if the user is allowed to delete reports (in general)
 294 function wrReportUserMayDelete() {
 295         global $wgUser;
 296         global $wgWrReportDeleteMode;
 297         return $wgWrReportDeleteMode == 'allow' || ($wgWrReportDeleteMode == 'loggedin' && $wgUser->isLoggedIn());
 298 }
 299
 300
 301
 302 // Parser Hook Functions
 303 // ---------------------
 304
 305 /// \brief Is called when the tag <bahnberichtformular/> is encountered.
 306 ///
 307 /// The current page name is taken.
 308 function bahnberichtformularParserHook($input, $args, $parser) {
 309         // Username
 310         global $wgUser;
 311         $author_name = NULL;
 312         if ($wgUser->isLoggedIn()) {
 313                 $author_name = $wgUser->getRealName();
 314                 if (!$author_name) $author_name = $wgUser->getName();
 315         }
 316
 317         global $wgWrReportMode;
 318         global $wgWrReportBlackListAll;
 319         global $wgWrReportBlackListStrangers;
 320         if ($wgWrReportMode == 'summer') return wrCommonSandboxParse(utf8_encode("''An dieser Stelle kann während des Winters die Schneelage von Rodelbahnen eingetragen werden.''\n\n"));
 321         if ($wgWrReportMode == 'deny') return wrCommonSandboxParse(utf8_encode("''Rodelbahnberichte sind derzeit leider nicht erlaubt.''\n\n"));
 322
 323         if ($wgWrReportMode == 'loggedin' && !$wgUser->isLoggedIn()) return wrCommonSandboxParse(utf8_encode("''Derzeit sind Rodelbahnberichte nur für angemeldete Benutzer erlaubt.''\n\n"));
 324
 325         if (in_array($parser->getTitle()->getText(), $wgWrReportBlackListAll)) return wrCommonSandboxParse(utf8_encode("''Bei dieser Rodelbahn dürfen derzeit leider keine Rodelbahnberichte abgegeben werden.''\n"));
 326         if (!$wgUser->isLoggedIn() && in_array($parser->getTitle()->getText(), $wgWrReportBlackListStrangers)) return wrCommonSandboxParse(utf8_encode("''Bei der angegebenen Rodelbahn dürfen derzeit nur angemeldete Benutzer Rodelbahnberichte abgebe.''\n\n"));
 327
 328         // Calling "$title = $parser->getTitle(); $title->invalidateCache();" doesn't help here to force regeneration
 329         // However, this would not be the best solution because the page has to be re-rendered only at midnight
 330
 331         // In the following line, $author_name was replaced by NULL to prevent a bug, where the wrong author_name
 332         // is shown (see ticket #35). TODO: Find reason.
 333         // return wrCommonReplaceByMarker(wrReportFormRender(TRUE, $parser->getTitle()->getText(), NULL, NULL, NULL, $author_name), 'wrform');
 334         return wrCommonReplaceByMarker(wrReportFormRender(TRUE, $parser->getTitle()->getText(), NULL, NULL, NULL, NULL), 'wrform');
 335 }
 336
 337
 338 /// \brief Is called when the tag <bahnberichte/> is encountered.
 339 ///
 340 /// The current page name is taken.
 341 function bahnberichteParserHook($input, $args, &$parser) {
 342         $page_title = $parser->getTitle()->getText();
 343         $conditions = array('page_title' => $page_title, 'date_invalid > now()');
 344         $order = 'date_report desc, date_entry desc';
 345         $rows = wrReportGetReports($conditions, $order);
 346         if (count($rows) == 0) return wrCommonSandboxParse("''Es wurden keine Bahnberichte in der Datenbank gefunden.''\n\n");
 347         return wrReportTableRender2($rows, WRREPORT_COMPACT, wrReportUserMayDelete());
 348 }
 349
 350
 351 /// \brief Is called when the tag <bahnbewertung/> is encountered.
 352 ///
 353 /// * <bahnbewertung/>: The current page name is taken.
 354 /// * <bahnbewertung>page_name</bahnbewertung>: The given page name is taken.
 355 function bahnbewertungParserHook($input, $args, &$parser) {
 356         $titleText = $input;
 357         if (!$titleText) $titleText = $parser->getTitle()->getText();
 358         list($condition, $date) = wrReportConditionRender($titleText);
 359         if ($date) $date = strftime('%d.%m.', $date);
 360         global $wrConditions;
 361         global $wrNewReportSection; //  = utf8_encode('Eintragen');
 362         global $wrShowReportsSection; //  = utf8_encode('Einträge');
 363         global $wgUser;
 364         global $wgWrReportMode; // e.g. 'summer'
 365         global $wgWrReportBlackListAll;
 366         global $wgWrReportBlackListStrangers;
 367
 368         // Determine, whether the user is allowed to make a new report
 369         $userMayReport = ($wgWrReportMode == 'allow' || ($wgWrReportMode == 'loggedin' && $wgUser->isLoggedIn()));
 370         if ($userMayReport) {
 371                 if (in_array($titleText, $wgWrReportBlackListAll)) $userMayReport = false;
 372                 if (!$wgUser->isLoggedIn() && in_array($titleText, $wgWrReportBlackListStrangers)) $userMayReport = false;
 373         }
 374
 375         // Get the condition and create the response wiki text
 376         if (isset($wrConditions[$condition])) {
 377                 $wikiText = '[['. $titleText . '#' . $wrShowReportsSection . '|'. $wrConditions[$condition] . "]] <small>$date";
 378                 if ($userMayReport) $wikiText .= " ''[[" . $titleText . '#' . $wrNewReportSection . "|Neu]]''";
 379                 $wikiText .= "</small>";
 380         } else {
 381                 if ($userMayReport) $wikiText = "<small>''[[" . $titleText . '#' . $wrNewReportSection . "|Bitte eintragen]]''</small>";
 382                 else $wikiText = '--';
 383         }
 384         return wrCommonSandboxParse($wikiText);
 385 }
 386
 387
 388
 389 // Special page
 390 // ------------
 391
 392 /// Specal Page to show reports
 393 class WrReport extends SpecialPage {
 394         function WrReport() {
 395                 SpecialPage::SpecialPage('WrReport');
 396                 wfLoadExtensionMessages('WrReport');
 397         }
 398
 399
 400         /// \param $par Possibilities:
 401         /// - action == 'view' (default)
 402         /// - action == 'preview': Preview new report
 403         /// - action == 'store': Store new report
 404         /// - action == 'deletepreview': Preview the deleted record
 405         /// - action == 'delete': Delete an existing report
 406         /// - action == 'showerror': Shows the error and exits
 407         /// \param $override_action If not NULL (default), it overrides the action in $par
 408         /// \param $errorMsg UFT-8 encoded error message (in WikiText) to show on top of the page or NULL (default):
 409         function execute($par, $override_action = NULL, $errorMsg = NULL) {
 410                 global $wgRequest, $wgOut;
 411
 412                 $this->setHeaders();
 413
 414                 // Get request data
 415                 $action = $wgRequest->getText('action');
 416                 if (!$action) {
 417                         if ($wgRequest->getVal('preview')) $action = 'preview';
 418                         elseif ($wgRequest->getVal('store')) $action = 'store';
 419                         elseif ($wgRequest->getVal('deletepreview')) $action = 'deletepreview';
 420                         elseif ($wgRequest->getVal('delete')) $action = 'delete';
 421                         else $action = 'view';
 422                 }
 423                 if ($override_action) $action = $override_action;
 424
 425                 // Show error message
 426                 if ($errorMsg || $action == 'showerror') {
 427                         $wgOut->addWikiText('<div class="errorbox">' . $errorMsg . "</div>\n");
 428                         if ($action == 'showerror') return;
 429                 }
 430
 431                 // Action view
 432                 if ($action == 'view') {
 433                         $conditions = array('date_invalid > now()');
 434                         $order = 'date_entry desc, date_report desc';
 435                         $rows = wrReportGetReports($conditions, $order);
 436                         if (count($rows) == 0) $wgOut->addWikiText("''Es wurden keine Bahnberichte in der Datenbank gefunden.''\n\n");
 437                         $wgOut->addHTML(wrReportTableRender2($rows, WRREPORT_DETAIL, wrReportUserMayDelete()));
 438                 }
 439
 440                 // Action deletepreview or delete
 441                 elseif ($action == 'deletepreview' || $action == 'delete') {
 442                         $reportid = (int) $wgRequest->getText('reportid');
 443                         if ($reportid == 0) {
 444                                 $this->execute($par, 'showerror', utf8_encode('Es wurde kein Bericht zum Löschen ausgewählt.'));
 445                                 return;
 446                         }
 447                         $rows = wrReportGetReports(array('id' => $reportid), '');
 448                         if (count($rows) != 1) {
 449                                 $this->execute($par, 'showerror', utf8_encode('Es wurde ein ungültiger Bericht zum Löschen ausgewählt.'));
 450                                 return;
 451                         }
 452                         $row = $rows[0];
 453                         if (!is_null($row['delete_date'])) {
 454                                 $this->execute($par, 'showerror', utf8_encode('Der angegebende Bericht ist bereits gelöscht.'));
 455                                 return;
 456                         }
 457                         $delete_reason_public = $wgRequest->getText('delete_reason_public');
 458                         $delete_person_name = $wgRequest->getText('delete_person_name');
 459                         $delete_invisible = $wgRequest->getText('delete_invisible') ? TRUE : FALSE;
 460                         if ($action == 'delete') {
 461                                 // page
 462                                 $title = Title::newFromId($row['page_id']);
 463
 464                                 // user
 465                                 global $wgUser;
 466                                 $delete_person_userid = $wgUser->getId();
 467                                 if ($delete_person_userid == 0) $delete_person_userid = NULL; // to store a NULL value in the database if no user is logged in instead of 0.
 468                                 $delete_person_username = $wgUser->getName();
 469
 470                                 // Check permissions - see also function wrReportUserMayDelete, that does also check permissions but does not return an error message.
 471                                 $errorMsg = NULL;
 472                                 global $wgWrReportDeleteMode;
 473                                 if ($wgWrReportDeleteMode == 'deny') $errorMsg = utf8_encode('Das Löschen von Rodelbahnberichten ist derzeit leider nicht erlaubt.');
 474                                 elseif ($wgWrReportDeleteMode == 'loggedin' && !$wgUser->isLoggedIn()) $errorMsg = utf8_encode('Derzeit dürfen nur angemeldete Benutzer Rodelbahnberichte löschen.');
 475                                 elseif (!$delete_person_name || !$delete_reason_public) $errorMsg = utf8_encode('Es müssen sowohl die Begründung als auch der Name angegeben werden.');
 476                                 if ($errorMsg) {
 477                                         $this->execute($par, 'deletepreview', $errorMsg);
 478                                         return;
 479                                 }
 480
 481                                 // "Delete" (update) entry
 482                                 $dbr = wfGetDB(DB_MASTER);
 483                                 $dbr->update(
 484                                         'wrreport',
 485                                         array(
 486                                                 'delete_date' => date('c'),
 487                                                 'delete_person_name' => $delete_person_name,
 488                                                 'delete_person_ip' => $_SERVER['REMOTE_ADDR'],
 489                                                 'delete_person_userid' => $delete_person_userid,
 490                                                 'delete_person_username' => $delete_person_username,
 491                                                 'delete_reason_public' => $delete_reason_public,
 492                                                 'delete_invisible' => $delete_invisible ? 't' : 'f'
 493                                         ),
 494                                         array('id' => $reportid)
 495                                 );
 496
 497                                 // Purge cache
 498                                 $title->invalidateCache();
 499                                 wrRecacheRegions();
 500
 501                                 // Show success message
 502                                 global $wrShowReportsSection;
 503                                 $wgOut->addWikiText(utf8_encode('<div class="successbox">Der Bahnbericht für [[') . $row['page_title'] . '#' . $wrShowReportsSection . '|' . $row['page_title'] . utf8_encode("]] wurde erfolgreich gelöscht.</div>\n"));
 504                         }
 505                         if ($action == 'deletepreview') {
 506                                 $preview_msg = "Bitte nur dann einen Bericht löschen, wenn Gründe vorliegen wie\n" .
 507                                 "* Beschimpfungen, Verleumdungen (wir wollen ''Rodelbahnen'' bewerten, nicht Personen)\n" .
 508                                 "* Werbung oder Spam (wenn jemand allerdings ''werbend'' zu gute Noten vergibt, lieber eigenen Bericht eintragen als löschen).\n\n";
 509                                 $wgOut->addWikiText(utf8_encode($preview_msg));
 510                                 $wgOut->addWikiText(utf8_encode("== Schneelagebericht, um den es beim Löschen geht ==\n"));
 511                                 $format = WRREPORT_COMPACT_PAGE;
 512                                 $wgOut->addHTML(wrReportTableRender2(array($row), $format, FALSE));
 513                                 $wgOut->addWikiText(utf8_encode("\n\n== Vorschau (derzeit noch nicht gelöscht) ==\n"));
 514                                 $row['delete_date'] = date('c');
 515                                 $row['delete_reason_public'] = $delete_reason_public;
 516                                 $row['delete_person_name'] = $delete_person_name;
 517                                 $row['delete_invisible'] = $delete_invisible;
 518                                 $wgOut->addHTML(wrReportTableRender2(array($row), $format, FALSE));
 519                                 $wgOut->addWikiText(utf8_encode("== Löschen ==\n"));
 520                                 $wgOut->addWikiText(utf8_encode("Die Begründung und der Name scheinen nicht in den normalen Listen auf, allerdings dienen sie den Administratoren dazu, sich schnell einen Überblick zu verschaffen, wer was warum gelöscht hat.\n"));
 521                                 $wgOut->addHTML(wrDeleteReportFormRender($reportid, $delete_person_name, $delete_reason_public, $delete_invisible));
 522                         }
 523                 }
 524
 525                 // Action preview or store
 526                 elseif ($action == 'preview' || $action == 'store') {
 527                         $page_title = $wgRequest->getText('page_title');
 528                         $date_report = $wgRequest->getText('date_report');
 529                         $condition = $wgRequest->getText('condition');
 530                         $description = $wgRequest->getText('description');
 531                         $author_name = $wgRequest->getText('author_name');
 532                         if ($action == 'store') {
 533                                 // page_id
 534                                 $title = Title::newFromText($page_title);
 535                                 $page_id = $title->getArticleId();
 536                                 if ($page_id == 0) $page_id = NULL;
 537
 538                                 // user_id
 539                                 global $wgUser;
 540                                 $author_userid = $wgUser->getId();
 541                                 if ($author_userid == 0) $author_userid = NULL; // to store a NULL value in the database if no user is logged in instead of 0.
 542                                 $author_username = $wgUser->getName();
 543
 544                                 // condition
 545                                 $condition_int = (int) $condition;
 546                                 if ($condition_int >= 1 and $condition_int <= 5) $condition = $condition_int;
 547                                 else $condition = NULL;
 548
 549                                 // check conditions/permissions
 550                                 $errorMsg = NULL;
 551                                 global $wgWrReportMode;
 552                                 global $wgWrReportBlackListAll;
 553                                 global $wgWrReportBlackListStrangers;
 554                                 if ($wgWrReportMode == 'summer') $errorMsg = utf8_encode('Rodelbahnberichte sind in der schneefreien Zeit nicht erlaubt.');
 555                                 elseif ($wgWrReportMode == 'deny') $errorMsg = utf8_encode('Rodelbahnberichte sind derzeit leider nicht erlaubt.');
 556                                 elseif ($wgWrReportMode == 'loggedin' && !$wgUser->isLoggedIn()) $errorMsg = utf8_encode('Derzeit sind Rodelbahnberichte nur für angemeldete Benutzer erlaubt.');
 557                                 elseif (!$page_id) $errorMsg = utf8_encode('Die angegebene Seite wurde nicht gefunden.');
 558                                 elseif (in_array($page_title, $wgWrReportBlackListAll)) $errorMsg = utf8_encode('Bei der angegebenen Rodelbahn dürfen derzeit keine Rodelbahnberichte abgegeben werden.');
 559                                 elseif (!$wgUser->isLoggedIn() && in_array($page_title, $wgWrReportBlackListStrangers)) $errorMsg = utf8_encode('Bei der angegebenen Rodelbahn dürfen derzeit nur angemeldete Benutzer Rodelbahnberichte abgebe.');
 560                                 elseif (!$condition && !$description) $errorMsg = utf8_encode('Es sind sowohl die Beschreibung als auch die Bewertung leer/nicht vergeben.');
 561                                 elseif (!$wgUser->isLoggedIn()) {
 562                                         if (!$description) $errorMsg = utf8_encode('Bitte bei der Beschreibung eine kurze Begründung für die Bewertung abgeben.');
 563                                         elseif (!(stripos($description, 'http') === FALSE)) $errorMsg = utf8_encode('Der Text "http" ist leider für nicht-angemeldete Benutzer nicht erlaubt, weil wir in der Vergangenheit Fälle hatten, bei denen externe Werbelinks automatisiert eingetragen wurden.');
 564                                 }
 565
 566                                 // Chech whether identical reports are present
 567                                 if (!$errorMsg) {
 568                                         $dbr = wfGetDB(DB_SLAVE);
 569                                         $cond = 'condition';
 570                                         global $wgDBtype;
 571                                         if ($wgDBtype == "mysql") $cond = "`$cond`"; // "condition" is a reserved word in mysql
 572                                         $sqlConditions = array('page_id' => $page_id, 'date_report' => $date_report, $cond => $condition, 'description' => $description, 'author_name' => $author_name);
 573                                         $res = $dbr->select('wrreport', 'id', $sqlConditions);
 574                                         if ($res->numRows() == 1) $errorMsg = utf8_encode('Der Rodelbahnbericht wurde bereits früher gespeichert.');
 575                                         $dbr->freeResult($res);
 576                                 }
 577
 578                                 // Show error if any
 579                                 if ($errorMsg) {
 580                                         $this->execute($par, 'preview', $errorMsg);
 581                                         return;
 582                                 }
 583
 584                                 // Save entry
 585                                 $dbr = wfGetDB(DB_MASTER);
 586                                 $dbr->insert(
 587                                         'wrreport',
 588                                         array(
 589                                                 'page_id' => $page_id,
 590                                                 'page_title' => $page_title,
 591                                                 'date_report' => $date_report,
 592                                                 'date_entry' => date('c'),
 593                                                 'date_invalid' => date('c', strtotime('+9 days')),
 594                                                 $cond => $condition,
 595                                                 'description' => $description,
 596                                                 'author_name' => $author_name,
 597                                                 'author_ip' => $_SERVER['REMOTE_ADDR'],
 598                                                 'author_userid' => $author_userid,
 599                                                 'author_username' => $author_username
 600                                                 // 'delete_*' => // use database defaults (NULL)
 601                                         )
 602                                 );
 603
 604                                 // Purge cache
 605                                 $title->invalidateCache();
 606                                 wrRecacheRegions();
 607
 608                                 // Show success message
 609                                 global $wrShowReportsSection;
 610                                 $wgOut->addWikiText(utf8_encode('<div class="successbox">Der Bahnbericht für [[') . $page_title . '#' . $wrShowReportsSection . '|' . $page_title . utf8_encode("]] wurde erfolgreich gespeichert.</div>\n"));
 611                                 // We could redirect to result with the following line but we don't want to.
 612                                 // $wgOut->redirect($title->getFullURL() . '#Eintr.C3.A4ge');
 613                         }
 614                         if ($action == 'preview') {
 615                                 $wgOut->addWikiText(utf8_encode("== Vorschau (noch nicht gespeichert) ==\n"));
 616                                 $format = WRREPORT_COMPACT_PAGE;
 617                                 $row = array_fill_keys(wrReportGetColumnNames(), NULL);
 618                                 $row['page_title'] = $page_title;
 619                                 $row['date_report'] = $date_report;
 620                                 $row['condition'] = $condition;
 621                                 $row['description'] = $description;
 622                                 $row['author_name'] = $author_name;
 623                                 $wgOut->addHTML(wrReportTableRender2(array($row), $format, FALSE));
 624                                 $wgOut->addWikiText(utf8_encode("== Speichern oder Ändern ==\n"));
 625                                 $wgOut->addHTML(wrReportFormRender(FALSE, $page_title, $date_report, $condition, $description, $author_name));
 626                         }
 627
 628                 }
 629
 630                 else die('Wrong action');
 631         }
 632 }
 633
 634
 635 ?>