<?php
/**
 * @file src/Util/Emailer.php
 */
namespace Friendica\Util;

use Friendica\Core\Hook;
use Friendica\Core\Logger;
use Friendica\DI;
use Friendica\Protocol\Email;

/**
 * class to handle emailing
 */
class Emailer
{
	/**
	 * Send a multipart/alternative message with Text and HTML versions
	 *
	 * @param array $params parameters
	 *                      fromName             name of the sender
	 *                      fromEmail            email of the sender
	 *                      replyTo              address to direct responses
	 *                      toEmail              destination email address
	 *                      messageSubject       subject of the message
	 *                      htmlVersion          html version of the message
	 *                      textVersion          text only version of the message
	 *                      additionalMailHeader additions to the SMTP mail header
	 *                      optional             uid user id of the destination user
	 *
	 * @return bool
	 * @throws \Friendica\Network\HTTPException\InternalServerErrorException
	 */
	public function send(string $fromName, string $fromEmail, string $replyTo, string $toEmail,
	                     string $subject, string $msgHtml, string $msgText,
	                     string $additionalMailHeader = '', int $uid = null)
	{
		$params['sent'] = false;

		Hook::callAll('emailer_send_prepare', $params);

		if ($params['sent']) {
			return true;
		}

		$email_textonly = false;
		if (!empty($uid)) {
			$email_textonly = DI::pConfig()->get($uid, "system", "email_textonly");
		}

		$fromName = Email::encodeHeader(html_entity_decode($fromName, ENT_QUOTES, 'UTF-8'), 'UTF-8');
		$messageSubject = Email::encodeHeader(html_entity_decode($subject, ENT_QUOTES, 'UTF-8'), 'UTF-8');

		// generate a mime boundary
		$mimeBoundary   =rand(0, 9)."-"
				.rand(100000000, 999999999)."-"
				.rand(100000000, 999999999)."=:"
				.rand(10000, 99999);

		// generate a multipart/alternative message header
		$messageHeader = $additionalMailHeader .
						"From: $fromName <{$fromEmail}>\n" .
						"Reply-To: $fromName <{$replyTo}>\n" .
						"MIME-Version: 1.0\n" .
						"Content-Type: multipart/alternative; boundary=\"{$mimeBoundary}\"";

		// assemble the final multipart message body with the text and html types included
		$textBody	=	chunk_split(base64_encode($msgText));
		$htmlBody	=	chunk_split(base64_encode($msgHtml));
		$multipartMessageBody =	"--" . $mimeBoundary . "\n" .					// plain text section
								"Content-Type: text/plain; charset=UTF-8\n" .
								"Content-Transfer-Encoding: base64\n\n" .
								$textBody . "\n";

		if (!$email_textonly && !is_null($msgHtml)) {
			$multipartMessageBody .=
				"--" . $mimeBoundary . "\n" .				// text/html section
				"Content-Type: text/html; charset=UTF-8\n" .
				"Content-Transfer-Encoding: base64\n\n" .
				$htmlBody . "\n";
		}
		$multipartMessageBody .=
			"--" . $mimeBoundary . "--\n";					// message ending

		if (DI::config()->get("system", "sendmail_params", true)) {
			$sendmail_params = '-f ' . $fromEmail;
		} else {
			$sendmail_params = null;
		}

		// send the message
		$hookdata = [
			'to' => $toEmail,
			'subject' => $messageSubject,
			'body' => $multipartMessageBody,
			'headers' => $messageHeader,
			'parameters' => $sendmail_params,
			'sent' => false,
		];

		Hook::callAll("emailer_send", $hookdata);

		if ($hookdata['sent']) {
			return true;
		}

		$res = mail(
			$hookdata['to'],
			$hookdata['subject'],
			$hookdata['body'],
			$hookdata['headers'],
			$hookdata['parameters']
		);
		Logger::log("header " . 'To: ' . $toEmail . "\n" . $messageHeader, Logger::DEBUG);
		Logger::log("return value " . (($res)?"true":"false"), Logger::DEBUG);
		return $res;
	}
}