94 lines
2.5 KiB
PHP
94 lines
2.5 KiB
PHP
<?php
|
|
|
|
namespace WPML\Language\Detection;
|
|
|
|
use WPML\FP\Fns;
|
|
use WPML\FP\Logic;
|
|
use WPML\FP\Maybe;
|
|
use WPML\FP\Obj;
|
|
use WPML\FP\Relation;
|
|
use function WPML\FP\System\filterVar;
|
|
use function \WPML\FP\partialRight;
|
|
|
|
/**
|
|
* Class WPML_Backend_Request
|
|
*
|
|
* @package wpml-core
|
|
* @subpackage wpml-requests
|
|
*/
|
|
class Backend extends \WPML_Request {
|
|
/**
|
|
* Determines the requested language in the WP Admin backend from URI, $_POST, $_GET and cookies.
|
|
*
|
|
* @return string The requested language code.
|
|
*/
|
|
public function get_requested_lang() {
|
|
$findFromSystemVars = Fns::until(
|
|
Logic::isNotNull(),
|
|
[
|
|
$this->getForPage(),
|
|
$this->getFromParam( [ 'get', 'lang' ], true ),
|
|
$this->getFromParam( [ 'post', 'icl_post_language' ], false ),
|
|
$this->getPostElementLanguage(),
|
|
]
|
|
);
|
|
|
|
return Maybe::of(
|
|
[
|
|
'get' => $_GET,
|
|
'post' => $_POST,
|
|
]
|
|
)
|
|
->map( $findFromSystemVars )
|
|
->getOrElse(
|
|
function () {
|
|
return $this->get_cookie_lang();
|
|
}
|
|
);
|
|
}
|
|
|
|
private function getForPage() {
|
|
return function ( $system ) {
|
|
return $this->is_string_translation_or_translation_queue_page( $system ) ? $this->default_language : null;
|
|
};
|
|
}
|
|
|
|
protected function get_cookie_name() {
|
|
return $this->cookieLanguage->getBackendCookieName();
|
|
}
|
|
|
|
private function getFromParam( $path, $allowAllValue ) {
|
|
return function ( $system ) use ( $path, $allowAllValue ) {
|
|
/** @var \WPML_Language_Resolution $wpml_language_resolution */
|
|
global $wpml_language_resolution;
|
|
|
|
return Maybe::of( $system )
|
|
->map( Obj::path( $path ) )
|
|
->map( filterVar( FILTER_SANITIZE_FULL_SPECIAL_CHARS ) )
|
|
->filter( partialRight( [ $wpml_language_resolution, 'is_language_active' ], $allowAllValue ) )
|
|
->getOrElse( null );
|
|
};
|
|
}
|
|
|
|
private function getPostElementLanguage() {
|
|
return function ( $system ) {
|
|
/** @var \WPML_Post_Translation $wpml_post_translations */
|
|
global $wpml_post_translations;
|
|
|
|
return Maybe::of( $system )
|
|
->map( Obj::path( [ 'get', 'p' ] ) )
|
|
->filter( Relation::gt( Fns::__, 0 ) )
|
|
->map( [ $wpml_post_translations, 'get_element_lang_code' ] )
|
|
->getOrElse( null );
|
|
};
|
|
}
|
|
|
|
private function is_string_translation_or_translation_queue_page( $system ) {
|
|
$page = Obj::path( [ 'get', 'page' ], $system );
|
|
|
|
return ( defined( 'WPML_ST_FOLDER' ) && $page === WPML_ST_FOLDER . '/menu/string-translation.php' )
|
|
||
|
|
( defined( 'WPML_TM_FOLDER' ) && $page === WPML_TM_FOLDER . '/menu/translations-queue.php' );
|
|
}
|
|
}
|