TYPO3 Core

// Finding the RGB definitions of the color:

$string=$cParts[0];

if (strstr($string,'#')) {

$col[]=HexDec(substr($string,0,2));

$col[]=HexDec(substr($string,2,2));

$col[]=HexDec(substr($string,4,2));

} elseif (strstr($string,',')) {

$strArr = explode(',',$string);

$col[]=intval($strArr[0]);

$col[]=intval($strArr[1]);

* @see imageMagickConvert(), tslib_cObj::getImgResource()

*/

function getImageDimensions($imageFile) {

if (file_exists($imageFile) && t3lib_div::inList($this->imageFileExt,strtolower($reg[0]))) {

if ($returnArr = $this->getCachedImageDimensions($imageFile)) {

return $returnArr;

global $TYPO3_DB;

// Create a md5 hash of the filename

$md5Hash = md5_file($imageFile);

$res = $TYPO3_DB->exec_SELECTquery ('md5hash, imagewidth, imageheight', 'cache_imagesizes', 'md5filename='.$TYPO3_DB->fullQuoteStr(md5($imageFile),'cache_imagesizes'));

if ($res) {

if ($row = $TYPO3_DB->sql_fetch_assoc($res)) {

$splitstring=$returnVal[0];

$this->IM_commands[] = Array ('identify',$cmd,$returnVal[0]);

if ($splitstring) {

$splitinfo = explode(' ', $splitstring);

while (list($key,$val) = each($splitinfo)) {

$temp = '';

function output($file) {

if ($file) {

$reg = array();

$ext=strtolower($reg[0]);

switch($ext) {

case 'gif':

$treeKey = key($this->tree); // Get the key for this space

$LN = ($a==$c)?'blank':'line';

$title = $val;

$path = $files_path.$val.'/';

$webpath=t3lib_BEfunc::getPathType_web_nonweb($path);

* - trim/ltrim/rtrim: the second parameter 'charlist' won't work for characters not contained in 7-bit ASCII

* - strpos/strrpos: they return the BYTE position, if you need the CHARACTER position use utf8_strpos/utf8_strrpos

* - htmlentities: charset support for UTF-8 only since PHP 4.3.0

*

* Functions NOT working on UTF-8 strings:

*

* - stripos

* - substr

* - strrev

* - split/spliti

* - ...

*

*/

}

$token = md5(microtime());

foreach($parts as $k => $v) {

if ($k%2) {

if (substr($v,0,1)=='#') { // Dec or hex entities:

// Detect type if not done yet: (Done on first real line)

// The "whitespaced" type is on the syntax "0x0A 0x000A #LINE FEED" while "ms-token" is like "B9 = U+00B9 : SUPERSCRIPT ONE"

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

list($hexbyte, $utf8) = preg_split('/[=:]/', $value, 3);

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

$regA=array();

$hexbyte = $regA[1];

$utf8 = 'U+'.$regA[2];

}

// accented Latin letters without "official" decomposition

$match = array();

$c = ord($match[2]);

if ($match[1] == 'SMALL') $c += 32;

}

$match = array();

switch($match[1]) {

case '<circle>': // add parenthesis as circle replacement, eg (1)

$match[2] = '0028 '.$match[2].' 0029';

break;

case '<compat>': // ignore multi char decompositions that start with a space

break;

// ignore Arabic and vertical layout presentation decomposition

global $TYPO3_LOADED_EXT;

if (isset($this->absPathArray[$name])) {

}

}

*/

function checkMod($name, $fullpath) {

$modconf=Array();

if (@is_dir($path) && file_exists($path.'/conf.php')) {

$MCONF = array();

$MLANG = array();

return './';

}

$found = true;

$slash_pos=0;

'ftpspace' => array('allow'=>'*', 'deny'=>'')

),

'customPermOptions' => array(), // Array with sets of custom permission options. Syntax is; 'key' => array('header' => 'header string, language splitted', 'items' => array('key' => array('label, language splitted', 'icon reference', 'Description text, language splitted'))). Keys cannot contain ":|," characters.

'interfaces' => 'backend', // This determines which interface options is available in the login prompt and in which order (All options: ",backend,backend_old,frontend")

'useOnContextMenuHandler' => 1, // Boolean. If set, the context menus (clickmenus) in the backend are activated on right-click - although this is not a XHTML attribute!

'loginLabels' => 'Username|Password|Interface|Log In|Log Out|Backend,Front End,Traditional Backend|Administration Login on ###SITENAME###|(Note: Cookies and JavaScript must be enabled!)|Important Messages:|Your login attempt did not succeed. Make sure to spell your username and password correctly, including upper/lowercase characters.', // Language labels of the login prompt.

$token = md5(microtime());

// Markup all tag names with token.

// Splitting by token:

$parts = explode($token,$markUpStr);

// Removing SELECT:

$parseString = $this->trimSQL($parseString);

// Init output variable:

$result = array();

// Removing UPDATE

$parseString = $this->trimSQL($parseString);

// Init output variable:

$result = array();

// Removing INSERT

$parseString = $this->trimSQL($parseString);

// Init output variable:

$result = array();

// Removing DELETE

$parseString = $this->trimSQL($parseString);

// Init output variable:

$result = array();

// Removing EXPLAIN

$parseString = $this->trimSQL($parseString);

// Init output variable:

$result = $this->parseSELECT($parseString);

// Removing CREATE TABLE

$parseString = $this->trimSQL($parseString);

// Init output variable:

$result = array();

// Removing ALTER TABLE

$parseString = $this->trimSQL($parseString);

// Init output variable:

$result = array();

// Removing DROP TABLE

$parseString = $this->trimSQL($parseString);

// Init output variable:

$result = array();

// Removing CREATE DATABASE

$parseString = $this->trimSQL($parseString);

// Init output variable:

$result = array();

$reg = array();

//preg_match('/[\]*$/',$v,$reg); // does not work. what is the *exact* meaning of the next line?

if ($reg AND strlen($reg[0])%2) {

$buffer.=$quote;

} else {

*/

function trimSQL($str) {

return trim(rtrim($str, "; \r\n\t")).' ';

}

$recursivityLevels = isset($fieldValue['config']['fileFolder_recursions']) ? t3lib_div::intInRange($fieldValue['config']['fileFolder_recursions'],0,99) : 99;

// Get files:

$fileArr = t3lib_div::getAllFilesAndFoldersInPath(array(),$fileFolder,$extList,0,$recursivityLevels);

$fileArr = t3lib_div::removePrefixPathFromList($fileArr, $fileFolder);

// Item configuration:

$items[] = array(

$theTypeArrays[1],

'',

$descr

// Add item to be selected:

$items[] = array(

'['.$itemContent[2].'] '.$itemContent[1],

$icons[$itemContent[0]]

);

}

// Add item to be selected:

$items[] = array(

$GLOBALS['LANG']->sl($itemCfg[0]),

$icon,

$GLOBALS['LANG']->sl($itemCfg[2]),

);

function freebsd_loadavg() {

$buffer= `uptime`;

$load = array();

return max((float)$load[2], (float)$load[3], (float)$load[4]);

}

$fV="";

}

$fV=htmlspecialchars($fV);

return array($fN,$fV,$params);

}

function ext_loadResources($absPath) {

$this->ext_readDirResources($GLOBALS["TYPO3_CONF_VARS"]["MODS"]["web_ts"]["onlineResourceDir"]);

if (is_dir($absPath)) {

$this->readDirectory($absPath);

}

$this->ext_resourceDims();

define('TYPO3_OS', stristr(PHP_OS,'win')&&!stristr(PHP_OS,'darwin')?'WIN':'');

define('TYPO3_MODE','BE');

if(!defined('PATH_thisScript')) define('PATH_thisScript',str_replace('//','/', str_replace('\\','/', (php_sapi_name()=='cgi'||php_sapi_name()=='isapi' ||php_sapi_name()=='cgi-fcgi')&&($_SERVER['ORIG_PATH_TRANSLATED']?$_SERVER['ORIG_PATH_TRANSLATED']:$_SERVER['PATH_TRANSLATED'])? ($_SERVER['ORIG_PATH_TRANSLATED']?$_SERVER['ORIG_PATH_TRANSLATED']:$_SERVER['PATH_TRANSLATED']):($_SERVER['ORIG_SCRIPT_FILENAME']?$_SERVER['ORIG_SCRIPT_FILENAME']:$_SERVER['SCRIPT_FILENAME']))));

if(!defined('PATH_t3lib')) define('PATH_t3lib', PATH_site.'t3lib/');

define('PATH_typo3conf', PATH_site.'typo3conf/');

define('TYPO3_mainDir', 'typo3/'); // This is the directory of the backend administration for the sites of this TYPO3 installation.

// Check file extension:

$reg = array();

$ext=strtolower($reg[2]);

$ext=($ext=='jpeg')?'jpg':$ext;

if ($ext=='ttf') {

}

if (substr(trim($lineContent),-1)==';') {

if (isset($statementArray[$statementArrayPointer])) {

unset($statementArray[$statementArrayPointer]);

}

}

$insertCount = array();

foreach ($statements as $line => $lineContent) {

$reg = array();

$table = trim($reg[1]);

if ($table) {

// table names are always lowercase on Windows!

$lineContent = implode(chr(10), $sqlLines);

$crTables[$table] = $lineContent;

}

$nTable = trim($reg[1]);

$insertCount[$nTable]++;

}

$this->fields[$fN] = $fC['config'];

$this->fields[$fN]['exclude'] = $fC['exclude'];

if (is_array($fC) && $fC['label']) {

switch ($this->fields[$fN]['type']) {

case 'input':

$this->fields[$fN]['type']='number';

$this->fields[$fN]['type'] = 'time';

$this->fields[$fN]['type']='date';

} else {

$this->fields[$fN]['type']='text';

foreach($theExcludeFields as $theExcludeFieldsArrays) {

foreach($elements as $eKey => $value) {

if (!strcmp($theExcludeFieldsArrays[1],$value)) {

}

}

}

while(list(,$ppstr)=each($parts)) {

$mparts = explode('=',$ppstr,2);

if (count($mparts)>1) {

} else {

$cTypes[]=$ppstr;

}

$parts = explode('>:',$c,2);

$cp['reason_text']=trim($parts[1]);

$cp['mailserver']='Qmail';

$cp['reason']=550; // 550 Invalid recipient

} elseif (stristr($cp['reason_text'],'couldn\'t find any host named')) {

$cp['reason']=2; // Bad host

$cp['reason']=554;

} else {

$cp['reason']=-1;

$cp['content']=trim($c);

$cp['reason_text']=trim(substr($c,0,1000));

$cp['mailserver']='unknown';

$cp['reason']=550; // 550 Invalid recipient, User unknown

$cp['reason']=551;

$cp['reason']=554;

} else {

$cp['reason']=-1;

// Email:

$reg='';

if (t3lib_div::validEmail($str)) {

$outArr['email']=$str;

} elseif ($reg[1] && t3lib_div::validEmail($reg[1])) {

list($namePart)=explode($reg[0],$str);

if (trim($namePart)) {

$reg='';

if (trim($reg[1])) {

$outArr['name']=trim($reg[1]);

} else $outArr['name']=trim($namePart);

next($cTypeParts);

while(list(,$v)=Each($cTypeParts)) {

$reg='';

if (trim($reg[1]) && trim($reg[2])) {

$outValue[strtolower($reg[1])] = $reg[2];

}

}

// Create tagged icon file name:

// Check if tagged icon file name exists (a tagget icon means the icon base name with the flags added between body and extension of the filename, prefixed with underscore)

if (@is_file(dirname($absfile).'/'.$iconFileName_stateTagged)) { // Look for [iconname]_xxxx.[ext]

return dirname($iconfile).'/'.$iconFileName_stateTagged;

} elseif ($doNotGenerateIcon) { // If no icon generation can be done, try to look for the _X icon:

if (@is_file(dirname($absfile).'/'.$iconFileName_X)) {

return dirname($iconfile).'/'.$iconFileName_X;

} else {

public static function skinImg($backPath, $src, $wHattribs = '', $outputMode = 0) {

// Setting source key. If the icon is refered to inside an extension, we homogenize the prefix to "ext/":

#if ($src!=$srcKey)debug(array($src, $srcKey));

// LOOKING for alternative icons:

// Search for alternative icon automatically:

$fExt = $GLOBALS['TBE_STYLES']['skinImgAutoCfg']['forceFileExtension'];

$scaleFactor = $GLOBALS['TBE_STYLES']['skinImgAutoCfg']['scaleFactor'] ? $GLOBALS['TBE_STYLES']['skinImgAutoCfg']['scaleFactor'] : 1; // Scaling factor

if ($fExt && !@is_file($GLOBALS['TBE_STYLES']['skinImgAutoCfg']['absDir'] . $lookUpName)) {

// fallback to original filename if icon with forced extension doesn't exists

}

// DEBUG: This doubles the size of all icons - for testing/debugging:

// rendering disabled (greyed) icons using _i (inactive) as name suffix ("_d" is already used)

if (substr($ISF_file,0,4)=='EXT:') {

list($ISF_extKey,$ISF_localPath) = explode('/',substr($ISF_file,4),2);

if (strcmp($ISF_extKey,'') && t3lib_extMgm::isLoaded($ISF_extKey) && strcmp($ISF_localPath,'')) {

$ISF_filePath = t3lib_extMgm::extPath($ISF_extKey).$ISF_localPath;

if (@is_dir($ISF_filePath)) {

$mExtKey = str_replace('_','',$ISF_extKey.'/'.$ISF_localPath);

$c=count($fileparts);

$files = t3lib_div::trimExplode(',', $res);

foreach ($files as $file) {

$outFile = $file;

break;

}

*/

function triggerField($fieldName) {

return '<input type="hidden" name="'.htmlspecialchars($triggerFieldName).'" value="RTE" />';

}

}

* @return string Image tag, modified with $attr attributes added.

*/

function addTagAttributes($icon,$attr) {

}

/**

$elements[$k]['matchString'] = $v;

// If the image seems to be from fileadmin/ folder or an RTE image, then proceed to set up substitution token:

// Token and substitute value:

if (strstr($splitContent[$k], $attribs[0]['src'])) { // Make sure the value we work on is found and will get substituted in the content (Very important that the src-value is not DeHSC'ed)

$splitContent[$k] = str_replace($attribs[0]['src'], '{softref:'.$tokenID.'}', $splitContent[$k]); // Substitute value with token (this is not be an exact method if the value is in there twice, but we assume it will not)

$elements = array();

foreach($linkTags as $k => $foundValue) {

if ($k%2) {

$tLP = $this->getTypoLinkParts($typolinkValue);

$linkTags[$k] = '<LINK '.$this->setTypoLinkPartsElement($tLP, $elements, $typolinkValue, $k).'>';

}

// Detecting the kind of reference:

if(strstr($link_param,'@') && !$pU['scheme']) { // If it's a mail address:

$finalTagParts['LINK_TYPE'] = 'mailto';

$finalTagParts['url'] = trim($link_param);

if (count($specConfParts)) {

foreach($specConfParts as $k2 => $v2) {

unset($specConfParts[$k2]);

$specConfParts[trim($reg[1])] = array(

'parameters' => t3lib_div::trimExplode('|', $reg[2], 1)

);

$parts[] = $LANG->sL($TCA['pages']['columns']['mount_pid_ol']['label']);

}

}

if ($row['hidden']) $parts[] = $LANG->sL('LLL:EXT:lang/locallang_core.php:labels.hidden');

if ($row['starttime']) $parts[] = $LANG->sL($TCA['pages']['columns']['starttime']['label']).' '.t3lib_BEfunc::dateTimeAge($row['starttime'], -1, 'date');

if ($row['endtime']) $parts[] = $LANG->sL($TCA['pages']['columns']['endtime']['label']).' '.t3lib_BEfunc::dateTimeAge($row['endtime'], -1, 'date');

if (is_array($dRec)) {

reset($dRec);

$dRecord = current($dRec);

}

}

}

public static function getDomainStartPage($domain, $path = '') {

if (t3lib_extMgm::isLoaded('cms')) {

$domain = explode(':', $domain);

// path is calculated.

// stuff:

$domain.=$path;

foreach($keyList as $val) {

$reg = array();

$output[$reg[1]] = t3lib_div::trimExplode(';', $reg[2], 1);

} else {

$output[$val] = '';

$content = '';

foreach($this->parentDirs as $k => $v) {

$content.='<br /><br /><br />';

$content.=$this->headerParentDir($dir);

if (@is_dir($dir)) {

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

$tag = strtolower(strtok(substr($html_code,$len+1,10),' '));

$len += strlen($tag)+strlen($codepieces[$i])+2;

$attributes = $this->get_tag_attributes($reg[0]); // Fetches the attributes for the tag

$imageData = array();

$codepieces = preg_split($attribRegex, $html_code);

$pieces = count($codepieces);

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

// fetches the attributes for the tag

$attributes = $this->get_tag_attributes($reg[0]);

$imageData = array();

// fixes javascript rollovers

$codepieces = preg_split('/' . quotemeta(".src") . '/', $html_code);

$pieces = count($codepieces);

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

$temp = $codepieces[$i];

$imageData['ref'] = $reg[0];

$imageData['quotes'] = substr($temp,0,1);

// subst_str is the string to look for, when substituting lateron

$tag = strtolower(strtok(substr($html_code,$len+1,10)," "));

$len += strlen($tag) + strlen($codepieces[$i]) + 2;

// Fetches the attributes for the tag

$attributes = $this->get_tag_attributes($reg[0]);

$hrefData = array();

$codepieces = preg_split($attribRegex, $htmlCode, 1000000);

$pieces = count($codepieces);

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

// Fetches the attributes for the tag

$attributes = $this->get_tag_attributes($reg[0]);

$frame = array();

$len = strcspn($textpieces[$i],chr(32).chr(9).chr(13).chr(10));

if (trim(substr($textstr,-1)) == '' && $len) {

$lastChar = substr($textpieces[$i],$len-1,1);

$len--;

}

foreach($items as $key => $part) {

$sub = substr($part, 0, 200);

// The position of the string

$thePos = strpos($part,$reg[0]);

// Finds the id of the media...

$theSubStr = $this->theParts['html']['media'][intval($reg2[1])]['absRef'];

if ($thePos && $theSubStr) {

// ... and substitutes the javaScript rollover image with this instead

$info = parse_url($ref);

if ($info['scheme']) {

return $ref;

$addr = parse_url($this->theParts['html']['path']);

return $addr['scheme'].'://'.$addr['host'].($addr['port']?':'.$addr['port']:'').$ref;

} else {

*/

public function split_fileref($fileref) {

$info = array();

$info['path'] = $reg[1];

$info['file'] = $reg[2];

} else {

$info['file'] = $fileref;

}

$reg = '';

$info['filebody'] = $reg[1];

$info['fileext'] = strtolower($reg[2]);

$info['realFileext'] = $reg[2];

*/

public function extParseUrl($path) {

$res = parse_url($path);

$res['filepath'] = $reg[1];

$res['filename'] = $reg[2];

return $res;

*/

public function get_tag_attributes($tag) {

$attributes = array();

$tagLen = strlen($tag);

$safetyCounter = 100;

// Find attribute

$value = $reg[0];

} else {

// No quotes around value

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

$tag = ltrim($reg[2]);

if (substr($tag,0,1) == '>') {

*/

function getDomainStartPage($domain, $path='',$request_uri='') {

$domain = explode(':',$domain);

// Removing extra trailing slashes

// Appending to domain string

$domain.= $path;

$res = $GLOBALS['TYPO3_DB']->exec_SELECTquery(

'pages.uid,sys_domain.redirectTo,sys_domain.redirectHttpStatusCode,sys_domain.prepend_params',

if ($row['redirectTo']) {

$redirectUrl = $row['redirectTo'];

if ($row['prepend_params']) {

$redirectUrl .= '/' . $prependStr;

}

*/

public static function split_fileref($fileref) {

$reg = array();

$info['path'] = $reg[1];

$info['file'] = $reg[2];

} else {

$info['file'] = $fileref;

}

$reg='';

$info['filebody'] = $reg[1];

$info['fileext'] = strtolower($reg[2]);

$info['realFileext'] = $reg[2];

* @return string

*/

public static function rm_endcomma($string) {

}

/**

* @see calcParenthesis()

*/

public static function calcPriority($string) {

$string='+'.$string; // Ensuring an operator for the first entrance

$qm='\*\/\+-^%';

$regex = '(['.$qm.'])(['.$qm.']?[0-9\.]*)';

* @return string Converted result.

*/

public static function deHSCentities($str) {

}

/**

$name = '';

}

} else {

$attributes[$key] = '';

$name = $key;

}

* @return array Array with the attribute values.

*/

public static function split_tag_attributes($tag) {

// Removes any > in the end of the string

$value = array();

while (strcmp($tag_tmp,'')) { // Compared with empty string instead , 030102

}

// The tag name is cleaned up so only alphanumeric chars (plus - and _) are in there and not longer than 100 chars either.

// If the value is an array then we will call this function recursively:

if (is_array($v)) {

// Checking if the "subdir" is found:

$subdir = substr($fI['dirname'],strlen($dirName));

if ($subdir) {

$dirName.= $subdir;

if (!@is_dir($dirName)) {

t3lib_div::mkdir_deep(PATH_site.'typo3temp/', $subdir);

// Initialize variabels:

$filearray = array();

$sortarray = array();

// Find files+directories:

if (@is_dir($path)) {

$pString = t3lib_div::implodeArrayForUrl('', $params);

}

/**

list($v,$n) = explode('|',$GLOBALS['TYPO3_CONF_VARS']['SYS']['requestURIvar']);

$retVal = $GLOBALS[$v][$n];

} elseif (!$_SERVER['REQUEST_URI']) { // This is for ISS/CGI which does not have the REQUEST_URI available.

($_SERVER['QUERY_STRING']?'?'.$_SERVER['QUERY_STRING']:'');

} else {

$retVal = $_SERVER['REQUEST_URI'];

break;

case 'msie':

$tmp = strstr($useragent,'MSIE');

break;

case 'opera':

$tmp = strstr($useragent,'Opera');

break;

case 'konqu':

$tmp = strstr($useragent,'Konqueror/');

*/

public static function verifyFilenameAgainstDenyPattern($filename) {

if (strcmp($filename,'') && strcmp($GLOBALS['TYPO3_CONF_VARS']['BE']['fileDenyPattern'],'')) {

if ($result) return false; // so if a matching filename is found, return false;

}

return true;

if($quoteActive > -1) {

$paramsArr[$quoteActive] .= ' '.$v;

unset($paramsArr[$k]);

} elseif(!trim($v)) {

unset($paramsArr[$k]); // Remove empty elements

$quoteActive = $k;

}

}

$fields = $fC['config'];

$fields['exclude'] = $fC['exclude'];

if (is_array($fC) && $fC['label']) {

switch ($fields['type']) {

case 'input':

$fields['type'] = 'number';

$fields['type'] = 'time';

$fields['type'] = 'date';

} else {

$fields['type'] = 'text';

$parts = $this->splitIntoBlock('style',$content);

foreach($parts as $k => $v) {

if ($k%2) {

}

}

$content = implode('',$parts);

reset($SOBE->MOD_SETTINGS);

while(list($key)=each($SOBE->MOD_SETTINGS)) {

$this->storeList[$key]=$key;

}

}

* @return string Processed input value

*/

function substNewline($string) {

}

/**

if (!strcmp($value,'')) return TRUE;

// Certain characters are not allowed in the value

return FALSE;

}

break;

}

}

$value = intval(str_replace(' ','',$value)).'.'.substr($theDec,0,2);

break;

case 'md5':

$value = str_replace(' ','',$value);

break;

case 'alpha':

break;

case 'num':

break;

case 'alphanum':

break;

case 'alphanum_x':

break;

default:

if (substr($func, 0, 3) == 'tx_') {

if (t3lib_div::isFirstPartOfStr($filename,'RTEmagicC_')) {

$fileInfo['exists'] = @is_file(PATH_site.$rec['ref_string']);

$fileInfo['original_exists'] = @is_file(PATH_site.$fileInfo['original']);

// CODE from tx_impexp and class.rte_images.php adapted for use here:

* @return string Output string with any comma in the end removed, if any.

*/

function rmComma($input) {

}

/**

*/

function convNumEntityToByteValue($input) {

$token = md5(microtime());

foreach($parts as $k => $v) {

if ($k%2) {

*/

function clearPrefixFromValue($table,$value) {

global $TCA;

}

/**

// Clearing additional cache tables:

if (is_array($TYPO3_CONF_VARS['SC_OPTIONS']['t3lib/class.t3lib_tcemain.php']['clearAllCache_additionalTables'])) {

foreach($TYPO3_CONF_VARS['SC_OPTIONS']['t3lib/class.t3lib_tcemain.php']['clearAllCache_additionalTables'] as $tableName) {

$GLOBALS['TYPO3_DB']->exec_DELETEquery($tableName,'');

} else {

die('Fatal Error: Trying to flush table "'.$tableName.'" with "Clear All Cache"');

*/

function setRelPath($path) {

$path = trim($path);

if ($path) {

$this->relPath = $path;

$this->relBackPath = '';

$siteUrl = $this->siteUrl();

// Parsing the typolink data. This parsing is roughly done like in tslib_content->typolink()

if(strstr($link_param,'@')) { // mailadr

} elseif (substr($link_param,0,1)=='#') { // check if anchor

$href = $siteUrl.$link_param;

} else {

if (trim($rootFileDat) && !strstr($link_param,'/') && (@is_file(PATH_site.$rootFileDat) || t3lib_div::inList('php,html,htm',strtolower($rFD_fI['extension'])))) {

$href = $siteUrl.$link_param;

} elseif($urlChar && (strstr($link_param,'//') || !$fileChar || $urlChar<$fileChar)) { // url (external): If doubleSlash or if a '.' comes before a '/'.

$href = $scheme.$link_param;

} elseif($fileChar) { // file (internal)

$href = $siteUrl.$link_param;

case 'typolist': // Transform typolist blocks into OL/UL lists. Type 1 is expected to be numerical block

if (!isset($this->procOptions['typolist']) || $this->procOptions['typolist']) {

$tListContent = $this->removeFirstAndLastTag($blockSplit[$k]);

$lines = explode(chr(10),$tListContent);

$typ = $attribArray['type']==1 ? 'ol' : 'ul';

$blockSplit[$k] = '<'.$typ.'>'.chr(10).

}

break;

}

} else { // NON-block:

$nextFTN = $this->getFirstTagName($blockSplit[$k+1]);

$singleLineBreak = $blockSplit[$k]==chr(10);

if (t3lib_div::inList('TABLE,BLOCKQUOTE,TYPOLIST,TYPOHEAD,'.($this->procOptions['preserveDIVSections']?'DIV,':'').$this->blockElementList,$nextFTN)) { // Removing linebreak if typolist/typohead

}

// If $blockSplit[$k] is blank then unset the line. UNLESS the line happend to be a single line break.

if (!strcmp($blockSplit[$k],'') && !$singleLineBreak) {

}

// Remove any line break char (10 or 13)

// If there are any attributes or if we are supposed to remap the tag, then do so:

if (count($newAttribs) && strcmp($remapParagraphTag,'1')) {

$regex='[[:space:]]*:[[:space:]]*([0-9]*)[[:space:]]*px';

// Width

$reg = array();

$w = intval($reg[1]);

// Height

$h = intval($reg[1]);

}

if (!$w) {

$deeper = is_array($keyArr[$key]);

if ($this->regexMode) {

} else {

if (stristr($keyArr[$key],$searchString) || ($this->searchKeysToo && stristr($key,$searchString))) { $this->searchKeys[$depth]=1; }

}

$keyArr_alpha=array();

while (list($key,)=each($arr)) {

if (substr($key,-2)!='..') { // Don't do anything with comments / linenumber registrations...

if (substr($key,-1)!='.') {

if (t3lib_div::testInt($key)) {

$keyArr_num[$key]=$arr[$key];

reset($arr);

$keyArr=array();

while (list($key,)=each($arr)) {

if (substr($key,-1)!='.') {

$keyArr[$key]=1;

}

$deeper = is_array($arr[$key.'.']);

if ($this->regexMode) {

$this->tsbrowser_searchKeys[$depth]+=2;

}

$this->tsbrowser_searchKeys[$depth]+=4;

}

$this->tsbrowser_searchKeys[$depth]=1;

}

} else {

reset($arr);

$keyArr=array();

while (list($key,)=each($arr)) {

if (substr($key,-1)!='.') {

$keyArr[$key]=1;

}

}

if ($syntaxHL) {

$all = chop($all);

$tsparser = t3lib_div::makeInstance('t3lib_TSparser');

$tsparser->lineNumberOffset=$this->ext_lineNumberOffset+1;

* @return [type] ...

*/

function ext_formatTS($input, $ln, $comments=1, $crop=0) {

$input = chop($input);

$cArr = explode(chr(10),$input);

$comment = trim($this->flatSetup[$const.'..']);

$c_arr = explode(chr(10),$comment);

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

if ($line) {

$parts = explode(';', $line);

while(list(,$par)=each($parts)) {

if (t3lib_div::inList('int,options,file,boolean,offset,user', $retArr['type'])) {

$p=trim(substr($type,$m));

$reg = array();

$p=trim($reg[1]);

if ($p) {

$retArr['paramstr']=$p;

function ext_readDirResources($path) {

$path=trim($path);

if ($path && substr($path,0,10)=='fileadmin/') {

$this->readDirectory(PATH_site.$path);

}

}

function ext_fNandV($params) {

$fN='data['.$params['name'].']';

$fV=$params['value'];

$fV='';

}

$fV=htmlspecialchars($fV);

case 'color':

$col=array();

if($var && !t3lib_div::inList($this->HTMLcolorList,strtolower($var))) {

$useFullHex = strlen($var) > 3;

$col[]=HexDec(substr($var,0,1));

*/

function ext_setStar($val) {

$fParts = explode('.',strrev($val),2);

return $val;

}

end($this->tree);

$treeKey = key($this->tree); // Get the key for this space

$title = $val;

$path = $files_path.$val.'/';

* @return boolean If the input path is found in PATH_site then it returns true.

*/

function isWebFolder($folder) {

return t3lib_div::isFirstPartOfStr($folder,PATH_site) ? TRUE : FALSE;

}

* @return boolean If the input path is found in the backend users filemounts, then return true.

*/

function checkFolder($folder) {

}

/**

* @return boolean If the input path is found in the backend users filemounts and if the filemount is of type readonly, then return true.

*/

function isReadOnlyFolder($folder) {

}

/**

} else {

// if the filereference $this->file is relative, we correct the path

if (substr($this->table,0,3)=='../') {

} else {

$this->file = $this->table;

}

// Setting default scriptID:

if (($temp_M = (string) t3lib_div::_GET('M')) && $GLOBALS['TBE_MODULES']['_PATHS'][$temp_M]) {

} else {

}

if (TYPO3_mainDir!='typo3/' && substr($this->scriptID,0,strlen(TYPO3_mainDir)) == TYPO3_mainDir) {

$this->scriptID = 'typo3/'.substr($this->scriptID,strlen(TYPO3_mainDir)); // This fixes if TYPO3_mainDir has been changed so the script ids are STILL "typo3/..."

}

// Individual configuration per script? If so, make a recursive merge of the arrays:

if (is_array($TBE_STYLES['scriptIDindex'][$this->scriptID])) {

$pathInfo = parse_url(t3lib_div::getIndpEnv('REQUEST_URI'));