Fusionnes les 2 fonctions tests de validation email en une seule car la deuxième inclue la première.

This commit is contained in:
Laurent Destailleur 2004-10-23 00:47:51 +00:00
parent f1ff08c996
commit c7c26a7240

View File

@ -38,34 +38,25 @@
Ensemble de fonctions de base de dolibarr sous forme d'include Ensemble de fonctions de base de dolibarr sous forme d'include
*/ */
/*
valid_email() checks the basic syntax of an email address and returns true/false. /*!
\brief Renvoi vrai si l'email est syntaxiquement valide
Distributed by Nick Brandt (nick@nbrandt.com) \param address adresse email (Ex: "toto@titi.com", "John Do <johndo@titi.com>")
Last modified 27/Feb /2003 1:15 \return boolean true si email valide, false sinon
*/ */
function valid_email($email) {
if (ereg("^([0-9,a-z,A-Z]+)([.,_,-]([0-9,a-z,A-Z]+))*[@]([0-9,a-z,A-Z]+)([.,_,-]([0-9,a-z,A-Z]+))*[.]([0-9,a-z,A-Z]){2}([0-9,a-z,A-Z])*$",$email)) {
return TRUE;
} else {
return FALSE;
}
}
function ValidEmail($address) function ValidEmail($address)
{ {
if( ereg( ".*<(.+)>", $address, $regs ) ) { if (ereg( ".*<(.+)>", $address, $regs)) {
$address = $regs[1]; $address = $regs[1];
} }
if(ereg( "^[^@ ]+@([a-zA-Z0-9\-]+\.)+([a-zA-Z0-9\-]{2}|net|com|gov|mil|org|edu|int)\$",$address) ) if (ereg( "^[^@ ]+@([a-zA-Z0-9\-]+\.)+([a-zA-Z0-9\-]{2}|net|com|gov|mil|org|edu|int)\$",$address))
{ {
return TRUE; return true;
} }
else else
{ {
return FALSE; return false;
} }
} }
@ -91,9 +82,6 @@ function check_mail ($mail)
Le \a message est envoyé dans syslog dans la catégorie LOG_USER. Le \a message est envoyé dans syslog dans la catégorie LOG_USER.
*/ */
function dolibarr_syslog($message, $level=LOG_ERR) function dolibarr_syslog($message, $level=LOG_ERR)
{ {
openlog("dolibarr", LOG_PID | LOG_PERROR, LOG_USER); # LOG_USER au lieu de LOG_LOCAL0 car non accepté par tous les PHP openlog("dolibarr", LOG_PID | LOG_PERROR, LOG_USER); # LOG_USER au lieu de LOG_LOCAL0 car non accepté par tous les PHP
@ -103,6 +91,7 @@ function dolibarr_syslog($message, $level=LOG_ERR)
closelog(); closelog();
} }
/*! /*!
\brief Affiche le header d'une fiche \brief Affiche le header d'une fiche
\param links liens \param links liens
@ -110,7 +99,6 @@ function dolibarr_syslog($message, $level=LOG_ERR)
\param title titre ("" par defaut) \param title titre ("" par defaut)
*/ */
function dolibarr_fiche_head($links, $active=0, $title='') function dolibarr_fiche_head($links, $active=0, $title='')
{ {
print "<!-- fiche --><div class=\"tabs\">\n"; print "<!-- fiche --><div class=\"tabs\">\n";