listdir . "/" . $msgfile)) { $msgfile = $this->listdir . "/" . $msgfile; } else if (is_file($this->listdir . "/archive/" . $msgfile)) { $msgfile = $this->listdir . "/archive/" . $msgfile; } else { return FALSE; } } $this->msgfile = $msgfile ; $message = file_get_contents($msgfile) ; // En cours de codage // La fonction display retourne tout simplement le source du mail // Il n'y a plus d'analyse a ce niveau return $message; $mimeDecode = new Mail_mimeDecode($message) ; $mailDecode = $mimeDecode->decode(array('decode_bodies' => 'true', 'include_bodies' => 'true')) ; // $msg->msgfile contient le chemin du fichier du mail en partant de la racine // Le point d'exclamation est le delimiteur de l'expression reguliere $relfile = preg_replace('!' . $this->listdir . '!', '', $msgfile); $a1 = preg_replace('!/archive/(.*)/.*$!', '\1', $relfile); // $a1 contient le nom du repertoire $a2 = preg_replace('!/archive/.*/(.*)$!', '\1', $relfile); // $a2 contient le nom du fichier if (isset($mailDecode->headers['date'])) $msgtime = strtotime(preg_replace ('/CEST/', '', $mailDecode->headers['date'])); $threadidx = date("Ym", $msgtime); if ($a2 <= 10) $numero_precedent = '0'.($a2 - 1) ; else $numero_precedent = ($a2 - 1) ; if ($a2 < 9) $numero_suivant = '0'.($a2 + 1) ; else $numero_suivant = ($a2 + 1); // On teste si le message suivant existe $decoupe = explode ('/', $msgfile) ; // Les nom de fichiers sont du format : // archive/0/01 // archive/0/02 ... 0/99 archive/1/01 ... $nom_fichier = $decoupe[count($decoupe)-1] ; $nom_repertoire = $decoupe[count($decoupe)-2] ; $repertoire_suivant = $nom_repertoire ; $repertoire_precedent = $nom_repertoire ; if ($nom_fichier > 8) { $fichier_suivant = $nom_fichier + 1 ; if ($nom_fichier == 99) { $fichier_suivant = '01' ; $repertoire_suivant = $nom_repertoire + 1 ; } } else { $fichier_suivant = '0'.($nom_fichier + 1) ; } if ($nom_fichier > 10) { $fichier_precedent = $nom_fichier - 1 ; } else { if ($nom_fichier == '01') { $fichier_precedent = '99' ; $repertoire_precedent = $nom_repertoire - 1 ; } else { $fichier_precedent = '0'.($nom_fichier - 1) ; } } print $this->parse_entete_mail($mailDecode) ; $this->parse_template($mailDecode, $a2, $a1); print $this->message_rendu; //print '' ; } /** * Renvoie les infos des messages suivants * * */ function getInfoSuivant() { $relfile = preg_replace('!' . $this->listdir . '!', '', $this->msgfile); $nom_repertoire = preg_replace('!/archive/(.*)/.*$!', '\1', $relfile); $nom_fichier = preg_replace('!/archive/.*/(.*)$!', '\1', $relfile); $repertoire_suivant = $nom_repertoire; // On recupere le numero du dernier message if (file_exists($this->listdir.'/archnum')) { $numero_dernier_message = file_get_contents($this->listdir.'/archnum'); } // a partir du nom du fichier // et du nom du repertoire, on reconstitue // le numero du message stocke dans le fichier d index // le message 12 du repertoire 2 a le numero 212 if ($nom_repertoire == '0') { $numero_message = $nom_fichier; } else { $numero_message = $nom_repertoire.$nom_fichier ; } // On ouvre le fichier d index $fichier_index = fopen ($this->listdir.'/archive/'.$nom_repertoire.'/index', 'r'); $compteur_ligne = 1; if (preg_match ('/0([1-9][0-9]*)/', $nom_fichier, $match)) { $nom_fichier = $match[1]; $prefixe = '0' ; } else { $prefixe = '' ; } $prefixe = $this->prefixe_nom_message($nom_fichier); //echo $numero_message; // on cherche la ligne avec le numero du message while (!feof($fichier_index)) { $temp = fgets($fichier_index,4096); list($num, $hash, $sujet) = split (':', $temp) ; if ($num == $numero_message) { $ligne_message_precedent = $compteur_ligne -2; $temp = fgets($fichier_index, 4096); $temp = fgets($fichier_index, 4096); list ($fichier_suivant,$hash, $sujet) = split(':', $temp); // Au cas ou est au dernier message du fichier d index // il faut ouvrir le suivant if (feof($fichier_index)) { $repertoire_suivant++; if (file_exists($this->listdir.'/archive/'.$repertoire_suivant.'/index')) { $fichier_index_suivant = fopen($this->listdir.'/archive/'.$repertoire_suivant.'/index', 'r'); // on recupere le numero du premier message list($fichier_suivant, $hash, $sujet) = split (':', fgets($fichier_index_suivant), 4096); fclose ($fichier_index_suivant); } } // Si le numero est > 100, il faut decouper et ne retenir // que les dizaines et unites if ($fichier_suivant >= 100) { $decimal = (string) $fichier_suivant; $numero = substr($decimal, -2) ; $fichier_suivant = $numero ; } else { if ($fichier_suivant <= 9)$fichier_suivant = '0'.$fichier_suivant; } break; } // On avance d une ligne, la 2e ligne contient date hash auteur $temp2 = fgets($fichier_index, 4096); $compteur_ligne += 2; } // On utilise $ligne_message_precedent pour recupere le num du message precedent // Si $ligne_precedent est negatif soit c le premier message de la liste // soit il faut ouvrir le repertoire precedent if ($ligne_message_precedent > 0) { $compteur = 1; rewind($fichier_index); while (!feof($fichier_index)) { $temp = fgets($fichier_index, 4096); if ($ligne_message_precedent == $compteur) { list ($fichier_precedent, $hash, $sujet) = split (':', $temp) ; } $compteur++; } // Le nom du repertoire precedent est le meme que le repertoire courant $repertoire_precedent = $nom_repertoire ; // Si $ligne_message_precedent est negatif, alors il faut ouvrir // le fichier index du repertoire precedent // si le nom du repertoire est 0, alors il n y a pas de repertoire precedent // et donc pas de message precedent } else { if ($nom_repertoire != '0') { $repertoire_precedent = $nom_repertoire -1 ; // on ouvre le fichier d index et on extraie le numero // du dernier message $fichier_index_precedent = fopen ($this->listdir.'/archive/'.$repertoire_precedent.'/index', 'r') ; while (!feof($fichier_index_precedent)) { $temp = fgets($fichier_index_precedent,4096); $ligne = split (':', $temp) ; if ($ligne[0] != '') $fichier_precedent = $ligne[0]; $temp = fgets($fichier_index_precedent,4096); } fclose ($fichier_index_precedent); // on se situe dans le repertoire 0 donc pas de message precedent } else { $fichier_precedent = null; $repertoire_precedent = null; } } if ($fichier_precedent > 100) { $decimal = (string) $fichier_precedent; $numero = substr($decimal, -2) ; $fichier_precedent = $numero ; } else { if ($fichier_precedent < 10 )$fichier_precedent = '0'.$fichier_precedent; } fclose ($fichier_index); //if ($fichier_precedent != null && $fichier_precedent < 10) $fichier_precedent = '0'.$fichier_precedent; return array ('fichier_suivant' => $fichier_suivant, 'repertoire_suivant' => $repertoire_suivant, 'fichier_precedent' => $fichier_precedent, 'repertoire_precedent' => $repertoire_precedent); } /** * analyse l'entete d'un mail pour en extraire les ent�tes * to, from, subject, date * met � jour la variable $this->msgtmpl * */ function parse_entete_mail (&$mailDecode) { $startpos = strpos(strtolower($this->msgtmpl_entete), ''); $endpos = strpos(strtolower($this->msgtmpl_entete), ''); $headers = substr($this->msgtmpl_entete,$startpos + 15,($endpos - $startpos - 15)); $headers_replace = '' ; for ($i = 0; $i < count($this->showheaders); $i++) { $val = $this->showheaders[$i]; $headers_replace .= $headers; $hnpos = strpos(strtolower($headers_replace), ''); $headers_replace = substr_replace($headers_replace, $this->header_en_francais[$val], $hnpos, 19); $hvpos = strpos(strtolower($headers_replace), 'decode_iso ($headers_replace) ; switch ($val) { case 'date': $headers_replace = substr_replace($headers_replace, $this->date_francaise($mailDecode->headers[strtolower($val)]), $hvpos, 20); break; case 'from': if ($mailDecode->headers[strtolower($val)] == '') $from = $mailDecode->headers['return-path'] ; else $from = $mailDecode->headers['from']; $headers_replace = substr_replace($headers_replace, $this->protect_email($this->decode_iso($from)), $hvpos, 20); //$headers_replace = htmlspecialchars($headers_replace); break; default: $headers_replace = substr_replace($headers_replace, $this->protect_email($this->decode_iso($mailDecode->headers[strtolower($val)])), $hvpos, 20); } } return substr_replace($this->msgtmpl_entete, $headers_replace, $startpos, (($endpos + 16) - $startpos)); } function parse_template(&$mailDecode, $numero_mail, $numero_mois, $num_part = '') { static $profondeur = array(); if ($num_part != '') array_push ($profondeur, $num_part) ; $corps = '' ; if ($mailDecode->ctype_primary == 'multipart') { include_once PROJET_CHEMIN_CLASSES.'type_fichier_mime.class.php' ; for ($i = 0; $i < count($mailDecode->parts); $i++) { switch ($mailDecode->parts[$i]->ctype_secondary) { case 'plain' : if ($mailDecode->parts[$i]->headers['content-transfer-encoding'] == '8bit') { $corps .= $this->_cte_8bit($mailDecode->parts[$i]->body); } else if ($mailDecode->parts[$i]->headers['content-transfer-encoding'] == 'quoted-printable') { if ($mailDecode->parts[$i]->ctype_parameters['charset'] == 'UTF-8') { $corps .= utf8_decode($mailDecode->parts[$i]->body); } else { // Si un multipart/related, qu'on ne sait pas decoder, contient une partie plain // qui n'est pas en UTF-8, faut bien la recuperer... cela dit, comprend pas comment // ça marche dans les autres cas, hors UTF-8 $corps .= $mailDecode->parts[$i]->body; } } break; case 'related': // patch pourri : comme "multipart/related" n'est pas gere, on ignore la partie // (se produit apparemment lorsqu'une signature avec image est envoyee, par Thunderbird // sous Windows en tout cas) break; case 'html' : $corps .= trim(strip_tags ($mailDecode->parts[$i]->body, '