index.php

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