2017-05-08 06:11:38 +00:00
< ? php
2018-01-22 14:54:13 +00:00
/**
* @ file src / App . php
*/
2017-05-08 06:11:38 +00:00
namespace Friendica ;
2018-07-20 02:15:21 +00:00
use Detection\MobileDetect ;
2018-10-22 02:24:47 +00:00
use DOMDocument ;
use DOMXPath ;
2018-07-20 02:15:21 +00:00
use Exception ;
2018-07-20 12:19:26 +00:00
use Friendica\Database\DBA ;
2018-10-06 14:27:20 +00:00
use Friendica\Network\HTTPException\InternalServerErrorException ;
2017-05-11 15:53:04 +00:00
2017-05-08 06:11:38 +00:00
/**
*
* class : App
*
* @ brief Our main application structure for the life of this page .
*
* Primarily deals with the URL that got us here
* and tries to make some sense of it , and
* stores our page contents and config storage
* and anything else that might need to be passed around
* before we spit the page out .
*
*/
2018-01-16 00:13:21 +00:00
class App
{
2017-05-08 06:11:38 +00:00
public $module_loaded = false ;
2017-12-17 16:37:03 +00:00
public $module_class = null ;
2018-06-26 00:38:41 +00:00
public $query_string = '' ;
public $config = [];
public $page = [];
2017-05-08 06:11:38 +00:00
public $profile ;
public $profile_uid ;
public $user ;
public $cid ;
public $contact ;
public $contacts ;
public $page_contact ;
public $content ;
2018-01-15 13:05:12 +00:00
public $data = [];
2017-05-08 06:11:38 +00:00
public $error = false ;
2018-06-26 00:38:41 +00:00
public $cmd = '' ;
2017-05-08 06:11:38 +00:00
public $argv ;
public $argc ;
public $module ;
public $timezone ;
public $interactive = true ;
public $identities ;
public $is_mobile = false ;
public $is_tablet = false ;
2018-01-15 13:05:12 +00:00
public $performance = [];
public $callstack = [];
public $theme_info = [];
2017-05-08 06:11:38 +00:00
public $category ;
// Allow themes to control internal parameters
// by changing App values in theme.php
public $sourcename = '' ;
public $videowidth = 425 ;
public $videoheight = 350 ;
public $force_max_items = 0 ;
public $theme_events_in_profile = true ;
2018-09-21 01:30:51 +00:00
public $stylesheets = [];
2018-09-21 01:01:05 +00:00
public $footerScripts = [];
2018-10-06 14:27:20 +00:00
/**
* @ var App\Mode The Mode of the Application
*/
private $mode ;
2018-10-09 17:58:58 +00:00
/**
2018-10-10 07:16:06 +00:00
* @ var string The App base path
2018-10-09 17:58:58 +00:00
*/
2018-10-10 06:54:18 +00:00
private $basePath ;
2018-10-09 17:58:58 +00:00
/**
* @ var string The App URL path
*/
2018-10-10 06:54:18 +00:00
private $urlPath ;
2018-10-09 17:58:58 +00:00
/**
* @ var bool true , if the call is from the Friendica APP , otherwise false
*/
private $isFriendicaApp ;
/**
* @ var bool true , if the call is from an backend node ( f . e . worker )
*/
private $isBackend ;
/**
* @ var string The name of the current theme
*/
private $currentTheme ;
2018-10-13 16:57:31 +00:00
/**
* @ var bool check if request was an AJAX ( xmlhttprequest ) request
*/
private $isAjax ;
2018-09-21 13:54:40 +00:00
/**
* Register a stylesheet file path to be included in the < head > tag of every page .
* Inclusion is done in App -> initHead () .
* The path can be absolute or relative to the Friendica installation base folder .
*
2018-10-22 02:24:47 +00:00
* @ see initHead ()
2018-09-21 13:54:40 +00:00
*
* @ param string $path
*/
2018-09-21 01:30:51 +00:00
public function registerStylesheet ( $path )
{
2018-10-09 17:58:58 +00:00
$url = str_replace ( $this -> getBasePath () . DIRECTORY_SEPARATOR , '' , $path );
2018-09-21 01:30:51 +00:00
$this -> stylesheets [] = trim ( $url , '/' );
}
2018-09-21 13:54:40 +00:00
/**
* Register a javascript file path to be included in the < footer > tag of every page .
* Inclusion is done in App -> initFooter () .
* The path can be absolute or relative to the Friendica installation base folder .
*
2018-10-22 02:24:47 +00:00
* @ see initFooter ()
2018-09-21 13:54:40 +00:00
*
* @ param string $path
*/
2018-09-21 01:01:05 +00:00
public function registerFooterScript ( $path )
{
2018-10-09 17:58:58 +00:00
$url = str_replace ( $this -> getBasePath () . DIRECTORY_SEPARATOR , '' , $path );
2018-09-21 01:01:05 +00:00
2018-09-21 01:30:51 +00:00
$this -> footerScripts [] = trim ( $url , '/' );
2018-09-21 01:01:05 +00:00
}
2017-05-08 06:11:38 +00:00
public $process_id ;
2017-06-11 19:51:18 +00:00
public $queue ;
2017-05-08 06:11:38 +00:00
private $scheme ;
private $hostname ;
/**
* @ brief App constructor .
*
2018-10-22 02:24:47 +00:00
* @ param string $basePath Path to the app base folder
* @ param bool $isBackend Whether it is used for backend or frontend ( Default true = backend )
2018-08-20 20:15:39 +00:00
*
* @ throws Exception if the Basepath is not usable
2017-05-08 06:11:38 +00:00
*/
2018-10-22 02:24:47 +00:00
public function __construct ( $basePath , $isBackend = true )
2018-01-16 00:13:21 +00:00
{
2018-10-10 06:54:18 +00:00
if ( ! static :: isDirectoryUsable ( $basePath , false )) {
throw new Exception ( 'Basepath ' . $basePath . ' isn\'t usable.' );
2017-10-11 18:21:10 +00:00
}
2018-06-26 00:44:35 +00:00
BaseObject :: setApp ( $this );
2018-10-10 06:54:18 +00:00
$this -> basePath = rtrim ( $basePath , DIRECTORY_SEPARATOR );
2018-10-22 02:24:47 +00:00
$this -> checkBackend ( $isBackend );
2018-10-09 17:58:58 +00:00
$this -> checkFriendicaApp ();
2017-10-11 18:21:10 +00:00
2017-05-08 06:11:38 +00:00
$this -> performance [ 'start' ] = microtime ( true );
$this -> performance [ 'database' ] = 0 ;
$this -> performance [ 'database_write' ] = 0 ;
2018-03-01 06:13:50 +00:00
$this -> performance [ 'cache' ] = 0 ;
$this -> performance [ 'cache_write' ] = 0 ;
2017-05-08 06:11:38 +00:00
$this -> performance [ 'network' ] = 0 ;
$this -> performance [ 'file' ] = 0 ;
$this -> performance [ 'rendering' ] = 0 ;
$this -> performance [ 'parser' ] = 0 ;
$this -> performance [ 'marktime' ] = 0 ;
$this -> performance [ 'markstart' ] = microtime ( true );
2018-01-15 13:05:12 +00:00
$this -> callstack [ 'database' ] = [];
$this -> callstack [ 'database_write' ] = [];
2018-03-01 06:13:50 +00:00
$this -> callstack [ 'cache' ] = [];
$this -> callstack [ 'cache_write' ] = [];
2018-01-15 13:05:12 +00:00
$this -> callstack [ 'network' ] = [];
$this -> callstack [ 'file' ] = [];
$this -> callstack [ 'rendering' ] = [];
$this -> callstack [ 'parser' ] = [];
2017-05-08 06:11:38 +00:00
2018-10-10 06:54:18 +00:00
$this -> mode = new App\Mode ( $basePath );
2018-10-06 14:27:20 +00:00
2018-08-27 04:15:55 +00:00
$this -> reload ();
2017-05-08 06:11:38 +00:00
2018-07-02 11:23:47 +00:00
set_time_limit ( 0 );
// This has to be quite large to deal with embedded private photos
ini_set ( 'pcre.backtrack_limit' , 500000 );
2017-05-08 06:11:38 +00:00
$this -> scheme = 'http' ;
2018-10-22 02:24:47 +00:00
if ( ! empty ( $_SERVER [ 'HTTPS' ]) ||
! empty ( $_SERVER [ 'HTTP_FORWARDED' ]) && preg_match ( '/proto=https/' , $_SERVER [ 'HTTP_FORWARDED' ]) ||
! empty ( $_SERVER [ 'HTTP_X_FORWARDED_PROTO' ]) && $_SERVER [ 'HTTP_X_FORWARDED_PROTO' ] == 'https' ||
! empty ( $_SERVER [ 'HTTP_X_FORWARDED_SSL' ]) && $_SERVER [ 'HTTP_X_FORWARDED_SSL' ] == 'on' ||
! empty ( $_SERVER [ 'FRONT_END_HTTPS' ]) && $_SERVER [ 'FRONT_END_HTTPS' ] == 'on' ||
! empty ( $_SERVER [ 'SERVER_PORT' ]) && ( intval ( $_SERVER [ 'SERVER_PORT' ]) == 443 ) // XXX: reasonable assumption, but isn't this hardcoding too much?
2017-05-08 06:11:38 +00:00
) {
$this -> scheme = 'https' ;
}
2018-10-22 02:24:47 +00:00
if ( ! empty ( $_SERVER [ 'SERVER_NAME' ])) {
2017-05-08 06:11:38 +00:00
$this -> hostname = $_SERVER [ 'SERVER_NAME' ];
2018-10-22 02:24:47 +00:00
if ( ! empty ( $_SERVER [ 'SERVER_PORT' ]) && $_SERVER [ 'SERVER_PORT' ] != 80 && $_SERVER [ 'SERVER_PORT' ] != 443 ) {
2017-05-08 06:11:38 +00:00
$this -> hostname .= ':' . $_SERVER [ 'SERVER_PORT' ];
}
}
set_include_path (
get_include_path () . PATH_SEPARATOR
2018-10-09 17:58:58 +00:00
. $this -> getBasePath () . DIRECTORY_SEPARATOR . 'include' . PATH_SEPARATOR
2018-11-25 06:42:05 +00:00
. $this -> getBasePath () . DIRECTORY_SEPARATOR . 'library' . PATH_SEPARATOR
2018-10-09 17:58:58 +00:00
. $this -> getBasePath ());
2017-05-08 06:11:38 +00:00
2018-10-22 02:24:47 +00:00
if ( ! empty ( $_SERVER [ 'QUERY_STRING' ]) && strpos ( $_SERVER [ 'QUERY_STRING' ], 'pagename=' ) === 0 ) {
2017-05-08 06:11:38 +00:00
$this -> query_string = substr ( $_SERVER [ 'QUERY_STRING' ], 9 );
2018-10-22 02:24:47 +00:00
} elseif ( ! empty ( $_SERVER [ 'QUERY_STRING' ]) && strpos ( $_SERVER [ 'QUERY_STRING' ], 'q=' ) === 0 ) {
2017-05-08 06:11:38 +00:00
$this -> query_string = substr ( $_SERVER [ 'QUERY_STRING' ], 2 );
}
2018-06-26 00:38:41 +00:00
// removing trailing / - maybe a nginx problem
$this -> query_string = ltrim ( $this -> query_string , '/' );
if ( ! empty ( $_GET [ 'pagename' ])) {
2017-05-08 06:11:38 +00:00
$this -> cmd = trim ( $_GET [ 'pagename' ], '/\\' );
2018-06-26 00:38:41 +00:00
} elseif ( ! empty ( $_GET [ 'q' ])) {
2017-05-08 06:11:38 +00:00
$this -> cmd = trim ( $_GET [ 'q' ], '/\\' );
}
// fix query_string
$this -> query_string = str_replace ( $this -> cmd . '&' , $this -> cmd . '?' , $this -> query_string );
// unix style "homedir"
if ( substr ( $this -> cmd , 0 , 1 ) === '~' ) {
$this -> cmd = 'profile/' . substr ( $this -> cmd , 1 );
}
// Diaspora style profile url
if ( substr ( $this -> cmd , 0 , 2 ) === 'u/' ) {
$this -> cmd = 'profile/' . substr ( $this -> cmd , 2 );
}
/*
* Break the URL path into C style argc / argv style arguments for our
* modules . Given " http://example.com/module/arg1/arg2 " , $this -> argc
* will be 3 ( integer ) and $this -> argv will contain :
* [ 0 ] => 'module'
* [ 1 ] => 'arg1'
* [ 2 ] => 'arg2'
*
*
* There will always be one argument . If provided a naked domain
* URL , $this -> argv [ 0 ] is set to " home " .
*/
$this -> argv = explode ( '/' , $this -> cmd );
$this -> argc = count ( $this -> argv );
if (( array_key_exists ( '0' , $this -> argv )) && strlen ( $this -> argv [ 0 ])) {
$this -> module = str_replace ( '.' , '_' , $this -> argv [ 0 ]);
$this -> module = str_replace ( '-' , '_' , $this -> module );
} else {
$this -> argc = 1 ;
2018-01-15 13:05:12 +00:00
$this -> argv = [ 'home' ];
2017-05-08 06:11:38 +00:00
$this -> module = 'home' ;
}
// Detect mobile devices
2017-05-11 15:53:04 +00:00
$mobile_detect = new MobileDetect ();
2017-05-08 06:11:38 +00:00
$this -> is_mobile = $mobile_detect -> isMobile ();
$this -> is_tablet = $mobile_detect -> isTablet ();
2018-10-13 17:10:46 +00:00
$this -> isAjax = strtolower ( defaults ( $_SERVER , 'HTTP_X_REQUESTED_WITH' , '' )) == 'xmlhttprequest' ;
2018-10-13 16:57:31 +00:00
2017-05-08 06:11:38 +00:00
// Register template engines
2018-10-31 17:25:38 +00:00
Core\Renderer :: registerTemplateEngine ( 'Friendica\Render\FriendicaSmartyEngine' );
2018-06-26 00:38:41 +00:00
}
2018-10-06 14:27:20 +00:00
/**
* Returns the Mode of the Application
*
* @ return App\Mode The Application Mode
*
* @ throws InternalServerErrorException when the mode isn ' t created
*/
public function getMode ()
{
if ( empty ( $this -> mode )) {
throw new InternalServerErrorException ( 'Mode of the Application is not defined' );
}
return $this -> mode ;
}
2018-08-27 04:15:55 +00:00
/**
* Reloads the whole app instance
*/
public function reload ()
{
// The order of the following calls is important to ensure proper initialization
$this -> loadConfigFiles ();
$this -> loadDatabase ();
2018-10-09 17:58:58 +00:00
$this -> getMode () -> determine ( $this -> getBasePath ());
2018-08-27 04:15:55 +00:00
2018-10-09 17:58:58 +00:00
$this -> determineURLPath ();
2018-08-27 04:15:55 +00:00
2018-10-22 02:24:47 +00:00
Core\Config :: load ();
2018-08-27 04:15:55 +00:00
2018-10-06 14:27:20 +00:00
if ( $this -> getMode () -> has ( App\Mode :: DBAVAILABLE )) {
2018-10-21 05:15:02 +00:00
Core\Hook :: loadHooks ();
2018-08-27 04:15:55 +00:00
$this -> loadAddonConfig ();
}
$this -> loadDefaultTimezone ();
2018-10-22 04:16:30 +00:00
Core\L10n :: init ();
2018-10-22 02:24:47 +00:00
$this -> process_id = Core\System :: processID ( 'log' );
2018-08-27 04:15:55 +00:00
}
2018-06-28 03:05:38 +00:00
/**
* Load the configuration files
*
* First loads the default value for all the configuration keys , then the legacy configuration files , then the
2018-11-25 06:42:05 +00:00
* expected local . config . php
2018-06-28 03:05:38 +00:00
*/
2018-06-26 00:38:41 +00:00
private function loadConfigFiles ()
{
2018-11-25 06:42:05 +00:00
$this -> loadConfigFile ( $this -> getBasePath () . '/config/defaults.config.php' );
$this -> loadConfigFile ( $this -> getBasePath () . '/config/settings.config.php' );
2018-06-26 00:38:41 +00:00
// Legacy .htconfig.php support
2018-11-25 06:42:05 +00:00
if ( file_exists ( $this -> getBasePath () . '/.htpreconfig.php' )) {
2018-06-26 00:38:41 +00:00
$a = $this ;
2018-11-25 06:42:05 +00:00
include $this -> getBasePath () . '/.htpreconfig.php' ;
2018-06-26 00:38:41 +00:00
}
// Legacy .htconfig.php support
2018-11-25 06:42:05 +00:00
if ( file_exists ( $this -> getBasePath () . '/.htconfig.php' )) {
2018-06-26 00:38:41 +00:00
$a = $this ;
2018-11-25 06:42:05 +00:00
include $this -> getBasePath () . '/.htconfig.php' ;
2018-07-17 06:05:36 +00:00
$this -> setConfigValue ( 'database' , 'hostname' , $db_host );
$this -> setConfigValue ( 'database' , 'username' , $db_user );
$this -> setConfigValue ( 'database' , 'password' , $db_pass );
$this -> setConfigValue ( 'database' , 'database' , $db_data );
if ( isset ( $a -> config [ 'system' ][ 'db_charset' ])) {
$this -> setConfigValue ( 'database' , 'charset' , $a -> config [ 'system' ][ 'db_charset' ]);
}
2018-06-26 00:38:41 +00:00
unset ( $db_host , $db_user , $db_pass , $db_data );
2017-05-08 06:11:38 +00:00
2018-06-26 00:38:41 +00:00
if ( isset ( $default_timezone )) {
$this -> setConfigValue ( 'system' , 'default_timezone' , $default_timezone );
unset ( $default_timezone );
}
if ( isset ( $pidfile )) {
$this -> setConfigValue ( 'system' , 'pidfile' , $pidfile );
unset ( $pidfile );
}
2018-07-17 06:05:52 +00:00
if ( isset ( $lang )) {
$this -> setConfigValue ( 'system' , 'language' , $lang );
unset ( $lang );
}
2018-06-26 00:38:41 +00:00
}
2018-11-25 06:42:05 +00:00
if ( file_exists ( $this -> getBasePath () . '/config/local.config.php' )) {
$this -> loadConfigFile ( $this -> getBasePath () . '/config/local.config.php' , true );
} elseif ( file_exists ( $this -> getBasePath () . '/config/local.ini.php' )) {
$this -> loadINIConfigFile ( $this -> getBasePath () . '/config/local.ini.php' , true );
2018-06-26 00:38:41 +00:00
}
}
2018-06-28 03:05:38 +00:00
/**
2018-11-25 06:42:05 +00:00
* Tries to load the specified legacy configuration file into the App -> config array .
2018-09-08 06:37:53 +00:00
* Doesn ' t overwrite previously set values by default to prevent default config files to supersede DB Config .
2018-06-28 03:05:38 +00:00
*
2018-11-25 06:42:05 +00:00
* @ deprecated since version 2018.12
2018-10-10 06:54:18 +00:00
* @ param string $filepath
2018-09-08 06:37:53 +00:00
* @ param bool $overwrite Force value overwrite if the config key already exists
2018-06-28 03:05:38 +00:00
* @ throws Exception
*/
2018-11-25 06:42:05 +00:00
public function loadINIConfigFile ( $filepath , $overwrite = false )
2018-06-26 00:38:41 +00:00
{
if ( ! file_exists ( $filepath )) {
2018-11-25 06:42:05 +00:00
throw new Exception ( 'Error parsing non-existent INI config file ' . $filepath );
2018-06-26 00:38:41 +00:00
}
$contents = include ( $filepath );
$config = parse_ini_string ( $contents , true , INI_SCANNER_TYPED );
if ( $config === false ) {
2018-11-25 06:42:05 +00:00
throw new Exception ( 'Error parsing INI config file ' . $filepath );
2018-06-26 00:38:41 +00:00
}
2018-11-25 06:42:05 +00:00
$this -> loadConfigArray ( $config , $overwrite );
}
/**
* Tries to load the specified configuration file into the App -> config array .
* Doesn ' t overwrite previously set values by default to prevent default config files to supersede DB Config .
*
* The config format is PHP array and the template for configuration files is the following :
*
* < ? php return [
* 'section' => [
* 'key' => 'value' ,
* ],
* ];
*
* @ param string $filepath
* @ param bool $overwrite Force value overwrite if the config key already exists
* @ throws Exception
*/
public function loadConfigFile ( $filepath , $overwrite = false )
{
if ( ! file_exists ( $filepath )) {
throw new Exception ( 'Error loading non-existent config file ' . $filepath );
}
$config = include ( $filepath );
if ( ! is_array ( $config )) {
throw new Exception ( 'Error loading config file ' . $filepath );
2018-06-26 00:38:41 +00:00
}
2018-11-25 06:42:05 +00:00
$this -> loadConfigArray ( $config , $overwrite );
2018-06-26 00:38:41 +00:00
}
2018-06-28 03:05:38 +00:00
/**
* Loads addons configuration files
*
2018-11-25 06:42:05 +00:00
* First loads all activated addons default configuration through the load_config hook , then load the local . config . php
2018-06-28 03:05:38 +00:00
* again to overwrite potential local addon configuration .
*/
2018-06-26 00:38:41 +00:00
private function loadAddonConfig ()
{
// Loads addons default config
2018-11-25 06:42:05 +00:00
Core\Hook :: callAll ( 'load_config' );
2018-06-26 00:38:41 +00:00
2018-07-12 02:58:37 +00:00
// Load the local addon config file to overwritten default addon config values
2018-11-25 06:42:05 +00:00
if ( file_exists ( $this -> getBasePath () . '/config/addon.config.php' )) {
$this -> loadConfigFile ( $this -> getBasePath () . '/config/addon.config.php' , true );
} elseif ( file_exists ( $this -> getBasePath () . '/config/addon.ini.php' )) {
$this -> loadINIConfigFile ( $this -> getBasePath () . '/config/addon.ini.php' , true );
}
}
/**
* Tries to load the specified configuration array into the App -> config array .
* Doesn ' t overwrite previously set values by default to prevent default config files to supersede DB Config .
*
* @ param array $config
* @ param bool $overwrite Force value overwrite if the config key already exists
*/
private function loadConfigArray ( array $config , $overwrite = false )
{
foreach ( $config as $category => $values ) {
foreach ( $values as $key => $value ) {
if ( $overwrite ) {
$this -> setConfigValue ( $category , $key , $value );
} else {
$this -> setDefaultConfigValue ( $category , $key , $value );
}
}
2018-06-26 00:38:41 +00:00
}
}
2018-06-28 03:05:38 +00:00
/**
* Loads the default timezone
*
* Include support for legacy $default_timezone
*
* @ global string $default_timezone
*/
2018-06-26 00:38:41 +00:00
private function loadDefaultTimezone ()
{
if ( $this -> getConfigValue ( 'system' , 'default_timezone' )) {
$this -> timezone = $this -> getConfigValue ( 'system' , 'default_timezone' );
} else {
global $default_timezone ;
$this -> timezone = ! empty ( $default_timezone ) ? $default_timezone : 'UTC' ;
}
if ( $this -> timezone ) {
date_default_timezone_set ( $this -> timezone );
}
}
/**
2018-06-28 03:05:38 +00:00
* Figure out if we are running at the top of a domain or in a sub - directory and adjust accordingly
2018-06-26 00:38:41 +00:00
*/
2018-10-09 17:58:58 +00:00
private function determineURLPath ()
2018-06-26 00:38:41 +00:00
{
2018-10-11 12:54:45 +00:00
/* Relative script path to the web server root
* Not all of those $_SERVER properties can be present , so we do by inverse priority order
*/
$relative_script_path = '' ;
$relative_script_path = defaults ( $_SERVER , 'REDIRECT_URL' , $relative_script_path );
$relative_script_path = defaults ( $_SERVER , 'REDIRECT_URI' , $relative_script_path );
$relative_script_path = defaults ( $_SERVER , 'REDIRECT_SCRIPT_URL' , $relative_script_path );
$relative_script_path = defaults ( $_SERVER , 'SCRIPT_URL' , $relative_script_path );
2018-10-30 11:58:15 +00:00
$relative_script_path = defaults ( $_SERVER , 'REQUEST_URI' , $relative_script_path );
2018-10-11 12:54:45 +00:00
2018-10-10 06:54:18 +00:00
$this -> urlPath = $this -> getConfigValue ( 'system' , 'urlpath' );
2018-06-26 00:38:41 +00:00
2018-10-11 12:54:45 +00:00
/* $relative_script_path gives / relative / path / to / friendica / module / parameter
2018-06-26 00:38:41 +00:00
* QUERY_STRING gives pagename = module / parameter
*
2018-10-11 12:54:45 +00:00
* To get / relative / path / to / friendica we perform dirname () for as many levels as there are slashes in the QUERY_STRING
2018-04-27 19:07:04 +00:00
*/
2018-10-11 12:54:45 +00:00
if ( ! empty ( $relative_script_path )) {
2018-07-12 02:23:57 +00:00
// Module
if ( ! empty ( $_SERVER [ 'QUERY_STRING' ])) {
2018-12-15 07:46:08 +00:00
$path = trim ( rdirname ( $relative_script_path , substr_count ( trim ( $_SERVER [ 'QUERY_STRING' ], '/' ), '/' ) + 1 ), '/' );
2018-07-12 02:23:57 +00:00
} else {
// Root page
2018-10-11 12:54:45 +00:00
$path = trim ( $relative_script_path , '/' );
2018-07-12 02:23:57 +00:00
}
2018-06-26 00:38:41 +00:00
2018-10-10 06:54:18 +00:00
if ( $path && $path != $this -> urlPath ) {
$this -> urlPath = $path ;
2018-06-26 00:38:41 +00:00
}
}
}
public function loadDatabase ()
{
2018-07-20 12:19:26 +00:00
if ( DBA :: connected ()) {
2018-06-26 00:38:41 +00:00
return ;
}
$db_host = $this -> getConfigValue ( 'database' , 'hostname' );
$db_user = $this -> getConfigValue ( 'database' , 'username' );
$db_pass = $this -> getConfigValue ( 'database' , 'password' );
$db_data = $this -> getConfigValue ( 'database' , 'database' );
$charset = $this -> getConfigValue ( 'database' , 'charset' );
// Use environment variables for mysql if they are set beforehand
if ( ! empty ( getenv ( 'MYSQL_HOST' ))
2018-11-30 14:06:22 +00:00
&& ! empty ( getenv ( 'MYSQL_USERNAME' ) || ! empty ( getenv ( 'MYSQL_USER' )))
2018-07-07 01:24:40 +00:00
&& getenv ( 'MYSQL_PASSWORD' ) !== false
2018-06-26 00:38:41 +00:00
&& ! empty ( getenv ( 'MYSQL_DATABASE' )))
{
2018-07-07 01:08:48 +00:00
$db_host = getenv ( 'MYSQL_HOST' );
if ( ! empty ( getenv ( 'MYSQL_PORT' ))) {
$db_host .= ':' . getenv ( 'MYSQL_PORT' );
}
2018-06-26 00:38:41 +00:00
if ( ! empty ( getenv ( 'MYSQL_USERNAME' ))) {
$db_user = getenv ( 'MYSQL_USERNAME' );
2018-07-07 01:08:48 +00:00
} else {
2018-06-26 00:38:41 +00:00
$db_user = getenv ( 'MYSQL_USER' );
}
2018-07-07 01:08:48 +00:00
$db_pass = ( string ) getenv ( 'MYSQL_PASSWORD' );
2018-06-26 00:38:41 +00:00
$db_data = getenv ( 'MYSQL_DATABASE' );
}
2018-04-27 19:07:04 +00:00
2018-06-26 00:38:41 +00:00
$stamp1 = microtime ( true );
2018-04-27 19:07:04 +00:00
2018-10-21 05:58:10 +00:00
if ( DBA :: connect ( $db_host , $db_user , $db_pass , $db_data , $charset )) {
// Loads DB_UPDATE_VERSION constant
2018-10-21 07:01:01 +00:00
Database\DBStructure :: definition ( false );
2018-10-21 05:58:10 +00:00
}
2018-06-26 00:38:41 +00:00
unset ( $db_host , $db_user , $db_pass , $db_data , $charset );
2018-10-09 17:58:58 +00:00
$this -> saveTimestamp ( $stamp1 , 'network' );
2017-05-08 06:11:38 +00:00
}
/**
* @ brief Returns the base filesystem path of the App
*
* It first checks for the internal variable , then for DOCUMENT_ROOT and
* finally for PWD
*
* @ return string
*/
2018-10-09 17:58:58 +00:00
public function getBasePath ()
2018-01-16 00:13:21 +00:00
{
2018-10-10 06:54:18 +00:00
$basepath = $this -> basePath ;
2017-05-08 06:11:38 +00:00
2018-01-16 00:13:21 +00:00
if ( ! $basepath ) {
2018-10-22 02:24:47 +00:00
$basepath = Core\Config :: get ( 'system' , 'basepath' );
2017-05-08 06:11:38 +00:00
}
2018-10-22 02:24:47 +00:00
if ( ! $basepath && ! empty ( $_SERVER [ 'DOCUMENT_ROOT' ])) {
2017-05-08 06:11:38 +00:00
$basepath = $_SERVER [ 'DOCUMENT_ROOT' ];
}
2018-10-22 02:24:47 +00:00
if ( ! $basepath && ! empty ( $_SERVER [ 'PWD' ])) {
2017-05-08 06:11:38 +00:00
$basepath = $_SERVER [ 'PWD' ];
}
2018-10-09 17:58:58 +00:00
return self :: getRealPath ( $basepath );
2017-07-22 06:43:04 +00:00
}
/**
* @ brief Returns a normalized file path
*
* This is a wrapper for the " realpath " function .
* That function cannot detect the real path when some folders aren ' t readable .
* Since this could happen with some hosters we need to handle this .
*
* @ param string $path The path that is about to be normalized
* @ return string normalized path - when possible
*/
2018-10-09 17:58:58 +00:00
public static function getRealPath ( $path )
2018-01-16 00:13:21 +00:00
{
2017-07-22 06:43:04 +00:00
$normalized = realpath ( $path );
if ( ! is_bool ( $normalized )) {
return $normalized ;
} else {
return $path ;
}
2017-05-08 06:11:38 +00:00
}
2018-10-09 17:58:58 +00:00
public function getScheme ()
2018-01-16 00:13:21 +00:00
{
2017-05-08 06:11:38 +00:00
return $this -> scheme ;
}
/**
* @ brief Retrieves the Friendica instance base URL
*
* This function assembles the base URL from multiple parts :
* - Protocol is determined either by the request or a combination of
* system . ssl_policy and the $ssl parameter .
* - Host name is determined either by system . hostname or inferred from request
* - Path is inferred from SCRIPT_NAME
*
* Note : $ssl parameter value doesn ' t directly correlate with the resulting protocol
*
* @ param bool $ssl Whether to append http or https under SSL_POLICY_SELFSIGN
* @ return string Friendica server base URL
*/
2018-10-09 17:58:58 +00:00
public function getBaseURL ( $ssl = false )
2018-01-16 00:13:21 +00:00
{
2017-05-08 06:11:38 +00:00
$scheme = $this -> scheme ;
2018-10-22 02:24:47 +00:00
if ( Core\Config :: get ( 'system' , 'ssl_policy' ) == SSL_POLICY_FULL ) {
2017-05-08 06:11:38 +00:00
$scheme = 'https' ;
}
// Basically, we have $ssl = true on any links which can only be seen by a logged in user
// (and also the login link). Anything seen by an outsider will have it turned off.
2018-10-22 02:24:47 +00:00
if ( Core\Config :: get ( 'system' , 'ssl_policy' ) == SSL_POLICY_SELFSIGN ) {
2017-05-08 06:11:38 +00:00
if ( $ssl ) {
$scheme = 'https' ;
} else {
$scheme = 'http' ;
}
}
2018-10-22 02:24:47 +00:00
if ( Core\Config :: get ( 'config' , 'hostname' ) != '' ) {
$this -> hostname = Core\Config :: get ( 'config' , 'hostname' );
2017-05-08 06:11:38 +00:00
}
2018-11-30 14:06:22 +00:00
return $scheme . '://' . $this -> hostname . ! empty ( $this -> getURLPath () ? '/' . $this -> getURLPath () : '' );
2017-05-08 06:11:38 +00:00
}
/**
* @ brief Initializes the baseurl components
*
2018-01-16 00:13:21 +00:00
* Clears the baseurl cache to prevent inconsistencies
2017-05-08 06:11:38 +00:00
*
* @ param string $url
*/
2018-10-09 17:58:58 +00:00
public function setBaseURL ( $url )
2018-01-16 00:13:21 +00:00
{
2017-05-08 06:11:38 +00:00
$parsed = @ parse_url ( $url );
2018-07-08 05:29:06 +00:00
$hostname = '' ;
2017-05-08 06:11:38 +00:00
2018-10-22 02:24:47 +00:00
if ( ! empty ( $parsed )) {
2018-07-08 05:29:06 +00:00
if ( ! empty ( $parsed [ 'scheme' ])) {
$this -> scheme = $parsed [ 'scheme' ];
}
if ( ! empty ( $parsed [ 'host' ])) {
$hostname = $parsed [ 'host' ];
}
2017-05-08 06:11:38 +00:00
2018-10-22 02:24:47 +00:00
if ( ! empty ( $parsed [ 'port' ])) {
2017-05-08 06:11:38 +00:00
$hostname .= ':' . $parsed [ 'port' ];
}
2018-10-22 02:24:47 +00:00
if ( ! empty ( $parsed [ 'path' ])) {
2018-10-10 06:54:18 +00:00
$this -> urlPath = trim ( $parsed [ 'path' ], '\\/' );
2017-05-08 06:11:38 +00:00
}
2018-11-25 06:42:05 +00:00
if ( file_exists ( $this -> getBasePath () . '/.htpreconfig.php' )) {
include $this -> getBasePath () . '/.htpreconfig.php' ;
2017-05-08 06:11:38 +00:00
}
2018-10-22 02:24:47 +00:00
if ( Core\Config :: get ( 'config' , 'hostname' ) != '' ) {
$this -> hostname = Core\Config :: get ( 'config' , 'hostname' );
2017-05-08 06:11:38 +00:00
}
2018-07-08 05:29:06 +00:00
if ( ! isset ( $this -> hostname ) || ( $this -> hostname == '' )) {
2017-05-08 06:11:38 +00:00
$this -> hostname = $hostname ;
}
}
}
2018-10-09 17:58:58 +00:00
public function getHostName ()
2018-01-16 00:13:21 +00:00
{
2018-10-22 02:24:47 +00:00
if ( Core\Config :: get ( 'config' , 'hostname' ) != '' ) {
$this -> hostname = Core\Config :: get ( 'config' , 'hostname' );
2017-05-08 06:11:38 +00:00
}
return $this -> hostname ;
}
2018-10-09 23:18:47 +00:00
public function getURLPath ()
2018-01-16 00:13:21 +00:00
{
2018-10-10 06:54:18 +00:00
return $this -> urlPath ;
2017-05-08 06:11:38 +00:00
}
2018-09-21 13:54:40 +00:00
/**
* Initializes App -> page [ 'htmlhead' ] .
*
* Includes :
* - Page title
* - Favicons
* - Registered stylesheets ( through App -> registerStylesheet ())
* - Infinite scroll data
* - head . tpl template
*/
2018-09-21 01:30:51 +00:00
public function initHead ()
2018-01-16 00:13:21 +00:00
{
2018-10-22 02:24:47 +00:00
$interval = (( local_user ()) ? Core\PConfig :: get ( local_user (), 'system' , 'update_interval' ) : 40000 );
2017-05-08 06:11:38 +00:00
// If the update is 'deactivated' set it to the highest integer number (~24 days)
if ( $interval < 0 ) {
$interval = 2147483647 ;
}
if ( $interval < 10000 ) {
$interval = 40000 ;
}
// compose the page title from the sitename and the
// current module called
if ( ! $this -> module == '' ) {
$this -> page [ 'title' ] = $this -> config [ 'sitename' ] . ' (' . $this -> module . ')' ;
} else {
$this -> page [ 'title' ] = $this -> config [ 'sitename' ];
}
2018-10-31 17:25:38 +00:00
if ( ! empty ( Core\Renderer :: $theme [ 'stylesheet' ])) {
$stylesheet = Core\Renderer :: $theme [ 'stylesheet' ];
2017-05-08 06:11:38 +00:00
} else {
2018-09-21 13:54:09 +00:00
$stylesheet = $this -> getCurrentThemeStylesheetPath ();
2017-05-08 06:11:38 +00:00
}
2018-09-21 13:54:09 +00:00
$this -> registerStylesheet ( $stylesheet );
2018-10-22 02:24:47 +00:00
$shortcut_icon = Core\Config :: get ( 'system' , 'shortcut_icon' );
2017-05-08 06:11:38 +00:00
if ( $shortcut_icon == '' ) {
$shortcut_icon = 'images/friendica-32.png' ;
}
2018-10-22 02:24:47 +00:00
$touch_icon = Core\Config :: get ( 'system' , 'touch_icon' );
2017-05-08 06:11:38 +00:00
if ( $touch_icon == '' ) {
$touch_icon = 'images/friendica-128.png' ;
}
2018-09-21 01:30:51 +00:00
Core\Addon :: callHooks ( 'head' , $this -> page [ 'htmlhead' ]);
2017-05-08 06:11:38 +00:00
2018-10-31 14:44:06 +00:00
$tpl = Core\Renderer :: getMarkupTemplate ( 'head.tpl' );
2018-09-21 13:54:09 +00:00
/* put the head template at the beginning of page [ 'htmlhead' ]
* since the code added by the modules frequently depends on it
* being first
*/
2018-10-31 14:35:50 +00:00
$this -> page [ 'htmlhead' ] = Core\Renderer :: replaceMacros ( $tpl , [
2018-10-09 17:58:58 +00:00
'$baseurl' => $this -> getBaseURL (),
2018-01-16 00:13:21 +00:00
'$local_user' => local_user (),
'$generator' => 'Friendica' . ' ' . FRIENDICA_VERSION ,
2018-10-22 02:24:47 +00:00
'$delitem' => Core\L10n :: t ( 'Delete this item?' ),
'$showmore' => Core\L10n :: t ( 'show more' ),
'$showfewer' => Core\L10n :: t ( 'show fewer' ),
2018-01-16 00:13:21 +00:00
'$update_interval' => $interval ,
'$shortcut_icon' => $shortcut_icon ,
'$touch_icon' => $touch_icon ,
2018-10-22 02:24:47 +00:00
'$block_public' => intval ( Core\Config :: get ( 'system' , 'block_public' )),
2018-09-21 01:30:51 +00:00
'$stylesheets' => $this -> stylesheets ,
2018-01-16 00:13:21 +00:00
]) . $this -> page [ 'htmlhead' ];
}
2018-09-21 13:54:40 +00:00
/**
* Initializes App -> page [ 'footer' ] .
*
* Includes :
* - Javascript homebase
* - Mobile toggle link
* - Registered footer scripts ( through App -> registerFooterScript ())
* - footer . tpl template
*/
2018-09-21 01:01:05 +00:00
public function initFooter ()
2018-01-16 00:13:21 +00:00
{
2018-09-21 01:01:05 +00:00
// If you're just visiting, let javascript take you home
if ( ! empty ( $_SESSION [ 'visitor_home' ])) {
$homebase = $_SESSION [ 'visitor_home' ];
} elseif ( local_user ()) {
2018-09-22 16:45:49 +00:00
$homebase = 'profile/' . $this -> user [ 'nickname' ];
2018-09-21 01:01:05 +00:00
}
if ( isset ( $homebase )) {
$this -> page [ 'footer' ] .= '<script>var homebase="' . $homebase . '";</script>' . " \n " ;
2017-05-08 06:11:38 +00:00
}
2018-09-21 01:01:05 +00:00
/*
* Add a " toggle mobile " link if we ' re using a mobile device
*/
if ( $this -> is_mobile || $this -> is_tablet ) {
if ( isset ( $_SESSION [ 'show-mobile' ]) && ! $_SESSION [ 'show-mobile' ]) {
2018-11-10 13:55:48 +00:00
$link = 'toggle_mobile?address=' . urlencode ( curPageURL ());
2018-09-21 01:01:05 +00:00
} else {
2018-11-10 13:55:48 +00:00
$link = 'toggle_mobile?off=1&address=' . urlencode ( curPageURL ());
2018-09-21 01:01:05 +00:00
}
2018-10-31 14:44:06 +00:00
$this -> page [ 'footer' ] .= Core\Renderer :: replaceMacros ( Core\Renderer :: getMarkupTemplate ( " toggle_mobile_footer.tpl " ), [
2018-09-21 01:01:05 +00:00
'$toggle_link' => $link ,
'$toggle_text' => Core\L10n :: t ( 'toggle mobile' )
]);
}
Core\Addon :: callHooks ( 'footer' , $this -> page [ 'footer' ]);
2018-10-31 14:44:06 +00:00
$tpl = Core\Renderer :: getMarkupTemplate ( 'footer.tpl' );
2018-10-31 14:35:50 +00:00
$this -> page [ 'footer' ] = Core\Renderer :: replaceMacros ( $tpl , [
2018-10-09 17:58:58 +00:00
'$baseurl' => $this -> getBaseURL (),
2018-09-21 01:01:05 +00:00
'$footerScripts' => $this -> footerScripts ,
2018-09-21 01:30:51 +00:00
]) . $this -> page [ 'footer' ];
2017-05-08 06:11:38 +00:00
}
/**
2018-01-16 00:13:21 +00:00
* @ brief Removes the base url from an url . This avoids some mixed content problems .
2017-05-08 06:11:38 +00:00
*
2018-10-09 23:18:47 +00:00
* @ param string $origURL
2017-05-08 06:11:38 +00:00
*
* @ return string The cleaned url
*/
2018-10-09 23:18:47 +00:00
public function removeBaseURL ( $origURL )
2018-01-16 00:13:21 +00:00
{
2017-05-08 06:11:38 +00:00
// Remove the hostname from the url if it is an internal link
2018-11-08 16:28:29 +00:00
$nurl = Util\Strings :: normaliseLink ( $origURL );
$base = Util\Strings :: normaliseLink ( $this -> getBaseURL ());
2017-05-08 06:11:38 +00:00
$url = str_replace ( $base . '/' , '' , $nurl );
// if it is an external link return the orignal value
2018-11-08 16:28:29 +00:00
if ( $url == Util\Strings :: normaliseLink ( $origURL )) {
2018-10-09 23:18:47 +00:00
return $origURL ;
2017-05-08 06:11:38 +00:00
} else {
return $url ;
}
}
2018-10-09 17:58:58 +00:00
/**
* Saves a timestamp for a value - f . e . a call
* Necessary for profiling Friendica
*
* @ param int $timestamp the Timestamp
* @ param string $value A value to profile
*/
public function saveTimestamp ( $timestamp , $value )
2018-01-16 00:13:21 +00:00
{
2017-05-08 06:11:38 +00:00
if ( ! isset ( $this -> config [ 'system' ][ 'profiler' ]) || ! $this -> config [ 'system' ][ 'profiler' ]) {
return ;
}
2018-10-09 17:58:58 +00:00
$duration = ( float ) ( microtime ( true ) - $timestamp );
2017-05-08 06:11:38 +00:00
if ( ! isset ( $this -> performance [ $value ])) {
// Prevent ugly E_NOTICE
$this -> performance [ $value ] = 0 ;
}
$this -> performance [ $value ] += ( float ) $duration ;
$this -> performance [ 'marktime' ] += ( float ) $duration ;
2018-10-22 02:24:47 +00:00
$callstack = Core\System :: callstack ();
2017-05-08 06:11:38 +00:00
if ( ! isset ( $this -> callstack [ $value ][ $callstack ])) {
// Prevent ugly E_NOTICE
$this -> callstack [ $value ][ $callstack ] = 0 ;
}
$this -> callstack [ $value ][ $callstack ] += ( float ) $duration ;
}
2018-10-09 17:58:58 +00:00
/**
* Returns the current UserAgent as a String
*
* @ return string the UserAgent as a String
*/
public function getUserAgent ()
2018-01-16 00:13:21 +00:00
{
2017-05-08 06:11:38 +00:00
return
FRIENDICA_PLATFORM . " ' " .
FRIENDICA_CODENAME . " ' " .
FRIENDICA_VERSION . '-' .
DB_UPDATE_VERSION . '; ' .
2018-10-09 17:58:58 +00:00
$this -> getBaseURL ();
}
/**
* Checks , if the call is from the Friendica App
*
* Reason :
* The friendica client has problems with the GUID in the notify . this is some workaround
*/
private function checkFriendicaApp ()
{
// Friendica-Client
$this -> isFriendicaApp = isset ( $_SERVER [ 'HTTP_USER_AGENT' ]) && $_SERVER [ 'HTTP_USER_AGENT' ] == 'Apache-HttpClient/UNAVAILABLE (java 1.4)' ;
2017-05-08 06:11:38 +00:00
}
2018-10-09 17:58:58 +00:00
/**
* Is the call via the Friendica app ? ( not a " normale " call )
*
* @ return bool true if it ' s from the Friendica app
*/
public function isFriendicaApp ()
2018-01-16 00:13:21 +00:00
{
2018-10-09 17:58:58 +00:00
return $this -> isFriendicaApp ;
2017-05-08 06:11:38 +00:00
}
/**
* @ brief Checks if the site is called via a backend process
*
* This isn ' t a perfect solution . But we need this check very early .
* So we cannot wait until the modules are loaded .
*
2018-10-10 06:54:18 +00:00
* @ param string $backend true , if the backend flag was set during App initialization
*
2017-05-08 06:11:38 +00:00
*/
2018-10-09 17:58:58 +00:00
private function checkBackend ( $backend ) {
2018-01-16 00:13:21 +00:00
static $backends = [
'_well_known' ,
'api' ,
'dfrn_notify' ,
'fetch' ,
'hcard' ,
'hostxrd' ,
'nodeinfo' ,
'noscrape' ,
'p' ,
'poco' ,
'post' ,
'proxy' ,
'pubsub' ,
'pubsubhubbub' ,
'receive' ,
'rsd_xml' ,
'salmon' ,
'statistics_json' ,
'xrd' ,
];
2017-05-08 06:11:38 +00:00
// Check if current module is in backend or backend flag is set
2018-10-09 23:16:51 +00:00
$this -> isBackend = ( in_array ( $this -> module , $backends ) || $backend || $this -> isBackend );
2018-10-09 17:58:58 +00:00
}
/**
* Returns true , if the call is from a backend node ( f . e . from a worker )
*
* @ return bool Is it a known backend ?
*/
public function isBackend ()
{
return $this -> isBackend ;
2017-05-08 06:11:38 +00:00
}
/**
* @ brief Checks if the maximum number of database processes is reached
*
* @ return bool Is the limit reached ?
*/
2018-06-30 18:07:01 +00:00
public function isMaxProcessesReached ()
2018-01-16 00:13:21 +00:00
{
2017-06-06 22:18:42 +00:00
// Deactivated, needs more investigating if this check really makes sense
return false ;
2017-05-08 06:11:38 +00:00
2018-01-16 00:13:21 +00:00
/*
* Commented out to suppress static analyzer issues
*
2017-05-08 06:11:38 +00:00
if ( $this -> is_backend ()) {
$process = 'backend' ;
2018-10-22 02:24:47 +00:00
$max_processes = Core\Config :: get ( 'system' , 'max_processes_backend' );
2017-05-08 06:11:38 +00:00
if ( intval ( $max_processes ) == 0 ) {
$max_processes = 5 ;
}
} else {
$process = 'frontend' ;
2018-10-22 02:24:47 +00:00
$max_processes = Core\Config :: get ( 'system' , 'max_processes_frontend' );
2017-05-08 06:11:38 +00:00
if ( intval ( $max_processes ) == 0 ) {
$max_processes = 20 ;
}
}
2018-07-21 12:40:21 +00:00
$processlist = DBA :: processlist ();
2017-05-08 06:11:38 +00:00
if ( $processlist [ 'list' ] != '' ) {
2018-10-30 15:43:27 +00:00
Core\Logger :: log ( 'Processcheck: Processes: ' . $processlist [ 'amount' ] . ' - Processlist: ' . $processlist [ 'list' ], Core\Logger :: DEBUG );
2017-05-08 06:11:38 +00:00
if ( $processlist [ 'amount' ] > $max_processes ) {
2018-10-30 15:43:27 +00:00
Core\Logger :: log ( 'Processcheck: Maximum number of processes for ' . $process . ' tasks (' . $max_processes . ') reached.' , Core\Logger :: DEBUG );
2017-05-08 06:11:38 +00:00
return true ;
}
}
return false ;
2018-01-16 00:13:21 +00:00
*/
2017-05-08 06:11:38 +00:00
}
/**
* @ brief Checks if the minimal memory is reached
*
* @ return bool Is the memory limit reached ?
*/
2018-10-09 17:58:58 +00:00
public function isMinMemoryReached ()
2018-01-16 00:13:21 +00:00
{
2018-10-22 02:24:47 +00:00
$min_memory = Core\Config :: get ( 'system' , 'min_memory' , 0 );
2017-05-08 06:11:38 +00:00
if ( $min_memory == 0 ) {
return false ;
}
if ( ! is_readable ( '/proc/meminfo' )) {
return false ;
}
$memdata = explode ( " \n " , file_get_contents ( '/proc/meminfo' ));
2018-01-15 13:05:12 +00:00
$meminfo = [];
2017-05-08 06:11:38 +00:00
foreach ( $memdata as $line ) {
2018-09-04 17:48:09 +00:00
$data = explode ( ':' , $line );
if ( count ( $data ) != 2 ) {
continue ;
}
list ( $key , $val ) = $data ;
2017-05-08 06:11:38 +00:00
$meminfo [ $key ] = ( int ) trim ( str_replace ( 'kB' , '' , $val ));
$meminfo [ $key ] = ( int ) ( $meminfo [ $key ] / 1024 );
}
2018-11-19 22:21:40 +00:00
if ( ! isset ( $meminfo [ 'MemFree' ])) {
2017-05-08 06:11:38 +00:00
return false ;
}
2018-11-19 22:21:40 +00:00
$free = $meminfo [ 'MemFree' ];
2017-05-08 06:11:38 +00:00
$reached = ( $free < $min_memory );
if ( $reached ) {
2018-10-30 15:43:27 +00:00
Core\Logger :: log ( 'Minimal memory reached: ' . $free . '/' . $meminfo [ 'MemTotal' ] . ' - limit ' . $min_memory , Core\Logger :: DEBUG );
2017-05-08 06:11:38 +00:00
}
return $reached ;
}
/**
* @ brief Checks if the maximum load is reached
*
* @ return bool Is the load reached ?
*/
2018-06-30 18:07:01 +00:00
public function isMaxLoadReached ()
2018-01-16 00:13:21 +00:00
{
2018-10-09 17:58:58 +00:00
if ( $this -> isBackend ()) {
2017-05-08 06:11:38 +00:00
$process = 'backend' ;
2018-10-22 02:24:47 +00:00
$maxsysload = intval ( Core\Config :: get ( 'system' , 'maxloadavg' ));
2017-05-08 06:11:38 +00:00
if ( $maxsysload < 1 ) {
$maxsysload = 50 ;
}
} else {
$process = 'frontend' ;
2018-10-22 02:24:47 +00:00
$maxsysload = intval ( Core\Config :: get ( 'system' , 'maxloadavg_frontend' ));
2017-05-08 06:11:38 +00:00
if ( $maxsysload < 1 ) {
$maxsysload = 50 ;
}
}
2018-10-22 02:24:47 +00:00
$load = Core\System :: currentLoad ();
2017-05-08 06:11:38 +00:00
if ( $load ) {
if ( intval ( $load ) > $maxsysload ) {
2018-10-29 21:20:46 +00:00
Core\Logger :: log ( 'system: load ' . $load . ' for ' . $process . ' tasks (' . $maxsysload . ') too high.' );
2017-05-08 06:11:38 +00:00
return true ;
}
}
return false ;
}
2018-07-23 11:40:52 +00:00
/**
* Executes a child process with 'proc_open'
*
* @ param string $command The command to execute
* @ param array $args Arguments to pass to the command ( [ 'key' => value , 'key2' => value2 , ... ]
*/
public function proc_run ( $command , $args )
2018-01-16 00:13:21 +00:00
{
2017-05-08 06:11:38 +00:00
if ( ! function_exists ( 'proc_open' )) {
return ;
}
2018-07-24 03:42:44 +00:00
$cmdline = $this -> getConfigValue ( 'config' , 'php_path' , 'php' ) . ' ' . escapeshellarg ( $command );
2017-05-08 06:11:38 +00:00
2018-07-23 11:40:52 +00:00
foreach ( $args as $key => $value ) {
if ( ! is_null ( $value ) && is_bool ( $value ) && ! $value ) {
continue ;
}
$cmdline .= ' --' . $key ;
if ( ! is_null ( $value ) && ! is_bool ( $value )) {
$cmdline .= ' ' . $value ;
}
2017-05-08 06:11:38 +00:00
}
2018-10-09 17:58:58 +00:00
if ( $this -> isMinMemoryReached ()) {
2017-05-08 06:11:38 +00:00
return ;
}
2018-07-02 11:47:42 +00:00
if ( strtoupper ( substr ( PHP_OS , 0 , 3 )) === 'WIN' ) {
2018-10-09 17:58:58 +00:00
$resource = proc_open ( 'cmd /c start /b ' . $cmdline , [], $foo , $this -> getBasePath ());
2017-05-08 06:11:38 +00:00
} else {
2018-10-09 17:58:58 +00:00
$resource = proc_open ( $cmdline . ' &' , [], $foo , $this -> getBasePath ());
2017-05-08 06:11:38 +00:00
}
if ( ! is_resource ( $resource )) {
2018-10-30 15:43:27 +00:00
Core\Logger :: log ( 'We got no resource for command ' . $cmdline , Core\Logger :: DEBUG );
2017-05-08 06:11:38 +00:00
return ;
}
proc_close ( $resource );
}
/**
* @ brief Returns the system user that is executing the script
*
* This mostly returns something like " www-data " .
*
* @ return string system username
*/
2018-10-09 17:58:58 +00:00
private static function getSystemUser ()
2018-01-16 00:13:21 +00:00
{
if ( ! function_exists ( 'posix_getpwuid' ) || ! function_exists ( 'posix_geteuid' )) {
2017-05-08 06:11:38 +00:00
return '' ;
}
$processUser = posix_getpwuid ( posix_geteuid ());
return $processUser [ 'name' ];
}
/**
* @ brief Checks if a given directory is usable for the system
*
* @ return boolean the directory is usable
*/
2018-10-09 17:58:58 +00:00
public static function isDirectoryUsable ( $directory , $check_writable = true )
2018-01-16 00:13:21 +00:00
{
2017-05-08 06:11:38 +00:00
if ( $directory == '' ) {
2018-10-30 15:43:27 +00:00
Core\Logger :: log ( 'Directory is empty. This shouldn\'t happen.' , Core\Logger :: DEBUG );
2017-05-08 06:11:38 +00:00
return false ;
}
if ( ! file_exists ( $directory )) {
2018-10-30 15:43:27 +00:00
Core\Logger :: log ( 'Path "' . $directory . '" does not exist for user ' . self :: getSystemUser (), Core\Logger :: DEBUG );
2017-05-08 06:11:38 +00:00
return false ;
}
2018-01-16 00:13:21 +00:00
2017-05-08 06:11:38 +00:00
if ( is_file ( $directory )) {
2018-10-30 15:43:27 +00:00
Core\Logger :: log ( 'Path "' . $directory . '" is a file for user ' . self :: getSystemUser (), Core\Logger :: DEBUG );
2017-05-08 06:11:38 +00:00
return false ;
}
2018-01-16 00:13:21 +00:00
2017-05-08 06:11:38 +00:00
if ( ! is_dir ( $directory )) {
2018-10-30 15:43:27 +00:00
Core\Logger :: log ( 'Path "' . $directory . '" is not a directory for user ' . self :: getSystemUser (), Core\Logger :: DEBUG );
2017-05-08 06:11:38 +00:00
return false ;
}
2018-01-16 00:13:21 +00:00
2017-06-08 02:00:59 +00:00
if ( $check_writable && ! is_writable ( $directory )) {
2018-10-30 15:43:27 +00:00
Core\Logger :: log ( 'Path "' . $directory . '" is not writable for user ' . self :: getSystemUser (), Core\Logger :: DEBUG );
2017-05-08 06:11:38 +00:00
return false ;
}
2018-01-16 00:13:21 +00:00
2017-05-08 06:11:38 +00:00
return true ;
}
2018-03-07 01:04:04 +00:00
/**
* @ param string $cat Config category
* @ param string $k Config key
* @ param mixed $default Default value if it isn ' t set
2018-10-09 17:58:58 +00:00
*
* @ return string Returns the value of the Config entry
2018-03-07 01:04:04 +00:00
*/
public function getConfigValue ( $cat , $k , $default = null )
{
$return = $default ;
if ( $cat === 'config' ) {
if ( isset ( $this -> config [ $k ])) {
$return = $this -> config [ $k ];
}
} else {
if ( isset ( $this -> config [ $cat ][ $k ])) {
$return = $this -> config [ $cat ][ $k ];
}
}
return $return ;
}
2018-09-08 06:37:53 +00:00
/**
* Sets a default value in the config cache . Ignores already existing keys .
*
* @ param string $cat Config category
* @ param string $k Config key
* @ param mixed $v Default value to set
*/
private function setDefaultConfigValue ( $cat , $k , $v )
{
if ( ! isset ( $this -> config [ $cat ][ $k ])) {
$this -> setConfigValue ( $cat , $k , $v );
}
}
2018-03-07 01:04:04 +00:00
/**
* Sets a value in the config cache . Accepts raw output from the config table
*
* @ param string $cat Config category
* @ param string $k Config key
* @ param mixed $v Value to set
*/
public function setConfigValue ( $cat , $k , $v )
{
// Only arrays are serialized in database, so we have to unserialize sparingly
$value = is_string ( $v ) && preg_match ( " |^a:[0-9]+: { .*} $ |s " , $v ) ? unserialize ( $v ) : $v ;
if ( $cat === 'config' ) {
$this -> config [ $k ] = $value ;
} else {
2018-06-14 11:18:01 +00:00
if ( ! isset ( $this -> config [ $cat ])) {
$this -> config [ $cat ] = [];
}
2018-03-07 01:04:04 +00:00
$this -> config [ $cat ][ $k ] = $value ;
}
}
/**
* Deletes a value from the config cache
*
* @ param string $cat Config category
* @ param string $k Config key
*/
public function deleteConfigValue ( $cat , $k )
{
if ( $cat === 'config' ) {
if ( isset ( $this -> config [ $k ])) {
unset ( $this -> config [ $k ]);
}
} else {
if ( isset ( $this -> config [ $cat ][ $k ])) {
unset ( $this -> config [ $cat ][ $k ]);
}
}
}
/**
* Retrieves a value from the user config cache
*
* @ param int $uid User Id
* @ param string $cat Config category
* @ param string $k Config key
* @ param mixed $default Default value if key isn ' t set
2018-10-09 17:58:58 +00:00
*
* @ return string The value of the config entry
2018-03-07 01:04:04 +00:00
*/
public function getPConfigValue ( $uid , $cat , $k , $default = null )
{
$return = $default ;
if ( isset ( $this -> config [ $uid ][ $cat ][ $k ])) {
$return = $this -> config [ $uid ][ $cat ][ $k ];
}
return $return ;
}
/**
* Sets a value in the user config cache
*
* Accepts raw output from the pconfig table
*
* @ param int $uid User Id
* @ param string $cat Config category
* @ param string $k Config key
* @ param mixed $v Value to set
*/
public function setPConfigValue ( $uid , $cat , $k , $v )
{
// Only arrays are serialized in database, so we have to unserialize sparingly
$value = is_string ( $v ) && preg_match ( " |^a:[0-9]+: { .*} $ |s " , $v ) ? unserialize ( $v ) : $v ;
2018-07-30 04:41:20 +00:00
if ( ! isset ( $this -> config [ $uid ]) || ! is_array ( $this -> config [ $uid ])) {
2018-06-14 11:18:01 +00:00
$this -> config [ $uid ] = [];
}
2018-07-30 04:41:20 +00:00
if ( ! isset ( $this -> config [ $uid ][ $cat ]) || ! is_array ( $this -> config [ $uid ][ $cat ])) {
2018-06-14 11:18:01 +00:00
$this -> config [ $uid ][ $cat ] = [];
}
2018-03-07 01:04:04 +00:00
$this -> config [ $uid ][ $cat ][ $k ] = $value ;
}
/**
* Deletes a value from the user config cache
*
* @ param int $uid User Id
* @ param string $cat Config category
* @ param string $k Config key
*/
public function deletePConfigValue ( $uid , $cat , $k )
{
if ( isset ( $this -> config [ $uid ][ $cat ][ $k ])) {
unset ( $this -> config [ $uid ][ $cat ][ $k ]);
}
}
2018-04-07 01:47:16 +00:00
/**
* Generates the site ' s default sender email address
*
* @ return string
*/
public function getSenderEmailAddress ()
{
2018-10-22 02:24:47 +00:00
$sender_email = Core\Config :: get ( 'config' , 'sender_email' );
2018-04-07 01:47:16 +00:00
if ( empty ( $sender_email )) {
2018-10-09 17:58:58 +00:00
$hostname = $this -> getHostName ();
2018-04-07 01:47:16 +00:00
if ( strpos ( $hostname , ':' )) {
$hostname = substr ( $hostname , 0 , strpos ( $hostname , ':' ));
}
2018-04-11 06:17:44 +00:00
$sender_email = 'noreply@' . $hostname ;
2018-04-07 01:47:16 +00:00
}
return $sender_email ;
}
2018-04-28 10:36:40 +00:00
2018-04-28 22:30:13 +00:00
/**
* Returns the current theme name .
*
2018-10-09 17:58:58 +00:00
* @ return string the name of the current theme
2018-04-28 22:30:13 +00:00
*/
public function getCurrentTheme ()
{
2018-10-06 14:27:20 +00:00
if ( $this -> getMode () -> isInstall ()) {
2018-05-20 05:44:20 +00:00
return '' ;
}
2018-05-25 06:44:01 +00:00
//// @TODO Compute the current theme only once (this behavior has
2018-05-25 06:52:03 +00:00
/// already been implemented, but it didn't work well -
2018-05-25 06:44:01 +00:00
/// https://github.com/friendica/friendica/issues/5092)
$this -> computeCurrentTheme ();
2018-04-28 22:30:13 +00:00
2018-10-09 17:58:58 +00:00
return $this -> currentTheme ;
2018-04-28 22:30:13 +00:00
}
/**
* Computes the current theme name based on the node settings , the user settings and the device type
*
* @ throws Exception
*/
private function computeCurrentTheme ()
{
2018-10-22 02:24:47 +00:00
$system_theme = Core\Config :: get ( 'system' , 'theme' );
2018-04-28 22:30:13 +00:00
if ( ! $system_theme ) {
2018-10-22 02:24:47 +00:00
throw new Exception ( Core\L10n :: t ( 'No system theme config value set.' ));
2018-04-28 22:30:13 +00:00
}
// Sane default
2018-10-09 17:58:58 +00:00
$this -> currentTheme = $system_theme ;
2018-04-28 22:30:13 +00:00
2018-10-22 02:24:47 +00:00
$allowed_themes = explode ( ',' , Core\Config :: get ( 'system' , 'allowed_themes' , $system_theme ));
2018-04-28 22:30:13 +00:00
$page_theme = null ;
// Find the theme that belongs to the user whose stuff we are looking at
if ( $this -> profile_uid && ( $this -> profile_uid != local_user ())) {
// Allow folks to override user themes and always use their own on their own site.
// This works only if the user is on the same server
2018-07-20 12:19:26 +00:00
$user = DBA :: selectFirst ( 'user' , [ 'theme' ], [ 'uid' => $this -> profile_uid ]);
2018-10-22 02:24:47 +00:00
if ( DBA :: isResult ( $user ) && ! Core\PConfig :: get ( local_user (), 'system' , 'always_my_theme' )) {
2018-04-28 22:30:13 +00:00
$page_theme = $user [ 'theme' ];
}
}
2018-08-05 13:56:21 +00:00
$user_theme = Core\Session :: get ( 'theme' , $system_theme );
2018-07-10 12:27:56 +00:00
2018-04-28 22:30:13 +00:00
// Specific mobile theme override
2018-08-05 13:56:21 +00:00
if (( $this -> is_mobile || $this -> is_tablet ) && Core\Session :: get ( 'show-mobile' , true )) {
2018-10-22 02:24:47 +00:00
$system_mobile_theme = Core\Config :: get ( 'system' , 'mobile-theme' );
2018-08-05 13:56:21 +00:00
$user_mobile_theme = Core\Session :: get ( 'mobile-theme' , $system_mobile_theme );
2018-04-28 22:30:13 +00:00
// --- means same mobile theme as desktop
if ( ! empty ( $user_mobile_theme ) && $user_mobile_theme !== '---' ) {
$user_theme = $user_mobile_theme ;
}
}
if ( $page_theme ) {
$theme_name = $page_theme ;
} else {
$theme_name = $user_theme ;
}
if ( $theme_name
&& in_array ( $theme_name , $allowed_themes )
&& ( file_exists ( 'view/theme/' . $theme_name . '/style.css' )
|| file_exists ( 'view/theme/' . $theme_name . '/style.php' ))
) {
2018-10-09 17:58:58 +00:00
$this -> currentTheme = $theme_name ;
2018-04-28 22:30:13 +00:00
}
}
/**
* @ brief Return full URL to theme which is currently in effect .
*
* Provide a sane default if nothing is chosen or the specified theme does not exist .
*
* @ return string
*/
public function getCurrentThemeStylesheetPath ()
{
return Core\Theme :: getStylesheetPath ( $this -> getCurrentTheme ());
}
2018-10-13 16:57:31 +00:00
/**
* Check if request was an AJAX ( xmlhttprequest ) request .
*
* @ return boolean true if it was an AJAX request
*/
public function isAjax ()
{
return $this -> isAjax ;
}
/**
* Returns the value of a argv key
* TODO there are a lot of $a -> argv usages in combination with defaults () which can be replaced with this method
*
* @ param int $position the position of the argument
* @ param mixed $default the default value if not found
*
* @ return mixed returns the value of the argument
*/
public function getArgumentValue ( $position , $default = '' )
{
if ( array_key_exists ( $position , $this -> argv )) {
return $this -> argv [ $position ];
}
return $default ;
}
2018-10-20 16:19:55 +00:00
/**
* Sets the base url for use in cmdline programs which don ' t have
* $_SERVER variables
*/
public function checkURL ()
{
2018-10-22 02:24:47 +00:00
$url = Core\Config :: get ( 'system' , 'url' );
2018-10-20 16:19:55 +00:00
// if the url isn't set or the stored url is radically different
// than the currently visited url, store the current value accordingly.
// "Radically different" ignores common variations such as http vs https
// and www.example.com vs example.com.
// We will only change the url to an ip address if there is no existing setting
2018-11-08 15:46:50 +00:00
if ( empty ( $url ) || ( ! Util\Strings :: compareLink ( $url , $this -> getBaseURL ())) && ( ! preg_match ( " /^( \ d { 1,3}) \ .( \ d { 1,3}) \ .( \ d { 1,3}) \ .( \ d { 1,3}) $ / " , $this -> getHostName ()))) {
2018-10-22 02:24:47 +00:00
Core\Config :: set ( 'system' , 'url' , $this -> getBaseURL ());
}
}
/**
* Frontend App script
*
* The App object behaves like a container and a dispatcher at the same time , including a representation of the
* request and a representation of the response .
*
* This probably should change to limit the size of this monster method .
*/
public function runFrontend ()
{
// Missing DB connection: ERROR
if ( $this -> getMode () -> has ( App\Mode :: LOCALCONFIGPRESENT ) && ! $this -> getMode () -> has ( App\Mode :: DBAVAILABLE )) {
Core\System :: httpExit ( 500 , [ 'title' => 'Error 500 - Internal Server Error' , 'description' => 'Apologies but the website is unavailable at the moment.' ]);
}
// Max Load Average reached: ERROR
if ( $this -> isMaxProcessesReached () || $this -> isMaxLoadReached ()) {
header ( 'Retry-After: 120' );
header ( 'Refresh: 120; url=' . $this -> getBaseURL () . " / " . $this -> query_string );
Core\System :: httpExit ( 503 , [ 'title' => 'Error 503 - Service Temporarily Unavailable' , 'description' => 'Core\System is currently overloaded. Please try again later.' ]);
}
if ( strstr ( $this -> query_string , '.well-known/host-meta' ) && ( $this -> query_string != '.well-known/host-meta' )) {
Core\System :: httpExit ( 404 );
}
if ( ! $this -> getMode () -> isInstall ()) {
2018-10-22 04:07:56 +00:00
// Force SSL redirection
2018-10-22 02:24:47 +00:00
if ( Core\Config :: get ( 'system' , 'force_ssl' ) && ( $this -> getScheme () == " http " )
2018-10-22 04:07:56 +00:00
&& intval ( Core\Config :: get ( 'system' , 'ssl_policy' )) == SSL_POLICY_FULL
&& strpos ( $this -> getBaseURL (), 'https://' ) === 0
&& $_SERVER [ 'REQUEST_METHOD' ] == 'GET' ) {
header ( 'HTTP/1.1 302 Moved Temporarily' );
header ( 'Location: ' . $this -> getBaseURL () . '/' . $this -> query_string );
2018-10-22 02:24:47 +00:00
exit ();
}
Core\Session :: init ();
Core\Addon :: callHooks ( 'init_1' );
}
// Exclude the backend processes from the session management
if ( ! $this -> isBackend ()) {
$stamp1 = microtime ( true );
session_start ();
2018-10-22 04:16:30 +00:00
$this -> saveTimestamp ( $stamp1 , 'parser' );
Core\L10n :: setSessionVariable ();
Core\L10n :: setLangFromSession ();
2018-10-22 02:24:47 +00:00
} else {
$_SESSION = [];
Core\Worker :: executeIfIdle ();
}
2018-10-22 04:07:56 +00:00
// ZRL
2018-10-22 02:24:47 +00:00
if ( ! empty ( $_GET [ 'zrl' ]) && $this -> getMode () -> isNormal ()) {
$this -> query_string = Model\Profile :: stripZrls ( $this -> query_string );
if ( ! local_user ()) {
// Only continue when the given profile link seems valid
// Valid profile links contain a path with "/profile/" and no query parameters
if (( parse_url ( $_GET [ 'zrl' ], PHP_URL_QUERY ) == " " ) &&
strstr ( parse_url ( $_GET [ 'zrl' ], PHP_URL_PATH ), " /profile/ " )) {
if ( defaults ( $_SESSION , " visitor_home " , " " ) != $_GET [ " zrl " ]) {
$_SESSION [ 'my_url' ] = $_GET [ 'zrl' ];
$_SESSION [ 'authenticated' ] = 0 ;
}
Model\Profile :: zrlInit ( $this );
} else {
// Someone came with an invalid parameter, maybe as a DDoS attempt
// We simply stop processing here
2018-10-30 15:43:27 +00:00
Core\Logger :: log ( " Invalid ZRL parameter " . $_GET [ 'zrl' ], Core\Logger :: DEBUG );
2018-10-22 19:16:59 +00:00
Core\System :: httpExit ( 403 , [ 'title' => '403 Forbidden' ]);
2018-10-22 02:24:47 +00:00
}
}
}
if ( ! empty ( $_GET [ 'owt' ]) && $this -> getMode () -> isNormal ()) {
$token = $_GET [ 'owt' ];
$this -> query_string = Model\Profile :: stripQueryParam ( $this -> query_string , 'owt' );
Model\Profile :: openWebAuthInit ( $token );
}
Module\Login :: sessionAuth ();
if ( empty ( $_SESSION [ 'authenticated' ])) {
header ( 'X-Account-Management-Status: none' );
}
$_SESSION [ 'sysmsg' ] = defaults ( $_SESSION , 'sysmsg' , []);
$_SESSION [ 'sysmsg_info' ] = defaults ( $_SESSION , 'sysmsg_info' , []);
$_SESSION [ 'last_updated' ] = defaults ( $_SESSION , 'last_updated' , []);
/*
* check_config () is responsible for running update scripts . These automatically
* update the DB schema whenever we push a new one out . It also checks to see if
* any addons have been added or removed and reacts accordingly .
*/
// in install mode, any url loads install module
// but we need "view" module for stylesheet
if ( $this -> getMode () -> isInstall () && $this -> module != 'view' ) {
$this -> module = 'install' ;
} elseif ( ! $this -> getMode () -> has ( App\Mode :: MAINTENANCEDISABLED ) && $this -> module != 'view' ) {
$this -> module = 'maintenance' ;
} else {
$this -> checkURL ();
2018-10-29 08:07:36 +00:00
Core\Update :: check ( false );
2018-10-22 22:01:17 +00:00
Core\Addon :: loadAddons ();
Core\Hook :: loadHooks ();
2018-10-22 02:24:47 +00:00
}
2018-10-22 18:44:55 +00:00
$this -> page = [
'aside' => '' ,
'bottom' => '' ,
'content' => '' ,
'footer' => '' ,
'htmlhead' => '' ,
'nav' => '' ,
'page_title' => '' ,
'right_aside' => '' ,
'template' => '' ,
'title' => ''
];
2018-10-22 02:24:47 +00:00
if ( strlen ( $this -> module )) {
// Compatibility with the Android Diaspora client
if ( $this -> module == 'stream' ) {
2018-10-22 20:15:50 +00:00
$this -> internalRedirect ( 'network?f=&order=post' );
2018-10-22 02:24:47 +00:00
}
if ( $this -> module == 'conversations' ) {
2018-10-22 20:15:50 +00:00
$this -> internalRedirect ( 'message' );
2018-10-22 02:24:47 +00:00
}
if ( $this -> module == 'commented' ) {
2018-10-22 20:15:50 +00:00
$this -> internalRedirect ( 'network?f=&order=comment' );
2018-10-22 02:24:47 +00:00
}
if ( $this -> module == 'liked' ) {
2018-10-22 20:15:50 +00:00
$this -> internalRedirect ( 'network?f=&order=comment' );
2018-10-22 02:24:47 +00:00
}
if ( $this -> module == 'activity' ) {
2018-10-22 20:15:50 +00:00
$this -> internalRedirect ( 'network/?f=&conv=1' );
2018-10-22 02:24:47 +00:00
}
if (( $this -> module == 'status_messages' ) && ( $this -> cmd == 'status_messages/new' )) {
2018-10-22 20:15:50 +00:00
$this -> internalRedirect ( 'bookmarklet' );
2018-10-22 02:24:47 +00:00
}
if (( $this -> module == 'user' ) && ( $this -> cmd == 'user/edit' )) {
2018-10-22 20:15:50 +00:00
$this -> internalRedirect ( 'settings' );
2018-10-22 02:24:47 +00:00
}
if (( $this -> module == 'tag_followings' ) && ( $this -> cmd == 'tag_followings/manage' )) {
2018-10-22 20:15:50 +00:00
$this -> internalRedirect ( 'search' );
2018-10-22 02:24:47 +00:00
}
// Compatibility with the Firefox App
if (( $this -> module == " users " ) && ( $this -> cmd == " users/sign_in " )) {
$this -> module = " login " ;
}
2018-10-22 04:07:56 +00:00
$privateapps = Core\Config :: get ( 'config' , 'private_addons' , false );
2018-10-23 01:09:53 +00:00
if ( Core\Addon :: isEnabled ( $this -> module ) && file_exists ( " addon/ { $this -> module } / { $this -> module } .php " )) {
2018-10-22 02:24:47 +00:00
//Check if module is an app and if public access to apps is allowed or not
2018-10-23 15:27:53 +00:00
if (( ! local_user ()) && Core\Hook :: isAddonApp ( $this -> module ) && $privateapps ) {
2018-10-22 02:24:47 +00:00
info ( Core\L10n :: t ( " You must be logged in to use addons. " ));
} else {
include_once " addon/ { $this -> module } / { $this -> module } .php " ;
if ( function_exists ( $this -> module . '_module' )) {
LegacyModule :: setModuleFile ( " addon/ { $this -> module } / { $this -> module } .php " );
$this -> module_class = 'Friendica\\LegacyModule' ;
$this -> module_loaded = true ;
}
}
}
// Controller class routing
if ( ! $this -> module_loaded && class_exists ( 'Friendica\\Module\\' . ucfirst ( $this -> module ))) {
$this -> module_class = 'Friendica\\Module\\' . ucfirst ( $this -> module );
$this -> module_loaded = true ;
}
/* If not , next look for a 'standard' program module in the 'mod' directory
* We emulate a Module class through the LegacyModule class
*/
if ( ! $this -> module_loaded && file_exists ( " mod/ { $this -> module } .php " )) {
LegacyModule :: setModuleFile ( " mod/ { $this -> module } .php " );
$this -> module_class = 'Friendica\\LegacyModule' ;
$this -> module_loaded = true ;
}
/* The URL provided does not resolve to a valid module .
*
* On Dreamhost sites , quite often things go wrong for no apparent reason and they send us to '/internal_error.html' .
* We don ' t like doing this , but as it occasionally accounts for 10 - 20 % or more of all site traffic -
* we are going to trap this and redirect back to the requested page . As long as you don ' t have a critical error on your page
* this will often succeed and eventually do the right thing .
*
* Otherwise we are going to emit a 404 not found .
*/
if ( ! $this -> module_loaded ) {
// Stupid browser tried to pre-fetch our Javascript img template. Don't log the event or return anything - just quietly exit.
if ( ! empty ( $_SERVER [ 'QUERY_STRING' ]) && preg_match ( '/{[0-9]}/' , $_SERVER [ 'QUERY_STRING' ]) !== 0 ) {
exit ();
}
if ( ! empty ( $_SERVER [ 'QUERY_STRING' ]) && ( $_SERVER [ 'QUERY_STRING' ] === 'q=internal_error.html' ) && isset ( $dreamhost_error_hack )) {
2018-10-29 21:20:46 +00:00
Core\Logger :: log ( 'index.php: dreamhost_error_hack invoked. Original URI =' . $_SERVER [ 'REQUEST_URI' ]);
2018-10-22 20:15:50 +00:00
$this -> internalRedirect ( $_SERVER [ 'REQUEST_URI' ]);
2018-10-22 02:24:47 +00:00
}
2018-10-30 15:43:27 +00:00
Core\Logger :: log ( 'index.php: page not found: ' . $_SERVER [ 'REQUEST_URI' ] . ' ADDRESS: ' . $_SERVER [ 'REMOTE_ADDR' ] . ' QUERY: ' . $_SERVER [ 'QUERY_STRING' ], Core\Logger :: DEBUG );
2018-10-22 02:24:47 +00:00
header ( $_SERVER [ " SERVER_PROTOCOL " ] . ' 404 ' . Core\L10n :: t ( 'Not Found' ));
2018-10-31 14:44:06 +00:00
$tpl = Core\Renderer :: getMarkupTemplate ( " 404.tpl " );
2018-10-31 14:35:50 +00:00
$this -> page [ 'content' ] = Core\Renderer :: replaceMacros ( $tpl , [
2018-10-22 02:24:47 +00:00
'$message' => Core\L10n :: t ( 'Page not found.' )
]);
}
}
2018-10-22 12:17:55 +00:00
// Load current theme info
2018-10-22 02:24:47 +00:00
$theme_info_file = 'view/theme/' . $this -> getCurrentTheme () . '/theme.php' ;
if ( file_exists ( $theme_info_file )) {
require_once $theme_info_file ;
}
2018-10-22 12:17:55 +00:00
// initialise content region
2018-10-22 02:24:47 +00:00
if ( $this -> getMode () -> isNormal ()) {
Core\Addon :: callHooks ( 'page_content_top' , $this -> page [ 'content' ]);
2018-10-20 16:19:55 +00:00
}
2018-10-22 02:24:47 +00:00
2018-10-22 12:17:55 +00:00
// Call module functions
2018-10-22 02:24:47 +00:00
if ( $this -> module_loaded ) {
$this -> page [ 'page_title' ] = $this -> module ;
$placeholder = '' ;
Core\Addon :: callHooks ( $this -> module . '_mod_init' , $placeholder );
call_user_func ([ $this -> module_class , 'init' ]);
// "rawContent" is especially meant for technical endpoints.
// This endpoint doesn't need any theme initialization or other comparable stuff.
if ( ! $this -> error ) {
call_user_func ([ $this -> module_class , 'rawContent' ]);
}
if ( function_exists ( str_replace ( '-' , '_' , $this -> getCurrentTheme ()) . '_init' )) {
$func = str_replace ( '-' , '_' , $this -> getCurrentTheme ()) . '_init' ;
$func ( $this );
}
if ( ! $this -> error && $_SERVER [ 'REQUEST_METHOD' ] === 'POST' ) {
Core\Addon :: callHooks ( $this -> module . '_mod_post' , $_POST );
call_user_func ([ $this -> module_class , 'post' ]);
}
if ( ! $this -> error ) {
Core\Addon :: callHooks ( $this -> module . '_mod_afterpost' , $placeholder );
call_user_func ([ $this -> module_class , 'afterpost' ]);
}
if ( ! $this -> error ) {
$arr = [ 'content' => $this -> page [ 'content' ]];
Core\Addon :: callHooks ( $this -> module . '_mod_content' , $arr );
$this -> page [ 'content' ] = $arr [ 'content' ];
$arr = [ 'content' => call_user_func ([ $this -> module_class , 'content' ])];
Core\Addon :: callHooks ( $this -> module . '_mod_aftercontent' , $arr );
$this -> page [ 'content' ] .= $arr [ 'content' ];
}
if ( function_exists ( str_replace ( '-' , '_' , $this -> getCurrentTheme ()) . '_content_loaded' )) {
$func = str_replace ( '-' , '_' , $this -> getCurrentTheme ()) . '_content_loaded' ;
$func ( $this );
}
}
/* Create the page head after setting the language
* and getting any auth credentials .
*
* Moved initHead () and initFooter () to after
* all the module functions have executed so that all
* theme choices made by the modules can take effect .
*/
$this -> initHead ();
/* Build the page ending -- this is stuff that goes right before
* the closing </ body > tag
*/
$this -> initFooter ();
/* now that we ' ve been through the module content , see if the page reported
* a permission problem and if so , a 403 response would seem to be in order .
*/
if ( stristr ( implode ( " " , $_SESSION [ 'sysmsg' ]), Core\L10n :: t ( 'Permission denied' ))) {
header ( $_SERVER [ " SERVER_PROTOCOL " ] . ' 403 ' . Core\L10n :: t ( 'Permission denied.' ));
}
// Report anything which needs to be communicated in the notification area (before the main body)
Core\Addon :: callHooks ( 'page_end' , $this -> page [ 'content' ]);
// Add the navigation (menu) template
if ( $this -> module != 'install' && $this -> module != 'maintenance' ) {
2018-10-31 14:44:06 +00:00
$this -> page [ 'htmlhead' ] .= Core\Renderer :: replaceMacros ( Core\Renderer :: getMarkupTemplate ( 'nav_head.tpl' ), []);
2018-10-22 18:44:55 +00:00
$this -> page [ 'nav' ] = Content\Nav :: build ( $this );
2018-10-22 02:24:47 +00:00
}
// Build the page - now that we have all the components
if ( isset ( $_GET [ " mode " ]) && (( $_GET [ " mode " ] == " raw " ) || ( $_GET [ " mode " ] == " minimal " ))) {
$doc = new DOMDocument ();
$target = new DOMDocument ();
$target -> loadXML ( " <root></root> " );
$content = mb_convert_encoding ( $this -> page [ " content " ], 'HTML-ENTITIES' , " UTF-8 " );
/// @TODO one day, kill those error-surpressing @ stuff, or PHP should ban it
@ $doc -> loadHTML ( $content );
$xpath = new DOMXPath ( $doc );
$list = $xpath -> query ( " //*[contains(@id,'tread-wrapper-')] " ); /* */
foreach ( $list as $item ) {
$item = $target -> importNode ( $item , true );
// And then append it to the target
$target -> documentElement -> appendChild ( $item );
}
}
if ( isset ( $_GET [ " mode " ]) && ( $_GET [ " mode " ] == " raw " )) {
header ( " Content-type: text/html; charset=utf-8 " );
echo substr ( $target -> saveHTML (), 6 , - 8 );
exit ();
}
$page = $this -> page ;
$profile = $this -> profile ;
header ( " X-Friendica-Version: " . FRIENDICA_VERSION );
header ( " Content-type: text/html; charset=utf-8 " );
if ( Core\Config :: get ( 'system' , 'hsts' ) && ( Core\Config :: get ( 'system' , 'ssl_policy' ) == SSL_POLICY_FULL )) {
header ( " Strict-Transport-Security: max-age=31536000 " );
}
// Some security stuff
header ( 'X-Content-Type-Options: nosniff' );
header ( 'X-XSS-Protection: 1; mode=block' );
header ( 'X-Permitted-Cross-Domain-Policies: none' );
header ( 'X-Frame-Options: sameorigin' );
// Things like embedded OSM maps don't work, when this is enabled
// header("Content-Security-Policy: default-src 'self'; script-src 'self' 'unsafe-inline' 'unsafe-eval'; connect-src 'self'; style-src 'self' 'unsafe-inline'; font-src 'self'; img-src 'self' https: data:; media-src 'self' https:; child-src 'self' https:; object-src 'none'");
2018-10-22 12:17:55 +00:00
/* We use $_GET [ " mode " ] for special page templates . So we will check if we have
2018-10-22 02:24:47 +00:00
* to load another page template than the default one .
* The page templates are located in / view / php / or in the theme directory .
*/
if ( isset ( $_GET [ " mode " ])) {
$template = Core\Theme :: getPathForFile ( $_GET [ " mode " ] . '.php' );
}
// If there is no page template use the default page template
if ( empty ( $template )) {
$template = Core\Theme :: getPathForFile ( " default.php " );
}
// Theme templates expect $a as an App instance
$a = $this ;
2018-10-26 12:13:31 +00:00
// Used as is in view/php/default.php
$lang = Core\L10n :: getCurrentLang ();
2018-10-22 02:24:47 +00:00
/// @TODO Looks unsafe (remote-inclusion), is maybe not but Core\Theme::getPathForFile() uses file_exists() but does not escape anything
require_once $template ;
2018-10-20 16:19:55 +00:00
}
2018-10-13 18:02:04 +00:00
/**
2018-10-19 21:42:33 +00:00
* Redirects to another module relative to the current Friendica base .
2018-10-19 18:11:27 +00:00
* If you want to redirect to a external URL , use System :: externalRedirectTo ()
2018-10-13 18:02:04 +00:00
*
* @ param string $toUrl The destination URL ( Default is empty , which is the default page of the Friendica node )
* @ param bool $ssl if true , base URL will try to get called with https :// ( works just for relative paths )
2018-10-19 18:11:27 +00:00
*
* @ throws InternalServerErrorException In Case the given URL is not relative to the Friendica node
2018-10-13 18:02:04 +00:00
*/
2018-10-19 18:11:27 +00:00
public function internalRedirect ( $toUrl = '' , $ssl = false )
2018-10-13 18:02:04 +00:00
{
2018-11-30 11:27:17 +00:00
if ( ! empty ( parse_url ( $toUrl , PHP_URL_SCHEME ))) {
2018-10-23 10:17:41 +00:00
throw new InternalServerErrorException ( " ' $toUrl is not a relative path, please use System::externalRedirectTo " );
2018-10-13 18:02:04 +00:00
}
2018-10-19 18:11:27 +00:00
$redirectTo = $this -> getBaseURL ( $ssl ) . '/' . ltrim ( $toUrl , '/' );
2018-10-22 22:07:00 +00:00
Core\System :: externalRedirect ( $redirectTo );
2018-10-13 18:02:04 +00:00
}
2018-10-24 18:16:14 +00:00
/**
2018-10-24 18:52:38 +00:00
* Automatically redirects to relative or absolute URL
2018-10-24 18:16:14 +00:00
* Should only be used if it isn ' t clear if the URL is either internal or external
*
* @ param string $toUrl The target URL
*
*/
public function redirect ( $toUrl )
{
2018-11-30 11:27:17 +00:00
if ( ! empty ( parse_url ( $toUrl , PHP_URL_SCHEME ))) {
2018-10-24 18:24:22 +00:00
Core\System :: externalRedirect ( $toUrl );
2018-10-24 18:16:14 +00:00
} else {
$this -> internalRedirect ( $toUrl );
}
}
2017-05-08 06:11:38 +00:00
}
