<?php
/**
 * Stripe Connect: Connection
 *
 * @package SimplePay
 * @subpackage Core
 * @copyright Copyright (c) 2022, Sandhills Development, LLC
 * @license http://opensource.org/licenses/gpl-2.0.php GNU Public License
 * @since 4.4.2
 */

namespace SimplePay\Core\StripeConnect;

use Exception;
use SimplePay\Core\API;
use SimplePay\Core\EventManagement\SubscriberInterface;
use SimplePay\Core\License\LicenseAwareInterface;
use SimplePay\Core\License\LicenseAwareTrait;
use SimplePay\Core\Payments\Stripe_API;
use SimplePay\Core\Settings;
use WP_Error;

/**
 * ConnectionSubscriber class.
 *
 * @since 4.4.2
 */
class ConnectionSubscriber implements SubscriberInterface, LicenseAwareInterface {

	use LicenseAwareTrait;

	/**
	 * {@inheritdoc}
	 */
	public function get_subscribed_events() {
		return array(
			'admin_init' => array(
				array( 'connect' ),
				array( 'disconnect' ),
			),
			'wp_ajax_simpay_stripe_connect_account_information' =>
				'get_account_information_json',
		);
	}

	/**
	 * Connects to Stripe by saving account information passed back to the plugin.
	 *
	 * @since 4.2.2
	 *
	 * @return void
	 */
	public function connect() {
		// Current user cannot handle this request.
		if ( ! current_user_can( 'manage_options' ) ) {
			return;
		}

		// Do not need to handle this request, bail.
		if (
			! isset( $_GET['wpsp_gateway_connect_completion'] ) ||
			'stripe_connect' !== $_GET['wpsp_gateway_connect_completion'] ||
			! isset( $_GET['state'] )
		) {
			return;
		}

		// Unable to redirect, bail.
		if ( headers_sent() ) {
			return;
		}

		if ( isset( $_SERVER['HTTP_HOST'], $_SERVER['REQUEST_URI'] ) ) {
			$current_url = ( is_ssl() ? 'https' : 'http' ) . '://' . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI'];
		} else {
			$current_url = '';
		}

		$customer_site_url = remove_query_arg(
			array(
				'state',
				'wpsp_gateway_connect_completion',
			),
			$current_url
		);

		$wpsp_credentials_url = add_query_arg(
			array(
				'live_mode'         => (int) ! simpay_is_test_mode(),
				'state'             => sanitize_text_field( $_GET['state'] ),
				'customer_site_url' => urlencode( $customer_site_url ),
			),
			'https://wpsimplepay.com/?wpsp_gateway_connect_credentials=stripe_connect'
		);

		$response = wp_remote_get( esc_url_raw( $wpsp_credentials_url ) );

		if (
			is_wp_error( $response ) ||
			200 !== wp_remote_retrieve_response_code( $response )
		) {
			$stripe_account_settings_url = Settings\get_url(
				array(
					'section'    => 'stripe',
					'subsection' => 'account',
				)
			);

			$message = wpautop(
				sprintf(
					/* translators: %1$s Opening anchor tag, do not translate. %2$s Closing anchor tag, do not translate. */
					__(
						'There was an error getting your Stripe credentials. Please %1$stry again%2$s. If you continue to have this problem, please contact support.',
						'stripe'
					),
					'<a href="' . esc_url( $stripe_account_settings_url ) . '">',
					'</a>'
				)
			);

			wp_die( $message );
		}

		$body = wp_remote_retrieve_body( $response );

		/** @var string $body */
		$body = json_decode( $body, true );

		/** @var array<array<string>> $body */
		$account_data = $body['data'];

		$this->save_account_information( $account_data );

		/**
		 * Allow further processing after connecting a Stripe account.
		 *
		 * @since 3.6.0
		 *
		 * @param array $data Stripe response data.
		 */
		do_action( 'simpay_stripe_account_connected', $account_data );

		wp_redirect( esc_url_raw( $customer_site_url ) );
		exit;
	}

