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