<?php

// If this file is called directly, abort.
if ( ! defined( 'WPINC' ) ) {
	die;
}


/**
 * Add meta box on wpLingua translations
 *
 * This function adds a meta box to the wpLingua Translations post type in the
 * WordPress admin interface. The meta box is used to display and edit the
 * translation of a post.
 *
 * @param object $post The post object.
 * @return void
 */
function wplng_translation_add_meta_box( $post ) {

	add_meta_box(
		'wplng_meta_box_translation',               // Unique ID for the meta box
		__( 'Translation', 'wplingua' ),            // Title of the meta box
		'wplng_translation_meta_box_html_output',   // Callback function to render the meta box HTML
		'wplng_translation',                        // Screen or post type where the meta box appears
		'normal',                                   // Context where the meta box should appear
		'low'                                       // Priority within the context
	);
}


/**
 * Print HTML of translations editor meta box in back office
 *
 * This function prints the HTML of the translations editor meta box in the
 * WordPress admin interface. The meta box is used to display and edit the
 * translation of a post.
 *
 * @param object $post The post object.
 * @return string HTML The HTML of the meta box.
 */
function wplng_translation_meta_box_html_output( $post ) {

	echo '<div id="wplng-translation-editor">';
	echo wplng_translation_editor_get_html( $post );
	echo '</div>';
}


/**
 * Return HTML of translations editor in modal
 *
 * @param WP_Post $post The post object.
 * @return string The HTML of the translations editor in the modal.
 */
