123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964 |
- <?php
- /* Copyright (C) 2007-2020 Laurent Destailleur <eldy@users.sourceforge.net>
- * Copyright (C) 2009-2012 Regis Houssin <regis.houssin@inodbox.com>
- * Copyright (C) 2013 Juanjo Menent <jmenent@2byte.es>
- * Copyright (C) 2016 Jonathan TISSEAU <jonathan.tisseau@86dev.fr>
- *
- * This program 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.
- *
- * This program 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 this program. If not, see <https://www.gnu.org/licenses/>.
- */
- /**
- * \file htdocs/admin/mails.php
- * \brief Page to setup emails sending
- */
- require '../main.inc.php';
- require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php';
- require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
- // Load translation files required by the page
- $langs->loadLangs(array("companies", "products", "admin", "mails", "other", "errors"));
- $action = GETPOST('action', 'aZ09');
- $cancel = GETPOST('cancel', 'aZ09');
- if (!$user->admin) {
- accessforbidden();
- }
- $usersignature = $user->signature;
- // For action = test or send, we ensure that content is not html, even for signature, because this we want a test with NO html.
- if ($action == 'test' || $action == 'send') {
- $usersignature = dol_string_nohtmltag($usersignature, 2);
- }
- $substitutionarrayfortest = array(
- '__DOL_MAIN_URL_ROOT__'=>DOL_MAIN_URL_ROOT,
- '__CHECK_READ__' => (!empty($object) && is_object($object) && is_object($object->thirdparty)) ? '<img src="'.DOL_MAIN_URL_ROOT.'/public/emailing/mailing-read.php?tag='.$object->thirdparty->tag.'&securitykey='.urlencode($conf->global->MAILING_EMAIL_UNSUBSCRIBE_KEY).'" width="1" height="1" style="width:1px;height:1px" border="0"/>' : '',
- '__USER_LOGIN__' => $user->login,
- '__USER_EMAIL__' => $user->email,
- '__USER_SIGNATURE__' => (($user->signature && empty($conf->global->MAIN_MAIL_DO_NOT_USE_SIGN)) ? $usersignature : ''), // Done into actions_sendmails
- '__ID__' => 'RecipientIdRecord',
- //'__EMAIL__' => 'RecipientEMail', // Done into actions_sendmails
- '__LASTNAME__' => 'RecipientLastname',
- '__FIRSTNAME__' => 'RecipientFirstname',
- '__ADDRESS__'=> 'RecipientAddress',
- '__ZIP__'=> 'RecipientZip',
- '__TOWN_'=> 'RecipientTown',
- '__COUNTRY__'=> 'RecipientCountry'
- );
- complete_substitutions_array($substitutionarrayfortest, $langs);
- /*
- * Actions
- */
- if ($action == 'update' && !$cancel) {
- if (!$error && !GETPOST("MAIN_MAIL_EMAIL_FROM", 'alphanohtml')) {
- $error++;
- setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("MAIN_MAIL_EMAIL_FROM")), null, 'errors');
- $action = 'edit';
- }
- if (!$error && !isValidEmail(GETPOST("MAIN_MAIL_EMAIL_FROM", 'alphanohtml'))) {
- $error++;
- setEventMessages($langs->trans("ErrorBadEMail", GETPOST("MAIN_MAIL_EMAIL_FROM", 'alphanohtml')), null, 'errors');
- $action = 'edit';
- }
- if (!$error) {
- dolibarr_set_const($db, "MAIN_DISABLE_ALL_MAILS", GETPOST("MAIN_DISABLE_ALL_MAILS", 'int'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_FORCE_SENDTO", GETPOST("MAIN_MAIL_FORCE_SENDTO", 'alphanohtml'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_ENABLED_USER_DEST_SELECT", GETPOST("MAIN_MAIL_ENABLED_USER_DEST_SELECT", 'int'), 'chaine', 0, '', $conf->entity);
- // Send mode parameters
- dolibarr_set_const($db, "MAIN_MAIL_SENDMODE", GETPOST("MAIN_MAIL_SENDMODE", 'aZ09'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_SMTP_PORT", GETPOST("MAIN_MAIL_SMTP_PORT", 'int'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_SMTP_SERVER", GETPOST("MAIN_MAIL_SMTP_SERVER", 'alphanohtml'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_SMTPS_ID", GETPOST("MAIN_MAIL_SMTPS_ID", 'alphanohtml'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_SMTPS_PW", GETPOST("MAIN_MAIL_SMTPS_PW", 'none'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_EMAIL_TLS", GETPOST("MAIN_MAIL_EMAIL_TLS", 'int'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_EMAIL_STARTTLS", GETPOST("MAIN_MAIL_EMAIL_STARTTLS", 'int'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED", GETPOST("MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED", 'int'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_EMAIL_DKIM_ENABLED", GETPOST("MAIN_MAIL_EMAIL_DKIM_ENABLED", 'int'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_EMAIL_DKIM_DOMAIN", GETPOST("MAIN_MAIL_EMAIL_DKIM_DOMAIN", 'alphanohtml'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_EMAIL_DKIM_SELECTOR", GETPOST("MAIN_MAIL_EMAIL_DKIM_SELECTOR", 'alphanohtml'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY", GETPOST("MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY", 'alphanohtml'), 'chaine', 0, '', $conf->entity);
- // Content parameters
- dolibarr_set_const($db, "MAIN_MAIL_EMAIL_FROM", GETPOST("MAIN_MAIL_EMAIL_FROM", 'alphanohtml'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_ERRORS_TO", GETPOST("MAIN_MAIL_ERRORS_TO", 'alphanohtml'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, "MAIN_MAIL_AUTOCOPY_TO", GETPOST("MAIN_MAIL_AUTOCOPY_TO", 'alphanohtml'), 'chaine', 0, '', $conf->entity);
- dolibarr_set_const($db, 'MAIN_MAIL_DEFAULT_FROMTYPE', GETPOST('MAIN_MAIL_DEFAULT_FROMTYPE', 'alphanohtml'), 'chaine', 0, '', $conf->entity);
- header("Location: ".$_SERVER["PHP_SELF"]."?mainmenu=home&leftmenu=setup");
- exit;
- }
- }
- // Actions to send emails
- $id = 0;
- $actiontypecode = ''; // Not an event for agenda
- $triggersendname = ''; // Disable triggers
- $paramname = 'id';
- $mode = 'emailfortest';
- $trackid = (($action == 'testhtml') ? "testhtml" : "test");
- $sendcontext = '';
- include DOL_DOCUMENT_ROOT.'/core/actions_sendmails.inc.php';
- if ($action == 'presend' && GETPOST('trackid', 'alphanohtml') == 'test') {
- $action = 'test';
- }
- if ($action == 'presend' && GETPOST('trackid', 'alphanohtml') == 'testhtml') {
- $action = 'testhtml';
- }
- /*
- * View
- */
- $form = new Form($db);
- $linuxlike = 1;
- if (preg_match('/^win/i', PHP_OS)) {
- $linuxlike = 0;
- }
- if (preg_match('/^mac/i', PHP_OS)) {
- $linuxlike = 0;
- }
- if (empty($conf->global->MAIN_MAIL_SENDMODE)) {
- $conf->global->MAIN_MAIL_SENDMODE = 'mail';
- }
- $port = !empty($conf->global->MAIN_MAIL_SMTP_PORT) ? $conf->global->MAIN_MAIL_SMTP_PORT : ini_get('smtp_port');
- if (!$port) {
- $port = 25;
- }
- $server = !empty($conf->global->MAIN_MAIL_SMTP_SERVER) ? $conf->global->MAIN_MAIL_SMTP_SERVER : ini_get('SMTP');
- if (!$server) {
- $server = '127.0.0.1';
- }
- $wikihelp = 'EN:Setup_EMails|FR:Paramétrage_EMails|ES:Configuración_EMails';
- llxHeader('', $langs->trans("Setup"), $wikihelp);
- print load_fiche_titre($langs->trans("EMailsSetup"), '', 'title_setup');
- $head = email_admin_prepare_head();
- // List of sending methods
- $listofmethods = array();
- $listofmethods['mail'] = 'PHP mail function';
- $listofmethods['smtps'] = 'SMTP/SMTPS socket library';
- if (version_compare(phpversion(), '7.0', '>=')) {
- $listofmethods['swiftmailer'] = 'Swift Mailer socket library';
- }
- if ($action == 'edit') {
- if ($conf->use_javascript_ajax) {
- print "\n".'<script type="text/javascript">';
- print 'jQuery(document).ready(function () {
- function initfields()
- {
- if (jQuery("#MAIN_MAIL_SENDMODE").val()==\'mail\')
- {
- console.log("I choose php mail mode");
- jQuery(".drag").hide();
- jQuery("#MAIN_MAIL_EMAIL_TLS").val(0);
- jQuery("#MAIN_MAIL_EMAIL_TLS").prop("disabled", true);
- jQuery("#MAIN_MAIL_EMAIL_STARTTLS").val(0);
- jQuery("#MAIN_MAIL_EMAIL_STARTTLS").prop("disabled", true);
- jQuery("#MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED").val(0);
- jQuery("#MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED").prop("disabled", true);
- jQuery("#MAIN_MAIL_EMAIL_DKIM_ENABLED").val(0);
- jQuery("#MAIN_MAIL_EMAIL_DKIM_ENABLED").prop("disabled", true);
- jQuery("#MAIN_MAIL_EMAIL_DKIM_DOMAIN").prop("disabled", true);
- jQuery("#MAIN_MAIL_EMAIL_DKIM_SELECTOR").prop("disabled", true);
- jQuery("#MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY").prop("disabled", true);
- jQuery(".smtp_method").hide();
- jQuery(".dkim").hide();
- ';
- if ($linuxlike) {
- print '
- jQuery("#MAIN_MAIL_SMTP_SERVER").hide();
- jQuery("#MAIN_MAIL_SMTP_PORT").hide();
- jQuery("#smtp_server_mess").show();
- jQuery("#smtp_port_mess").show();';
- } else {
- print '
- jQuery("#MAIN_MAIL_SMTP_SERVER").prop("disabled", true);
- jQuery("#MAIN_MAIL_SMTP_PORT").prop("disabled", true);
- jQuery("#smtp_server_mess").hide();
- jQuery("#smtp_port_mess").hide();';
- }
- print '
- }
- if (jQuery("#MAIN_MAIL_SENDMODE").val()==\'smtps\')
- {
- console.log("I choose smtps mode");
- jQuery(".drag").show();
- jQuery("#MAIN_MAIL_EMAIL_TLS").val('.$conf->global->MAIN_MAIL_EMAIL_TLS.');
- jQuery("#MAIN_MAIL_EMAIL_TLS").removeAttr("disabled");
- jQuery("#MAIN_MAIL_EMAIL_STARTTLS").val('.$conf->global->MAIN_MAIL_EMAIL_STARTTLS.');
- jQuery("#MAIN_MAIL_EMAIL_STARTTLS").removeAttr("disabled");
- jQuery("#MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED").val('.$conf->global->MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED.');
- jQuery("#MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED").removeAttr("disabled");
- jQuery("#MAIN_MAIL_EMAIL_DKIM_ENABLED").val(0);
- jQuery("#MAIN_MAIL_EMAIL_DKIM_ENABLED").prop("disabled", true);
- jQuery("#MAIN_MAIL_EMAIL_DKIM_DOMAIN").prop("disabled", true);
- jQuery("#MAIN_MAIL_EMAIL_DKIM_SELECTOR").prop("disabled", true);
- jQuery("#MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY").prop("disabled", true);
- jQuery("#MAIN_MAIL_EMAIL_DKIM_DOMAIN").hide();
- jQuery("#MAIN_MAIL_EMAIL_DKIM_SELECTOR").hide();
- jQuery("#MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY").hide();
- jQuery("#MAIN_MAIL_SMTP_SERVER").removeAttr("disabled");
- jQuery("#MAIN_MAIL_SMTP_PORT").removeAttr("disabled");
- jQuery("#MAIN_MAIL_SMTP_SERVER").show();
- jQuery("#MAIN_MAIL_SMTP_PORT").show();
- jQuery("#smtp_server_mess").hide();
- jQuery("#smtp_port_mess").hide();
- jQuery(".smtp_method").show();
- jQuery(".dkim").hide();
- }
- if (jQuery("#MAIN_MAIL_SENDMODE").val()==\'swiftmailer\')
- {
- console.log("I choose swiftmailer mode");
- jQuery(".drag").show();
- jQuery("#MAIN_MAIL_EMAIL_TLS").val('.$conf->global->MAIN_MAIL_EMAIL_TLS.');
- jQuery("#MAIN_MAIL_EMAIL_TLS").removeAttr("disabled");
- jQuery("#MAIN_MAIL_EMAIL_STARTTLS").val('.$conf->global->MAIN_MAIL_EMAIL_STARTTLS.');
- jQuery("#MAIN_MAIL_EMAIL_STARTTLS").removeAttr("disabled");
- jQuery("#MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED").val('.$conf->global->MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED.');
- jQuery("#MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED").removeAttr("disabled");
- jQuery("#MAIN_MAIL_EMAIL_DKIM_ENABLED").val('.$conf->global->MAIN_MAIL_EMAIL_DKIM_ENABLED.');
- jQuery("#MAIN_MAIL_EMAIL_DKIM_ENABLED").removeAttr("disabled");
- jQuery("#MAIN_MAIL_EMAIL_DKIM_DOMAIN").removeAttr("disabled");
- jQuery("#MAIN_MAIL_EMAIL_DKIM_SELECTOR").removeAttr("disabled");
- jQuery("#MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY").removeAttr("disabled");
- jQuery("#MAIN_MAIL_EMAIL_DKIM_DOMAIN").show();
- jQuery("#MAIN_MAIL_EMAIL_DKIM_SELECTOR").show();
- jQuery("#MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY").show();
- jQuery("#MAIN_MAIL_SMTP_SERVER").removeAttr("disabled");
- jQuery("#MAIN_MAIL_SMTP_PORT").removeAttr("disabled");
- jQuery("#MAIN_MAIL_SMTP_SERVER").show();
- jQuery("#MAIN_MAIL_SMTP_PORT").show();
- jQuery("#smtp_server_mess").hide();
- jQuery("#smtp_port_mess").hide();
- jQuery(".smtp_method").show();
- jQuery(".dkim").show();
- }
- }
- initfields();
- jQuery("#MAIN_MAIL_SENDMODE").change(function() {
- initfields();
- });
- jQuery("#MAIN_MAIL_EMAIL_TLS").change(function() {
- if (jQuery("#MAIN_MAIL_EMAIL_TLS").val() == 1)
- jQuery("#MAIN_MAIL_EMAIL_STARTTLS").val(0);
- else
- jQuery("#MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED").val(0);
- });
- jQuery("#MAIN_MAIL_EMAIL_STARTTLS").change(function() {
- if (jQuery("#MAIN_MAIL_EMAIL_STARTTLS").val() == 1)
- jQuery("#MAIN_MAIL_EMAIL_TLS").val(0);
- else
- jQuery("#MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED").val(0);
- });
- })';
- print '</script>'."\n";
- }
- print '<form method="post" action="'.$_SERVER["PHP_SELF"].'">';
- print '<input type="hidden" name="token" value="'.newToken().'">';
- print '<input type="hidden" name="action" value="update">';
- print dol_get_fiche_head($head, 'common', '', -1);
- print '<span class="opacitymedium">'.$langs->trans("EMailsDesc")."</span><br>\n";
- print "<br><br>\n";
- clearstatcache();
- print '<table class="noborder centpercent">';
- print '<tr class="liste_titre"><td class="titlefieldmiddle">'.$langs->trans("Parameter").'</td><td>'.$langs->trans("Value").'</td></tr>';
- // Disable
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_DISABLE_ALL_MAILS").'</td><td>';
- print $form->selectyesno('MAIN_DISABLE_ALL_MAILS', getDolGlobalString('MAIN_DISABLE_ALL_MAILS'), 1);
- print '</td></tr>';
- // Force e-mail recipient
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_FORCE_SENDTO").'</td><td>';
- print '<input class="flat" name="MAIN_MAIL_FORCE_SENDTO" size="32" value="'.(!empty($conf->global->MAIN_MAIL_FORCE_SENDTO) ? $conf->global->MAIN_MAIL_FORCE_SENDTO : '').'" />';
- print '</td></tr>';
- print '</table>';
- print '<br>';
- print '<table class="noborder centpercent">';
- print '<tr class="liste_titre"><td class="titlefieldmiddle">'.$langs->trans("MAIN_MAIL_SENDMODE").'</td><td></td></tr>';
- // Method
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_SENDMODE").'</td><td>';
- // SuperAdministrator access only
- if ((empty($conf->global->MAIN_MODULE_MULTICOMPANY)) || ($user->admin && !$user->entity)) {
- print $form->selectarray('MAIN_MAIL_SENDMODE', $listofmethods, $conf->global->MAIN_MAIL_SENDMODE);
- } else {
- $text = $listofmethods[$conf->global->MAIN_MAIL_SENDMODE];
- if (empty($text)) {
- $text = $langs->trans("Undefined");
- }
- $htmltext = $langs->trans("ContactSuperAdminForChange");
- print $form->textwithpicto($text, $htmltext, 1, 'superadmin');
- print '<input type="hidden" name="MAIN_MAIL_SENDMODE" value="'.$conf->global->MAIN_MAIL_SENDMODE.'">';
- }
- print '</td></tr>';
- // Host server
- print '<tr class="oddeven">';
- if (!$conf->use_javascript_ajax && $linuxlike && $conf->global->MAIN_MAIL_SENDMODE == 'mail') {
- print '<td>';
- print $langs->trans("MAIN_MAIL_SMTP_SERVER_NotAvailableOnLinuxLike");
- print '</td><td>';
- print '<span class="opacitymedium">'.$langs->trans("SeeLocalSendMailSetup").'</span>';
- print '</td>';
- } else {
- print '<td>';
- $mainserver = (!empty($conf->global->MAIN_MAIL_SMTP_SERVER) ? $conf->global->MAIN_MAIL_SMTP_SERVER : '');
- $smtpserver = ini_get('SMTP') ?ini_get('SMTP') : $langs->transnoentities("Undefined");
- if ($linuxlike) {
- print $langs->trans("MAIN_MAIL_SMTP_SERVER_NotAvailableOnLinuxLike");
- } else {
- print $langs->trans("MAIN_MAIL_SMTP_SERVER", $smtpserver);
- }
- print '</td><td>';
- // SuperAdministrator access only
- if (empty($conf->multicompany->enabled) || ($user->admin && !$user->entity)) {
- print '<input class="flat minwidth300" id="MAIN_MAIL_SMTP_SERVER" name="MAIN_MAIL_SMTP_SERVER" value="'.$mainserver.'" autocomplete="off">';
- print '<input type="hidden" id="MAIN_MAIL_SMTP_SERVER_sav" name="MAIN_MAIL_SMTP_SERVER_sav" value="'.$mainserver.'">';
- print '<span id="smtp_server_mess" class="opacitymedium">'.$langs->trans("SeeLocalSendMailSetup").'</span>';
- print ' <span class="opacitymedium smtp_method">'.$langs->trans("SeeLinkToOnlineDocumentation").'</span>';
- } else {
- $text = !empty($mainserver) ? $mainserver : $smtpserver;
- $htmltext = $langs->trans("ContactSuperAdminForChange");
- print $form->textwithpicto($text, $htmltext, 1, 'superadmin');
- print '<input type="hidden" id="MAIN_MAIL_SMTP_SERVER" name="MAIN_MAIL_SMTP_SERVER" value="'.$mainserver.'">';
- }
- print '</td>';
- }
- print '</tr>';
- // Port
- print '<tr class="oddeven"><td>';
- if (!$conf->use_javascript_ajax && $linuxlike && $conf->global->MAIN_MAIL_SENDMODE == 'mail') {
- print $langs->trans("MAIN_MAIL_SMTP_PORT_NotAvailableOnLinuxLike");
- print '</td><td>';
- print '<span class="opacitymedium">'.$langs->trans("SeeLocalSendMailSetup").'</span>';
- } else {
- $mainport = (!empty($conf->global->MAIN_MAIL_SMTP_PORT) ? $conf->global->MAIN_MAIL_SMTP_PORT : '');
- $smtpport = ini_get('smtp_port') ?ini_get('smtp_port') : $langs->transnoentities("Undefined");
- if ($linuxlike) {
- print $langs->trans("MAIN_MAIL_SMTP_PORT_NotAvailableOnLinuxLike");
- } else {
- print $langs->trans("MAIN_MAIL_SMTP_PORT", $smtpport);
- }
- print '</td><td>';
- // SuperAdministrator access only
- if (empty($conf->multicompany->enabled) || ($user->admin && !$user->entity)) {
- print '<input class="flat" id="MAIN_MAIL_SMTP_PORT" name="MAIN_MAIL_SMTP_PORT" size="3" value="'.$mainport.'">';
- print '<input type="hidden" id="MAIN_MAIL_SMTP_PORT_sav" name="MAIN_MAIL_SMTP_PORT_sav" value="'.$mainport.'">';
- print '<span id="smtp_port_mess" class="opacitymedium">'.$langs->trans("SeeLocalSendMailSetup").'</span>';
- } else {
- $text = (!empty($mainport) ? $mainport : $smtpport);
- $htmltext = $langs->trans("ContactSuperAdminForChange");
- print $form->textwithpicto($text, $htmltext, 1, 'superadmin');
- print '<input type="hidden" id="MAIN_MAIL_SMTP_PORT" name="MAIN_MAIL_SMTP_PORT" value="'.$mainport.'">';
- }
- }
- print '</td></tr>';
- // ID
- if (!empty($conf->use_javascript_ajax) || (isset($conf->global->MAIN_MAIL_SENDMODE) && in_array($conf->global->MAIN_MAIL_SENDMODE, array('smtps', 'swiftmailer')))) {
- $mainstmpid = (!empty($conf->global->MAIN_MAIL_SMTPS_ID) ? $conf->global->MAIN_MAIL_SMTPS_ID : '');
- print '<tr class="drag drop oddeven"><td>'.$langs->trans("MAIN_MAIL_SMTPS_ID").'</td><td>';
- // SuperAdministrator access only
- if (empty($conf->multicompany->enabled) || ($user->admin && !$user->entity)) {
- print '<input class="flat" name="MAIN_MAIL_SMTPS_ID" size="32" value="'.$mainstmpid.'">';
- } else {
- $htmltext = $langs->trans("ContactSuperAdminForChange");
- print $form->textwithpicto($conf->global->MAIN_MAIL_SMTPS_ID, $htmltext, 1, 'superadmin');
- print '<input type="hidden" name="MAIN_MAIL_SMTPS_ID" value="'.$mainstmpid.'">';
- }
- print '</td></tr>';
- }
- // PW
- if (!empty($conf->use_javascript_ajax) || (isset($conf->global->MAIN_MAIL_SENDMODE) && in_array($conf->global->MAIN_MAIL_SENDMODE, array('smtps', 'swiftmailer')))) {
- $mainsmtppw = (!empty($conf->global->MAIN_MAIL_SMTPS_PW) ? $conf->global->MAIN_MAIL_SMTPS_PW : '');
- print '<tr class="drag drop oddeven"><td>';
- print $form->textwithpicto($langs->trans("MAIN_MAIL_SMTPS_PW"), $langs->trans("WithGMailYouCanCreateADedicatedPassword"));
- print '</td><td>';
- // SuperAdministrator access only
- if (empty($conf->multicompany->enabled) || ($user->admin && !$user->entity)) {
- print '<input class="flat" type="password" name="MAIN_MAIL_SMTPS_PW" size="32" value="'.$mainsmtppw.'" autocomplete="off">';
- } else {
- $htmltext = $langs->trans("ContactSuperAdminForChange");
- print $form->textwithpicto($conf->global->MAIN_MAIL_SMTPS_PW, $htmltext, 1, 'superadmin');
- print '<input type="hidden" name="MAIN_MAIL_SMTPS_PW" value="'.$mainsmtppw.'">';
- }
- print '</td></tr>';
- }
- // TLS
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_EMAIL_TLS").'</td><td>';
- if (!empty($conf->use_javascript_ajax) || (isset($conf->global->MAIN_MAIL_SENDMODE) && in_array($conf->global->MAIN_MAIL_SENDMODE, array('smtps', 'swiftmailer')))) {
- if (function_exists('openssl_open')) {
- print $form->selectyesno('MAIN_MAIL_EMAIL_TLS', (!empty($conf->global->MAIN_MAIL_EMAIL_TLS) ? $conf->global->MAIN_MAIL_EMAIL_TLS : 0), 1);
- } else {
- print yn(0).' ('.$langs->trans("YourPHPDoesNotHaveSSLSupport").')';
- }
- } else {
- print yn(0).' ('.$langs->trans("NotSupported").')';
- }
- print '</td></tr>';
- // STARTTLS
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_EMAIL_STARTTLS").'</td><td>';
- if (!empty($conf->use_javascript_ajax) || (isset($conf->global->MAIN_MAIL_SENDMODE) && in_array($conf->global->MAIN_MAIL_SENDMODE, array('smtps', 'swiftmailer')))) {
- if (function_exists('openssl_open')) {
- print $form->selectyesno('MAIN_MAIL_EMAIL_STARTTLS', (!empty($conf->global->MAIN_MAIL_EMAIL_STARTTLS) ? $conf->global->MAIN_MAIL_EMAIL_STARTTLS : 0), 1);
- } else {
- print yn(0).' ('.$langs->trans("YourPHPDoesNotHaveSSLSupport").')';
- }
- } else {
- print yn(0).' ('.$langs->trans("NotSupported").')';
- }
- print '</td></tr>';
- // SMTP_ALLOW_SELF_SIGNED
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED").'</td><td>';
- if (!empty($conf->use_javascript_ajax) || (isset($conf->global->MAIN_MAIL_SENDMODE) && in_array($conf->global->MAIN_MAIL_SENDMODE, array('smtps', 'swiftmailer')))) {
- if (function_exists('openssl_open')) {
- print $form->selectyesno('MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED', (!empty($conf->global->MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED) ? $conf->global->MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED : 0), 1);
- } else {
- print yn(0).' ('.$langs->trans("YourPHPDoesNotHaveSSLSupport").')';
- }
- } else {
- print yn(0).' ('.$langs->trans("NotSupported").')';
- }
- print '</td></tr>';
- // DKIM
- print '<tr class="oddeven dkim"><td>'.$langs->trans("MAIN_MAIL_EMAIL_DKIM_ENABLED").'</td><td>';
- if (!empty($conf->use_javascript_ajax) || (isset($conf->global->MAIN_MAIL_SENDMODE) && in_array($conf->global->MAIN_MAIL_SENDMODE, array('swiftmailer')))) {
- if (function_exists('openssl_open')) {
- print $form->selectyesno('MAIN_MAIL_EMAIL_DKIM_ENABLED', (!empty($conf->global->MAIN_MAIL_EMAIL_DKIM_ENABLED) ? $conf->global->MAIN_MAIL_EMAIL_DKIM_ENABLED : 0), 1);
- } else {
- print yn(0).' ('.$langs->trans("YourPHPDoesNotHaveSSLSupport").')';
- }
- } else {
- print yn(0).' ('.$langs->trans("NotSupported").')';
- }
- print '</td></tr>';
- // DKIM Domain
- print '<tr class="oddeven dkim"><td>'.$langs->trans("MAIN_MAIL_EMAIL_DKIM_DOMAIN").'</td>';
- print '<td><input class="flat" id="MAIN_MAIL_EMAIL_DKIM_DOMAIN" name="MAIN_MAIL_EMAIL_DKIM_DOMAIN" size="32" value="'.(!empty($conf->global->MAIN_MAIL_EMAIL_DKIM_DOMAIN) ? $conf->global->MAIN_MAIL_EMAIL_DKIM_DOMAIN : '');
- print '"></td></tr>';
- // DKIM Selector
- print '<tr class="oddeven dkim"><td>'.$langs->trans("MAIN_MAIL_EMAIL_DKIM_SELECTOR").'</td>';
- print '<td><input class="flat" id="MAIN_MAIL_EMAIL_DKIM_SELECTOR" name="MAIN_MAIL_EMAIL_DKIM_SELECTOR" size="32" value="'.(!empty($conf->global->MAIN_MAIL_EMAIL_DKIM_SELECTOR) ? $conf->global->MAIN_MAIL_EMAIL_DKIM_SELECTOR : '');
- print '"></td></tr>';
- // DKIM PRIVATE KEY
- print '<tr class="oddeven dkim"><td>'.$langs->trans("MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY").'</td>';
- print '<td><textarea id="MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY" name="MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY" rows="15" cols="100">'.(!empty($conf->global->MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY) ? $conf->global->MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY : '').'</textarea>';
- print '</td></tr>';
- print '</table>';
- print '<br>';
- print '<table class="noborder centpercent">';
- print '<tr class="liste_titre"><td class="titlefieldmiddle">'.$langs->trans("OtherOptions").'</td><td></td></tr>';
- // From
- $help = img_help(1, $langs->trans("EMailHelpMsgSPFDKIM"));
- print '<tr class="oddeven"><td class="fieldrequired">'.$langs->trans("MAIN_MAIL_EMAIL_FROM", ini_get('sendmail_from') ?ini_get('sendmail_from') : $langs->transnoentities("Undefined")).' '.$help.'</td>';
- print '<td><input class="flat minwidth200" name="MAIN_MAIL_EMAIL_FROM" value="'.(!empty($conf->global->MAIN_MAIL_EMAIL_FROM) ? $conf->global->MAIN_MAIL_EMAIL_FROM : '');
- print '"></td></tr>';
- // Default from type
- $liste = array();
- $liste['user'] = $langs->trans('UserEmail');
- $liste['company'] = $langs->trans('CompanyEmail').' ('.(empty($conf->global->MAIN_INFO_SOCIETE_MAIL) ? $langs->trans("NotDefined") : $conf->global->MAIN_INFO_SOCIETE_MAIL).')';
- print '<tr class="oddeven"><td>'.$langs->trans('MAIN_MAIL_DEFAULT_FROMTYPE').'</td><td>';
- print $form->selectarray('MAIN_MAIL_DEFAULT_FROMTYPE', $liste, getDolGlobalString('MAIN_MAIL_DEFAULT_FROMTYPE'), 0);
- print '</td></tr>';
- // From
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_ERRORS_TO").'</td>';
- print '<td><input class="flat" name="MAIN_MAIL_ERRORS_TO" size="32" value="'.(!empty($conf->global->MAIN_MAIL_ERRORS_TO) ? $conf->global->MAIN_MAIL_ERRORS_TO : '');
- print '"></td></tr>';
- // Autocopy to
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_AUTOCOPY_TO").'</td>';
- print '<td><input class="flat" name="MAIN_MAIL_AUTOCOPY_TO" size="32" value="'.(!empty($conf->global->MAIN_MAIL_AUTOCOPY_TO) ? $conf->global->MAIN_MAIL_AUTOCOPY_TO : '');
- print '"></td></tr>';
- // Add user to select destinaries list
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_ENABLED_USER_DEST_SELECT").'</td><td>';
- print $form->selectyesno('MAIN_MAIL_ENABLED_USER_DEST_SELECT', getDolGlobalString('MAIN_MAIL_ENABLED_USER_DEST_SELECT'), 1);
- print '</td></tr>';
- print '</table>';
- print dol_get_fiche_end();
- print $form->buttonsSaveCancel();
- print '</form>';
- } else {
- print dol_get_fiche_head($head, 'common', '', -1);
- print '<span class="opacitymedium">'.$langs->trans("EMailsDesc")."</span><br>\n";
- print "<br><br>\n";
- print '<div class="div-table-responsive-no-min">'; // You can use div-table-responsive-no-min if you dont need reserved height for your table
- print '<table class="noborder centpercent">';
- print '<tr class="liste_titre"><td class="titlefieldmiddle">'.$langs->trans("Parameter").'</td><td>'.$langs->trans("Value").'</td></tr>';
- // Disable
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_DISABLE_ALL_MAILS").'</td><td>'.yn(!empty($conf->global->MAIN_DISABLE_ALL_MAILS));
- if (!empty($conf->global->MAIN_DISABLE_ALL_MAILS)) {
- print img_warning($langs->trans("Disabled"));
- }
- print '</td></tr>';
- if (empty($conf->global->MAIN_DISABLE_ALL_MAILS)) {
- // Force e-mail recipient
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_FORCE_SENDTO").'</td><td>'.getDolGlobalString('MAIN_MAIL_FORCE_SENDTO');
- if (!empty(getDolGlobalString('MAIN_MAIL_FORCE_SENDTO'))) {
- if (!isValidEmail(getDolGlobalString('MAIN_MAIL_FORCE_SENDTO'))) {
- print img_warning($langs->trans("ErrorBadEMail"));
- } else {
- print img_warning($langs->trans("RecipientEmailsWillBeReplacedWithThisValue"));
- }
- }
- print '</td></tr>';
- }
- print '</table>';
- print '</div>';
- if (empty($conf->global->MAIN_DISABLE_ALL_MAILS)) {
- print '<br>';
- print '<div class="div-table-responsive-no-min">'; // You can use div-table-responsive-no-min if you dont need reserved height for your table
- print '<table class="noborder centpercent">';
- print '<tr class="liste_titre"><td class="titlefieldmiddle">'.$langs->trans("MAIN_MAIL_SENDMODE").'</td><td></td></tr>';
- // Method
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_SENDMODE").'</td><td>';
- $text = $listofmethods[$conf->global->MAIN_MAIL_SENDMODE];
- if (empty($text)) {
- $text = $langs->trans("Undefined").img_warning();
- }
- print $text;
- if ($conf->global->MAIN_MAIL_SENDMODE == 'mail' && empty($conf->global->MAIN_HIDE_WARNING_TO_ENCOURAGE_SMTP_SETUP)) {
- print $form->textwithpicto('', $langs->trans("WarningPHPMail").'<br>'.$langs->trans("WarningPHPMailA").'<br>'.$langs->trans("WarningPHPMailB").'<br>'.$langs->trans("WarningPHPMailC").'<br><br>'.$langs->trans("WarningPHPMailD"), 1, 'warning');
- }
- print '</td></tr>';
- // Host server
- if ($linuxlike && (isset($conf->global->MAIN_MAIL_SENDMODE) && $conf->global->MAIN_MAIL_SENDMODE == 'mail')) {
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_SMTP_SERVER_NotAvailableOnLinuxLike").'</td><td><span class="opacitymedium">'.$langs->trans("SeeLocalSendMailSetup").'</span></td></tr>';
- } else {
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_SMTP_SERVER", ini_get('SMTP') ?ini_get('SMTP') : $langs->transnoentities("Undefined")).'</td><td>'.(!empty($conf->global->MAIN_MAIL_SMTP_SERVER) ? $conf->global->MAIN_MAIL_SMTP_SERVER : '').'</td></tr>';
- }
- // Port
- if ($linuxlike && (isset($conf->global->MAIN_MAIL_SENDMODE) && $conf->global->MAIN_MAIL_SENDMODE == 'mail')) {
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_SMTP_PORT_NotAvailableOnLinuxLike").'</td><td><span class="opacitymedium">'.$langs->trans("SeeLocalSendMailSetup").'</span></td></tr>';
- } else {
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_SMTP_PORT", ini_get('smtp_port') ?ini_get('smtp_port') : $langs->transnoentities("Undefined")).'</td><td>'.(!empty($conf->global->MAIN_MAIL_SMTP_PORT) ? $conf->global->MAIN_MAIL_SMTP_PORT : '').'</td></tr>';
- }
- // SMTPS ID
- if (isset($conf->global->MAIN_MAIL_SENDMODE) && in_array($conf->global->MAIN_MAIL_SENDMODE, array('smtps', 'swiftmailer'))) {
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_SMTPS_ID").'</td><td>'.$conf->global->MAIN_MAIL_SMTPS_ID.'</td></tr>';
- }
- // SMTPS PW
- if (isset($conf->global->MAIN_MAIL_SENDMODE) && in_array($conf->global->MAIN_MAIL_SENDMODE, array('smtps', 'swiftmailer'))) {
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_SMTPS_PW").'</td><td>'.preg_replace('/./', '*', $conf->global->MAIN_MAIL_SMTPS_PW).'</td></tr>';
- }
- // TLS
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_EMAIL_TLS").'</td><td>';
- if (isset($conf->global->MAIN_MAIL_SENDMODE) && in_array($conf->global->MAIN_MAIL_SENDMODE, array('smtps', 'swiftmailer'))) {
- if (function_exists('openssl_open')) {
- print yn($conf->global->MAIN_MAIL_EMAIL_TLS);
- } else {
- print yn(0).' ('.$langs->trans("YourPHPDoesNotHaveSSLSupport").')';
- }
- } else {
- print '<span class="opacitymedium">'.yn(0).' ('.$langs->trans("NotSupported").')</span>';
- }
- print '</td></tr>';
- // STARTTLS
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_EMAIL_STARTTLS").'</td><td>';
- if (isset($conf->global->MAIN_MAIL_SENDMODE) && in_array($conf->global->MAIN_MAIL_SENDMODE, array('smtps', 'swiftmailer'))) {
- if (function_exists('openssl_open')) {
- print yn($conf->global->MAIN_MAIL_EMAIL_STARTTLS);
- } else {
- print yn(0).' ('.$langs->trans("YourPHPDoesNotHaveSSLSupport").')';
- }
- } else {
- print '<span class="opacitymedium">'.yn(0).' ('.$langs->trans("NotSupported").')</span>';
- }
- print '</td></tr>';
- // SMTP_ALLOW_SELF_SIGNED
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED").'</td><td>';
- if (isset($conf->global->MAIN_MAIL_SENDMODE) && in_array($conf->global->MAIN_MAIL_SENDMODE, array('smtps', 'swiftmailer'))) {
- if (function_exists('openssl_open')) {
- print yn($conf->global->MAIN_MAIL_EMAIL_SMTP_ALLOW_SELF_SIGNED);
- } else {
- print yn(0).' ('.$langs->trans("YourPHPDoesNotHaveSSLSupport").')';
- }
- } else {
- print '<span class="opacitymedium">'.yn(0).' ('.$langs->trans("NotSupported").')</span>';
- }
- print '</td></tr>';
- if ($conf->global->MAIN_MAIL_SENDMODE == 'swiftmailer') {
- // DKIM
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_EMAIL_DKIM_ENABLED").'</td><td>';
- if (isset($conf->global->MAIN_MAIL_SENDMODE) && in_array($conf->global->MAIN_MAIL_SENDMODE, array('swiftmailer'))) {
- if (function_exists('openssl_open')) {
- print yn(getDolGlobalInt('MAIN_MAIL_EMAIL_DKIM_ENABLED'));
- } else {
- print yn(0).' ('.$langs->trans("YourPHPDoesNotHaveSSLSupport").')';
- }
- } else {
- print yn(0).' ('.$langs->trans("NotSupported").')';
- }
- print '</td></tr>';
- // Domain
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_EMAIL_DKIM_DOMAIN").'</td>';
- print '<td>'.getDolGlobalString('MAIN_MAIL_EMAIL_DKIM_DOMAIN');
- print '</td></tr>';
- // Selector
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_EMAIL_DKIM_SELECTOR").'</td>';
- print '<td>'.getDolGlobalString('MAIN_MAIL_EMAIL_DKIM_SELECTOR');
- print '</td></tr>';
- // PRIVATE KEY
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY").'</td>';
- print '<td>'.getDolGlobalString('MAIN_MAIL_EMAIL_DKIM_PRIVATE_KEY');
- print '</td></tr>';
- }
- print '</table>';
- print '</div>';
- if ($conf->global->MAIN_MAIL_SENDMODE == 'mail' && empty($conf->global->MAIN_HIDE_WARNING_TO_ENCOURAGE_SMTP_SETUP)) {
- print info_admin($langs->trans("WarningPHPMail").'<br>'.$langs->trans("WarningPHPMailA").'<br>'.$langs->trans("WarningPHPMailB").'<br>'.$langs->trans("WarningPHPMailC").'<br><br>'.$langs->trans("WarningPHPMailD"), 0, 0, 'warning');
- }
- print '<br>';
- print '<div class="div-table-responsive-no-min">'; // You can use div-table-responsive-no-min if you dont need reserved height for your table
- print '<table class="noborder centpercent">';
- print '<tr class="liste_titre"><td class="titlefieldmiddle">'.$langs->trans("OtherOptions").'</td><td></td></tr>';
- // From
- $help = img_help(1, $langs->trans("EMailHelpMsgSPFDKIM"));
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_EMAIL_FROM", ini_get('sendmail_from') ?ini_get('sendmail_from') : $langs->transnoentities("Undefined")).' '.$help.'</td>';
- print '<td>'.$conf->global->MAIN_MAIL_EMAIL_FROM;
- if (empty($conf->global->MAIN_MAIL_EMAIL_FROM)) {
- print img_warning($langs->trans("Mandatory"));
- } elseif (!isValidEmail($conf->global->MAIN_MAIL_EMAIL_FROM)) {
- print img_warning($langs->trans("ErrorBadEMail"));
- }
- print '</td></tr>';
- // Default from type
- $liste = array();
- $liste['user'] = $langs->trans('UserEmail');
- $liste['company'] = $langs->trans('CompanyEmail').' ('.(empty($conf->global->MAIN_INFO_SOCIETE_MAIL) ? $langs->trans("NotDefined") : $conf->global->MAIN_INFO_SOCIETE_MAIL).')';
- $sql = 'SELECT rowid, label, email FROM '.MAIN_DB_PREFIX.'c_email_senderprofile';
- $sql .= ' WHERE active = 1 AND (private = 0 OR private = '.((int) $user->id).')';
- $resql = $db->query($sql);
- if ($resql) {
- $num = $db->num_rows($resql);
- $i = 0;
- while ($i < $num) {
- $obj = $db->fetch_object($resql);
- if ($obj) {
- $liste['senderprofile_'.$obj->rowid] = $obj->label.' <'.$obj->email.'>';
- }
- $i++;
- }
- } else {
- dol_print_error($db);
- }
- print '<tr class="oddeven"><td>'.$langs->trans('MAIN_MAIL_DEFAULT_FROMTYPE').'</td>';
- print '<td>';
- if (getDolGlobalString('MAIN_MAIL_DEFAULT_FROMTYPE') === 'robot') {
- print $langs->trans('RobotEmail');
- } elseif (getDolGlobalString('MAIN_MAIL_DEFAULT_FROMTYPE') === 'user') {
- print $langs->trans('UserEmail');
- } elseif (getDolGlobalString('MAIN_MAIL_DEFAULT_FROMTYPE') === 'company') {
- print $langs->trans('CompanyEmail').' '.dol_escape_htmltag('<'.$mysoc->email.'>');
- } else {
- $id = preg_replace('/senderprofile_/', '', getDolGlobalString('MAIN_MAIL_DEFAULT_FROMTYPE'));
- if ($id > 0) {
- include_once DOL_DOCUMENT_ROOT.'/core/class/emailsenderprofile.class.php';
- $emailsenderprofile = new EmailSenderProfile($db);
- $emailsenderprofile->fetch($id);
- print $emailsenderprofile->label.' '.dol_escape_htmltag('<'.$emailsenderprofile->email.'>');
- }
- }
- print '</td></tr>';
- // Errors To
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_ERRORS_TO").'</td>';
- print '<td>'.(getDolGlobalString('MAIN_MAIL_ERRORS_TO'));
- if (!empty($conf->global->MAIN_MAIL_ERRORS_TO) && !isValidEmail($conf->global->MAIN_MAIL_ERRORS_TO)) {
- print img_warning($langs->trans("ErrorBadEMail"));
- }
- print '</td></tr>';
- // Autocopy to
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_AUTOCOPY_TO").'</td>';
- print '<td>';
- if (!empty($conf->global->MAIN_MAIL_AUTOCOPY_TO)) {
- $listofemail = explode(',', $conf->global->MAIN_MAIL_AUTOCOPY_TO);
- $i = 0;
- foreach ($listofemail as $key => $val) {
- if ($i) {
- print ', ';
- }
- $val = trim($val);
- print $val;
- if (!isValidEmail($val, 0, 1)) {
- print img_warning($langs->trans("ErrorBadEMail", $val));
- }
- $i++;
- }
- } else {
- print ' ';
- }
- print '</td></tr>';
- //Add user to select destinaries list
- print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_ENABLED_USER_DEST_SELECT").'</td><td>'.yn(!empty($conf->global->MAIN_MAIL_ENABLED_USER_DEST_SELECT)).'</td></tr>';
- print '</table>';
- print '</div>';
- }
- print dol_get_fiche_end();
- // Actions button
- print '<div class="tabsAction">';
- print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=edit&token='.newToken().'">'.$langs->trans("Modify").'</a>';
- if (empty($conf->global->MAIN_DISABLE_ALL_MAILS)) {
- if ($conf->global->MAIN_MAIL_SENDMODE != 'mail' || !$linuxlike) {
- if (function_exists('fsockopen') && $port && $server) {
- print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=testconnect&date='.dol_now().'#formmailaftertstconnect">'.$langs->trans("DoTestServerAvailability").'</a>';
- }
- } else {
- print '<a class="butActionRefused classfortooltip" href="#" title="'.$langs->trans("FeatureNotAvailableOnLinux").'">'.$langs->trans("DoTestServerAvailability").'</a>';
- }
- print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=test&mode=init#formmailbeforetitle">'.$langs->trans("DoTestSend").'</a>';
- if (!empty($conf->fckeditor->enabled)) {
- print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=testhtml&mode=init#formmailbeforetitle">'.$langs->trans("DoTestSendHTML").'</a>';
- }
- }
- print '</div>';
- if ($conf->global->MAIN_MAIL_SENDMODE == 'mail' && empty($conf->global->MAIN_FIX_FOR_BUGGED_MTA)) {
- /*
- // Warning 1
- if ($linuxlike)
- {
- $sendmailoption=ini_get('mail.force_extra_parameters');
- if (empty($sendmailoption) || ! preg_match('/ba/',$sendmailoption))
- {
- print info_admin($langs->trans("SendmailOptionNotComplete"));
- }
- }*/
- // Warning 2
- print info_admin($langs->trans("SendmailOptionMayHurtBuggedMTA"));
- }
- if (!in_array($action, array('testconnect', 'test', 'testhtml'))) {
- $text = '';
- if ($conf->global->MAIN_MAIL_SENDMODE == 'mail') {
- //$text .= $langs->trans("WarningPHPMail"); // To encourage to use SMTPS
- }
- if ($conf->global->MAIN_MAIL_SENDMODE == 'mail') {
- if (!empty($conf->global->MAIN_EXTERNAL_MAIL_SPF_STRING_TO_ADD)) {
- // List of string to add in SPF if the setup use the mail method. Example 'include:sendgrid.net include:spf.mydomain.com'
- $text .= ($text ? '<br><br>' : '').'<!-- MAIN_EXTERNAL_MAIL_SPF_STRING_TO_ADD -->'.$langs->trans("WarningPHPMailSPF", $conf->global->MAIN_EXTERNAL_MAIL_SPF_STRING_TO_ADD);
- } else {
- // MAIN_EXTERNAL_SMTP_CLIENT_IP_ADDRESS is list of IPs where email is sent from. Example: '1.2.3.4, [aaaa:bbbb:cccc:dddd]'.
- if (!empty($conf->global->MAIN_EXTERNAL_SMTP_CLIENT_IP_ADDRESS)) {
- // List of IP show as record to add in SPF if we use the mail method
- $text .= ($text ? '<br><br>' : '').'<!-- MAIN_EXTERNAL_SMTP_CLIENT_IP_ADDRESS -->'.$langs->trans("WarningPHPMailSPF", $conf->global->MAIN_EXTERNAL_SMTP_CLIENT_IP_ADDRESS);
- }
- }
- } else {
- if (!empty($conf->global->MAIN_EXTERNAL_SMTP_CLIENT_IP_ADDRESS)) {
- // List of IP show as record to add as allowed IP if we use the smtp method. Value is '1.2.3.4, [aaaa:bbbb:cccc:dddd]'
- // TODO Add a key to allow to show the IP/name of server detected dynamically
- $text .= ($text ? '<br><br>' : '').'<!-- MAIN_EXTERNAL_SMTP_CLIENT_IP_ADDRESS -->'.$langs->trans("WarningPHPMail2", $conf->global->MAIN_EXTERNAL_SMTP_CLIENT_IP_ADDRESS);
- }
- if (!empty($conf->global->MAIN_EXTERNAL_SMTP_SPF_STRING_TO_ADD)) { // Should be required only if you have preset the Dolibarr to use your own SMTP and you want to warn users to update their domain name to match your SMTP server.
- // List of string to add in SPF if we use the smtp method. Example 'include:spf.mydomain.com'
- $text .= ($text ? '<br><br>' : '').'<!-- MAIN_EXTERNAL_SMTP_SPF_STRING_TO_ADD -->'.$langs->trans("WarningPHPMailSPF", $conf->global->MAIN_EXTERNAL_SMTP_SPF_STRING_TO_ADD);
- }
- }
- $companyemail = getDolGlobalString('MAIN_INFO_SOCIETE_MAIL');
- $dnsinfo = false;
- if (!empty($companyemail) && function_exists('dns_get_record')) {
- $arrayofemailparts = explode('@', $companyemail);
- if (count($arrayofemailparts) == 2) {
- $domain = $arrayofemailparts[1];
- $dnsinfo = dns_get_record($domain, DNS_TXT);
- }
- }
- if (!empty($dnsinfo) && is_array($dnsinfo)) {
- foreach ($dnsinfo as $info) {
- if (strpos($info['txt'], 'v=spf') !== false) {
- $text .= ($text ? '<br><br>' : '').$langs->trans("ActualMailSPFRecordFound", $companyemail, $info['txt']);
- }
- }
- }
- if ($text) {
- print info_admin($text);
- }
- }
- // Run the test to connect
- if ($action == 'testconnect') {
- print '<div id="formmailaftertstconnect" name="formmailaftertstconnect"></div>';
- print load_fiche_titre($langs->trans("DoTestServerAvailability"));
- include_once DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php';
- $mail = new CMailFile('', '', '', '', array(), array(), array(), '', '', 0, '', '', '', '', $trackid, $sendcontext);
- $result = $mail->check_server_port($server, $port);
- if ($result) {
- print '<div class="ok">'.$langs->trans("ServerAvailableOnIPOrPort", $server, $port).'</div>';
- } else {
- $errormsg = $langs->trans("ServerNotAvailableOnIPOrPort", $server, $port);
- if ($mail->error) {
- $errormsg .= ' - '.$mail->error;
- }
- setEventMessages($errormsg, null, 'errors');
- }
- print '<br>';
- }
- // Show email send test form
- if ($action == 'test' || $action == 'testhtml') {
- print '<div id="formmailbeforetitle" name="formmailbeforetitle"></div>';
- print load_fiche_titre($action == 'testhtml' ? $langs->trans("DoTestSendHTML") : $langs->trans("DoTestSend"));
- print dol_get_fiche_head('');
- // Cree l'objet formulaire mail
- include_once DOL_DOCUMENT_ROOT.'/core/class/html.formmail.class.php';
- $formmail = new FormMail($db);
- $formmail->trackid = (($action == 'testhtml') ? "testhtml" : "test");
- $formmail->fromname = (GETPOSTISSET('fromname') ? GETPOST('fromname') : $conf->global->MAIN_MAIL_EMAIL_FROM);
- $formmail->frommail = (GETPOSTISSET('frommail') ? GETPOST('frommail') : $conf->global->MAIN_MAIL_EMAIL_FROM);
- $formmail->fromid = $user->id;
- $formmail->fromalsorobot = 1;
- $formmail->fromtype = (GETPOSTISSET('fromtype') ?GETPOST('fromtype', 'aZ09') : (!empty($conf->global->MAIN_MAIL_DEFAULT_FROMTYPE) ? $conf->global->MAIN_MAIL_DEFAULT_FROMTYPE : 'user'));
- $formmail->withfromreadonly = 1;
- $formmail->withsubstit = 1;
- $formmail->withfrom = 1;
- $formmail->witherrorsto = 1;
- $formmail->withto = (GETPOSTISSET('sendto') ? GETPOST('sendto', 'restricthtml') : ($user->email ? $user->email : 1));
- $formmail->withtocc = (GETPOSTISSET('sendtocc') ? GETPOST('sendtocc', 'restricthtml') : 1); // ! empty to keep field if empty
- $formmail->withtoccc = (GETPOSTISSET('sendtoccc') ? GETPOST('sendtoccc', 'restricthtml') : 1); // ! empty to keep field if empty
- $formmail->withtopic = (GETPOSTISSET('subject') ? GETPOST('subject') : $langs->trans("Test"));
- $formmail->withtopicreadonly = 0;
- $formmail->withfile = 2;
- $formmail->withbody = (GETPOSTISSET('message') ? GETPOST('message', 'restricthtml') : ($action == 'testhtml' ? $langs->transnoentities("PredefinedMailTestHtml") : $langs->transnoentities("PredefinedMailTest")));
- $formmail->withbodyreadonly = 0;
- $formmail->withcancel = 1;
- $formmail->withdeliveryreceipt = 1;
- $formmail->withfckeditor = ($action == 'testhtml' ? 1 : 0);
- $formmail->ckeditortoolbar = 'dolibarr_mailings';
- // Tableau des substitutions
- $formmail->substit = $substitutionarrayfortest;
- // Tableau des parametres complementaires du post
- $formmail->param["action"] = "send";
- $formmail->param["models"] = "body";
- $formmail->param["mailid"] = 0;
- $formmail->param["returnurl"] = $_SERVER["PHP_SELF"];
- // Init list of files
- if (GETPOST("mode", "aZ09") == 'init') {
- $formmail->clear_attached_files();
- }
- print $formmail->get_form('addfile', 'removefile');
- print dol_get_fiche_end();
- // References
- print '<span class="opacitymedium">'.$langs->trans("EMailsWillHaveMessageID").': ';
- print dol_escape_htmltag('<timestamp.*@'.dol_getprefix('email').'>');
- print '</span>';
- }
- }
- // End of page
- llxFooter();
- $db->close();
|