Subversion Repositories SvarDOS

Rev

Rev 1242 | Rev 1651 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1223 mateusz.vi 1
<?php
2
//
1242 mateusz.vi 3
// mateuszbb - minimalist bulletin board forum. MIT license.
4
//
1645 mateusz.vi 5
// VERSION 20240119
1242 mateusz.vi 6
//
1645 mateusz.vi 7
// Copyright (C) 2021-2024 Mateusz Viste
1223 mateusz.vi 8
//
1242 mateusz.vi 9
// Permission is hereby granted, free of charge, to any person obtaining a copy
10
// of this software and associated documentation files (the “Software”), to
11
// deal in the Software without restriction, including without limitation the
12
// rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
13
// sell copies of the Software, and to permit persons to whom the Software is
14
// furnished to do so, subject to the following conditions:
15
//
16
//The above copyright notice and this permission notice shall be included in
17
// all copies or substantial portions of the Software.
18
//
19
// THE SOFTWARE IS PROVIDED “AS IS”, WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
20
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
21
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
22
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
23
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
24
// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
25
// IN THE SOFTWARE.
1223 mateusz.vi 26
 
27
global $TRIP_SALT;
28
global $INITYEAR;
29
global $DATADIR;
30
global $NICE_URLS;
31
global $STR;
32
global $LANG;
1242 mateusz.vi 33
global $TZ;
34
global $DATE_FORMAT;
35
global $MAINPAGE_MAXTHREADS;
36
global $MAINPAGE_MAXINACT;
37
global $LOCK_DELAY;
38
global $EDIT_ALLOWED_MINUTES;
39
global $MAXDAILYPOSTS;
1223 mateusz.vi 40
 
41
include 'mateuszbb-config.php';
42
 
43
 
44
// *** TRANSLATION STRINGS *****************************************
45
 
46
$STR = array();
47
$STR['en']['opnewthread'] = 'open a new thread';
48
$STR['en']['newthread']   = 'New thread';
49
$STR['en']['latestentry'] = 'latest entry:';
50
$STR['en']['searchterm']  = 'searched term:';
51
$STR['en']['noresults']   = 'No results';
52
$STR['en']['reply']       = 'reply';
53
$STR['en']['jumptoend']   = 'jump to end';
54
$STR['en']['listthreads'] = 'list of threads';
55
$STR['en']['author']      = 'author:';
56
$STR['en']['address']     = 'address:';
57
$STR['en']['date']        = 'date:';
58
$STR['en']['nameornick']  = 'your name or nick';
59
$STR['en']['threadsubj']  = 'subject';
60
$STR['en']['yourmsg']     = 'Your message';
61
$STR['en']['cancel']      = 'cancel';
62
$STR['en']['send']        = 'send';
63
$STR['en']['archives']    = 'archives';
64
$STR['en']['backtocur']   = 'go back to current threads';
65
$STR['en']['search']      = 'search';
66
$STR['en']['password']    = 'password';
67
$STR['en']['optional']    = 'optional';
68
$STR['en']['passhelp']    = 'Providing a password here will generate a unique digital signature on your message.';
1242 mateusz.vi 69
$STR['en']['locked']      = "Thread locked due to inactivity since over {$LOCK_DELAY} days.";
1223 mateusz.vi 70
$STR['en']['captcha'][1]  = 'check the FIRST box';
71
$STR['en']['captcha'][2]  = 'check the MIDDLE box';
72
$STR['en']['captcha'][3]  = 'check the LAST box';
73
$STR['en']['captcha'][4]  = 'check the FIRST and LAST boxes';
74
$STR['en']['captcha'][5]  = 'check the TWO LAST boxes';
75
 
1230 mateusz.vi 76
// PL translations by Mateusz Viste
1223 mateusz.vi 77
$STR['pl']['opnewthread'] = 'stwórz nowy wątek';
78
$STR['pl']['newthread']   = 'Nowy wątek';
79
$STR['pl']['latestentry'] = 'ostatni wpis:';
80
$STR['pl']['searchterm']  = 'szukane wyrażenie:';
81
$STR['pl']['noresults']   = 'Brak wyników';
82
$STR['pl']['reply']       = 'odpowiedz';
83
$STR['pl']['jumptoend']   = 'skocz do końca';
84
$STR['pl']['listthreads'] = 'lista wątków';
85
$STR['pl']['author']      = 'autor:';
86
$STR['pl']['address']     = 'adres:';
87
$STR['pl']['date']        = 'data:';
88
$STR['pl']['nameornick']  = 'imię, nazwisko lub pseudonim';
89
$STR['pl']['threadsubj']  = 'tytuł wątku';
90
$STR['pl']['yourmsg']     = 'Twoja wiadomość';
91
$STR['pl']['cancel']      = 'anuluj';
92
$STR['pl']['send']        = 'wyślij';
93
$STR['pl']['archives']    = 'archiwum';
94
$STR['pl']['backtocur']   = 'powrót do bieżących wątków';
95
$STR['pl']['search']      = 'szukaj';
96
$STR['pl']['password']    = 'hasło';
1242 mateusz.vi 97
$STR['pl']['optional']    = 'opcjonalne';
1223 mateusz.vi 98
$STR['pl']['passhelp']    = 'Podanie hasła pozwoli wygenerować unikalny podpis elektroniczny przy twojej wiadomości.';
1242 mateusz.vi 99
$STR['pl']['locked']      = "Wątek zamknięty z powodu braku aktywności od ponad {$LOCK_DELAY} dni.";
1223 mateusz.vi 100
$STR['pl']['captcha'][1]  = 'zaznacz PIERWSZE pole';
101
$STR['pl']['captcha'][2]  = 'zaznacz ŚRODKOWE pole';
102
$STR['pl']['captcha'][3]  = 'zaznacz OSTATNIE pole';
103
$STR['pl']['captcha'][4]  = 'zaznacz PIERWSZE i OSTATNIE pole';
104
$STR['pl']['captcha'][5]  = 'zaznacz DWA OSTATNIE pola';
105
 
