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

3. $link = array(

4. '百度,http://www.baidu.com/',
5. '服务器软件,http://s.jbxue.com/',
6. '脚本之家,http://bbs.it-home.org/',
7. );
8. $str = '在百度中搜索服务器软件就可以到脚本之家提供的软件
   
9. 夏季不再穿长筒袜近年成为一种时尚，甚至到了秋天也不例外。
   
10. 专家提出，其实这种时尚不利于美腿。据悉，久坐久站缺少运动等原因易导致静脉曲张，尤其是长期站立工作的人，容易引起下肢静脉本身扩张、延长或静脉瓣膜损坏以至发病。具体表现为腿部肿胀，下肢静脉犹如蚯蚓状弯曲或结节成团，皮肤发紫，特别是踝和小腿内侧更为严重。
    
11. 专家指出，长期站立工作的人或多或少都有一些下肢静脉曲张的表现，只是轻重程度不一样。下肢静脉曲张是一种治疗起来比较麻烦的疾病，严重的需要手术，所以最好的方法还是防患于未然，在症状尚不明显的时候，就采取防范措施，穿长筒弹力袜就是一种很好的方法，可帮助血液进入较大且较深处的静脉。
    
12. 保持理想体重，可减少静脉曲张的机会；避免紧身衣物，穿医用弹力袜，以免使血液聚积在腿部；小心食用避孕药，某些避孕药可能引起这种问题。';
13. $out=keylink($str,$link,1); //$str 原始字符 $link，替换链接数组, 3替换次数
14. echo $out;
15. function _sortDesc($a, $b) {
16. return (strlen($a[0]) }
17. function keylink($str,$link,$count=1)
18. {
19. $linkDefs = $link;
20. $linkMap = array();
21. foreach($linkDefs as $row) {
22. $linkMap[] = explode(',', $row);
23. }

24. foreach($linkMap as $row) {

25. $str = preg_replace('/(\s*)('.$row[0].')(\s*)/sui', '${2}', $str);
26. }

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

28. $tmpKwds = array();

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

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

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

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

复制代码