Subversion Repositories Applications.papyrus

Rev

Rev 1229 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1229 Rev 1253
Line 1... Line 1...
1 
<?php
 1 
<?php
2 
// $Id: ezmlm-msgdisplay.php,v 1.3.2.1 2007-02-16 13:38:35 alexandre_tb Exp $
 2 
// $Id: ezmlm-msgdisplay.php,v 1.3.2.2 2007-03-12 11:21:31 alexandre_tb Exp $
3 
//
 3 
//
4 
// ezmlm-msgdisplay.php - ezmlm-php v2.0
 4 
// ezmlm-msgdisplay.php - ezmlm-php v2.0
5 
// --------------------------------------------------------------
 5 
// --------------------------------------------------------------
6 
// Will parse a template (if specified) and display a message.
 6 
// Will parse a template (if specified) and display a message.
7 
// Includes a default template.
 7 
// Includes a default template.
Line 84... Line 84...
84 
     * Renvoie les infos des messages suivants
 84 
     * Renvoie les infos des messages suivants
85 
     *
85 
     *
86 
     *
 86 
     *
87 
    */
 87 
    */
88 
    function getInfoSuivant() {
 88 
    function getInfoSuivant() {
89 
	$relfile = preg_replace('!' . $this->listdir . '!', '', $this->msgfile);
 89 
		$relfile = preg_replace('!' . $this->listdir . '!', '', $this->msgfile);
90 
 	$a1 = preg_replace('!/archive/(.*)/.*$!', '\1', $relfile);  // $a1 contient le nom du répertoire
 90 
	 	$nom_repertoire = preg_replace('!/archive/(.*)/.*$!', '\1', $relfile);
91 
	$a2 = preg_replace('!/archive/.*/(.*)$!', '\1', $relfile);  // $a2 contient le nom du fichier
 91 
		$nom_fichier = preg_replace('!/archive/.*/(.*)$!', '\1', $relfile);
- 
 
 92
- 
 
 93 
		$repertoire_suivant = $nom_repertoire;
92
94
- 
 
 95 
		// a partir du nom du fichier
- 
 
 96 
		// et du nom du repertoire, on reconstitue
93 
	if ($a2 <= 10) $numero_precedent = '0'.($a2 - 1) ; else $numero_precedent = ($a2 - 1) ;
 97 
		// le numero du message stocke dans le fichier d index
94 
        if ($a2 < 9) $numero_suivant = '0'.($a2 + 1) ; else $numero_suivant =  ($a2 + 1);
 98 
		// le message 12 du repertoire 2 a le numero 112
- 
 
 99
- 
 
 100 
		if ($nom_repertoire == '0') {
95 
        // On teste si le message suivant existe
 101 
			$numero_message = $nom_fichier;
- 
 
 102 
		} else {
96 
        $decoupe = explode ('/', $this->msgfile) ;
 103 
			$numero_message = $nom_repertoire.$nom_fichier ;
- 
 
 104 
		}
97
105
98 
        // Les nom de fichiers sont du format :
 106 
		// On ouvre le fichier d index
- 
 
 107 
		$fichier_index = fopen ($this->listdir.'/archive/'.$nom_repertoire.'/index', 'r');
- 
 
 108
- 
 
 109
99 
        // archive/0/01
 110 
		$compteur_ligne = 1;
- 
 
 111 
		if (preg_match ('/0([1-9][0-9]*)/', $nom_fichier, $match)) {
- 
 
 112 
			$nom_fichier = $match[1];
- 
 
 113 
			$prefixe = '0' ;
- 
 
 114 
		} else {
- 
 
 115 
			$prefixe = '' ;
- 
 
 116 
		}
- 
 
 117 
		$prefixe = $this->prefixe_nom_message($nom_fichier);
- 
 
 118 
		//echo $numero_message;
100 
        // archive/0/02 ... 0/99 archive/1/01 ...
 119 
		// on cherche la ligne avec le numero du message
- 
 
 120 
		while (!feof($fichier_index)) {
101
121
- 
 
 122 
				$temp = fgets($fichier_index,4096);
102 
        $nom_fichier = $decoupe[count($decoupe)-1] ;
 123 
				list($num, $hash, $sujet) = split (':', $temp) ;
- 
 
 124
- 
 
 125 
				if ($num == $numero_message) {
- 
 
 126
103 
        $nom_repertoire = $decoupe[count($decoupe)-2] ;
 127 
					$ligne_message_precedent = $compteur_ligne -2;
- 
 
 128 
					$temp = fgets($fichier_index, 4096);
- 
 
 129 
					$temp = fgets($fichier_index, 4096);
104 
        $repertoire_suivant = $nom_repertoire ; $repertoire_precedent = $nom_repertoire ;
 130 
					list ($fichier_suivant,$hash, $sujet) = split(':', $temp);
- 
 
 131
- 
 
 132 
					// Au cas ou est au dernier message du fichier d index
- 
 
 133 
					// il faut ouvrir le suivant
105 
        if ($nom_fichier > 8) {
 134 
					if (feof($fichier_index)) {
- 
 
 135 
						$repertoire_suivant++;
- 
 
 136 
						if (file_exists($this->listdir.'/archive/'.$repertoire_suivant.'/index')) {
- 
 
 137 
							$fichier_index_suivant = fopen($this->listdir.'/archive/'.$repertoire_suivant.'/index', 'r');
- 
 
 138 
							// on recupere le numero du premier message
- 
 
 139 
							list($fichier_suivant, $hash, $sujet) = split (':', fgets($fichier_index_suivant), 4096);
106 
            $fichier_suivant = $nom_fichier + 1 ;
 140 
							fclose ($fichier_index_suivant);
- 
 
 141 
						}
- 
 
 142 
					}
- 
 
 143
- 
 
 144 
					// Si le numero est > 100, il faut decouper et ne retenir
107 
            if ($nom_fichier == 99) {
 145 
					// que les dizaines et unites
108 
                $fichier_suivant = '01' ;
 146 
					if ($fichier_suivant >= 100) {
109 
                $repertoire_suivant = $nom_repertoire + 1 ;
 147 
						$decimal = (string) $fichier_suivant;
- 
 
 148 
						$numero = substr($decimal, -2) ;
110 
            }
 149 
						$fichier_suivant = $numero ;
111 
        } else {
 150 
					} else {
112 
            $fichier_suivant = '0'.($nom_fichier + 1) ;
 151 
						if ($fichier_suivant < 9)$fichier_suivant = '0'.$fichier_suivant;
113 
        }
 152 
					}
- 
 
 153
- 
 
 154 
					break;
- 
 
 155 
				}
- 
 
 156
- 
 
 157 
				// On avance d une ligne, la 2e ligne contient date hash auteur
- 
 
 158 
				$temp2 = fgets($fichier_index, 4096);
- 
 
 159 
				$compteur_ligne += 2;
- 
 
 160 
		}
- 
 
 161
- 
 
 162 
		// On utilise $ligne_message_precedent pour recupere le num du message precedent
- 
 
 163 
		// Si $ligne_precedent est negatif soit c le premier message de la liste
- 
 
 164 
		// soit il faut ouvrir le repertoire precedent
- 
 
 165
- 
 
 166 
		if ($ligne_message_precedent > 0) {
- 
 
 167 
			$compteur = 1;
- 
 
 168 
			rewind($fichier_index);
114 
        if ($nom_fichier > 10) {
 169 
			while (!feof($fichier_index)) {
- 
 
 170 
				$temp = fgets($fichier_index, 4096);
- 
 
 171 
				if ($ligne_message_precedent == $compteur) {
- 
 
 172 
					list ($fichier_precedent, $hash, $sujet) = split (':', $temp) ;
- 
 
 173 
				}
- 
 
 174 
				$compteur++;
- 
 
 175 
			}
- 
 
 176 
			// Le nom du repertoire precedent est le meme que le repertoire courant
115 
            $fichier_precedent = $nom_fichier - 1 ;
 177 
			$repertoire_precedent = $nom_repertoire ;
- 
 
 178 
		// Si $ligne_message_precedent est negatif, alors il faut ouvrir
- 
 
 179 
		// le fichier index du repertoire precedent
- 
 
 180 
		// si le nom du repertoire est 0, alors il n y a pas de repertoire precedent
- 
 
 181 
		// et donc pas de message precedent
116 
        } else {
 182 
		} else {
- 
 
 183
117 
            if ($nom_fichier == '01') {
 184 
			if ($nom_repertoire != '0') {
- 
 
 185 
				$repertoire_precedent = $nom_repertoire -1 ;
- 
 
 186 
				// on ouvre le fichier d index et on extraie le numero
- 
 
 187 
				// du dernier message
- 
 
 188
- 
 
 189 
				$fichier_index_precedent = fopen ($this->listdir.'/archive/'.$repertoire_precedent.'/index', 'r') ;
- 
 
 190 
				while (!feof($fichier_index_precedent)) {
- 
 
 191 
					$temp = fgets($fichier_index_precedent,4096);
- 
 
 192 
					$ligne = split (':', $temp) ;
118 
                $fichier_precedent = '99' ;
 193 
					if ($ligne[0] != '') $fichier_precedent = $ligne[0];
- 
 
 194 
					$temp = fgets($fichier_index_precedent,4096);
- 
 
 195 
				}
- 
 
 196
- 
 
 197 
				fclose ($fichier_index_precedent);
119 
                $repertoire_precedent = $nom_repertoire - 1 ;
 198 
			// on se situe dans le repertoire 0 donc pas de message precedent
120 
            } else {
 199 
			} else {
- 
 
 200 
				$fichier_precedent = null;
- 
 
 201 
				$repertoire_precedent = null;
- 
 
 202 
			}
- 
 
 203 
		}
- 
 
 204 
		if ($fichier_precedent > 100) {
- 
 
 205 
			$decimal = (string) $fichier_precedent;
- 
 
 206 
			$numero = substr($decimal, -2) ;
121 
                $fichier_precedent = '0'.($nom_fichier - 1) ;
 207 
			$fichier_precedent = $numero ;
122 
            }
 208 
		} else {
- 
 
 209 
			if ($fichier_precedent < 10 )$fichier_precedent = '0'.$fichier_precedent;
123 
	}
 210 
		}
- 
 
 211 
		fclose ($fichier_index);
- 
 
 212 
		//if ($fichier_precedent != null && $fichier_precedent < 10) $fichier_precedent = '0'.$fichier_precedent;
- 
 
 213
124 
	// On vérifie que le message suivant existe bien
 214 
		return array ('fichier_suivant' => $fichier_suivant,
125 
	if (!file_exists($this->listdir.'/archive/'.$repertoire_suivant.'/'.$fichier_suivant)) {
 215 
			      'repertoire_suivant' => $repertoire_suivant,
126 
	    $fichier_suivant = null ;
 216 
			      'fichier_precedent' => $fichier_precedent,
- 
 
 217 
			      'repertoire_precedent' => $repertoire_precedent);
127 
	}
 218 
	}
128 
	return array ('fichier_suivant' => $fichier_suivant,
 - 
 
129 
		      'repertoire_suivant' => $repertoire_suivant,
 - 
 
130 
		      'fichier_precedent' => $fichier_precedent,
 - 
 
131 
		      'repertoire_precedent' => $repertoire_precedent);
 - 
 
132 
    }
 - 
 
