<?php
/**
 * Class contains methods/helper functions related to WPML plugin integration.
 * Translates theme option settings in the admin's area.
 *
 * [WPML API](https://wpml.org/documentation/support/wpml-coding-api/wpml-hooks-reference/)
 *
 * @author    Themedelight
 * @package   Themedelight/AdventureTours
 * @version   4.8.0
 */

class AtWPMLIntegrationHelper extends TdComponent
{
	/**
	 * Option name that store theme option settings.
	 *
	 * @var string
	 */
	protected $option_name = '';

	/**
	 * Keys from theme options that should be translated.
	 *
	 * @var array
	 */
	protected $settings_for_translation = array();

	/**
	 * Keys from theme options that contains page ids and should be translated.
	 *
	 * @var array
	 */
	protected $page_id_settings_for_translation = array();

	/**
	 * Get option filter call counter.
	 *
	 * @var integer
	 */
	private $get_filter_call_index = 0;

	/**
	 * @see action_woocommerce_ajax_save_product_variations
	 * @var array
	 */
	private $ajax_changed_type_product_ids = array();

	/**
	 * @see action_woocommerce_ajax_save_product_variations
	 * @var boolean
	 */
	private $ajax_fixer_added = false;

	/**
	 * Init function.
	 *
	 * @return void
	 */
	public function init() {
		if ( ! parent::init() ) {
			return false;
		}

		if ( is_admin() ) {
			$this->_initSettingsTranslation();

			$this->_initMultiCurrenciesProcessing();
		} else {
			add_filter( 'icl_ls_languages', array( $this, 'filter_icl_ls_languages_fix_tours_link' ), 20 );

			if ( $this->getDefaultLang() != $this->getLang() && adventure_tours_check( 'woocommerce_active' ) ) {
				add_filter( 'option_rewrite_rules', array( $this, 'filter_option_rewrite_rules_translate_tour_rewrite_rules' ), 0, 1 );
			}

			add_filter( 'adventure_tours_tours_page_full_url', array( $this, 'filter_tours_page_full_url' ), 9, 2 );
		}
		return true;
	}

	public function filter_tours_page_full_url( $tour_page_url, $in_default_language ){
		global $sitepress;
		$result = $sitepress->convert_url(
			$tour_page_url,
			$in_default_language ? $sitepress->get_default_language() : $sitepress->get_current_language()
		);
		//TODO check wpml_permalink filter instead (https://wpml.org/documentation/support/wpml-coding-api/wpml-hooks-reference/#hook-662194)
		/*$result = apply_filters( 'wpml_permalink', 
			$in_default_language ? $sitepress->get_default_language() : $sitepress->get_current_language()
		);*/
		return $result;
	}

	/**
	 * Fixes links to the tours archive page. Filter used by WPML plugin to disaply list of trnslated pages.
	 *
	 * @param  assoc $languages
	 * @return assoc
	 */
	public function filter_icl_ls_languages_fix_tours_link( $languages ) {
		static $first_call = true;
		if ( $first_call ) {
			$first_call = false;
			// Checks if current page is a tours archive page, otherwise removes the filter.
			if ( ! adventure_tours_check( 'is_tour_search' ) ) {
				remove_filter( 'icl_ls_languages', array( $this, 'filter_icl_ls_languages_fix_tours_link' ), 20 );
				return $languages;
			}
		}

		if ( $languages ) {
			global $sitepress;

			$init_lang = $sitepress->get_current_language();
			foreach ( $languages as $code => $language ) {
				// For WPML version < 3.3.0.
				// $languages[ $code ][ 'url' ] = get_permalink( apply_filters( 'translate_object_id', $tour_page_id, 'page', true, $language['language_code'] ) );

				// For WPML version > 3.3.0.
				$sitepress->switch_lang( $language['language_code'] );
				$languages[ $code ][ 'url' ] = AtTourHelper::get_tours_page_full_url();
			}

			// Restores lang that was used before switches in a filter loop.
			if ( $init_lang != $sitepress->get_current_language() ) {
				$sitepress->switch_lang( $init_lang );
			}
		}

		return $languages;
	}

