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