index.php

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