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