* Copyright (C) 2009 Regis Houssin * * 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 2 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, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /** * \file htdocs/admin/mails.php * \brief Page de configuration des emails * \version $Id$ */ require("./pre.inc.php"); require_once(DOL_DOCUMENT_ROOT."/lib/admin.lib.php"); $langs->load("companies"); $langs->load("products"); $langs->load("admin"); $langs->load("mails"); if (!$user->admin) accessforbidden(); $substitutionarrayfortest=array( '__ID__' => 'TESTIdRecord', '__EMAIL__' => 'TESTEMail', '__LASTNAME__' => 'TESTLastname', '__FIRSTNAME__' => 'TESTFirstname' ); /* * Actions */ if (isset($_POST["action"]) && $_POST["action"] == 'update') { dolibarr_set_const($db, "MAIN_DISABLE_ALL_MAILS", $_POST["MAIN_DISABLE_ALL_MAILS"],'chaine',0,'',$conf->entity); dolibarr_set_const($db, "MAIN_MAIL_SENDMODE", $_POST["MAIN_MAIL_SENDMODE"],'chaine',0,'',0); dolibarr_set_const($db, "MAIN_MAIL_SMTP_PORT", $_POST["MAIN_MAIL_SMTP_PORT"],'chaine',0,'',0); dolibarr_set_const($db, "MAIN_MAIL_SMTP_SERVER", $_POST["MAIN_MAIL_SMTP_SERVER"],'chaine',0,'',0); dolibarr_set_const($db, "MAIN_MAIL_SMTPS_ID", $_POST["MAIN_MAIL_SMTPS_ID"],'chaine',0,'',0); dolibarr_set_const($db, "MAIN_MAIL_SMTPS_PW", $_POST["MAIN_MAIL_SMTPS_PW"],'chaine',0,'',0); dolibarr_set_const($db, "MAIN_MAIL_EMAIL_FROM", $_POST["MAIN_MAIL_EMAIL_FROM"],'chaine',0,'',$conf->entity); Header("Location: ".$_SERVER["PHP_SELF"]."?mainmenu=home&leftmenu=setup"); exit; } /* * Add file */ if ($_POST['addfile'] || $_POST['addfilehtml']) { // Set tmp user directory $vardir=$conf->user->dir_output."/".$user->id; $upload_dir = $vardir.'/temp/'; if (! empty($_FILES['addedfile']['tmp_name'])) { if (! is_dir($upload_dir)) create_exdir($upload_dir); if (is_dir($upload_dir)) { if (dol_move_uploaded_file($_FILES['addedfile']['tmp_name'], $upload_dir . "/" . $_FILES['addedfile']['name'],0) > 0) { $message = '

'.$langs->trans("FileTransferComplete").'

'; //print_r($_FILES); include_once(DOL_DOCUMENT_ROOT.'/html.formmail.class.php'); $formmail = new FormMail($db); $formmail->add_attached_files($upload_dir . "/" . $_FILES['addedfile']['name'],$_FILES['addedfile']['name'],$_FILES['addedfile']['type']); } else { // Echec transfert (fichier d�passant la limite ?) $message = '

'.$langs->trans("ErrorFileNotUploaded").'

'; // print_r($_FILES); } } } if ($_POST['addfile']) $_GET["action"]='test'; if ($_POST['addfilehtml']) $_GET["action"]='testhtml'; } /* * Send mail */ if (($_POST['action'] == 'send' || $_POST['action'] == 'sendhtml') && ! $_POST['addfile'] && ! $_POST['addfilehtml'] && ! $_POST['cancel']) { $error=0; $email_from=''; if (! empty($_POST["fromname"])) $email_from=$_POST["fromname"].' '; if (! empty($_POST["frommail"])) $email_from.='<'.$_POST["frommail"].'>'; $errors_to = $_POST["errorstomail"]; $sendto = $_POST["sendto"]; $sendtocc = $_POST["sendtocc"]; $sendtoccc = $_POST["sendtoccc"]; $subject = $_POST['subject']; $body = $_POST['message']; $deliveryreceipt= $_POST["deliveryreceipt"]; // Create form object include_once('../html.formmail.class.php'); $formmail = new FormMail($db); $attachedfiles=$formmail->get_attached_files(); $filepath = $attachedfiles['paths']; $filename = $attachedfiles['names']; $mimetype = $attachedfiles['mimes']; if (empty($_POST["frommail"])) { $message='

'.$langs->trans("ErrorFieldRequired",$langs->transnoentities("MailFrom")).'

'; $_GET["action"]='test'; $error++; } if (empty($sendto)) { $message='

'.$langs->trans("ErrorFieldRequired",$langs->transnoentities("MailTo")).'

'; $_GET["action"]='test'; $error++; } if (! $error) { // Le message est-il en html $msgishtml=0; // Message is not HTML if ($_POST['action'] == 'sendhtml') $msgishtml=1; // Force message to HTML // Pratique les substitutions sur le sujet et message $subject=make_substitutions($subject,$substitutionarrayfortest); $body=make_substitutions($body,$substitutionarrayfortest); require_once(DOL_DOCUMENT_ROOT."/lib/CMailFile.class.php"); $mailfile = new CMailFile($subject,$sendto,$email_from,$body, $filepath,$mimetype,$filename, $sendtocc, $sendtoccc, $deliveryreceipt, $msgishtml,$errors_to); $result=$mailfile->sendfile(); if ($result) { $message='

'.$langs->trans("MailSuccessfulySent",$email_from,$sendto).'

'; } else { $message='

'.$langs->trans("ResultKo").'
'.$mailfile->error.' '.$result.'

'; } $_GET["action"]=''; } } /* * View */ $linuxlike=1; if (eregi('^win',PHP_OS)) $linuxlike=0; if (eregi('^mac',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'; /* * View */ llxHeader(); print_fiche_titre($langs->trans("EMailsSetup"),'','setup'); print $langs->trans("EMailsDesc")."
\n"; print "
\n"; if ($message) print $message.'
'; if (isset($_GET["action"]) && $_GET["action"] == 'edit') { $html=new Form($db); print '

'; print ''; print ''; clearstatcache(); $var=true; print ''; print ''; // Disable $var=!$var; print ''; // Method $var=!$var; print ''; // Server $var=!$var; print ''; // Port $var=!$var; print ''; // ID if ($conf->global->MAIN_MAIL_SENDMODE == 'smtps') { $var=!$var; print ''; } // PW if ($conf->global->MAIN_MAIL_SENDMODE == 'smtps') { $var=!$var; print ''; } // From $var=!$var; print ''; print '

'.$langs->trans("Parameter").'	'.$langs->trans("Value").'
'.$langs->trans("MAIN_DISABLE_ALL_MAILS").'	'; print $html->selectyesno('MAIN_DISABLE_ALL_MAILS',$conf->global->MAIN_DISABLE_ALL_MAILS,1); print '
'.$langs->trans("MAIN_MAIL_SENDMODE").'	'; $listofmethods=array(); $listofmethods['mail']='PHP mail function'; $listofmethods['simplemail']='Simplemail class'; $listofmethods['smtps']='SMTP/SMTPS socket library'; // SuperAdministrator access only if ((empty($conf->global->MAIN_MODULE_MULTICOMPANY)) \|\| ($user->admin && !$user->entity)) { print $html->select_array('MAIN_MAIL_SENDMODE',$listofmethods,$conf->global->MAIN_MAIL_SENDMODE); } else { if ($conf->global->MAIN_MAIL_SENDMODE == 'mail') $text = 'PHP mail function'; elseif ($conf->global->MAIN_MAIL_SENDMODE == 'simplemail') $text = 'Simplemail class'; elseif ($conf->global->MAIN_MAIL_SENDMODE == 'smtps') $text = 'SMTPS library'; else { $text = $langs->trans("Undefined"); } $htmltext = $langs->trans("ContactSuperAdminForChange"); print $html->textwithpicto($text,$htmltext,1,'superadmin'); print ''; } print '
'; if ($linuxlike && ($conf->global->MAIN_MAIL_SENDMODE == 'mail' \|\| $conf->global->MAIN_MAIL_SENDMODE == 'simplemail')) { print $langs->trans("MAIN_MAIL_SMTP_SERVER_NotAvailableOnLinuxLike"); print '	'; print $langs->trans("SeeLocalSendMailSetup"); } else { $smtpserver = ini_get('SMTP')?ini_get('SMTP'):$langs->transnoentities("Undefined"); print $langs->trans("MAIN_MAIL_SMTP_SERVER",$smtpserver); print '	'; // SuperAdministrator access only if ((empty($conf->global->MAIN_MODULE_MULTICOMPANY)) \|\| ($user->admin && !$user->entity)) { print ''; } else { $text = $conf->global->MAIN_MAIL_SMTP_SERVER ? $conf->global->MAIN_MAIL_SMTP_SERVER : $smtpserver; $htmltext = $langs->trans("ContactSuperAdminForChange"); print $html->textwithpicto($text,$htmltext,1,'superadmin'); print ''; } } print '
'; if ($linuxlike && $conf->global->MAIN_MAIL_SENDMODE == 'mail') { print $langs->trans("MAIN_MAIL_SMTP_PORT_NotAvailableOnLinuxLike"); print '	'; print $langs->trans("SeeLocalSendMailSetup"); } else { $smtpport = ini_get('smtp_port')?ini_get('smtp_port'):$langs->transnoentities("Undefined"); print $langs->trans("MAIN_MAIL_SMTP_PORT",$smtpport); print '	'; // SuperAdministrator access only if ((empty($conf->global->MAIN_MODULE_MULTICOMPANY)) \|\| ($user->admin && !$user->entity)) { print ''; } else { $text = $conf->global->MAIN_MAIL_SMTP_PORT ? $conf->global->MAIN_MAIL_SMTP_PORT : $smtpport; $htmltext = $langs->trans("ContactSuperAdminForChange"); print $html->textwithpicto($text,$htmltext,1,'superadmin'); print ''; } } print '
'.$langs->trans("MAIN_MAIL_SMTPS_ID").'	'; // SuperAdministrator access only if ((empty($conf->global->MAIN_MODULE_MULTICOMPANY)) \|\| ($user->admin && !$user->entity)) { print ''; } else { $htmltext = $langs->trans("ContactSuperAdminForChange"); print $html->textwithpicto($conf->global->MAIN_MAIL_SMTPS_ID,$htmltext,1,'superadmin'); print ''; } print '
'.$langs->trans("MAIN_MAIL_SMTPS_PW").'	'; // SuperAdministrator access only if ((empty($conf->global->MAIN_MODULE_MULTICOMPANY)) \|\| ($user->admin && !$user->entity)) { print ''; } else { $htmltext = $langs->trans("ContactSuperAdminForChange"); print $html->textwithpicto($conf->global->MAIN_MAIL_SMTPS_PW,$htmltext,1,'superadmin'); print ''; } print '
'.$langs->trans("MAIN_MAIL_EMAIL_FROM",ini_get('sendmail_from')?ini_get('sendmail_from'):$langs->transnoentities("Undefined")).'

'; print '
'; print ''; print ''; print '

'; print '
'; } else { $var=true; print ''; print ''; // Disable $var=!$var; print ''; // Method $var=!$var; print ''; // Server $var=!$var; if ($linuxlike && ($conf->global->MAIN_MAIL_SENDMODE == 'mail' || $conf->global->MAIN_MAIL_SENDMODE == 'simplemail')) { print ''; } else { print ''; } // Port $var=!$var; if ($linuxlike && ($conf->global->MAIN_MAIL_SENDMODE == 'mail' || $conf->global->MAIN_MAIL_SENDMODE == 'simplemail')) { print ''; } else { print ''; } // SMTPS ID $var=!$var; if ($conf->global->MAIN_MAIL_SENDMODE == 'smtps') { print ''; } // SMTPS PW $var=!$var; if ($conf->global->MAIN_MAIL_SENDMODE == 'smtps') { print ''; } // From $var=!$var; print ''; print '

'.$langs->trans("Parameter").'	'.$langs->trans("Value").'
'.$langs->trans("MAIN_DISABLE_ALL_MAILS").'	'.yn($conf->global->MAIN_DISABLE_ALL_MAILS).'
'.$langs->trans("MAIN_MAIL_SENDMODE").'	'; if ($conf->global->MAIN_MAIL_SENDMODE == 'mail') print 'PHP mail function'; elseif ($conf->global->MAIN_MAIL_SENDMODE == 'simplemail') print 'Simplemail class'; elseif ($conf->global->MAIN_MAIL_SENDMODE == 'smtps') print 'SMTPS library'; else { print $langs->trans("Undefined"); } print '
'.$langs->trans("MAIN_MAIL_SMTP_SERVER_NotAvailableOnLinuxLike").'	'.$langs->trans("SeeLocalSendMailSetup").'
'.$langs->trans("MAIN_MAIL_SMTP_SERVER",ini_get('SMTP')?ini_get('SMTP'):$langs->transnoentities("Undefined")).'	'.$conf->global->MAIN_MAIL_SMTP_SERVER.'
'.$langs->trans("MAIN_MAIL_SMTP_PORT_NotAvailableOnLinuxLike").'	'.$langs->trans("SeeLocalSendMailSetup").'
'.$langs->trans("MAIN_MAIL_SMTP_PORT",ini_get('smtp_port')?ini_get('smtp_port'):$langs->transnoentities("Undefined")).'	'.$conf->global->MAIN_MAIL_SMTP_PORT.'
'.$langs->trans("MAIN_MAIL_SMTPS_ID").'	'.$conf->global->MAIN_MAIL_SMTPS_ID.'
'.$langs->trans("MAIN_MAIL_SMTPS_PW").'	'.$conf->global->MAIN_MAIL_SMTPS_PW.'
'.$langs->trans("MAIN_MAIL_EMAIL_FROM",ini_get('sendmail_from')?ini_get('sendmail_from'):$langs->transnoentities("Undefined")).'	'.$conf->global->MAIN_MAIL_EMAIL_FROM.'

'; // Boutons actions print '

'; print ''.$langs->trans("Modify").''; if ($conf->global->MAIN_MAIL_SENDMODE != 'mail' || ! $linuxlike) { if (function_exists('fsockopen') && $port && $server) { print ''.$langs->trans("DoTestServerAvailability").''; } } else { print ''.$langs->trans("DoTestServerAvailability").''; } print ''.$langs->trans("DoTestSend").''; if ($conf->fckeditor->enabled) { print ''.$langs->trans("DoTestSendHTML").''; } print '

'; // Affichage formulaire de TEST if ($_GET["action"] == 'testconnect') { print '
'; print_titre($langs->trans("DoTestServerAvailability")); // Cree l'objet formulaire mail include_once(DOL_DOCUMENT_ROOT."/lib/CMailFile.class.php"); $mail = new CMailFile('','','',''); $result=$mail->check_server_port($server,$port); if ($result) print '

'.$langs->trans("ServerAvailableOnIPOrPort",$server,$port).'

'; else { print '

'.$langs->trans("ServerNotAvailableOnIPOrPort",$server,$port); if ($mail->error) print ' - '.$langs->convToOutputCharset($mail->error,'ISO-8859-1'); print '

'; } print '
'; } // Affichage formulaire de TEST simple if ($_GET["action"] == 'test') { print '
'; print_titre($langs->trans("DoTestSend")); // Cree l'objet formulaire mail include_once(DOL_DOCUMENT_ROOT."/html.formmail.class.php"); $formmail = new FormMail($db); $formmail->fromname = (isset($_POST['fromname'])?$_POST['fromname']:$conf->global->MAIN_MAIL_EMAIL_FROM); $formmail->frommail = (isset($_POST['frommail'])?$_POST['frommail']:$conf->global->MAIN_MAIL_EMAIL_FROM); $formmail->withfromreadonly=0; $formmail->withsubstit=0; $formmail->withfrom=1; $formmail->witherrorsto=1; $formmail->withto=(isset($_POST['sendto'])?$_POST['sendto']:$user->email?$user->email:1); $formmail->withtocc=(isset($_POST['sendtocc'])?$_POST['sendtocc']:1); $formmail->withtoccc=(isset($_POST['sendtoccc'])?$_POST['sendtoccc']:1); $formmail->withtopic=(isset($_POST['subject'])?$_POST['subject']:$langs->trans("Test")); $formmail->withtopicreadonly=0; $formmail->withfile=2; $formmail->withbody=(isset($_POST['message'])?$_POST['message']:$langs->trans("Test")); $formmail->withbodyreadonly=0; $formmail->withcancel=1; $formmail->withdeliveryreceipt=1; $formmail->withfckeditor=0; // Tableau des substitutions $formmail->substit=$substitutionarrayfortest; // Tableau des parametres complementaires du post $formmail->param["action"]="send"; $formmail->param["models"]="body"; $formmail->param["mailid"]=$mil->id; $formmail->param["returnurl"]=DOL_URL_ROOT."/admin/mails.php"; // Init list of files if (! empty($_REQUEST["mode"]) && $_REQUEST["mode"]=='init') { $formmail->clear_attached_files(); } $formmail->show_form('addfile'); print '
'; } // Affichage formulaire de TEST HTML if ($_GET["action"] == 'testhtml') { print '
'; print_titre($langs->trans("DoTestSendHTML")); // Cree l'objet formulaire mail include_once(DOL_DOCUMENT_ROOT."/html.formmail.class.php"); $formmail = new FormMail($db); $formmail->fromname = (isset($_POST['fromname'])?$_POST['fromname']:$conf->global->MAIN_MAIL_EMAIL_FROM); $formmail->frommail = (isset($_POST['frommail'])?$_POST['frommail']:$conf->global->MAIN_MAIL_EMAIL_FROM); $formmail->withfromreadonly=0; $formmail->withsubstit=0; $formmail->withfrom=1; $formmail->witherrorsto=1; $formmail->withto=(isset($_POST['sendto'])?$_POST['sendto']:$user->email?$user->email:1); $formmail->withtocc=(isset($_POST['sendtocc'])?$_POST['sendtocc']:1); $formmail->withtoccc=(isset($_POST['sendtoccc'])?$_POST['sendtoccc']:1); $formmail->withtopic=(isset($_POST['subject'])?$_POST['subject']:$langs->trans("Test")); $formmail->withtopicreadonly=0; $formmail->withfile=2; $formmail->withbody=(isset($_POST['message'])?$_POST['message']:$langs->trans("Test")); $formmail->withbodyreadonly=0; $formmail->withcancel=1; $formmail->withdeliveryreceipt=1; $formmail->withfckeditor=1; // Tableau des substitutions $formmail->substit=$substitutionarrayfortest; // Tableau des parametres complementaires du post $formmail->param["action"]="sendhtml"; $formmail->param["models"]="body"; $formmail->param["mailid"]=$mil->id; $formmail->param["returnurl"]=DOL_URL_ROOT."/admin/mails.php"; // Init list of files if (! empty($_REQUEST["mode"]) && $_REQUEST["mode"]=='init') { $formmail->clear_attached_files(); } $formmail->show_form('addfilehtml'); print '
'; } } $db->close(); llxFooter('$Date$ - $Revision$'); ?>