MDL-13745 admin: add Output mail configuration test
[moodle.git] / admin / testoutgoingmailconf.php
1 <?php
2 // This file is part of Moodle - http://moodle.org/
3 //
4 // Moodle is free software: you can redistribute it and/or modify
5 // it under the terms of the GNU General Public License as published by
6 // the Free Software Foundation, either version 3 of the License, or
7 // (at your option) any later version.
8 //
9 // Moodle is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 // GNU General Public License for more details.
13 //
14 // You should have received a copy of the GNU General Public License
15 // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
17 /**
18  * Test output mail configuration page
19  *
20  * @copyright 2019 Victor Deniz <victor@moodle.com>, based on Michael Milette <michael.milette@tngconsulting.ca> code
21  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
22  */
24 require_once(__DIR__ . '/../config.php');
25 require_once($CFG->libdir.'/adminlib.php');
27 // This is an admin page.
28 admin_externalpage_setup('testoutgoingmailconf');
30 $headingtitle = get_string('testoutgoingmailconf', 'admin');
31 $homeurl = new moodle_url('/admin/category.php', array('category' => 'email'));
32 $returnurl = new moodle_url('/admin/testoutgoingconf.php');
34 $form = new core_admin\form\testoutgoingmailconf_form(null, ['returnurl' => $returnurl]);
35 if ($form->is_cancelled()) {
36     redirect($homeurl);
37 }
39 // Display the page.
40 echo $OUTPUT->header();
41 echo $OUTPUT->heading($headingtitle);
43 $data = $form->get_data();
44 if ($data) {
45     $emailuser = new stdClass();
46     $emailuser->email = $data->recipient;
47     $emailuser->id = -99;
49     $subject = get_string('testoutgoingmailconf_subject', 'admin', $SITE->fullname);
50     $messagetext = get_string('testoutgoingmailconf_message', 'admin');
52     // Manage Moodle debugging options.
53     $debuglevel = $CFG->debug;
54     $debugdisplay = $CFG->debugdisplay;
55     $debugsmtp = $CFG->debugsmtp;
56     $CFG->debugdisplay = true;
57     $CFG->debugsmtp = true;
58     $CFG->debug = 15;
60     // Send test email.
61     ob_start();
62     $success = email_to_user($emailuser, $USER, $subject, $messagetext);
63     $smtplog = ob_get_contents();
64     ob_end_clean();
66     // Restore Moodle debugging options.
67     $CFG->debug = $debuglevel;
68     $CFG->debugdisplay = $debugdisplay;
69     $CFG->debugsmtp = $debugsmtp;
71     if ($success) {
72         $msgparams = new stdClass();
73         $msgparams->fromemail = $USER->email;
74         $msgparams->toemail = $emailuser->email;
75         $msg = get_string('testoutgoingmailconf_sentmail', 'admin', $msgparams);
76         $notificationtype = 'notifysuccess';
77     } else {
78         $notificationtype = 'notifyproblem';
79         // No communication between Moodle and the SMTP server - no error output.
80         if (trim($smtplog) == false) {
81             $msg = get_string('testoutgoingmailconf_errorcommunications', 'admin');
82         } else {
83             $msg = $smtplog;
84         }
85     }
87     // Show result.
88     echo $OUTPUT->notification($msg, $notificationtype);
89 }
91 $form->display();
92 echo $OUTPUT->footer();