<?php

declare(strict_types=1);

namespace Bizdex\Uplisting\Emails;

use Bizdex\Uplisting\Admin\Bookings;
use Bizdex\Uplisting\Helpers\Request;
use Bizdex\Uplisting\Models\BookingDetails;

defined('ABSPATH') || exit;

/**
 * Registers, dispatches, previews, and configures transactional emails.
 *
 * @package Bizdex\Uplisting\Emails
 * @since   1.0.0
 */
final class EmailManager
{
    public const PAGE_SLUG = 'bizdex-uplisting-settings';

    /**
     * Shared nonce action for email preview and test requests.
     *
     * One action for both so verification cannot be skipped by action type.
     */
    public const EMAIL_ACTION_NONCE = 'bizdex_uplisting_email_action';

    private static ?self $instance = null;

    /** @var array<string, AbstractEmail> */
    private array $emails = [];

    /**
     * Booking IDs → new payment status, captured before meta update.
     *
     * @var array<int, string>
     */
    private array $pending_status_actions = [];

    /**
     * Singleton instance.
     *
     * @since 1.0.0
     * @return self
     */
    public static function instance(): self
    {
        return self::$instance ??= new self();
    }

    /**
     * Register email types and lifecycle hooks.
     *
     * @since 1.0.0
     */
    private function __construct()
    {
        $this->register_emails();
        $this->register_hooks();

        if (is_admin()) {
            add_action('admin_init', [$this, 'register_settings']);
            add_action('admin_init', [$this, 'handle_actions']);
            add_action('admin_enqueue_scripts', [$this, 'enqueue_assets']);
        }
    }

    /**
     * Admin URL for the Booking Settings tab (email UI lives there).
     *
     * @since 1.0.0
     *
     * @param array<string, scalar> $args Extra query args.
     * @return string
     */
    public function get_booking_tab_url(array $args = []): string
    {
        $url = add_query_arg(
            array_merge(
                [
                    'page' => self::PAGE_SLUG,
                ],
                $args
            ),
            admin_url('admin.php')
        );

        return $url . '#tab-booking';
    }

    /**
     * View data for the Booking Settings email section.
     *
     * @since 1.0.0
     *
     * @return array{
     *     emails: array<string, AbstractEmail>,
     *     page_slug: string
     * }
     */
    public function get_settings_view_data(): array
    {
        return [
            'emails'    => $this->emails,
            'page_slug' => self::PAGE_SLUG,
        ];
    }

    /**
     * All registered email type instances keyed by ID.
     *
     * @since 1.0.0
     *
     * @return array<string, AbstractEmail>
     */
    public function get_emails(): array
    {
        return $this->emails;
    }

    /**
     * Get a registered email type by ID.
     *
     * @since 1.0.0
     * @param string $id Email type slug.
     * @return AbstractEmail|null
     */
    public function get_email(string $id): ?AbstractEmail
    {
        return $this->emails[$id] ?? null;
    }