Line 133... Line 219...
133
219
134 
    /**
 220 
    /**
135 
    *   analyse l'entete d'un mail pour en extraire les entêtes
 221 
    *   analyse l'entete d'un mail pour en extraire les entêtes
136 
    *   to, from, subject, date
 222 
    *   to, from, subject, date
Line 139... Line 225...
139 
    */
 225 
    */
Line 140... Line 226...
140
226
141 
    function parse_entete_mail (&$mailDecode) {
 227 
    function parse_entete_mail (&$mailDecode) {
142 
        $startpos = strpos(strtolower($this->msgtmpl_entete), '<ezmlm-headers>');
 228 
        $startpos = strpos(strtolower($this->msgtmpl_entete), '<ezmlm-headers>');
143 
        $endpos = strpos(strtolower($this->msgtmpl_entete), '</ezmlm-headers>');
 229 
        $endpos = strpos(strtolower($this->msgtmpl_entete), '</ezmlm-headers>');
144 
	$headers = substr($this->msgtmpl_entete,$startpos + 15,($endpos - $startpos - 15));
 230 
		$headers = substr($this->msgtmpl_entete,$startpos + 15,($endpos - $startpos - 15));
145 
        $headers_replace = '' ;
 231 
        $headers_replace = '' ;
146 
	for ($i = 0; $i < count($this->showheaders); $i++) {
 232 
		for ($i = 0; $i < count($this->showheaders); $i++) {
147 
	    $val = $this->showheaders[$i];
 233 
		    $val = $this->showheaders[$i];
148 
	    $headers_replace .= $headers;
 234 
		    $headers_replace .= $headers;
149 
	    $hnpos = strpos(strtolower($headers_replace), '<ezmlm-header-name>');
 235 
		    $hnpos = strpos(strtolower($headers_replace), '<ezmlm-header-name>');
150 
	    $headers_replace = substr_replace($headers_replace, $this->header_en_francais[$val], $hnpos, 19);
 236 
		    $headers_replace = substr_replace($headers_replace, $this->header_en_francais[$val], $hnpos, 19);
151 
	    $hvpos = strpos(strtolower($headers_replace), '<ezmlm-header-value');
 237 
		    $hvpos = strpos(strtolower($headers_replace), '<ezmlm-header-value');
- 
 
 238 
            $headers_replace = $this->decode_iso ($headers_replace) ;
152 
            $headers_replace = $this->decode_iso ($headers_replace) ;
 239 
            switch ($val) {
153 
            if ($val == 'date') {
 240 
            	case 'date':
- 
 
 241 
            	$headers_replace = substr_replace($headers_replace, $this->date_francaise($mailDecode->headers[strtolower($val)]), $hvpos, 20);
- 
 
 242 
            	break;
- 
 
 243 
            	case 'from':
- 
 
 244 
            	if ($mailDecode->headers[strtolower($val)] == '') $from = $mailDecode->headers['return-path'] ;
- 
 
 245 
            		else $from = $mailDecode->headers['from'];
- 
 
 246 
            	$headers_replace = substr_replace($headers_replace, $this->protect_email($this->decode_iso($from)), $hvpos, 20);
- 
 
 247 
            	//$headers_replace = htmlspecialchars($headers_replace);
154 
                $headers_replace = substr_replace($headers_replace, $this->date_francaise($mailDecode->headers[strtolower($val)]), $hvpos, 20);
 248 
            	break;
155 
            } else {
 249 
            	default:
156 
                $headers_replace = substr_replace($headers_replace, $this->protect_email($this->decode_iso($mailDecode->headers[strtolower($val)])), $hvpos, 20);
 250 
            	$headers_replace = substr_replace($headers_replace, $this->protect_email($this->decode_iso($mailDecode->headers[strtolower($val)])), $hvpos, 20);
157 
            }
 251 
            }
158 
	}
 252 
		}
159 
        return substr_replace($this->msgtmpl_entete, $headers_replace, $startpos, (($endpos + 16) - $startpos));
 253 
        return substr_replace($this->msgtmpl_entete, $headers_replace, $startpos, (($endpos + 16) - $startpos));
Line 160... Line 254...
160 
    }
 254 
    }
