Subversion Repositories svnkaklik

Rev

Go to most recent revision | Details | Last modification | View Log

Rev Author Line No. Line
6 kaklik 1
<?php
2
$entry=clean_entry($entry);
3
 
4
$entry=str_replace("[b]","<b>",$entry);
5
$entry=str_replace("[i]","<i>",$entry);
6
$entry=str_replace("[c]","<span class=\"n\">",$entry);
7
$entry=str_replace("[/i]","</i>",$entry);
8
$entry=str_replace("[/b]","</b>",$entry);
9
$entry=str_replace("[/c]","</span>",$entry);
10
 
11
$entry=eregi_replace('[[:alpha:]]+://[^<>[:space:]]+[[:alnum:]/]','<a href="\\0" target="_blank">\\0</a>',$entry);
12
$entry=eregi_replace("([A-z0-9_-]+)@([A-z0-9_-]+.[a-zA-Z.]+)","<script type=\"text/javascript\">print_mail('\\1','\\2')</script>",$entry);
13
 
14
for($i=0;$i<count($smilies);$i++){
15
if(isset($smilies[$i])&&strlen($smilies[$i])>5){
16
$row=explode('|',$smilies[$i]);
17
$entry=str_replace($row[0],"<img src=\"$skin_dir/$row[1]\" width=\"$row[2]\" height=\"$row[3]\" title=\"$row[4]\" alt=\"$row[4]\" />",$entry);
18
}}
19
 
20
if(strlen($entry)>$full_length){
21
$entry=$lang[37].', <b>'.$name.'</b>...';$name='Admin';}
22
 
23
$words=explode(' ',$entry);
24
for($i=0;$i<count($words);$i++){
25
if(isset($words[$i])&&strlen($words[$i])>$words_length){
26
$entry=$lang[52].' <i>'.$REMOTE_ADDR.'</i>...';$name='Admin';break;
27
}}
28
 
29
$entry=remove_bad_words($entry);
30
?>