PHP 解析Maildir 邮件格式（eml文件）

# $mailfile为邮件文件路径
function parsemail($mailfile){
echo $mailfile."<br>";
if(file_exists($mailfile)){
$fp = fopen($mailfile, "r");
if (!$fp){
die("open mailfile failed!");
}else{
while(($line = chop(fgets($fp,1024))) && $line !== ""){
echo htmlspecialchars($line)."<br>";
}
}
fclose($fp);
}else{
echo "file not exists";
}
}

# $mid为ino
function getmailfile($mid,$mailpath){
$newpath = $mailpath."/new/";
$curpath = $mailpath."/cur/";

$newhandle = opendir($newpath);
while(($file = readdir($newhandle)) !== false ){
if ($file != "." && $file != ".." && stat($newpath.$file)['ino'] == $mid){
$mailfile = $newpath.$file;

}
}
closedir($newhandle);

$curhandle = opendir($curpath);
while(($file = readdir($curhandle)) !== false ){
if ($file != "." && $file != ".." && stat($curpath.$file)['ino'] == $mid){
$mailfile = $curpath.$file;
}
}
closedir($curhandle);

return $mailfile;

}

function parsemail($mailfile){
$mime = mailparse_msg_parse_file($mailfile);
$struct = mailparse_msg_get_structure($mime);
foreach ($struct as $x => $y) {
$section = mailparse_msg_get_part($mime, $y);
$info = mailparse_msg_get_part_data($section);

if ($info["content-disposition"] == 'attachment'){
# 附件名编码过的要解码
$filename = Decode_mime($info["content-name"]);
ob_start();
mailparse_msg_extract_part_file($section, $mailfile);
$content = ob_get_contents();
ob_end_clean();
# 把附件写到临时目录
$fh = fopen("/home/temp/".$filename,"w+");
fwrite($fh, $content);
fclose($fh);
}

}

}

function Decode_mime($Str){
if( substr_count($Str,'=?')==0 ) return $Str;
list($Token,$Charset,$Encoding,$Str,$End) = preg_split('/\?/',$Str,5);
$End = preg_replace("/^\=/","",$End);
$Token = preg_replace("/\=/","",$Token);
$Encoding = strtolower($Encoding);
switch($Encoding){
case 'b':
$Text = trim(base64_decode($Str));
break;
case 'q':
$Text = trim(quoted_printable_decode($Str));
}
if( substr_count($End,'=?')!=0 ) $End = Decode_mime($End);
return iconv($Charset,"utf-8//IGNORE",$Token.$Text.$End);
}