<?php

/**
 * Description of PhraseFilter
 *
 * @author ma_group
 */

namespace AliNext_Lite;;

class PhraseFilter
{

    public $id = 0;
    public $phrase = '';
    public $phrase_replace = '';
    private static $_instance_objects = null;
    private static $_instance_array = null;

    public function __construct($data = 0)
    {
        if (is_int($data) && $data) {
            $this->id = $data;
            $this->load($this->id);
        } else if (is_array($data)) {
            foreach ($data as $field => $value) {
                if (property_exists(get_class($this), $field)) {
                    $this->$field = stripslashes(trim($value));
                }
            }
        }
    }

    public function save()
    {
        PhraseFilter::$_instance_objects = null;
        PhraseFilter::$_instance_array = null;

        $formula_list = PhraseFilter::load_phrase_list(false);

        if (!intval($this->id)) {
            $this->id = 1;
            foreach ($formula_list as $key => $formula) {
                if (intval($formula['id']) >= $this->id) {
                    $this->id = intval($formula['id']) + 1;
                }
            }
            $formula_list[] = get_object_vars($this);
        } else {
            $boolean = false;
            foreach ($formula_list as $key => $formula) {
                if (intval($formula['id']) === intval($this->id)) {
                    $formula_list[$key] = get_object_vars($this);
                    $boolean = true;
                }
            }
            if (!$boolean) {
                $formula_list[] = get_object_vars($this);
            }
        }

        set_setting('phrase_list', array_values($formula_list));
        return $this;
    }

    public function delete()
    {
        $formula_list = PhraseFilter::load_phrase_list(false);
        foreach ($formula_list as $key => $formula) {
            if (intval($formula['id']) === intval($this->id)) {
                unset($formula_list[$key]);
                set_setting('phrase_list', array_values($formula_list));
            }
        }
    }

    public static function apply_filter_to_text($text, $phrase_list = array())
    {
        if (empty($text)) {
            return $text;
        }

        if (!$phrase_list) {
            $phrase_list = PhraseFilter::load_phrase_list(false);
        }

        if (!empty($phrase_list)) {

            if (function_exists('libxml_use_internal_errors')) {libxml_use_internal_errors(true);}

            if ($text && class_exists('DOMDocument')) {
                $urls = array();

                $doc = new \DOMDocument();
                $doc->loadHTML($text);

                $elements = $doc->getElementsByTagName('a');
                if ($elements->length >= 1) {
                    foreach ($elements as $element) {
                        $url = $element->getAttribute('href');
                        if (trim($url)) {
                            $urls[Utils::buildIdFromUrl($url)] = $url;
                        }
                    }
                }

                $elements = $doc->getElementsByTagName('img');
                if ($elements->length >= 1) {
                    foreach ($elements as $element) {
                        $url = $element->getAttribute('src');
                        if (trim($url)) {
                            $urls[Utils::buildImageIdFromPath($url)] = $url;
                        }
                    }
                }

                $search_a = array();
                $replace_a = array();
                foreach ($urls as $key => $url) {
                    $search_a[] = '/' . preg_quote($url, '/') . '/u';
                    $replace_a[] = $key;
                }
                $text = preg_replace($search_a, $replace_a, $text);

                $phrase = array();
                $phrase_replace = array();
                foreach ($phrase_list as $p) {
                    $phrase[] = '/' . preg_quote($p['phrase'], '/') . '/u';
                    $phrase_replace[] = $p['phrase_replace'];
                }
                $text = preg_replace($phrase, $phrase_replace, $text);

                $search_a = array();
                $replace_a = array();
                foreach ($urls as $key => $url) {
                    $search_a[] = '/' . preg_quote($key, '/') . '/u';
                    $replace_a[] = $url;
                }
                $text = preg_replace($search_a, $replace_a, $text);
            }
        }

        return $text;
    }

    /**
     * Apply phrase filter to wc product (title, description, attributes)
     *
     * @param mixed $product
     */
    public static function apply_filter_to_product($product)
    {

        if ($product['title']) {
            $product['title'] = self::apply_filter_to_text($product['title']);
        }

        if ($product['description']) {
            $product['description'] = self::apply_filter_to_text($product['description']);
        }

        if (isset($product['attribute']) && is_array($product['attribute'])) {
            foreach ($product['attribute'] as &$attr) {
                $attr['name'] = self::apply_filter_to_text($attr['name']);
                if (is_array($attr['value'])) {
                    foreach ($attr['value'] as $k => $v) {
                        $attr['value'][$k] = self::apply_filter_to_text($attr['value'][$k]);
                    }
                } else {
                    $attr['value'] = self::apply_filter_to_text($attr['value']);
                }
            }
        }

        return $product;
    }

