php关键词自动添加span标签与关键词高亮代码

2. // Example use: $spanned = codeWords($string_containing_keywords);
3. // My site: andrew.dx.am
4. // Using colour==blue, but different arrays of words and different
5. // colours can be added.
6. function onlyWholeWords(&$value, $key) {
7. // Ignores words after // comment delimiters.
8. //$value = "/\b(" . $value . ")\b/"; // doesn't handle comments
9. //$value = "/^(?:(?!\/\/).)*\K\b(" . $value . ")\b/";
10. // \K lookbehind alternative is not supported in PHP < 5.2.4, so use:
11. $value = "/^((?:(?!\/\/).)*)\b" . $value . "\b/";
12. }
13. function addSpan(&$value, $key, $color='blue') {
14. $value = "$1" . $value . "";
15. }
16. function codeWords($code) {
17. $keywords = array('as', 'break', 'case', 'class',
18. 'continue', 'default', 'do', 'elif', 'else',
19. 'elseif', 'for', 'foreach', 'function', 'if',
20. 'new', 'null', 'return', 'self', 'switch',
21. 'this', 'to', 'typeof', 'until',
22. 'var', 'void', 'while', 'with');
23. $keywords2 = $keywords;
24. array_walk($keywords, 'onlyWholeWords');
25. array_walk($keywords2, 'addSpan', 'blue');
26. $code = preg_replace($keywords, $keywords2, $code);
27. return $code;
28. }

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

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

代码：

3. $link = array(

4. '百度,http://www.baidu.com/',
5. 'php教程,http://bbs.it-home.org/wb/php/',
6. '脚本学堂,http://bbs.it-home.org/',
7. );
8. $str = '在百度中搜索php教程就可以到程序员之家提供的php编程文章
   
9. 此处放置需要替换的内容。';
10. $out=keylink($str,$link,1); //$str 原始字符 $link，替换链接数组, 3替换次数
11. echo $out;
12. function _sortDesc($a, $b) {
13. return (strlen($a[0]) < strlen($b[0])) ? 1 : -1;
14. }
15. function keylink($str,$link,$count=1)
16. {
17. $linkDefs = $link;
18. $linkMap = array();
19. foreach($linkDefs as $row) {
20. $linkMap[] = explode(',', $row);
21. }

22. foreach($linkMap as $row) {

23. $str = preg_replace('/(\s*)('.$row[0].')(\s*<\/a>)/sui', '${2}', $str);
24. }

25. usort($linkMap, '_sortDesc');

26. $tmpKwds = array();

27. foreach($linkMap as $i=>$row) {

28. list($kwd, $url) = $row;
29. for($j=$i+1; $j$subKwd = $linkMap[$j][0];
30. //如果包含其他关键字，暂时替换成其他字符串
31. if(strpos($kwd, $subKwd) !== false) {
32. $tmpKwd = '{'.md5($subKwd).'}';
33. $kwd = str_replace($subKwd, $tmpKwd, $kwd);
34. $tmpKwds[$tmpKwd] = $subKwd;
35. }
36. }
37. //把文字替换成链接
38. $str = preg_replace('/('.$row[0].')/sui', ''.$kwd.'', $str, $count);
39. }

40. //把代替子关键字的字符串替换回来

41. foreach($tmpKwds as $tmp=>$kwd) {
42. $str = str_replace($tmp, $kwd, $str);
43. }
44. return $str;
45. }
46. ?>