searchcn.php

很不错的一个php源码

<?php
set_time_limit(0);
ob_implicit_flush();

//注释格式
$remark = array(
	array('//debug', "\r\n")
	, array('/**', '*/')
	, array('/*debug', '*/')
	, array('/*note', '*/')
	, array('//note', "\r\n")
);

//以下目录和文件不被查询
$filter = 'forumdata|config\.inc\.php|debug|test|readme|utilities|upgrade|\.tpl.php|index\.htm|\.lang.php';

//项目目录
$sf = 'd:\\data\\labs\\develop\\dzhead\\';

//日志目录
$logname = 'cnlog.txt';
$langfile = 'lang.php';


$log = fopen($logname, 'w');
fclose($log);

$lf = fopen($langfile, 'wb');
fwrite($lf, "\r\n\r\n\t'spilt' => '----------------------------------------------------',");
fclose($lf);

$lf = fopen($langfile, 'ab');


$ptag = '\\';

findfile($sf);
fwrite($lf, "\r\n);\r\n\r\n?>");
fclose($lf);
function findfile($sf){
	global $ptag, $logname, $filter, $lf;
	$log = fopen($logname, 'ab');
	global $remark;
	if(is_dir($sf)) {
		if($dh = opendir($sf)) {
			
			while(($file = readdir($dh)) !== false) {
				if($file == '.' || $file == '..') {
					continue;	
				} elseif(filetype($sf.$file) == 'dir') {
					findfile($sf.$file.$ptag);
				} elseif((preg_match('/\.php$/', $file) || preg_match('/\.htm$/', $file)) && !preg_match('/('.$filter.')/', $sf.$file)) {
					
					$sfp = fopen($sf.$file, 'rb');
					$buf = fread($sfp, filesize($sf.$file));
					fclose($sfp);
					foreach($remark as $v) {
						$data = '';
						while(count($strcut = explode($v[0], $buf, 2)) > 1) {
							$data .= $strcut[0];
							if(($strcut = explode($v[1], $strcut[1], 2)) > 1){
								$buf = $strcut[1];
							} else {
								$buf = $strcut[0];
								break;
							}
							
						}
						$data .= $strcut[0];
						$buf = $data;
					}
					$data = $buf;
					$lines = 0;
					$cn = $str = '';
					$cns = 0;
					$ldata = "\r\n\t'".str_replace('.', '_', $file)."' => '";
					for($i = 0; $i < strlen($data); $i++){
						$c = ord($data{$i});
						if($c == 0x0A || $data{$i+1} == ''){
							$lines++;
							if(!empty($cn)){
								$ldata .= "',";
								$ldata = str_replace("\r\n\t'".str_replace('.', '_', $file)."' => '',", '', $ldata);
								fwrite($lf, $ldata);
								$cn = "\r\n$lines:".$cn;
								$str .= $cn;
								$cn = '';
								$ldata = "\r\n\t'".str_replace('.', '_', $file)."' => '";
							}
						} elseif($c >= 0x81 && $c <= 0xFE) {
							$c = ord($data{++$i});
							if($c >= 0x40 && $c <= 0xFE) {
								$cn .= $data{$i-1}.$data{$i};
								$ldata .= $data{$i-1}.$data{$i};
								while(($c = ord($data{++$i})) != 0x3C && $c != 0x0A && $c != 0x0D && $c != 0x27 && $c != 0x3E && $c != 0x3B && $c != 0x22 && $c != 0x3D && $c < 0x81) {
									$space .= chr($c);
								}
								$i--;
								if(ord($data{$i+1}) < 0x81) {
									$cns++;
									$cn .= '$';
									$ldata .= "',\r\n\t'".str_replace('.', '_', $file)."' => '";
								} else {
									$cn .= $space;
								}
								$space = '';
							}
						}
					}
					if($str != '') {
						fwrite($log, "\n--".$sf.$file."----------------------- (共 $cns 处)");
						echo "{$sf}$file (共 $cns 处)<br>";
						ob_flush();flush();
						$cns = 0;	
					}
					fwrite($log, $str);
					$str = '';
				}
			}
		}
	}
	fclose($log);

}
?>