    public static function apply_filter_to_products()
    {
        global $wpdb;

        $phrase_list = PhraseFilter::load_phrase_list(false);

        $phrase_query_array = array();
        foreach ($phrase_list as $phrase) {
            $phrase_query_array[] = $wpdb->prepare("post_title LIKE %s OR post_content LIKE %s", array('%' . $wpdb->esc_like($phrase['phrase']) . '%', '%' . $wpdb->esc_like($phrase['phrase']) . '%'));
        }

        $sqlQueryPart = implode(" OR ", $phrase_query_array);

        $sql = "SELECT p.ID, p.post_title, p.post_content from {$wpdb->posts} p " .
              "LEFT JOIN {$wpdb->postmeta} as pm ON pm.post_id = p.ID " .
              "WHERE (" . $sqlQueryPart . ") AND pm.meta_key = '_a2w_external_id'";


        $tmp_product_ids = $wpdb->get_results(
            // phpcs:ignore WordPress.DB.PreparedSQL.NotPrepared
            $sql,
            ARRAY_N
        );
        foreach ($tmp_product_ids as $row) {
            $new_title = PhraseFilter::apply_filter_to_text($row[1], $phrase_list);
            $new_content = PhraseFilter::apply_filter_to_text($row[2], $phrase_list);
            if ($new_title != $row[1] || $new_content != $row[2]) {
                $wpdb->query($wpdb->prepare("UPDATE {$wpdb->posts} p SET p.post_title = %s, p.post_content = %s WHERE p.ID=%s", array($new_title, $new_content, $row[0])));
            }
        }
    }

    /**
     * Apply phrase filter to reviews keeping in database currently (review author, review text)
     */
    public static function apply_filter_to_reviews()
    {
        global $wpdb;

        $phrase_list = PhraseFilter::load_phrase_list(false);

        $phrase_query_array = array();
        foreach ($phrase_list as $phrase) {
            $phrase_query_array[] = $wpdb->prepare("comment_author LIKE %s OR comment_content LIKE %s", array('%' . $wpdb->esc_like($phrase['phrase']) . '%', '%' . $wpdb->esc_like($phrase['phrase']) . '%'));
        }

        $sqlQueryPart = implode(" OR ", $phrase_query_array);

        $sql = "SELECT c.comment_ID, c.comment_author, c.comment_content FROM {$wpdb->comments} c " .
               "LEFT JOIN {$wpdb->commentmeta} as cm ON cm.comment_id = c.comment_ID " .
               "WHERE (" . $sqlQueryPart . ") AND cm.meta_key = 'a2wl_country'";

        $tmp_comment_ids = $wpdb->get_results(
            // phpcs:ignore WordPress.DB.PreparedSQL.NotPrepared
            $sql,
        ARRAY_N
        );

        foreach ($tmp_comment_ids as $row) {
            $new_author = PhraseFilter::apply_filter_to_text($row[1], $phrase_list);
            $new_content = PhraseFilter::apply_filter_to_text($row[2], $phrase_list);
            if ($new_author != $row[1] || $new_content != $row[2]) {
                $wpdb->query($wpdb->prepare("UPDATE {$wpdb->comments} c SET c.comment_author = %s, c.comment_content = %s WHERE c.comment_ID=%d", array($new_author, $new_content, $row[0])));
            }
        }
    }

    public static function deleteAll()
    {
        del_setting('phrase_list');
    }

    public static function load_phrases()
    {
        return PhraseFilter::load_phrase_list(true);
    }

    private static function load_phrase_list($asObject = true)
    {
        $result = array();

        if ($asObject && PhraseFilter::$_instance_objects) {
            return PhraseFilter::$_instance_objects;
        } else if (!$asObject && PhraseFilter::$_instance_array) {
            return PhraseFilter::$_instance_array;
        }

        $formula_list = get_setting('phrase_list');
        $formula_list = $formula_list && is_array($formula_list) ? $formula_list : array();

        if ($asObject) {
            foreach ($formula_list as $formula) {
                $fo = new PhraseFilter();
                foreach ($formula as $name => $value) {
                    if (property_exists(get_class($fo), $name)) {
                        $fo->$name = $value;
                    }
                }
                $result[] = $fo;
                PhraseFilter::$_instance_objects = $result;
            }
        } else {
            $result = $formula_list;
            PhraseFilter::$_instance_array = $result;
        }

        return $result;
    }

}

function phrase_apply_filter_to_text($text)
{
    return PhraseFilter::apply_filter_to_text($text);
}