]>
git.immae.eu Git - github/shaarli/Shaarli.git/blob - index.php
2 // Shaarli 0.0.45beta - Shaare your links...
3 // The personal, minimalist, super-fast, no-database Delicious clone. By sebsauvage.net
4 // http://sebsauvage.net/wiki/doku.php?id=php:shaarli
5 // Licence: http://www.opensource.org/licenses/zlib-license.php
6 // Requires: PHP 5.1.x (but autocomplete fields will only work if you have PHP 5.2.x)
7 // -----------------------------------------------------------------------------------------------
8 // NEVER TRUST IN PHP.INI
9 // Some hosts do not define a default timezone in php.ini,
10 // so we have to do this for avoid the strict standard error.
11 date_default_timezone_set ( 'UTC' );
13 // -----------------------------------------------------------------------------------------------
14 // Hardcoded parameter (These parameters can be overwritten by creating the file /data/options.php)
15 $GLOBALS [ 'config' ][ 'DATADIR' ] = 'data' ; // Data subdirectory
16 $GLOBALS [ 'config' ][ 'CONFIG_FILE' ] = $GLOBALS [ 'config' ][ 'DATADIR' ]. '/config.php' ; // Configuration file (user login/password)
17 $GLOBALS [ 'config' ][ 'DATASTORE' ] = $GLOBALS [ 'config' ][ 'DATADIR' ]. '/datastore.php' ; // Data storage file.
18 $GLOBALS [ 'config' ][ 'LINKS_PER_PAGE' ] = 20 ; // Default links per page.
19 $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ] = $GLOBALS [ 'config' ][ 'DATADIR' ]. '/ipbans.php' ; // File storage for failures and bans.
20 $GLOBALS [ 'config' ][ 'BAN_AFTER' ] = 4 ; // Ban IP after this many failures.
21 $GLOBALS [ 'config' ][ 'BAN_DURATION' ] = 1800 ; // Ban duration for IP address after login failures (in seconds) (1800 sec. = 30 minutes)
22 $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ] = false ; // If true, anyone can add/edit/delete links without having to login
23 $GLOBALS [ 'config' ][ 'HIDE_TIMESTAMPS' ] = false ; // If true, the moment when links were saved are not shown to users that are not logged in.
24 $GLOBALS [ 'config' ][ 'SHOW_ATOM' ] = false ; // If true, an extra "ATOM feed" button will be displayed in the toolbar
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.
28 $GLOBALS [ 'config' ][ 'ENABLE_LOCALCACHE' ] = true ; // Enable Shaarli to store thumbnail in a local cache. Disable to reduce web space usage.
29 $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ] = '' ; // PubSubHubbub support. Put an empty string to disable, or put your hub url here to enable.
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!)
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
35 $GLOBALS [ 'config' ][ 'ARCHIVE_ORG' ] = false ; // For each link, add a link to an archived version on archive.org
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.
37 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ] = false ;
38 // -----------------------------------------------------------------------------------------------
39 // You should not touch below (or at your own risks!)
40 // Optional config file.
41 if ( is_file ( $GLOBALS [ 'config' ][ 'DATADIR' ]. '/options.php' )) require ( $GLOBALS [ 'config' ][ 'DATADIR' ]. '/options.php' );
43 define ( 'shaarli_version' , '0.0.45beta' );
44 define ( 'PHPPREFIX' , '<?php /* ' ); // Prefix to encapsulate data in PHP code.
45 define ( 'PHPSUFFIX' , ' */ ?>' ); // Suffix to encapsulate data in PHP code.
46 // http://server.com/x/shaarli --> /shaarli/
47 define ( 'WEB_PATH' , substr ( $_SERVER [ "REQUEST_URI" ], 0 , 1 +
strrpos ( $_SERVER [ "REQUEST_URI" ], '/' , 0 )));
49 // Force cookie path (but do not change lifetime)
50 $cookie = session_get_cookie_params ();
51 $cookiedir = '' ; if ( dirname ( $_SERVER [ 'SCRIPT_NAME' ])!= '/' ) $cookiedir = dirname ( $_SERVER [ "SCRIPT_NAME" ]). '/' ;
52 session_set_cookie_params ( $cookie [ 'lifetime' ], $cookiedir , $_SERVER [ 'SERVER_NAME' ]); // Set default cookie expiration and path.
54 // Set session parameters on server side.
55 define ( 'INACTIVITY_TIMEOUT' , 3600 ); // (in seconds). If the user does not access any page within this time, his/her session is considered expired.
56 ini_set ( 'session.use_cookies' , 1 ); // Use cookies to store session.
57 ini_set ( 'session.use_only_cookies' , 1 ); // Force cookies for session (phpsessionID forbidden in URL).
58 ini_set ( 'session.use_trans_sid' , false ); // Prevent PHP form using sessionID in URL if cookies are disabled.
59 session_name ( 'shaarli' );
60 if ( session_id () == '' ) session_start (); // Start session if needed (Some server auto-start sessions).
63 ini_set ( 'max_input_time' , '60' ); // High execution time in case of problematic imports/exports.
64 ini_set ( 'memory_limit' , '128M' ); // Try to set max upload file size and read (May not work on some hosts).
65 ini_set ( 'post_max_size' , '16M' );
66 ini_set ( 'upload_max_filesize' , '16M' );
68 error_reporting ( E_ALL^E_WARNING
); // See all error except warnings.
69 //error_reporting(-1); // See all errors (for debugging only)
72 require_once 'application/LinkDB.php' ;
73 require_once 'application/Utils.php' ;
75 include "inc/rain.tpl.class.php" ; //include Rain TPL
76 raintpl
:: $tpl_dir = $GLOBALS [ 'config' ][ 'RAINTPL_TPL' ]; // template directory
77 raintpl
:: $cache_dir = $GLOBALS [ 'config' ][ 'RAINTPL_TMP' ]; // cache directory
79 ob_start (); // Output buffering for the page cache.
82 // In case stupid admin has left magic_quotes enabled in php.ini:
83 if ( get_magic_quotes_gpc ())
85 function stripslashes_deep ( $value ) { $value
= is_array ( $value
) ? array_map ( 'stripslashes_deep' , $value
) : stripslashes ( $value
); return $value
; }
86 $_POST = array_map ( 'stripslashes_deep' , $_POST );
87 $_GET = array_map ( 'stripslashes_deep' , $_GET );
88 $_COOKIE = array_map ( 'stripslashes_deep' , $_COOKIE );
91 // Prevent caching on client side or proxy: (yes, it's ugly)
92 header ( "Last-Modified: " . gmdate ( "D, d M Y H:i:s" ) . " GMT" );
93 header ( "Cache-Control: no-store, no-cache, must-revalidate" );
94 header ( "Cache-Control: post-check=0, pre-check=0" , false );
95 header ( "Pragma: no-cache" );
97 // Directories creations (Note that your web host may require different rights than 705.)
98 if (! is_writable ( realpath ( dirname ( __FILE__
)))) die ( '<pre>ERROR: Shaarli does not have the right to write in its own directory.</pre>' );
100 // Handling of old config file which do not have the new parameters.
101 if ( empty ( $GLOBALS [ 'title' ])) $GLOBALS [ 'title' ]= 'Shared links on ' . htmlspecialchars ( indexUrl ());
102 if ( empty ( $GLOBALS [ 'timezone' ])) $GLOBALS [ 'timezone' ]= date_default_timezone_get ();
103 if ( empty ( $GLOBALS [ 'redirector' ])) $GLOBALS [ 'redirector' ]= '' ;
104 if ( empty ( $GLOBALS [ 'disablesessionprotection' ])) $GLOBALS [ 'disablesessionprotection' ]= false ;
105 if ( empty ( $GLOBALS [ 'disablejquery' ])) $GLOBALS [ 'disablejquery' ]= false ;
106 if ( empty ( $GLOBALS [ 'privateLinkByDefault' ])) $GLOBALS [ 'privateLinkByDefault' ]= false ;
107 if ( empty ( $GLOBALS [ 'titleLink' ])) $GLOBALS [ 'titleLink' ]= '?' ;
108 // I really need to rewrite Shaarli with a proper configuation manager.
110 // Run config screen if first run:
111 if (! is_file ( $GLOBALS [ 'config' ][ 'CONFIG_FILE' ])) install ();
113 require $GLOBALS [ 'config' ][ 'CONFIG_FILE' ]; // Read login/password hash into $GLOBALS.
115 // a token depending of deployment salt, user password, and the current ip
116 define ( 'STAY_SIGNED_IN_TOKEN' , sha1 ( $GLOBALS [ 'hash' ]. $_SERVER [ "REMOTE_ADDR" ]. $GLOBALS [ 'salt' ]));
118 autoLocale (); // Sniff browser language and set date format accordingly.
119 header ( 'Content-Type: text/html; charset=utf-8' ); // We use UTF-8 for proper international characters handling.
121 //==================================================================================================
122 // Checking session state (i.e. is the user still logged in)
123 //==================================================================================================
125 function setup_login_state () {
126 $userIsLoggedIn = false ; // By default, we do not consider the user as logged in;
127 $loginFailure = false ; // If set to true, every attempt to authenticate the user will fail. This indicates that an important condition isn't met.
128 if ( $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ]) {
129 $userIsLoggedIn = true ;
131 if (! isset ( $GLOBALS [ 'login' ])) {
132 $userIsLoggedIn = false ; // Shaarli is not configured yet.
133 $loginFailure = true ;
135 if ( isset ( $_COOKIE [ 'shaarli_staySignedIn' ]) &&
136 $_COOKIE [ 'shaarli_staySignedIn' ]=== STAY_SIGNED_IN_TOKEN
&&
140 $userIsLoggedIn = true ;
142 // If session does not exist on server side, or IP address has changed, or session has expired, logout.
143 if ( empty ( $_SESSION [ 'uid' ]) ||
144 ( $GLOBALS [ 'disablesessionprotection' ]== false && $_SESSION [ 'ip' ]!= allIPs ()) ||
145 time () >= $_SESSION [ 'expires_on' ])
148 $userIsLoggedIn = false ;
149 $loginFailure = true ;
151 if (! empty ( $_SESSION [ 'longlastingsession' ])) {
152 $_SESSION [ 'expires_on' ]= time () +
$_SESSION [ 'longlastingsession' ]; // In case of "Stay signed in" checked.
155 $_SESSION [ 'expires_on' ]= time () +INACTIVITY_TIMEOUT
; // Standard session expiration date.
157 if (! $loginFailure ) {
158 $userIsLoggedIn = true ;
161 return $userIsLoggedIn ;
163 //==================================================================================================
164 $userIsLoggedIn = setup_login_state ();
165 //==================================================================================================
166 //==================================================================================================
169 function checkphpversion ()
171 if ( version_compare ( PHP_VERSION
, '5.1.0' ) < 0 )
173 header ( 'Content-Type: text/plain; charset=utf-8' );
174 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.' ;
179 // Checks if an update is available for Shaarli.
180 // (at most once a day, and only for registered user.)
181 // Output: '' = no new version.
182 // other= the available version.
183 function checkUpdate ()
185 if (! isLoggedIn ()) return '' ; // Do not check versions for visitors.
186 if ( empty ( $GLOBALS [ 'config' ][ 'ENABLE_UPDATECHECK' ])) return '' ; // Do not check if the user doesn't want to.
188 // Get latest version number at most once a day.
189 if (! is_file ( $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ]) || ( filemtime ( $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ])< time ()-( $GLOBALS [ 'config' ][ 'UPDATECHECK_INTERVAL' ])))
191 $version = shaarli_version
;
192 list ( $httpstatus , $headers , $data ) = getHTTP ( 'https://raw.githubusercontent.com/shaarli/Shaarli/master/shaarli_version.php' , 2 );
193 if ( strpos ( $httpstatus , '200 OK' )!== false ) $version = str_replace ( ' */ ?>' , '' , str_replace ( '<?php /* ' , '' , $data ));
194 // If failed, never mind. We don't want to bother the user with that.
195 file_put_contents ( $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ], $version ); // touch file date
198 $newestversion = file_get_contents ( $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ]);
199 if ( version_compare ( $newestversion , shaarli_version
)== 1 ) return $newestversion ;
204 // -----------------------------------------------------------------------------------------------
205 // Simple cache system (mainly for the RSS/ATOM feeds).
209 private $url ; // Full URL of the page to cache (typically the value returned by pageUrl())
210 private $shouldBeCached ; // boolean: Should this url be cached?
211 private $filename ; // Name of the cache file for this url.
214 $url = URL (typically the value returned by pageUrl())
215 $shouldBeCached = boolean. If false, the cache will be disabled.
217 public function __construct ( $url , $shouldBeCached )
220 $this- > filename
= $GLOBALS [ 'config' ][ 'PAGECACHE' ]. '/' . sha1 ( $url ). '.cache' ;
221 $this- > shouldBeCached
= $shouldBeCached ;
224 // If the page should be cached and a cached version exists,
225 // returns the cached version (otherwise, return null).
226 public function cachedVersion ()
228 if (! $this- > shouldBeCached
) return null ;
229 if ( is_file ( $this- > filename
)) { return file_get_contents ( $this
-> filename
); exit ; }
233 // Put a page in the cache.
234 public function cache ( $page )
236 if (! $this- > shouldBeCached
) return ;
237 file_put_contents ( $this- > filename
, $page );
240 // Purge the whole cache.
241 // (call with pageCache::purgeCache())
242 public static function purgeCache ()
244 if ( is_dir ( $GLOBALS [ 'config' ][ 'PAGECACHE' ]))
246 $handler = opendir ( $GLOBALS [ 'config' ][ 'PAGECACHE' ]);
247 if ( $handler !== false )
249 while (( $filename = readdir ( $handler ))!== false )
251 if ( endsWith ( $filename , '.cache' )) { unlink ( $GLOBALS
[ 'config' ][ 'PAGECACHE' ]. '/' . $filename
); }
261 // -----------------------------------------------------------------------------------------------
263 function logm ( $message )
265 $t = strval ( date ( 'Y/m/d_H:i:s' )). ' - ' . $_SERVER [ "REMOTE_ADDR" ]. ' - ' . strval ( $message ). " \n " ;
266 file_put_contents ( $GLOBALS [ 'config' ][ 'DATADIR' ]. '/log.txt' , $t , FILE_APPEND
);
269 // Same as nl2br(), but escapes < and >
270 function nl2br_escaped ( $html )
272 return str_replace ( '>' , '>' , str_replace ( '<' , '<' , nl2br ( $html )));
275 // In a string, converts URLs to clickable links.
276 // Function inspired from http://www.php.net/manual/en/function.preg-replace.php#85722
277 function text2clickable ( $url )
279 $redir = empty ( $GLOBALS [ 'redirector' ]) ? '' : $GLOBALS [ 'redirector' ];
280 return preg_replace ( '!(((?:https?|ftp|file)://|apt:|magnet:)\S+[[:alnum:]]/?)!si' , '<a href="' . $redir . ' $1" rel="nofollow"> $1 </a>' , $url );
283 // This function inserts where relevant so that multiple spaces are properly displayed in HTML
284 // even in the absence of <pre> (This is used in description to keep text formatting)
285 function keepMultipleSpaces ( $text )
287 return str_replace ( ' ' , ' ' , $text );
290 // ------------------------------------------------------------------------------------------
291 // Sniff browser language to display dates in the right format automatically.
292 // (Note that is may not work on your server if the corresponding local is not installed.)
293 function autoLocale ()
295 $attempts = array ( 'en_US' ); // Default if browser does not send HTTP_ACCEPT_LANGUAGE
296 if ( isset ( $_SERVER [ 'HTTP_ACCEPT_LANGUAGE' ])) // e.g. "fr,fr-fr;q=0.8,en;q=0.5,en-us;q=0.3"
297 { // (It's a bit crude, but it works very well. Preferred language is always presented first.)
298 if ( preg_match ( '/([a-z] {2} )-?([a-z] {2} )?/i' , $_SERVER [ 'HTTP_ACCEPT_LANGUAGE' ], $matches )) {
299 $loc = $matches [ 1 ] . (! empty ( $matches [ 2 ]) ? '_' . strtoupper ( $matches [ 2 ]) : '' );
300 $attempts = array ( $loc . '.UTF-8' , $loc , str_replace ( '_' , '-' , $loc ). '.UTF-8' , str_replace ( '_' , '-' , $loc ),
301 $loc . '_' . strtoupper ( $loc ). '.UTF-8' , $loc . '_' . strtoupper ( $loc ),
302 $loc . '_' . $loc . '.UTF-8' , $loc . '_' . $loc , $loc . '-' . strtoupper ( $loc ). '.UTF-8' ,
303 $loc . '-' . strtoupper ( $loc ), $loc . '-' . $loc . '.UTF-8' , $loc . '-' . $loc );
306 setlocale ( LC_TIME
, $attempts ); // LC_TIME = Set local for date/time format only.
309 // ------------------------------------------------------------------------------------------
310 // PubSubHubbub protocol support (if enabled) [UNTESTED]
311 // (Source: http://aldarone.fr/les-flux-rss-shaarli-et-pubsubhubbub/ )
312 if (! empty ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ])) include './publisher.php' ;
315 if (! empty ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]))
317 $p = new Publisher ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]);
319 indexUrl (). '?do=atom' ,
322 $p- > publish_update ( $topic_url );
326 // ------------------------------------------------------------------------------------------
327 // Session management
329 // Returns the IP address of the client (Used to prevent session cookie hijacking.)
332 $ip = $_SERVER [ "REMOTE_ADDR" ];
333 // Then we use more HTTP headers to prevent session hijacking from users behind the same proxy.
334 if ( isset ( $_SERVER [ 'HTTP_X_FORWARDED_FOR' ])) { $ip
= $ip
. '_' . $_SERVER
[ 'HTTP_X_FORWARDED_FOR' ]; }
335 if ( isset ( $_SERVER [ 'HTTP_CLIENT_IP' ])) { $ip
= $ip
. '_' . $_SERVER
[ 'HTTP_CLIENT_IP' ]; }
339 function fillSessionInfo () {
340 $_SESSION [ 'uid' ] = sha1 ( uniqid ( '' , true ). '_' . mt_rand ()); // Generate unique random number (different than phpsessionid)
341 $_SESSION [ 'ip' ]= allIPs (); // We store IP address(es) of the client to make sure session is not hijacked.
342 $_SESSION [ 'username' ]= $GLOBALS [ 'login' ];
343 $_SESSION [ 'expires_on' ]= time () +INACTIVITY_TIMEOUT
; // Set session expiration.
346 // Check that user/password is correct.
347 function check_auth ( $login , $password )
349 $hash = sha1 ( $password . $login . $GLOBALS [ 'salt' ]);
350 if ( $login == $GLOBALS [ 'login' ] && $hash == $GLOBALS [ 'hash' ])
351 { // Login/password is correct.
353 logm ( 'Login successful' );
356 logm ( 'Login failed for user ' . $login );
360 // Returns true if the user is logged in.
361 function isLoggedIn ()
363 global $userIsLoggedIn ;
364 return $userIsLoggedIn ;
369 if ( isset ( $_SESSION )) {
370 unset ( $_SESSION [ 'uid' ]);
371 unset ( $_SESSION [ 'ip' ]);
372 unset ( $_SESSION [ 'username' ]);
373 unset ( $_SESSION [ 'privateonly' ]);
375 setcookie ( 'shaarli_staySignedIn' , FALSE , 0 , WEB_PATH
);
379 // ------------------------------------------------------------------------------------------
380 // Brute force protection system
381 // Several consecutive failed logins will ban the IP address for 30 minutes.
382 if (! is_file ( $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ])) file_put_contents ( $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ], "<?php \n\$ GLOBALS['IPBANS']=" . var_export ( array ( 'FAILURES' => array (), 'BANS' => array ()), true ). "; \n ?>" );
383 include $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ];
384 // Signal a failed login. Will ban the IP if too many failures:
385 function ban_loginFailed ()
387 $ip = $_SERVER [ "REMOTE_ADDR" ]; $gb = $GLOBALS [ 'IPBANS' ];
388 if (! isset ( $gb [ 'FAILURES' ][ $ip ])) $gb [ 'FAILURES' ][ $ip ]= 0 ;
389 $gb [ 'FAILURES' ][ $ip ] ++
;
390 if ( $gb [ 'FAILURES' ][ $ip ]>( $GLOBALS [ 'config' ][ 'BAN_AFTER' ]- 1 ))
392 $gb [ 'BANS' ][ $ip ]= time () +
$GLOBALS [ 'config' ][ 'BAN_DURATION' ];
393 logm ( 'IP address banned from login' );
395 $GLOBALS [ 'IPBANS' ] = $gb ;
396 file_put_contents ( $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ], "<?php \n\$ GLOBALS['IPBANS']=" . var_export ( $gb , true ). "; \n ?>" );
399 // Signals a successful login. Resets failed login counter.
400 function ban_loginOk ()
402 $ip = $_SERVER [ "REMOTE_ADDR" ]; $gb = $GLOBALS [ 'IPBANS' ];
403 unset ( $gb [ 'FAILURES' ][ $ip ]); unset ( $gb [ 'BANS' ][ $ip ]);
404 $GLOBALS [ 'IPBANS' ] = $gb ;
405 file_put_contents ( $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ], "<?php \n\$ GLOBALS['IPBANS']=" . var_export ( $gb , true ). "; \n ?>" );
408 // Checks if the user CAN login. If 'true', the user can try to login.
409 function ban_canLogin ()
411 $ip = $_SERVER [ "REMOTE_ADDR" ]; $gb = $GLOBALS [ 'IPBANS' ];
412 if ( isset ( $gb [ 'BANS' ][ $ip ]))
414 // User is banned. Check if the ban has expired:
415 if ( $gb [ 'BANS' ][ $ip ]<= time ())
416 { // Ban expired, user can try to login again.
418 unset ( $gb [ 'FAILURES' ][ $ip ]); unset ( $gb [ 'BANS' ][ $ip ]);
419 file_put_contents ( $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ], "<?php \n\$ GLOBALS['IPBANS']=" . var_export ( $gb , true ). "; \n ?>" );
420 return true ; // Ban has expired, user can login.
422 return false ; // User is banned.
424 return true ; // User is not banned.
427 // ------------------------------------------------------------------------------------------
428 // Process login form: Check if login/password is correct.
429 if ( isset ( $_POST [ 'login' ]))
431 if (! ban_canLogin ()) die ( 'I said: NO. You are banned for the moment. Go away.' );
432 if ( isset ( $_POST [ 'password' ]) && tokenOk ( $_POST [ 'token' ]) && ( check_auth ( $_POST [ 'login' ], $_POST [ 'password' ])))
433 { // Login/password is OK.
435 // If user wants to keep the session cookie even after the browser closes:
436 if (! empty ( $_POST [ 'longlastingsession' ]))
438 setcookie ( 'shaarli_staySignedIn' , STAY_SIGNED_IN_TOKEN
, time () +
31536000 , WEB_PATH
);
439 $_SESSION [ 'longlastingsession' ]= 31536000 ; // (31536000 seconds = 1 year)
440 $_SESSION [ 'expires_on' ]= time () +
$_SESSION [ 'longlastingsession' ]; // Set session expiration on server-side.
442 $cookiedir = '' ; if ( dirname ( $_SERVER [ 'SCRIPT_NAME' ])!= '/' ) $cookiedir = dirname ( $_SERVER [ "SCRIPT_NAME" ]). '/' ;
443 session_set_cookie_params ( $_SESSION [ 'longlastingsession' ], $cookiedir , $_SERVER [ 'SERVER_NAME' ]); // Set session cookie expiration on client side
444 // Note: Never forget the trailing slash on the cookie path!
445 session_regenerate_id ( true ); // Send cookie with new expiration date to browser.
447 else // Standard session expiration (=when browser closes)
449 $cookiedir = '' ; if ( dirname ( $_SERVER [ 'SCRIPT_NAME' ])!= '/' ) $cookiedir = dirname ( $_SERVER [ "SCRIPT_NAME" ]). '/' ;
450 session_set_cookie_params ( 0 , $cookiedir , $_SERVER [ 'SERVER_NAME' ]); // 0 means "When browser closes"
451 session_regenerate_id ( true );
453 // Optional redirect after login:
454 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 ; }
455 if ( isset ( $_POST [ 'returnurl' ]))
457 if ( endsWith ( $_POST [ 'returnurl' ], '?do=login' )) { header ( 'Location: ?' ); exit ; } // Prevent loops over login screen.
458 header ( 'Location: ' . $_POST [ 'returnurl' ]); exit ;
460 header ( 'Location: ?' ); exit ;
466 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' ]): '' ); }
467 echo '<script>alert("Wrong login/password.");document.location= \' ?do=login' . $redir . ' \' ;</script>' ; // Redirect to login screen.
472 // ------------------------------------------------------------------------------------------
473 // Misc utility functions:
475 // Returns the server URL (including port and http/https), without path.
476 // e.g. "http://myserver.com:8080"
477 // You can append $_SERVER['SCRIPT_NAME'] to get the current script URL.
480 $https = (! empty ( $_SERVER [ 'HTTPS' ]) && ( strtolower ( $_SERVER [ 'HTTPS' ])== 'on' )) || $_SERVER [ "SERVER_PORT" ]== '443' ; // HTTPS detection.
481 $serverport = ( $_SERVER [ "SERVER_PORT" ]== '80' || ( $https && $_SERVER [ "SERVER_PORT" ]== '443' ) ? '' : ':' . $_SERVER [ "SERVER_PORT" ]);
482 return 'http' .( $https ? 's' : '' ). '://' . $_SERVER [ 'SERVER_NAME' ]. $serverport ;
485 // Returns the absolute URL of current script, without the query.
486 // (e.g. http://sebsauvage.net/links/)
489 $scriptname = $_SERVER [ "SCRIPT_NAME" ];
490 // If the script is named 'index.php', we remove it (for better looking URLs,
491 // e.g. http://mysite.com/shaarli/?abcde instead of http://mysite.com/shaarli/index.php?abcde)
492 if ( endswith ( $scriptname , 'index.php' )) $scriptname = substr ( $scriptname , 0 , strlen ( $scriptname )- 9 );
493 return serverUrl () . $scriptname ;
496 // Returns the absolute URL of current script, WITH the query.
497 // (e.g. http://sebsauvage.net/links/?toto=titi&spamspamspam=humbug)
500 return indexUrl ().(! empty ( $_SERVER [ "QUERY_STRING" ]) ? '?' . $_SERVER [ "QUERY_STRING" ] : '' );
503 // Convert post_max_size/upload_max_filesize (e.g. '16M') parameters to bytes.
504 function return_bytes ( $val )
506 $val = trim ( $val ); $last = strtolower ( $val [ strlen ( $val )- 1 ]);
509 case 'g' : $val *= 1024 ;
510 case 'm' : $val *= 1024 ;
511 case 'k' : $val *= 1024 ;
516 // Try to determine max file size for uploads (POST).
517 // Returns an integer (in bytes)
518 function getMaxFileSize ()
520 $size1 = return_bytes ( ini_get ( 'post_max_size' ));
521 $size2 = return_bytes ( ini_get ( 'upload_max_filesize' ));
522 // Return the smaller of two:
523 $maxsize = min ( $size1 , $size2 );
524 // FIXME: Then convert back to readable notations ? (e.g. 2M instead of 2000000)
528 /* Converts a linkdate time (YYYYMMDD_HHMMSS) of an article to a timestamp (Unix epoch)
529 (used to build the ADD_DATE attribute in Netscape-bookmarks file)
530 PS: I could have used strptime(), but it does not exist on Windows. I'm too kind. */
531 function linkdate2timestamp ( $linkdate )
533 if ( strcmp ( $linkdate , '_000000' ) !== 0 || ! $linkdate ){
535 $r = sscanf ( $linkdate , '%4d%2d%2d_%2d%2d%2d' , $Y , $M , $D , $h , $m , $s );
536 return mktime ( $h , $m , $s , $M , $D , $Y );
541 /* Converts a linkdate time (YYYYMMDD_HHMMSS) of an article to a RFC822 date.
542 (used to build the pubDate attribute in RSS feed.) */
543 function linkdate2rfc822 ( $linkdate )
545 return date ( 'r' , linkdate2timestamp ( $linkdate )); // 'r' is for RFC822 date format.
548 /* Converts a linkdate time (YYYYMMDD_HHMMSS) of an article to a ISO 8601 date.
549 (used to build the updated tags in ATOM feed.) */
550 function linkdate2iso8601 ( $linkdate )
552 return date ( 'c' , linkdate2timestamp ( $linkdate )); // 'c' is for ISO 8601 date format.
555 // Parse HTTP response headers and return an associative array.
556 function http_parse_headers_shaarli ( $headers )
559 foreach ( $headers as $header )
561 $i = strpos ( $header , ': ' );
564 $key = substr ( $header , 0 , $i );
565 $value = substr ( $header , $i +
2 , strlen ( $header )- $i-2 );
573 Input: $url : URL to get (http://...)
574 $timeout : Network timeout (will wait this many seconds for an anwser before giving up).
575 Output: An array. [0] = HTTP status message (e.g. "HTTP/1.1 200 OK") or error message
576 [1] = associative array containing HTTP response headers (e.g. echo getHTTP($url)[1]['Content-Type'])
578 Example: list($httpstatus,$headers,$data) = getHTTP('http://sebauvage.net/');
579 if (strpos($httpstatus,'200 OK')!==false)
580 echo 'Data type: '.htmlspecialchars($headers['Content-Type']);
582 echo 'There was an error: '.htmlspecialchars($httpstatus)
584 function getHTTP ( $url , $timeout = 30 )
588 $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
589 $context = stream_context_create ( $options );
590 $data = file_get_contents ( $url , false , $context ,- 1 , 4000000 ); // We download at most 4 Mb from source.
591 if (! $data ) { return array ( 'HTTP Error' , array (), '' ); }
592 $httpStatus = $http_response_header [ 0 ]; // e.g. "HTTP/1.1 200 OK"
593 $responseHeaders = http_parse_headers_shaarli ( $http_response_header );
594 return array ( $httpStatus , $responseHeaders , $data );
596 catch ( Exception
$e ) // getHTTP *can* fail silently (we don't care if the title cannot be fetched)
598 return array ( $e- > getMessage (), '' , '' );
602 // Extract title from an HTML document.
603 // (Returns an empty string if not found.)
604 function html_extract_title ( $html )
606 return preg_match ( '!<title>(.*?)</title>!is' , $html , $matches ) ? trim ( str_replace ( " \n " , ' ' , $matches [ 1 ])) : '' ;
609 // ------------------------------------------------------------------------------------------
610 // Token management for XSRF protection
611 // Token should be used in any form which acts on data (create,update,delete,import...).
612 if (! isset ( $_SESSION [ 'tokens' ])) $_SESSION [ 'tokens' ]= array (); // Token are attached to the session.
617 $rnd = sha1 ( uniqid ( '' , true ). '_' . mt_rand (). $GLOBALS [ 'salt' ]); // We generate a random string.
618 $_SESSION [ 'tokens' ][ $rnd ]= 1 ; // Store it on the server side.
622 // Tells if a token is OK. Using this function will destroy the token.
624 function tokenOk ( $token )
626 if ( isset ( $_SESSION [ 'tokens' ][ $token ]))
628 unset ( $_SESSION [ 'tokens' ][ $token ]); // Token is used: destroy it.
629 return true ; // Token is OK.
631 return false ; // Wrong token, or already used.
634 // ------------------------------------------------------------------------------------------
635 /* This class is in charge of building the final page.
636 (This is basically a wrapper around RainTPL which pre-fills some fields.)
638 p.assign('myfield','myvalue');
639 p.renderPage('mytemplate');
644 private $tpl ; // RainTPL template
646 function __construct ()
651 private function initialize ()
653 $this- > tpl
= new RainTPL
;
654 $this- > tpl
-> assign ( 'newversion' , checkUpdate ());
655 $this- > tpl
-> assign ( 'feedurl' , htmlspecialchars ( indexUrl ()));
656 $searchcrits = '' ; // Search criteria
657 if (! empty ( $_GET [ 'searchtags' ])) $searchcrits .= '&searchtags=' . urlencode ( $_GET [ 'searchtags' ]);
658 elseif (! empty ( $_GET [ 'searchterm' ])) $searchcrits .= '&searchterm=' . urlencode ( $_GET [ 'searchterm' ]);
659 $this- > tpl
-> assign ( 'searchcrits' , $searchcrits );
660 $this- > tpl
-> assign ( 'source' , indexUrl ());
661 $this- > tpl
-> assign ( 'version' , shaarli_version
);
662 $this- > tpl
-> assign ( 'scripturl' , indexUrl ());
663 $this- > tpl
-> assign ( 'pagetitle' , 'Shaarli' );
664 $this- > tpl
-> assign ( 'privateonly' ,! empty ( $_SESSION [ 'privateonly' ])); // Show only private links?
665 if (! empty ( $GLOBALS [ 'title' ])) $this- > tpl
-> assign ( 'pagetitle' , $GLOBALS [ 'title' ]);
666 if (! empty ( $GLOBALS [ 'titleLink' ])) $this- > tpl
-> assign ( 'titleLink' , $GLOBALS [ 'titleLink' ]);
667 if (! empty ( $GLOBALS [ 'pagetitle' ])) $this- > tpl
-> assign ( 'pagetitle' , $GLOBALS [ 'pagetitle' ]);
668 $this- > tpl
-> assign ( 'shaarlititle' , empty ( $GLOBALS [ 'title' ]) ? 'Shaarli' : $GLOBALS [ 'title' ] );
672 // The following assign() method is basically the same as RainTPL (except that it's lazy)
673 public function assign ( $what , $where )
675 if ( $this- > tpl
=== false ) $this- > initialize (); // Lazy initialization
676 $this- > tpl
-> assign ( $what , $where );
679 // Render a specific page (using a template).
680 // e.g. pb.renderPage('picwall')
681 public function renderPage ( $page )
683 if ( $this- > tpl
=== false ) $this- > initialize (); // Lazy initialization
684 $this- > tpl
-> draw ( $page );
688 // ------------------------------------------------------------------------------------------
689 // Output the last N links in RSS 2.0 format.
692 header ( 'Content-Type: application/rss+xml; charset=utf-8' );
694 // $usepermalink : If true, use permalink instead of final link.
695 // User just has to add 'permalink' in URL parameters. e.g. http://mysite.com/shaarli/?do=rss&permalinks
696 // Also enabled through a config option
697 $usepermalinks = isset ( $_GET [ 'permalinks' ]) || ! $GLOBALS [ 'config' ][ 'ENABLE_RSS_PERMALINKS' ];
700 $query = $_SERVER [ "QUERY_STRING" ];
701 $cache = new pageCache ( pageUrl (), startsWith ( $query , 'do=rss' ) && ! isLoggedIn ());
702 $cached = $cache- > cachedVersion (); if (! empty ( $cached )) { echo $cached
; exit ; }
704 // If cached was not found (or not usable), then read the database and build the response:
705 $LINKSDB = new LinkDB (
706 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
707 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
709 // Read links from database (and filter private links if user it not logged in).
711 // Optionally filter the results:
712 $linksToDisplay = array ();
713 if (! empty ( $_GET [ 'searchterm' ])) $linksToDisplay = $LINKSDB- > filterFulltext ( $_GET [ 'searchterm' ]);
714 else if (! empty ( $_GET [ 'searchtags' ])) $linksToDisplay = $LINKSDB- > filterTags ( trim ( $_GET [ 'searchtags' ]));
715 else $linksToDisplay = $LINKSDB ;
717 $nblinksToDisplay = 50 ; // Number of links to display.
718 if (! empty ( $_GET [ 'nb' ])) // In URL, you can specificy the number of links. Example: nb=200 or nb=all for all links.
720 $nblinksToDisplay = $_GET [ 'nb' ]== 'all' ? count ( $linksToDisplay ) : max ( $_GET [ 'nb' ] +
0 , 1 ) ;
723 $pageaddr = htmlspecialchars ( indexUrl ());
724 echo '<?xml version="1.0" encoding="UTF-8"?><rss version="2.0" xmlns:content="http://purl.org/rss/1.0/modules/content/">' ;
725 echo '<channel><title>' . htmlspecialchars ( $GLOBALS [ 'title' ]). '</title><link>' . $pageaddr . '</link>' ;
726 echo '<description>Shared links</description><language>en-en</language><copyright>' . $pageaddr . '</copyright>' . " \n\n " ;
727 if (! empty ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]))
729 echo '<!-- PubSubHubbub Discovery -->' ;
730 echo '<link rel="hub" href="' . htmlspecialchars ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]). '" xmlns="http://www.w3.org/2005/Atom" />' ;
731 echo '<link rel="self" href="' . htmlspecialchars ( $pageaddr ). '?do=rss" xmlns="http://www.w3.org/2005/Atom" />' ;
732 echo '<!-- End Of PubSubHubbub Discovery -->' ;
735 $keys = array (); foreach ( $linksToDisplay as $key => $value ) { $keys
[]= $key
; } // No, I can't use array_keys().
736 while ( $i < $nblinksToDisplay && $i < count ( $keys ))
738 $link = $linksToDisplay [ $keys [ $i ]];
739 $guid = $pageaddr . '?' . smallHash ( $link [ 'linkdate' ]);
740 $rfc822date = linkdate2rfc822 ( $link [ 'linkdate' ]);
741 $absurl = htmlspecialchars ( $link [ 'url' ]);
742 if ( startsWith ( $absurl , '?' )) $absurl = $pageaddr . $absurl ; // make permalink URL absolute
743 if ( $usepermalinks === true )
744 echo '<item><title>' . htmlspecialchars ( $link [ 'title' ]). '</title><guid isPermaLink="true">' . $guid . '</guid><link>' . $guid . '</link>' ;
746 echo '<item><title>' . htmlspecialchars ( $link [ 'title' ]). '</title><guid isPermaLink="false">' . $guid . '</guid><link>' . $absurl . '</link>' ;
747 if (! $GLOBALS [ 'config' ][ 'HIDE_TIMESTAMPS' ] || isLoggedIn ()) echo '<pubDate>' . htmlspecialchars ( $rfc822date ). "</pubDate> \n " ;
748 if ( $link [ 'tags' ]!= '' ) // Adding tags to each RSS entry (as mentioned in RSS specification)
750 foreach ( explode ( ' ' , $link [ 'tags' ]) as $tag ) { echo '<category domain="' . htmlspecialchars ( $pageaddr
). '">' . htmlspecialchars ( $tag
). '</category>' . " \n " ; }
753 // Add permalink in description
754 $descriptionlink = '(<a href="' . $guid . '">Permalink</a>)' ;
755 // If user wants permalinks first, put the final link in description
756 if ( $usepermalinks === true ) $descriptionlink = '(<a href="' . $absurl . '">Link</a>)' ;
757 if ( strlen ( $link [ 'description' ])> 0 ) $descriptionlink = '<br>' . $descriptionlink ;
758 echo '<description><![CDATA[' . nl2br ( keepMultipleSpaces ( text2clickable ( htmlspecialchars ( $link [ 'description' ])))). $descriptionlink . ']]></description>' . " \n </item> \n " ;
761 echo '</channel></rss><!-- Cached version of ' . htmlspecialchars ( pageUrl ()). ' -->' ;
763 $cache- > cache ( ob_get_contents ());
768 // ------------------------------------------------------------------------------------------
769 // Output the last N links in ATOM format.
772 header ( 'Content-Type: application/atom+xml; charset=utf-8' );
774 // $usepermalink : If true, use permalink instead of final link.
775 // User just has to add 'permalink' in URL parameters. e.g. http://mysite.com/shaarli/?do=atom&permalinks
776 $usepermalinks = isset ( $_GET [ 'permalinks' ]) || ! $GLOBALS [ 'config' ][ 'ENABLE_RSS_PERMALINKS' ];
779 $query = $_SERVER [ "QUERY_STRING" ];
780 $cache = new pageCache ( pageUrl (), startsWith ( $query , 'do=atom' ) && ! isLoggedIn ());
781 $cached = $cache- > cachedVersion (); if (! empty ( $cached )) { echo $cached
; exit ; }
782 // If cached was not found (or not usable), then read the database and build the response:
784 $LINKSDB = new LinkDB (
785 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
786 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
789 // Optionally filter the results:
790 $linksToDisplay = array ();
791 if (! empty ( $_GET [ 'searchterm' ])) $linksToDisplay = $LINKSDB- > filterFulltext ( $_GET [ 'searchterm' ]);
792 else if (! empty ( $_GET [ 'searchtags' ])) $linksToDisplay = $LINKSDB- > filterTags ( trim ( $_GET [ 'searchtags' ]));
793 else $linksToDisplay = $LINKSDB ;
795 $nblinksToDisplay = 50 ; // Number of links to display.
796 if (! empty ( $_GET [ 'nb' ])) // In URL, you can specificy the number of links. Example: nb=200 or nb=all for all links.
798 $nblinksToDisplay = $_GET [ 'nb' ]== 'all' ? count ( $linksToDisplay ) : max ( $_GET [ 'nb' ] +
0 , 1 ) ;
801 $pageaddr = htmlspecialchars ( indexUrl ());
805 $keys = array (); foreach ( $linksToDisplay as $key => $value ) { $keys
[]= $key
; } // No, I can't use array_keys().
806 while ( $i < $nblinksToDisplay && $i < count ( $keys ))
808 $link = $linksToDisplay [ $keys [ $i ]];
809 $guid = $pageaddr . '?' . smallHash ( $link [ 'linkdate' ]);
810 $iso8601date = linkdate2iso8601 ( $link [ 'linkdate' ]);
811 $latestDate = max ( $latestDate , $iso8601date );
812 $absurl = htmlspecialchars ( $link [ 'url' ]);
813 if ( startsWith ( $absurl , '?' )) $absurl = $pageaddr . $absurl ; // make permalink URL absolute
814 $entries .= '<entry><title>' . htmlspecialchars ( $link [ 'title' ]). '</title>' ;
815 if ( $usepermalinks === true )
816 $entries .= '<link href="' . $guid . '" /><id>' . $guid . '</id>' ;
818 $entries .= '<link href="' . $absurl . '" /><id>' . $guid . '</id>' ;
819 if (! $GLOBALS [ 'config' ][ 'HIDE_TIMESTAMPS' ] || isLoggedIn ()) $entries .= '<updated>' . htmlspecialchars ( $iso8601date ). '</updated>' ;
821 // Add permalink in description
822 $descriptionlink = htmlspecialchars ( '(<a href="' . $guid . '">Permalink</a>)' );
823 // If user wants permalinks first, put the final link in description
824 if ( $usepermalinks === true ) $descriptionlink = htmlspecialchars ( '(<a href="' . $absurl . '">Link</a>)' );
825 if ( strlen ( $link [ 'description' ])> 0 ) $descriptionlink = '<br>' . $descriptionlink ;
827 $entries .= '<content type="html">' . htmlspecialchars ( nl2br ( keepMultipleSpaces ( text2clickable ( htmlspecialchars ( $link [ 'description' ]))))). $descriptionlink . "</content> \n " ;
828 if ( $link [ 'tags' ]!= '' ) // Adding tags to each ATOM entry (as mentioned in ATOM specification)
830 foreach ( explode ( ' ' , $link [ 'tags' ]) as $tag )
831 { $entries
.= '<category scheme="' . htmlspecialchars ( $pageaddr
, ENT_QUOTES
). '" term="' . htmlspecialchars ( $tag
, ENT_QUOTES
). '" />' . " \n " ; }
833 $entries .= "</entry> \n " ;
836 $feed = '<?xml version="1.0" encoding="UTF-8"?><feed xmlns="http://www.w3.org/2005/Atom">' ;
837 $feed .= '<title>' . htmlspecialchars ( $GLOBALS [ 'title' ]). '</title>' ;
838 if (! $GLOBALS [ 'config' ][ 'HIDE_TIMESTAMPS' ] || isLoggedIn ()) $feed .= '<updated>' . htmlspecialchars ( $latestDate ). '</updated>' ;
839 $feed .= '<link rel="self" href="' . htmlspecialchars ( serverUrl (). $_SERVER [ "REQUEST_URI" ]). '" />' ;
840 if (! empty ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]))
842 $feed .= '<!-- PubSubHubbub Discovery -->' ;
843 $feed .= '<link rel="hub" href="' . htmlspecialchars ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]). '" />' ;
844 $feed .= '<!-- End Of PubSubHubbub Discovery -->' ;
846 $feed .= '<author><name>' . htmlspecialchars ( $pageaddr ). '</name><uri>' . htmlspecialchars ( $pageaddr ). '</uri></author>' ;
847 $feed .= '<id>' . htmlspecialchars ( $pageaddr ). '</id>' . " \n\n " ; // Yes, I know I should use a real IRI (RFC3987), but the site URL will do.
849 $feed .= '</feed><!-- Cached version of ' . htmlspecialchars ( pageUrl ()). ' -->' ;
852 $cache- > cache ( ob_get_contents ());
857 // ------------------------------------------------------------------------------------------
858 // Daily RSS feed: 1 RSS entry per day giving all the links on that day.
859 // Gives the last 7 days (which have links).
860 // This RSS feed cannot be filtered.
861 function showDailyRSS ()
864 $query = $_SERVER [ "QUERY_STRING" ];
865 $cache = new pageCache ( pageUrl (), startsWith ( $query , 'do=dailyrss' ) && ! isLoggedIn ());
866 $cached = $cache- > cachedVersion (); if (! empty ( $cached )) { echo $cached
; exit ; }
867 // If cached was not found (or not usable), then read the database and build the response:
869 $LINKSDB = new LinkDB (
870 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
871 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
874 /* Some Shaarlies may have very few links, so we need to look
875 back in time (rsort()) until we have enough days ($nb_of_days).
877 $linkdates = array (); foreach ( $LINKSDB as $linkdate => $value ) { $linkdates
[]= $linkdate
; }
879 $nb_of_days = 7 ; // We take 7 days.
882 foreach ( $linkdates as $linkdate )
884 $day = substr ( $linkdate , 0 , 8 ); // Extract day (without time)
885 if ( strcmp ( $day , $today )< 0 )
887 if ( empty ( $days [ $day ])) $days [ $day ]= array ();
888 $days [ $day ][]= $linkdate ;
890 if ( count ( $days )> $nb_of_days ) break ; // Have we collected enough days?
893 // Build the RSS feed.
894 header ( 'Content-Type: application/rss+xml; charset=utf-8' );
895 $pageaddr = htmlspecialchars ( indexUrl ());
896 echo '<?xml version="1.0" encoding="UTF-8"?><rss version="2.0">' ;
897 echo '<channel><title>Daily - ' . htmlspecialchars ( $GLOBALS [ 'title' ]). '</title><link>' . $pageaddr . '</link>' ;
898 echo '<description>Daily shared links</description><language>en-en</language><copyright>' . $pageaddr . '</copyright>' . " \n " ;
900 foreach ( $days as $day => $linkdates ) // For each day.
902 $daydate = utf8_encode ( strftime ( '%A %d, %B %Y' , linkdate2timestamp ( $day . '_000000' ))); // Full text date
903 $rfc822date = linkdate2rfc822 ( $day . '_000000' );
904 $absurl = htmlspecialchars ( indexUrl (). '?do=daily&day=' . $day ); // Absolute URL of the corresponding "Daily" page.
905 echo '<item><title>' . htmlspecialchars ( $GLOBALS [ 'title' ]. ' - ' . $daydate ). '</title><guid>' . $absurl . '</guid><link>' . $absurl . '</link>' ;
906 echo '<pubDate>' . htmlspecialchars ( $rfc822date ). "</pubDate>" ;
908 // Build the HTML body of this RSS entry.
912 // We pre-format some fields for proper output.
913 foreach ( $linkdates as $linkdate )
915 $l = $LINKSDB [ $linkdate ];
916 $l [ 'formatedDescription' ]= nl2br ( keepMultipleSpaces ( text2clickable ( htmlspecialchars ( $l [ 'description' ]))));
917 $l [ 'thumbnail' ] = thumbnail ( $l [ 'url' ]);
918 $l [ 'timestamp' ] = linkdate2timestamp ( $l [ 'linkdate' ]);
919 if ( startsWith ( $l [ 'url' ], '?' )) $l [ 'url' ]= indexUrl (). $l [ 'url' ]; // make permalink URL absolute
920 $links [ $linkdate ]= $l ;
922 // Then build the HTML for this day:
924 $tpl- > assign ( 'links' , $links );
925 $html = $tpl- > draw ( 'dailyrss' , $return_string = true );
927 echo '<description><![CDATA[' . $html . ']]></description>' . " \n </item> \n\n " ;
930 echo '</channel></rss><!-- Cached version of ' . htmlspecialchars ( pageUrl ()). ' -->' ;
932 $cache- > cache ( ob_get_contents ());
940 $LINKSDB = new LinkDB (
941 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
942 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
945 $day = Date ( 'Ymd' , strtotime ( '-1 day' )); // Yesterday, in format YYYYMMDD.
946 if ( isset ( $_GET [ 'day' ])) $day = $_GET [ 'day' ];
948 $days = $LINKSDB- > days ();
949 $i = array_search ( $day , $days );
950 if ( $i == false ) { $i
= count ( $days
)- 1 ; $day
= $days
[ $i
]; }
955 if ( $i > 1 ) $previousday = $days [ $i-1 ];
956 if ( $i < count ( $days )- 1 ) $nextday = $days [ $i +
1 ];
959 $linksToDisplay = $LINKSDB- > filterDay ( $day );
960 // We pre-format some fields for proper output.
961 foreach ( $linksToDisplay as $key => $link )
963 $taglist = explode ( ' ' , $link [ 'tags' ]);
964 uasort ( $taglist , 'strcasecmp' );
965 $linksToDisplay [ $key ][ 'taglist' ]= $taglist ;
966 $linksToDisplay [ $key ][ 'formatedDescription' ]= nl2br ( keepMultipleSpaces ( text2clickable ( htmlspecialchars ( $link [ 'description' ]))));
967 $linksToDisplay [ $key ][ 'thumbnail' ] = thumbnail ( $link [ 'url' ]);
968 $linksToDisplay [ $key ][ 'timestamp' ] = linkdate2timestamp ( $link [ 'linkdate' ]);
971 /* We need to spread the articles on 3 columns.
972 I did not want to use a JavaScript lib like http://masonry.desandro.com/
973 so I manually spread entries with a simple method: I roughly evaluate the
974 height of a div according to title and description length.
976 $columns = array ( array (), array (), array ()); // Entries to display, for each column.
977 $fill = array ( 0 , 0 , 0 ); // Rough estimate of columns fill.
978 foreach ( $linksToDisplay as $key => $link )
980 // Roughly estimate length of entry (by counting characters)
981 // Title: 30 chars = 1 line. 1 line is 30 pixels height.
982 // Description: 836 characters gives roughly 342 pixel height.
983 // This is not perfect, but it's usually OK.
984 $length = strlen ( $link [ 'title' ]) +
( 342 * strlen ( $link [ 'description' ]))/ 836 ;
985 if ( $link [ 'thumbnail' ]) $length +
= 100 ; // 1 thumbnails roughly takes 100 pixels height.
986 // Then put in column which is the less filled:
987 $smallest = min ( $fill ); // find smallest value in array.
988 $index = array_search ( $smallest , $fill ); // find index of this smallest value.
989 array_push ( $columns [ $index ], $link ); // Put entry in this column.
990 $fill [ $index ] +
= $length ;
992 $PAGE = new pageBuilder
;
993 $PAGE- > assign ( 'linksToDisplay' , $linksToDisplay );
994 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
995 $PAGE- > assign ( 'cols' , $columns );
996 $PAGE- > assign ( 'day' , linkdate2timestamp ( $day . '_000000' ));
997 $PAGE- > assign ( 'previousday' , $previousday );
998 $PAGE- > assign ( 'nextday' , $nextday );
999 $PAGE- > renderPage ( 'daily' );
1004 // ------------------------------------------------------------------------------------------
1005 // Render HTML page (according to URL parameters and user rights)
1006 function renderPage ()
1008 $LINKSDB = new LinkDB (
1009 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
1010 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
1013 // -------- Display login form.
1014 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=login' ))
1016 if ( $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ]) { header ( 'Location: ?' ); exit ; } // No need to login for open Shaarli
1017 $token = '' ; if ( ban_canLogin ()) $token = getToken (); // Do not waste token generation if not useful.
1018 $PAGE = new pageBuilder
;
1019 $PAGE- > assign ( 'token' , $token );
1020 $PAGE- > assign ( 'returnurl' ,( isset ( $_SERVER [ 'HTTP_REFERER' ]) ? $_SERVER [ 'HTTP_REFERER' ]: '' ));
1021 $PAGE- > renderPage ( 'loginform' );
1024 // -------- User wants to logout.
1025 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=logout' ))
1029 header ( 'Location: ?' );
1033 // -------- Picture wall
1034 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=picwall' ))
1036 // Optionally filter the results:
1038 if (! empty ( $_GET [ 'searchterm' ])) $links = $LINKSDB- > filterFulltext ( $_GET [ 'searchterm' ]);
1039 elseif (! empty ( $_GET [ 'searchtags' ])) $links = $LINKSDB- > filterTags ( trim ( $_GET [ 'searchtags' ]));
1040 else $links = $LINKSDB ;
1043 $linksToDisplay = array ();
1045 // Get only links which have a thumbnail.
1046 foreach ( $links as $link )
1048 $permalink = '?' . htmlspecialchars ( smallhash ( $link [ 'linkdate' ]), ENT_QUOTES
);
1049 $thumb = lazyThumbnail ( $link [ 'url' ], $permalink );
1050 if ( $thumb != '' ) // Only output links which have a thumbnail.
1052 $link [ 'thumbnail' ]= $thumb ; // Thumbnail HTML code.
1053 $linksToDisplay []= $link ; // Add to array.
1057 $PAGE = new pageBuilder
;
1058 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1059 $PAGE- > assign ( 'linksToDisplay' , $linksToDisplay );
1060 $PAGE- > renderPage ( 'picwall' );
1064 // -------- Tag cloud
1065 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=tagcloud' ))
1067 $tags = $LINKSDB- > allTags ();
1069 // We sort tags alphabetically, then choose a font size according to count.
1070 // First, find max value.
1071 $maxcount = 0 ; foreach ( $tags as $key => $value ) $maxcount = max ( $maxcount , $value );
1074 foreach ( $tags as $key => $value )
1075 // Tag font size scaling: default 15 and 30 logarithm bases affect scaling, 22 and 6 are arbitrary font sizes for max and min sizes.
1077 $tagList [ $key ] = array ( 'count' => $value , 'size' => log ( $value , 15 ) / log ( $maxcount , 30 ) * ( 22 - 6 ) +
6 );
1079 $PAGE = new pageBuilder
;
1080 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1081 $PAGE- > assign ( 'tags' , $tagList );
1082 $PAGE- > renderPage ( 'tagcloud' );
1086 // -------- User clicks on a tag in a link: The tag is added to the list of searched tags (searchtags=...)
1087 if ( isset ( $_GET [ 'addtag' ]))
1089 // Get previous URL (http_referer) and add the tag to the searchtags parameters in query.
1090 if ( empty ( $_SERVER [ 'HTTP_REFERER' ])) { header ( 'Location: ?searchtags=' . urlencode ( $_GET
[ 'addtag' ])); exit ; } // In case browser does not send HTTP_REFERER
1091 parse_str ( parse_url ( $_SERVER [ 'HTTP_REFERER' ], PHP_URL_QUERY
), $params );
1093 // Check if this tag is already in the search query and ignore it if it is.
1094 // Each tag is always separated by a space
1095 $current_tags = explode ( ' ' , $params [ 'searchtags' ]);
1097 foreach ( $current_tags as $value ) {
1098 if ( $value === $_GET [ 'addtag' ]) {
1103 // Append the tag if necessary
1104 if ( empty ( $params [ 'searchtags' ])) {
1105 $params [ 'searchtags' ] = trim ( $_GET [ 'addtag' ]);
1108 $params [ 'searchtags' ] = trim ( $params [ 'searchtags' ]). ' ' . trim ( $_GET [ 'addtag' ]);
1111 unset ( $params [ 'page' ]); // We also remove page (keeping the same page has no sense, since the results are different)
1112 header ( 'Location: ?' . http_build_query ( $params ));
1116 // -------- User clicks on a tag in result count: Remove the tag from the list of searched tags (searchtags=...)
1117 if ( isset ( $_GET [ 'removetag' ]))
1119 // Get previous URL (http_referer) and remove the tag from the searchtags parameters in query.
1120 if ( empty ( $_SERVER [ 'HTTP_REFERER' ])) { header ( 'Location: ?' ); exit ; } // In case browser does not send HTTP_REFERER
1121 parse_str ( parse_url ( $_SERVER [ 'HTTP_REFERER' ], PHP_URL_QUERY
), $params );
1122 if ( isset ( $params [ 'searchtags' ]))
1124 $tags = explode ( ' ' , $params [ 'searchtags' ]);
1125 $tags = array_diff ( $tags , array ( $_GET [ 'removetag' ])); // Remove value from array $tags.
1126 if ( count ( $tags )== 0 ) unset ( $params [ 'searchtags' ]); else $params [ 'searchtags' ] = implode ( ' ' , $tags );
1127 unset ( $params [ 'page' ]); // We also remove page (keeping the same page has no sense, since the results are different)
1129 header ( 'Location: ?' . http_build_query ( $params ));
1133 // -------- User wants to change the number of links per page (linksperpage=...)
1134 if ( isset ( $_GET [ 'linksperpage' ]))
1136 if ( is_numeric ( $_GET [ 'linksperpage' ])) { $_SESSION
[ 'LINKS_PER_PAGE' ]= abs ( intval ( $_GET
[ 'linksperpage' ])); }
1137 // Make sure the referrer is Shaarli itself.
1139 if (! empty ( $_SERVER [ 'HTTP_REFERER' ]) && strcmp ( parse_url ( $_SERVER [ 'HTTP_REFERER' ], PHP_URL_HOST
), $_SERVER [ 'HTTP_HOST' ])== 0 )
1140 $referer = $_SERVER [ 'HTTP_REFERER' ];
1141 header ( 'Location: ' . $referer );
1145 // -------- User wants to see only private links (toggle)
1146 if ( isset ( $_GET [ 'privateonly' ]))
1148 if ( empty ( $_SESSION [ 'privateonly' ]))
1150 $_SESSION [ 'privateonly' ]= 1 ; // See only private links
1154 unset ( $_SESSION [ 'privateonly' ]); // See all links
1156 // Make sure the referrer is Shaarli itself.
1158 if (! empty ( $_SERVER [ 'HTTP_REFERER' ]) && strcmp ( parse_url ( $_SERVER [ 'HTTP_REFERER' ], PHP_URL_HOST
), $_SERVER [ 'HTTP_HOST' ])== 0 )
1159 $referer = $_SERVER [ 'HTTP_REFERER' ];
1160 header ( 'Location: ' . $referer );
1164 // -------- Handle other actions allowed for non-logged in users:
1167 // User tries to post new link but is not logged in:
1168 // Show login screen, then redirect to ?post=...
1169 if ( isset ( $_GET [ 'post' ]))
1171 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.
1175 // Same case as above except that user tried to access ?do=addlink without being logged in
1176 // Note: passing empty parameters makes Shaarli generate default URLs and descriptions.
1177 if ( isset ( $_GET [ 'do' ]) && $_GET [ 'do' ] === 'addlink' ) {
1178 header ( 'Location: ?do=login&post=' );
1182 $PAGE = new pageBuilder
;
1183 buildLinkList ( $PAGE , $LINKSDB ); // Compute list of links to display
1184 $PAGE- > renderPage ( 'linklist' );
1185 exit ; // Never remove this one! All operations below are reserved for logged in user.
1188 // -------- All other functions are reserved for the registered user:
1190 // -------- Display the Tools menu if requested (import/export/bookmarklet...)
1191 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=tools' ))
1193 $PAGE = new pageBuilder
;
1194 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1195 $PAGE- > assign ( 'pageabsaddr' , indexUrl ());
1196 $PAGE- > renderPage ( 'tools' );
1200 // -------- User wants to change his/her password.
1201 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=changepasswd' ))
1203 if ( $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ]) die ( 'You are not supposed to change a password on an Open Shaarli.' );
1204 if (! empty ( $_POST [ 'setpassword' ]) && ! empty ( $_POST [ 'oldpassword' ]))
1206 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' ); // Go away!
1208 // Make sure old password is correct.
1209 $oldhash = sha1 ( $_POST [ 'oldpassword' ]. $GLOBALS [ 'login' ]. $GLOBALS [ 'salt' ]);
1210 if ( $oldhash != $GLOBALS [ 'hash' ]) { echo '<script>alert("The old password is not correct.");document.location= \' ?do=changepasswd \' ;</script>' ; exit ; }
1211 // Save new password
1212 $GLOBALS [ 'salt' ] = sha1 ( uniqid ( '' , true ). '_' . mt_rand ()); // Salt renders rainbow-tables attacks useless.
1213 $GLOBALS [ 'hash' ] = sha1 ( $_POST [ 'setpassword' ]. $GLOBALS [ 'login' ]. $GLOBALS [ 'salt' ]);
1215 echo '<script>alert("Your password has been changed.");document.location= \' ?do=tools \' ;</script>' ;
1218 else // show the change password form.
1220 $PAGE = new pageBuilder
;
1221 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1222 $PAGE- > assign ( 'token' , getToken ());
1223 $PAGE- > renderPage ( 'changepassword' );
1228 // -------- User wants to change configuration
1229 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=configure' ))
1231 if (! empty ( $_POST [ 'title' ]) )
1233 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' ); // Go away!
1235 if (! empty ( $_POST [ 'continent' ]) && ! empty ( $_POST [ 'city' ]))
1236 if ( isTZvalid ( $_POST [ 'continent' ], $_POST [ 'city' ]))
1237 $tz = $_POST [ 'continent' ]. '/' . $_POST [ 'city' ];
1238 $GLOBALS [ 'timezone' ] = $tz ;
1239 $GLOBALS [ 'title' ]= $_POST [ 'title' ];
1240 $GLOBALS [ 'titleLink' ]= $_POST [ 'titleLink' ];
1241 $GLOBALS [ 'redirector' ]= $_POST [ 'redirector' ];
1242 $GLOBALS [ 'disablesessionprotection' ]=! empty ( $_POST [ 'disablesessionprotection' ]);
1243 $GLOBALS [ 'disablejquery' ]=! empty ( $_POST [ 'disablejquery' ]);
1244 $GLOBALS [ 'privateLinkByDefault' ]=! empty ( $_POST [ 'privateLinkByDefault' ]);
1245 $GLOBALS [ 'config' ][ 'ENABLE_RSS_PERMALINKS' ]= ! empty ( $_POST [ 'enableRssPermalinks' ]);
1246 $GLOBALS [ 'config' ][ 'ENABLE_UPDATECHECK' ] = ! empty ( $_POST [ 'updateCheck' ]);
1247 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ] = ! empty ( $_POST [ 'hidePublicLinks' ]);
1249 echo '<script>alert("Configuration was saved.");document.location= \' ?do=tools \' ;</script>' ;
1252 else // Show the configuration form.
1254 $PAGE = new pageBuilder
;
1255 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1256 $PAGE- > assign ( 'token' , getToken ());
1257 $PAGE- > assign ( 'title' , htmlspecialchars ( empty ( $GLOBALS [ 'title' ]) ? '' : $GLOBALS [ 'title' ] , ENT_QUOTES
));
1258 $PAGE- > assign ( 'redirector' , htmlspecialchars ( empty ( $GLOBALS [ 'redirector' ]) ? '' : $GLOBALS [ 'redirector' ] , ENT_QUOTES
));
1259 list ( $timezone_form , $timezone_js ) = templateTZform ( $GLOBALS [ 'timezone' ]);
1260 $PAGE- > assign ( 'timezone_form' , $timezone_form ); // FIXME: Put entire tz form generation in template?
1261 $PAGE- > assign ( 'timezone_js' , $timezone_js );
1262 $PAGE- > renderPage ( 'configure' );
1267 // -------- User wants to rename a tag or delete it
1268 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=changetag' ))
1270 if ( empty ( $_POST [ 'fromtag' ]))
1272 $PAGE = new pageBuilder
;
1273 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1274 $PAGE- > assign ( 'token' , getToken ());
1275 $PAGE- > assign ( 'tags' , $LINKSDB- > allTags ());
1276 $PAGE- > renderPage ( 'changetag' );
1279 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' );
1282 if (! empty ( $_POST [ 'deletetag' ]) && ! empty ( $_POST [ 'fromtag' ]))
1284 $needle = trim ( $_POST [ 'fromtag' ]);
1285 $linksToAlter = $LINKSDB- > filterTags ( $needle , true ); // True for case-sensitive tag search.
1286 foreach ( $linksToAlter as $key => $value )
1288 $tags = explode ( ' ' , trim ( $value [ 'tags' ]));
1289 unset ( $tags [ array_search ( $needle , $tags )]); // Remove tag.
1290 $value [ 'tags' ]= trim ( implode ( ' ' , $tags ));
1291 $LINKSDB [ $key ]= $value ;
1293 $LINKSDB- > savedb (); // Save to disk.
1294 echo '<script>alert("Tag was removed from ' . count ( $linksToAlter ). ' links.");document.location= \' ? \' ;</script>' ;
1299 if (! empty ( $_POST [ 'renametag' ]) && ! empty ( $_POST [ 'fromtag' ]) && ! empty ( $_POST [ 'totag' ]))
1301 $needle = trim ( $_POST [ 'fromtag' ]);
1302 $linksToAlter = $LINKSDB- > filterTags ( $needle , true ); // true for case-sensitive tag search.
1303 foreach ( $linksToAlter as $key => $value )
1305 $tags = explode ( ' ' , trim ( $value [ 'tags' ]));
1306 $tags [ array_search ( $needle , $tags )] = trim ( $_POST [ 'totag' ]); // Replace tags value.
1307 $value [ 'tags' ]= trim ( implode ( ' ' , $tags ));
1308 $LINKSDB [ $key ]= $value ;
1310 $LINKSDB- > savedb (); // Save to disk.
1311 echo '<script>alert("Tag was renamed in ' . count ( $linksToAlter ). ' links.");document.location= \' ?searchtags=' . urlencode ( $_POST [ 'totag' ]). ' \' ;</script>' ;
1316 // -------- User wants to add a link without using the bookmarklet: Show form.
1317 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=addlink' ))
1319 $PAGE = new pageBuilder
;
1320 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1321 $PAGE- > renderPage ( 'addlink' );
1325 // -------- User clicked the "Save" button when editing a link: Save link to database.
1326 if ( isset ( $_POST [ 'save_edit' ]))
1328 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' ); // Go away!
1329 $tags = trim ( preg_replace ( '/\s\s+/' , ' ' , $_POST [ 'lf_tags' ])); // Remove multiple spaces.
1330 $linkdate = $_POST [ 'lf_linkdate' ];
1331 $url = trim ( $_POST [ 'lf_url' ]);
1332 if (! startsWith ( $url , 'http:' ) && ! startsWith ( $url , 'https:' ) && ! startsWith ( $url , 'ftp:' ) && ! startsWith ( $url , 'magnet:' ) && ! startsWith ( $url , '?' ) && ! startsWith ( $url , 'javascript:' ))
1333 $url = 'http://' . $url ;
1334 $link = array ( 'title' => trim ( $_POST [ 'lf_title' ]), 'url' => $url , 'description' => trim ( $_POST [ 'lf_description' ]), 'private' =>( isset ( $_POST [ 'lf_private' ]) ? 1 : 0 ),
1335 'linkdate' => $linkdate , 'tags' => str_replace ( ',' , ' ' , $tags ));
1336 if ( $link [ 'title' ]== '' ) $link [ 'title' ]= $link [ 'url' ]; // If title is empty, use the URL as title.
1337 $LINKSDB [ $linkdate ] = $link ;
1338 $LINKSDB- > savedb (); // Save to disk.
1341 // If we are called from the bookmarklet, we must close the popup:
1342 if ( isset ( $_GET [ 'source' ]) && ( $_GET [ 'source' ]== 'bookmarklet' || $_GET [ 'source' ]== 'firefoxsocialapi' )) { echo '<script>self.close();</script>' ; exit ; }
1343 $returnurl = ( isset ( $_POST [ 'returnurl' ]) ? $_POST [ 'returnurl' ] : '?' );
1344 $returnurl .= '#' . smallHash ( $linkdate ); // Scroll to the link which has been edited.
1345 if ( strstr ( $returnurl , "do=addlink" )) { $returnurl
= '?' ; } //if we come from ?do=addlink, set returnurl to homepage instead
1346 header ( 'Location: ' . $returnurl ); // After saving the link, redirect to the page the user was on.
1350 // -------- User clicked the "Cancel" button when editing a link.
1351 if ( isset ( $_POST [ 'cancel_edit' ]))
1353 // If we are called from the bookmarklet, we must close the popup:
1354 if ( isset ( $_GET [ 'source' ]) && ( $_GET [ 'source' ]== 'bookmarklet' || $_GET [ 'source' ]== 'firefoxsocialapi' )) { echo '<script>self.close();</script>' ; exit ; }
1355 $returnurl = ( isset ( $_POST [ 'returnurl' ]) ? $_POST [ 'returnurl' ] : '?' );
1356 $returnurl .= '#' . smallHash ( $_POST [ 'lf_linkdate' ]); // Scroll to the link which has been edited.
1357 header ( 'Location: ' . $returnurl ); // After canceling, redirect to the page the user was on.
1361 // -------- User clicked the "Delete" button when editing a link: Delete link from database.
1362 if ( isset ( $_POST [ 'delete_link' ]))
1364 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' );
1365 // We do not need to ask for confirmation:
1366 // - confirmation is handled by JavaScript
1367 // - we are protected from XSRF by the token.
1368 $linkdate = $_POST [ 'lf_linkdate' ];
1369 unset ( $LINKSDB [ $linkdate ]);
1370 $LINKSDB- > savedb (); // save to disk
1372 // If we are called from the bookmarklet, we must close the popup:
1373 if ( isset ( $_GET [ 'source' ]) && ( $_GET [ 'source' ]== 'bookmarklet' || $_GET [ 'source' ]== 'firefoxsocialapi' )) { echo '<script>self.close();</script>' ; exit ; }
1374 // Pick where we're going to redirect
1375 // =============================================================
1376 // Basically, we can't redirect to where we were previously if it was a permalink
1377 // or an edit_link, because it would 404.
1379 // - / : nothing in $_GET, redirect to self
1380 // - /?page : redirect to self
1381 // - /?searchterm : redirect to self (there might be other links)
1382 // - /?searchtags : redirect to self
1383 // - /permalink : redirect to / (the link does not exist anymore)
1384 // - /?edit_link : redirect to / (the link does not exist anymore)
1385 // PHP treats the permalink as a $_GET variable, so we need to check if every condition for self
1386 // redirect is not satisfied, and only then redirect to /
1389 if ( count ( $_GET ) == 0 ||
1390 isset ( $_GET [ 'page' ]) ||
1391 isset ( $_GET [ 'searchterm' ]) ||
1392 isset ( $_GET [ 'searchtags' ])) {
1394 if ( isset ( $_POST [ 'returnurl' ])) {
1395 $location = $_POST [ 'returnurl' ]; // Handle redirects given by the form
1398 if ( $location === "?" &&
1399 isset ( $_SERVER [ 'HTTP_REFERER' ])) { // Handle HTTP_REFERER in case we're not coming from the same place.
1400 $location = $_SERVER [ 'HTTP_REFERER' ];
1404 header ( 'Location: ' . $location ); // After deleting the link, redirect to appropriate location
1408 // -------- User clicked the "EDIT" button on a link: Display link edit form.
1409 if ( isset ( $_GET [ 'edit_link' ]))
1411 $link = $LINKSDB [ $_GET [ 'edit_link' ]]; // Read database
1412 if (! $link ) { header ( 'Location: ?' ); exit ; } // Link not found in database.
1413 $PAGE = new pageBuilder
;
1414 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1415 $PAGE- > assign ( 'link' , $link );
1416 $PAGE- > assign ( 'link_is_new' , false );
1417 $PAGE- > assign ( 'token' , getToken ()); // XSRF protection.
1418 $PAGE- > assign ( 'http_referer' ,( isset ( $_SERVER [ 'HTTP_REFERER' ]) ? $_SERVER [ 'HTTP_REFERER' ] : '' ));
1419 $PAGE- > assign ( 'tags' , $LINKSDB- > allTags ());
1420 $PAGE- > renderPage ( 'editlink' );
1424 // -------- User want to post a new link: Display link edit form.
1425 if ( isset ( $_GET [ 'post' ]))
1430 // We remove the annoying parameters added by FeedBurner, GoogleFeedProxy, Facebook...
1431 $annoyingpatterns = array ( '/[ \? &]utm_source=[^&]*/' ,
1432 '/[ \? &]utm_campaign=[^&]*/' ,
1433 '/[ \? &]utm_medium=[^&]*/' ,
1434 '/#xtor=RSS-[^&]*/' ,
1436 '/[ \? &]__scoop[^&]*/' ,
1438 '/[ \? &]action_ref_map=[^&]*/' ,
1439 '/[ \? &]action_type_map=[^&]*/' ,
1440 '/[ \? &]action_object_map=[^&]*/' ,
1441 '/[ \? &]utm_content=[^&]*/' ,
1445 foreach ( $annoyingpatterns as $pattern )
1447 $url = preg_replace ( $pattern , "" , $url );
1450 $link_is_new = false ;
1451 $link = $LINKSDB- > getLinkFromUrl ( $url ); // Check if URL is not already in database (in this case, we will edit the existing link)
1454 $link_is_new = true ; // This is a new link
1455 $linkdate = strval ( date ( 'Ymd_His' ));
1456 $title = ( empty ( $_GET [ 'title' ]) ? '' : $_GET [ 'title' ] ); // Get title if it was provided in URL (by the bookmarklet).
1457 $description = ( empty ( $_GET [ 'description' ]) ? '' : $_GET [ 'description' ]); // Get description if it was provided in URL (by the bookmarklet). [Bronco added that]
1458 $tags = ( empty ( $_GET [ 'tags' ]) ? '' : $_GET [ 'tags' ] ); // Get tags if it was provided in URL
1459 $private = (! empty ( $_GET [ 'private' ]) && $_GET [ 'private' ] === "1" ? 1 : 0 ); // Get private if it was provided in URL
1460 if (( $url != '' ) && parse_url ( $url , PHP_URL_SCHEME
)== '' ) $url = 'http://' . $url ;
1461 // 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.)
1462 if ( empty ( $title ) && parse_url ( $url , PHP_URL_SCHEME
)== 'http' )
1464 list ( $status , $headers , $data ) = getHTTP ( $url , 4 ); // Short timeout to keep the application responsive.
1465 // FIXME: Decode charset according to specified in either 1) HTTP response headers or 2) <head> in html
1466 if ( strpos ( $status , '200 OK' )!== false )
1468 // Look for charset in html header.
1469 preg_match ( '#<meta .*charset=.*>#Usi' , $data , $meta );
1471 // If found, extract encoding.
1472 if (! empty ( $meta [ 0 ]))
1474 // Get encoding specified in header.
1475 preg_match ( '#charset="?(.*)"#si' , $meta [ 0 ], $enc );
1476 // If charset not found, use utf-8.
1477 $html_charset = (! empty ( $enc [ 1 ])) ? strtolower ( $enc [ 1 ]) : 'utf-8' ;
1479 else { $html_charset
= 'utf-8' ; }
1482 $title = html_extract_title ( $data );
1485 // Re-encode title in utf-8 if necessary.
1486 $title = ( $html_charset == 'iso-8859-1' ) ? utf8_encode ( $title ) : $title ;
1490 if ( $url == '' ) // In case of empty URL, this is just a text (with a link that points to itself)
1492 $url = '?' . smallHash ( $linkdate );
1495 $link = array ( 'linkdate' => $linkdate , 'title' => $title , 'url' => $url , 'description' => $description , 'tags' => $tags , 'private' => $private );
1498 $PAGE = new pageBuilder
;
1499 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1500 $PAGE- > assign ( 'link' , $link );
1501 $PAGE- > assign ( 'link_is_new' , $link_is_new );
1502 $PAGE- > assign ( 'token' , getToken ()); // XSRF protection.
1503 $PAGE- > assign ( 'http_referer' ,( isset ( $_SERVER [ 'HTTP_REFERER' ]) ? $_SERVER [ 'HTTP_REFERER' ] : '' ));
1504 $PAGE- > assign ( 'source' ,( isset ( $_GET [ 'source' ]) ? $_GET [ 'source' ] : '' ));
1505 $PAGE- > assign ( 'tags' , $LINKSDB- > allTags ());
1506 $PAGE- > renderPage ( 'editlink' );
1510 // -------- Export as Netscape Bookmarks HTML file.
1511 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=export' ))
1513 if ( empty ( $_GET [ 'what' ]))
1515 $PAGE = new pageBuilder
;
1516 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1517 $PAGE- > renderPage ( 'export' );
1520 $exportWhat = $_GET [ 'what' ];
1521 if (! array_intersect ( array ( 'all' , 'public' , 'private' ), array ( $exportWhat ))) die ( 'What are you trying to export???' );
1523 header ( 'Content-Type: text/html; charset=utf-8' );
1524 header ( 'Content-disposition: attachment; filename=bookmarks_' . $exportWhat . '_' . strval ( date ( 'Ymd_His' )). '.html' );
1525 $currentdate = date ( 'Y/m/d H:i:s' );
1527 <!DOCTYPE NETSCAPE-Bookmark-file-1>
1528 <!-- This is an automatically generated file.
1529 It will be read and overwritten.
1531 <!-- Shaarli {$exportWhat} bookmarks export on {$currentdate} -->
1532 <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8">
1533 <TITLE>Bookmarks</TITLE>
1536 foreach ( $LINKSDB as $link )
1538 if ( $exportWhat == 'all' ||
1539 ( $exportWhat == 'private' && $link [ 'private' ]!= 0 ) ||
1540 ( $exportWhat == 'public' && $link [ 'private' ]== 0 ))
1542 echo '<DT><A HREF="' . htmlspecialchars ( $link [ 'url' ]). '" ADD_DATE="' . linkdate2timestamp ( $link [ 'linkdate' ]). '" PRIVATE="' . $link [ 'private' ]. '"' ;
1543 if ( $link [ 'tags' ]!= '' ) echo ' TAGS="' . htmlspecialchars ( str_replace ( ' ' , ',' , $link [ 'tags' ])). '"' ;
1544 echo '>' . htmlspecialchars ( $link [ 'title' ]). "</A> \n " ;
1545 if ( $link [ 'description' ]!= '' ) echo '<DD>' . htmlspecialchars ( $link [ 'description' ]). " \n " ;
1551 // -------- User is uploading a file for import
1552 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=upload' ))
1554 // If file is too big, some form field may be missing.
1555 if (! isset ( $_POST [ 'token' ]) || (! isset ( $_FILES )) || ( isset ( $_FILES [ 'filetoupload' ][ 'size' ]) && $_FILES [ 'filetoupload' ][ 'size' ]== 0 ))
1557 $returnurl = ( empty ( $_SERVER [ 'HTTP_REFERER' ]) ? '?' : $_SERVER [ 'HTTP_REFERER' ] );
1558 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>' ;
1561 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' );
1566 // -------- Show upload/import dialog:
1567 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=import' ))
1569 $PAGE = new pageBuilder
;
1570 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1571 $PAGE- > assign ( 'token' , getToken ());
1572 $PAGE- > assign ( 'maxfilesize' , getMaxFileSize ());
1573 $PAGE- > renderPage ( 'import' );
1577 // -------- Otherwise, simply display search form and links:
1578 $PAGE = new pageBuilder
;
1579 buildLinkList ( $PAGE , $LINKSDB ); // Compute list of links to display
1580 $PAGE- > renderPage ( 'linklist' );
1584 // -----------------------------------------------------------------------------------------------
1585 // Process the import file form.
1586 function importFile ()
1588 if (!( isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ])) { die ( 'Not allowed.' ); }
1589 $LINKSDB = new LinkDB (
1590 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
1591 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
1593 $filename = $_FILES [ 'filetoupload' ][ 'name' ];
1594 $filesize = $_FILES [ 'filetoupload' ][ 'size' ];
1595 $data = file_get_contents ( $_FILES [ 'filetoupload' ][ 'tmp_name' ]);
1596 $private = ( empty ( $_POST [ 'private' ]) ? 0 : 1 ); // Should the links be imported as private?
1597 $overwrite = ! empty ( $_POST [ 'overwrite' ]) ; // Should the imported links overwrite existing ones?
1602 if ( startsWith ( $data , '<!DOCTYPE NETSCAPE-Bookmark-file-1>' )) $type = 'netscape' ; // Netscape bookmark file (aka Firefox).
1604 // Then import the bookmarks.
1605 if ( $type == 'netscape' )
1607 // This is a standard Netscape-style bookmark file.
1608 // This format is supported by all browsers (except IE, of course), also Delicious, Diigo and others.
1609 foreach ( explode ( '<DT>' , $data ) as $html ) // explode is very fast
1611 $link = array ( 'linkdate' => '' , 'title' => '' , 'url' => '' , 'description' => '' , 'tags' => '' , 'private' => 0 );
1612 $d = explode ( '<DD>' , $html );
1613 if ( startswith ( $d [ 0 ], '<A ' ))
1615 $link [ 'description' ] = ( isset ( $d [ 1 ]) ? html_entity_decode ( trim ( $d [ 1 ]), ENT_QUOTES
, 'UTF-8' ) : '' ); // Get description (optional)
1616 preg_match ( '!<A .*?>(.*?)</A>!i' , $d [ 0 ], $matches ); $link [ 'title' ] = ( isset ( $matches [ 1 ]) ? trim ( $matches [ 1 ]) : '' ); // Get title
1617 $link [ 'title' ] = html_entity_decode ( $link [ 'title' ], ENT_QUOTES
, 'UTF-8' );
1618 preg_match_all ( '! ([A-Z_]+)= \" (.*?)"!i' , $html , $matches , PREG_SET_ORDER
); // Get all other attributes
1620 foreach ( $matches as $m )
1622 $attr = $m [ 1 ]; $value = $m [ 2 ];
1623 if ( $attr == 'HREF' ) $link [ 'url' ]= html_entity_decode ( $value , ENT_QUOTES
, 'UTF-8' );
1624 elseif ( $attr == 'ADD_DATE' )
1626 $raw_add_date = intval ( $value );
1627 if ( $raw_add_date > 30000000000 ) $raw_add_date /= 1000 ; //If larger than year 2920, then was likely stored in milliseconds instead of seconds
1629 elseif ( $attr == 'PRIVATE' ) $link [ 'private' ]=( $value == '0' ? 0 : 1 );
1630 elseif ( $attr == 'TAGS' ) $link [ 'tags' ]= html_entity_decode ( str_replace ( ',' , ' ' , $value ), ENT_QUOTES
, 'UTF-8' );
1632 if ( $link [ 'url' ]!= '' )
1634 if ( $private == 1 ) $link [ 'private' ]= 1 ;
1635 $dblink = $LINKSDB- > getLinkFromUrl ( $link [ 'url' ]); // See if the link is already in database.
1637 { // Link not in database, let's import it...
1638 if ( empty ( $raw_add_date )) $raw_add_date = time (); // In case of shitty bookmark file with no ADD_DATE
1640 // Make sure date/time is not already used by another link.
1641 // (Some bookmark files have several different links with the same ADD_DATE)
1642 // We increment date by 1 second until we find a date which is not used in DB.
1643 // (so that links that have the same date/time are more or less kept grouped by date, but do not conflict.)
1644 while (! empty ( $LINKSDB [ date ( 'Ymd_His' , $raw_add_date )])) { $raw_add_date++
; } // Yes, I know it's ugly.
1645 $link [ 'linkdate' ]= date ( 'Ymd_His' , $raw_add_date );
1646 $LINKSDB [ $link [ 'linkdate' ]] = $link ;
1649 else // Link already present in database.
1652 { // If overwrite is required, we import link data, except date/time.
1653 $link [ 'linkdate' ]= $dblink [ 'linkdate' ];
1654 $LINKSDB [ $link [ 'linkdate' ]] = $link ;
1664 echo '<script>alert("File ' . json_encode ( $filename ). ' (' . $filesize . ' bytes) was successfully processed: ' . $import_count . ' links imported.");document.location= \' ? \' ;</script>' ;
1668 echo '<script>alert("File ' . json_encode ( $filename ). ' (' . $filesize . ' bytes) has an unknown file format. Nothing was imported.");document.location= \' ? \' ;</script>' ;
1672 // -----------------------------------------------------------------------------------------------
1673 // Template for the list of links (<div id="linklist">)
1674 // This function fills all the necessary fields in the $PAGE for the template 'linklist.html'
1675 function buildLinkList ( $PAGE , $LINKSDB )
1677 // ---- Filter link database according to parameters
1678 $linksToDisplay = array ();
1681 if ( isset ( $_GET [ 'searchterm' ])) // Fulltext search
1683 $linksToDisplay = $LINKSDB- > filterFulltext ( trim ( $_GET [ 'searchterm' ]));
1684 $search_crits = htmlspecialchars ( trim ( $_GET [ 'searchterm' ]));
1685 $search_type = 'fulltext' ;
1687 elseif ( isset ( $_GET [ 'searchtags' ])) // Search by tag
1689 $linksToDisplay = $LINKSDB- > filterTags ( trim ( $_GET [ 'searchtags' ]));
1690 $search_crits = explode ( ' ' , trim ( $_GET [ 'searchtags' ]));
1691 $search_type = 'tags' ;
1693 elseif ( isset ( $_SERVER [ 'QUERY_STRING' ]) && preg_match ( '/[a-zA-Z0-9-_@] {6} (&.+?)?/' , $_SERVER [ 'QUERY_STRING' ])) // Detect smallHashes in URL
1695 $linksToDisplay = $LINKSDB- > filterSmallHash ( substr ( trim ( $_SERVER [ "QUERY_STRING" ], '/' ), 0 , 6 ));
1696 if ( count ( $linksToDisplay )== 0 )
1698 header ( $_SERVER [ "SERVER_PROTOCOL" ]. " 404 Not Found" );
1699 echo '<h1>404 Not found.</h1>Oh crap. The link you are trying to reach does not exist or has been deleted.' ;
1700 echo '<br>You would mind <a href="?">clicking here</a>?' ;
1703 $search_type = 'permalink' ;
1706 $linksToDisplay = $LINKSDB ; // Otherwise, display without filtering.
1709 // Option: Show only private links
1710 if (! empty ( $_SESSION [ 'privateonly' ]))
1713 foreach ( $linksToDisplay as $linkdate => $link )
1715 if ( $link [ 'private' ]!= 0 ) $tmp [ $linkdate ]= $link ;
1717 $linksToDisplay = $tmp ;
1720 // ---- Handle paging.
1721 /* Can someone explain to me why you get the following error when using array_keys() on an object which implements the interface ArrayAccess???
1722 "Warning: array_keys() expects parameter 1 to be array, object given in ... "
1723 If my class implements ArrayAccess, why won't array_keys() accept it ? ( $keys=array_keys($linksToDisplay); )
1725 $keys = array (); foreach ( $linksToDisplay as $key => $value ) { $keys
[]= $key
; } // Stupid and ugly. Thanks PHP.
1727 // If it's a permalink, we change on-the-fly the title of the page.
1728 if (! empty ( $search_type && $search_type == 'permalink' )) {
1729 $GLOBALS [ 'pagetitle' ] = $linksToDisplay [ $keys [ 0 ]][ 'title' ] . ' - ' . $GLOBALS [ 'title' ];
1732 // Select articles according to paging.
1733 $pagecount = ceil ( count ( $keys )/ $_SESSION [ 'LINKS_PER_PAGE' ]);
1734 $pagecount = ( $pagecount == 0 ? 1 : $pagecount );
1735 $page =( empty ( $_GET [ 'page' ]) ? 1 : intval ( $_GET [ 'page' ]));
1736 $page = ( $page < 1 ? 1 : $page );
1737 $page = ( $page > $pagecount ? $pagecount : $page );
1738 $i = ( $page-1 )* $_SESSION [ 'LINKS_PER_PAGE' ]; // Start index.
1739 $end = $i +
$_SESSION [ 'LINKS_PER_PAGE' ];
1740 $linkDisp = array (); // Links to display
1741 while ( $i < $end && $i < count ( $keys ))
1743 $link = $linksToDisplay [ $keys [ $i ]];
1744 $link [ 'description' ]= nl2br ( keepMultipleSpaces ( text2clickable ( htmlspecialchars ( $link [ 'description' ]))));
1745 $title = $link [ 'title' ];
1746 $classLi = $i %
2 != 0 ? '' : 'publicLinkHightLight' ;
1747 $link [ 'class' ] = ( $link [ 'private' ]== 0 ? $classLi : 'private' );
1748 $link [ 'timestamp' ]= linkdate2timestamp ( $link [ 'linkdate' ]);
1749 $taglist = explode ( ' ' , $link [ 'tags' ]);
1750 uasort ( $taglist , 'strcasecmp' );
1751 $link [ 'taglist' ]= $taglist ;
1753 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.
1754 strlen ( $link [ "url" ]) === 7 ) {
1755 $link [ "url" ] = indexUrl () . $link [ "url" ];
1758 $linkDisp [ $keys [ $i ]] = $link ;
1762 // Compute paging navigation
1763 $searchterm = ( empty ( $_GET [ 'searchterm' ]) ? '' : '&searchterm=' . $_GET [ 'searchterm' ] );
1764 $searchtags = ( empty ( $_GET [ 'searchtags' ]) ? '' : '&searchtags=' . $_GET [ 'searchtags' ] );
1766 $previous_page_url = '' ; if ( $i != count ( $keys )) $previous_page_url = '?page=' .( $page +
1 ). $searchterm . $searchtags ;
1767 $next_page_url = '' ; if ( $page > 1 ) $next_page_url = '?page=' .( $page-1 ). $searchterm . $searchtags ;
1769 $token = '' ; if ( isLoggedIn ()) $token = getToken ();
1771 // Fill all template fields.
1772 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1773 $PAGE- > assign ( 'previous_page_url' , $previous_page_url );
1774 $PAGE- > assign ( 'next_page_url' , $next_page_url );
1775 $PAGE- > assign ( 'page_current' , $page );
1776 $PAGE- > assign ( 'page_max' , $pagecount );
1777 $PAGE- > assign ( 'result_count' , count ( $linksToDisplay ));
1778 $PAGE- > assign ( 'search_type' , $search_type );
1779 $PAGE- > assign ( 'search_crits' , $search_crits );
1780 $PAGE- > assign ( 'redirector' , empty ( $GLOBALS [ 'redirector' ]) ? '' : $GLOBALS [ 'redirector' ]); // Optional redirector URL.
1781 $PAGE- > assign ( 'token' , $token );
1782 $PAGE- > assign ( 'links' , $linkDisp );
1783 $PAGE- > assign ( 'tags' , $LINKSDB- > allTags ());
1787 // Compute the thumbnail for a link.
1789 // With a link to the original URL.
1790 // Understands various services (youtube.com...)
1791 // Input: $url = URL for which the thumbnail must be found.
1792 // $href = if provided, this URL will be followed instead of $url
1793 // Returns an associative array with thumbnail attributes (src,href,width,height,style,alt)
1794 // Some of them may be missing.
1795 // Return an empty array if no thumbnail available.
1796 function computeThumbnail ( $url , $href = false )
1798 if (! $GLOBALS [ 'config' ][ 'ENABLE_THUMBNAILS' ]) return array ();
1799 if ( $href == false ) $href = $url ;
1801 // For most hosts, the URL of the thumbnail can be easily deduced from the URL of the link.
1802 // (e.g. http://www.youtube.com/watch?v=spVypYk4kto ---> http://img.youtube.com/vi/spVypYk4kto/default.jpg )
1803 // ^^^^^^^^^^^ ^^^^^^^^^^^
1804 $domain = parse_url ( $url , PHP_URL_HOST
);
1805 if ( $domain == 'youtube.com' || $domain == 'www.youtube.com' )
1807 parse_str ( parse_url ( $url , PHP_URL_QUERY
), $params ); // Extract video ID and get thumbnail
1808 if (! empty ( $params [ 'v' ])) return array ( 'src' => 'https://img.youtube.com/vi/' . $params [ 'v' ]. '/default.jpg' ,
1809 'href' => $href , 'width' => '120' , 'height' => '90' , 'alt' => 'YouTube thumbnail' );
1811 if ( $domain == 'youtu.be' ) // Youtube short links
1813 $path = parse_url ( $url , PHP_URL_PATH
);
1814 return array ( 'src' => 'https://img.youtube.com/vi' . $path . '/default.jpg' ,
1815 'href' => $href , 'width' => '120' , 'height' => '90' , 'alt' => 'YouTube thumbnail' );
1817 if ( $domain == 'pix.toile-libre.org' ) // pix.toile-libre.org image hosting
1819 parse_str ( parse_url ( $url , PHP_URL_QUERY
), $params ); // Extract image filename.
1820 if (! empty ( $params ) && ! empty ( $params [ 'img' ])) return array ( 'src' => 'http://pix.toile-libre.org/upload/thumb/' . urlencode ( $params [ 'img' ]),
1821 'href' => $href , 'style' => 'max-width:120px; max-height:150px' , 'alt' => 'pix.toile-libre.org thumbnail' );
1824 if ( $domain == 'imgur.com' )
1826 $path = parse_url ( $url , PHP_URL_PATH
);
1827 if ( startsWith ( $path , '/a/' )) return array (); // Thumbnails for albums are not available.
1828 if ( startsWith ( $path , '/r/' )) return array ( 'src' => 'https://i.imgur.com/' . basename ( $path ). 's.jpg' ,
1829 'href' => $href , 'width' => '90' , 'height' => '90' , 'alt' => 'imgur.com thumbnail' );
1830 if ( startsWith ( $path , '/gallery/' )) return array ( 'src' => 'https://i.imgur.com' . substr ( $path , 8 ). 's.jpg' ,
1831 'href' => $href , 'width' => '90' , 'height' => '90' , 'alt' => 'imgur.com thumbnail' );
1833 if ( substr_count ( $path , '/' )== 1 ) return array ( 'src' => 'https://i.imgur.com/' . substr ( $path , 1 ). 's.jpg' ,
1834 'href' => $href , 'width' => '90' , 'height' => '90' , 'alt' => 'imgur.com thumbnail' );
1836 if ( $domain == 'i.imgur.com' )
1838 $pi = pathinfo ( parse_url ( $url , PHP_URL_PATH
));
1839 if (! empty ( $pi [ 'filename' ])) return array ( 'src' => 'https://i.imgur.com/' . $pi [ 'filename' ]. 's.jpg' ,
1840 'href' => $href , 'width' => '90' , 'height' => '90' , 'alt' => 'imgur.com thumbnail' );
1842 if ( $domain == 'dailymotion.com' || $domain == 'www.dailymotion.com' )
1844 if ( strpos ( $url , 'dailymotion.com/video/' )!== false )
1846 $thumburl = str_replace ( 'dailymotion.com/video/' , 'dailymotion.com/thumbnail/video/' , $url );
1847 return array ( 'src' => $thumburl ,
1848 'href' => $href , 'width' => '120' , 'style' => 'height:auto;' , 'alt' => 'DailyMotion thumbnail' );
1851 if ( endsWith ( $domain , '.imageshack.us' ))
1853 $ext = strtolower ( pathinfo ( $url , PATHINFO_EXTENSION
));
1854 if ( $ext == 'jpg' || $ext == 'jpeg' || $ext == 'png' || $ext == 'gif' )
1856 $thumburl = substr ( $url , 0 , strlen ( $url )- strlen ( $ext )). 'th.' . $ext ;
1857 return array ( 'src' => $thumburl ,
1858 'href' => $href , 'width' => '120' , 'style' => 'height:auto;' , 'alt' => 'imageshack.us thumbnail' );
1862 // Some other hosts are SLOW AS HELL and usually require an extra HTTP request to get the thumbnail URL.
1863 // So we deport the thumbnail generation in order not to slow down page generation
1864 // (and we also cache the thumbnail)
1866 if (! $GLOBALS [ 'config' ][ 'ENABLE_LOCALCACHE' ]) return array (); // If local cache is disabled, no thumbnails for services which require the use a local cache.
1868 if ( $domain == 'flickr.com' || endsWith ( $domain , '.flickr.com' )
1869 || $domain == 'vimeo.com'
1870 || $domain == 'ted.com' || endsWith ( $domain , '.ted.com' )
1871 || $domain == 'xkcd.com' || endsWith ( $domain , '.xkcd.com' )
1874 if ( $domain == 'vimeo.com' )
1875 { // Make sure this vimeo URL points to a video (/xxx... where xxx is numeric)
1876 $path = parse_url ( $url , PHP_URL_PATH
);
1877 if (! preg_match ( '!/\d+.+?!' , $path )) return array (); // This is not a single video URL.
1879 if ( $domain == 'xkcd.com' || endsWith ( $domain , '.xkcd.com' ))
1880 { // Make sure this URL points to a single comic (/xxx... where xxx is numeric)
1881 $path = parse_url ( $url , PHP_URL_PATH
);
1882 if (! preg_match ( '!/\d+.+?!' , $path )) return array ();
1884 if ( $domain == 'ted.com' || endsWith ( $domain , '.ted.com' ))
1885 { // Make sure this TED URL points to a video (/talks/...)
1886 $path = parse_url ( $url , PHP_URL_PATH
);
1887 if ( "/talks/" !== substr ( $path , 0 , 7 )) return array (); // This is not a single video URL.
1889 $sign = hash_hmac ( 'sha256' , $url , $GLOBALS [ 'salt' ]); // We use the salt to sign data (it's random, secret, and specific to each installation)
1890 return array ( 'src' => indexUrl (). '?do=genthumbnail&hmac=' . htmlspecialchars ( $sign ). '&url=' . urlencode ( $url ),
1891 'href' => $href , 'width' => '120' , 'style' => 'height:auto;' , 'alt' => 'thumbnail' );
1894 // For all other, we try to make a thumbnail of links ending with .jpg/jpeg/png/gif
1895 // Technically speaking, we should download ALL links and check their Content-Type to see if they are images.
1896 // But using the extension will do.
1897 $ext = strtolower ( pathinfo ( $url , PATHINFO_EXTENSION
));
1898 if ( $ext == 'jpg' || $ext == 'jpeg' || $ext == 'png' || $ext == 'gif' )
1900 $sign = hash_hmac ( 'sha256' , $url , $GLOBALS [ 'salt' ]); // We use the salt to sign data (it's random, secret, and specific to each installation)
1901 return array ( 'src' => indexUrl (). '?do=genthumbnail&hmac=' . htmlspecialchars ( $sign ). '&url=' . urlencode ( $url ),
1902 'href' => $href , 'width' => '120' , 'style' => 'height:auto;' , 'alt' => 'thumbnail' );
1904 return array (); // No thumbnail.
1909 // Returns the HTML code to display a thumbnail for a link
1910 // with a link to the original URL.
1911 // Understands various services (youtube.com...)
1912 // Input: $url = URL for which the thumbnail must be found.
1913 // $href = if provided, this URL will be followed instead of $url
1914 // Returns '' if no thumbnail available.
1915 function thumbnail ( $url , $href = false )
1917 $t = computeThumbnail ( $url , $href );
1918 if ( count ( $t )== 0 ) return '' ; // Empty array = no thumbnail for this URL.
1920 $html = '<a href="' . htmlspecialchars ( $t [ 'href' ]). '"><img src="' . htmlspecialchars ( $t [ 'src' ]). '"' ;
1921 if (! empty ( $t [ 'width' ])) $html .= ' width="' . htmlspecialchars ( $t [ 'width' ]). '"' ;
1922 if (! empty ( $t [ 'height' ])) $html .= ' height="' . htmlspecialchars ( $t [ 'height' ]). '"' ;
1923 if (! empty ( $t [ 'style' ])) $html .= ' style="' . htmlspecialchars ( $t [ 'style' ]). '"' ;
1924 if (! empty ( $t [ 'alt' ])) $html .= ' alt="' . htmlspecialchars ( $t [ 'alt' ]). '"' ;
1929 // Returns the HTML code to display a thumbnail for a link
1930 // for the picture wall (using lazy image loading)
1931 // Understands various services (youtube.com...)
1932 // Input: $url = URL for which the thumbnail must be found.
1933 // $href = if provided, this URL will be followed instead of $url
1934 // Returns '' if no thumbnail available.
1935 function lazyThumbnail ( $url , $href = false )
1937 $t = computeThumbnail ( $url , $href );
1938 if ( count ( $t )== 0 ) return '' ; // Empty array = no thumbnail for this URL.
1940 $html = '<a href="' . htmlspecialchars ( $t [ 'href' ]). '">' ;
1943 $html .= '<img class="b-lazy" src="#" data-src="' . htmlspecialchars ( $t [ 'src' ]). '"' ;
1945 if (! empty ( $t [ 'width' ])) $html .= ' width="' . htmlspecialchars ( $t [ 'width' ]). '"' ;
1946 if (! empty ( $t [ 'height' ])) $html .= ' height="' . htmlspecialchars ( $t [ 'height' ]). '"' ;
1947 if (! empty ( $t [ 'style' ])) $html .= ' style="' . htmlspecialchars ( $t [ 'style' ]). '"' ;
1948 if (! empty ( $t [ 'alt' ])) $html .= ' alt="' . htmlspecialchars ( $t [ 'alt' ]). '"' ;
1951 // No-JavaScript fallback.
1952 $html .= '<noscript><img src="' . htmlspecialchars ( $t [ 'src' ]). '"' ;
1953 if (! empty ( $t [ 'width' ])) $html .= ' width="' . htmlspecialchars ( $t [ 'width' ]). '"' ;
1954 if (! empty ( $t [ 'height' ])) $html .= ' height="' . htmlspecialchars ( $t [ 'height' ]). '"' ;
1955 if (! empty ( $t [ 'style' ])) $html .= ' style="' . htmlspecialchars ( $t [ 'style' ]). '"' ;
1956 if (! empty ( $t [ 'alt' ])) $html .= ' alt="' . htmlspecialchars ( $t [ 'alt' ]). '"' ;
1957 $html .= '></noscript></a>' ;
1963 // -----------------------------------------------------------------------------------------------
1965 // This function should NEVER be called if the file data/config.php exists.
1968 // On free.fr host, make sure the /sessions directory exists, otherwise login will not work.
1969 if ( endsWith ( $_SERVER [ 'HTTP_HOST' ], '.free.fr' ) && ! is_dir ( $_SERVER [ 'DOCUMENT_ROOT' ]. '/sessions' )) mkdir ( $_SERVER [ 'DOCUMENT_ROOT' ]. '/sessions' , 0705 );
1972 // This part makes sure sessions works correctly.
1973 // (Because on some hosts, session.save_path may not be set correctly,
1974 // or we may not have write access to it.)
1975 if ( isset ( $_GET [ 'test_session' ]) && ( ! isset ( $_SESSION ) || ! isset ( $_SESSION [ 'session_tested' ]) || $_SESSION [ 'session_tested' ]!= 'Working' ))
1976 { // Step 2: Check if data in session is correct.
1977 echo '<pre>Sessions do not seem to work correctly on your server.<br>' ;
1978 echo 'Make sure the variable session.save_path is set correctly in your php config, and that you have write access to it.<br>' ;
1979 echo 'It currently points to ' . session_save_path (). '<br>' ;
1980 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>' ;
1981 echo '<br><a href="?">Click to try again.</a></pre>' ;
1984 if (! isset ( $_SESSION [ 'session_tested' ]))
1985 { // Step 1 : Try to store data in session and reload page.
1986 $_SESSION [ 'session_tested' ] = 'Working' ; // Try to set a variable in session.
1987 header ( 'Location: ' . indexUrl (). '?test_session' ); // Redirect to check stored data.
1989 if ( isset ( $_GET [ 'test_session' ]))
1990 { // Step 3: Sessions are OK. Remove test parameter from URL.
1991 header ( 'Location: ' . indexUrl ());
1995 if (! empty ( $_POST [ 'setlogin' ]) && ! empty ( $_POST [ 'setpassword' ]))
1998 if (! empty ( $_POST [ 'continent' ]) && ! empty ( $_POST [ 'city' ]))
1999 if ( isTZvalid ( $_POST [ 'continent' ], $_POST [ 'city' ]))
2000 $tz = $_POST [ 'continent' ]. '/' . $_POST [ 'city' ];
2001 $GLOBALS [ 'timezone' ] = $tz ;
2002 // Everything is ok, let's create config file.
2003 $GLOBALS [ 'login' ] = $_POST [ 'setlogin' ];
2004 $GLOBALS [ 'salt' ] = sha1 ( uniqid ( '' , true ). '_' . mt_rand ()); // Salt renders rainbow-tables attacks useless.
2005 $GLOBALS [ 'hash' ] = sha1 ( $_POST [ 'setpassword' ]. $GLOBALS [ 'login' ]. $GLOBALS [ 'salt' ]);
2006 $GLOBALS [ 'title' ] = ( empty ( $_POST [ 'title' ]) ? 'Shared links on ' . htmlspecialchars ( indexUrl ()) : $_POST [ 'title' ] );
2007 $GLOBALS [ 'config' ][ 'ENABLE_UPDATECHECK' ] = ! empty ( $_POST [ 'updateCheck' ]);
2009 echo '<script>alert("Shaarli is now configured. Please enter your login/password and start shaaring your links!");document.location= \' ?do=login \' ;</script>' ;
2013 // Display config form:
2014 list ( $timezone_form , $timezone_js ) = templateTZform ();
2015 $timezone_html = '' ; if ( $timezone_form != '' ) $timezone_html = '<tr><td><b>Timezone:</b></td><td>' . $timezone_form . '</td></tr>' ;
2017 $PAGE = new pageBuilder
;
2018 $PAGE- > assign ( 'timezone_html' , $timezone_html );
2019 $PAGE- > assign ( 'timezone_js' , $timezone_js );
2020 $PAGE- > renderPage ( 'install' );
2024 // Generates the timezone selection form and JavaScript.
2025 // Input: (optional) current timezone (can be 'UTC/UTC'). It will be pre-selected.
2026 // Output: array(html,js)
2027 // Example: list($htmlform,$js) = templateTZform('Europe/Paris'); // Europe/Paris pre-selected.
2028 // Returns array('','') if server does not support timezones list. (e.g. PHP 5.1 on free.fr)
2029 function templateTZform ( $ptz = false )
2031 if ( function_exists ( 'timezone_identifiers_list' )) // because of old PHP version (5.1) which can be found on free.fr
2033 // Try to split the provided timezone.
2034 if ( $ptz == false ) { $l
= timezone_identifiers_list (); $ptz
= $l
[ 0 ]; }
2035 $spos = strpos ( $ptz , '/' ); $pcontinent = substr ( $ptz , 0 , $spos ); $pcity = substr ( $ptz , $spos +
1 );
2037 // Display config form:
2038 $timezone_form = '' ;
2040 // The list is in the form "Europe/Paris", "America/Argentina/Buenos_Aires"...
2041 // We split the list in continents/cities.
2042 $continents = array ();
2044 foreach ( timezone_identifiers_list () as $tz )
2046 if ( $tz == 'UTC' ) $tz = 'UTC/UTC' ;
2047 $spos = strpos ( $tz , '/' );
2050 $continent = substr ( $tz , 0 , $spos ); $city = substr ( $tz , $spos +
1 );
2051 $continents [ $continent ]= 1 ;
2052 if (! isset ( $cities [ $continent ])) $cities [ $continent ]= '' ;
2053 $cities [ $continent ].= '<option value="' . $city . '"' .( $pcity == $city ? ' selected' : '' ). '>' . $city . '</option>' ;
2056 $continents_html = '' ;
2057 $continents = array_keys ( $continents );
2058 foreach ( $continents as $continent )
2059 $continents_html .= '<option value="' . $continent . '"' .( $pcontinent == $continent ? ' selected' : '' ). '>' . $continent . '</option>' ;
2060 $cities_html = $cities [ $pcontinent ];
2061 $timezone_form = "Continent: <select name= \" continent \" id= \" continent \" onChange= \" onChangecontinent(); \" > ${continents_html} </select>" ;
2062 $timezone_form .= " City: <select name= \" city \" id= \" city \" > ${cities[$pcontinent]} </select><br />" ;
2063 $timezone_js = "<script>" ;
2064 $timezone_js .= "function onChangecontinent() {document.getElementById(\"city\").innerHTML = citiescontinent[document.getElementById(\"continent\").value];} " ;
2065 $timezone_js .= "var citiescontinent = " . json_encode ( $cities ). ";" ;
2066 $timezone_js .= "</script>" ;
2067 return array ( $timezone_form , $timezone_js );
2069 return array ( '' , '' );
2072 // Tells if a timezone is valid or not.
2073 // If not valid, returns false.
2074 // If system does not support timezone list, returns false.
2075 function isTZvalid ( $continent , $city )
2077 $tz = $continent . '/' . $city ;
2078 if ( function_exists ( 'timezone_identifiers_list' )) // because of old PHP version (5.1) which can be found on free.fr
2080 if ( in_array ( $tz , timezone_identifiers_list ())) // it's a valid timezone?
2085 if (! function_exists ( 'json_encode' )) {
2086 function json_encode ( $data ) {
2087 switch ( $type = gettype ( $data )) {
2091 return ( $data ? 'true' : 'false' );
2097 return '"' . addslashes ( $data ) . '"' ;
2099 $data = get_object_vars ( $data );
2101 $output_index_count = 0 ;
2102 $output_indexed = array ();
2103 $output_associative = array ();
2104 foreach ( $data as $key => $value ) {
2105 $output_indexed [] = json_encode ( $value );
2106 $output_associative [] = json_encode ( $key ) . ':' . json_encode ( $value );
2107 if ( $output_index_count !== NULL && $output_index_count ++
!== $key ) {
2108 $output_index_count = NULL ;
2111 if ( $output_index_count !== NULL ) {
2112 return '[' . implode ( ',' , $output_indexed ) . ']' ;
2114 return ' {' . implode(',', $output_associative) . '} ' ;
2117 return '' ; // Not supported
2122 // Re-write configuration file according to globals.
2123 // Requires some $GLOBALS to be set (login,hash,salt,title).
2124 // If the config file cannot be saved, an error message is displayed and the user is redirected to "Tools" menu.
2125 // (otherwise, the function simply returns.)
2126 function writeConfig ()
2128 if ( is_file ( $GLOBALS [ 'config' ][ 'CONFIG_FILE' ]) && ! isLoggedIn ()) die ( 'You are not authorized to alter config.' ); // Only logged in user can alter config.
2129 $config = '<?php $GLOBALS [ \' login \' ]=' . var_export ( $GLOBALS [ 'login' ], true ). '; $GLOBALS [ \' hash \' ]=' . var_export ( $GLOBALS [ 'hash' ], true ). '; $GLOBALS [ \' salt \' ]=' . var_export ( $GLOBALS [ 'salt' ], true ). '; ' ;
2130 $config .= ' $GLOBALS [ \' timezone \' ]=' . var_export ( $GLOBALS [ 'timezone' ], true ). '; date_default_timezone_set(' . var_export ( $GLOBALS [ 'timezone' ], true ). '); $GLOBALS [ \' title \' ]=' . var_export ( $GLOBALS [ 'title' ], true ). ';' ;
2131 $config .= ' $GLOBALS [ \' titleLink \' ]=' . var_export ( $GLOBALS [ 'titleLink' ], true ). '; ' ;
2132 $config .= ' $GLOBALS [ \' redirector \' ]=' . var_export ( $GLOBALS [ 'redirector' ], true ). '; ' ;
2133 $config .= ' $GLOBALS [ \' disablesessionprotection \' ]=' . var_export ( $GLOBALS [ 'disablesessionprotection' ], true ). '; ' ;
2134 $config .= ' $GLOBALS [ \' disablejquery \' ]=' . var_export ( $GLOBALS [ 'disablejquery' ], true ). '; ' ;
2135 $config .= ' $GLOBALS [ \' privateLinkByDefault \' ]=' . var_export ( $GLOBALS [ 'privateLinkByDefault' ], true ). '; ' ;
2136 $config .= ' $GLOBALS [ \' config \' ][ \' ENABLE_RSS_PERMALINKS \' ]=' . var_export ( $GLOBALS [ 'config' ][ 'ENABLE_RSS_PERMALINKS' ], true ). '; ' ;
2137 $config .= ' $GLOBALS [ \' config \' ][ \' ENABLE_UPDATECHECK \' ]=' . var_export ( $GLOBALS [ 'config' ][ 'ENABLE_UPDATECHECK' ], true ). '; ' ;
2138 $config .= ' $GLOBALS [ \' config \' ][ \' HIDE_PUBLIC_LINKS \' ]=' . var_export ( $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ], true ). '; ' ;
2140 if (! file_put_contents ( $GLOBALS [ 'config' ][ 'CONFIG_FILE' ], $config ) || strcmp ( file_get_contents ( $GLOBALS [ 'config' ][ 'CONFIG_FILE' ]), $config )!= 0 )
2142 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>' ;
2147 /* Because some f*cking services like flickr require an extra HTTP request to get the thumbnail URL,
2148 I have deported the thumbnail URL code generation here, otherwise this would slow down page generation.
2149 The following function takes the URL a link (e.g. a flickr page) and return the proper thumbnail.
2150 This function is called by passing the URL:
2151 http://mywebsite.com/shaarli/?do=genthumbnail&hmac=[HMAC]&url=[URL]
2152 [URL] is the URL of the link (e.g. a flickr page)
2153 [HMAC] is the signature for the [URL] (so that these URL cannot be forged).
2154 The function below will fetch the image from the webservice and store it in the cache.
2156 function genThumbnail ()
2158 // Make sure the parameters in the URL were generated by us.
2159 $sign = hash_hmac ( 'sha256' , $_GET [ 'url' ], $GLOBALS [ 'salt' ]);
2160 if ( $sign != $_GET [ 'hmac' ]) die ( 'Naughty boy!' );
2162 // Let's see if we don't already have the image for this URL in the cache.
2163 $thumbname = hash ( 'sha1' , $_GET [ 'url' ]). '.jpg' ;
2164 if ( is_file ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname ))
2165 { // We have the thumbnail, just serve it:
2166 header ( 'Content-Type: image/jpeg' );
2167 echo file_get_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname );
2170 // We may also serve a blank image (if service did not respond)
2171 $blankname = hash ( 'sha1' , $_GET [ 'url' ]). '.gif' ;
2172 if ( is_file ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $blankname ))
2174 header ( 'Content-Type: image/gif' );
2175 echo file_get_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $blankname );
2179 // Otherwise, generate the thumbnail.
2180 $url = $_GET [ 'url' ];
2181 $domain = parse_url ( $url , PHP_URL_HOST
);
2183 if ( $domain == 'flickr.com' || endsWith ( $domain , '.flickr.com' ))
2185 // Crude replacement to handle new flickr domain policy (They prefer www. now)
2186 $url = str_replace ( 'http://flickr.com/' , 'http://www.flickr.com/' , $url );
2188 // Is this a link to an image, or to a flickr page ?
2190 if ( endswith ( parse_url ( $url , PHP_URL_PATH
), '.jpg' ))
2191 { // This is a direct link to an image. e.g. http://farm1.staticflickr.com/5/5921913_ac83ed27bd_o.jpg
2192 preg_match ( '!(http://farm\d+\.staticflickr\.com/\d+/\d+_\w+_)\w.jpg!' , $url , $matches );
2193 if (! empty ( $matches [ 1 ])) $imageurl = $matches [ 1 ]. 'm.jpg' ;
2195 else // This is a flickr page (html)
2197 list ( $httpstatus , $headers , $data ) = getHTTP ( $url , 20 ); // Get the flickr html page.
2198 if ( strpos ( $httpstatus , '200 OK' )!== false )
2200 // flickr now nicely provides the URL of the thumbnail in each flickr page.
2201 preg_match ( '!<link rel= \" image_src \" href= \" (.+?) \" !' , $data , $matches );
2202 if (! empty ( $matches [ 1 ])) $imageurl = $matches [ 1 ];
2204 // In albums (and some other pages), the link rel="image_src" is not provided,
2205 // but flickr provides:
2206 // <meta property="og:image" content="http://farm4.staticflickr.com/3398/3239339068_25d13535ff_z.jpg" />
2209 preg_match ( '!<meta property= \" og:image \" content= \" (.+?) \" !' , $data , $matches );
2210 if (! empty ( $matches [ 1 ])) $imageurl = $matches [ 1 ];
2216 { // Let's download the image.
2217 list ( $httpstatus , $headers , $data ) = getHTTP ( $imageurl , 10 ); // Image is 240x120, so 10 seconds to download should be enough.
2218 if ( strpos ( $httpstatus , '200 OK' )!== false )
2220 file_put_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname , $data ); // Save image to cache.
2221 header ( 'Content-Type: image/jpeg' );
2228 elseif ( $domain == 'vimeo.com' )
2230 // This is more complex: we have to perform a HTTP request, then parse the result.
2231 // Maybe we should deport this to JavaScript ? Example: http://stackoverflow.com/questions/1361149/get-img-thumbnails-from-vimeo/4285098#4285098
2232 $vid = substr ( parse_url ( $url , PHP_URL_PATH
), 1 );
2233 list ( $httpstatus , $headers , $data ) = getHTTP ( 'https://vimeo.com/api/v2/video/' . htmlspecialchars ( $vid ). '.php' , 5 );
2234 if ( strpos ( $httpstatus , '200 OK' )!== false )
2236 $t = unserialize ( $data );
2237 $imageurl = $t [ 0 ][ 'thumbnail_medium' ];
2238 // Then we download the image and serve it to our client.
2239 list ( $httpstatus , $headers , $data ) = getHTTP ( $imageurl , 10 );
2240 if ( strpos ( $httpstatus , '200 OK' )!== false )
2242 file_put_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname , $data ); // Save image to cache.
2243 header ( 'Content-Type: image/jpeg' );
2250 elseif ( $domain == 'ted.com' || endsWith ( $domain , '.ted.com' ))
2252 // The thumbnail for TED talks is located in the <link rel="image_src" [...]> tag on that page
2253 // http://www.ted.com/talks/mikko_hypponen_fighting_viruses_defending_the_net.html
2254 // <link rel="image_src" href="http://images.ted.com/images/ted/28bced335898ba54d4441809c5b1112ffaf36781_389x292.jpg" />
2255 list ( $httpstatus , $headers , $data ) = getHTTP ( $url , 5 );
2256 if ( strpos ( $httpstatus , '200 OK' )!== false )
2258 // Extract the link to the thumbnail
2259 preg_match ( '!link rel="image_src" href="(http://images.ted.com/images/ted/.+_\d+x\d+\.jpg)"!' , $data , $matches );
2260 if (! empty ( $matches [ 1 ]))
2261 { // Let's download the image.
2262 $imageurl = $matches [ 1 ];
2263 list ( $httpstatus , $headers , $data ) = getHTTP ( $imageurl , 20 ); // No control on image size, so wait long enough.
2264 if ( strpos ( $httpstatus , '200 OK' )!== false )
2266 $filepath = $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname ;
2267 file_put_contents ( $filepath , $data ); // Save image to cache.
2268 if ( resizeImage ( $filepath ))
2270 header ( 'Content-Type: image/jpeg' );
2271 echo file_get_contents ( $filepath );
2279 elseif ( $domain == 'xkcd.com' || endsWith ( $domain , '.xkcd.com' ))
2281 // There is no thumbnail available for xkcd comics, so download the whole image and resize it.
2282 // http://xkcd.com/327/
2283 // <img src="http://imgs.xkcd.com/comics/exploits_of_a_mom.png" title="<BLABLA>" alt="<BLABLA>" />
2284 list ( $httpstatus , $headers , $data ) = getHTTP ( $url , 5 );
2285 if ( strpos ( $httpstatus , '200 OK' )!== false )
2287 // Extract the link to the thumbnail
2288 preg_match ( '!<img src="(http://imgs.xkcd.com/comics/.*)" title="[^s]!' , $data , $matches );
2289 if (! empty ( $matches [ 1 ]))
2290 { // Let's download the image.
2291 $imageurl = $matches [ 1 ];
2292 list ( $httpstatus , $headers , $data ) = getHTTP ( $imageurl , 20 ); // No control on image size, so wait long enough.
2293 if ( strpos ( $httpstatus , '200 OK' )!== false )
2295 $filepath = $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname ;
2296 file_put_contents ( $filepath , $data ); // Save image to cache.
2297 if ( resizeImage ( $filepath ))
2299 header ( 'Content-Type: image/jpeg' );
2300 echo file_get_contents ( $filepath );
2310 // For all other domains, we try to download the image and make a thumbnail.
2311 list ( $httpstatus , $headers , $data ) = getHTTP ( $url , 30 ); // We allow 30 seconds max to download (and downloads are limited to 4 Mb)
2312 if ( strpos ( $httpstatus , '200 OK' )!== false )
2314 $filepath = $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname ;
2315 file_put_contents ( $filepath , $data ); // Save image to cache.
2316 if ( resizeImage ( $filepath ))
2318 header ( 'Content-Type: image/jpeg' );
2319 echo file_get_contents ( $filepath );
2326 // Otherwise, return an empty image (8x8 transparent gif)
2327 $blankgif = base64_decode ( 'R0lGODlhCAAIAIAAAP///////yH5BAEKAAEALAAAAAAIAAgAAAIHjI+py+1dAAA7' );
2328 file_put_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $blankname , $blankgif ); // Also put something in cache so that this URL is not requested twice.
2329 header ( 'Content-Type: image/gif' );
2333 // Make a thumbnail of the image (to width: 120 pixels)
2334 // Returns true if success, false otherwise.
2335 function resizeImage ( $filepath )
2337 if (! function_exists ( 'imagecreatefromjpeg' )) return false ; // GD not present: no thumbnail possible.
2339 // Trick: some stupid people rename GIF as JPEG... or else.
2340 // So we really try to open each image type whatever the extension is.
2341 $header = file_get_contents ( $filepath , false , NULL , 0 , 256 ); // Read first 256 bytes and try to sniff file type.
2343 $i = strpos ( $header , 'GIF8' ); if (( $i !== false ) && ( $i == 0 )) $im = imagecreatefromgif ( $filepath ); // Well this is crude, but it should be enough.
2344 $i = strpos ( $header , 'PNG' ); if (( $i !== false ) && ( $i == 1 )) $im = imagecreatefrompng ( $filepath );
2345 $i = strpos ( $header , 'JFIF' ); if ( $i !== false ) $im = imagecreatefromjpeg ( $filepath );
2346 if (! $im ) return false ; // Unable to open image (corrupted or not an image)
2349 $ystart = 0 ; $yheight = $h ;
2350 if ( $h > $w ) { $ystart
= ( $h
/ 2 )-( $w
/ 2 ); $yheight
= $w
/ 2 ; }
2351 $nw = 120 ; // Desired width
2352 $nh = min ( floor (( $h * $nw )/ $w ), 120 ); // Compute new width/height, but maximum 120 pixels height.
2354 $im2 = imagecreatetruecolor ( $nw , $nh );
2355 imagecopyresampled ( $im2 , $im , 0 , 0 , 0 , $ystart , $nw , $nh , $w , $yheight );
2356 imageinterlace ( $im2 , true ); // For progressive JPEG.
2357 $tempname = $filepath . '_TEMP.jpg' ;
2358 imagejpeg ( $im2 , $tempname , 90 );
2362 rename ( $tempname , $filepath ); // Overwrite original picture with thumbnail.
2366 // Invalidate caches when the database is changed or the user logs out.
2367 // (e.g. tags cache).
2368 function invalidateCaches ()
2370 unset ( $_SESSION [ 'tags' ]); // Purge cache attached to session.
2371 pageCache
:: purgeCache (); // Purge page cache shared by sessions.
2374 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=genthumbnail' )) { genThumbnail (); exit ; } // Thumbnail generation/cache does not need the link database.
2375 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=rss' )) { showRSS (); exit ; }
2376 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=atom' )) { showATOM (); exit ; }
2377 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=dailyrss' )) { showDailyRSS (); exit ; }
2378 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=daily' )) { showDaily (); exit ; }
2379 if (! isset ( $_SESSION [ 'LINKS_PER_PAGE' ])) $_SESSION [ 'LINKS_PER_PAGE' ]= $GLOBALS [ 'config' ][ 'LINKS_PER_PAGE' ];