]>
git.immae.eu Git - github/shaarli/Shaarli.git/blob - index.php
84b8f015ad1ae693ec36f3fbc24112628adf5796
2 // Shaarli 0.5.0 - 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
7 // -----------------------------------------------------------------------------------------------
9 // Set 'UTC' as the default timezone if it is not defined in php.ini
10 // See http://php.net/manual/en/datetime.configuration.php#ini.date.timezone
11 if ( date_default_timezone_get () == '' ) {
12 date_default_timezone_set ( 'UTC' );
15 // -----------------------------------------------------------------------------------------------
16 // Hardcoded parameter (These parameters can be overwritten by editing the file /data/config.php)
17 // You should not touch any code below (or at your own risks!)
18 $GLOBALS [ 'config' ][ 'DATADIR' ] = 'data' ; // Data subdirectory
19 $GLOBALS [ 'config' ][ 'CONFIG_FILE' ] = $GLOBALS [ 'config' ][ 'DATADIR' ]. '/config.php' ; // Configuration file (user login/password)
20 $GLOBALS [ 'config' ][ 'DATASTORE' ] = $GLOBALS [ 'config' ][ 'DATADIR' ]. '/datastore.php' ; // Data storage file.
21 $GLOBALS [ 'config' ][ 'LINKS_PER_PAGE' ] = 20 ; // Default links per page.
22 $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ] = $GLOBALS [ 'config' ][ 'DATADIR' ]. '/ipbans.php' ; // File storage for failures and bans.
23 $GLOBALS [ 'config' ][ 'BAN_AFTER' ] = 4 ; // Ban IP after this many failures.
24 $GLOBALS [ 'config' ][ 'BAN_DURATION' ] = 1800 ; // Ban duration for IP address after login failures (in seconds) (1800 sec. = 30 minutes)
25 $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ] = false ; // If true, anyone can add/edit/delete links without having to login
26 $GLOBALS [ 'config' ][ 'HIDE_TIMESTAMPS' ] = false ; // If true, the moment when links were saved are not shown to users that are not logged in.
27 $GLOBALS [ 'config' ][ 'SHOW_ATOM' ] = false ; // If true, an extra "ATOM feed" button will be displayed in the toolbar
28 $GLOBALS [ 'config' ][ 'ENABLE_THUMBNAILS' ] = true ; // Enable thumbnails in links.
29 $GLOBALS [ 'config' ][ 'CACHEDIR' ] = 'cache' ; // Cache directory for thumbnails for SLOW services (like flickr)
30 $GLOBALS [ 'config' ][ 'PAGECACHE' ] = 'pagecache' ; // Page cache directory.
31 $GLOBALS [ 'config' ][ 'ENABLE_LOCALCACHE' ] = true ; // Enable Shaarli to store thumbnail in a local cache. Disable to reduce web space usage.
32 $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ] = '' ; // PubSubHubbub support. Put an empty string to disable, or put your hub url here to enable.
33 $GLOBALS [ 'config' ][ 'RAINTPL_TMP' ] = 'tmp/' ; // Raintpl cache directory (keep the trailing slash!)
34 $GLOBALS [ 'config' ][ 'RAINTPL_TPL' ] = 'tpl/' ; // Raintpl template directory (keep the trailing slash!)
35 $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ] = $GLOBALS [ 'config' ][ 'DATADIR' ]. '/lastupdatecheck.txt' ; // For updates check of Shaarli.
36 $GLOBALS [ 'config' ][ 'UPDATECHECK_INTERVAL' ] = 86400 ; // Updates check frequency for Shaarli. 86400 seconds=24 hours
37 // Note: You must have publisher.php in the same directory as Shaarli index.php
38 $GLOBALS [ 'config' ][ 'ARCHIVE_ORG' ] = false ; // For each link, add a link to an archived version on archive.org
39 $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.
40 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ] = false ;
41 // -----------------------------------------------------------------------------------------------
42 define ( 'shaarli_version' , '0.5.0' );
43 // http://server.com/x/shaarli --> /shaarli/
44 define ( 'WEB_PATH' , substr ( $_SERVER [ "REQUEST_URI" ], 0 , 1 +
strrpos ( $_SERVER [ "REQUEST_URI" ], '/' , 0 )));
46 // Force cookie path (but do not change lifetime)
47 $cookie = session_get_cookie_params ();
48 $cookiedir = '' ; if ( dirname ( $_SERVER [ 'SCRIPT_NAME' ])!= '/' ) $cookiedir = dirname ( $_SERVER [ "SCRIPT_NAME" ]). '/' ;
49 session_set_cookie_params ( $cookie [ 'lifetime' ], $cookiedir , $_SERVER [ 'SERVER_NAME' ]); // Set default cookie expiration and path.
51 // Set session parameters on server side.
52 define ( 'INACTIVITY_TIMEOUT' , 3600 ); // (in seconds). If the user does not access any page within this time, his/her session is considered expired.
53 ini_set ( 'session.use_cookies' , 1 ); // Use cookies to store session.
54 ini_set ( 'session.use_only_cookies' , 1 ); // Force cookies for session (phpsessionID forbidden in URL).
55 ini_set ( 'session.use_trans_sid' , false ); // Prevent PHP form using sessionID in URL if cookies are disabled.
56 session_name ( 'shaarli' );
57 if ( session_id () == '' ) session_start (); // Start session if needed (Some server auto-start sessions).
60 ini_set ( 'max_input_time' , '60' ); // High execution time in case of problematic imports/exports.
61 ini_set ( 'memory_limit' , '128M' ); // Try to set max upload file size and read (May not work on some hosts).
62 ini_set ( 'post_max_size' , '16M' );
63 ini_set ( 'upload_max_filesize' , '16M' );
64 error_reporting ( E_ALL^E_WARNING
); // See all error except warnings.
65 //error_reporting(-1); // See all errors (for debugging only)
68 if ( is_file ( $GLOBALS [ 'config' ][ 'CONFIG_FILE' ])) {
69 require_once $GLOBALS [ 'config' ][ 'CONFIG_FILE' ];
73 require_once 'application/Cache.php' ;
74 require_once 'application/CachedPage.php' ;
75 require_once 'application/LinkDB.php' ;
76 require_once 'application/TimeZone.php' ;
77 require_once 'application/Utils.php' ;
78 require_once 'application/Config.php' ;
80 // Ensure the PHP version is supported
82 checkPHPVersion ( '5.3' , PHP_VERSION
);
83 } catch ( Exception
$e ) {
84 header ( 'Content-Type: text/plain; charset=utf-8' );
85 echo $e- > getMessage ();
89 include "inc/rain.tpl.class.php" ; //include Rain TPL
90 raintpl
:: $tpl_dir = $GLOBALS [ 'config' ][ 'RAINTPL_TPL' ]; // template directory
91 raintpl
:: $cache_dir = $GLOBALS [ 'config' ][ 'RAINTPL_TMP' ]; // cache directory
93 ob_start (); // Output buffering for the page cache.
96 // In case stupid admin has left magic_quotes enabled in php.ini:
97 if ( get_magic_quotes_gpc ())
99 function stripslashes_deep ( $value ) { $value
= is_array ( $value
) ? array_map ( 'stripslashes_deep' , $value
) : stripslashes ( $value
); return $value
; }
100 $_POST = array_map ( 'stripslashes_deep' , $_POST );
101 $_GET = array_map ( 'stripslashes_deep' , $_GET );
102 $_COOKIE = array_map ( 'stripslashes_deep' , $_COOKIE );
105 // Prevent caching on client side or proxy: (yes, it's ugly)
106 header ( "Last-Modified: " . gmdate ( "D, d M Y H:i:s" ) . " GMT" );
107 header ( "Cache-Control: no-store, no-cache, must-revalidate" );
108 header ( "Cache-Control: post-check=0, pre-check=0" , false );
109 header ( "Pragma: no-cache" );
111 // Directories creations (Note that your web host may require different rights than 705.)
112 if (! is_writable ( realpath ( dirname ( __FILE__
)))) die ( '<pre>ERROR: Shaarli does not have the right to write in its own directory.</pre>' );
114 // Handling of old config file which do not have the new parameters.
115 if ( empty ( $GLOBALS [ 'title' ])) $GLOBALS [ 'title' ]= 'Shared links on ' . escape ( indexUrl ());
116 if ( empty ( $GLOBALS [ 'timezone' ])) $GLOBALS [ 'timezone' ]= date_default_timezone_get ();
117 if ( empty ( $GLOBALS [ 'redirector' ])) $GLOBALS [ 'redirector' ]= '' ;
118 if ( empty ( $GLOBALS [ 'disablesessionprotection' ])) $GLOBALS [ 'disablesessionprotection' ]= false ;
119 if ( empty ( $GLOBALS [ 'privateLinkByDefault' ])) $GLOBALS [ 'privateLinkByDefault' ]= false ;
120 if ( empty ( $GLOBALS [ 'titleLink' ])) $GLOBALS [ 'titleLink' ]= '?' ;
121 // I really need to rewrite Shaarli with a proper configuation manager.
123 // Run config screen if first run:
124 if (! is_file ( $GLOBALS [ 'config' ][ 'CONFIG_FILE' ])) {
128 $GLOBALS [ 'title' ] = ! empty ( $GLOBALS [ 'title' ]) ? escape ( $GLOBALS [ 'title' ]) : '' ;
129 $GLOBALS [ 'titleLink' ] = ! empty ( $GLOBALS [ 'titleLink' ]) ? escape ( $GLOBALS [ 'titleLink' ]) : '' ;
130 $GLOBALS [ 'redirector' ] = ! empty ( $GLOBALS [ 'redirector' ]) ? escape ( $GLOBALS [ 'redirector' ]) : '' ;
132 // a token depending of deployment salt, user password, and the current ip
133 define ( 'STAY_SIGNED_IN_TOKEN' , sha1 ( $GLOBALS [ 'hash' ]. $_SERVER [ "REMOTE_ADDR" ]. $GLOBALS [ 'salt' ]));
135 autoLocale (); // Sniff browser language and set date format accordingly.
136 header ( 'Content-Type: text/html; charset=utf-8' ); // We use UTF-8 for proper international characters handling.
138 //==================================================================================================
139 // Checking session state (i.e. is the user still logged in)
140 //==================================================================================================
142 function setup_login_state () {
143 $userIsLoggedIn = false ; // By default, we do not consider the user as logged in;
144 $loginFailure = false ; // If set to true, every attempt to authenticate the user will fail. This indicates that an important condition isn't met.
145 if ( $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ]) {
146 $userIsLoggedIn = true ;
148 if (! isset ( $GLOBALS [ 'login' ])) {
149 $userIsLoggedIn = false ; // Shaarli is not configured yet.
150 $loginFailure = true ;
152 if ( isset ( $_COOKIE [ 'shaarli_staySignedIn' ]) &&
153 $_COOKIE [ 'shaarli_staySignedIn' ]=== STAY_SIGNED_IN_TOKEN
&&
157 $userIsLoggedIn = true ;
159 // If session does not exist on server side, or IP address has changed, or session has expired, logout.
160 if ( empty ( $_SESSION [ 'uid' ]) ||
161 ( $GLOBALS [ 'disablesessionprotection' ]== false && $_SESSION [ 'ip' ]!= allIPs ()) ||
162 time () >= $_SESSION [ 'expires_on' ])
165 $userIsLoggedIn = false ;
166 $loginFailure = true ;
168 if (! empty ( $_SESSION [ 'longlastingsession' ])) {
169 $_SESSION [ 'expires_on' ]= time () +
$_SESSION [ 'longlastingsession' ]; // In case of "Stay signed in" checked.
172 $_SESSION [ 'expires_on' ]= time () +INACTIVITY_TIMEOUT
; // Standard session expiration date.
174 if (! $loginFailure ) {
175 $userIsLoggedIn = true ;
178 return $userIsLoggedIn ;
180 $userIsLoggedIn = setup_login_state ();
182 // Checks if an update is available for Shaarli.
183 // (at most once a day, and only for registered user.)
184 // Output: '' = no new version.
185 // other= the available version.
186 function checkUpdate ()
188 if (! isLoggedIn ()) return '' ; // Do not check versions for visitors.
189 if ( empty ( $GLOBALS [ 'config' ][ 'ENABLE_UPDATECHECK' ])) return '' ; // Do not check if the user doesn't want to.
191 // Get latest version number at most once a day.
192 if (! is_file ( $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ]) || ( filemtime ( $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ])< time ()-( $GLOBALS [ 'config' ][ 'UPDATECHECK_INTERVAL' ])))
194 $version = shaarli_version
;
195 list ( $httpstatus , $headers , $data ) = getHTTP ( 'https://raw.githubusercontent.com/shaarli/Shaarli/master/shaarli_version.php' , 2 );
196 if ( strpos ( $httpstatus , '200 OK' )!== false ) $version = str_replace ( ' */ ?>' , '' , str_replace ( '<?php /* ' , '' , $data ));
197 // If failed, never mind. We don't want to bother the user with that.
198 file_put_contents ( $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ], $version ); // touch file date
201 $newestversion = file_get_contents ( $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ]);
202 if ( version_compare ( $newestversion , shaarli_version
)== 1 ) return $newestversion ;
207 // -----------------------------------------------------------------------------------------------
209 function logm ( $message )
211 $t = strval ( date ( 'Y/m/d_H:i:s' )). ' - ' . $_SERVER [ "REMOTE_ADDR" ]. ' - ' . strval ( $message ). " \n " ;
212 file_put_contents ( $GLOBALS [ 'config' ][ 'DATADIR' ]. '/log.txt' , $t , FILE_APPEND
);
215 // In a string, converts URLs to clickable links.
216 // Function inspired from http://www.php.net/manual/en/function.preg-replace.php#85722
217 function text2clickable ( $url )
219 $redir = empty ( $GLOBALS [ 'redirector' ]) ? '' : $GLOBALS [ 'redirector' ];
220 return preg_replace ( '!(((?:https?|ftp|file)://|apt:|magnet:)\S+[[:alnum:]]/?)!si' , '<a href="' . $redir . ' $1" rel="nofollow"> $1 </a>' , $url );
223 // This function inserts where relevant so that multiple spaces are properly displayed in HTML
224 // even in the absence of <pre> (This is used in description to keep text formatting)
225 function keepMultipleSpaces ( $text )
227 return str_replace ( ' ' , ' ' , $text );
230 // ------------------------------------------------------------------------------------------
231 // Sniff browser language to display dates in the right format automatically.
232 // (Note that is may not work on your server if the corresponding local is not installed.)
233 function autoLocale ()
235 $attempts = array ( 'en_US' ); // Default if browser does not send HTTP_ACCEPT_LANGUAGE
236 if ( isset ( $_SERVER [ 'HTTP_ACCEPT_LANGUAGE' ])) // e.g. "fr,fr-fr;q=0.8,en;q=0.5,en-us;q=0.3"
237 { // (It's a bit crude, but it works very well. Preferred language is always presented first.)
238 if ( preg_match ( '/([a-z] {2} )-?([a-z] {2} )?/i' , $_SERVER [ 'HTTP_ACCEPT_LANGUAGE' ], $matches )) {
239 $loc = $matches [ 1 ] . (! empty ( $matches [ 2 ]) ? '_' . strtoupper ( $matches [ 2 ]) : '' );
240 $attempts = array ( $loc . '.UTF-8' , $loc , str_replace ( '_' , '-' , $loc ). '.UTF-8' , str_replace ( '_' , '-' , $loc ),
241 $loc . '_' . strtoupper ( $loc ). '.UTF-8' , $loc . '_' . strtoupper ( $loc ),
242 $loc . '_' . $loc . '.UTF-8' , $loc . '_' . $loc , $loc . '-' . strtoupper ( $loc ). '.UTF-8' ,
243 $loc . '-' . strtoupper ( $loc ), $loc . '-' . $loc . '.UTF-8' , $loc . '-' . $loc );
246 setlocale ( LC_TIME
, $attempts ); // LC_TIME = Set local for date/time format only.
249 // ------------------------------------------------------------------------------------------
250 // PubSubHubbub protocol support (if enabled) [UNTESTED]
251 // (Source: http://aldarone.fr/les-flux-rss-shaarli-et-pubsubhubbub/ )
252 if (! empty ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ])) include './publisher.php' ;
255 if (! empty ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]))
257 $p = new Publisher ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]);
259 indexUrl (). '?do=atom' ,
262 $p- > publish_update ( $topic_url );
266 // ------------------------------------------------------------------------------------------
267 // Session management
269 // Returns the IP address of the client (Used to prevent session cookie hijacking.)
272 $ip = $_SERVER [ "REMOTE_ADDR" ];
273 // Then we use more HTTP headers to prevent session hijacking from users behind the same proxy.
274 if ( isset ( $_SERVER [ 'HTTP_X_FORWARDED_FOR' ])) { $ip
= $ip
. '_' . $_SERVER
[ 'HTTP_X_FORWARDED_FOR' ]; }
275 if ( isset ( $_SERVER [ 'HTTP_CLIENT_IP' ])) { $ip
= $ip
. '_' . $_SERVER
[ 'HTTP_CLIENT_IP' ]; }
279 function fillSessionInfo () {
280 $_SESSION [ 'uid' ] = sha1 ( uniqid ( '' , true ). '_' . mt_rand ()); // Generate unique random number (different than phpsessionid)
281 $_SESSION [ 'ip' ]= allIPs (); // We store IP address(es) of the client to make sure session is not hijacked.
282 $_SESSION [ 'username' ]= $GLOBALS [ 'login' ];
283 $_SESSION [ 'expires_on' ]= time () +INACTIVITY_TIMEOUT
; // Set session expiration.
286 // Check that user/password is correct.
287 function check_auth ( $login , $password )
289 $hash = sha1 ( $password . $login . $GLOBALS [ 'salt' ]);
290 if ( $login == $GLOBALS [ 'login' ] && $hash == $GLOBALS [ 'hash' ])
291 { // Login/password is correct.
293 logm ( 'Login successful' );
296 logm ( 'Login failed for user ' . $login );
300 // Returns true if the user is logged in.
301 function isLoggedIn ()
303 global $userIsLoggedIn ;
304 return $userIsLoggedIn ;
309 if ( isset ( $_SESSION )) {
310 unset ( $_SESSION [ 'uid' ]);
311 unset ( $_SESSION [ 'ip' ]);
312 unset ( $_SESSION [ 'username' ]);
313 unset ( $_SESSION [ 'privateonly' ]);
315 setcookie ( 'shaarli_staySignedIn' , FALSE , 0 , WEB_PATH
);
319 // ------------------------------------------------------------------------------------------
320 // Brute force protection system
321 // Several consecutive failed logins will ban the IP address for 30 minutes.
322 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 ?>" );
323 include $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ];
324 // Signal a failed login. Will ban the IP if too many failures:
325 function ban_loginFailed ()
327 $ip = $_SERVER [ "REMOTE_ADDR" ]; $gb = $GLOBALS [ 'IPBANS' ];
328 if (! isset ( $gb [ 'FAILURES' ][ $ip ])) $gb [ 'FAILURES' ][ $ip ]= 0 ;
329 $gb [ 'FAILURES' ][ $ip ] ++
;
330 if ( $gb [ 'FAILURES' ][ $ip ]>( $GLOBALS [ 'config' ][ 'BAN_AFTER' ]- 1 ))
332 $gb [ 'BANS' ][ $ip ]= time () +
$GLOBALS [ 'config' ][ 'BAN_DURATION' ];
333 logm ( 'IP address banned from login' );
335 $GLOBALS [ 'IPBANS' ] = $gb ;
336 file_put_contents ( $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ], "<?php \n\$ GLOBALS['IPBANS']=" . var_export ( $gb , true ). "; \n ?>" );
339 // Signals a successful login. Resets failed login counter.
340 function ban_loginOk ()
342 $ip = $_SERVER [ "REMOTE_ADDR" ]; $gb = $GLOBALS [ 'IPBANS' ];
343 unset ( $gb [ 'FAILURES' ][ $ip ]); unset ( $gb [ 'BANS' ][ $ip ]);
344 $GLOBALS [ 'IPBANS' ] = $gb ;
345 file_put_contents ( $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ], "<?php \n\$ GLOBALS['IPBANS']=" . var_export ( $gb , true ). "; \n ?>" );
348 // Checks if the user CAN login. If 'true', the user can try to login.
349 function ban_canLogin ()
351 $ip = $_SERVER [ "REMOTE_ADDR" ]; $gb = $GLOBALS [ 'IPBANS' ];
352 if ( isset ( $gb [ 'BANS' ][ $ip ]))
354 // User is banned. Check if the ban has expired:
355 if ( $gb [ 'BANS' ][ $ip ]<= time ())
356 { // Ban expired, user can try to login again.
358 unset ( $gb [ 'FAILURES' ][ $ip ]); unset ( $gb [ 'BANS' ][ $ip ]);
359 file_put_contents ( $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ], "<?php \n\$ GLOBALS['IPBANS']=" . var_export ( $gb , true ). "; \n ?>" );
360 return true ; // Ban has expired, user can login.
362 return false ; // User is banned.
364 return true ; // User is not banned.
367 // ------------------------------------------------------------------------------------------
368 // Process login form: Check if login/password is correct.
369 if ( isset ( $_POST [ 'login' ]))
371 if (! ban_canLogin ()) die ( 'I said: NO. You are banned for the moment. Go away.' );
372 if ( isset ( $_POST [ 'password' ]) && tokenOk ( $_POST [ 'token' ]) && ( check_auth ( $_POST [ 'login' ], $_POST [ 'password' ])))
373 { // Login/password is OK.
375 // If user wants to keep the session cookie even after the browser closes:
376 if (! empty ( $_POST [ 'longlastingsession' ]))
378 setcookie ( 'shaarli_staySignedIn' , STAY_SIGNED_IN_TOKEN
, time () +
31536000 , WEB_PATH
);
379 $_SESSION [ 'longlastingsession' ]= 31536000 ; // (31536000 seconds = 1 year)
380 $_SESSION [ 'expires_on' ]= time () +
$_SESSION [ 'longlastingsession' ]; // Set session expiration on server-side.
382 $cookiedir = '' ; if ( dirname ( $_SERVER [ 'SCRIPT_NAME' ])!= '/' ) $cookiedir = dirname ( $_SERVER [ "SCRIPT_NAME" ]). '/' ;
383 session_set_cookie_params ( $_SESSION [ 'longlastingsession' ], $cookiedir , $_SERVER [ 'SERVER_NAME' ]); // Set session cookie expiration on client side
384 // Note: Never forget the trailing slash on the cookie path!
385 session_regenerate_id ( true ); // Send cookie with new expiration date to browser.
387 else // Standard session expiration (=when browser closes)
389 $cookiedir = '' ; if ( dirname ( $_SERVER [ 'SCRIPT_NAME' ])!= '/' ) $cookiedir = dirname ( $_SERVER [ "SCRIPT_NAME" ]). '/' ;
390 session_set_cookie_params ( 0 , $cookiedir , $_SERVER [ 'SERVER_NAME' ]); // 0 means "When browser closes"
391 session_regenerate_id ( true );
394 // Optional redirect after login:
395 if ( isset ( $_GET [ 'post' ])) {
396 $uri = '?post=' . urlencode ( $_GET [ 'post' ]);
397 foreach ( array ( 'description' , 'source' , 'title' ) as $param ) {
398 if (! empty ( $_GET [ $param ])) {
399 $uri .= '&' . $param . '=' . urlencode ( $_GET [ $param ]);
402 header ( 'Location: ' . $uri );
406 if ( isset ( $_GET [ 'edit_link' ])) {
407 header ( 'Location: ?edit_link=' . escape ( $_GET [ 'edit_link' ]));
411 if ( isset ( $_POST [ 'returnurl' ])) {
412 // Prevent loops over login screen.
413 if ( strpos ( $_POST [ 'returnurl' ], 'do=login' ) === false ) {
414 header ( 'Location: ' . escape ( $_POST [ 'returnurl' ]));
418 header ( 'Location: ?' ); exit ;
424 if ( isset ( $_GET [ 'post' ])) {
425 $redir = '?post=' . urlencode ( $_GET [ 'post' ]);
426 foreach ( array ( 'description' , 'source' , 'title' ) as $param ) {
427 if (! empty ( $_GET [ $param ])) {
428 $redir .= '&' . $param . '=' . urlencode ( $_GET [ $param ]);
432 echo '<script>alert("Wrong login/password.");document.location= \' ?do=login' . $redir . ' \' ;</script>' ; // Redirect to login screen.
437 // ------------------------------------------------------------------------------------------
438 // Misc utility functions:
440 // Returns the server URL (including port and http/https), without path.
441 // e.g. "http://myserver.com:8080"
442 // You can append $_SERVER['SCRIPT_NAME'] to get the current script URL.
445 $https = (! empty ( $_SERVER [ 'HTTPS' ]) && ( strtolower ( $_SERVER [ 'HTTPS' ])== 'on' )) || $_SERVER [ "SERVER_PORT" ]== '443' ; // HTTPS detection.
446 $serverport = ( $_SERVER [ "SERVER_PORT" ]== '80' || ( $https && $_SERVER [ "SERVER_PORT" ]== '443' ) ? '' : ':' . $_SERVER [ "SERVER_PORT" ]);
447 return 'http' .( $https ? 's' : '' ). '://' . $_SERVER [ 'SERVER_NAME' ]. $serverport ;
450 // Returns the absolute URL of current script, without the query.
451 // (e.g. http://sebsauvage.net/links/)
454 $scriptname = $_SERVER [ "SCRIPT_NAME" ];
455 // If the script is named 'index.php', we remove it (for better looking URLs,
456 // e.g. http://mysite.com/shaarli/?abcde instead of http://mysite.com/shaarli/index.php?abcde)
457 if ( endswith ( $scriptname , 'index.php' )) $scriptname = substr ( $scriptname , 0 , strlen ( $scriptname )- 9 );
458 return serverUrl () . $scriptname ;
461 // Returns the absolute URL of current script, WITH the query.
462 // (e.g. http://sebsauvage.net/links/?toto=titi&spamspamspam=humbug)
465 return indexUrl ().(! empty ( $_SERVER [ "QUERY_STRING" ]) ? '?' . $_SERVER [ "QUERY_STRING" ] : '' );
468 // Convert post_max_size/upload_max_filesize (e.g. '16M') parameters to bytes.
469 function return_bytes ( $val )
471 $val = trim ( $val ); $last = strtolower ( $val [ strlen ( $val )- 1 ]);
474 case 'g' : $val *= 1024 ;
475 case 'm' : $val *= 1024 ;
476 case 'k' : $val *= 1024 ;
481 // Try to determine max file size for uploads (POST).
482 // Returns an integer (in bytes)
483 function getMaxFileSize ()
485 $size1 = return_bytes ( ini_get ( 'post_max_size' ));
486 $size2 = return_bytes ( ini_get ( 'upload_max_filesize' ));
487 // Return the smaller of two:
488 $maxsize = min ( $size1 , $size2 );
489 // FIXME: Then convert back to readable notations ? (e.g. 2M instead of 2000000)
493 /* Converts a linkdate time (YYYYMMDD_HHMMSS) of an article to a timestamp (Unix epoch)
494 (used to build the ADD_DATE attribute in Netscape-bookmarks file)
495 PS: I could have used strptime(), but it does not exist on Windows. I'm too kind. */
496 function linkdate2timestamp ( $linkdate )
498 if ( strcmp ( $linkdate , '_000000' ) !== 0 || ! $linkdate ){
500 $r = sscanf ( $linkdate , '%4d%2d%2d_%2d%2d%2d' , $Y , $M , $D , $h , $m , $s );
501 return mktime ( $h , $m , $s , $M , $D , $Y );
506 /* Converts a linkdate time (YYYYMMDD_HHMMSS) of an article to a RFC822 date.
507 (used to build the pubDate attribute in RSS feed.) */
508 function linkdate2rfc822 ( $linkdate )
510 return date ( 'r' , linkdate2timestamp ( $linkdate )); // 'r' is for RFC822 date format.
513 /* Converts a linkdate time (YYYYMMDD_HHMMSS) of an article to a ISO 8601 date.
514 (used to build the updated tags in ATOM feed.) */
515 function linkdate2iso8601 ( $linkdate )
517 return date ( 'c' , linkdate2timestamp ( $linkdate )); // 'c' is for ISO 8601 date format.
520 // Parse HTTP response headers and return an associative array.
521 function http_parse_headers_shaarli ( $headers )
524 foreach ( $headers as $header )
526 $i = strpos ( $header , ': ' );
529 $key = substr ( $header , 0 , $i );
530 $value = substr ( $header , $i +
2 , strlen ( $header )- $i-2 );
538 Input: $url : URL to get (http://...)
539 $timeout : Network timeout (will wait this many seconds for an anwser before giving up).
540 Output: An array. [0] = HTTP status message (e.g. "HTTP/1.1 200 OK") or error message
541 [1] = associative array containing HTTP response headers (e.g. echo getHTTP($url)[1]['Content-Type'])
543 Example: list($httpstatus,$headers,$data) = getHTTP('http://sebauvage.net/');
544 if (strpos($httpstatus,'200 OK')!==false)
545 echo 'Data type: '.htmlspecialchars($headers['Content-Type']);
547 echo 'There was an error: '.htmlspecialchars($httpstatus)
549 function getHTTP ( $url , $timeout = 30 )
553 $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
554 $context = stream_context_create ( $options );
555 $data = file_get_contents ( $url , false , $context ,- 1 , 4000000 ); // We download at most 4 Mb from source.
556 if (! $data ) { return array ( 'HTTP Error' , array (), '' ); }
557 $httpStatus = $http_response_header [ 0 ]; // e.g. "HTTP/1.1 200 OK"
558 $responseHeaders = http_parse_headers_shaarli ( $http_response_header );
559 return array ( $httpStatus , $responseHeaders , $data );
561 catch ( Exception
$e ) // getHTTP *can* fail silently (we don't care if the title cannot be fetched)
563 return array ( $e- > getMessage (), '' , '' );
567 // Extract title from an HTML document.
568 // (Returns an empty string if not found.)
569 function html_extract_title ( $html )
571 return preg_match ( '!<title>(.*?)</title>!is' , $html , $matches ) ? trim ( str_replace ( " \n " , ' ' , $matches [ 1 ])) : '' ;
574 // ------------------------------------------------------------------------------------------
575 // Token management for XSRF protection
576 // Token should be used in any form which acts on data (create,update,delete,import...).
577 if (! isset ( $_SESSION [ 'tokens' ])) $_SESSION [ 'tokens' ]= array (); // Token are attached to the session.
582 $rnd = sha1 ( uniqid ( '' , true ). '_' . mt_rand (). $GLOBALS [ 'salt' ]); // We generate a random string.
583 $_SESSION [ 'tokens' ][ $rnd ]= 1 ; // Store it on the server side.
587 // Tells if a token is OK. Using this function will destroy the token.
589 function tokenOk ( $token )
591 if ( isset ( $_SESSION [ 'tokens' ][ $token ]))
593 unset ( $_SESSION [ 'tokens' ][ $token ]); // Token is used: destroy it.
594 return true ; // Token is OK.
596 return false ; // Wrong token, or already used.
599 // ------------------------------------------------------------------------------------------
600 /* This class is in charge of building the final page.
601 (This is basically a wrapper around RainTPL which pre-fills some fields.)
603 p.assign('myfield','myvalue');
604 p.renderPage('mytemplate');
609 private $tpl ; // RainTPL template
611 function __construct ()
616 private function initialize ()
618 $this- > tpl
= new RainTPL
;
619 $this- > tpl
-> assign ( 'newversion' , escape ( checkUpdate ()));
620 $this- > tpl
-> assign ( 'feedurl' , escape ( indexUrl ()));
621 $searchcrits = '' ; // Search criteria
622 if (! empty ( $_GET [ 'searchtags' ])) $searchcrits .= '&searchtags=' . urlencode ( $_GET [ 'searchtags' ]);
623 elseif (! empty ( $_GET [ 'searchterm' ])) $searchcrits .= '&searchterm=' . urlencode ( $_GET [ 'searchterm' ]);
624 $this- > tpl
-> assign ( 'searchcrits' , $searchcrits );
625 $this- > tpl
-> assign ( 'source' , indexUrl ());
626 $this- > tpl
-> assign ( 'version' , shaarli_version
);
627 $this- > tpl
-> assign ( 'scripturl' , indexUrl ());
628 $this- > tpl
-> assign ( 'pagetitle' , 'Shaarli' );
629 $this- > tpl
-> assign ( 'privateonly' ,! empty ( $_SESSION [ 'privateonly' ])); // Show only private links?
630 if (! empty ( $GLOBALS [ 'title' ])) $this- > tpl
-> assign ( 'pagetitle' , $GLOBALS [ 'title' ]);
631 if (! empty ( $GLOBALS [ 'titleLink' ])) $this- > tpl
-> assign ( 'titleLink' , $GLOBALS [ 'titleLink' ]);
632 if (! empty ( $GLOBALS [ 'pagetitle' ])) $this- > tpl
-> assign ( 'pagetitle' , $GLOBALS [ 'pagetitle' ]);
633 $this- > tpl
-> assign ( 'shaarlititle' , empty ( $GLOBALS [ 'title' ]) ? 'Shaarli' : $GLOBALS [ 'title' ] );
637 // The following assign() method is basically the same as RainTPL (except that it's lazy)
638 public function assign ( $what , $where )
640 if ( $this- > tpl
=== false ) $this- > initialize (); // Lazy initialization
641 $this- > tpl
-> assign ( $what , $where );
644 // Render a specific page (using a template).
645 // e.g. pb.renderPage('picwall')
646 public function renderPage ( $page )
648 if ( $this- > tpl
=== false ) $this- > initialize (); // Lazy initialization
649 $this- > tpl
-> draw ( $page );
653 // ------------------------------------------------------------------------------------------
654 // Output the last N links in RSS 2.0 format.
657 header ( 'Content-Type: application/rss+xml; charset=utf-8' );
659 // $usepermalink : If true, use permalink instead of final link.
660 // User just has to add 'permalink' in URL parameters. e.g. http://mysite.com/shaarli/?do=rss&permalinks
661 // Also enabled through a config option
662 $usepermalinks = isset ( $_GET [ 'permalinks' ]) || ! $GLOBALS [ 'config' ][ 'ENABLE_RSS_PERMALINKS' ];
665 $query = $_SERVER [ "QUERY_STRING" ];
666 $cache = new CachedPage (
667 $GLOBALS [ 'config' ][ 'PAGECACHE' ],
669 startsWith ( $query , 'do=rss' ) && ! isLoggedIn ()
671 $cached = $cache- > cachedVersion ();
672 if (! empty ( $cached )) {
677 // If cached was not found (or not usable), then read the database and build the response:
678 $LINKSDB = new LinkDB (
679 $GLOBALS [ 'config' ][ 'DATASTORE' ],
680 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
681 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
683 // Read links from database (and filter private links if user it not logged in).
685 // Optionally filter the results:
686 $linksToDisplay = array ();
687 if (! empty ( $_GET [ 'searchterm' ])) $linksToDisplay = $LINKSDB- > filterFulltext ( $_GET [ 'searchterm' ]);
688 else if (! empty ( $_GET [ 'searchtags' ])) $linksToDisplay = $LINKSDB- > filterTags ( trim ( $_GET [ 'searchtags' ]));
689 else $linksToDisplay = $LINKSDB ;
691 $nblinksToDisplay = 50 ; // Number of links to display.
692 if (! empty ( $_GET [ 'nb' ])) // In URL, you can specificy the number of links. Example: nb=200 or nb=all for all links.
694 $nblinksToDisplay = $_GET [ 'nb' ]== 'all' ? count ( $linksToDisplay ) : max ( $_GET [ 'nb' ] +
0 , 1 ) ;
697 $pageaddr = escape ( indexUrl ());
698 echo '<?xml version="1.0" encoding="UTF-8"?><rss version="2.0" xmlns:content="http://purl.org/rss/1.0/modules/content/">' ;
699 echo '<channel><title>' . $GLOBALS [ 'title' ]. '</title><link>' . $pageaddr . '</link>' ;
700 echo '<description>Shared links</description><language>en-en</language><copyright>' . $pageaddr . '</copyright>' . " \n\n " ;
701 if (! empty ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]))
703 echo '<!-- PubSubHubbub Discovery -->' ;
704 echo '<link rel="hub" href="' . escape ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]). '" xmlns="http://www.w3.org/2005/Atom" />' ;
705 echo '<link rel="self" href="' . $pageaddr . '?do=rss" xmlns="http://www.w3.org/2005/Atom" />' ;
706 echo '<!-- End Of PubSubHubbub Discovery -->' ;
709 $keys = array (); foreach ( $linksToDisplay as $key => $value ) { $keys
[]= $key
; } // No, I can't use array_keys().
710 while ( $i < $nblinksToDisplay && $i < count ( $keys ))
712 $link = $linksToDisplay [ $keys [ $i ]];
713 $guid = $pageaddr . '?' . smallHash ( $link [ 'linkdate' ]);
714 $rfc822date = linkdate2rfc822 ( $link [ 'linkdate' ]);
715 $absurl = $link [ 'url' ];
716 if ( startsWith ( $absurl , '?' )) $absurl = $pageaddr . $absurl ; // make permalink URL absolute
717 if ( $usepermalinks === true )
718 echo '<item><title>' . $link [ 'title' ]. '</title><guid isPermaLink="true">' . $guid . '</guid><link>' . $guid . '</link>' ;
720 echo '<item><title>' . $link [ 'title' ]. '</title><guid isPermaLink="false">' . $guid . '</guid><link>' . $absurl . '</link>' ;
721 if (! $GLOBALS [ 'config' ][ 'HIDE_TIMESTAMPS' ] || isLoggedIn ()) echo '<pubDate>' . escape ( $rfc822date ). "</pubDate> \n " ;
722 if ( $link [ 'tags' ]!= '' ) // Adding tags to each RSS entry (as mentioned in RSS specification)
724 foreach ( explode ( ' ' , $link [ 'tags' ]) as $tag ) { echo '<category domain="' . $pageaddr
. '">' . $tag
. '</category>' . " \n " ; }
727 // Add permalink in description
728 $descriptionlink = '(<a href="' . $guid . '">Permalink</a>)' ;
729 // If user wants permalinks first, put the final link in description
730 if ( $usepermalinks === true ) $descriptionlink = '(<a href="' . $absurl . '">Link</a>)' ;
731 if ( strlen ( $link [ 'description' ])> 0 ) $descriptionlink = '<br>' . $descriptionlink ;
732 echo '<description><![CDATA[' . nl2br ( keepMultipleSpaces ( text2clickable ( $link [ 'description' ]))). $descriptionlink . ']]></description>' . " \n </item> \n " ;
735 echo '</channel></rss><!-- Cached version of ' . escape ( pageUrl ()). ' -->' ;
737 $cache- > cache ( ob_get_contents ());
742 // ------------------------------------------------------------------------------------------
743 // Output the last N links in ATOM format.
746 header ( 'Content-Type: application/atom+xml; charset=utf-8' );
748 // $usepermalink : If true, use permalink instead of final link.
749 // User just has to add 'permalink' in URL parameters. e.g. http://mysite.com/shaarli/?do=atom&permalinks
750 $usepermalinks = isset ( $_GET [ 'permalinks' ]) || ! $GLOBALS [ 'config' ][ 'ENABLE_RSS_PERMALINKS' ];
753 $query = $_SERVER [ "QUERY_STRING" ];
754 $cache = new CachedPage (
755 $GLOBALS [ 'config' ][ 'PAGECACHE' ],
757 startsWith ( $query , 'do=atom' ) && ! isLoggedIn ()
759 $cached = $cache- > cachedVersion ();
760 if (! empty ( $cached )) {
765 // If cached was not found (or not usable), then read the database and build the response:
766 // Read links from database (and filter private links if used it not logged in).
767 $LINKSDB = new LinkDB (
768 $GLOBALS [ 'config' ][ 'DATASTORE' ],
769 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
770 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
773 // Optionally filter the results:
774 $linksToDisplay = array ();
775 if (! empty ( $_GET [ 'searchterm' ])) $linksToDisplay = $LINKSDB- > filterFulltext ( $_GET [ 'searchterm' ]);
776 else if (! empty ( $_GET [ 'searchtags' ])) $linksToDisplay = $LINKSDB- > filterTags ( trim ( $_GET [ 'searchtags' ]));
777 else $linksToDisplay = $LINKSDB ;
779 $nblinksToDisplay = 50 ; // Number of links to display.
780 if (! empty ( $_GET [ 'nb' ])) // In URL, you can specificy the number of links. Example: nb=200 or nb=all for all links.
782 $nblinksToDisplay = $_GET [ 'nb' ]== 'all' ? count ( $linksToDisplay ) : max ( $_GET [ 'nb' ] +
0 , 1 ) ;
785 $pageaddr = escape ( indexUrl ());
789 $keys = array (); foreach ( $linksToDisplay as $key => $value ) { $keys
[]= $key
; } // No, I can't use array_keys().
790 while ( $i < $nblinksToDisplay && $i < count ( $keys ))
792 $link = $linksToDisplay [ $keys [ $i ]];
793 $guid = $pageaddr . '?' . smallHash ( $link [ 'linkdate' ]);
794 $iso8601date = linkdate2iso8601 ( $link [ 'linkdate' ]);
795 $latestDate = max ( $latestDate , $iso8601date );
796 $absurl = $link [ 'url' ];
797 if ( startsWith ( $absurl , '?' )) $absurl = $pageaddr . $absurl ; // make permalink URL absolute
798 $entries .= '<entry><title>' . $link [ 'title' ]. '</title>' ;
799 if ( $usepermalinks === true )
800 $entries .= '<link href="' . $guid . '" /><id>' . $guid . '</id>' ;
802 $entries .= '<link href="' . $absurl . '" /><id>' . $guid . '</id>' ;
803 if (! $GLOBALS [ 'config' ][ 'HIDE_TIMESTAMPS' ] || isLoggedIn ()) $entries .= '<updated>' . escape ( $iso8601date ). '</updated>' ;
805 // Add permalink in description
806 $descriptionlink = '(<a href="' . $guid . '">Permalink</a>)' ;
807 // If user wants permalinks first, put the final link in description
808 if ( $usepermalinks === true ) $descriptionlink = '(<a href="' . $absurl . '">Link</a>)' ;
809 if ( strlen ( $link [ 'description' ])> 0 ) $descriptionlink = '<br>' . $descriptionlink ;
811 $entries .= '<content type="html"><![CDATA[' . nl2br ( keepMultipleSpaces ( text2clickable ( $link [ 'description' ]))). $descriptionlink . "]]></content> \n " ;
812 if ( $link [ 'tags' ]!= '' ) // Adding tags to each ATOM entry (as mentioned in ATOM specification)
814 foreach ( explode ( ' ' , $link [ 'tags' ]) as $tag )
815 { $entries
.= '<category scheme="' . $pageaddr
. '" term="' . $tag
. '" />' . " \n " ; }
817 $entries .= "</entry> \n " ;
820 $feed = '<?xml version="1.0" encoding="UTF-8"?><feed xmlns="http://www.w3.org/2005/Atom">' ;
821 $feed .= '<title>' . $GLOBALS [ 'title' ]. '</title>' ;
822 if (! $GLOBALS [ 'config' ][ 'HIDE_TIMESTAMPS' ] || isLoggedIn ()) $feed .= '<updated>' . escape ( $latestDate ). '</updated>' ;
823 $feed .= '<link rel="self" href="' . escape ( serverUrl (). $_SERVER [ "REQUEST_URI" ]). '" />' ;
824 if (! empty ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]))
826 $feed .= '<!-- PubSubHubbub Discovery -->' ;
827 $feed .= '<link rel="hub" href="' . escape ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]). '" />' ;
828 $feed .= '<!-- End Of PubSubHubbub Discovery -->' ;
830 $feed .= '<author><name>' . $pageaddr . '</name><uri>' . $pageaddr . '</uri></author>' ;
831 $feed .= '<id>' . $pageaddr . '</id>' . " \n\n " ; // Yes, I know I should use a real IRI (RFC3987), but the site URL will do.
833 $feed .= '</feed><!-- Cached version of ' . escape ( pageUrl ()). ' -->' ;
836 $cache- > cache ( ob_get_contents ());
841 // ------------------------------------------------------------------------------------------
842 // Daily RSS feed: 1 RSS entry per day giving all the links on that day.
843 // Gives the last 7 days (which have links).
844 // This RSS feed cannot be filtered.
845 function showDailyRSS () {
847 $query = $_SERVER [ "QUERY_STRING" ];
848 $cache = new CachedPage (
849 $GLOBALS [ 'config' ][ 'PAGECACHE' ],
851 startsWith ( $query , 'do=dailyrss' ) && ! isLoggedIn ()
853 $cached = $cache- > cachedVersion ();
854 if (! empty ( $cached )) {
859 // If cached was not found (or not usable), then read the database and build the response:
860 // Read links from database (and filter private links if used it not logged in).
861 $LINKSDB = new LinkDB (
862 $GLOBALS [ 'config' ][ 'DATASTORE' ],
863 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
864 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
867 /* Some Shaarlies may have very few links, so we need to look
868 back in time (rsort()) until we have enough days ($nb_of_days).
870 $linkdates = array ();
871 foreach ( $LINKSDB as $linkdate => $value ) {
872 $linkdates [] = $linkdate ;
875 $nb_of_days = 7 ; // We take 7 days.
876 $today = Date ( 'Ymd' );
879 foreach ( $linkdates as $linkdate ) {
880 $day = substr ( $linkdate , 0 , 8 ); // Extract day (without time)
881 if ( strcmp ( $day , $today ) < 0 ) {
882 if ( empty ( $days [ $day ])) {
883 $days [ $day ] = array ();
885 $days [ $day ][] = $linkdate ;
888 if ( count ( $days ) > $nb_of_days ) {
889 break ; // Have we collected enough days?
893 // Build the RSS feed.
894 header ( 'Content-Type: application/rss+xml; charset=utf-8' );
895 $pageaddr = escape ( indexUrl ());
896 echo '<?xml version="1.0" encoding="UTF-8"?><rss version="2.0">' ;
898 echo '<title>Daily - ' . $GLOBALS [ 'title' ] . '</title>' ;
899 echo '<link>' . $pageaddr . '</link>' ;
900 echo '<description>Daily shared links</description>' ;
901 echo '<language>en-en</language>' ;
902 echo '<copyright>' . $pageaddr . '</copyright>' . PHP_EOL
;
905 foreach ( $days as $day => $linkdates ) {
906 $daydate = linkdate2timestamp ( $day . '_000000' ); // Full text date
907 $rfc822date = linkdate2rfc822 ( $day . '_000000' );
908 $absurl = escape ( indexUrl (). '?do=daily&day=' . $day ); // Absolute URL of the corresponding "Daily" page.
910 // Build the HTML body of this RSS entry.
915 // We pre-format some fields for proper output.
916 foreach ( $linkdates as $linkdate ) {
917 $l = $LINKSDB [ $linkdate ];
918 $l [ 'formatedDescription' ] = nl2br ( keepMultipleSpaces ( text2clickable ( $l [ 'description' ])));
919 $l [ 'thumbnail' ] = thumbnail ( $l [ 'url' ]);
920 $l [ 'timestamp' ] = linkdate2timestamp ( $l [ 'linkdate' ]);
921 if ( startsWith ( $l [ 'url' ], '?' )) {
922 $l [ 'url' ] = indexUrl () . $l [ 'url' ]; // make permalink URL absolute
924 $links [ $linkdate ] = $l ;
927 // Then build the HTML for this day:
929 $tpl- > assign ( 'title' , $GLOBALS [ 'title' ]);
930 $tpl- > assign ( 'daydate' , $daydate );
931 $tpl- > assign ( 'absurl' , $absurl );
932 $tpl- > assign ( 'links' , $links );
933 $tpl- > assign ( 'rfc822date' , escape ( $rfc822date ));
934 $html = $tpl- > draw ( 'dailyrss' , $return_string = true );
936 echo $html . PHP_EOL
;
938 echo '</channel></rss><!-- Cached version of ' . escape ( pageUrl ()) . ' -->' ;
940 $cache- > cache ( ob_get_contents ());
948 $LINKSDB = new LinkDB (
949 $GLOBALS [ 'config' ][ 'DATASTORE' ],
950 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
951 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
954 $day = Date ( 'Ymd' , strtotime ( '-1 day' )); // Yesterday, in format YYYYMMDD.
955 if ( isset ( $_GET [ 'day' ])) $day = $_GET [ 'day' ];
957 $days = $LINKSDB- > days ();
958 $i = array_search ( $day , $days );
959 if ( $i === false ) { $i
= count ( $days
)- 1 ; $day
= $days
[ $i
]; }
964 if ( $i >= 1 ) $previousday = $days [ $i-1 ];
965 if ( $i < count ( $days )- 1 ) $nextday = $days [ $i +
1 ];
969 $linksToDisplay = $LINKSDB- > filterDay ( $day );
970 } catch ( Exception
$exc ) {
972 $linksToDisplay = array ();
975 // We pre-format some fields for proper output.
976 foreach ( $linksToDisplay as $key => $link )
979 $taglist = explode ( ' ' , $link [ 'tags' ]);
980 uasort ( $taglist , 'strcasecmp' );
981 $linksToDisplay [ $key ][ 'taglist' ]= $taglist ;
982 $linksToDisplay [ $key ][ 'formatedDescription' ]= nl2br ( keepMultipleSpaces ( text2clickable ( $link [ 'description' ])));
983 $linksToDisplay [ $key ][ 'thumbnail' ] = thumbnail ( $link [ 'url' ]);
984 $linksToDisplay [ $key ][ 'timestamp' ] = linkdate2timestamp ( $link [ 'linkdate' ]);
987 /* We need to spread the articles on 3 columns.
988 I did not want to use a JavaScript lib like http://masonry.desandro.com/
989 so I manually spread entries with a simple method: I roughly evaluate the
990 height of a div according to title and description length.
992 $columns = array ( array (), array (), array ()); // Entries to display, for each column.
993 $fill = array ( 0 , 0 , 0 ); // Rough estimate of columns fill.
994 foreach ( $linksToDisplay as $key => $link )
996 // Roughly estimate length of entry (by counting characters)
997 // Title: 30 chars = 1 line. 1 line is 30 pixels height.
998 // Description: 836 characters gives roughly 342 pixel height.
999 // This is not perfect, but it's usually OK.
1000 $length = strlen ( $link [ 'title' ]) +
( 342 * strlen ( $link [ 'description' ]))/ 836 ;
1001 if ( $link [ 'thumbnail' ]) $length +
= 100 ; // 1 thumbnails roughly takes 100 pixels height.
1002 // Then put in column which is the less filled:
1003 $smallest = min ( $fill ); // find smallest value in array.
1004 $index = array_search ( $smallest , $fill ); // find index of this smallest value.
1005 array_push ( $columns [ $index ], $link ); // Put entry in this column.
1006 $fill [ $index ] +
= $length ;
1008 $PAGE = new pageBuilder
;
1009 $PAGE- > assign ( 'linksToDisplay' , $linksToDisplay );
1010 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1011 $PAGE- > assign ( 'cols' , $columns );
1012 $PAGE- > assign ( 'day' , linkdate2timestamp ( $day . '_000000' ));
1013 $PAGE- > assign ( 'previousday' , $previousday );
1014 $PAGE- > assign ( 'nextday' , $nextday );
1015 $PAGE- > renderPage ( 'daily' );
1020 // ------------------------------------------------------------------------------------------
1021 // Render HTML page (according to URL parameters and user rights)
1022 function renderPage ()
1024 $LINKSDB = new LinkDB (
1025 $GLOBALS [ 'config' ][ 'DATASTORE' ],
1026 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
1027 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
1030 // -------- Display login form.
1031 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=login' ))
1033 if ( $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ]) { header ( 'Location: ?' ); exit ; } // No need to login for open Shaarli
1034 $token = '' ; if ( ban_canLogin ()) $token = getToken (); // Do not waste token generation if not useful.
1035 $PAGE = new pageBuilder
;
1036 $PAGE- > assign ( 'token' , $token );
1037 $PAGE- > assign ( 'returnurl' ,( isset ( $_SERVER [ 'HTTP_REFERER' ]) ? escape ( $_SERVER [ 'HTTP_REFERER' ]): '' ));
1038 $PAGE- > renderPage ( 'loginform' );
1041 // -------- User wants to logout.
1042 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=logout' ))
1044 invalidateCaches ( $GLOBALS [ 'config' ][ 'PAGECACHE' ]);
1046 header ( 'Location: ?' );
1050 // -------- Picture wall
1051 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=picwall' ))
1053 // Optionally filter the results:
1055 if (! empty ( $_GET [ 'searchterm' ])) $links = $LINKSDB- > filterFulltext ( $_GET [ 'searchterm' ]);
1056 elseif (! empty ( $_GET [ 'searchtags' ])) $links = $LINKSDB- > filterTags ( trim ( $_GET [ 'searchtags' ]));
1057 else $links = $LINKSDB ;
1060 $linksToDisplay = array ();
1062 // Get only links which have a thumbnail.
1063 foreach ( $links as $link )
1065 $permalink = '?' . escape ( smallhash ( $link [ 'linkdate' ]));
1066 $thumb = lazyThumbnail ( $link [ 'url' ], $permalink );
1067 if ( $thumb != '' ) // Only output links which have a thumbnail.
1069 $link [ 'thumbnail' ]= $thumb ; // Thumbnail HTML code.
1070 $linksToDisplay []= $link ; // Add to array.
1074 $PAGE = new pageBuilder
;
1075 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1076 $PAGE- > assign ( 'linksToDisplay' , $linksToDisplay );
1077 $PAGE- > renderPage ( 'picwall' );
1081 // -------- Tag cloud
1082 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=tagcloud' ))
1084 $tags = $LINKSDB- > allTags ();
1086 // We sort tags alphabetically, then choose a font size according to count.
1087 // First, find max value.
1088 $maxcount = 0 ; foreach ( $tags as $key => $value ) $maxcount = max ( $maxcount , $value );
1091 foreach ( $tags as $key => $value )
1092 // Tag font size scaling: default 15 and 30 logarithm bases affect scaling, 22 and 6 are arbitrary font sizes for max and min sizes.
1094 $tagList [ $key ] = array ( 'count' => $value , 'size' => log ( $value , 15 ) / log ( $maxcount , 30 ) * ( 22 - 6 ) +
6 );
1096 $PAGE = new pageBuilder
;
1097 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1098 $PAGE- > assign ( 'tags' , $tagList );
1099 $PAGE- > renderPage ( 'tagcloud' );
1103 // -------- User clicks on a tag in a link: The tag is added to the list of searched tags (searchtags=...)
1104 if ( isset ( $_GET [ 'addtag' ]))
1106 // Get previous URL (http_referer) and add the tag to the searchtags parameters in query.
1107 if ( empty ( $_SERVER [ 'HTTP_REFERER' ])) { header ( 'Location: ?searchtags=' . urlencode ( $_GET
[ 'addtag' ])); exit ; } // In case browser does not send HTTP_REFERER
1108 parse_str ( parse_url ( $_SERVER [ 'HTTP_REFERER' ], PHP_URL_QUERY
), $params );
1110 // Prevent redirection loop
1111 if ( isset ( $params [ 'addtag' ])) {
1112 unset ( $params [ 'addtag' ]);
1115 // Check if this tag is already in the search query and ignore it if it is.
1116 // Each tag is always separated by a space
1117 if ( isset ( $params [ 'searchtags' ])) {
1118 $current_tags = explode ( ' ' , $params [ 'searchtags' ]);
1120 $current_tags = array ();
1123 foreach ( $current_tags as $value ) {
1124 if ( $value === $_GET [ 'addtag' ]) {
1129 // Append the tag if necessary
1130 if ( empty ( $params [ 'searchtags' ])) {
1131 $params [ 'searchtags' ] = trim ( $_GET [ 'addtag' ]);
1134 $params [ 'searchtags' ] = trim ( $params [ 'searchtags' ]). ' ' . trim ( $_GET [ 'addtag' ]);
1137 unset ( $params [ 'page' ]); // We also remove page (keeping the same page has no sense, since the results are different)
1138 header ( 'Location: ?' . http_build_query ( $params ));
1142 // -------- User clicks on a tag in result count: Remove the tag from the list of searched tags (searchtags=...)
1143 if ( isset ( $_GET [ 'removetag' ])) {
1144 // Get previous URL (http_referer) and remove the tag from the searchtags parameters in query.
1145 if ( empty ( $_SERVER [ 'HTTP_REFERER' ])) {
1146 header ( 'Location: ?' );
1150 // In case browser does not send HTTP_REFERER
1151 parse_str ( parse_url ( $_SERVER [ 'HTTP_REFERER' ], PHP_URL_QUERY
), $params );
1153 // Prevent redirection loop
1154 if ( isset ( $params [ 'removetag' ])) {
1155 unset ( $params [ 'removetag' ]);
1158 if ( isset ( $params [ 'searchtags' ])) {
1159 $tags = explode ( ' ' , $params [ 'searchtags' ]);
1160 $tags = array_diff ( $tags , array ( $_GET [ 'removetag' ])); // Remove value from array $tags.
1161 if ( count ( $tags )== 0 ) {
1162 unset ( $params [ 'searchtags' ]);
1164 $params [ 'searchtags' ] = implode ( ' ' , $tags );
1166 unset ( $params [ 'page' ]); // We also remove page (keeping the same page has no sense, since the results are different)
1168 header ( 'Location: ?' . http_build_query ( $params ));
1172 // -------- User wants to change the number of links per page (linksperpage=...)
1173 if ( isset ( $_GET [ 'linksperpage' ])) {
1174 if ( is_numeric ( $_GET [ 'linksperpage' ])) {
1175 $_SESSION [ 'LINKS_PER_PAGE' ]= abs ( intval ( $_GET [ 'linksperpage' ]));
1178 header ( 'Location: ' . generateLocation ( $_SERVER [ 'HTTP_REFERER' ], $_SERVER [ 'HTTP_HOST' ], array ( 'linksperpage' )));
1182 // -------- User wants to see only private links (toggle)
1183 if ( isset ( $_GET [ 'privateonly' ])) {
1184 if ( empty ( $_SESSION [ 'privateonly' ])) {
1185 $_SESSION [ 'privateonly' ] = 1 ; // See only private links
1187 unset ( $_SESSION [ 'privateonly' ]); // See all links
1190 header ( 'Location: ' . generateLocation ( $_SERVER [ 'HTTP_REFERER' ], $_SERVER [ 'HTTP_HOST' ], array ( 'privateonly' )));
1194 // -------- Handle other actions allowed for non-logged in users:
1197 // User tries to post new link but is not logged in:
1198 // Show login screen, then redirect to ?post=...
1199 if ( isset ( $_GET [ 'post' ]))
1201 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.
1205 // Same case as above except that user tried to access ?do=addlink without being logged in
1206 // Note: passing empty parameters makes Shaarli generate default URLs and descriptions.
1207 if ( isset ( $_GET [ 'do' ]) && $_GET [ 'do' ] === 'addlink' ) {
1208 header ( 'Location: ?do=login&post=' );
1212 if ( isset ( $_GET [ 'edit_link' ])) {
1213 header ( 'Location: ?do=login&edit_link=' . escape ( $_GET [ 'edit_link' ]));
1217 $PAGE = new pageBuilder
;
1218 buildLinkList ( $PAGE , $LINKSDB ); // Compute list of links to display
1219 $PAGE- > renderPage ( 'linklist' );
1220 exit ; // Never remove this one! All operations below are reserved for logged in user.
1223 // -------- All other functions are reserved for the registered user:
1225 // -------- Display the Tools menu if requested (import/export/bookmarklet...)
1226 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=tools' ))
1228 $PAGE = new pageBuilder
;
1229 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1230 $PAGE- > assign ( 'pageabsaddr' , indexUrl ());
1231 $PAGE- > renderPage ( 'tools' );
1235 // -------- User wants to change his/her password.
1236 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=changepasswd' ))
1238 if ( $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ]) die ( 'You are not supposed to change a password on an Open Shaarli.' );
1239 if (! empty ( $_POST [ 'setpassword' ]) && ! empty ( $_POST [ 'oldpassword' ]))
1241 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' ); // Go away!
1243 // Make sure old password is correct.
1244 $oldhash = sha1 ( $_POST [ 'oldpassword' ]. $GLOBALS [ 'login' ]. $GLOBALS [ 'salt' ]);
1245 if ( $oldhash != $GLOBALS [ 'hash' ]) { echo '<script>alert("The old password is not correct.");document.location= \' ?do=changepasswd \' ;</script>' ; exit ; }
1246 // Save new password
1247 $GLOBALS [ 'salt' ] = sha1 ( uniqid ( '' , true ). '_' . mt_rand ()); // Salt renders rainbow-tables attacks useless.
1248 $GLOBALS [ 'hash' ] = sha1 ( $_POST [ 'setpassword' ]. $GLOBALS [ 'login' ]. $GLOBALS [ 'salt' ]);
1250 writeConfig ( $GLOBALS , isLoggedIn ());
1252 catch ( Exception
$e ) {
1254 'ERROR while writing config file after changing password.' . PHP_EOL
.
1258 // TODO: do not handle exceptions/errors in JS.
1259 echo '<script>alert("' . $e- > getMessage () . '");document.location= \' ?do=tools \' ;</script>' ;
1262 echo '<script>alert("Your password has been changed.");document.location= \' ?do=tools \' ;</script>' ;
1265 else // show the change password form.
1267 $PAGE = new pageBuilder
;
1268 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1269 $PAGE- > assign ( 'token' , getToken ());
1270 $PAGE- > renderPage ( 'changepassword' );
1275 // -------- User wants to change configuration
1276 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=configure' ))
1278 if (! empty ( $_POST [ 'title' ]) )
1280 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' ); // Go away!
1282 if (! empty ( $_POST [ 'continent' ]) && ! empty ( $_POST [ 'city' ]))
1283 if ( isTimeZoneValid ( $_POST [ 'continent' ], $_POST [ 'city' ]))
1284 $tz = $_POST [ 'continent' ]. '/' . $_POST [ 'city' ];
1285 $GLOBALS [ 'timezone' ] = $tz ;
1286 $GLOBALS [ 'title' ]= $_POST [ 'title' ];
1287 $GLOBALS [ 'titleLink' ]= $_POST [ 'titleLink' ];
1288 $GLOBALS [ 'redirector' ]= $_POST [ 'redirector' ];
1289 $GLOBALS [ 'disablesessionprotection' ]=! empty ( $_POST [ 'disablesessionprotection' ]);
1290 $GLOBALS [ 'privateLinkByDefault' ]=! empty ( $_POST [ 'privateLinkByDefault' ]);
1291 $GLOBALS [ 'config' ][ 'ENABLE_RSS_PERMALINKS' ]= ! empty ( $_POST [ 'enableRssPermalinks' ]);
1292 $GLOBALS [ 'config' ][ 'ENABLE_UPDATECHECK' ] = ! empty ( $_POST [ 'updateCheck' ]);
1293 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ] = ! empty ( $_POST [ 'hidePublicLinks' ]);
1295 writeConfig ( $GLOBALS , isLoggedIn ());
1297 catch ( Exception
$e ) {
1299 'ERROR while writing config file after configuration update.' . PHP_EOL
.
1303 // TODO: do not handle exceptions/errors in JS.
1304 echo '<script>alert("' . $e- > getMessage () . '");document.location= \' ?do=tools \' ;</script>' ;
1307 echo '<script>alert("Configuration was saved.");document.location= \' ?do=tools \' ;</script>' ;
1310 else // Show the configuration form.
1312 $PAGE = new pageBuilder
;
1313 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1314 $PAGE- > assign ( 'token' , getToken ());
1315 $PAGE- > assign ( 'title' , empty ( $GLOBALS [ 'title' ]) ? '' : $GLOBALS [ 'title' ] );
1316 $PAGE- > assign ( 'redirector' , empty ( $GLOBALS [ 'redirector' ]) ? '' : $GLOBALS [ 'redirector' ] );
1317 list ( $timezone_form , $timezone_js ) = generateTimeZoneForm ( $GLOBALS [ 'timezone' ]);
1318 $PAGE- > assign ( 'timezone_form' , $timezone_form );
1319 $PAGE- > assign ( 'timezone_js' , $timezone_js );
1320 $PAGE- > renderPage ( 'configure' );
1325 // -------- User wants to rename a tag or delete it
1326 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=changetag' ))
1328 if ( empty ( $_POST [ 'fromtag' ]))
1330 $PAGE = new pageBuilder
;
1331 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1332 $PAGE- > assign ( 'token' , getToken ());
1333 $PAGE- > assign ( 'tags' , $LINKSDB- > allTags ());
1334 $PAGE- > renderPage ( 'changetag' );
1337 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' );
1340 if (! empty ( $_POST [ 'deletetag' ]) && ! empty ( $_POST [ 'fromtag' ]))
1342 $needle = trim ( $_POST [ 'fromtag' ]);
1343 $linksToAlter = $LINKSDB- > filterTags ( $needle , true ); // True for case-sensitive tag search.
1344 foreach ( $linksToAlter as $key => $value )
1346 $tags = explode ( ' ' , trim ( $value [ 'tags' ]));
1347 unset ( $tags [ array_search ( $needle , $tags )]); // Remove tag.
1348 $value [ 'tags' ]= trim ( implode ( ' ' , $tags ));
1349 $LINKSDB [ $key ]= $value ;
1351 $LINKSDB- > savedb ( $GLOBALS [ 'config' ][ 'PAGECACHE' ]); // Save to disk.
1352 echo '<script>alert("Tag was removed from ' . count ( $linksToAlter ). ' links.");document.location= \' ? \' ;</script>' ;
1357 if (! empty ( $_POST [ 'renametag' ]) && ! empty ( $_POST [ 'fromtag' ]) && ! empty ( $_POST [ 'totag' ]))
1359 $needle = trim ( $_POST [ 'fromtag' ]);
1360 $linksToAlter = $LINKSDB- > filterTags ( $needle , true ); // true for case-sensitive tag search.
1361 foreach ( $linksToAlter as $key => $value )
1363 $tags = explode ( ' ' , trim ( $value [ 'tags' ]));
1364 $tags [ array_search ( $needle , $tags )] = trim ( $_POST [ 'totag' ]); // Replace tags value.
1365 $value [ 'tags' ]= trim ( implode ( ' ' , $tags ));
1366 $LINKSDB [ $key ]= $value ;
1368 $LINKSDB- > savedb ( $GLOBALS [ 'config' ][ 'PAGECACHE' ]); // Save to disk.
1369 echo '<script>alert("Tag was renamed in ' . count ( $linksToAlter ). ' links.");document.location= \' ?searchtags=' . urlencode ( $_POST [ 'totag' ]). ' \' ;</script>' ;
1374 // -------- User wants to add a link without using the bookmarklet: Show form.
1375 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=addlink' ))
1377 $PAGE = new pageBuilder
;
1378 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1379 $PAGE- > renderPage ( 'addlink' );
1383 // -------- User clicked the "Save" button when editing a link: Save link to database.
1384 if ( isset ( $_POST [ 'save_edit' ]))
1386 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' ); // Go away!
1387 $tags = trim ( preg_replace ( '/\s\s+/' , ' ' , $_POST [ 'lf_tags' ])); // Remove multiple spaces.
1388 $tags = implode ( ' ' , array_unique ( explode ( ' ' , $tags ))); // Remove duplicates.
1389 $linkdate = $_POST [ 'lf_linkdate' ];
1390 $url = trim ( $_POST [ 'lf_url' ]);
1391 if (! startsWith ( $url , 'http:' ) && ! startsWith ( $url , 'https:' ) && ! startsWith ( $url , 'ftp:' ) && ! startsWith ( $url , 'magnet:' ) && ! startsWith ( $url , '?' ) && ! startsWith ( $url , 'javascript:' ))
1392 $url = 'http://' . $url ;
1393 $link = array ( 'title' => trim ( $_POST [ 'lf_title' ]), 'url' => $url , 'description' => trim ( $_POST [ 'lf_description' ]), 'private' =>( isset ( $_POST [ 'lf_private' ]) ? 1 : 0 ),
1394 'linkdate' => $linkdate , 'tags' => str_replace ( ',' , ' ' , $tags ));
1395 if ( $link [ 'title' ]== '' ) $link [ 'title' ]= $link [ 'url' ]; // If title is empty, use the URL as title.
1396 $LINKSDB [ $linkdate ] = $link ;
1397 $LINKSDB- > savedb ( $GLOBALS [ 'config' ][ 'PAGECACHE' ]); // Save to disk.
1400 // If we are called from the bookmarklet, we must close the popup:
1401 if ( isset ( $_GET [ 'source' ]) && ( $_GET [ 'source' ]== 'bookmarklet' || $_GET [ 'source' ]== 'firefoxsocialapi' )) { echo '<script>self.close();</script>' ; exit ; }
1402 $returnurl = ( ! empty ( $_POST [ 'returnurl' ]) ? escape ( $_POST [ 'returnurl' ]) : '?' );
1403 $returnurl .= '#' . smallHash ( $_POST [ 'lf_linkdate' ]); // Scroll to the link which has been edited.
1404 $location = generateLocation ( $returnurl , $_SERVER [ 'HTTP_HOST' ], array ( 'addlink' , 'post' , 'edit_link' ));
1405 header ( 'Location: ' . $location ); // After saving the link, redirect to the page the user was on.
1409 // -------- User clicked the "Cancel" button when editing a link.
1410 if ( isset ( $_POST [ 'cancel_edit' ]))
1412 // If we are called from the bookmarklet, we must close the popup:
1413 if ( isset ( $_GET [ 'source' ]) && ( $_GET [ 'source' ]== 'bookmarklet' || $_GET [ 'source' ]== 'firefoxsocialapi' )) { echo '<script>self.close();</script>' ; exit ; }
1414 $returnurl = ( isset ( $_POST [ 'returnurl' ]) ? $_POST [ 'returnurl' ] : '?' );
1415 $returnurl .= '#' . smallHash ( $_POST [ 'lf_linkdate' ]); // Scroll to the link which has been edited.
1416 $returnurl = generateLocation ( $returnurl , $_SERVER [ 'HTTP_HOST' ], array ( 'addlink' , 'post' , 'edit_link' ));
1417 header ( 'Location: ' . $returnurl ); // After canceling, redirect to the page the user was on.
1421 // -------- User clicked the "Delete" button when editing a link: Delete link from database.
1422 if ( isset ( $_POST [ 'delete_link' ]))
1424 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' );
1425 // We do not need to ask for confirmation:
1426 // - confirmation is handled by JavaScript
1427 // - we are protected from XSRF by the token.
1428 $linkdate = $_POST [ 'lf_linkdate' ];
1429 unset ( $LINKSDB [ $linkdate ]);
1430 $LINKSDB- > savedb ( $GLOBALS [ 'config' ][ 'PAGECACHE' ]); // save to disk
1432 // If we are called from the bookmarklet, we must close the popup:
1433 if ( isset ( $_GET [ 'source' ]) && ( $_GET [ 'source' ]== 'bookmarklet' || $_GET [ 'source' ]== 'firefoxsocialapi' )) { echo '<script>self.close();</script>' ; exit ; }
1434 // Pick where we're going to redirect
1435 // =============================================================
1436 // Basically, we can't redirect to where we were previously if it was a permalink
1437 // or an edit_link, because it would 404.
1439 // - / : nothing in $_GET, redirect to self
1440 // - /?page : redirect to self
1441 // - /?searchterm : redirect to self (there might be other links)
1442 // - /?searchtags : redirect to self
1443 // - /permalink : redirect to / (the link does not exist anymore)
1444 // - /?edit_link : redirect to / (the link does not exist anymore)
1445 // PHP treats the permalink as a $_GET variable, so we need to check if every condition for self
1446 // redirect is not satisfied, and only then redirect to /
1449 if ( count ( $_GET ) == 0
1450 || isset ( $_GET [ 'page' ])
1451 || isset ( $_GET [ 'searchterm' ])
1452 || isset ( $_GET [ 'searchtags' ])
1454 if ( isset ( $_POST [ 'returnurl' ])) {
1455 $location = $_POST [ 'returnurl' ]; // Handle redirects given by the form
1457 $location = generateLocation ( $_SERVER [ 'HTTP_REFERER' ], $_SERVER [ 'HTTP_HOST' ], array ( 'delete_link' ));
1461 header ( 'Location: ' . $location ); // After deleting the link, redirect to appropriate location
1465 // -------- User clicked the "EDIT" button on a link: Display link edit form.
1466 if ( isset ( $_GET [ 'edit_link' ]))
1468 $link = $LINKSDB [ $_GET [ 'edit_link' ]]; // Read database
1469 if (! $link ) { header ( 'Location: ?' ); exit ; } // Link not found in database.
1470 $PAGE = new pageBuilder
;
1471 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1472 $PAGE- > assign ( 'link' , $link );
1473 $PAGE- > assign ( 'link_is_new' , false );
1474 $PAGE- > assign ( 'token' , getToken ()); // XSRF protection.
1475 $PAGE- > assign ( 'http_referer' ,( isset ( $_SERVER [ 'HTTP_REFERER' ]) ? escape ( $_SERVER [ 'HTTP_REFERER' ]) : '' ));
1476 $PAGE- > assign ( 'tags' , $LINKSDB- > allTags ());
1477 $PAGE- > renderPage ( 'editlink' );
1481 // -------- User want to post a new link: Display link edit form.
1482 if ( isset ( $_GET [ 'post' ]))
1486 // We remove the annoying parameters added by FeedBurner, GoogleFeedProxy, Facebook...
1487 $annoyingpatterns = array ( '/[ \? &]utm_source=[^&]*/' ,
1488 '/[ \? &]utm_campaign=[^&]*/' ,
1489 '/[ \? &]utm_medium=[^&]*/' ,
1490 '/#xtor=RSS-[^&]*/' ,
1492 '/[ \? &]__scoop[^&]*/' ,
1494 '/[ \? &]action_ref_map=[^&]*/' ,
1495 '/[ \? &]action_type_map=[^&]*/' ,
1496 '/[ \? &]action_object_map=[^&]*/' ,
1497 '/[ \? &]utm_content=[^&]*/' ,
1501 foreach ( $annoyingpatterns as $pattern )
1503 $url = preg_replace ( $pattern , "" , $url );
1506 $link_is_new = false ;
1507 $link = $LINKSDB- > getLinkFromUrl ( $url ); // Check if URL is not already in database (in this case, we will edit the existing link)
1510 $link_is_new = true ; // This is a new link
1511 $linkdate = strval ( date ( 'Ymd_His' ));
1512 $title = ( empty ( $_GET [ 'title' ]) ? '' : $_GET [ 'title' ] ); // Get title if it was provided in URL (by the bookmarklet).
1513 $description = ( empty ( $_GET [ 'description' ]) ? '' : $_GET [ 'description' ]); // Get description if it was provided in URL (by the bookmarklet). [Bronco added that]
1514 $tags = ( empty ( $_GET [ 'tags' ]) ? '' : $_GET [ 'tags' ] ); // Get tags if it was provided in URL
1515 $private = (! empty ( $_GET [ 'private' ]) && $_GET [ 'private' ] === "1" ? 1 : 0 ); // Get private if it was provided in URL
1516 if (( $url != '' ) && parse_url ( $url , PHP_URL_SCHEME
)== '' ) $url = 'http://' . $url ;
1517 // If this is an HTTP link, we try go get the page to extract the title (otherwise we will to straight to the edit form.)
1518 if ( empty ( $title ) && parse_url ( $url , PHP_URL_SCHEME
)== 'http' )
1520 list ( $status , $headers , $data ) = getHTTP ( $url , 4 ); // Short timeout to keep the application responsive.
1521 // FIXME: Decode charset according to specified in either 1) HTTP response headers or 2) <head> in html
1522 if ( strpos ( $status , '200 OK' )!== false )
1524 // Look for charset in html header.
1525 preg_match ( '#<meta .*charset=.*>#Usi' , $data , $meta );
1527 // If found, extract encoding.
1528 if (! empty ( $meta [ 0 ]))
1530 // Get encoding specified in header.
1531 preg_match ( '#charset="?(.*)"#si' , $meta [ 0 ], $enc );
1532 // If charset not found, use utf-8.
1533 $html_charset = (! empty ( $enc [ 1 ])) ? strtolower ( $enc [ 1 ]) : 'utf-8' ;
1535 else { $html_charset
= 'utf-8' ; }
1538 $title = html_extract_title ( $data );
1541 // Re-encode title in utf-8 if necessary.
1542 $title = ( $html_charset == 'iso-8859-1' ) ? utf8_encode ( $title ) : $title ;
1546 if ( $url == '' ) // In case of empty URL, this is just a text (with a link that points to itself)
1548 $url = '?' . smallHash ( $linkdate );
1551 $link = array ( 'linkdate' => $linkdate , 'title' => $title , 'url' => $url , 'description' => $description , 'tags' => $tags , 'private' => $private );
1554 $PAGE = new pageBuilder
;
1555 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1556 $PAGE- > assign ( 'link' , $link );
1557 $PAGE- > assign ( 'link_is_new' , $link_is_new );
1558 $PAGE- > assign ( 'token' , getToken ()); // XSRF protection.
1559 $PAGE- > assign ( 'http_referer' ,( isset ( $_SERVER [ 'HTTP_REFERER' ]) ? $_SERVER [ 'HTTP_REFERER' ] : '' ));
1560 $PAGE- > assign ( 'source' ,( isset ( $_GET [ 'source' ]) ? $_GET [ 'source' ] : '' ));
1561 $PAGE- > assign ( 'tags' , $LINKSDB- > allTags ());
1562 $PAGE- > renderPage ( 'editlink' );
1566 // -------- Export as Netscape Bookmarks HTML file.
1567 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=export' ))
1569 if ( empty ( $_GET [ 'what' ]))
1571 $PAGE = new pageBuilder
;
1572 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1573 $PAGE- > renderPage ( 'export' );
1576 $exportWhat = $_GET [ 'what' ];
1577 if (! array_intersect ( array ( 'all' , 'public' , 'private' ), array ( $exportWhat ))) die ( 'What are you trying to export???' );
1579 header ( 'Content-Type: text/html; charset=utf-8' );
1580 header ( 'Content-disposition: attachment; filename=bookmarks_' . $exportWhat . '_' . strval ( date ( 'Ymd_His' )). '.html' );
1581 $currentdate = date ( 'Y/m/d H:i:s' );
1583 <!DOCTYPE NETSCAPE-Bookmark-file-1>
1584 <!-- This is an automatically generated file.
1585 It will be read and overwritten.
1587 <!-- Shaarli {$exportWhat} bookmarks export on {$currentdate} -->
1588 <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8">
1589 <TITLE>Bookmarks</TITLE>
1592 foreach ( $LINKSDB as $link )
1594 if ( $exportWhat == 'all' ||
1595 ( $exportWhat == 'private' && $link [ 'private' ]!= 0 ) ||
1596 ( $exportWhat == 'public' && $link [ 'private' ]== 0 ))
1598 echo '<DT><A HREF="' . $link [ 'url' ]. '" ADD_DATE="' . linkdate2timestamp ( $link [ 'linkdate' ]). '" PRIVATE="' . $link [ 'private' ]. '"' ;
1599 if ( $link [ 'tags' ]!= '' ) echo ' TAGS="' . str_replace ( ' ' , ',' , $link [ 'tags' ]). '"' ;
1600 echo '>' . $link [ 'title' ]. "</A> \n " ;
1601 if ( $link [ 'description' ]!= '' ) echo '<DD>' . $link [ 'description' ]. " \n " ;
1607 // -------- User is uploading a file for import
1608 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=upload' ))
1610 // If file is too big, some form field may be missing.
1611 if (! isset ( $_POST [ 'token' ]) || (! isset ( $_FILES )) || ( isset ( $_FILES [ 'filetoupload' ][ 'size' ]) && $_FILES [ 'filetoupload' ][ 'size' ]== 0 ))
1613 $returnurl = ( empty ( $_SERVER [ 'HTTP_REFERER' ]) ? '?' : $_SERVER [ 'HTTP_REFERER' ] );
1614 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= \' ' . escape ( $returnurl ). ' \' ;</script>' ;
1617 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' );
1622 // -------- Show upload/import dialog:
1623 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=import' ))
1625 $PAGE = new pageBuilder
;
1626 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1627 $PAGE- > assign ( 'token' , getToken ());
1628 $PAGE- > assign ( 'maxfilesize' , getMaxFileSize ());
1629 $PAGE- > renderPage ( 'import' );
1633 // -------- Otherwise, simply display search form and links:
1634 $PAGE = new pageBuilder
;
1635 buildLinkList ( $PAGE , $LINKSDB ); // Compute list of links to display
1636 $PAGE- > renderPage ( 'linklist' );
1640 // -----------------------------------------------------------------------------------------------
1641 // Process the import file form.
1642 function importFile ()
1644 if (!( isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ])) { die ( 'Not allowed.' ); }
1645 $LINKSDB = new LinkDB (
1646 $GLOBALS [ 'config' ][ 'DATASTORE' ],
1647 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
1648 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
1650 $filename = $_FILES [ 'filetoupload' ][ 'name' ];
1651 $filesize = $_FILES [ 'filetoupload' ][ 'size' ];
1652 $data = file_get_contents ( $_FILES [ 'filetoupload' ][ 'tmp_name' ]);
1653 $private = ( empty ( $_POST [ 'private' ]) ? 0 : 1 ); // Should the links be imported as private?
1654 $overwrite = ! empty ( $_POST [ 'overwrite' ]) ; // Should the imported links overwrite existing ones?
1659 if ( startsWith ( $data , '<!DOCTYPE NETSCAPE-Bookmark-file-1>' )) $type = 'netscape' ; // Netscape bookmark file (aka Firefox).
1661 // Then import the bookmarks.
1662 if ( $type == 'netscape' )
1664 // This is a standard Netscape-style bookmark file.
1665 // This format is supported by all browsers (except IE, of course), also Delicious, Diigo and others.
1666 foreach ( explode ( '<DT>' , $data ) as $html ) // explode is very fast
1668 $link = array ( 'linkdate' => '' , 'title' => '' , 'url' => '' , 'description' => '' , 'tags' => '' , 'private' => 0 );
1669 $d = explode ( '<DD>' , $html );
1670 if ( startswith ( $d [ 0 ], '<A ' ))
1672 $link [ 'description' ] = ( isset ( $d [ 1 ]) ? html_entity_decode ( trim ( $d [ 1 ]), ENT_QUOTES
, 'UTF-8' ) : '' ); // Get description (optional)
1673 preg_match ( '!<A .*?>(.*?)</A>!i' , $d [ 0 ], $matches ); $link [ 'title' ] = ( isset ( $matches [ 1 ]) ? trim ( $matches [ 1 ]) : '' ); // Get title
1674 $link [ 'title' ] = html_entity_decode ( $link [ 'title' ], ENT_QUOTES
, 'UTF-8' );
1675 preg_match_all ( '! ([A-Z_]+)= \" (.*?)"!i' , $html , $matches , PREG_SET_ORDER
); // Get all other attributes
1677 foreach ( $matches as $m )
1679 $attr = $m [ 1 ]; $value = $m [ 2 ];
1680 if ( $attr == 'HREF' ) $link [ 'url' ]= html_entity_decode ( $value , ENT_QUOTES
, 'UTF-8' );
1681 elseif ( $attr == 'ADD_DATE' )
1683 $raw_add_date = intval ( $value );
1684 if ( $raw_add_date > 30000000000 ) $raw_add_date /= 1000 ; //If larger than year 2920, then was likely stored in milliseconds instead of seconds
1686 elseif ( $attr == 'PRIVATE' ) $link [ 'private' ]=( $value == '0' ? 0 : 1 );
1687 elseif ( $attr == 'TAGS' ) $link [ 'tags' ]= html_entity_decode ( str_replace ( ',' , ' ' , $value ), ENT_QUOTES
, 'UTF-8' );
1689 if ( $link [ 'url' ]!= '' )
1691 if ( $private == 1 ) $link [ 'private' ]= 1 ;
1692 $dblink = $LINKSDB- > getLinkFromUrl ( $link [ 'url' ]); // See if the link is already in database.
1694 { // Link not in database, let's import it...
1695 if ( empty ( $raw_add_date )) $raw_add_date = time (); // In case of shitty bookmark file with no ADD_DATE
1697 // Make sure date/time is not already used by another link.
1698 // (Some bookmark files have several different links with the same ADD_DATE)
1699 // We increment date by 1 second until we find a date which is not used in DB.
1700 // (so that links that have the same date/time are more or less kept grouped by date, but do not conflict.)
1701 while (! empty ( $LINKSDB [ date ( 'Ymd_His' , $raw_add_date )])) { $raw_add_date++
; } // Yes, I know it's ugly.
1702 $link [ 'linkdate' ]= date ( 'Ymd_His' , $raw_add_date );
1703 $LINKSDB [ $link [ 'linkdate' ]] = $link ;
1706 else // Link already present in database.
1709 { // If overwrite is required, we import link data, except date/time.
1710 $link [ 'linkdate' ]= $dblink [ 'linkdate' ];
1711 $LINKSDB [ $link [ 'linkdate' ]] = $link ;
1719 $LINKSDB- > savedb ( $GLOBALS [ 'config' ][ 'PAGECACHE' ]);
1721 echo '<script>alert("File ' . json_encode ( $filename ). ' (' . $filesize . ' bytes) was successfully processed: ' . $import_count . ' links imported.");document.location= \' ? \' ;</script>' ;
1725 echo '<script>alert("File ' . json_encode ( $filename ). ' (' . $filesize . ' bytes) has an unknown file format. Nothing was imported.");document.location= \' ? \' ;</script>' ;
1729 // -----------------------------------------------------------------------------------------------
1730 // Template for the list of links (<div id="linklist">)
1731 // This function fills all the necessary fields in the $PAGE for the template 'linklist.html'
1732 function buildLinkList ( $PAGE , $LINKSDB )
1734 // ---- Filter link database according to parameters
1735 $linksToDisplay = array ();
1738 if ( isset ( $_GET [ 'searchterm' ])) // Fulltext search
1740 $linksToDisplay = $LINKSDB- > filterFulltext ( trim ( $_GET [ 'searchterm' ]));
1741 $search_crits = escape ( trim ( $_GET [ 'searchterm' ]));
1742 $search_type = 'fulltext' ;
1744 elseif ( isset ( $_GET [ 'searchtags' ])) // Search by tag
1746 $linksToDisplay = $LINKSDB- > filterTags ( trim ( $_GET [ 'searchtags' ]));
1747 $search_crits = explode ( ' ' , escape ( trim ( $_GET [ 'searchtags' ])));
1748 $search_type = 'tags' ;
1750 elseif ( isset ( $_SERVER [ 'QUERY_STRING' ]) && preg_match ( '/[a-zA-Z0-9-_@] {6} (&.+?)?/' , $_SERVER [ 'QUERY_STRING' ])) // Detect smallHashes in URL
1752 $linksToDisplay = $LINKSDB- > filterSmallHash ( substr ( trim ( $_SERVER [ "QUERY_STRING" ], '/' ), 0 , 6 ));
1753 if ( count ( $linksToDisplay )== 0 )
1755 header ( $_SERVER [ "SERVER_PROTOCOL" ]. " 404 Not Found" );
1756 echo '<h1>404 Not found.</h1>Oh crap. The link you are trying to reach does not exist or has been deleted.' ;
1757 echo '<br>Would you mind <a href="?">clicking here</a>?' ;
1760 $search_type = 'permalink' ;
1763 $linksToDisplay = $LINKSDB ; // Otherwise, display without filtering.
1766 // Option: Show only private links
1767 if (! empty ( $_SESSION [ 'privateonly' ]))
1770 foreach ( $linksToDisplay as $linkdate => $link )
1772 if ( $link [ 'private' ]!= 0 ) $tmp [ $linkdate ]= $link ;
1774 $linksToDisplay = $tmp ;
1777 // ---- Handle paging.
1778 /* Can someone explain to me why you get the following error when using array_keys() on an object which implements the interface ArrayAccess???
1779 "Warning: array_keys() expects parameter 1 to be array, object given in ... "
1780 If my class implements ArrayAccess, why won't array_keys() accept it ? ( $keys=array_keys($linksToDisplay); )
1782 $keys = array (); foreach ( $linksToDisplay as $key => $value ) { $keys
[]= $key
; } // Stupid and ugly. Thanks PHP.
1784 // If there is only a single link, we change on-the-fly the title of the page.
1785 if ( count ( $linksToDisplay )== 1 ) $GLOBALS [ 'pagetitle' ] = $linksToDisplay [ $keys [ 0 ]][ 'title' ]. ' - ' . $GLOBALS [ 'title' ];
1787 // Select articles according to paging.
1788 $pagecount = ceil ( count ( $keys )/ $_SESSION [ 'LINKS_PER_PAGE' ]);
1789 $pagecount = ( $pagecount == 0 ? 1 : $pagecount );
1790 $page =( empty ( $_GET [ 'page' ]) ? 1 : intval ( $_GET [ 'page' ]));
1791 $page = ( $page < 1 ? 1 : $page );
1792 $page = ( $page > $pagecount ? $pagecount : $page );
1793 $i = ( $page-1 )* $_SESSION [ 'LINKS_PER_PAGE' ]; // Start index.
1794 $end = $i +
$_SESSION [ 'LINKS_PER_PAGE' ];
1795 $linkDisp = array (); // Links to display
1796 while ( $i < $end && $i < count ( $keys ))
1798 $link = $linksToDisplay [ $keys [ $i ]];
1799 $link [ 'description' ]= nl2br ( keepMultipleSpaces ( text2clickable ( $link [ 'description' ])));
1800 $title = $link [ 'title' ];
1801 $classLi = $i %
2 != 0 ? '' : 'publicLinkHightLight' ;
1802 $link [ 'class' ] = ( $link [ 'private' ]== 0 ? $classLi : 'private' );
1803 $link [ 'timestamp' ]= linkdate2timestamp ( $link [ 'linkdate' ]);
1804 $taglist = explode ( ' ' , $link [ 'tags' ]);
1805 uasort ( $taglist , 'strcasecmp' );
1806 $link [ 'taglist' ]= $taglist ;
1808 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.
1809 strlen ( $link [ "url" ]) === 7 ) {
1810 $link [ "url" ] = indexUrl () . $link [ "url" ];
1813 $linkDisp [ $keys [ $i ]] = $link ;
1817 // Compute paging navigation
1818 $searchterm = ( empty ( $_GET [ 'searchterm' ]) ? '' : '&searchterm=' . $_GET [ 'searchterm' ] );
1819 $searchtags = ( empty ( $_GET [ 'searchtags' ]) ? '' : '&searchtags=' . $_GET [ 'searchtags' ] );
1821 $previous_page_url = '' ; if ( $i != count ( $keys )) $previous_page_url = '?page=' .( $page +
1 ). $searchterm . $searchtags ;
1822 $next_page_url = '' ; if ( $page > 1 ) $next_page_url = '?page=' .( $page-1 ). $searchterm . $searchtags ;
1824 $token = '' ; if ( isLoggedIn ()) $token = getToken ();
1826 // Fill all template fields.
1827 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1828 $PAGE- > assign ( 'previous_page_url' , $previous_page_url );
1829 $PAGE- > assign ( 'next_page_url' , $next_page_url );
1830 $PAGE- > assign ( 'page_current' , $page );
1831 $PAGE- > assign ( 'page_max' , $pagecount );
1832 $PAGE- > assign ( 'result_count' , count ( $linksToDisplay ));
1833 $PAGE- > assign ( 'search_type' , $search_type );
1834 $PAGE- > assign ( 'search_crits' , $search_crits );
1835 $PAGE- > assign ( 'redirector' , empty ( $GLOBALS [ 'redirector' ]) ? '' : $GLOBALS [ 'redirector' ]); // Optional redirector URL.
1836 $PAGE- > assign ( 'token' , $token );
1837 $PAGE- > assign ( 'links' , $linkDisp );
1838 $PAGE- > assign ( 'tags' , $LINKSDB- > allTags ());
1842 // Compute the thumbnail for a link.
1844 // With a link to the original URL.
1845 // Understands various services (youtube.com...)
1846 // Input: $url = URL for which the thumbnail must be found.
1847 // $href = if provided, this URL will be followed instead of $url
1848 // Returns an associative array with thumbnail attributes (src,href,width,height,style,alt)
1849 // Some of them may be missing.
1850 // Return an empty array if no thumbnail available.
1851 function computeThumbnail ( $url , $href = false )
1853 if (! $GLOBALS [ 'config' ][ 'ENABLE_THUMBNAILS' ]) return array ();
1854 if ( $href == false ) $href = $url ;
1856 // For most hosts, the URL of the thumbnail can be easily deduced from the URL of the link.
1857 // (e.g. http://www.youtube.com/watch?v=spVypYk4kto ---> http://img.youtube.com/vi/spVypYk4kto/default.jpg )
1858 // ^^^^^^^^^^^ ^^^^^^^^^^^
1859 $domain = parse_url ( $url , PHP_URL_HOST
);
1860 if ( $domain == 'youtube.com' || $domain == 'www.youtube.com' )
1862 parse_str ( parse_url ( $url , PHP_URL_QUERY
), $params ); // Extract video ID and get thumbnail
1863 if (! empty ( $params [ 'v' ])) return array ( 'src' => 'https://img.youtube.com/vi/' . $params [ 'v' ]. '/default.jpg' ,
1864 'href' => $href , 'width' => '120' , 'height' => '90' , 'alt' => 'YouTube thumbnail' );
1866 if ( $domain == 'youtu.be' ) // Youtube short links
1868 $path = parse_url ( $url , PHP_URL_PATH
);
1869 return array ( 'src' => 'https://img.youtube.com/vi' . $path . '/default.jpg' ,
1870 'href' => $href , 'width' => '120' , 'height' => '90' , 'alt' => 'YouTube thumbnail' );
1872 if ( $domain == 'pix.toile-libre.org' ) // pix.toile-libre.org image hosting
1874 parse_str ( parse_url ( $url , PHP_URL_QUERY
), $params ); // Extract image filename.
1875 if (! empty ( $params ) && ! empty ( $params [ 'img' ])) return array ( 'src' => 'http://pix.toile-libre.org/upload/thumb/' . urlencode ( $params [ 'img' ]),
1876 'href' => $href , 'style' => 'max-width:120px; max-height:150px' , 'alt' => 'pix.toile-libre.org thumbnail' );
1879 if ( $domain == 'imgur.com' )
1881 $path = parse_url ( $url , PHP_URL_PATH
);
1882 if ( startsWith ( $path , '/a/' )) return array (); // Thumbnails for albums are not available.
1883 if ( startsWith ( $path , '/r/' )) return array ( 'src' => 'https://i.imgur.com/' . basename ( $path ). 's.jpg' ,
1884 'href' => $href , 'width' => '90' , 'height' => '90' , 'alt' => 'imgur.com thumbnail' );
1885 if ( startsWith ( $path , '/gallery/' )) return array ( 'src' => 'https://i.imgur.com' . substr ( $path , 8 ). 's.jpg' ,
1886 'href' => $href , 'width' => '90' , 'height' => '90' , 'alt' => 'imgur.com thumbnail' );
1888 if ( substr_count ( $path , '/' )== 1 ) return array ( 'src' => 'https://i.imgur.com/' . substr ( $path , 1 ). 's.jpg' ,
1889 'href' => $href , 'width' => '90' , 'height' => '90' , 'alt' => 'imgur.com thumbnail' );
1891 if ( $domain == 'i.imgur.com' )
1893 $pi = pathinfo ( parse_url ( $url , PHP_URL_PATH
));
1894 if (! empty ( $pi [ 'filename' ])) return array ( 'src' => 'https://i.imgur.com/' . $pi [ 'filename' ]. 's.jpg' ,
1895 'href' => $href , 'width' => '90' , 'height' => '90' , 'alt' => 'imgur.com thumbnail' );
1897 if ( $domain == 'dailymotion.com' || $domain == 'www.dailymotion.com' )
1899 if ( strpos ( $url , 'dailymotion.com/video/' )!== false )
1901 $thumburl = str_replace ( 'dailymotion.com/video/' , 'dailymotion.com/thumbnail/video/' , $url );
1902 return array ( 'src' => $thumburl ,
1903 'href' => $href , 'width' => '120' , 'style' => 'height:auto;' , 'alt' => 'DailyMotion thumbnail' );
1906 if ( endsWith ( $domain , '.imageshack.us' ))
1908 $ext = strtolower ( pathinfo ( $url , PATHINFO_EXTENSION
));
1909 if ( $ext == 'jpg' || $ext == 'jpeg' || $ext == 'png' || $ext == 'gif' )
1911 $thumburl = substr ( $url , 0 , strlen ( $url )- strlen ( $ext )). 'th.' . $ext ;
1912 return array ( 'src' => $thumburl ,
1913 'href' => $href , 'width' => '120' , 'style' => 'height:auto;' , 'alt' => 'imageshack.us thumbnail' );
1917 // Some other hosts are SLOW AS HELL and usually require an extra HTTP request to get the thumbnail URL.
1918 // So we deport the thumbnail generation in order not to slow down page generation
1919 // (and we also cache the thumbnail)
1921 if (! $GLOBALS [ 'config' ][ 'ENABLE_LOCALCACHE' ]) return array (); // If local cache is disabled, no thumbnails for services which require the use a local cache.
1923 if ( $domain == 'flickr.com' || endsWith ( $domain , '.flickr.com' )
1924 || $domain == 'vimeo.com'
1925 || $domain == 'ted.com' || endsWith ( $domain , '.ted.com' )
1926 || $domain == 'xkcd.com' || endsWith ( $domain , '.xkcd.com' )
1929 if ( $domain == 'vimeo.com' )
1930 { // Make sure this vimeo URL points to a video (/xxx... where xxx is numeric)
1931 $path = parse_url ( $url , PHP_URL_PATH
);
1932 if (! preg_match ( '!/\d+.+?!' , $path )) return array (); // This is not a single video URL.
1934 if ( $domain == 'xkcd.com' || endsWith ( $domain , '.xkcd.com' ))
1935 { // Make sure this URL points to a single comic (/xxx... where xxx is numeric)
1936 $path = parse_url ( $url , PHP_URL_PATH
);
1937 if (! preg_match ( '!/\d+.+?!' , $path )) return array ();
1939 if ( $domain == 'ted.com' || endsWith ( $domain , '.ted.com' ))
1940 { // Make sure this TED URL points to a video (/talks/...)
1941 $path = parse_url ( $url , PHP_URL_PATH
);
1942 if ( "/talks/" !== substr ( $path , 0 , 7 )) return array (); // This is not a single video URL.
1944 $sign = hash_hmac ( 'sha256' , $url , $GLOBALS [ 'salt' ]); // We use the salt to sign data (it's random, secret, and specific to each installation)
1945 return array ( 'src' => indexUrl (). '?do=genthumbnail&hmac=' . $sign . '&url=' . urlencode ( $url ),
1946 'href' => $href , 'width' => '120' , 'style' => 'height:auto;' , 'alt' => 'thumbnail' );
1949 // For all other, we try to make a thumbnail of links ending with .jpg/jpeg/png/gif
1950 // Technically speaking, we should download ALL links and check their Content-Type to see if they are images.
1951 // But using the extension will do.
1952 $ext = strtolower ( pathinfo ( $url , PATHINFO_EXTENSION
));
1953 if ( $ext == 'jpg' || $ext == 'jpeg' || $ext == 'png' || $ext == 'gif' )
1955 $sign = hash_hmac ( 'sha256' , $url , $GLOBALS [ 'salt' ]); // We use the salt to sign data (it's random, secret, and specific to each installation)
1956 return array ( 'src' => indexUrl (). '?do=genthumbnail&hmac=' . $sign . '&url=' . urlencode ( $url ),
1957 'href' => $href , 'width' => '120' , 'style' => 'height:auto;' , 'alt' => 'thumbnail' );
1959 return array (); // No thumbnail.
1964 // Returns the HTML code to display a thumbnail for a link
1965 // with a link to the original URL.
1966 // Understands various services (youtube.com...)
1967 // Input: $url = URL for which the thumbnail must be found.
1968 // $href = if provided, this URL will be followed instead of $url
1969 // Returns '' if no thumbnail available.
1970 function thumbnail ( $url , $href = false )
1972 $t = computeThumbnail ( $url , $href );
1973 if ( count ( $t )== 0 ) return '' ; // Empty array = no thumbnail for this URL.
1975 $html = '<a href="' . escape ( $t [ 'href' ]). '"><img src="' . escape ( $t [ 'src' ]). '"' ;
1976 if (! empty ( $t [ 'width' ])) $html .= ' width="' . escape ( $t [ 'width' ]). '"' ;
1977 if (! empty ( $t [ 'height' ])) $html .= ' height="' . escape ( $t [ 'height' ]). '"' ;
1978 if (! empty ( $t [ 'style' ])) $html .= ' style="' . escape ( $t [ 'style' ]). '"' ;
1979 if (! empty ( $t [ 'alt' ])) $html .= ' alt="' . escape ( $t [ 'alt' ]). '"' ;
1984 // Returns the HTML code to display a thumbnail for a link
1985 // for the picture wall (using lazy image loading)
1986 // Understands various services (youtube.com...)
1987 // Input: $url = URL for which the thumbnail must be found.
1988 // $href = if provided, this URL will be followed instead of $url
1989 // Returns '' if no thumbnail available.
1990 function lazyThumbnail ( $url , $href = false )
1992 $t = computeThumbnail ( $url , $href );
1993 if ( count ( $t )== 0 ) return '' ; // Empty array = no thumbnail for this URL.
1995 $html = '<a href="' . escape ( $t [ 'href' ]). '">' ;
1998 $html .= '<img class="b-lazy" src="#" data-src="' . escape ( $t [ 'src' ]). '"' ;
2000 if (! empty ( $t [ 'width' ])) $html .= ' width="' . escape ( $t [ 'width' ]). '"' ;
2001 if (! empty ( $t [ 'height' ])) $html .= ' height="' . escape ( $t [ 'height' ]). '"' ;
2002 if (! empty ( $t [ 'style' ])) $html .= ' style="' . escape ( $t [ 'style' ]). '"' ;
2003 if (! empty ( $t [ 'alt' ])) $html .= ' alt="' . escape ( $t [ 'alt' ]). '"' ;
2006 // No-JavaScript fallback.
2007 $html .= '<noscript><img src="' . escape ( $t [ 'src' ]). '"' ;
2008 if (! empty ( $t [ 'width' ])) $html .= ' width="' . escape ( $t [ 'width' ]). '"' ;
2009 if (! empty ( $t [ 'height' ])) $html .= ' height="' . escape ( $t [ 'height' ]). '"' ;
2010 if (! empty ( $t [ 'style' ])) $html .= ' style="' . escape ( $t [ 'style' ]). '"' ;
2011 if (! empty ( $t [ 'alt' ])) $html .= ' alt="' . escape ( $t [ 'alt' ]). '"' ;
2012 $html .= '></noscript></a>' ;
2018 // -----------------------------------------------------------------------------------------------
2020 // This function should NEVER be called if the file data/config.php exists.
2023 // On free.fr host, make sure the /sessions directory exists, otherwise login will not work.
2024 if ( endsWith ( $_SERVER [ 'HTTP_HOST' ], '.free.fr' ) && ! is_dir ( $_SERVER [ 'DOCUMENT_ROOT' ]. '/sessions' )) mkdir ( $_SERVER [ 'DOCUMENT_ROOT' ]. '/sessions' , 0705 );
2027 // This part makes sure sessions works correctly.
2028 // (Because on some hosts, session.save_path may not be set correctly,
2029 // or we may not have write access to it.)
2030 if ( isset ( $_GET [ 'test_session' ]) && ( ! isset ( $_SESSION ) || ! isset ( $_SESSION [ 'session_tested' ]) || $_SESSION [ 'session_tested' ]!= 'Working' ))
2031 { // Step 2: Check if data in session is correct.
2032 echo '<pre>Sessions do not seem to work correctly on your server.<br>' ;
2033 echo 'Make sure the variable session.save_path is set correctly in your php config, and that you have write access to it.<br>' ;
2034 echo 'It currently points to ' . session_save_path (). '<br>' ;
2035 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>' ;
2036 echo '<br><a href="?">Click to try again.</a></pre>' ;
2039 if (! isset ( $_SESSION [ 'session_tested' ]))
2040 { // Step 1 : Try to store data in session and reload page.
2041 $_SESSION [ 'session_tested' ] = 'Working' ; // Try to set a variable in session.
2042 header ( 'Location: ' . indexUrl (). '?test_session' ); // Redirect to check stored data.
2044 if ( isset ( $_GET [ 'test_session' ]))
2045 { // Step 3: Sessions are OK. Remove test parameter from URL.
2046 header ( 'Location: ' . indexUrl ());
2050 if (! empty ( $_POST [ 'setlogin' ]) && ! empty ( $_POST [ 'setpassword' ]))
2053 if (! empty ( $_POST [ 'continent' ]) && ! empty ( $_POST [ 'city' ])) {
2054 if ( isTimeZoneValid ( $_POST [ 'continent' ], $_POST [ 'city' ])) {
2055 $tz = $_POST [ 'continent' ]. '/' . $_POST [ 'city' ];
2058 $GLOBALS [ 'timezone' ] = $tz ;
2059 // Everything is ok, let's create config file.
2060 $GLOBALS [ 'login' ] = $_POST [ 'setlogin' ];
2061 $GLOBALS [ 'salt' ] = sha1 ( uniqid ( '' , true ). '_' . mt_rand ()); // Salt renders rainbow-tables attacks useless.
2062 $GLOBALS [ 'hash' ] = sha1 ( $_POST [ 'setpassword' ]. $GLOBALS [ 'login' ]. $GLOBALS [ 'salt' ]);
2063 $GLOBALS [ 'title' ] = ( empty ( $_POST [ 'title' ]) ? 'Shared links on ' . escape ( indexUrl ()) : $_POST [ 'title' ] );
2064 $GLOBALS [ 'config' ][ 'ENABLE_UPDATECHECK' ] = ! empty ( $_POST [ 'updateCheck' ]);
2066 writeConfig ( $GLOBALS , isLoggedIn ());
2068 catch ( Exception
$e ) {
2070 'ERROR while writing config file after installation.' . PHP_EOL
.
2074 // TODO: do not handle exceptions/errors in JS.
2075 echo '<script>alert("' . $e- > getMessage () . '");document.location= \' ? \' ;</script>' ;
2078 echo '<script>alert("Shaarli is now configured. Please enter your login/password and start shaaring your links!");document.location= \' ?do=login \' ;</script>' ;
2082 // Display config form:
2083 list ( $timezone_form , $timezone_js ) = generateTimeZoneForm ();
2084 $timezone_html = '' ;
2085 if ( $timezone_form != '' ) {
2086 $timezone_html = '<tr><td><b>Timezone:</b></td><td>' . $timezone_form . '</td></tr>' ;
2089 $PAGE = new pageBuilder
;
2090 $PAGE- > assign ( 'timezone_html' , $timezone_html );
2091 $PAGE- > assign ( 'timezone_js' , $timezone_js );
2092 $PAGE- > renderPage ( 'install' );
2096 if (! function_exists ( 'json_encode' )) {
2097 function json_encode ( $data ) {
2098 switch ( $type = gettype ( $data )) {
2102 return ( $data ? 'true' : 'false' );
2108 return '"' . addslashes ( $data ) . '"' ;
2110 $data = get_object_vars ( $data );
2112 $output_index_count = 0 ;
2113 $output_indexed = array ();
2114 $output_associative = array ();
2115 foreach ( $data as $key => $value ) {
2116 $output_indexed [] = json_encode ( $value );
2117 $output_associative [] = json_encode ( $key ) . ':' . json_encode ( $value );
2118 if ( $output_index_count !== NULL && $output_index_count ++
!== $key ) {
2119 $output_index_count = NULL ;
2122 if ( $output_index_count !== NULL ) {
2123 return '[' . implode ( ',' , $output_indexed ) . ']' ;
2125 return ' {' . implode(',', $output_associative) . '} ' ;
2128 return '' ; // Not supported
2135 /* Because some f*cking services like flickr require an extra HTTP request to get the thumbnail URL,
2136 I have deported the thumbnail URL code generation here, otherwise this would slow down page generation.
2137 The following function takes the URL a link (e.g. a flickr page) and return the proper thumbnail.
2138 This function is called by passing the URL:
2139 http://mywebsite.com/shaarli/?do=genthumbnail&hmac=[HMAC]&url=[URL]
2140 [URL] is the URL of the link (e.g. a flickr page)
2141 [HMAC] is the signature for the [URL] (so that these URL cannot be forged).
2142 The function below will fetch the image from the webservice and store it in the cache.
2144 function genThumbnail ()
2146 // Make sure the parameters in the URL were generated by us.
2147 $sign = hash_hmac ( 'sha256' , $_GET [ 'url' ], $GLOBALS [ 'salt' ]);
2148 if ( $sign != $_GET [ 'hmac' ]) die ( 'Naughty boy!' );
2150 // Let's see if we don't already have the image for this URL in the cache.
2151 $thumbname = hash ( 'sha1' , $_GET [ 'url' ]). '.jpg' ;
2152 if ( is_file ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname ))
2153 { // We have the thumbnail, just serve it:
2154 header ( 'Content-Type: image/jpeg' );
2155 echo file_get_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname );
2158 // We may also serve a blank image (if service did not respond)
2159 $blankname = hash ( 'sha1' , $_GET [ 'url' ]). '.gif' ;
2160 if ( is_file ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $blankname ))
2162 header ( 'Content-Type: image/gif' );
2163 echo file_get_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $blankname );
2167 // Otherwise, generate the thumbnail.
2168 $url = $_GET [ 'url' ];
2169 $domain = parse_url ( $url , PHP_URL_HOST
);
2171 if ( $domain == 'flickr.com' || endsWith ( $domain , '.flickr.com' ))
2173 // Crude replacement to handle new flickr domain policy (They prefer www. now)
2174 $url = str_replace ( 'http://flickr.com/' , 'http://www.flickr.com/' , $url );
2176 // Is this a link to an image, or to a flickr page ?
2178 if ( endswith ( parse_url ( $url , PHP_URL_PATH
), '.jpg' ))
2179 { // This is a direct link to an image. e.g. http://farm1.staticflickr.com/5/5921913_ac83ed27bd_o.jpg
2180 preg_match ( '!(http://farm\d+\.staticflickr\.com/\d+/\d+_\w+_)\w.jpg!' , $url , $matches );
2181 if (! empty ( $matches [ 1 ])) $imageurl = $matches [ 1 ]. 'm.jpg' ;
2183 else // This is a flickr page (html)
2185 list ( $httpstatus , $headers , $data ) = getHTTP ( $url , 20 ); // Get the flickr html page.
2186 if ( strpos ( $httpstatus , '200 OK' )!== false )
2188 // flickr now nicely provides the URL of the thumbnail in each flickr page.
2189 preg_match ( '!<link rel= \" image_src \" href= \" (.+?) \" !' , $data , $matches );
2190 if (! empty ( $matches [ 1 ])) $imageurl = $matches [ 1 ];
2192 // In albums (and some other pages), the link rel="image_src" is not provided,
2193 // but flickr provides:
2194 // <meta property="og:image" content="http://farm4.staticflickr.com/3398/3239339068_25d13535ff_z.jpg" />
2197 preg_match ( '!<meta property= \" og:image \" content= \" (.+?) \" !' , $data , $matches );
2198 if (! empty ( $matches [ 1 ])) $imageurl = $matches [ 1 ];
2204 { // Let's download the image.
2205 list ( $httpstatus , $headers , $data ) = getHTTP ( $imageurl , 10 ); // Image is 240x120, so 10 seconds to download should be enough.
2206 if ( strpos ( $httpstatus , '200 OK' )!== false )
2208 file_put_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname , $data ); // Save image to cache.
2209 header ( 'Content-Type: image/jpeg' );
2216 elseif ( $domain == 'vimeo.com' )
2218 // This is more complex: we have to perform a HTTP request, then parse the result.
2219 // Maybe we should deport this to JavaScript ? Example: http://stackoverflow.com/questions/1361149/get-img-thumbnails-from-vimeo/4285098#4285098
2220 $vid = substr ( parse_url ( $url , PHP_URL_PATH
), 1 );
2221 list ( $httpstatus , $headers , $data ) = getHTTP ( 'https://vimeo.com/api/v2/video/' . escape ( $vid ). '.php' , 5 );
2222 if ( strpos ( $httpstatus , '200 OK' )!== false )
2224 $t = unserialize ( $data );
2225 $imageurl = $t [ 0 ][ 'thumbnail_medium' ];
2226 // Then we download the image and serve it to our client.
2227 list ( $httpstatus , $headers , $data ) = getHTTP ( $imageurl , 10 );
2228 if ( strpos ( $httpstatus , '200 OK' )!== false )
2230 file_put_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname , $data ); // Save image to cache.
2231 header ( 'Content-Type: image/jpeg' );
2238 elseif ( $domain == 'ted.com' || endsWith ( $domain , '.ted.com' ))
2240 // The thumbnail for TED talks is located in the <link rel="image_src" [...]> tag on that page
2241 // http://www.ted.com/talks/mikko_hypponen_fighting_viruses_defending_the_net.html
2242 // <link rel="image_src" href="http://images.ted.com/images/ted/28bced335898ba54d4441809c5b1112ffaf36781_389x292.jpg" />
2243 list ( $httpstatus , $headers , $data ) = getHTTP ( $url , 5 );
2244 if ( strpos ( $httpstatus , '200 OK' )!== false )
2246 // Extract the link to the thumbnail
2247 preg_match ( '!link rel="image_src" href="(http://images.ted.com/images/ted/.+_\d+x\d+\.jpg)"!' , $data , $matches );
2248 if (! empty ( $matches [ 1 ]))
2249 { // Let's download the image.
2250 $imageurl = $matches [ 1 ];
2251 list ( $httpstatus , $headers , $data ) = getHTTP ( $imageurl , 20 ); // No control on image size, so wait long enough.
2252 if ( strpos ( $httpstatus , '200 OK' )!== false )
2254 $filepath = $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname ;
2255 file_put_contents ( $filepath , $data ); // Save image to cache.
2256 if ( resizeImage ( $filepath ))
2258 header ( 'Content-Type: image/jpeg' );
2259 echo file_get_contents ( $filepath );
2267 elseif ( $domain == 'xkcd.com' || endsWith ( $domain , '.xkcd.com' ))
2269 // There is no thumbnail available for xkcd comics, so download the whole image and resize it.
2270 // http://xkcd.com/327/
2271 // <img src="http://imgs.xkcd.com/comics/exploits_of_a_mom.png" title="<BLABLA>" alt="<BLABLA>" />
2272 list ( $httpstatus , $headers , $data ) = getHTTP ( $url , 5 );
2273 if ( strpos ( $httpstatus , '200 OK' )!== false )
2275 // Extract the link to the thumbnail
2276 preg_match ( '!<img src="(http://imgs.xkcd.com/comics/.*)" title="[^s]!' , $data , $matches );
2277 if (! empty ( $matches [ 1 ]))
2278 { // Let's download the image.
2279 $imageurl = $matches [ 1 ];
2280 list ( $httpstatus , $headers , $data ) = getHTTP ( $imageurl , 20 ); // No control on image size, so wait long enough.
2281 if ( strpos ( $httpstatus , '200 OK' )!== false )
2283 $filepath = $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname ;
2284 file_put_contents ( $filepath , $data ); // Save image to cache.
2285 if ( resizeImage ( $filepath ))
2287 header ( 'Content-Type: image/jpeg' );
2288 echo file_get_contents ( $filepath );
2298 // For all other domains, we try to download the image and make a thumbnail.
2299 list ( $httpstatus , $headers , $data ) = getHTTP ( $url , 30 ); // We allow 30 seconds max to download (and downloads are limited to 4 Mb)
2300 if ( strpos ( $httpstatus , '200 OK' )!== false )
2302 $filepath = $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname ;
2303 file_put_contents ( $filepath , $data ); // Save image to cache.
2304 if ( resizeImage ( $filepath ))
2306 header ( 'Content-Type: image/jpeg' );
2307 echo file_get_contents ( $filepath );
2314 // Otherwise, return an empty image (8x8 transparent gif)
2315 $blankgif = base64_decode ( 'R0lGODlhCAAIAIAAAP///////yH5BAEKAAEALAAAAAAIAAgAAAIHjI+py+1dAAA7' );
2316 file_put_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $blankname , $blankgif ); // Also put something in cache so that this URL is not requested twice.
2317 header ( 'Content-Type: image/gif' );
2321 // Make a thumbnail of the image (to width: 120 pixels)
2322 // Returns true if success, false otherwise.
2323 function resizeImage ( $filepath )
2325 if (! function_exists ( 'imagecreatefromjpeg' )) return false ; // GD not present: no thumbnail possible.
2327 // Trick: some stupid people rename GIF as JPEG... or else.
2328 // So we really try to open each image type whatever the extension is.
2329 $header = file_get_contents ( $filepath , false , NULL , 0 , 256 ); // Read first 256 bytes and try to sniff file type.
2331 $i = strpos ( $header , 'GIF8' ); if (( $i !== false ) && ( $i == 0 )) $im = imagecreatefromgif ( $filepath ); // Well this is crude, but it should be enough.
2332 $i = strpos ( $header , 'PNG' ); if (( $i !== false ) && ( $i == 1 )) $im = imagecreatefrompng ( $filepath );
2333 $i = strpos ( $header , 'JFIF' ); if ( $i !== false ) $im = imagecreatefromjpeg ( $filepath );
2334 if (! $im ) return false ; // Unable to open image (corrupted or not an image)
2337 $ystart = 0 ; $yheight = $h ;
2338 if ( $h > $w ) { $ystart
= ( $h
/ 2 )-( $w
/ 2 ); $yheight
= $w
/ 2 ; }
2339 $nw = 120 ; // Desired width
2340 $nh = min ( floor (( $h * $nw )/ $w ), 120 ); // Compute new width/height, but maximum 120 pixels height.
2342 $im2 = imagecreatetruecolor ( $nw , $nh );
2343 imagecopyresampled ( $im2 , $im , 0 , 0 , 0 , $ystart , $nw , $nh , $w , $yheight );
2344 imageinterlace ( $im2 , true ); // For progressive JPEG.
2345 $tempname = $filepath . '_TEMP.jpg' ;
2346 imagejpeg ( $im2 , $tempname , 90 );
2350 rename ( $tempname , $filepath ); // Overwrite original picture with thumbnail.
2355 mergeDeprecatedConfig ( $GLOBALS , isLoggedIn ());
2356 } catch ( Exception
$e ) {
2358 'ERROR while merging deprecated options.php file.' . PHP_EOL
.
2363 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=genthumbnail' )) { genThumbnail (); exit ; } // Thumbnail generation/cache does not need the link database.
2364 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=rss' )) { showRSS (); exit ; }
2365 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=atom' )) { showATOM (); exit ; }
2366 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=dailyrss' )) { showDailyRSS (); exit ; }
2367 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=daily' )) { showDaily (); exit ; }
2368 if (! isset ( $_SESSION [ 'LINKS_PER_PAGE' ])) $_SESSION [ 'LINKS_PER_PAGE' ]= $GLOBALS [ 'config' ][ 'LINKS_PER_PAGE' ];