TYPO3 Core

}

}

//

if (count($XclassParts)==2) {

unset($reg);

preg_match('/^\[[\'"]([[:alnum:]_\/\.]*)[\'"]\]/',$XclassParts[1],$reg);

*/

function parseCookie($cookie_str) {

$cookie_str = str_replace('; ', ';', $cookie_str) . ';';

$value_str = $data[0];

$cookie_param = 'domain=';

while(list($tK,$tV)=each($aKeys)) {

$aKeys[$tK]=quotemeta($tV);

}

// Doing regex's

$storeArr['k']=$keyList[0];

// Setting cache:

$this->substMarkerCache[$storeKey] = $storeArr;

if ($GLOBALS['TSFE']->no_cache && $conf['sword'] && is_array($GLOBALS['TSFE']->sWordList) && $GLOBALS['TSFE']->sWordRegEx) {

$newstring = '';

do {

$newstring.=$pieces[0];

$match_len = strlen($data)-(strlen($pieces[0])+strlen($pieces[1]));

if (strstr($pieces[0],'<') || strstr($pieces[0],'>')) {

* @return string Cleaned up string, keywords will be separated by a comma only.

*/

function keywords($content) {

reset($listArr);

while(list($k,$v)=each($listArr)) {

$listArr[$k]=trim($v);

$emailContent = trim($msg);

if ($emailContent) {

$subject=trim($parts[0]);

$plain_message=trim($parts[1]);

$where = '';

if ($sw) {

$searchFields = explode(',',$searchFieldList);

while(list(,$val)=each($kw)) {

$val = trim($val);

$res = t3lib_div::getURL($code, 1, $headerArr);

// Header and content are separated by an empty line

$content.= "\r\n";

if (false === $res) {

* @return string Processed output.

*/

function wordWrapper($content,$max=50,$char=' -') {

foreach($array as $val) {

if (strlen($val)>$max) {

$content=str_replace($val,substr(chunk_split($val,$max,$char),0,-1),$content);

* @return [type] ...

*/

function suggestTCAFieldDefinition($fieldName,$fieldInfo) {

switch($type) {

case 'int':

$out="

global $TCA,$BE_USER,$TCA_DESCR;

// Split references by comma, vert.line or linebreak

$lines = array();

foreach($items as $val) {

}

// create_function() returns a string:

if (!is_string($getValueFunc)) {

}

// Do the filtering:

if (is_array($keepItems) && count($keepItems)) {

$tag_tmp = trim(substr($tag_tmp,1)); // Removes = chars.

} else {

// There are '' around the value. We look for the next ' ' or '>'

$value[] = trim($reg[0]);

$tag_tmp = trim(substr($tag_tmp,strlen($reg[0]),1).$reg[1]);

}

$test = trim($test);

if (strlen($test)) {

if (preg_match('/^\*.+\*$/',$test)) {

if (in_array(substr($test,1,-1), $allLanguages)) {return true;}

} else {

if (t3lib_div::getIndpEnv('HTTP_ACCEPT_LANGUAGE') == $test) {return true;}

{ return t3lib_div::compat_version($value); }

break;

case 'userFunc':

$funcName=trim($values[0]);

$funcValue = t3lib_div::trimExplode(',',$values[1]);

$pre = $GLOBALS['TSFE']->TYPO3_CONF_VARS['FE']['userFuncClassPrefix'];

if (!$detectedType) $detectedType = ereg('[[:space:]]*0x([[:alnum:]]*)[[:space:]]+0x([[:alnum:]]*)[[:space:]]+',$value) ? 'whitespaced' : 'ms-token';

if ($detectedType=='ms-token') {

} elseif ($detectedType=='whitespaced') {

$regA=array();

ereg('[[:space:]]*0x([[:alnum:]]*)[[:space:]]+0x([[:alnum:]]*)[[:space:]]+',$value,$regA);

while (!feof($fh)) {

$line = fgets($fh,4096);

// has a lot of info

$ord = hexdec($char);

if ($ord > 0xFFFF) break; // only process the BMP

case '<vertical>':

continue 2;

}

}

}

fclose($fh);

if ($cond == '' || $cond{0} == '#') {

$utf8_char = $this->UnumberToChar(hexdec($char));

if ($char != $lower) {

for ($i=0; isset($arr[$i]); $i++) $arr[$i] = $this->UnumberToChar(hexdec($arr[$i]));

$utf8CaseFolding['toLower'][$utf8_char] = implode('',$arr);

}

if ($char != $title && $title != $upper) {

for ($i=0; isset($arr[$i]); $i++) $arr[$i] = $this->UnumberToChar(hexdec($arr[$i]));

$utf8CaseFolding['toTitle'][$utf8_char] = implode('',$arr);

}

if ($char != $upper) {

for ($i=0; isset($arr[$i]); $i++) $arr[$i] = $this->UnumberToChar(hexdec($arr[$i]));

$utf8CaseFolding['toUpper'][$utf8_char] = implode('',$arr);

}

if ($line{0} != '#' && trim($line) != '') {

list($char,$translit) = t3lib_div::trimExplode(';', $line);

if (!$translit) $omit["U+$char"] = 1;

}

}

$attribRegex = $this->tag_regex(array('img','table','td','tr','body','iframe','script','input','embed'));

// split the document by the beginning of the above tags

$len = strlen($codepieces[0]);

$pieces = count($codepieces);

$reg = array();

// Extracting stylesheets

$attribRegex = $this->tag_regex(array('link'));

// Split the document by the beginning of the above tags

$pieces = count($codepieces);

for ($i = 1; $i < $pieces; $i++) {

$dummy = eregi("[^>]*", $codepieces[$i], $reg);

}

// fixes javascript rollovers

$pieces = count($codepieces);

$expr = "^[^".quotemeta("\"").quotemeta("'")."]*";

for($i = 1; $i < $pieces; $i++) {

public function extractHyperLinks() {

$html_code = $this->theParts['html']['content'];

$attribRegex = $this->tag_regex(array('a','form','area'));

$len = strlen($codepieces[0]);

$pieces = count($codepieces);

for($i = 1; $i < $pieces; $i++) {

if (strpos(' '.$htmlCode,'<frame ')) {

$attribRegex = $this->tag_regex('frame');

// Splits the document by the beginning of the above tags

$pieces = count($codepieces);

for($i = 1; $i < $pieces; $i++) {

$dummy = eregi("[^>]*", $codepieces[$i], $reg);

*/

public function tag_regex($tags) {

$tags = (!is_array($tags) ? array($tags) : $tags);

$c = count($tags);

foreach($tags as $tag) {

$c--;

$regexp .= '<' . sql_regcase($tag) . "[[:space:]]" . (($c) ? '|' : '');

}

}

// Find attribute

while ($tag) {

$value = '';

$attrib = $reg[0];

$tag = ltrim(substr($tag,strlen($attrib),$tagLen));

$editFieldList=array_unique(t3lib_div::trimExplode(',',$list,1));

foreach($editFieldList as $theFieldC) {

$theField = trim($theField);

$palFields = trim($palFields);

if ($TCA[$table]['columns'][$theField]) {

// Kasper's comment (kept for history): Maybe there is a better way to do this than store the HTML for the new element in rawurlencoded format - maybe it even breaks with certain charsets? But for now this works...

$this->additionalJS_post = $additionalJS_post_saved;

$this->additionalJS_submit = $additionalJS_submit_saved;

$newElementsLinks[]= '<a href="#" onclick="'.htmlspecialchars($onClickInsert).'">

<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/new_el.gif','width="11" height="12"').' alt="' . $new . '" title="' . $new . '" align="absmiddle" />' .

htmlspecialchars(t3lib_div::fixed_lgd_cs($this->sL($nCfg['tx_templavoila']['title']),30)) . '</a>';

$output.= '

<div style="padding: 5px 0px 5px 20px;">

<a href="#" onclick="'.htmlspecialchars('flexFormToggleSubs("'.$idTagPrefix.'"); return false;').'">

$toggleAll . '" title="' . $toggleAll . '" />

<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/pil2right.gif','width="7" height="12"').' align="absmiddle" alt="' .

$toggleAll . '" title="' . $toggleAll . '" />' . $toggleAll . '