index.php

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