function wplng_translation_editor_get_html( $post ) {

	// used later for security
	$html = wp_nonce_field(
		basename( __FILE__ ),
		'wplng_translation_meta_box_nonce',
		true,
		false
	);

	$meta = get_post_meta( $post->ID );

	// Display original text and notice if necesary
	if ( ! empty( $meta['wplng_translation_original'][0] )
		&& is_string( $meta['wplng_translation_original'][0] )
		&& ! empty( $meta['wplng_translation_original_language_id'][0] )
		&& wplng_is_valid_language_id( $meta['wplng_translation_original_language_id'][0] )
	) {

		$language_id = $meta['wplng_translation_original_language_id'][0];
		$language    = wplng_get_language_by_id( $language_id );
		$alt         = __( 'Flag for language: ', 'wplingua' ) . $language['name'];
		$text_source = wplng_text_esc_displayed( $meta['wplng_translation_original'][0] );
		$html_notice = '';

		// Make the notice
		if ( wplng_str_contains( $text_source, '%wplng-search-query%' ) ) {
			$html_notice .= '<div';
			$html_notice .= ' class="wplng-help-box"';
			$html_notice .= ' style="display: block; margin: 15px 0 -10px;"';
			$html_notice .= '>';
			$html_notice .= sprintf(
				esc_html__( 'This text contains the tag %s, which will be replaced by the term the visitor searched for. Please keep it in your translation.', 'wplingua' ),
				'<u>%wplng-search-query%</u>'
			);
			$html_notice .= '</div>';
		}

		$html .= '<div';
		$html .= ' id="wplng-original-language" wplng-lang="' . esc_attr( $language_id ) . '"';
		$html .= ' wplng-lang="' . esc_attr( $language_id ) . '"';
		$html .= '>';

		$html .= '<div id="wplng-source-title">';
		$html .= '<img';
		$html .= ' src="' . esc_url( $language['flag'] ) . '"';
		$html .= ' alt="' . esc_attr( $alt ) . '"';
		$html .= ' class="wplng-flag"';
		$html .= '>';
		$html .= esc_html( $language['name'] );
		$html .= esc_html__( ' - Original text: ', 'wplingua' );
		$html .= '</div>'; // End #wplng-source-title
		$html .= '<div id="wplng-source">';
		$html .= esc_html( $text_source );
		$html .= '</div>'; // End #wplng-source
		$html .= '</div>'; // End #wplng-original-language
		$html .= $html_notice;

	}

	// Foreach translation, display form textarea to edit
	if ( ! empty( $meta['wplng_translation_translations'][0] )
		&& is_string( $meta['wplng_translation_translations'][0] )
	) {

		$translations_data = json_decode( $meta['wplng_translation_translations'][0], true );
		$languages_target  = wplng_get_languages_target_ids();
		$translations      = array();

		if ( empty( $translations_data ) ) {
			$translations_data = array();
		}

		foreach ( $languages_target as $language_target ) {

			$is_in = false;

			foreach ( $translations_data as $translation_data ) {

				if ( empty( $translation_data['language_id'] )
					|| ! wplng_is_valid_language_id( $translation_data['language_id'] )
					|| empty( $translation_data['translation'] )
					|| ! is_string( $translation_data['translation'] )
					|| ( $translation_data['language_id'] !== $language_target )
				) {
					continue;
				}

				$is_in          = true;
				$translations[] = $translation_data;

			}

			if ( ! $is_in ) {
				$translations[] = array(
					'language_id' => $language_target,
					'translation' => '[WPLNG_EMPTY]',
					'status'      => 'ungenerated',
				);
			}
		}

		foreach ( $translations as $translation ) {

			$language_id    = $translation['language_id'];
			$language       = wplng_get_language_by_id( $language_id );
			$textarea       = $translation['translation'];
			$name           = 'wplng_translation_' . $language_id;
			$container_id   = 'wplng-translation-' . $language_id;
			$generate_link  = __( 'Regenerate translation', 'wplingua' );
			$alt            = __( 'Flag for language: ', 'wplingua' ) . $language['name'];
			$class          = 'wplng-edit-language';
			$reviewed_title = __( 'Mark as review', 'wplingua' );
			$is_reviewed    = false;

			if ( '[WPLNG_EMPTY]' === $textarea ) {
				$textarea = '';
			}

			switch ( $translation['status'] ) {
				case 'ungenerated':
					$generate_link = __( 'Generate translation', 'wplingua' );
					$class        .= ' wplng-status-ungenerated';
					break;

				case 'generated':
					$class .= ' wplng-status-generated';
					break;

				default:
					if ( is_int( $translation['status'] ) ) {

						$class      .= ' wplng-status-reviewed';
						$is_reviewed = true;

						// Get and check date format
						$date_format = get_option( 'date_format' );
						if ( ! is_string( $date_format ) || empty( $date_format ) ) {
							$date_format = 'F j, Y';
						}

						// Get and check time format
						$time_format = get_option( 'time_format' );
						if ( ! is_string( $time_format ) || empty( $time_format ) ) {
							$time_format = 'g:i a';
						}

						$reviewed_title  = __( 'Reviewed on ', 'wplingua' );
						$reviewed_title .= esc_html(
							gmdate(
								$date_format,
								$translation['status']
							)
						);
						$reviewed_title .= ', ' . esc_html(
							gmdate(
								$time_format,
								$translation['status']
							)
						);
					}
					break;
			}

			$html .= '<div';
			$html .= ' id="' . esc_attr( $container_id ) . '"';
			$html .= ' class="' . esc_attr( $class ) . '"';
			$html .= ' wplng-lang="' . esc_attr( $language_id ) . '"';
			$html .= '>';
			$html .= '<label for="' . esc_attr( $name ) . '" class="wplng-target-title">';
			$html .= '<img';
			$html .= ' src="' . esc_url( $language['flag'] ) . '"';
			$html .= ' alt="' . esc_attr( $alt ) . '"';
			$html .= ' class="wplng-flag"';
			$html .= '>';
			$html .= esc_html( $language['name'] );
			$html .= esc_html__( ' - Translation: ', 'wplingua' );
			$html .= '</label>';
			$html .= '<textarea';
			$html .= ' name="' . esc_attr( $name ) . '"';
			$html .= ' id="' . esc_attr( $name ) . '"';
			$html .= ' class="wplng-translation-textarea"';
			$html .= ' lang="' . esc_attr( $language_id ) . '"';
			$html .= ' spellcheck="false"';
			$html .= '>';
			$html .= esc_html( html_entity_decode( $textarea ) );
			$html .= '</textarea>';

			if ( empty( $translation['status'] ) ) {
				$html .= '</div>';
				continue;
			}

			$html .= '<div class="wplng-translation-footer">';
			$html .= '<div class="wplng-translation-footer-left">';

			$html .= '<fieldset class="wplng-mark-as-reviewed">';

			$html .= '<input';
			$html .= ' type="checkbox"';
			$html .= ' id="wplng_mark_as_reviewed_' . esc_attr( $language_id ) . '"';
			$html .= ' name="wplng_mark_as_reviewed_' . esc_attr( $language_id ) . '"';
			$html .= ' wplng-lang="' . esc_attr( $language_id ) . '"';
			$html .= checked( $is_reviewed, true, false );
			$html .= '>';

			$html .= '<label';
			$html .= ' for="wplng_mark_as_reviewed_' . esc_attr( $language_id ) . '"';
			$html .= ' wplng-lang="' . esc_attr( $language_id ) . '"';
			$html .= ' title="' . esc_attr( $reviewed_title ) . '"';
			$html .= '>';
			$html .= esc_html__( 'Is reviewed', 'wplingua' );
			$html .= '</label>';

			$html .= '</fieldset>';

			$html .= '</div>'; // End .wplng-translation-footer-right
			$html .= '<div class="wplng-translation-footer-right">';

			$html .= '<span';
			$html .= ' class="dashicons dashicons-update wplng-spin wplng-generate-spin"';
			$html .= ' style="display: none;"';
			$html .= '></span> ';

			$html .= '<a';
			$html .= ' href="javascript:void(0);"';
			$html .= ' class="wplng-generate"';
			$html .= ' wplng-lang="' . esc_attr( $language_id ) . '"';
			$html .= '>';
			$html .= esc_html( $generate_link );
			$html .= '</a>';

			$html .= '</div>'; // End .wplng-translation-footer-right
			$html .= '</div>'; // End .wplng-translation-footer
			$html .= '</div>'; // End .wplng-edit-language

		}
	}

	if ( ! empty( $meta['wplng_translation_discovery_url'][0] )
		&& is_string( $meta['wplng_translation_discovery_url'][0] )
	) {
		$url = home_url( $meta['wplng_translation_discovery_url'][0] );

		$html .= '<div id="wplng-discovery-url">';
		$html .= '<strong>';
		$html .= esc_html__( 'Discovery URL: ', 'wplingua' ) . ' ';
		$html .= '</strong>';
		$html .= '<a';
		$html .= ' href="' . esc_url( $url ) . '"';
		$html .= '>';
		$html .= esc_html( $url );
		$html .= '</a>';
		$html .= '</div>'; // End #wplng-discovery-url
	}

	return $html;
}


