Subversion Repositories Applications.projet

Rev

Rev 169 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 169 Rev 172
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' :