<?php
/**
 * The emails Dealroot sends.
 *
 * @package Dealroot
 */

namespace Dealroot;

defined( 'ABSPATH' ) || exit;

/**
 * Two looks, both in HTML with a plain text part for mail programs that show no HTML:
 *
 * - To customers: light, like a letter from a person – the logo or name of the business, the
 *   text, an optional table of positions, and the signature. No banners, so the emails reach the
 *   inbox and not the tab for advertising.
 * - To the owner and the team: what happened, a few facts and a button.
 *
 * Sent from the address of the site with the name of the business; replies go to the address
 * the owner reads.
 */
class Mail {

	/**
	 * Hooks.
	 */
	public function register() {
		add_action( 'admin_post_dealroot_mail_test', array( __CLASS__, 'handle_test' ) );
	}

	/**
	 * Name the emails come from.
	 *
	 * @return string
	 */
	public static function from_name() {
		$name = trim( (string) Settings::get( 'mail_from_name' ) );

		return '' !== $name ? $name : Ai::business();
	}

	/**
	 * Address the emails come from: the one chosen on the domain of the site, else the default of
	 * WordPress. An address on another domain would end up as spam, so it is not used.
	 *
	 * @return string "" for the default.
	 */
	public static function from_email() {
		$email = (string) Settings::get( 'mail_from' );

		return is_email( $email ) && self::own_domain( $email ) ? $email : '';
	}

	/**
	 * Whether an address is on the domain of the site, or a subdomain of it.
	 *
	 * @param string $email Address.
	 * @return bool
	 */
	public static function own_domain( $email ) {
		$domain = strtolower( (string) substr( strrchr( (string) $email, '@' ), 1 ) );
		$site   = strtolower( (string) preg_replace( '/^www\./', '', (string) wp_parse_url( home_url(), PHP_URL_HOST ) ) );

		$ends = static function ( $text, $end ) {
			return strlen( $text ) > strlen( $end ) && substr( $text, -strlen( $end ) ) === $end;
		};

		return '' !== $domain && ( $domain === $site || $ends( $site, '.' . $domain ) || $ends( $domain, '.' . $site ) );
	}

	/**
	 * Address the replies of customers go to.
	 *
	 * @return string
	 */
	public static function reply_to() {
		$email = (string) Settings::get( 'mail_reply_to' );

		return is_email( $email ) ? $email : (string) get_option( 'admin_email' );
	}

	/**
	 * Accent color of the emails.
	 *
	 * @return string
	 */
	public static function color() {
		$color = (string) Settings::get( 'mail_color' );

		return preg_match( '/^#[0-9a-f]{6}$/i', $color ) ? $color : '#0e4a37';
	}

	/**
	 * Address of the logo: the one chosen, else the logo or icon of the site, else "".
	 *
	 * @return string
	 */
	public static function logo() {
		$logo = (string) Settings::get( 'mail_logo' );

		if ( '' !== $logo && wp_http_validate_url( $logo ) ) {
			return $logo;
		}

		$custom = (int) get_theme_mod( 'custom_logo' );
		$url    = $custom ? wp_get_attachment_image_url( $custom, 'medium' ) : '';

		return $url ? (string) $url : (string) get_site_icon_url( 128 );
	}

	/**
	 * Sends an email to a customer.
	 *
	 * @param string $to      Address.
	 * @param string $subject Subject.
	 * @param string $text    Text, with blank lines between paragraphs.
	 * @param array  $extra   automatic: an automatic email such as a confirmation; table: rows of
	 *                        name, quantity, price and amount with a total; after: text below it;
	 *                        attachments: paths of files.
	 * @return bool
	 */
	public static function customer( $to, $subject, $text, array $extra = array() ) {
		$headers = array();

		if ( ! empty( $extra['automatic'] ) ) {
			// Out-of-office replies and mailing robots leave automatic emails alone.
			$headers[] = 'Auto-Submitted: auto-generated';
		}

		$headers[] = 'Reply-To: ' . str_replace( array( '"', '<', '>', ',' ), '', self::from_name() ) . ' <' . self::reply_to() . '>';

		return self::send( $to, $subject, self::customer_html( $text, $extra ), self::plain( $text, $extra ), $headers, (array) ( $extra['attachments'] ?? array() ) );
	}