/**
 * Save meta box data of wpLingua translations
 *
 * @param int $post_id
 * @return void
 */
function wplng_translation_save_meta_boxes_data( $post_id ) {

	// Check if nonce is set
	if ( ! isset( $_POST['wplng_translation_meta_box_nonce'] ) ) {
		return false;
	}

	// Sanitize the nonce
	$nonce = $_POST['wplng_translation_meta_box_nonce'];
	$nonce = sanitize_text_field( wp_unslash( $nonce ) );

	// Check for nonce to top xss
	if ( ! wp_verify_nonce( $nonce, basename( __FILE__ ) ) ) {
		return false;
	}

	// check for correct user capabilities - stop internal xss from customers
	if ( ! current_user_can( 'edit_post', $post_id ) ) {
		return false;
	}

	wplng_clear_translations_cache();

	$meta = get_post_meta( $post_id );

	if ( empty( $meta['wplng_translation_translations'][0] ) ) {
		return false;
	}

	$languages_target = wplng_get_languages_target_ids();
	$translations     = json_decode(
		$meta['wplng_translation_translations'][0],
		true
	);

	if ( empty( $translations ) ) {
		$translations = array();
	}

	foreach ( $languages_target as $language_target ) {

		$is_in = false;

		foreach ( $translations as $translation ) {

			if ( empty( $translation['language_id'] )
				|| ! wplng_is_valid_language_id( $translation['language_id'] )
				|| ! isset( $translation['translation'] )
				|| ! is_string( $translation['translation'] )
				|| ( $translation['language_id'] !== $language_target )
			) {
				continue;
			}

			$is_in = true;
			break;
		}

		if ( ! $is_in ) {
			$translations[] = array(
				'language_id' => $language_target,
				'translation' => '[WPLNG_EMPTY]',
				'status'      => 'ungenerated',
			);
		}
	}

	foreach ( $translations as $key => $translation ) {

		if ( empty( $translation['language_id'] )
			|| ! wplng_is_valid_language_id( $translation['language_id'] )
		) {
			continue;
		}

		$name     = 'wplng_translation_' . $translation['language_id'];
		$reviewed = 'wplng_mark_as_reviewed_' . $translation['language_id'];

		if ( ! isset( $_POST[ $name ] ) ) {
			continue;
		}

		$temp = wplng_text_esc( wp_unslash( $_POST[ $name ] ) );

		if ( empty( $temp ) ) {
			$temp                           = '[WPLNG_EMPTY]';
			$translations[ $key ]['status'] = 'ungenerated';
		} else {

			if ( $temp !== $translation['translation'] ) {
				$temp = str_replace( '\\', '', $temp );
			}

			if ( ! empty( $_POST[ $reviewed ] ) ) {
				if ( 'false' !== $_POST[ $reviewed ] ) {
					$translations[ $key ]['status'] = time();
				} else {
					$translations[ $key ]['status'] = 'generated';
				}
			} else {
				$translations[ $key ]['status'] = 'generated';
			}
		}

		$translations[ $key ]['translation'] = $temp;
	}

	/**
	 * Save meta: Translation array as JSON
	 */

	$meta_return = update_post_meta(
		$post_id,
		'wplng_translation_translations',
		wp_json_encode(
			$translations,
			JSON_UNESCAPED_UNICODE | JSON_UNESCAPED_SLASHES
		)
	);

	if ( false === $meta_return ) {

		// Try to save it with encoded emoji
		foreach ( $translations as $key => $translation ) {

			if ( empty( $translation['translation'] )
				|| '[WPLNG_EMPTY]' === $translation['translation']
			) {
				continue;
			}

			$translations[ $key ]['translation'] = wp_encode_emoji( $translation['translation'] );
		}

		$meta_return = update_post_meta(
			$post_id,
			'wplng_translation_translations',
			wp_json_encode(
				$translations,
				JSON_UNESCAPED_UNICODE | JSON_UNESCAPED_SLASHES
			)
		);

	}

	return $meta_return;
}


