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/>.
  16
  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  */
  23
  24 require_once(__DIR__ . '/../config.php');
  25 require_once($CFG->libdir.'/adminlib.php');
  26
  27 // This is an admin page.
  28 admin_externalpage_setup('testoutgoingmailconf');
  29
  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');
  33
  34 $form = new core_admin\form\testoutgoingmailconf_form(null, ['returnurl' => $returnurl]);
  35 if ($form->is_cancelled()) {
  36     redirect($homeurl);
  37 }
  38
  39 // Display the page.
  40 echo $OUTPUT->header();
  41 echo $OUTPUT->heading($headingtitle);
  42
  43 $data = $form->get_data();
  44 if ($data) {
  45     $emailuser = new stdClass();
  46     $emailuser->email = $data->recipient;
  47     $emailuser->id = -99;
  48
  49     $subject = get_string('testoutgoingmailconf_subject', 'admin', $SITE->fullname);
  50     $messagetext = get_string('testoutgoingmailconf_message', 'admin');
  51
  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;
  59
  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();
  65
  66     // Restore Moodle debugging options.
  67     $CFG->debug = $debuglevel;
  68     $CFG->debugdisplay = $debugdisplay;
  69     $CFG->debugsmtp = $debugsmtp;
  70
  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     }
  86
  87     // Show result.
  88     echo $OUTPUT->notification($msg, $notificationtype);
  89 }
  90
  91 $form->display();
  92 echo $OUTPUT->footer();