程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> PHP編程 >> PHP綜合 >> 收藏的一個php小偷的核心程序

收藏的一個php小偷的核心程序

編輯:PHP綜合
<? 
ob_start(); 
ob_implicit_flush(0);<a id="more-27"></a> 
function CheckCanGzip(){ 
global $HTTP_ACCEPT_ENCODING; 
if (headers_sent() || connection_timeout() || connection_aborted()){ 
return 0; 

if (strpos($HTTP_ACCEPT_ENCODING, 'x-gzip') !== false) return "x-gzip"; 
if (strpos($HTTP_ACCEPT_ENCODING,'gzip') !== false) return "gzip"; 
return 0; 

/* $level = compression level 0-9, 0=none, 9=max */ 
function GzDocOut($level=1,$debug=0){ 
$ENCODING = CheckCanGzip(); 
if ($ENCODING){ 
print "\n<!-- Use compress $ENCODING -->\n"; 
$Contents = ob_get_contents(); 
ob_end_clean(); 
if ($debug){ 
$s = "<p>Not compress length: ".strlen($Contents); 
$s .= " 
Compressed length: ".strlen(gzcompress($Contents,$level)); 
$Contents .= $s; 

header("Content-Encoding: $ENCODING"); 
print "\x1f\x8b\x08\x00\x00\x00\x00\x00"; 
$Size = strlen($Contents); 
$Crc = crc32($Contents); 
$Contents = gzcompress($Contents,$level); 
$Contents = substr($Contents, 0, strlen($Contents) - 4); 
print $Contents; 
print pack('V',$Crc); 
print pack('V',$Size); 
exit; 
}else{ 
ob_end_flush(); 
exit; 

}  
?>
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved