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