Html tartalom biztonságos PHP funkció
Szombat, március 28, 2009 2:43Lar tisztítási funkció a html input, de több vizsgálat etmedım hos gozukuor
copyright: http://www.ysfkc.com/dosyalar/guvenliHtml.phps
guvenliHtml funkció ($ text) (
global $ start;
$ KonumK = 0; # <(Kucuktur) karakterek általunk látott, az utolsó helyzete
$ KonumB = 0; #> (Buyuktur) karakterek általunk látott, az utolsó helyzete
$ Tag_mi = False; # címkét vagyunk?
$ OzellikSablon = "# tulajdonság = érték használható hívások globális formatindaki
$ TagTablosu = array (); # tag információt a globális alacagi
$ OzellikTablosu = array (); # jellemző (attribútum) adatok a globális alacagi
$ DegerTablosu = array (); # értéke (érték), a globális információs alacagi
# Globális változók beállítása értékek
guvenliGlobal ();
# Szöveg előtt sziget yapilan javítási folyamat
$ Text = onDuzeltme ($ text);
$ I = 0;
$ Buffer = ";
$ KonumK = strpos ($ text, '<', $ i); # <rastlandigi első helyen karakter
$ KonumB = strpos ($ text, '>', $ i); #> rastlandigi első helyen karakter
# Scan a címkéket lehetővé teszi a szöveget a mi
while (true) (
# Ha a <jel még egyszer rastlandiysa
# Vagy <character talált but> karakter bulunamadiysa
if (($ konumK! konumK == false & & $ <$ konumB) | | ($ konumK! == false & & $ konumB === False)) (
# Tag icerisindeysek
if ($ tag_mi) (
# Tag in <olamayacagi a tag részt sandigimiz
# Basindaki <jel <, hogy a mondat Çevre
$ Buffer .= '<'. substr ($ text, $ i, $ konumK - $ i);
# Tag belül degilseniz
) Else (
#
$ Buffer .= substr ($ text, $ i, $ konumK - $ i);
)
$ I = $ konumK + 1;
$ KonumK = strpos ($ text, '<', $ i);
# Tag Rögzítéstechnika
$ Tag_mi = True;
# Ha a> karaktert még egyszer rastlandiysa
# Vagy> karaktert talált, de a <jel bulunamadiysa
) Elseif (($ konumB! KonumK == false & & $> $ konumB) | | ($ konumK === false & & $ konumB! == False)) (
# Icerisindeysek Tag
if ($ tag_mi) (
# Duzeltilmis Tag
$ Buffer .= guvenliTag (substr ($ text, $ i, $ konumB - $ i));
# Close tag
$ Tag_mi = False;
# Tag belül degilseniz
) Else (
Get the part # itt kodar
# And> karakter> a mondat Çevre
$ Buffer .= substr ($ text, $ i, $ konumB - $ i). '>';
)
$ I = $ konumB 1;
$ KonumB = strpos ($ text, '>', $ i);
# Ha <or> karakter rastlanmadiysa
) Else (
# Icerisindeysek Tag
if ($ tag_mi) (
# Végül meghatározatlan <jel <, hogy a mondat Çevre
# És hozzá a szöveg puffer devamini
$ Buffer .= '<'. substr ($ text, $ i);
) Else (
# A végén a szöveget a Kalina helyzetben devamini add puffer
$ Buffer .= substr ($ text, $ i);
)
# Cik artik tag kalmadigina gore Dong
break;
)
)
return $ buffer;
)
# ------------------------------------------------- -------------------------------------------------
onDuzeltme funkció ($ text) (
$ DegisiklikOncesi ='';
Szükség, amíg oldugu bolum # degistirilmesi tovább
while ($ degisiklikOncesi! = $ text) (
DegisiklikOncesi $ = $ text;
# & # Xx formában írott néhány karakter ASCII karsiliklarina cevriliyor
# Some címkékkel atiliyor és Tartalom
$ Text = preg_replace ( '/ / Si ",", $ text);
$ Text = preg_replace ( '/
$ Text = preg_replace ( '/








































