2 /***************************************************************
5 * (c) 1999-2008 Kasper Skaarhoj (kasperYYYY@typo3.com)
8 * This script is part of the TYPO3 project. The TYPO3 project is
9 * free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
14 * The GNU General Public License can be found at
15 * http://www.gnu.org/copyleft/gpl.html.
16 * A copy is found in the textfile GPL.txt and important notices to the license
17 * from the author is found in LICENSE.txt distributed with these scripts.
20 * This script is distributed in the hope that it will be useful,
21 * but WITHOUT ANY WARRANTY; without even the implied warranty of
22 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 * GNU General Public License for more details.
25 * This copyright notice MUST APPEAR in all copies of the script!
26 ***************************************************************/
28 * TSParser extension class to t3lib_TStemplate
31 * Contains functions for the TS module in TYPO3 backend
33 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
36 * [CLASS/FUNCTION INDEX of SCRIPT]
40 * 105: class t3lib_tsparser_ext extends t3lib_TStemplate
41 * 191: function flattenSetup($setupArray, $prefix, $resourceFlag)
42 * 218: function substituteConstants($all)
43 * 231: function substituteConstantsCallBack($matches)
44 * 261: function substituteCMarkers($all)
45 * 284: function generateConfig_constants()
46 * 330: function ext_getSetup($theSetup,$theKey)
47 * 358: function ext_getObjTree($arr, $depth_in, $depthData, $parentType='',$parentValue='', $alphaSort='0')
48 * 463: function lineNumberToScript($lnArr)
49 * 494: function makeHtmlspecialchars($theValue)
50 * 507: function ext_getSearchKeys($arr, $depth_in, $searchString, $keyArray)
51 * 562: function ext_getRootlineNumber($pid)
52 * 580: function ext_getTemplateHierarchyArr($arr,$depthData, $keyArray,$first=0)
53 * 639: function ext_process_hierarchyInfo($depthDataArr,&$pointer)
54 * 670: function ext_outputTS($config, $lineNumbers=0, $comments=0, $crop=0, $syntaxHL=0, $syntaxHLBlockmode=0)
55 * 697: function ext_fixed_lgd($string,$chars)
56 * 713: function ext_lnBreakPointWrap($ln,$str)
57 * 726: function ext_formatTS($input, $ln, $comments=1, $crop=0)
58 * 765: function ext_getFirstTemplate($id,$template_uid=0)
59 * 785: function ext_getAllTemplates($id)
60 * 806: function ext_compareFlatSetups($default)
61 * 872: function ext_categorizeEditableConstants($editConstArray)
62 * 895: function ext_getCategoryLabelArray()
63 * 912: function ext_getTypeData($type)
64 * 953: function ext_getTSCE_config($category)
65 * 992: function ext_getKeyImage($key)
66 * 1002: function ext_getTSCE_config_image($imgConf)
67 * 1026: function ext_resourceDims()
68 * 1056: function ext_readDirResources($path)
69 * 1071: function readDirectory($path,$type='file')
70 * 1096: function ext_fNandV($params)
71 * 1114: function ext_printFields($theConstants,$category)
73 * SECTION: Processing input values
74 * 1408: function ext_regObjectPositions($constants)
75 * 1423: function ext_regObjects($pre)
76 * 1468: function ext_putValueInConf($key, $var)
77 * 1491: function ext_removeValueInConf($key)
78 * 1507: function ext_depthKeys($arr,$settings)
79 * 1542: function ext_procesInput($http_post_vars,$http_post_files,$theConstants,$tplRow)
80 * 1666: function upload_copy_file($typeDat,&$tplRow,$theRealFileName,$tmp_name)
81 * 1715: function ext_prevPageWithTemplate($id,$perms_clause)
82 * 1731: function ext_setStar($val)
83 * 1743: function ext_detectAndFixExtensionPrefix($value)
86 * (This index is automatically created/updated by the extension "extdeveval")
90 require_once(PATH_t3lib
.'class.t3lib_tstemplate.php');
99 * TSParser extension class to t3lib_TStemplate
101 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
105 class t3lib_tsparser_ext
extends t3lib_TStemplate
{
107 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.
108 var $HTMLcolorList = 'aqua,beige,black,blue,brown,fuchsia,gold,gray,green,lime,maroon,navy,olive,orange,purple,red,silver,tan,teal,turquoise,yellow,white';
111 var $categories = array(
112 '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.
113 'menu' => array(), // Menu setup. This includes fontfiles, sizes, background images. Depending on the menutype.
114 'content' => array(), // All constants related to the display of pagecontent elements
115 'page' => array(), // General configuration like metatags, link targets
116 'advanced' => array(), // Advanced functions, which are used very seldomly.
117 'all' => array() // All constants are put here also!
118 ); // This will be filled with the available categories of the current template.
119 var $subCategories = array(
120 // Standard categories:
121 'enable' => Array('Enable features', 'a'),
122 'dims' => Array('Dimensions, widths, heights, pixels', 'b'),
123 'file' => Array('Files', 'c'),
124 'typo' => Array('Typography', 'd'),
125 'color' => Array('Colors', 'e'),
126 'links' => Array('Links and targets', 'f'),
127 'language' => Array('Language specific constants', 'g'),
129 // subcategories based on the default content elements
130 'cheader' => Array('Content: \'Header\'', 'ma'),
131 'cheader_g' => Array('Content: \'Header\', Graphical', 'ma'),
132 'ctext' => Array('Content: \'Text\'', 'mb'),
133 'cimage' => Array('Content: \'Image\'', 'md'),
134 'cbullets' => Array('Content: \'Bullet list\'', 'me'),
135 'ctable' => Array('Content: \'Table\'', 'mf'),
136 'cuploads' => Array('Content: \'Filelinks\'', 'mg'),
137 'cmultimedia' => Array('Content: \'Multimedia\'', 'mh'),
138 'cmailform' => Array('Content: \'Form\'', 'mi'),
139 'csearch' => Array('Content: \'Search\'', 'mj'),
140 'clogin' => Array('Content: \'Login\'', 'mk'),
141 'csplash' => Array('Content: \'Textbox\'', 'ml'),
142 'cmenu' => Array('Content: \'Menu/Sitemap\'', 'mm'),
143 'cshortcut' => Array('Content: \'Insert records\'', 'mn'),
144 'clist' => Array('Content: \'List of records\'', 'mo'),
145 'cscript' => Array('Content: \'Script\'', 'mp'),
146 'chtml' => Array('Content: \'HTML\'', 'mq')
148 var $resourceDimensions = array();
149 var $dirResources = array();
157 var $tsbrowser_searchKeys = array();
158 var $tsbrowser_depthKeys = array();
159 var $constantMode='';
162 var $resourceCheck=0;
163 var $ext_lineNumberOffset=0;
164 var $ext_localGfxPrefix='';
165 var $ext_localWebGfxPrefix='';
166 var $ext_expandAllNotes=0;
167 var $ext_noPMicons=0;
168 var $ext_noSpecialCharsOnLabels=0;
169 var $ext_listOfTemplatesArr=array();
170 var $ext_lineNumberOffset_mode='';
171 var $ext_dontCheckIssetValues=0; // Dont change...
172 var $ext_noCEUploadAndCopying=0;
174 var $ext_CEformName='forms[0]';
175 var $ext_defaultOnlineResourceFlag=0;
176 var $doNotSortCategoriesBeforeMakingForm = FALSE;
179 var $templateTitles=array();
183 * This flattens a hierarchical setuparray to $this->flatSetup
184 * The original function fetched the resource-file if any ('file.'). This functions doesn't.
186 * @param [type] $setupArray: ...
187 * @param [type] $prefix: ...
188 * @param [type] $resourceFlag: ...
191 function flattenSetup($setupArray, $prefix, $resourceFlag) {
192 if (is_array($setupArray)) {
193 $this->getFileName_backPath
=PATH_site
; // Setting absolute prefixed path for relative resources.
195 while(list($key,$val)=each($setupArray)) {
196 if ($prefix ||
substr($key,0,16)!='TSConstantEditor') { // We don't want 'TSConstantEditor' in the flattend setup.
197 if (is_array($val)) {
198 $this->flattenSetup($val,$prefix.$key, ($key=='file.'));
199 } elseif ($resourceFlag && $this->resourceCheck
) {
200 $this->flatSetup
[$prefix.$key] = $this->getFileName($val);
201 if ($this->removeFromGetFilePath
&& substr($this->flatSetup
[$prefix.$key],0,strlen($this->removeFromGetFilePath
))==$this->removeFromGetFilePath
) {
202 $this->flatSetup
[$prefix.$key] = substr($this->flatSetup
[$prefix.$key],strlen($this->removeFromGetFilePath
));
205 $this->flatSetup
[$prefix.$key] = $val;
213 * [Describe function...]
215 * @param [type] $all: ...
218 function substituteConstants($all) {
219 $this->Cmarker
= substr(md5(uniqid('')),0,6);
221 return preg_replace_callback('/\{\$(.[^}]+)\}/', array($this, 'substituteConstantsCallBack'), $all);
225 * Call back method for preg_replace_callback in substituteConstants
227 * @param array Regular expression matches
228 * @return string Replacement
229 * @see substituteConstants()
231 function substituteConstantsCallBack($matches) {
232 switch($this->constantMode
) {
234 $ret_val = isset($this->flatSetup
[$matches[1]]) && !is_array($this->flatSetup
[$matches[1]]) ?
235 '##'.$this->Cmarker
.'_B##'.$matches[0].'##'.$this->Cmarker
.'_E##' :
239 $ret_val = isset($this->flatSetup
[$matches[1]]) && !is_array($this->flatSetup
[$matches[1]]) ?
240 '##'.$this->Cmarker
.'_B##'.$this->flatSetup
[$matches[1]].'##'.$this->Cmarker
.'_E##' :
244 $ret_val = $matches[0];
247 $ret_val = isset($this->flatSetup
[$matches[1]]) && !is_array($this->flatSetup
[$matches[1]]) ?
248 $this->flatSetup
[$matches[1]] :
256 * [Describe function...]
258 * @param [type] $all: ...
261 function substituteCMarkers($all) {
262 switch($this->constantMode
) {
264 $all = str_replace('##'.$this->Cmarker
.'_B##', '<font color="green"><B>', $all);
265 $all = str_replace('##'.$this->Cmarker
.'_E##', '</b></font>', $all);
268 $all = str_replace('##'.$this->Cmarker
.'_B##', '<font color="green"><B>', $all);
269 $all = str_replace('##'.$this->Cmarker
.'_E##', '</b></font>', $all);
279 * Parses the constants in $this->const with respect to the constant-editor in this module.
280 * In particular comments in the code are registered and the edit_divider is taken into account.
284 function generateConfig_constants() {
285 // These vars are also set lateron...
286 $this->setup
['resources'] = $this->resources
;
287 $this->setup
['sitetitle'] = $this->sitetitle
;
290 $constants = t3lib_div
::makeInstance('t3lib_TSparser');
291 $constants->regComments
=1; // Register comments!
292 $constants->setup
= $this->const;
293 $constants->setup
= $this->mergeConstantsFromPageTSconfig($constants->setup
);
295 $matchObj = t3lib_div
::makeInstance('t3lib_matchCondition');
296 $matchObj->matchAll
=1; // Matches ALL conditions in TypoScript
299 $cc=count($this->constants
);
300 reset($this->constants
);
301 while (list(,$str)=each($this->constants
)) {
304 if (strstr($str,$this->edit_divider
)) {
305 $parts = explode($this->edit_divider
,$str,2);
307 $constants->parse($parts[0],$matchObj);
309 $this->flatSetup
= Array();
310 $this->flattenSetup($constants->setup
,'','');
311 $defaultConstants=$this->flatSetup
;
313 $constants->parse($str,$matchObj);
316 $this->flatSetup
= Array();
317 $this->flattenSetup($constants->setup
,'','');
318 $this->setup
['constants'] = $constants->setup
;
320 return $this->ext_compareFlatSetups($defaultConstants);
324 * [Describe function...]
326 * @param [type] $theSetup: ...
327 * @param [type] $theKey: ...
330 function ext_getSetup($theSetup,$theKey) {
331 $parts = explode('.',$theKey,2);
332 if (strcmp($parts[0],'') && is_array($theSetup[$parts[0].'.'])) {
333 if (strcmp(trim($parts[1]),'')) {
334 return $this->ext_getSetup($theSetup[$parts[0].'.'],trim($parts[1]));
336 return array($theSetup[$parts[0].'.'], $theSetup[$parts[0]]);
339 if (strcmp(trim($theKey),'')) {
340 return array(array(),$theSetup[$theKey]);
342 return array($theSetup,'');
348 * [Describe function...]
350 * @param [type] $arr: ...
351 * @param [type] $depth_in: ...
352 * @param [type] $depthData: ...
353 * @param [type] $parentType: ...
354 * @param [type] $parentValue: ...
355 * @param boolean $alphaSort sorts the array keys / tree by alphabet when set to 1
358 function ext_getObjTree($arr, $depth_in, $depthData, $parentType='',$parentValue='', $alphaSort='0') {
363 if($alphaSort == '1') {
367 $keyArr_alpha=array();
368 while (list($key,)=each($arr)) {
369 if (substr($key,-2)!='..') { // Don't do anything with comments / linenumber registrations...
370 $key=ereg_replace('\.$','',$key);
371 if (substr($key,-1)!='.') {
372 if (t3lib_div
::testInt($key)) {
373 $keyArr_num[$key]=$arr[$key];
375 $keyArr_alpha[$key]=$arr[$key];
381 $keyArr=$keyArr_num+
$keyArr_alpha;
384 if ($depth_in) {$depth_in = $depth_in.'.';}
386 while (list($key,)=each($keyArr)) {
388 $depth=$depth_in.$key;
389 if ($this->bType
!='const' ||
substr($depth,0,1)!='_') { // this excludes all constants starting with '_' from being shown.
390 $goto = substr(md5($depth),0,6);
391 $deeper = (is_array($arr[$key.'.']) && ($this->tsbrowser_depthKeys
[$depth] ||
$this->ext_expandAllNotes
)) ?
1 : 0;
393 $LN = ($a==$c)?
'blank':'line';
394 $BTM = ($a==$c)?
'bottom':'';
395 $PM = is_array($arr[$key.'.']) && !$this->ext_noPMicons ?
($deeper ?
'minus':'plus') : 'join';
398 $theIcon='<img src="'.$GLOBALS['BACK_PATH'].'gfx/ol/'.$PM.$BTM.'.gif" width="18" height="16" align="top" border="0" alt="" />';
402 $aHref='index.php?id='.$GLOBALS['SOBE']->id
.'&tsbr['.$depth.']='.($deeper?
0:1).'#'.$goto;
403 $HTML.='<a name="'.$goto.'" href="'.htmlspecialchars($aHref).'">'.$theIcon.'</a>';
407 if (t3lib_div
::inList('types,resources,sitetitle',$depth) && $this->bType
=='setup') { // Read only...
408 $label='<font color="#666666">'.$label.'</font>';
410 if ($this->linkObjects
) {
411 $aHref = 'index.php?id='.$GLOBALS['SOBE']->id
.'&sObj='.$depth;
412 if ($this->bType
!='const') {
413 $ln = is_array($arr[$key.'.ln..']) ?
'Defined in: '.$this->lineNumberToScript($arr[$key.'.ln..']) : 'N/A';
418 if ($this->tsbrowser_searchKeys
[$depth] & 4) { $label = '<b><font color="red">'.$label.'</font></b>'; } // The key has matched the search string
419 $label = '<a href="'.htmlspecialchars($aHref).'" title="'.htmlspecialchars($ln).'">'.$label.'</a>';
423 $HTML.='['.$label.']';
425 if (isset($arr[$key])) {
426 $theValue = $arr[$key];
427 if ($this->fixedLgd
) {
428 $imgBlocks = ceil(1+
strlen($depthData)/77);
429 $lgdChars = 68-ceil(strlen('['.$key.']')*0.8)-$imgBlocks*3;
430 $theValue = $this->ext_fixed_lgd($theValue,$lgdChars);
432 if ($this->tsbrowser_searchKeys
[$depth] & 2) { // The value has matched the search string
433 $HTML.=' = <b><font color="red">'.$this->makeHtmlspecialchars($theValue).'</font></b>';
435 $HTML.=' = <b>'.$this->makeHtmlspecialchars($theValue).'</b>';
437 if ($this->ext_regComments
&& isset($arr[$key.'..'])) {
438 $comment = $arr[$key.'..'];
439 if (!preg_match('/### <INCLUDE_TYPOSCRIPT:.*/', $comment)) { // Skip INCLUDE_TYPOSCRIPT comments, they are almost useless
440 $comment = preg_replace('/[\r\n]/', ' ', $comment); // Remove linebreaks, replace with ' '
441 $comment = preg_replace('/[#\*]{2,}/', '', $comment); // Remove # and * if more than twice in a row
442 $comment = preg_replace('/^[#\*\s]+/', '# ', $comment); // Replace leading # (just if it exists) and add it again. Result: Every comment should be prefixed by a '#'.
443 $HTML.= ' <span class="comment">'.trim($comment).'</span>';
450 $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);
458 * [Describe function...]
460 * @param [type] $lnArr: ...
463 function lineNumberToScript($lnArr) {
464 if (!is_array($this->lnToScript
)) {
465 $this->lnToScript
= array();
467 $c+
=substr_count($GLOBALS['TYPO3_CONF_VARS']['FE']['defaultTypoScript_setup'],chr(10))+
2;
468 $this->lnToScript
[$c] = '[Default]';
470 foreach($this->hierarchyInfoToRoot
as $info) {
471 $c+
=$info['configLines']+
1;
472 $this->lnToScript
[$c] = $info['title'];
476 foreach($lnArr as $k => $ln) {
477 foreach($this->lnToScript
as $endLn => $title) {
478 if ($endLn >= intval($ln)) {
479 $lnArr[$k] = '"'.$title.'", '.$ln;
485 return implode('; ',$lnArr);
489 * [Describe function...]
491 * @param [type] $theValue: ...
494 function makeHtmlspecialchars($theValue){
495 return $this->ext_noSpecialCharsOnLabels ?
$theValue : htmlspecialchars($theValue);
499 * [Describe function...]
501 * @param [type] $arr: ...
502 * @param [type] $depth_in: ...
503 * @param [type] $searchString: ...
504 * @param [type] $keyArray: ...
507 function ext_getSearchKeys($arr, $depth_in, $searchString, $keyArray) {
510 while (list($key,)=each($arr)) {
511 $key=ereg_replace('\.$','',$key);
512 if (substr($key,-1)!='.') {
518 if ($depth_in) { $depth_in = $depth_in.'.'; }
519 while (list($key,)=each($keyArr)) {
520 $depth=$depth_in.$key;
521 $deeper = is_array($arr[$key.'.']);
523 if ($this->regexMode
) {
524 if (ereg($searchString,$arr[$key])) { // The value has matched
525 $this->tsbrowser_searchKeys
[$depth]+
=2;
527 if (ereg($searchString,$key)) { // The key has matched
528 $this->tsbrowser_searchKeys
[$depth]+
=4;
530 if (ereg($searchString,$depth_in)) { // Just open this subtree if the parent key has matched the search
531 $this->tsbrowser_searchKeys
[$depth]=1;
534 if (stristr($arr[$key],$searchString)) { // The value has matched
535 $this->tsbrowser_searchKeys
[$depth]+
=2;
537 if (stristr($key,$searchString)) { // The key has matches
538 $this->tsbrowser_searchKeys
[$depth]+
=4;
540 if (stristr($depth_in,$searchString)) { // Just open this subtree if the parent key has matched the search
541 $this->tsbrowser_searchKeys
[$depth]=1;
546 $cS = count($this->tsbrowser_searchKeys
);
547 $keyArray = $this->ext_getSearchKeys($arr[$key.'.'], $depth, $searchString, $keyArray);
548 if ($cS != count($this->tsbrowser_searchKeys
)) {
557 * [Describe function...]
559 * @param [type] $pid: ...
562 function ext_getRootlineNumber($pid) {
563 if ($pid && is_array($GLOBALS['rootLine'])) {
564 reset($GLOBALS['rootLine']);
565 while(list($key,$val)=each($GLOBALS['rootLine'])) {
566 if ($val['uid']==$pid) return $key;
572 * [Describe function...]
574 * @param [type] $arr: ...
575 * @param [type] $depthData: ...
576 * @param [type] $keyArray: ...
577 * @param [type] $first: ...
580 function ext_getTemplateHierarchyArr($arr,$depthData, $keyArray,$first=0) {
583 while (list($key,)=each($arr)) {
584 $key=ereg_replace('\.$','',$key);
585 if (substr($key,-1)!='.') {
592 while (list($key,)=each($keyArr)) {
595 $deeper = is_array($arr[$key.'.']);
599 $LN = ($a==$c)?
'blank':'line';
600 $BTM = ($a==$c)?
'top':'';
604 $icon = substr($row['templateID'],0,3)=='sys' ? t3lib_iconWorks
::getIcon('sys_template',array('root'=>$row['root'])) :
605 (substr($row['templateID'],0,6)=='static' ? t3lib_iconWorks
::getIcon('static_template',array()) : 'gfx/i/default.gif');
606 $alttext= '['.$row['templateID'].']';
607 $alttext.= $row['pid'] ?
' - '.t3lib_BEfunc
::getRecordPath($row['pid'],$GLOBALS['SOBE']->perms_clause
,20) : '';
608 if (in_array($row['templateID'],$this->clearList_const
) ||
in_array($row['templateID'],$this->clearList_setup
)) {
609 $A_B='<a href="index.php?id='.$GLOBALS['SOBE']->id
.'&template='.$row['templateID'].'">';
615 $HTML.=($first?
'':'<IMG src="'.$GLOBALS['BACK_PATH'].'gfx/ol/'.$PM.$BTM.'.gif" width="18" height="16" align="top" border=0>').'<img ' . t3lib_iconWorks
::skinImg($GLOBALS['BACK_PATH'], $icon) . ' align="top" title="'.$alttext.'" /> '.$A_B.t3lib_div
::fixed_lgd_cs($row['title'],$GLOBALS['BE_USER']->uc
['titleLen']).$A_E.' ';
616 $RL = $this->ext_getRootlineNumber($row['pid']);
618 <td nowrap>'.$HTML.'</td>
619 <td align=center>'.($row['root']?
'<b>X</b>':'').' </td>
620 <td align=center'.$row['bgcolor_setup'].'>'.fw(($row['clConf']?
'<b>X</b>':'').' ').'</td>
621 <td align=center'.$row['bgcolor_const'].'>'.fw(($row['clConst']?
'<b>X</b>':'').' ').'</td>
622 <td>'.($row['pid']?
' '.$row['pid'].(strcmp($RL,'')?
' ('.$RL.')':'').' ':'').'</td>
623 <td>'.($row['next']?
' '.$row['next'].' ':'').'</td>
626 $keyArray = $this->ext_getTemplateHierarchyArr($arr[$key.'.'], $depthData.($first?
'':'<IMG src="'.$GLOBALS['BACK_PATH'].'gfx/ol/'.$LN.'.gif" width="18" height="16" align="top">'), $keyArray);
633 * [Describe function...]
635 * @param [type] $depthDataArr: ...
636 * @param [type] $pointer: ...
639 function ext_process_hierarchyInfo($depthDataArr,&$pointer) {
640 $parent = $this->hierarchyInfo
[$pointer-1]['templateParent'];
641 while ($pointer>0 && $this->hierarchyInfo
[$pointer-1]['templateParent']==$parent) {
643 $row = $this->hierarchyInfo
[$pointer];
645 $depthDataArr[$row['templateID']]=$row;
646 $depthDataArr[$row['templateID']]['bgcolor_setup'] = isset($this->clearList_setup_temp
[$row['templateID']])?
' class="bgColor5"':'';
647 $depthDataArr[$row['templateID']]['bgcolor_const'] = isset($this->clearList_const_temp
[$row['templateID']])?
' class="bgColor5"':'';
648 unset($this->clearList_setup_temp
[$row['templateID']]);
649 unset($this->clearList_const_temp
[$row['templateID']]);
650 $this->templateTitles
[$row['templateID']]=$row['title'];
652 if ($row['templateID']==$this->hierarchyInfo
[$pointer-1]['templateParent']) {
653 $depthDataArr[$row['templateID'].'.'] = $this->ext_process_hierarchyInfo(array(), $pointer);
656 return $depthDataArr;
660 * [Describe function...]
662 * @param [type] $config: ...
663 * @param [type] $lineNumbers: ...
664 * @param [type] $comments: ...
665 * @param [type] $crop: ...
666 * @param [type] $syntaxHL: ...
667 * @param [type] $syntaxHLBlockmode: ...
670 function ext_outputTS($config, $lineNumbers=0, $comments=0, $crop=0, $syntaxHL=0, $syntaxHLBlockmode=0) {
673 while (list(,$str)=each($config)) {
674 $all .= chr(10) .'[GLOBAL]' . chr(10) . $str;
678 $all = ereg_replace('^[^'.chr(10).']*.','',$all);
680 $tsparser = t3lib_div
::makeInstance('t3lib_TSparser');
681 $tsparser->lineNumberOffset
=$this->ext_lineNumberOffset+
1;
682 return $tsparser->doSyntaxHighlight($all,$lineNumbers?
array($this->ext_lineNumberOffset+
1):'',$syntaxHLBlockmode);
684 return $this->ext_formatTS($all,$lineNumbers,$comments,$crop);
689 * Returns a new string of max. $chars lenght
690 * If the string is longer, it will be truncated and prepended with '...'
691 * $chars must be an integer of at least 4
693 * @param [type] $string: ...
694 * @param [type] $chars: ...
697 function ext_fixed_lgd($string,$chars) {
699 if(strlen($string)>$chars) {
700 if(strlen($string)>24 && substr($string,0,12) == '##'.$this->Cmarker
.'_B##') {
701 return '##'.$this->Cmarker
.'_B##'.t3lib_div
::fixed_lgd_cs(substr($string,12,-12), $chars-3).'##'.$this->Cmarker
.'_E##';
703 return t3lib_div
::fixed_lgd_cs($string, $chars-3);
711 * [Describe function...]
713 * @param [type] $ln: ...
714 * @param [type] $str: ...
717 function ext_lnBreakPointWrap($ln,$str) {
718 return '<a href="#" onClick="return brPoint('.$ln.','.($this->ext_lineNumberOffset_mode
=="setup"?
1:0).');">'.$str.'</a>';
722 * [Describe function...]
724 * @param [type] $input: ...
725 * @param [type] $ln: ...
726 * @param [type] $comments: ...
727 * @param [type] $crop: ...
730 function ext_formatTS($input, $ln, $comments=1, $crop=0) {
731 $input = ereg_replace('^[^'.chr(10).']*.','',$input);
732 $input = chop($input);
733 $cArr = explode(chr(10),$input);
736 $n = ceil(log10(count($cArr)+
$this->ext_lineNumberOffset
));
738 while(list($k,$v)=each($cArr)) {
739 $lln=$k+
$this->ext_lineNumberOffset+
1;
740 if ($ln) $lineNum = $this->ext_lnBreakPointWrap($lln,str_replace(' ',' ',sprintf('% '.$n.'d',$lln))).': ';
741 $v=htmlspecialchars($v);
742 if ($crop) {$v=$this->ext_fixed_lgd($v,($ln?
71:77));}
743 $cArr[$k] = $lineNum.str_replace(' ',' ',$v);
745 $firstChar = substr(trim($v),0,1);
746 if ($firstChar=='[') {
747 $cArr[$k] = '<font color="green"><b>'.$cArr[$k].'</b></font>';
748 } elseif ($firstChar=='/' ||
$firstChar=='#') {
750 $cArr[$k] = '<span class="typo3-dimmed">'.$cArr[$k].'</span>';
758 $output = implode($cArr, '<br />').'<br />';
763 * [Describe function...]
765 * @param [type] $id: ...
766 * @param [type] $template_uid: ...
769 function ext_getFirstTemplate($id,$template_uid=0) {
770 // Query is taken from the runThroughTemplates($theRootLine) function in the parent class.
773 $addC = ' AND uid='.$template_uid;
775 $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery('*', 'sys_template', 'pid='.intval($id).$addC.' '.$this->whereClause
, '', 'sorting', '1');
776 $row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res);
777 t3lib_BEfunc
::workspaceOL('sys_template',$row);
778 $GLOBALS['TYPO3_DB']->sql_free_result($res);
779 return $row; // Returns the template row if found.
784 * [Describe function...]
786 * @param [type] $id: ...
789 function ext_getAllTemplates($id) {
790 // Query is taken from the runThroughTemplates($theRootLine) function in the parent class.
793 $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery('*', 'sys_template', 'pid='.intval($id).' '.$this->whereClause
, '', 'sorting');
794 while($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res)) {
795 t3lib_BEfunc
::workspaceOL('sys_template',$row);
796 if (is_array($row)) $outRes[] = $row;
798 $GLOBALS['TYPO3_DB']->sql_free_result($res);
799 return $outRes; // Returns the template rows in an array.
804 * This function compares the flattened constants (default and all).
805 * Returns an array with the constants from the whole template which may be edited by the module.
807 * @param [type] $default: ...
810 function ext_compareFlatSetups($default) {
811 $editableComments=array();
812 reset($this->flatSetup
);
813 while(list($const,$value)=each($this->flatSetup
)) {
814 if (substr($const,-2)!='..' && isset($this->flatSetup
[$const.'..'])) {
815 $comment = trim($this->flatSetup
[$const.'..']);
816 $c_arr = explode(chr(10),$comment);
817 while(list($k,$v)=each($c_arr)) {
818 $line=trim(ereg_replace('^[#\/]*','',$v));
820 $parts = explode(';', $line);
821 while(list(,$par)=each($parts)) {
822 if (strstr($par,'=')) {
823 $keyValPair =explode('=',$par,2);
824 switch(trim(strtolower($keyValPair[0]))) {
828 int (range; low-high, list: item,item,item = selector),
835 $editableComments[$const]['type'] = trim($keyValPair[1]);
838 // list of categories.
839 $catSplit=explode('/',strtolower($keyValPair[1]));
840 $editableComments[$const]['cat'] = trim($catSplit[0]);
841 $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.
842 if ($catSplit[1] && isset($this->subCategories
[$catSplit[1]])) {
843 $editableComments[$const]['subcat_name']=$catSplit[1];
844 $editableComments[$const]['subcat']=$this->subCategories
[$catSplit[1]][1].'/'.$catSplit[1].'/'.trim($catSplit[2]).'z';
846 $editableComments[$const]['subcat']='x'.'/'.trim($catSplit[2]).'z';
851 $editableComments[$const]['label'] = trim($keyValPair[1]);
859 if (isset($editableComments[$const])) {
860 $editableComments[$const]['name']=$const;
861 $editableComments[$const]['value']=trim($value);
862 if (isset($default[$const])) {
863 $editableComments[$const]['default_value']=trim($default[$const]);
867 return $editableComments;
871 * [Describe function...]
873 * @param [type] $editConstArray: ...
876 function ext_categorizeEditableConstants($editConstArray) {
877 // Runs through the available constants and fills the $this->categories array with pointers and priority-info
878 reset($editConstArray);
879 while(list($constName,$constData)=each($editConstArray)) {
880 if (!$constData['type']) {
881 $constData['type']='string';
883 $cats = explode(',',$constData['cat']);
885 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...
886 $theCat=trim($theCat);
888 $this->categories
[$theCat][$constName]=$constData['subcat'];
895 * [Describe function...]
899 function ext_getCategoryLabelArray() {
900 // Returns array used for labels in the menu.
902 while(list($k,$v)=each($this->categories
)) {
904 $retArr[$k]=strtoupper($k).' ('.count($v).')';
911 * [Describe function...]
913 * @param [type] $type: ...
916 function ext_getTypeData($type) {
920 $retArr['type']='string';
922 $m=strcspn ($type,' [');
923 $retArr['type']=strtolower(substr($type,0,$m));
924 if (t3lib_div
::inList('int,options,file,boolean,offset,user', $retArr['type'])) {
925 $p=trim(substr($type,$m));
927 ereg('\[(.*)\]',$p,$reg);
930 $retArr['paramstr']=$p;
931 switch($retArr['type']) {
933 if (substr($retArr['paramstr'],0,1)=='-') {
934 $retArr['params']=t3lib_div
::intExplode('-',substr($retArr['paramstr'],1));
935 $retArr['params'][0]=intval('-'.$retArr['params'][0]);
937 $retArr['params']=t3lib_div
::intExplode('-',$retArr['paramstr']);
939 $retArr['paramstr']=$retArr['params'][0].' - '.$retArr['params'][1];
942 $retArr['params']=explode(',',$retArr['paramstr']);
952 * [Describe function...]
954 * @param [type] $category: ...
957 function ext_getTSCE_config($category) {
958 $catConf=$this->setup
['constants']['TSConstantEditor.'][$category.'.'];
960 if (is_array($catConf)) {
962 while(list($key,$val)=each($catConf)) {
965 $out['imagetag'] = $this->ext_getTSCE_config_image($catConf['image']);
973 if (t3lib_div
::testInt($key)) {
974 $constRefs = explode(',',$val);
976 while(list(,$const)=each($constRefs)) {
978 if ($const && $const<=20) {
979 $out['constants'][$const].=$this->ext_getKeyImage($key);
987 $this->helpConfig
=$out;
991 * [Describe function...]
993 * @param [type] $key: ...
996 function ext_getKeyImage($key) {
997 return '<img src="'.$this->ext_localWebGfxPrefix
.'gfx/'.$key.'.gif" align="top" hspace=2>';
1001 * [Describe function...]
1003 * @param [type] $imgConf: ...
1004 * @return [type] ...
1006 function ext_getTSCE_config_image($imgConf) {
1007 if (substr($imgConf,0,4)=='gfx/') {
1008 $iFile=$this->ext_localGfxPrefix
.$imgConf;
1009 $tFile=$this->ext_localWebGfxPrefix
.$imgConf;
1010 } elseif (substr($imgConf,0,4)=='EXT:') {
1011 $iFile = t3lib_div
::getFileAbsFileName($imgConf);
1013 $f = substr($iFile,strlen(PATH_site
));
1014 $tFile=$GLOBALS['BACK_PATH'].'../'.$f;
1017 $f = 'uploads/tf/'.$this->extractFromResources($this->setup
['resources'],$imgConf);
1018 $iFile=PATH_site
.$f;
1019 $tFile=$GLOBALS['BACK_PATH'].'../'.$f;
1021 $imageInfo=@getImagesize
($iFile);
1022 return '<img src="'.$tFile.'" '.$imageInfo[3].'>';
1026 * [Describe function...]
1028 * @return [type] ...
1030 function ext_resourceDims() {
1031 if ($this->setup
['resources']) {
1032 $rArr=explode(',',$this->setup
['resources']);
1033 while(list($c,$val)=each($rArr)) {
1035 $theFile = PATH_site
.'uploads/tf/'.$val;
1036 if ($val && @is_file
($theFile)) {
1037 $imgInfo = @getimagesize
($theFile);
1039 if (is_array($imgInfo)) {
1040 $this->resourceDimensions
[$val]=' ('.$imgInfo[0].'x'.$imgInfo[1].')';
1044 reset($this->dirResources
);
1045 while(list($c,$val)=each($this->dirResources
)) {
1047 $imgInfo = @getimagesize
(PATH_site
.$val);
1048 if (is_array($imgInfo)) {
1049 $this->resourceDimensions
[$val]=' ('.$imgInfo[0].'x'.$imgInfo[1].')';
1055 * [Describe function...]
1057 * @param [type] $path: ...
1058 * @return [type] ...
1060 function ext_readDirResources($path) {
1062 if ($path && substr($path,0,10)=='fileadmin/') {
1063 $path = ereg_replace('\/$','',$path);
1064 $this->readDirectory(PATH_site
.$path);
1069 * [Describe function...]
1071 * @param [type] $path: ...
1072 * @param [type] $type: ...
1073 * @return [type] ...
1075 function readDirectory($path,$type='file') {
1076 if(@is_dir
($path)) {
1079 if (is_object($d)) {
1080 while($entry=$d->read()) {
1081 if ($entry!='.' && $entry!='..') {
1082 $wholePath = $path.'/'.$entry; // Because of odd PHP-error where <BR>-tag is sometimes placed after a filename!!
1083 if (@file_exists
($wholePath) && (!$type ||
filetype($wholePath)==$type)) {
1084 $fI = t3lib_div
::split_fileref($wholePath);
1085 $this->dirResources
[]=substr($wholePath,strlen(PATH_site
));
1095 * [Describe function...]
1097 * @param [type] $params: ...
1098 * @return [type] ...
1100 function ext_fNandV($params) {
1101 $fN='data['.$params['name'].']';
1102 $fV=$params['value'];
1103 if (ereg('^{[\$][a-zA-Z0-9\.]*}$',trim($fV),$reg)) { // Values entered from the constantsedit cannot be constants! 230502; removed \{ and set {
1106 $fV=htmlspecialchars($fV);
1108 return array($fN,$fV,$params);
1112 * This functions returns the HTML-code that creates the editor-layout of the module.
1114 * @param [type] $theConstants: ...
1115 * @param [type] $category: ...
1116 * @return [type] ...
1118 function ext_printFields($theConstants,$category) {
1119 reset($theConstants);
1120 $output='<script type="text/javascript" src="'.$GLOBALS['BACK_PATH'].'js/constantEditor.js"></script>
1123 if (is_array($this->categories
[$category])) {
1125 $help=$this->helpConfig
;
1126 $this->rArr
=explode(',',$this->setup
['resources'].','.implode($this->dirResources
,','));
1128 if (!$this->doNotSortCategoriesBeforeMakingForm
) asort($this->categories
[$category]);
1129 while(list($name,$type)=each($this->categories
[$category])) {
1130 $params = $theConstants[$name];
1131 if (is_array($params)) {
1132 if ($subcat!=$params['subcat_name']) {
1133 $subcat=$params['subcat_name'];
1134 $subcat_name = $params['subcat_name'] ?
$this->subCategories
[$params['subcat_name']][0] : 'Others';
1136 $output.='<h2 class="typo3-tstemplate-ceditor-subcat">'.$subcat_name.'</h2>';
1139 $label=$GLOBALS['LANG']->sL($params['label']);
1140 $label_parts = explode(':',$label,2);
1141 if (count($label_parts)==2) {
1142 $head=trim($label_parts[0]);
1143 $body=trim($label_parts[1]);
1145 $head=trim($label_parts[0]);
1148 if (strlen($head)>35) {
1149 if (!$body) {$body=$head;}
1150 $head=t3lib_div
::fixed_lgd_cs($head,35);
1152 $typeDat=$this->ext_getTypeData($params['type']);
1155 $raname = substr(md5($params['name']),0,10);
1156 $aname='\''.$raname.'\'';
1158 list($fN,$fV,$params)=$this->ext_fNandV($params);
1160 switch($typeDat['type']) {
1163 $p_field='<input id="'.$fN.'" type="text" name="'.$fN.'" value="'.$fV.'"'.$GLOBALS['TBE_TEMPLATE']->formWidth(5).' onChange="uFormUrl('.$aname.')" />';
1164 if ($typeDat['paramstr']) {
1165 $p_field.=' Range: '.$typeDat['paramstr'];
1166 } elseif ($typeDat['type']=='int+') {
1167 $p_field.=' Range: 0 - ';
1169 $p_field.=' (Integer)';
1173 $colorNames=explode(',',','.$this->HTMLcolorList
);
1175 while(list(,$val)=each($colorNames)) {
1177 if ($val==strtolower($params['value'])) {
1180 $p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$val.'</option>';
1182 $p_field='<select id="select-'.$fN.'" rel="'.$fN.'" name="C'.$fN.'" class="typo3-tstemplate-ceditor-color-select" onChange="uFormUrl('.$aname.');">'.$p_field.'</select>';
1184 $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.')" />';
1187 $wArr = explode('|',$fV);
1188 $p_field='<input type="text" id="'.$fN.'" name="'.$fN.'" value="'.$wArr[0].'"'.$GLOBALS['TBE_TEMPLATE']->formWidth(29).' onChange="uFormUrl('.$aname.')" />';
1190 $p_field.='<input type="text" name="W'.$fN.'" value="'.$wArr[1].'"'.$GLOBALS['TBE_TEMPLATE']->formWidth(15).' onChange="uFormUrl('.$aname.')" />';
1193 $wArr = explode(',',$fV);
1194 $labels = t3lib_div
::trimExplode(',',$typeDat['paramstr']);
1195 $p_field=($labels[0]?
$labels[0]:'x').':<input type="text" name="'.$fN.'" value="'.$wArr[0].'"'.$GLOBALS['TBE_TEMPLATE']->formWidth(4).' onChange="uFormUrl('.$aname.')" />';
1197 $p_field.=($labels[1]?
$labels[1]:'y').':<input type="text" name="W'.$fN.'" value="'.$wArr[1].'"'.$GLOBALS['TBE_TEMPLATE']->formWidth(4).' onChange="uFormUrl('.$aname.')" />';
1198 for ($aa=2;$aa<count($labels);$aa++
) {
1200 $p_field.=' , '.$labels[$aa].':<input type="text" name="W'.$aa.$fN.'" value="'.$wArr[$aa].'"'.$GLOBALS['TBE_TEMPLATE']->formWidth(4).' onChange="uFormUrl('.$aname.')" />';
1202 $p_field.='<input type="hidden" name="W'.$aa.$fN.'" value="'.$wArr[$aa].'" />';
1207 if (is_array($typeDat['params'])) {
1209 while(list(,$val)=each($typeDat['params'])) {
1210 $vParts = explode('=',$val,2);
1211 $label = $vParts[0];
1212 $val = isset($vParts[1]) ?
$vParts[1] : $vParts[0];
1216 if ($val==$params['value']) {
1219 $p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$GLOBALS['LANG']->sL($label).'</option>';
1221 $p_field='<select id="'.$fN.'" name="'.$fN.'" onChange="uFormUrl('.$aname.')">'.$p_field.'</select>';
1225 $p_field='<input type="hidden" name="'.$fN.'" value="0" />';
1230 $p_field.='<input id="'.$fN.'" type="checkbox" name="'.$fN.'" value="'.($typeDat['paramstr']?
$typeDat['paramstr']:1).'"'.$sel.' onClick="uFormUrl('.$aname.')" />';
1233 $p_field='<input type="hidden" name="'.$fN.'" value="#" />';
1238 $p_field.='<input id="'.$fN.'" type="checkbox" name="'.$fN.'" value=""'.$sel.' onClick="uFormUrl('.$aname.')" />';
1241 $p_field='<option value=""></option>';
1243 $selectThisFile = $this->extractFromResources($this->setup
['resources'],$params['value']);
1244 if ($params['value'] && !$selectThisFile) {
1245 if (in_array($params['value'],$this->dirResources
)) {
1246 $selectThisFile=$params['value'];
1250 $extList = $typeDat['paramstr'];
1251 $p_field='<option value="">('.$extList.')</option>';
1252 if ($extList=='IMAGE_EXT') {
1253 $extList = $GLOBALS['TYPO3_CONF_VARS']['GFX']['imagefile_ext'];
1256 $onlineResourceFlag=$this->ext_defaultOnlineResourceFlag
;
1258 while(list($c,$val)=each($this->rArr
)) {
1260 $fI=t3lib_div
::split_fileref($val);
1261 if ($val && (!$extList || t3lib_div
::inList($extList,$fI['fileext']))) {
1262 if ($onlineResourceFlag<=0 && substr($fI['path'],0,10)=='fileadmin/') {
1263 if ($onlineResourceFlag<0) {
1264 $p_field.='<option value=""></option>';
1266 $p_field.='<option value="">__'.$fI['path'].'__:</option>';
1267 $onlineResourceFlag=1;
1269 $dims=$this->resourceDimensions
[$val];
1272 // Check if $params['value'] is in the list of resources.
1273 if ($selectThisFile && $selectThisFile==$val) {
1275 if ($onlineResourceFlag<=0) {
1276 $theImage=t3lib_BEfunc
::thumbCode(array('resources'=>$selectThisFile),'sys_template','resources',$GLOBALS['BACK_PATH'],'');
1278 $theImage=t3lib_BEfunc
::thumbCode(array('resources'=>$fI['file']),'sys_template','resources',$GLOBALS['BACK_PATH'],'',$fI['path']);
1282 if ($onlineResourceFlag<=0) {
1283 $onlineResourceFlag--;
1284 // Value is set with a *
1285 $val = $this->ext_setStar($val);
1286 $p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$val.$dims.'</option>';
1288 $p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$fI['file'].$dims.'</option>';
1293 if (trim($params['value']) && !$selectThisFile) {
1294 $val = $params['value'];
1295 $p_field.='<option value=""></option>';
1296 $p_field.='<option value="'.htmlspecialchars($val).'" selected>'.$val.'</option>';
1299 $p_field='<select id="'.$fN.'" name="'.$fN.'" onChange="uFormUrl('.$aname.')">'.$p_field.'</select>';
1300 $p_field.=$theImage;
1302 if (!$this->ext_noCEUploadAndCopying
) {
1304 $copyFile = $this->extractFromResources($this->setup
['resources'],$params['value']);
1306 if ($params['value']) {
1307 $copyFile=PATH_site
.$this->ext_detectAndFixExtensionPrefix($params['value']);
1313 if ($copyFile && @is_file
($copyFile)) {
1314 $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'])).'\'));}" />';
1319 $p_field.='<input id="'.$fN.'" type="file" name="upload_'.$fN.'"'.$GLOBALS['TBE_TEMPLATE']->formWidth().' onChange="uFormUrl('.$aname.')" size="50" />';
1323 $userFunction = $typeDat['paramstr'];
1324 $userFunctionParams = array('fieldName' => $fN, 'fieldValue' => $fV);
1325 $p_field = t3lib_div
::callUserFunction($userFunction, $userFunctionParams, $this, '');
1329 $fwidth= $typeDat['type']=='small' ?
10 : 46;
1330 $p_field='<input id="'.$fN.'" type="text" name="'.$fN.'" value="'.$fV.'"'.$GLOBALS['TBE_TEMPLATE']->formWidth($fwidth).' onChange="uFormUrl('.$aname.')" />';
1334 // Define default names and IDs
1335 $userTyposcriptID = 'userTS-'.$params['name'];
1336 $defaultTyposcriptID = 'defaultTS-'.$params['name'];
1337 $checkboxName = 'check['.$params['name'].']';
1338 $checkboxID = $checkboxName;
1340 // Handle type=color specially
1341 if ($typeDat['type']=='color' && substr($params['value'],0,2)!='{$') {
1342 $color = '<div id="colorbox-'.$fN.'" class="typo3-tstemplate-ceditor-colorblock" style="background-color:'.$params['value'].';"> </div>';
1347 if (!$this->ext_dontCheckIssetValues
) {
1349 /* Set the default styling options */
1350 if(isset($this->objReg
[$params['name']])) {
1351 $checkboxValue = 'checked';
1352 $userTyposcriptStyle = '';
1353 $defaultTyposcriptStyle = 'style="display:none;"';
1355 $checkboxValue = '';
1356 $userTyposcriptStyle = 'style="display:none;"';
1357 $defaultTyposcriptStyle = '';
1361 $deleteIconHTML = '<img class="typo3-tstemplate-ceditor-control undoIcon" '.t3lib_iconWorks
::skinImg($GLOBALS['BACK_PATH'], 'gfx/undo.gif').' alt="Revert to default Constant" title="Revert to default Constant" rel="'.$params['name'].'" />';
1362 $editIconHTML = '<img class="typo3-tstemplate-ceditor-control editIcon" '.t3lib_iconWorks
::skinImg($GLOBALS['BACK_PATH'], 'gfx/edit2.gif').' alt="Edit this Constant" title="Edit this Constant" rel="'.$params['name'].'" />';
1363 $constantCheckbox = '<input type="hidden" name="'.$checkboxName.'" id="'.$checkboxID.'" value="'.$checkboxValue.'"/>';
1365 // If there's no default value for the field, use a static label.
1366 if(!$params['default_value']) {
1367 $params['default_value'] = '[Empty]';
1370 $constantDefaultRow='<div class="typo3-tstemplate-ceditor-row" id="'.$defaultTyposcriptID.'" '.$defaultTyposcriptStyle.'>'.$editIconHTML.htmlspecialchars($params['default_value']).$color.'</div>';
1373 $constantEditRow = '<div class="typo3-tstemplate-ceditor-row" id="'.$userTyposcriptID.'" '.$userTyposcriptStyle.'>'.$deleteIconHTML.$p_field.$color.'</div>';
1375 $constantLabel = '<dt class="typo3-tstemplate-ceditor-label">'.htmlspecialchars($head).'</dt>';
1376 $constantName = '<dt class="typo3-dimmed">['.$params['name'].']</dt>';
1377 $constantDescription = $body ?
'<dd>'.htmlspecialchars($body).'</dd>' : '';
1378 $constantData = '<dd>'.$constantCheckbox.$constantEditRow.$constantDefaultRow.'</dd>';
1380 $output.='<a name="'.$raname.'"></a>'.$help['constants'][$params['name']];
1381 $output.='<dl class="typo3-tstemplate-ceditor-constant">'.$constantLabel.$constantName.$constantDescription.$constantData.'</dl>';
1383 debug('Error. Constant did not exist. Should not happen.');
1401 /***************************
1403 * Processing input values
1405 ***************************/
1408 * @param [type] $constants: ...
1409 * @return [type] ...
1411 function ext_regObjectPositions($constants) {
1412 // 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
1413 $this->raw
= explode(chr(10),$constants);
1416 $this->objReg
=array(); // resetting the objReg if the divider is found!!
1417 $this->ext_regObjects('');
1421 * [Describe function...]
1423 * @param [type] $pre: ...
1424 * @return [type] ...
1426 function ext_regObjects($pre) {
1427 // works with regObjectPositions. "expands" the names of the TypoScript objects
1428 while (isset($this->raw
[$this->rawP
])) {
1429 $line = ltrim($this->raw
[$this->rawP
]);
1430 if (strstr($line,$this->edit_divider
)) {
1431 $this->objReg
=array(); // resetting the objReg if the divider is found!!
1435 if (substr($line,0,1)=='[') {
1437 } elseif (strcspn($line,'}#/')!=0) {
1438 $varL = strcspn($line,' {=<');
1439 $var=substr($line,0,$varL);
1440 $line = ltrim(substr($line,$varL));
1441 switch(substr($line,0,1)) {
1443 $this->objReg
[$pre.$var]=$this->rawP
-1;
1446 $this->ext_inBrace++
;
1447 $this->ext_regObjects($pre.$var.'.');
1450 $this->lastComment
='';
1451 } elseif (substr($line,0,1)=='}') {
1452 $this->lastComment
='';
1453 $this->ext_inBrace
--;
1454 if ($this->ext_inBrace
<0) {
1455 $this->ext_inBrace
=0;
1465 * [Describe function...]
1467 * @param [type] $key: ...
1468 * @param [type] $var: ...
1469 * @return [type] ...
1471 function ext_putValueInConf($key, $var) {
1472 // Puts the value $var to the TypoScript value $key in the current lines of the templates.
1473 // If the $key is not found in the template constants field, a new line is inserted in the bottom.
1474 $theValue = ' '.trim($var);
1475 if (isset($this->objReg
[$key])) {
1476 $lineNum = $this->objReg
[$key];
1477 $parts = explode('=',$this->raw
[$lineNum],2);
1478 if (count($parts)==2) {
1479 $parts[1]= $theValue;
1481 $this->raw
[$lineNum]=implode($parts,'=');
1483 $this->raw
[]=$key.' ='.$theValue;
1489 * [Describe function...]
1491 * @param [type] $key: ...
1492 * @return [type] ...
1494 function ext_removeValueInConf($key) {
1495 // Removes the value in the configuration
1496 if (isset($this->objReg
[$key])) {
1497 $lineNum = $this->objReg
[$key];
1498 unset($this->raw
[$lineNum]);
1504 * [Describe function...]
1506 * @param [type] $arr: ...
1507 * @param [type] $settings: ...
1508 * @return [type] ...
1510 function ext_depthKeys($arr,$settings) {
1513 while(list($theK,$theV)=each($arr)) {
1514 $theKeyParts = explode('.',$theK);
1516 $c=count($theKeyParts);
1518 while(list(,$p)=each($theKeyParts)) {
1520 $depth.=($depth?
'.':'').$p;
1521 $tsbrArray[$depth]= ($c==$a) ?
$theV : 1;
1526 while(list($theK,$theV)=each($tsbrArray)) {
1528 $settings[$theK] = 1;
1530 unset($settings[$theK]);
1537 * [Describe function...]
1539 * @param [type] $http_post_vars: ...
1540 * @param [type] $http_post_files: ...
1541 * @param [type] $theConstants: ...
1542 * @param [type] $tplRow: ...
1543 * @return [type] ...
1545 function ext_procesInput($http_post_vars,$http_post_files,$theConstants,$tplRow) {
1546 $data=$http_post_vars['data'];
1547 $check=$http_post_vars['check'];
1548 $copyResource=$http_post_vars['_copyResource'];
1549 $Wdata=$http_post_vars['Wdata'];
1550 $W2data=$http_post_vars['W2data'];
1551 $W3data=$http_post_vars['W3data'];
1552 $W4data=$http_post_vars['W4data'];
1553 $W5data=$http_post_vars['W5data'];
1555 if (is_array($data)) {
1557 while(list($key,$var)=each($data)) {
1558 if (isset($theConstants[$key])) {
1559 if ($this->ext_dontCheckIssetValues ||
isset($check[$key])) { // If checkbox is set, update the value
1560 list($var) = explode(chr(10),$var); // exploding with linebreak, just to make sure that no multiline input is given!
1561 $typeDat=$this->ext_getTypeData($theConstants[$key]['type']);
1562 switch($typeDat['type']) {
1564 if ($typeDat['paramstr']) {
1565 $var=t3lib_div
::intInRange($var,$typeDat['params'][0],$typeDat['params'][1]);
1571 $var = max(0, intval($var));
1575 if($var && !t3lib_div
::inList($this->HTMLcolorList
,strtolower($var))) {
1576 $var = ereg_replace('[^A-Fa-f0-9]*','',$var);
1577 $useFullHex = strlen($var) > 3;
1579 $col[]=HexDec(substr($var,0,1));
1580 $col[]=HexDec(substr($var,1,1));
1581 $col[]=HexDec(substr($var,2,1));
1584 $col[]=HexDec(substr($var,3,1));
1585 $col[]=HexDec(substr($var,4,1));
1586 $col[]=HexDec(substr($var,5,1));
1589 $var = substr('0'.DecHex($col[0]),-1).substr('0'.DecHex($col[1]),-1).substr('0'.DecHex($col[2]),-1);
1591 $var .= substr('0'.DecHex($col[3]),-1).substr('0'.DecHex($col[4]),-1).substr('0'.DecHex($col[5]),-1);
1594 $var = '#'.strtoupper($var);
1605 if (isset($Wdata[$key])) {
1606 $var.='|'.$Wdata[$key];
1610 if (isset($Wdata[$key])) {
1611 $var=intval($var).','.intval($Wdata[$key]);
1612 if (isset($W2data[$key])) {
1613 $var.=','.intval($W2data[$key]);
1614 if (isset($W3data[$key])) {
1615 $var.=','.intval($W3data[$key]);
1616 if (isset($W4data[$key])) {
1617 $var.=','.intval($W4data[$key]);
1618 if (isset($W5data[$key])) {
1619 $var.=','.intval($W5data[$key]);
1628 $var = $typeDat['paramstr'] ?
$typeDat['paramstr'] : 1;
1632 if (!$this->ext_noCEUploadAndCopying
) {
1633 if ($http_post_files['upload_data']['name'][$key] && $http_post_files['upload_data']['tmp_name'][$key]!='none') {
1634 $var = $this->upload_copy_file(
1637 trim($http_post_files['upload_data']['name'][$key]),
1638 $http_post_files['upload_data']['tmp_name'][$key]
1641 if ($copyResource[$key]) {
1642 $var = $this->upload_copy_file(
1645 basename($copyResource[$key]),
1652 if ($this->ext_printAll ||
strcmp($theConstants[$key]['value'],$var)) {
1653 $this->ext_putValueInConf($key, $var); // Put value in, if changed.
1655 unset($check[$key]); // Remove the entry because it has been "used"
1657 $this->ext_removeValueInConf($key);
1662 // 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...
1663 if (!$this->ext_dontCheckIssetValues
&& is_array($check)) {
1665 while(list($key,$var)=each($check)) {
1666 if (isset($theConstants[$key])) {
1667 $dValue = $theConstants[$key]['default_value'];
1668 $this->ext_putValueInConf($key, $dValue);
1675 * [Describe function...]
1677 * @param [type] $typeDat: ...
1678 * @param [type] $tplRow: ...
1679 * @param [type] $theRealFileName: ...
1680 * @param [type] $tmp_name: ...
1681 * @return [type] ...
1683 function upload_copy_file($typeDat,&$tplRow,$theRealFileName,$tmp_name) {
1686 $extList = $typeDat['paramstr'];
1687 if ($extList=='IMAGE_EXT') {
1688 $extList = $GLOBALS['TYPO3_CONF_VARS']['GFX']['imagefile_ext'];
1690 $fI=t3lib_div
::split_fileref($theRealFileName);
1691 if ($theRealFileName && (!$extList || t3lib_div
::inList($extList,$fI['fileext']))) {
1692 $tmp_upload_name = t3lib_div
::upload_to_tempfile($tmp_name); // If there is an uploaded file, move it for the sake of safe_mode.
1695 $alternativeFileName=array();
1696 $alternativeFileName[$tmp_upload_name] = $theRealFileName;
1697 // Making list of resources
1698 $resList = $tplRow['resources'];
1699 $resList = $tmp_upload_name.','.$resList;
1700 $resList=implode(t3lib_div
::trimExplode(',',$resList,1),',');
1701 // Making data-array
1702 $saveId = $tplRow['_ORIG_uid'] ?
$tplRow['_ORIG_uid'] : $tplRow['uid'];
1705 $recData['sys_template'][$saveId]['resources'] = $resList;
1707 $tce = t3lib_div
::makeInstance('t3lib_TCEmain');
1708 $tce->stripslashes_values
=0;
1709 $tce->alternativeFileName
= $alternativeFileName;
1710 $tce->start($recData,Array());
1711 $tce->process_datamap();
1713 t3lib_div
::unlink_tempfile($tmp_upload_name);
1715 $tmpRow = t3lib_BEfunc
::getRecordWSOL('sys_template',$saveId,'resources');
1717 $tplRow['resources'] = $tmpRow['resources'];
1719 // Setting the value
1720 $var = $this->ext_setStar($theRealFileName);
1726 * [Describe function...]
1728 * @param [type] $id: ...
1729 * @param [type] $perms_clause: ...
1730 * @return [type] ...
1732 function ext_prevPageWithTemplate($id,$perms_clause) {
1733 $rootLine = t3lib_BEfunc
::BEgetRootLine($id,$perms_clause?
' AND '.$perms_clause:'');
1735 while(list(,$p)=each($rootLine)) {
1736 if ($this->ext_getFirstTemplate($p['uid'])) {
1743 * [Describe function...]
1745 * @param [type] $val: ...
1746 * @return [type] ...
1748 function ext_setStar($val) {
1749 $fParts = explode('.',strrev($val),2);
1750 $val=ereg_replace('_[0-9][0-9]$','',strrev($fParts[1])).'*.'.strrev($fParts[0]);
1755 * [Describe function...]
1757 * @param [type] $value: ...
1758 * @return [type] ...
1760 function ext_detectAndFixExtensionPrefix($value) {
1761 if (substr($value,0,4)=='EXT:') {
1762 $parts = explode('/',substr($value,4),2);
1764 $extPath = t3lib_extMgm
::siteRelPath($parts[0]);
1765 $value = $extPath.$parts[1];
1774 if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE
]['XCLASS']['t3lib/class.t3lib_tsparser_ext.php']) {
1775 include_once($TYPO3_CONF_VARS[TYPO3_MODE
]['XCLASS']['t3lib/class.t3lib_tsparser_ext.php']);