diff --git a/htdocs/admin/sms.php b/htdocs/admin/sms.php new file mode 100755 index 00000000000..c3043be927a --- /dev/null +++ b/htdocs/admin/sms.php @@ -0,0 +1,354 @@ + + * 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/sms.php + * \brief Page to setup emails sending + * \version $Id$ + */ + +require("../main.inc.php"); +require_once(DOL_DOCUMENT_ROOT."/lib/admin.lib.php"); + +$langs->load("companies"); +$langs->load("products"); +$langs->load("admin"); +$langs->load("mails"); +$langs->load("other"); +$langs->load("errors"); + +if (!$user->admin) +accessforbidden(); + +$substitutionarrayfortest=array( +'__ID__' => 'TESTIdRecord', +'__EMAIL__' => 'TESTEMail', +'__LASTNAME__' => 'TESTLastname', +'__FIRSTNAME__' => 'TESTFirstname' +); + + +/* + * Actions + */ + +if (isset($_POST["action"]) && $_POST["action"] == 'update' && empty($_POST["cancel"])) +{ + dolibarr_set_const($db, "MAIN_DISABLE_ALL_SMS", $_POST["MAIN_DISABLE_ALL_SMS"],'chaine',0,'',$conf->entity); + + dolibarr_set_const($db, "MAIN_SMS_SENDMODE", $_POST["MAIN_SMS_SENDMODE"],'chaine',0,'',$conf->entity); + + dolibarr_set_const($db, "MAIN_MAIL_SMS_FROM", $_POST["MAIN_MAIL_SMS_FROM"],'chaine',0,'',$conf->entity); + //dolibarr_set_const($db, "MAIN_MAIL_AUTOCOPY_TO", $_POST["MAIN_MAIL_AUTOCOPY_TO"],'chaine',0,'',$conf->entity); + + Header("Location: ".$_SERVER["PHP_SELF"]."?mainmenu=home&leftmenu=setup"); + exit; +} + + +/* + * Send sms + */ +if (($_POST['action'] == 'send' || $_POST['action'] == 'sendhtml') +&& ! $_POST['addfile'] && ! $_POST['addfilehtml'] && ! $_POST["removedfile"] && ! $_POST['cancel']) +{ + $error=0; + + $email_from=''; + if (! empty($_POST["fromname"])) $email_from=$_POST["fromname"].' '; + if (! empty($_POST["fromsms"])) $email_from.='<'.$_POST["fromsms"].'>'; + + $errors_to = $_POST["errorstosms"]; + $sendto = $_POST["sendto"]; + $sendtocc = $_POST["sendtocc"]; + $sendtoccc = $_POST["sendtoccc"]; + $subject = $_POST['subject']; + $body = $_POST['message']; + $deliveryreceipt= $_POST["deliveryreceipt"]; + + // Create form object + include_once(DOL_DOCUMENT_ROOT.'/core/class/html.formsms.class.php'); + $formsms = new FormSms($db); + + if (empty($_POST["fromsms"])) + { + $message='
'.$langs->trans("ErrorFieldRequired",$langs->transnoentities("SmsFrom")).'
'; + $_GET["action"]='test'; + $error++; + } + if (empty($sendto)) + { + $message='
'.$langs->trans("ErrorFieldRequired",$langs->transnoentities("SmsTo")).'
'; + $_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,$langs); + $body=make_substitutions($body,$substitutionarrayfortest,$langs); + + require_once(DOL_DOCUMENT_ROOT."/lib/CSMSFile.class.php"); + $mailfile = new CSMSFile($subject,$sendto,$email_from,$body, + $filepath,$mimetype,$filename, + $sendtocc, $sendtoccc, $deliveryreceipt, $msgishtml,$errors_to); + + $result=$mailfile->sendfile(); + + if ($result) + { + $message='
'.$langs->trans("SmsSuccessfulySent",$email_from,$sendto).'
'; + } + else + { + $message='
'.$langs->trans("ResultKo").'
'.$mailfile->error.' '.$result.'
'; + } + + $_GET["action"]=''; + } +} + + + +/* + * View + */ + +$linuxlike=1; +if (preg_match('/^win/i',PHP_OS)) $linuxlike=0; +if (preg_match('/^mac/i',PHP_OS)) $linuxlike=0; + + + +/* + * View + */ + +$wikihelp='EN:Setup Sms|FR:Paramétrage Sms|ES:Configuración Sms'; +llxHeader('',$langs->trans("Setup"),$wikihelp); + +print_fiche_titre($langs->trans("SmsSetup"),'','setup'); + +print $langs->trans("SmsDesc")."
\n"; +print "
\n"; + +if ($message) print $message.'
'; + +// List of sending methods +$listofmethods=$conf->sms_engine; + + +if (isset($_GET["action"]) && $_GET["action"] == 'edit') +{ + $html=new Form($db); + + if (! sizeof($listofmethods)) print '
'.$langs->trans("NoSmsEngine").'
'; + + print '
'; + print ''; + print ''; + + clearstatcache(); + $var=true; + + print ''; + print ''; + + // Disable + $var=!$var; + print ''; + + // Separator + $var=!$var; + print ''; + + // Method + $var=!$var; + print ''; + + // From + $var=!$var; + print ''; + print ''; + + // Autocopy to + /*$var=!$var; + print ''; + print ''; + */ + print '
'.$langs->trans("Parameter").''.$langs->trans("Value").'
'.$langs->trans("MAIN_DISABLE_ALL_SMS").''; + print $html->selectyesno('MAIN_DISABLE_ALL_SMS',$conf->global->MAIN_DISABLE_ALL_SMS,1); + print '
 
'.$langs->trans("MAIN_SMS_SENDMODE").''; + if (sizeof($listofmethods)) print $html->selectarray('MAIN_SMS_SENDMODE',$listofmethods,$conf->global->MAIN_SMS_SENDMODE); + else print ''.$langs->trans("None").''; + print '
'.$langs->trans("MAIN_MAIL_SMS_FROM",ini_get('sendmail_from')?ini_get('sendmail_from'):$langs->transnoentities("Undefined")).'
'.$langs->trans("MAIN_MAIL_AUTOCOPY_TO").'
'; + + print '
'; + print ''; + print '     '; + print ''; + print '
'; + + print '
'; + print '
'; +} +else +{ + $var=true; + + print ''; + print ''; + + // Disable + $var=!$var; + print ''; + + // Separator + $var=!$var; + print ''; + + // Method + $var=!$var; + print ''; + + // From + $var=!$var; + print ''; + print ''; + + // Autocopy to + /*$var=!$var; + print ''; + print ''; + */ + + print '
'.$langs->trans("Parameter").''.$langs->trans("Value").'
'.$langs->trans("MAIN_DISABLE_ALL_SMS").''.yn($conf->global->MAIN_DISABLE_ALL_SMS).'
 
'.$langs->trans("MAIN_SMS_SENDMODE").''; + $text=$listofmethods[$conf->global->MAIN_SMS_SENDMODE]; + if (empty($text)) $text=$langs->trans("Undefined").img_warning(); + print $text; + print '
'.$langs->trans("MAIN_MAIL_SMS_FROM",ini_get('sendmail_from')?ini_get('sendmail_from'):$langs->transnoentities("Undefined")).''.$conf->global->MAIN_MAIL_SMS_FROM; + if (!empty($conf->global->MAIN_MAIL_SMS_FROM) && ! isValidEmail($conf->global->MAIN_MAIL_SMS_FROM)) print img_warning($langs->trans("ErrorBadEMail")); + print '
'.$langs->trans("MAIN_MAIL_AUTOCOPY_TO").''.$conf->global->MAIN_MAIL_AUTOCOPY_TO; + if (!empty($conf->global->MAIN_MAIL_AUTOCOPY_TO) && ! isValidEmail($conf->global->MAIN_MAIL_AUTOCOPY_TO)) print img_warning($langs->trans("ErrorBadEMail")); + print '
'; + + + // Boutons actions + + print '
'; + + print ''.$langs->trans("Modify").''; + + /*if ($conf->global->MAIN_SMS_SENDMODE != 'mail' || ! $linuxlike) + { + if (function_exists('fsockopen') && $port && $server) + { + print ''.$langs->trans("DoTestServerAvailability").''; + } + } + else + { + print ''.$langs->trans("DoTestServerAvailability").''; + }*/ + + print ''.$langs->trans("DoTestSend").''; + + print '
'; + + + // Run the test to connect + /* + if ($_GET["action"] == 'testconnect') + { + print '
'; + print_titre($langs->trans("DoTestServerAvailability")); + + // If we use SSL/TLS + if (! empty($conf->global->MAIN_MAIL_EMAIL_TLS) && function_exists('openssl_open')) $server='ssl://'.$server; + + include_once(DOL_DOCUMENT_ROOT."/lib/CMailFile.class.php"); + $mail = new CSMSFile('','','',''); + $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."/core/class/html.formsms.class.php"); + $formsms = new FormSms($db); + $formsms->fromname = (isset($_POST['fromname'])?$_POST['fromname']:$conf->global->MAIN_MAIL_SMS_FROM); + $formsms->fromsms = (isset($_POST['fromsms'])?$_POST['fromsms']:$conf->global->MAIN_MAIL_SMS_FROM); + $formsms->withfromreadonly=0; + $formsms->withsubstit=0; + $formsms->withfrom=1; + $formsms->witherrorsto=1; + $formsms->withto=(isset($_POST['sendto'])?$_POST['sendto']:$user->email?$user->email:1); + $formsms->withtocc=(isset($_POST['sendtocc'])?$_POST['sendtocc']:1); + $formsms->withtoccc=(isset($_POST['sendtoccc'])?$_POST['sendtoccc']:1); + $formsms->withtopic=(isset($_POST['subject'])?$_POST['subject']:$langs->trans("Test")); + $formsms->withtopicreadonly=0; + $formsms->withfile=2; + $formsms->withbody=(isset($_POST['message'])?$_POST['message']:$langs->trans("PredefinedMailTest")); + $formsms->withbodyreadonly=0; + $formsms->withcancel=1; + $formsms->withdeliveryreceipt=1; + $formsms->withfckeditor=0; + // Tableau des substitutions + $formsms->substit=$substitutionarrayfortest; + // Tableau des parametres complementaires du post + $formsms->param["action"]="send"; + $formsms->param["models"]="body"; + $formsms->param["mailid"]=$mil->id; + $formsms->param["returnurl"]=DOL_URL_ROOT."/admin/sms.php"; + + // Init list of files + if (! empty($_REQUEST["mode"]) && $_REQUEST["mode"]=='init') + { + $formsms->clear_attached_files(); + } + + $formsms->show_form('addfile','removefile'); + + print '
'; + } +} + + +$db->close(); + +llxFooter('$Date$ - $Revision$'); +?> diff --git a/htdocs/core/class/conf.class.php b/htdocs/core/class/conf.class.php index f4aba2e1688..9255e245d3e 100644 --- a/htdocs/core/class/conf.class.php +++ b/htdocs/core/class/conf.class.php @@ -124,7 +124,7 @@ class Conf if (! defined("$key")) define ("$key", $value); // In some cases, the constant might be already forced (Example: SYSLOG_FILE during install) $this->global->$key=$value; - if ($value) + if ($value && preg_match('/^MAIN_MODULE_/',$key)) { // If this is constant for a css file activated by a module if (preg_match('/^MAIN_MODULE_([A-Z_]+)_CSS$/i',$key)) @@ -187,6 +187,13 @@ class Conf // Add this module in list of modules that need smarty $this->need_smarty[]=$module; } + // If this is constant for a smarty need by a module + elseif (preg_match('/^MAIN_MODULE_([A-Z_]+)_SMS$/i',$key,$reg)) + { + $module=strtolower($reg[1]); + // Add this module in list of modules that need smarty + $this->sms_engine[]=$module; + } // If this is a module constant elseif (preg_match('/^MAIN_MODULE_([A-Z_]+)$/i',$key,$reg)) { diff --git a/htdocs/includes/menus/init_menu_auguria.sql b/htdocs/includes/menus/init_menu_auguria.sql index be2a5be47a2..e2012ab941d 100644 --- a/htdocs/includes/menus/init_menu_auguria.sql +++ b/htdocs/includes/menus/init_menu_auguria.sql @@ -33,6 +33,7 @@ insert into llx_menu (enabled, menu_handler, type, rowid, mainmenu, leftmenu, fk insert into llx_menu (enabled, menu_handler, type, rowid, mainmenu, leftmenu, fk_menu, url, titre, level, langs, perms, target, usertype, position, entity) values ('$leftmenu==\'setup\'', __HANDLER__, 'left', 108__+MAX_llx_menu__, 'home', '', 100__+MAX_llx_menu__, '/admin/perms.php?leftmenu=setup', 'Security', 1, 'admin', '', '', 2, 7, __ENTITY__); insert into llx_menu (enabled, menu_handler, type, rowid, mainmenu, leftmenu, fk_menu, url, titre, level, langs, perms, target, usertype, position, entity) values ('$leftmenu==\'setup\'', __HANDLER__, 'left', 110__+MAX_llx_menu__, 'home', '', 100__+MAX_llx_menu__, '/admin/limits.php?leftmenu=setup', 'MenuLimits', 1, 'admin', '', '', 2, 8, __ENTITY__); insert into llx_menu (enabled, menu_handler, type, rowid, mainmenu, leftmenu, fk_menu, url, titre, level, langs, perms, target, usertype, position, entity) values ('$leftmenu==\'setup\'', __HANDLER__, 'left', 109__+MAX_llx_menu__, 'home', '', 100__+MAX_llx_menu__, '/admin/mails.php?leftmenu=setup', 'Emails', 1, 'admin', '', '', 2, 9, __ENTITY__); +insert into llx_menu (enabled, menu_handler, type, rowid, mainmenu, leftmenu, fk_menu, url, titre, level, langs, perms, target, usertype, position, entity) values ('$leftmenu==\'setup\' && $conf->global->MAIN_FEATURES_LEVEL', __HANDLER__, 'left', 113__+MAX_llx_menu__, 'home', '', 100__+MAX_llx_menu__, '/admin/sms.php?leftmenu=setup', 'Sms', 1, 'admin', '', '', 2, 9, __ENTITY__); insert into llx_menu (enabled, menu_handler, type, rowid, mainmenu, leftmenu, fk_menu, url, titre, level, langs, perms, target, usertype, position, entity) values ('$leftmenu==\'setup\'', __HANDLER__, 'left', 111__+MAX_llx_menu__, 'home', '', 100__+MAX_llx_menu__, '/admin/dict.php?leftmenu=setup', 'DictionnarySetup', 1, 'admin', '', '', 2, 10, __ENTITY__); insert into llx_menu (enabled, menu_handler, type, rowid, mainmenu, leftmenu, fk_menu, url, titre, level, langs, perms, target, usertype, position, entity) values ('$leftmenu==\'setup\'', __HANDLER__, 'left', 112__+MAX_llx_menu__, 'home', '', 100__+MAX_llx_menu__, '/admin/const.php?leftmenu=setup', 'OtherSetup', 1, 'admin', '', '', 2, 11, __ENTITY__); insert into llx_menu (enabled, menu_handler, type, rowid, mainmenu, leftmenu, fk_menu, url, titre, level, langs, perms, target, usertype, position, entity) values ('$user->admin', __HANDLER__, 'left', 200__+MAX_llx_menu__, 'home', '', 1__+MAX_llx_menu__, '/admin/system/index.php?leftmenu=system', 'SystemInfo', 0, 'admin', '', '', 2, 1, __ENTITY__); diff --git a/htdocs/includes/menus/standard/eldy.lib.php b/htdocs/includes/menus/standard/eldy.lib.php index 3ff75ccfd49..459e8cb2249 100644 --- a/htdocs/includes/menus/standard/eldy.lib.php +++ b/htdocs/includes/menus/standard/eldy.lib.php @@ -627,6 +627,7 @@ function print_left_eldy_menu($db,$menu_array_before,$menu_array_after) if ($leftmenu=="setup") $newmenu->add("/admin/perms.php", $langs->trans("Security"),1); if ($leftmenu=="setup") $newmenu->add("/admin/limits.php", $langs->trans("MenuLimits"),1); if ($leftmenu=="setup") $newmenu->add("/admin/mails.php", $langs->trans("Emails"),1); + if ($leftmenu=="setup" && $conf->global->MAIN_FEATURES_LEVEL) $newmenu->add("/admin/sms.php", $langs->trans("Sms"),1); if ($leftmenu=="setup") $newmenu->add("/admin/dict.php", $langs->trans("DictionnarySetup"),1); if ($leftmenu=="setup") $newmenu->add("/admin/const.php", $langs->trans("OtherSetup"),1);