dolibarr  13.0.2
mails_ticket.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2007-2017 Laurent Destailleur <eldy@users.sourceforge.net>
3  * Copyright (C) 2009-2012 Regis Houssin <regis.houssin@inodbox.com>
4  * Copyright (C) 2013 Juanjo Menent <jmenent@2byte.es>
5  * Copyright (C) 2016 Jonathan TISSEAU <jonathan.tisseau@86dev.fr>
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 3 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program. If not, see <https://www.gnu.org/licenses/>.
19  */
20 
26 require '../main.inc.php';
27 require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php';
28 require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
29 
30 // Load translation files required by the page
31 $langs->loadLangs(array('companies', 'products', 'admin', 'mails', 'other', 'errors'));
32 
33 $action = GETPOST('action', 'aZ09');
34 
35 if (!$user->admin) accessforbidden();
36 
37 $usersignature = $user->signature;
38 // For action = test or send, we ensure that content is not html, even for signature, because this we want a test with NO html.
39 if ($action == 'test' || $action == 'send')
40 {
41  $usersignature = dol_string_nohtmltag($usersignature);
42 }
43 
44 $substitutionarrayfortest = array(
45 '__LOGIN__' => $user->login,
46 '__ID__' => 'TESTIdRecord',
47 '__EMAIL__' => 'TESTEMail',
48 '__LASTNAME__' => 'TESTLastname',
49 '__FIRSTNAME__' => 'TESTFirstname',
50 '__USER_SIGNATURE__' => (($user->signature && empty($conf->global->MAIN_MAIL_DO_NOT_USE_SIGN)) ? $usersignature : ''),
51 //'__PERSONALIZED__' => 'TESTPersonalized' // Hiden because not used yet
52 );
53 complete_substitutions_array($substitutionarrayfortest, $langs);
54 
55 
56 
57 /*
58  * Actions
59  */
60 
61 if ($action == 'update' && empty($_POST["cancel"]))
62 {
63  // Send mode parameters
64  dolibarr_set_const($db, "MAIN_MAIL_SENDMODE_TICKET", GETPOST("MAIN_MAIL_SENDMODE_TICKET"), 'chaine', 0, '', $conf->entity);
65  dolibarr_set_const($db, "MAIN_MAIL_SMTP_PORT_TICKET", GETPOST("MAIN_MAIL_SMTP_PORT_TICKET"), 'chaine', 0, '', $conf->entity);
66  dolibarr_set_const($db, "MAIN_MAIL_SMTP_SERVER_TICKET", GETPOST("MAIN_MAIL_SMTP_SERVER_TICKET"), 'chaine', 0, '', $conf->entity);
67  dolibarr_set_const($db, "MAIN_MAIL_SMTPS_ID_TICKET", GETPOST("MAIN_MAIL_SMTPS_ID_TICKET"), 'chaine', 0, '', $conf->entity);
68  dolibarr_set_const($db, "MAIN_MAIL_SMTPS_PW_TICKET", GETPOST("MAIN_MAIL_SMTPS_PW_TICKET"), 'chaine', 0, '', $conf->entity);
69  dolibarr_set_const($db, "MAIN_MAIL_EMAIL_TLS_TICKET", GETPOST("MAIN_MAIL_EMAIL_TLS_TICKET"), 'chaine', 0, '', $conf->entity);
70  dolibarr_set_const($db, "MAIN_MAIL_EMAIL_STARTTLS_TICKET", GETPOST("MAIN_MAIL_EMAIL_STARTTLS_TICKET"), 'chaine', 0, '', $conf->entity);
71 
72  header("Location: ".$_SERVER["PHP_SELF"]."?mainmenu=home&leftmenu=setup");
73  exit;
74 }
75 
76 
77 // Actions to send emails
78 $id = 0;
79 $actiontypecode = ''; // Not an event for agenda
80 $triggersendname = ''; // Disable triggers
81 $paramname = 'id';
82 $mode = 'emailfortest';
83 $trackid = (($action == 'testhtml') ? "testhtml" : "test");
84 $sendcontext = 'ticket'; // Force to use dedicated context of setup for ticket
85 include DOL_DOCUMENT_ROOT.'/core/actions_sendmails.inc.php';
86 
87 if ($action == 'presend' && GETPOST('trackid') == 'test') $action = 'test';
88 if ($action == 'presend' && GETPOST('trackid') == 'testhtml') $action = 'testhtml';
89 
90 
91 
92 
93 /*
94  * View
95  */
96 
97 $form = new Form($db);
98 
99 $linuxlike = 1;
100 if (preg_match('/^win/i', PHP_OS)) $linuxlike = 0;
101 if (preg_match('/^mac/i', PHP_OS)) $linuxlike = 0;
102 
103 if (empty($conf->global->MAIN_MAIL_SENDMODE_TICKET)) $conf->global->MAIN_MAIL_SENDMODE_TICKET = 'default';
104 $port = !empty($conf->global->MAIN_MAIL_SMTP_PORT_TICKET) ? $conf->global->MAIN_MAIL_SMTP_PORT_TICKET : ini_get('smtp_port');
105 if (!$port) $port = 25;
106 $server = !empty($conf->global->MAIN_MAIL_SMTP_SERVER_TICKET) ? $conf->global->MAIN_MAIL_SMTP_SERVER_TICKET : ini_get('SMTP');
107 if (!$server) $server = '127.0.0.1';
108 
109 
110 $wikihelp = 'EN:Setup_EMails|FR:Paramétrage_EMails|ES:Configuración_EMails';
111 llxHeader('', $langs->trans("Setup"), $wikihelp);
112 
113 print load_fiche_titre($langs->trans("EMailsSetup"), '', 'title_setup');
114 
115 $head = email_admin_prepare_head();
116 
117 // List of sending methods
118 $listofmethods = array();
119 $listofmethods['default'] = $langs->trans('DefaultOutgoingEmailSetup');
120 $listofmethods['mail'] = 'PHP mail function';
121 //$listofmethods['simplemail']='Simplemail class';
122 $listofmethods['smtps'] = 'SMTP/SMTPS socket library';
123 if (version_compare(phpversion(), '7.0', '>=')) $listofmethods['swiftmailer'] = 'Swift Mailer socket library';
124 
125 
126 if ($action == 'edit')
127 {
128  if ($conf->use_javascript_ajax)
129  {
130  print "\n".'<script type="text/javascript" language="javascript">';
131  print 'jQuery(document).ready(function () {
132  function initfields()
133  {
134  if (jQuery("#MAIN_MAIL_SENDMODE_TICKET").val()==\'default\')
135  {
136  jQuery(".hideifdefault").hide();
137  }
138  else
139  {
140  jQuery(".hideifdefault").show();
141  }
142 
143  if (jQuery("#MAIN_MAIL_SENDMODE_TICKET").val()==\'mail\')
144  {
145  jQuery(".drag").hide();
146  jQuery("#MAIN_MAIL_EMAIL_TLS_TICKET").val(0);
147  jQuery("#MAIN_MAIL_EMAIL_TLS_TICKET").prop("disabled", true);
148  jQuery("#MAIN_MAIL_EMAIL_STARTTLS_TICKET").val(0);
149  jQuery("#MAIN_MAIL_EMAIL_STARTTLS_TICKET").prop("disabled", true);
150  ';
151  if ($linuxlike)
152  {
153  print '
154  jQuery("#MAIN_MAIL_SMTP_SERVER_TICKET").hide();
155  jQuery("#MAIN_MAIL_SMTP_PORT_TICKET").hide();
156  jQuery("#smtp_server_mess").show();
157  jQuery("#smtp_port_mess").show();
158  ';
159  } else {
160  print '
161  jQuery("#MAIN_MAIL_SMTP_SERVER_TICKET").prop("disabled", true);
162  jQuery("#MAIN_MAIL_SMTP_PORT_TICKET").prop("disabled", true);
163  jQuery("#smtp_server_mess").hide();
164  jQuery("#smtp_port_mess").hide();
165  ';
166  }
167  print '
168  }
169  if (jQuery("#MAIN_MAIL_SENDMODE_TICKET").val()==\'smtps\')
170  {
171  jQuery(".drag").show();
172  jQuery("#MAIN_MAIL_EMAIL_TLS_TICKET").val('.$conf->global->MAIN_MAIL_EMAIL_TLS_TICKET.');
173  jQuery("#MAIN_MAIL_EMAIL_TLS_TICKET").removeAttr("disabled");
174  jQuery("#MAIN_MAIL_EMAIL_STARTTLS_TICKET").val('.$conf->global->MAIN_MAIL_EMAIL_STARTTLS_TICKET.');
175  jQuery("#MAIN_MAIL_EMAIL_STARTTLS_TICKET").removeAttr("disabled");
176  jQuery("#MAIN_MAIL_SMTP_SERVER_TICKET").removeAttr("disabled");
177  jQuery("#MAIN_MAIL_SMTP_PORT_TICKET").removeAttr("disabled");
178  jQuery("#MAIN_MAIL_SMTP_SERVER_TICKET").show();
179  jQuery("#MAIN_MAIL_SMTP_PORT_TICKET").show();
180  jQuery("#smtp_server_mess").hide();
181  jQuery("#smtp_port_mess").hide();
182  }
183  if (jQuery("#MAIN_MAIL_SENDMODE_TICKET").val()==\'swiftmailer\')
184  {
185  jQuery(".drag").show();
186  jQuery("#MAIN_MAIL_EMAIL_TLS_TICKET").val('.$conf->global->MAIN_MAIL_EMAIL_TLS_TICKET.');
187  jQuery("#MAIN_MAIL_EMAIL_TLS_TICKET").removeAttr("disabled");
188  jQuery("#MAIN_MAIL_EMAIL_STARTTLS_TICKET").val('.$conf->global->MAIN_MAIL_EMAIL_STARTTLS_TICKET.');
189  jQuery("#MAIN_MAIL_EMAIL_STARTTLS_TICKET").removeAttr("disabled");
190  jQuery("#MAIN_MAIL_SMTP_SERVER_TICKET").removeAttr("disabled");
191  jQuery("#MAIN_MAIL_SMTP_PORT_TICKET").removeAttr("disabled");
192  jQuery("#MAIN_MAIL_SMTP_SERVER_TICKET").show();
193  jQuery("#MAIN_MAIL_SMTP_PORT_TICKET").show();
194  jQuery("#smtp_server_mess").hide();
195  jQuery("#smtp_port_mess").hide();
196  }
197  }
198  initfields();
199  jQuery("#MAIN_MAIL_SENDMODE_TICKET").change(function() {
200  initfields();
201  });
202  jQuery("#MAIN_MAIL_EMAIL_TLS").change(function() {
203  if (jQuery("#MAIN_MAIL_EMAIL_STARTTLS_TICKET").val() == 1)
204  jQuery("#MAIN_MAIL_EMAIL_STARTTLS_TICKET").val(0);
205  });
206  jQuery("#MAIN_MAIL_EMAIL_STARTTLS_TICKET").change(function() {
207  if (jQuery("#MAIN_MAIL_EMAIL_TLS_TICKET").val() == 1)
208  jQuery("#MAIN_MAIL_EMAIL_TLS_TICKET").val(0);
209  });
210  })';
211  print '</script>'."\n";
212  }
213 
214  print '<form method="post" action="'.$_SERVER["PHP_SELF"].'">';
215  print '<input type="hidden" name="token" value="'.newToken().'">';
216  print '<input type="hidden" name="action" value="update">';
217 
218  print dol_get_fiche_head($head, 'common_ticket', '', -1);
219 
220  print '<span class="opacitymedium">'.$langs->trans("EMailsDesc")."</span><br>\n";
221  print "<br>\n";
222 
223 
224  clearstatcache();
225 
226  print '<table class="noborder centpercent">';
227  print '<tr class="liste_titre"><td class="titlefieldmiddle">'.$langs->trans("Parameter").'</td><td>'.$langs->trans("Value").'</td></tr>';
228 
229  // Method
230 
231  print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_SENDMODE").'</td><td>';
232 
233  // SuperAdministrator access only
234  if ((empty($conf->global->MAIN_MODULE_MULTICOMPANY)) || ($user->admin && !$user->entity))
235  {
236  print $form->selectarray('MAIN_MAIL_SENDMODE_TICKET', $listofmethods, $conf->global->MAIN_MAIL_SENDMODE_TICKET);
237  } else {
238  $text = $listofmethods[$conf->global->MAIN_MAIL_SENDMODE_TICKET];
239  if (empty($text)) $text = $langs->trans("Undefined");
240  $htmltext = $langs->trans("ContactSuperAdminForChange");
241  print $form->textwithpicto($text, $htmltext, 1, 'superadmin');
242  print '<input type="hidden" name="MAIN_MAIL_SENDMODE_TICKET" value="'.$conf->global->MAIN_MAIL_SENDMODE_TICKET.'">';
243  }
244  print '</td></tr>';
245 
246  // Host server
247 
248  print '<tr class="oddeven hideifdefault"><td>';
249  if (!$conf->use_javascript_ajax && $linuxlike && $conf->global->MAIN_MAIL_SENDMODE_TICKET == 'mail')
250  {
251  print $langs->trans("MAIN_MAIL_SMTP_SERVER_NotAvailableOnLinuxLike");
252  print '</td><td>';
253  print $langs->trans("SeeLocalSendMailSetup");
254  } else {
255  $mainserver = (!empty($conf->global->MAIN_MAIL_SMTP_SERVER_TICKET) ? $conf->global->MAIN_MAIL_SMTP_SERVER_TICKET : '');
256  $smtpserver = ini_get('SMTP') ?ini_get('SMTP') : $langs->transnoentities("Undefined");
257  if ($linuxlike) print $langs->trans("MAIN_MAIL_SMTP_SERVER_NotAvailableOnLinuxLike");
258  else print $langs->trans("MAIN_MAIL_SMTP_SERVER", $smtpserver);
259  print '</td><td>';
260  // SuperAdministrator access only
261  if (empty($conf->multicompany->enabled) || ($user->admin && !$user->entity))
262  {
263  print '<input class="flat" id="MAIN_MAIL_SMTP_SERVER_TICKET" name="MAIN_MAIL_SMTP_SERVER_TICKET" size="18" value="'.$mainserver.'">';
264  print '<input type="hidden" id="MAIN_MAIL_SMTP_SERVER_TICKET_sav" name="MAIN_MAIL_SMTP_SERVER_TICKET_sav" value="'.$mainserver.'">';
265  print '<span id="smtp_server_mess">'.$langs->trans("SeeLocalSendMailSetup").'</span>';
266  } else {
267  $text = !empty($mainserver) ? $mainserver : $smtpserver;
268  $htmltext = $langs->trans("ContactSuperAdminForChange");
269  print $form->textwithpicto($text, $htmltext, 1, 'superadmin');
270  print '<input type="hidden" id="MAIN_MAIL_SMTP_SERVER_TICKET" name="MAIN_MAIL_SMTP_SERVER_TICKET" value="'.$mainserver.'">';
271  }
272  }
273  print '</td></tr>';
274 
275  // Port
276 
277  print '<tr class="oddeven hideifdefault"><td>';
278  if (!$conf->use_javascript_ajax && $linuxlike && $conf->global->MAIN_MAIL_SENDMODE_TICKET == 'mail')
279  {
280  print $langs->trans("MAIN_MAIL_SMTP_PORT_NotAvailableOnLinuxLike");
281  print '</td><td>';
282  print $langs->trans("SeeLocalSendMailSetup");
283  } else {
284  $mainport = (!empty($conf->global->MAIN_MAIL_SMTP_PORT_TICKET) ? $conf->global->MAIN_MAIL_SMTP_PORT_TICKET : '');
285  $smtpport = ini_get('smtp_port') ?ini_get('smtp_port') : $langs->transnoentities("Undefined");
286  if ($linuxlike) print $langs->trans("MAIN_MAIL_SMTP_PORT_NotAvailableOnLinuxLike");
287  else print $langs->trans("MAIN_MAIL_SMTP_PORT", $smtpport);
288  print '</td><td>';
289  // SuperAdministrator access only
290  if (empty($conf->multicompany->enabled) || ($user->admin && !$user->entity))
291  {
292  print '<input class="flat" id="MAIN_MAIL_SMTP_PORT_TICKET" name="MAIN_MAIL_SMTP_PORT_TICKET" size="3" value="'.$mainport.'">';
293  print '<input type="hidden" id="MAIN_MAIL_SMTP_PORT_TICKET_sav" name="MAIN_MAIL_SMTP_PORT_TICKET_sav" value="'.$mainport.'">';
294  print '<span id="smtp_port_mess">'.$langs->trans("SeeLocalSendMailSetup").'</span>';
295  } else {
296  $text = (!empty($mainport) ? $mainport : $smtpport);
297  $htmltext = $langs->trans("ContactSuperAdminForChange");
298  print $form->textwithpicto($text, $htmltext, 1, 'superadmin');
299  print '<input type="hidden" id="MAIN_MAIL_SMTP_PORT_TICKET" name="MAIN_MAIL_SMTP_PORT_TICKET" value="'.$mainport.'">';
300  }
301  }
302  print '</td></tr>';
303 
304  // ID
305  if (!empty($conf->use_javascript_ajax) || (isset($conf->global->MAIN_MAIL_SENDMODE_TICKET) && in_array($conf->global->MAIN_MAIL_SENDMODE_TICKET, array('smtps', 'swiftmailer'))))
306  {
307  $mainstmpid = (!empty($conf->global->MAIN_MAIL_SMTPS_ID_TICKET) ? $conf->global->MAIN_MAIL_SMTPS_ID_TICKET : '');
308  print '<tr class="drag drop oddeven hideifdefault"><td>'.$langs->trans("MAIN_MAIL_SMTPS_ID").'</td><td>';
309  // SuperAdministrator access only
310  if (empty($conf->multicompany->enabled) || ($user->admin && !$user->entity))
311  {
312  print '<input class="flat" name="MAIN_MAIL_SMTPS_ID_TICKET" size="32" value="'.$mainstmpid.'">';
313  } else {
314  $htmltext = $langs->trans("ContactSuperAdminForChange");
315  print $form->textwithpicto($conf->global->MAIN_MAIL_SMTPS_ID_TICKET, $htmltext, 1, 'superadmin');
316  print '<input type="hidden" name="MAIN_MAIL_SMTPS_ID_TICKET" value="'.$mainstmpid.'">';
317  }
318  print '</td></tr>';
319  }
320 
321  // PW
322  if (!empty($conf->use_javascript_ajax) || (isset($conf->global->MAIN_MAIL_SENDMODE_TICKET) && in_array($conf->global->MAIN_MAIL_SENDMODE_TICKET, array('smtps', 'swiftmailer'))))
323  {
324  $mainsmtppw = (!empty($conf->global->MAIN_MAIL_SMTPS_PW_TICKET) ? $conf->global->MAIN_MAIL_SMTPS_PW_TICKET : '');
325  print '<tr class="drag drop oddeven hideifdefault"><td>'.$langs->trans("MAIN_MAIL_SMTPS_PW").'</td><td>';
326  // SuperAdministrator access only
327  if (empty($conf->multicompany->enabled) || ($user->admin && !$user->entity))
328  {
329  print '<input class="flat" type="password" name="MAIN_MAIL_SMTPS_PW_TICKET" size="32" value="'.$mainsmtppw.'">';
330  } else {
331  $htmltext = $langs->trans("ContactSuperAdminForChange");
332  print $form->textwithpicto($conf->global->MAIN_MAIL_SMTPS_PW_TICKET, $htmltext, 1, 'superadmin');
333  print '<input type="hidden" name="MAIN_MAIL_SMTPS_PW_TICKET" value="'.$mainsmtppw.'">';
334  }
335  print '</td></tr>';
336  }
337 
338  // TLS
339 
340  print '<tr class="oddeven hideifdefault"><td>'.$langs->trans("MAIN_MAIL_EMAIL_TLS").'</td><td>';
341  if (!empty($conf->use_javascript_ajax) || (isset($conf->global->MAIN_MAIL_SENDMODE_TICKET) && in_array($conf->global->MAIN_MAIL_SENDMODE_TICKET, array('smtps', 'swiftmailer'))))
342  {
343  if (function_exists('openssl_open'))
344  {
345  print $form->selectyesno('MAIN_MAIL_EMAIL_TLS_TICKET', (!empty($conf->global->MAIN_MAIL_EMAIL_TLS_TICKET) ? $conf->global->MAIN_MAIL_EMAIL_TLS_TICKET : 0), 1);
346  } else print yn(0).' ('.$langs->trans("YourPHPDoesNotHaveSSLSupport").')';
347  } else print yn(0).' ('.$langs->trans("NotSupported").')';
348  print '</td></tr>';
349 
350  // STARTTLS
351 
352  print '<tr class="oddeven hideifdefault"><td>'.$langs->trans("MAIN_MAIL_EMAIL_STARTTLS").'</td><td>';
353  if (!empty($conf->use_javascript_ajax) || (isset($conf->global->MAIN_MAIL_SENDMODE_TICKET) && in_array($conf->global->MAIN_MAIL_SENDMODE_TICKET, array('smtps', 'swiftmailer'))))
354  {
355  if (function_exists('openssl_open'))
356  {
357  print $form->selectyesno('MAIN_MAIL_EMAIL_STARTTLS_TICKET', (!empty($conf->global->MAIN_MAIL_EMAIL_STARTTLS_TICKET) ? $conf->global->MAIN_MAIL_EMAIL_STARTTLS_TICKET : 0), 1);
358  } else print yn(0).' ('.$langs->trans("YourPHPDoesNotHaveSSLSupport").')';
359  } else print yn(0).' ('.$langs->trans("NotSupported").')';
360  print '</td></tr>';
361 
362  print '</table>';
363 
364  print dol_get_fiche_end();
365 
366  print '<br><div class="center">';
367  print '<input class="button button-save" type="submit" name="save" value="'.$langs->trans("Save").'">';
368  print '&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;';
369  print '<input class="button button-cancel" type="submit" name="cancel" value="'.$langs->trans("Cancel").'">';
370  print '</div>';
371 
372  print '</form>';
373 } else {
374  print dol_get_fiche_head($head, 'common_ticket', '', -1);
375 
376  print '<span class="opacitymedium">'.$langs->trans("EMailsDesc")."</span><br>\n";
377  print "<br>\n";
378 
379  print '<table class="noborder centpercent">';
380  print '<tr class="liste_titre"><td class="titlefieldmiddle">'.$langs->trans("Parameter").'</td><td>'.$langs->trans("Value").'</td></tr>';
381 
382  // Method
383  print '<tr class="oddeven"><td>'.$langs->trans("MAIN_MAIL_SENDMODE").'</td><td>';
384  $text = $listofmethods[$conf->global->MAIN_MAIL_SENDMODE_TICKET];
385  if (empty($text)) $text = $langs->trans("Undefined").img_warning();
386  print $text;
387  print '</td></tr>';
388 
389  if (!empty($conf->global->MAIN_MAIL_SENDMODE_TICKET) && $conf->global->MAIN_MAIL_SENDMODE_TICKET != 'default')
390  {
391  // Host server
392  if ($linuxlike && (isset($conf->global->MAIN_MAIL_SENDMODE_TICKET) && $conf->global->MAIN_MAIL_SENDMODE_TICKET == 'mail'))
393  {
394  print '<tr class="oddeven hideifdefault"><td>'.$langs->trans("MAIN_MAIL_SMTP_SERVER_NotAvailableOnLinuxLike").'</td><td>'.$langs->trans("SeeLocalSendMailSetup").'</td></tr>';
395  } else {
396  print '<tr class="oddeven hideifdefault"><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_TICKET) ? $conf->global->MAIN_MAIL_SMTP_SERVER_TICKET : '').'</td></tr>';
397  }
398 
399  // Port
400  if ($linuxlike && (isset($conf->global->MAIN_MAIL_SENDMODE_TICKET) && $conf->global->MAIN_MAIL_SENDMODE_TICKET == 'mail'))
401  {
402  print '<tr class="oddeven hideifdefault"><td>'.$langs->trans("MAIN_MAIL_SMTP_PORT_NotAvailableOnLinuxLike").'</td><td>'.$langs->trans("SeeLocalSendMailSetup").'</td></tr>';
403  } else {
404  print '<tr class="oddeven hideifdefault"><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_TICKET) ? $conf->global->MAIN_MAIL_SMTP_PORT_TICKET : '').'</td></tr>';
405  }
406 
407  // SMTPS ID
408  if (isset($conf->global->MAIN_MAIL_SENDMODE_TICKET) && in_array($conf->global->MAIN_MAIL_SENDMODE_TICKET, array('smtps', 'swiftmailer')))
409  {
410  print '<tr class="oddeven hideifdefault"><td>'.$langs->trans("MAIN_MAIL_SMTPS_ID").'</td><td>'.$conf->global->MAIN_MAIL_SMTPS_ID_TICKET.'</td></tr>';
411  }
412 
413  // SMTPS PW
414  if (isset($conf->global->MAIN_MAIL_SENDMODE_TICKET) && in_array($conf->global->MAIN_MAIL_SENDMODE_TICKET, array('smtps', 'swiftmailer')))
415  {
416  print '<tr class="oddeven hideifdefault"><td>'.$langs->trans("MAIN_MAIL_SMTPS_PW").'</td><td>'.preg_replace('/./', '*', $conf->global->MAIN_MAIL_SMTPS_PW_TICKET).'</td></tr>';
417  }
418 
419  // TLS
420  print '<tr class="oddeven hideifdefault"><td>'.$langs->trans("MAIN_MAIL_EMAIL_TLS").'</td><td>';
421  if (isset($conf->global->MAIN_MAIL_SENDMODE_TICKET) && in_array($conf->global->MAIN_MAIL_SENDMODE_TICKET, array('smtps', 'swiftmailer')))
422  {
423  if (function_exists('openssl_open'))
424  {
425  print yn($conf->global->MAIN_MAIL_EMAIL_TLS_TICKET);
426  } else print yn(0).' ('.$langs->trans("YourPHPDoesNotHaveSSLSupport").')';
427  } else print yn(0).' ('.$langs->trans("NotSupported").')';
428  print '</td></tr>';
429 
430  // STARTTLS
431  print '<tr class="oddeven hideifdefault"><td>'.$langs->trans("MAIN_MAIL_EMAIL_STARTTLS").'</td><td>';
432  if (isset($conf->global->MAIN_MAIL_SENDMODE_TICKET) && in_array($conf->global->MAIN_MAIL_SENDMODE_TICKET, array('smtps', 'swiftmailer')))
433  {
434  if (function_exists('openssl_open'))
435  {
436  print yn($conf->global->MAIN_MAIL_EMAIL_STARTTLS_TICKET);
437  } else print yn(0).' ('.$langs->trans("YourPHPDoesNotHaveSSLSupport").')';
438  } else print yn(0).' ('.$langs->trans("NotSupported").')';
439  print '</td></tr>';
440  }
441 
442  print '</table>';
443 
444  print dol_get_fiche_end();
445 
446 
447  if ($conf->global->MAIN_MAIL_SENDMODE_TICKET == 'mail' && empty($conf->global->MAIN_FIX_FOR_BUGGED_MTA))
448  {
449  print '<br>';
450  /*
451  // Warning 1
452  if ($linuxlike)
453  {
454  $sendmailoption=ini_get('mail.force_extra_parameters');
455  if (empty($sendmailoption) || ! preg_match('/ba/',$sendmailoption))
456  {
457  print info_admin($langs->trans("SendmailOptionNotComplete"));
458  }
459  }*/
460  // Warning 2
461  print info_admin($langs->trans("SendmailOptionMayHurtBuggedMTA"));
462  }
463 
464 
465  // Buttons for actions
466 
467  print '<div class="tabsAction">';
468 
469  print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=edit">'.$langs->trans("Modify").'</a>';
470 
471  if (!empty($conf->global->MAIN_MAIL_SENDMODE_TICKET) && $conf->global->MAIN_MAIL_SENDMODE_TICKET != 'default')
472  {
473  if ($conf->global->MAIN_MAIL_SENDMODE_TICKET != 'mail' || !$linuxlike)
474  {
475  if (function_exists('fsockopen') && $port && $server)
476  {
477  print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=testconnect">'.$langs->trans("DoTestServerAvailability").'</a>';
478  }
479  } else {
480  print '<a class="butActionRefused classfortooltip" href="#" title="'.$langs->trans("FeatureNotAvailableOnLinux").'">'.$langs->trans("DoTestServerAvailability").'</a>';
481  }
482 
483  print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=test&amp;mode=init">'.$langs->trans("DoTestSend").'</a>';
484 
485  if (!empty($conf->fckeditor->enabled))
486  {
487  print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=testhtml&amp;mode=init">'.$langs->trans("DoTestSendHTML").'</a>';
488  }
489  }
490 
491  print '</div>';
492 
493 
494  if ($conf->global->MAIN_MAIL_SENDMODE_TICKET == 'mail' && !in_array($action, array('testconnect', 'test', 'testhtml')))
495  {
496  $text = $langs->trans("WarningPHPMail");
497  print info_admin($text);
498  }
499 
500  // Run the test to connect
501  if ($action == 'testconnect')
502  {
503  print load_fiche_titre($langs->trans("DoTestServerAvailability"));
504 
505  include_once DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php';
506  $mail = new CMailFile('', '', '', '', array(), array(), array(), '', '', 0, '', '', '', '', $trackid, $sendcontext);
507 
508  $result = $mail->check_server_port($server, $port);
509  if ($result) print '<div class="ok">'.$langs->trans("ServerAvailableOnIPOrPort", $server, $port).'</div>';
510  else {
511  $errormsg = $langs->trans("ServerNotAvailableOnIPOrPort", $server, $port);
512 
513  if ($mail->error) {
514  $errormsg .= ' - '.$mail->error;
515  }
516 
517  setEventMessages($errormsg, null, 'errors');
518  }
519  print '<br>';
520  }
521 
522  // Show email send test form
523  if ($action == 'test' || $action == 'testhtml')
524  {
525  print '<div id="formmailbeforetitle" name="formmailbeforetitle"></div>';
526  print load_fiche_titre($action == 'testhtml' ? $langs->trans("DoTestSendHTML") : $langs->trans("DoTestSend"));
527 
528  print dol_get_fiche_head('');
529 
530  // Cree l'objet formulaire mail
531  include_once DOL_DOCUMENT_ROOT.'/core/class/html.formmail.class.php';
532  $formmail = new FormMail($db);
533  $formmail->fromname = (GETPOSTISSET('fromname') ? $_POST['fromname'] : $conf->global->MAIN_MAIL_EMAIL_FROM);
534  $formmail->frommail = (GETPOSTISSET('frommail') ? $_POST['frommail'] : $conf->global->MAIN_MAIL_EMAIL_FROM);
535  $formmail->trackid = (($action == 'testhtml') ? "testhtml" : "test");
536  $formmail->withfromreadonly = 0;
537  $formmail->withsubstit = 0;
538  $formmail->withfrom = 1;
539  $formmail->witherrorsto = 1;
540  $formmail->withto = (!empty($_POST['sendto']) ? GETPOST('sendto', 'restricthtml') : ($user->email ? $user->email : 1));
541  $formmail->withtocc = (!empty($_POST['sendtocc']) ? GETPOST('sendtocc', 'restricthtml') : 1); // ! empty to keep field if empty
542  $formmail->withtoccc = (!empty($_POST['sendtoccc']) ? GETPOST('sendtoccc', 'restricthtml') : 1); // ! empty to keep field if empty
543  $formmail->withtopic = (GETPOSTISSET('subject') ? GETPOST('subject') : $langs->trans("Test"));
544  $formmail->withtopicreadonly = 0;
545  $formmail->withfile = 2;
546  $formmail->withbody = (GETPOSTISSET('message') ? GETPOST('message', 'restricthtml') : ($action == 'testhtml' ? $langs->transnoentities("PredefinedMailTestHtml") : $langs->transnoentities("PredefinedMailTest")));
547  $formmail->withbodyreadonly = 0;
548  $formmail->withcancel = 1;
549  $formmail->withdeliveryreceipt = 1;
550  $formmail->withfckeditor = ($action == 'testhtml' ? 1 : 0);
551  $formmail->ckeditortoolbar = 'dolibarr_mailings';
552  // Tableau des substitutions
553  $formmail->substit = $substitutionarrayfortest;
554  // Tableau des parametres complementaires du post
555  $formmail->param["action"] = "send";
556  $formmail->param["models"] = "body";
557  $formmail->param["mailid"] = 0;
558  $formmail->param["returnurl"] = $_SERVER["PHP_SELF"];
559 
560  // Init list of files
561  if (GETPOST("mode") == 'init')
562  {
563  $formmail->clear_attached_files();
564  }
565 
566  print $formmail->get_form('addfile', 'removefile');
567 
568  print dol_get_fiche_end();
569  }
570 }
571 
572 // End of page
573 llxFooter();
574 $db->close();
GETPOST
GETPOST($paramname, $check= 'alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
Definition: functions.lib.php:309
dol_string_nohtmltag
dol_string_nohtmltag($stringtoclean, $removelinefeed=1, $pagecodeto= 'UTF-8', $strip_tags=0, $removedoublespaces=1)
Clean a string from all HTML tags and entities.
Definition: functions.lib.php:5777
FormMail
Classe permettant la generation du formulaire html d&#39;envoi de mail unitaire Usage: $formail = new For...
Definition: html.formmail.class.php:37
yn
yn($yesno, $case=1, $color=0)
Return yes or no in current language.
Definition: functions.lib.php:5609
email_admin_prepare_head
email_admin_prepare_head()
Return array head with list of tabs to view object informations.
Definition: admin.lib.php:1845
dolibarr_set_const
dolibarr_set_const($db, $name, $value, $type= 'chaine', $visible=0, $note= '', $entity=1)
Insert a parameter (key,value) into database (delete old key then insert it again).
Definition: admin.lib.php:575
$wikihelp
if(GETPOST('button_removefilter_x', 'alpha')||GETPOST('button_removefilter.x', 'alpha')||GETPOST('button_removefilter', 'alpha')) if(GETPOST('button_search_x', 'alpha')||GETPOST('button_search.x', 'alpha')||GETPOST('button_search', 'alpha')) if($action=="save"&&empty($cancel)) $wikihelp
View.
Definition: agenda.php:120
llxHeader
llxHeader()
Empty header.
Definition: wrapper.php:45
setEventMessages
setEventMessages($mesg, $mesgs, $style= 'mesgs', $messagekey= '')
Set event messages in dol_events session object.
Definition: functions.lib.php:6927
Form
Class to manage generation of HTML components Only common components must be here.
Definition: html.form.class.php:52
GETPOSTISSET
GETPOSTISSET($paramname)
Return true if we are in a context of submitting the parameter $paramname.
Definition: functions.lib.php:234
load_fiche_titre
load_fiche_titre($titre, $morehtmlright= '', $picto= 'generic', $pictoisfullpath=0, $id= '', $morecssontable= '', $morehtmlcenter= '')
Load a title with picto.
Definition: functions.lib.php:4436
CMailFile
Class to send emails (with attachments or not) Usage: $mailfile = new CMailFile($subject,$sendto,$replyto,$message,$filepath,$mimetype,$filename,$cc,$ccc,$deliveryreceipt,$msgishtml,$errors_to,$css,$trackid,$moreinheader,$sendcontext,$replyto); $mailfile-&gt;sendfile();.
Definition: CMailFile.class.php:38
accessforbidden
accessforbidden($message= '', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program Calling this function terminate execution ...
Definition: security.lib.php:649
$_SERVER
print $_SERVER["PHP_SELF"]
Edit parameters.
Definition: company_socialnetworks.php:101
dol_get_fiche_head
dol_get_fiche_head($links=array(), $active= '', $title= '', $notab=0, $picto= '', $pictoisfullpath=0, $morehtmlright= '', $morecss= '', $limittoshow=0, $moretabssuffix= '')
Show tabs of a record.
Definition: functions.lib.php:1371
print
print
Draft customers invoices.
Definition: index.php:89
dol_get_fiche_end
dol_get_fiche_end($notab=0)
Return tab footer of a card.
Definition: functions.lib.php:1552
llxFooter
llxFooter()
Empty footer.
Definition: wrapper.php:59
info_admin
info_admin($text, $infoonimgalt=0, $nodiv=0, $admin= '1', $morecss= '', $textfordropdown= '')
Show information for admin users or standard users.
Definition: functions.lib.php:4037
complete_substitutions_array
complete_substitutions_array(&$substitutionarray, $outputlangs, $object=null, $parameters=null, $callfunc="completesubstitutionarray")
Complete the $substitutionarray with more entries coming from external module that had set the &quot;subst...
Definition: functions.lib.php:6747
Generated on Sat Aug 23 2025 13:17:06 for dolibarr by Doxygen 1.8.5