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