1230 mateusz.vi 106
// pt-BR translations courtesty of Luzemário Dantas
107
$STR['pt']['opnewthread'] = 'abrir novo tópico';
108
$STR['pt']['newthread']   = 'Novo tópico';
109
$STR['pt']['latestentry'] = 'entrada mais recente:';
110
$STR['pt']['searchterm']  = 'termo pesquisado:';
111
$STR['pt']['noresults']   = 'Sem resultados';
112
$STR['pt']['reply']       = 'responder';
113
$STR['pt']['jumptoend']   = 'ir para o final';
114
$STR['pt']['listthreads'] = 'lista de tópicos';
115
$STR['pt']['author']      = 'autor:';
116
$STR['pt']['address']     = 'endereço:';
117
$STR['pt']['date']        = 'data:';
118
$STR['pt']['nameornick']  = 'seu nome ou apelido';
119
$STR['pt']['threadsubj']  = 'assunto';
120
$STR['pt']['yourmsg']     = 'Sua mensagem';
121
$STR['pt']['cancel']      = 'cancelar';
122
$STR['pt']['send']        = 'enviar';
123
$STR['pt']['archives']    = 'arquivos';
124
$STR['pt']['backtocur']   = 'voltar ao tópico atuai';
125
$STR['pt']['search']      = 'pesquisar';
126
$STR['pt']['password']    = 'senha';
127
$STR['pt']['optional']    = 'opcional';
128
$STR['pt']['passhelp']    = 'Fornecer uma senha aqui vai gerar uma assinatura digital única na sua mensagem.';
1242 mateusz.vi 129
$STR['pt']['locked']      = "Este tópico está bloqueado porque está inativo há mais de {$LOCK_DELAY} dias."; // translated by google translate, wording might be poor
1230 mateusz.vi 130
$STR['pt']['captcha'][1]  = 'marque a PRIMEIRA caixa';
131
$STR['pt']['captcha'][2]  = 'marque a caixa do MEIO';
132
$STR['pt']['captcha'][3]  = 'marque a ÚLTIMA caixa';
133
$STR['pt']['captcha'][4]  = 'marque a PRIMEIRA e ÚLTIMA caixas';
134
$STR['pt']['captcha'][5]  = 'marque as DUAS ÚLTIMAS caixas';
135
 
1223 mateusz.vi 136
// *****************************************************************
137
 
138
 
139
function data_dluga($timestamp) {
1242 mateusz.vi 140
  global $DATE_FORMAT;
141
  return(date($DATE_FORMAT, $timestamp));
1223 mateusz.vi 142
}
143
 
144
 
1231 mateusz.vi 145
function selfurl($params = '') {
146
  global $SELFURL;
147
  $r = $SELFURL;
148
  if (!empty($params)) {
149
    if (strrchr($SELFURL, '?')) {
150
      $r .= '&';
151
    } else {
152
      $r .= '?';
153
    }
154
    $r .= $params;
155
  }
156
  return($r);
157
}
158
 
159
 
1223 mateusz.vi 160
// returns an array with the list of languages requested by the browser, in
161
// the order of preference
162
function getpreflang() {
163
  $res = array();
164
  if (! isset($_SERVER['HTTP_ACCEPT_LANGUAGE'])) return($res);
165
  $langlist = explode(',', $_SERVER['HTTP_ACCEPT_LANGUAGE']);
166
  foreach ($langlist as $lang) {
167
    $res[] = strtolower(substr($lang, 0, 2));
168
  }
169
  return(array_unique($res));
170
}
171
 
172
 
173
function mateuszbb_rss() {
174
  global $DATADIR;
1229 mateusz.vi 175
  global $RSS_TITLE;
1242 mateusz.vi 176
  global $NICE_URLS;
1229 mateusz.vi 177
 
1223 mateusz.vi 178
  $db = new SQLite3($DATADIR . 'mateuszbb.sqlite3', SQLITE3_OPEN_READONLY);
179
  if (! $db) {
180
    echo "SQL ERROR: ACCESS DENIED\n";
181
    return false;
182
  }
183
  $sqlres = $db->query('SELECT thread, msgid, author FROM rss ORDER BY msgid DESC, thread DESC LIMIT 100;');
184
  if (! $sqlres) {
185
    echo "SQL ERROR: QUERY FAILED\n";
186
    return false;
187
  }
188
 
189
  header('content-type: application/rss+xml');
190
 
191
  echo '<?xml version="1.0" encoding="utf-8" ?>' . "\n";
192
  echo '<rss version="2.0">' . "\n";
193
  echo "<channel>\n";
1229 mateusz.vi 194
  echo "<title>" . htmlspecialchars($RSS_TITLE, ENT_XML1) . "</title>\n";
195
  echo "<link>" . selfurl(). "</link>\n";
1645 mateusz.vi 196
  echo "<description>" . htmlspecialchars($RSS_TITLE, ENT_XML1) . "</description>\n";
1223 mateusz.vi 197
 
198
  while ($row = $sqlres->fetchArray()) {
199
    $rawtitle = file_get_contents($DATADIR . 'threads/' . $row['thread'] . '/title.txt');
200
    if (empty($rawtitle)) continue;
201
    $title = htmlspecialchars($rawtitle, ENT_XML1, 'UTF-8');
202
    $author = htmlspecialchars($row['author'], ENT_XML1, 'UTF-8');
1229 mateusz.vi 203
    if ($NICE_URLS) {
204
      $link = selfurl();
205
      if (substr($link, -1) !== '/') $link .= '/';
206
      $link .= "{$row['thread']}";
207
    } else {
208
      $link = selfurl('thread=' . $row['thread']);
209
    }
210
    $link .= '#' . $row['msgid'];
1223 mateusz.vi 211
    echo "<item>\n";
1229 mateusz.vi 212
    echo "<title>{$author} @ '{$title}'</title>\n";
213
    echo "<link>" . htmlspecialchars($link, ENT_XML1) . "</link>\n";
214
    echo "<description>{$author} @ '{$title}'</description>\n";
1223 mateusz.vi 215
    echo "<pubDate>" . date('r', $row['msgid']) . "</pubDate>\n";
1229 mateusz.vi 216
    echo "<guid>" . htmlspecialchars($link, ENT_XML1) . "</guid>\n";
1223 mateusz.vi 217
    echo "</item>\n";
218
  }
219
  $db->close();
220
 
221
  echo "</channel>\n";
222
  echo "</rss>\n";
223
  return true;
224
}
225
 
226
 
1242 mateusz.vi 227
function formularz($thread = 0, $postid = 0, $msg = '') {
1223 mateusz.vi 228
  global $STR;
229
  global $LANG;
1242 mateusz.vi 230
  global $NICE_URLS;
1223 mateusz.vi 231
 
1242 mateusz.vi 232
  if ($thread == 0) {
1223 mateusz.vi 233
    echo '<form class="minibb" method="POST" action="' . selfurl() . '#title" id="formularz">' . "\n";
234
    echo '<input type="hidden" name="action" value="createthread">' . "\n";
235
  } else {
236
    echo '<form class="minibb" method="POST" action="' . selfurl() . '" id="formularz">' . "\n";
237
    echo '<input type="hidden" name="thread" value="' . $thread . '">' . "\n";
1242 mateusz.vi 238
    if ($postid > 0) {
239
      echo '<input type="hidden" name="action" value="editpost">' . "\n";
240
      echo '<input type="hidden" name="postid" value="' . $postid . '">' . "\n";
241
    } else {
242
      echo '<input type="hidden" name="action" value="newpost">' . "\n";
243
    }
1223 mateusz.vi 244
  }
245
 
246
  echo '<div class="minibb-formfields">' . "\n";
1242 mateusz.vi 247
  echo '<div class="minibb-formlabelgroup"><p>' . $STR[$LANG]['nameornick'] . '</p><input type="text" name="username" pattern=".*[^\s].*" minlength="1" maxlength="40" autofill="username" title="' . $STR[$LANG]['nameornick'];
248
  if (!empty($msg)) echo '" value="' . htmlspecialchars($msg['author']) . '"';
249
  echo '" required></div><div class="minibb-formlabelgroup"><p>' . $STR[$LANG]['password'] . ' (<span title="' . $STR[$LANG]['passhelp'] . '" style="text-decoration-line: underline; text-decoration-style: dotted;">' . $STR[$LANG]['optional'] . '</span>)</p><input type="password" name="password" maxlength="40" autofill="current-password"></div>' . "\n";
250
  if ($thread == 0) {
1223 mateusz.vi 251
    echo '<div class="minibb-formlabelgroup" style="width: 100%;">' . "\n";
252
    echo "<p>" . $STR[$LANG]['threadsubj'] . "</p>\n";
253
    echo '<input type="text" name="title" title="' . $STR[$LANG]['threadsubj'] . '" maxlength="64" pattern=".*[^\s].*" required>' . "\n";
254
    echo "</div>\n";
255
  }
256
  echo '<textarea name="msg" placeholder="' . $STR[$LANG]['yourmsg'] . '">' . "\n";
1242 mateusz.vi 257
  if (!empty($msg)) echo htmlspecialchars($msg['msg']);
258
  echo "</textarea><br>\n";
259
  echo "</div>\n";
1223 mateusz.vi 260
  // --- CAPTCHA ---
261
  $capid = rand(1, 5);
1242 mateusz.vi 262
  echo '<div class="minibb-formcaptcha">' . $STR[$LANG]['captcha'][$capid] . ': <span class="minibb-cboxgroup"><input type="checkbox" name=c1><input type="checkbox" name=c2><input type="checkbox" name=c3></span>' . "\n";
1223 mateusz.vi 263
  echo '<input type="hidden" name="capid" value="' . $capid . '">';
264
  // ---------------
1242 mateusz.vi 265
  echo '<div class="minibb-formbtns">' . "\n";
266
  $link = selfurl();
267
  if ($postid > 0) {
268
    $link = selfurl("thread=" . $thread);
269
    if ($NICE_URLS) $link = $thread;
270
    $link .= '#' . $postid;
271
  }
272
  echo '<a href="' . $link . '">' . $STR[$LANG]['cancel'] . '</a> <input type="submit" value="' . $STR[$LANG]['send'] . '">' . "\n";
273
  echo "</div>\n";
274
  echo "</div>\n";
1223 mateusz.vi 275
  echo '</form>';
276
}
277
 
