WebSVN – Applications.projet – Diff – /trunk/classes/ezmlm-php-2.0/ezmlm-author.php


<?php
// $Id: ezmlm-author.php,v 1.3 2007-04-19 15:34:35 neiluj Exp $
//
// ezmlm-author.php - ezmlm-php v2.0
// --------------------------------------------------------------
// Displays all messages by a given author
// --------------------------------------------------------------
 
require_once("ezmlm.php");
 
class ezmlm_author extends ezmlm_php {
	function display($authorhash) {
		$file = "/archive/authors/" . substr($authorhash,0,2) . "/" . substr($authorhash,2,18);
        //echo $file ;
		if (!is_file($this->listdir . $file)) { $this->error(EZMLM_INVALID_AUTHOR); return; }
        // Le fichier author comprend
        // première ligne hash_auteur nom_auteur
        // num_mess:annéemois:hash_sujet sujet
		$fd = @fopen($this->listdir . $file, "r");
        $i = 0 ;
        $class = array ('ligne_impaire', 'ligne_paire') ;
		while (!feof($fd)) {
			$buf = fgets($fd,4096);
			if (preg_match('/^' . $authorhash . '/', $buf)) {
				// this should ALWAYS be the first line in the file
				$author = preg_replace('/^' . $authorhash . ' /', '', $buf);
                print '<h3>'.$author.'</h3>' ;
				print '<table class="table_cadre">'."\n";
                print '<tr><th class="col1">De</th><th>Sujet</th><th>Date</th></tr>'."\n";
				$tableopened = TRUE;
			} else if (preg_match('/^[0-9]*:[0-9]/',$buf)) {
				// si la ligne est valide
 
                // on récupère le numéro du message pour en extraire le nom du fichier
				$msgfile = preg_replace('/^([0-9]*):.*/', '\1', $buf);
				$msgdir  = (int)((int)$msgfile / 100);
				$msgfile = (int)$msgfile % 100;
 
				if ($msgfile < 10) { $msgfile = "0" . $msgfile; }
 
				if (!is_file($this->listdir . "/archive/" . $msgdir . "/" . $msgfile)) {
					print "<!-- " . $this->listdir . "/archive/" . $msgdir . "/" . $msgfile . " -->\n";
					$this->error(EZMLM_INCONSISTANCY);	
					fclose($fd);
					return;
				}
 
				//$msg = new ezmlm_parser();
				//$msg->parse_file_headers($this->listdir . "/archive/" . $msgdir . "/" . $msgfile);
                
                $message = file_get_contents($this->listdir . "/archive/" . $msgdir . "/" . $msgfile) ;
                $mimeDecode = new Mail_mimeDecode($message) ;
                $mailDecode = $mimeDecode->decode() ;
                
				$subject = $mailDecode->headers['subject'];	
				$subject = preg_replace("/\[" . $this->listname . "\]/", "", $subject);
                $date = preg_replace ('/CEST/', '', $mailDecode->headers['date']);	
				print '<tr class="'.$class[$i].'">'."\n";
 
                if ($mailDecode->headers['from'] == '') $from = $mailDecode->headers['return-path'] ; else $from = $mailDecode->headers['from'];
                $hash = $this->makehash($from);
                print '<td>'.$this->makelink("action=show_author_msgs&actionargs[]=" . $hash,$this->decode_iso($this->protect_email($from,false)));
                print '</td>';
 
                print "<td><b>" . $this->makelink("action=show_msg&actionargs[]=" . $msgdir . "&actionargs[]=" . $msgfile, $this->decode_iso($subject)) . "</b></td>";
 
 
 
 
				print "<td>" . $this->date_francaise($mailDecode->headers['date']) . "</td>\n";
				print "</tr>\n";
                $i++;
                if ($i == 2) $i = 0 ;
                unset ($mailDecode) ;
			}
		}
		if ($tableopened) { print "</table>\n"; }
	}
}

Subversion Repositories Applications.projet

(root)/trunk/classes/ezmlm-php-2.0/ezmlm-author.php – Rev 11 → 208

