<?php

// If this file is called directly, abort.
if ( ! defined( 'WPINC' ) ) {
	die;
}


/**
 * Get data from wpLingua API : Translated texts
 *
 * Return an error message with error code
 * or an array of translated texts
 *
 * API terms : https://wplingua.com/terms/
 *
 * ---------------------------------------------------
 * Data sent :
 * ---------------------------------------------------
 * - request : 'translate'
 * - api_key : the API key of website
 * - version : API compatile version
 * - context : Sends page calling URL
 * - source  : A language ID
 * - target  : A languages ID
 * - texts   : Array of untranslated texts of website
 *
 * ---------------------------------------------------
 * Data received if successful :
 * ---------------------------------------------------
 * - translations : Array of translated texts
 *
 * ---------------------------------------------------
 * Data received in case of failure
 * ---------------------------------------------------
 * - error   : true
 * - code    : An integer
 * - message : Error description
 *
 * @param array  $texts
 * @param string $language_source_id
 * @param string $language_target_id
 * @return array Translated texts or empty array
 */
function wplng_api_call_translate(
	$texts,
	$language_source_id = '',
	$language_target_id = ''
) {

	// Check texts array

	if ( empty( $texts )
		|| ! is_array( $texts )
		|| wplng_get_api_overloaded()
		|| ! wplng_api_feature_is_allow( 'detection' )
	) {
		return array();
	}

	// Check cookie

	if ( empty( $_COOKIE['wplingua'] )
		&& apply_filters( 'wplng_cookie_check', true )
	) {

		global $wplng_class_reload;
		$wplng_class_reload = true;

		return array();
	}

	// Ckeck and sanitize texts list

	foreach ( $texts as $key => $text ) {
		if ( ! is_string( $text ) ) {
			$texts[ $key ] = '';
		}
	}

	// Get API key

	$api_key = wplng_get_api_key();

	if ( ! wplng_is_valid_api_key_format( $api_key ) ) {
		return array();
	}

	// Get and sanitize the API key

	if ( empty( $language_target_id ) ) {
		$language_target_id = wplng_get_language_current_id();
	} elseif ( ! wplng_is_valid_language_id( $language_target_id ) ) {
		return array();
	}

	if ( empty( $language_source_id ) ) {
		$language_source_id = wplng_get_language_website_id();
	} elseif ( ! wplng_is_valid_language_id( $language_source_id ) ) {
		return array();
	}

	if ( $language_target_id === $language_source_id ) {
		return array();
	}

	/**
	 * Add dictionary tag
	 */

	$dictionary_entries = wplng_dictionary_get_entries();

	$texts_tagged = wplng_dictionary_add_tags(
		$texts,
		$language_target_id,
		$dictionary_entries
	);

	/**
	 * Get texts list as JSON
	 */

	$json_texts = wp_json_encode( $texts_tagged );

	if ( empty( $json_texts ) ) {
		return array();
	}

	/**
	 * Get the API call
	 */

	$request = wp_remote_post(
		WPLNG_API_URL . '/app/',
		array(
			'method'    => 'POST',
			'timeout'   => 99, // 1 min 29 s
			'sslverify' => WPLNG_API_SSLVERIFY,
			'body'      => array(
				'request' => 'translate',
				'api_key' => $api_key,
				'version' => WPLNG_API_VERSION,
				'context' => wplng_get_context(),
				'source'  => $language_source_id,
				'target'  => $language_target_id,
				'texts'   => $json_texts,
			),
		)
	);

	/**
	 * Check if the API call worked
	 */

	if ( is_wp_error( $request )
		|| wp_remote_retrieve_response_code( $request ) !== 200
	) {
		wplng_set_api_overloaded();
		return array();
	}

	/**
	 * Check and sanitize the API response
	 */

	$response = json_decode( wp_remote_retrieve_body( $request ), true );

	// Check error
	if ( isset( $response['error'] )
		&& ( true === $response['error'] )
	) {
		if ( isset( $response['disconnect'] )
			&& true === $response['disconnect']
		) {

			delete_option( 'wplng_api_key_data' );
			delete_option( 'wplng_api_key' );
			wplng_clear_translations_cache();
			wplng_clear_slugs_cache();
		}

		if ( isset( $response['reload'] )
			&& true === $response['reload']
		) {

			delete_option( 'wplng_api_key_data' );
			wplng_get_api_data();
		}

		return array();
	}

	// Check translations
	if ( empty( $response['translations'] )
		|| ! is_array( $response['translations'] )
	) {
		// API returned an error or an unexpected response
		wplng_set_api_overloaded();
		return array();
	}

	/**
	 * Here, API returned the list of translations
	 */

	// Replace dictionary tag

	$texts_untagged = wplng_dictionary_replace_tags(
		$response['translations'],
		$language_target_id,
		$dictionary_entries
	);

	// Check and sanitize each translation

	$translations = array();

	foreach ( $texts_untagged as $key => $translation ) {
		if ( is_string( $translation ) ) {
			$translations[] = wp_kses( $translation, array() );
		} elseif ( isset( $texts[ $key ] ) ) {
			$translations[] = $texts[ $key ];
		}
	}

	return $translations;
}