278
function wyswietl_watek_w_liscie($threadid, $tytul, $lastauthor, $lastupdate) {
279
  global $NICE_URLS;
280
  global $STR;
281
  global $LANG;
282
 
283
  echo '<a href="';
284
  if (!$NICE_URLS) {
285
    echo selfurl("thread=$threadid");
286
  } else {
287
    echo $threadid;
288
  }
289
  echo '" class="minibb-threaditem">' . "\n";
290
  echo '<h2>' . htmlspecialchars($tytul) . "</h2>\n";
291
  echo '<p>' . $STR[$LANG]['latestentry'] . ' ' . htmlspecialchars($lastauthor) . ', ' . htmlspecialchars(data_dluga($lastupdate)) . "</p>\n";
292
  echo "</a>\n";
293
}
294
 
295
function sprawdz_captcha($CAPARR) {
296
  //echo "<!-- capid={$CAPARR['capid']} c1={$CAPARR['c1']} c2={$CAPARR['c2']} c3={$CAPARR['c3']}-->\n";
297
  switch ($CAPARR['capid']) {
298
    case 1:
299
      if (($CAPARR['c1']) && (!$CAPARR['c2']) && (!$CAPARR['c3'])) return(true);
300
      break;
301
    case 2:
302
      if ((!$CAPARR['c1']) && ($CAPARR['c2']) && (!$CAPARR['c3'])) return(true);
303
      break;
304
    case 3:
305
      if ((!$CAPARR['c1']) && (!$CAPARR['c2']) && ($CAPARR['c3'])) return(true);
306
      break;
307
    case 4:
308
      if (($CAPARR['c1']) && (!$CAPARR['c2']) && ($CAPARR['c3'])) return(true);
309
      break;
310
    case 5:
311
      if ((!$CAPARR['c1']) && ($CAPARR['c2']) && ($CAPARR['c3'])) return(true);
312
      break;
313
  }
314
  return(false);
315
}
316
 
317
 
318
// zwraca akcję na podstawie globalnych POST lub GET
319
function getvar_action() {
320
  if (!empty($_POST['action'])) return $_POST['action'];
321
  if (!empty($_GET['action'])) return $_GET['action'];
322
  return('');
323
}
324
 
325
function getvar_thread() {
326
  if (!empty($_POST['thread'])) return intval($_POST['thread']);
327
  if (!empty($_GET['thread'])) return intval($_GET['thread']);
328
  return(-1);
329
}
330
 
331
function getvar_archiveyear() {
332
  if (!empty($_POST['arch'])) return intval($_POST['arch']);
333
  if (!empty($_GET['arch'])) return intval($_GET['arch']);
334
  return(-1);
335
}
336
 
337
 
