projects / Packages / TYPO3.CMS.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
[BUGFIX] Untrusted GP data is unserialized in wizard_colorpicker.php and view_help.php
[Packages/TYPO3.CMS.git] / t3lib / class.t3lib_tsparser_ext.php
diff --git a/t3lib/class.t3lib_tsparser_ext.php b/t3lib/class.t3lib_tsparser_ext.php
old mode 100755 (executable)
new mode 100644 (file)
index 1b56a3b..7dcde6e
--- a/t3lib/class.t3lib_tsparser_ext.php
+++ b/t3lib/class.t3lib_tsparser_ext.php
@@ -1,210 +1,147 @@
 <?php
 /***************************************************************
 <?php
 /***************************************************************
-*  Copyright notice
-*
-*  (c) 1999-2005 Kasper Skaarhoj (kasperYYYY@typo3.com)
-*  All rights reserved
-*
-*  This script is part of the TYPO3 project. The TYPO3 project is
-*  free software; you can redistribute it and/or modify
-*  it under the terms of the GNU General Public License as published by
-*  the Free Software Foundation; either version 2 of the License, or
-*  (at your option) any later version.
-*
-*  The GNU General Public License can be found at
-*  http://www.gnu.org/copyleft/gpl.html.
-*  A copy is found in the textfile GPL.txt and important notices to the license
-*  from the author is found in LICENSE.txt distributed with these scripts.
-*
-*
-*  This script is distributed in the hope that it will be useful,
-*  but WITHOUT ANY WARRANTY; without even the implied warranty of
-*  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-*  GNU General Public License for more details.
-*
-*  This copyright notice MUST APPEAR in all copies of the script!
-***************************************************************/
-/**
- * TSParser extension class to t3lib_TStemplate
+ *  Copyright notice
  *
  *
- * $Id$
- * Contains functions for the TS module in TYPO3 backend
+ *  (c) 1999-2011 Kasper Skårhøj (kasperYYYY@typo3.com)
+ *  All rights reserved
  *
  *
- * @author     Kasper Skaarhoj <kasperYYYY@typo3.com>
- */
-/**
- * [CLASS/FUNCTION INDEX of SCRIPT]
+ *  This script is part of the TYPO3 project. The TYPO3 project is
+ *  free software; you can redistribute it and/or modify
+ *  it under the terms of the GNU General Public License as published by
+ *  the Free Software Foundation; either version 2 of the License, or
+ *  (at your option) any later version.
  *
  *
+ *  The GNU General Public License can be found at
+ *  http://www.gnu.org/copyleft/gpl.html.
+ *  A copy is found in the textfile GPL.txt and important notices to the license
+ *  from the author is found in LICENSE.txt distributed with these scripts.
  *
  *
  *
  *
- *  104: class t3lib_tsparser_ext extends t3lib_TStemplate
- *  193:     function flattenSetup($setupArray, $prefix, $resourceFlag)
- *  220:     function substituteConstants($all)
- *  249:     function substituteCMarkers($all)
- *  271:     function generateConfig_constants()
- *  320:     function ext_getSetup($theSetup,$theKey)
- *  351:     function ext_getObjTree($arr, $depth_in, $depthData, $parentType="",$parentValue="")
- *  446:     function lineNumberToScript($lnArr)
- *  477:     function makeHtmlspecialchars($theValue)
- *  490:     function ext_getSearchKeys($arr, $depth_in, $searchString, $keyArray)
- *  530:     function ext_getRootlineNumber($pid)
- *  548:     function ext_getTemplateHierarchyArr($arr,$depthData, $keyArray,$first=0)
- *  607:     function ext_process_hierarchyInfo($depthDataArr,&$pointer)
- *  638:     function ext_outputTS($config, $lineNumbers=0, $comments=0, $crop=0, $syntaxHL=0, $syntaxHLBlockmode=0)
- *  665:     function ext_fixed_lgd($string,$chars)
- *  681:     function ext_lnBreakPointWrap($ln,$str)
- *  694:     function ext_formatTS($input, $ln, $comments=1, $crop=0)
- *  733:     function ext_getFirstTemplate($id,$template_uid=0)
- *  752:     function ext_getAllTemplates($id)
- *  772:     function ext_compareFlatSetups($default)
- *  838:     function ext_categorizeEditableConstants($editConstArray)
- *  861:     function ext_getCategoryLabelArray()
- *  878:     function ext_getTypeData($type)
- *  919:     function ext_getTSCE_config($category)
- *  958:     function ext_getKeyImage($key)
- *  968:     function ext_getTSCE_config_image($imgConf)
- *  992:     function ext_resourceDims()
- * 1022:     function ext_readDirResources($path)
- * 1037:     function readDirectory($path,$type="file")
- * 1062:     function ext_fNandV($params)
- * 1080:     function ext_printFields($theConstants,$category)
+ *  This script is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ *  GNU General Public License for more details.
  *
  *
- *              SECTION: Processing input values
- * 1337:     function ext_regObjectPositions($constants)
- * 1352:     function ext_regObjects($pre)
- * 1397:     function ext_putValueInConf($key, $var)
- * 1420:     function ext_removeValueInConf($key)
- * 1436:     function ext_depthKeys($arr,$settings)
- * 1471:     function ext_procesInput($http_post_vars,$http_post_files,$theConstants,$tplRow)
- * 1598:     function upload_copy_file($typeDat,&$tplRow,$theRealFileName,$tmp_name)
- * 1644:     function ext_prevPageWithTemplate($id,$perms_clause)
- * 1660:     function ext_setStar($val)
- * 1672:     function ext_detectAndFixExtensionPrefix($value)
+ *  This copyright notice MUST APPEAR in all copies of the script!
+ ***************************************************************/
+/**
+ * TSParser extension class to t3lib_TStemplate
  *
  *
- * TOTAL FUNCTIONS: 40
- * (This index is automatically created/updated by the extension "extdeveval")
+ * Contains functions for the TS module in TYPO3 backend
  *
  *
+ * @author     Kasper Skårhøj <kasperYYYY@typo3.com>
  */
 
  */
 
-require_once(PATH_t3lib."class.t3lib_tstemplate.php");
-
-
-
-
-
-
 
 /**
  * TSParser extension class to t3lib_TStemplate
  *
 
 /**
  * TSParser extension class to t3lib_TStemplate
  *
- * @author     Kasper Skaarhoj <kasperYYYY@typo3.com>
+ * @author     Kasper Skårhøj <kasperYYYY@typo3.com>
  * @package TYPO3
  * @subpackage t3lib
  */
  * @package TYPO3
  * @subpackage t3lib
  */