	/**
	 * Sends an email to the owner or a team member.
	 *
	 * @param string|string[] $to      Addresses.
	 * @param string          $subject Subject.
	 * @param array           $content title, text, facts (label => value), items (list of name,
	 *                                 text and url), button (url, label), second (url, label), note.
	 * @return bool
	 */
	public static function owner( $to, $subject, array $content ) {
		$text = trim(
			implode(
				"\n\n",
				array_filter(
					array(
						(string) ( $content['title'] ?? '' ),
						(string) ( $content['text'] ?? '' ),
						implode(
							"\n",
							array_map(
								static function ( $label, $value ) {
									return $label . ': ' . $value;
								},
								array_keys( (array) ( $content['facts'] ?? array() ) ),
								(array) ( $content['facts'] ?? array() )
							)
						),
						implode(
							"\n",
							array_map(
								static function ( $item ) {
									return '• ' . trim( $item['name'] . ' ' . ( $item['text'] ?? '' ) ) . ( ! empty( $item['url'] ) ? "\n  " . $item['url'] : '' );
								},
								(array) ( $content['items'] ?? array() )
							)
						),
						isset( $content['button'] ) ? $content['button']['label'] . ': ' . $content['button']['url'] : '',
						(string) ( $content['note'] ?? '' ),
					)
				)
			)
		);

		return self::send( $to, $subject, self::owner_html( $content ), $text, array() );
	}

	/**
	 * Sends HTML with a plain text part.
	 *
	 * @param string|string[] $to          Addresses.
	 * @param string          $subject     Subject.
	 * @param string          $html        HTML.
	 * @param string          $plain       Text.
	 * @param string[]        $headers     More headers.
	 * @param string[]        $attachments Paths of files.
	 * @return bool
	 */
	private static function send( $to, $subject, $html, $plain, array $headers, array $attachments = array() ) {
		$use_html = (bool) Settings::get( 'mail_html' );
		$from     = self::from_email();

		$headers[] = 'Content-Type: ' . ( $use_html ? 'text/html' : 'text/plain' ) . '; charset=UTF-8';

		$name = static function () {
			return self::from_name();
		};

		$address = static function ( $current ) use ( $from ) {
			return '' !== $from ? $from : $current;
		};

		$alternative = static function ( $mailer ) use ( $plain ) {
			$mailer->AltBody = $plain; // phpcs:ignore WordPress.NamingConventions.ValidVariableName.UsedPropertyNotSnakeCase -- PHPMailer.
		};

		add_filter( 'wp_mail_from_name', $name );
		add_filter( 'wp_mail_from', $address );

		if ( $use_html ) {
			add_action( 'phpmailer_init', $alternative );
		}

		$sent = wp_mail( $to, $subject, $use_html ? $html : $plain, $headers, $attachments );

		remove_filter( 'wp_mail_from_name', $name );
		remove_filter( 'wp_mail_from', $address );
		remove_action( 'phpmailer_init', $alternative );

		return (bool) $sent;
	}

	/**
	 * The plain text of an email to a customer.
	 *
	 * @param string $text  Text.
	 * @param array  $extra Table and text after it.
	 * @return string
	 */
	private static function plain( $text, array $extra ) {
		$parts = array( trim( (string) $text ) );

		if ( ! empty( $extra['table']['rows'] ) ) {
			$lines = array();
			foreach ( $extra['table']['rows'] as $row ) {
				$lines[] = $row['quantity'] . ' × ' . $row['name'] . ', ' . $row['price'] . ': ' . $row['amount'];
			}
			$lines[] = $extra['table']['total_label'] . ': ' . $extra['table']['total'];
			$parts[] = implode( "\n", $lines );
		}

		$parts[] = trim( (string) ( $extra['after'] ?? '' ) );
		$parts[] = trim( (string) Settings::get( 'mail_signature' ) );

		return implode( "\n\n", array_filter( $parts, 'strlen' ) );
	}

