<?php
if (!defined('ABSPATH')) {
    exit; // Exit if accessed directly
}

final class WOOBE_HISTORY extends WOOBE_EXT {

    protected $slug = 'history'; //unique
    private $table = 'woobe_history'; //1 field key operations
    private $table_bulk = 'woobe_history_bulk'; //bulk operations heads

    public function __construct() {
        global $wpdb;
        $this->table = $wpdb->prefix . $this->table;
        $this->table_bulk = $wpdb->prefix . $this->table_bulk;

        add_action('woobe_ext_scripts', array($this, 'woobe_ext_scripts'), 1);

        //ajax
        add_action('wp_ajax_woobe_history_revert_product', array($this, 'woobe_history_revert_product'), 1);
        add_action('wp_ajax_woobe_history_get_bulk_count', array($this, 'woobe_history_get_bulk_count'), 1);
        add_action('wp_ajax_woobe_history_revert_bulk_portion', array($this, 'woobe_history_revert_bulk_portion'), 1);
        add_action('wp_ajax_woobe_get_history_list', array($this, 'woobe_get_history_list'), 1);
        add_action('wp_ajax_woobe_history_clear', array($this, 'woobe_history_clear'), 1);
        add_action('wp_ajax_woobe_history_delete_solo', array($this, 'woobe_history_delete_solo'), 1);
        add_action('wp_ajax_woobe_history_delete_bulk', array($this, 'woobe_history_delete_bulk'), 1);

        //tabs
        $this->add_tab($this->slug, 'panel', esc_html__('History', 'woo-bulk-editor'), 'undo');
        add_action('woobe_ext_panel_' . $this->slug, array($this, 'woobe_ext_panel'), 1);

        //hooks
        add_action('woobe_bulk_started', array($this, 'start_bulk'), 10, 1);
        add_action('woobe_bulk_going', array($this, 'count_bulked_products'), 10, 2);
        add_action('woobe_bulk_finished', array($this, 'finish_bulk'), 10, 1);
        add_action('woobe_before_update_page_field', array($this, 'write'), 10, 3);
    }

    public function woobe_ext_scripts() {
        wp_enqueue_script('woobe_ext_' . $this->slug, $this->get_ext_link() . 'assets/js/' . $this->slug . '.js', array(), WOOBE_VERSION);
        wp_enqueue_style('woobe_ext_' . $this->slug, $this->get_ext_link() . 'assets/css/' . $this->slug . '.css', array(), WOOBE_VERSION);
        ?>
        <script>
            lang.<?php echo esc_attr($this->slug) ?> = {};
            lang.<?php echo esc_attr($this->slug) ?>.reverting = '<?php esc_html_e('Reverting', 'woo-bulk-editor') ?> ...';
            lang.<?php echo esc_attr($this->slug) ?>.reverted = '<?php esc_html_e('Reverted!', 'woo-bulk-editor') ?>';
            lang.<?php echo esc_attr($this->slug) ?>.wait_until_finish = '<?php esc_html_e('Wait please while data reverting is going!', 'woo-bulk-editor') ?>';
            lang.<?php echo esc_attr($this->slug) ?>.clearing = '<?php esc_html_e('History clearing ...', 'woo-bulk-editor') ?>';
            lang.<?php echo esc_attr($this->slug) ?>.cleared = '<?php esc_html_e('History is cleared!', 'woo-bulk-editor') ?>';
            lang.<?php echo esc_attr($this->slug) ?>.history_is_going = "<?php echo esc_html__('ATTENTION: History operation is going!', 'woo-bulk-editor') ?>";
        </script>
        <?php
    }

    public function woobe_ext_panel() {
        $data = array();
        $this->install_tables();
        WOOBE_HELPER::render_html_e($this->get_ext_path() . 'views/panel.php', $data);
    }