	/**
	 * Init option keys translations.
	 *
	 * @return boolean
	 */
	protected function _initSettingsTranslation() {
		if ( $this->option_name && ( $this->settings_for_translation || $this->page_id_settings_for_translation ) ) {
			// Adds filter only for the case when this is not the default language.
			if ( $this->getDefaultLang() != $this->getLang() ) {
				add_filter( 'option_' . $this->option_name, array( $this, 'filter_option_get' ) );
			}
			add_filter( 'pre_update_option_' . $this->option_name, array( $this, 'filter_option_update' ), 1, 2 );
			return true;
		}
		return false;
	}

	/**
	 * Filter that implements theme options translation in the admin's area during loading them from DB.
	 *
	 * @param  assoc $option_value option value loaded from DB.
	 * @return assoc
	 */
	public function filter_option_get( $option_value ) {
		// To allow call only once ( for init settings loading).
		$this->get_filter_call_index++;
		if ( $this->get_filter_call_index > 1 ) {
			return $option_value;
		}

		if ( $this->page_id_settings_for_translation ) {
			foreach ( $this->page_id_settings_for_translation as $setting_key ) {
				$new_value = ! empty( $option_value[ $setting_key ] ) ? $option_value[ $setting_key ] : null;
				if ( $new_value ) {
					// For WPML version < 3.2.0.
					// $translated_value = apply_filters( 'translate_object_id', $new_value, 'page', true );
					// Since WPML version 3.2.0.
					$translated_value = apply_filters( 'wpml_object_id', $new_value, 'page', true );
					if ( $translated_value && $translated_value != $new_value ) {
						$option_value[ $setting_key ] = $translated_value;
					}
				}
			}
		}

		if ( $this->settings_for_translation ) {
			$wpml_context = $this->getWpmlContext();
			$current_language = $this->getLang();

			foreach ( $this->settings_for_translation as $setting_key ) {
				$value = isset( $option_value[ $setting_key ] ) ? $option_value[ $setting_key ] : '';
				$option_value[ $setting_key ] = apply_filters( 'wpml_translate_single_string',
					$value,
					$wpml_context,
					$this->getWpmlStringName( $setting_key ),
					$current_language
				);
			}
		}

		return $option_value;
	}

	/**
	 * Filter that implements theme options translation to default language before saving them to DB.
	 *
	 * @param  assoc $option_value
	 * @param  assoc $localized_old_option_value
	 * @return assoc
	 */
	public function filter_option_update( $option_value, $localized_old_option_value ) {
		$default_language = $this->getDefaultLang();
		$current_language = $this->getLang();

		$is_default_language = $default_language == $current_language;

		// Retrives option set in default language.
		$default_lang_option_value = $is_default_language
			? $localized_old_option_value
			: maybe_unserialize( apply_filters('wpml_unfiltered_admin_string', null, VP_OPTION_KEY) );

		// Updates translations for the settings that store some page_id value.
		$page_settings = $this->page_id_settings_for_translation;
		if ( $page_settings ) {
			$languages_list = apply_filters( 'wpml_active_languages', null, '' );
			foreach ( $page_settings as $setting_key ) {
				$new_value = $option_value[ $setting_key ];
				if ( empty( $new_value ) ) {
					if ( !$is_default_language && !empty( $default_lang_option_value[ $setting_key ] ) ) {
						// Restores the original value as it might be reseted because the page
						// has not been translated yet.
						$option_value[ $setting_key ] = $default_lang_option_value[ $setting_key ];
					}
					continue;
				}

				foreach ( $languages_list as $ln_code => $ln_details ) {
					// if ( $default_language != $ln_code ) {
					$tr_value = apply_filters( 'wpml_object_id', $new_value, 'page', true, $ln_code );
					icl_update_string_translation( $this->getWpmlStringName( $setting_key ), $ln_code, $tr_value, ICL_TM_COMPLETE, $translator_id = null, $rec_level = 0 );
				}
				$option_value[ $setting_key ] = apply_filters( 'wpml_object_id', $new_value, 'page', true, $default_language );
			}
		}

		// If current language is not a default one need "revert" setting values that are localized
		// with values from the "original options set" (option in default language),
		// as regardless the current language `$option_value` is always saved in DB for the default language.
		if ( !$is_default_language && $this->settings_for_translation ) {
			foreach ( $this->settings_for_translation as $setting_key ) {
				$value = isset( $option_value[ $setting_key ] ) ? $option_value[ $setting_key ] : '';
				icl_update_string_translation( $this->getWpmlStringName( $setting_key ), $current_language, $value, ICL_TM_COMPLETE, $translator_id = null, $rec_level = 0 );

				if ( isset( $default_lang_option_value[ $setting_key ] ) ) {
					$option_value[ $setting_key ] = $default_lang_option_value[ $setting_key ];
				}
			}
		}

		$option_value['_ts'] = time();

		return $option_value;
	}

