用PHP即時捕捉PHP中的錯誤并發(fā)送email通知的實現(xiàn)代碼

2024-05-04 23:12:56

字體：大中小

供稿：網(wǎng)友

開發(fā)PHP的朋友都知道,其實最擔(dān)心的就是程序中出現(xiàn)一些異常或錯誤,這些狀況如果輸出到用戶的螢?zāi)粫延脩艚o嚇壞,甚至為此丟了工作,如果不輸出到螢?zāi)痪偷孟朕k法記錄到日志中,但是似乎不是每個人都有查看錯誤日志的習(xí)慣,爲(wèi)了解決這個尷尬的問題,所以我寫了這段代碼,其用意就是當(dāng)我們寫的php程式出錯的時候把錯誤內(nèi)容捕捉出來然后發(fā)到我們的email內(nèi).

先看效果:

復(fù)制代碼代碼如下:

Define('SYS_DEBUG',false);
IF(SYS_DEBUG) {
ini_set('display_errors','on');
Error_reporting(E_ALL);//上線后使用該設(shè)定Error_reporting(E_ERROR | E_WARNING | E_PARSE);
}Else{
ini_set('display_errors','off');
Error_reporting(0);
}

//錯誤捕捉
Register_shutdown_function('Fun::Error');

Class Fun{

/**
通用出錯處理
參數(shù):
要輸出的內(nèi)容,是否終止執(zhí)行程序
說明:
有傳值時該函式可以用來輸出自定義的錯誤內(nèi)容
另外還可以配合Register_shutdown_function實現(xiàn)自動抓取錯誤內(nèi)容,并將抓取的錯誤內(nèi)容發(fā)送到Email內(nèi)
Register_shutdown_function的機制是程序執(zhí)行完畢或中途出錯時調(diào)用函數(shù)
如果是自動抓取錯誤時被調(diào)用,則會取得最后一次出錯的內(nèi)容,如果發(fā)現(xiàn)沒有錯誤內(nèi)容則跳出
返回:
內(nèi)容會被直接輸出至螢?zāi)换駿mail內(nèi)
用法:
Fun::Error('錯誤內(nèi)容');
Fun::Error('錯誤內(nèi)容',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"><tr><td>{$M}</td></tr></table>';

$M=Trim($M);
IF($M!='') {//手工調(diào)用
$M=' 注意: '.$M;
Echo Strtr($ErrTpl,Array('{$M}'=>$M));unSet($ErrTpl);
IF($E===True) {Die();}
Return ;
}Else{//程式執(zhí)行完畢自動抓取錯誤時調(diào)用
$M=error_get_last();//取得最后產(chǎn)生的錯誤
IF(!Is_array($M) Or Count($M)<4) {Unset($M);Return ;}
IF(!File_Exists($M['file'])) {Unset($M);Return ;}

//取得5行出錯關(guān)鍵代碼,如果取不到內(nèi)容,說明出錯檔桉不存在
$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='自動捕捉到有錯誤產(chǎn)生! 錯誤描述: '.$M['file'].'的第'.$M['line'].'行出現(xiàn)了類型為'.$M['type'].'的錯誤: '.$M['message'].' 關(guān)鍵代碼: '.$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'].' 出現(xiàn) PHP 程式錯誤!',$M) And SYS_DEBUG===True){
throw new Exception('警告: '.$G['Tit'].' 出現(xiàn) PHP 程式錯誤! '.$M);
}
IF(SYS_DEBUG) {Echo $M;}
unSet($E,$M,$G);
Die();
}
}
/**
發(fā)送電郵
參數(shù):
收件人,郵件標(biāo)題(不可有換行符),郵件內(nèi)容(行與行之間必須用/n分隔,每行不可超過70個字符)
說明:
調(diào)用PHP內(nèi)置函式Mail發(fā)送電郵
返回:
返回布爾值
用法:
$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("/n.","/n..",$msg); //Windows如果在一行開頭發(fā)現(xiàn)一個句號則會被刪掉,要避免此問題將單個句號替換成兩個句號

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