    /**
     * Send new-booking emails (customer confirmation + admin notice).
     *
     * @since 1.0.0
     * @param int $booking_id Booking post ID.
     * @return bool True when both customer and admin emails are accepted.
     */
    public function send_booking_emails(int $booking_id): bool
    {
        if ($booking_id <= 0 || get_post_type($booking_id) !== 'bizdexul_booking') {
            return false;
        }

        $booking = new BookingDetails($booking_id);

        /**
         * Filters whether booking confirmation emails should be sent.
         *
         * @param bool           $should_send Whether to send.
         * @param int            $booking_id  Booking post ID.
         * @param BookingDetails $booking     Booking model.
         */
        if (!(bool) apply_filters('bizdex_uplisting_should_send_booking_emails', true, $booking_id, $booking)) {
            return false;
        }

        /**
         * Fires before booking confirmation emails are sent.
         *
         * @param int            $booking_id Booking post ID.
         * @param BookingDetails $booking    Booking model.
         */
        do_action('bizdex_uplisting_before_send_booking_emails', $booking_id, $booking);

        $customer = $this->get_email('customer_booking_confirmation');
        $admin    = $this->get_email('admin_new_booking');

        $customer_sent = $customer instanceof AbstractEmail ? $customer->send($booking) : false;
        $admin_sent    = $admin instanceof AbstractEmail ? $admin->send($booking) : false;

        if (!$customer_sent || !$admin_sent) {
            if (function_exists('bizdex_uplisting_log')) {
                bizdex_uplisting_log('Email delivery failed for booking #' . $booking_id);
            }
        }

        /**
         * Fires after booking confirmation emails are attempted.
         *
         * @param int            $booking_id    Booking post ID.
         * @param BookingDetails $booking       Booking model.
         * @param bool           $customer_sent Whether the customer email was accepted.
         * @param bool           $admin_sent    Whether the admin email was accepted.
         */
        do_action('bizdex_uplisting_after_send_booking_emails', $booking_id, $booking, $customer_sent, $admin_sent);

        return $customer_sent && $admin_sent;
    }

    /**
     * Send the booking-cancelled email to the guest.
     *
     * @since 1.0.0
     * @param int $booking_id Booking post ID.
     * @return bool
     */
    public function send_cancelled_email(int $booking_id): bool
    {
        $email = $this->get_email('booking_cancelled');
        if (!$email instanceof AbstractEmail) {
            return false;
        }

        $booking = new BookingDetails($booking_id);

        /**
         * Filters whether the cancelled booking email should be sent.
         *
         * @param bool           $should_send Whether to send.
         * @param int            $booking_id  Booking post ID.
         * @param BookingDetails $booking     Booking model.
         */
        if (!(bool) apply_filters('bizdex_uplisting_should_send_cancelled_email', true, $booking_id, $booking)) {
            return false;
        }

        return $email->send($booking);
    }

    /**
     * Send the payment-received email to the guest.
     *
     * @since 1.0.0
     * @param int $booking_id Booking post ID.
     * @return bool
     */
    public function send_payment_received_email(int $booking_id): bool
    {
        $email = $this->get_email('payment_received');
        if (!$email instanceof AbstractEmail) {
            return false;
        }

        $booking = new BookingDetails($booking_id);

        /**
         * Filters whether the payment-received email should be sent.
         *
         * @param bool           $should_send Whether to send.
         * @param int            $booking_id  Booking post ID.
         * @param BookingDetails $booking     Booking model.
         */
        if (!(bool) apply_filters('bizdex_uplisting_should_send_payment_received_email', true, $booking_id, $booking)) {
            return false;
        }

        return $email->send($booking);
    }

    /**
     * Sample booking-shaped data for previews and test emails.
     *
     * @since 1.0.0
     *
     * @return array<string, mixed>
     */
    public function get_sample_data(): array
    {
        $data = [
            'booking_id'     => 1001,
            'property_id'    => 0,
            'first_name'     => 'Jane',
            'last_name'      => 'Doe',
            'email'          => 'jane.doe@example.com',
            'phone'          => '+1 555 0100',
            'check_in'       => gmdate('Y-m-d', strtotime('+7 days')),
            'check_out'      => gmdate('Y-m-d', strtotime('+10 days')),
            'adults'         => 2,
            'kids'           => 1,
            'total_amount'   => 450.00,
            'property_title' => 'Sample Beach House',
            'property_url'   => home_url('/'),
            'edit_url'       => Bookings::get_admin_url(),
            'site_name'      => (string) get_bloginfo('name'),
        ];

        /**
         * Filters sample data used for email previews and test sends.
         *
         * @param array<string, mixed> $data
         */
        $filtered = apply_filters('bizdex_uplisting_email_preview_data', $data);

        return is_array($filtered) ? $filtered : $data;
    }