338
// funkcja która zapisuje nowe wiadomości
339
function mateuszbb_preprocess() {
340
global $TRIP_SALT;
341
global $DATADIR;
342
global $NICE_URLS;
343
global $ERRSTR; // zmienna zawierająca komunikat błędu (jeśli jakiś wystąpił)
344
global $STR;
345
global $LANG;
1242 mateusz.vi 346
global $MAXDAILYPOSTS;
347
global $EDIT_ALLOWED_MINUTES;
1223 mateusz.vi 348
 
349
$action = getvar_action();
350
$thread = getvar_thread();
351
$archiveyear = getvar_archiveyear();
352
 
1242 mateusz.vi 353
// negotiate language, unless forced by configuration
354
if (empty($LANG)) {
355
  $LANG = 'en'; // preselect english as default language
356
  foreach (getpreflang() as $l) {
357
    if (!empty($STR[$l])) {
358
      $LANG = $l;
359
      break;
360
    }
1223 mateusz.vi 361
  }
1242 mateusz.vi 362
} else { // if language forced by configuration then make sure it is supported
363
  if (empty($STR[$LANG])) $LANG = 'en'; // fall back to 'en' on error
1223 mateusz.vi 364
}
365
 
366
// write access: check how many messages the user posted during last 24h
367
if (($action === 'createthread') || ($action === 'newpost')) {
1242 mateusz.vi 368
  $db = new SQLite3($DATADIR . 'mateuszbb.sqlite3');
369
  if ($db) {
370
    $db->exec('DELETE FROM ip_msg_counters24h WHERE msgid < strftime(\'%s\', \'now\') - 24*3600;');
371
    $count24h = intval($db->querySingle("SELECT count(*) FROM ip_msg_counters24h WHERE ipaddr = '{$_SERVER['REMOTE_ADDR']}'"));
372
    $db->close();
373
    if ($count24h >= $MAXDAILYPOSTS) {
374
      $ERRSTR = "BŁĄD: Z TWOJEGO ADRESU NAPISANO JUŻ {$count24h} WIADOMOŚCI W PRZECIĄGU OSTATNICH 24H. SPRÓBUJ PONOWNIE ZA JAKIŚ CZAS.";
375
      $action = '';
376
    }
377
  }
1223 mateusz.vi 378
}
379
 
1242 mateusz.vi 380
// edit post becomes newpost, it was different just to avoid 24h counters
381
if ($action === 'editpost') $action = 'newpost';
382
 
1223 mateusz.vi 383
// new thread creation (+switch to read thread)
384
if ($action === 'createthread') {
385
  // captcha check
386
  if (!sprawdz_captcha($_POST)) {
387
    echo "<p>BŁĄD: NIEPRAWIDŁOWE CAPTCHA</p>\n";
388
    goto DONE;
389
  }
390
  //
391
  $thread = time();
1242 mateusz.vi 392
  if (empty($_POST['username']) || (empty($_POST['msg'])) || (empty($_POST['title']))) {
1223 mateusz.vi 393
    echo '<p>BŁĄD: pusty nick, wiadomość lub tytuł</p>' . "\n";
394
    goto DONE;
395
  }
396
  if (!mkdir($DATADIR . 'threads/' . $thread, 0755, true)) {
397
    echo '<p>BŁĄD: nie zdołano utworzyć wątku nr ' . $thread . "</p>\n";
398
    goto DONE;
399
  }
400
  // zapisz tytuł
401
  file_put_contents($DATADIR . 'threads/' . $thread . '/title.txt', trim($_POST['title']));
402
  // ustaw co trzeba żeby zapisać wiadomość
403
  $action = 'newpost';
404
}
405
 
406
// nowy post do istniejącego wątku
1242 mateusz.vi 407
if (($action === 'newpost') && ($thread >= 0) && (!empty($_POST['msg'])) && (!empty($_POST['username']))) {
408
  // is it really about a NEW post or about EDITING an existing one?
409
  if (empty($_POST['postid'])) {
410
    $postid = time();
411
  } else { // editing an existing post
412
    $msg = loadmsg($_POST['thread'], $_POST['postid']);
413
    if (!is_art_edition_allowed($_POST['postid'], $msg)) {
414
      $action = '';
415
      $ERRSTR = "NOT ALLOWED";
416
      goto DONE;
417
    }
418
    $postid = $_POST['postid'];
419
  }
420
 
1223 mateusz.vi 421
  if (!sprawdz_captcha($_POST)) {
422
    $ERRSTR = "BŁĄD: NIEPRAWIDŁOWE CAPTCHA";
423
    goto DONE;
424
  }
425
  // nadpisz lastauthor i lastupdate
1242 mateusz.vi 426
  $lastupdate = array('lastupdate' => $postid, 'lastauthor' => trim($_POST['username']));
1223 mateusz.vi 427
  file_put_contents($DATADIR . 'threads/' . $thread . '/lastupdate', serialize($lastupdate));
428
  // oblicz tripkod, jeśli hasło zostało ustawione
429
  $tripsig = '';
1242 mateusz.vi 430
  if (!empty(trim($_POST['password']))) {
431
    $tripsig = hash('whirlpool', trim($_POST['username']) . '#' . trim($_POST['password']) . $TRIP_SALT);
1223 mateusz.vi 432
  }
1242 mateusz.vi 433
  // wygeneruj klucz do edycji postu i prześlij go przeglądarce przez ciasteczko (chyba że przeglądarka już ma klucz)
434
  if (!empty($EDIT_ALLOWED_MINUTES)) {
435
    if (!empty($_COOKIE['mateuszbbkey'])) {
436
      $artkey = $_COOKIE['mateuszbbkey'];
437
    } else {
438
      $artkey = bin2hex(random_bytes(128));
439
      setcookie('mateuszbbkey', $artkey, array('secure' => true, 'httponly' => true, 'samesite' => 'Lax'));
440
    }
441
  }
1223 mateusz.vi 442
  // zapisz wiadomość
1242 mateusz.vi 443
  $msg = array('author' => trim($_POST['username']), 'ip' => $_SERVER['REMOTE_ADDR'], 'trip' => $tripsig, 'msg' => trim($_POST['msg']), 'key' => password_hash($artkey, PASSWORD_DEFAULT));
1223 mateusz.vi 444
  file_put_contents($DATADIR . 'threads/' . $thread . '/' . $postid, serialize($msg));
1242 mateusz.vi 445
  // zaktualizuj metadane dot. ostatniego wpisu, ostatniego autora i ilości wpisów dla tego IP w ciągu ostatniej godziny, ale tylko dla nowych wpisów (nie dla edycji)
446
  if (empty($_POST['postid'])) {
447
    $db = new SQLite3($DATADIR . 'mateuszbb.sqlite3');
448
    if ($db) {
449
      $db->exec('CREATE TABLE IF NOT EXISTS newest (thread INTEGER PRIMARY KEY, lastupdate INTEGER NOT NULL, lastauthor TEXT NOT NULL);');
450
      $db->exec('CREATE INDEX IF NOT EXISTS lastupdated ON newest (lastupdate);');
451
      $db->exec('CREATE TABLE IF NOT EXISTS ip_msg_counters24h (threadid INTEGER NOT NULL, msgid INTEGER NOT NULL, ipaddr TEXT NOT NULL);');
452
      $db->exec('CREATE TABLE IF NOT EXISTS rss (thread INTEGER NOT NULL, msgid INTEGER NOT NULL, author TEXT NOT NULL);');
453
      $db->exec('CREATE INDEX IF NOT EXISTS rss_msgid ON rss (msgid);');
454
      $login_escaped = $db->escapeString(trim($_POST['username']));
455
      $db->exec("INSERT OR REPLACE INTO newest (thread, lastupdate, lastauthor) VALUES ({$thread}, {$postid}, '{$login_escaped}');");
456
      $db->exec("INSERT INTO rss (thread, msgid, author) VALUES ({$thread}, {$postid}, '{$login_escaped}');");
457
      $db->exec("INSERT INTO ip_msg_counters24h (threadid, msgid, ipaddr) VALUES ({$thread}, {$postid}, '{$_SERVER['REMOTE_ADDR']}');");
458
      $db->close();
459
    } else {
460
      echo "SQL ERROR WHILE WRITING STATS\n";
461
    }
1223 mateusz.vi 462
  }
463
  // przekieruj
464
  if ($NICE_URLS) {
465
    $newurl = "{$thread}#{$postid}";
466
  } else {
467
    $newurl = selfurl("thread={$thread}") . "#{$postid}";
468
  }
469
  header("Location: {$newurl}");
470
  echo "<html><head></head><body><a href=\"{$newurl}\">KLIKNIJ TUTAJ</a></body></html>\n";
471
  exit();
472
}
473
 
474
DONE:
475
 
476
}
477
 