Rev 11		Rev 208
1	`<?php`	1	`<?php`
2	`// $Id: ezmlm-author.php,v 1.2 2005-09-27 16:43:08 alexandre_tb Exp $`	2	`// $Id: ezmlm-author.php,v 1.3 2007-04-19 15:34:35 neiluj Exp $`
3	`//`	3	`//`
4	`// ezmlm-author.php - ezmlm-php v2.0`	4	`// ezmlm-author.php - ezmlm-php v2.0`
5	`// --------------------------------------------------------------`	5	`// --------------------------------------------------------------`
6	`// Displays all messages by a given author`	6	`// Displays all messages by a given author`
7	`// --------------------------------------------------------------`	7	`// --------------------------------------------------------------`
8		8
9	`require_once("ezmlm.php");`	9	`require_once("ezmlm.php");`
10		10
11	`class ezmlm_author extends ezmlm_php {`	11	`class ezmlm_author extends ezmlm_php {`
12	`function display($authorhash) {`	12	`function display($authorhash) {`
13	`$file = "/archive/authors/" . substr($authorhash,0,2) . "/" . substr($authorhash,2,18);`	13	`$file = "/archive/authors/" . substr($authorhash,0,2) . "/" . substr($authorhash,2,18);`
14	`//echo $file ;`	14	`//echo $file ;`
15	`if (!is_file($this->listdir . $file)) { $this->error(EZMLM_INVALID_AUTHOR); return; }`	15	`if (!is_file($this->listdir . $file)) { $this->error(EZMLM_INVALID_AUTHOR); return; }`
16	`// Le fichier author comprend`	16	`// Le fichier author comprend`
17	`// Première ligne hash_auteur nom_auteur`	17	`// première ligne hash_auteur nom_auteur`
18	`// num_mess:annéemois:hash_sujet sujet`	18	`// num_mess:annéemois:hash_sujet sujet`
19	`$fd = @fopen($this->listdir . $file, "r");`	19	`$fd = @fopen($this->listdir . $file, "r");`
20	`$i = 0 ;`	20	`$i = 0 ;`
21	`$class = array ('ligne_impaire', 'ligne_paire') ;`	21	`$class = array ('ligne_impaire', 'ligne_paire') ;`
22	`while (!feof($fd)) {`	22	`while (!feof($fd)) {`
23	`$buf = fgets($fd,4096);`	23	`$buf = fgets($fd,4096);`
24	`if (preg_match('/^' . $authorhash . '/', $buf)) {`	24	`if (preg_match('/^' . $authorhash . '/', $buf)) {`
25	`// this should ALWAYS be the first line in the file`	25	`// this should ALWAYS be the first line in the file`
26	`$author = preg_replace('/^' . $authorhash . ' /', '', $buf);`	26	`$author = preg_replace('/^' . $authorhash . ' /', '', $buf);`
27	`print '<h3>'.PROJET_MESSAGES_DE.$author.'</h3>' ;`	27	`print '<h3>'.$author.'</h3>' ;`
28	`print '<table class="table_cadre">'."\n";`	28	`print '<table class="table_cadre">'."\n";`
29	`print '<tr><th class="col1">De</th><th>Sujet</th><th>Date</th></tr>'."\n";`	29	`print '<tr><th class="col1">De</th><th>Sujet</th><th>Date</th></tr>'."\n";`
30	`$tableopened = TRUE;`	30	`$tableopened = TRUE;`
31	`} else if (preg_match('/^[0-9]*:[0-9]/',$buf)) {`	31	`} else if (preg_match('/^[0-9]*:[0-9]/',$buf)) {`
32	`// this is a valid message line`	32	`// si la ligne est valide`
33	`// all we need is the first item`	-
34	`// on récupère le numéro du message pour en extraire le nom du fichier`	33	`// on récupère le numéro du message pour en extraire le nom du fichier`
35	`$msgfile = preg_replace('/^([0-9]):./', '\1', $buf);`	34	`$msgfile = preg_replace('/^([0-9]):./', '\1', $buf);`
36	`$msgdir = (int)((int)$msgfile / 100);`	35	`$msgdir = (int)((int)$msgfile / 100);`
37	`$msgfile = (int)$msgfile % 100;`	36	`$msgfile = (int)$msgfile % 100;`
38		37
39	`if ($msgfile < 10) { $msgfile = "0" . $msgfile; }`	38	`if ($msgfile < 10) { $msgfile = "0" . $msgfile; }`
40		39
41	`if (!is_file($this->listdir . "/archive/" . $msgdir . "/" . $msgfile)) {`	40	`if (!is_file($this->listdir . "/archive/" . $msgdir . "/" . $msgfile)) {`
42	`print "<!-- " . $this->listdir . "/archive/" . $msgdir . "/" . $msgfile . " -->\n";`	41	`print "<!-- " . $this->listdir . "/archive/" . $msgdir . "/" . $msgfile . " -->\n";`
43	`$this->error(EZMLM_INCONSISTANCY);`	42	`$this->error(EZMLM_INCONSISTANCY);`
44	`fclose($fd);`	43	`fclose($fd);`
45	`return;`	44	`return;`
46	`}`	45	`}`
47		46
48	`//$msg = new ezmlm_parser();`	47	`//$msg = new ezmlm_parser();`
49	`//$msg->parse_file_headers($this->listdir . "/archive/" . $msgdir . "/" . $msgfile);`	48	`//$msg->parse_file_headers($this->listdir . "/archive/" . $msgdir . "/" . $msgfile);`
50		49
51	`$message = file_get_contents($this->listdir . "/archive/" . $msgdir . "/" . $msgfile) ;`	50	`$message = file_get_contents($this->listdir . "/archive/" . $msgdir . "/" . $msgfile) ;`
52	`$mimeDecode = new Mail_mimeDecode($message) ;`	51	`$mimeDecode = new Mail_mimeDecode($message) ;`
53	`$mailDecode = $mimeDecode->decode() ;`	52	`$mailDecode = $mimeDecode->decode() ;`
54		53
55	`$subject = $mailDecode->headers['subject'];`	54	`$subject = $mailDecode->headers['subject'];`
56	`$subject = preg_replace("/\[" . $this->listname . "\]/", "", $subject);`	55	`$subject = preg_replace("/\[" . $this->listname . "\]/", "", $subject);`
57	`$date = preg_replace ('/CEST/', '', $mailDecode->headers['date']);`	56	`$date = preg_replace ('/CEST/', '', $mailDecode->headers['date']);`
58	`print '<tr class="'.$class[$i].'">'."\n";`	57	`print '<tr class="'.$class[$i].'">'."\n";`
59		-
-		58	`if ($mailDecode->headers['from'] == '') $from = $mailDecode->headers['return-path'] ; else $from = $mailDecode->headers['from'];`
60	`$hash = $this->makehash($mailDecode->headers['from']);`	59	`$hash = $this->makehash($from);`
61	`print '<td>'.$this->makelink("action=show_author_msgs&actionargs[]=" . $hash,$this->decode_iso($this->protect_email($mailDecode->headers['from'],TRUE)));`	60	`print '<td>'.$this->makelink("action=show_author_msgs&actionargs[]=" . $hash,$this->decode_iso($this->protect_email($from,false)));`
62	`print '</td>';`	61	`print '</td>';`
63		-
64	`print "<td><b>" . $this->makelink("action=show_msg&actionargs[]=" . $msgdir . "&actionargs[]=" . $msgfile, $this->decode_iso($subject)) . "</b></td>";`	62	`print "<td><b>" . $this->makelink("action=show_msg&actionargs[]=" . $msgdir . "&actionargs[]=" . $msgfile, $this->decode_iso($subject)) . "</b></td>";`
65	`/*`	-
66	`print "<td>[" . $this->makelink("action=show_threads&actionargs[]=" .`	-
67	`date("Ym", strtotime($date)) . "#" . urlencode("/archive/" . $msgdir . "/" . $msgfile), PROJET_FILE_DE_DISCUSSION) . "]</td>\n";`	-
68	`*/`	-
69	`print "<td>" . $this->date_francaise($mailDecode->headers['date']) . "</td>\n";`	63	`print "<td>" . $this->date_francaise($mailDecode->headers['date']) . "</td>\n";`
70	`print "</tr>\n";`	64	`print "</tr>\n";`
71	`$i++;`	65	`$i++;`
72	`if ($i == 2) $i = 0 ;`	66	`if ($i == 2) $i = 0 ;`
73	`unset ($mailDecode) ;`	67	`unset ($mailDecode) ;`
74	`}`	68	`}`
75	`}`	69	`}`
76	`if ($tableopened) { print "</table>\n"; }`	70	`if ($tableopened) { print "</table>\n"; }`
77	`}`	71	`}`
78	`}`	72	`}`