	/**
	 * Disconnects from Stripe by removing associated account information.
	 *
	 * This does not deauthorize the application within the Stripe account.
	 *
	 * @since 4.2.2
	 *
	 * @return void
	 */
	public function disconnect() {
		// Do not need to handle this request, bail.
		if (
			! ( isset( $_GET['page'] ) && 'simpay_settings' === $_GET['page'] ) ||
			! isset( $_GET['simpay-stripe-disconnect'] )
		) {
			return;
		}

		// Current user cannot handle this request.
		if ( ! current_user_can( 'manage_options' ) ) {
			return;
		}

		if ( ! isset( $_GET['_wpnonce'] ) ) {
			return;
		}

		// Invalid nonce, bail.
		if ( ! wp_verify_nonce( $_GET['_wpnonce'], 'simpay-stripe-connect-disconnect' ) ) {
			return;
		}

		// Clear keys.
		simpay_update_setting( 'live_secret_key', '' );
		simpay_update_setting( 'test_secret_key', '' );
		simpay_update_setting( 'live_publishable_key', '' );
		simpay_update_setting( 'test_publishable_key', '' );

		// Clear account ID.
		update_option( 'simpay_stripe_connect_account_id', false );
		update_option( 'simpay_stripe_connect_type', false );

		// Clear cached objects.
		global $wpdb;
		$wpdb->query( "DELETE FROM {$wpdb->options} WHERE option_name LIKE '_transient_simpay\_stripe\_%'" );
		$wpdb->query( "DELETE FROM {$wpdb->options} WHERE option_name LIKE '_transient_timeout_simpay\_stripe\_%'" );

		$redirect = Settings\get_url(
			array(
				'section'    => 'stripe',
				'subsection' => 'account',
			)
		);

		wp_safe_redirect( $redirect );
		exit;
	}

