1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162 |
- <?php
-
-
- if(substr(phpversion(), 0, 1) < 4)
- {
- die("Class kses requires PHP 4 or higher.");
- }
-
- if(!defined('KSES_CLASS_PHP4'))
- {
- define('KSES_CLASS_PHP4', true);
-
- class kses4
- {
-
- var $allowed_protocols = array();
- var $allowed_html = array();
-
-
- function kses4()
- {
-
- $this->allowed_protocols = array('http', 'ftp', 'mailto');
- $this->allowed_html = array();
- }
-
- function Parse($string = "")
- {
- if (get_magic_quotes_gpc())
- {
- $string = stripslashes($string);
- }
- $string = $this->_no_null($string);
- $string = $this->_js_entities($string);
- $string = $this->_normalize_entities($string);
- $string = $this->filterKsesTextHook($string);
- return $this->_split($string);
- }
-
- function AddProtocols()
- {
- $c_args = func_num_args();
- if($c_args != 1)
- {
- trigger_error("kses4::AddProtocols() did not receive an argument.", E_USER_WARNING);
- return false;
- }
- $protocol_data = func_get_arg(0);
- if(is_array($protocol_data) && count($protocol_data) > 0)
- {
- foreach($protocol_data as $protocol)
- {
- $this->AddProtocol($protocol);
- }
- return true;
- }
- elseif(is_string($protocol_data))
- {
- $this->AddProtocol($protocol_data);
- return true;
- }
- else
- {
- trigger_error("kses4::AddProtocols() did not receive a string or an array.", E_USER_WARNING);
- return false;
- }
- }
-
- function Protocols()
- {
- $c_args = func_num_args();
- if($c_args != 1)
- {
- trigger_error("kses4::Protocols() did not receive an argument.", E_USER_WARNING);
- return false;
- }
- return $this->AddProtocols(func_get_arg(0));
- }
-
- function AddProtocol($protocol = "")
- {
- if(!is_string($protocol))
- {
- trigger_error("kses4::AddProtocol() requires a string.", E_USER_WARNING);
- return false;
- }
- $protocol = strtolower(trim($protocol));
- if($protocol == "")
- {
- trigger_error("kses4::AddProtocol() tried to add an empty/NULL protocol.", E_USER_WARNING);
- return false;
- }
-
- if(substr($protocol, strlen($protocol) - 1, 1) == ":")
- {
- $protocol = substr($protocol, 0, strlen($protocol) - 1);
- }
- if(!in_array($protocol, $this->allowed_protocols))
- {
- array_push($this->allowed_protocols, $protocol);
- sort($this->allowed_protocols);
- }
- return true;
- }
-
- function SetProtocols()
- {
- $c_args = func_num_args();
- if($c_args != 1)
- {
- trigger_error("kses4::SetProtocols() did not receive an argument.", E_USER_WARNING);
- return false;
- }
- $protocol_data = func_get_arg(0);
- if(is_array($protocol_data) && count($protocol_data) > 0)
- {
- $this->allowed_protocols = array();
- foreach($protocol_data as $protocol)
- {
- $this->AddProtocol($protocol);
- }
- return true;
- }
- elseif(is_string($protocol_data))
- {
- $this->allowed_protocols = array();
- $this->AddProtocol($protocol_data);
- return true;
- }
- else
- {
- trigger_error("kses4::SetProtocols() did not receive a string or an array.", E_USER_WARNING);
- return false;
- }
- }
-
- function DumpProtocols()
- {
- return $this->allowed_protocols;
- }
-
- function DumpElements()
- {
- return $this->allowed_html;
- }
-
- function AddHTML($tag = "", $attribs = array())
- {
- if(!is_string($tag))
- {
- trigger_error("kses4::AddHTML() requires the tag to be a string", E_USER_WARNING);
- return false;
- }
- $tag = strtolower(trim($tag));
- if($tag == "")
- {
- trigger_error("kses4::AddHTML() tried to add an empty/NULL tag", E_USER_WARNING);
- return false;
- }
- if(!is_array($attribs))
- {
- trigger_error("kses4::AddHTML() requires an array (even an empty one) of attributes for '$tag'", E_USER_WARNING);
- return false;
- }
- $new_attribs = array();
- if(is_array($attribs) && count($attribs) > 0)
- {
- foreach($attribs as $idx1 => $val1)
- {
- $new_idx1 = strtolower($idx1);
- $new_val1 = $attribs[$idx1];
- if(is_array($new_val1) && count($new_val1) > 0)
- {
- $tmp_val = array();
- foreach($new_val1 as $idx2 => $val2)
- {
- $new_idx2 = strtolower($idx2);
- $tmp_val[$new_idx2] = $val2;
- }
- $new_val1 = $tmp_val;
- }
- $new_attribs[$new_idx1] = $new_val1;
- }
- }
- $this->allowed_html[$tag] = $new_attribs;
- return true;
- }
-
- function RemoveProtocol($protocol = "")
- {
- if(!is_string($protocol))
- {
- trigger_error("kses4::RemoveProtocol() requires a string.", E_USER_WARNING);
- return false;
- }
-
- if(substr($protocol, strlen($protocol) - 1, 1) == ":")
- {
- $protocol = substr($protocol, 0, strlen($protocol) - 1);
- }
- $protocol = strtolower(trim($protocol));
- if($protocol == "")
- {
- trigger_error("kses4::RemoveProtocol() tried to remove an empty/NULL protocol.", E_USER_WARNING);
- return false;
- }
-
- if(in_array($protocol, $this->allowed_protocols))
- {
- $this->allowed_protocols = array_diff($this->allowed_protocols, array($protocol));
- sort($this->allowed_protocols);
- }
- return true;
- }
-
- function RemoveProtocols()
- {
- $c_args = func_num_args();
- if($c_args != 1)
- {
- return false;
- }
- $protocol_data = func_get_arg(0);
- if(is_array($protocol_data) && count($protocol_data) > 0)
- {
- foreach($protocol_data as $protocol)
- {
- $this->RemoveProtocol($protocol);
- }
- }
- elseif(is_string($protocol_data))
- {
- $this->RemoveProtocol($protocol_data);
- return true;
- }
- else
- {
- trigger_error("kses4::RemoveProtocols() did not receive a string or an array.", E_USER_WARNING);
- return false;
- }
- }
-
- function _no_null($string)
- {
- $string = preg_replace('/\0+/', '', $string);
- $string = preg_replace('/(\\\\0)+/', '', $string);
- return $string;
- }
-
- function _js_entities($string)
- {
- return preg_replace('%&\s*\{[^}]*(\}\s*;?|$)%', '', $string);
- }
-
- function _normalize_entities($string)
- {
-
- $string = str_replace('&', '&', $string);
-
- $string = preg_replace('/&([A-Za-z][A-Za-z0-9]{0,19});/', '&\\1;', $string);
- $string = preg_replace('/&#0*([0-9]{1,5});/e', '\$this->_normalize_entities2("\\1")', $string);
- $string = preg_replace('/&#([Xx])0*(([0-9A-Fa-f]{2}){1,2});/', '&#\\1\\2;', $string);
- return $string;
- }
-
- function _normalize_entities2($i)
- {
- return (($i > 65535) ? "&#$i;" : "&#$i;");
- }
-
- function _hook($string)
- {
- return $this->filterKsesTextHook($string);
- }
-
- function filterKsesTextHook($string)
- {
- return $string;
- }
-
- function _array_lc($inarray)
- {
- $outarray = array();
- if(is_array($inarray) && count($inarray) > 0)
- {
- foreach ($inarray as $inkey => $inval)
- {
- $outkey = strtolower($inkey);
- $outarray[$outkey] = array();
- if(is_array($inval) && count($inval) > 0)
- {
- foreach ($inval as $inkey2 => $inval2)
- {
- $outkey2 = strtolower($inkey2);
- $outarray[$outkey][$outkey2] = $inval2;
- }
- }
- }
- }
- return $outarray;
- }
-
- function _split($string)
- {
- return preg_replace(
- '%(<'.
- '[^>]*'.
- '(>|$)'.
- '|>)%e',
- "\$this->_split2('\\1')",
- $string);
- }
-
- function _split2($string)
- {
- $string = $this->_stripslashes($string);
- if (substr($string, 0, 1) != '<')
- {
-
- return '>';
- }
- if (!preg_match('%^<\s*(/\s*)?([a-zA-Z0-9]+)([^>]*)>?$%', $string, $matches))
- {
-
- return '';
- }
- $slash = trim($matches[1]);
- $elem = $matches[2];
- $attrlist = $matches[3];
- if (
- !isset($this->allowed_html[strtolower($elem)]) ||
- !is_array($this->allowed_html[strtolower($elem)])
- )
- {
-
- return '';
- }
- if ($slash != '')
- {
- return "<$slash$elem>";
- }
-
- return $this->_attr("$slash$elem", $attrlist);
- }
-
- function _attr($element, $attr)
- {
-
- $xhtml_slash = '';
- if (preg_match('%\s/\s*$%', $attr))
- {
- $xhtml_slash = ' /';
- }
-
- if (
- !isset($this->allowed_html[strtolower($element)]) ||
- count($this->allowed_html[strtolower($element)]) == 0
- )
- {
- return "<$element$xhtml_slash>";
- }
-
- $attrarr = $this->_hair($attr);
-
-
- $attr2 = '';
- if(is_array($attrarr) && count($attrarr) > 0)
- {
- foreach ($attrarr as $arreach)
- {
- if(!isset($this->allowed_html[strtolower($element)][strtolower($arreach['name'])]))
- {
- continue;
- }
- $current = $this->allowed_html[strtolower($element)][strtolower($arreach['name'])];
- if ($current == '')
- {
-
- continue;
- }
- if (!is_array($current))
- {
-
- $attr2 .= ' '.$arreach['whole'];
- }
- else
- {
-
- $ok = true;
- if(is_array($current) && count($current) > 0)
- {
- foreach ($current as $currkey => $currval)
- {
- if (!$this->_check_attr_val($arreach['value'], $arreach['vless'], $currkey, $currval))
- {
- $ok = false;
- break;
- }
- }
- if ($ok)
- {
-
- $attr2 .= ' '.$arreach['whole'];
- }
- }
- }
- }
- }
-
- $attr2 = preg_replace('/[<>]/', '', $attr2);
- return "<$element$attr2$xhtml_slash>";
- }
-
- function _hair($attr)
- {
- $attrarr = array();
- $mode = 0;
- $attrname = '';
-
- while (strlen($attr) != 0)
- {
-
- $working = 0;
- switch ($mode)
- {
- case 0:
- if (preg_match('/^([-a-zA-Z]+)/', $attr, $match))
- {
- $attrname = $match[1];
- $working = $mode = 1;
- $attr = preg_replace('/^[-a-zA-Z]+/', '', $attr);
- }
- break;
- case 1:
- if (preg_match('/^\s*=\s*/', $attr))
- {
- $working = 1;
- $mode = 2;
- $attr = preg_replace('/^\s*=\s*/', '', $attr);
- break;
- }
- if (preg_match('/^\s+/', $attr))
- {
- $working = 1;
- $mode = 0;
- $attrarr[] = array(
- 'name' => $attrname,
- 'value' => '',
- 'whole' => $attrname,
- 'vless' => 'y'
- );
- $attr = preg_replace('/^\s+/', '', $attr);
- }
- break;
- case 2:
- if (preg_match('/^"([^"]*)"(\s+|$)/', $attr, $match))
- {
- $thisval = $this->_bad_protocol($match[1]);
- $attrarr[] = array(
- 'name' => $attrname,
- 'value' => $thisval,
- 'whole' => "$attrname=\"$thisval\"",
- 'vless' => 'n'
- );
- $working = 1;
- $mode = 0;
- $attr = preg_replace('/^"[^"]*"(\s+|$)/', '', $attr);
- break;
- }
- if (preg_match("/^'([^']*)'(\s+|$)/", $attr, $match))
- {
- $thisval = $this->_bad_protocol($match[1]);
- $attrarr[] = array(
- 'name' => $attrname,
- 'value' => $thisval,
- 'whole' => "$attrname='$thisval'",
- 'vless' => 'n'
- );
- $working = 1;
- $mode = 0;
- $attr = preg_replace("/^'[^']*'(\s+|$)/", '', $attr);
- break;
- }
- if (preg_match("%^([^\s\"']+)(\s+|$)%", $attr, $match))
- {
- $thisval = $this->_bad_protocol($match[1]);
- $attrarr[] = array(
- 'name' => $attrname,
- 'value' => $thisval,
- 'whole' => "$attrname=\"$thisval\"",
- 'vless' => 'n'
- );
-
- $working = 1;
- $mode = 0;
- $attr = preg_replace("%^[^\s\"']+(\s+|$)%", '', $attr);
- }
- break;
- }
- if ($working == 0)
- {
- $attr = $this->_html_error($attr);
- $mode = 0;
- }
- }
-
-
- if ($mode == 1)
- {
- $attrarr[] = array(
- 'name' => $attrname,
- 'value' => '',
- 'whole' => $attrname,
- 'vless' => 'y'
- );
- }
- return $attrarr;
- }
-
- function _bad_protocol($string)
- {
- $string = $this->_no_null($string);
- $string = preg_replace('/\xad+/', '', $string);
- $string2 = $string.'a';
- while ($string != $string2)
- {
- $string2 = $string;
- $string = $this->_bad_protocol_once($string);
- }
- return $string;
- }
-
- function _bad_protocol_once($string)
- {
- $string2 = preg_split('/:|:|:/i', $string, 2);
- if(isset($string2[1]) && !preg_match('%/\?%',$string2[0]))
- {
- $string = $this->_bad_protocol_once2($string2[0]).trim($string2[1]);
- }
- return $string;
- }
-
- function _bad_protocol_once2($string)
- {
- $string = $this->_decode_entities($string);
- $string = preg_replace('/\s/', '', $string);
- $string = $this->_no_null($string);
- $string = preg_replace('/\xad+/', '', $string);
- $string = strtolower($string);
- $allowed = false;
- if(is_array($this->allowed_protocols) && count($this->allowed_protocols) > 0)
- {
- foreach ($this->allowed_protocols as $one_protocol)
- {
- if (strtolower($one_protocol) == $string)
- {
- $allowed = true;
- break;
- }
- }
- }
- if ($allowed)
- {
- return "$string:";
- }
- else
- {
- return '';
- }
- }
-
- function _check_attr_val($value, $vless, $checkname, $checkvalue)
- {
- $ok = true;
- switch (strtolower($checkname))
- {
-
- case 'maxlen':
- if (strlen($value) > $checkvalue)
- {
- $ok = false;
- }
- break;
-
- case 'minlen':
- if (strlen($value) < $checkvalue)
- {
- $ok = false;
- }
- break;
-
- case 'maxval':
- if (!preg_match('/^\s{0,6}[0-9]{1,6}\s{0,6}$/', $value))
- {
- $ok = false;
- }
- if ($value > $checkvalue)
- {
- $ok = false;
- }
- break;
-
- case 'minval':
- if (!preg_match('/^\s{0,6}[0-9]{1,6}\s{0,6}$/', $value))
- {
- $ok = false;
- }
- if ($value < $checkvalue)
- {
- $ok = false;
- }
- break;
-
- case 'valueless':
- if (strtolower($checkvalue) != $vless)
- {
- $ok = false;
- }
- break;
- }
- return $ok;
- }
-
- function _stripslashes($string)
- {
- return preg_replace('%\\\\"%', '"', $string);
- }
-
- function _html_error($string)
- {
- return preg_replace('/^("[^"]*("|$)|\'[^\']*(\'|$)|\S)*\s*/', '', $string);
- }
-
- function _decode_entities($string)
- {
- $string = preg_replace('/&#([0-9]+);/e', 'chr("\\1")', $string);
- $string = preg_replace('/&#[Xx]([0-9A-Fa-f]+);/e', 'chr(hexdec("\\1"))', $string);
- return $string;
- }
-
- function _version()
- {
- return 'PHP4 0.2.2 (OOP fork of procedural kses 0.2.2)';
- }
- }
- }
- ?>
|