	/**
	 * Paragraphs of a text as HTML, with links.
	 *
	 * @param string $text  Text.
	 * @param string $style Style of each paragraph.
	 * @return string
	 */
	public static function paragraphs( $text, $style ) {
		$html = '';

		foreach ( preg_split( '/\R{2,}/u', trim( (string) $text ) ) as $paragraph ) {
			if ( '' === trim( $paragraph ) ) {
				continue;
			}

			$escaped = nl2br( esc_html( trim( $paragraph ) ), false );
			$escaped = (string) preg_replace_callback(
				'~\bhttps?://[^\s<]+[^\s<.,;:!?)]~u',
				static function ( $url ) {
					return '<a href="' . esc_url( html_entity_decode( $url[0] ) ) . '" style="color:inherit;">' . $url[0] . '</a>';
				},
				$escaped
			);

			$html .= '<p style="' . esc_attr( $style ) . '">' . $escaped . '</p>';
		}

		return $html;
	}

	/**
	 * The HTML of an email to a customer.
	 *
	 * @param string $text  Text.
	 * @param array  $extra Table and text after it.
	 * @return string
	 */
	public static function customer_html( $text, array $extra = array() ) {
		$color     = self::color();
		$logo      = self::logo();
		$business  = Ai::business();
		$font      = "-apple-system,BlinkMacSystemFont,'Segoe UI',Roboto,Helvetica,Arial,sans-serif";
		$paragraph = 'margin:0 0 16px;font-size:15px;line-height:1.6;color:#1f2a24;';
		$cell      = 'padding:10px 0;border-bottom:1px solid #e6e9e6;font-size:14px;color:#1f2a24;';
		$signature = trim( (string) Settings::get( 'mail_signature' ) );
		$preheader = wp_html_excerpt( (string) preg_replace( '/\s+/u', ' ', (string) $text ), 110, '…' );

		ob_start();
		?>
<!DOCTYPE html>
<html lang="<?php echo esc_attr( substr( get_locale(), 0, 2 ) ); ?>">
<head>
<meta charset="UTF-8">
<meta name="viewport" content="width=device-width, initial-scale=1">
<meta name="color-scheme" content="light">
<title><?php echo esc_html( $business ); ?></title>
</head>
<body style="margin:0;padding:0;background:#f3f4f1;">
<div style="display:none;max-height:0;overflow:hidden;opacity:0;"><?php echo esc_html( $preheader ); ?></div>
<table role="presentation" width="100%" cellspacing="0" cellpadding="0" style="background:#f3f4f1;">
	<tr>
		<td align="center" style="padding:28px 12px;">
			<table role="presentation" width="100%" cellspacing="0" cellpadding="0" style="max-width:560px;background:#ffffff;border-radius:10px;border-top:4px solid <?php echo esc_attr( $color ); ?>;font-family:<?php echo esc_attr( $font ); ?>;">
				<tr>
					<td style="padding:28px 32px 8px;">
						<?php if ( '' !== $logo ) : ?>
							<img src="<?php echo esc_url( $logo ); ?>" alt="<?php echo esc_attr( $business ); ?>" style="display:block;max-height:44px;max-width:200px;height:auto;border:0;">
						<?php else : ?>
							<div style="font-size:18px;font-weight:700;color:<?php echo esc_attr( $color ); ?>;"><?php echo esc_html( $business ); ?></div>
						<?php endif; ?>
					</td>
				</tr>
				<tr>
					<td style="padding:20px 32px 4px;">
						<?php echo wp_kses( self::paragraphs( $text, $paragraph ), Kses::mail() ); ?>
						<?php if ( ! empty( $extra['table']['rows'] ) ) : ?>
							<table role="presentation" width="100%" cellspacing="0" cellpadding="0" style="margin:4px 0 20px;border-collapse:collapse;">
								<?php foreach ( $extra['table']['rows'] as $row ) : ?>
									<tr>
										<td style="<?php echo esc_attr( $cell ); ?>">
											<?php echo esc_html( $row['name'] ); ?>
											<div style="font-size:12px;color:#6b7570;"><?php echo esc_html( $row['quantity'] . ' × ' . $row['price'] ); ?></div>
										</td>
										<td align="right" style="<?php echo esc_attr( $cell ); ?>white-space:nowrap;"><?php echo esc_html( $row['amount'] ); ?></td>
									</tr>
								<?php endforeach; ?>
								<tr>
									<td style="padding:12px 0 0;font-size:15px;font-weight:700;color:#1f2a24;"><?php echo esc_html( $extra['table']['total_label'] ); ?></td>
									<td align="right" style="padding:12px 0 0;font-size:15px;font-weight:700;color:<?php echo esc_attr( $color ); ?>;white-space:nowrap;"><?php echo esc_html( $extra['table']['total'] ); ?></td>
								</tr>
							</table>
						<?php endif; ?>
						<?php echo wp_kses( self::paragraphs( (string) ( $extra['after'] ?? '' ), $paragraph ), Kses::mail() ); ?>
					</td>
				</tr>
				<tr>
					<td style="padding:8px 32px 28px;">
						<div style="border-top:1px solid #e6e9e6;padding-top:16px;font-size:13px;line-height:1.55;color:#6b7570;">
							<?php if ( '' !== $signature ) : ?>
								<?php echo nl2br( esc_html( $signature ), false ); ?><br>
							<?php else : ?>
								<?php echo esc_html( $business ); ?><br>
							<?php endif; ?>
							<a href="<?php echo esc_url( home_url( '/' ) ); ?>" style="color:<?php echo esc_attr( $color ); ?>;text-decoration:none;"><?php echo esc_html( (string) preg_replace( '#^https?://(www\.)?#', '', untrailingslashit( home_url() ) ) ); ?></a>
						</div>
					</td>
				</tr>
			</table>
		</td>
	</tr>
</table>
</body>
</html>
		<?php
		return (string) ob_get_clean();
	}