	/**
	 * Outputs information about the connected Stripe account (JSON).
	 *
	 * @since 4.2.2
	 *
	 * @return void
	 */
	public function get_account_information_json() {
		$unknown_error = array(
			'message' => esc_html__( 'Unable to retrieve account information.', 'stripe' ),
		);

		if ( ! current_user_can( 'manage_options' ) ) {
			wp_send_json_error( $unknown_error );
		}

		if ( ! wp_verify_nonce( $_POST['nonce'], 'simpay-stripe-connect-information' ) ) {
			wp_send_json_error( $unknown_error );
		}

		$mode = simpay_is_test_mode()
			? __( 'test', 'stripe' )
			: __( 'live', 'stripe' );

		$connect = sprintf(
			'<div style="margin-top: 8px;">%s</div>',
			simpay_get_stripe_connect_button()
		);

		$access_string = class_exists( 'SimplePay\Pro\SimplePayPro', false )
			? __(
				'You cannot manage this account in Stripe to configure features such as Subscriptions, Webhooks, or Coupons.',
				'stripe'
			)
			: __(
				'You cannot manage this account in Stripe.',
				'stripe'
			);

		$dev_account_error = array(
			'message' => (
				sprintf(
					/* translators: %1$s Opening strong tag, do not translate. %2$s Closing anchor tag, do not translate. */
					__(
						'You are currently connected to a %1$stemporary%2$s Stripe account, which can only be used for testing purposes.',
						'stripe'
					),
					'<strong>',
					'</strong>'
				) . ' ' . $access_string
			),
			'actions' => 'simpay-stripe-unactivated-account-actions',
		);

		$account_id = simpay_get_account_id();

		// Look for manually managed API key mishaps.
		$secret_key      = simpay_get_secret_key();
		$publishable_key = simpay_get_publishable_key();
		$key_errors      = new WP_Error();

		// Publishable Key being used for Secret Key.
		if ( 'pk_' === substr( $secret_key, 0, 3 ) ) {
			$key_errors->add(
				'simpay_sk_mismatch',
				__(
					'Invalid Secret Key. Secret Key should begin with <code>sk_</code>.',
					'stripe'
				)
			);
		}

		// Secret Key being used for Publishable Key.
		if ( 'sk_' === substr( $publishable_key, 0, 3 ) ) {
			$key_errors->add(
				'simpay_pk_mismatch',
				__(
					'Invalid Publishable Key. Publishable Key should begin with <code>pk_</code>.',
					'stripe'
				)
			);
		}

		if ( simpay_is_test_mode() ) {
			// Live Mode Publishable Key used in Test Mode Publishable Key.
			if ( 'pk_live_' === substr( $publishable_key, 0, 8 ) ) {
				$key_errors->add(
					'simpay_pk_mode_mismatch',
					__(
						'Invalid Publishable Key for current mode. Publishable Key should begin with <code>pk_test_</code>.',
						'stripe'
					)
				);
			}

			// Live Mode Secret Key used in Test Mode Secret Key.
			if ( 'sk_live_' === substr( $secret_key, 0, 8 ) ) {
				$key_errors->add(
					'simpay_sk_mode_mismatch',
					__(
						'Invalid Secret Key for current mode. Secret Key should begin with <code>sk_test_</code>.',
						'stripe'
					)
				);
			}
		} else {
			// Test Mode Secret Key used in Live Mode Secret Key.
			if ( 'pk_test_' === substr( $publishable_key, 0, 8 ) ) {
				$key_errors->add(
					'simpay_pk_mode_mismatch',
					__(
						'Invalid Publishable Key for current mode. Publishable Key should begin with <code>pk_live_</code>.',
						'stripe'
					)
				);
			}

			// Test Mode Secret Key used in Live Mode Secret Key.
			if ( 'sk_test_' === substr( $secret_key, 0, 8 ) ) {
				$key_errors->add(
					'simpay_sk_mode_mismatch',
					__(
						'Invalid Secret Key for current mode. Secret Key should begin with <code>sk_live_</code>.',
						'stripe'
					)
				);
			}
		}

		if ( ! empty( $key_errors->errors ) ) {
			wp_send_json_error(
				array(
					'message' => sprintf(
						'<span style="color: red;">%s</span> %s %s',
						$key_errors->get_error_message(),
						__(
							'If you have manually modified these values after connecting your account, please reconnect below or update your API keys manually.',
							'stripe'
						),
						$connect
					),
				)
			);
		}

		// Stripe Connect.
		if ( ! empty( $account_id ) ) {
			try {
				$account = Stripe_API::request(
					'Account',
					'retrieve',
					$account_id,
					array(
						'api_key' => simpay_get_secret_key(),
					)
				);

				/** @var string $email */
				$email = isset( $account->email ) ? $account->email : '';

				/** @var string $display_name */
				$display_name = isset( $account->display_name )
					? $account->display_name
					: '';

				if ( empty( $display_name ) ) {
					if (
						isset( $account->settings ) &&
						isset( $account->settings->dashboard ) &&
						isset( $account->settings->dashboard->display_name )
					) {
						/** @var string $display_name */
						$display_name = $account->settings->dashboard->display_name;
					}
				}

				if ( empty( $email ) && empty( $display_name ) ) {
					wp_send_json_success( $dev_account_error );
				}

				if ( ! empty( $display_name ) ) {
					$display_name = '<strong>' . $display_name . '</strong><br/ >';
				}

				if ( ! empty( $email ) ) {
					$email = $email . ' &mdash; ';
				}

				$message = (
					sprintf(
						'<code style="position: absolute; right: 10px; top: 10px;">%s</code>',
						$account->id
					) .
					$display_name .
					$email .
					esc_html__( 'Administrator (Owner)', 'stripe' )
				);

				/**
				 * Allows filtering of the message displayed when Stripe Connect is connected.
				 *
				 * @since 4.4.1
				 *
				 * @param string $message The message to display.
				 */
				$message = apply_filters(
					'__unstable_simpay_stripe_connect_account_message',
					$message
				);

				wp_send_json_success(
					array(
						'message' => $message,
						'actions' => 'simpay-stripe-activated-account-actions',
					)
				);
			} catch ( \SimplePay\Vendor\Stripe\Exception\AuthenticationException $e ) {
				wp_send_json_error(
					array(
						'message' => esc_html__(
							'Unable to validate your Stripe Account with the API keys provided. If you have manually modified these values after connecting your account, please reconnect below or update your API keys manually.',
							'stripe'
						) . $connect,
					)
				);
			} catch ( \Exception $e ) {
				wp_send_json_error( $unknown_error );
			}
		}

		// No Stripe Connect.
		try {
			// Attempt to make an API request.
			API\Customers\all(
				array(
					'limit' => 1,
				),
				array(
					'api_key' => simpay_get_secret_key(),
				)
			);

			wp_send_json_success(
				array(
					'message' => (
						sprintf(
							/* translators: %1$s Stripe payment mode.*/
							__( 'Your manually managed %1$s mode API keys are valid.', 'stripe' ),
							'<strong>' . $mode . '</strong>'
						)
					),
				)
			);
		} catch ( \Exception $e ) {
			wp_send_json_error(
				array(
					'message' => (
						'<span style="color: red;">' .
							sprintf(
								/* translators: %1$s Stripe payment mode.*/
								__( 'Your manually managed %1$s mode API keys are invalid.', 'stripe' ),
								'<strong>' . $mode . '</strong>'
							)
						. '</span>'
					),
				)
			);
		}
	}

	/**
	 * Saves the account information sent back from Stripe, alongside other, to identify the connected account.
	 *
	 * @since 4.4.2
	 *
	 * @param array<string> $data Stripe oAuth account data.
	 * @return void
	 */
	private function save_account_information( $data ) {
		$prefix = simpay_is_test_mode()
			? 'test'
			: 'live';

		simpay_update_setting(
			$prefix . '_secret_key',
			sanitize_text_field( $data['secret_key'] )
		);

		simpay_update_setting(
			$prefix . '_publishable_key',
			sanitize_text_field( $data['publishable_key'] )
		);

		update_option(
			'simpay_stripe_connect_account_id',
			sanitize_text_field( $data['stripe_user_id'] )
		);

		$type = $this->license->is_lite() ? 'lite' : 'pro';
		update_option( 'simpay_stripe_connect_type', $type );

		// Try to set the account country.
		try {
			$account = Stripe_API::request(
				'Account',
				'retrieve',
				$data['stripe_user_id'],
				array(
					'api_key' => simpay_get_secret_key(),
				)
			);

			simpay_update_setting( 'account_country', $account->country );
		} catch ( Exception $e ) {
			// Do nothing.
		}
	}

}