    /**
     * Render an email HTML preview without sending.
     *
     * @since 1.0.0
     * @param AbstractEmail $email Email type to preview.
     * @return string
     */
    public function get_preview_html(AbstractEmail $email): string
    {
        $data = $this->get_sample_data();
        $data['email_heading']      = $email->get_heading($data);
        $data['additional_content'] = $email->get_additional_content($data);
        $data['email_id']           = $email->get_id();

        $html = $email->get_content($data);

        /**
         * Filters the HTML used for admin email preview.
         *
         * @param string               $html
         * @param AbstractEmail        $email
         * @param array<string, mixed> $data
         */
        return (string) apply_filters('bizdex_uplisting_email_preview_html', $html, $email, $data);
    }

    /**
     * Send a test email using sample data.
     *
     * @since 1.0.0
     * @param AbstractEmail $email Email type to send.
     * @param string        $to    Recipient address.
     * @return bool
     */
    public function send_test(AbstractEmail $email, string $to): bool
    {
        if (!is_email($to)) {
            return false;
        }

        $data = $this->get_sample_data();
        $data['email_heading']      = $email->get_heading($data);
        $data['additional_content'] = $email->get_additional_content($data);
        $data['email_id']           = $email->get_id();

        $subject = $email->get_subject($data);
        $message = $email->get_content($data);

        /**
         * Filters the subject prefix/label for test emails.
         *
         * @param string               $subject
         * @param AbstractEmail        $email
         * @param array<string, mixed> $data
         */
        $subject = (string) apply_filters('bizdex_uplisting_email_test_subject', '[Test] ' . $subject, $email, $data);

        /**
         * Fires before a test email is sent from admin.
         *
         * @param string               $to
         * @param AbstractEmail        $email
         * @param array<string, mixed> $data
         */
        do_action('bizdex_uplisting_before_email_test_send', $to, $email, $data);

        $sent = $email->mail($to, $subject, $message);

        /**
         * Fires after a test email send attempt.
         *
         * @param bool          $sent
         * @param string        $to
         * @param AbstractEmail $email
         */
        do_action('bizdex_uplisting_after_email_test_send', $sent, $to, $email);

        return $sent;
    }

    /**
     * Enqueue email settings styles on the plugin settings page.
     *
     * @since 1.0.0
     * @param string $hook Current admin page hook.
     * @return void
     */
    public function enqueue_assets(string $hook): void
    {
        if (!str_contains($hook, self::PAGE_SLUG)) {
            return;
        }

        // Script + localize live in AdminManager::enqueue_admin_assets (merged admin.js).
        if (!wp_style_is('bizdex-uplisting-email-settings', 'registered')) {
            wp_register_style(
                'bizdex-uplisting-email-settings',
                BIZDEX_UPLISTING_PLUGIN_URL . 'assets/css/email-settings.css',
                [],
                BIZDEX_UPLISTING_VERSION
            );
        }
        wp_enqueue_style('bizdex-uplisting-email-settings');
    }

    /**
     * Register per-email options (sender options are registered by AdminManager).
     *
     * @since 1.0.0
     */
    public function register_settings(): void
    {
        foreach ($this->emails as $email) {
            register_setting(BIZDEX_UPLISTING_SETTINGS_GROUP, $email->option_key('subject'), [
                'type'              => 'string',
                'sanitize_callback' => static function ($value) use ($email): string {
                    $value = sanitize_text_field((string) $value);

                    return $value !== '' ? $value : $email->get_default_subject();
                },
                'default'           => $email->get_default_subject(),
            ]);
            register_setting(BIZDEX_UPLISTING_SETTINGS_GROUP, $email->option_key('heading'), [
                'type'              => 'string',
                'sanitize_callback' => static function ($value) use ($email): string {
                    $value = sanitize_text_field((string) $value);

                    return $value !== '' ? $value : $email->get_default_heading();
                },
                'default'           => $email->get_default_heading(),
            ]);
            register_setting(BIZDEX_UPLISTING_SETTINGS_GROUP, $email->option_key('additional_content'), [
                'type'              => 'string',
                'sanitize_callback' => 'sanitize_textarea_field',
                'default'           => '',
            ]);
        }
    }

    /**
     * Handle preview and test-email requests on the settings page.
     *
     * Capability and nonce are required before any request values are used.
     *
     * @since 1.0.0
     */
    public function handle_actions(): void
    {
        if (!is_admin() || !Request::has('get', 'email_action')) {
            return;
        }

        if (!current_user_can('manage_options')) {
            wp_die(
                esc_html__('You are not allowed to perform this action.', 'advanced-connector-for-uplisting'),
                '',
                ['response' => 403]
            );
        }

        Request::require_admin_nonce(self::EMAIL_ACTION_NONCE);

        $page     = Request::key('get', 'page');
        $action   = Request::key('get', 'email_action');
        $email_id = Request::key('get', 'email_id');

        if ($page !== self::PAGE_SLUG || !in_array($action, ['preview', 'test'], true) || $email_id === '') {
            return;
        }

        $email = $this->get_email($email_id);
        if (!$email instanceof AbstractEmail) {
            return;
        }

        if ($action === 'preview') {
            // Full HTML email document: kses_post would strip <style>, <html>, and <head>.
            header('Content-Type: text/html; charset=UTF-8');
            echo $this->get_preview_html($email); // phpcs:ignore WordPress.Security.EscapeOutput.OutputNotEscaped -- template already late-escaped.
            exit;
        }

        $to = Request::email('post', 'test_email');
        if ($to === '') {
            wp_safe_redirect(
                $this->get_booking_tab_url([
                    'email_id' => $email_id,
                    'msg'      => 'test_failed',
                ])
            );
            exit;
        }

        $sent = $this->send_test($email, $to);

        wp_safe_redirect(
            $this->get_booking_tab_url([
                'email_id' => $email_id,
                'msg'      => $sent ? 'test_sent' : 'test_failed',
            ])
        );
        exit;
    }

    /**
     * After a successful reservation: customer confirmation + admin new booking.
     *
     * @since 1.0.0
     *
     * @param int                  $booking_id
     * @param BookingDetails|null  $booking
     * @param array<string, mixed> $payment_result
     */
    public function on_after_reservation(int $booking_id, $booking = null, array $payment_result = []): void
    {
        unset($booking, $payment_result);
        $this->send_booking_emails($booking_id);
    }

    /**
     * Remember previous payment status before meta is updated.
     *
     * @since 1.0.0
     *
     * @param mixed $meta_value
     */
    public function remember_payment_status_change(int $meta_id, int $object_id, string $meta_key, $meta_value): void
    {
        unset($meta_id);

        $payment_meta_key = bizdex_uplisting_meta_key('_booking_payment_status');
        if (!in_array($meta_key, [$payment_meta_key, '_booking_payment_status'], true) || get_post_type($object_id) !== 'bizdexul_booking') {
            return;
        }

        $old = (string) get_metadata('post', $object_id, $meta_key, true);
        $new = sanitize_text_field((string) $meta_value);

        if ($old === $new) {
            return;
        }

        $this->pending_status_actions[(int) $object_id] = $new;
    }

    /**
     * Dispatch lifecycle actions after payment status meta is written.
     *
     * @since 1.0.0
     *
     * @param mixed $meta_value
     */
    public function dispatch_payment_status_actions(int $meta_id, int $object_id, string $meta_key, $meta_value): void
    {
        unset($meta_id, $meta_value);

        $payment_meta_key = bizdex_uplisting_meta_key('_booking_payment_status');
        if (!in_array($meta_key, [$payment_meta_key, '_booking_payment_status'], true)) {
            return;
        }

        $booking_id = (int) $object_id;
        if (!isset($this->pending_status_actions[$booking_id])) {
            return;
        }

        $status = $this->pending_status_actions[$booking_id];
        unset($this->pending_status_actions[$booking_id]);

        $this->fire_payment_status_lifecycle_action($booking_id, $status);
    }

