]>
git.immae.eu Git - github/shaarli/Shaarli.git/blob - index.php
2 // Shaarli 0.0.45beta - Shaare your links...
3 // The personal, minimalist, super-fast, no-database Delicious clone. By sebsauvage.net
4 // http://sebsauvage.net/wiki/doku.php?id=php:shaarli
5 // Licence: http://www.opensource.org/licenses/zlib-license.php
6 // Requires: PHP 5.1.x (but autocomplete fields will only work if you have PHP 5.2.x)
7 // -----------------------------------------------------------------------------------------------
8 // NEVER TRUST IN PHP.INI
9 // Some hosts do not define a default timezone in php.ini,
10 // so we have to do this for avoid the strict standard error.
11 date_default_timezone_set ( 'UTC' );
13 // -----------------------------------------------------------------------------------------------
14 // Hardcoded parameter (These parameters can be overwritten by editing the file /data/config.php)
15 // You should not touch any code below (or at your own risks!)
16 $GLOBALS [ 'config' ][ 'DATADIR' ] = 'data' ; // Data subdirectory
17 $GLOBALS [ 'config' ][ 'CONFIG_FILE' ] = $GLOBALS [ 'config' ][ 'DATADIR' ]. '/config.php' ; // Configuration file (user login/password)
18 $GLOBALS [ 'config' ][ 'DATASTORE' ] = $GLOBALS [ 'config' ][ 'DATADIR' ]. '/datastore.php' ; // Data storage file.
19 $GLOBALS [ 'config' ][ 'LINKS_PER_PAGE' ] = 20 ; // Default links per page.
20 $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ] = $GLOBALS [ 'config' ][ 'DATADIR' ]. '/ipbans.php' ; // File storage for failures and bans.
21 $GLOBALS [ 'config' ][ 'BAN_AFTER' ] = 4 ; // Ban IP after this many failures.
22 $GLOBALS [ 'config' ][ 'BAN_DURATION' ] = 1800 ; // Ban duration for IP address after login failures (in seconds) (1800 sec. = 30 minutes)
23 $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ] = false ; // If true, anyone can add/edit/delete links without having to login
24 $GLOBALS [ 'config' ][ 'HIDE_TIMESTAMPS' ] = false ; // If true, the moment when links were saved are not shown to users that are not logged in.
25 $GLOBALS [ 'config' ][ 'SHOW_ATOM' ] = false ; // If true, an extra "ATOM feed" button will be displayed in the toolbar
26 $GLOBALS [ 'config' ][ 'ENABLE_THUMBNAILS' ] = true ; // Enable thumbnails in links.
27 $GLOBALS [ 'config' ][ 'CACHEDIR' ] = 'cache' ; // Cache directory for thumbnails for SLOW services (like flickr)
28 $GLOBALS [ 'config' ][ 'PAGECACHE' ] = 'pagecache' ; // Page cache directory.
29 $GLOBALS [ 'config' ][ 'ENABLE_LOCALCACHE' ] = true ; // Enable Shaarli to store thumbnail in a local cache. Disable to reduce web space usage.
30 $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ] = '' ; // PubSubHubbub support. Put an empty string to disable, or put your hub url here to enable.
31 $GLOBALS [ 'config' ][ 'RAINTPL_TMP' ] = 'tmp/' ; // Raintpl cache directory (keep the trailing slash!)
32 $GLOBALS [ 'config' ][ 'RAINTPL_TPL' ] = 'tpl/' ; // Raintpl template directory (keep the trailing slash!)
33 $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ] = $GLOBALS [ 'config' ][ 'DATADIR' ]. '/lastupdatecheck.txt' ; // For updates check of Shaarli.
34 $GLOBALS [ 'config' ][ 'UPDATECHECK_INTERVAL' ] = 86400 ; // Updates check frequency for Shaarli. 86400 seconds=24 hours
35 // Note: You must have publisher.php in the same directory as Shaarli index.php
36 $GLOBALS [ 'config' ][ 'ARCHIVE_ORG' ] = false ; // For each link, add a link to an archived version on archive.org
37 $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.
38 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ] = false ;
39 // -----------------------------------------------------------------------------------------------
40 define ( 'shaarli_version' , '0.0.45beta' );
41 // http://server.com/x/shaarli --> /shaarli/
42 define ( 'WEB_PATH' , substr ( $_SERVER [ "REQUEST_URI" ], 0 , 1 +
strrpos ( $_SERVER [ "REQUEST_URI" ], '/' , 0 )));
44 // Force cookie path (but do not change lifetime)
45 $cookie = session_get_cookie_params ();
46 $cookiedir = '' ; if ( dirname ( $_SERVER [ 'SCRIPT_NAME' ])!= '/' ) $cookiedir = dirname ( $_SERVER [ "SCRIPT_NAME" ]). '/' ;
47 session_set_cookie_params ( $cookie [ 'lifetime' ], $cookiedir , $_SERVER [ 'SERVER_NAME' ]); // Set default cookie expiration and path.
49 // Set session parameters on server side.
50 define ( 'INACTIVITY_TIMEOUT' , 3600 ); // (in seconds). If the user does not access any page within this time, his/her session is considered expired.
51 ini_set ( 'session.use_cookies' , 1 ); // Use cookies to store session.
52 ini_set ( 'session.use_only_cookies' , 1 ); // Force cookies for session (phpsessionID forbidden in URL).
53 ini_set ( 'session.use_trans_sid' , false ); // Prevent PHP form using sessionID in URL if cookies are disabled.
54 session_name ( 'shaarli' );
55 if ( session_id () == '' ) session_start (); // Start session if needed (Some server auto-start sessions).
58 ini_set ( 'max_input_time' , '60' ); // High execution time in case of problematic imports/exports.
59 ini_set ( 'memory_limit' , '128M' ); // Try to set max upload file size and read (May not work on some hosts).
60 ini_set ( 'post_max_size' , '16M' );
61 ini_set ( 'upload_max_filesize' , '16M' );
63 error_reporting ( E_ALL^E_WARNING
); // See all error except warnings.
64 //error_reporting(-1); // See all errors (for debugging only)
67 require_once 'application/LinkDB.php' ;
68 require_once 'application/Utils.php' ;
69 require_once 'application/Config.php' ;
71 include "inc/rain.tpl.class.php" ; //include Rain TPL
72 raintpl
:: $tpl_dir = $GLOBALS [ 'config' ][ 'RAINTPL_TPL' ]; // template directory
73 raintpl
:: $cache_dir = $GLOBALS [ 'config' ][ 'RAINTPL_TMP' ]; // cache directory
75 ob_start (); // Output buffering for the page cache.
78 // In case stupid admin has left magic_quotes enabled in php.ini:
79 if ( get_magic_quotes_gpc ())
81 function stripslashes_deep ( $value ) { $value
= is_array ( $value
) ? array_map ( 'stripslashes_deep' , $value
) : stripslashes ( $value
); return $value
; }
82 $_POST = array_map ( 'stripslashes_deep' , $_POST );
83 $_GET = array_map ( 'stripslashes_deep' , $_GET );
84 $_COOKIE = array_map ( 'stripslashes_deep' , $_COOKIE );
87 // Prevent caching on client side or proxy: (yes, it's ugly)
88 header ( "Last-Modified: " . gmdate ( "D, d M Y H:i:s" ) . " GMT" );
89 header ( "Cache-Control: no-store, no-cache, must-revalidate" );
90 header ( "Cache-Control: post-check=0, pre-check=0" , false );
91 header ( "Pragma: no-cache" );
93 // Directories creations (Note that your web host may require different rights than 705.)
94 if (! is_writable ( realpath ( dirname ( __FILE__
)))) die ( '<pre>ERROR: Shaarli does not have the right to write in its own directory.</pre>' );
96 // Handling of old config file which do not have the new parameters.
97 if ( empty ( $GLOBALS [ 'title' ])) $GLOBALS [ 'title' ]= 'Shared links on ' . escape ( indexUrl ());
98 if ( empty ( $GLOBALS [ 'timezone' ])) $GLOBALS [ 'timezone' ]= date_default_timezone_get ();
99 if ( empty ( $GLOBALS [ 'redirector' ])) $GLOBALS [ 'redirector' ]= '' ;
100 if ( empty ( $GLOBALS [ 'disablesessionprotection' ])) $GLOBALS [ 'disablesessionprotection' ]= false ;
101 if ( empty ( $GLOBALS [ 'privateLinkByDefault' ])) $GLOBALS [ 'privateLinkByDefault' ]= false ;
102 if ( empty ( $GLOBALS [ 'titleLink' ])) $GLOBALS [ 'titleLink' ]= '?' ;
103 // I really need to rewrite Shaarli with a proper configuation manager.
105 // Run config screen if first run:
106 if (! is_file ( $GLOBALS [ 'config' ][ 'CONFIG_FILE' ])) install ();
108 require $GLOBALS [ 'config' ][ 'CONFIG_FILE' ]; // Read login/password hash into $GLOBALS.
109 $GLOBALS [ 'title' ] = ! empty ( $GLOBALS [ 'title' ]) ? escape ( $GLOBALS [ 'title' ]) : '' ;
110 $GLOBALS [ 'titleLink' ] = ! empty ( $GLOBALS [ 'titleLink' ]) ? escape ( $GLOBALS [ 'titleLink' ]) : '' ;
111 $GLOBALS [ 'redirector' ] = ! empty ( $GLOBALS [ 'redirector' ]) ? escape ( $GLOBALS [ 'redirector' ]) : '' ;
113 // a token depending of deployment salt, user password, and the current ip
114 define ( 'STAY_SIGNED_IN_TOKEN' , sha1 ( $GLOBALS [ 'hash' ]. $_SERVER [ "REMOTE_ADDR" ]. $GLOBALS [ 'salt' ]));
116 autoLocale (); // Sniff browser language and set date format accordingly.
117 header ( 'Content-Type: text/html; charset=utf-8' ); // We use UTF-8 for proper international characters handling.
119 //==================================================================================================
120 // Checking session state (i.e. is the user still logged in)
121 //==================================================================================================
123 function setup_login_state () {
124 $userIsLoggedIn = false ; // By default, we do not consider the user as logged in;
125 $loginFailure = false ; // If set to true, every attempt to authenticate the user will fail. This indicates that an important condition isn't met.
126 if ( $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ]) {
127 $userIsLoggedIn = true ;
129 if (! isset ( $GLOBALS [ 'login' ])) {
130 $userIsLoggedIn = false ; // Shaarli is not configured yet.
131 $loginFailure = true ;
133 if ( isset ( $_COOKIE [ 'shaarli_staySignedIn' ]) &&
134 $_COOKIE [ 'shaarli_staySignedIn' ]=== STAY_SIGNED_IN_TOKEN
&&
138 $userIsLoggedIn = true ;
140 // If session does not exist on server side, or IP address has changed, or session has expired, logout.
141 if ( empty ( $_SESSION [ 'uid' ]) ||
142 ( $GLOBALS [ 'disablesessionprotection' ]== false && $_SESSION [ 'ip' ]!= allIPs ()) ||
143 time () >= $_SESSION [ 'expires_on' ])
146 $userIsLoggedIn = false ;
147 $loginFailure = true ;
149 if (! empty ( $_SESSION [ 'longlastingsession' ])) {
150 $_SESSION [ 'expires_on' ]= time () +
$_SESSION [ 'longlastingsession' ]; // In case of "Stay signed in" checked.
153 $_SESSION [ 'expires_on' ]= time () +INACTIVITY_TIMEOUT
; // Standard session expiration date.
155 if (! $loginFailure ) {
156 $userIsLoggedIn = true ;
159 return $userIsLoggedIn ;
161 //==================================================================================================
162 $userIsLoggedIn = setup_login_state ();
163 //==================================================================================================
164 //==================================================================================================
167 function checkphpversion ()
169 if ( version_compare ( PHP_VERSION
, '5.1.0' ) < 0 )
171 header ( 'Content-Type: text/plain; charset=utf-8' );
172 echo 'Your PHP version is obsolete! Shaarli requires at least php 5.1.0, and thus cannot run. Sorry. Your PHP version has known security vulnerabilities and should be updated as soon as possible.' ;
177 // Checks if an update is available for Shaarli.
178 // (at most once a day, and only for registered user.)
179 // Output: '' = no new version.
180 // other= the available version.
181 function checkUpdate ()
183 if (! isLoggedIn ()) return '' ; // Do not check versions for visitors.
184 if ( empty ( $GLOBALS [ 'config' ][ 'ENABLE_UPDATECHECK' ])) return '' ; // Do not check if the user doesn't want to.
186 // Get latest version number at most once a day.
187 if (! is_file ( $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ]) || ( filemtime ( $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ])< time ()-( $GLOBALS [ 'config' ][ 'UPDATECHECK_INTERVAL' ])))
189 $version = shaarli_version
;
190 list ( $httpstatus , $headers , $data ) = getHTTP ( 'https://raw.githubusercontent.com/shaarli/Shaarli/master/shaarli_version.php' , 2 );
191 if ( strpos ( $httpstatus , '200 OK' )!== false ) $version = str_replace ( ' */ ?>' , '' , str_replace ( '<?php /* ' , '' , $data ));
192 // If failed, never mind. We don't want to bother the user with that.
193 file_put_contents ( $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ], $version ); // touch file date
196 $newestversion = file_get_contents ( $GLOBALS [ 'config' ][ 'UPDATECHECK_FILENAME' ]);
197 if ( version_compare ( $newestversion , shaarli_version
)== 1 ) return $newestversion ;
202 // -----------------------------------------------------------------------------------------------
203 // Simple cache system (mainly for the RSS/ATOM feeds).
207 private $url ; // Full URL of the page to cache (typically the value returned by pageUrl())
208 private $shouldBeCached ; // boolean: Should this url be cached?
209 private $filename ; // Name of the cache file for this url.
212 $url = URL (typically the value returned by pageUrl())
213 $shouldBeCached = boolean. If false, the cache will be disabled.
215 public function __construct ( $url , $shouldBeCached )
218 $this- > filename
= $GLOBALS [ 'config' ][ 'PAGECACHE' ]. '/' . sha1 ( $url ). '.cache' ;
219 $this- > shouldBeCached
= $shouldBeCached ;
222 // If the page should be cached and a cached version exists,
223 // returns the cached version (otherwise, return null).
224 public function cachedVersion ()
226 if (! $this- > shouldBeCached
) return null ;
227 if ( is_file ( $this- > filename
)) { return file_get_contents ( $this
-> filename
); exit ; }
231 // Put a page in the cache.
232 public function cache ( $page )
234 if (! $this- > shouldBeCached
) return ;
235 file_put_contents ( $this- > filename
, $page );
238 // Purge the whole cache.
239 // (call with pageCache::purgeCache())
240 public static function purgeCache ()
242 if ( is_dir ( $GLOBALS [ 'config' ][ 'PAGECACHE' ]))
244 $handler = opendir ( $GLOBALS [ 'config' ][ 'PAGECACHE' ]);
245 if ( $handler !== false )
247 while (( $filename = readdir ( $handler ))!== false )
249 if ( endsWith ( $filename , '.cache' )) { unlink ( $GLOBALS
[ 'config' ][ 'PAGECACHE' ]. '/' . $filename
); }
259 // -----------------------------------------------------------------------------------------------
261 function logm ( $message )
263 $t = strval ( date ( 'Y/m/d_H:i:s' )). ' - ' . $_SERVER [ "REMOTE_ADDR" ]. ' - ' . strval ( $message ). " \n " ;
264 file_put_contents ( $GLOBALS [ 'config' ][ 'DATADIR' ]. '/log.txt' , $t , FILE_APPEND
);
267 // In a string, converts URLs to clickable links.
268 // Function inspired from http://www.php.net/manual/en/function.preg-replace.php#85722
269 function text2clickable ( $url )
271 $redir = empty ( $GLOBALS [ 'redirector' ]) ? '' : $GLOBALS [ 'redirector' ];
272 return preg_replace ( '!(((?:https?|ftp|file)://|apt:|magnet:)\S+[[:alnum:]]/?)!si' , '<a href="' . $redir . ' $1" rel="nofollow"> $1 </a>' , $url );
275 // This function inserts where relevant so that multiple spaces are properly displayed in HTML
276 // even in the absence of <pre> (This is used in description to keep text formatting)
277 function keepMultipleSpaces ( $text )
279 return str_replace ( ' ' , ' ' , $text );
282 // ------------------------------------------------------------------------------------------
283 // Sniff browser language to display dates in the right format automatically.
284 // (Note that is may not work on your server if the corresponding local is not installed.)
285 function autoLocale ()
287 $attempts = array ( 'en_US' ); // Default if browser does not send HTTP_ACCEPT_LANGUAGE
288 if ( isset ( $_SERVER [ 'HTTP_ACCEPT_LANGUAGE' ])) // e.g. "fr,fr-fr;q=0.8,en;q=0.5,en-us;q=0.3"
289 { // (It's a bit crude, but it works very well. Preferred language is always presented first.)
290 if ( preg_match ( '/([a-z] {2} )-?([a-z] {2} )?/i' , $_SERVER [ 'HTTP_ACCEPT_LANGUAGE' ], $matches )) {
291 $loc = $matches [ 1 ] . (! empty ( $matches [ 2 ]) ? '_' . strtoupper ( $matches [ 2 ]) : '' );
292 $attempts = array ( $loc . '.UTF-8' , $loc , str_replace ( '_' , '-' , $loc ). '.UTF-8' , str_replace ( '_' , '-' , $loc ),
293 $loc . '_' . strtoupper ( $loc ). '.UTF-8' , $loc . '_' . strtoupper ( $loc ),
294 $loc . '_' . $loc . '.UTF-8' , $loc . '_' . $loc , $loc . '-' . strtoupper ( $loc ). '.UTF-8' ,
295 $loc . '-' . strtoupper ( $loc ), $loc . '-' . $loc . '.UTF-8' , $loc . '-' . $loc );
298 setlocale ( LC_TIME
, $attempts ); // LC_TIME = Set local for date/time format only.
301 // ------------------------------------------------------------------------------------------
302 // PubSubHubbub protocol support (if enabled) [UNTESTED]
303 // (Source: http://aldarone.fr/les-flux-rss-shaarli-et-pubsubhubbub/ )
304 if (! empty ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ])) include './publisher.php' ;
307 if (! empty ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]))
309 $p = new Publisher ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]);
311 indexUrl (). '?do=atom' ,
314 $p- > publish_update ( $topic_url );
318 // ------------------------------------------------------------------------------------------
319 // Session management
321 // Returns the IP address of the client (Used to prevent session cookie hijacking.)
324 $ip = $_SERVER [ "REMOTE_ADDR" ];
325 // Then we use more HTTP headers to prevent session hijacking from users behind the same proxy.
326 if ( isset ( $_SERVER [ 'HTTP_X_FORWARDED_FOR' ])) { $ip
= $ip
. '_' . $_SERVER
[ 'HTTP_X_FORWARDED_FOR' ]; }
327 if ( isset ( $_SERVER [ 'HTTP_CLIENT_IP' ])) { $ip
= $ip
. '_' . $_SERVER
[ 'HTTP_CLIENT_IP' ]; }
331 function fillSessionInfo () {
332 $_SESSION [ 'uid' ] = sha1 ( uniqid ( '' , true ). '_' . mt_rand ()); // Generate unique random number (different than phpsessionid)
333 $_SESSION [ 'ip' ]= allIPs (); // We store IP address(es) of the client to make sure session is not hijacked.
334 $_SESSION [ 'username' ]= $GLOBALS [ 'login' ];
335 $_SESSION [ 'expires_on' ]= time () +INACTIVITY_TIMEOUT
; // Set session expiration.
338 // Check that user/password is correct.
339 function check_auth ( $login , $password )
341 $hash = sha1 ( $password . $login . $GLOBALS [ 'salt' ]);
342 if ( $login == $GLOBALS [ 'login' ] && $hash == $GLOBALS [ 'hash' ])
343 { // Login/password is correct.
345 logm ( 'Login successful' );
348 logm ( 'Login failed for user ' . $login );
352 // Returns true if the user is logged in.
353 function isLoggedIn ()
355 global $userIsLoggedIn ;
356 return $userIsLoggedIn ;
361 if ( isset ( $_SESSION )) {
362 unset ( $_SESSION [ 'uid' ]);
363 unset ( $_SESSION [ 'ip' ]);
364 unset ( $_SESSION [ 'username' ]);
365 unset ( $_SESSION [ 'privateonly' ]);
367 setcookie ( 'shaarli_staySignedIn' , FALSE , 0 , WEB_PATH
);
371 // ------------------------------------------------------------------------------------------
372 // Brute force protection system
373 // Several consecutive failed logins will ban the IP address for 30 minutes.
374 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 ?>" );
375 include $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ];
376 // Signal a failed login. Will ban the IP if too many failures:
377 function ban_loginFailed ()
379 $ip = $_SERVER [ "REMOTE_ADDR" ]; $gb = $GLOBALS [ 'IPBANS' ];
380 if (! isset ( $gb [ 'FAILURES' ][ $ip ])) $gb [ 'FAILURES' ][ $ip ]= 0 ;
381 $gb [ 'FAILURES' ][ $ip ] ++
;
382 if ( $gb [ 'FAILURES' ][ $ip ]>( $GLOBALS [ 'config' ][ 'BAN_AFTER' ]- 1 ))
384 $gb [ 'BANS' ][ $ip ]= time () +
$GLOBALS [ 'config' ][ 'BAN_DURATION' ];
385 logm ( 'IP address banned from login' );
387 $GLOBALS [ 'IPBANS' ] = $gb ;
388 file_put_contents ( $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ], "<?php \n\$ GLOBALS['IPBANS']=" . var_export ( $gb , true ). "; \n ?>" );
391 // Signals a successful login. Resets failed login counter.
392 function ban_loginOk ()
394 $ip = $_SERVER [ "REMOTE_ADDR" ]; $gb = $GLOBALS [ 'IPBANS' ];
395 unset ( $gb [ 'FAILURES' ][ $ip ]); unset ( $gb [ 'BANS' ][ $ip ]);
396 $GLOBALS [ 'IPBANS' ] = $gb ;
397 file_put_contents ( $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ], "<?php \n\$ GLOBALS['IPBANS']=" . var_export ( $gb , true ). "; \n ?>" );
400 // Checks if the user CAN login. If 'true', the user can try to login.
401 function ban_canLogin ()
403 $ip = $_SERVER [ "REMOTE_ADDR" ]; $gb = $GLOBALS [ 'IPBANS' ];
404 if ( isset ( $gb [ 'BANS' ][ $ip ]))
406 // User is banned. Check if the ban has expired:
407 if ( $gb [ 'BANS' ][ $ip ]<= time ())
408 { // Ban expired, user can try to login again.
410 unset ( $gb [ 'FAILURES' ][ $ip ]); unset ( $gb [ 'BANS' ][ $ip ]);
411 file_put_contents ( $GLOBALS [ 'config' ][ 'IPBANS_FILENAME' ], "<?php \n\$ GLOBALS['IPBANS']=" . var_export ( $gb , true ). "; \n ?>" );
412 return true ; // Ban has expired, user can login.
414 return false ; // User is banned.
416 return true ; // User is not banned.
419 // ------------------------------------------------------------------------------------------
420 // Process login form: Check if login/password is correct.
421 if ( isset ( $_POST [ 'login' ]))
423 if (! ban_canLogin ()) die ( 'I said: NO. You are banned for the moment. Go away.' );
424 if ( isset ( $_POST [ 'password' ]) && tokenOk ( $_POST [ 'token' ]) && ( check_auth ( $_POST [ 'login' ], $_POST [ 'password' ])))
425 { // Login/password is OK.
427 // If user wants to keep the session cookie even after the browser closes:
428 if (! empty ( $_POST [ 'longlastingsession' ]))
430 setcookie ( 'shaarli_staySignedIn' , STAY_SIGNED_IN_TOKEN
, time () +
31536000 , WEB_PATH
);
431 $_SESSION [ 'longlastingsession' ]= 31536000 ; // (31536000 seconds = 1 year)
432 $_SESSION [ 'expires_on' ]= time () +
$_SESSION [ 'longlastingsession' ]; // Set session expiration on server-side.
434 $cookiedir = '' ; if ( dirname ( $_SERVER [ 'SCRIPT_NAME' ])!= '/' ) $cookiedir = dirname ( $_SERVER [ "SCRIPT_NAME" ]). '/' ;
435 session_set_cookie_params ( $_SESSION [ 'longlastingsession' ], $cookiedir , $_SERVER [ 'SERVER_NAME' ]); // Set session cookie expiration on client side
436 // Note: Never forget the trailing slash on the cookie path!
437 session_regenerate_id ( true ); // Send cookie with new expiration date to browser.
439 else // Standard session expiration (=when browser closes)
441 $cookiedir = '' ; if ( dirname ( $_SERVER [ 'SCRIPT_NAME' ])!= '/' ) $cookiedir = dirname ( $_SERVER [ "SCRIPT_NAME" ]). '/' ;
442 session_set_cookie_params ( 0 , $cookiedir , $_SERVER [ 'SERVER_NAME' ]); // 0 means "When browser closes"
443 session_regenerate_id ( true );
445 // Optional redirect after login:
446 if ( isset ( $_GET [ 'post' ])) { header ( 'Location: ?post=' . urlencode ( $_GET
[ 'post' ]).(! empty ( $_GET
[ 'title' ])? '&title=' . urlencode ( $_GET
[ 'title' ]): '' ).(! empty ( $_GET
[ 'description' ])? '&description=' . urlencode ( $_GET
[ 'description' ]): '' ).(! empty ( $_GET
[ 'source' ])? '&source=' . urlencode ( $_GET
[ 'source' ]): '' )); exit ; }
447 if ( isset ( $_POST [ 'returnurl' ]))
449 if ( endsWith ( $_POST [ 'returnurl' ], '?do=login' )) { header ( 'Location: ?' ); exit ; } // Prevent loops over login screen.
450 header ( 'Location: ' . $_POST [ 'returnurl' ]); exit ;
452 header ( 'Location: ?' ); exit ;
458 if ( isset ( $_GET [ 'post' ])) { $redir
= '&post=' . urlencode ( $_GET
[ 'post' ]).(! empty ( $_GET
[ 'title' ])? '&title=' . urlencode ( $_GET
[ 'title' ]): '' ).(! empty ( $_GET
[ 'description' ])? '&description=' . urlencode ( $_GET
[ 'description' ]): '' ).(! empty ( $_GET
[ 'source' ])? '&source=' . urlencode ( $_GET
[ 'source' ]): '' ); }
459 echo '<script>alert("Wrong login/password.");document.location= \' ?do=login' . $redir . ' \' ;</script>' ; // Redirect to login screen.
464 // ------------------------------------------------------------------------------------------
465 // Misc utility functions:
467 // Returns the server URL (including port and http/https), without path.
468 // e.g. "http://myserver.com:8080"
469 // You can append $_SERVER['SCRIPT_NAME'] to get the current script URL.
472 $https = (! empty ( $_SERVER [ 'HTTPS' ]) && ( strtolower ( $_SERVER [ 'HTTPS' ])== 'on' )) || $_SERVER [ "SERVER_PORT" ]== '443' ; // HTTPS detection.
473 $serverport = ( $_SERVER [ "SERVER_PORT" ]== '80' || ( $https && $_SERVER [ "SERVER_PORT" ]== '443' ) ? '' : ':' . $_SERVER [ "SERVER_PORT" ]);
474 return 'http' .( $https ? 's' : '' ). '://' . $_SERVER [ 'SERVER_NAME' ]. $serverport ;
477 // Returns the absolute URL of current script, without the query.
478 // (e.g. http://sebsauvage.net/links/)
481 $scriptname = $_SERVER [ "SCRIPT_NAME" ];
482 // If the script is named 'index.php', we remove it (for better looking URLs,
483 // e.g. http://mysite.com/shaarli/?abcde instead of http://mysite.com/shaarli/index.php?abcde)
484 if ( endswith ( $scriptname , 'index.php' )) $scriptname = substr ( $scriptname , 0 , strlen ( $scriptname )- 9 );
485 return serverUrl () . $scriptname ;
488 // Returns the absolute URL of current script, WITH the query.
489 // (e.g. http://sebsauvage.net/links/?toto=titi&spamspamspam=humbug)
492 return indexUrl ().(! empty ( $_SERVER [ "QUERY_STRING" ]) ? '?' . $_SERVER [ "QUERY_STRING" ] : '' );
495 // Convert post_max_size/upload_max_filesize (e.g. '16M') parameters to bytes.
496 function return_bytes ( $val )
498 $val = trim ( $val ); $last = strtolower ( $val [ strlen ( $val )- 1 ]);
501 case 'g' : $val *= 1024 ;
502 case 'm' : $val *= 1024 ;
503 case 'k' : $val *= 1024 ;
508 // Try to determine max file size for uploads (POST).
509 // Returns an integer (in bytes)
510 function getMaxFileSize ()
512 $size1 = return_bytes ( ini_get ( 'post_max_size' ));
513 $size2 = return_bytes ( ini_get ( 'upload_max_filesize' ));
514 // Return the smaller of two:
515 $maxsize = min ( $size1 , $size2 );
516 // FIXME: Then convert back to readable notations ? (e.g. 2M instead of 2000000)
520 /* Converts a linkdate time (YYYYMMDD_HHMMSS) of an article to a timestamp (Unix epoch)
521 (used to build the ADD_DATE attribute in Netscape-bookmarks file)
522 PS: I could have used strptime(), but it does not exist on Windows. I'm too kind. */
523 function linkdate2timestamp ( $linkdate )
525 if ( strcmp ( $linkdate , '_000000' ) !== 0 || ! $linkdate ){
527 $r = sscanf ( $linkdate , '%4d%2d%2d_%2d%2d%2d' , $Y , $M , $D , $h , $m , $s );
528 return mktime ( $h , $m , $s , $M , $D , $Y );
533 /* Converts a linkdate time (YYYYMMDD_HHMMSS) of an article to a RFC822 date.
534 (used to build the pubDate attribute in RSS feed.) */
535 function linkdate2rfc822 ( $linkdate )
537 return date ( 'r' , linkdate2timestamp ( $linkdate )); // 'r' is for RFC822 date format.
540 /* Converts a linkdate time (YYYYMMDD_HHMMSS) of an article to a ISO 8601 date.
541 (used to build the updated tags in ATOM feed.) */
542 function linkdate2iso8601 ( $linkdate )
544 return date ( 'c' , linkdate2timestamp ( $linkdate )); // 'c' is for ISO 8601 date format.
547 // Parse HTTP response headers and return an associative array.
548 function http_parse_headers_shaarli ( $headers )
551 foreach ( $headers as $header )
553 $i = strpos ( $header , ': ' );
556 $key = substr ( $header , 0 , $i );
557 $value = substr ( $header , $i +
2 , strlen ( $header )- $i-2 );
565 Input: $url : URL to get (http://...)
566 $timeout : Network timeout (will wait this many seconds for an anwser before giving up).
567 Output: An array. [0] = HTTP status message (e.g. "HTTP/1.1 200 OK") or error message
568 [1] = associative array containing HTTP response headers (e.g. echo getHTTP($url)[1]['Content-Type'])
570 Example: list($httpstatus,$headers,$data) = getHTTP('http://sebauvage.net/');
571 if (strpos($httpstatus,'200 OK')!==false)
572 echo 'Data type: '.htmlspecialchars($headers['Content-Type']);
574 echo 'There was an error: '.htmlspecialchars($httpstatus)
576 function getHTTP ( $url , $timeout = 30 )
580 $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
581 $context = stream_context_create ( $options );
582 $data = file_get_contents ( $url , false , $context ,- 1 , 4000000 ); // We download at most 4 Mb from source.
583 if (! $data ) { return array ( 'HTTP Error' , array (), '' ); }
584 $httpStatus = $http_response_header [ 0 ]; // e.g. "HTTP/1.1 200 OK"
585 $responseHeaders = http_parse_headers_shaarli ( $http_response_header );
586 return array ( $httpStatus , $responseHeaders , $data );
588 catch ( Exception
$e ) // getHTTP *can* fail silently (we don't care if the title cannot be fetched)
590 return array ( $e- > getMessage (), '' , '' );
594 // Extract title from an HTML document.
595 // (Returns an empty string if not found.)
596 function html_extract_title ( $html )
598 return preg_match ( '!<title>(.*?)</title>!is' , $html , $matches ) ? trim ( str_replace ( " \n " , ' ' , $matches [ 1 ])) : '' ;
601 // ------------------------------------------------------------------------------------------
602 // Token management for XSRF protection
603 // Token should be used in any form which acts on data (create,update,delete,import...).
604 if (! isset ( $_SESSION [ 'tokens' ])) $_SESSION [ 'tokens' ]= array (); // Token are attached to the session.
609 $rnd = sha1 ( uniqid ( '' , true ). '_' . mt_rand (). $GLOBALS [ 'salt' ]); // We generate a random string.
610 $_SESSION [ 'tokens' ][ $rnd ]= 1 ; // Store it on the server side.
614 // Tells if a token is OK. Using this function will destroy the token.
616 function tokenOk ( $token )
618 if ( isset ( $_SESSION [ 'tokens' ][ $token ]))
620 unset ( $_SESSION [ 'tokens' ][ $token ]); // Token is used: destroy it.
621 return true ; // Token is OK.
623 return false ; // Wrong token, or already used.
626 // ------------------------------------------------------------------------------------------
627 /* This class is in charge of building the final page.
628 (This is basically a wrapper around RainTPL which pre-fills some fields.)
630 p.assign('myfield','myvalue');
631 p.renderPage('mytemplate');
636 private $tpl ; // RainTPL template
638 function __construct ()
643 private function initialize ()
645 $this- > tpl
= new RainTPL
;
646 $this- > tpl
-> assign ( 'newversion' , escape ( checkUpdate ()));
647 $this- > tpl
-> assign ( 'feedurl' , escape ( indexUrl ()));
648 $searchcrits = '' ; // Search criteria
649 if (! empty ( $_GET [ 'searchtags' ])) $searchcrits .= '&searchtags=' . urlencode ( $_GET [ 'searchtags' ]);
650 elseif (! empty ( $_GET [ 'searchterm' ])) $searchcrits .= '&searchterm=' . urlencode ( $_GET [ 'searchterm' ]);
651 $this- > tpl
-> assign ( 'searchcrits' , $searchcrits );
652 $this- > tpl
-> assign ( 'source' , indexUrl ());
653 $this- > tpl
-> assign ( 'version' , shaarli_version
);
654 $this- > tpl
-> assign ( 'scripturl' , indexUrl ());
655 $this- > tpl
-> assign ( 'pagetitle' , 'Shaarli' );
656 $this- > tpl
-> assign ( 'privateonly' ,! empty ( $_SESSION [ 'privateonly' ])); // Show only private links?
657 if (! empty ( $GLOBALS [ 'title' ])) $this- > tpl
-> assign ( 'pagetitle' , $GLOBALS [ 'title' ]);
658 if (! empty ( $GLOBALS [ 'titleLink' ])) $this- > tpl
-> assign ( 'titleLink' , $GLOBALS [ 'titleLink' ]);
659 if (! empty ( $GLOBALS [ 'pagetitle' ])) $this- > tpl
-> assign ( 'pagetitle' , $GLOBALS [ 'pagetitle' ]);
660 $this- > tpl
-> assign ( 'shaarlititle' , empty ( $GLOBALS [ 'title' ]) ? 'Shaarli' : $GLOBALS [ 'title' ] );
664 // The following assign() method is basically the same as RainTPL (except that it's lazy)
665 public function assign ( $what , $where )
667 if ( $this- > tpl
=== false ) $this- > initialize (); // Lazy initialization
668 $this- > tpl
-> assign ( $what , $where );
671 // Render a specific page (using a template).
672 // e.g. pb.renderPage('picwall')
673 public function renderPage ( $page )
675 if ( $this- > tpl
=== false ) $this- > initialize (); // Lazy initialization
676 $this- > tpl
-> draw ( $page );
680 // ------------------------------------------------------------------------------------------
681 // Output the last N links in RSS 2.0 format.
684 header ( 'Content-Type: application/rss+xml; charset=utf-8' );
686 // $usepermalink : If true, use permalink instead of final link.
687 // User just has to add 'permalink' in URL parameters. e.g. http://mysite.com/shaarli/?do=rss&permalinks
688 // Also enabled through a config option
689 $usepermalinks = isset ( $_GET [ 'permalinks' ]) || ! $GLOBALS [ 'config' ][ 'ENABLE_RSS_PERMALINKS' ];
692 $query = $_SERVER [ "QUERY_STRING" ];
693 $cache = new pageCache ( pageUrl (), startsWith ( $query , 'do=rss' ) && ! isLoggedIn ());
694 $cached = $cache- > cachedVersion (); if (! empty ( $cached )) { echo $cached
; exit ; }
696 // If cached was not found (or not usable), then read the database and build the response:
697 $LINKSDB = new LinkDB (
698 $GLOBALS [ 'config' ][ 'DATASTORE' ],
699 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
700 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
702 // Read links from database (and filter private links if user it not logged in).
704 // Optionally filter the results:
705 $linksToDisplay = array ();
706 if (! empty ( $_GET [ 'searchterm' ])) $linksToDisplay = $LINKSDB- > filterFulltext ( $_GET [ 'searchterm' ]);
707 else if (! empty ( $_GET [ 'searchtags' ])) $linksToDisplay = $LINKSDB- > filterTags ( trim ( $_GET [ 'searchtags' ]));
708 else $linksToDisplay = $LINKSDB ;
710 $nblinksToDisplay = 50 ; // Number of links to display.
711 if (! empty ( $_GET [ 'nb' ])) // In URL, you can specificy the number of links. Example: nb=200 or nb=all for all links.
713 $nblinksToDisplay = $_GET [ 'nb' ]== 'all' ? count ( $linksToDisplay ) : max ( $_GET [ 'nb' ] +
0 , 1 ) ;
716 $pageaddr = escape ( indexUrl ());
717 echo '<?xml version="1.0" encoding="UTF-8"?><rss version="2.0" xmlns:content="http://purl.org/rss/1.0/modules/content/">' ;
718 echo '<channel><title>' . $GLOBALS [ 'title' ]. '</title><link>' . $pageaddr . '</link>' ;
719 echo '<description>Shared links</description><language>en-en</language><copyright>' . $pageaddr . '</copyright>' . " \n\n " ;
720 if (! empty ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]))
722 echo '<!-- PubSubHubbub Discovery -->' ;
723 echo '<link rel="hub" href="' . escape ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]). '" xmlns="http://www.w3.org/2005/Atom" />' ;
724 echo '<link rel="self" href="' . $pageaddr . '?do=rss" xmlns="http://www.w3.org/2005/Atom" />' ;
725 echo '<!-- End Of PubSubHubbub Discovery -->' ;
728 $keys = array (); foreach ( $linksToDisplay as $key => $value ) { $keys
[]= $key
; } // No, I can't use array_keys().
729 while ( $i < $nblinksToDisplay && $i < count ( $keys ))
731 $link = $linksToDisplay [ $keys [ $i ]];
732 $guid = $pageaddr . '?' . smallHash ( $link [ 'linkdate' ]);
733 $rfc822date = linkdate2rfc822 ( $link [ 'linkdate' ]);
734 $absurl = $link [ 'url' ];
735 if ( startsWith ( $absurl , '?' )) $absurl = $pageaddr . $absurl ; // make permalink URL absolute
736 if ( $usepermalinks === true )
737 echo '<item><title>' . $link [ 'title' ]. '</title><guid isPermaLink="true">' . $guid . '</guid><link>' . $guid . '</link>' ;
739 echo '<item><title>' . $link [ 'title' ]. '</title><guid isPermaLink="false">' . $guid . '</guid><link>' . $absurl . '</link>' ;
740 if (! $GLOBALS [ 'config' ][ 'HIDE_TIMESTAMPS' ] || isLoggedIn ()) echo '<pubDate>' . escape ( $rfc822date ). "</pubDate> \n " ;
741 if ( $link [ 'tags' ]!= '' ) // Adding tags to each RSS entry (as mentioned in RSS specification)
743 foreach ( explode ( ' ' , $link [ 'tags' ]) as $tag ) { echo '<category domain="' . $pageaddr
. '">' . $tag
. '</category>' . " \n " ; }
746 // Add permalink in description
747 $descriptionlink = '(<a href="' . $guid . '">Permalink</a>)' ;
748 // If user wants permalinks first, put the final link in description
749 if ( $usepermalinks === true ) $descriptionlink = '(<a href="' . $absurl . '">Link</a>)' ;
750 if ( strlen ( $link [ 'description' ])> 0 ) $descriptionlink = '<br>' . $descriptionlink ;
751 echo '<description><![CDATA[' . nl2br ( keepMultipleSpaces ( text2clickable ( $link [ 'description' ]))). $descriptionlink . ']]></description>' . " \n </item> \n " ;
754 echo '</channel></rss><!-- Cached version of ' . escape ( pageUrl ()). ' -->' ;
756 $cache- > cache ( ob_get_contents ());
761 // ------------------------------------------------------------------------------------------
762 // Output the last N links in ATOM format.
765 header ( 'Content-Type: application/atom+xml; charset=utf-8' );
767 // $usepermalink : If true, use permalink instead of final link.
768 // User just has to add 'permalink' in URL parameters. e.g. http://mysite.com/shaarli/?do=atom&permalinks
769 $usepermalinks = isset ( $_GET [ 'permalinks' ]) || ! $GLOBALS [ 'config' ][ 'ENABLE_RSS_PERMALINKS' ];
772 $query = $_SERVER [ "QUERY_STRING" ];
773 $cache = new pageCache ( pageUrl (), startsWith ( $query , 'do=atom' ) && ! isLoggedIn ());
774 $cached = $cache- > cachedVersion (); if (! empty ( $cached )) { echo $cached
; exit ; }
775 // If cached was not found (or not usable), then read the database and build the response:
777 // Read links from database (and filter private links if used it not logged in).
778 $LINKSDB = new LinkDB (
779 $GLOBALS [ 'config' ][ 'DATASTORE' ],
780 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
781 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
784 // Optionally filter the results:
785 $linksToDisplay = array ();
786 if (! empty ( $_GET [ 'searchterm' ])) $linksToDisplay = $LINKSDB- > filterFulltext ( $_GET [ 'searchterm' ]);
787 else if (! empty ( $_GET [ 'searchtags' ])) $linksToDisplay = $LINKSDB- > filterTags ( trim ( $_GET [ 'searchtags' ]));
788 else $linksToDisplay = $LINKSDB ;
790 $nblinksToDisplay = 50 ; // Number of links to display.
791 if (! empty ( $_GET [ 'nb' ])) // In URL, you can specificy the number of links. Example: nb=200 or nb=all for all links.
793 $nblinksToDisplay = $_GET [ 'nb' ]== 'all' ? count ( $linksToDisplay ) : max ( $_GET [ 'nb' ] +
0 , 1 ) ;
796 $pageaddr = escape ( indexUrl ());
800 $keys = array (); foreach ( $linksToDisplay as $key => $value ) { $keys
[]= $key
; } // No, I can't use array_keys().
801 while ( $i < $nblinksToDisplay && $i < count ( $keys ))
803 $link = $linksToDisplay [ $keys [ $i ]];
804 $guid = $pageaddr . '?' . smallHash ( $link [ 'linkdate' ]);
805 $iso8601date = linkdate2iso8601 ( $link [ 'linkdate' ]);
806 $latestDate = max ( $latestDate , $iso8601date );
807 $absurl = $link [ 'url' ];
808 if ( startsWith ( $absurl , '?' )) $absurl = $pageaddr . $absurl ; // make permalink URL absolute
809 $entries .= '<entry><title>' . $link [ 'title' ]. '</title>' ;
810 if ( $usepermalinks === true )
811 $entries .= '<link href="' . $guid . '" /><id>' . $guid . '</id>' ;
813 $entries .= '<link href="' . $absurl . '" /><id>' . $guid . '</id>' ;
814 if (! $GLOBALS [ 'config' ][ 'HIDE_TIMESTAMPS' ] || isLoggedIn ()) $entries .= '<updated>' . escape ( $iso8601date ). '</updated>' ;
816 // Add permalink in description
817 $descriptionlink = '(<a href="' . $guid . '">Permalink</a>)' ;
818 // If user wants permalinks first, put the final link in description
819 if ( $usepermalinks === true ) $descriptionlink = '(<a href="' . $absurl . '">Link</a>)' ;
820 if ( strlen ( $link [ 'description' ])> 0 ) $descriptionlink = '<br>' . $descriptionlink ;
822 $entries .= '<content type="html"><![CDATA[' . nl2br ( keepMultipleSpaces ( text2clickable ( $link [ 'description' ]))). $descriptionlink . "]]></content> \n " ;
823 if ( $link [ 'tags' ]!= '' ) // Adding tags to each ATOM entry (as mentioned in ATOM specification)
825 foreach ( explode ( ' ' , $link [ 'tags' ]) as $tag )
826 { $entries
.= '<category scheme="' . $pageaddr
. '" term="' . $tag
. '" />' . " \n " ; }
828 $entries .= "</entry> \n " ;
831 $feed = '<?xml version="1.0" encoding="UTF-8"?><feed xmlns="http://www.w3.org/2005/Atom">' ;
832 $feed .= '<title>' . $GLOBALS [ 'title' ]. '</title>' ;
833 if (! $GLOBALS [ 'config' ][ 'HIDE_TIMESTAMPS' ] || isLoggedIn ()) $feed .= '<updated>' . escape ( $latestDate ). '</updated>' ;
834 $feed .= '<link rel="self" href="' . escape ( serverUrl (). $_SERVER [ "REQUEST_URI" ]). '" />' ;
835 if (! empty ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]))
837 $feed .= '<!-- PubSubHubbub Discovery -->' ;
838 $feed .= '<link rel="hub" href="' . escape ( $GLOBALS [ 'config' ][ 'PUBSUBHUB_URL' ]). '" />' ;
839 $feed .= '<!-- End Of PubSubHubbub Discovery -->' ;
841 $feed .= '<author><name>' . $pageaddr . '</name><uri>' . $pageaddr . '</uri></author>' ;
842 $feed .= '<id>' . $pageaddr . '</id>' . " \n\n " ; // Yes, I know I should use a real IRI (RFC3987), but the site URL will do.
844 $feed .= '</feed><!-- Cached version of ' . escape ( pageUrl ()). ' -->' ;
847 $cache- > cache ( ob_get_contents ());
852 // ------------------------------------------------------------------------------------------
853 // Daily RSS feed: 1 RSS entry per day giving all the links on that day.
854 // Gives the last 7 days (which have links).
855 // This RSS feed cannot be filtered.
856 function showDailyRSS () {
858 $query = $_SERVER [ "QUERY_STRING" ];
859 $cache = new pageCache ( pageUrl (), startsWith ( $query , 'do=dailyrss' ) && ! isLoggedIn ());
860 $cached = $cache- > cachedVersion ();
861 if (! empty ( $cached )) {
866 // If cached was not found (or not usable), then read the database and build the response:
867 // Read links from database (and filter private links if used it not logged in).
868 $LINKSDB = new LinkDB (
869 $GLOBALS [ 'config' ][ 'DATASTORE' ],
870 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
871 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
874 /* Some Shaarlies may have very few links, so we need to look
875 back in time (rsort()) until we have enough days ($nb_of_days).
877 $linkdates = array ();
878 foreach ( $LINKSDB as $linkdate => $value ) {
879 $linkdates [] = $linkdate ;
882 $nb_of_days = 7 ; // We take 7 days.
883 $today = Date ( 'Ymd' );
886 foreach ( $linkdates as $linkdate ) {
887 $day = substr ( $linkdate , 0 , 8 ); // Extract day (without time)
888 if ( strcmp ( $day , $today ) < 0 ) {
889 if ( empty ( $days [ $day ])) {
890 $days [ $day ] = array ();
892 $days [ $day ][] = $linkdate ;
895 if ( count ( $days ) > $nb_of_days ) {
896 break ; // Have we collected enough days?
900 // Build the RSS feed.
901 header ( 'Content-Type: application/rss+xml; charset=utf-8' );
902 $pageaddr = escape ( indexUrl ());
903 echo '<?xml version="1.0" encoding="UTF-8"?><rss version="2.0">' ;
905 echo '<title>Daily - ' . $GLOBALS [ 'title' ] . '</title>' ;
906 echo '<link>' . $pageaddr . '</link>' ;
907 echo '<description>Daily shared links</description>' ;
908 echo '<language>en-en</language>' ;
909 echo '<copyright>' . $pageaddr . '</copyright>' . PHP_EOL
;
912 foreach ( $days as $day => $linkdates ) {
913 $daydate = linkdate2timestamp ( $day . '_000000' ); // Full text date
914 $rfc822date = linkdate2rfc822 ( $day . '_000000' );
915 $absurl = escape ( indexUrl (). '?do=daily&day=' . $day ); // Absolute URL of the corresponding "Daily" page.
917 // Build the HTML body of this RSS entry.
922 // We pre-format some fields for proper output.
923 foreach ( $linkdates as $linkdate ) {
924 $l = $LINKSDB [ $linkdate ];
925 $l [ 'formatedDescription' ] = nl2br ( keepMultipleSpaces ( text2clickable ( $l [ 'description' ])));
926 $l [ 'thumbnail' ] = thumbnail ( $l [ 'url' ]);
927 $l [ 'timestamp' ] = linkdate2timestamp ( $l [ 'linkdate' ]);
928 if ( startsWith ( $l [ 'url' ], '?' )) {
929 $l [ 'url' ] = indexUrl () . $l [ 'url' ]; // make permalink URL absolute
931 $links [ $linkdate ] = $l ;
934 // Then build the HTML for this day:
936 $tpl- > assign ( 'title' , $GLOBALS [ 'title' ]);
937 $tpl- > assign ( 'daydate' , $daydate );
938 $tpl- > assign ( 'absurl' , $absurl );
939 $tpl- > assign ( 'links' , $links );
940 $tpl- > assign ( 'rfc822date' , escape ( $rfc822date ));
941 $html = $tpl- > draw ( 'dailyrss' , $return_string = true );
943 echo $html . PHP_EOL
;
945 echo '</channel></rss><!-- Cached version of ' . escape ( pageUrl ()) . ' -->' ;
947 $cache- > cache ( ob_get_contents ());
955 $LINKSDB = new LinkDB (
956 $GLOBALS [ 'config' ][ 'DATASTORE' ],
957 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
958 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
961 $day = Date ( 'Ymd' , strtotime ( '-1 day' )); // Yesterday, in format YYYYMMDD.
962 if ( isset ( $_GET [ 'day' ])) $day = $_GET [ 'day' ];
964 $days = $LINKSDB- > days ();
965 $i = array_search ( $day , $days );
966 if ( $i === false ) { $i
= count ( $days
)- 1 ; $day
= $days
[ $i
]; }
971 if ( $i >= 1 ) $previousday = $days [ $i-1 ];
972 if ( $i < count ( $days )- 1 ) $nextday = $days [ $i +
1 ];
976 $linksToDisplay = $LINKSDB- > filterDay ( $day );
977 } catch ( Exception
$exc ) {
979 $linksToDisplay = [];
982 // We pre-format some fields for proper output.
983 foreach ( $linksToDisplay as $key => $link )
986 $taglist = explode ( ' ' , $link [ 'tags' ]);
987 uasort ( $taglist , 'strcasecmp' );
988 $linksToDisplay [ $key ][ 'taglist' ]= $taglist ;
989 $linksToDisplay [ $key ][ 'formatedDescription' ]= nl2br ( keepMultipleSpaces ( text2clickable ( $link [ 'description' ])));
990 $linksToDisplay [ $key ][ 'thumbnail' ] = thumbnail ( $link [ 'url' ]);
991 $linksToDisplay [ $key ][ 'timestamp' ] = linkdate2timestamp ( $link [ 'linkdate' ]);
994 /* We need to spread the articles on 3 columns.
995 I did not want to use a JavaScript lib like http://masonry.desandro.com/
996 so I manually spread entries with a simple method: I roughly evaluate the
997 height of a div according to title and description length.
999 $columns = array ( array (), array (), array ()); // Entries to display, for each column.
1000 $fill = array ( 0 , 0 , 0 ); // Rough estimate of columns fill.
1001 foreach ( $linksToDisplay as $key => $link )
1003 // Roughly estimate length of entry (by counting characters)
1004 // Title: 30 chars = 1 line. 1 line is 30 pixels height.
1005 // Description: 836 characters gives roughly 342 pixel height.
1006 // This is not perfect, but it's usually OK.
1007 $length = strlen ( $link [ 'title' ]) +
( 342 * strlen ( $link [ 'description' ]))/ 836 ;
1008 if ( $link [ 'thumbnail' ]) $length +
= 100 ; // 1 thumbnails roughly takes 100 pixels height.
1009 // Then put in column which is the less filled:
1010 $smallest = min ( $fill ); // find smallest value in array.
1011 $index = array_search ( $smallest , $fill ); // find index of this smallest value.
1012 array_push ( $columns [ $index ], $link ); // Put entry in this column.
1013 $fill [ $index ] +
= $length ;
1015 $PAGE = new pageBuilder
;
1016 $PAGE- > assign ( 'linksToDisplay' , $linksToDisplay );
1017 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1018 $PAGE- > assign ( 'cols' , $columns );
1019 $PAGE- > assign ( 'day' , linkdate2timestamp ( $day . '_000000' ));
1020 $PAGE- > assign ( 'previousday' , $previousday );
1021 $PAGE- > assign ( 'nextday' , $nextday );
1022 $PAGE- > renderPage ( 'daily' );
1027 // ------------------------------------------------------------------------------------------
1028 // Render HTML page (according to URL parameters and user rights)
1029 function renderPage ()
1031 $LINKSDB = new LinkDB (
1032 $GLOBALS [ 'config' ][ 'DATASTORE' ],
1033 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
1034 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
1037 // -------- Display login form.
1038 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=login' ))
1040 if ( $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ]) { header ( 'Location: ?' ); exit ; } // No need to login for open Shaarli
1041 $token = '' ; if ( ban_canLogin ()) $token = getToken (); // Do not waste token generation if not useful.
1042 $PAGE = new pageBuilder
;
1043 $PAGE- > assign ( 'token' , $token );
1044 $PAGE- > assign ( 'returnurl' ,( isset ( $_SERVER [ 'HTTP_REFERER' ]) ? escape ( $_SERVER [ 'HTTP_REFERER' ]): '' ));
1045 $PAGE- > renderPage ( 'loginform' );
1048 // -------- User wants to logout.
1049 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=logout' ))
1053 header ( 'Location: ?' );
1057 // -------- Picture wall
1058 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=picwall' ))
1060 // Optionally filter the results:
1062 if (! empty ( $_GET [ 'searchterm' ])) $links = $LINKSDB- > filterFulltext ( $_GET [ 'searchterm' ]);
1063 elseif (! empty ( $_GET [ 'searchtags' ])) $links = $LINKSDB- > filterTags ( trim ( $_GET [ 'searchtags' ]));
1064 else $links = $LINKSDB ;
1067 $linksToDisplay = array ();
1069 // Get only links which have a thumbnail.
1070 foreach ( $links as $link )
1072 $permalink = '?' . escape ( smallhash ( $link [ 'linkdate' ]));
1073 $thumb = lazyThumbnail ( $link [ 'url' ], $permalink );
1074 if ( $thumb != '' ) // Only output links which have a thumbnail.
1076 $link [ 'thumbnail' ]= $thumb ; // Thumbnail HTML code.
1077 $linksToDisplay []= $link ; // Add to array.
1081 $PAGE = new pageBuilder
;
1082 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1083 $PAGE- > assign ( 'linksToDisplay' , $linksToDisplay );
1084 $PAGE- > renderPage ( 'picwall' );
1088 // -------- Tag cloud
1089 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=tagcloud' ))
1091 $tags = $LINKSDB- > allTags ();
1093 // We sort tags alphabetically, then choose a font size according to count.
1094 // First, find max value.
1095 $maxcount = 0 ; foreach ( $tags as $key => $value ) $maxcount = max ( $maxcount , $value );
1098 foreach ( $tags as $key => $value )
1099 // Tag font size scaling: default 15 and 30 logarithm bases affect scaling, 22 and 6 are arbitrary font sizes for max and min sizes.
1101 $tagList [ $key ] = array ( 'count' => $value , 'size' => log ( $value , 15 ) / log ( $maxcount , 30 ) * ( 22 - 6 ) +
6 );
1103 $PAGE = new pageBuilder
;
1104 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1105 $PAGE- > assign ( 'tags' , $tagList );
1106 $PAGE- > renderPage ( 'tagcloud' );
1110 // -------- User clicks on a tag in a link: The tag is added to the list of searched tags (searchtags=...)
1111 if ( isset ( $_GET [ 'addtag' ]))
1113 // Get previous URL (http_referer) and add the tag to the searchtags parameters in query.
1114 if ( empty ( $_SERVER [ 'HTTP_REFERER' ])) { header ( 'Location: ?searchtags=' . urlencode ( $_GET
[ 'addtag' ])); exit ; } // In case browser does not send HTTP_REFERER
1115 parse_str ( parse_url ( $_SERVER [ 'HTTP_REFERER' ], PHP_URL_QUERY
), $params );
1117 // Check if this tag is already in the search query and ignore it if it is.
1118 // Each tag is always separated by a space
1119 $current_tags = explode ( ' ' , $params [ 'searchtags' ]);
1121 foreach ( $current_tags as $value ) {
1122 if ( $value === $_GET [ 'addtag' ]) {
1127 // Append the tag if necessary
1128 if ( empty ( $params [ 'searchtags' ])) {
1129 $params [ 'searchtags' ] = trim ( $_GET [ 'addtag' ]);
1132 $params [ 'searchtags' ] = trim ( $params [ 'searchtags' ]). ' ' . trim ( $_GET [ 'addtag' ]);
1135 unset ( $params [ 'page' ]); // We also remove page (keeping the same page has no sense, since the results are different)
1136 header ( 'Location: ?' . http_build_query ( $params ));
1140 // -------- User clicks on a tag in result count: Remove the tag from the list of searched tags (searchtags=...)
1141 if ( isset ( $_GET [ 'removetag' ]))
1143 // Get previous URL (http_referer) and remove the tag from the searchtags parameters in query.
1144 if ( empty ( $_SERVER [ 'HTTP_REFERER' ])) { header ( 'Location: ?' ); exit ; } // In case browser does not send HTTP_REFERER
1145 parse_str ( parse_url ( $_SERVER [ 'HTTP_REFERER' ], PHP_URL_QUERY
), $params );
1146 if ( isset ( $params [ 'searchtags' ]))
1148 $tags = explode ( ' ' , $params [ 'searchtags' ]);
1149 $tags = array_diff ( $tags , array ( $_GET [ 'removetag' ])); // Remove value from array $tags.
1150 if ( count ( $tags )== 0 ) unset ( $params [ 'searchtags' ]); else $params [ 'searchtags' ] = implode ( ' ' , $tags );
1151 unset ( $params [ 'page' ]); // We also remove page (keeping the same page has no sense, since the results are different)
1153 header ( 'Location: ?' . http_build_query ( $params ));
1157 // -------- User wants to change the number of links per page (linksperpage=...)
1158 if ( isset ( $_GET [ 'linksperpage' ]))
1160 if ( is_numeric ( $_GET [ 'linksperpage' ])) { $_SESSION
[ 'LINKS_PER_PAGE' ]= abs ( intval ( $_GET
[ 'linksperpage' ])); }
1161 // Make sure the referrer is Shaarli itself.
1163 if (! empty ( $_SERVER [ 'HTTP_REFERER' ]) && strcmp ( parse_url ( $_SERVER [ 'HTTP_REFERER' ], PHP_URL_HOST
), $_SERVER [ 'HTTP_HOST' ])== 0 )
1164 $referer = $_SERVER [ 'HTTP_REFERER' ];
1165 header ( 'Location: ' . $referer );
1169 // -------- User wants to see only private links (toggle)
1170 if ( isset ( $_GET [ 'privateonly' ]))
1172 if ( empty ( $_SESSION [ 'privateonly' ]))
1174 $_SESSION [ 'privateonly' ]= 1 ; // See only private links
1178 unset ( $_SESSION [ 'privateonly' ]); // See all links
1180 // Make sure the referrer is Shaarli itself.
1182 if (! empty ( $_SERVER [ 'HTTP_REFERER' ]) && strcmp ( parse_url ( $_SERVER [ 'HTTP_REFERER' ], PHP_URL_HOST
), $_SERVER [ 'HTTP_HOST' ])== 0 )
1183 $referer = $_SERVER [ 'HTTP_REFERER' ];
1184 header ( 'Location: ' . $referer );
1188 // -------- Handle other actions allowed for non-logged in users:
1191 // User tries to post new link but is not logged in:
1192 // Show login screen, then redirect to ?post=...
1193 if ( isset ( $_GET [ 'post' ]))
1195 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.
1199 // Same case as above except that user tried to access ?do=addlink without being logged in
1200 // Note: passing empty parameters makes Shaarli generate default URLs and descriptions.
1201 if ( isset ( $_GET [ 'do' ]) && $_GET [ 'do' ] === 'addlink' ) {
1202 header ( 'Location: ?do=login&post=' );
1206 $PAGE = new pageBuilder
;
1207 buildLinkList ( $PAGE , $LINKSDB ); // Compute list of links to display
1208 $PAGE- > renderPage ( 'linklist' );
1209 exit ; // Never remove this one! All operations below are reserved for logged in user.
1212 // -------- All other functions are reserved for the registered user:
1214 // -------- Display the Tools menu if requested (import/export/bookmarklet...)
1215 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=tools' ))
1217 $PAGE = new pageBuilder
;
1218 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1219 $PAGE- > assign ( 'pageabsaddr' , indexUrl ());
1220 $PAGE- > renderPage ( 'tools' );
1224 // -------- User wants to change his/her password.
1225 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=changepasswd' ))
1227 if ( $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ]) die ( 'You are not supposed to change a password on an Open Shaarli.' );
1228 if (! empty ( $_POST [ 'setpassword' ]) && ! empty ( $_POST [ 'oldpassword' ]))
1230 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' ); // Go away!
1232 // Make sure old password is correct.
1233 $oldhash = sha1 ( $_POST [ 'oldpassword' ]. $GLOBALS [ 'login' ]. $GLOBALS [ 'salt' ]);
1234 if ( $oldhash != $GLOBALS [ 'hash' ]) { echo '<script>alert("The old password is not correct.");document.location= \' ?do=changepasswd \' ;</script>' ; exit ; }
1235 // Save new password
1236 $GLOBALS [ 'salt' ] = sha1 ( uniqid ( '' , true ). '_' . mt_rand ()); // Salt renders rainbow-tables attacks useless.
1237 $GLOBALS [ 'hash' ] = sha1 ( $_POST [ 'setpassword' ]. $GLOBALS [ 'login' ]. $GLOBALS [ 'salt' ]);
1239 writeConfig ( $GLOBALS , isLoggedIn ());
1241 catch ( Exception
$e ) {
1243 'ERROR while writing config file after changing password.' . PHP_EOL
.
1247 // TODO: do not handle exceptions/errors in JS.
1248 echo '<script>alert("' . $e- > getMessage () . '");document.location= \' ?do=tools \' ;</script>' ;
1251 echo '<script>alert("Your password has been changed.");document.location= \' ?do=tools \' ;</script>' ;
1254 else // show the change password form.
1256 $PAGE = new pageBuilder
;
1257 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1258 $PAGE- > assign ( 'token' , getToken ());
1259 $PAGE- > renderPage ( 'changepassword' );
1264 // -------- User wants to change configuration
1265 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=configure' ))
1267 if (! empty ( $_POST [ 'title' ]) )
1269 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' ); // Go away!
1271 if (! empty ( $_POST [ 'continent' ]) && ! empty ( $_POST [ 'city' ]))
1272 if ( isTZvalid ( $_POST [ 'continent' ], $_POST [ 'city' ]))
1273 $tz = $_POST [ 'continent' ]. '/' . $_POST [ 'city' ];
1274 $GLOBALS [ 'timezone' ] = $tz ;
1275 $GLOBALS [ 'title' ]= $_POST [ 'title' ];
1276 $GLOBALS [ 'titleLink' ]= $_POST [ 'titleLink' ];
1277 $GLOBALS [ 'redirector' ]= $_POST [ 'redirector' ];
1278 $GLOBALS [ 'disablesessionprotection' ]=! empty ( $_POST [ 'disablesessionprotection' ]);
1279 $GLOBALS [ 'privateLinkByDefault' ]=! empty ( $_POST [ 'privateLinkByDefault' ]);
1280 $GLOBALS [ 'config' ][ 'ENABLE_RSS_PERMALINKS' ]= ! empty ( $_POST [ 'enableRssPermalinks' ]);
1281 $GLOBALS [ 'config' ][ 'ENABLE_UPDATECHECK' ] = ! empty ( $_POST [ 'updateCheck' ]);
1282 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ] = ! empty ( $_POST [ 'hidePublicLinks' ]);
1284 writeConfig ( $GLOBALS , isLoggedIn ());
1286 catch ( Exception
$e ) {
1288 'ERROR while writing config file after configuration update.' . PHP_EOL
.
1292 // TODO: do not handle exceptions/errors in JS.
1293 echo '<script>alert("' . $e- > getMessage () . '");document.location= \' ?do=tools \' ;</script>' ;
1296 echo '<script>alert("Configuration was saved.");document.location= \' ?do=tools \' ;</script>' ;
1299 else // Show the configuration form.
1301 $PAGE = new pageBuilder
;
1302 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1303 $PAGE- > assign ( 'token' , getToken ());
1304 $PAGE- > assign ( 'title' , empty ( $GLOBALS [ 'title' ]) ? '' : $GLOBALS [ 'title' ] );
1305 $PAGE- > assign ( 'redirector' , empty ( $GLOBALS [ 'redirector' ]) ? '' : $GLOBALS [ 'redirector' ] );
1306 list ( $timezone_form , $timezone_js ) = templateTZform ( $GLOBALS [ 'timezone' ]);
1307 $PAGE- > assign ( 'timezone_form' , $timezone_form ); // FIXME: Put entire tz form generation in template?
1308 $PAGE- > assign ( 'timezone_js' , $timezone_js );
1309 $PAGE- > renderPage ( 'configure' );
1314 // -------- User wants to rename a tag or delete it
1315 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=changetag' ))
1317 if ( empty ( $_POST [ 'fromtag' ]))
1319 $PAGE = new pageBuilder
;
1320 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1321 $PAGE- > assign ( 'token' , getToken ());
1322 $PAGE- > assign ( 'tags' , $LINKSDB- > allTags ());
1323 $PAGE- > renderPage ( 'changetag' );
1326 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' );
1329 if (! empty ( $_POST [ 'deletetag' ]) && ! empty ( $_POST [ 'fromtag' ]))
1331 $needle = trim ( $_POST [ 'fromtag' ]);
1332 $linksToAlter = $LINKSDB- > filterTags ( $needle , true ); // True for case-sensitive tag search.
1333 foreach ( $linksToAlter as $key => $value )
1335 $tags = explode ( ' ' , trim ( $value [ 'tags' ]));
1336 unset ( $tags [ array_search ( $needle , $tags )]); // Remove tag.
1337 $value [ 'tags' ]= trim ( implode ( ' ' , $tags ));
1338 $LINKSDB [ $key ]= $value ;
1340 $LINKSDB- > savedb (); // Save to disk.
1341 echo '<script>alert("Tag was removed from ' . count ( $linksToAlter ). ' links.");document.location= \' ? \' ;</script>' ;
1346 if (! empty ( $_POST [ 'renametag' ]) && ! empty ( $_POST [ 'fromtag' ]) && ! empty ( $_POST [ 'totag' ]))
1348 $needle = trim ( $_POST [ 'fromtag' ]);
1349 $linksToAlter = $LINKSDB- > filterTags ( $needle , true ); // true for case-sensitive tag search.
1350 foreach ( $linksToAlter as $key => $value )
1352 $tags = explode ( ' ' , trim ( $value [ 'tags' ]));
1353 $tags [ array_search ( $needle , $tags )] = trim ( $_POST [ 'totag' ]); // Replace tags value.
1354 $value [ 'tags' ]= trim ( implode ( ' ' , $tags ));
1355 $LINKSDB [ $key ]= $value ;
1357 $LINKSDB- > savedb (); // Save to disk.
1358 echo '<script>alert("Tag was renamed in ' . count ( $linksToAlter ). ' links.");document.location= \' ?searchtags=' . urlencode ( $_POST [ 'totag' ]). ' \' ;</script>' ;
1363 // -------- User wants to add a link without using the bookmarklet: Show form.
1364 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=addlink' ))
1366 $PAGE = new pageBuilder
;
1367 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1368 $PAGE- > renderPage ( 'addlink' );
1372 // -------- User clicked the "Save" button when editing a link: Save link to database.
1373 if ( isset ( $_POST [ 'save_edit' ]))
1375 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' ); // Go away!
1376 $tags = trim ( preg_replace ( '/\s\s+/' , ' ' , $_POST [ 'lf_tags' ])); // Remove multiple spaces.
1377 $linkdate = $_POST [ 'lf_linkdate' ];
1378 $url = trim ( $_POST [ 'lf_url' ]);
1379 if (! startsWith ( $url , 'http:' ) && ! startsWith ( $url , 'https:' ) && ! startsWith ( $url , 'ftp:' ) && ! startsWith ( $url , 'magnet:' ) && ! startsWith ( $url , '?' ) && ! startsWith ( $url , 'javascript:' ))
1380 $url = 'http://' . $url ;
1381 $link = array ( 'title' => trim ( $_POST [ 'lf_title' ]), 'url' => $url , 'description' => trim ( $_POST [ 'lf_description' ]), 'private' =>( isset ( $_POST [ 'lf_private' ]) ? 1 : 0 ),
1382 'linkdate' => $linkdate , 'tags' => str_replace ( ',' , ' ' , $tags ));
1383 if ( $link [ 'title' ]== '' ) $link [ 'title' ]= $link [ 'url' ]; // If title is empty, use the URL as title.
1384 $LINKSDB [ $linkdate ] = $link ;
1385 $LINKSDB- > savedb (); // Save to disk.
1388 // If we are called from the bookmarklet, we must close the popup:
1389 if ( isset ( $_GET [ 'source' ]) && ( $_GET [ 'source' ]== 'bookmarklet' || $_GET [ 'source' ]== 'firefoxsocialapi' )) { echo '<script>self.close();</script>' ; exit ; }
1390 $returnurl = ( isset ( $_POST [ 'returnurl' ]) ? $_POST [ 'returnurl' ] : '?' );
1391 $returnurl .= '#' . smallHash ( $linkdate ); // Scroll to the link which has been edited.
1392 if ( strstr ( $returnurl , "do=addlink" )) { $returnurl
= '?' ; } //if we come from ?do=addlink, set returnurl to homepage instead
1393 header ( 'Location: ' . $returnurl ); // After saving the link, redirect to the page the user was on.
1397 // -------- User clicked the "Cancel" button when editing a link.
1398 if ( isset ( $_POST [ 'cancel_edit' ]))
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 = ( isset ( $_POST [ 'returnurl' ]) ? $_POST [ 'returnurl' ] : '?' );
1403 $returnurl .= '#' . smallHash ( $_POST [ 'lf_linkdate' ]); // Scroll to the link which has been edited.
1404 header ( 'Location: ' . $returnurl ); // After canceling, redirect to the page the user was on.
1408 // -------- User clicked the "Delete" button when editing a link: Delete link from database.
1409 if ( isset ( $_POST [ 'delete_link' ]))
1411 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' );
1412 // We do not need to ask for confirmation:
1413 // - confirmation is handled by JavaScript
1414 // - we are protected from XSRF by the token.
1415 $linkdate = $_POST [ 'lf_linkdate' ];
1416 unset ( $LINKSDB [ $linkdate ]);
1417 $LINKSDB- > savedb (); // save to disk
1419 // If we are called from the bookmarklet, we must close the popup:
1420 if ( isset ( $_GET [ 'source' ]) && ( $_GET [ 'source' ]== 'bookmarklet' || $_GET [ 'source' ]== 'firefoxsocialapi' )) { echo '<script>self.close();</script>' ; exit ; }
1421 // Pick where we're going to redirect
1422 // =============================================================
1423 // Basically, we can't redirect to where we were previously if it was a permalink
1424 // or an edit_link, because it would 404.
1426 // - / : nothing in $_GET, redirect to self
1427 // - /?page : redirect to self
1428 // - /?searchterm : redirect to self (there might be other links)
1429 // - /?searchtags : redirect to self
1430 // - /permalink : redirect to / (the link does not exist anymore)
1431 // - /?edit_link : redirect to / (the link does not exist anymore)
1432 // PHP treats the permalink as a $_GET variable, so we need to check if every condition for self
1433 // redirect is not satisfied, and only then redirect to /
1436 if ( count ( $_GET ) == 0 ||
1437 isset ( $_GET [ 'page' ]) ||
1438 isset ( $_GET [ 'searchterm' ]) ||
1439 isset ( $_GET [ 'searchtags' ])) {
1441 if ( isset ( $_POST [ 'returnurl' ])) {
1442 $location = $_POST [ 'returnurl' ]; // Handle redirects given by the form
1445 if ( $location === "?" &&
1446 isset ( $_SERVER [ 'HTTP_REFERER' ])) { // Handle HTTP_REFERER in case we're not coming from the same place.
1447 $location = $_SERVER [ 'HTTP_REFERER' ];
1451 header ( 'Location: ' . $location ); // After deleting the link, redirect to appropriate location
1455 // -------- User clicked the "EDIT" button on a link: Display link edit form.
1456 if ( isset ( $_GET [ 'edit_link' ]))
1458 $link = $LINKSDB [ $_GET [ 'edit_link' ]]; // Read database
1459 if (! $link ) { header ( 'Location: ?' ); exit ; } // Link not found in database.
1460 $PAGE = new pageBuilder
;
1461 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1462 $PAGE- > assign ( 'link' , $link );
1463 $PAGE- > assign ( 'link_is_new' , false );
1464 $PAGE- > assign ( 'token' , getToken ()); // XSRF protection.
1465 $PAGE- > assign ( 'http_referer' ,( isset ( $_SERVER [ 'HTTP_REFERER' ]) ? escape ( $_SERVER [ 'HTTP_REFERER' ]) : '' ));
1466 $PAGE- > assign ( 'tags' , $LINKSDB- > allTags ());
1467 $PAGE- > renderPage ( 'editlink' );
1471 // -------- User want to post a new link: Display link edit form.
1472 if ( isset ( $_GET [ 'post' ]))
1477 // We remove the annoying parameters added by FeedBurner, GoogleFeedProxy, Facebook...
1478 $annoyingpatterns = array ( '/[ \? &]utm_source=[^&]*/' ,
1479 '/[ \? &]utm_campaign=[^&]*/' ,
1480 '/[ \? &]utm_medium=[^&]*/' ,
1481 '/#xtor=RSS-[^&]*/' ,
1483 '/[ \? &]__scoop[^&]*/' ,
1485 '/[ \? &]action_ref_map=[^&]*/' ,
1486 '/[ \? &]action_type_map=[^&]*/' ,
1487 '/[ \? &]action_object_map=[^&]*/' ,
1488 '/[ \? &]utm_content=[^&]*/' ,
1492 foreach ( $annoyingpatterns as $pattern )
1494 $url = preg_replace ( $pattern , "" , $url );
1497 $link_is_new = false ;
1498 $link = $LINKSDB- > getLinkFromUrl ( $url ); // Check if URL is not already in database (in this case, we will edit the existing link)
1501 $link_is_new = true ; // This is a new link
1502 $linkdate = strval ( date ( 'Ymd_His' ));
1503 $title = ( empty ( $_GET [ 'title' ]) ? '' : $_GET [ 'title' ] ); // Get title if it was provided in URL (by the bookmarklet).
1504 $description = ( empty ( $_GET [ 'description' ]) ? '' : $_GET [ 'description' ]); // Get description if it was provided in URL (by the bookmarklet). [Bronco added that]
1505 $tags = ( empty ( $_GET [ 'tags' ]) ? '' : $_GET [ 'tags' ] ); // Get tags if it was provided in URL
1506 $private = (! empty ( $_GET [ 'private' ]) && $_GET [ 'private' ] === "1" ? 1 : 0 ); // Get private if it was provided in URL
1507 if (( $url != '' ) && parse_url ( $url , PHP_URL_SCHEME
)== '' ) $url = 'http://' . $url ;
1508 // 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.)
1509 if ( empty ( $title ) && parse_url ( $url , PHP_URL_SCHEME
)== 'http' )
1511 list ( $status , $headers , $data ) = getHTTP ( $url , 4 ); // Short timeout to keep the application responsive.
1512 // FIXME: Decode charset according to specified in either 1) HTTP response headers or 2) <head> in html
1513 if ( strpos ( $status , '200 OK' )!== false )
1515 // Look for charset in html header.
1516 preg_match ( '#<meta .*charset=.*>#Usi' , $data , $meta );
1518 // If found, extract encoding.
1519 if (! empty ( $meta [ 0 ]))
1521 // Get encoding specified in header.
1522 preg_match ( '#charset="?(.*)"#si' , $meta [ 0 ], $enc );
1523 // If charset not found, use utf-8.
1524 $html_charset = (! empty ( $enc [ 1 ])) ? strtolower ( $enc [ 1 ]) : 'utf-8' ;
1526 else { $html_charset
= 'utf-8' ; }
1529 $title = html_extract_title ( $data );
1532 // Re-encode title in utf-8 if necessary.
1533 $title = ( $html_charset == 'iso-8859-1' ) ? utf8_encode ( $title ) : $title ;
1537 if ( $url == '' ) // In case of empty URL, this is just a text (with a link that points to itself)
1539 $url = '?' . smallHash ( $linkdate );
1542 $link = array ( 'linkdate' => $linkdate , 'title' => $title , 'url' => $url , 'description' => $description , 'tags' => $tags , 'private' => $private );
1545 $PAGE = new pageBuilder
;
1546 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1547 $PAGE- > assign ( 'link' , $link );
1548 $PAGE- > assign ( 'link_is_new' , $link_is_new );
1549 $PAGE- > assign ( 'token' , getToken ()); // XSRF protection.
1550 $PAGE- > assign ( 'http_referer' ,( isset ( $_SERVER [ 'HTTP_REFERER' ]) ? $_SERVER [ 'HTTP_REFERER' ] : '' ));
1551 $PAGE- > assign ( 'source' ,( isset ( $_GET [ 'source' ]) ? $_GET [ 'source' ] : '' ));
1552 $PAGE- > assign ( 'tags' , $LINKSDB- > allTags ());
1553 $PAGE- > renderPage ( 'editlink' );
1557 // -------- Export as Netscape Bookmarks HTML file.
1558 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=export' ))
1560 if ( empty ( $_GET [ 'what' ]))
1562 $PAGE = new pageBuilder
;
1563 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1564 $PAGE- > renderPage ( 'export' );
1567 $exportWhat = $_GET [ 'what' ];
1568 if (! array_intersect ( array ( 'all' , 'public' , 'private' ), array ( $exportWhat ))) die ( 'What are you trying to export???' );
1570 header ( 'Content-Type: text/html; charset=utf-8' );
1571 header ( 'Content-disposition: attachment; filename=bookmarks_' . $exportWhat . '_' . strval ( date ( 'Ymd_His' )). '.html' );
1572 $currentdate = date ( 'Y/m/d H:i:s' );
1574 <!DOCTYPE NETSCAPE-Bookmark-file-1>
1575 <!-- This is an automatically generated file.
1576 It will be read and overwritten.
1578 <!-- Shaarli {$exportWhat} bookmarks export on {$currentdate} -->
1579 <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8">
1580 <TITLE>Bookmarks</TITLE>
1583 foreach ( $LINKSDB as $link )
1585 if ( $exportWhat == 'all' ||
1586 ( $exportWhat == 'private' && $link [ 'private' ]!= 0 ) ||
1587 ( $exportWhat == 'public' && $link [ 'private' ]== 0 ))
1589 echo '<DT><A HREF="' . $link [ 'url' ]. '" ADD_DATE="' . linkdate2timestamp ( $link [ 'linkdate' ]). '" PRIVATE="' . $link [ 'private' ]. '"' ;
1590 if ( $link [ 'tags' ]!= '' ) echo ' TAGS="' . str_replace ( ' ' , ',' , $link [ 'tags' ]). '"' ;
1591 echo '>' . $link [ 'title' ]. "</A> \n " ;
1592 if ( $link [ 'description' ]!= '' ) echo '<DD>' . $link [ 'description' ]. " \n " ;
1598 // -------- User is uploading a file for import
1599 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=upload' ))
1601 // If file is too big, some form field may be missing.
1602 if (! isset ( $_POST [ 'token' ]) || (! isset ( $_FILES )) || ( isset ( $_FILES [ 'filetoupload' ][ 'size' ]) && $_FILES [ 'filetoupload' ][ 'size' ]== 0 ))
1604 $returnurl = ( empty ( $_SERVER [ 'HTTP_REFERER' ]) ? '?' : $_SERVER [ 'HTTP_REFERER' ] );
1605 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>' ;
1608 if (! tokenOk ( $_POST [ 'token' ])) die ( 'Wrong token.' );
1613 // -------- Show upload/import dialog:
1614 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=import' ))
1616 $PAGE = new pageBuilder
;
1617 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1618 $PAGE- > assign ( 'token' , getToken ());
1619 $PAGE- > assign ( 'maxfilesize' , getMaxFileSize ());
1620 $PAGE- > renderPage ( 'import' );
1624 // -------- Otherwise, simply display search form and links:
1625 $PAGE = new pageBuilder
;
1626 buildLinkList ( $PAGE , $LINKSDB ); // Compute list of links to display
1627 $PAGE- > renderPage ( 'linklist' );
1631 // -----------------------------------------------------------------------------------------------
1632 // Process the import file form.
1633 function importFile ()
1635 if (!( isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ])) { die ( 'Not allowed.' ); }
1636 $LINKSDB = new LinkDB (
1637 $GLOBALS [ 'config' ][ 'DATASTORE' ],
1638 isLoggedIn () || $GLOBALS [ 'config' ][ 'OPEN_SHAARLI' ],
1639 $GLOBALS [ 'config' ][ 'HIDE_PUBLIC_LINKS' ]
1641 $filename = $_FILES [ 'filetoupload' ][ 'name' ];
1642 $filesize = $_FILES [ 'filetoupload' ][ 'size' ];
1643 $data = file_get_contents ( $_FILES [ 'filetoupload' ][ 'tmp_name' ]);
1644 $private = ( empty ( $_POST [ 'private' ]) ? 0 : 1 ); // Should the links be imported as private?
1645 $overwrite = ! empty ( $_POST [ 'overwrite' ]) ; // Should the imported links overwrite existing ones?
1650 if ( startsWith ( $data , '<!DOCTYPE NETSCAPE-Bookmark-file-1>' )) $type = 'netscape' ; // Netscape bookmark file (aka Firefox).
1652 // Then import the bookmarks.
1653 if ( $type == 'netscape' )
1655 // This is a standard Netscape-style bookmark file.
1656 // This format is supported by all browsers (except IE, of course), also Delicious, Diigo and others.
1657 foreach ( explode ( '<DT>' , $data ) as $html ) // explode is very fast
1659 $link = array ( 'linkdate' => '' , 'title' => '' , 'url' => '' , 'description' => '' , 'tags' => '' , 'private' => 0 );
1660 $d = explode ( '<DD>' , $html );
1661 if ( startswith ( $d [ 0 ], '<A ' ))
1663 $link [ 'description' ] = ( isset ( $d [ 1 ]) ? html_entity_decode ( trim ( $d [ 1 ]), ENT_QUOTES
, 'UTF-8' ) : '' ); // Get description (optional)
1664 preg_match ( '!<A .*?>(.*?)</A>!i' , $d [ 0 ], $matches ); $link [ 'title' ] = ( isset ( $matches [ 1 ]) ? trim ( $matches [ 1 ]) : '' ); // Get title
1665 $link [ 'title' ] = html_entity_decode ( $link [ 'title' ], ENT_QUOTES
, 'UTF-8' );
1666 preg_match_all ( '! ([A-Z_]+)= \" (.*?)"!i' , $html , $matches , PREG_SET_ORDER
); // Get all other attributes
1668 foreach ( $matches as $m )
1670 $attr = $m [ 1 ]; $value = $m [ 2 ];
1671 if ( $attr == 'HREF' ) $link [ 'url' ]= html_entity_decode ( $value , ENT_QUOTES
, 'UTF-8' );
1672 elseif ( $attr == 'ADD_DATE' )
1674 $raw_add_date = intval ( $value );
1675 if ( $raw_add_date > 30000000000 ) $raw_add_date /= 1000 ; //If larger than year 2920, then was likely stored in milliseconds instead of seconds
1677 elseif ( $attr == 'PRIVATE' ) $link [ 'private' ]=( $value == '0' ? 0 : 1 );
1678 elseif ( $attr == 'TAGS' ) $link [ 'tags' ]= html_entity_decode ( str_replace ( ',' , ' ' , $value ), ENT_QUOTES
, 'UTF-8' );
1680 if ( $link [ 'url' ]!= '' )
1682 if ( $private == 1 ) $link [ 'private' ]= 1 ;
1683 $dblink = $LINKSDB- > getLinkFromUrl ( $link [ 'url' ]); // See if the link is already in database.
1685 { // Link not in database, let's import it...
1686 if ( empty ( $raw_add_date )) $raw_add_date = time (); // In case of shitty bookmark file with no ADD_DATE
1688 // Make sure date/time is not already used by another link.
1689 // (Some bookmark files have several different links with the same ADD_DATE)
1690 // We increment date by 1 second until we find a date which is not used in DB.
1691 // (so that links that have the same date/time are more or less kept grouped by date, but do not conflict.)
1692 while (! empty ( $LINKSDB [ date ( 'Ymd_His' , $raw_add_date )])) { $raw_add_date++
; } // Yes, I know it's ugly.
1693 $link [ 'linkdate' ]= date ( 'Ymd_His' , $raw_add_date );
1694 $LINKSDB [ $link [ 'linkdate' ]] = $link ;
1697 else // Link already present in database.
1700 { // If overwrite is required, we import link data, except date/time.
1701 $link [ 'linkdate' ]= $dblink [ 'linkdate' ];
1702 $LINKSDB [ $link [ 'linkdate' ]] = $link ;
1712 echo '<script>alert("File ' . json_encode ( $filename ). ' (' . $filesize . ' bytes) was successfully processed: ' . $import_count . ' links imported.");document.location= \' ? \' ;</script>' ;
1716 echo '<script>alert("File ' . json_encode ( $filename ). ' (' . $filesize . ' bytes) has an unknown file format. Nothing was imported.");document.location= \' ? \' ;</script>' ;
1720 // -----------------------------------------------------------------------------------------------
1721 // Template for the list of links (<div id="linklist">)
1722 // This function fills all the necessary fields in the $PAGE for the template 'linklist.html'
1723 function buildLinkList ( $PAGE , $LINKSDB )
1725 // ---- Filter link database according to parameters
1726 $linksToDisplay = array ();
1729 if ( isset ( $_GET [ 'searchterm' ])) // Fulltext search
1731 $linksToDisplay = $LINKSDB- > filterFulltext ( trim ( $_GET [ 'searchterm' ]));
1732 $search_crits = escape ( trim ( $_GET [ 'searchterm' ]));
1733 $search_type = 'fulltext' ;
1735 elseif ( isset ( $_GET [ 'searchtags' ])) // Search by tag
1737 $linksToDisplay = $LINKSDB- > filterTags ( trim ( $_GET [ 'searchtags' ]));
1738 $search_crits = explode ( ' ' , escape ( trim ( $_GET [ 'searchtags' ])));
1739 $search_type = 'tags' ;
1741 elseif ( isset ( $_SERVER [ 'QUERY_STRING' ]) && preg_match ( '/[a-zA-Z0-9-_@] {6} (&.+?)?/' , $_SERVER [ 'QUERY_STRING' ])) // Detect smallHashes in URL
1743 $linksToDisplay = $LINKSDB- > filterSmallHash ( substr ( trim ( $_SERVER [ "QUERY_STRING" ], '/' ), 0 , 6 ));
1744 if ( count ( $linksToDisplay )== 0 )
1746 header ( $_SERVER [ "SERVER_PROTOCOL" ]. " 404 Not Found" );
1747 echo '<h1>404 Not found.</h1>Oh crap. The link you are trying to reach does not exist or has been deleted.' ;
1748 echo '<br>You would mind <a href="?">clicking here</a>?' ;
1751 $search_type = 'permalink' ;
1754 $linksToDisplay = $LINKSDB ; // Otherwise, display without filtering.
1757 // Option: Show only private links
1758 if (! empty ( $_SESSION [ 'privateonly' ]))
1761 foreach ( $linksToDisplay as $linkdate => $link )
1763 if ( $link [ 'private' ]!= 0 ) $tmp [ $linkdate ]= $link ;
1765 $linksToDisplay = $tmp ;
1768 // ---- Handle paging.
1769 /* Can someone explain to me why you get the following error when using array_keys() on an object which implements the interface ArrayAccess???
1770 "Warning: array_keys() expects parameter 1 to be array, object given in ... "
1771 If my class implements ArrayAccess, why won't array_keys() accept it ? ( $keys=array_keys($linksToDisplay); )
1773 $keys = array (); foreach ( $linksToDisplay as $key => $value ) { $keys
[]= $key
; } // Stupid and ugly. Thanks PHP.
1775 // If there is only a single link, we change on-the-fly the title of the page.
1776 if ( count ( $linksToDisplay )== 1 ) $GLOBALS [ 'pagetitle' ] = $linksToDisplay [ $keys [ 0 ]][ 'title' ]. ' - ' . $GLOBALS [ 'title' ];
1778 // Select articles according to paging.
1779 $pagecount = ceil ( count ( $keys )/ $_SESSION [ 'LINKS_PER_PAGE' ]);
1780 $pagecount = ( $pagecount == 0 ? 1 : $pagecount );
1781 $page =( empty ( $_GET [ 'page' ]) ? 1 : intval ( $_GET [ 'page' ]));
1782 $page = ( $page < 1 ? 1 : $page );
1783 $page = ( $page > $pagecount ? $pagecount : $page );
1784 $i = ( $page-1 )* $_SESSION [ 'LINKS_PER_PAGE' ]; // Start index.
1785 $end = $i +
$_SESSION [ 'LINKS_PER_PAGE' ];
1786 $linkDisp = array (); // Links to display
1787 while ( $i < $end && $i < count ( $keys ))
1789 $link = $linksToDisplay [ $keys [ $i ]];
1790 $link [ 'description' ]= nl2br ( keepMultipleSpaces ( text2clickable ( $link [ 'description' ])));
1791 $title = $link [ 'title' ];
1792 $classLi = $i %
2 != 0 ? '' : 'publicLinkHightLight' ;
1793 $link [ 'class' ] = ( $link [ 'private' ]== 0 ? $classLi : 'private' );
1794 $link [ 'timestamp' ]= linkdate2timestamp ( $link [ 'linkdate' ]);
1795 $taglist = explode ( ' ' , $link [ 'tags' ]);
1796 uasort ( $taglist , 'strcasecmp' );
1797 $link [ 'taglist' ]= $taglist ;
1799 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.
1800 strlen ( $link [ "url" ]) === 7 ) {
1801 $link [ "url" ] = indexUrl () . $link [ "url" ];
1804 $linkDisp [ $keys [ $i ]] = $link ;
1808 // Compute paging navigation
1809 $searchterm = ( empty ( $_GET [ 'searchterm' ]) ? '' : '&searchterm=' . $_GET [ 'searchterm' ] );
1810 $searchtags = ( empty ( $_GET [ 'searchtags' ]) ? '' : '&searchtags=' . $_GET [ 'searchtags' ] );
1812 $previous_page_url = '' ; if ( $i != count ( $keys )) $previous_page_url = '?page=' .( $page +
1 ). $searchterm . $searchtags ;
1813 $next_page_url = '' ; if ( $page > 1 ) $next_page_url = '?page=' .( $page-1 ). $searchterm . $searchtags ;
1815 $token = '' ; if ( isLoggedIn ()) $token = getToken ();
1817 // Fill all template fields.
1818 $PAGE- > assign ( 'linkcount' , count ( $LINKSDB ));
1819 $PAGE- > assign ( 'previous_page_url' , $previous_page_url );
1820 $PAGE- > assign ( 'next_page_url' , $next_page_url );
1821 $PAGE- > assign ( 'page_current' , $page );
1822 $PAGE- > assign ( 'page_max' , $pagecount );
1823 $PAGE- > assign ( 'result_count' , count ( $linksToDisplay ));
1824 $PAGE- > assign ( 'search_type' , $search_type );
1825 $PAGE- > assign ( 'search_crits' , $search_crits );
1826 $PAGE- > assign ( 'redirector' , empty ( $GLOBALS [ 'redirector' ]) ? '' : $GLOBALS [ 'redirector' ]); // Optional redirector URL.
1827 $PAGE- > assign ( 'token' , $token );
1828 $PAGE- > assign ( 'links' , $linkDisp );
1829 $PAGE- > assign ( 'tags' , $LINKSDB- > allTags ());
1833 // Compute the thumbnail for a link.
1835 // With a link to the original URL.
1836 // Understands various services (youtube.com...)
1837 // Input: $url = URL for which the thumbnail must be found.
1838 // $href = if provided, this URL will be followed instead of $url
1839 // Returns an associative array with thumbnail attributes (src,href,width,height,style,alt)
1840 // Some of them may be missing.
1841 // Return an empty array if no thumbnail available.
1842 function computeThumbnail ( $url , $href = false )
1844 if (! $GLOBALS [ 'config' ][ 'ENABLE_THUMBNAILS' ]) return array ();
1845 if ( $href == false ) $href = $url ;
1847 // For most hosts, the URL of the thumbnail can be easily deduced from the URL of the link.
1848 // (e.g. http://www.youtube.com/watch?v=spVypYk4kto ---> http://img.youtube.com/vi/spVypYk4kto/default.jpg )
1849 // ^^^^^^^^^^^ ^^^^^^^^^^^
1850 $domain = parse_url ( $url , PHP_URL_HOST
);
1851 if ( $domain == 'youtube.com' || $domain == 'www.youtube.com' )
1853 parse_str ( parse_url ( $url , PHP_URL_QUERY
), $params ); // Extract video ID and get thumbnail
1854 if (! empty ( $params [ 'v' ])) return array ( 'src' => 'https://img.youtube.com/vi/' . $params [ 'v' ]. '/default.jpg' ,
1855 'href' => $href , 'width' => '120' , 'height' => '90' , 'alt' => 'YouTube thumbnail' );
1857 if ( $domain == 'youtu.be' ) // Youtube short links
1859 $path = parse_url ( $url , PHP_URL_PATH
);
1860 return array ( 'src' => 'https://img.youtube.com/vi' . $path . '/default.jpg' ,
1861 'href' => $href , 'width' => '120' , 'height' => '90' , 'alt' => 'YouTube thumbnail' );
1863 if ( $domain == 'pix.toile-libre.org' ) // pix.toile-libre.org image hosting
1865 parse_str ( parse_url ( $url , PHP_URL_QUERY
), $params ); // Extract image filename.
1866 if (! empty ( $params ) && ! empty ( $params [ 'img' ])) return array ( 'src' => 'http://pix.toile-libre.org/upload/thumb/' . urlencode ( $params [ 'img' ]),
1867 'href' => $href , 'style' => 'max-width:120px; max-height:150px' , 'alt' => 'pix.toile-libre.org thumbnail' );
1870 if ( $domain == 'imgur.com' )
1872 $path = parse_url ( $url , PHP_URL_PATH
);
1873 if ( startsWith ( $path , '/a/' )) return array (); // Thumbnails for albums are not available.
1874 if ( startsWith ( $path , '/r/' )) return array ( 'src' => 'https://i.imgur.com/' . basename ( $path ). 's.jpg' ,
1875 'href' => $href , 'width' => '90' , 'height' => '90' , 'alt' => 'imgur.com thumbnail' );
1876 if ( startsWith ( $path , '/gallery/' )) return array ( 'src' => 'https://i.imgur.com' . substr ( $path , 8 ). 's.jpg' ,
1877 'href' => $href , 'width' => '90' , 'height' => '90' , 'alt' => 'imgur.com thumbnail' );
1879 if ( substr_count ( $path , '/' )== 1 ) return array ( 'src' => 'https://i.imgur.com/' . substr ( $path , 1 ). 's.jpg' ,
1880 'href' => $href , 'width' => '90' , 'height' => '90' , 'alt' => 'imgur.com thumbnail' );
1882 if ( $domain == 'i.imgur.com' )
1884 $pi = pathinfo ( parse_url ( $url , PHP_URL_PATH
));
1885 if (! empty ( $pi [ 'filename' ])) return array ( 'src' => 'https://i.imgur.com/' . $pi [ 'filename' ]. 's.jpg' ,
1886 'href' => $href , 'width' => '90' , 'height' => '90' , 'alt' => 'imgur.com thumbnail' );
1888 if ( $domain == 'dailymotion.com' || $domain == 'www.dailymotion.com' )
1890 if ( strpos ( $url , 'dailymotion.com/video/' )!== false )
1892 $thumburl = str_replace ( 'dailymotion.com/video/' , 'dailymotion.com/thumbnail/video/' , $url );
1893 return array ( 'src' => $thumburl ,
1894 'href' => $href , 'width' => '120' , 'style' => 'height:auto;' , 'alt' => 'DailyMotion thumbnail' );
1897 if ( endsWith ( $domain , '.imageshack.us' ))
1899 $ext = strtolower ( pathinfo ( $url , PATHINFO_EXTENSION
));
1900 if ( $ext == 'jpg' || $ext == 'jpeg' || $ext == 'png' || $ext == 'gif' )
1902 $thumburl = substr ( $url , 0 , strlen ( $url )- strlen ( $ext )). 'th.' . $ext ;
1903 return array ( 'src' => $thumburl ,
1904 'href' => $href , 'width' => '120' , 'style' => 'height:auto;' , 'alt' => 'imageshack.us thumbnail' );
1908 // Some other hosts are SLOW AS HELL and usually require an extra HTTP request to get the thumbnail URL.
1909 // So we deport the thumbnail generation in order not to slow down page generation
1910 // (and we also cache the thumbnail)
1912 if (! $GLOBALS [ 'config' ][ 'ENABLE_LOCALCACHE' ]) return array (); // If local cache is disabled, no thumbnails for services which require the use a local cache.
1914 if ( $domain == 'flickr.com' || endsWith ( $domain , '.flickr.com' )
1915 || $domain == 'vimeo.com'
1916 || $domain == 'ted.com' || endsWith ( $domain , '.ted.com' )
1917 || $domain == 'xkcd.com' || endsWith ( $domain , '.xkcd.com' )
1920 if ( $domain == 'vimeo.com' )
1921 { // Make sure this vimeo URL points to a video (/xxx... where xxx is numeric)
1922 $path = parse_url ( $url , PHP_URL_PATH
);
1923 if (! preg_match ( '!/\d+.+?!' , $path )) return array (); // This is not a single video URL.
1925 if ( $domain == 'xkcd.com' || endsWith ( $domain , '.xkcd.com' ))
1926 { // Make sure this URL points to a single comic (/xxx... where xxx is numeric)
1927 $path = parse_url ( $url , PHP_URL_PATH
);
1928 if (! preg_match ( '!/\d+.+?!' , $path )) return array ();
1930 if ( $domain == 'ted.com' || endsWith ( $domain , '.ted.com' ))
1931 { // Make sure this TED URL points to a video (/talks/...)
1932 $path = parse_url ( $url , PHP_URL_PATH
);
1933 if ( "/talks/" !== substr ( $path , 0 , 7 )) return array (); // This is not a single video URL.
1935 $sign = hash_hmac ( 'sha256' , $url , $GLOBALS [ 'salt' ]); // We use the salt to sign data (it's random, secret, and specific to each installation)
1936 return array ( 'src' => indexUrl (). '?do=genthumbnail&hmac=' . $sign . '&url=' . urlencode ( $url ),
1937 'href' => $href , 'width' => '120' , 'style' => 'height:auto;' , 'alt' => 'thumbnail' );
1940 // For all other, we try to make a thumbnail of links ending with .jpg/jpeg/png/gif
1941 // Technically speaking, we should download ALL links and check their Content-Type to see if they are images.
1942 // But using the extension will do.
1943 $ext = strtolower ( pathinfo ( $url , PATHINFO_EXTENSION
));
1944 if ( $ext == 'jpg' || $ext == 'jpeg' || $ext == 'png' || $ext == 'gif' )
1946 $sign = hash_hmac ( 'sha256' , $url , $GLOBALS [ 'salt' ]); // We use the salt to sign data (it's random, secret, and specific to each installation)
1947 return array ( 'src' => indexUrl (). '?do=genthumbnail&hmac=' . $sign . '&url=' . urlencode ( $url ),
1948 'href' => $href , 'width' => '120' , 'style' => 'height:auto;' , 'alt' => 'thumbnail' );
1950 return array (); // No thumbnail.
1955 // Returns the HTML code to display a thumbnail for a link
1956 // with a link to the original URL.
1957 // Understands various services (youtube.com...)
1958 // Input: $url = URL for which the thumbnail must be found.
1959 // $href = if provided, this URL will be followed instead of $url
1960 // Returns '' if no thumbnail available.
1961 function thumbnail ( $url , $href = false )
1963 $t = computeThumbnail ( $url , $href );
1964 if ( count ( $t )== 0 ) return '' ; // Empty array = no thumbnail for this URL.
1966 $html = '<a href="' . escape ( $t [ 'href' ]). '"><img src="' . escape ( $t [ 'src' ]). '"' ;
1967 if (! empty ( $t [ 'width' ])) $html .= ' width="' . escape ( $t [ 'width' ]). '"' ;
1968 if (! empty ( $t [ 'height' ])) $html .= ' height="' . escape ( $t [ 'height' ]). '"' ;
1969 if (! empty ( $t [ 'style' ])) $html .= ' style="' . escape ( $t [ 'style' ]). '"' ;
1970 if (! empty ( $t [ 'alt' ])) $html .= ' alt="' . escape ( $t [ 'alt' ]). '"' ;
1975 // Returns the HTML code to display a thumbnail for a link
1976 // for the picture wall (using lazy image loading)
1977 // Understands various services (youtube.com...)
1978 // Input: $url = URL for which the thumbnail must be found.
1979 // $href = if provided, this URL will be followed instead of $url
1980 // Returns '' if no thumbnail available.
1981 function lazyThumbnail ( $url , $href = false )
1983 $t = computeThumbnail ( $url , $href );
1984 if ( count ( $t )== 0 ) return '' ; // Empty array = no thumbnail for this URL.
1986 $html = '<a href="' . escape ( $t [ 'href' ]). '">' ;
1989 $html .= '<img class="b-lazy" src="#" data-src="' . escape ( $t [ 'src' ]). '"' ;
1991 if (! empty ( $t [ 'width' ])) $html .= ' width="' . escape ( $t [ 'width' ]). '"' ;
1992 if (! empty ( $t [ 'height' ])) $html .= ' height="' . escape ( $t [ 'height' ]). '"' ;
1993 if (! empty ( $t [ 'style' ])) $html .= ' style="' . escape ( $t [ 'style' ]). '"' ;
1994 if (! empty ( $t [ 'alt' ])) $html .= ' alt="' . escape ( $t [ 'alt' ]). '"' ;
1997 // No-JavaScript fallback.
1998 $html .= '<noscript><img src="' . escape ( $t [ 'src' ]). '"' ;
1999 if (! empty ( $t [ 'width' ])) $html .= ' width="' . escape ( $t [ 'width' ]). '"' ;
2000 if (! empty ( $t [ 'height' ])) $html .= ' height="' . escape ( $t [ 'height' ]). '"' ;
2001 if (! empty ( $t [ 'style' ])) $html .= ' style="' . escape ( $t [ 'style' ]). '"' ;
2002 if (! empty ( $t [ 'alt' ])) $html .= ' alt="' . escape ( $t [ 'alt' ]). '"' ;
2003 $html .= '></noscript></a>' ;
2009 // -----------------------------------------------------------------------------------------------
2011 // This function should NEVER be called if the file data/config.php exists.
2014 // On free.fr host, make sure the /sessions directory exists, otherwise login will not work.
2015 if ( endsWith ( $_SERVER [ 'HTTP_HOST' ], '.free.fr' ) && ! is_dir ( $_SERVER [ 'DOCUMENT_ROOT' ]. '/sessions' )) mkdir ( $_SERVER [ 'DOCUMENT_ROOT' ]. '/sessions' , 0705 );
2018 // This part makes sure sessions works correctly.
2019 // (Because on some hosts, session.save_path may not be set correctly,
2020 // or we may not have write access to it.)
2021 if ( isset ( $_GET [ 'test_session' ]) && ( ! isset ( $_SESSION ) || ! isset ( $_SESSION [ 'session_tested' ]) || $_SESSION [ 'session_tested' ]!= 'Working' ))
2022 { // Step 2: Check if data in session is correct.
2023 echo '<pre>Sessions do not seem to work correctly on your server.<br>' ;
2024 echo 'Make sure the variable session.save_path is set correctly in your php config, and that you have write access to it.<br>' ;
2025 echo 'It currently points to ' . session_save_path (). '<br>' ;
2026 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>' ;
2027 echo '<br><a href="?">Click to try again.</a></pre>' ;
2030 if (! isset ( $_SESSION [ 'session_tested' ]))
2031 { // Step 1 : Try to store data in session and reload page.
2032 $_SESSION [ 'session_tested' ] = 'Working' ; // Try to set a variable in session.
2033 header ( 'Location: ' . indexUrl (). '?test_session' ); // Redirect to check stored data.
2035 if ( isset ( $_GET [ 'test_session' ]))
2036 { // Step 3: Sessions are OK. Remove test parameter from URL.
2037 header ( 'Location: ' . indexUrl ());
2041 if (! empty ( $_POST [ 'setlogin' ]) && ! empty ( $_POST [ 'setpassword' ]))
2044 if (! empty ( $_POST [ 'continent' ]) && ! empty ( $_POST [ 'city' ]))
2045 if ( isTZvalid ( $_POST [ 'continent' ], $_POST [ 'city' ]))
2046 $tz = $_POST [ 'continent' ]. '/' . $_POST [ 'city' ];
2047 $GLOBALS [ 'timezone' ] = $tz ;
2048 // Everything is ok, let's create config file.
2049 $GLOBALS [ 'login' ] = $_POST [ 'setlogin' ];
2050 $GLOBALS [ 'salt' ] = sha1 ( uniqid ( '' , true ). '_' . mt_rand ()); // Salt renders rainbow-tables attacks useless.
2051 $GLOBALS [ 'hash' ] = sha1 ( $_POST [ 'setpassword' ]. $GLOBALS [ 'login' ]. $GLOBALS [ 'salt' ]);
2052 $GLOBALS [ 'title' ] = ( empty ( $_POST [ 'title' ]) ? 'Shared links on ' . escape ( indexUrl ()) : $_POST [ 'title' ] );
2053 $GLOBALS [ 'config' ][ 'ENABLE_UPDATECHECK' ] = ! empty ( $_POST [ 'updateCheck' ]);
2055 writeConfig ( $GLOBALS , isLoggedIn ());
2057 catch ( Exception
$e ) {
2059 'ERROR while writing config file after installation.' . PHP_EOL
.
2063 // TODO: do not handle exceptions/errors in JS.
2064 echo '<script>alert("' . $e- > getMessage () . '");document.location= \' ? \' ;</script>' ;
2067 echo '<script>alert("Shaarli is now configured. Please enter your login/password and start shaaring your links!");document.location= \' ?do=login \' ;</script>' ;
2071 // Display config form:
2072 list ( $timezone_form , $timezone_js ) = templateTZform ();
2073 $timezone_html = '' ; if ( $timezone_form != '' ) $timezone_html = '<tr><td><b>Timezone:</b></td><td>' . $timezone_form . '</td></tr>' ;
2075 $PAGE = new pageBuilder
;
2076 $PAGE- > assign ( 'timezone_html' , $timezone_html );
2077 $PAGE- > assign ( 'timezone_js' , $timezone_js );
2078 $PAGE- > renderPage ( 'install' );
2082 // Generates the timezone selection form and JavaScript.
2083 // Input: (optional) current timezone (can be 'UTC/UTC'). It will be pre-selected.
2084 // Output: array(html,js)
2085 // Example: list($htmlform,$js) = templateTZform('Europe/Paris'); // Europe/Paris pre-selected.
2086 // Returns array('','') if server does not support timezones list. (e.g. PHP 5.1 on free.fr)
2087 function templateTZform ( $ptz = false )
2089 if ( function_exists ( 'timezone_identifiers_list' )) // because of old PHP version (5.1) which can be found on free.fr
2091 // Try to split the provided timezone.
2092 if ( $ptz == false ) { $l
= timezone_identifiers_list (); $ptz
= $l
[ 0 ]; }
2093 $spos = strpos ( $ptz , '/' ); $pcontinent = substr ( $ptz , 0 , $spos ); $pcity = substr ( $ptz , $spos +
1 );
2095 // Display config form:
2096 $timezone_form = '' ;
2098 // The list is in the form "Europe/Paris", "America/Argentina/Buenos_Aires"...
2099 // We split the list in continents/cities.
2100 $continents = array ();
2102 foreach ( timezone_identifiers_list () as $tz )
2104 if ( $tz == 'UTC' ) $tz = 'UTC/UTC' ;
2105 $spos = strpos ( $tz , '/' );
2108 $continent = substr ( $tz , 0 , $spos ); $city = substr ( $tz , $spos +
1 );
2109 $continents [ $continent ]= 1 ;
2110 if (! isset ( $cities [ $continent ])) $cities [ $continent ]= '' ;
2111 $cities [ $continent ].= '<option value="' . $city . '"' .( $pcity == $city ? ' selected' : '' ). '>' . $city . '</option>' ;
2114 $continents_html = '' ;
2115 $continents = array_keys ( $continents );
2116 foreach ( $continents as $continent )
2117 $continents_html .= '<option value="' . $continent . '"' .( $pcontinent == $continent ? ' selected' : '' ). '>' . $continent . '</option>' ;
2118 $cities_html = $cities [ $pcontinent ];
2119 $timezone_form = "Continent: <select name= \" continent \" id= \" continent \" onChange= \" onChangecontinent(); \" > ${continents_html} </select>" ;
2120 $timezone_form .= " City: <select name= \" city \" id= \" city \" > ${cities[$pcontinent]} </select><br />" ;
2121 $timezone_js = "<script>" ;
2122 $timezone_js .= "function onChangecontinent() {document.getElementById(\"city\").innerHTML = citiescontinent[document.getElementById(\"continent\").value];} " ;
2123 $timezone_js .= "var citiescontinent = " . json_encode ( $cities ). ";" ;
2124 $timezone_js .= "</script>" ;
2125 return array ( $timezone_form , $timezone_js );
2127 return array ( '' , '' );
2130 // Tells if a timezone is valid or not.
2131 // If not valid, returns false.
2132 // If system does not support timezone list, returns false.
2133 function isTZvalid ( $continent , $city )
2135 $tz = $continent . '/' . $city ;
2136 if ( function_exists ( 'timezone_identifiers_list' )) // because of old PHP version (5.1) which can be found on free.fr
2138 if ( in_array ( $tz , timezone_identifiers_list ())) // it's a valid timezone?
2143 if (! function_exists ( 'json_encode' )) {
2144 function json_encode ( $data ) {
2145 switch ( $type = gettype ( $data )) {
2149 return ( $data ? 'true' : 'false' );
2155 return '"' . addslashes ( $data ) . '"' ;
2157 $data = get_object_vars ( $data );
2159 $output_index_count = 0 ;
2160 $output_indexed = array ();
2161 $output_associative = array ();
2162 foreach ( $data as $key => $value ) {
2163 $output_indexed [] = json_encode ( $value );
2164 $output_associative [] = json_encode ( $key ) . ':' . json_encode ( $value );
2165 if ( $output_index_count !== NULL && $output_index_count ++
!== $key ) {
2166 $output_index_count = NULL ;
2169 if ( $output_index_count !== NULL ) {
2170 return '[' . implode ( ',' , $output_indexed ) . ']' ;
2172 return ' {' . implode(',', $output_associative) . '} ' ;
2175 return '' ; // Not supported
2182 /* Because some f*cking services like flickr require an extra HTTP request to get the thumbnail URL,
2183 I have deported the thumbnail URL code generation here, otherwise this would slow down page generation.
2184 The following function takes the URL a link (e.g. a flickr page) and return the proper thumbnail.
2185 This function is called by passing the URL:
2186 http://mywebsite.com/shaarli/?do=genthumbnail&hmac=[HMAC]&url=[URL]
2187 [URL] is the URL of the link (e.g. a flickr page)
2188 [HMAC] is the signature for the [URL] (so that these URL cannot be forged).
2189 The function below will fetch the image from the webservice and store it in the cache.
2191 function genThumbnail ()
2193 // Make sure the parameters in the URL were generated by us.
2194 $sign = hash_hmac ( 'sha256' , $_GET [ 'url' ], $GLOBALS [ 'salt' ]);
2195 if ( $sign != $_GET [ 'hmac' ]) die ( 'Naughty boy!' );
2197 // Let's see if we don't already have the image for this URL in the cache.
2198 $thumbname = hash ( 'sha1' , $_GET [ 'url' ]). '.jpg' ;
2199 if ( is_file ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname ))
2200 { // We have the thumbnail, just serve it:
2201 header ( 'Content-Type: image/jpeg' );
2202 echo file_get_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname );
2205 // We may also serve a blank image (if service did not respond)
2206 $blankname = hash ( 'sha1' , $_GET [ 'url' ]). '.gif' ;
2207 if ( is_file ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $blankname ))
2209 header ( 'Content-Type: image/gif' );
2210 echo file_get_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $blankname );
2214 // Otherwise, generate the thumbnail.
2215 $url = $_GET [ 'url' ];
2216 $domain = parse_url ( $url , PHP_URL_HOST
);
2218 if ( $domain == 'flickr.com' || endsWith ( $domain , '.flickr.com' ))
2220 // Crude replacement to handle new flickr domain policy (They prefer www. now)
2221 $url = str_replace ( 'http://flickr.com/' , 'http://www.flickr.com/' , $url );
2223 // Is this a link to an image, or to a flickr page ?
2225 if ( endswith ( parse_url ( $url , PHP_URL_PATH
), '.jpg' ))
2226 { // This is a direct link to an image. e.g. http://farm1.staticflickr.com/5/5921913_ac83ed27bd_o.jpg
2227 preg_match ( '!(http://farm\d+\.staticflickr\.com/\d+/\d+_\w+_)\w.jpg!' , $url , $matches );
2228 if (! empty ( $matches [ 1 ])) $imageurl = $matches [ 1 ]. 'm.jpg' ;
2230 else // This is a flickr page (html)
2232 list ( $httpstatus , $headers , $data ) = getHTTP ( $url , 20 ); // Get the flickr html page.
2233 if ( strpos ( $httpstatus , '200 OK' )!== false )
2235 // flickr now nicely provides the URL of the thumbnail in each flickr page.
2236 preg_match ( '!<link rel= \" image_src \" href= \" (.+?) \" !' , $data , $matches );
2237 if (! empty ( $matches [ 1 ])) $imageurl = $matches [ 1 ];
2239 // In albums (and some other pages), the link rel="image_src" is not provided,
2240 // but flickr provides:
2241 // <meta property="og:image" content="http://farm4.staticflickr.com/3398/3239339068_25d13535ff_z.jpg" />
2244 preg_match ( '!<meta property= \" og:image \" content= \" (.+?) \" !' , $data , $matches );
2245 if (! empty ( $matches [ 1 ])) $imageurl = $matches [ 1 ];
2251 { // Let's download the image.
2252 list ( $httpstatus , $headers , $data ) = getHTTP ( $imageurl , 10 ); // Image is 240x120, so 10 seconds to download should be enough.
2253 if ( strpos ( $httpstatus , '200 OK' )!== false )
2255 file_put_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname , $data ); // Save image to cache.
2256 header ( 'Content-Type: image/jpeg' );
2263 elseif ( $domain == 'vimeo.com' )
2265 // This is more complex: we have to perform a HTTP request, then parse the result.
2266 // Maybe we should deport this to JavaScript ? Example: http://stackoverflow.com/questions/1361149/get-img-thumbnails-from-vimeo/4285098#4285098
2267 $vid = substr ( parse_url ( $url , PHP_URL_PATH
), 1 );
2268 list ( $httpstatus , $headers , $data ) = getHTTP ( 'https://vimeo.com/api/v2/video/' . escape ( $vid ). '.php' , 5 );
2269 if ( strpos ( $httpstatus , '200 OK' )!== false )
2271 $t = unserialize ( $data );
2272 $imageurl = $t [ 0 ][ 'thumbnail_medium' ];
2273 // Then we download the image and serve it to our client.
2274 list ( $httpstatus , $headers , $data ) = getHTTP ( $imageurl , 10 );
2275 if ( strpos ( $httpstatus , '200 OK' )!== false )
2277 file_put_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname , $data ); // Save image to cache.
2278 header ( 'Content-Type: image/jpeg' );
2285 elseif ( $domain == 'ted.com' || endsWith ( $domain , '.ted.com' ))
2287 // The thumbnail for TED talks is located in the <link rel="image_src" [...]> tag on that page
2288 // http://www.ted.com/talks/mikko_hypponen_fighting_viruses_defending_the_net.html
2289 // <link rel="image_src" href="http://images.ted.com/images/ted/28bced335898ba54d4441809c5b1112ffaf36781_389x292.jpg" />
2290 list ( $httpstatus , $headers , $data ) = getHTTP ( $url , 5 );
2291 if ( strpos ( $httpstatus , '200 OK' )!== false )
2293 // Extract the link to the thumbnail
2294 preg_match ( '!link rel="image_src" href="(http://images.ted.com/images/ted/.+_\d+x\d+\.jpg)"!' , $data , $matches );
2295 if (! empty ( $matches [ 1 ]))
2296 { // Let's download the image.
2297 $imageurl = $matches [ 1 ];
2298 list ( $httpstatus , $headers , $data ) = getHTTP ( $imageurl , 20 ); // No control on image size, so wait long enough.
2299 if ( strpos ( $httpstatus , '200 OK' )!== false )
2301 $filepath = $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname ;
2302 file_put_contents ( $filepath , $data ); // Save image to cache.
2303 if ( resizeImage ( $filepath ))
2305 header ( 'Content-Type: image/jpeg' );
2306 echo file_get_contents ( $filepath );
2314 elseif ( $domain == 'xkcd.com' || endsWith ( $domain , '.xkcd.com' ))
2316 // There is no thumbnail available for xkcd comics, so download the whole image and resize it.
2317 // http://xkcd.com/327/
2318 // <img src="http://imgs.xkcd.com/comics/exploits_of_a_mom.png" title="<BLABLA>" alt="<BLABLA>" />
2319 list ( $httpstatus , $headers , $data ) = getHTTP ( $url , 5 );
2320 if ( strpos ( $httpstatus , '200 OK' )!== false )
2322 // Extract the link to the thumbnail
2323 preg_match ( '!<img src="(http://imgs.xkcd.com/comics/.*)" title="[^s]!' , $data , $matches );
2324 if (! empty ( $matches [ 1 ]))
2325 { // Let's download the image.
2326 $imageurl = $matches [ 1 ];
2327 list ( $httpstatus , $headers , $data ) = getHTTP ( $imageurl , 20 ); // No control on image size, so wait long enough.
2328 if ( strpos ( $httpstatus , '200 OK' )!== false )
2330 $filepath = $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname ;
2331 file_put_contents ( $filepath , $data ); // Save image to cache.
2332 if ( resizeImage ( $filepath ))
2334 header ( 'Content-Type: image/jpeg' );
2335 echo file_get_contents ( $filepath );
2345 // For all other domains, we try to download the image and make a thumbnail.
2346 list ( $httpstatus , $headers , $data ) = getHTTP ( $url , 30 ); // We allow 30 seconds max to download (and downloads are limited to 4 Mb)
2347 if ( strpos ( $httpstatus , '200 OK' )!== false )
2349 $filepath = $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $thumbname ;
2350 file_put_contents ( $filepath , $data ); // Save image to cache.
2351 if ( resizeImage ( $filepath ))
2353 header ( 'Content-Type: image/jpeg' );
2354 echo file_get_contents ( $filepath );
2361 // Otherwise, return an empty image (8x8 transparent gif)
2362 $blankgif = base64_decode ( 'R0lGODlhCAAIAIAAAP///////yH5BAEKAAEALAAAAAAIAAgAAAIHjI+py+1dAAA7' );
2363 file_put_contents ( $GLOBALS [ 'config' ][ 'CACHEDIR' ]. '/' . $blankname , $blankgif ); // Also put something in cache so that this URL is not requested twice.
2364 header ( 'Content-Type: image/gif' );
2368 // Make a thumbnail of the image (to width: 120 pixels)
2369 // Returns true if success, false otherwise.
2370 function resizeImage ( $filepath )
2372 if (! function_exists ( 'imagecreatefromjpeg' )) return false ; // GD not present: no thumbnail possible.
2374 // Trick: some stupid people rename GIF as JPEG... or else.
2375 // So we really try to open each image type whatever the extension is.
2376 $header = file_get_contents ( $filepath , false , NULL , 0 , 256 ); // Read first 256 bytes and try to sniff file type.
2378 $i = strpos ( $header , 'GIF8' ); if (( $i !== false ) && ( $i == 0 )) $im = imagecreatefromgif ( $filepath ); // Well this is crude, but it should be enough.
2379 $i = strpos ( $header , 'PNG' ); if (( $i !== false ) && ( $i == 1 )) $im = imagecreatefrompng ( $filepath );
2380 $i = strpos ( $header , 'JFIF' ); if ( $i !== false ) $im = imagecreatefromjpeg ( $filepath );
2381 if (! $im ) return false ; // Unable to open image (corrupted or not an image)
2384 $ystart = 0 ; $yheight = $h ;
2385 if ( $h > $w ) { $ystart
= ( $h
/ 2 )-( $w
/ 2 ); $yheight
= $w
/ 2 ; }
2386 $nw = 120 ; // Desired width
2387 $nh = min ( floor (( $h * $nw )/ $w ), 120 ); // Compute new width/height, but maximum 120 pixels height.
2389 $im2 = imagecreatetruecolor ( $nw , $nh );
2390 imagecopyresampled ( $im2 , $im , 0 , 0 , 0 , $ystart , $nw , $nh , $w , $yheight );
2391 imageinterlace ( $im2 , true ); // For progressive JPEG.
2392 $tempname = $filepath . '_TEMP.jpg' ;
2393 imagejpeg ( $im2 , $tempname , 90 );
2397 rename ( $tempname , $filepath ); // Overwrite original picture with thumbnail.
2401 // Invalidate caches when the database is changed or the user logs out.
2402 // (e.g. tags cache).
2403 function invalidateCaches ()
2405 unset ( $_SESSION [ 'tags' ]); // Purge cache attached to session.
2406 pageCache
:: purgeCache (); // Purge page cache shared by sessions.
2410 mergeDeprecatedConfig ( $GLOBALS , isLoggedIn ());
2411 } catch ( Exception
$e ) {
2413 'ERROR while merging deprecated options.php file.' . PHP_EOL
.
2418 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=genthumbnail' )) { genThumbnail (); exit ; } // Thumbnail generation/cache does not need the link database.
2419 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=rss' )) { showRSS (); exit ; }
2420 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=atom' )) { showATOM (); exit ; }
2421 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=dailyrss' )) { showDailyRSS (); exit ; }
2422 if ( isset ( $_SERVER [ "QUERY_STRING" ]) && startswith ( $_SERVER [ "QUERY_STRING" ], 'do=daily' )) { showDaily (); exit ; }
2423 if (! isset ( $_SESSION [ 'LINKS_PER_PAGE' ])) $_SESSION [ 'LINKS_PER_PAGE' ]= $GLOBALS [ 'config' ][ 'LINKS_PER_PAGE' ];