Search moodle.org's
Developer Documentation

See Release Notes
Long Term Support Release

  • Bug fixes for general core bugs in 4.1.x will end 13 November 2023 (12 months).
  • Bug fixes for security issues in 4.1.x will end 10 November 2025 (36 months).
  • PHP version: minimum PHP 7.4.0 Note: minimum PHP version has increased since Moodle 4.0. PHP 8.0.x is supported too.
<?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();