Subversion Repositories Applications.papyrus

Rev

Rev 1229 | Go to most recent revision | Show entire file | Regard 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 85... Line 85...
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);
Line 92... Line -...
92
- 
 
93 
	if ($a2 <= 10) $numero_precedent = '0'.($a2 - 1) ; else $numero_precedent = ($a2 - 1) ;
 - 
 
94 
        if ($a2 < 9) $numero_suivant = '0'.($a2 + 1) ; else $numero_suivant =  ($a2 + 1);
 - 
 
95 
        // On teste si le message suivant existe
 92
Line 96... Line 93...
96 
        $decoupe = explode ('/', $this->msgfile) ;
 93 
		$repertoire_suivant = $nom_repertoire;
97
94
98 
        // Les nom de fichiers sont du format :
 95 
		// a partir du nom du fichier
- 
 
 96 
		// et du nom du repertoire, on reconstitue
Line 99... Line -...
99 
        // archive/0/01
 - 
 
100 
        // archive/0/02 ... 0/99 archive/1/01 ...
 - 
 
101
- 
 
102 
        $nom_fichier = $decoupe[count($decoupe)-1] ;
 97 
		// le numero du message stocke dans le fichier d index
103 
        $nom_repertoire = $decoupe[count($decoupe)-2] ;
 98 
		// le message 12 du repertoire 2 a le numero 112
104 
        $repertoire_suivant = $nom_repertoire ; $repertoire_precedent = $nom_repertoire ;
 99
105 
        if ($nom_fichier > 8) {
 - 
 
106 
            $fichier_suivant = $nom_fichier + 1 ;
 100 
		if ($nom_repertoire == '0') {
107 
            if ($nom_fichier == 99) {
 101 
			$numero_message = $nom_fichier;
- 
 
 102 
		} else {
- 
 
 103 
			$numero_message = $nom_repertoire.$nom_fichier ;
- 
 
 104 
		}
- 
 
 105
- 
 
 106 
		// On ouvre le fichier d index
- 
 
 107 
		$fichier_index = fopen ($this->listdir.'/archive/'.$nom_repertoire.'/index', 'r');
- 
 
 108
- 
 
 109
- 
 
 110 
		$compteur_ligne = 1;
108 
                $fichier_suivant = '01' ;
 111 
		if (preg_match ('/0([1-9][0-9]*)/', $nom_fichier, $match)) {
109 
                $repertoire_suivant = $nom_repertoire + 1 ;
 112 
			$nom_fichier = $match[1];
110 
            }
 113 
			$prefixe = '0' ;
- 
 
 114 
		} else {
- 
 
 115 
			$prefixe = '' ;
- 
 
 116 
		}
- 
 
 117 
		$prefixe = $this->prefixe_nom_message($nom_fichier);
- 
 
 118 
		//echo $numero_message;
- 
 
 119 
		// on cherche la ligne avec le numero du message
- 
 
 120 
		while (!feof($fichier_index)) {
- 
 
 121
- 
 
 122 
				$temp = fgets($fichier_index,4096);
- 
 
 123 
				list($num, $hash, $sujet) = split (':', $temp) ;
- 
 
 124
- 
 
 125 
				if ($num == $numero_message) {
- 
 
 126
- 
 
 127 
					$ligne_message_precedent = $compteur_ligne -2;
- 
 
 128 
					$temp = fgets($fichier_index, 4096);
- 
 
 129 
					$temp = fgets($fichier_index, 4096);
- 
 
 130 
					list ($fichier_suivant,$hash, $sujet) = split(':', $temp);
111 
        } else {
 131
- 
 
 132 
					// Au cas ou est au dernier message du fichier d index
- 
 
 133 
					// il faut ouvrir le suivant
- 
 
 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);
- 
 
 140 
							fclose ($fichier_index_suivant);
- 
 
 141 
						}
- 
 
 142 
					}
- 
 
 143
- 
 
 144 
					// Si le numero est > 100, il faut decouper et ne retenir
- 
 
 145 
					// que les dizaines et unites
112 
            $fichier_suivant = '0'.($nom_fichier + 1) ;
 146 
					if ($fichier_suivant >= 100) {
113 
        }
 147 
						$decimal = (string) $fichier_suivant;
- 
 
 148 
						$numero = substr($decimal, -2) ;
- 
 
 149 
						$fichier_suivant = $numero ;
- 
 
 150 
					} else {
- 
 
 151 
						if ($fichier_suivant < 9)$fichier_suivant = '0'.$fichier_suivant;
- 
 
 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
114 
        if ($nom_fichier > 10) {
 166 
		if ($ligne_message_precedent > 0) {
115 
            $fichier_precedent = $nom_fichier - 1 ;
 167 
			$compteur = 1;
- 
 
 168 
			rewind($fichier_index);
- 
 
 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
- 
 
 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
- 
 
 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) ;
- 
 
 193 
					if ($ligne[0] != '') $fichier_precedent = $ligne[0];
- 
 
 194 
					$temp = fgets($fichier_index_precedent,4096);
- 
 
 195 
				}
117 
            if ($nom_fichier == '01') {
 196
118 
                $fichier_precedent = '99' ;
 197 
				fclose ($fichier_index_precedent);
- 
 
 198 
			// on se situe dans le repertoire 0 donc pas de message precedent
119 
                $repertoire_precedent = $nom_repertoire - 1 ;
 199 
			} else {
120 
            } else {
 200 
				$fichier_precedent = null;
121 
                $fichier_precedent = '0'.($nom_fichier - 1) ;
 201 
				$repertoire_precedent = null;
122 
            }
 202 
			}
- 
 
 203 
		}
123 
	}
 204 
		if ($fichier_precedent > 100) {
- 
 
 205 
			$decimal = (string) $fichier_precedent;
- 
 
 206 
			$numero = substr($decimal, -2) ;
124 
	// On vérifie que le message suivant existe bien
 207 
			$fichier_precedent = $numero ;
- 
 
 208 
		} else {
- 
 
 209 
			if ($fichier_precedent < 10 )$fichier_precedent = '0'.$fichier_precedent;
- 
 
 210 
		}
125 
	if (!file_exists($this->listdir.'/archive/'.$repertoire_suivant.'/'.$fichier_suivant)) {
 211 
		fclose ($fichier_index);
126 
	    $fichier_suivant = null ;
 212 
		//if ($fichier_precedent != null && $fichier_precedent < 10) $fichier_precedent = '0'.$fichier_precedent;
127 
	}
 213
128 
	return array ('fichier_suivant' => $fichier_suivant,
 214 
		return array ('fichier_suivant' => $fichier_suivant,
129 
		      'repertoire_suivant' => $repertoire_suivant,
 215 
			      'repertoire_suivant' => $repertoire_suivant,
Line 148... Line 234...
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');
152 
            $headers_replace = $this->decode_iso ($headers_replace) ;
 238 
            $headers_replace = $this->decode_iso ($headers_replace) ;
- 
 
 239 
            switch ($val) {
153 
            if ($val == 'date') {
 240 
            	case 'date':
154 
                $headers_replace = substr_replace($headers_replace, $this->date_francaise($mailDecode->headers[strtolower($val)]), $hvpos, 20);
 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);
- 
 
 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));
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' :