<?php
// This file is part of Moodle - http://moodle.org/
//
// Moodle is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// Moodle is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.

/**
 * Test output mail configuration page
 *
 * @copyright 2019 Victor Deniz <victor@moodle.com>, based on Michael Milette <michael.milette@tngconsulting.ca> code
 * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 */

require_once(__DIR__ . '/../config.php');
require_once($CFG->libdir.'/adminlib.php');

// This is an admin page.
admin_externalpage_setup('testoutgoingmailconf');

$headingtitle = get_string('testoutgoingmailconf', 'admin');
$homeurl = new moodle_url('/admin/category.php', array('category' => 'email'));
$returnurl = new moodle_url('/admin/testoutgoingconf.php');

$form = new core_admin\form\testoutgoingmailconf_form(null, ['returnurl' => $returnurl]);
if ($form->is_cancelled()) {
    redirect($homeurl);
}

// Display the page.
echo $OUTPUT->header();
echo $OUTPUT->heading($headingtitle);

$data = $form->get_data();
if ($data) {
    $emailuser = new stdClass();
    $emailuser->email = $data->recipient;
    $emailuser->id = -99;


<     $subject = get_string('testoutgoingmailconf_subject', 'admin',
<         format_string($SITE->fullname, true, ['context' => context_system::instance()]));
<     $messagetext = get_string('testoutgoingmailconf_message', 'admin');



>     // Get the user who will send this email (From:).
>     $emailuserfrom = $USER;
>     if ($data->from) {
>         if (!$userfrom = \core_user::get_user_by_email($data->from)) {
>             $userfrom = \core_user::get_user_by_username($data->from);
>         }
>         if (!$userfrom && validate_email($data->from)) {
>             $dummyuser = \core_user::get_user(\core_user::NOREPLY_USER);
>             $dummyuser->id = -1;
>             $dummyuser->email = $data->from;
>             $dummyuser->firstname = $data->from;
>             $emailuserfrom = $dummyuser;
>         } else if ($userfrom) {
>             $emailuserfrom = $userfrom;
>         }
>     }
> 
>     // Get the date the email will be sent.
>     $timestamp = userdate(time(), get_string('strftimedatetimeaccurate', 'core_langconfig'));
> 
>     // Build the email subject.
>     $subjectparams = new stdClass();
>     $subjectparams->site = format_string($SITE->fullname, true, ['context' => context_system::instance()]);
>     if (isset($data->additionalsubject)) {
>         $subjectparams->additional = format_string($data->additionalsubject);
>     }
>     $subjectparams->time = $timestamp;
> 
>     $subject = get_string('testoutgoingmailconf_subject', 'admin', $subjectparams);
>     $messagetext = get_string('testoutgoingmailconf_message', 'admin', $timestamp);



    // Manage Moodle debugging options.
    $debuglevel = $CFG->debug;
    $debugdisplay = $CFG->debugdisplay;
    $debugsmtp = $CFG->debugsmtp ?? null; // This might not be set as it's optional.
    $CFG->debugdisplay = true;
    $CFG->debugsmtp = true;
    $CFG->debug = 15;

    // Send test email.
    ob_start();

<     $success = email_to_user($emailuser, $USER, $subject, $messagetext);



>     $success = email_to_user($emailuser, $emailuserfrom, $subject, $messagetext);


    $smtplog = ob_get_contents();
    ob_end_clean();

    // Restore Moodle debugging options.
    $CFG->debug = $debuglevel;
    $CFG->debugdisplay = $debugdisplay;

    // Restore the debugsmtp config, if it was set originally.
    unset($CFG->debugsmtp);
    if (!is_null($debugsmtp)) {
        $CFG->debugsmtp = $debugsmtp;
    }

    if ($success) {
        $msgparams = new stdClass();

<         $msgparams->fromemail = $USER->email;



>         $msgparams->fromemail = $emailuserfrom->email;


        $msgparams->toemail = $emailuser->email;
        $msg = get_string('testoutgoingmailconf_sentmail', 'admin', $msgparams);
        $notificationtype = 'notifysuccess';
    } else {
        $notificationtype = 'notifyproblem';
        // No communication between Moodle and the SMTP server - no error output.
        if (trim($smtplog) == false) {
            $msg = get_string('testoutgoingmailconf_errorcommunications', 'admin');
        } else {
            $msg = $smtplog;
        }
    }

    // Show result.
    echo $OUTPUT->notification($msg, $notificationtype);
}

$form->display();
echo $OUTPUT->footer();