478
 
479
function mateuszbb_tytulwatku($id) {
480
  global $DATADIR;
481
  return file_get_contents($DATADIR . 'threads/' . $id . '/title.txt');
482
}
483
 
484
 
1242 mateusz.vi 485
// returns an array of last n threads with most recent activity that had activity
486
// in last maxinact days. returns false on error or empty set.
487
// the returned result, when not false, is an array of arrays, where each
488
// leaf array represents one thread
489
function mateuszbb_getactivethreads($n, $maxinact = -1) {
490
  global $DATADIR;
491
  $result = array();
492
 
493
  $db = new SQLite3($DATADIR . 'mateuszbb.sqlite3', SQLITE3_OPEN_READONLY);
494
  if (! $db) return(false);
495
 
496
  $minupdatedate = 0;
497
  if ($maxinact >= 0) $minupdatedate = time() - (intval($maxinact) * 86400);
498
 
499
  $sqlquery = 'SELECT thread, lastupdate, lastauthor FROM newest WHERE lastupdate > ' . $minupdatedate . ' ORDER BY lastupdate DESC LIMIT ' . intval($n) . ';';
500
 
501
  $sqlres = $db->query($sqlquery);
502
  if (! $sqlres) {
503
    $db->close();
504
    return(false);
505
  }
506
 
507
  // kopiuj wpisy do nowej tablicy
508
  while ($row = $sqlres->fetchArray()) {
509
    $result[] = $row;
510
  }
511
 
512
  $db->close();
513
  return($result);
514
}
515
 
516
 
517
// returns true if post can be edited by current user
518
function is_art_edition_allowed($timestamp, $msg) {
519
  global $EDIT_ALLOWED_MINUTES;
520
  if ($EDIT_ALLOWED_MINUTES >= 0) {
521
    if (((time() - $timestamp) / 60) >= $EDIT_ALLOWED_MINUTES) return(false); // only posts from last x minutes can be edited
522
  }
523
  if (empty($_COOKIE['mateuszbbkey'])) return(false);
524
  if (empty($msg['key'])) return(false);
525
  return(password_verify($_COOKIE['mateuszbbkey'], $msg['key']));
526
}
527
 
528
 
529
function loadmsg($threadid, $postid) {
530
  global $DATADIR;
531
  $fname = $DATADIR . 'threads/' . $threadid . '/' . $postid;
532
  if (!file_exists($fname)) return(false);
533
  return(unserialize(file_get_contents($fname)));
534
}
535
 
536
 
