php關鍵字自動加入span標籤與關鍵字高亮程式碼

// Example use: $spanned = codeWords($string_containing_keywords);
// My site: andrew.dx.am
// Using colour==blue, but different arrays of words and different
// colours can be added.
function onlyWholeWords(&$value, $key) {
// Ignores words after // comment delimiters.
//$value = "/b(" . $value . ")b/";  // doesn't handle comments
//$value = "/^(?:(?!//).)*Kb(" . $value . ")b/";
// K lookbehind alternative is not supported in PHP < 5.2.4, so use:
  $value = "/^((?:(?!//).)*)b" . $value . "b/";
}
function addSpan(&$value, $key, $color='blue') {
  $value = "" . $value . "";
}
function codeWords($code) {
  $keywords = array('as', 'break', 'case', 'class',
  'continue', 'default', 'do', 'elif', 'else',
  'elseif', 'for', 'foreach', 'function', 'if',
  'new', 'null', 'return', 'self', 'switch',
  'this', 'to', 'typeof', 'until',
  'var', 'void', 'while', 'with');
  $keywords2 = $keywords;
  array_walk($keywords, 'onlyWholeWords');
  array_walk($keywords2, 'addSpan', 'blue');
  $code = preg_replace($keywords, $keywords2, $code);
  return $code;
}

二、php自动给文章加关键词链接

自动给文章加关键词链接的php函数代码。

代码：

$link = array(
'百度,http://www.baidu.com/',
'php教程,http://bbs.it-home.org/wb/php/',
'脚本学堂,http://bbs.it-home.org/',
);
$str = '在百度中搜索php教程就可以到程序员之家提供的php编程文章
此处放置需要替换的内容。';
$out=keylink($str,$link,1); //$str 原始字符 $link，替换链接数组, 3替换次数
echo $out;
function _sortDesc($a, $b) {
return (strlen($a[0]) < strlen($b[0])) ? 1 : -1;
}
function keylink($str,$link,$count=1)
{
$linkDefs = $link;
$linkMap = array();
foreach($linkDefs as $row) {
$linkMap[] = explode(',', $row);
}
foreach($linkMap as $row) {
$str = preg_replace('/(s*)('.$row[0].')(s*)/sui', '', $str);
}
usort($linkMap, '_sortDesc');
$tmpKwds = array();
foreach($linkMap as $i=>$row) {
list($kwd, $url) = $row;
for($j=$i 1; $j$subKwd = $linkMap[$j][0];
//如果包含其他关键字，暂时替换成其他字符串
if(strpos($kwd, $subKwd) !== false) {
$tmpKwd = '{'.md5($subKwd).'}';
$kwd = str_replace($subKwd, $tmpKwd, $kwd);
$tmpKwds[$tmpKwd] = $subKwd;
}
}
//把文字替换成链接
$str = preg_replace('/('.$row[0].')/sui', ''.$kwd.'', $str, $count);
}
//把代替子关键字的字符串替换回来
foreach($tmpKwds as $tmp=>$kwd) {
$str = str_replace($tmp, $kwd, $str);
}
return $str;
}
?>