index.php

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