	/**
	 * The HTML of an email to the owner or the team.
	 *
	 * @param array $content title, text, facts, button, second, note.
	 * @return string
	 */
	public static function owner_html( array $content ) {
		$font   = "-apple-system,BlinkMacSystemFont,'Segoe UI',Roboto,Helvetica,Arial,sans-serif";
		$green  = '#0e4a37';
		$site   = wp_specialchars_decode( get_bloginfo( 'name' ), ENT_QUOTES );
		$facts  = (array) ( $content['facts'] ?? array() );
		$button = static function ( $link, $primary ) use ( $green ) {
			return '<a href="' . esc_url( $link['url'] ) . '" style="display:inline-block;padding:11px 18px;margin:0 8px 8px 0;border-radius:8px;font-size:14px;font-weight:600;text-decoration:none;' . ( $primary ? 'background:' . $green . ';color:#ffffff;' : 'background:#eef2ee;color:' . $green . ';' ) . '">' . esc_html( $link['label'] ) . '</a>';
		};

		ob_start();
		?>
<!DOCTYPE html>
<html lang="<?php echo esc_attr( substr( get_user_locale(), 0, 2 ) ); ?>">
<head>
<meta charset="UTF-8">
<meta name="viewport" content="width=device-width, initial-scale=1">
<meta name="color-scheme" content="light">
<title><?php echo esc_html( (string) ( $content['title'] ?? $site ) ); ?></title>
</head>
<body style="margin:0;padding:0;background:#f3f4f1;">
<table role="presentation" width="100%" cellspacing="0" cellpadding="0" style="background:#f3f4f1;">
	<tr>
		<td align="center" style="padding:28px 12px;">
			<table role="presentation" width="100%" cellspacing="0" cellpadding="0" style="max-width:560px;background:#ffffff;border-radius:10px;overflow:hidden;font-family:<?php echo esc_attr( $font ); ?>;">
				<tr>
					<td style="padding:14px 28px;background:<?php echo esc_attr( $green ); ?>;color:#ffffff;font-size:13px;">
						<?php /** This filter is documented in includes/admin/class-shell.php */ ?>
						<?php if ( apply_filters( 'dealroot_brand_mark', true ) ) : ?>
							<strong>Dealroot</strong><span style="opacity:.8;">&nbsp;·&nbsp;<?php echo esc_html( $site ); ?></span>
						<?php else : ?>
							<strong><?php echo esc_html( $site ); ?></strong>
						<?php endif; ?>
					</td>
				</tr>
				<tr>
					<td style="padding:26px 28px 8px;">
						<?php if ( ! empty( $content['title'] ) ) : ?>
							<h1 style="margin:0 0 12px;font-size:19px;line-height:1.35;color:#1c2b25;"><?php echo esc_html( $content['title'] ); ?></h1>
						<?php endif; ?>
						<?php echo wp_kses( self::paragraphs( (string) ( $content['text'] ?? '' ), 'margin:0 0 14px;font-size:15px;line-height:1.55;color:#1c2b25;' ), Kses::mail() ); ?>
						<?php if ( $facts ) : ?>
							<table role="presentation" width="100%" cellspacing="0" cellpadding="0" style="margin:4px 0 18px;border-collapse:collapse;">
								<?php foreach ( $facts as $label => $value ) : ?>
									<tr>
										<td style="padding:8px 12px 8px 0;border-bottom:1px solid #e6e9e6;font-size:13px;color:#56695f;white-space:nowrap;vertical-align:top;"><?php echo esc_html( $label ); ?></td>
										<td style="padding:8px 0;border-bottom:1px solid #e6e9e6;font-size:14px;color:#1c2b25;"><?php echo nl2br( esc_html( (string) $value ), false ); ?></td>
									</tr>
								<?php endforeach; ?>
							</table>
						<?php endif; ?>
						<?php if ( ! empty( $content['items'] ) ) : ?>
							<table role="presentation" width="100%" cellspacing="0" cellpadding="0" style="margin:4px 0 18px;border-collapse:collapse;">
								<?php foreach ( (array) $content['items'] as $item ) : ?>
									<tr>
										<td style="padding:10px 0;border-bottom:1px solid #e6e9e6;font-size:14px;color:#1c2b25;">
											<?php if ( ! empty( $item['url'] ) ) : ?>
												<a href="<?php echo esc_url( $item['url'] ); ?>" style="color:<?php echo esc_attr( $green ); ?>;font-weight:600;text-decoration:none;"><?php echo esc_html( $item['name'] ); ?></a>
											<?php else : ?>
												<strong><?php echo esc_html( $item['name'] ); ?></strong>
											<?php endif; ?>
											<?php if ( ! empty( $item['text'] ) ) : ?>
												<div style="font-size:13px;color:#56695f;margin-top:2px;"><?php echo esc_html( $item['text'] ); ?></div>
											<?php endif; ?>
										</td>
									</tr>
								<?php endforeach; ?>
							</table>
						<?php endif; ?>
						<?php if ( ! empty( $content['button'] ) || ! empty( $content['second'] ) ) : ?>
							<div style="margin:6px 0 10px;">
								<?php echo ! empty( $content['button'] ) ? wp_kses( $button( $content['button'], true ), Kses::mail() ) : ''; ?>
								<?php echo ! empty( $content['second'] ) ? wp_kses( $button( $content['second'], false ), Kses::mail() ) : ''; ?>
							</div>
						<?php endif; ?>
					</td>
				</tr>
				<tr>
					<td style="padding:6px 28px 24px;font-size:12px;line-height:1.5;color:#8a948f;">
						<?php echo esc_html( (string) ( $content['note'] ?? __( 'Sent by Dealroot on your website. You can change which emails you get in the settings of Dealroot.', 'dealroot' ) ) ); ?>
					</td>
				</tr>
			</table>
		</td>
	</tr>
</table>
</body>
</html>
		<?php
		return (string) ob_get_clean();
	}

