<?php
/**
 * Import Functions
 *
 * @package    Widget_Importer_Exporter
 * @subpackage Functions
 * @copyright  Copyright (c) 2013 - 2020, ChurchThemes.com, LLC
 * @link       https://churchthemes.com/plugins/widget-importer-exporter/
 * @license    https://www.gnu.org/licenses/gpl-2.0.html GPL-2.0-or-later
 * @since      0.3
 */

defined('ABSPATH') || exit; // No direct access.

/**
 * Process submit
 *
 * Process uploaded file or pasted contents. If both, use pasted content.
 * If neither, show an error telling to use one or the other method.
 *
 * @since 1.6
 */
function wie_process_submit()
{
	// Form not posted
	if (empty($_POST)) {
		return;
	}

	// Check nonce
	check_admin_referer('wie_import', 'wie_import_nonce');

	// Content pasted
	if (! empty($_POST['wie_import_data'])) {
		wie_submit_import_data();
	}

	// File uploaded (but not content pasted)
	else if (! empty($_FILES['wie_import_file']['name'])) {
		wie_upload_import_file();
	}

	// Nothing provided
	else {
		wp_die(
			wp_kses(
				__("You must choose a <b>.wie</b> file to upload or paste its contents.", 'widget-importer-exporter'),
				array(
					'b' => array(),
				)
			),
			'',
			array(
				'back_link' => true,
			)
		);
	}
}

add_action('load-tools_page_widget-importer-exporter', 'wie_process_submit');

/**
 * Submit import data (copy and paste from file)
 *
 * If file and content both provided, uses content.
 *
 * @since 1.6
 * @global string $wie_import_results
 */
function wie_submit_import_data()
{
	global $wie_import_results;

	check_admin_referer('wie_import', 'wie_import_nonce');

	if (! empty($_POST['wie_import_data'])) {
		$content = '';

		// Get content pasted
		$content = filter_var(wp_unslash($_POST['wie_import_data']), FILTER_DEFAULT);
		$content = trim($content);

		// Import the widget data
		// Make results available for display on import/export page.
		$data               = json_decode($content);   // Decode file contents to JSON data.
		$wie_import_results = wie_import_data($data);
	}
}

/**
 * Upload import file
 *
 * If file and content provided, uses content.
 *
 * @since 0.3
 */
function wie_upload_import_file()
{
	check_admin_referer('wie_import', 'wie_import_nonce');

	if (! empty($_FILES['wie_import_file']['name'])) {

		// Workaround for .wie upload issue introduced by WordPress 4.9.9 / 5.0.1.
		add_filter('wp_check_filetype_and_ext', 'wie_allow_multiple_mime_types', 10, 4);

		// Workaround for upload bug in WordPress 4.7.1.
		// This will only be applied for WordPress 4.7.1. Other versions are not affected.
		add_filter('wp_check_filetype_and_ext', 'wie_disable_real_mime_check', 10, 4);

		// Uploaded file.
		$uploaded_file          = wp_unslash($_FILES['wie_import_file']); // phpcs:ignore WordPress.Security.ValidatedSanitizedInput.InputNotSanitized
		$uploaded_file_name     = isset($uploaded_file['name']) ? sanitize_file_name($uploaded_file['name']) : '';
		$uploaded_file_tmp_name = isset($uploaded_file['tmp_name']) ? sanitize_file_name($uploaded_file['tmp_name']) : '';

		// Check file type.
		// This will also fire if no file uploaded.
		$wp_filetype = wp_check_filetype_and_ext($uploaded_file_tmp_name, $uploaded_file_name, false);
		if ('wie' !== $wp_filetype['ext'] && ! wp_match_mime_types( 'wie', $wp_filetype['type'] )) {
			wp_die(
				wp_kses(
					sprintf(
						/* translators: %1$s is link to resource to help with error */
						__('You must upload a <b>.wie</b> file generated by this plugin (<a href="%1$s" target="_blank">help</a>).', 'widget-importer-exporter'),
						'https://churchthemes.com/go/wie-import-sticky'
					),
					array(
						'b' => array(),
						'a' => array(
							'href'   => array(),
							'target' => array(),
						)
					)
				),
				'',
				array(
					'back_link' => true,
				)
			);
		}

		// Check and move file to uploads dir, get file data
		// Will show die with WP errors if necessary (file too large, quota exceeded, etc.).
		$file_data = wp_handle_upload($uploaded_file, array(
			'test_form' => false,
		));

		if (isset($file_data['error'])) {
			wp_die(
				esc_html($file_data['error']),
				'',
				array(
					'back_link' => true,
				)
			);
		}

		// Process import file.
		wie_process_import_file($file_data['file']);
	}
}

