首页 > > 网络编程 > Php编程 >

简单站内HTML文件搜索程序

2008-03-13 03:34:31来源：阅读 ()

自己写来简单的搜索自己电脑上的技术资料的。大概的思路就是寻找指定目录下的文本，然后如果有与关键字相匹配的数据就把文件名返回，最后把所有搜索结果显示出来。显示结果类似于baidu/google，呵呵，这个是纯粹为了好玩。

中国.站.长站

程序代码：中国站.长.站

以下为引用的内容：

<?php
/**
* 文件: search.php
* 功能: 搜索指定目录下的HTML文件
* 创建: 2005-9-23
* 作者: heiyeluren <heiyeluren AT gmail.com>
*/

站.长站

/* 基本函数 */ 站长.站

//获取目录下文件函数
function getFile($dir)
{
$dp = opendir($dir);
$fileArr = array();
while (!false == $curFile = readdir($dp)) {
if ($curFile!="." && $curFile!=".." && $curFile!="") {
   if (is_dir($curFile)) {
    $fileArr = getFile($dir."/".$curFile);
   } else {
    $fileArr[] = $dir."/".$curFile;
   }
}
}
return $fileArr;
} Chinaz@com

//获取文件内容
function getFileContent($file)
{
if (!$fp = fopen($file, "r")) {
die("Cannot open file $file");
}
while ($text = fread($fp, 4096)) {
$fileContent .= $text;
}
return $fileContent;
}

中国站长_站,为中文网站提供动力

//搜索指定文件
function searchText($file, $keyword)
{
$text = getFileContent($file);
if (preg_match("/$keyword/i", $text)) {
return true;
}
return false;
}

Chinaz

//搜索出文章的标题
function getFileTitle($file, $default="None subject")
{
$fileContent = getFileContent($file);
$sResult = preg_match("/<title>.*<\/title>/i", $fileContent, $matchResult);
$title = preg_replace(array("/(<title>)/i","/(<\/title>)/i"), "", $matchResult[0]);
if (empty($title)) {
return $default;
} else {
return $title;
}
} Www.Chinaz.com

//获取文件描述信息
function getFileDescribe($file,$length=200, $default="None describe")
{
$metas = get_meta_tags($file);
if ($meta['description'] != "") {
return $metas['description'];
}
$fileContent = getFileContent($file);
preg_match("/(<body.*<\/body>)/is", $fileContent, $matchResult);
$pattern = array("/(<[^\x80-\xff]+>)/i","/(<input.*>)+/i", "/(<a.*>)+/i", "/(<img.*>)+/i", "/([<script.*>])+.*([<\/script>])+/i","/&/i","/"/i","/'/i", "/\s/");
$description = preg_replace($pattern, "", $matchResult[0]);
$description = mb_substr($description, 0, $length)." ..."; Chinaz_com

return $description;
}

中.国.站.长.站

//加亮搜索结果中的关键字
function highLightKeyword($text, $keyword, $color="#C60A00")
{
$newword = "$keyword";
$text = str_replace($keyword, $newword, $text);
return $text;
}

Chinaz

//获取文件大小(KB)
function getFileSize($file)
{
$filesize = intval(filesize($file)/1024)."K";
return $filesize;
} Chinaz_com

//获取文件最后修改的时间
function getFileTime($file)
{
$filetime = date("Y-m-d", filemtime($file));
return $filetime;
} 中国站.长.站

//搜索目录下所有文件
function searchFile($dir, $keyword)
{
$sFile = getFile($dir);
if (count($sFile) <= 0) {
return false;
}
$sResult = array();
foreach ($sFile as $file) {
if (searchText($file, $keyword)) {
$sResult[] = $file;
}
}
if (count($sResult) <= 0) {
return false;
} else {
return $sResult;
}
}

Chinaz.com

/* 测试代码 */ 中国.站长站

//指定要搜索的目录
$dir = "./php_Linux";
//要搜索的关键字
$keyword = "sendmail";

中国站长.站

$fileArr = searchFile($dir, $keyword);
$searchSum = count($fileArr);

中.国站长站

echo "搜索关键字: $keyword   搜索目录: $dir   搜索结果: $searchSum <hr size=1> ";

Chinaz@com

if ($searchSum <= 0) {
echo "没有搜索到任何结果";
} else {
foreach ($fileArr as $file) {
echo "<a href='$file' target='_blank'>". highLightKeyword(getFileTitle($file), $keyword) .
 "</a> - ".getFileSize($file)." ". getFileTime($file) .
 " \n".highLightKeyword(getFileDescribe($file), $keyword) .
 " ";
}
}

Chinaz

?> Www^Chinaz^com

中.国.站.长.站

完全可以用在自己已经生成静态内容的的搜索，但是程序效率不高。如果能够适当的加上索引/缓存等机制的话，我想程序会有趣很多。

中.国站长站

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有