index.php

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