index.php

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