TYPO3 Core

if (!$encoding) return;

$this->encoding = $encoding;

$level = $this->get_complevel();

}

$this->level = $level;

}

}

* @see typo3/init.php, t3lib_userAuthGroup::returnFilemounts()

*/

function init($mounts, $f_ext) {

$this->mounts = $mounts;

$this->webPath = t3lib_div::getIndpEnv('TYPO3_DOCUMENT_ROOT');

*/

function is_allowed($iconkey,$type) {

if (isset($this->f_ext[$type])) {

if ($ik) {

// If the extension is found amongst the allowed types, we return true immediately

if ($this->f_ext[$type]['allow']=='*' || t3lib_div::inList($this->f_ext[$type]['allow'],$ik)) return true;

$lines[$fname].='<br /><br />';

} else {

$lines[$fname] = '<hr />';

if ($config) $lines[$fname].='<br />';

}

}

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

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

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

// path is calculated.

$path = trim(ereg_replace('\/[^\/]*$', '', $path));

// stuff:

if (defined('TYPO3_cliMode') && TYPO3_cliMode) {

if (!$this->user['uid']) {

if (substr($GLOBALS['MCONF']['name'],0,5)=='_CLI_') {

$this->setBeUserByName($userName);

if ($this->user['uid']) {

if (!$this->isAdmin()) {

*/

function cli_keyboardInput_yes($msg='') {

echo $msg.' (Yes/No + return): '; // ONLY makes sense to echo it out since we are awaiting keyboard input - that cannot be silenced...

}

/**

*/

function cli_help() {

foreach($this->cli_help as $key => $value) {

switch($key) {

case 'synopsis':

$optStr = '';

}

}

if ($table=='_FILE') { // Rendering files/directories on the clipboard:

if (@file_exists($v) && t3lib_div::isAllowedAbsPath($v)) {

$fI = pathinfo($v);

$size = ' ('.t3lib_div::formatSize(filesize($v)).'bytes)';

$icon = '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/fileicons/'.$icon,'width="18" height="16"').' border="0" hspace="20" class="absmiddle" title="'.htmlspecialchars($fI['basename'].$size).'" alt="" />';

$thumb = $this->clipData['_setThumb'] ? (t3lib_div::inList($GLOBALS['TYPO3_CONF_VARS']['GFX']['imagefile_ext'],$fI['extension']) ? t3lib_BEfunc::getThumbNail($this->backPath.'thumbs.php',$v,' vspace="4"') : '') :'';

* @author Martin Kutschker <martin.t.kutschker@blackbox.net>

*/

function parse_charset($charset) {

if (isset($this->synonyms[$charset])) $charset = $this->synonyms[$charset];

return $charset;

* @author Martin Kutschker <martin.t.kutschker@blackbox.net>

*/

function get_locale_charset($locale) {

// exact locale specific charset?

if (isset($this->locale_to_charset[$locale])) return $this->locale_to_charset[$locale];

public static function gif_compress($theFile, $type) {

$gfxConf = $GLOBALS['TYPO3_CONF_VARS']['GFX'];

$returnCode='';

if (($type=='IM' || !$type) && $gfxConf['im'] && $gfxConf['im_path_lzw']) { // IM

$cmd = t3lib_div::imageMagickCommand('convert', '"'.$theFile.'" "'.$theFile.'"', $gfxConf['im_path_lzw']);

exec($cmd);

if ($GLOBALS['TYPO3_CONF_VARS']['FE']['png_to_gif']

&& $GLOBALS['TYPO3_CONF_VARS']['GFX']['im']

&& $GLOBALS['TYPO3_CONF_VARS']['GFX']['im_path_lzw']

&& @is_file($theFile)) { // IM

$newFile = substr($theFile,0,-4).'.gif';

$cmd = t3lib_div::imageMagickCommand('convert', '"'.$theFile.'" "'.$newFile.'"', $GLOBALS['TYPO3_CONF_VARS']['GFX']['im_path_lzw']);

*/

public static function read_png_gif($theFile,$output_png=0) {

if ($GLOBALS['TYPO3_CONF_VARS']['GFX']['im'] && @is_file($theFile)) {

if (

((string)$ext=='.png' && $output_png) ||

((string)$ext=='.gif' && !$output_png)

* @return boolean True if $ip is of IPv6 format.

*/

public static function validIPv6($ip) {

$regex = '/^(';

$regex.= '(([\dA-F]{1,4}:){7}[\dA-F]{1,4})|';

$reg='';

if ( ereg('(.*)\.([^\.]*$)',$info['file'],$reg) ) {

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

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

} else {

$info['filebody'] = $info['file'];

* @ignore

*/

public static function danish_strtoupper($string) {

return strtr($value, '???????????????', '???????????????');

}

$name = '';

}

} else {

$attributes[$key] = '';

$name = $key;

}

if ($xhtmlSafe) {

$newArr=array();

foreach($arr as $p => $v) {

}

$arr = $newArr;

}

// Find files+directories:

if (@is_dir($path)) {

$d = dir($path);

if (is_object($d)) {

while($entry=$d->read()) {

if (@is_file($path.'/'.$entry)) {

$fI = pathinfo($entry);

$key = md5($path.'/'.$entry); // Don't change this ever - extensions may depend on the fact that the hash is an md5 of the path! (import/export extension)

$filearray[$key]=($prependPath?$path.'/':'').$entry;

if ($order=='mtime') {$sortarray[$key]=filemtime($path.'/'.$entry);}

elseif ($order) {$sortarray[$key]=$entry;}

// Load class file if not found:

if (!class_exists($className)) {

if (substr($className,0,6)=='t3lib_') {

}

}

if (TYPO3_OS == 'WIN') {

$facility = LOG_USER;

} else {

}

openlog($TYPO3_CONF_VARS['SC_OPTIONS']['t3lib/class.t3lib_div.php']['systemLogHost'], LOG_ODELAY, $facility);

}

if(!$path) { $path = $gfxConf['im_path']; }

$combineScript = $gfxConf['im_combine_filename'] ? trim($gfxConf['im_combine_filename']) : 'combine';

if($command==='combine') { // This is only used internally, has no effect outside

}

}

list($place, $modRef) = t3lib_div::trimExplode(':', $position, 1);

$mods = t3lib_div::trimExplode(',', $TBE_MODULES[$main], 1);

if (!in_array($sub, $mods)) {

case 'after':

case 'before':

$pointer = 0;

reset($mods);

while(list($k, $m) = each($mods)) {

if (!strcmp($m, $modRef)) {

}

}

array_splice(

);

break;

default:

array_unshift($mods, $sub);

} else {

array_push($mods, $sub);

// TYPO3_OS is not yet defined

$os_type = stristr(PHP_OS, 'win')&&!stristr(PHP_OS, 'darwin')?'WIN':'UNIX';

if (!in_array($os_type, $os)) {

t3lib_extMgm::deactivateService($serviceType, $serviceKey);

// Convert charset:

if ($this->convertCharset) {

$xmlHeaderAttributes = t3lib_div::xmlGetHeaderAttribs($xmlData);

if ($storeInCharset) {

$currentCharset = $GLOBALS['LANG']->charSet;

$xmlData = $GLOBALS['LANG']->csConvObj->conv($xmlData,$storeInCharset,$currentCharset,1);

if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_flexformtools.php']) {

include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_flexformtools.php']);

}

$Plain_val = ($convCharset && strlen($val)) ? $GLOBALS['TSFE']->csConvObj->conv($val,$GLOBALS['TSFE']->renderCharset,$this->charset,0) : $val;

$HTML_val = ($convCharset && strlen($val)) ? $GLOBALS['TSFE']->csConvObj->conv(htmlspecialchars($val),$GLOBALS['TSFE']->renderCharset,$this->charset,1) : htmlspecialchars($val);

}

}

}

$pieces = count($codepieces);

$reg = array();

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

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

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

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

// fetches the attributes for the tag

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

$imageData = array();

// Finds the src or background attribute

$imageData['ref'] = $attributes['href'];

// Finds out if the value had quotes around it

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

$pieces = count($codepieces);

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

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

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

$reg = '';

if (ereg("(.*)\.([^\.]*$)", $info['file'], $reg)) {

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

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

} else {

$info['filebody'] = $info['file'];

}

}

}

$safetyCounter--;

if ($safetyCounter < 0) break;

}

if ($parts[0]=='CREATE' && $parts[1]=='TABLE') {

$table = str_replace( '`', '', $parts[2]);

if (TYPO3_OS=='WIN') { // tablenames are always lowercase on windows!

}

}

} else {

if ($table) {

// table names are always lowercase on Windows!

if (TYPO3_OS == 'WIN') {

}

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

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

*/

function checkModAccess($name,$MCONF) {

if ($MCONF['access']) {

// Checking if admin-access is required

if (strstr($access,'admin')) { // If admin-permissions is required then return true if user is admin

if ($this->BE_USER->isAdmin()) {return true;}

}

//

// pda

if( strstr($agent, 'avantgo')) {

return 'pda';

* @see tslib_fe::checkAndSetAlias(), tslib_cObj::typoLink()

*/

function getPageIdFromAlias($alias) {

$res = $GLOBALS['TYPO3_DB']->exec_SELECTquery('uid', 'pages', 'alias='.$GLOBALS['TYPO3_DB']->fullQuoteStr($alias, 'pages').' AND pid>=0 AND pages.deleted=0'); // "AND pid>=0" because of versioning (means that aliases sent MUST be online!)

$row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res);

$GLOBALS['TYPO3_DB']->sql_free_result($res);

*/

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

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

// Removing extra trailing slashes

$path = trim(ereg_replace('\/[^\/]*$','',$path));

// Appending to domain string

$tagsArray = array();

$tagsArray['tag_start'] = $this->getFirstTag($v);

$tagsArray['tag_end'] = '</'.$firstTagName.'>';

$tagsArray['add_level'] = 1;

$tagsArray['content'] = $this->splitIntoBlockRecursiveProc($tag,$this->removeFirstAndLastTag($v),$procObj,$callBackContent,$callBackTags,$level+$tagsArray['add_level']);

$matches = array();

if (preg_match('/^\s*\<([^\s\>]+)(\s|\>)/', $str, $matches)===1) {

if (!$preserveCase) {

}

return $matches[1];

}

}

} else {

if ($namekey = preg_replace('/[^[:alnum:]_\:\-]/','',$val)) {

$attributesMeta[$name]=array();

$attributesMeta[$name]['origTag']=$namekey;

$attributes[$name] = '';

* @return array Analyse data.

*/

function checkTagTypeCounts($content,$blockTags='a,b,blockquote,body,div,em,font,form,h1,h2,h3,h4,h5,h6,i,li,map,ol,option,p,pre,select,span,strong,table,td,textarea,tr,u,ul', $soloTags='br,hr,img,input,area') {

$analyzedOutput=array();

$analyzedOutput['counts']=array(); // Counts appearances of start-tags

$analyzedOutput['errors']=array(); // Lists ERRORS

$endTag = $firstChar=='/' ? 1 : 0;

$tagContent = substr($tok,$endTag,$tagEnd-$endTag);

$tagParts = preg_split('/\s+/s',$tagContent,2);

if (isset($tags[$tagName])) {

if (is_array($tags[$tagName])) { // If there is processing to do for the tag:

$newTagAttrib = array();

if (!($tList = $tags[$tagName]['_allowedAttribs'])) {

// Just explode attribts for tag once

}

foreach ($tList as $allowTag) {

if (isset($tagAttrib[0][$allowTag])) $newTagAttrib[$allowTag]=$tagAttrib[0][$allowTag];

if ($params['always'] || isset($tagAttrib[0][$attr])) {

if ($params['trim']) {$tagAttrib[0][$attr]=trim($tagAttrib[0][$attr]);}

if ($params['intval']) {$tagAttrib[0][$attr]=intval($tagAttrib[0][$attr]);}

if ($params['range']) {

if (isset($params['range'][1])) {

$tagAttrib[0][$attr]=t3lib_div::intInRange($tagAttrib[0][$attr],intval($params['range'][0]),intval($params['range'][1]));

$tagEnd = substr($v,-2)=='/>' ? ' />' : '>'; // Detect tag-ending so that it is re-applied correctly.

$firstTagName = $this->getFirstTagName($v); // The 'name' of the first tag

$somethingDone=0;

// background - attribute:

case 'td':

case 'body':

if ($somethingDone) {

$tagParts = preg_split('/\s+/s',$v,2);

$tagParts[1]=$this->compileTagAttribs($params[0],$params[1]);

}

}

}

$endTag = $firstChar=='/' ? 1 : 0;

$tagContent = substr($tok,$endTag,$tagEnd-$endTag);

$tagParts = preg_split('/\s+/s',$tagContent,2);

if (!strcmp($tagList,'') || in_array($tagName,$tagsArray)) {

$contentParts[$k] = '<'.$subparts[0].'>'.$subparts[1];

} else $contentParts[$k] = '&lt;'.$tok;

reset($str);

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

if (!$flag) {

}

}

if ($cacheKey) $this->caseShift_cache[$cacheKey]=$str;

} else {

$str = $this->caseShift_cache[$cacheKey];

}

return $str;

}

$accu=array();

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

if ($xhtmlClean) {

if (strcmp($v,'') || isset($meta[$k]['dashType'])) {

$attr.='="'.htmlspecialchars($v).'"';

}

*/

function HTMLparserConfig($TSconfig,$keepTags=array()) {

// Allow tags (base list, merged with incoming array)

$keepTags = array_merge($alTags,$keepTags);

// Set config properties.

if (is_array($TSconfig['tags.'])) {

reset($TSconfig['tags.']);

while(list($key,$tagC)=each($TSconfig['tags.'])) {

if (!strcmp($tagC,'0')) unset($keepTags[$key]);

if (!strcmp($tagC,'1') && !isset($keepTags[$key])) $keepTags[$key]=1;

}

reset($TSconfig['tags.']);

foreach ($TSconfig['tags.'] as $key => $tagC) {

$key=substr($key,0,-1);

if (!is_array($keepTags[$key])) $keepTags[$key]=array();

if (is_array($tagC['fixAttrib.'])) {

}

// localNesting

if ($TSconfig['localNesting']) {

while(list(,$tn)=each($lN)) {

if (isset($keepTags[$tn])) {

$keepTags[$tn]['nesting']=1;

}

}

if ($TSconfig['globalNesting']) {

while(list(,$tn)=each($lN)) {

if (isset($keepTags[$tn])) {

if (!is_array($keepTags[$tn])) $keepTags[$tn]=array();

}

}

if ($TSconfig['rmTagIfNoAttrib']) {

while(list(,$tn)=each($lN)) {

if (isset($keepTags[$tn])) {

if (!is_array($keepTags[$tn])) $keepTags[$tn]=array();

}

}

if ($TSconfig['noAttrib']) {

while(list(,$tn)=each($lN)) {

if (isset($keepTags[$tn])) {

if (!is_array($keepTags[$tn])) $keepTags[$tn]=array();

}

}

if ($TSconfig['removeTags']) {

while(list(,$tn)=each($lN)) {

$keepTags[$tn]=array();

$keepTags[$tn]['allowedAttribs']=0;

// STILL VERY EXPERIMENTAL!!

if ($conf['xhtml']) {

if ($endTag) { // Endtags are just set lowercase right away

} elseif (substr($value,0,4)!='<!--') { // ... and comments are ignored.

$inValue = substr($value,1,(substr($value,-2)=='/>'?-2:-1)); // Finding inner value with out < >

list($tagName,$tagP)=preg_split('/\s+/s',$inValue,2); // Separate attributes and tagname

// Process attributes

$tagAttrib = $this->get_tag_attributes($tagP);

// Init:

$this->procOptions = $thisConfig['proc.'];

// dynamic configuration of blockElementList

if ($this->procOptions['blockElementList']) {

case 'ts_transform':

case 'css_transform':

$value = str_replace(chr(13),'',$value); // Has a very disturbing effect, so just remove all '13' - depend on '10'

$value = $this->TS_transform_db($value,$cmd=='css_transform');

break;

case 'ts_strip':

$pU = parse_url($absRef);

$pI=pathinfo($pU['path']);

$filename = t3lib_div::shortMD5($absRef).'.'.$pI['extension'];

$origFilePath = PATH_site.$this->rteImageStorageDir().'RTEmagicP_'.$filename;

$C_origFilePath = PATH_site.$this->rteImageStorageDir().'RTEmagicC_'.$filename.'.'.$pI['extension'];

$absRef = trim($attribArray['src']);

// Unless the src attribute is already pointing to an external URL:

$attribArray['src'] = substr($attribArray['src'],strlen($this->relBackPath));

// if site is in a subpath (eg. /~user_jim/) this path needs to be removed because it will be added with $siteUrl

$attribArray['src'] = preg_replace('#^'.preg_quote($sitePath,'#').'#','',$attribArray['src']);

// Detects if a file is found in site-root OR is a simulateStaticDocument.

list($rootFileDat) = explode('?',$link_param);

$rFD_fI = pathinfo($rootFileDat);

$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;

$page = t3lib_BEfunc::getRecord('pages', $idPart);

if (is_array($page)) { // Page must exist...

$href = $siteUrl.'?id='.$link_param;

// linkHandler - allowing links to start with "record:"

$href = $link_param;

} else {

// Init:

$tag=$this->getFirstTag($v);

// Process based on the tag:

switch($tagName) {

$parts[$k2]=preg_replace('/['.preg_quote(chr(10).chr(13)).']+/','',$parts[$k2]); // remove all linesbreaks!

$parts[$k2]=$this->defaultTStagMapping($parts[$k2],'db');

$parts[$k2]=$this->cleanFontTags($parts[$k2],0,0,0);

}

if ($tagName=='ol') { $params=' type="1"'; } else { $params=''; }

$blockSplit[$k]='<typolist'.$params.'>'.chr(10).implode(chr(10),$parts).chr(10).'</typolist>'.$lastBR;

// Init:

$tag = $this->getFirstTag($v);

$attribArray = $this->get_tag_attributes_classic($tag);

// Based on tagname, we do transformations:

} else { // Default is to get allowed/denied tags from internal array of processing options:

// Construct default list of tags to keep:

$typoScript_list = 'b,i,u,a,img,br,div,center,pre,font,hr,sub,sup,p,strong,em,li,ul,ol,blockquote,strike,span';

// For tags to deny, remove them from $keepTags array:

$denyTags = t3lib_div::trimExplode(',',$this->procOptions['denyTags'],1);

if ($this->procOptions['internalizeFontTags']) {$value = $this->internalizeFontTags($value);}

// Setting configuration for processing:

$divSplit = $this->splitIntoBlock('div,p',$value,1); // Setting the third param to 1 will eliminate false end-tags. Maybe this is a good thing to do...?

if ($this->procOptions['keepPDIVattribs']) {

} else {

$keepAttribListArr = array();

}

// Get first tag, attributes etc:

$fTag = $this->getFirstTag($divSplit[$k]);

$attribs=$this->get_tag_attributes($fTag);

// Keep attributes (lowercase)

}

// ALIGN attribute:

}

// CLASS attribute:

if (!$this->procOptions['skipClass'] && strcmp(trim($attribs[0]['class']),'')) { // Set to whatever value

$newAttribs['class']=$attribs[0]['class'];

}

}

}

// Wrapping the line in <$dT> is not already wrapped:

if (substr($testStr,0,4)!='<div' || substr($testStr,-6)!='</div>') {

if (substr($testStr,0,2)!='<p' || substr($testStr,-4)!='</p>') {

// Only set p-tags if there is not already div or p tags:

function urlInfoForLinkTags($url) {

$info = array();

$url = trim($url);

$info['url']=trim(substr($url,7));

$info['type']='email';

} else {

// Checking if there is a scheme, and if not, prepend the current url.

if (strlen($attribArray['href'])) { // ONLY do this if href has content - the <a> tag COULD be an anchor and if so, it should be preserved...

if (!$uP['scheme']) {

$attribArray['href'] = $this->siteUrl().substr($attribArray['href'],strlen($this->relBackPath));

}

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

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

if (count($mparts)>1) {

} else {

$cTypes[]=$ppstr;

}

$subparts =explode('?=',$encContent,2);

$encContent=$subparts[0];

case 'q':

$encContent = quoted_printable_decode($encContent);

$encContent = str_replace('_',' ',$encContent);

$reg='';

eregi('([^=]*)="(.*)"',$v,$reg);

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

}

}

return $outValue;

$spaceParts = t3lib_div::trimExplode(' ',$dateStr,1);

$timeParts = explode(':',$spaceParts[3]);

$timeStamp = mktime ($timeParts[0], $timeParts[1], $timeParts[2], $spaceParts[1], $spaceParts[0], $spaceParts[2]);

if (!trim($str)) break; // header finished

$parts = explode(' ',$str,2);

if ($parts[0] && substr($parts[0],-1)==':') {

if (isset($headers[$p])) {

$headers[$p.'.'][]=$headers[$p];

$headers[$p]='';

$list = explode(',','from,to,reply-to,sender,return-path');

while(list(,$headerType)=each($list)) {

if (isset($mailParts[$headerType])) {

}

}

// Decode date from human-readable format to unix-time (includes compensation for GMT CET)

$mailParts['_DATE']=$this->makeUnixDate($mailParts['date']);

// Transfer encodings of body content

case 'quoted-printable':

$mailParts['CONTENT']=quoted_printable_decode($mailParts['CONTENT']);

break;

// *************************

// PROCESSING the CONTENT part of the mail (the body)

// *************************

$cType = substr($cType,0,9); // only looking for 'multipart' in string.

switch($cType) {

/* case 'multipart/mixed':

} else $mailParts['CONTENT'] = 'ERROR: No boundary found.';

break;

default:

$mailParts['CONTENT']=utf8_decode($mailParts['CONTENT']);

}

break;

if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_readmail.php']) {

include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_readmail.php']);

}

list($rootFileDat) = explode('?',rawurldecode($link_param));

$containsSlash = strstr($rootFileDat,'/');

$rFD_fI = pathinfo($rootFileDat);

$isLocalFile = 1;

} elseif ($containsSlash) {

$isLocalFile = 2; // Adding this so realurl directories are linked right (non-existing).

function processAccordingToConfig(&$value,$fInfo) {

$options = $this->parseFieldDef($fInfo['Type']);

case 'int':

case 'smallint':

case 'tinyint':

foreach($where as $config) {

$OR_index++;

}

$itemKeys = array_intersect($itemKeys, $subSelKeys);

}

} else {

switch($comp) {

case 'NOTLIKE':

case 'LIKE':

if (substr($like_value,0,1)=='%') {

$wildCard_begin = TRUE;

$like_value = substr($like_value,1);

if (!strlen($like_value)) {

$bool = TRUE;

} elseif ($wildCard_begin && !$wildCard_end) {

} elseif (!$wildCard_begin && $wildCard_end) {

} elseif ($wildCard_begin && $wildCard_end) {

$bool = strstr($field_value,$like_value);

} else {

}

if ($comp=='NOTLIKE') $bool = !$bool;

break;

// Finding starting keyword of string:

$_parseString = $parseString; // Protecting original string...

$keyword = $this->nextPart($_parseString, '^(SELECT|UPDATE|INSERT[[:space:]]+INTO|DELETE[[:space:]]+FROM|EXPLAIN|DROP[[:space:]]+TABLE|CREATE[[:space:]]+TABLE|CREATE[[:space:]]+DATABASE|ALTER[[:space:]]+TABLE)[[:space:]]+');

switch($keyword) {

case 'SELECT':

// While the parseString is not yet empty:

while(strlen($parseString)>0) {

if ($key = $this->nextPart($parseString, '^(KEY|PRIMARY KEY|UNIQUE KEY|UNIQUE)([[:space:]]+|\()')) { // Getting key

switch($key) {

case 'PRIMARYKEY':

if ($result['TABLE']) {

if ($result['action'] = $this->nextPart($parseString, '^(CHANGE|DROP[[:space:]]+KEY|DROP[[:space:]]+PRIMARY[[:space:]]+KEY|ADD[[:space:]]+KEY|ADD[[:space:]]+PRIMARY[[:space:]]+KEY|DROP|ADD|RENAME)([[:space:]]+|\()')) {

// Getting field:

if (t3lib_div::inList('ADDPRIMARYKEY,DROPPRIMARYKEY',$actionKey) || $fieldKey = $this->nextPart($parseString, '^([[:alnum:]_]+)[[:space:]]+')) {

// Looking for stop-keywords:

if ($stopRegex && $this->lastStopKeyWord = $this->nextPart($parseString, $stopRegex)) {

return $stack;

}

if ($stack[$pnt]['table'] = $this->nextPart($parseString,'^([[:alnum:]_]+)(,|[[:space:]]+)')) {

// Looking for stop-keywords before fetching potential table alias:

if ($stopRegex && ($this->lastStopKeyWord = $this->nextPart($parseString, $stopRegex))) {

return $stack;

}

if(!preg_match('/^(LEFT|JOIN)[[:space:]]+/i',$parseString)) {

// Looking for stop-keywords:

if ($stopRegex && $this->lastStopKeyWord = $this->nextPart($parseString, $stopRegex)) {

return $stack;

}

// Looking for stop-keywords:

if ($stopRegex && $this->lastStopKeyWord = $this->nextPart($parseString, $stopRegex)) {

return $stack[0];

} else {

return $this->parseError('No operator, but parsing not finished in parseWhereClause().',$parseString);

// Looking for keywords

while($keyword = $this->nextPart($parseString,'^(DEFAULT|NOT[[:space:]]+NULL|AUTO_INCREMENT|UNSIGNED)([[:space:]]+|,|\))')) {

$result['featureIndex'][$keywordCmp]['keyword'] = $keyword;

function getValue(&$parseString,$comparator='') {

$value = '';

if ($this->nextPart($parseString,'^([(])')) {

$listValues = array();

$comma=',';

$query = 'ALTER TABLE '.$components['TABLE'].' '.$components['action'].' '.($components['FIELD']?$components['FIELD']:$components['KEY']);

// Based on action, add the final part:

case 'ADD':

$query.=' '.$this->compileFieldCfg($components['definition']);

break;

$output.=' '.$v['comparator'];

// Detecting value type; list or plain:

$valueBuffer = array();

foreach($v['value'] as $realValue) {

$valueBuffer[]=$realValue[1].$this->compileAddslashes($realValue[0]).$realValue[1];

*/

function debug_parseSQLpartCompare($str,$newStr,$caseInsensitive=FALSE) {

if ($caseInsensitive) {

} else {

$str1 = $str;

$str2 = $newStr;

function maskImageOntoImage(&$im,$conf,$workArea) {

if ($conf['file'] && $conf['mask']) {

$imgInf = pathinfo($conf['file']);

if (!t3lib_div::inList($this->gdlibExtensions, $imgExt)) {

$BBimage = $this->imageMagickConvert($conf['file'],$this->gifExtension,'','','','','');

} else {

$BBimage = $this->getImageDimensions($conf['file']);

}

$maskInf = pathinfo($conf['mask']);

if (!t3lib_div::inList($this->gdlibExtensions, $maskExt)) {

$BBmask = $this->imageMagickConvert($conf['mask'],$this->gifExtension,'','','','','');

} else {

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

$pairs=explode('=',$val,2);

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

switch($effect) {

case 'gamma':

$commands.=' -gamma '.doubleval($value);

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

$pairs=explode('=',$val,2);

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

switch($effect) {

case 'inputlevels': // low,high

$params = t3lib_div::intExplode(',',$value);

*/

function IMreduceColors($file, $cols) {

$fI = t3lib_div::split_fileref($file);

$result = $this->randomName().'.'.$ext;

if (($reduce = t3lib_div::intInRange($cols, 0, ($ext=='gif'?256:$this->truecolorColors), 0))>0) {

$params = ' -colors '.$reduce;

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

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

} else {

if ($this->colMap[$string]) {

$col = $this->colMap[$string];

} else {

$h=$workArea[3];

$align = explode(',',$conf['align']);

switch($align[0]) {

case 'r':

}

if($info=$this->getImageDimensions($imagefile)) {

if (!$newExt) { // If no extension is given the original extension is used

$newExt = $info[2];

}

*/

function getImageDimensions($imageFile) {

ereg('([^\.]*)$',$imageFile,$reg);

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

return $returnArr;

} else {

if ($temp = @getImageSize($imageFile)) {

} else {

$returnArr = $this->imageMagickIdentify($imageFile);

}

// file has changed, delete the row

$TYPO3_DB->exec_DELETEquery ('cache_imagesizes', 'md5hash='.$TYPO3_DB->fullQuoteStr($row['md5hash'],'cache_imagesizes'));

} else {

}

}

}

}

}

if ($dim[0] && $dim[1]) {

}

}

}

if ($file) {

$reg = array();

ereg('([^\.]*)$',$file,$reg);

switch($ext) {

case 'gif':

case 'png':

*/

function ImageWrite($destImg, $theImage, $quality=0) {

imageinterlace ($destImg,0);

switch ($ext) {

case 'jpg':

case 'jpeg':

*/

function imageCreateFromFile($sourceImg) {

$imgInf = pathinfo($sourceImg);

switch ($ext) {

case 'gif':

if (!count($tempFT)) {$info.='*';}

foreach($tempFT as $ext) {

if ($ext) {

}

}

// Creating string, showing disallowed types:

if (count($tempFT_dis)) {$info.='<br />';}

foreach($tempFT_dis as $ext) {

if ($ext) {

}

}

$absFilePath = t3lib_div::getFileAbsFileName($config['uploadfolder'].'/'.$imgPath);

$fI = pathinfo($imgPath);

$fileIcon = '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/fileicons/'.$fileIcon,'width="18" height="16"').' class="absmiddle" title="'.htmlspecialchars($fI['basename'].($absFilePath && @is_file($absFilePath) ? ' ('.t3lib_div::formatSize(filesize($absFilePath)).'bytes)' : ' - FILE NOT FOUND!')).'" alt="" />';

$imgs[] = '<span class="nobr">'.t3lib_BEfunc::thumbCode($rowCopy,$table,$field,$this->backPath,'thumbs.php',$config['uploadfolder'],0,' align="middle"').

// Get data:

$xmlData = $PA['itemFormElValue'];

$xmlHeaderAttributes = t3lib_div::xmlGetHeaderAttribs($xmlData);

if ($storeInCharset) {

$currentCharset=$GLOBALS['LANG']->charSet;

$xmlData = $GLOBALS['LANG']->csConvObj->conv($xmlData,$storeInCharset,$currentCharset,1);

if ($allowedExts) { // If there are a set of allowed extensions, filter the content:

foreach($elFromTable as $elValue) {

$pI = pathinfo($elValue);

if (in_array($ext, $allowedExts)) {

$output[] = $elValue;

}

function formWidthText($size=48,$wrap='') {

$wTags = $this->formWidth($size,1);

// Netscape 6+ seems to have this ODD problem where there WILL ALWAYS be wrapping with the cols-attribute set and NEVER without the col-attribute...

$wTags.= ' cols="'.$size.'"';

}

return $wTags;

foreach($fileArr as $fileRef) {

$fI = pathinfo($fileRef);

$items[] = array(

$fileRef,

$fileRef,

switch((string)$parts[2]) {

case 'REQ':

$output = $theFieldValue ? TRUE : FALSE;

$output = !$theFieldValue ? TRUE : FALSE;

}

break;

case 'EXT':

switch((string)$parts[2]) {

case 'LOADED':

$output = t3lib_extMgm::isLoaded($parts[1]) ? TRUE : FALSE;

$output = !t3lib_extMgm::isLoaded($parts[1]) ? TRUE : FALSE;

}

break;

case 'REC':

switch((string)$parts[1]) {

case 'NEW':

$output = !(intval($row['uid']) > 0) ? TRUE : FALSE;

$output = (intval($row['uid']) > 0) ? TRUE : FALSE;

}

break;

case 'VERSION':

switch((string)$parts[1]) {

case 'IS':

$output = intval($row['pid'])==-1 ? TRUE : FALSE;

$output = !(intval($row['pid'])==-1) ? TRUE : FALSE;

}

break;

$absFilePath = t3lib_div::getFileAbsFileName($config['config']['uploadfolder'].'/'.$imgPath);

$fI = pathinfo($imgPath);

$fileIcon = '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/fileicons/'.$fileIcon,'width="18" height="16"').' class="absmiddle" title="'.htmlspecialchars($fI['basename'].($absFilePath && @is_file($absFilePath) ? ' ('.t3lib_div::formatSize(filesize($absFilePath)).'bytes)' : ' - FILE NOT FOUND!')).'" alt="" />';

$imgs[] = '<span class="nobr">'.t3lib_BEfunc::thumbCode($rowCopy,$table,$field,$this->backPath,'thumbs.php',$config['config']['uploadfolder'],0,' align="middle"').

}

// we use '%AND' and '%OR' in uppercase

// split regular elements from sub elements

foreach ($searchArray as $key => $value) {

if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_tceforms_inline.php']) {

include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_tceforms_inline.php']);

}

// Clear cache for pages entered in TSconfig:

if ($TSConfig['clearCacheCmd']) {

$Commands = array_unique($Commands);

foreach($Commands as $cmdPart) {

$this->clear_cacheCmd($cmdPart);

break;

}

$pre = trim($this->parseSub($this->setup));

$this->lastConditionTrue=1;

} else {

if ((is_object($matchObj) && $matchObj->match($pre)) || $this->syntaxHighLight) {

$pre = trim($this->parseSub($this->setup));

$this->lastConditionTrue=1;

} else {

if ($this->syntaxHighLight) $this->regHighLight("condition",$lineP);

return $line;

} else {

if ($this->syntaxHighLight) $this->regHighLight("condition",$lineP);

$this->error('Line '.($this->lineNumberOffset+$this->rawP-1).': On return to [GLOBAL] scope, the script was short of '.$this->inBrace.' end brace(s)',1);

$this->inBrace=0;

$params = t3lib_div::get_tag_attributes($subparts[0]);

if ($params['source']) {

$sourceParts = explode(':',$params['source'],2);

case 'file':

$filename = t3lib_div::getFileAbsFileName(trim($sourceParts[1]));

if (strcmp($filename,'')) { // Must exist and must not contain '..' and must be relative

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

if (strstr($par,'=')) {

$keyValPair =explode('=',$par,2);

case 'type':

// Type:

/*

break;

case 'cat':

// list of categories.

$editableComments[$const]['cat'] = trim($catSplit[0]);

$catSplit[1]=trim($catSplit[1]); // This is the subcategory. Must be a key in $this->subCategories[]. catSplit[2] represents the search-order within the subcat.

if ($catSplit[1] && isset($this->subCategories[$catSplit[1]])) {

$retArr = array();

while(list($k,$v)=each($this->categories)) {

if (count($v)) {

}

}

return $retArr;

$retArr['type']='string';

} else {

$m=strcspn ($type,' [');

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

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

$reg = array();

$p_field='';

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

$sel='';

$sel = ' selected';

}

$p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$val.'</option>';

break;

case 'color':