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