	/**
	 * A sample of the email to customers, for the settings.
	 *
	 * @return string
	 */
	public static function sample() {
		return self::customer_html(
			__( "Hello Ms Sommer,\n\nthank you for your enquiry about a bridal bouquet. So that we can make you a fitting offer: for which date do you need it, and should we deliver it?\n\nKind regards\nAnna", 'dealroot' )
		);
	}

	/**
	 * Sends a sample email to the current user.
	 */
	public static function handle_test() {
		check_admin_referer( 'dealroot_mail_test' );

		if ( ! current_user_can( 'manage_options' ) ) {
			wp_die( esc_html__( 'You are not allowed to do this.', 'dealroot' ), 403 );
		}

		$user = wp_get_current_user();
		$sent = self::customer(
			$user->user_email,
			/* translators: %s: name of the business */
			sprintf( __( 'Test email from %s', 'dealroot' ), self::from_name() ),
			__( "Hello Ms Sommer,\n\nthank you for your enquiry about a bridal bouquet. So that we can make you a fitting offer: for which date do you need it, and should we deliver it?\n\nKind regards\nAnna", 'dealroot' )
		);

		wp_safe_redirect( add_query_arg( 'mail_test', $sent ? 'sent' : 'failed', admin_url( 'admin.php?page=' . Admin\Admin::SETTINGS_PAGE . '#dealroot-section-mail' ) ) );
		exit;
	}
}