/**
* server_IP_client
* Retourne l'IP du client.
* Utilise la méthode get_IP() définie dans la classe Session.
*
* @param void
* @return string
*/
private static function server_IP_client()
{
$valeur = Session::get_IP();
return InfoServeur::cellule_coloree_centree($valeur,'jaune');
}
private static function TestAnomalieSession()
{
// Test sur l'identifiant de session (mais je ne vois pas comment il pourrait y avoir une modification à ce niveau)
$ID_old = $_SESSION['SESSION_ID'];
$ID_new = session_id();
if($ID_old != $ID_new)
{
return array( 'session différente' , $ID_old , $ID_new );
}
// Test sur l'IP
if(empty($_SESSION['ETABLISSEMENT']['IP_VARIABLE']))
{
$IP_old = $_SESSION['SESSION_IP'];
$IP_new = Session::get_IP();
if($IP_old != $IP_new)
{
return array( 'adresse IP différente' , $IP_old , $IP_new );
}
}
// Test sur le navigateur (une mise à jour du navigateur en cours de navigation peut déclencher ceci)
$UA_old = $_SESSION['SESSION_UA'];
$UA_new = Session::get_UserAgent();
if($UA_old != $UA_new)
{
$UA_old = ( levenshtein($UA_old,$UA_new)<12 ) ? $UA_old : 'Chaîne non dévoilée par sécurité.' ;
return array( 'navigateur différent' , $UA_old , $UA_new );
}
// OK
return NULL;
}
/**
* Renvoie un texte comportant divers éléments pour la fin du courriel.
*
* @param array $tab_elements peut contenir les valeurs 'excuses_derangement' , 'info_connexion' , 'no_reply' , 'notif_individuelle' , 'signature'
* @param string $courriel facultatif, seulement requis pour 'excuses_derangement' & 'notif_individuelle'
* @return string
*/
public static function texte_pied_courriel($tab_elements, $courriel = NULL)
{
$texte = '';
// texte s'excusant en cas de réception d'un courriel non sollicité
if (in_array('excuses_derangement', $tab_elements)) {
$texte .= "\r\n";
$texte .= 'Si vous n\'êtes pas à l\'origine de cette demande, alors quelqu\'un a saisi votre adresse (' . $courriel . ') par erreur !' . "\r\n";
$texte .= 'Dans ce cas, désolé pour le dérangement, veuillez ignorer ce message.' . "\r\n";
}
// texte donnant des informations sur la connexion internet utilisée
if (in_array('info_connexion', $tab_elements)) {
$AdresseIP = Session::get_IP();
$HostName = gethostbyaddr($AdresseIP);
$UserAgent = Session::get_UserAgent();
$texte .= "\r\n";
$texte .= 'Voici, pour information, les informations relatives à la connexion internet utilisée :' . "\r\n";
$texte .= 'Adresse IP --> ' . $AdresseIP . "\r\n";
$texte .= 'Nom d\'hôte --> ' . $HostName . "\r\n";
$texte .= 'Navigateur --> ' . $UserAgent . "\r\n";
}
// texte indiquant qu'il ne faut pas répondre à l'envoyeur
if (in_array('no_reply', $tab_elements)) {
$texte .= "\r\n";
$texte .= '______________________________________________________________________' . "\r\n";
$texte .= "\r\n";
$texte .= 'L\'expéditeur de ce courriel est une machine, merci de NE PAS répondre au message.' . "\r\n";
}
// texte avec l'indication pour modifier ses abonnements et un lien pour signaler une réception anormale
if (in_array('notif_individuelle', $tab_elements)) {
$texte .= "\r\n";
$texte .= 'Modifier vos abonnements :' . "\r\n" . Sesamail::adresse_lien_profond('page=compte_email') . "\r\n";
$texte .= 'Consulter vos notifications :' . "\r\n" . Sesamail::adresse_lien_profond('page=consultation_notifications') . "\r\n";
$texte .= 'Signaler un courriel erroné :' . "\r\n" . URL_DIR_SACOCHE . '?' . 'base=' . $_SESSION['BASE'] . '&page=public_contact_admin&courriel=' . $courriel . "\r\n";
}
// texte avec la signature "SACoche"
if (in_array('signature', $tab_elements)) {
$texte .= "\r\n";
$texte .= '--' . "\r\n";
$texte .= 'SACoche - ' . HEBERGEUR_DENOMINATION . "\r\n";
}
// retour du contenu
return $texte;
}
