]> git.immae.eu Git - github/shaarli/Shaarli.git/blame - index.php
Merge pull request #301 from ArthurHoaro/edit-link-redirect
[github/shaarli/Shaarli.git] / index.php
CommitLineData
45034273 1<?php
7d4263e1 2// Shaarli 0.5.0 - Shaare your links...
ad6c27b7 3// The personal, minimalist, super-fast, no-database Delicious clone. By sebsauvage.net
45034273
SS
4// http://sebsauvage.net/wiki/doku.php?id=php:shaarli
5// Licence: http://www.opensource.org/licenses/zlib-license.php
d1e2f8e5 6// Requires: PHP 5.3.x
45034273 7// -----------------------------------------------------------------------------------------------
afd7b77b
V
8
9// Set 'UTC' as the default timezone if it is not defined in php.ini
10// See http://php.net/manual/en/datetime.configuration.php#ini.date.timezone
11if (date_default_timezone_get() == '') {
12 date_default_timezone_set('UTC');
13}
cb49ab94 14
45034273 15// -----------------------------------------------------------------------------------------------
dd484b90
A
16// Hardcoded parameter (These parameters can be overwritten by editing the file /data/config.php)
17// You should not touch any code below (or at your own risks!)
45034273
SS
18$GLOBALS['config']['DATADIR'] = 'data'; // Data subdirectory
19$GLOBALS['config']['CONFIG_FILE'] = $GLOBALS['config']['DATADIR'].'/config.php'; // Configuration file (user login/password)
20$GLOBALS['config']['DATASTORE'] = $GLOBALS['config']['DATADIR'].'/datastore.php'; // Data storage file.
21$GLOBALS['config']['LINKS_PER_PAGE'] = 20; // Default links per page.
22$GLOBALS['config']['IPBANS_FILENAME'] = $GLOBALS['config']['DATADIR'].'/ipbans.php'; // File storage for failures and bans.
23$GLOBALS['config']['BAN_AFTER'] = 4; // Ban IP after this many failures.
24$GLOBALS['config']['BAN_DURATION'] = 1800; // Ban duration for IP address after login failures (in seconds) (1800 sec. = 30 minutes)
25$GLOBALS['config']['OPEN_SHAARLI'] = false; // If true, anyone can add/edit/delete links without having to login
26$GLOBALS['config']['HIDE_TIMESTAMPS'] = false; // If true, the moment when links were saved are not shown to users that are not logged in.
1099d8fc 27$GLOBALS['config']['SHOW_ATOM'] = false; // If true, an extra "ATOM feed" button will be displayed in the toolbar
45034273
SS
28$GLOBALS['config']['ENABLE_THUMBNAILS'] = true; // Enable thumbnails in links.
29$GLOBALS['config']['CACHEDIR'] = 'cache'; // Cache directory for thumbnails for SLOW services (like flickr)
30$GLOBALS['config']['PAGECACHE'] = 'pagecache'; // Page cache directory.
ad6c27b7 31$GLOBALS['config']['ENABLE_LOCALCACHE'] = true; // Enable Shaarli to store thumbnail in a local cache. Disable to reduce web space usage.
45034273 32$GLOBALS['config']['PUBSUBHUB_URL'] = ''; // PubSubHubbub support. Put an empty string to disable, or put your hub url here to enable.
2f2aa06b
V
33$GLOBALS['config']['RAINTPL_TMP'] = 'tmp/' ; // Raintpl cache directory (keep the trailing slash!)
34$GLOBALS['config']['RAINTPL_TPL'] = 'tpl/' ; // Raintpl template directory (keep the trailing slash!)
45034273
SS
35$GLOBALS['config']['UPDATECHECK_FILENAME'] = $GLOBALS['config']['DATADIR'].'/lastupdatecheck.txt'; // For updates check of Shaarli.
36$GLOBALS['config']['UPDATECHECK_INTERVAL'] = 86400 ; // Updates check frequency for Shaarli. 86400 seconds=24 hours
37 // Note: You must have publisher.php in the same directory as Shaarli index.php
d2f51763 38$GLOBALS['config']['ARCHIVE_ORG'] = false; // For each link, add a link to an archived version on archive.org
ed5b38dd 39$GLOBALS['config']['ENABLE_RSS_PERMALINKS'] = true; // Enable RSS permalinks by default. This corresponds to the default behavior of shaarli before this was added as an option.
caee7ff9 40$GLOBALS['config']['HIDE_PUBLIC_LINKS'] = false;
45034273 41// -----------------------------------------------------------------------------------------------
7d4263e1 42define('shaarli_version','0.5.0');
ae00595b
CH
43// http://server.com/x/shaarli --> /shaarli/
44define('WEB_PATH', substr($_SERVER["REQUEST_URI"], 0, 1+strrpos($_SERVER["REQUEST_URI"], '/', 0)));
45034273
SS
45
46// Force cookie path (but do not change lifetime)
47$cookie=session_get_cookie_params();
2d9fab88 48$cookiedir = ''; if(dirname($_SERVER['SCRIPT_NAME'])!='/') $cookiedir=dirname($_SERVER["SCRIPT_NAME"]).'/';
2f32d074 49session_set_cookie_params($cookie['lifetime'],$cookiedir,$_SERVER['SERVER_NAME']); // Set default cookie expiration and path.
45034273 50
f37664a2
SS
51// Set session parameters on server side.
52define('INACTIVITY_TIMEOUT',3600); // (in seconds). If the user does not access any page within this time, his/her session is considered expired.
53ini_set('session.use_cookies', 1); // Use cookies to store session.
ad6c27b7 54ini_set('session.use_only_cookies', 1); // Force cookies for session (phpsessionID forbidden in URL).
55ini_set('session.use_trans_sid', false); // Prevent PHP form using sessionID in URL if cookies are disabled.
f37664a2
SS
56session_name('shaarli');
57if (session_id() == '') session_start(); // Start session if needed (Some server auto-start sessions).
58
45034273
SS
59// PHP Settings
60ini_set('max_input_time','60'); // High execution time in case of problematic imports/exports.
61ini_set('memory_limit', '128M'); // Try to set max upload file size and read (May not work on some hosts).
62ini_set('post_max_size', '16M');
63ini_set('upload_max_filesize', '16M');
45034273
SS
64error_reporting(E_ALL^E_WARNING); // See all error except warnings.
65//error_reporting(-1); // See all errors (for debugging only)
66
50c9a12e
V
67// User configuration
68if (is_file($GLOBALS['config']['CONFIG_FILE'])) {
69 require_once $GLOBALS['config']['CONFIG_FILE'];
70}
71
ca74886f
V
72// Shaarli library
73require_once 'application/LinkDB.php';
d1e2f8e5 74require_once 'application/TimeZone.php';
ca74886f 75require_once 'application/Utils.php';
dd484b90 76require_once 'application/Config.php';
ca74886f 77
d1e2f8e5
V
78// Ensure the PHP version is supported
79try {
80 checkPHPVersion('5.3', PHP_VERSION);
81} catch(Exception $e) {
82 header('Content-Type: text/plain; charset=utf-8');
83 echo $e->getMessage();
84 exit;
85}
86
45034273 87include "inc/rain.tpl.class.php"; //include Rain TPL
25f5c59d 88raintpl::$tpl_dir = $GLOBALS['config']['RAINTPL_TPL']; // template directory
25f5c59d 89raintpl::$cache_dir = $GLOBALS['config']['RAINTPL_TMP']; // cache directory
45034273
SS
90
91ob_start(); // Output buffering for the page cache.
92
93
94// In case stupid admin has left magic_quotes enabled in php.ini:
95if (get_magic_quotes_gpc())
96{
97 function stripslashes_deep($value) { $value = is_array($value) ? array_map('stripslashes_deep', $value) : stripslashes($value); return $value; }
98 $_POST = array_map('stripslashes_deep', $_POST);
99 $_GET = array_map('stripslashes_deep', $_GET);
100 $_COOKIE = array_map('stripslashes_deep', $_COOKIE);
101}
102
103// Prevent caching on client side or proxy: (yes, it's ugly)
104header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
105header("Cache-Control: no-store, no-cache, must-revalidate");
106header("Cache-Control: post-check=0, pre-check=0", false);
107header("Pragma: no-cache");
108
ad6c27b7 109// Directories creations (Note that your web host may require different rights than 705.)
60b83e7c 110if (!is_writable(realpath(dirname(__FILE__)))) die('<pre>ERROR: Shaarli does not have the right to write in its own directory.</pre>');
45034273 111
45034273 112// Handling of old config file which do not have the new parameters.
5f85fcd8 113if (empty($GLOBALS['title'])) $GLOBALS['title']='Shared links on '.escape(indexUrl());
45034273 114if (empty($GLOBALS['timezone'])) $GLOBALS['timezone']=date_default_timezone_get();
8a80e4fe 115if (empty($GLOBALS['redirector'])) $GLOBALS['redirector']='';
45034273 116if (empty($GLOBALS['disablesessionprotection'])) $GLOBALS['disablesessionprotection']=false;
bb8f712d 117if (empty($GLOBALS['privateLinkByDefault'])) $GLOBALS['privateLinkByDefault']=false;
ebb2880d 118if (empty($GLOBALS['titleLink'])) $GLOBALS['titleLink']='?';
858c5c2b 119// I really need to rewrite Shaarli with a proper configuation manager.
45034273 120
8a80e4fe 121// Run config screen if first run:
50c9a12e
V
122if (! is_file($GLOBALS['config']['CONFIG_FILE'])) {
123 install();
124}
8a80e4fe 125
5f85fcd8
A
126$GLOBALS['title'] = !empty($GLOBALS['title']) ? escape($GLOBALS['title']) : '';
127$GLOBALS['titleLink'] = !empty($GLOBALS['titleLink']) ? escape($GLOBALS['titleLink']) : '';
128$GLOBALS['redirector'] = !empty($GLOBALS['redirector']) ? escape($GLOBALS['redirector']) : '';
8a80e4fe 129
ae00595b
CH
130// a token depending of deployment salt, user password, and the current ip
131define('STAY_SIGNED_IN_TOKEN', sha1($GLOBALS['hash'].$_SERVER["REMOTE_ADDR"].$GLOBALS['salt']));
8a80e4fe 132
45034273
SS
133autoLocale(); // Sniff browser language and set date format accordingly.
134header('Content-Type: text/html; charset=utf-8'); // We use UTF-8 for proper international characters handling.
135
ff69d87e
FE
136//==================================================================================================
137// Checking session state (i.e. is the user still logged in)
138//==================================================================================================
139
140function setup_login_state() {
141 $userIsLoggedIn = false; // By default, we do not consider the user as logged in;
142 $loginFailure = false; // If set to true, every attempt to authenticate the user will fail. This indicates that an important condition isn't met.
143 if ($GLOBALS['config']['OPEN_SHAARLI']) {
144 $userIsLoggedIn = true;
145 }
146 if (!isset($GLOBALS['login'])) {
147 $userIsLoggedIn = false; // Shaarli is not configured yet.
148 $loginFailure = true;
149 }
150 if (isset($_COOKIE['shaarli_staySignedIn']) &&
151 $_COOKIE['shaarli_staySignedIn']===STAY_SIGNED_IN_TOKEN &&
152 !$loginFailure)
153 {
154 fillSessionInfo();
155 $userIsLoggedIn = true;
156 }
157 // If session does not exist on server side, or IP address has changed, or session has expired, logout.
158 if (empty($_SESSION['uid']) ||
159 ($GLOBALS['disablesessionprotection']==false && $_SESSION['ip']!=allIPs()) ||
160 time() >= $_SESSION['expires_on'])
161 {
162 logout();
163 $userIsLoggedIn = false;
164 $loginFailure = true;
165 }
166 if (!empty($_SESSION['longlastingsession'])) {
167 $_SESSION['expires_on']=time()+$_SESSION['longlastingsession']; // In case of "Stay signed in" checked.
168 }
169 else {
170 $_SESSION['expires_on']=time()+INACTIVITY_TIMEOUT; // Standard session expiration date.
171 }
172 if (!$loginFailure) {
173 $userIsLoggedIn = true;
174 }
175
176 return $userIsLoggedIn;
177}
ff69d87e 178$userIsLoggedIn = setup_login_state();
45034273
SS
179
180// Checks if an update is available for Shaarli.
181// (at most once a day, and only for registered user.)
182// Output: '' = no new version.
183// other= the available version.
184function checkUpdate()
185{
186 if (!isLoggedIn()) return ''; // Do not check versions for visitors.
329e0768 187 if (empty($GLOBALS['config']['ENABLE_UPDATECHECK'])) return ''; // Do not check if the user doesn't want to.
45034273
SS
188
189 // Get latest version number at most once a day.
190 if (!is_file($GLOBALS['config']['UPDATECHECK_FILENAME']) || (filemtime($GLOBALS['config']['UPDATECHECK_FILENAME'])<time()-($GLOBALS['config']['UPDATECHECK_INTERVAL'])))
191 {
192 $version=shaarli_version;
dbcad740 193 list($httpstatus,$headers,$data) = getHTTP('https://raw.githubusercontent.com/shaarli/Shaarli/master/shaarli_version.php',2);
194 if (strpos($httpstatus,'200 OK')!==false) $version=str_replace(' */ ?>','',str_replace('<?php /* ','',$data));
ad6c27b7 195 // If failed, never mind. We don't want to bother the user with that.
45034273
SS
196 file_put_contents($GLOBALS['config']['UPDATECHECK_FILENAME'],$version); // touch file date
197 }
198 // Compare versions:
199 $newestversion=file_get_contents($GLOBALS['config']['UPDATECHECK_FILENAME']);
200 if (version_compare($newestversion,shaarli_version)==1) return $newestversion;
201 return '';
202}
203
204
205// -----------------------------------------------------------------------------------------------
206// Simple cache system (mainly for the RSS/ATOM feeds).
207
208class pageCache
209{
210 private $url; // Full URL of the page to cache (typically the value returned by pageUrl())
ad6c27b7 211 private $shouldBeCached; // boolean: Should this url be cached?
212 private $filename; // Name of the cache file for this url.
45034273 213
bb8f712d 214 /*
ad6c27b7 215 $url = URL (typically the value returned by pageUrl())
45034273
SS
216 $shouldBeCached = boolean. If false, the cache will be disabled.
217 */
218 public function __construct($url,$shouldBeCached)
219 {
220 $this->url = $url;
221 $this->filename = $GLOBALS['config']['PAGECACHE'].'/'.sha1($url).'.cache';
222 $this->shouldBeCached = $shouldBeCached;
bb8f712d 223 }
45034273
SS
224
225 // If the page should be cached and a cached version exists,
226 // returns the cached version (otherwise, return null).
227 public function cachedVersion()
228 {
229 if (!$this->shouldBeCached) return null;
230 if (is_file($this->filename)) { return file_get_contents($this->filename); exit; }
231 return null;
232 }
233
234 // Put a page in the cache.
235 public function cache($page)
236 {
237 if (!$this->shouldBeCached) return;
45034273
SS
238 file_put_contents($this->filename,$page);
239 }
240
241 // Purge the whole cache.
242 // (call with pageCache::purgeCache())
243 public static function purgeCache()
244 {
245 if (is_dir($GLOBALS['config']['PAGECACHE']))
246 {
247 $handler = opendir($GLOBALS['config']['PAGECACHE']);
64bf914a 248 if ($handler!==false)
45034273 249 {
bb8f712d 250 while (($filename = readdir($handler))!==false)
45034273
SS
251 {
252 if (endsWith($filename,'.cache')) { unlink($GLOBALS['config']['PAGECACHE'].'/'.$filename); }
253 }
254 closedir($handler);
255 }
256 }
257 }
258
259}
260
261
262// -----------------------------------------------------------------------------------------------
263// Log to text file
264function logm($message)
265{
266 $t = strval(date('Y/m/d_H:i:s')).' - '.$_SERVER["REMOTE_ADDR"].' - '.strval($message)."\n";
267 file_put_contents($GLOBALS['config']['DATADIR'].'/log.txt',$t,FILE_APPEND);
268}
269
ad6c27b7 270// In a string, converts URLs to clickable links.
45034273
SS
271// Function inspired from http://www.php.net/manual/en/function.preg-replace.php#85722
272function text2clickable($url)
273{
274 $redir = empty($GLOBALS['redirector']) ? '' : $GLOBALS['redirector'];
30b0672d 275 return preg_replace('!(((?:https?|ftp|file)://|apt:|magnet:)\S+[[:alnum:]]/?)!si','<a href="'.$redir.'$1" rel="nofollow">$1</a>',$url);
45034273
SS
276}
277
278// This function inserts &nbsp; where relevant so that multiple spaces are properly displayed in HTML
279// even in the absence of <pre> (This is used in description to keep text formatting)
280function keepMultipleSpaces($text)
281{
282 return str_replace(' ',' &nbsp;',$text);
bb8f712d 283
45034273
SS
284}
285// ------------------------------------------------------------------------------------------
286// Sniff browser language to display dates in the right format automatically.
287// (Note that is may not work on your server if the corresponding local is not installed.)
288function autoLocale()
289{
8438a2e5 290 $attempts = array('en_US'); // Default if browser does not send HTTP_ACCEPT_LANGUAGE
ad6c27b7 291 if (isset($_SERVER['HTTP_ACCEPT_LANGUAGE'])) // e.g. "fr,fr-fr;q=0.8,en;q=0.5,en-us;q=0.3"
292 { // (It's a bit crude, but it works very well. Preferred language is always presented first.)
8438a2e5
A
293 if (preg_match('/([a-z]{2})-?([a-z]{2})?/i',$_SERVER['HTTP_ACCEPT_LANGUAGE'],$matches)) {
294 $loc = $matches[1] . (!empty($matches[2]) ? '_' . strtoupper($matches[2]) : '');
da49603b 295 $attempts = array($loc.'.UTF-8', $loc, str_replace('_', '-', $loc).'.UTF-8', str_replace('_', '-', $loc),
d33c5d4c
M
296 $loc . '_' . strtoupper($loc).'.UTF-8', $loc . '_' . strtoupper($loc),
297 $loc . '_' . $loc.'.UTF-8', $loc . '_' . $loc, $loc . '-' . strtoupper($loc).'.UTF-8',
da49603b 298 $loc . '-' . strtoupper($loc), $loc . '-' . $loc.'.UTF-8', $loc . '-' . $loc);
8438a2e5 299 }
45034273 300 }
8438a2e5 301 setlocale(LC_TIME, $attempts); // LC_TIME = Set local for date/time format only.
45034273
SS
302}
303
304// ------------------------------------------------------------------------------------------
305// PubSubHubbub protocol support (if enabled) [UNTESTED]
306// (Source: http://aldarone.fr/les-flux-rss-shaarli-et-pubsubhubbub/ )
307if (!empty($GLOBALS['config']['PUBSUBHUB_URL'])) include './publisher.php';
308function pubsubhub()
309{
310 if (!empty($GLOBALS['config']['PUBSUBHUB_URL']))
311 {
312 $p = new Publisher($GLOBALS['config']['PUBSUBHUB_URL']);
313 $topic_url = array (
314 indexUrl().'?do=atom',
315 indexUrl().'?do=rss'
316 );
317 $p->publish_update($topic_url);
318 }
319}
320
321// ------------------------------------------------------------------------------------------
322// Session management
45034273
SS
323
324// Returns the IP address of the client (Used to prevent session cookie hijacking.)
325function allIPs()
326{
327 $ip = $_SERVER["REMOTE_ADDR"];
328 // Then we use more HTTP headers to prevent session hijacking from users behind the same proxy.
329 if (isset($_SERVER['HTTP_X_FORWARDED_FOR'])) { $ip=$ip.'_'.$_SERVER['HTTP_X_FORWARDED_FOR']; }
330 if (isset($_SERVER['HTTP_CLIENT_IP'])) { $ip=$ip.'_'.$_SERVER['HTTP_CLIENT_IP']; }
331 return $ip;
332}
333
ae00595b 334function fillSessionInfo() {
ad6c27b7 335 $_SESSION['uid'] = sha1(uniqid('',true).'_'.mt_rand()); // Generate unique random number (different than phpsessionid)
ae00595b
CH
336 $_SESSION['ip']=allIPs(); // We store IP address(es) of the client to make sure session is not hijacked.
337 $_SESSION['username']=$GLOBALS['login'];
338 $_SESSION['expires_on']=time()+INACTIVITY_TIMEOUT; // Set session expiration.
339}
340
45034273
SS
341// Check that user/password is correct.
342function check_auth($login,$password)
343{
344 $hash = sha1($password.$login.$GLOBALS['salt']);
345 if ($login==$GLOBALS['login'] && $hash==$GLOBALS['hash'])
346 { // Login/password is correct.
ae00595b 347 fillSessionInfo();
45034273
SS
348 logm('Login successful');
349 return True;
350 }
351 logm('Login failed for user '.$login);
352 return False;
353}
354
355// Returns true if the user is logged in.
356function isLoggedIn()
357{
ff69d87e
FE
358 global $userIsLoggedIn;
359 return $userIsLoggedIn;
45034273
SS
360}
361
362// Force logout.
ff69d87e
FE
363function logout() {
364 if (isset($_SESSION)) {
365 unset($_SESSION['uid']);
366 unset($_SESSION['ip']);
367 unset($_SESSION['username']);
368 unset($_SESSION['privateonly']);
369 }
370 setcookie('shaarli_staySignedIn', FALSE, 0, WEB_PATH);
ae00595b 371}
45034273
SS
372
373
374// ------------------------------------------------------------------------------------------
375// Brute force protection system
376// Several consecutive failed logins will ban the IP address for 30 minutes.
377if (!is_file($GLOBALS['config']['IPBANS_FILENAME'])) file_put_contents($GLOBALS['config']['IPBANS_FILENAME'], "<?php\n\$GLOBALS['IPBANS']=".var_export(array('FAILURES'=>array(),'BANS'=>array()),true).";\n?>");
378include $GLOBALS['config']['IPBANS_FILENAME'];
379// Signal a failed login. Will ban the IP if too many failures:
380function ban_loginFailed()
381{
382 $ip=$_SERVER["REMOTE_ADDR"]; $gb=$GLOBALS['IPBANS'];
383 if (!isset($gb['FAILURES'][$ip])) $gb['FAILURES'][$ip]=0;
384 $gb['FAILURES'][$ip]++;
385 if ($gb['FAILURES'][$ip]>($GLOBALS['config']['BAN_AFTER']-1))
386 {
387 $gb['BANS'][$ip]=time()+$GLOBALS['config']['BAN_DURATION'];
388 logm('IP address banned from login');
389 }
390 $GLOBALS['IPBANS'] = $gb;
391 file_put_contents($GLOBALS['config']['IPBANS_FILENAME'], "<?php\n\$GLOBALS['IPBANS']=".var_export($gb,true).";\n?>");
392}
393
394// Signals a successful login. Resets failed login counter.
395function ban_loginOk()
396{
397 $ip=$_SERVER["REMOTE_ADDR"]; $gb=$GLOBALS['IPBANS'];
398 unset($gb['FAILURES'][$ip]); unset($gb['BANS'][$ip]);
399 $GLOBALS['IPBANS'] = $gb;
400 file_put_contents($GLOBALS['config']['IPBANS_FILENAME'], "<?php\n\$GLOBALS['IPBANS']=".var_export($gb,true).";\n?>");
401}
402
403// Checks if the user CAN login. If 'true', the user can try to login.
404function ban_canLogin()
405{
406 $ip=$_SERVER["REMOTE_ADDR"]; $gb=$GLOBALS['IPBANS'];
407 if (isset($gb['BANS'][$ip]))
408 {
409 // User is banned. Check if the ban has expired:
410 if ($gb['BANS'][$ip]<=time())
411 { // Ban expired, user can try to login again.
412 logm('Ban lifted.');
413 unset($gb['FAILURES'][$ip]); unset($gb['BANS'][$ip]);
414 file_put_contents($GLOBALS['config']['IPBANS_FILENAME'], "<?php\n\$GLOBALS['IPBANS']=".var_export($gb,true).";\n?>");
415 return true; // Ban has expired, user can login.
416 }
417 return false; // User is banned.
418 }
419 return true; // User is not banned.
420}
421
422// ------------------------------------------------------------------------------------------
423// Process login form: Check if login/password is correct.
424if (isset($_POST['login']))
425{
426 if (!ban_canLogin()) die('I said: NO. You are banned for the moment. Go away.');
427 if (isset($_POST['password']) && tokenOk($_POST['token']) && (check_auth($_POST['login'], $_POST['password'])))
ad6c27b7 428 { // Login/password is OK.
45034273
SS
429 ban_loginOk();
430 // If user wants to keep the session cookie even after the browser closes:
431 if (!empty($_POST['longlastingsession']))
432 {
ae00595b 433 setcookie('shaarli_staySignedIn', STAY_SIGNED_IN_TOKEN, time()+31536000, WEB_PATH);
45034273
SS
434 $_SESSION['longlastingsession']=31536000; // (31536000 seconds = 1 year)
435 $_SESSION['expires_on']=time()+$_SESSION['longlastingsession']; // Set session expiration on server-side.
2d9fab88
SS
436
437 $cookiedir = ''; if(dirname($_SERVER['SCRIPT_NAME'])!='/') $cookiedir=dirname($_SERVER["SCRIPT_NAME"]).'/';
2f32d074 438 session_set_cookie_params($_SESSION['longlastingsession'],$cookiedir,$_SERVER['SERVER_NAME']); // Set session cookie expiration on client side
ad6c27b7 439 // Note: Never forget the trailing slash on the cookie path!
45034273
SS
440 session_regenerate_id(true); // Send cookie with new expiration date to browser.
441 }
442 else // Standard session expiration (=when browser closes)
443 {
2d9fab88 444 $cookiedir = ''; if(dirname($_SERVER['SCRIPT_NAME'])!='/') $cookiedir=dirname($_SERVER["SCRIPT_NAME"]).'/';
2f32d074 445 session_set_cookie_params(0,$cookiedir,$_SERVER['SERVER_NAME']); // 0 means "When browser closes"
45034273
SS
446 session_regenerate_id(true);
447 }
5fbabbb9 448
45034273 449 // Optional redirect after login:
5fbabbb9
A
450 if (isset($_GET['post'])) {
451 $uri = '?post='. urlencode($_GET['post']);
452 foreach (array('description', 'source', 'title') as $param) {
453 if (!empty($_GET[$param])) {
454 $uri .= '&'.$param.'='.urlencode($_GET[$param]);
455 }
456 }
457 header('Location: '. $uri);
458 exit;
459 }
460
461 if (isset($_GET['edit_link'])) {
462 header('Location: ?edit_link='. escape($_GET['edit_link']));
463 exit;
464 }
465
466 if (isset($_POST['returnurl'])) {
467 // Prevent loops over login screen.
468 if (strpos($_POST['returnurl'], 'do=login') === false) {
469 header('Location: '. escape($_POST['returnurl']));
470 exit;
471 }
45034273
SS
472 }
473 header('Location: ?'); exit;
474 }
475 else
476 {
477 ban_loginFailed();
705f8355 478 $redir = '';
5fbabbb9
A
479 if (isset($_GET['post'])) {
480 $redir = '?post=' . urlencode($_GET['post']);
481 foreach (array('description', 'source', 'title') as $param) {
482 if (!empty($_GET[$param])) {
483 $redir .= '&' . $param . '=' . urlencode($_GET[$param]);
484 }
485 }
486 }
fe16b01e 487 echo '<script>alert("Wrong login/password.");document.location=\'?do=login'.$redir.'\';</script>'; // Redirect to login screen.
45034273
SS
488 exit;
489 }
490}
491
492// ------------------------------------------------------------------------------------------
493// Misc utility functions:
494
495// Returns the server URL (including port and http/https), without path.
ad6c27b7 496// e.g. "http://myserver.com:8080"
45034273
SS
497// You can append $_SERVER['SCRIPT_NAME'] to get the current script URL.
498function serverUrl()
499{
500 $https = (!empty($_SERVER['HTTPS']) && (strtolower($_SERVER['HTTPS'])=='on')) || $_SERVER["SERVER_PORT"]=='443'; // HTTPS detection.
501 $serverport = ($_SERVER["SERVER_PORT"]=='80' || ($https && $_SERVER["SERVER_PORT"]=='443') ? '' : ':'.$_SERVER["SERVER_PORT"]);
2f32d074 502 return 'http'.($https?'s':'').'://'.$_SERVER['SERVER_NAME'].$serverport;
45034273
SS
503}
504
505// Returns the absolute URL of current script, without the query.
ad6c27b7 506// (e.g. http://sebsauvage.net/links/)
45034273
SS
507function indexUrl()
508{
9e975d86
SS
509 $scriptname = $_SERVER["SCRIPT_NAME"];
510 // If the script is named 'index.php', we remove it (for better looking URLs,
ad6c27b7 511 // e.g. http://mysite.com/shaarli/?abcde instead of http://mysite.com/shaarli/index.php?abcde)
9e975d86
SS
512 if (endswith($scriptname,'index.php')) $scriptname = substr($scriptname,0,strlen($scriptname)-9);
513 return serverUrl() . $scriptname;
45034273
SS
514}
515
516// Returns the absolute URL of current script, WITH the query.
ad6c27b7 517// (e.g. http://sebsauvage.net/links/?toto=titi&spamspamspam=humbug)
45034273
SS
518function pageUrl()
519{
520 return indexUrl().(!empty($_SERVER["QUERY_STRING"]) ? '?'.$_SERVER["QUERY_STRING"] : '');
521}
522
ad6c27b7 523// Convert post_max_size/upload_max_filesize (e.g. '16M') parameters to bytes.
45034273
SS
524function return_bytes($val)
525{
526 $val = trim($val); $last=strtolower($val[strlen($val)-1]);
527 switch($last)
528 {
529 case 'g': $val *= 1024;
530 case 'm': $val *= 1024;
531 case 'k': $val *= 1024;
532 }
533 return $val;
534}
535
536// Try to determine max file size for uploads (POST).
537// Returns an integer (in bytes)
538function getMaxFileSize()
539{
540 $size1 = return_bytes(ini_get('post_max_size'));
541 $size2 = return_bytes(ini_get('upload_max_filesize'));
542 // Return the smaller of two:
543 $maxsize = min($size1,$size2);
ad6c27b7 544 // FIXME: Then convert back to readable notations ? (e.g. 2M instead of 2000000)
45034273
SS
545 return $maxsize;
546}
547
45034273
SS
548/* Converts a linkdate time (YYYYMMDD_HHMMSS) of an article to a timestamp (Unix epoch)
549 (used to build the ADD_DATE attribute in Netscape-bookmarks file)
550 PS: I could have used strptime(), but it does not exist on Windows. I'm too kind. */
551function linkdate2timestamp($linkdate)
552{
f5b05925
JD
553 if(strcmp($linkdate, '_000000') !== 0 || !$linkdate){
554 $Y=$M=$D=$h=$m=$s=0;
555 $r = sscanf($linkdate,'%4d%2d%2d_%2d%2d%2d',$Y,$M,$D,$h,$m,$s);
556 return mktime($h,$m,$s,$M,$D,$Y);
557 }
558 return time();
45034273
SS
559}
560
561/* Converts a linkdate time (YYYYMMDD_HHMMSS) of an article to a RFC822 date.
562 (used to build the pubDate attribute in RSS feed.) */
563function linkdate2rfc822($linkdate)
564{
565 return date('r',linkdate2timestamp($linkdate)); // 'r' is for RFC822 date format.
566}
567
568/* Converts a linkdate time (YYYYMMDD_HHMMSS) of an article to a ISO 8601 date.
569 (used to build the updated tags in ATOM feed.) */
570function linkdate2iso8601($linkdate)
571{
572 return date('c',linkdate2timestamp($linkdate)); // 'c' is for ISO 8601 date format.
573}
574
45034273
SS
575// Parse HTTP response headers and return an associative array.
576function http_parse_headers_shaarli( $headers )
577{
578 $res=array();
579 foreach($headers as $header)
580 {
581 $i = strpos($header,': ');
582 if ($i!==false)
583 {
584 $key=substr($header,0,$i);
585 $value=substr($header,$i+2,strlen($header)-$i-2);
586 $res[$key]=$value;
587 }
588 }
589 return $res;
590}
591
592/* GET an URL.
ad6c27b7 593 Input: $url : URL to get (http://...)
45034273 594 $timeout : Network timeout (will wait this many seconds for an anwser before giving up).
ad6c27b7 595 Output: An array. [0] = HTTP status message (e.g. "HTTP/1.1 200 OK") or error message
596 [1] = associative array containing HTTP response headers (e.g. echo getHTTP($url)[1]['Content-Type'])
45034273
SS
597 [2] = data
598 Example: list($httpstatus,$headers,$data) = getHTTP('http://sebauvage.net/');
599 if (strpos($httpstatus,'200 OK')!==false)
600 echo 'Data type: '.htmlspecialchars($headers['Content-Type']);
601 else
602 echo 'There was an error: '.htmlspecialchars($httpstatus)
603*/
604function getHTTP($url,$timeout=30)
605{
606 try
607 {
03545ef6 608 $options = array('http'=>array('method'=>'GET','timeout' => $timeout, 'user_agent' => 'Mozilla/5.0 (X11; Ubuntu; Linux x86_64; rv:23.0) Gecko/20100101 Firefox/23.0')); // Force network timeout
45034273
SS
609 $context = stream_context_create($options);
610 $data=file_get_contents($url,false,$context,-1, 4000000); // We download at most 4 Mb from source.
611 if (!$data) { return array('HTTP Error',array(),''); }
ad6c27b7 612 $httpStatus=$http_response_header[0]; // e.g. "HTTP/1.1 200 OK"
45034273
SS
613 $responseHeaders=http_parse_headers_shaarli($http_response_header);
614 return array($httpStatus,$responseHeaders,$data);
615 }
ad6c27b7 616 catch (Exception $e) // getHTTP *can* fail silently (we don't care if the title cannot be fetched)
45034273
SS
617 {
618 return array($e->getMessage(),'','');
619 }
620}
621
622// Extract title from an HTML document.
623// (Returns an empty string if not found.)
624function html_extract_title($html)
625{
626 return preg_match('!<title>(.*?)</title>!is', $html, $matches) ? trim(str_replace("\n",' ', $matches[1])) : '' ;
627}
628
629// ------------------------------------------------------------------------------------------
630// Token management for XSRF protection
631// Token should be used in any form which acts on data (create,update,delete,import...).
632if (!isset($_SESSION['tokens'])) $_SESSION['tokens']=array(); // Token are attached to the session.
633
634// Returns a token.
635function getToken()
636{
a1f5a6ec 637 $rnd = sha1(uniqid('',true).'_'.mt_rand().$GLOBALS['salt']); // We generate a random string.
45034273
SS
638 $_SESSION['tokens'][$rnd]=1; // Store it on the server side.
639 return $rnd;
640}
641
ad6c27b7 642// Tells if a token is OK. Using this function will destroy the token.
643// true=token is OK.
45034273
SS
644function tokenOk($token)
645{
646 if (isset($_SESSION['tokens'][$token]))
647 {
648 unset($_SESSION['tokens'][$token]); // Token is used: destroy it.
ad6c27b7 649 return true; // Token is OK.
45034273
SS
650 }
651 return false; // Wrong token, or already used.
652}
653
654// ------------------------------------------------------------------------------------------
655/* This class is in charge of building the final page.
656 (This is basically a wrapper around RainTPL which pre-fills some fields.)
657 p = new pageBuilder;
658 p.assign('myfield','myvalue');
659 p.renderPage('mytemplate');
bb8f712d 660
45034273
SS
661*/
662class pageBuilder
663{
664 private $tpl; // RainTPL template
665
666 function __construct()
667 {
668 $this->tpl=false;
bb8f712d 669 }
45034273
SS
670
671 private function initialize()
bb8f712d
KT
672 {
673 $this->tpl = new RainTPL;
5f85fcd8
A
674 $this->tpl->assign('newversion',escape(checkUpdate()));
675 $this->tpl->assign('feedurl',escape(indexUrl()));
45034273
SS
676 $searchcrits=''; // Search criteria
677 if (!empty($_GET['searchtags'])) $searchcrits.='&searchtags='.urlencode($_GET['searchtags']);
678 elseif (!empty($_GET['searchterm'])) $searchcrits.='&searchterm='.urlencode($_GET['searchterm']);
679 $this->tpl->assign('searchcrits',$searchcrits);
680 $this->tpl->assign('source',indexUrl());
681 $this->tpl->assign('version',shaarli_version);
682 $this->tpl->assign('scripturl',indexUrl());
683 $this->tpl->assign('pagetitle','Shaarli');
ad6c27b7 684 $this->tpl->assign('privateonly',!empty($_SESSION['privateonly'])); // Show only private links?
45034273 685 if (!empty($GLOBALS['title'])) $this->tpl->assign('pagetitle',$GLOBALS['title']);
ebb2880d 686 if (!empty($GLOBALS['titleLink'])) $this->tpl->assign('titleLink',$GLOBALS['titleLink']);
45034273
SS
687 if (!empty($GLOBALS['pagetitle'])) $this->tpl->assign('pagetitle',$GLOBALS['pagetitle']);
688 $this->tpl->assign('shaarlititle',empty($GLOBALS['title']) ? 'Shaarli': $GLOBALS['title'] );
bb8f712d 689 return;
45034273 690 }
bb8f712d 691
45034273
SS
692 // The following assign() method is basically the same as RainTPL (except that it's lazy)
693 public function assign($what,$where)
694 {
695 if ($this->tpl===false) $this->initialize(); // Lazy initialization
696 $this->tpl->assign($what,$where);
697 }
bb8f712d 698
45034273 699 // Render a specific page (using a template).
ad6c27b7 700 // e.g. pb.renderPage('picwall')
45034273
SS
701 public function renderPage($page)
702 {
703 if ($this->tpl===false) $this->initialize(); // Lazy initialization
704 $this->tpl->draw($page);
705 }
706}
707
45034273 708// ------------------------------------------------------------------------------------------
ad6c27b7 709// Output the last N links in RSS 2.0 format.
45034273
SS
710function showRSS()
711{
712 header('Content-Type: application/rss+xml; charset=utf-8');
713
2abd3905 714 // $usepermalink : If true, use permalink instead of final link.
ad6c27b7 715 // User just has to add 'permalink' in URL parameters. e.g. http://mysite.com/shaarli/?do=rss&permalinks
ed5b38dd
FE
716 // Also enabled through a config option
717 $usepermalinks = isset($_GET['permalinks']) || !$GLOBALS['config']['ENABLE_RSS_PERMALINKS'];
2abd3905 718
45034273
SS
719 // Cache system
720 $query = $_SERVER["QUERY_STRING"];
721 $cache = new pageCache(pageUrl(),startsWith($query,'do=rss') && !isLoggedIn());
722 $cached = $cache->cachedVersion(); if (!empty($cached)) { echo $cached; exit; }
723
724 // If cached was not found (or not usable), then read the database and build the response:
9f15ca9e 725 $LINKSDB = new LinkDB(
9c8752a2 726 $GLOBALS['config']['DATASTORE'],
9f15ca9e
V
727 isLoggedIn() || $GLOBALS['config']['OPEN_SHAARLI'],
728 $GLOBALS['config']['HIDE_PUBLIC_LINKS']
729 );
730 // Read links from database (and filter private links if user it not logged in).
45034273 731
ad6c27b7 732 // Optionally filter the results:
45034273
SS
733 $linksToDisplay=array();
734 if (!empty($_GET['searchterm'])) $linksToDisplay = $LINKSDB->filterFulltext($_GET['searchterm']);
59c90f58 735 else if (!empty($_GET['searchtags'])) $linksToDisplay = $LINKSDB->filterTags(trim($_GET['searchtags']));
45034273 736 else $linksToDisplay = $LINKSDB;
f3db3774 737
c677013b
SS
738 $nblinksToDisplay = 50; // Number of links to display.
739 if (!empty($_GET['nb'])) // In URL, you can specificy the number of links. Example: nb=200 or nb=all for all links.
732e683b 740 {
c677013b
SS
741 $nblinksToDisplay = $_GET['nb']=='all' ? count($linksToDisplay) : max($_GET['nb']+0,1) ;
742 }
45034273 743
5f85fcd8 744 $pageaddr=escape(indexUrl());
45034273 745 echo '<?xml version="1.0" encoding="UTF-8"?><rss version="2.0" xmlns:content="http://purl.org/rss/1.0/modules/content/">';
5f85fcd8 746 echo '<channel><title>'.$GLOBALS['title'].'</title><link>'.$pageaddr.'</link>';
45034273
SS
747 echo '<description>Shared links</description><language>en-en</language><copyright>'.$pageaddr.'</copyright>'."\n\n";
748 if (!empty($GLOBALS['config']['PUBSUBHUB_URL']))
749 {
750 echo '<!-- PubSubHubbub Discovery -->';
5f85fcd8
A
751 echo '<link rel="hub" href="'.escape($GLOBALS['config']['PUBSUBHUB_URL']).'" xmlns="http://www.w3.org/2005/Atom" />';
752 echo '<link rel="self" href="'.$pageaddr.'?do=rss" xmlns="http://www.w3.org/2005/Atom" />';
45034273
SS
753 echo '<!-- End Of PubSubHubbub Discovery -->';
754 }
755 $i=0;
756 $keys=array(); foreach($linksToDisplay as $key=>$value) { $keys[]=$key; } // No, I can't use array_keys().
fbd9e527 757 while ($i<$nblinksToDisplay && $i<count($keys))
45034273
SS
758 {
759 $link = $linksToDisplay[$keys[$i]];
760 $guid = $pageaddr.'?'.smallHash($link['linkdate']);
761 $rfc822date = linkdate2rfc822($link['linkdate']);
5f85fcd8 762 $absurl = $link['url'];
45034273 763 if (startsWith($absurl,'?')) $absurl=$pageaddr.$absurl; // make permalink URL absolute
2abd3905 764 if ($usepermalinks===true)
5f85fcd8 765 echo '<item><title>'.$link['title'].'</title><guid isPermaLink="true">'.$guid.'</guid><link>'.$guid.'</link>';
2abd3905 766 else
5f85fcd8
A
767 echo '<item><title>'.$link['title'].'</title><guid isPermaLink="false">'.$guid.'</guid><link>'.$absurl.'</link>';
768 if (!$GLOBALS['config']['HIDE_TIMESTAMPS'] || isLoggedIn()) echo '<pubDate>'.escape($rfc822date)."</pubDate>\n";
45034273
SS
769 if ($link['tags']!='') // Adding tags to each RSS entry (as mentioned in RSS specification)
770 {
5f85fcd8 771 foreach(explode(' ',$link['tags']) as $tag) { echo '<category domain="'.$pageaddr.'">'.$tag.'</category>'."\n"; }
45034273 772 }
2abd3905
SS
773
774 // Add permalink in description
775 $descriptionlink = '(<a href="'.$guid.'">Permalink</a>)';
776 // If user wants permalinks first, put the final link in description
777 if ($usepermalinks===true) $descriptionlink = '(<a href="'.$absurl.'">Link</a>)';
778 if (strlen($link['description'])>0) $descriptionlink = '<br>'.$descriptionlink;
5f85fcd8 779 echo '<description><![CDATA['.nl2br(keepMultipleSpaces(text2clickable($link['description']))).$descriptionlink.']]></description>'."\n</item>\n";
45034273
SS
780 $i++;
781 }
5f85fcd8 782 echo '</channel></rss><!-- Cached version of '.escape(pageUrl()).' -->';
45034273
SS
783
784 $cache->cache(ob_get_contents());
785 ob_end_flush();
786 exit;
787}
788
789// ------------------------------------------------------------------------------------------
ad6c27b7 790// Output the last N links in ATOM format.
45034273
SS
791function showATOM()
792{
793 header('Content-Type: application/atom+xml; charset=utf-8');
794
2abd3905 795 // $usepermalink : If true, use permalink instead of final link.
ad6c27b7 796 // User just has to add 'permalink' in URL parameters. e.g. http://mysite.com/shaarli/?do=atom&permalinks
ed5b38dd 797 $usepermalinks = isset($_GET['permalinks']) || !$GLOBALS['config']['ENABLE_RSS_PERMALINKS'];
2abd3905 798
45034273
SS
799 // Cache system
800 $query = $_SERVER["QUERY_STRING"];
801 $cache = new pageCache(pageUrl(),startsWith($query,'do=atom') && !isLoggedIn());
802 $cached = $cache->cachedVersion(); if (!empty($cached)) { echo $cached; exit; }
803 // If cached was not found (or not usable), then read the database and build the response:
804
eaefcba7 805// Read links from database (and filter private links if used it not logged in).
9f15ca9e 806 $LINKSDB = new LinkDB(
9c8752a2 807 $GLOBALS['config']['DATASTORE'],
9f15ca9e
V
808 isLoggedIn() || $GLOBALS['config']['OPEN_SHAARLI'],
809 $GLOBALS['config']['HIDE_PUBLIC_LINKS']
810 );
45034273 811
ad6c27b7 812 // Optionally filter the results:
45034273
SS
813 $linksToDisplay=array();
814 if (!empty($_GET['searchterm'])) $linksToDisplay = $LINKSDB->filterFulltext($_GET['searchterm']);
59c90f58 815 else if (!empty($_GET['searchtags'])) $linksToDisplay = $LINKSDB->filterTags(trim($_GET['searchtags']));
45034273 816 else $linksToDisplay = $LINKSDB;
f3db3774 817
c677013b
SS
818 $nblinksToDisplay = 50; // Number of links to display.
819 if (!empty($_GET['nb'])) // In URL, you can specificy the number of links. Example: nb=200 or nb=all for all links.
732e683b 820 {
c677013b
SS
821 $nblinksToDisplay = $_GET['nb']=='all' ? count($linksToDisplay) : max($_GET['nb']+0,1) ;
822 }
45034273 823
5f85fcd8 824 $pageaddr=escape(indexUrl());
45034273
SS
825 $latestDate = '';
826 $entries='';
827 $i=0;
828 $keys=array(); foreach($linksToDisplay as $key=>$value) { $keys[]=$key; } // No, I can't use array_keys().
fbd9e527 829 while ($i<$nblinksToDisplay && $i<count($keys))
45034273
SS
830 {
831 $link = $linksToDisplay[$keys[$i]];
832 $guid = $pageaddr.'?'.smallHash($link['linkdate']);
833 $iso8601date = linkdate2iso8601($link['linkdate']);
834 $latestDate = max($latestDate,$iso8601date);
5f85fcd8 835 $absurl = $link['url'];
45034273 836 if (startsWith($absurl,'?')) $absurl=$pageaddr.$absurl; // make permalink URL absolute
5f85fcd8 837 $entries.='<entry><title>'.$link['title'].'</title>';
2abd3905
SS
838 if ($usepermalinks===true)
839 $entries.='<link href="'.$guid.'" /><id>'.$guid.'</id>';
840 else
841 $entries.='<link href="'.$absurl.'" /><id>'.$guid.'</id>';
5f85fcd8 842 if (!$GLOBALS['config']['HIDE_TIMESTAMPS'] || isLoggedIn()) $entries.='<updated>'.escape($iso8601date).'</updated>';
2abd3905
SS
843
844 // Add permalink in description
5f85fcd8 845 $descriptionlink = '(<a href="'.$guid.'">Permalink</a>)';
2abd3905 846 // If user wants permalinks first, put the final link in description
5f85fcd8
A
847 if ($usepermalinks===true) $descriptionlink = '(<a href="'.$absurl.'">Link</a>)';
848 if (strlen($link['description'])>0) $descriptionlink = '<br>'.$descriptionlink;
2abd3905 849
5f85fcd8 850 $entries.='<content type="html"><![CDATA['.nl2br(keepMultipleSpaces(text2clickable($link['description']))).$descriptionlink."]]></content>\n";
45034273
SS
851 if ($link['tags']!='') // Adding tags to each ATOM entry (as mentioned in ATOM specification)
852 {
853 foreach(explode(' ',$link['tags']) as $tag)
5f85fcd8 854 { $entries.='<category scheme="'.$pageaddr.'" term="'.$tag.'" />'."\n"; }
45034273
SS
855 }
856 $entries.="</entry>\n";
857 $i++;
858 }
859 $feed='<?xml version="1.0" encoding="UTF-8"?><feed xmlns="http://www.w3.org/2005/Atom">';
5f85fcd8
A
860 $feed.='<title>'.$GLOBALS['title'].'</title>';
861 if (!$GLOBALS['config']['HIDE_TIMESTAMPS'] || isLoggedIn()) $feed.='<updated>'.escape($latestDate).'</updated>';
862 $feed.='<link rel="self" href="'.escape(serverUrl().$_SERVER["REQUEST_URI"]).'" />';
45034273
SS
863 if (!empty($GLOBALS['config']['PUBSUBHUB_URL']))
864 {
865 $feed.='<!-- PubSubHubbub Discovery -->';
5f85fcd8 866 $feed.='<link rel="hub" href="'.escape($GLOBALS['config']['PUBSUBHUB_URL']).'" />';
45034273
SS
867 $feed.='<!-- End Of PubSubHubbub Discovery -->';
868 }
5f85fcd8
A
869 $feed.='<author><name>'.$pageaddr.'</name><uri>'.$pageaddr.'</uri></author>';
870 $feed.='<id>'.$pageaddr.'</id>'."\n\n"; // Yes, I know I should use a real IRI (RFC3987), but the site URL will do.
45034273 871 $feed.=$entries;
5f85fcd8 872 $feed.='</feed><!-- Cached version of '.escape(pageUrl()).' -->';
45034273 873 echo $feed;
bb8f712d 874
45034273
SS
875 $cache->cache(ob_get_contents());
876 ob_end_flush();
877 exit;
878}
879
880// ------------------------------------------------------------------------------------------
881// Daily RSS feed: 1 RSS entry per day giving all the links on that day.
882// Gives the last 7 days (which have links).
883// This RSS feed cannot be filtered.
f3b8f9f0 884function showDailyRSS() {
45034273
SS
885 // Cache system
886 $query = $_SERVER["QUERY_STRING"];
f3b8f9f0
A
887 $cache = new pageCache(pageUrl(), startsWith($query, 'do=dailyrss') && !isLoggedIn());
888 $cached = $cache->cachedVersion();
889 if (!empty($cached)) {
890 echo $cached;
891 exit;
892 }
9f15ca9e 893
f3b8f9f0
A
894 // If cached was not found (or not usable), then read the database and build the response:
895 // Read links from database (and filter private links if used it not logged in).
9f15ca9e 896 $LINKSDB = new LinkDB(
9c8752a2 897 $GLOBALS['config']['DATASTORE'],
9f15ca9e
V
898 isLoggedIn() || $GLOBALS['config']['OPEN_SHAARLI'],
899 $GLOBALS['config']['HIDE_PUBLIC_LINKS']
900 );
bb8f712d 901
45034273
SS
902 /* Some Shaarlies may have very few links, so we need to look
903 back in time (rsort()) until we have enough days ($nb_of_days).
904 */
f3b8f9f0
A
905 $linkdates = array();
906 foreach ($LINKSDB as $linkdate => $value) {
907 $linkdates[] = $linkdate;
908 }
45034273 909 rsort($linkdates);
f3b8f9f0
A
910 $nb_of_days = 7; // We take 7 days.
911 $today = Date('Ymd');
912 $days = array();
913
914 foreach ($linkdates as $linkdate) {
915 $day = substr($linkdate, 0, 8); // Extract day (without time)
916 if (strcmp($day,$today) < 0) {
917 if (empty($days[$day])) {
918 $days[$day] = array();
919 }
920 $days[$day][] = $linkdate;
921 }
922
923 if (count($days) > $nb_of_days) {
924 break; // Have we collected enough days?
45034273 925 }
45034273 926 }
bb8f712d 927
45034273
SS
928 // Build the RSS feed.
929 header('Content-Type: application/rss+xml; charset=utf-8');
f3b8f9f0 930 $pageaddr = escape(indexUrl());
45034273 931 echo '<?xml version="1.0" encoding="UTF-8"?><rss version="2.0">';
f3b8f9f0
A
932 echo '<channel>';
933 echo '<title>Daily - '. $GLOBALS['title'] . '</title>';
934 echo '<link>'. $pageaddr .'</link>';
935 echo '<description>Daily shared links</description>';
936 echo '<language>en-en</language>';
937 echo '<copyright>'. $pageaddr .'</copyright>'. PHP_EOL;
938
939 // For each day.
940 foreach ($days as $day => $linkdates) {
941 $daydate = linkdate2timestamp($day.'_000000'); // Full text date
45034273 942 $rfc822date = linkdate2rfc822($day.'_000000');
f3b8f9f0 943 $absurl = escape(indexUrl().'?do=daily&day='.$day); // Absolute URL of the corresponding "Daily" page.
bb8f712d 944
45034273 945 // Build the HTML body of this RSS entry.
f3b8f9f0
A
946 $html = '';
947 $href = '';
948 $links = array();
949
45034273 950 // We pre-format some fields for proper output.
f3b8f9f0 951 foreach ($linkdates as $linkdate) {
45034273 952 $l = $LINKSDB[$linkdate];
f3b8f9f0 953 $l['formatedDescription'] = nl2br(keepMultipleSpaces(text2clickable($l['description'])));
bb8f712d 954 $l['thumbnail'] = thumbnail($l['url']);
a5752e77 955 $l['timestamp'] = linkdate2timestamp($l['linkdate']);
f3b8f9f0
A
956 if (startsWith($l['url'], '?')) {
957 $l['url'] = indexUrl() . $l['url']; // make permalink URL absolute
958 }
959 $links[$linkdate] = $l;
45034273 960 }
f3b8f9f0 961
45034273 962 // Then build the HTML for this day:
bb8f712d 963 $tpl = new RainTPL;
f3b8f9f0
A
964 $tpl->assign('title', $GLOBALS['title']);
965 $tpl->assign('daydate', $daydate);
966 $tpl->assign('absurl', $absurl);
967 $tpl->assign('links', $links);
968 $tpl->assign('rfc822date', escape($rfc822date));
969 $html = $tpl->draw('dailyrss', $return_string=true);
45034273 970
f3b8f9f0 971 echo $html . PHP_EOL;
bb8f712d 972 }
f3b8f9f0 973 echo '</channel></rss><!-- Cached version of '. escape(pageUrl()) .' -->';
bb8f712d 974
45034273
SS
975 $cache->cache(ob_get_contents());
976 ob_end_flush();
977 exit;
978}
979
980// "Daily" page.
981function showDaily()
982{
9f15ca9e 983 $LINKSDB = new LinkDB(
9c8752a2 984 $GLOBALS['config']['DATASTORE'],
9f15ca9e
V
985 isLoggedIn() || $GLOBALS['config']['OPEN_SHAARLI'],
986 $GLOBALS['config']['HIDE_PUBLIC_LINKS']
987 );
45034273
SS
988
989 $day=Date('Ymd',strtotime('-1 day')); // Yesterday, in format YYYYMMDD.
990 if (isset($_GET['day'])) $day=$_GET['day'];
bb8f712d 991
45034273
SS
992 $days = $LINKSDB->days();
993 $i = array_search($day,$days);
f3db3774 994 if ($i===false) { $i=count($days)-1; $day=$days[$i]; }
bb8f712d
KT
995 $previousday='';
996 $nextday='';
45034273
SS
997 if ($i!==false)
998 {
f3db3774 999 if ($i>=1) $previousday=$days[$i-1];
45034273
SS
1000 if ($i<count($days)-1) $nextday=$days[$i+1];
1001 }
1002
9186ab95
V
1003 try {
1004 $linksToDisplay = $LINKSDB->filterDay($day);
1005 } catch (Exception $exc) {
1006 error_log($exc);
d1e2f8e5 1007 $linksToDisplay = array();
9186ab95
V
1008 }
1009
45034273
SS
1010 // We pre-format some fields for proper output.
1011 foreach($linksToDisplay as $key=>$link)
1012 {
5f85fcd8 1013
dd62b9ba
SS
1014 $taglist = explode(' ',$link['tags']);
1015 uasort($taglist, 'strcasecmp');
1016 $linksToDisplay[$key]['taglist']=$taglist;
5f85fcd8 1017 $linksToDisplay[$key]['formatedDescription']=nl2br(keepMultipleSpaces(text2clickable($link['description'])));
bb8f712d 1018 $linksToDisplay[$key]['thumbnail'] = thumbnail($link['url']);
a5752e77 1019 $linksToDisplay[$key]['timestamp'] = linkdate2timestamp($link['linkdate']);
45034273 1020 }
bb8f712d 1021
45034273 1022 /* We need to spread the articles on 3 columns.
ad6c27b7 1023 I did not want to use a JavaScript lib like http://masonry.desandro.com/
bb8f712d 1024 so I manually spread entries with a simple method: I roughly evaluate the
45034273
SS
1025 height of a div according to title and description length.
1026 */
1027 $columns=array(array(),array(),array()); // Entries to display, for each column.
1028 $fill=array(0,0,0); // Rough estimate of columns fill.
1029 foreach($linksToDisplay as $key=>$link)
1030 {
1031 // Roughly estimate length of entry (by counting characters)
1032 // Title: 30 chars = 1 line. 1 line is 30 pixels height.
1033 // Description: 836 characters gives roughly 342 pixel height.
ad6c27b7 1034 // This is not perfect, but it's usually OK.
45034273
SS
1035 $length=strlen($link['title'])+(342*strlen($link['description']))/836;
1036 if ($link['thumbnail']) $length +=100; // 1 thumbnails roughly takes 100 pixels height.
1037 // Then put in column which is the less filled:
1038 $smallest=min($fill); // find smallest value in array.
1039 $index=array_search($smallest,$fill); // find index of this smallest value.
1040 array_push($columns[$index],$link); // Put entry in this column.
1041 $fill[$index]+=$length;
1042 }
1043 $PAGE = new pageBuilder;
1044 $PAGE->assign('linksToDisplay',$linksToDisplay);
1045 $PAGE->assign('linkcount',count($LINKSDB));
cae64e52 1046 $PAGE->assign('cols', $columns);
4de71445 1047 $PAGE->assign('day',linkdate2timestamp($day.'_000000'));
45034273 1048 $PAGE->assign('previousday',$previousday);
bb8f712d 1049 $PAGE->assign('nextday',$nextday);
45034273
SS
1050 $PAGE->renderPage('daily');
1051 exit;
1052}
1053
1054
1055// ------------------------------------------------------------------------------------------
1056// Render HTML page (according to URL parameters and user rights)
1057function renderPage()
1058{
9f15ca9e 1059 $LINKSDB = new LinkDB(
9c8752a2 1060 $GLOBALS['config']['DATASTORE'],
9f15ca9e
V
1061 isLoggedIn() || $GLOBALS['config']['OPEN_SHAARLI'],
1062 $GLOBALS['config']['HIDE_PUBLIC_LINKS']
1063 );
45034273
SS
1064
1065 // -------- Display login form.
1066 if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=login'))
1067 {
1068 if ($GLOBALS['config']['OPEN_SHAARLI']) { header('Location: ?'); exit; } // No need to login for open Shaarli
1069 $token=''; if (ban_canLogin()) $token=getToken(); // Do not waste token generation if not useful.
1070 $PAGE = new pageBuilder;
1071 $PAGE->assign('token',$token);
5f85fcd8 1072 $PAGE->assign('returnurl',(isset($_SERVER['HTTP_REFERER']) ? escape($_SERVER['HTTP_REFERER']):''));
45034273
SS
1073 $PAGE->renderPage('loginform');
1074 exit;
1075 }
1076 // -------- User wants to logout.
1077 if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=logout'))
1078 {
1079 invalidateCaches();
1080 logout();
1081 header('Location: ?');
1082 exit;
1083 }
1084
1085 // -------- Picture wall
1086 if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=picwall'))
1087 {
ad6c27b7 1088 // Optionally filter the results:
45034273
SS
1089 $links=array();
1090 if (!empty($_GET['searchterm'])) $links = $LINKSDB->filterFulltext($_GET['searchterm']);
1091 elseif (!empty($_GET['searchtags'])) $links = $LINKSDB->filterTags(trim($_GET['searchtags']));
1092 else $links = $LINKSDB;
f3db3774 1093
45034273
SS
1094 $body='';
1095 $linksToDisplay=array();
1096
1097 // Get only links which have a thumbnail.
1098 foreach($links as $link)
1099 {
5f85fcd8 1100 $permalink='?'.escape(smallhash($link['linkdate']));
45034273
SS
1101 $thumb=lazyThumbnail($link['url'],$permalink);
1102 if ($thumb!='') // Only output links which have a thumbnail.
1103 {
1104 $link['thumbnail']=$thumb; // Thumbnail HTML code.
45034273
SS
1105 $linksToDisplay[]=$link; // Add to array.
1106 }
1107 }
f3db3774 1108
45034273
SS
1109 $PAGE = new pageBuilder;
1110 $PAGE->assign('linkcount',count($LINKSDB));
1111 $PAGE->assign('linksToDisplay',$linksToDisplay);
1112 $PAGE->renderPage('picwall');
1113 exit;
1114 }
1115
1116 // -------- Tag cloud
1117 if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=tagcloud'))
1118 {
1119 $tags= $LINKSDB->allTags();
a037ac69 1120
45034273
SS
1121 // We sort tags alphabetically, then choose a font size according to count.
1122 // First, find max value.
1123 $maxcount=0; foreach($tags as $key=>$value) $maxcount=max($maxcount,$value);
1124 ksort($tags);
1125 $tagList=array();
1126 foreach($tags as $key=>$value)
1e3b2740 1127 // Tag font size scaling: default 15 and 30 logarithm bases affect scaling, 22 and 6 are arbitrary font sizes for max and min sizes.
45034273 1128 {
1e3b2740 1129 $tagList[$key] = array('count'=>$value,'size'=>log($value, 15) / log($maxcount, 30) * (22-6) + 6);
45034273
SS
1130 }
1131 $PAGE = new pageBuilder;
1132 $PAGE->assign('linkcount',count($LINKSDB));
1133 $PAGE->assign('tags',$tagList);
1134 $PAGE->renderPage('tagcloud');
bb8f712d 1135 exit;
45034273
SS
1136 }
1137
1138 // -------- User clicks on a tag in a link: The tag is added to the list of searched tags (searchtags=...)
1139 if (isset($_GET['addtag']))
1140 {
1141 // Get previous URL (http_referer) and add the tag to the searchtags parameters in query.
1142 if (empty($_SERVER['HTTP_REFERER'])) { header('Location: ?searchtags='.urlencode($_GET['addtag'])); exit; } // In case browser does not send HTTP_REFERER
1143 parse_str(parse_url($_SERVER['HTTP_REFERER'],PHP_URL_QUERY), $params);
732e683b 1144
775803a0
A
1145 // Prevent redirection loop
1146 if (isset($params['addtag'])) {
1147 unset($params['addtag']);
1148 }
1149
732e683b
FE
1150 // Check if this tag is already in the search query and ignore it if it is.
1151 // Each tag is always separated by a space
6ac95d9c
A
1152 if (isset($params['searchtags'])) {
1153 $current_tags = explode(' ', $params['searchtags']);
1154 } else {
1155 $current_tags = array();
1156 }
732e683b
FE
1157 $addtag = true;
1158 foreach ($current_tags as $value) {
1159 if ($value === $_GET['addtag']) {
1160 $addtag = false;
1161 break;
1162 }
1163 }
1164 // Append the tag if necessary
1165 if (empty($params['searchtags'])) {
1166 $params['searchtags'] = trim($_GET['addtag']);
1167 }
1168 else if ($addtag) {
1169 $params['searchtags'] = trim($params['searchtags']).' '.trim($_GET['addtag']);
1170 }
1171
45034273
SS
1172 unset($params['page']); // We also remove page (keeping the same page has no sense, since the results are different)
1173 header('Location: ?'.http_build_query($params));
1174 exit;
1175 }
1176
1177 // -------- User clicks on a tag in result count: Remove the tag from the list of searched tags (searchtags=...)
775803a0 1178 if (isset($_GET['removetag'])) {
45034273 1179 // Get previous URL (http_referer) and remove the tag from the searchtags parameters in query.
775803a0
A
1180 if (empty($_SERVER['HTTP_REFERER'])) {
1181 header('Location: ?');
1182 exit;
1183 }
1184
1185 // In case browser does not send HTTP_REFERER
1186 parse_str(parse_url($_SERVER['HTTP_REFERER'], PHP_URL_QUERY), $params);
1187
1188 // Prevent redirection loop
1189 if (isset($params['removetag'])) {
1190 unset($params['removetag']);
1191 }
1192
1193 if (isset($params['searchtags'])) {
45034273
SS
1194 $tags = explode(' ',$params['searchtags']);
1195 $tags=array_diff($tags, array($_GET['removetag'])); // Remove value from array $tags.
775803a0
A
1196 if (count($tags)==0) {
1197 unset($params['searchtags']);
1198 } else {
1199 $params['searchtags'] = implode(' ',$tags);
1200 }
45034273
SS
1201 unset($params['page']); // We also remove page (keeping the same page has no sense, since the results are different)
1202 }
1203 header('Location: ?'.http_build_query($params));
1204 exit;
1205 }
1206
1207 // -------- User wants to change the number of links per page (linksperpage=...)
775803a0
A
1208 if (isset($_GET['linksperpage'])) {
1209 if (is_numeric($_GET['linksperpage'])) {
1210 $_SESSION['LINKS_PER_PAGE']=abs(intval($_GET['linksperpage']));
1211 }
1212
1213 header('Location: '. generateLocation($_SERVER['HTTP_REFERER'], $_SERVER['HTTP_HOST'], array('linksperpage')));
45034273
SS
1214 exit;
1215 }
bb8f712d 1216
45034273 1217 // -------- User wants to see only private links (toggle)
775803a0
A
1218 if (isset($_GET['privateonly'])) {
1219 if (empty($_SESSION['privateonly'])) {
1220 $_SESSION['privateonly'] = 1; // See only private links
1221 } else {
45034273
SS
1222 unset($_SESSION['privateonly']); // See all links
1223 }
775803a0
A
1224
1225 header('Location: '. generateLocation($_SERVER['HTTP_REFERER'], $_SERVER['HTTP_HOST'], array('privateonly')));
45034273
SS
1226 exit;
1227 }
1228
1229 // -------- Handle other actions allowed for non-logged in users:
1230 if (!isLoggedIn())
1231 {
ad6c27b7 1232 // User tries to post new link but is not logged in:
45034273
SS
1233 // Show login screen, then redirect to ?post=...
1234 if (isset($_GET['post']))
1235 {
a1795ddc 1236 header('Location: ?do=login&post='.urlencode($_GET['post']).(!empty($_GET['title'])?'&title='.urlencode($_GET['title']):'').(!empty($_GET['description'])?'&description='.urlencode($_GET['description']):'').(!empty($_GET['source'])?'&source='.urlencode($_GET['source']):'')); // Redirect to login page, then back to post link.
45034273
SS
1237 exit;
1238 }
aedc912d
FE
1239
1240 // Same case as above except that user tried to access ?do=addlink without being logged in
1241 // Note: passing empty parameters makes Shaarli generate default URLs and descriptions.
1242 if (isset($_GET['do']) && $_GET['do'] === 'addlink') {
1243 header('Location: ?do=login&post=');
1244 exit;
1245 }
1246
5fbabbb9
A
1247 if (isset($_GET['edit_link'])) {
1248 header('Location: ?do=login&edit_link='. escape($_GET['edit_link']));
1249 exit;
1250 }
1251
45034273
SS
1252 $PAGE = new pageBuilder;
1253 buildLinkList($PAGE,$LINKSDB); // Compute list of links to display
1254 $PAGE->renderPage('linklist');
ad6c27b7 1255 exit; // Never remove this one! All operations below are reserved for logged in user.
45034273
SS
1256 }
1257
1258 // -------- All other functions are reserved for the registered user:
1259
1260 // -------- Display the Tools menu if requested (import/export/bookmarklet...)
1261 if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=tools'))
1262 {
1263 $PAGE = new pageBuilder;
1264 $PAGE->assign('linkcount',count($LINKSDB));
1265 $PAGE->assign('pageabsaddr',indexUrl());
1266 $PAGE->renderPage('tools');
1267 exit;
1268 }
1269
1270 // -------- User wants to change his/her password.
1271 if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=changepasswd'))
1272 {
1273 if ($GLOBALS['config']['OPEN_SHAARLI']) die('You are not supposed to change a password on an Open Shaarli.');
1274 if (!empty($_POST['setpassword']) && !empty($_POST['oldpassword']))
1275 {
ad6c27b7 1276 if (!tokenOk($_POST['token'])) die('Wrong token.'); // Go away!
45034273
SS
1277
1278 // Make sure old password is correct.
1279 $oldhash = sha1($_POST['oldpassword'].$GLOBALS['login'].$GLOBALS['salt']);
fe16b01e 1280 if ($oldhash!=$GLOBALS['hash']) { echo '<script>alert("The old password is not correct.");document.location=\'?do=changepasswd\';</script>'; exit; }
45034273
SS
1281 // Save new password
1282 $GLOBALS['salt'] = sha1(uniqid('',true).'_'.mt_rand()); // Salt renders rainbow-tables attacks useless.
1283 $GLOBALS['hash'] = sha1($_POST['setpassword'].$GLOBALS['login'].$GLOBALS['salt']);
dd484b90
A
1284 try {
1285 writeConfig($GLOBALS, isLoggedIn());
1286 }
1287 catch(Exception $e) {
1288 error_log(
1289 'ERROR while writing config file after changing password.' . PHP_EOL .
1290 $e->getMessage()
1291 );
1292
1293 // TODO: do not handle exceptions/errors in JS.
1294 echo '<script>alert("'. $e->getMessage() .'");document.location=\'?do=tools\';</script>';
1295 exit;
1296 }
fe16b01e 1297 echo '<script>alert("Your password has been changed.");document.location=\'?do=tools\';</script>';
45034273
SS
1298 exit;
1299 }
1300 else // show the change password form.
1301 {
1302 $PAGE = new pageBuilder;
1303 $PAGE->assign('linkcount',count($LINKSDB));
1304 $PAGE->assign('token',getToken());
1305 $PAGE->renderPage('changepassword');
1306 exit;
1307 }
1308 }
1309
1310 // -------- User wants to change configuration
1311 if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=configure'))
1312 {
1313 if (!empty($_POST['title']) )
1314 {
ad6c27b7 1315 if (!tokenOk($_POST['token'])) die('Wrong token.'); // Go away!
45034273
SS
1316 $tz = 'UTC';
1317 if (!empty($_POST['continent']) && !empty($_POST['city']))
d1e2f8e5 1318 if (isTimeZoneValid($_POST['continent'],$_POST['city']))
45034273
SS
1319 $tz = $_POST['continent'].'/'.$_POST['city'];
1320 $GLOBALS['timezone'] = $tz;
1321 $GLOBALS['title']=$_POST['title'];
ebb2880d 1322 $GLOBALS['titleLink']=$_POST['titleLink'];
45034273
SS
1323 $GLOBALS['redirector']=$_POST['redirector'];
1324 $GLOBALS['disablesessionprotection']=!empty($_POST['disablesessionprotection']);
bb8f712d 1325 $GLOBALS['privateLinkByDefault']=!empty($_POST['privateLinkByDefault']);
ed5b38dd 1326 $GLOBALS['config']['ENABLE_RSS_PERMALINKS']= !empty($_POST['enableRssPermalinks']);
329e0768 1327 $GLOBALS['config']['ENABLE_UPDATECHECK'] = !empty($_POST['updateCheck']);
caee7ff9 1328 $GLOBALS['config']['HIDE_PUBLIC_LINKS'] = !empty($_POST['hidePublicLinks']);
dd484b90
A
1329 try {
1330 writeConfig($GLOBALS, isLoggedIn());
1331 }
1332 catch(Exception $e) {
1333 error_log(
1334 'ERROR while writing config file after configuration update.' . PHP_EOL .
1335 $e->getMessage()
1336 );
1337
1338 // TODO: do not handle exceptions/errors in JS.
1339 echo '<script>alert("'. $e->getMessage() .'");document.location=\'?do=tools\';</script>';
1340 exit;
1341 }
fe16b01e 1342 echo '<script>alert("Configuration was saved.");document.location=\'?do=tools\';</script>';
45034273
SS
1343 exit;
1344 }
1345 else // Show the configuration form.
1346 {
1347 $PAGE = new pageBuilder;
1348 $PAGE->assign('linkcount',count($LINKSDB));
1349 $PAGE->assign('token',getToken());
5f85fcd8
A
1350 $PAGE->assign('title', empty($GLOBALS['title']) ? '' : $GLOBALS['title'] );
1351 $PAGE->assign('redirector', empty($GLOBALS['redirector']) ? '' : $GLOBALS['redirector'] );
d1e2f8e5
V
1352 list($timezone_form, $timezone_js) = generateTimeZoneForm($GLOBALS['timezone']);
1353 $PAGE->assign('timezone_form', $timezone_form);
45034273
SS
1354 $PAGE->assign('timezone_js',$timezone_js);
1355 $PAGE->renderPage('configure');
1356 exit;
1357 }
1358 }
1359
1360 // -------- User wants to rename a tag or delete it
1361 if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=changetag'))
1362 {
1363 if (empty($_POST['fromtag']))
1364 {
1365 $PAGE = new pageBuilder;
1366 $PAGE->assign('linkcount',count($LINKSDB));
1367 $PAGE->assign('token',getToken());
bdd1715b 1368 $PAGE->assign('tags', $LINKSDB->allTags());
45034273
SS
1369 $PAGE->renderPage('changetag');
1370 exit;
1371 }
1372 if (!tokenOk($_POST['token'])) die('Wrong token.');
1373
1374 // Delete a tag:
1375 if (!empty($_POST['deletetag']) && !empty($_POST['fromtag']))
1376 {
1377 $needle=trim($_POST['fromtag']);
ad6c27b7 1378 $linksToAlter = $LINKSDB->filterTags($needle,true); // True for case-sensitive tag search.
45034273
SS
1379 foreach($linksToAlter as $key=>$value)
1380 {
1381 $tags = explode(' ',trim($value['tags']));
1382 unset($tags[array_search($needle,$tags)]); // Remove tag.
1383 $value['tags']=trim(implode(' ',$tags));
1384 $LINKSDB[$key]=$value;
1385 }
ad6c27b7 1386 $LINKSDB->savedb(); // Save to disk.
fe16b01e 1387 echo '<script>alert("Tag was removed from '.count($linksToAlter).' links.");document.location=\'?\';</script>';
45034273
SS
1388 exit;
1389 }
1390
1391 // Rename a tag:
1392 if (!empty($_POST['renametag']) && !empty($_POST['fromtag']) && !empty($_POST['totag']))
1393 {
1394 $needle=trim($_POST['fromtag']);
1395 $linksToAlter = $LINKSDB->filterTags($needle,true); // true for case-sensitive tag search.
1396 foreach($linksToAlter as $key=>$value)
1397 {
1398 $tags = explode(' ',trim($value['tags']));
ad6c27b7 1399 $tags[array_search($needle,$tags)] = trim($_POST['totag']); // Replace tags value.
45034273
SS
1400 $value['tags']=trim(implode(' ',$tags));
1401 $LINKSDB[$key]=$value;
1402 }
ad6c27b7 1403 $LINKSDB->savedb(); // Save to disk.
fe16b01e 1404 echo '<script>alert("Tag was renamed in '.count($linksToAlter).' links.");document.location=\'?searchtags='.urlencode($_POST['totag']).'\';</script>';
45034273
SS
1405 exit;
1406 }
1407 }
1408
ad6c27b7 1409 // -------- User wants to add a link without using the bookmarklet: Show form.
45034273
SS
1410 if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=addlink'))
1411 {
1412 $PAGE = new pageBuilder;
1413 $PAGE->assign('linkcount',count($LINKSDB));
1414 $PAGE->renderPage('addlink');
1415 exit;
1416 }
1417
1418 // -------- User clicked the "Save" button when editing a link: Save link to database.
1419 if (isset($_POST['save_edit']))
1420 {
ad6c27b7 1421 if (!tokenOk($_POST['token'])) die('Wrong token.'); // Go away!
45034273 1422 $tags = trim(preg_replace('/\s\s+/',' ', $_POST['lf_tags'])); // Remove multiple spaces.
781e8aad 1423 $tags = implode(' ', array_unique(explode(' ', $tags))); // Remove duplicates.
45034273 1424 $linkdate=$_POST['lf_linkdate'];
feebc6d4 1425 $url = trim($_POST['lf_url']);
f81139c9 1426 if (!startsWith($url,'http:') && !startsWith($url,'https:') && !startsWith($url,'ftp:') && !startsWith($url,'magnet:') && !startsWith($url,'?') && !startsWith($url,'javascript:'))
feebc6d4
SS
1427 $url = 'http://'.$url;
1428 $link = array('title'=>trim($_POST['lf_title']),'url'=>$url,'description'=>trim($_POST['lf_description']),'private'=>(isset($_POST['lf_private']) ? 1 : 0),
45034273
SS
1429 'linkdate'=>$linkdate,'tags'=>str_replace(',',' ',$tags));
1430 if ($link['title']=='') $link['title']=$link['url']; // If title is empty, use the URL as title.
1431 $LINKSDB[$linkdate] = $link;
ad6c27b7 1432 $LINKSDB->savedb(); // Save to disk.
45034273
SS
1433 pubsubhub();
1434
1435 // If we are called from the bookmarklet, we must close the popup:
d33c5d4c 1436 if (isset($_GET['source']) && ($_GET['source']=='bookmarklet' || $_GET['source']=='firefoxsocialapi')) { echo '<script>self.close();</script>'; exit; }
775803a0
A
1437 $returnurl = ( !empty($_POST['returnurl']) ? escape($_POST['returnurl']) : '?' );
1438 $returnurl .= '#'.smallHash($_POST['lf_linkdate']); // Scroll to the link which has been edited.
1439 $location = generateLocation($returnurl, $_SERVER['HTTP_HOST'], array('addlink', 'post', 'edit_link'));
1440 header('Location: '. $location); // After saving the link, redirect to the page the user was on.
45034273
SS
1441 exit;
1442 }
1443
1444 // -------- User clicked the "Cancel" button when editing a link.
1445 if (isset($_POST['cancel_edit']))
1446 {
ad6c27b7 1447 // If we are called from the bookmarklet, we must close the popup:
d33c5d4c 1448 if (isset($_GET['source']) && ($_GET['source']=='bookmarklet' || $_GET['source']=='firefoxsocialapi')) { echo '<script>self.close();</script>'; exit; }
45034273 1449 $returnurl = ( isset($_POST['returnurl']) ? $_POST['returnurl'] : '?' );
b342b2a4 1450 $returnurl .= '#'.smallHash($_POST['lf_linkdate']); // Scroll to the link which has been edited.
775803a0 1451 $returnurl = generateLocation($returnurl, $_SERVER['HTTP_HOST'], array('addlink', 'post', 'edit_link'));
45034273
SS
1452 header('Location: '.$returnurl); // After canceling, redirect to the page the user was on.
1453 exit;
1454 }
1455
ad6c27b7 1456 // -------- User clicked the "Delete" button when editing a link: Delete link from database.
45034273
SS
1457 if (isset($_POST['delete_link']))
1458 {
1459 if (!tokenOk($_POST['token'])) die('Wrong token.');
1460 // We do not need to ask for confirmation:
ad6c27b7 1461 // - confirmation is handled by JavaScript
45034273
SS
1462 // - we are protected from XSRF by the token.
1463 $linkdate=$_POST['lf_linkdate'];
1464 unset($LINKSDB[$linkdate]);
1465 $LINKSDB->savedb(); // save to disk
1466
1467 // If we are called from the bookmarklet, we must close the popup:
d33c5d4c 1468 if (isset($_GET['source']) && ($_GET['source']=='bookmarklet' || $_GET['source']=='firefoxsocialapi')) { echo '<script>self.close();</script>'; exit; }
d528433d 1469 // Pick where we're going to redirect
1470 // =============================================================
1471 // Basically, we can't redirect to where we were previously if it was a permalink
1472 // or an edit_link, because it would 404.
1473 // Cases:
1474 // - / : nothing in $_GET, redirect to self
1475 // - /?page : redirect to self
d33c5d4c 1476 // - /?searchterm : redirect to self (there might be other links)
d528433d 1477 // - /?searchtags : redirect to self
1478 // - /permalink : redirect to / (the link does not exist anymore)
1479 // - /?edit_link : redirect to / (the link does not exist anymore)
1480 // PHP treats the permalink as a $_GET variable, so we need to check if every condition for self
1481 // redirect is not satisfied, and only then redirect to /
1482 $location = "?";
1483 // Self redirection
775803a0
A
1484 if (count($_GET) == 0
1485 || isset($_GET['page'])
1486 || isset($_GET['searchterm'])
1487 || isset($_GET['searchtags'])
1488 ) {
d528433d 1489 if (isset($_POST['returnurl'])) {
1490 $location = $_POST['returnurl']; // Handle redirects given by the form
775803a0
A
1491 } else {
1492 $location = generateLocation($_SERVER['HTTP_REFERER'], $_SERVER['HTTP_HOST'], array('delete_link'));
d528433d 1493 }
1494 }
1495
1496 header('Location: ' . $location); // After deleting the link, redirect to appropriate location
45034273
SS
1497 exit;
1498 }
1499
1500 // -------- User clicked the "EDIT" button on a link: Display link edit form.
1501 if (isset($_GET['edit_link']))
1502 {
1503 $link = $LINKSDB[$_GET['edit_link']]; // Read database
1504 if (!$link) { header('Location: ?'); exit; } // Link not found in database.
1505 $PAGE = new pageBuilder;
1506 $PAGE->assign('linkcount',count($LINKSDB));
1507 $PAGE->assign('link',$link);
1508 $PAGE->assign('link_is_new',false);
1509 $PAGE->assign('token',getToken()); // XSRF protection.
5f85fcd8 1510 $PAGE->assign('http_referer',(isset($_SERVER['HTTP_REFERER']) ? escape($_SERVER['HTTP_REFERER']) : ''));
bdd1715b 1511 $PAGE->assign('tags', $LINKSDB->allTags());
45034273
SS
1512 $PAGE->renderPage('editlink');
1513 exit;
1514 }
1515
1516 // -------- User want to post a new link: Display link edit form.
1517 if (isset($_GET['post']))
1518 {
1519 $url=$_GET['post'];
1520
ad2a397c 1521 // We remove the annoying parameters added by FeedBurner, GoogleFeedProxy, Facebook...
cbecab77 1522 $annoyingpatterns = array('/[\?&]utm_source=[^&]*/',
1523 '/[\?&]utm_campaign=[^&]*/',
1524 '/[\?&]utm_medium=[^&]*/',
1525 '/#xtor=RSS-[^&]*/',
1526 '/[\?&]fb_[^&]*/',
1527 '/[\?&]__scoop[^&]*/',
1528 '/#tk\.rss_all\?/',
1529 '/[\?&]action_ref_map=[^&]*/',
1530 '/[\?&]action_type_map=[^&]*/',
1531 '/[\?&]action_object_map=[^&]*/',
1532 '/[\?&]utm_content=[^&]*/',
1533 '/[\?&]fb=[^&]*/',
1534 '/[\?&]xtor=[^&]*/'
1535 );
ad2a397c 1536 foreach($annoyingpatterns as $pattern)
1537 {
403a1994 1538 $url = preg_replace($pattern, "", $url);
ad2a397c 1539 }
45034273
SS
1540
1541 $link_is_new = false;
1542 $link = $LINKSDB->getLinkFromUrl($url); // Check if URL is not already in database (in this case, we will edit the existing link)
1543 if (!$link)
1544 {
1545 $link_is_new = true; // This is a new link
1546 $linkdate = strval(date('Ymd_His'));
1547 $title = (empty($_GET['title']) ? '' : $_GET['title'] ); // Get title if it was provided in URL (by the bookmarklet).
7b2186a6 1548 $description = (empty($_GET['description']) ? '' : $_GET['description']); // Get description if it was provided in URL (by the bookmarklet). [Bronco added that]
3fac0a52 1549 $tags = (empty($_GET['tags']) ? '' : $_GET['tags'] ); // Get tags if it was provided in URL
732e683b 1550 $private = (!empty($_GET['private']) && $_GET['private'] === "1" ? 1 : 0); // Get private if it was provided in URL
45034273 1551 if (($url!='') && parse_url($url,PHP_URL_SCHEME)=='') $url = 'http://'.$url;
ad6c27b7 1552 // If this is an HTTP link, we try go get the page to extract the title (otherwise we will to straight to the edit form.)
45034273
SS
1553 if (empty($title) && parse_url($url,PHP_URL_SCHEME)=='http')
1554 {
1555 list($status,$headers,$data) = getHTTP($url,4); // Short timeout to keep the application responsive.
1556 // FIXME: Decode charset according to specified in either 1) HTTP response headers or 2) <head> in html
002ef0e5
SS
1557 if (strpos($status,'200 OK')!==false)
1558 {
1559 // Look for charset in html header.
1560 preg_match('#<meta .*charset=.*>#Usi', $data, $meta);
732e683b 1561
002ef0e5
SS
1562 // If found, extract encoding.
1563 if (!empty($meta[0]))
1564 {
1565 // Get encoding specified in header.
1566 preg_match('#charset="?(.*)"#si', $meta[0], $enc);
1567 // If charset not found, use utf-8.
1568 $html_charset = (!empty($enc[1])) ? strtolower($enc[1]) : 'utf-8';
1569 }
1570 else { $html_charset = 'utf-8'; }
732e683b 1571
002ef0e5
SS
1572 // Extract title
1573 $title = html_extract_title($data);
1574 if (!empty($title))
1575 {
1576 // Re-encode title in utf-8 if necessary.
1577 $title = ($html_charset == 'iso-8859-1') ? utf8_encode($title) : $title;
1578 }
1579 }
45034273 1580 }
27646ca5 1581 if ($url=='') // In case of empty URL, this is just a text (with a link that points to itself)
1582 {
1583 $url='?'.smallHash($linkdate);
1584 $title='Note: ';
1585 }
3fac0a52 1586 $link = array('linkdate'=>$linkdate,'title'=>$title,'url'=>$url,'description'=>$description,'tags'=>$tags,'private'=>$private);
45034273
SS
1587 }
1588
1589 $PAGE = new pageBuilder;
1590 $PAGE->assign('linkcount',count($LINKSDB));
1591 $PAGE->assign('link',$link);
1592 $PAGE->assign('link_is_new',$link_is_new);
1593 $PAGE->assign('token',getToken()); // XSRF protection.
1594 $PAGE->assign('http_referer',(isset($_SERVER['HTTP_REFERER']) ? $_SERVER['HTTP_REFERER'] : ''));
d33c5d4c 1595 $PAGE->assign('source',(isset($_GET['source']) ? $_GET['source'] : ''));
bdd1715b 1596 $PAGE->assign('tags', $LINKSDB->allTags());
45034273
SS
1597 $PAGE->renderPage('editlink');
1598 exit;
1599 }
1600
1601 // -------- Export as Netscape Bookmarks HTML file.
1602 if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=export'))
1603 {
1604 if (empty($_GET['what']))
1605 {
1606 $PAGE = new pageBuilder;
1607 $PAGE->assign('linkcount',count($LINKSDB));
1608 $PAGE->renderPage('export');
1609 exit;
1610 }
1611 $exportWhat=$_GET['what'];
ad6c27b7 1612 if (!array_intersect(array('all','public','private'),array($exportWhat))) die('What are you trying to export???');
45034273
SS
1613
1614 header('Content-Type: text/html; charset=utf-8');
1615 header('Content-disposition: attachment; filename=bookmarks_'.$exportWhat.'_'.strval(date('Ymd_His')).'.html');
1616 $currentdate=date('Y/m/d H:i:s');
1617 echo <<<HTML
1618<!DOCTYPE NETSCAPE-Bookmark-file-1>
1619<!-- This is an automatically generated file.
1620 It will be read and overwritten.
1621 DO NOT EDIT! -->
1622<!-- Shaarli {$exportWhat} bookmarks export on {$currentdate} -->
1623<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8">
1624<TITLE>Bookmarks</TITLE>
1625<H1>Bookmarks</H1>
1626HTML;
1627 foreach($LINKSDB as $link)
1628 {
1629 if ($exportWhat=='all' ||
1630 ($exportWhat=='private' && $link['private']!=0) ||
1631 ($exportWhat=='public' && $link['private']==0))
1632 {
5f85fcd8
A
1633 echo '<DT><A HREF="'.$link['url'].'" ADD_DATE="'.linkdate2timestamp($link['linkdate']).'" PRIVATE="'.$link['private'].'"';
1634 if ($link['tags']!='') echo ' TAGS="'.str_replace(' ',',',$link['tags']).'"';
1635 echo '>'.$link['title']."</A>\n";
1636 if ($link['description']!='') echo '<DD>'.$link['description']."\n";
45034273
SS
1637 }
1638 }
1639 exit;
1640 }
1641
1642 // -------- User is uploading a file for import
1643 if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=upload'))
1644 {
1645 // If file is too big, some form field may be missing.
1646 if (!isset($_POST['token']) || (!isset($_FILES)) || (isset($_FILES['filetoupload']['size']) && $_FILES['filetoupload']['size']==0))
1647 {
1648 $returnurl = ( empty($_SERVER['HTTP_REFERER']) ? '?' : $_SERVER['HTTP_REFERER'] );
5f85fcd8 1649 echo '<script>alert("The file you are trying to upload is probably bigger than what this webserver can accept ('.getMaxFileSize().' bytes). Please upload in smaller chunks.");document.location=\''.escape($returnurl).'\';</script>';
45034273
SS
1650 exit;
1651 }
1652 if (!tokenOk($_POST['token'])) die('Wrong token.');
1653 importFile();
1654 exit;
1655 }
1656
1657 // -------- Show upload/import dialog:
1658 if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=import'))
1659 {
1660 $PAGE = new pageBuilder;
1661 $PAGE->assign('linkcount',count($LINKSDB));
1662 $PAGE->assign('token',getToken());
1663 $PAGE->assign('maxfilesize',getMaxFileSize());
1664 $PAGE->renderPage('import');
1665 exit;
1666 }
1667
1668 // -------- Otherwise, simply display search form and links:
1669 $PAGE = new pageBuilder;
45034273
SS
1670 buildLinkList($PAGE,$LINKSDB); // Compute list of links to display
1671 $PAGE->renderPage('linklist');
1672 exit;
1673}
1674
1675// -----------------------------------------------------------------------------------------------
1676// Process the import file form.
1677function importFile()
1678{
1679 if (!(isLoggedIn() || $GLOBALS['config']['OPEN_SHAARLI'])) { die('Not allowed.'); }
9f15ca9e 1680 $LINKSDB = new LinkDB(
9c8752a2 1681 $GLOBALS['config']['DATASTORE'],
9f15ca9e
V
1682 isLoggedIn() || $GLOBALS['config']['OPEN_SHAARLI'],
1683 $GLOBALS['config']['HIDE_PUBLIC_LINKS']
1684 );
45034273
SS
1685 $filename=$_FILES['filetoupload']['name'];
1686 $filesize=$_FILES['filetoupload']['size'];
1687 $data=file_get_contents($_FILES['filetoupload']['tmp_name']);
ad6c27b7 1688 $private = (empty($_POST['private']) ? 0 : 1); // Should the links be imported as private?
1689 $overwrite = !empty($_POST['overwrite']) ; // Should the imported links overwrite existing ones?
45034273
SS
1690 $import_count=0;
1691
1692 // Sniff file type:
1693 $type='unknown';
1694 if (startsWith($data,'<!DOCTYPE NETSCAPE-Bookmark-file-1>')) $type='netscape'; // Netscape bookmark file (aka Firefox).
1695
1696 // Then import the bookmarks.
1697 if ($type=='netscape')
1698 {
1699 // This is a standard Netscape-style bookmark file.
ad6c27b7 1700 // This format is supported by all browsers (except IE, of course), also Delicious, Diigo and others.
45034273
SS
1701 foreach(explode('<DT>',$data) as $html) // explode is very fast
1702 {
1703 $link = array('linkdate'=>'','title'=>'','url'=>'','description'=>'','tags'=>'','private'=>0);
1704 $d = explode('<DD>',$html);
1705 if (startswith($d[0],'<A '))
1706 {
1707 $link['description'] = (isset($d[1]) ? html_entity_decode(trim($d[1]),ENT_QUOTES,'UTF-8') : ''); // Get description (optional)
1708 preg_match('!<A .*?>(.*?)</A>!i',$d[0],$matches); $link['title'] = (isset($matches[1]) ? trim($matches[1]) : ''); // Get title
1709 $link['title'] = html_entity_decode($link['title'],ENT_QUOTES,'UTF-8');
1710 preg_match_all('! ([A-Z_]+)=\"(.*?)"!i',$html,$matches,PREG_SET_ORDER); // Get all other attributes
1711 $raw_add_date=0;
1712 foreach($matches as $m)
1713 {
1714 $attr=$m[1]; $value=$m[2];
1715 if ($attr=='HREF') $link['url']=html_entity_decode($value,ENT_QUOTES,'UTF-8');
fc93ae1d
AA
1716 elseif ($attr=='ADD_DATE')
1717 {
1718 $raw_add_date=intval($value);
1719 if ($raw_add_date>30000000000) $raw_add_date/=1000; //If larger than year 2920, then was likely stored in milliseconds instead of seconds
1720 }
45034273
SS
1721 elseif ($attr=='PRIVATE') $link['private']=($value=='0'?0:1);
1722 elseif ($attr=='TAGS') $link['tags']=html_entity_decode(str_replace(',',' ',$value),ENT_QUOTES,'UTF-8');
1723 }
1724 if ($link['url']!='')
1725 {
1726 if ($private==1) $link['private']=1;
1727 $dblink = $LINKSDB->getLinkFromUrl($link['url']); // See if the link is already in database.
1728 if ($dblink==false)
1729 { // Link not in database, let's import it...
1730 if (empty($raw_add_date)) $raw_add_date=time(); // In case of shitty bookmark file with no ADD_DATE
1731
1732 // Make sure date/time is not already used by another link.
1733 // (Some bookmark files have several different links with the same ADD_DATE)
ad6c27b7 1734 // We increment date by 1 second until we find a date which is not used in DB.
45034273
SS
1735 // (so that links that have the same date/time are more or less kept grouped by date, but do not conflict.)
1736 while (!empty($LINKSDB[date('Ymd_His',$raw_add_date)])) { $raw_add_date++; }// Yes, I know it's ugly.
1737 $link['linkdate']=date('Ymd_His',$raw_add_date);
1738 $LINKSDB[$link['linkdate']] = $link;
1739 $import_count++;
1740 }
ad6c27b7 1741 else // Link already present in database.
45034273
SS
1742 {
1743 if ($overwrite)
1744 { // If overwrite is required, we import link data, except date/time.
1745 $link['linkdate']=$dblink['linkdate'];
1746 $LINKSDB[$link['linkdate']] = $link;
1747 $import_count++;
1748 }
1749 }
1750
1751 }
1752 }
1753 }
1754 $LINKSDB->savedb();
1755
fe16b01e 1756 echo '<script>alert("File '.json_encode($filename).' ('.$filesize.' bytes) was successfully processed: '.$import_count.' links imported.");document.location=\'?\';</script>';
45034273
SS
1757 }
1758 else
1759 {
fe16b01e 1760 echo '<script>alert("File '.json_encode($filename).' ('.$filesize.' bytes) has an unknown file format. Nothing was imported.");document.location=\'?\';</script>';
45034273
SS
1761 }
1762}
1763
1764// -----------------------------------------------------------------------------------------------
1765// Template for the list of links (<div id="linklist">)
1766// This function fills all the necessary fields in the $PAGE for the template 'linklist.html'
1767function buildLinkList($PAGE,$LINKSDB)
1768{
1769 // ---- Filter link database according to parameters
1770 $linksToDisplay=array();
1771 $search_type='';
1772 $search_crits='';
1773 if (isset($_GET['searchterm'])) // Fulltext search
1774 {
1775 $linksToDisplay = $LINKSDB->filterFulltext(trim($_GET['searchterm']));
5f85fcd8 1776 $search_crits=escape(trim($_GET['searchterm']));
45034273
SS
1777 $search_type='fulltext';
1778 }
1779 elseif (isset($_GET['searchtags'])) // Search by tag
1780 {
1781 $linksToDisplay = $LINKSDB->filterTags(trim($_GET['searchtags']));
5f85fcd8 1782 $search_crits=explode(' ',escape(trim($_GET['searchtags'])));
45034273
SS
1783 $search_type='tags';
1784 }
1785 elseif (isset($_SERVER['QUERY_STRING']) && preg_match('/[a-zA-Z0-9-_@]{6}(&.+?)?/',$_SERVER['QUERY_STRING'])) // Detect smallHashes in URL
1786 {
1787 $linksToDisplay = $LINKSDB->filterSmallHash(substr(trim($_SERVER["QUERY_STRING"], '/'),0,6));
1788 if (count($linksToDisplay)==0)
1789 {
1790 header($_SERVER["SERVER_PROTOCOL"]." 404 Not Found");
1791 echo '<h1>404 Not found.</h1>Oh crap. The link you are trying to reach does not exist or has been deleted.';
1dcbe296 1792 echo '<br>Would you mind <a href="?">clicking here</a>?';
45034273
SS
1793 exit;
1794 }
1795 $search_type='permalink';
1796 }
1797 else
ad6c27b7 1798 $linksToDisplay = $LINKSDB; // Otherwise, display without filtering.
bb8f712d 1799
8fa1ebd6 1800
45034273
SS
1801 // Option: Show only private links
1802 if (!empty($_SESSION['privateonly']))
1803 {
1804 $tmp = array();
1805 foreach($linksToDisplay as $linkdate=>$link)
1806 {
1807 if ($link['private']!=0) $tmp[$linkdate]=$link;
1808 }
1809 $linksToDisplay=$tmp;
1810 }
1811
1812 // ---- Handle paging.
ad6c27b7 1813 /* Can someone explain to me why you get the following error when using array_keys() on an object which implements the interface ArrayAccess???
45034273
SS
1814 "Warning: array_keys() expects parameter 1 to be array, object given in ... "
1815 If my class implements ArrayAccess, why won't array_keys() accept it ? ( $keys=array_keys($linksToDisplay); )
1816 */
ad6c27b7 1817 $keys=array(); foreach($linksToDisplay as $key=>$value) { $keys[]=$key; } // Stupid and ugly. Thanks PHP.
45034273
SS
1818
1819 // If there is only a single link, we change on-the-fly the title of the page.
1820 if (count($linksToDisplay)==1) $GLOBALS['pagetitle'] = $linksToDisplay[$keys[0]]['title'].' - '.$GLOBALS['title'];
1821
1822 // Select articles according to paging.
1823 $pagecount = ceil(count($keys)/$_SESSION['LINKS_PER_PAGE']);
1824 $pagecount = ($pagecount==0 ? 1 : $pagecount);
1825 $page=( empty($_GET['page']) ? 1 : intval($_GET['page']));
1826 $page = ( $page<1 ? 1 : $page );
1827 $page = ( $page>$pagecount ? $pagecount : $page );
1828 $i = ($page-1)*$_SESSION['LINKS_PER_PAGE']; // Start index.
1829 $end = $i+$_SESSION['LINKS_PER_PAGE'];
1830 $linkDisp=array(); // Links to display
1831 while ($i<$end && $i<count($keys))
1832 {
1833 $link = $linksToDisplay[$keys[$i]];
5f85fcd8 1834 $link['description']=nl2br(keepMultipleSpaces(text2clickable($link['description'])));
a5752e77
A
1835 $title=$link['title'];
1836 $classLi = $i%2!=0 ? '' : 'publicLinkHightLight';
45034273 1837 $link['class'] = ($link['private']==0 ? $classLi : 'private');
bec18701 1838 $link['timestamp']=linkdate2timestamp($link['linkdate']);
a5752e77
A
1839 $taglist = explode(' ',$link['tags']);
1840 uasort($taglist, 'strcasecmp');
dd62b9ba 1841 $link['taglist']=$taglist;
b47f515a
FE
1842
1843 if ($link["url"][0] === '?' && // Check for both signs of a note: starting with ? and 7 chars long. I doubt that you'll post any links that look like this.
1844 strlen($link["url"]) === 7) {
1845 $link["url"] = indexUrl() . $link["url"];
1846 }
d33c5d4c 1847
45034273
SS
1848 $linkDisp[$keys[$i]] = $link;
1849 $i++;
1850 }
bb8f712d 1851
45034273
SS
1852 // Compute paging navigation
1853 $searchterm= ( empty($_GET['searchterm']) ? '' : '&searchterm='.$_GET['searchterm'] );
1854 $searchtags= ( empty($_GET['searchtags']) ? '' : '&searchtags='.$_GET['searchtags'] );
1855 $paging='';
1856 $previous_page_url=''; if ($i!=count($keys)) $previous_page_url='?page='.($page+1).$searchterm.$searchtags;
1857 $next_page_url='';if ($page>1) $next_page_url='?page='.($page-1).$searchterm.$searchtags;
1858
bb8f712d
KT
1859 $token = ''; if (isLoggedIn()) $token=getToken();
1860
45034273
SS
1861 // Fill all template fields.
1862 $PAGE->assign('linkcount',count($LINKSDB));
1863 $PAGE->assign('previous_page_url',$previous_page_url);
1864 $PAGE->assign('next_page_url',$next_page_url);
1865 $PAGE->assign('page_current',$page);
1866 $PAGE->assign('page_max',$pagecount);
1867 $PAGE->assign('result_count',count($linksToDisplay));
1868 $PAGE->assign('search_type',$search_type);
bb8f712d 1869 $PAGE->assign('search_crits',$search_crits);
ad6c27b7 1870 $PAGE->assign('redirector',empty($GLOBALS['redirector']) ? '' : $GLOBALS['redirector']); // Optional redirector URL.
45034273
SS
1871 $PAGE->assign('token',$token);
1872 $PAGE->assign('links',$linkDisp);
65d62517 1873 $PAGE->assign('tags', $LINKSDB->allTags());
45034273
SS
1874 return;
1875}
1876
1877// Compute the thumbnail for a link.
bb8f712d 1878//
ad6c27b7 1879// With a link to the original URL.
45034273 1880// Understands various services (youtube.com...)
ad6c27b7 1881// Input: $url = URL for which the thumbnail must be found.
45034273
SS
1882// $href = if provided, this URL will be followed instead of $url
1883// Returns an associative array with thumbnail attributes (src,href,width,height,style,alt)
1884// Some of them may be missing.
1885// Return an empty array if no thumbnail available.
1886function computeThumbnail($url,$href=false)
1887{
1888 if (!$GLOBALS['config']['ENABLE_THUMBNAILS']) return array();
1889 if ($href==false) $href=$url;
1890
1891 // For most hosts, the URL of the thumbnail can be easily deduced from the URL of the link.
ad6c27b7 1892 // (e.g. http://www.youtube.com/watch?v=spVypYk4kto ---> http://img.youtube.com/vi/spVypYk4kto/default.jpg )
45034273
SS
1893 // ^^^^^^^^^^^ ^^^^^^^^^^^
1894 $domain = parse_url($url,PHP_URL_HOST);
1895 if ($domain=='youtube.com' || $domain=='www.youtube.com')
1896 {
1897 parse_str(parse_url($url,PHP_URL_QUERY), $params); // Extract video ID and get thumbnail
1a663a0f 1898 if (!empty($params['v'])) return array('src'=>'https://img.youtube.com/vi/'.$params['v'].'/default.jpg',
45034273
SS
1899 'href'=>$href,'width'=>'120','height'=>'90','alt'=>'YouTube thumbnail');
1900 }
1901 if ($domain=='youtu.be') // Youtube short links
1902 {
1903 $path = parse_url($url,PHP_URL_PATH);
1a663a0f 1904 return array('src'=>'https://img.youtube.com/vi'.$path.'/default.jpg',
bb8f712d 1905 'href'=>$href,'width'=>'120','height'=>'90','alt'=>'YouTube thumbnail');
45034273
SS
1906 }
1907 if ($domain=='pix.toile-libre.org') // pix.toile-libre.org image hosting
1908 {
1909 parse_str(parse_url($url,PHP_URL_QUERY), $params); // Extract image filename.
1910 if (!empty($params) && !empty($params['img'])) return array('src'=>'http://pix.toile-libre.org/upload/thumb/'.urlencode($params['img']),
bb8f712d
KT
1911 'href'=>$href,'style'=>'max-width:120px; max-height:150px','alt'=>'pix.toile-libre.org thumbnail');
1912 }
1913
45034273
SS
1914 if ($domain=='imgur.com')
1915 {
1916 $path = parse_url($url,PHP_URL_PATH);
1917 if (startsWith($path,'/a/')) return array(); // Thumbnails for albums are not available.
1a663a0f 1918 if (startsWith($path,'/r/')) return array('src'=>'https://i.imgur.com/'.basename($path).'s.jpg',
45034273 1919 'href'=>$href,'width'=>'90','height'=>'90','alt'=>'imgur.com thumbnail');
1a663a0f 1920 if (startsWith($path,'/gallery/')) return array('src'=>'https://i.imgur.com'.substr($path,8).'s.jpg',
45034273
SS
1921 'href'=>$href,'width'=>'90','height'=>'90','alt'=>'imgur.com thumbnail');
1922
1a663a0f 1923 if (substr_count($path,'/')==1) return array('src'=>'https://i.imgur.com/'.substr($path,1).'s.jpg',
45034273
SS
1924 'href'=>$href,'width'=>'90','height'=>'90','alt'=>'imgur.com thumbnail');
1925 }
1926 if ($domain=='i.imgur.com')
1927 {
1928 $pi = pathinfo(parse_url($url,PHP_URL_PATH));
1a663a0f 1929 if (!empty($pi['filename'])) return array('src'=>'https://i.imgur.com/'.$pi['filename'].'s.jpg',
45034273
SS
1930 'href'=>$href,'width'=>'90','height'=>'90','alt'=>'imgur.com thumbnail');
1931 }
1932 if ($domain=='dailymotion.com' || $domain=='www.dailymotion.com')
1933 {
1934 if (strpos($url,'dailymotion.com/video/')!==false)
1935 {
1936 $thumburl=str_replace('dailymotion.com/video/','dailymotion.com/thumbnail/video/',$url);
1937 return array('src'=>$thumburl,
1938 'href'=>$href,'width'=>'120','style'=>'height:auto;','alt'=>'DailyMotion thumbnail');
1939 }
1940 }
1941 if (endsWith($domain,'.imageshack.us'))
1942 {
1943 $ext=strtolower(pathinfo($url,PATHINFO_EXTENSION));
1944 if ($ext=='jpg' || $ext=='jpeg' || $ext=='png' || $ext=='gif')
1945 {
1946 $thumburl = substr($url,0,strlen($url)-strlen($ext)).'th.'.$ext;
1947 return array('src'=>$thumburl,
1948 'href'=>$href,'width'=>'120','style'=>'height:auto;','alt'=>'imageshack.us thumbnail');
1949 }
1950 }
1951
1952 // Some other hosts are SLOW AS HELL and usually require an extra HTTP request to get the thumbnail URL.
1953 // So we deport the thumbnail generation in order not to slow down page generation
1954 // (and we also cache the thumbnail)
1955
1956 if (!$GLOBALS['config']['ENABLE_LOCALCACHE']) return array(); // If local cache is disabled, no thumbnails for services which require the use a local cache.
1957
1958 if ($domain=='flickr.com' || endsWith($domain,'.flickr.com')
1959 || $domain=='vimeo.com'
1960 || $domain=='ted.com' || endsWith($domain,'.ted.com')
1961 || $domain=='xkcd.com' || endsWith($domain,'.xkcd.com')
1962 )
1963 {
1964 if ($domain=='vimeo.com')
ad6c27b7 1965 { // Make sure this vimeo URL points to a video (/xxx... where xxx is numeric)
45034273
SS
1966 $path = parse_url($url,PHP_URL_PATH);
1967 if (!preg_match('!/\d+.+?!',$path)) return array(); // This is not a single video URL.
1968 }
1969 if ($domain=='xkcd.com' || endsWith($domain,'.xkcd.com'))
ad6c27b7 1970 { // Make sure this URL points to a single comic (/xxx... where xxx is numeric)
45034273
SS
1971 $path = parse_url($url,PHP_URL_PATH);
1972 if (!preg_match('!/\d+.+?!',$path)) return array();
1973 }
1974 if ($domain=='ted.com' || endsWith($domain,'.ted.com'))
ad6c27b7 1975 { // Make sure this TED URL points to a video (/talks/...)
45034273
SS
1976 $path = parse_url($url,PHP_URL_PATH);
1977 if ("/talks/" !== substr($path,0,7)) return array(); // This is not a single video URL.
1978 }
1979 $sign = hash_hmac('sha256', $url, $GLOBALS['salt']); // We use the salt to sign data (it's random, secret, and specific to each installation)
5f85fcd8 1980 return array('src'=>indexUrl().'?do=genthumbnail&hmac='.$sign.'&url='.urlencode($url),
45034273
SS
1981 'href'=>$href,'width'=>'120','style'=>'height:auto;','alt'=>'thumbnail');
1982 }
1983
1984 // For all other, we try to make a thumbnail of links ending with .jpg/jpeg/png/gif
1985 // Technically speaking, we should download ALL links and check their Content-Type to see if they are images.
1986 // But using the extension will do.
1987 $ext=strtolower(pathinfo($url,PATHINFO_EXTENSION));
1988 if ($ext=='jpg' || $ext=='jpeg' || $ext=='png' || $ext=='gif')
1989 {
1990 $sign = hash_hmac('sha256', $url, $GLOBALS['salt']); // We use the salt to sign data (it's random, secret, and specific to each installation)
5f85fcd8 1991 return array('src'=>indexUrl().'?do=genthumbnail&hmac='.$sign.'&url='.urlencode($url),
bb8f712d 1992 'href'=>$href,'width'=>'120','style'=>'height:auto;','alt'=>'thumbnail');
45034273
SS
1993 }
1994 return array(); // No thumbnail.
1995
1996}
1997
1998
1999// Returns the HTML code to display a thumbnail for a link
2000// with a link to the original URL.
2001// Understands various services (youtube.com...)
ad6c27b7 2002// Input: $url = URL for which the thumbnail must be found.
45034273
SS
2003// $href = if provided, this URL will be followed instead of $url
2004// Returns '' if no thumbnail available.
2005function thumbnail($url,$href=false)
2006{
2007 $t = computeThumbnail($url,$href);
2008 if (count($t)==0) return ''; // Empty array = no thumbnail for this URL.
bb8f712d 2009
5f85fcd8
A
2010 $html='<a href="'.escape($t['href']).'"><img src="'.escape($t['src']).'"';
2011 if (!empty($t['width'])) $html.=' width="'.escape($t['width']).'"';
2012 if (!empty($t['height'])) $html.=' height="'.escape($t['height']).'"';
2013 if (!empty($t['style'])) $html.=' style="'.escape($t['style']).'"';
2014 if (!empty($t['alt'])) $html.=' alt="'.escape($t['alt']).'"';
45034273
SS
2015 $html.='></a>';
2016 return $html;
2017}
2018
45034273
SS
2019// Returns the HTML code to display a thumbnail for a link
2020// for the picture wall (using lazy image loading)
2021// Understands various services (youtube.com...)
ad6c27b7 2022// Input: $url = URL for which the thumbnail must be found.
45034273
SS
2023// $href = if provided, this URL will be followed instead of $url
2024// Returns '' if no thumbnail available.
2025function lazyThumbnail($url,$href=false)
2026{
bb8f712d 2027 $t = computeThumbnail($url,$href);
45034273
SS
2028 if (count($t)==0) return ''; // Empty array = no thumbnail for this URL.
2029
5f85fcd8 2030 $html='<a href="'.escape($t['href']).'">';
bb8f712d 2031
34047d23 2032 // Lazy image
5f85fcd8 2033 $html.='<img class="b-lazy" src="#" data-src="'.escape($t['src']).'"';
858c5c2b 2034
5f85fcd8
A
2035 if (!empty($t['width'])) $html.=' width="'.escape($t['width']).'"';
2036 if (!empty($t['height'])) $html.=' height="'.escape($t['height']).'"';
2037 if (!empty($t['style'])) $html.=' style="'.escape($t['style']).'"';
2038 if (!empty($t['alt'])) $html.=' alt="'.escape($t['alt']).'"';
45034273 2039 $html.='>';
bb8f712d 2040
ad6c27b7 2041 // No-JavaScript fallback.
5f85fcd8
A
2042 $html.='<noscript><img src="'.escape($t['src']).'"';
2043 if (!empty($t['width'])) $html.=' width="'.escape($t['width']).'"';
2044 if (!empty($t['height'])) $html.=' height="'.escape($t['height']).'"';
2045 if (!empty($t['style'])) $html.=' style="'.escape($t['style']).'"';
2046 if (!empty($t['alt'])) $html.=' alt="'.escape($t['alt']).'"';
45034273 2047 $html.='></noscript></a>';
bb8f712d 2048
45034273
SS
2049 return $html;
2050}
2051
2052
2053// -----------------------------------------------------------------------------------------------
2054// Installation
2055// This function should NEVER be called if the file data/config.php exists.
2056function install()
2057{
2058 // On free.fr host, make sure the /sessions directory exists, otherwise login will not work.
f6a6ca0a 2059 if (endsWith($_SERVER['HTTP_HOST'],'.free.fr') && !is_dir($_SERVER['DOCUMENT_ROOT'].'/sessions')) mkdir($_SERVER['DOCUMENT_ROOT'].'/sessions',0705);
45034273 2060
f37664a2
SS
2061
2062 // This part makes sure sessions works correctly.
2063 // (Because on some hosts, session.save_path may not be set correctly,
2064 // or we may not have write access to it.)
2065 if (isset($_GET['test_session']) && ( !isset($_SESSION) || !isset($_SESSION['session_tested']) || $_SESSION['session_tested']!='Working'))
2066 { // Step 2: Check if data in session is correct.
2067 echo '<pre>Sessions do not seem to work correctly on your server.<br>';
2068 echo 'Make sure the variable session.save_path is set correctly in your php config, and that you have write access to it.<br>';
01ec1791 2069 echo 'It currently points to '.session_save_path().'<br>';
2070 echo 'Check that the hostname used to access Shaarli contains a dot. On some browsers, accessing your server via a hostname like \'localhost\' or any custom hostname without a dot causes cookie storage to fail. We recommend accessing your server via it\'s IP address or Fully Qualified Domain Name.<br>';
2071 echo '<br><a href="?">Click to try again.</a></pre>';
f37664a2
SS
2072 die;
2073 }
2074 if (!isset($_SESSION['session_tested']))
2075 { // Step 1 : Try to store data in session and reload page.
2076 $_SESSION['session_tested'] = 'Working'; // Try to set a variable in session.
2077 header('Location: '.indexUrl().'?test_session'); // Redirect to check stored data.
2078 }
2079 if (isset($_GET['test_session']))
ad6c27b7 2080 { // Step 3: Sessions are OK. Remove test parameter from URL.
f37664a2
SS
2081 header('Location: '.indexUrl());
2082 }
2083
2084
45034273
SS
2085 if (!empty($_POST['setlogin']) && !empty($_POST['setpassword']))
2086 {
2087 $tz = 'UTC';
d1e2f8e5
V
2088 if (!empty($_POST['continent']) && !empty($_POST['city'])) {
2089 if (isTimeZoneValid($_POST['continent'], $_POST['city'])) {
45034273 2090 $tz = $_POST['continent'].'/'.$_POST['city'];
d1e2f8e5
V
2091 }
2092 }
45034273
SS
2093 $GLOBALS['timezone'] = $tz;
2094 // Everything is ok, let's create config file.
2095 $GLOBALS['login'] = $_POST['setlogin'];
2096 $GLOBALS['salt'] = sha1(uniqid('',true).'_'.mt_rand()); // Salt renders rainbow-tables attacks useless.
2097 $GLOBALS['hash'] = sha1($_POST['setpassword'].$GLOBALS['login'].$GLOBALS['salt']);
5f85fcd8 2098 $GLOBALS['title'] = (empty($_POST['title']) ? 'Shared links on '.escape(indexUrl()) : $_POST['title'] );
329e0768 2099 $GLOBALS['config']['ENABLE_UPDATECHECK'] = !empty($_POST['updateCheck']);
dd484b90
A
2100 try {
2101 writeConfig($GLOBALS, isLoggedIn());
2102 }
2103 catch(Exception $e) {
2104 error_log(
2105 'ERROR while writing config file after installation.' . PHP_EOL .
2106 $e->getMessage()
2107 );
2108
2109 // TODO: do not handle exceptions/errors in JS.
2110 echo '<script>alert("'. $e->getMessage() .'");document.location=\'?\';</script>';
2111 exit;
2112 }
fe16b01e 2113 echo '<script>alert("Shaarli is now configured. Please enter your login/password and start shaaring your links!");document.location=\'?do=login\';</script>';
45034273
SS
2114 exit;
2115 }
2116
2117 // Display config form:
d1e2f8e5
V
2118 list($timezone_form, $timezone_js) = generateTimeZoneForm();
2119 $timezone_html = '';
2120 if ($timezone_form != '') {
2121 $timezone_html = '<tr><td><b>Timezone:</b></td><td>'.$timezone_form.'</td></tr>';
2122 }
bb8f712d 2123
45034273
SS
2124 $PAGE = new pageBuilder;
2125 $PAGE->assign('timezone_html',$timezone_html);
2126 $PAGE->assign('timezone_js',$timezone_js);
2127 $PAGE->renderPage('install');
2128 exit;
2129}
2130
3385af12
LM
2131if (!function_exists('json_encode')) {
2132 function json_encode($data) {
2133 switch ($type = gettype($data)) {
2134 case 'NULL':
2135 return 'null';
2136 case 'boolean':
2137 return ($data ? 'true' : 'false');
2138 case 'integer':
2139 case 'double':
2140 case 'float':
2141 return $data;
2142 case 'string':
2143 return '"' . addslashes($data) . '"';
2144 case 'object':
2145 $data = get_object_vars($data);
2146 case 'array':
2147 $output_index_count = 0;
2148 $output_indexed = array();
2149 $output_associative = array();
2150 foreach ($data as $key => $value) {
2151 $output_indexed[] = json_encode($value);
2152 $output_associative[] = json_encode($key) . ':' . json_encode($value);
2153 if ($output_index_count !== NULL && $output_index_count++ !== $key) {
2154 $output_index_count = NULL;
2155 }
2156 }
2157 if ($output_index_count !== NULL) {
2158 return '[' . implode(',', $output_indexed) . ']';
2159 } else {
2160 return '{' . implode(',', $output_associative) . '}';
2161 }
2162 default:
2163 return ''; // Not supported
2164 }
2165 }
2166}
45034273 2167
dd484b90 2168
45034273 2169
ad6c27b7 2170/* Because some f*cking services like flickr require an extra HTTP request to get the thumbnail URL,
45034273 2171 I have deported the thumbnail URL code generation here, otherwise this would slow down page generation.
ad6c27b7 2172 The following function takes the URL a link (e.g. a flickr page) and return the proper thumbnail.
2173 This function is called by passing the URL:
45034273 2174 http://mywebsite.com/shaarli/?do=genthumbnail&hmac=[HMAC]&url=[URL]
ad6c27b7 2175 [URL] is the URL of the link (e.g. a flickr page)
45034273
SS
2176 [HMAC] is the signature for the [URL] (so that these URL cannot be forged).
2177 The function below will fetch the image from the webservice and store it in the cache.
2178*/
2179function genThumbnail()
2180{
2181 // Make sure the parameters in the URL were generated by us.
2182 $sign = hash_hmac('sha256', $_GET['url'], $GLOBALS['salt']);
ad6c27b7 2183 if ($sign!=$_GET['hmac']) die('Naughty boy!');
45034273
SS
2184
2185 // Let's see if we don't already have the image for this URL in the cache.
2186 $thumbname=hash('sha1',$_GET['url']).'.jpg';
2187 if (is_file($GLOBALS['config']['CACHEDIR'].'/'.$thumbname))
2188 { // We have the thumbnail, just serve it:
2189 header('Content-Type: image/jpeg');
2190 echo file_get_contents($GLOBALS['config']['CACHEDIR'].'/'.$thumbname);
2191 return;
2192 }
2193 // We may also serve a blank image (if service did not respond)
2194 $blankname=hash('sha1',$_GET['url']).'.gif';
2195 if (is_file($GLOBALS['config']['CACHEDIR'].'/'.$blankname))
2196 {
2197 header('Content-Type: image/gif');
2198 echo file_get_contents($GLOBALS['config']['CACHEDIR'].'/'.$blankname);
2199 return;
2200 }
2201
2202 // Otherwise, generate the thumbnail.
2203 $url = $_GET['url'];
2204 $domain = parse_url($url,PHP_URL_HOST);
2205
2206 if ($domain=='flickr.com' || endsWith($domain,'.flickr.com'))
2207 {
ad6c27b7 2208 // Crude replacement to handle new flickr domain policy (They prefer www. now)
45034273
SS
2209 $url = str_replace('http://flickr.com/','http://www.flickr.com/',$url);
2210
2211 // Is this a link to an image, or to a flickr page ?
2212 $imageurl='';
2213 if (endswith(parse_url($url,PHP_URL_PATH),'.jpg'))
ad6c27b7 2214 { // This is a direct link to an image. e.g. http://farm1.staticflickr.com/5/5921913_ac83ed27bd_o.jpg
45034273
SS
2215 preg_match('!(http://farm\d+\.staticflickr\.com/\d+/\d+_\w+_)\w.jpg!',$url,$matches);
2216 if (!empty($matches[1])) $imageurl=$matches[1].'m.jpg';
2217 }
ad6c27b7 2218 else // This is a flickr page (html)
45034273
SS
2219 {
2220 list($httpstatus,$headers,$data) = getHTTP($url,20); // Get the flickr html page.
2221 if (strpos($httpstatus,'200 OK')!==false)
2222 {
ad6c27b7 2223 // flickr now nicely provides the URL of the thumbnail in each flickr page.
45034273
SS
2224 preg_match('!<link rel=\"image_src\" href=\"(.+?)\"!',$data,$matches);
2225 if (!empty($matches[1])) $imageurl=$matches[1];
2226
2227 // In albums (and some other pages), the link rel="image_src" is not provided,
2228 // but flickr provides:
2229 // <meta property="og:image" content="http://farm4.staticflickr.com/3398/3239339068_25d13535ff_z.jpg" />
2230 if ($imageurl=='')
2231 {
2232 preg_match('!<meta property=\"og:image\" content=\"(.+?)\"!',$data,$matches);
2233 if (!empty($matches[1])) $imageurl=$matches[1];
2234 }
2235 }
2236 }
2237
2238 if ($imageurl!='')
2239 { // Let's download the image.
2240 list($httpstatus,$headers,$data) = getHTTP($imageurl,10); // Image is 240x120, so 10 seconds to download should be enough.
2241 if (strpos($httpstatus,'200 OK')!==false)
2242 {
2243 file_put_contents($GLOBALS['config']['CACHEDIR'].'/'.$thumbname,$data); // Save image to cache.
2244 header('Content-Type: image/jpeg');
2245 echo $data;
2246 return;
2247 }
2248 }
2249 }
2250
2251 elseif ($domain=='vimeo.com' )
2252 {
2253 // This is more complex: we have to perform a HTTP request, then parse the result.
ad6c27b7 2254 // Maybe we should deport this to JavaScript ? Example: http://stackoverflow.com/questions/1361149/get-img-thumbnails-from-vimeo/4285098#4285098
45034273 2255 $vid = substr(parse_url($url,PHP_URL_PATH),1);
5f85fcd8 2256 list($httpstatus,$headers,$data) = getHTTP('https://vimeo.com/api/v2/video/'.escape($vid).'.php',5);
45034273
SS
2257 if (strpos($httpstatus,'200 OK')!==false)
2258 {
2259 $t = unserialize($data);
2260 $imageurl = $t[0]['thumbnail_medium'];
2261 // Then we download the image and serve it to our client.
2262 list($httpstatus,$headers,$data) = getHTTP($imageurl,10);
2263 if (strpos($httpstatus,'200 OK')!==false)
2264 {
2265 file_put_contents($GLOBALS['config']['CACHEDIR'].'/'.$thumbname,$data); // Save image to cache.
2266 header('Content-Type: image/jpeg');
2267 echo $data;
2268 return;
2269 }
2270 }
2271 }
2272
2273 elseif ($domain=='ted.com' || endsWith($domain,'.ted.com'))
2274 {
2275 // The thumbnail for TED talks is located in the <link rel="image_src" [...]> tag on that page
2276 // http://www.ted.com/talks/mikko_hypponen_fighting_viruses_defending_the_net.html
2277 // <link rel="image_src" href="http://images.ted.com/images/ted/28bced335898ba54d4441809c5b1112ffaf36781_389x292.jpg" />
bb8f712d 2278 list($httpstatus,$headers,$data) = getHTTP($url,5);
45034273
SS
2279 if (strpos($httpstatus,'200 OK')!==false)
2280 {
2281 // Extract the link to the thumbnail
2282 preg_match('!link rel="image_src" href="(http://images.ted.com/images/ted/.+_\d+x\d+\.jpg)"!',$data,$matches);
2283 if (!empty($matches[1]))
2284 { // Let's download the image.
2285 $imageurl=$matches[1];
2286 list($httpstatus,$headers,$data) = getHTTP($imageurl,20); // No control on image size, so wait long enough.
2287 if (strpos($httpstatus,'200 OK')!==false)
2288 {
2289 $filepath=$GLOBALS['config']['CACHEDIR'].'/'.$thumbname;
2290 file_put_contents($filepath,$data); // Save image to cache.
2291 if (resizeImage($filepath))
2292 {
2293 header('Content-Type: image/jpeg');
2294 echo file_get_contents($filepath);
2295 return;
2296 }
2297 }
2298 }
2299 }
2300 }
bb8f712d 2301
45034273
SS
2302 elseif ($domain=='xkcd.com' || endsWith($domain,'.xkcd.com'))
2303 {
2304 // There is no thumbnail available for xkcd comics, so download the whole image and resize it.
2305 // http://xkcd.com/327/
2306 // <img src="http://imgs.xkcd.com/comics/exploits_of_a_mom.png" title="<BLABLA>" alt="<BLABLA>" />
2307 list($httpstatus,$headers,$data) = getHTTP($url,5);
2308 if (strpos($httpstatus,'200 OK')!==false)
2309 {
2310 // Extract the link to the thumbnail
2311 preg_match('!<img src="(http://imgs.xkcd.com/comics/.*)" title="[^s]!',$data,$matches);
2312 if (!empty($matches[1]))
2313 { // Let's download the image.
2314 $imageurl=$matches[1];
2315 list($httpstatus,$headers,$data) = getHTTP($imageurl,20); // No control on image size, so wait long enough.
2316 if (strpos($httpstatus,'200 OK')!==false)
2317 {
2318 $filepath=$GLOBALS['config']['CACHEDIR'].'/'.$thumbname;
2319 file_put_contents($filepath,$data); // Save image to cache.
2320 if (resizeImage($filepath))
2321 {
2322 header('Content-Type: image/jpeg');
2323 echo file_get_contents($filepath);
2324 return;
2325 }
2326 }
2327 }
2328 }
bb8f712d 2329 }
45034273
SS
2330
2331 else
2332 {
2333 // For all other domains, we try to download the image and make a thumbnail.
2334 list($httpstatus,$headers,$data) = getHTTP($url,30); // We allow 30 seconds max to download (and downloads are limited to 4 Mb)
2335 if (strpos($httpstatus,'200 OK')!==false)
2336 {
2337 $filepath=$GLOBALS['config']['CACHEDIR'].'/'.$thumbname;
2338 file_put_contents($filepath,$data); // Save image to cache.
2339 if (resizeImage($filepath))
2340 {
2341 header('Content-Type: image/jpeg');
2342 echo file_get_contents($filepath);
2343 return;
2344 }
2345 }
2346 }
2347
2348
2349 // Otherwise, return an empty image (8x8 transparent gif)
2350 $blankgif = base64_decode('R0lGODlhCAAIAIAAAP///////yH5BAEKAAEALAAAAAAIAAgAAAIHjI+py+1dAAA7');
2351 file_put_contents($GLOBALS['config']['CACHEDIR'].'/'.$blankname,$blankgif); // Also put something in cache so that this URL is not requested twice.
2352 header('Content-Type: image/gif');
2353 echo $blankgif;
2354}
2355
2356// Make a thumbnail of the image (to width: 120 pixels)
2357// Returns true if success, false otherwise.
2358function resizeImage($filepath)
2359{
2360 if (!function_exists('imagecreatefromjpeg')) return false; // GD not present: no thumbnail possible.
2361
2362 // Trick: some stupid people rename GIF as JPEG... or else.
2363 // So we really try to open each image type whatever the extension is.
2364 $header=file_get_contents($filepath,false,NULL,0,256); // Read first 256 bytes and try to sniff file type.
2365 $im=false;
2366 $i=strpos($header,'GIF8'); if (($i!==false) && ($i==0)) $im = imagecreatefromgif($filepath); // Well this is crude, but it should be enough.
2367 $i=strpos($header,'PNG'); if (($i!==false) && ($i==1)) $im = imagecreatefrompng($filepath);
2368 $i=strpos($header,'JFIF'); if ($i!==false) $im = imagecreatefromjpeg($filepath);
2369 if (!$im) return false; // Unable to open image (corrupted or not an image)
2370 $w = imagesx($im);
2371 $h = imagesy($im);
2372 $ystart = 0; $yheight=$h;
2373 if ($h>$w) { $ystart= ($h/2)-($w/2); $yheight=$w/2; }
2374 $nw = 120; // Desired width
2375 $nh = min(floor(($h*$nw)/$w),120); // Compute new width/height, but maximum 120 pixels height.
2376 // Resize image:
2377 $im2 = imagecreatetruecolor($nw,$nh);
2378 imagecopyresampled($im2, $im, 0, 0, 0, $ystart, $nw, $nh, $w, $yheight);
2379 imageinterlace($im2,true); // For progressive JPEG.
2380 $tempname=$filepath.'_TEMP.jpg';
2381 imagejpeg($im2, $tempname, 90);
2382 imagedestroy($im);
2383 imagedestroy($im2);
9e820906 2384 unlink($filepath);
45034273
SS
2385 rename($tempname,$filepath); // Overwrite original picture with thumbnail.
2386 return true;
2387}
2388
2389// Invalidate caches when the database is changed or the user logs out.
ad6c27b7 2390// (e.g. tags cache).
45034273
SS
2391function invalidateCaches()
2392{
2393 unset($_SESSION['tags']); // Purge cache attached to session.
2394 pageCache::purgeCache(); // Purge page cache shared by sessions.
2395}
2396
dd484b90
A
2397try {
2398 mergeDeprecatedConfig($GLOBALS, isLoggedIn());
2399} catch(Exception $e) {
2400 error_log(
2401 'ERROR while merging deprecated options.php file.' . PHP_EOL .
2402 $e->getMessage()
2403 );
2404}
2405
45034273
SS
2406if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=genthumbnail')) { genThumbnail(); exit; } // Thumbnail generation/cache does not need the link database.
2407if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=rss')) { showRSS(); exit; }
2408if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=atom')) { showATOM(); exit; }
2409if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=dailyrss')) { showDailyRSS(); exit; }
bb8f712d 2410if (isset($_SERVER["QUERY_STRING"]) && startswith($_SERVER["QUERY_STRING"],'do=daily')) { showDaily(); exit; }
45034273
SS
2411if (!isset($_SESSION['LINKS_PER_PAGE'])) $_SESSION['LINKS_PER_PAGE']=$GLOBALS['config']['LINKS_PER_PAGE'];
2412renderPage();
03545ef6 2413?>