1223 mateusz.vi 537
// wyświetlanie UI itd
538
function mateuszbb_start() {
539
global $TRIP_SALT;
540
global $ERRSTR;
541
global $DATADIR;
542
global $INITYEAR;
543
global $LANG;
544
global $STR;
545
global $NICE_URLS;
546
global $SEARCH_API_URL;
1242 mateusz.vi 547
global $TZ;
548
global $LOCK_DELAY;
549
global $MAINPAGE_MAXTHREADS;
550
global $MAINPAGE_MAXINACT;
1223 mateusz.vi 551
 
552
// read global variables
553
$action = getvar_action();
554
$thread = getvar_thread();
555
$archiveyear = getvar_archiveyear();
556
 
1242 mateusz.vi 557
// ustaw strefę czasową, jeśli jakaś jest skonfigurowana
558
if (!empty($TZ)) date_default_timezone_set($TZ);
559
 
1223 mateusz.vi 560
// wyświetl błąd, jeśli jakiś wystąpił w mateuszbb_preprocess()
561
if (!empty($ERRSTR)) {
562
  echo "<p class=\"minibb-errstr\">{$ERRSTR}</p>\n";
563
  $action = '';
564
  echo '<p><a href="./">Wróć do głównej strony</a></p>' . "\n";
565
  goto DONE;
566
}
567
 
568
// szukanie
569
if (isset($_POST['szukaj']) && (!empty(trim($_POST['szukaj'])))) {
570
  $q = trim($_POST['szukaj']);
571
  $query = $SEARCH_API_URL . urlencode($q);
572
  echo '<p>' . $STR[$LANG]['searchterm'] . ' ' . htmlentities($q) . '</p>';
573
  $results = file_get_contents($query);
574
  $resarr = json_decode($results, true)['items'];
575
 
576
  $licznik = 0;
577
  foreach ($resarr as $r) {
578
    if (mb_substr($r['link'], -1) === '/') continue;
579
    echo '<a href=' . $r['link'] . ' class="minibb-searchresult">';
580
    echo "<div><h1>{$r['title']}</h1><p>{$r['htmlSnippet']}</p></div></a>\n";
581
    $licznik++;
582
  }
583
 
584
  if ($licznik == 0) echo "<p>" . $STR[$LANG]['noresults'] . "</p>\n";
585
 
586
  goto DONE;
587
}
588
 
1242 mateusz.vi 589
// edit post
590
if ($action === 'editpostform') {
591
  $msg = loadmsg($_POST['thread'], $_POST['post']);
592
  if (is_art_edition_allowed($_POST['post'], $msg)) {
593
    formularz(intval($_POST['thread']), intval($_POST['post']), $msg);
594
  } else {
595
    echo "<p>Link expired</p>\n";
596
  }
597
  GOTO DONE;
598
}
599
 
1223 mateusz.vi 600
// new thread form
601
if ($action === 'newthread') {
602
  echo '<h2 class="minibb-threadtitle">' . $STR[$LANG]['newthread'] . '</h2>' . "\n";
603
  formularz();
604
  goto DONE;
605
}
606
 
1242 mateusz.vi 607
// zobacz listę wątków (main page)
1223 mateusz.vi 608
if ((empty($action)) && ($thread < 0) && ($archiveyear <= 0)) {
1242 mateusz.vi 609
  // display the main page header if any is defined
610
  if (file_exists($DATADIR . 'mateuszbb-main-head.html')) {
611
    readfile($DATADIR . 'mateuszbb-main-head.html');
612
  }
613
  // list wątków
1223 mateusz.vi 614
  echo '<div class="minibb-toolbar" style="justify-content: space-between;">';
615
  echo '<form action="' . selfurl() . '" method="POST"><input type="text" name="szukaj" placeholder="' . $STR[$LANG]['search'] . '"></form>';
616
  echo '<a href="' . selfurl('action=newthread') . '#formularz">' . $STR[$LANG]['opnewthread'] . '</a>';
617
  echo "</div>\n";
1242 mateusz.vi 618
 
619
  $lista_watkow = mateuszbb_getactivethreads($MAINPAGE_MAXTHREADS, $MAINPAGE_MAXINACT);
620
  if ($lista_watkow === false) {
621
    echo "<p>NO ENTRIES FOUND</p>";
622
  } else {
623
    foreach ($lista_watkow as $row) {
624
      $title = mateuszbb_tytulwatku($row['thread']);
625
      if (empty($title)) {
626
        echo "<!-- BŁĄD: nie zdołano załadować wątku nr {$row['thread']} -->\n";
627
        continue;
1223 mateusz.vi 628
      }
1242 mateusz.vi 629
      wyswietl_watek_w_liscie($row['thread'], $title, $row['lastauthor'], $row['lastupdate']);
1223 mateusz.vi 630
    }
631
  }
632
 
633
  echo '<div style="display: flex; justify-content: space-between; font-size: 0.9em; opacity: 0.8; margin: 0.6em 0.5em 0 0.5em;">' . "\n";
634
  echo '<div>' . $STR[$LANG]['archives'] . ':';
635
  for ($y = $INITYEAR; $y <= intval(gmdate('Y')); $y++) {
636
    if ($NICE_URLS) {
637
      echo " <a href=\"{$y}\">{$y}</a>";
638
    } else {
639
      echo ' <a href="' . selfurl("arch={$y}") . '">' . $y . '</a>';
640
    }
641
  }
642
  echo "</div>\n";
1242 mateusz.vi 643
  echo '<a href="rss.php"><img style="height: 1em;" src="mateuszbb_rss.svg" alt="RSS"></a>' . "\n";
1223 mateusz.vi 644
  echo "</div>\n";
645
 
646
  // display the main page footer if any is defined
1242 mateusz.vi 647
  if (file_exists($DATADIR . 'mateuszbb-main-foot.html')) {
648
    readfile($DATADIR . 'mateuszbb-main-foot.html');
1223 mateusz.vi 649
  }
650
 
651
  goto DONE;
652
}
653
 
654
// wyświetl archiwum
655
if ($archiveyear > 0) {
656
  echo '<div class="minibb-toolbar" id="title"><a href="' . selfurl() . '">' . $STR[$LANG]['backtocur'] . '</a></div>' . "\n";
1233 mateusz.vi 657
  echo '<h2 class="minibb-threadtitle">' . $STR[$LANG]['archives'] . " {$archiveyear}</h2>\n";
1223 mateusz.vi 658
  $threads = scandir($DATADIR . 'threads/', SCANDIR_SORT_ASCENDING);
659
  foreach ($threads as $t) {
660
    if (!preg_match('/^[0-9][0-9]*$/', $t)) continue; // skip anything that is not a thread id
661
    if (intval(gmdate('Y', $t)) != $archiveyear) continue; // skip threads out of the targeted year
662
    $title = file_get_contents($DATADIR . 'threads/' . $t . '/title.txt');
663
    $link = $t;
664
    if (! $NICE_URLS) $link = selfurl("thread={$t}");
665
    echo '<span style="font-family: monospace;">[' . gmdate("Y-m-d", $t) . "]</span> <a href=\"{$link}\">{$title}</a><br>\n";
666
  }
667
  goto DONE;
668
}
669
 
670
// zobacz wątek
671
if ((empty($action)) && ($thread >= 0)) {
672
  // załaduj listę postów (i zapamiętaj ostatnią pozycję)
673
  $listapostow = scandir($DATADIR . 'threads/' . $thread . '/');
674
  // usuń pozycje które nie są żadnym msgid (np. title.txt) i zapamiętaj ostatni msgid
675
  $posty = array();
676
  foreach ($listapostow as $p) {
677
    if (!preg_match('/^[0-9][0-9]*$/', $p)) continue; // skip anything that is not a messageid
678
    $posty[] = $p;
679
    $ostatnipost = $p;
680
  }
1242 mateusz.vi 681
  // is this thread locked?
682
  $islocked = false;
683
  if (($LOCK_DELAY >= 0) && ((time() - intval($ostatnipost)) / 86400 >= $LOCK_DELAY)) $islocked = true;
1223 mateusz.vi 684
  // toolbar (ostatni wątek / odpowiedz / powrót do forum)
685
  echo '<div class="minibb-toolbar" id="title">';
1242 mateusz.vi 686
  echo '<a href="#' . $ostatnipost . '">' . $STR[$LANG]['jumptoend'] . '</a>';
687
  if (! $islocked) echo ' <a href="#formularz">' . $STR[$LANG]['reply'] . '</a>';
688
  echo ' <a href="' . selfurl() . '">' . $STR[$LANG]['listthreads'] . '</a></div>' . "\n";
1223 mateusz.vi 689
  // wyświetl tytuł wątku
690
  echo '<h2 class="minibb-threadtitle">' . htmlspecialchars(file_get_contents($DATADIR . 'threads/' . $thread . '/title.txt')) . "</h2>\n";
1242 mateusz.vi 691
  // "thread is locked"
692
  if ($islocked) echo '<p class="minibb-islockedmsg">' . $STR[$LANG]['locked'] . "</p>\n";
693
  // wyświetl listę postów
1223 mateusz.vi 694
  foreach ($posty as $p) {
1242 mateusz.vi 695
    $msg = loadmsg($thread, $p);
1223 mateusz.vi 696
    echo '<div class="minibb-post" id="' . $p . '">' . "\n";
697
    echo '<div class="minibb-postheader"><a href="#' . $p . '" style="text-decoration: inherit; color: inherit;"><div class="minibb-postauthor">' . "\n";
698
    echo $STR[$LANG]['author'] . ' ' . htmlspecialchars($msg['author']) . "<br>\n";
699
    echo $STR[$LANG]['address'] . ' ' . htmlspecialchars($msg['ip']) . "<br>\n";
700
    echo $STR[$LANG]['date'] . ' ' . htmlspecialchars(data_dluga($p)) . "</div></a>\n";
701
    if (!empty($msg['trip'])) {
702
      echo '<div class="minibb-trip">';
703
      echo chunk_split($msg['trip'], 16, "\n");
704
      echo "</div>\n";
705
    }
706
    echo "</div>\n";
707
 
708
    // symbole html
709
    $bodyprocessed = htmlspecialchars($msg['msg']);
710
 
1242 mateusz.vi 711
    // ludzie czasem dodają znaczniki [img] do obrazków, usuń je (ale tylko jeśli są na początku linii)
712
    $bodyprocessed = preg_replace('~^(\[img\])(.*)(\[/img\])~m', '$2', $bodyprocessed);
713
 
1223 mateusz.vi 714
    // dodaj podgląd pod linki do obrazków, ale tylko jeśli link jest sam w linijce
1242 mateusz.vi 715
    $bodyprocessed = preg_replace('~^(http[s]?://[^<>[:space:]]+[[:alnum:]/]\.(jpg|png))($|[\r\n]{1,2})~m', "$1\n<img src=\"$1\">\n", $bodyprocessed);
1223 mateusz.vi 716
 
717
    // olinkuj linki
1242 mateusz.vi 718
    $bodyprocessed = preg_replace("~([^\"]|^)(http[s]?://[^<>[:space:]]+[[:alnum:]/=])~", "$1<a href=\"$2\">$2</a>", $bodyprocessed);
1223 mateusz.vi 719
 
720
    // oflaguj cytaty (linijki zaczynające się od ">")
1242 mateusz.vi 721
    $bodyprocessed = preg_replace('/^(&gt;.*)[\r]?\n/m', '<blockquote>$1</blockquote>', $bodyprocessed);
1223 mateusz.vi 722
 
1242 mateusz.vi 723
    echo '<div class="minibb-postbody">';
724
    // czy mogę edytować?
725
    if (is_art_edition_allowed($p, $msg)) {
726
      echo '<form class="editbtn" method="POST" action="' . selfurl() . '"><input type="hidden" name="action" value="editpostform"><input type="hidden" name="post" value="' . $p . '"><input type="hidden" name="thread" value="' . $thread . '"><input type="submit" value="EDIT"></form>';
727
    }
728
    echo $bodyprocessed . "</div>\n";
1223 mateusz.vi 729
    echo "</div>\n";
730
  }
1242 mateusz.vi 731
  // formularz odpowiedzi albo komunikat o zamknięciu
732
  if ($islocked) {
733
    echo '<p class="minibb-islockedmsg">' . $STR[$LANG]['locked'] . "</p>\n";
734
  } else {
735
    formularz($thread);
736
  }
1223 mateusz.vi 737
  goto DONE;
738
}
739
 
740
DONE:
741
}
742
?>