/** * 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; }