/**
 * wpLingua AJAX function to get translations on CPT edit page
 *
 * @return void
 */
function wplng_ajax_generate_translation() {

	/**
	 * Check and sanitize data
	 */

	// Check data

	if ( empty( $_POST['language_source'] )
		|| ! is_string( $_POST['language_source'] )
		|| empty( $_POST['language_target'] )
		|| ! is_string( $_POST['language_target'] )
		|| ! isset( $_POST['text'] )
		|| ! is_string( $_POST['text'] )
	) {
		wp_send_json_error( __( 'Invalid parameters', 'wplingua' ) );
		return;
	}

	// Check and sanitize sources and target languages

	$language_source = sanitize_key( $_POST['language_source'] );
	$language_target = sanitize_key( $_POST['language_target'] );

	if ( ! wplng_is_valid_language_id( $language_source )
		|| ! wplng_is_valid_language_id( $language_target )
		|| $language_source === $language_target
	) {
		wp_send_json_error( __( 'Invalid languages parameters', 'wplingua' ) );
		return;
	}

	// Check and sanitize text to translate
	// (And convert img emoji to emoji)

	$text = wp_kses(
		wp_unslash( $_POST['text'] ),
		array(
			'img' => array(
				'alt' => array(),
			),
		)
	);

	$text = preg_replace(
		'/<img alt=\\"(.*)\\">/U',
		'$1',
		$text
	);

	$text = wplng_text_esc( $text );

	if ( ! wplng_text_is_translatable( $text ) ) {
		wp_send_json_success( $text );
		return;
	}

	/**
	 * Call API and get translation
	 */

	$response = wplng_api_call_translate(
		array( $text ),
		$language_source,
		$language_target
	);

	if ( ! isset( $response[0] ) ) {
		wp_send_json_error( __( 'Invalid API response', 'wplingua' ) );
		return;
	}

	wp_send_json_success( $response[0] );
}
