用PHP即时捕捉PHP中的错误并发送email通知的实现代码

开发PHP的朋友都知道,其实最担心的就是程序中出现一些异常或错误,这些状况如果输出到用户的萤幕会把用户给吓坏,甚至为此丢了工作,如果不输出到萤幕就得想办法记录到日志中,但是似乎不是每个人都有查看错误日志的习惯,爲了解决这个尴尬的问题,所以我写了这段代码,其用意就是当我们写的php程式出错的时候把错误内容捕捉出来然后发到我们的email内.

先看效果:

复制代码代码如下:
Define（"SYS_DEBUG",false）;
IF（SYS_DEBUG） {
ini_set（"display_errors","on"）;
Error_reporting（E_ALL）;//上线后使用该设定Error_reporting（E_ERROR | E_WARNING | E_PARSE）;
}Else{
ini_set（"display_errors","off"）;
Error_reporting（0）;
}

//错误捕捉
Register_shutdown_function（"Fun::Error"）;

Class Fun{

/**
通用出错处理
参数:
要输出的内容,是否终止执行程序
说明:
有传值时该函式可以用来输出自定义的错误内容
另外还可以配合Register_shutdown_function实现自动抓取错误内容,并将抓取的错误内容发送到Email内
Register_shutdown_function的机制是程序执行完毕或中途出错时调用函数
如果是自动抓取错误时被调用,则会取得最后一次出错的内容,如果发现没有错误内容则跳出
返回:
内容会被直接输出至萤幕或Email内
用法:
Fun::Error（"错误内容"）;
Fun::Error（"错误内容",False）;
/**/
Public Static Function Error（$M="",$E=True）{
$ErrTpl="<head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8"></head><body><table cellspacing="0" cellpadding="0" border="0"><tr><td style="padding:5px;background-color:#F57900;font-size:13px;border:1px solid #444;color:#222;">{$M}</td></tr></table>";

$M=Trim（$M）;
IF（$M！=""） {//手工调用
$M=" 注意: ".$M;
Echo Strtr（$ErrTpl,Array（"{$M}"=>$M））;unSet（$ErrTpl）;
IF（$E===True） {Die（）;}
Return ;
}Else{//程式执行完毕自动抓取错误时调用
$M=error_get_last（）;//取得最后产生的错误
IF（！Is_array（$M） Or Count（$M）<4） {Unset（$M）;Return ;}
IF（！File_Exists（$M["file"]）） {Unset（$M）;Return ;}

//取得5行出错关键代码,如果取不到内容,说明出错档桉不存在
$E=Array_slice（File（$M["file"]）,（$M["line"]-4）,5）;
IF（！Is_array（$E）） {Unset（$M,$E）;Return ;}

$E["M"]="";
For（$i=0;$i<5;$i++） {
$E[$i]=isSet（$E[$i]）？ $E[$i] : "";
$E["M"].=" ";
$E["M"].=（$i==3）？ "".（（$M["line"]-3）+（$i+1））."" : （（$M["line"]-3）+（$i+1））;
$E["M"].=": ".Htmlspecialchars（$E[$i],ENT_QUOTES,"UTF-8"）." ";
}
$E=&$E["M"];

$M="自动捕捉到有错误产生！ 错误描述: ".$M["file"]."的第".$M["line"]."行出现了类型为".$M["type"]."的错误: ".$M["message"]." 关键代码: ".$E." ".self::now（"Y-m-d H:i:s",time（））." ";

$M=Strtr（$ErrTpl,Array（"{$M}"=>$M））;unSet（$ErrTpl）;

$G=seft::getG（"SYS","config"）;
IF（！self::Mail2（$G["Spe"],"警告: ".$G["Tit"]." 出现 PHP 程式错误！",$M） And SYS_DEBUG===True）{
throw new Exception（"警告: ".$G["Tit"]." 出现 PHP 程式错误！ ".$M）;
}
IF（SYS_DEBUG） {Echo $M;}
unSet（$E,$M,$G）;
Die（）;
}
}
/**
发送电邮
参数:
收件人,邮件标题（不可有换行符）,邮件内容（行与行之间必须用分隔,每行不可超过70个字符）
说明:
调用PHP内置函式Mail发送电邮
返回:
返回布尔值
用法:
$IsSend=Fun::Mail2（$email,$tit,$msg）;
/**/
Public Static Function Mail2（$to,$tit,$msg） {
IF（Filter_var（$to,FILTER_VALIDATE_EMAIL）==""）{
throw new Exception（"电邮地址错误！"）;
}

$tit="=？UTF-8？B？".Base64_Encode（$tit）."？=";
$msg = str_replace（" ."," ..",$msg）; //Windows如果在一行开头发现一个句号则会被删掉,要避免此问题将单个句号替换成两个句号

Return Mail（$to,$tit,$msg,"From:".seft::getG（"config/SYS/Mal"）." "."Content-Type:text/html;charset=utf-8"）;
}
}