    //install history tables
    private function install_tables() {

        global $wpdb;

        $checktable = $wpdb->query("SHOW TABLES LIKE '{$this->table}'");

        if ($checktable) {
            return;
        }

        //***


        $charset_collate = '';

        if (method_exists($wpdb, 'has_cap') AND $wpdb->has_cap('collation')) {
            if (!empty($wpdb->charset)) {
                $charset_collate = "DEFAULT CHARACTER SET $wpdb->charset";
            }
            if (!empty($wpdb->collate)) {
                $charset_collate .= " COLLATE $wpdb->collate";
            }
        }

        //***

        $sql1 = "CREATE TABLE IF NOT EXISTS `{$this->table}` (
  `id` int(12) NOT NULL AUTO_INCREMENT,
  `field_key` varchar(32) NOT NULL,
  `product_id` int(11) NOT NULL,
  `prev_val` text,
  `mod_date` int(11) NOT NULL COMMENT 'modification time',
  `bulk_key` varchar(16) DEFAULT NULL COMMENT 'is changed in the bulk flow?',
  `user_id` int(11) NOT NULL,
  PRIMARY KEY (id),
  INDEX `product_id` (`product_id`),
  INDEX `bulk_key` (`bulk_key`),
  KEY `user_id` (`user_id`)
) {$charset_collate}";

        if ($wpdb->query($sql1) === false) {
            ?>
            <div class="error notice">
                <p class="description"><?php esc_html_e("BEAR cannot create the database table! Make sure that your mysql user has the CREATE privilege! Do it manually using your host panel phpmyadmin!", 'woo-bulk-editor') ?></p>
                <code><?php echo esc_sql($sql1) ?></code>
                <?php
                echo esc_html($wpdb->last_error);
                ?>
            </div>
            <?php
        }

        //***