	/**
	 * Filters rewrite rules set loaded from DB to translate tour related rewrite rules to the current language.
	 * Rules are generate by `AtTourHelper::filter_rewrite_rules_array`.
	 * 
	 * @param  assoc $rewrite_rules
	 * @return assoc
	 */
	public function filter_option_rewrite_rules_translate_tour_rewrite_rules( $rewrite_rules ) {
		if ( ! $rewrite_rules ) {
			return $rewrite_rules;
		}

		$translated_base = ltrim( AtTourHelper::get_tours_page_local_url( false, false ), '/' );
		$default_base = ltrim( AtTourHelper::get_tours_page_local_url( false, true ), '/' );

		if ( $default_base == $translated_base ) {
			return $rewrite_rules;
		}
		$updated_rules = array();
		foreach($rewrite_rules as $_rule => $_query) {
			$new_rule = preg_replace('#^'.$default_base.'#', $translated_base, $_rule);
			$updated_rules[$new_rule] = $_query;
		}

		return $updated_rules;
	}

	/**
	 * Returns WPML context value for current option name.
	 *
	 * @return string
	 */
	public function getWpmlContext() {
		return "admin_texts_{$this->option_name}";
	}

	/**
	 * Generates WPML string name attribute for specefied option key.
	 *
	 * @param  string $setting_key
	 * @return string
	 */
	public function getWpmlStringName( $setting_key ) {
		return "[{$this->option_name}]{$setting_key}";
	}

	protected function _initMultiCurrenciesProcessing() {
		if ( adventure_tours_check( 'woocommerce_active' ) && version_compare( WC_VERSION, '3.0.0', '<') ) {
			// Required for right price synchronization when variation prices updated on original post edition page
			// and saved via "Save changes" action on Variations panel.
			add_action( 'woocommerce_ajax_save_product_variations', array( $this, 'action_woocommerce_ajax_save_product_variations' ), 1, 2 );
		}
	}

	/**
	 * Changes tour product_type term to 'variable' for variable tours to allow correctly sync variation prices.
	 *
	 * @deprecated since WooCommerce version 3.0.0 and theme version 4.3.1, {@see _initMultiCurrenciesProcessing}
	 * 
	 * @param  string $post_id
	 * @return void
	 */
	public function action_woocommerce_ajax_save_product_variations( $post_id ) {
		$product_type = empty( $_POST['product-type'] ) ? 'simple' : sanitize_title( stripslashes( $_POST['product-type'] ) );
		if ( 'tour' == $product_type ) {
			$is_variable = get_post_meta( $post_id, '_variable_tour', true );
			if ( 'yes' == $is_variable ) {
				// HACK, to process product as variable and will return it back via 'fix_tour_meta' method
				$_POST['product-type'] = 'variable';
				wp_set_object_terms( $post_id, 'variable', 'product_type' );

				$this->ajax_changed_type_product_ids[] = $post_id;

				if ( !$this->ajax_fixer_added ) {
					$this->ajax_fixer_added = true;
					add_action( 'woocommerce_ajax_save_product_variations', array( $this, 'fix_product_type_after_variations_saving' ), 20 );
				}
			}
		}
	}

	/**
	 * Reverts changes done by 'action_woocommerce_ajax_save_product_variations' method.
	 *
	 * @deprecated since WooCommerce version 3.0.0 and theme version 4.3.1, {@see _initMultiCurrenciesProcessing}
	 * 
	 * @param  string $post_id
	 * @return void
	 */
	public function fix_product_type_after_variations_saving( $post_id ) {
		if ( $post_id && $this->ajax_changed_type_product_ids && in_array( $post_id, $this->ajax_changed_type_product_ids ) ) {
			wp_set_object_terms( $post_id, 'tour', 'product_type' );
		}
	}

	/**
	 * Returns default language code.
	 *
	 * @return string
	 */
	protected function getDefaultLang() {
		static $def_lang;
		if ( null === $def_lang ) $def_lang = apply_filters( 'wpml_default_language', '' );
		return $def_lang;
	}

	/**
	 * Returns current language code.
	 *
	 * @return string
	 */
	protected function getLang() {
		return ICL_LANGUAGE_CODE;
	}
}