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