        $sql2 = "CREATE TABLE IF NOT EXISTS `{$this->table_bulk}` (
  `id` int(12) NOT NULL AUTO_INCREMENT,
  `bulk_key` varchar(16) NOT NULL,
  `state` enum('completed','terminated') NOT NULL DEFAULT 'terminated',
  `started` int(11) DEFAULT NULL,
  `finished` int(11) DEFAULT NULL,
  `products_count` int(11) DEFAULT '0',
  `set_of_keys` text,
  `user_id` int(11) NOT NULL,
  PRIMARY KEY (id),
  INDEX `bulk_key` (`bulk_key`),
  KEY `user_id` (`user_id`)
) {$charset_collate}";

        if ($wpdb->query($sql2) === false) {
            ?>
            <div class="error notice">
                <p class="description"><?php esc_html_e("BEAR cannot create the database table! Make sure that your mysql user has the CREATE privilege! Do it manually using your host panel phpmyadmin!", 'woo-bulk-editor') ?></p>
                <code><?php echo esc_sql($sql2) ?></code>
                <?php
                echo esc_html($wpdb->last_error);
                ?>
            </div>
            <?php
        }
    }

    //***

    public function get_history() {
        $history = array();
        global $wpdb, $WOOBE;
        $user_id = get_current_user_id();

        if ($WOOBE->show_notes) {
            $solo = $wpdb->get_results("SELECT * FROM {$this->table} WHERE bulk_key IS NULL AND user_id={$user_id} ORDER BY mod_date DESC LIMIT 2", ARRAY_A);
            $bulk = $wpdb->get_results("SELECT * FROM {$this->table_bulk} WHERE user_id={$user_id} ORDER BY started DESC LIMIT 2", ARRAY_A);

            $bulk_ids = array();
            if (!empty($bulk)) {
                foreach ($bulk as $v) {
                    $bulk_ids[] = $v['id'];
                }
                $bulk_ids = implode(',', $bulk_ids);
                $wpdb->query("DELETE FROM {$this->table_bulk} WHERE user_id={$user_id} AND id NOT IN ({$bulk_ids})");
            }


            $solo_ids = array();
            if (!empty($solo)) {
                foreach ($solo as $v) {
                    $solo_ids[] = $v['id'];
                }
                $solo_ids = implode(',', $solo_ids);
                $wpdb->query("DELETE FROM {$this->table} WHERE user_id={$user_id} AND bulk_key IS NULL AND id NOT IN ({$solo_ids})");
            }
        } else {
            $solo = $wpdb->get_results("SELECT * FROM {$this->table} WHERE bulk_key IS NULL AND user_id={$user_id} ORDER BY mod_date DESC", ARRAY_A);
            $bulk = $wpdb->get_results("SELECT * FROM {$this->table_bulk} WHERE user_id={$user_id} ORDER BY started DESC", ARRAY_A);
        }


        //***

        $time_keys = array();
        if (!empty($solo)) {
            foreach ($solo as $key => $value) {
                $time_keys[] = $value['mod_date'];
                $solo[$value['mod_date']] = $value;
                unset($solo[$key]);
            }
        }

        if (!empty($bulk)) {
            foreach ($bulk as $key => $value) {
                $time_keys[] = $value['started'];
                $bulk[$value['started']] = $value;
                unset($bulk[$key]);
            }
        }

        //***

        if (!empty($time_keys)) {
            foreach ($time_keys as $t) {
                if (isset($solo[$t])) {
                    $history[$t] = $solo[$t];
                } else {
                    $history[$t] = $bulk[$t];
                }
            }

            ksort($history, SORT_NUMERIC);
            $history = array_reverse($history);

            if ($WOOBE->show_notes) {
                if (count($history) > 2) {
                    $history = array_slice($history, 0, 2);
                }
            }
        }


        return $history;
    }

    public function start_bulk($bulk_key) {
        global $wpdb;
        $woobe_bulk = $this->storage->get_val('woobe_bulk_' . strtolower($bulk_key));

        $wpdb->insert($this->table_bulk, array(
            'bulk_key' => $bulk_key,
            'started' => current_time('timestamp', FALSE),
            'set_of_keys' => !empty($woobe_bulk['is']) ? json_encode(array_keys($woobe_bulk['is'])) : '',
            'user_id' => get_current_user_id()
        ));
    }

    public function count_bulked_products($bulk_key, $products_count, $sign = '+') {
        global $wpdb;
        $user_id = get_current_user_id();
        $wpdb->query("UPDATE {$this->table_bulk} SET products_count = products_count {$sign} {$products_count} WHERE bulk_key = '{$bulk_key}' AND user_id={$user_id}");
    }

    public function finish_bulk($bulk_key) {
        global $wpdb;
        $wpdb->update($this->table_bulk, array(
            'state' => 'completed',
            'finished' => current_time('timestamp', FALSE),
                ), array('bulk_key' => $bulk_key, 'user_id' => get_current_user_id()));
    }

    //for hook woobe_before_update_page_field
    public function write($field_key, $product_id, $post_parent = 0) {
        global $wpdb;

        if (empty($field_key) OR empty($product_id)) {
            return;
        }

        //fix for description of one variation
        $field_type = $this->settings->get_fields()[$field_key]['field_type'];

        $prev_val = $this->products->get_post_field($product_id, $field_key, $post_parent);

        switch ($field_type) {
            case 'taxonomy':
                $tmp = array();
                if (!empty($prev_val)) {
                    foreach ($prev_val as $t) {
                        $tmp[] = $t->term_id;
                    }
                } else {
                    $prev_val = '';
                }
                $prev_val = json_encode($tmp);
                break;

            case 'attribute':

                if (!empty($prev_val)) {
                    $prev_val = json_encode($prev_val);
                } else {
                    $prev_val = '';
                }

                break;

            case 'prop':

                if ($field_key == 'stock_status') {
                    $prev_val = ('instock' == $prev_val ? 1 : 0);
                }

                break;

            case 'gallery':
            case 'upsells':
            case 'cross_sells':
            case 'grouped':
                if (!empty($prev_val)) {
                    $prev_val = json_encode($prev_val);
                } else {
                    $prev_val = '';
                }
                break;

            case 'downloads':
                $tmp = array();

                if (!empty($prev_val)) {
                    foreach ($prev_val as $hash => $file) {
                        $tmp[] = array(
                            'name' => $file['name'],
                            'file' => $file['file'],
                            'hash' => $hash
                        );
                    }
                    $prev_val = json_encode($tmp);
                } else {
                    $prev_val = '';
                }


                break;
        }

        //for all another cases
        if (is_array($prev_val)) {
            if ($this->settings->get_fields()[$field_key]['edit_view'] == 'meta_popup_editor') {
                $prev_val = json_encode($prev_val, JSON_HEX_QUOT | JSON_HEX_TAG);
            } else {
                $prev_val = json_encode($prev_val);
            }
        }

        //***

        try {
            $wpdb->insert($this->table, array(
                'field_key' => $field_key,
                'product_id' => $product_id,
                'prev_val' => $prev_val,
                'mod_date' => current_time('timestamp', FALSE) + rand(0, 30), //rand - to avoid the same unix time for different DB table rows
                'bulk_key' => isset($_REQUEST['woobe_bulk_key']) ? WOOBE_HELPER::sanitize_bulk_key($_REQUEST['woobe_bulk_key']) : NULL,
                'user_id' => get_current_user_id()
            ));
        } catch (Exception $e) {
            print_r($e);
        }

        //return $wpdb->insert_id;
    }

    //removing 1 row of data from the history
    private function delete($table, $id, $field = 'id') {
        global $wpdb;
        $wpdb->delete($table, array(
            $field => $id,
            'user_id' => get_current_user_id()
        ));
    }

    private function revert($id) {
        global $wpdb;

        remove_all_actions('woobe_before_update_page_field');

        $user_id = get_current_user_id();

        $solo = $wpdb->get_row("SELECT * FROM {$this->table} WHERE id={$id} AND user_id={$user_id}", ARRAY_A);

        if (!empty($solo)) {

            switch ($this->settings->get_fields()[$solo['field_key']]['field_type']) {
                case 'taxonomy':
                case 'attribute':
                case 'gallery':
                case 'upsells':
                case 'cross_sells':
                case 'grouped':
                    if (!empty($solo['prev_val'])) {
                        $solo['prev_val'] = json_decode($solo['prev_val']);
                    } else {
                        $solo['prev_val'] = NULL;
                    }
                    break;

                case 'downloads':
                    $prev_val = json_decode($solo['prev_val'], true);
                    $solo['prev_val'] = array();

                    if (!empty($prev_val)) {
                        $solo['prev_val']['_wc_file_names'] = array();
                        $solo['prev_val']['_wc_file_hashes'] = array();
                        $solo['prev_val']['_wc_file_urls'] = array();
                        foreach ($prev_val as $f) {
                            $solo['prev_val']['_wc_file_names'][] = $f['name'];
                            $solo['prev_val']['_wc_file_hashes'][] = $f['hash'];
                            $solo['prev_val']['_wc_file_urls'][] = $f['file'];
                        }
                    }

                    break;

                case 'meta':
                    //for serialized arrays in meta fields
                    //if (maybe_serialize($solo['prev_val'])) {
                    if (is_string($solo['prev_val']) && is_array(json_decode($solo['prev_val'], true)) && (json_last_error() == JSON_ERROR_NONE)) {
                        $solo['prev_val'] = json_decode($solo['prev_val'], true);
                    }
                    break;
            }

            //fix when reverting to the empty value, for example set null to calendar field as date_on_sale_from
            if (is_null($solo['prev_val'])) {
                $solo['prev_val'] = 0;
            }

            $this->products->update_page_field($solo['product_id'], $solo['field_key'], $solo['prev_val']);
            /*
              if (!empty($solo['bulk_key'])) {
              $this->count_bulked_products($solo['bulk_key'], 1, '-');
              }
             * 
             */
        }

        $this->delete($this->table, $id);
    }

    private function wipe_history() {
        global $wpdb;
        //$wpdb->query('TRUNCATE TABLE ' . $this->table);
        //$wpdb->query('TRUNCATE TABLE ' . $this->table_bulk);
        global $wpdb;
        $wpdb->delete($this->table, array(
            'user_id' => get_current_user_id()
        ));

        $wpdb->delete($this->table_bulk, array(
            'user_id' => get_current_user_id()
        ));
    }

    //ajax
    public function woobe_history_revert_product() {
        if (!current_user_can('manage_woocommerce')) {
            die('0');
        }
        if (!isset($_REQUEST['history_nonce']) || !wp_verify_nonce($_REQUEST['history_nonce'], 'woobe_history_panel_nonce')) {
            die('0');
        }
        //***

        $this->revert(intval($_REQUEST['id']));

        exit;
    }

    //ajax
    public function woobe_history_get_bulk_count() {
		if (!isset($_REQUEST['history_nonce']) || !wp_verify_nonce($_REQUEST['history_nonce'], 'woobe_history_panel_nonce')) {
            die('0');
        }	
        global $wpdb;
        $user_id = get_current_user_id();
        $bulk_key = WOOBE_HELPER::sanitize_bulk_key($_REQUEST['bulk_key']);
        die(esc_html($wpdb->get_var("SELECT COUNT(*) FROM {$this->table} WHERE bulk_key = '{$bulk_key}' AND user_id={$user_id}")));
    }

    //ajax
    public function woobe_history_revert_bulk_portion() {
        if (!current_user_can('manage_woocommerce')) {
            die('0');
        }
		if (!isset($_REQUEST['history_nonce']) || !wp_verify_nonce($_REQUEST['history_nonce'], 'woobe_history_panel_nonce')) {
            die('0');
        }
        global $wpdb;

        //***

        $bulk_key = WOOBE_HELPER::sanitize_bulk_key($_REQUEST['bulk_key']);
        $limit = intval($_REQUEST['limit']);
        $user_id = get_current_user_id();

        $rows = $wpdb->get_results("SELECT id FROM {$this->table} WHERE bulk_key='{$bulk_key}' AND user_id={$user_id} LIMIT {$limit}", ARRAY_A);

        if (!empty($rows)) {
            foreach ($rows as $r) {
                $this->revert($r['id']);
            }
        }

        //***

        $removed_count = intval($_REQUEST['removed_count']) + $limit;
        $total_count = intval($_REQUEST['total_count']);

        if (($total_count - $removed_count) <= 0) {
            $this->delete($this->table_bulk, $bulk_key, 'bulk_key');
        }

        exit;
    }

    //ajax
    public function woobe_get_history_list() {
		if (!isset($_REQUEST['history_nonce']) || !wp_verify_nonce($_REQUEST['history_nonce'], 'woobe_history_panel_nonce')) {
            die('0');
        }		
        $data = array();
        $data['history'] = $this->get_history();
        $data['settings_fields'] = $this->settings->get_fields();
        $data['settings_fields_full'] = (array)$this->settings->get_fields(false);
        $data['products_obj'] = $this->products;
        WOOBE_HELPER::render_html_e($this->get_ext_path() . 'views/list.php', $data);
        exit;
    }

    //ajax
    public function woobe_history_clear() {
		if (!isset($_REQUEST['history_nonce']) || !wp_verify_nonce($_REQUEST['history_nonce'], 'woobe_history_panel_nonce')) {
            die('0');
        }			
        $this->wipe_history();
        exit;
    }

    //ajax
    public function woobe_history_delete_solo() {
		if (!isset($_REQUEST['history_nonce']) || !wp_verify_nonce($_REQUEST['history_nonce'], 'woobe_history_panel_nonce')) {
            die('0');
        }		
        $this->delete($this->table, intval($_REQUEST['id']));
        exit;
    }

    //ajax
    public function woobe_history_delete_bulk() {
		if (!isset($_REQUEST['history_nonce']) || !wp_verify_nonce($_REQUEST['history_nonce'], 'woobe_history_panel_nonce')) {
            die('0');
        }			
        $this->delete($this->table, WOOBE_HELPER::sanitize_bulk_key($_REQUEST['bulk_key']), 'bulk_key');
        $this->delete($this->table_bulk, WOOBE_HELPER::sanitize_bulk_key($_REQUEST['bulk_key']), 'bulk_key');
        exit;
    }

}