    /**
     * First-time payment status meta (added, not updated).
     *
     * @since 1.0.0
     *
     * @param mixed $meta_value
     */
    public function dispatch_payment_status_on_add(int $meta_id, int $object_id, string $meta_key, $meta_value): void
    {
        unset($meta_id);

        $payment_meta_key = bizdex_uplisting_meta_key('_booking_payment_status');
        if (!in_array($meta_key, [$payment_meta_key, '_booking_payment_status'], true) || get_post_type($object_id) !== 'bizdexul_booking') {
            return;
        }

        $this->fire_payment_status_lifecycle_action((int) $object_id, sanitize_text_field((string) $meta_value));
    }

    /**
     * Map payment status slugs to email lifecycle actions.
     *
     * @since 1.0.0
     */
    private function fire_payment_status_lifecycle_action(int $booking_id, string $status): void
    {
        if ($booking_id <= 0 || $status === '') {
            return;
        }

        if ($status === 'cancelled') {
            /**
             * Fires when a booking payment status becomes cancelled.
             *
             * @param int $booking_id Booking post ID.
             */
            do_action('bizdex_uplisting_booking_cancelled', $booking_id);
            return;
        }

        if ($status === 'completed') {
            /**
             * Fires when a booking payment status becomes completed.
             *
             * @param int $booking_id Booking post ID.
             */
            do_action('bizdex_uplisting_booking_payment_completed', $booking_id);
        }
    }

    /**
     * Instantiate and register all email type classes.
     *
     * @since 1.0.0
     */
    private function register_emails(): void
    {
        $classes = [
            CustomerBookingConfirmation::class,
            AdminNewBooking::class,
            BookingCancelled::class,
            PaymentReceived::class,
        ];

        /**
         * Filters the email class names registered by the manager.
         *
         * @param list<class-string<AbstractEmail>> $classes
         */
        $classes = apply_filters('bizdex_uplisting_email_classes', $classes);
        if (!is_array($classes)) {
            $classes = [];
        }

        foreach ($classes as $class) {
            if (!is_string($class) || !class_exists($class)) {
                continue;
            }

            $email = new $class();
            if (!$email instanceof AbstractEmail) {
                continue;
            }

            $this->emails[$email->get_id()] = $email;
        }

        /**
         * Filters the registered email instances.
         *
         * @param array<string, AbstractEmail> $emails
         */
        $filtered = apply_filters('bizdex_uplisting_emails', $this->emails);
        if (is_array($filtered)) {
            $this->emails = $filtered;
        }

        /**
         * Fires after email types are registered.
         *
         * @param array<string, AbstractEmail> $emails
         * @param EmailManager                 $manager
         */
        do_action('bizdex_uplisting_emails_registered', $this->emails, $this);
    }

    /**
     * Connect booking lifecycle events to email send methods.
     *
     * | Event / action                              | Email method                  |
     * |---------------------------------------------|-------------------------------|
     * | bizdex_uplisting_after_reservation          | send_booking_emails           |
     * | bizdex_uplisting_booking_cancelled          | send_cancelled_email          |
     * | bizdex_uplisting_booking_payment_completed  | send_payment_received_email   |
     *
     * Payment status meta changes bridge into the cancelled / payment-completed actions.
     *
     * @since 1.0.0
     */
    private function register_hooks(): void
    {
        add_action('bizdex_uplisting_after_reservation', [$this, 'on_after_reservation'], 10, 3);
        add_action('bizdex_uplisting_booking_cancelled', [$this, 'send_cancelled_email'], 10, 1);
        add_action('bizdex_uplisting_booking_payment_completed', [$this, 'send_payment_received_email'], 10, 1);

        add_action('update_post_meta', [$this, 'remember_payment_status_change'], 10, 4);
        add_action('updated_post_meta', [$this, 'dispatch_payment_status_actions'], 10, 4);
        add_action('added_post_meta', [$this, 'dispatch_payment_status_on_add'], 10, 4);
    }
}