index.php

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