-class t3lib_tsparser_ext extends t3lib_TStemplate      {
+class t3lib_tsparser_ext extends t3lib_TStemplate {
 
 
-       var $edit_divider = "###MOD_TS:EDITABLE_CONSTANTS###";          // This string is used to indicate the point in a template from where the editable constants are listed. Any vars before this point (if it exists though) is regarded as default values.
-       var $HTMLcolorList = "aqua,black,blue,fuchsia,gray,green,lime,maroon,navy,olive,purple,red,silver,teal,yellow,white";
+       var $edit_divider = '###MOD_TS:EDITABLE_CONSTANTS###'; // This string is used to indicate the point in a template from where the editable constants are listed. Any vars before this point (if it exists though) is regarded as default values.
+       var $HTMLcolorList = 'aqua,beige,black,blue,brown,fuchsia,gold,gray,green,lime,maroon,navy,olive,orange,purple,red,silver,tan,teal,turquoise,yellow,white';
 
                // internal
        var $categories = array(
 
                // internal
        var $categories = array(
-               "basic" => array(),             // Constants of superior importance for the template-layout. This is dimensions, imagefiles and enabling of various features. The most basic constants, which you would almost always want to configure.
-               "menu" => array(),              // Menu setup. This includes fontfiles, sizes, background images. Depending on the menutype.
-               "content" => array(),   // All constants related to the display of pagecontent elements
-               "page" => array(),              // General configuration like metatags, link targets
-               "advanced" => array(),  // Advanced functions, which are used very seldomly.
-               "all" => array()                // All constants are put here also!
-       );              // This will be filled with the available categories of the current template.
+               'basic' => array(), // Constants of superior importance for the template-layout. This is dimensions, imagefiles and enabling of various features. The most basic constants, which you would almost always want to configure.
+               'menu' => array(), // Menu setup. This includes fontfiles, sizes, background images. Depending on the menutype.
+               'content' => array(), // All constants related to the display of pagecontent elements
+               'page' => array(), // General configuration like metatags, link targets
+               'advanced' => array(), // Advanced functions, which are used very seldomly.
+               'all' => array() // All constants are put here also!
+       ); // This will be filled with the available categories of the current template.
        var $subCategories = array(
        var $subCategories = array(
-       // Standard categories:
-               "enable" => Array("Enable features", "a"),
-               "dims" => Array("Dimensions, widths, heights, pixels", "b"),
-               "file" => Array("Files", "c"),
-               "typo"  => Array("Typography", "d"),
-               "color" => Array("Colors", "e"),
-               "links" => Array("Links and targets", "f"),
-               "language" => Array("Language specific constants", "g"),
-
-       // subcategories based on the default content elements
-               "cheader" => Array("Content: 'Header'", "ma"),
-               "cheader_g" => Array("Content: 'Header', Graphical", "ma"),
-               "ctext" => Array("Content: 'Text'", "mb"),
-//             "ctextpic" =>
-               "cimage" => Array("Content: 'Image'", "md"),
-               "cbullets" => Array("Content: 'Bullet list'", "me"),
-               "ctable" => Array("Content: 'Table'", "mf"),
-               "cuploads" => Array("Content: 'Filelinks'", "mg"),
-               "cmultimedia" => Array("Content: 'Multimedia'", "mh"),
-               "cmailform" => Array("Content: 'Form'", "mi"),
-               "csearch" => Array("Content: 'Search'", "mj"),
-               "clogin" => Array("Content: 'Login'", "mk"),
-               "csplash" => Array("Content: 'Textbox'", "ml"),
-               "cmenu" => Array("Content: 'Menu/Sitemap'", "mm"),
-               "cshortcut" => Array("Content: 'Insert records'", "mn"),
-               "clist" => Array("Content: 'List of records'", "mo"),
-               "cscript" => Array("Content: 'Script'", "mp"),
-               "chtml" => Array("Content: 'HTML'", "mq")
+                       // Standard categories:
+               'enable' => Array('Enable features', 'a'),
+               'dims' => Array('Dimensions, widths, heights, pixels', 'b'),
+               'file' => Array('Files', 'c'),
+               'typo' => Array('Typography', 'd'),
+               'color' => Array('Colors', 'e'),
+               'links' => Array('Links and targets', 'f'),
+               'language' => Array('Language specific constants', 'g'),
+
+                       // subcategories based on the default content elements
+               'cheader' => Array('Content: \'Header\'', 'ma'),
+               'cheader_g' => Array('Content: \'Header\', Graphical', 'ma'),
+               'ctext' => Array('Content: \'Text\'', 'mb'),
+               'cimage' => Array('Content: \'Image\'', 'md'),
+               'cbullets' => Array('Content: \'Bullet list\'', 'me'),
+               'ctable' => Array('Content: \'Table\'', 'mf'),
+               'cuploads' => Array('Content: \'Filelinks\'', 'mg'),
+               'cmultimedia' => Array('Content: \'Multimedia\'', 'mh'),
+               'cmedia' => Array('Content: \'Media\'', 'mr'),
+               'cmailform' => Array('Content: \'Form\'', 'mi'),
+               'csearch' => Array('Content: \'Search\'', 'mj'),
+               'clogin' => Array('Content: \'Login\'', 'mk'),
+               'csplash' => Array('Content: \'Textbox\'', 'ml'),
+               'cmenu' => Array('Content: \'Menu/Sitemap\'', 'mm'),
+               'cshortcut' => Array('Content: \'Insert records\'', 'mn'),
+               'clist' => Array('Content: \'List of records\'', 'mo'),
+               'cscript' => Array('Content: \'Script\'', 'mp'),
+               'chtml' => Array('Content: \'HTML\'', 'mq')
        );
        var $resourceDimensions = array();
        var $dirResources = array();
 
        );
        var $resourceDimensions = array();
        var $dirResources = array();
 
-//     var $matchAll = 0;              // If set, all conditions are matched!
-
-       var $backend_info=1;
+       var $backend_info = 1;
 
                // tsconstanteditor
 
                // tsconstanteditor
-       var $ext_inBrace=0;
+       var $ext_inBrace = 0;
 
                // tsbrowser
        var $tsbrowser_searchKeys = array();
        var $tsbrowser_depthKeys = array();
 
                // tsbrowser
        var $tsbrowser_searchKeys = array();
        var $tsbrowser_depthKeys = array();
-       var $constantMode="";
-       var $regexMode="";
-       var $fixedLgd="";
-       var $resourceCheck=0;
-       var $ext_lineNumberOffset=0;
-       var $ext_localGfxPrefix="";
-       var $ext_localWebGfxPrefix="";
-       var $ext_expandAllNotes=0;
-       var $ext_noPMicons=0;
-       var $ext_noSpecialCharsOnLabels=0;
-       var $ext_listOfTemplatesArr=array();
-       var $ext_lineNumberOffset_mode="";
-       var $ext_dontCheckIssetValues=0;        // Dont change...
-       var $ext_noCEUploadAndCopying=0;
-       var $ext_printAll=0;
-       var $ext_CEformName="forms[0]";
-       var $ext_defaultOnlineResourceFlag=0;
+       var $constantMode = '';
+       var $regexMode = '';
+       var $fixedLgd = '';
+       var $resourceCheck = 0;
+       var $ext_lineNumberOffset = 0;
+       var $ext_localGfxPrefix = '';
+       var $ext_localWebGfxPrefix = '';
+       var $ext_expandAllNotes = 0;
+       var $ext_noPMicons = 0;
+       var $ext_noSpecialCharsOnLabels = 0;
+       var $ext_listOfTemplatesArr = array();
+       var $ext_lineNumberOffset_mode = '';
+       var $ext_dontCheckIssetValues = 0; // Dont change...
+       var $ext_noCEUploadAndCopying = 0;
+       var $ext_printAll = 0;
+       var $ext_CEformName = 'forms[0]';
+       var $ext_defaultOnlineResourceFlag = 0;
        var $doNotSortCategoriesBeforeMakingForm = FALSE;
 
                // ts analyzer
        var $doNotSortCategoriesBeforeMakingForm = FALSE;
 
                // ts analyzer
-       var $templateTitles=array();
+       var $templateTitles = array();
 
 
        /**
         * This flattens a hierarchical setuparray to $this->flatSetup
 
 
        /**
         * This flattens a hierarchical setuparray to $this->flatSetup
-        * The original function fetched the resource-file if any ("file."). This functions doesn't.
+        * The original function fetched the resource-file if any ('file.'). This functions doesn't.
         *
         * @param       [type]          $setupArray: ...
         * @param       [type]          $prefix: ...
         * @param       [type]          $resourceFlag: ...
         * @return      [type]          ...
         */
         *
         * @param       [type]          $setupArray: ...
         * @param       [type]          $prefix: ...
         * @param       [type]          $resourceFlag: ...
         * @return      [type]          ...
         */
-       function flattenSetup($setupArray, $prefix, $resourceFlag)      {
-               if (is_array($setupArray))      {
-                       $this->getFileName_backPath=PATH_site;          // Setting absolute prefixed path for relative resources.
-                       reset($setupArray);
-                       while(list($key,$val)=each($setupArray))        {
-                               if ($prefix || substr($key,0,16)!="TSConstantEditor")   {               // We don't want "TSConstantEditor" in the flattend setup.
-                                       if (is_array($val))     {
-                                               $this->flattenSetup($val,$prefix.$key, ($key=="file."));
+       function flattenSetup($setupArray, $prefix, $resourceFlag) {
+               if (is_array($setupArray)) {
+                       $this->getFileName_backPath = PATH_site; // Setting absolute prefixed path for relative resources.
+                       foreach ($setupArray as $key => $val) {
+                               if ($prefix || substr($key, 0, 16) != 'TSConstantEditor') { // We don't want 'TSConstantEditor' in the flattend setup.
+                                       if (is_array($val)) {
+                                               $this->flattenSetup($val, $prefix . $key, ($key == 'file.'));
                                        } elseif ($resourceFlag && $this->resourceCheck) {
                                        } elseif ($resourceFlag && $this->resourceCheck) {
-                                               $this->flatSetup[$prefix.$key] = $this->getFileName($val);
-                                               if ($this->removeFromGetFilePath && substr($this->flatSetup[$prefix.$key],0,strlen($this->removeFromGetFilePath))==$this->removeFromGetFilePath)        {
-                                                       $this->flatSetup[$prefix.$key] = substr($this->flatSetup[$prefix.$key],strlen($this->removeFromGetFilePath));
+                                               $this->flatSetup[$prefix . $key] = $this->getFileName($val);
+                                               if ($this->removeFromGetFilePath &&
+                                                       substr($this->flatSetup[$prefix . $key], 0, strlen($this->removeFromGetFilePath)) == $this->removeFromGetFilePath) {
+                                                               $this->flatSetup[$prefix . $key] = substr($this->flatSetup[$prefix . $key], strlen($this->removeFromGetFilePath));
                                                }
                                        } else {
                                                }
                                        } else {
-                                               $this->flatSetup[$prefix.$key] = $val;
+                                               $this->flatSetup[$prefix . $key] = $val;
                                        }
                                }
                        }
                                        }
                                }
                        }
@@ -217,27 +154,41 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $all: ...
         * @return      [type]          ...
         */
         * @param       [type]          $all: ...
         * @return      [type]          ...
         */
-       function substituteConstants($all)      {
-               $this->Cmarker=substr(md5(uniqid("")),0,6);
-               reset($this->flatSetup);
-               while (list($const,$val)=each($this->flatSetup))        {
-                       if (!is_array($val))    {
-                               switch($this->constantMode)     {
-                                       case "const":
-                                               $all = str_replace('{$'.$const.'}','##'.$this->Cmarker.'_B##{$'.$const.'}##'.$this->Cmarker.'_E##',$all);
-                                       break;
-                                       case "subst":
-                                               $all = str_replace('{$'.$const.'}','##'.$this->Cmarker.'_B##'.$val.'##'.$this->Cmarker.'_E##',$all);
-                                       break;
-                                       case "untouched":
-                                       break;
-                                       default:
-                                               $all = str_replace('{$'.$const.'}',$val,$all);
-                                       break;
-                               }
-                       }
+       function substituteConstants($all) {
+               $this->Cmarker = substr(md5(uniqid('')), 0, 6);
+
+               return preg_replace_callback('/\{\$(.[^}]+)\}/', array($this, 'substituteConstantsCallBack'), $all);
+       }
+
+       /**
+        * Call back method for preg_replace_callback in substituteConstants
+        *
+        * @param       array           Regular expression matches
+        * @return      string          Replacement
+        * @see substituteConstants()
+        */
+       function substituteConstantsCallBack($matches) {
+               switch ($this->constantMode) {
+                       case 'const':
+                               $ret_val = isset($this->flatSetup[$matches[1]]) && !is_array($this->flatSetup[$matches[1]]) ?
+                                               '##' . $this->Cmarker . '_B##' . $matches[0] . '##' . $this->Cmarker . '_E##' :
+                                               $matches[0];
+                       break;
+                       case 'subst':
+                               $ret_val = isset($this->flatSetup[$matches[1]]) && !is_array($this->flatSetup[$matches[1]]) ?
+                                               '##' . $this->Cmarker . '_B##' . $this->flatSetup[$matches[1]] . '##' . $this->Cmarker . '_E##' :
+                                               $matches[0];
+                       break;
+                       case 'untouched':
+                               $ret_val = $matches[0];
+                       break;
+                       default:
+                               $ret_val = isset($this->flatSetup[$matches[1]]) && !is_array($this->flatSetup[$matches[1]]) ?
+                                               $this->flatSetup[$matches[1]] :
+                                               $matches[0];
                }
                }
-               return $all;
+
+               return $ret_val;
        }
 
        /**
        }
 
        /**
@@ -246,15 +197,15 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $all: ...
         * @return      [type]          ...
         */
         * @param       [type]          $all: ...
         * @return      [type]          ...
         */
-       function substituteCMarkers($all)       {
-               switch($this->constantMode)     {
-                       case "const":
-                               $all = str_replace('##'.$this->Cmarker.'_B##', '<font color="green"><B>', $all);
-                               $all = str_replace('##'.$this->Cmarker.'_E##', '</b></font>', $all);
+       function substituteCMarkers($all) {
+               switch ($this->constantMode) {
+                       case 'const':
+                               $all = str_replace('##' . $this->Cmarker . '_B##', '<font color="green"><strong>', $all);
+                               $all = str_replace('##' . $this->Cmarker . '_E##', '</strong></font>', $all);
                        break;
                        break;
-                       case "subst":
-                               $all = str_replace('##'.$this->Cmarker.'_B##', '<font color="green"><B>', $all);
-                               $all = str_replace('##'.$this->Cmarker.'_E##', '</b></font>', $all);
+                       case 'subst':
+                               $all = str_replace('##' . $this->Cmarker . '_B##', '<font color="green"><strong>', $all);
+                               $all = str_replace('##' . $this->Cmarker . '_E##', '</strong></font>', $all);
                        break;
                        default:
                                $all = $all;
                        break;
                        default:
                                $all = $all;
@@ -264,48 +215,46 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
        }
 
        /**
        }
 
        /**
-        * [Describe function...]
+        * Parses the constants in $this->const with respect to the constant-editor in this module.
+        * In particular comments in the code are registered and the edit_divider is taken into account.
         *
         * @return      [type]          ...
         */
         *
         * @return      [type]          ...
         */
-       function generateConfig_constants()     {
-                       // Parses the constants in $this->const with respect to the constant-editor in this module.
-                       // In particular comments in the code are registered and the edit_divider is taken into account.
+       function generateConfig_constants() {
                        // These vars are also set lateron...
                        // These vars are also set lateron...
-               $this->setup["resources"]= $this->resources;
-               $this->setup["sitetitle"]= $this->sitetitle;
+               $this->setup['resources'] = $this->resources;
+               $this->setup['sitetitle'] = $this->sitetitle;
 
                        // parse constants
 
                        // parse constants
-               $constants = t3lib_div::makeInstance("t3lib_TSparser");
-               $constants->regComments=1;              // Register comments!
+               $constants = t3lib_div::makeInstance('t3lib_TSparser');
+               $constants->regComments = 1; // Register comments!
                $constants->setup = $this->const;
                $constants->setup = $this->mergeConstantsFromPageTSconfig($constants->setup);
 
                $constants->setup = $this->const;
                $constants->setup = $this->mergeConstantsFromPageTSconfig($constants->setup);
 
-               $matchObj = t3lib_div::makeInstance("t3lib_matchCondition");
-//             $matchObj->matchAlternative = array("[globalString =  page | title = *test*]");
-               $matchObj->matchAll=1;          // Matches ALL conditions in TypoScript
+               /* @var $matchObj t3lib_matchCondition_frontend */
+               $matchObj = t3lib_div::makeInstance('t3lib_matchCondition_frontend');
+               $matchObj->setSimulateMatchResult(TRUE); // Matches ALL conditions in TypoScript
 
 
-               $c=0;
-               $cc=count($this->constants);
-               reset($this->constants);
-               while (list(,$str)=each($this->constants))      {
+               $c = 0;
+               $cc = count($this->constants);
+               foreach ($this->constants as $str) {
                        $c++;
                        $c++;
-                       if ($c==$cc)    {
-                               if (strstr($str,$this->edit_divider))   {
-                                       $parts = explode($this->edit_divider,$str,2);
-                                       $str=$parts[1];
-                                       $constants->parse($parts[0],$matchObj);
+                       if ($c == $cc) {
+                               if (strstr($str, $this->edit_divider)) {
+                                       $parts = explode($this->edit_divider, $str, 2);
+                                       $str = $parts[1];
+                                       $constants->parse($parts[0], $matchObj);
                                }
                                $this->flatSetup = Array();
                                }
                                $this->flatSetup = Array();
-                               $this->flattenSetup($constants->setup,"","");
-                               $defaultConstants=$this->flatSetup;
+                               $this->flattenSetup($constants->setup, '', '');
+                               $defaultConstants = $this->flatSetup;
                        }
                        }
-                       $constants->parse($str,$matchObj);
+                       $constants->parse($str, $matchObj);
                }
 
                $this->flatSetup = Array();
                }
 
                $this->flatSetup = Array();
-               $this->flattenSetup($constants->setup,"","");
-               $this->setup["constants"] = $constants->setup;
+               $this->flattenSetup($constants->setup, '', '');
+               $this->setup['constants'] = $constants->setup;
 
                return $this->ext_compareFlatSetups($defaultConstants);
        }
 
                return $this->ext_compareFlatSetups($defaultConstants);
        }
@@ -317,23 +266,19 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $theKey: ...
         * @return      [type]          ...
         */
         * @param       [type]          $theKey: ...
         * @return      [type]          ...
         */
-       function ext_getSetup($theSetup,$theKey)        {
-               $parts = explode(".",$theKey,2);
-//             debug("-----------",1);
-//             debug($theKey,1);
-               if (strcmp($parts[0],"") && is_array($theSetup[$parts[0]."."])) {
-//                     debug(trim($parts[1]),1);
-                       if (strcmp(trim($parts[1]),"")) {
-//                     debug(trim($parts[1]),1);
-                               return $this->ext_getSetup($theSetup[$parts[0]."."],trim($parts[1]));
+       function ext_getSetup($theSetup, $theKey) {
+               $parts = explode('.', $theKey, 2);
+               if (strcmp($parts[0], '') && is_array($theSetup[$parts[0] . '.'])) {
+                       if (strcmp(trim($parts[1]), '')) {
+                               return $this->ext_getSetup($theSetup[$parts[0] . '.'], trim($parts[1]));
                        } else {
                        } else {
-                               return array($theSetup[$parts[0]."."], $theSetup[$parts[0]]);
+                               return array($theSetup[$parts[0] . '.'], $theSetup[$parts[0]]);
                        }
                } else {
                        }
                } else {
-                       if (strcmp(trim($theKey),""))   {
-                               return array(array(),$theSetup[$theKey]);
+                       if (strcmp(trim($theKey), '')) {
+                               return array(array(), $theSetup[$theKey]);
                        } else {
                        } else {
-                               return array($theSetup,"");
+                               return array($theSetup, '');
                        }
                }
        }
                        }
                }
        }
@@ -346,93 +291,117 @@ class t3lib_tsparser_ext extends t3lib_TStemplate        {
         * @param       [type]          $depthData: ...
         * @param       [type]          $parentType: ...
         * @param       [type]          $parentValue: ...
         * @param       [type]          $depthData: ...
         * @param       [type]          $parentType: ...
         * @param       [type]          $parentValue: ...
+        * @param       boolean         $alphaSort sorts the array keys / tree by alphabet when set to 1
         * @return      [type]          ...
         */
         * @return      [type]          ...
         */
-       function ext_getObjTree($arr, $depth_in, $depthData, $parentType="",$parentValue="")    {
-               $HTML="";
-               $a=0;
-
-               reset($arr);
-               $keyArr_num=array();
-               $keyArr_alpha=array();
-               while (list($key,)=each($arr))  {
-                       if (substr($key,-2)!="..")      {       // Don't do anything with comments / linenumber registrations...
-                               $key=ereg_replace("\.$","",$key);
-                               if (substr($key,-1)!=".")       {
-                                       if (t3lib_div::testInt($key))   {
-                                               $keyArr_num[$key]=$arr[$key];
+       function ext_getObjTree($arr, $depth_in, $depthData, $parentType = '', $parentValue = '', $alphaSort = '0') {
+               $HTML = '';
+               $a = 0;
+
+               if ($alphaSort == '1') {
+                       ksort($arr);
+               }
+               $keyArr_num = array();
+               $keyArr_alpha = array();
+               foreach ($arr as $key => $value) {
+                       if (substr($key, -2) != '..') { // Don't do anything with comments / linenumber registrations...
+                               $key = preg_replace('/\.$/', '', $key);
+                               if (substr($key, -1) != '.') {
+                                       if (t3lib_utility_Math::canBeInterpretedAsInteger($key)) {
+                                               $keyArr_num[$key] = $arr[$key];
                                        } else {
                                        } else {
-                                               $keyArr_alpha[$key]=$arr[$key];
+                                               $keyArr_alpha[$key] = $arr[$key];
                                        }
                                }
                        }
                }
                ksort($keyArr_num);
                                        }
                                }
                        }
                }
                ksort($keyArr_num);
-               $keyArr=$keyArr_num+$keyArr_alpha;
-               reset($keyArr);
-               $c=count($keyArr);
-               if ($depth_in)  {$depth_in = $depth_in.".";}
-
-//             $validate_info= verify_TSobjects($keyArr,$parentType,$parentValue);
-//             debug($validate_info);
+               $keyArr = $keyArr_num + $keyArr_alpha;
+               $c = count($keyArr);
+               if ($depth_in) {
+                       $depth_in = $depth_in . '.';
+               }
 
 
-               while (list($key,)=each($keyArr))       {
+               foreach ($keyArr as $key => $value) {
                        $a++;
                        $a++;
-                       $depth=$depth_in.$key;
-                       if ($this->bType!="const" || substr($depth,0,1)!="_")   {               // this excludes all constants starting with "_" from being shown.
-                               $goto = substr(md5($depth),0,6);
-       //                      debug($depth);
-                               $deeper = (is_array($arr[$key."."]) && ($this->tsbrowser_depthKeys[$depth] || $this->ext_expandAllNotes)) ? 1 : 0;
-                               $PM = "join";
-                               $LN = ($a==$c)?"blank":"line";
-                               $BTM = ($a==$c)?"bottom":"";
-                               $PM = is_array($arr[$key."."]) && !$this->ext_noPMicons ? ($deeper ? "minus":"plus") : "join";
-
-                               $HTML.=$depthData;
-                               $theIcon='<img src="'.$GLOBALS["BACK_PATH"].'t3lib/gfx/ol/'.$PM.$BTM.'.gif" width="18" height="16" align="top" border="0" alt="" />';
-                               if ($PM=="join")        {
-                                       $HTML.=$theIcon;
+                       $depth = $depth_in . $key;
+                       if ($this->bType != 'const' || substr($depth, 0, 1) != '_') { // this excludes all constants starting with '_' from being shown.
+                               $goto = substr(md5($depth), 0, 6);
+                               $deeper = (is_array($arr[$key . '.']) && ($this->tsbrowser_depthKeys[$depth] || $this->ext_expandAllNotes)) ? 1 : 0;
+                               $PM = 'join';
+                               $LN = ($a == $c) ? 'blank' : 'line';
+                               $BTM = ($a == $c) ? 'bottom' : '';
+                               $PM = is_array($arr[$key . '.']) && !$this->ext_noPMicons ? ($deeper ? 'minus' : 'plus') : 'join';
+
+                               $HTML .= $depthData;
+                               $theIcon = '<img src="' . $GLOBALS['BACK_PATH'] . 'gfx/ol/' . $PM . $BTM . '.gif" width="18" height="16" align="top" border="0" alt="" />';
+                               if ($PM == 'join') {
+                                       $HTML .= $theIcon;
                                } else {
                                } else {
-                                       $aHref='index.php?id='.$GLOBALS["SOBE"]->id.'&tsbr['.$depth.']='.($deeper?0:1).'#'.$goto;
-                                       $HTML.='<a name="'.$goto.'" href="'.htmlspecialchars($aHref).'">'.$theIcon.'</a>';
+                                       $aHref = 'index.php?id=' . $GLOBALS['SOBE']->id .
+                                                        '&tsbr[' . $depth . ']=' . ($deeper ? 0 : 1) .
+                                                        (t3lib_div::_GP("breakPointLN") ? '&breakPointLN=' . t3lib_div::_GP("breakPointLN") : '') .
+                                                        '#' . $goto;
+                                       $HTML .= '<a name="' . $goto . '" href="' . htmlspecialchars($aHref) . '">' . $theIcon . '</a>';
                                }
 
                                $label = $key;
                                }
 
                                $label = $key;
-                               if (t3lib_div::inList("types,resources,sitetitle",$depth) && $this->bType=="setup")     {               // Read only...
-                                       $label='<font color="#666666">'.$label.'</font>';
+                               if (t3lib_div::inList('types,resources,sitetitle', $depth) && $this->bType == 'setup') { // Read only...
+                                       $label = '<font color="#666666">' . $label . '</font>';
                                } else {
                                } else {
-                                       if ($this->linkObjects) {
-                                               $aHref = 'index.php?id='.$GLOBALS["SOBE"]->id.'&sObj='.$depth;
-                                               if ($this->bType!="const")      {
-                                                       $ln = is_array($arr[$key.'.ln..']) ? 'Defined in: '.$this->lineNumberToScript($arr[$key.'.ln..']) : 'N/A';
+                                       if ($this->linkObjects) {
+                                               $aHref = 'index.php?id=' . $GLOBALS['SOBE']->id .
+                                                                '&sObj=' . $depth .
+                                                                (t3lib_div::_GP("breakPointLN") ? '&breakPointLN=' . t3lib_div::_GP("breakPointLN") : '');
+                                               if ($this->bType != 'const') {
+                                                       $ln = is_array($arr[$key . '.ln..']) ? 'Defined in: ' . $this->lineNumberToScript($arr[$key . '.ln..']) : 'N/A';
                                                } else {
                                                        $ln = '';
                                                }
 
                                                } else {
                                                        $ln = '';
                                                }
 
-                                               if ($this->tsbrowser_searchKeys[$depth] & 4)    { $label = '<b><font color="red">'.$label.'</font></b>'; }      // The key has matched the search string
-                                               $label = '<a href="'.htmlspecialchars($aHref).'" title="'.htmlspecialchars($ln).'">'.$label.'</a>';
+                                               if ($this->tsbrowser_searchKeys[$depth] & 4) {
+                                                       $label = '<strong><font color="red">' . $label . '</font></strong>';
+                                               } // The key has matched the search string
+                                               $label = '<a href="' . htmlspecialchars($aHref) . '" title="' . htmlspecialchars($ln) . '">' . $label . '</a>';
                                        }
                                }
 
                                        }
                                }
 
-                               $HTML.="[".$label."]";
+                               $HTML .= '[' . $label . ']';
 
 
-                               if (isset($arr[$key]))  {
+                               if (isset($arr[$key])) {
                                        $theValue = $arr[$key];
                                        $theValue = $arr[$key];
-                                       if ($this->fixedLgd)    {
-                                               $imgBlocks = ceil(1+strlen($depthData)/77);
-                                               $lgdChars = 68-ceil(strlen("[".$key."]")*0.8)-$imgBlocks*3;
-                                               $theValue = $this->ext_fixed_lgd($theValue,$lgdChars);
+                                       if ($this->fixedLgd) {
+                                               $imgBlocks = ceil(1 + strlen($depthData) / 77);
+                                               $lgdChars = 68 - ceil(strlen('[' . $key . ']') * 0.8) - $imgBlocks * 3;
+                                               $theValue = $this->ext_fixed_lgd($theValue, $lgdChars);
                                        }
                                        }
-                                       if ($this->tsbrowser_searchKeys[$depth] & 2)    {       // The value has matched the search string
-                                               $HTML.='=<b><font color="red">'.$this->makeHtmlspecialchars($theValue).'</font></b>';
+                                       if ($this->tsbrowser_searchKeys[$depth] & 2) { // The value has matched the search string
+                                               $HTML .= '&nbsp;=&nbsp;<strong><font color="red">' . $this->makeHtmlspecialchars($theValue) . '</font></strong>';
                                        } else {
                                        } else {
-                                               $HTML.="=<b>".$this->makeHtmlspecialchars($theValue)."</b>";
+                                               $HTML .= '&nbsp;=&nbsp;<strong>' . $this->makeHtmlspecialchars($theValue) . '</strong>';
+                                       }
+                                       if ($this->ext_regComments && isset($arr[$key . '..'])) {
+                                               $comment = $arr[$key . '..'];
+                                               if (!preg_match('/### <INCLUDE_TYPOSCRIPT:.*/', $comment)) { // Skip INCLUDE_TYPOSCRIPT comments, they are almost useless
+                                                       $comment = preg_replace('/[\r\n]/', ' ', $comment); // Remove linebreaks, replace with ' '
+                                                       $comment = preg_replace('/[#\*]{2,}/', '', $comment); // Remove # and * if more than twice in a row
+                                                       $comment = preg_replace('/^[#\*\s]+/', '# ', $comment); // Replace leading # (just if it exists) and add it again. Result: Every comment should be prefixed by a '#'.
+                                                       $comment = $this->makeHtmlspecialchars($comment); // Masking HTML Tags: Replace < with &lt; and > with &gt;
+                                                       $HTML .= ' <span class="comment">' . trim($comment) . '</span>';
+                                               }
                                        }
                                }
                                        }
                                }
-                               $HTML.="<br />";
-
-                               if ($deeper)    {
-                                       $HTML.=$this->ext_getObjTree($arr[$key."."], $depth, $depthData.'<img src="'.$GLOBALS["BACK_PATH"].'t3lib/gfx/ol/'.$LN.'.gif" width="18" height="16" align="top" alt="" />', $validate_info[$key], $arr[$key]);
+                               $HTML .= '<br />';
+
+                               if ($deeper) {
+                                       $HTML .= $this->ext_getObjTree(
+                                               $arr[$key . '.'],
+                                               $depth,
+                                               $depthData . '<img src="' . $GLOBALS['BACK_PATH'] . 'gfx/ol/' . $LN . '.gif" width="18" height="16" align="top" alt="" />',
+                                               '' /* not used: $validate_info[$key] */,
+                                               $arr[$key],
+                                               $alphaSort
+                                       );
                                }
                        }
                }
                                }
                        }
                }
@@ -445,29 +414,29 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $lnArr: ...
         * @return      [type]          ...
         */
         * @param       [type]          $lnArr: ...
         * @return      [type]          ...
         */
-       function lineNumberToScript($lnArr)     {
-               if (!is_array($this->lnToScript))       {
+       function lineNumberToScript($lnArr) {
+               if (!is_array($this->lnToScript)) {
                        $this->lnToScript = array();
                        $this->lnToScript = array();
-                       $c=1;
-                       $c+=substr_count($GLOBALS['TYPO3_CONF_VARS']['FE']['defaultTypoScript_setup'],chr(10))+2;
+                       $c = 1;
+                       $c += substr_count($GLOBALS['TYPO3_CONF_VARS']['FE']['defaultTypoScript_setup'], LF) + 2;
                        $this->lnToScript[$c] = '[Default]';
 
                        $this->lnToScript[$c] = '[Default]';
 
-                       foreach($this->hierarchyInfoToRoot as $info)    {
-                               $c+=$info['configLines']+1;
+                       foreach ($this->hierarchyInfoToRoot as $info) {
+                               $c += $info['configLines'] + 1;
                                $this->lnToScript[$c] = $info['title'];
                        }
                }
 
                                $this->lnToScript[$c] = $info['title'];
                        }
                }
 
-               foreach($lnArr as $k => $ln)    {
-                       foreach($this->lnToScript as $endLn => $title)  {
-                               if ($endLn >= intval($ln))      {
-                                       $lnArr[$k] = '"'.$title.'", '.$ln;
+               foreach ($lnArr as $k => $ln) {
+                       foreach ($this->lnToScript as $endLn => $title) {
+                               if ($endLn >= intval($ln)) {
+                                       $lnArr[$k] = '"' . $title . '", ' . $ln;
                                        break;
                                }
                        }
                }
 
                                        break;
                                }
                        }
                }
 
-               return implode('; ',$lnArr);
+               return implode('; ', $lnArr);
        }
 
        /**
        }
 
        /**
@@ -476,7 +445,7 @@ class t3lib_tsparser_ext extends t3lib_TStemplate   {
         * @param       [type]          $theValue: ...
         * @return      [type]          ...
         */
         * @param       [type]          $theValue: ...
         * @return      [type]          ...
         */
-       function makeHtmlspecialchars($theValue){
+       function makeHtmlspecialchars($theValue) {
                return $this->ext_noSpecialCharsOnLabels ? $theValue : htmlspecialchars($theValue);
        }
 
                return $this->ext_noSpecialCharsOnLabels ? $theValue : htmlspecialchars($theValue);
        }
 
@@ -489,50 +458,49 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $keyArray: ...
         * @return      [type]          ...
         */
         * @param       [type]          $keyArray: ...
         * @return      [type]          ...
         */
-       function ext_getSearchKeys($arr, $depth_in, $searchString, $keyArray)           {
-               reset($arr);
-               $keyArr=array();
-               while (list($key,)=each($arr))  {
-                       $key=ereg_replace('\.$','',$key);
-                       if (substr($key,-1)!='.')       {
-                               $keyArr[$key]=1;
+       function ext_getSearchKeys($arr, $depth_in, $searchString, $keyArray) {
+               $keyArr = array();
+               foreach ($arr as $key => $value) {
+                       $key = preg_replace('/\.$/', '', $key);
+                       if (substr($key, -1) != '.') {
+                               $keyArr[$key] = 1;
                        }
                }
                        }
                }
-               reset($keyArr);
-//             asort($keyArr);
-               $c=count($keyArr);
-               if ($depth_in)  { $depth_in = $depth_in.'.'; }
-               while (list($key,)=each($keyArr))       {
-                       $depth=$depth_in.$key;
-                       $deeper = is_array($arr[$key."."]);
-
-                       if ($this->regexMode)   {
-                               if (ereg($searchString,$arr[$key]))     {       // The value has matched
-                                       $this->tsbrowser_searchKeys[$depth]+=2;
+               $c = count($keyArr);
+               if ($depth_in) {
+                       $depth_in = $depth_in . '.';
+               }
+               foreach ($keyArr as $key => $value) {
+                       $depth = $depth_in . $key;
+                       $deeper = is_array($arr[$key . '.']);
+
+                       if ($this->regexMode) {
+                               if (preg_match('/' . $searchString . '/', $arr[$key])) { // The value has matched
+                                       $this->tsbrowser_searchKeys[$depth] += 2;
                                }
                                }
-                               if (ereg($searchString,$key))   {               // The key has matched
-                                       $this->tsbrowser_searchKeys[$depth]+=4;
+                               if (preg_match('/' . $searchString . '/', $key)) { // The key has matched
+                                       $this->tsbrowser_searchKeys[$depth] += 4;
                                }
                                }
-                               if (ereg($searchString,$depth_in))      {       // Just open this subtree if the parent key has matched the search
-                                       $this->tsbrowser_searchKeys[$depth]=1;
+                               if (preg_match('/' . $searchString . '/', $depth_in)) { // Just open this subtree if the parent key has matched the search
+                                       $this->tsbrowser_searchKeys[$depth] = 1;
                                }
                        } else {
                                }
                        } else {
-                               if (stristr($arr[$key],$searchString))  {       // The value has matched
-                                       $this->tsbrowser_searchKeys[$depth]+=2;
+                               if (stristr($arr[$key], $searchString)) { // The value has matched
+                                       $this->tsbrowser_searchKeys[$depth] += 2;
                                }
                                }
-                               if (stristr($key,$searchString))        {       // The key has matches
-                                       $this->tsbrowser_searchKeys[$depth]+=4;
+                               if (stristr($key, $searchString)) { // The key has matches
+                                       $this->tsbrowser_searchKeys[$depth] += 4;
                                }
                                }
-                               if (stristr($depth_in,$searchString))   {       // Just open this subtree if the parent key has matched the search
-                                       $this->tsbrowser_searchKeys[$depth]=1;
+                               if (stristr($depth_in, $searchString)) { // Just open this subtree if the parent key has matched the search
+                                       $this->tsbrowser_searchKeys[$depth] = 1;
                                }
                        }
 
                                }
                        }
 
-                       if ($deeper)    {
+                       if ($deeper) {
                                $cS = count($this->tsbrowser_searchKeys);
                                $cS = count($this->tsbrowser_searchKeys);
-                               $keyArray = $this->ext_getSearchKeys($arr[$key.'.'], $depth, $searchString, $keyArray);
-                               if ($cS != count($this->tsbrowser_searchKeys))  {
-                                       $keyArray[$depth]=1;
+                               $keyArray = $this->ext_getSearchKeys($arr[$key . '.'], $depth, $searchString, $keyArray);
+                               if ($cS != count($this->tsbrowser_searchKeys)) {
+                                       $keyArray[$depth] = 1;
                                }
                        }
                }
                                }
                        }
                }
@@ -545,11 +513,12 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $pid: ...
         * @return      [type]          ...
         */
         * @param       [type]          $pid: ...
         * @return      [type]          ...
         */
-       function ext_getRootlineNumber($pid)    {
-               if ($pid && is_array($GLOBALS["rootLine"]))     {
-                       reset($GLOBALS["rootLine"]);
-                       while(list($key,$val)=each($GLOBALS["rootLine"]))       {
-                               if ($val['uid']==$pid)  return $key;
+       function ext_getRootlineNumber($pid) {
+               if ($pid && is_array($GLOBALS['rootLine'])) {
+                       foreach ($GLOBALS['rootLine'] as $key => $val) {
+                               if ($val['uid'] == $pid) {
+                                       return $key;
+                               }
                        }
                }
        }
                        }
                }
        }
@@ -563,53 +532,67 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $first: ...
         * @return      [type]          ...
         */
         * @param       [type]          $first: ...
         * @return      [type]          ...
         */
-       function ext_getTemplateHierarchyArr($arr,$depthData, $keyArray,$first=0)       {
-               reset($arr);
-               $keyArr=array();
-               while (list($key,)=each($arr))  {
-                       $key=ereg_replace("\.$","",$key);
-                       if (substr($key,-1)!=".")       {
-                               $keyArr[$key]=1;
+       function ext_getTemplateHierarchyArr($arr, $depthData, $keyArray, $first = 0) {
+               $keyArr = array();
+               foreach ($arr as $key => $value) {
+                       $key = preg_replace('/\.$/', '', $key);
+                       if (substr($key, -1) != '.') {
+                               $keyArr[$key] = 1;
                        }
                }
                        }
                }
-               reset($keyArr);
-               $a=0;
-               $c=count($keyArr);
-               while (list($key,)=each($keyArr))       {
-                       $HTML="";
+               $a = 0;
+               $c = count($keyArr);
+               static $i = 0;
+               foreach ($keyArr as $key => $value) {
+                       $HTML = '';
                        $a++;
                        $a++;
-                       $deeper = is_array($arr[$key."."]);
-                       $row=$arr[$key];
-
-                       $PM = "join";
-                       $LN = ($a==$c)?"blank":"line";
-                       $BTM = ($a==$c)?"top":"";
-                       $PM = "join";
-
-                       $HTML.=$depthData;
-                       $icon = substr($row["templateID"],0,3)=="sys" ? t3lib_iconWorks::getIcon("sys_template",array("root"=>$row["root"])) :
-                                                       (substr($row["templateID"],0,6)=="static" ? t3lib_iconWorks::getIcon("static_template",array()) : 'gfx/i/default.gif');
-                       $alttext= "[".$row['templateID']."]";
-                       $alttext.= $row['pid'] ? " - ".t3lib_BEfunc::getRecordPath($row['pid'],$GLOBALS["SOBE"]->perms_clause,20) : "";
-                       if (in_array($row['templateID'],$this->clearList_const) || in_array($row['templateID'],$this->clearList_setup)) {
-                               $A_B='<a href="index.php?id='.$GLOBALS["SOBE"]->id.'&template='.$row['templateID'].'">';
-                               $A_E="</A>";
+                       $deeper = is_array($arr[$key . '.']);
+                       $row = $arr[$key];
+
+                       $PM = 'join';
+                       $LN = ($a == $c) ? 'blank' : 'line';
+                       $BTM = ($a == $c) ? 'top' : '';
+                       $PM = 'join';
+
+                       $HTML .= $depthData;
+
+                       $alttext = '[' . $row['templateID'] . ']';
+                       $alttext .= $row['pid'] ? ' - ' . t3lib_BEfunc::getRecordPath($row['pid'], $GLOBALS['SOBE']->perms_clause, 20) : '';
+
+                       $icon = (substr($row['templateID'], 0, 3) == 'sys' ?
+                                       t3lib_iconWorks::getSpriteIconForRecord('sys_template', $row, array('title' => $alttext))
+                                       : t3lib_iconWorks::getSpriteIcon('mimetypes-x-content-template-static', array('title' => $alttext))
+                       );
+                       if (in_array($row['templateID'], $this->clearList_const) || in_array($row['templateID'], $this->clearList_setup)) {
+                               $A_B = '<a href="index.php?id=' . htmlspecialchars($GLOBALS['SOBE']->id . '&template=' . $row['templateID']) . '">';
+                               $A_E = '</a>';
+                               if (t3lib_div::_GP('template') == $row['templateID']) {
+                                       $A_B = '<strong>' . $A_B;
+                                       $A_E .= '</strong>';
+                               }
                        } else {
                        } else {
-                               $A_B="";
-                               $A_E="";
+                               $A_B = '';
+                               $A_E = '';
                        }
                        }
-                       $HTML.=($first?'':'<IMG src="'.$GLOBALS["BACK_PATH"].'t3lib/gfx/ol/'.$PM.$BTM.'.gif" width="18" height="16" align="top" border=0>').'<IMG src="'.$GLOBALS["BACK_PATH"].$icon.'" width="18" height="16" align="top" title="'.$alttext.'">'.$A_B.t3lib_div::fixed_lgd_cs($row['title'],$GLOBALS["BE_USER"]->uc["titleLen"]).$A_E."&nbsp;&nbsp;";
+                       $HTML .= ($first ? '' : '<img src="' . $GLOBALS['BACK_PATH'] . 'gfx/ol/' . $PM . $BTM . '.gif" width="18" height="16" align="top" border="0" alt="" />') .
+                                        $icon .
+                                        $A_B . htmlspecialchars(t3lib_div::fixed_lgd_cs($row['title'], $GLOBALS['BE_USER']->uc['titleLen'])) . $A_E . '&nbsp;&nbsp;';
                        $RL = $this->ext_getRootlineNumber($row['pid']);
                        $RL = $this->ext_getRootlineNumber($row['pid']);
-                       $keyArray[] = '<tr>
-                                                       <td nowrap>'.$HTML.'</td>
-                                                       <td align=center>'.($row["root"]?"<b>X</b>":"").'&nbsp;&nbsp;</td>
-                                                       <td align=center'.$row["bgcolor_setup"].'>'.fw(($row["clConf"]?"<b>X</b>":"")."&nbsp;&nbsp;").'</td>
-                                                       <td align=center'.$row["bgcolor_const"].'>'.fw(($row["clConst"]?"<b>X</b>":"")."&nbsp;&nbsp;").'</td>
-                                                       <td>'.($row["pid"]?"&nbsp;".$row["pid"].(strcmp($RL,"")?" (".$RL.")":"")."&nbsp;&nbsp;":"").'</td>
-                                                       <td>'.($row["next"]?"&nbsp;".$row["next"]."&nbsp;&nbsp;":"").'</td>
+                       $keyArray[] = '<tr class="' . ($i++ % 2 == 0 ? 'bgColor4' : 'bgColor6') . '">
+                                                       <td nowrap="nowrap">' . $HTML . '</td>
+                                                       <td align="center">' . ($row['root'] ? t3lib_iconWorks::getSpriteIcon('status-status-checked') : '') . '&nbsp;&nbsp;</td>
+                                                       <td align="center">' . ($row['clConf'] ? t3lib_iconWorks::getSpriteIcon('status-status-checked') : '') . '&nbsp;&nbsp;' . '</td>
+                                                       <td align="center">' . ($row['clConst'] ? t3lib_iconWorks::getSpriteIcon('status-status-checked') : '') . '&nbsp;&nbsp;' . '</td>
+                                                       <td align="center">' . ($row['pid'] ? $row['pid'] : '') . '</td>
+                                                       <td align="center">' . (strcmp($RL, '') ? $RL : '') . '</td>
+                                                       <td>' . ($row['next'] ? '&nbsp;' . $row['next'] . '&nbsp;&nbsp;' : '') . '</td>
                                                </tr>';
                                                </tr>';
-                       if ($deeper)    {
-                               $keyArray = $this->ext_getTemplateHierarchyArr($arr[$key."."], $depthData.($first?'':'<IMG src="'.$GLOBALS["BACK_PATH"].'t3lib/gfx/ol/'.$LN.'.gif" width="18" height="16" align="top">'), $keyArray);
+                       if ($deeper) {
+                               $keyArray = $this->ext_getTemplateHierarchyArr(
+                                       $arr[$key . '.'],
+                                       $depthData . ($first ? '' : '<img src="' . $GLOBALS['BACK_PATH'] . 'gfx/ol/' . $LN . '.gif" width="18" height="16" align="top" />'),
+                                       $keyArray
+                               );
                        }
                }
                return $keyArray;
                        }
                }
                return $keyArray;
@@ -622,21 +605,21 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $pointer: ...
         * @return      [type]          ...
         */
         * @param       [type]          $pointer: ...
         * @return      [type]          ...
         */
-       function ext_process_hierarchyInfo($depthDataArr,&$pointer)     {
-               $parent = $this->hierarchyInfo[$pointer-1]['templateParent'];
-               while ($pointer>0 && $this->hierarchyInfo[$pointer-1]['templateParent']==$parent)       {
+       function ext_process_hierarchyInfo($depthDataArr, &$pointer) {
+               $parent = $this->hierarchyInfo[$pointer - 1]['templateParent'];
+               while ($pointer > 0 && $this->hierarchyInfo[$pointer - 1]['templateParent'] == $parent) {
                        $pointer--;
                        $row = $this->hierarchyInfo[$pointer];
 
                        $pointer--;
                        $row = $this->hierarchyInfo[$pointer];
 
-                       $depthDataArr[$row['templateID']]=$row;
-                       $depthDataArr[$row['templateID']]["bgcolor_setup"] = isset($this->clearList_setup_temp[$row['templateID']])?' class="bgColor5"':'';
-                       $depthDataArr[$row['templateID']]["bgcolor_const"] = isset($this->clearList_const_temp[$row['templateID']])?' class="bgColor5"':'';
+                       $depthDataArr[$row['templateID']] = $row;
+                       $depthDataArr[$row['templateID']]['bgcolor_setup'] = isset($this->clearList_setup_temp[$row['templateID']]) ? ' class="bgColor5"' : '';
+                       $depthDataArr[$row['templateID']]['bgcolor_const'] = isset($this->clearList_const_temp[$row['templateID']]) ? ' class="bgColor5"' : '';
                        unset($this->clearList_setup_temp[$row['templateID']]);
                        unset($this->clearList_const_temp[$row['templateID']]);
                        unset($this->clearList_setup_temp[$row['templateID']]);
                        unset($this->clearList_const_temp[$row['templateID']]);
-                       $this->templateTitles[$row['templateID']]=$row["title"];
+                       $this->templateTitles[$row['templateID']] = $row['title'];
 
 
-                       if ($row['templateID']==$this->hierarchyInfo[$pointer-1]['templateParent'])     {
-                               $depthDataArr[$row['templateID']."."] = $this->ext_process_hierarchyInfo(array(), $pointer);
+                       if ($row['templateID'] == $this->hierarchyInfo[$pointer - 1]['templateParent']) {
+                               $depthDataArr[$row['templateID'] . '.'] = $this->ext_process_hierarchyInfo(array(), $pointer);
                        }
                }
                return $depthDataArr;
                        }
                }
                return $depthDataArr;
@@ -653,37 +636,41 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $syntaxHLBlockmode: ...
         * @return      [type]          ...
         */
         * @param       [type]          $syntaxHLBlockmode: ...
         * @return      [type]          ...
         */
-       function ext_outputTS($config, $lineNumbers=0, $comments=0, $crop=0, $syntaxHL=0, $syntaxHLBlockmode=0) {
-               $all="";
-               reset($config);
-               while (list(,$str)=each($config))       {
-                       $all.="\n[GLOBAL]\n".$str;
+       function ext_outputTS($config, $lineNumbers = 0, $comments = 0, $crop = 0, $syntaxHL = 0, $syntaxHLBlockmode = 0) {
+               $all = '';
+               foreach ($config as $str) {
+                       $all .= LF . '[GLOBAL]' . LF . $str;
                }
 
                }
 
-               if ($syntaxHL)  {
-                       $all = ereg_replace("^[^".chr(10)."]*.","",$all);
+               if ($syntaxHL) {
+                       $all = preg_replace('/^[^' . LF . ']*./', '', $all);
                        $all = chop($all);
                        $all = chop($all);
-                       $tsparser = t3lib_div::makeInstance("t3lib_TSparser");
-                       $tsparser->lineNumberOffset=$this->ext_lineNumberOffset+1;
-                       return $tsparser->doSyntaxHighlight($all,$lineNumbers?array($this->ext_lineNumberOffset+1):'',$syntaxHLBlockmode);
+                       $tsparser = t3lib_div::makeInstance('t3lib_TSparser');
+                       $tsparser->lineNumberOffset = $this->ext_lineNumberOffset + 1;
+                       $tsparser->parentObject = $this;
+                       return $tsparser->doSyntaxHighlight($all, $lineNumbers ? array($this->ext_lineNumberOffset + 1) : '', $syntaxHLBlockmode);
                } else {
                } else {
-                       return $this->ext_formatTS($all,$lineNumbers,$comments,$crop);
+                       return $this->ext_formatTS($all, $lineNumbers, $comments, $crop);
                }
        }
 
        /**
         * Returns a new string of max. $chars lenght
                }
        }
 
        /**
         * Returns a new string of max. $chars lenght
-        * If the string is longer, it will be truncated and prepended with "..."
+        * If the string is longer, it will be truncated and prepended with '...'
         * $chars must be an integer of at least 4
         *
         * @param       [type]          $string: ...
         * @param       [type]          $chars: ...
         * @return      [type]          ...
         */
         * $chars must be an integer of at least 4
         *
         * @param       [type]          $string: ...
         * @param       [type]          $chars: ...
         * @return      [type]          ...
         */
-       function ext_fixed_lgd($string,$chars)  {
-               if ($chars >= 4)        {
-                       if(strlen($string)>$chars)  {
-                               return substr($string, 0, $chars-3)."...";
+       function ext_fixed_lgd($string, $chars) {
+               if ($chars >= 4) {
+                       if (strlen($string) > $chars) {
+                               if (strlen($string) > 24 && substr($string, 0, 12) == '##' . $this->Cmarker . '_B##') {
+                                       return '##' . $this->Cmarker . '_B##' . t3lib_div::fixed_lgd_cs(substr($string, 12, -12), $chars - 3) . '##' . $this->Cmarker . '_E##';
+                               } else {
+                                       return t3lib_div::fixed_lgd_cs($string, $chars - 3);
+                               }
                        }
                }
                return $string;
                        }
                }
                return $string;
@@ -696,8 +683,8 @@ class t3lib_tsparser_ext extends t3lib_TStemplate   {
         * @param       [type]          $str: ...
         * @return      [type]          ...
         */
         * @param       [type]          $str: ...
         * @return      [type]          ...
         */
-       function ext_lnBreakPointWrap($ln,$str) {
-               return '<A href="#" onClick="return brPoint('.$ln.','.($this->ext_lineNumberOffset_mode=="setup"?1:0).');">'.$str.'</a>';
+       function ext_lnBreakPointWrap($ln, $str) {
+               return '<a href="#" onClick="return brPoint(' . $ln . ',' . ($this->ext_lineNumberOffset_mode == "setup" ? 1 : 0) . ');">' . $str . '</a>';
        }
 
        /**
        }
 
        /**
@@ -709,27 +696,30 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $crop: ...
         * @return      [type]          ...
         */
         * @param       [type]          $crop: ...
         * @return      [type]          ...
         */
-       function ext_formatTS($input, $ln, $comments=1, $crop=0)        {
-               $input = ereg_replace("^[^".chr(10)."]*.","",$input);
+       function ext_formatTS($input, $ln, $comments = 1, $crop = 0) {
+               $input = preg_replace('/^[^' . LF . ']*./', '', $input);
                $input = chop($input);
                $input = chop($input);
-               $cArr = explode(chr(10),$input);
-
-               reset($cArr);
-               $n = ceil(log10(count($cArr)+$this->ext_lineNumberOffset));
-               $lineNum="";
-               while(list($k,$v)=each($cArr))  {
-                       $lln=$k+$this->ext_lineNumberOffset+1;
-                       if ($ln)        $lineNum = $this->ext_lnBreakPointWrap($lln,str_replace(" ",'&nbsp;',sprintf("% ".$n."d",$lln))).":   ";
-                       $v=htmlspecialchars($v);
-                       if ($crop)      {$v=$this->ext_fixed_lgd($v,($ln?71:77));}
-                       $cArr[$k] = $lineNum.str_replace(" ",'&nbsp;',$v);
-
-                       $firstChar = substr(trim($v),0,1);
-                       if ($firstChar=="[")    {
-                               $cArr[$k] = '<font color="green"><b>'.$cArr[$k].'</b></font>';
-                       } elseif ($firstChar=="/" || $firstChar=="#")   {
-                               if ($comments)  {
-                                       $cArr[$k] = '<span class="typo3-dimmed">'.$cArr[$k].'</span>';
+               $cArr = explode(LF, $input);
+
+               $n = ceil(log10(count($cArr) + $this->ext_lineNumberOffset));
+               $lineNum = '';
+               foreach ($cArr as $k => $v) {
+                       $lln = $k + $this->ext_lineNumberOffset + 1;
+                       if ($ln) {
+                               $lineNum = $this->ext_lnBreakPointWrap($lln, str_replace(' ', '&nbsp;', sprintf('% ' . $n . 'd', $lln))) . ':   ';
+                       }
+                       $v = htmlspecialchars($v);
+                       if ($crop) {
+                               $v = $this->ext_fixed_lgd($v, ($ln ? 71 : 77));
+                       }
+                       $cArr[$k] = $lineNum . str_replace(' ', '&nbsp;', $v);
+
+                       $firstChar = substr(trim($v), 0, 1);
+                       if ($firstChar == '[') {
+                               $cArr[$k] = '<font color="green"><strong>' . $cArr[$k] . '</strong></font>';
+                       } elseif ($firstChar == '/' || $firstChar == '#') {
+                               if ($comments) {
+                                       $cArr[$k] = '<span class="typo3-dimmed">' . $cArr[$k] . '</span>';
                                } else {
                                        unset($cArr[$k]);
                                }
                                } else {
                                        unset($cArr[$k]);
                                }
@@ -737,7 +727,7 @@ class t3lib_tsparser_ext extends t3lib_TStemplate   {
 
 
                }
 
 
                }
-               $output = implode($cArr, "<BR>")."<BR>";
+               $output = implode($cArr, '<br />') . '<br />';
                return $output;
        }
 
                return $output;
        }
 
@@ -748,17 +738,17 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $template_uid: ...
         * @return      [type]          ...
         */
         * @param       [type]          $template_uid: ...
         * @return      [type]          ...
         */
-       function ext_getFirstTemplate($id,$template_uid=0)              {
+       function ext_getFirstTemplate($id, $template_uid = 0) {
                        // Query is taken from the runThroughTemplates($theRootLine) function in the parent class.
                        // Query is taken from the runThroughTemplates($theRootLine) function in the parent class.
-               if (intval($id))        {
-                       if ($template_uid)      {
-                               $addC = " AND uid=".$template_uid;
+               if (intval($id)) {
+                       if ($template_uid) {
+                               $addC = ' AND uid=' . $template_uid;
                        }
                        }
-                       $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery('*', 'sys_template', 'pid='.intval($id).$addC.' '.$this->whereClause, '', 'sorting', '1');
+                       $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery('*', 'sys_template', 'pid=' . intval($id) . $addC . ' ' . $this->whereClause, '', 'sorting', '1');
                        $row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res);
                        $row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res);
-                       t3lib_BEfunc::workspaceOL('sys_template',$row);
+                       t3lib_BEfunc::workspaceOL('sys_template', $row);
                        $GLOBALS['TYPO3_DB']->sql_free_result($res);
                        $GLOBALS['TYPO3_DB']->sql_free_result($res);
-                       return $row;    // Returns the template row if found.
+                       return $row; // Returns the template row if found.
                }
        }
 
                }
        }
 
@@ -768,17 +758,19 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $id: ...
         * @return      [type]          ...
         */
         * @param       [type]          $id: ...
         * @return      [type]          ...
         */
-       function ext_getAllTemplates($id)               {
+       function ext_getAllTemplates($id) {
                        // Query is taken from the runThroughTemplates($theRootLine) function in the parent class.
                        // Query is taken from the runThroughTemplates($theRootLine) function in the parent class.
-               if (intval($id))        {
-                       $outRes=array();
-                       $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery('*', 'sys_template', 'pid='.intval($id).' '.$this->whereClause, '', 'sorting');
-                       while($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res))       {
-                               t3lib_BEfunc::workspaceOL('sys_template',$row);
-                               if (is_array($row))             $outRes[] = $row;
+               if (intval($id)) {
+                       $outRes = array();
+                       $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery('*', 'sys_template', 'pid=' . intval($id) . ' ' . $this->whereClause, '', 'sorting');
+                       while ($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res)) {
+                               t3lib_BEfunc::workspaceOL('sys_template', $row);
+                               if (is_array($row)) {
+                                       $outRes[] = $row;
+                               }
                        }
                        $GLOBALS['TYPO3_DB']->sql_free_result($res);
                        }
                        $GLOBALS['TYPO3_DB']->sql_free_result($res);
-                       return $outRes; // Returns the template rows in an array.
+                       return $outRes; // Returns the template rows in an array.
                }
        }
 
                }
        }
 
@@ -789,48 +781,48 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $default: ...
         * @return      [type]          ...
         */
         * @param       [type]          $default: ...
         * @return      [type]          ...
         */
-       function ext_compareFlatSetups($default)        {
-               $editableComments=array();
-               reset($this->flatSetup);
-               while(list($const,$value)=each($this->flatSetup))       {
-                       if (substr($const,-2)!=".." && isset($this->flatSetup[$const.".."]))    {
-                               $comment = trim($this->flatSetup[$const.".."]);
-                               $c_arr = explode(chr(10),$comment);
-                               while(list($k,$v)=each($c_arr)) {
-                                       $line=trim(ereg_replace("^[#\/]*","",$v));
-                                       if ($line)      {
-                                               $parts = explode(";", $line);
-                                               while(list(,$par)=each($parts))         {
-                                                       if (strstr($par,"="))   {
-                                                               $keyValPair =explode("=",$par,2);
-                                                               switch(trim(strtolower($keyValPair[0])))        {
-                                                                       case "type":
+       function ext_compareFlatSetups($default) {
+               $editableComments = array();
+               foreach ($this->flatSetup as $const => $value) {
+                       if (substr($const, -2) != '..' && isset($this->flatSetup[$const . '..'])) {
+                               $comment = trim($this->flatSetup[$const . '..']);
+                               $c_arr = explode(LF, $comment);
+                               foreach ($c_arr as $k => $v) {
+                                       $line = trim(preg_replace('/^[#\/]*/', '', $v));
+                                       if ($line) {
+                                               $parts = explode(';', $line);
+                                               foreach ($parts as $par) {
+                                                       if (strstr($par, '=')) {
+                                                               $keyValPair = explode('=', $par, 2);
+                                                               switch (trim(strtolower($keyValPair[0]))) {
+                                                                       case 'type':
                                                                                        // Type:
                                                                                        // Type:
-                                                                                       /*
-       int (range; low-high, list: item,item,item = selector),
-       boolean (check),
-       string (default),
-       wrap,
-       html-color ...,
-       file
-                                                                                       */
-                                                                               $editableComments[$const]["type"] = trim($keyValPair[1]);
+                                                                               $editableComments[$const]['type'] = trim($keyValPair[1]);
                                                                        break;
                                                                        break;
-                                                                       case "cat":
+                                                                       case 'cat':
                                                                                        // list of categories.
                                                                                        // list of categories.
-                                                                               $catSplit=explode("/",strtolower($keyValPair[1]));
-                                                                               $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]]))  {
-                                                                                       $editableComments[$const]["subcat_name"]=$catSplit[1];
-                                                                                       $editableComments[$const]["subcat"]=$this->subCategories[$catSplit[1]][1]."/".$catSplit[1]."/".trim($catSplit[2])."z";
+                                                                               $catSplit = explode('/', strtolower($keyValPair[1]));
+                                                                               $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]])) {
+                                                                                       $editableComments[$const]['subcat_name'] = $catSplit[1];
+                                                                                       $editableComments[$const]['subcat'] = $this->subCategories[$catSplit[1]][1] . '/' .
+                                                                                                                                                                 $catSplit[1] . '/' . trim($catSplit[2]) . 'z';
                                                                                } else {
                                                                                } else {
-                                                                                       $editableComments[$const]["subcat"]="x"."/".trim($catSplit[2])."z";
+                                                                                       $editableComments[$const]['subcat'] = 'x' . '/' . trim($catSplit[2]) . 'z';
                                                                                }
                                                                        break;
                                                                                }
                                                                        break;
-                                                                       case "label":
+                                                                       case 'label':
                                                                                        // label
                                                                                        // label
-                                                                               $editableComments[$const]["label"] = trim($keyValPair[1]);
+                                                                               $editableComments[$const]['label'] = trim($keyValPair[1]);
+                                                                       break;
+                                                                       case 'customsubcategory':
+                                                                                       // custom subCategory label
+                                                                               $customSubcategory = explode('=', $keyValPair[1], 2);
+                                                                               if (trim($customSubcategory[0])) {
+                                                                                       $subCategoryKey = strtolower($customSubcategory[0]);
+                                                                                       $this->subCategories[$subCategoryKey][0] = $GLOBALS['LANG']->sL($customSubcategory[1]);
+                                                                               }
                                                                        break;
                                                                }
                                                        }
                                                                        break;
                                                                }
                                                        }
@@ -838,11 +830,11 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
                                        }
                                }
                        }
                                        }
                                }
                        }
-                       if (isset($editableComments[$const]))   {
-                               $editableComments[$const]["name"]=$const;
-                               $editableComments[$const]["value"]=trim($value);
-                               if (isset($default[$const]))    {
-                                       $editableComments[$const]["default_value"]=trim($default[$const]);
+                       if (isset($editableComments[$const])) {
+                               $editableComments[$const]['name'] = $const;
+                               $editableComments[$const]['value'] = trim($value);
+                               if (isset($default[$const])) {
+                                       $editableComments[$const]['default_value'] = trim($default[$const]);
                                }
                        }
                }
                                }
                        }
                }
@@ -855,22 +847,20 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $editConstArray: ...
         * @return      [type]          ...
         */
         * @param       [type]          $editConstArray: ...
         * @return      [type]          ...
         */
-       function ext_categorizeEditableConstants($editConstArray)       {
-               // Runs through the available constants and fills the $this->categories array with pointers and priority-info
-               reset($editConstArray);
-               while(list($constName,$constData)=each($editConstArray))        {
-                       if (!$constData["type"])        {$constData["type"]="string";}
-                       $cats = explode(",",$constData["cat"]);
-                       reset($cats);
-                       while (list(,$theCat)=each($cats))      {               // if = only one category, while allows for many. We have agreed on only one category is the most basic way...
-                               $theCat=trim($theCat);
-                               if ($theCat)    {
-                                       $this->categories[$theCat][$constName]=$constData["subcat"];
-//                                     $this->categories["all"][$constName]=$constData["subcat"];
+       function ext_categorizeEditableConstants($editConstArray) {
+                       // Runs through the available constants and fills the $this->categories array with pointers and priority-info
+               foreach ($editConstArray as $constName => $constData) {
+                       if (!$constData['type']) {
+                               $constData['type'] = 'string';
+                       }
+                       $cats = explode(',', $constData['cat']);
+                       foreach ($cats as $theCat) { // if = only one category, while allows for many. We have agreed on only one category is the most basic way...
+                               $theCat = trim($theCat);
+                               if ($theCat) {
+                                       $this->categories[$theCat][$constName] = $constData['subcat'];
                                }
                        }
                }
                                }
                        }
                }
-//             debug($this->categories);
        }
 
        /**
        }
 
        /**
@@ -878,12 +868,12 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         *
         * @return      [type]          ...
         */
         *
         * @return      [type]          ...
         */
-       function ext_getCategoryLabelArray()    {
-               // Returns array used for labels in the menu.
+       function ext_getCategoryLabelArray() {
+                       // Returns array used for labels in the menu.
                $retArr = array();
                $retArr = array();
-               while(list($k,$v)=each($this->categories))      {
-                       if (count($v))  {
-                               $retArr[$k]=strtoupper($k)." (".count($v).")";
+               foreach ($this->categories as $k => $v) {
+                       if (count($v)) {
+                               $retArr[$k] = strtoupper($k) . ' (' . count($v) . ')';
                        }
                }
                return $retArr;
                        }
                }
                return $retArr;
@@ -895,38 +885,38 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $type: ...
         * @return      [type]          ...
         */
         * @param       [type]          $type: ...
         * @return      [type]          ...
         */
-       function ext_getTypeData($type) {
+       function ext_getTypeData($type) {
                $retArr = array();
                $retArr = array();
-               $type=trim($type);
-               if (!$type)     {
-                       $retArr["type"]="string";
+               $type = trim($type);
+               if (!$type) {
+                       $retArr['type'] = 'string';
                } else {
                } else {
-                       $m=strcspn ($type," [");
-                       $retArr["type"]=strtolower(substr($type,0,$m));
-                       if (t3lib_div::inList("int,options,file,boolean,offset",$retArr["type"]))       {
-                               $p=trim(substr($type,$m));
-                               ereg("\[(.*)\]",$p,$reg);
-                               $p=trim($reg[1]);
-                               if ($p) {
-                                       $retArr["paramstr"]=$p;
-                                       switch($retArr["type"]) {
-                                               case "int":
-                                                       if (substr($retArr["paramstr"],0,1)=="-")       {
-                                                               $retArr["params"]=t3lib_div::intExplode("-",substr($retArr["paramstr"],1));
-                                                               $retArr["params"][0]=intval("-".$retArr["params"][0]);
+                       $m = strcspn($type, ' [');
+                       $retArr['type'] = strtolower(substr($type, 0, $m));
+                       if (t3lib_div::inList('int,options,file,boolean,offset,user', $retArr['type'])) {
+                               $p = trim(substr($type, $m));
+                               $reg = array();
+                               preg_match('/\[(.*)\]/', $p, $reg);
+                               $p = trim($reg[1]);
+                               if ($p) {
+                                       $retArr['paramstr'] = $p;
+                                       switch ($retArr['type']) {
+                                               case 'int':
+                                                       if (substr($retArr['paramstr'], 0, 1) == '-') {
+                                                               $retArr['params'] = t3lib_div::intExplode('-', substr($retArr['paramstr'], 1));
+                                                               $retArr['params'][0] = intval('-' . $retArr['params'][0]);
                                                        } else {
                                                        } else {
-                                                               $retArr["params"]=t3lib_div::intExplode("-",$retArr["paramstr"]);
+                                                               $retArr['params'] = t3lib_div::intExplode('-', $retArr['paramstr']);
                                                        }
                                                        }
-                                                       $retArr["paramstr"]=$retArr["params"][0]." - ".$retArr["params"][1];
+                                                       $retArr['paramstr'] = $retArr['params'][0] . ' - ' . $retArr['params'][1];
                                                break;
                                                break;
-                                               case "options":
-                                                       $retArr["params"]=explode(",",$retArr["paramstr"]);
+                                               case 'options':
+                                                       $retArr['params'] = explode(',', $retArr['paramstr']);
                                                break;
                                        }
                                }
                        }
                }
                                                break;
                                        }
                                }
                        }
                }
-//             debug($retArr);
                return $retArr;
        }
 
                return $retArr;
        }
 
@@ -936,29 +926,27 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $category: ...
         * @return      [type]          ...
         */
         * @param       [type]          $category: ...
         * @return      [type]          ...
         */
-       function ext_getTSCE_config($category)  {
-               $catConf=$this->setup["constants"]["TSConstantEditor."][$category."."];
-               $out=array();
-               if (is_array($catConf)) {
-                       reset($catConf);
-                       while(list($key,$val)=each($catConf))   {
-                               switch($key)    {
-                                       case "image":
-                                               $out["imagetag"] = $this->ext_getTSCE_config_image($catConf["image"]);
+       function ext_getTSCE_config($category) {
+               $catConf = $this->setup['constants']['TSConstantEditor.'][$category . '.'];
+               $out = array();
+               if (is_array($catConf)) {
+                       foreach ($catConf as $key => $val) {
+                               switch ($key) {
+                                       case 'image':
+                                               $out['imagetag'] = $this->ext_getTSCE_config_image($catConf['image']);
                                        break;
                                        break;
-                                       case "description":
-                                       case "bulletlist":
-                                       case "header":
+                                       case 'description':
+                                       case 'bulletlist':
+                                       case 'header':
                                                $out[$key] = $val;
                                        break;
                                        default:
                                                $out[$key] = $val;
                                        break;
                                        default:
-                                               if (t3lib_div::testInt($key))   {
-                                                       $constRefs = explode(",",$val);
-                                                       reset($constRefs);
-                                                       while(list(,$const)=each($constRefs))   {
-                                                               $const=trim($const);
-                                                               if ($const && $const<=20)       {
-                                                                       $out["constants"][$const].=$this->ext_getKeyImage($key);
+                                               if (t3lib_utility_Math::canBeInterpretedAsInteger($key)) {
+                                                       $constRefs = explode(',', $val);
+                                                       foreach ($constRefs as $const) {
+                                                               $const = trim($const);
+                                                               if ($const && $const <= 20) {
+                                                                       $out['constants'][$const] .= $this->ext_getKeyImage($key);
                                                                }
                                                        }
                                                }
                                                                }
                                                        }
                                                }
@@ -966,7 +954,7 @@ class t3lib_tsparser_ext extends t3lib_TStemplate   {
                                }
                        }
                }
                                }
                        }
                }
-               $this->helpConfig=$out;
+               $this->helpConfig = $out;
        }
 
        /**
        }
 
        /**
@@ -975,8 +963,8 @@ class t3lib_tsparser_ext extends t3lib_TStemplate   {
         * @param       [type]          $key: ...
         * @return      [type]          ...
         */
         * @param       [type]          $key: ...
         * @return      [type]          ...
         */
-       function ext_getKeyImage($key)  {
-               return '<img src="'.$this->ext_localWebGfxPrefix.'gfx/'.$key.'.gif" align="top" hspace=2>';
+       function ext_getKeyImage($key) {
+               return '<img src="' . $this->ext_localWebGfxPrefix . 'gfx/' . $key . '.gif" align="top" hspace=2>';
        }
 
        /**
        }
 
        /**
@@ -985,23 +973,23 @@ class t3lib_tsparser_ext extends t3lib_TStemplate {
         * @param       [type]          $imgConf: ...
         * @return      [type]          ...
         */
         * @param       [type]          $imgConf: ...
         * @return      [type]          ...
         */
-       function ext_getTSCE_config_image($imgConf)     {
-               if (substr($imgConf,0,4)=="gfx/")       {
-                       $iFile=$this->ext_localGfxPrefix.$imgConf;
-                       $tFile=$this->ext_localWebGfxPrefix.$imgConf;
-               } elseif (substr($imgConf,0,4)=='EXT:') {
+       function ext_getTSCE_config_image($imgConf) {
+               if (substr($imgConf, 0, 4) == 'gfx/') {
+                       $iFile = $this->ext_localGfxPrefix . $imgConf;
+                       $tFile = $this->ext_localWebGfxPrefix . $imgConf;
+               } elseif (substr($imgConf, 0, 4) == 'EXT:') {
                        $iFile = t3lib_div::getFileAbsFileName($imgConf);
                        $iFile = t3lib_div::getFileAbsFileName($imgConf);
-                       if ($iFile)     {
-                               $f = substr($iFile,strlen(PATH_site));
-                               $tFile=$GLOBALS["BACK_PATH"]."../".$f;
+                       if ($iFile) {
+                               $f = substr($iFile, strlen(PATH_site));
+                               $tFile = $GLOBALS['BACK_PATH'] . '../' . $f;
                        }
                } else {
                        }
                } else {
-                       $f = "uploads/tf/".$this->extractFromResources($this->setup["resources"],$imgConf);
-                       $iFile=PATH_site.$f;
-                       $tFile=$GLOBALS["BACK_PATH"]."../".$f;
+                       $f = 'uploads/tf/' . $this->extractFromResources($this->setup['resources'], $imgConf);
+                       $iFile = PATH_site . $f;
+                       $tFile = $GLOBALS['BACK_PATH'] . '../' . $f;
                }
                }
-               $imageInfo=@getImagesize($iFile);
-               return '<img src="'.$tFile.'" '.$imageInfo[3].'>';
+               $imageInfo = @getImagesize($iFile);
+               return '<img src="' . $tFile . '" ' . $imageInfo[3] . '>';
        }
 
        /**
        }
 
        /**
@@ -1009,26 +997,25 @@ class t3lib_tsparser_ext extends t3lib_TStemplate        {
         *
         * @return      [type]          ...
         */
         *
         * @return      [type]          ...
         */
-       function ext_resourceDims()     {
-               if ($this->setup["resources"])  {
-                       $rArr=explode(",",$this->setup["resources"]);
-                       while(list($c,$val)=each($rArr))        {
-                               $val=trim($val);
-                               $theFile = PATH_site."uploads/tf/".$val;
-                               if ($val && @is_file($theFile)) {
+       function ext_resourceDims() {
+               if ($this->setup['resources']) {
+                       $rArr = explode(',', $this->setup['resources']);
+                       foreach ($rArr as $c => $val) {
+                               $val = trim($val);
+                               $theFile = PATH_site . 'uploads/tf/' . $val;
+                               if ($val && @is_file($theFile)) {
                                        $imgInfo = @getimagesize($theFile);
                                }
                                        $imgInfo = @getimagesize($theFile);
                                }
-                               if (is_array($imgInfo)) {
-                                       $this->resourceDimensions[$val]=" (".$imgInfo[0]."x".$imgInfo[1].")";
+                               if (is_array($imgInfo)) {
+                                       $this->resourceDimensions[$val] = ' (' . $imgInfo[0] . 'x' . $imgInfo[1] . ')';
                                }
                        }
                }
                                }
                        }
                }
-               reset($this->dirResources);
-               while(list($c,$val)=each($this->dirResources))  {
-                       $val=trim($val);
-                       $imgInfo = @getimagesize(PATH_site.$val);
-                       if (is_array($imgInfo)) {
-                               $this->resourceDimensions[$val]=" (".$imgInfo[0]."x".$imgInfo[1].")";
+               foreach ($this->dirResources as $c => $val) {
+                       $val = trim($val);
+                       $imgInfo = @getimagesize(PATH_site . $val);
+                       if (is_array($imgInfo)) {
+                               $this->resourceDimensions[$val] = ' (' . $imgInfo[0] . 'x' . $imgInfo[1] . ')';
                        }
                }
        }
                        }
                }
        }
@@ -1039,11 +1026,11 @@ class t3lib_tsparser_ext extends t3lib_TStemplate       {
         * @param       [type]          $path: ...
         * @return      [type]          ...
         */
         * @param       [type]          $path: ...
         * @return      [type]          ...
         */
-       function ext_readDirResources($path)    {
-               $path=trim($path);
-               if ($path && substr($path,0,10)=="fileadmin/")  {
-                       $path = ereg_replace("\/$","",$path);
-                       $this->readDirectory(PATH_site.$path);
+       function ext_readDirResources($path) {
+               $path = trim($path);
+               if ($path && strstr($path, $GLOBALS['TYPO3_CONF_VARS']['BE']['fileadminDir'])) {
+                       $path = rtrim($path, '/');
+                       $this->readDirectory(PATH_site . $path);
                }
        }
 
                }
        }
 
@@ -1054,17 +1041,17 @@ class t3lib_tsparser_ext extends t3lib_TStemplate       {
         * @param       [type]          $type: ...
         * @return      [type]          ...
         */
         * @param       [type]          $type: ...
         * @return      [type]          ...
         */
-       function readDirectory($path,$type="file")      {
-               if(@is_dir($path))      {
+       function readDirectory($path, $type = 'file') {
+               if (@is_dir($path)) {
                        $d = @dir($path);
                        $d = @dir($path);
-                       $tempArray=Array();
-                       if (is_object($d))      {
-                               while($entry=$d->read()) {
-                                       if ($entry!="." && $entry!="..")        {
-                                               $wholePath = $path."/".$entry;          // Because of odd PHP-error where  <BR>-tag is sometimes placed after a filename!!
-                                               if (@file_exists($wholePath) && (!$type || filetype($wholePath)==$type))        {
+                       $tempArray = Array();
+                       if (is_object($d)) {
+                               while ($entry = $d->read()) {
+                                       if ($entry != '.' && $entry != '..') {
+                                               $wholePath = $path . '/' . $entry; // Because of odd PHP-error where  <BR>-tag is sometimes placed after a filename!!
+                                               if (file_exists($wholePath) && (!$type || filetype($wholePath) == $type)) {
                                                        $fI = t3lib_div::split_fileref($wholePath);
                                                        $fI = t3lib_div::split_fileref($wholePath);
-                                                       $this->dirResources[]=substr($wholePath,strlen(PATH_site));
+                                                       $this->dirResources[] = substr($wholePath, strlen(PATH_site));
                                                }
                                        }
                                }
                                                }
                                        }
                                }
@@ -1079,269 +1066,354 @@ class t3lib_tsparser_ext extends t3lib_TStemplate     {
         * @param       [type]          $params: ...
         * @return      [type]          ...
         */
         * @param       [type]          $params: ...
         * @return      [type]          ...
         */
-       function ext_fNandV($params)    {
-               $fN='data['.$params["name"].']';
-               $fV=$params["value"];
-               if (ereg("^{[\$][a-zA-Z0-9\.]*}$",trim($fV),$reg))      {               // Values entered from the constantsedit cannot be constants!   230502; removed \{ and set {
-                       $fV="";
+       function ext_fNandV($params) {
+               $fN = 'data[' . $params['name'] . ']';
+               $fV = $params['value'];
+               if (preg_match('/^{[\$][a-zA-Z0-9\.]*}$/', trim($fV), $reg)) { // Values entered from the constantsedit cannot be constants!    230502; removed \{ and set {
+                       $fV = '';
                }
                }
-               $fV=htmlspecialchars($fV);
+               $fV = htmlspecialchars($fV);
 
 
-               return array($fN,$fV,$params);
+               return array($fN, $fV, $params);
        }
 
        /**
        }
 
        /**
-        * [Describe function...]
+        * This functions returns the HTML-code that creates the editor-layout of the module.
         *
         * @param       [type]          $theConstants: ...
         * @param       [type]          $category: ...
         * @return      [type]          ...
         */
         *
         * @param       [type]          $theConstants: ...
         * @param       [type]          $category: ...
         * @return      [type]          ...
         */
-       function ext_printFields($theConstants,$category)       {
-                       // This functions returns the HTML-code that creates the editor-layout of the module.
+       function ext_printFields($theConstants, $category) {
                reset($theConstants);
                reset($theConstants);
-               $output="";
-               $subcat="";
-               if (is_array($this->categories[$category]))     {
+               $output = '<script type="text/javascript" src="' . $GLOBALS['BACK_PATH'] . 'js/constantEditor.js"></script>
+               ';
+               $subcat = '';
+               if (is_array($this->categories[$category])) {
 
 
-                       $help=$this->helpConfig;
-                       $this->rArr=explode(",",$this->setup["resources"].",".implode($this->dirResources,","));
+                       $help = $this->helpConfig;
+                       $this->rArr = explode(',', $this->setup['resources'] . ',' . implode($this->dirResources, ','));
 
 
-                       if (!$this->doNotSortCategoriesBeforeMakingForm) asort($this->categories[$category]);
-                       while(list($name,$type)=each($this->categories[$category]))     {
+                       if (!$this->doNotSortCategoriesBeforeMakingForm) {
+                               asort($this->categories[$category]);
+                       }
+                       foreach ($this->categories[$category] as $name => $type) {
                                $params = $theConstants[$name];
                                $params = $theConstants[$name];
-                               if (is_array($params))  {
-                                       if ($subcat!=$params["subcat_name"])    {
-                                               $subcat=$params["subcat_name"];
-                                               $subcat_name = $params["subcat_name"] ? $this->subCategories[$params["subcat_name"]][0] : "Others";
-                                               $output.='<tr>';
-                                               $output.='<td colspan=2 class="bgColor4"><div align="center"><b>'.$subcat_name.'</b></div></td>';
-                                               $output.='</tr>';
+                               if (is_array($params)) {
+                                       if ($subcat != $params['subcat_name']) {
+                                               $subcat = $params['subcat_name'];
+                                               $subcat_name = $params['subcat_name'] ? $this->subCategories[$params['subcat_name']][0] : 'Others';
+
+                                               $output .= '<h2 class="typo3-tstemplate-ceditor-subcat">' . $subcat_name . '</h2>';
                                        }
 
                                        }
 
-                       //              if (substr($params["value"],0,2)!='{$') {
-                                               $label=$GLOBALS["LANG"]->sL($params["label"]);
-                                               $label_parts = explode(":",$label,2);
-                                               if (count($label_parts)==2)     {
-                                                       $head=trim($label_parts[0]);
-                                                       $body=trim($label_parts[1]);
-                                               } else {
-                                                       $head=trim($label_parts[0]);
-                                                       $body="";
-                                               }
-                                               if (strlen($head)>35)   {
-                                                       if (!$body) {$body=$head;}
-                                                       $head=t3lib_div::fixed_lgd_cs($head,35);
+                                       $label = $GLOBALS['LANG']->sL($params['label']);
+                                       $label_parts = explode(':', $label, 2);
+                                       if (count($label_parts) == 2) {
+                                               $head = trim($label_parts[0]);
+                                               $body = trim($label_parts[1]);
+                                       } else {
+                                               $head = trim($label_parts[0]);
+                                               $body = '';
+                                       }
+                                       if (strlen($head) > 35) {
+                                               if (!$body) {
+                                                       $body = $head;
                                                }
                                                }
-                                               $typeDat=$this->ext_getTypeData($params["type"]);
-                                               $checked="";
-                                               $p_field="";
-                                               $raname = substr(md5($params["name"]),0,10);
-                                               $aname="'".$raname."'";
-                                               if ($this->ext_dontCheckIssetValues || isset($this->objReg[$params["name"]]))   {
-                                                       $checked=" checked";
-                                                       list($fN,$fV,$params)=$this->ext_fNandV($params);
-
-                                                       switch($typeDat["type"])        {
-                                                               case "int":
-                                                               case "int+":
-                                                                       $p_field='<input type="text" name="'.$fN.'" value="'.$fV.'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(5).' onChange="uFormUrl('.$aname.')">';
-                                                                       if ($typeDat["paramstr"])       {
-                                                                               $p_field.=' Range: '.$typeDat["paramstr"];
-                                                                       } elseif ($typeDat["type"]=="int+") {
-                                                                               $p_field.=' Range: 0 - ';
-                                                                       } else {
-                                                                               $p_field.=' (Integer)';
-                                                                       }
-                                                               break;
-                                                               case "color":
-                                                                       $colorNames=explode(",",",".$this->HTMLcolorList);
-                                                                       $p_field="";
-                                                                       while(list(,$val)=each($colorNames))    {
-                                                                               $sel="";
-                                                                               if ($val==strtolower($params["value"])) {$sel=" selected";}
-                                                                               $p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$val.'</option>';
+                                               $head = t3lib_div::fixed_lgd_cs($head, 35);
+                                       }
+                                       $typeDat = $this->ext_getTypeData($params['type']);
+                                       $checked = '';
+                                       $p_field = '';
+                                       $raname = substr(md5($params['name']), 0, 10);
+                                       $aname = '\'' . $raname . '\'';
+
+                                       list($fN, $fV, $params) = $this->ext_fNandV($params);
+
+                                       switch ($typeDat['type']) {
+                                               case 'int':
+                                               case 'int+':
+                                                       $p_field = '<input id="' . $fN . '" type="text" name="' . $fN . '" value="' . $fV . '"' .
+                                                                          $GLOBALS['TBE_TEMPLATE']->formWidth(5) . ' onChange="uFormUrl(' . $aname . ')" />';
+                                                       if ($typeDat['paramstr']) {
+                                                               $p_field .= ' Range: ' . $typeDat['paramstr'];
+                                                       } elseif ($typeDat['type'] == 'int+') {
+                                                               $p_field .= ' Range: 0 - ';
+                                                       } else {
+                                                               $p_field .= ' (Integer)';
+                                                       }
+                                               break;
+                                               case 'color':
+                                                       $colorNames = explode(',', ',' . $this->HTMLcolorList);
+                                                       $p_field = '';
+                                                       foreach ($colorNames as $val) {
+                                                               $sel = '';
+                                                               if ($val == strtolower($params['value'])) {
+                                                                       $sel = ' selected';
+                                                               }
+                                                               $p_field .= '<option value="' . htmlspecialchars($val) . '"' . $sel . '>' . $val . '</option>';
+                                                       }
+                                                       $p_field = '<select id="select-' . $fN . '" rel="' . $fN . '" name="C' . $fN .
+                                                                          '" class="typo3-tstemplate-ceditor-color-select" onChange="uFormUrl(' .
+                                                                          $aname . ');">' . $p_field . '</select>';
+
+                                                       $p_field .= '<input type="text" id="input-' . $fN . '" rel="' . $fN . '" name="' . $fN .
+                                                                               '" class="typo3-tstemplate-ceditor-color-input" value="' . $fV . '"' .
+                                                                               $GLOBALS['TBE_TEMPLATE']->formWidth(7) . ' onChange="uFormUrl(' . $aname . ')" />';
+                                               break;
+                                               case 'wrap':
+                                                       $wArr = explode('|', $fV);
+                                                       $p_field = '<input type="text" id="' . $fN . '" name="' . $fN . '" value="' . $wArr[0] . '"' .
+                                                                          $GLOBALS['TBE_TEMPLATE']->formWidth(29) . ' onChange="uFormUrl(' . $aname . ')" />';
+                                                       $p_field .= ' | ';
+                                                       $p_field .= '<input type="text" name="W' . $fN . '" value="' . $wArr[1] . '"' .
+                                                                               $GLOBALS['TBE_TEMPLATE']->formWidth(15) . ' onChange="uFormUrl(' . $aname . ')" />';
+                                               break;
+                                               case 'offset':
+                                                       $wArr = explode(',', $fV);
+                                                       $labels = t3lib_div::trimExplode(',', $typeDat['paramstr']);
+                                                       $p_field = ($labels[0] ? $labels[0] : 'x') . ':<input type="text" name="' . $fN . '" value="' . $wArr[0] . '"' .
+                                                                          $GLOBALS['TBE_TEMPLATE']->formWidth(4) . ' onChange="uFormUrl(' . $aname . ')" />';
+                                                       $p_field .= ' , ';
+                                                       $p_field .= ($labels[1] ? $labels[1] : 'y') . ':<input type="text" name="W' . $fN . '" value="' . $wArr[1] . '"' .
+                                                                               $GLOBALS['TBE_TEMPLATE']->formWidth(4) . ' onChange="uFormUrl(' . $aname . ')" />';
+                                                       for ($aa = 2; $aa < count($labels); $aa++) {
+                                                               if ($labels[$aa]) {
+                                                                       $p_field .= ' , ' . $labels[$aa] . ':<input type="text" name="W' . $aa . $fN . '" value="' . $wArr[$aa] . '"' .
+                                                                                               $GLOBALS['TBE_TEMPLATE']->formWidth(4) . ' onChange="uFormUrl(' . $aname . ')" />';
+                                                               } else {
+                                                                       $p_field .= '<input type="hidden" name="W' . $aa . $fN . '" value="' . $wArr[$aa] . '" />';
+                                                               }
+                                                       }
+                                               break;
+                                               case 'options':
+                                                       if (is_array($typeDat['params'])) {
+                                                               $p_field = '';
+                                                               foreach ($typeDat['params'] as $val) {
+                                                                       $vParts = explode('=', $val, 2);
+                                                                       $label = $vParts[0];
+                                                                       $val = isset($vParts[1]) ? $vParts[1] : $vParts[0];
+
+                                                                               // option tag:
+                                                                       $sel = '';
+                                                                       if ($val == $params['value']) {
+                                                                               $sel = ' selected';
                                                                        }
                                                                        }
-                                                                       $p_field='<select name="C'.$fN.'" onChange="document.'.$this->ext_CEformName.'[\''.$fN.'\'].value=this.options[this.selectedIndex].value; uFormUrl('.$aname.');">'.$p_field.'</select>';
-
-                                                                       $p_field.='<input type="text" name="'.$fN.'" value="'.$fV.'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(7).' onChange="uFormUrl('.$aname.')">';
-                                                               break;
-                                                               case "wrap":
-                                                                       $wArr = explode("|",$fV);
-                                                                       $p_field='<input type="text" name="'.$fN.'" value="'.$wArr[0].'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(29).' onChange="uFormUrl('.$aname.')">';
-                                                                       $p_field.=' | ';
-                                                                       $p_field.='<input type="text" name="W'.$fN.'" value="'.$wArr[1].'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(15).' onChange="uFormUrl('.$aname.')">';
-                                                               break;
-                                                               case "offset":
-                                                                       $wArr = explode(",",$fV);
-                                                                       $labels = t3lib_div::trimExplode(",",$typeDat["paramstr"]);
-                                                                       $p_field=($labels[0]?$labels[0]:"x").':<input type="text" name="'.$fN.'" value="'.$wArr[0].'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(4).' onChange="uFormUrl('.$aname.')">';
-                                                                       $p_field.=' , ';
-                                                                       $p_field.=($labels[1]?$labels[1]:"y").':<input type="text" name="W'.$fN.'" value="'.$wArr[1].'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(4).' onChange="uFormUrl('.$aname.')">';
-                                                                       for ($aa=2;$aa<count($labels);$aa++)    {
-                                                                               if ($labels[$aa])       {
-                                                                                       $p_field.=' , '.$labels[$aa].':<input type="text" name="W'.$aa.$fN.'" value="'.$wArr[$aa].'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(4).' onChange="uFormUrl('.$aname.')">';
-                                                                               } else {
-                                                                                       $p_field.='<input type="hidden" name="W'.$aa.$fN.'" value="'.$wArr[$aa].'">';
+                                                                       $p_field .= '<option value="' . htmlspecialchars($val) . '"' . $sel . '>' . $GLOBALS['LANG']->sL($label) . '</option>';
+                                                               }
+                                                               $p_field = '<select id="' . $fN . '" name="' . $fN . '" onChange="uFormUrl(' . $aname . ')">' . $p_field . '</select>';
+                                                       }
+                                               break;
+                                               case 'boolean':
+                                                       $p_field = '<input type="hidden" name="' . $fN . '" value="0" />';
+                                                       $sel = '';
+                                                       if ($fV) {
+                                                               $sel = ' checked';
+                                                       }
+                                                       $p_field .= '<input id="' . $fN . '" type="checkbox" name="' . $fN . '" value="' . ($typeDat['paramstr'] ? $typeDat['paramstr'] : 1) .
+                                                                               '"' . $sel . ' onClick="uFormUrl(' . $aname . ')" />';
+                                               break;
+                                               case 'comment':
+                                                       $p_field = '<input type="hidden" name="' . $fN . '" value="#" />';
+                                                       $sel = '';
+                                                       if (!$fV) {
+                                                               $sel = ' checked';
+                                                       }
+                                                       $p_field .= '<input id="' . $fN . '" type="checkbox" name="' . $fN . '" value=""' . $sel . ' onClick="uFormUrl(' . $aname . ')" />';
+                                               break;
+                                               case 'file':
+                                                       $p_field = '<option value=""></option>';
+                                                       $theImage = '';
+                                                       $selectThisFile = $this->extractFromResources($this->setup['resources'], $params['value']);
+                                                       if ($params['value'] && !$selectThisFile) {
+                                                               if (in_array($params['value'], $this->dirResources)) {
+                                                                       $selectThisFile = $params['value'];
+                                                               }
+                                                       }
+                                                               // extensionlist
+                                                       $extList = $typeDat['paramstr'];
+                                                       $p_field = '<option value="">(' . $extList . ')</option>';
+                                                       if ($extList == 'IMAGE_EXT') {
+                                                               $extList = $GLOBALS['TYPO3_CONF_VARS']['GFX']['imagefile_ext'];
+                                                       }
+                                                       $onlineResourceFlag = $this->ext_defaultOnlineResourceFlag;
+
+                                                       foreach ($this->rArr as $c => $val) {
+                                                               $val = trim($val);
+                                                               $fI = t3lib_div::split_fileref($val);
+                                                               if ($val && (!$extList || t3lib_div::inList($extList, $fI['fileext']))) {
+                                                                       if ($onlineResourceFlag <= 0 && strstr($fI['path'], $GLOBALS['TYPO3_CONF_VARS']['BE']['fileadminDir'])) {
+                                                                               if ($onlineResourceFlag < 0) {
+                                                                                       $p_field .= '<option value=""></option>';
                                                                                }
                                                                                }
+                                                                               $p_field .= '<option value="">__' . $fI['path'] . '__:</option>';
+                                                                               $onlineResourceFlag = 1;
                                                                        }
                                                                        }
-                                                               break;
-                                                               case "options":
-                                                                       if (is_array($typeDat["params"]))       {
-                                                                               $p_field="";
-                                                                               while(list(,$val)=each($typeDat["params"]))     {
-                                                                                       $vParts = explode("=",$val,2);
-                                                                                       $label = $vParts[0];
-                                                                                       $val = isset($vParts[1]) ? $vParts[1] : $vParts[0];
-
-                                                                                               // option tag:
-                                                                                       $sel="";
-                                                                                       if ($val==$params["value"])     {$sel=" selected";}
-                                                                                       $p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$GLOBALS["LANG"]->sL($label).'</option>';
+                                                                       $dims = $this->resourceDimensions[$val];
+                                                                       $sel = '';
+
+                                                                               // Check if $params['value'] is in the list of resources.
+                                                                       if ($selectThisFile && $selectThisFile == $val) {
+                                                                               $sel = ' selected';
+                                                                               if ($onlineResourceFlag <= 0) {
+                                                                                       $theImage = t3lib_BEfunc::thumbCode(
+                                                                                               array(
+                                                                                                        'resources' => $selectThisFile
+                                                                                               ),
+                                                                                               'sys_template',
+                                                                                               'resources',
+                                                                                               $GLOBALS['BACK_PATH'],
+                                                                                               ''
+                                                                                       );
+                                                                               } else {
+                                                                                       $theImage = t3lib_BEfunc::thumbCode(
+                                                                                               array(
+                                                                                                        'resources' => $fI['file']
+                                                                                               ),
+                                                                                               'sys_template',
+                                                                                               'resources',
+                                                                                               $GLOBALS['BACK_PATH'],
+                                                                                               '',
+                                                                                               $fI['path']
+                                                                                       );
                                                                                }
                                                                                }
-                                                                               $p_field='<select name="'.$fN.'" onChange="uFormUrl('.$aname.')">'.$p_field.'</select>';
                                                                        }
                                                                        }
-                                                               break;
-                                                               case "boolean":
-                                                                       $p_field='<input type="Hidden" name="'.$fN.'" value="0">';
-                                                                       $sel=""; if ($fV)       {$sel=" checked";}
-                                                                       $p_field.='<input type="Checkbox" name="'.$fN.'" value="'.($typeDat["paramstr"]?$typeDat["paramstr"]:1).'"'.$sel.' onClick="uFormUrl('.$aname.')">';
-                                                               break;
-                                                               case "comment":
-                                                                       $p_field='<input type="Hidden" name="'.$fN.'" value="#">';
-                                                                       $sel=""; if (!$fV)      {$sel=" checked";}
-                                                                       $p_field.='<input type="Checkbox" name="'.$fN.'" value=""'.$sel.' onClick="uFormUrl('.$aname.')">';
-                                                               break;
-                                                               case "file":
-                                                                       $p_field='<option value=""></option>';
-//                                                                     debug($params["value"]);
-                                                                       $theImage="";
-//                                                                     if ($this->)    {
-                                                                               $selectThisFile = $this->extractFromResources($this->setup["resources"],$params["value"]);
-                                                                               if ($params["value"] && !$selectThisFile)       {
-                                                                                       if (in_array($params["value"],$this->dirResources))     {
-                                                                                               $selectThisFile=$params["value"];
-                                                                                       }
-                                                                               }
-//                                                                             debug($selectThisFile);
-                                                                                       // extensionlist
-                                                                               $extList = $typeDat["paramstr"];
-                                                                               $p_field='<option value="">('.$extList.')</option>';
-                                                                               if ($extList=="IMAGE_EXT")      {
-                                                                                       $extList = $GLOBALS["TYPO3_CONF_VARS"]["GFX"]["imagefile_ext"];
-                                                                               }
-                                                                               reset($this->rArr);
-                                                                               $onlineResourceFlag=$this->ext_defaultOnlineResourceFlag;
-
-                                                                               while(list($c,$val)=each($this->rArr))  {
-                                                                                       $val=trim($val);
-                                                                                       $fI=t3lib_div::split_fileref($val);
-//                                                                                     debug($fI);
-                                                                                       if ($val && (!$extList || t3lib_div::inList($extList,$fI["fileext"])))  {
-                                                                                               if ($onlineResourceFlag<=0 && substr($fI["path"],0,10)=="fileadmin/")   {
-                                                                                                       if ($onlineResourceFlag<0)      {
-                                                                                                               $p_field.='<option value=""></option>';
-                                                                                                       }
-                                                                                                       $p_field.='<option value="">__'.$fI["path"].'__:</option>';
-                                                                                                       $onlineResourceFlag=1;
-                                                                                               }
-                                                                                               $dims=$this->resourceDimensions[$val];
-                                                                                               $sel="";
-
-                                                                                                       // Check if $params["value"] is in the list of resources.
-                                                                                               if ($selectThisFile && $selectThisFile==$val)   {
-                                                                                                       $sel=" selected";
-                                                                                                       if ($onlineResourceFlag<=0)     {
-                                                                                                               $theImage=t3lib_BEfunc::thumbCode(array("resources"=>$selectThisFile),"sys_template","resources",$GLOBALS["BACK_PATH"],"");
-                                                                                                       } else {
-                                                                                                               $theImage=t3lib_BEfunc::thumbCode(array("resources"=>$fI["file"]),"sys_template","resources",$GLOBALS["BACK_PATH"],"",$fI["path"]);
-                                                                                                       }
-                                                                                               }
 
 
-                                                                                               if ($onlineResourceFlag<=0)     {
-                                                                                                       $onlineResourceFlag--;
-                                                                                                               // Value is set with a *
-                                                                                                       $val = $this->ext_setStar($val);
-                                                                                                       $p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$val.$dims.'</option>';
-                                                                                               } else {
-                                                                                                       $p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$fI["file"].$dims.'</option>';
-                                                                                               }
-                                                                                       }
-                                                                               }
-                                                                               if (trim($params["value"]) && !$selectThisFile) {
-                                                                                       $val = $params["value"];
-                                                                                       $p_field.='<option value=""></option>';
-                                                                                       $p_field.='<option value="'.htmlspecialchars($val).'" selected>'.$val.'</option>';
-                                                                               }
-       //                                                              }
-                                                                       $p_field='<select name="'.$fN.'" onChange="uFormUrl('.$aname.')">'.$p_field.'</select>';
-                                                                       $p_field.=$theImage;
-
-                                                                       if (!$this->ext_noCEUploadAndCopying)   {
-                                                                                       // Copy a resource
-                                                                               $copyFile = $this->extractFromResources($this->setup["resources"],$params["value"]);
-                                                                               if (!$copyFile) {
-                                                                                       if ($params["value"])   {
-                                                                                               $copyFile=PATH_site.$this->ext_detectAndFixExtensionPrefix($params["value"]);
-                                                                                       }
-                                                                               } else {
-       //                                                                              $copyFile=PATH_site."uploads/tf/".$copyFile;
-                                                                                       $copyFile="";
-                                                                               }
-#debug($copyFile);
-                                                                               if ($copyFile && @is_file($copyFile))   {
-                                                                                       $p_field.='<img src="clear.gif" width="20" height="1" alt="" /><img'.t3lib_iconWorks::skinImg($GLOBALS['BACK_PATH'],'gfx/clip_copy.gif','width="12" height="12"').' border="0" alt="" /><input type="Checkbox" name="_copyResource['.$params["name"].']" value="'.htmlspecialchars($copyFile).'" onClick="uFormUrl('.$aname.');if (this.checked) {alert(unescape(\''.rawurlencode(sprintf("This will make a copy of the current file, '%s'. Do you really want that?",$params["value"])).'\'));}">';
-                                                                               }
-                                                                                       // Upload?
-                                                                               $p_field.='<BR>';
-                                                                               $p_field.='<input type="file" name="upload_'.$fN.'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth().' onChange="uFormUrl('.$aname.')" size="50" />';
+                                                                       if ($onlineResourceFlag <= 0) {
+                                                                               $onlineResourceFlag--;
+                                                                                       // Value is set with a *
+                                                                               $val = $this->ext_setStar($val);
+                                                                               $p_field .= '<option value="' . htmlspecialchars($val) . '"' . $sel . '>' . $val . $dims . '</option>';
+                                                                       } else {
+                                                                               $p_field .= '<option value="' . htmlspecialchars($val) . '"' . $sel . '>' . $fI['file'] . $dims . '</option>';
                                                                        }
                                                                        }
-                                                               break;
-                                                               case 'small':
-                                                               default:
-                                                                       $fwidth= $typeDat["type"]=="small" ? 10 : 46;
-                                                                       $p_field='<input type="text" name="'.$fN.'" value="'.$fV.'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth($fwidth).' onChange="uFormUrl('.$aname.')">';
-                                                               break;
+                                                               }
                                                        }
                                                        }
-                                               }
-                                               if (!$this->ext_dontCheckIssetValues)   $p_field='<input type="Checkbox" name="check['.$params["name"].']" value="1"'.$checked.' onClick="uFormUrl('.$aname.')">'.$p_field;
-                                               if ($typeDat["type"]=="color" && substr($params["value"],0,2)!='{$')    {
-                                                       $p_field='<table border=0 cellpadding=0 cellspacing=0><tr><td nowrap>'.$p_field.'</td><td>&nbsp;</td><td bgcolor="'.$params["value"].'"><img src="clear.gif" width=50 height=10></td></tr></table>';
-                                               } else {
-                                                       $p_field='<span class="nobr">'.$p_field.'</span><br />';
-                                               }
 
 
-                                               $p_name = '<span class="typo3-dimmed">['.$params["name"].']</span><BR>';
-                                               $p_dlabel='<span class="typo3-dimmed"><b>Default:</b> '.htmlspecialchars($params["default_value"]).'</span><BR>';
-                                               $p_label = '<b>'.htmlspecialchars($head).'</b>';
-                                               $p_descrip = $body ? htmlspecialchars($body)."<BR>" : "";
-
-                                               $output.='<tr>';
-                                               $output.='<td valign=top nowrap><a name="'.$raname.'"></a>'.$help["constants"][$params["name"]].$p_label.'</td>';
-                                               $output.='<td valign=top align="right">'.$p_name.'</td>';
-                                               $output.='</tr>';
-                                               $output.='<tr>';
-                                               $output.='<td colspan=2>'.$p_descrip.$p_field.$p_dlabel.'<br></td>';
-                                               $output.='</tr>';
-                       //              }
-                               } else {
-                                       debug("Error. Constant did not exits. Should not happen.");
-                               }
-                       }
-                       $output='<table border=0 cellpadding=0 cellspacing=0>'.$output.'</table>';
-               }
-               return $output;
-       }
+                                                       if (trim($params['value']) && !$selectThisFile) {
+                                                               $val = $params['value'];
+                                                               $p_field .= '<option value=""></option>';
+                                                               $p_field .= '<option value="' . htmlspecialchars($val) . '" selected>' . $val . '</option>';
+                                                       }
+
+                                                       $p_field = '<select id="' . $fN . '" name="' . $fN . '" onChange="uFormUrl(' . $aname . ')">' . $p_field . '</select>';
+                                                       $p_field .= $theImage;
+
+                                                       if (!$this->ext_noCEUploadAndCopying) {
+                                                                       // Copy a resource
+                                                               $copyFile = $this->extractFromResources($this->setup['resources'], $params['value']);
+                                                               if (!$copyFile) {
+                                                                       if ($params['value']) {
+                                                                               $copyFile = PATH_site . $this->ext_detectAndFixExtensionPrefix($params['value']);
+                                                                       }
+                                                               } else {
+                                                                       $copyFile = '';
+                                                               }
+
+                                                               if ($copyFile && @is_file($copyFile)) {
+                                                                       $p_field .= '<img src="clear.gif" width="20" ' . 'height="1" alt="" />' .
+                                                                                               t3lib_iconWorks::getSpriteIcon('actions-edit-copy') . '<input type="checkbox" ' .
+                                                                                               'name="_copyResource[' . $params['name'] . ']" value="' . htmlspecialchars($copyFile) .
+                                                                                               '" onclick="uFormUrl(' . $aname . ');if (this.checked && !confirm(\'' .
+                                                                                               t3lib_div::slashJS(htmlspecialchars(sprintf($GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_tsparser.xml:tsparser_ext.make_copy'), $params['value']))) .
+                                                                                               '\')) this.checked=false;" />';
+                                                               }
 
 
+                                                                       // Upload?
+                                                               $p_field .= '<br />';
+                                                               $p_field .= '<input id="' . $fN . '" type="file" name="upload_' . $fN . '"' . $GLOBALS['TBE_TEMPLATE']->formWidth() .
+                                                                                       ' onChange="uFormUrl(' . $aname . ')" size="50" />';
+                                                       }
+                                               break;
+                                               case 'user':
+                                                       $userFunction = $typeDat['paramstr'];
+                                                       $userFunctionParams = array('fieldName' => $fN, 'fieldValue' => $fV);
+                                                       $p_field = t3lib_div::callUserFunction($userFunction, $userFunctionParams, $this, '');
+                                               break;
+                                               case 'small':
+                                               default:
+                                                       $fwidth = $typeDat['type'] == 'small' ? 10 : 46;
+                                                       $p_field = '<input id="' . $fN . '" type="text" name="' . $fN . '" value="' . $fV . '"' .
+                                                                          $GLOBALS['TBE_TEMPLATE']->formWidth($fwidth) . ' onChange="uFormUrl(' . $aname . ')" />';
+                                               break;
+                                       }
+
+                                               // Define default names and IDs
+                                       $userTyposcriptID = 'userTS-' . $params['name'];
+                                       $defaultTyposcriptID = 'defaultTS-' . $params['name'];
+                                       $checkboxName = 'check[' . $params['name'] . ']';
+                                       $checkboxID = $checkboxName;
 
 
+                                               // Handle type=color specially
+                                       if ($typeDat['type'] == 'color' && substr($params['value'], 0, 2) != '{$') {
+                                               $color = '<div id="colorbox-' . $fN . '" class="typo3-tstemplate-ceditor-colorblock" style="background-color:' .
+                                                                $params['value'] . ';">&nbsp;</div>';
+                                       } else {
+                                               $color = '';
+                                       }
 
 
+                                       if (!$this->ext_dontCheckIssetValues) {
 
 
+                                               /* Set the default styling options */
+                                               if (isset($this->objReg[$params['name']])) {
+                                                       $checkboxValue = 'checked';
+                                                       $userTyposcriptStyle = '';
+                                                       $defaultTyposcriptStyle = 'style="display:none;"';
+                                               } else {
+                                                       $checkboxValue = '';
+                                                       $userTyposcriptStyle = 'style="display:none;"';
+                                                       $defaultTyposcriptStyle = '';
+                                               }
 
 
 
 
+                                               $deleteIconHTML = t3lib_iconWorks::getSpriteIcon(
+                                                       'actions-edit-undo',
+                                                       array(
+                                                                'class' => "typo3-tstemplate-ceditor-control undoIcon",
+                                                                'alt' => "Revert to default Constant",
+                                                                'title' => "Revert to default Constant",
+                                                                'rel' => $params['name']
+                                                       )
+                                               );
+                                               $editIconHTML = t3lib_iconWorks::getSpriteIcon(
+                                                       'actions-document-open',
+                                                       array(
+                                                                'class' => "typo3-tstemplate-ceditor-control editIcon",
+                                                                'alt' => "Edit this Constant",
+                                                                'title' => "Edit this Constant",
+                                                                'rel' => $params['name']
+                                                       )
+                                               );
+                                               $constantCheckbox = '<input type="hidden" name="' . $checkboxName . '" id="' . $checkboxID . '" value="' . $checkboxValue . '"/>';
+
+                                                       // If there's no default value for the field, use a static label.
+                                               if (!$params['default_value']) {
+                                                       $params['default_value'] = '[Empty]';
+                                               }
 
 
+                                               $constantDefaultRow = '<div class="typo3-tstemplate-ceditor-row" id="' . $defaultTyposcriptID . '" ' .
+                                                                                         $defaultTyposcriptStyle . '>' . $editIconHTML .
+                                                                                         htmlspecialchars($params['default_value']) . $color . '</div>';
+                                       }
 
 
+                                       $constantEditRow = '<div class="typo3-tstemplate-ceditor-row" id="' . $userTyposcriptID . '" ' .
+                                                                          $userTyposcriptStyle . '>' . $deleteIconHTML . $p_field . $color . '</div>';
 
 
+                                       $constantLabel = '<dt class="typo3-tstemplate-ceditor-label">' . htmlspecialchars($head) . '</dt>';
+                                       $constantName = '<dt class="typo3-dimmed">[' . $params['name'] . ']</dt>';
+                                       $constantDescription = $body ? '<dd>' . htmlspecialchars($body) . '</dd>' : '';
+                                       $constantData = '<dd>' . $constantCheckbox . $constantEditRow . $constantDefaultRow . '</dd>';
 
 
+                                       $output .= '<a name="' . $raname . '"></a>' . $help['constants'][$params['name']];
+                                       $output .= '<dl class="typo3-tstemplate-ceditor-constant">' . $constantLabel . $constantName .
+                                                          $constantDescription . $constantData . '</dl>';
+                               } else {
+                                       debug('Error. Constant did not exist. Should not happen.');
+                               }
+                       }
+               }
+               return $output;
+       }
 
 
        /***************************
 
 
        /***************************
@@ -1354,13 +1426,14 @@ class t3lib_tsparser_ext extends t3lib_TStemplate       {
         * @param       [type]          $constants: ...
         * @return      [type]          ...
         */
         * @param       [type]          $constants: ...
         * @return      [type]          ...
         */
-       function ext_regObjectPositions($constants)     {
-                       // This runs through the lines of the constants-field of the active template and registers the constants-names and linepositions in an array, $this->objReg
-               $this->raw = explode(chr(10),$constants);
-               $this->rawP=0;
-
-               $this->objReg=array();          // resetting the objReg if the divider is found!!
-               $this->ext_regObjects("");
+       function ext_regObjectPositions($constants) {
+                       // This runs through the lines of the constants-field of the active template and registers the constants-names
+                       // and linepositions in an array, $this->objReg
+               $this->raw = explode(LF, $constants);
+               $this->rawP = 0;
+
+               $this->objReg = array(); // resetting the objReg if the divider is found!!
+               $this->ext_regObjects('');
        }
 
        /**
        }
 
        /**
@@ -1369,36 +1442,36 @@ class t3lib_tsparser_ext extends t3lib_TStemplate       {
         * @param       [type]          $pre: ...
         * @return      [type]          ...
         */
         * @param       [type]          $pre: ...
         * @return      [type]          ...
         */
-       function ext_regObjects($pre)   {
+       function ext_regObjects($pre) {
                        // works with regObjectPositions. "expands" the names of the TypoScript objects
                        // works with regObjectPositions. "expands" the names of the TypoScript objects
-               while (isset($this->raw[$this->rawP]))  {
+               while (isset($this->raw[$this->rawP])) {
                        $line = ltrim($this->raw[$this->rawP]);
                        $line = ltrim($this->raw[$this->rawP]);
-                       if (strstr($line,$this->edit_divider))  {
-                               $this->objReg=array();          // resetting the objReg if the divider is found!!
+                       if (strstr($line, $this->edit_divider)) {
+                               $this->objReg = array(); // resetting the objReg if the divider is found!!
                        }
                        $this->rawP++;
                        }
                        $this->rawP++;
-                       if ($line)      {
-                               if (substr($line,0,1)=="[")     {
-//                                     return $line;
-                               } elseif (strcspn($line,"}#/")!=0)      {
-                                       $varL = strcspn($line," {=<");
-                                       $var=substr($line,0,$varL);
-                                       $line = ltrim(substr($line,$varL));
-                                       switch(substr($line,0,1))       {
-                                               case "=":
-                                                       $this->objReg[$pre.$var]=$this->rawP-1;
+                       if ($line) {
+                               if (substr($line, 0, 1) == '[') {
+                                       //                                      return $line;
+                               } elseif (strcspn($line, '}#/') != 0) {
+                                       $varL = strcspn($line, ' {=<');
+                                       $var = substr($line, 0, $varL);
+                                       $line = ltrim(substr($line, $varL));
+                                       switch (substr($line, 0, 1)) {
+                                               case '=':
+                                                       $this->objReg[$pre . $var] = $this->rawP - 1;
                                                break;
                                                break;
-                                               case "{":
+                                               case '{':
                                                        $this->ext_inBrace++;
                                                        $this->ext_inBrace++;
-                                                       $this->ext_regObjects($pre.$var.".");
+                                                       $this->ext_regObjects($pre . $var . '.');
                                                break;
                                        }
                                                break;
                                        }
-                                       $this->lastComment="";
-                               } elseif (substr($line,0,1)=="}")       {
-                                       $this->lastComment="";
+                                       $this->lastComment = '';
+                               } elseif (substr($line, 0, 1) == '}') {
+                                       $this->lastComment = '';
                                        $this->ext_inBrace--;
                                        $this->ext_inBrace--;
-                                       if ($this->ext_inBrace<0)       {
-                                               $this->ext_inBrace=0;
+                                       if ($this->ext_inBrace < 0) {
+                                               $this->ext_inBrace = 0;
                                        } else {
                                                break;
                                        }
                                        } else {
                                                break;
                                        }
@@ -1414,21 +1487,21 @@ class t3lib_tsparser_ext extends t3lib_TStemplate       {
         * @param       [type]          $var: ...
         * @return      [type]          ...
         */
         * @param       [type]          $var: ...
         * @return      [type]          ...
         */
-       function ext_putValueInConf($key, $var) {
+       function ext_putValueInConf($key, $var) {
                        // Puts the value $var to the TypoScript value $key in the current lines of the templates.
                        // If the $key is not found in the template constants field, a new line is inserted in the bottom.
                        // Puts the value $var to the TypoScript value $key in the current lines of the templates.
                        // If the $key is not found in the template constants field, a new line is inserted in the bottom.
-               $theValue = " ".trim($var);
-               if (isset($this->objReg[$key])) {
+               $theValue = ' ' . trim($var);
+               if (isset($this->objReg[$key])) {
                        $lineNum = $this->objReg[$key];
                        $lineNum = $this->objReg[$key];
-                       $parts = explode("=",$this->raw[$lineNum],2);
-                       if (count($parts)==2)   {
-                               $parts[1]= $theValue;
+                       $parts = explode('=', $this->raw[$lineNum], 2);
+                       if (count($parts) == 2) {
+                               $parts[1] = $theValue;
                        }
                        }
-                       $this->raw[$lineNum]=implode($parts,"=");
+                       $this->raw[$lineNum] = implode($parts, '=');
                } else {
                } else {
-                       $this->raw[]=$key." =".$theValue;
+                       $this->raw[] = $key . ' =' . $theValue;
                }
                }
-               $this->changed=1;
+               $this->changed = 1;
        }
 
        /**
        }
 
        /**
@@ -1437,13 +1510,13 @@ class t3lib_tsparser_ext extends t3lib_TStemplate       {
         * @param       [type]          $key: ...
         * @return      [type]          ...
         */
         * @param       [type]          $key: ...
         * @return      [type]          ...
         */
-       function ext_removeValueInConf($key)    {
+       function ext_removeValueInConf($key) {
                        // Removes the value in the configuration
                        // Removes the value in the configuration
-               if (isset($this->objReg[$key])) {
+               if (isset($this->objReg[$key])) {
                        $lineNum = $this->objReg[$key];
                        unset($this->raw[$lineNum]);
                }
                        $lineNum = $this->objReg[$key];
                        unset($this->raw[$lineNum]);
                }
-               $this->changed=1;
+               $this->changed = 1;
        }
 
        /**
        }
 
        /**
@@ -1453,24 +1526,22 @@ class t3lib_tsparser_ext extends t3lib_TStemplate       {
         * @param       [type]          $settings: ...
         * @return      [type]          ...
         */
         * @param       [type]          $settings: ...
         * @return      [type]          ...
         */
-       function ext_depthKeys($arr,$settings)  {
-               reset($arr);
-               $tsbrArray=array();
-               while(list($theK,$theV)=each($arr))     {
-                       $theKeyParts = explode(".",$theK);
-                       $depth="";
-                       $c=count($theKeyParts);
-                       $a=0;
-                       while(list(,$p)=each($theKeyParts))     {
+       function ext_depthKeys($arr, $settings) {
+               $tsbrArray = array();
+               foreach ($arr as $theK => $theV) {
+                       $theKeyParts = explode('.', $theK);
+                       $depth = '';
+                       $c = count($theKeyParts);
+                       $a = 0;
+                       foreach ($theKeyParts as $p) {
                                $a++;
                                $a++;
-                               $depth.=($depth?".":"").$p;
-                               $tsbrArray[$depth]= ($c==$a) ? $theV : 1;
+                               $depth .= ($depth ? '.' : '') . $p;
+                               $tsbrArray[$depth] = ($c == $a) ? $theV : 1;
                        }
                }
                        // Modify settings
                        }
                }
                        // Modify settings
-               reset($tsbrArray);
-               while(list($theK,$theV)=each($tsbrArray))       {
-                       if ($theV)      {
+               foreach ($tsbrArray as $theK => $theV) {
+                       if ($theV) {
                                $settings[$theK] = 1;
                        } else {
                                unset($settings[$theK]);
                                $settings[$theK] = 1;
                        } else {
                                unset($settings[$theK]);
@@ -1488,89 +1559,102 @@ class t3lib_tsparser_ext extends t3lib_TStemplate      {
         * @param       [type]          $tplRow: ...
         * @return      [type]          ...
         */
         * @param       [type]          $tplRow: ...
         * @return      [type]          ...
         */
-       function ext_procesInput($http_post_vars,$http_post_files,$theConstants,$tplRow)        {
-               $data=$http_post_vars["data"];
-               $check=$http_post_vars["check"];
-               $copyResource=$http_post_vars["_copyResource"];
-               $Wdata=$http_post_vars["Wdata"];
-               $W2data=$http_post_vars["W2data"];
-               $W3data=$http_post_vars["W3data"];
-               $W4data=$http_post_vars["W4data"];
-               $W5data=$http_post_vars["W5data"];
-
-               if (is_array($data))    {
-                       reset($data);
-                       while(list($key,$var)=each($data))      {
-                               if (isset($theConstants[$key])) {
-                                       if ($this->ext_dontCheckIssetValues || isset($check[$key]))     {               // If checkbox is set, update the value
-                                               list($var) = explode(chr(10),$var);     // exploding with linebreak, just to make sure that no multiline input is given!
-                                               $typeDat=$this->ext_getTypeData($theConstants[$key]["type"]);
-                                               switch($typeDat["type"])        {
-                                                       case "int":
-                                                               if ($typeDat["paramstr"])       {
-                                                                       $var=t3lib_div::intInRange($var,$typeDat["params"][0],$typeDat["params"][1]);
+       function ext_procesInput($http_post_vars, $http_post_files, $theConstants, $tplRow) {
+               $data = $http_post_vars['data'];
+               $check = $http_post_vars['check'];
+               $copyResource = $http_post_vars['_copyResource'];
+               $Wdata = $http_post_vars['Wdata'];
+               $W2data = $http_post_vars['W2data'];
+               $W3data = $http_post_vars['W3data'];
+               $W4data = $http_post_vars['W4data'];
+               $W5data = $http_post_vars['W5data'];
+
+               if (is_array($data)) {
+                       foreach ($data as $key => $var) {
+                               if (isset($theConstants[$key])) {
+                                       if ($this->ext_dontCheckIssetValues || isset($check[$key])) { // If checkbox is set, update the value
+                                               list($var) = explode(LF, $var); // exploding with linebreak, just to make sure that no multiline input is given!
+                                               $typeDat = $this->ext_getTypeData($theConstants[$key]['type']);
+                                               switch ($typeDat['type']) {
+                                                       case 'int':
+                                                               if ($typeDat['paramstr']) {
+                                                                       $var = t3lib_utility_Math::forceIntegerInRange($var, $typeDat['params'][0], $typeDat['params'][1]);
                                                                } else {
                                                                } else {
-                                                                       $var=intval($var);
+                                                                       $var = intval($var);
                                                                }
                                                        break;
                                                                }
                                                        break;
-                                                       case "int+":
-                                                               $var=t3lib_div::intInRange($var,0,10000);
+                                                       case 'int+':
+                                                               $var = max(0, intval($var));
                                                        break;
                                                        break;
-                                                       case "color":
-                                                               $col=array();
-                                                               if($var && !t3lib_div::inList($this->HTMLcolorList,strtolower($var)))   {
-                                                                       $var = ereg_replace("[^A-Fa-f0-9]*","",$var);
-                                                                       $col[]=HexDec(substr($var,0,2));
-                                                                       $col[]=HexDec(substr($var,2,2));
-                                                                       $col[]=HexDec(substr($var,4,2));
-                                                                       $var="#".strtoupper(substr("0".DecHex($col[0]),-2).substr("0".DecHex($col[1]),-2).substr("0".DecHex($col[2]),-2));
+                                                       case 'color':
+                                                               $col = array();
+                                                               if ($var && !t3lib_div::inList($this->HTMLcolorList, strtolower($var))) {
+                                                                       $var = preg_replace('/[^A-Fa-f0-9]*/', '', $var);
+                                                                       $useFullHex = strlen($var) > 3;
+
+                                                                       $col[] = HexDec(substr($var, 0, 1));
+                                                                       $col[] = HexDec(substr($var, 1, 1));
+                                                                       $col[] = HexDec(substr($var, 2, 1));
+
+                                                                       if ($useFullHex) {
+                                                                               $col[] = HexDec(substr($var, 3, 1));
+                                                                               $col[] = HexDec(substr($var, 4, 1));
+                                                                               $col[] = HexDec(substr($var, 5, 1));
+                                                                       }
+
+                                                                       $var = substr('0' . DecHex($col[0]), -1) . substr('0' . DecHex($col[1]), -1) . substr('0' . DecHex($col[2]), -1);
+                                                                       if ($useFullHex) {
+                                                                               $var .= substr('0' . DecHex($col[3]), -1) . substr('0' . DecHex($col[4]), -1) . substr('0' . DecHex($col[5]), -1);
+                                                                       }
+
+                                                                       $var = '#' . strtoupper($var);
                                                                }
                                                        break;
                                                                }
                                                        break;
-                                                       case "comment":
-                                                               if ($val)       {
-                                                                       $val="#";
+                                                       case 'comment':
+                                                               if ($var) {
+                                                                       $var = '#';
                                                                } else {
                                                                } else {
-                                                                       $val="";
+                                                                       $var = '';
                                                                }
                                                        break;
                                                                }
                                                        break;
-                                                       case "wrap":
-                                                               if (isset($Wdata[$key]))        {
-                                                                       $var.="|".$Wdata[$key];
+                                                       case 'wrap':
+                                                               if (isset($Wdata[$key])) {
+                                                                       $var .= '|' . $Wdata[$key];
                                                                }
                                                        break;
                                                                }
                                                        break;
-                                                       case "offset":
-                                                               if (isset($Wdata[$key]))        {
-                                                                       $var=intval($var).",".intval($Wdata[$key]);
-                                                                       if (isset($W2data[$key]))       {
-                                                                               $var.=",".intval($W2data[$key]);
-                                                                               if (isset($W3data[$key]))       {
-                                                                                       $var.=",".intval($W3data[$key]);
-                                                                                       if (isset($W4data[$key]))       {
-                                                                                               $var.=",".intval($W4data[$key]);
-                                                                                               if (isset($W5data[$key]))       {
-                                                                                                       $var.=",".intval($W5data[$key]);
+                                                       case 'offset':
+                                                               if (isset($Wdata[$key])) {
+                                                                       $var = intval($var) . ',' . intval($Wdata[$key]);
+                                                                       if (isset($W2data[$key])) {
+                                                                               $var .= ',' . intval($W2data[$key]);
+                                                                               if (isset($W3data[$key])) {
+                                                                                       $var .= ',' . intval($W3data[$key]);
+                                                                                       if (isset($W4data[$key])) {
+                                                                                               $var .= ',' . intval($W4data[$key]);
+                                                                                               if (isset($W5data[$key])) {
+                                                                                                       $var .= ',' . intval($W5data[$key]);
                                                                                                }
                                                                                        }
                                                                                }
                                                                        }
                                                                }
                                                        break;
                                                                                                }
                                                                                        }
                                                                                }
                                                                        }
                                                                }
                                                        break;
-                                                       case "boolean":
-                                                               if ($var)       {
-                                                                       $var = $typeDat["paramstr"] ? $typeDat["paramstr"] : 1;
+                                                       case 'boolean':
+                                                               if ($var) {
+                                                                       $var = $typeDat['paramstr'] ? $typeDat['paramstr'] : 1;
                                                                }
                                                        break;
                                                                }
                                                        break;
-                                                       case "file":
-                                                               if (!$this->ext_noCEUploadAndCopying)   {
-                                                                       if ($http_post_files["upload_data"]["name"][$key] && $http_post_files["upload_data"]["tmp_name"][$key]!="none") {
+                                                       case 'file':
+                                                               if (!$this->ext_noCEUploadAndCopying) {
+                                                                       if ($http_post_files['upload_data']['name'][$key] && $http_post_files['upload_data']['tmp_name'][$key] != 'none') {
                                                                                $var = $this->upload_copy_file(
                                                                                        $typeDat,
                                                                                        $tplRow,
                                                                                $var = $this->upload_copy_file(
                                                                                        $typeDat,
                                                                                        $tplRow,
-                                                                                       trim($http_post_files["upload_data"]["name"][$key]),
-                                                                                       $http_post_files["upload_data"]["tmp_name"][$key]
+                                                                                       trim($http_post_files['upload_data']['name'][$key]),
+                                                                                       $http_post_files['upload_data']['tmp_name'][$key]
                                                                                );
                                                                        }
                                                                                );
                                                                        }
-                                                                       if ($copyResource[$key])        {
+                                                                       if ($copyResource[$key]) {
                                                                                $var = $this->upload_copy_file(
                                                                                        $typeDat,
                                                                                        $tplRow,
                                                                                $var = $this->upload_copy_file(
                                                                                        $typeDat,
                                                                                        $tplRow,
@@ -1581,10 +1665,10 @@ class t3lib_tsparser_ext extends t3lib_TStemplate       {
                                                                }
                                                        break;
                                                }
                                                                }
                                                        break;
                                                }
-                                               if ($this->ext_printAll || strcmp($theConstants[$key]["value"],$var))   {
-                                                       $this->ext_putValueInConf($key, $var);          // Put value in, if changed.
+                                               if ($this->ext_printAll || strcmp($theConstants[$key]['value'], $var)) {
+                                                       $this->ext_putValueInConf($key, $var); // Put value in, if changed.
                                                }
                                                }
-                                               unset($check[$key]);            // Remove the entry because it has been "used"
+                                               unset($check[$key]); // Remove the entry because it has been "used"
                                        } else {
                                                $this->ext_removeValueInConf($key);
                                        }
                                        } else {
                                                $this->ext_removeValueInConf($key);
                                        }
@@ -1592,18 +1676,14 @@ class t3lib_tsparser_ext extends t3lib_TStemplate       {
                        }
                }
                        // Remaining keys in $check indicates fields that are just clicked "on" to be edited. Therefore we get the default value and puts that in the template as a start...
                        }
                }
                        // Remaining keys in $check indicates fields that are just clicked "on" to be edited. Therefore we get the default value and puts that in the template as a start...
-               if (!$this->ext_dontCheckIssetValues && is_array($check))       {
-                       reset($check);
-                       while(list($key,$var)=each($check))     {
-                               if (isset($theConstants[$key])) {
-                                       $dValue = $theConstants[$key]["default_value"];
-//                                     debug($dValue);
+               if (!$this->ext_dontCheckIssetValues && is_array($check)) {
+                       foreach ($check as $key => $var) {
+                               if (isset($theConstants[$key])) {
+                                       $dValue = $theConstants[$key]['default_value'];
                                        $this->ext_putValueInConf($key, $dValue);
                                        $this->ext_putValueInConf($key, $dValue);
-//                                     debug($key,1);
                                }
                        }
                }
                                }
                        }
                }
-//             debug($this->objReg);
        }
 
        /**
        }
 
        /**
@@ -1615,41 +1695,41 @@ class t3lib_tsparser_ext extends t3lib_TStemplate       {
         * @param       [type]          $tmp_name: ...
         * @return      [type]          ...
         */
         * @param       [type]          $tmp_name: ...
         * @return      [type]          ...
         */
-       function upload_copy_file($typeDat,&$tplRow,$theRealFileName,$tmp_name) {
+       function upload_copy_file($typeDat, &$tplRow, $theRealFileName, $tmp_name) {
 
                        // extensions
 
                        // extensions
-               $extList = $typeDat["paramstr"];
-               if ($extList=="IMAGE_EXT")      {
-                       $extList = $GLOBALS["TYPO3_CONF_VARS"]["GFX"]["imagefile_ext"];
+               $extList = $typeDat['paramstr'];
+               if ($extList == 'IMAGE_EXT') {
+                       $extList = $GLOBALS['TYPO3_CONF_VARS']['GFX']['imagefile_ext'];
                }
                }
-               $fI=t3lib_div::split_fileref($theRealFileName);
-               if ($theRealFileName && (!$extList || t3lib_div::inList($extList,$fI["fileext"])))      {
-                       $tmp_upload_name = t3lib_div::upload_to_tempfile($tmp_name);    // If there is an uploaded file, move it for the sake of safe_mode.
+               $fI = t3lib_div::split_fileref($theRealFileName);
+               if ($theRealFileName && (!$extList || t3lib_div::inList($extList, $fI['fileext']))) {
+                       $tmp_upload_name = t3lib_div::upload_to_tempfile($tmp_name); // If there is an uploaded file, move it.
 
                                // Saving resource
 
                                // Saving resource
-                       $alternativeFileName=array();
+                       $alternativeFileName = array();
                        $alternativeFileName[$tmp_upload_name] = $theRealFileName;
                                // Making list of resources
                        $alternativeFileName[$tmp_upload_name] = $theRealFileName;
                                // Making list of resources
-                       $resList = $tplRow["resources"];
-                       $resList = $tmp_upload_name.",".$resList;
-                       $resList=implode(t3lib_div::trimExplode(",",$resList,1),",");
+                       $resList = $tplRow['resources'];
+                       $resList = $tmp_upload_name . ',' . $resList;
+                       $resList = implode(t3lib_div::trimExplode(',', $resList, 1), ',');
                                // Making data-array
                        $saveId = $tplRow['_ORIG_uid'] ? $tplRow['_ORIG_uid'] : $tplRow['uid'];
                                // Making data-array
                        $saveId = $tplRow['_ORIG_uid'] ? $tplRow['_ORIG_uid'] : $tplRow['uid'];
-debug($saveId);
-                       $recData=array();
-                       $recData["sys_template"][$saveId]["resources"] = $resList;
+
+                       $recData = array();
+                       $recData['sys_template'][$saveId]['resources'] = $resList;
                                // Saving
                                // Saving
-                       $tce = t3lib_div::makeInstance("t3lib_TCEmain");
-                       $tce->stripslashes_values=0;
+                       $tce = t3lib_div::makeInstance('t3lib_TCEmain');
+                       $tce->stripslashes_values = 0;
                        $tce->alternativeFileName = $alternativeFileName;
                        $tce->alternativeFileName = $alternativeFileName;
-                       $tce->start($recData,Array());
+                       $tce->start($recData, Array());
                        $tce->process_datamap();
 
                        t3lib_div::unlink_tempfile($tmp_upload_name);
 
                        $tce->process_datamap();
 
                        t3lib_div::unlink_tempfile($tmp_upload_name);
 
-                       $tmpRow = t3lib_BEfunc::getRecord("sys_template",$saveId,"resources");
+                       $tmpRow = t3lib_BEfunc::getRecordWSOL('sys_template', $saveId, 'resources');
 
 
-                       $tplRow["resources"] = $tmpRow["resources"];
+                       $tplRow['resources'] = $tmpRow['resources'];
 
                                // Setting the value
                        $var = $this->ext_setStar($theRealFileName);
 
                                // Setting the value
                        $var = $this->ext_setStar($theRealFileName);
@@ -1664,11 +1744,10 @@ debug($saveId);
         * @param       [type]          $perms_clause: ...
         * @return      [type]          ...
         */
         * @param       [type]          $perms_clause: ...
         * @return      [type]          ...
         */
-       function ext_prevPageWithTemplate($id,$perms_clause)    {
-               $rootLine = t3lib_BEfunc::BEgetRootLine($id,$perms_clause?" AND ".$perms_clause:"");
-               reset($rootLine);
-               while(list(,$p)=each($rootLine))        {
-                       if ($this->ext_getFirstTemplate($p["uid"]))     {
+       function ext_prevPageWithTemplate($id, $perms_clause) {
+               $rootLine = t3lib_BEfunc::BEgetRootLine($id, $perms_clause ? ' AND ' . $perms_clause : '');
+               foreach ($rootLine as $p) {
+                       if ($this->ext_getFirstTemplate($p['uid'])) {
                                return $p;
                        }
                }
                                return $p;
                        }
                }
@@ -1680,9 +1759,9 @@ debug($saveId);
         * @param       [type]          $val: ...
         * @return      [type]          ...
         */
         * @param       [type]          $val: ...
         * @return      [type]          ...
         */
-       function ext_setStar($val)      {
-               $fParts = explode(".",strrev($val),2);
-               $val=ereg_replace("_[0-9][0-9]$","",strrev($fParts[1]))."*.".strrev($fParts[0]);
+       function ext_setStar($val) {
+               $fParts = explode('.', strrev($val), 2);
+               $val = preg_replace('/_[0-9][0-9]$/', '', strrev($fParts[1])) . '*.' . strrev($fParts[0]);
                return $val;
        }
 
                return $val;
        }
 
@@ -1692,12 +1771,12 @@ debug($saveId);
         * @param       [type]          $value: ...
         * @return      [type]          ...
         */
         * @param       [type]          $value: ...
         * @return      [type]          ...
         */
-       function ext_detectAndFixExtensionPrefix($value)        {
-               if (substr($value,0,4)=="EXT:") {
-                       $parts = explode("/",substr($value,4),2);
-#debug($parts);
+       function ext_detectAndFixExtensionPrefix($value) {
+               if (substr($value, 0, 4) == 'EXT:') {
+                       $parts = explode('/', substr($value, 4), 2);
+
                        $extPath = t3lib_extMgm::siteRelPath($parts[0]);
                        $extPath = t3lib_extMgm::siteRelPath($parts[0]);
-                       $value = $extPath.$parts[1];
+                       $value = $extPath . $parts[1];
                        return $value;
                } else {
                        return $value;
                        return $value;
                } else {
                        return $value;
@@ -1706,7 +1785,8 @@ debug($saveId);
 }
 
 
 }
 
 
-if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_tsparser_ext.php'])     {
-       include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_tsparser_ext.php']);
+if (defined('TYPO3_MODE') && isset($GLOBALS['TYPO3_CONF_VARS'][TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_tsparser_ext.php'])) {
+       include_once($GLOBALS['TYPO3_CONF_VARS'][TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_tsparser_ext.php']);
 }
 }
+
 ?>
\ No newline at end of file
 ?>
\ No newline at end of file
TYPO3 CMS Core Development