/**
 * Process import file
 *
 * This parses a file and triggers importation of its widgets.
 *
 * @since 0.3
 * @param string $file Path to .wie file uploaded.
 * @global string $wie_import_results
 */
function wie_process_import_file($file)
{
	global $wie_import_results;

	// File exists?
	if (! file_exists($file)) {
		wp_die(
			esc_html__('Import file could not be found. Please try again.', 'widget-importer-exporter'),
			'',
			array(
				'back_link' => true,
			)
		);
	}

	// Get file contents and decode.
	$data = implode('', file($file));
	$data = json_decode($data);

	// Delete import file.
	unlink($file);

	// Import the widget data
	// Make results available for display on import/export page.
	$wie_import_results = wie_import_data($data);
}

/**
 * Import widget JSON data
 *
 * @since 0.4
 * @global array $wp_registered_sidebars
 * @param object $data JSON widget data from .wie file.
 * @return array Results array
 */
function wie_import_data($data)
{
	global $wp_registered_sidebars;

	// Have valid data?
	// If no data or could not decode.
	if (empty($data) || ! is_object($data)) {
		wp_die(
			esc_html__('Import data is invalid.', 'widget-importer-exporter'),
			'',
			array(
				'back_link' => true,
			)
		);
	}

	// Hook before import.
	do_action('wie_before_import');
	$data = apply_filters('wie_import_data', $data);

	// Get all available widgets site supports.
	$available_widgets = wie_available_widgets();

	// Get all existing widget instances.
	$widget_instances = array();
	foreach ($available_widgets as $widget_data) {
		$widget_instances[$widget_data['id_base']] = get_option('widget_' . $widget_data['id_base']);
	}

	// Begin results.
	$results = array();

	// Loop import data's sidebars.
	foreach ($data as $sidebar_id => $widgets) {
		// Skip inactive widgets (should not be in export file).
		if ('wp_inactive_widgets' === $sidebar_id) {
			continue;
		}

		// Check if sidebar is available on this site.
		// Otherwise add widgets to inactive, and say so.
		if (isset($wp_registered_sidebars[$sidebar_id])) {
			$sidebar_available    = true;
			$use_sidebar_id       = $sidebar_id;
			$sidebar_message_type = 'success';
			$sidebar_message      = '';
		} else {
			$sidebar_available    = false;
			$use_sidebar_id       = 'wp_inactive_widgets'; // Add to inactive if sidebar does not exist in theme.
			$sidebar_message_type = 'error';
			$sidebar_message      = esc_html__('Widget area does not exist in theme (using Inactive)', 'widget-importer-exporter');
		}

		// Result for sidebar
		// Sidebar name if theme supports it; otherwise ID.
		$results[$sidebar_id]['name']         = ! empty($wp_registered_sidebars[$sidebar_id]['name']) ? $wp_registered_sidebars[$sidebar_id]['name'] : $sidebar_id;
		$results[$sidebar_id]['message_type'] = $sidebar_message_type;
		$results[$sidebar_id]['message']      = $sidebar_message;
		$results[$sidebar_id]['widgets']      = array();

		// Loop widgets.
		foreach ($widgets as $widget_instance_id => $widget) {
			$fail = false;

			// Get id_base (remove -# from end) and instance ID number.
			$id_base            = preg_replace('/-[0-9]+$/', '', $widget_instance_id);
			$instance_id_number = str_replace($id_base . '-', '', $widget_instance_id);

			// Does site support this widget?
			if (! $fail && ! isset($available_widgets[$id_base])) {
				$fail                = true;
				$widget_message_type = 'error';
				$widget_message      = esc_html__('Site does not support widget', 'widget-importer-exporter'); // Explain why widget not imported.
			}

			// Filter to modify settings object before conversion to array and import
			// Leave this filter here for backwards compatibility with manipulating objects (before conversion to array below)
			// Ideally the newer wie_widget_settings_array below will be used instead of this.
			$widget = apply_filters('wie_widget_settings', $widget);

			// Convert multidimensional objects to multidimensional arrays
			// Some plugins like Jetpack Widget Visibility store settings as multidimensional arrays
			// Without this, they are imported as objects and cause fatal error on Widgets page
			// If this creates problems for plugins that do actually intend settings in objects then may need to consider other approach: https://wordpress.org/support/topic/problem-with-array-of-arrays
			// It is probably much more likely that arrays are used than objects, however.
			$widget = json_decode(wp_json_encode($widget), true);

			// Filter to modify settings array
			// This is preferred over the older wie_widget_settings filter above
			// Do before identical check because changes may make it identical to end result (such as URL replacements).
			$widget = apply_filters('wie_widget_settings_array', $widget);

			// Does widget with identical settings already exist in same sidebar?
			if (! $fail && isset($widget_instances[$id_base])) {
				// Get existing widgets in this sidebar.
				$sidebars_widgets = get_option('sidebars_widgets');
				$sidebar_widgets  = isset($sidebars_widgets[$use_sidebar_id]) ? $sidebars_widgets[$use_sidebar_id] : array(); // Check Inactive if that's where will go.

				// Loop widgets with ID base.
				$single_widget_instances = ! empty($widget_instances[$id_base]) ? $widget_instances[$id_base] : array();
				foreach ($single_widget_instances as $check_id => $check_widget) {
					// Is widget in same sidebar and has identical settings?
					if (in_array("$id_base-$check_id", $sidebar_widgets, true) && (array) $widget === $check_widget) {
						$fail                = true;
						$widget_message_type = 'warning';

						// Explain why widget not imported.
						$widget_message = esc_html__('Widget already exists', 'widget-importer-exporter');

						break;
					}
				}
			}

			// No failure.
			if (! $fail) {
				// Add widget instance
				$single_widget_instances   = get_option('widget_' . $id_base); // All instances for that widget ID base, get fresh every time.
				$single_widget_instances   = ! empty($single_widget_instances) ? $single_widget_instances : array(
					'_multiwidget' => 1,   // Start fresh if have to.
				);
				$single_widget_instances[] = $widget; // Add it.

				// Get the key it was given.
				end($single_widget_instances);
				$new_instance_id_number = key($single_widget_instances);

				// If key is 0, make it 1
				// When 0, an issue can occur where adding a widget causes data from other widget to load,
				// and the widget doesn't stick (reload wipes it).
				if ('0' === strval($new_instance_id_number)) {
					$new_instance_id_number = 1;
					$single_widget_instances[$new_instance_id_number] = $single_widget_instances[0];
					unset($single_widget_instances[0]);
				}

				// Move _multiwidget to end of array for uniformity.
				if (isset($single_widget_instances['_multiwidget'])) {
					$multiwidget = $single_widget_instances['_multiwidget'];
					unset($single_widget_instances['_multiwidget']);
					$single_widget_instances['_multiwidget'] = $multiwidget;
				}

				// Update option with new widget.
				update_option('widget_' . $id_base, $single_widget_instances);

				// Assign widget instance to sidebar.
				// Which sidebars have which widgets, get fresh every time.
				$sidebars_widgets = get_option('sidebars_widgets');

				// Avoid rarely fatal error when the option is an empty string
				// https://github.com/churchthemes/widget-importer-exporter/pull/11.
				if (! $sidebars_widgets) {
					$sidebars_widgets = array();
				}

				// Use ID number from new widget instance.
				$new_instance_id = $id_base . '-' . $new_instance_id_number;

				// Add new instance to sidebar.
				$sidebars_widgets[$use_sidebar_id][] = $new_instance_id;

				// Save the amended data.
				update_option('sidebars_widgets', $sidebars_widgets);

				// After widget import action.
				$after_widget_import = array(
					'sidebar'           => $use_sidebar_id,
					'sidebar_old'       => $sidebar_id,
					'widget'            => $widget,
					'widget_type'       => $id_base,
					'widget_id'         => $new_instance_id,
					'widget_id_old'     => $widget_instance_id,
					'widget_id_num'     => $new_instance_id_number,
					'widget_id_num_old' => $instance_id_number,
				);
				do_action('wie_after_widget_import', $after_widget_import);

				// Success message.
				if ($sidebar_available) {
					$widget_message_type = 'success';
					$widget_message      = esc_html__('Imported', 'widget-importer-exporter');
				} else {
					$widget_message_type = 'warning';
					$widget_message      = esc_html__('Imported to Inactive', 'widget-importer-exporter');
				}
			}

			// Result for widget instance
			$results[$sidebar_id]['widgets'][$widget_instance_id]['name']         = isset($available_widgets[$id_base]['name']) ? $available_widgets[$id_base]['name'] : $id_base;      // Widget name or ID if name not available (not supported by site).
			$results[$sidebar_id]['widgets'][$widget_instance_id]['title']        = ! empty($widget['title']) ? $widget['title'] : esc_html__('No Title', 'widget-importer-exporter');  // Show "No Title" if widget instance is untitled.
			$results[$sidebar_id]['widgets'][$widget_instance_id]['message_type'] = $widget_message_type;
			$results[$sidebar_id]['widgets'][$widget_instance_id]['message']      = $widget_message;
		}
	}

	// Hook after import.
	do_action('wie_after_import');

	// Return results.
	return apply_filters('wie_import_results', $results);
}