Line 168... Line 262...
168 
		if ($mailDecode->ctype_primary == 'multipart') {
 262 
		if ($mailDecode->ctype_primary == 'multipart') {
169 
            include_once PROJET_CHEMIN_CLASSES.'type_fichier_mime.class.php' ;
 263 
            include_once PROJET_CHEMIN_CLASSES.'type_fichier_mime.class.php' ;
170 
			for ($i = 0; $i < count($mailDecode->parts); $i++) {
 264 
			for ($i = 0; $i < count($mailDecode->parts); $i++) {
171 
                switch ($mailDecode->parts[$i]->ctype_secondary) {
 265 
                switch ($mailDecode->parts[$i]->ctype_secondary) {
172 
                    case 'plain' :
266 
                    case 'plain' :
- 
 
 267 
                    if ($mailDecode->parts[$i]->headers['content-transfer-encoding'] == '8bit') {
- 
 
 268 
                    	$corps .= $this->_cte_8bit($mailDecode->parts[$i]->body);
- 
 
 269 
                    }
- 
 
 270 
                    break;
173 
                    case 'html' : $corps .= $mailDecode->parts[$i]->body ;
 271 
                    case 'html' : $corps .= $mailDecode->parts[$i]->body ;
174 
                    break ;
 272 
                    break ;
175 
                    case 'mixed' :
273 
                    case 'mixed' :
176 
                    case 'rfc822' :
 274 
                    case 'rfc822' :
177 
                    case 'alternative' :
 275 
                    case 'alternative' :