projects / Packages / TYPO3.CMS.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
*** empty log message ***
[Packages/TYPO3.CMS.git] / t3lib / class.t3lib_tsparser_ext.php
1 <?php
2 /***************************************************************
3 * Copyright notice
4 *
5 * (c) 1999-2005 Kasper Skaarhoj (kasperYYYY@typo3.com)
6 * All rights reserved
7 *
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.
13 *
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.
18 *
19 *
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.
24 *
25 * This copyright notice MUST APPEAR in all copies of the script!
26 ***************************************************************/
27 /**
28 * TSParser extension class to t3lib_TStemplate
29 *
30 * $Id$
31 * Contains functions for the TS module in TYPO3 backend
32 *
33 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
34 */
35 /**
36 * [CLASS/FUNCTION INDEX of SCRIPT]
37 *
38 *
39 *
40 * 104: class t3lib_tsparser_ext extends t3lib_TStemplate
41 * 193: function flattenSetup($setupArray, $prefix, $resourceFlag)
42 * 220: function substituteConstants($all)
43 * 249: function substituteCMarkers($all)
44 * 271: function generateConfig_constants()
45 * 320: function ext_getSetup($theSetup,$theKey)
46 * 351: function ext_getObjTree($arr, $depth_in, $depthData, $parentType="",$parentValue="")
47 * 446: function lineNumberToScript($lnArr)
48 * 477: function makeHtmlspecialchars($theValue)
49 * 490: function ext_getSearchKeys($arr, $depth_in, $searchString, $keyArray)
50 * 530: function ext_getRootlineNumber($pid)
51 * 548: function ext_getTemplateHierarchyArr($arr,$depthData, $keyArray,$first=0)
52 * 607: function ext_process_hierarchyInfo($depthDataArr,&$pointer)
53 * 638: function ext_outputTS($config, $lineNumbers=0, $comments=0, $crop=0, $syntaxHL=0, $syntaxHLBlockmode=0)
54 * 665: function ext_fixed_lgd($string,$chars)
55 * 681: function ext_lnBreakPointWrap($ln,$str)
56 * 694: function ext_formatTS($input, $ln, $comments=1, $crop=0)
57 * 733: function ext_getFirstTemplate($id,$template_uid=0)
58 * 752: function ext_getAllTemplates($id)
59 * 772: function ext_compareFlatSetups($default)
60 * 838: function ext_categorizeEditableConstants($editConstArray)
61 * 861: function ext_getCategoryLabelArray()
62 * 878: function ext_getTypeData($type)
63 * 919: function ext_getTSCE_config($category)
64 * 958: function ext_getKeyImage($key)
65 * 968: function ext_getTSCE_config_image($imgConf)
66 * 992: function ext_resourceDims()
67 * 1022: function ext_readDirResources($path)
68 * 1037: function readDirectory($path,$type="file")
69 * 1062: function ext_fNandV($params)
70 * 1080: function ext_printFields($theConstants,$category)
71 *
72 * SECTION: Processing input values
73 * 1337: function ext_regObjectPositions($constants)
74 * 1352: function ext_regObjects($pre)
75 * 1397: function ext_putValueInConf($key, $var)
76 * 1420: function ext_removeValueInConf($key)
77 * 1436: function ext_depthKeys($arr,$settings)
78 * 1471: function ext_procesInput($http_post_vars,$http_post_files,$theConstants,$tplRow)
79 * 1598: function upload_copy_file($typeDat,&$tplRow,$theRealFileName,$tmp_name)
80 * 1644: function ext_prevPageWithTemplate($id,$perms_clause)
81 * 1660: function ext_setStar($val)
82 * 1672: function ext_detectAndFixExtensionPrefix($value)
83 *
84 * TOTAL FUNCTIONS: 40
85 * (This index is automatically created/updated by the extension "extdeveval")
86 *
87 */
88
89 require_once(PATH_t3lib."class.t3lib_tstemplate.php");
90
91
92
93
94
95
96
97 /**
98 * TSParser extension class to t3lib_TStemplate
99 *
100 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
101 * @package TYPO3
102 * @subpackage t3lib
103 */
104 class t3lib_tsparser_ext extends t3lib_TStemplate {
105
106 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.
107 var $HTMLcolorList = "aqua,black,blue,fuchsia,gray,green,lime,maroon,navy,olive,purple,red,silver,teal,yellow,white";
108
109 // internal
110 var $categories = array(
111 "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.
112 "menu" => array(), // Menu setup. This includes fontfiles, sizes, background images. Depending on the menutype.
113 "content" => array(), // All constants related to the display of pagecontent elements
114 "page" => array(), // General configuration like metatags, link targets
115 "advanced" => array(), // Advanced functions, which are used very seldomly.
116 "all" => array() // All constants are put here also!
117 ); // This will be filled with the available categories of the current template.
118 var $subCategories = array(
119 // Standard categories:
120 "enable" => Array("Enable features", "a"),
121 "dims" => Array("Dimensions, widths, heights, pixels", "b"),
122 "file" => Array("Files", "c"),
123 "typo" => Array("Typography", "d"),
124 "color" => Array("Colors", "e"),
125 "links" => Array("Links and targets", "f"),
126 "language" => Array("Language specific constants", "g"),
127
128 // subcategories based on the default content elements
129 "cheader" => Array("Content: 'Header'", "ma"),
130 "cheader_g" => Array("Content: 'Header', Graphical", "ma"),
131 "ctext" => Array("Content: 'Text'", "mb"),
132 // "ctextpic" =>
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")
147 );
148 var $resourceDimensions = array();
149 var $dirResources = array();
150
151 // var $matchAll = 0; // If set, all conditions are matched!
152
153 var $backend_info=1;
154
155 // tsconstanteditor
156 var $ext_inBrace=0;
157
158 // tsbrowser
159 var $tsbrowser_searchKeys = array();
160 var $tsbrowser_depthKeys = array();
161 var $constantMode="";
162 var $regexMode="";
163 var $fixedLgd="";
164 var $resourceCheck=0;
165 var $ext_lineNumberOffset=0;
166 var $ext_localGfxPrefix="";
167 var $ext_localWebGfxPrefix="";
168 var $ext_expandAllNotes=0;
169 var $ext_noPMicons=0;
170 var $ext_noSpecialCharsOnLabels=0;
171 var $ext_listOfTemplatesArr=array();
172 var $ext_lineNumberOffset_mode="";
173 var $ext_dontCheckIssetValues=0; // Dont change...
174 var $ext_noCEUploadAndCopying=0;
175 var $ext_printAll=0;
176 var $ext_CEformName="forms[0]";
177 var $ext_defaultOnlineResourceFlag=0;
178 var $doNotSortCategoriesBeforeMakingForm = FALSE;
179
180 // ts analyzer
181 var $templateTitles=array();
182
183
184 /**
185 * This flattens a hierarchical setuparray to $this->flatSetup
186 * The original function fetched the resource-file if any ("file."). This functions doesn't.
187 *
188 * @param [type] $setupArray: ...
189 * @param [type] $prefix: ...
190 * @param [type] $resourceFlag: ...
191 * @return [type] ...
192 */
193 function flattenSetup($setupArray, $prefix, $resourceFlag) {
194 if (is_array($setupArray)) {
195 $this->getFileName_backPath=PATH_site; // Setting absolute prefixed path for relative resources.
196 reset($setupArray);
197 while(list($key,$val)=each($setupArray)) {
198 if ($prefix || substr($key,0,16)!="TSConstantEditor") { // We don't want "TSConstantEditor" in the flattend setup.
199 if (is_array($val)) {
200 $this->flattenSetup($val,$prefix.$key, ($key=="file."));
201 } elseif ($resourceFlag && $this->resourceCheck) {
202 $this->flatSetup[$prefix.$key] = $this->getFileName($val);
203 if ($this->removeFromGetFilePath && substr($this->flatSetup[$prefix.$key],0,strlen($this->removeFromGetFilePath))==$this->removeFromGetFilePath) {
204 $this->flatSetup[$prefix.$key] = substr($this->flatSetup[$prefix.$key],strlen($this->removeFromGetFilePath));
205 }
206 } else {
207 $this->flatSetup[$prefix.$key] = $val;
208 }
209 }
210 }
211 }
212 }
213
214 /**
215 * [Describe function...]
216 *
217 * @param [type] $all: ...
218 * @return [type] ...
219 */
220 function substituteConstants($all) {
221 $this->Cmarker=substr(md5(uniqid("")),0,6);
222 reset($this->flatSetup);
223 while (list($const,$val)=each($this->flatSetup)) {
224 if (!is_array($val)) {
225 switch($this->constantMode) {
226 case "const":
227 $all = str_replace('{$'.$const.'}','##'.$this->Cmarker.'_B##{$'.$const.'}##'.$this->Cmarker.'_E##',$all);
228 break;
229 case "subst":
230 $all = str_replace('{$'.$const.'}','##'.$this->Cmarker.'_B##'.$val.'##'.$this->Cmarker.'_E##',$all);
231 break;
232 case "untouched":
233 break;
234 default:
235 $all = str_replace('{$'.$const.'}',$val,$all);
236 break;
237 }
238 }
239 }
240 return $all;
241 }
242
243 /**
244 * [Describe function...]
245 *
246 * @param [type] $all: ...
247 * @return [type] ...
248 */
249 function substituteCMarkers($all) {
250 switch($this->constantMode) {
251 case "const":
252 $all = str_replace('##'.$this->Cmarker.'_B##', '<font color="green"><B>', $all);
253 $all = str_replace('##'.$this->Cmarker.'_E##', '</b></font>', $all);
254 break;
255 case "subst":
256 $all = str_replace('##'.$this->Cmarker.'_B##', '<font color="green"><B>', $all);
257 $all = str_replace('##'.$this->Cmarker.'_E##', '</b></font>', $all);
258 break;
259 default:
260 $all = $all;
261 break;
262 }
263 return $all;
264 }
265
266 /**
267 * [Describe function...]
268 *
269 * @return [type] ...
270 */
271 function generateConfig_constants() {
272 // Parses the constants in $this->const with respect to the constant-editor in this module.
273 // In particular comments in the code are registered and the edit_divider is taken into account.
274 // These vars are also set lateron...
275 $this->setup["resources"]= $this->resources;
276 $this->setup["sitetitle"]= $this->sitetitle;
277
278 // parse constants
279 $constants = t3lib_div::makeInstance("t3lib_TSparser");
280 $constants->regComments=1; // Register comments!
281 $constants->setup = $this->const;
282 $constants->setup = $this->mergeConstantsFromPageTSconfig($constants->setup);
283
284 $matchObj = t3lib_div::makeInstance("t3lib_matchCondition");
285 // $matchObj->matchAlternative = array("[globalString = page | title = *test*]");
286 $matchObj->matchAll=1; // Matches ALL conditions in TypoScript
287
288 $c=0;
289 $cc=count($this->constants);
290 reset($this->constants);
291 while (list(,$str)=each($this->constants)) {
292 $c++;
293 if ($c==$cc) {
294 if (strstr($str,$this->edit_divider)) {
295 $parts = explode($this->edit_divider,$str,2);
296 $str=$parts[1];
297 $constants->parse($parts[0],$matchObj);
298 }
299 $this->flatSetup = Array();
300 $this->flattenSetup($constants->setup,"","");
301 $defaultConstants=$this->flatSetup;
302 }
303 $constants->parse($str,$matchObj);
304 }
305
306 $this->flatSetup = Array();
307 $this->flattenSetup($constants->setup,"","");
308 $this->setup["constants"] = $constants->setup;
309
310 return $this->ext_compareFlatSetups($defaultConstants);
311 }
312
313 /**
314 * [Describe function...]
315 *
316 * @param [type] $theSetup: ...
317 * @param [type] $theKey: ...
318 * @return [type] ...
319 */
320 function ext_getSetup($theSetup,$theKey) {
321 $parts = explode(".",$theKey,2);
322 // debug("-----------",1);
323 // debug($theKey,1);
324 if (strcmp($parts[0],"") && is_array($theSetup[$parts[0]."."])) {
325 // debug(trim($parts[1]),1);
326 if (strcmp(trim($parts[1]),"")) {
327 // debug(trim($parts[1]),1);
328 return $this->ext_getSetup($theSetup[$parts[0]."."],trim($parts[1]));
329 } else {
330 return array($theSetup[$parts[0]."."], $theSetup[$parts[0]]);
331 }
332 } else {
333 if (strcmp(trim($theKey),"")) {
334 return array(array(),$theSetup[$theKey]);
335 } else {
336 return array($theSetup,"");
337 }
338 }
339 }
340
341 /**
342 * [Describe function...]
343 *
344 * @param [type] $arr: ...
345 * @param [type] $depth_in: ...
346 * @param [type] $depthData: ...
347 * @param [type] $parentType: ...
348 * @param [type] $parentValue: ...
349 * @return [type] ...
350 */
351 function ext_getObjTree($arr, $depth_in, $depthData, $parentType="",$parentValue="") {
352 $HTML="";
353 $a=0;
354
355 reset($arr);
356 $keyArr_num=array();
357 $keyArr_alpha=array();
358 while (list($key,)=each($arr)) {
359 if (substr($key,-2)!="..") { // Don't do anything with comments / linenumber registrations...
360 $key=ereg_replace("\.$","",$key);
361 if (substr($key,-1)!=".") {
362 if (t3lib_div::testInt($key)) {
363 $keyArr_num[$key]=$arr[$key];
364 } else {
365 $keyArr_alpha[$key]=$arr[$key];
366 }
367 }
368 }
369 }
370 ksort($keyArr_num);
371 $keyArr=$keyArr_num+$keyArr_alpha;
372 reset($keyArr);
373 $c=count($keyArr);
374 if ($depth_in) {$depth_in = $depth_in.".";}
375
376 // $validate_info= verify_TSobjects($keyArr,$parentType,$parentValue);
377 // debug($validate_info);
378
379 while (list($key,)=each($keyArr)) {
380 $a++;
381 $depth=$depth_in.$key;
382 if ($this->bType!="const" || substr($depth,0,1)!="_") { // this excludes all constants starting with "_" from being shown.
383 $goto = substr(md5($depth),0,6);
384 // debug($depth);
385 $deeper = (is_array($arr[$key."."]) && ($this->tsbrowser_depthKeys[$depth] || $this->ext_expandAllNotes)) ? 1 : 0;
386 $PM = "join";
387 $LN = ($a==$c)?"blank":"line";
388 $BTM = ($a==$c)?"bottom":"";
389 $PM = is_array($arr[$key."."]) && !$this->ext_noPMicons ? ($deeper ? "minus":"plus") : "join";
390
391 $HTML.=$depthData;
392 $theIcon='<img src="'.$GLOBALS["BACK_PATH"].'t3lib/gfx/ol/'.$PM.$BTM.'.gif" width="18" height="16" align="top" border="0" alt="" />';
393 if ($PM=="join") {
394 $HTML.=$theIcon;
395 } else {
396 $aHref='index.php?id='.$GLOBALS["SOBE"]->id.'&tsbr['.$depth.']='.($deeper?0:1).'#'.$goto;
397 $HTML.='<a name="'.$goto.'" href="'.htmlspecialchars($aHref).'">'.$theIcon.'</a>';
398 }
399
400 $label = $key;
401 if (t3lib_div::inList("types,resources,sitetitle",$depth) && $this->bType=="setup") { // Read only...
402 $label='<font color="#666666">'.$label.'</font>';
403 } else {
404 if ($this->linkObjects) {
405 $aHref = 'index.php?id='.$GLOBALS["SOBE"]->id.'&sObj='.$depth;
406 if ($this->bType!="const") {
407 $ln = is_array($arr[$key.'.ln..']) ? 'Defined in: '.$this->lineNumberToScript($arr[$key.'.ln..']) : 'N/A';
408 } else {
409 $ln = '';
410 }
411
412 if ($this->tsbrowser_searchKeys[$depth] & 4) { $label = '<b><font color="red">'.$label.'</font></b>'; } // The key has matched the search string
413 $label = '<a href="'.htmlspecialchars($aHref).'" title="'.htmlspecialchars($ln).'">'.$label.'</a>';
414 }
415 }
416
417 $HTML.="[".$label."]";
418
419 if (isset($arr[$key])) {
420 $theValue = $arr[$key];
421 if ($this->fixedLgd) {
422 $imgBlocks = ceil(1+strlen($depthData)/77);
423 $lgdChars = 68-ceil(strlen("[".$key."]")*0.8)-$imgBlocks*3;
424 $theValue = $this->ext_fixed_lgd($theValue,$lgdChars);
425 }
426 if ($this->tsbrowser_searchKeys[$depth] & 2) { // The value has matched the search string
427 $HTML.='=<b><font color="red">'.$this->makeHtmlspecialchars($theValue).'</font></b>';
428 } else {
429 $HTML.="=<b>".$this->makeHtmlspecialchars($theValue)."</b>";
430 }
431 }
432 $HTML.="<br />";
433
434 if ($deeper) {
435 $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]);
436 }
437 }
438 }
439 return $HTML;
440 }
441
442 /**
443 * [Describe function...]
444 *
445 * @param [type] $lnArr: ...
446 * @return [type] ...
447 */
448 function lineNumberToScript($lnArr) {
449 if (!is_array($this->lnToScript)) {
450 $this->lnToScript = array();
451 $c=1;
452 $c+=substr_count($GLOBALS['TYPO3_CONF_VARS']['FE']['defaultTypoScript_setup'],chr(10))+2;
453 $this->lnToScript[$c] = '[Default]';
454
455 foreach($this->hierarchyInfoToRoot as $info) {
456 $c+=$info['configLines']+1;
457 $this->lnToScript[$c] = $info['title'];
458 }
459 }
460
461 foreach($lnArr as $k => $ln) {
462 foreach($this->lnToScript as $endLn => $title) {
463 if ($endLn >= intval($ln)) {
464 $lnArr[$k] = '"'.$title.'", '.$ln;
465 break;
466 }
467 }
468 }
469
470 return implode('; ',$lnArr);
471 }
472
473 /**
474 * [Describe function...]
475 *
476 * @param [type] $theValue: ...
477 * @return [type] ...
478 */
479 function makeHtmlspecialchars($theValue){
480 return $this->ext_noSpecialCharsOnLabels ? $theValue : htmlspecialchars($theValue);
481 }
482
483 /**
484 * [Describe function...]
485 *
486 * @param [type] $arr: ...
487 * @param [type] $depth_in: ...
488 * @param [type] $searchString: ...
489 * @param [type] $keyArray: ...
490 * @return [type] ...
491 */
492 function ext_getSearchKeys($arr, $depth_in, $searchString, $keyArray) {
493 reset($arr);
494 $keyArr=array();
495 while (list($key,)=each($arr)) {
496 $key=ereg_replace('\.$','',$key);
497 if (substr($key,-1)!='.') {
498 $keyArr[$key]=1;
499 }
500 }
501 reset($keyArr);
502 // asort($keyArr);
503 $c=count($keyArr);
504 if ($depth_in) { $depth_in = $depth_in.'.'; }
505 while (list($key,)=each($keyArr)) {
506 $depth=$depth_in.$key;
507 $deeper = is_array($arr[$key."."]);
508
509 if ($this->regexMode) {
510 if (ereg($searchString,$arr[$key])) { // The value has matched
511 $this->tsbrowser_searchKeys[$depth]+=2;
512 }
513 if (ereg($searchString,$key)) { // The key has matched
514 $this->tsbrowser_searchKeys[$depth]+=4;
515 }
516 if (ereg($searchString,$depth_in)) { // Just open this subtree if the parent key has matched the search
517 $this->tsbrowser_searchKeys[$depth]=1;
518 }
519 } else {
520 if (stristr($arr[$key],$searchString)) { // The value has matched
521 $this->tsbrowser_searchKeys[$depth]+=2;
522 }
523 if (stristr($key,$searchString)) { // The key has matches
524 $this->tsbrowser_searchKeys[$depth]+=4;
525 }
526 if (stristr($depth_in,$searchString)) { // Just open this subtree if the parent key has matched the search
527 $this->tsbrowser_searchKeys[$depth]=1;
528 }
529 }
530
531 if ($deeper) {
532 $cS = count($this->tsbrowser_searchKeys);
533 $keyArray = $this->ext_getSearchKeys($arr[$key.'.'], $depth, $searchString, $keyArray);
534 if ($cS != count($this->tsbrowser_searchKeys)) {
535 $keyArray[$depth]=1;
536 }
537 }
538 }
539 return $keyArray;
540 }
541
542 /**
543 * [Describe function...]
544 *
545 * @param [type] $pid: ...
546 * @return [type] ...
547 */
548 function ext_getRootlineNumber($pid) {
549 if ($pid && is_array($GLOBALS["rootLine"])) {
550 reset($GLOBALS["rootLine"]);
551 while(list($key,$val)=each($GLOBALS["rootLine"])) {
552 if ($val['uid']==$pid) return $key;
553 }
554 }
555 }
556
557 /**
558 * [Describe function...]
559 *
560 * @param [type] $arr: ...
561 * @param [type] $depthData: ...
562 * @param [type] $keyArray: ...
563 * @param [type] $first: ...
564 * @return [type] ...
565 */
566 function ext_getTemplateHierarchyArr($arr,$depthData, $keyArray,$first=0) {
567 reset($arr);
568 $keyArr=array();
569 while (list($key,)=each($arr)) {
570 $key=ereg_replace("\.$","",$key);
571 if (substr($key,-1)!=".") {
572 $keyArr[$key]=1;
573 }
574 }
575 reset($keyArr);
576 $a=0;
577 $c=count($keyArr);
578 while (list($key,)=each($keyArr)) {
579 $HTML="";
580 $a++;
581 $deeper = is_array($arr[$key."."]);
582 $row=$arr[$key];
583
584 $PM = "join";
585 $LN = ($a==$c)?"blank":"line";
586 $BTM = ($a==$c)?"top":"";
587 $PM = "join";
588
589 $HTML.=$depthData;
590 $icon = substr($row["templateID"],0,3)=="sys" ? t3lib_iconWorks::getIcon("sys_template",array("root"=>$row["root"])) :
591 (substr($row["templateID"],0,6)=="static" ? t3lib_iconWorks::getIcon("static_template",array()) : 'gfx/i/default.gif');
592 $alttext= "[".$row['templateID']."]";
593 $alttext.= $row['pid'] ? " - ".t3lib_BEfunc::getRecordPath($row['pid'],$GLOBALS["SOBE"]->perms_clause,20) : "";
594 if (in_array($row['templateID'],$this->clearList_const) || in_array($row['templateID'],$this->clearList_setup)) {
595 $A_B='<a href="index.php?id='.$GLOBALS["SOBE"]->id.'&template='.$row['templateID'].'">';
596 $A_E="</A>";
597 } else {
598 $A_B="";
599 $A_E="";
600 }
601 $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;";
602 $RL = $this->ext_getRootlineNumber($row['pid']);
603 $keyArray[] = '<tr>
604 <td nowrap>'.$HTML.'</td>
605 <td align=center>'.($row["root"]?"<b>X</b>":"").'&nbsp;&nbsp;</td>
606 <td align=center'.$row["bgcolor_setup"].'>'.fw(($row["clConf"]?"<b>X</b>":"")."&nbsp;&nbsp;").'</td>
607 <td align=center'.$row["bgcolor_const"].'>'.fw(($row["clConst"]?"<b>X</b>":"")."&nbsp;&nbsp;").'</td>
608 <td>'.($row["pid"]?"&nbsp;".$row["pid"].(strcmp($RL,"")?" (".$RL.")":"")."&nbsp;&nbsp;":"").'</td>
609 <td>'.($row["next"]?"&nbsp;".$row["next"]."&nbsp;&nbsp;":"").'</td>
610 </tr>';
611 if ($deeper) {
612 $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);
613 }
614 }
615 return $keyArray;
616 }
617
618 /**
619 * [Describe function...]
620 *
621 * @param [type] $depthDataArr: ...
622 * @param [type] $pointer: ...
623 * @return [type] ...
624 */
625 function ext_process_hierarchyInfo($depthDataArr,&$pointer) {
626 $parent = $this->hierarchyInfo[$pointer-1]['templateParent'];
627 while ($pointer>0 && $this->hierarchyInfo[$pointer-1]['templateParent']==$parent) {
628 $pointer--;
629 $row = $this->hierarchyInfo[$pointer];
630
631 $depthDataArr[$row['templateID']]=$row;
632 $depthDataArr[$row['templateID']]["bgcolor_setup"] = isset($this->clearList_setup_temp[$row['templateID']])?' class="bgColor5"':'';
633 $depthDataArr[$row['templateID']]["bgcolor_const"] = isset($this->clearList_const_temp[$row['templateID']])?' class="bgColor5"':'';
634 unset($this->clearList_setup_temp[$row['templateID']]);
635 unset($this->clearList_const_temp[$row['templateID']]);
636 $this->templateTitles[$row['templateID']]=$row["title"];
637
638 if ($row['templateID']==$this->hierarchyInfo[$pointer-1]['templateParent']) {
639 $depthDataArr[$row['templateID']."."] = $this->ext_process_hierarchyInfo(array(), $pointer);
640 }
641 }
642 return $depthDataArr;
643 }
644
645 /**
646 * [Describe function...]
647 *
648 * @param [type] $config: ...
649 * @param [type] $lineNumbers: ...
650 * @param [type] $comments: ...
651 * @param [type] $crop: ...
652 * @param [type] $syntaxHL: ...
653 * @param [type] $syntaxHLBlockmode: ...
654 * @return [type] ...
655 */
656 function ext_outputTS($config, $lineNumbers=0, $comments=0, $crop=0, $syntaxHL=0, $syntaxHLBlockmode=0) {
657 $all="";
658 reset($config);
659 while (list(,$str)=each($config)) {
660 $all.="\n[GLOBAL]\n".$str;
661 }
662
663 if ($syntaxHL) {
664 $all = ereg_replace("^[^".chr(10)."]*.","",$all);
665 $all = chop($all);
666 $tsparser = t3lib_div::makeInstance("t3lib_TSparser");
667 $tsparser->lineNumberOffset=$this->ext_lineNumberOffset+1;
668 return $tsparser->doSyntaxHighlight($all,$lineNumbers?array($this->ext_lineNumberOffset+1):'',$syntaxHLBlockmode);
669 } else {
670 return $this->ext_formatTS($all,$lineNumbers,$comments,$crop);
671 }
672 }
673
674 /**
675 * Returns a new string of max. $chars lenght
676 * If the string is longer, it will be truncated and prepended with "..."
677 * $chars must be an integer of at least 4
678 *
679 * @param [type] $string: ...
680 * @param [type] $chars: ...
681 * @return [type] ...
682 */
683 function ext_fixed_lgd($string,$chars) {
684 if ($chars >= 4) {
685 if(strlen($string)>$chars) {
686 return substr($string, 0, $chars-3)."...";
687 }
688 }
689 return $string;
690 }
691
692 /**
693 * [Describe function...]
694 *
695 * @param [type] $ln: ...
696 * @param [type] $str: ...
697 * @return [type] ...
698 */
699 function ext_lnBreakPointWrap($ln,$str) {
700 return '<A href="#" onClick="return brPoint('.$ln.','.($this->ext_lineNumberOffset_mode=="setup"?1:0).');">'.$str.'</a>';
701 }
702
703 /**
704 * [Describe function...]
705 *
706 * @param [type] $input: ...
707 * @param [type] $ln: ...
708 * @param [type] $comments: ...
709 * @param [type] $crop: ...
710 * @return [type] ...
711 */
712 function ext_formatTS($input, $ln, $comments=1, $crop=0) {
713 $input = ereg_replace("^[^".chr(10)."]*.","",$input);
714 $input = chop($input);
715 $cArr = explode(chr(10),$input);
716
717 reset($cArr);
718 $n = ceil(log10(count($cArr)+$this->ext_lineNumberOffset));
719 $lineNum="";
720 while(list($k,$v)=each($cArr)) {
721 $lln=$k+$this->ext_lineNumberOffset+1;
722 if ($ln) $lineNum = $this->ext_lnBreakPointWrap($lln,str_replace(" ",'&nbsp;',sprintf("% ".$n."d",$lln))).": ";
723 $v=htmlspecialchars($v);
724 if ($crop) {$v=$this->ext_fixed_lgd($v,($ln?71:77));}
725 $cArr[$k] = $lineNum.str_replace(" ",'&nbsp;',$v);
726
727 $firstChar = substr(trim($v),0,1);
728 if ($firstChar=="[") {
729 $cArr[$k] = '<font color="green"><b>'.$cArr[$k].'</b></font>';
730 } elseif ($firstChar=="/" || $firstChar=="#") {
731 if ($comments) {
732 $cArr[$k] = '<span class="typo3-dimmed">'.$cArr[$k].'</span>';
733 } else {
734 unset($cArr[$k]);
735 }
736 }
737
738
739 }
740 $output = implode($cArr, "<BR>")."<BR>";
741 return $output;
742 }
743
744 /**
745 * [Describe function...]
746 *
747 * @param [type] $id: ...
748 * @param [type] $template_uid: ...
749 * @return [type] ...
750 */
751 function ext_getFirstTemplate($id,$template_uid=0) {
752 // Query is taken from the runThroughTemplates($theRootLine) function in the parent class.
753 if (intval($id)) {
754 if ($template_uid) {
755 $addC = " AND uid=".$template_uid;
756 }
757 $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery('*', 'sys_template', 'pid='.intval($id).$addC.' '.$this->whereClause, '', 'sorting', '1');
758 $row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res);
759 t3lib_BEfunc::workspaceOL('sys_template',$row);
760 $GLOBALS['TYPO3_DB']->sql_free_result($res);
761 return $row; // Returns the template row if found.
762 }
763 }
764
765 /**
766 * [Describe function...]
767 *
768 * @param [type] $id: ...
769 * @return [type] ...
770 */
771 function ext_getAllTemplates($id) {
772 // Query is taken from the runThroughTemplates($theRootLine) function in the parent class.
773 if (intval($id)) {
774 $outRes=array();
775 $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery('*', 'sys_template', 'pid='.intval($id).' '.$this->whereClause, '', 'sorting');
776 while($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res)) {
777 t3lib_BEfunc::workspaceOL('sys_template',$row);
778 if (is_array($row)) $outRes[] = $row;
779 }
780 $GLOBALS['TYPO3_DB']->sql_free_result($res);
781 return $outRes; // Returns the template rows in an array.
782 }
783 }
784
785 /**
786 * This function compares the flattened constants (default and all).
787 * Returns an array with the constants from the whole template which may be edited by the module.
788 *
789 * @param [type] $default: ...
790 * @return [type] ...
791 */
792 function ext_compareFlatSetups($default) {
793 $editableComments=array();
794 reset($this->flatSetup);
795 while(list($const,$value)=each($this->flatSetup)) {
796 if (substr($const,-2)!=".." && isset($this->flatSetup[$const.".."])) {
797 $comment = trim($this->flatSetup[$const.".."]);
798 $c_arr = explode(chr(10),$comment);
799 while(list($k,$v)=each($c_arr)) {
800 $line=trim(ereg_replace("^[#\/]*","",$v));
801 if ($line) {
802 $parts = explode(";", $line);
803 while(list(,$par)=each($parts)) {
804 if (strstr($par,"=")) {
805 $keyValPair =explode("=",$par,2);
806 switch(trim(strtolower($keyValPair[0]))) {
807 case "type":
808 // Type:
809 /*
810 int (range; low-high, list: item,item,item = selector),
811 boolean (check),
812 string (default),
813 wrap,
814 html-color ...,
815 file
816 */
817 $editableComments[$const]["type"] = trim($keyValPair[1]);
818 break;
819 case "cat":
820 // list of categories.
821 $catSplit=explode("/",strtolower($keyValPair[1]));
822 $editableComments[$const]["cat"] = trim($catSplit[0]);
823 $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.
824 if ($catSplit[1] && isset($this->subCategories[$catSplit[1]])) {
825 $editableComments[$const]["subcat_name"]=$catSplit[1];
826 $editableComments[$const]["subcat"]=$this->subCategories[$catSplit[1]][1]."/".$catSplit[1]."/".trim($catSplit[2])."z";
827 } else {
828 $editableComments[$const]["subcat"]="x"."/".trim($catSplit[2])."z";
829 }
830 break;
831 case "label":
832 // label
833 $editableComments[$const]["label"] = trim($keyValPair[1]);
834 break;
835 }
836 }
837 }
838 }
839 }
840 }
841 if (isset($editableComments[$const])) {
842 $editableComments[$const]["name"]=$const;
843 $editableComments[$const]["value"]=trim($value);
844 if (isset($default[$const])) {
845 $editableComments[$const]["default_value"]=trim($default[$const]);
846 }
847 }
848 }
849 return $editableComments;
850 }
851
852 /**
853 * [Describe function...]
854 *
855 * @param [type] $editConstArray: ...
856 * @return [type] ...
857 */
858 function ext_categorizeEditableConstants($editConstArray) {
859 // Runs through the available constants and fills the $this->categories array with pointers and priority-info
860 reset($editConstArray);
861 while(list($constName,$constData)=each($editConstArray)) {
862 if (!$constData["type"]) {$constData["type"]="string";}
863 $cats = explode(",",$constData["cat"]);
864 reset($cats);
865 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...
866 $theCat=trim($theCat);
867 if ($theCat) {
868 $this->categories[$theCat][$constName]=$constData["subcat"];
869 // $this->categories["all"][$constName]=$constData["subcat"];
870 }
871 }
872 }
873 // debug($this->categories);
874 }
875
876 /**
877 * [Describe function...]
878 *
879 * @return [type] ...
880 */
881 function ext_getCategoryLabelArray() {
882 // Returns array used for labels in the menu.
883 $retArr = array();
884 while(list($k,$v)=each($this->categories)) {
885 if (count($v)) {
886 $retArr[$k]=strtoupper($k)." (".count($v).")";
887 }
888 }
889 return $retArr;
890 }
891
892 /**
893 * [Describe function...]
894 *
895 * @param [type] $type: ...
896 * @return [type] ...
897 */
898 function ext_getTypeData($type) {
899 $retArr = array();
900 $type=trim($type);
901 if (!$type) {
902 $retArr["type"]="string";
903 } else {
904 $m=strcspn ($type," [");
905 $retArr["type"]=strtolower(substr($type,0,$m));
906 if (t3lib_div::inList("int,options,file,boolean,offset",$retArr["type"])) {
907 $p=trim(substr($type,$m));
908 ereg("\[(.*)\]",$p,$reg);
909 $p=trim($reg[1]);
910 if ($p) {
911 $retArr["paramstr"]=$p;
912 switch($retArr["type"]) {
913 case "int":
914 if (substr($retArr["paramstr"],0,1)=="-") {
915 $retArr["params"]=t3lib_div::intExplode("-",substr($retArr["paramstr"],1));
916 $retArr["params"][0]=intval("-".$retArr["params"][0]);
917 } else {
918 $retArr["params"]=t3lib_div::intExplode("-",$retArr["paramstr"]);
919 }
920 $retArr["paramstr"]=$retArr["params"][0]." - ".$retArr["params"][1];
921 break;
922 case "options":
923 $retArr["params"]=explode(",",$retArr["paramstr"]);
924 break;
925 }
926 }
927 }
928 }
929 // debug($retArr);
930 return $retArr;
931 }
932
933 /**
934 * [Describe function...]
935 *
936 * @param [type] $category: ...
937 * @return [type] ...
938 */
939 function ext_getTSCE_config($category) {
940 $catConf=$this->setup["constants"]["TSConstantEditor."][$category."."];
941 $out=array();
942 if (is_array($catConf)) {
943 reset($catConf);
944 while(list($key,$val)=each($catConf)) {
945 switch($key) {
946 case "image":
947 $out["imagetag"] = $this->ext_getTSCE_config_image($catConf["image"]);
948 break;
949 case "description":
950 case "bulletlist":
951 case "header":
952 $out[$key] = $val;
953 break;
954 default:
955 if (t3lib_div::testInt($key)) {
956 $constRefs = explode(",",$val);
957 reset($constRefs);
958 while(list(,$const)=each($constRefs)) {
959 $const=trim($const);
960 if ($const && $const<=20) {
961 $out["constants"][$const].=$this->ext_getKeyImage($key);
962 }
963 }
964 }
965 break;
966 }
967 }
968 }
969 $this->helpConfig=$out;
970 }
971
972 /**
973 * [Describe function...]
974 *
975 * @param [type] $key: ...
976 * @return [type] ...
977 */
978 function ext_getKeyImage($key) {
979 return '<img src="'.$this->ext_localWebGfxPrefix.'gfx/'.$key.'.gif" align="top" hspace=2>';
980 }
981
982 /**
983 * [Describe function...]
984 *
985 * @param [type] $imgConf: ...
986 * @return [type] ...
987 */
988 function ext_getTSCE_config_image($imgConf) {
989 if (substr($imgConf,0,4)=="gfx/") {
990 $iFile=$this->ext_localGfxPrefix.$imgConf;
991 $tFile=$this->ext_localWebGfxPrefix.$imgConf;
992 } elseif (substr($imgConf,0,4)=='EXT:') {
993 $iFile = t3lib_div::getFileAbsFileName($imgConf);
994 if ($iFile) {
995 $f = substr($iFile,strlen(PATH_site));
996 $tFile=$GLOBALS["BACK_PATH"]."../".$f;
997 }
998 } else {
999 $f = "uploads/tf/".$this->extractFromResources($this->setup["resources"],$imgConf);
1000 $iFile=PATH_site.$f;
1001 $tFile=$GLOBALS["BACK_PATH"]."../".$f;
1002 }
1003 $imageInfo=@getImagesize($iFile);
1004 return '<img src="'.$tFile.'" '.$imageInfo[3].'>';
1005 }
1006
1007 /**
1008 * [Describe function...]
1009 *
1010 * @return [type] ...
1011 */
1012 function ext_resourceDims() {
1013 if ($this->setup["resources"]) {
1014 $rArr=explode(",",$this->setup["resources"]);
1015 while(list($c,$val)=each($rArr)) {
1016 $val=trim($val);
1017 $theFile = PATH_site."uploads/tf/".$val;
1018 if ($val && @is_file($theFile)) {
1019 $imgInfo = @getimagesize($theFile);
1020 }
1021 if (is_array($imgInfo)) {
1022 $this->resourceDimensions[$val]=" (".$imgInfo[0]."x".$imgInfo[1].")";
1023 }
1024 }
1025 }
1026 reset($this->dirResources);
1027 while(list($c,$val)=each($this->dirResources)) {
1028 $val=trim($val);
1029 $imgInfo = @getimagesize(PATH_site.$val);
1030 if (is_array($imgInfo)) {
1031 $this->resourceDimensions[$val]=" (".$imgInfo[0]."x".$imgInfo[1].")";
1032 }
1033 }
1034 }
1035
1036 /**
1037 * [Describe function...]
1038 *
1039 * @param [type] $path: ...
1040 * @return [type] ...
1041 */
1042 function ext_readDirResources($path) {
1043 $path=trim($path);
1044 if ($path && substr($path,0,10)=="fileadmin/") {
1045 $path = ereg_replace("\/$","",$path);
1046 $this->readDirectory(PATH_site.$path);
1047 }
1048 }
1049
1050 /**
1051 * [Describe function...]
1052 *
1053 * @param [type] $path: ...
1054 * @param [type] $type: ...
1055 * @return [type] ...
1056 */
1057 function readDirectory($path,$type="file") {
1058 if(@is_dir($path)) {
1059 $d = @dir($path);
1060 $tempArray=Array();
1061 if (is_object($d)) {
1062 while($entry=$d->read()) {
1063 if ($entry!="." && $entry!="..") {
1064 $wholePath = $path."/".$entry; // Because of odd PHP-error where <BR>-tag is sometimes placed after a filename!!
1065 if (@file_exists($wholePath) && (!$type || filetype($wholePath)==$type)) {
1066 $fI = t3lib_div::split_fileref($wholePath);
1067 $this->dirResources[]=substr($wholePath,strlen(PATH_site));
1068 }
1069 }
1070 }
1071 $d->close();
1072 }
1073 }
1074 }
1075
1076 /**
1077 * [Describe function...]
1078 *
1079 * @param [type] $params: ...
1080 * @return [type] ...
1081 */
1082 function ext_fNandV($params) {
1083 $fN='data['.$params["name"].']';
1084 $fV=$params["value"];
1085 if (ereg("^{[\$][a-zA-Z0-9\.]*}$",trim($fV),$reg)) { // Values entered from the constantsedit cannot be constants! 230502; removed \{ and set {
1086 $fV="";
1087 }
1088 $fV=htmlspecialchars($fV);
1089
1090 return array($fN,$fV,$params);
1091 }
1092
1093 /**
1094 * [Describe function...]
1095 *
1096 * @param [type] $theConstants: ...
1097 * @param [type] $category: ...
1098 * @return [type] ...
1099 */
1100 function ext_printFields($theConstants,$category) {
1101 // This functions returns the HTML-code that creates the editor-layout of the module.
1102 reset($theConstants);
1103 $output="";
1104 $subcat="";
1105 if (is_array($this->categories[$category])) {
1106
1107 $help=$this->helpConfig;
1108 $this->rArr=explode(",",$this->setup["resources"].",".implode($this->dirResources,","));
1109
1110 if (!$this->doNotSortCategoriesBeforeMakingForm) asort($this->categories[$category]);
1111 while(list($name,$type)=each($this->categories[$category])) {
1112 $params = $theConstants[$name];
1113 if (is_array($params)) {
1114 if ($subcat!=$params["subcat_name"]) {
1115 $subcat=$params["subcat_name"];
1116 $subcat_name = $params["subcat_name"] ? $this->subCategories[$params["subcat_name"]][0] : "Others";
1117 $output.='<tr>';
1118 $output.='<td colspan=2 class="bgColor4"><div align="center"><b>'.$subcat_name.'</b></div></td>';
1119 $output.='</tr>';
1120 }
1121
1122 // if (substr($params["value"],0,2)!='{$') {
1123 $label=$GLOBALS["LANG"]->sL($params["label"]);
1124 $label_parts = explode(":",$label,2);
1125 if (count($label_parts)==2) {
1126 $head=trim($label_parts[0]);
1127 $body=trim($label_parts[1]);
1128 } else {
1129 $head=trim($label_parts[0]);
1130 $body="";
1131 }
1132 if (strlen($head)>35) {
1133 if (!$body) {$body=$head;}
1134 $head=t3lib_div::fixed_lgd_cs($head,35);
1135 }
1136 $typeDat=$this->ext_getTypeData($params["type"]);
1137 $checked="";
1138 $p_field="";
1139 $raname = substr(md5($params["name"]),0,10);
1140 $aname="'".$raname."'";
1141 if ($this->ext_dontCheckIssetValues || isset($this->objReg[$params["name"]])) {
1142 $checked=" checked";
1143 list($fN,$fV,$params)=$this->ext_fNandV($params);
1144
1145 switch($typeDat["type"]) {
1146 case "int":
1147 case "int+":
1148 $p_field='<input type="text" name="'.$fN.'" value="'.$fV.'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(5).' onChange="uFormUrl('.$aname.')">';
1149 if ($typeDat["paramstr"]) {
1150 $p_field.=' Range: '.$typeDat["paramstr"];
1151 } elseif ($typeDat["type"]=="int+") {
1152 $p_field.=' Range: 0 - ';
1153 } else {
1154 $p_field.=' (Integer)';
1155 }
1156 break;
1157 case "color":
1158 $colorNames=explode(",",",".$this->HTMLcolorList);
1159 $p_field="";
1160 while(list(,$val)=each($colorNames)) {
1161 $sel="";
1162 if ($val==strtolower($params["value"])) {$sel=" selected";}
1163 $p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$val.'</option>';
1164 }
1165 $p_field='<select name="C'.$fN.'" onChange="document.'.$this->ext_CEformName.'[\''.$fN.'\'].value=this.options[this.selectedIndex].value; uFormUrl('.$aname.');">'.$p_field.'</select>';
1166
1167 $p_field.='<input type="text" name="'.$fN.'" value="'.$fV.'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(7).' onChange="uFormUrl('.$aname.')">';
1168 break;
1169 case "wrap":
1170 $wArr = explode("|",$fV);
1171 $p_field='<input type="text" name="'.$fN.'" value="'.$wArr[0].'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(29).' onChange="uFormUrl('.$aname.')">';
1172 $p_field.=' | ';
1173 $p_field.='<input type="text" name="W'.$fN.'" value="'.$wArr[1].'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(15).' onChange="uFormUrl('.$aname.')">';
1174 break;
1175 case "offset":
1176 $wArr = explode(",",$fV);
1177 $labels = t3lib_div::trimExplode(",",$typeDat["paramstr"]);
1178 $p_field=($labels[0]?$labels[0]:"x").':<input type="text" name="'.$fN.'" value="'.$wArr[0].'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(4).' onChange="uFormUrl('.$aname.')">';
1179 $p_field.=' , ';
1180 $p_field.=($labels[1]?$labels[1]:"y").':<input type="text" name="W'.$fN.'" value="'.$wArr[1].'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(4).' onChange="uFormUrl('.$aname.')">';
1181 for ($aa=2;$aa<count($labels);$aa++) {
1182 if ($labels[$aa]) {
1183 $p_field.=' , '.$labels[$aa].':<input type="text" name="W'.$aa.$fN.'" value="'.$wArr[$aa].'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth(4).' onChange="uFormUrl('.$aname.')">';
1184 } else {
1185 $p_field.='<input type="hidden" name="W'.$aa.$fN.'" value="'.$wArr[$aa].'">';
1186 }
1187 }
1188 break;
1189 case "options":
1190 if (is_array($typeDat["params"])) {
1191 $p_field="";
1192 while(list(,$val)=each($typeDat["params"])) {
1193 $vParts = explode("=",$val,2);
1194 $label = $vParts[0];
1195 $val = isset($vParts[1]) ? $vParts[1] : $vParts[0];
1196
1197 // option tag:
1198 $sel="";
1199 if ($val==$params["value"]) {$sel=" selected";}
1200 $p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$GLOBALS["LANG"]->sL($label).'</option>';
1201 }
1202 $p_field='<select name="'.$fN.'" onChange="uFormUrl('.$aname.')">'.$p_field.'</select>';
1203 }
1204 break;
1205 case "boolean":
1206 $p_field='<input type="Hidden" name="'.$fN.'" value="0">';
1207 $sel=""; if ($fV) {$sel=" checked";}
1208 $p_field.='<input type="Checkbox" name="'.$fN.'" value="'.($typeDat["paramstr"]?$typeDat["paramstr"]:1).'"'.$sel.' onClick="uFormUrl('.$aname.')">';
1209 break;
1210 case "comment":
1211 $p_field='<input type="Hidden" name="'.$fN.'" value="#">';
1212 $sel=""; if (!$fV) {$sel=" checked";}
1213 $p_field.='<input type="Checkbox" name="'.$fN.'" value=""'.$sel.' onClick="uFormUrl('.$aname.')">';
1214 break;
1215 case "file":
1216 $p_field='<option value=""></option>';
1217 // debug($params["value"]);
1218 $theImage="";
1219 // if ($this->) {
1220 $selectThisFile = $this->extractFromResources($this->setup["resources"],$params["value"]);
1221 if ($params["value"] && !$selectThisFile) {
1222 if (in_array($params["value"],$this->dirResources)) {
1223 $selectThisFile=$params["value"];
1224 }
1225 }
1226 // debug($selectThisFile);
1227 // extensionlist
1228 $extList = $typeDat["paramstr"];
1229 $p_field='<option value="">('.$extList.')</option>';
1230 if ($extList=="IMAGE_EXT") {
1231 $extList = $GLOBALS["TYPO3_CONF_VARS"]["GFX"]["imagefile_ext"];
1232 }
1233 reset($this->rArr);
1234 $onlineResourceFlag=$this->ext_defaultOnlineResourceFlag;
1235
1236 while(list($c,$val)=each($this->rArr)) {
1237 $val=trim($val);
1238 $fI=t3lib_div::split_fileref($val);
1239 // debug($fI);
1240 if ($val && (!$extList || t3lib_div::inList($extList,$fI["fileext"]))) {
1241 if ($onlineResourceFlag<=0 && substr($fI["path"],0,10)=="fileadmin/") {
1242 if ($onlineResourceFlag<0) {
1243 $p_field.='<option value=""></option>';
1244 }
1245 $p_field.='<option value="">__'.$fI["path"].'__:</option>';
1246 $onlineResourceFlag=1;
1247 }
1248 $dims=$this->resourceDimensions[$val];
1249 $sel="";
1250
1251 // Check if $params["value"] is in the list of resources.
1252 if ($selectThisFile && $selectThisFile==$val) {
1253 $sel=" selected";
1254 if ($onlineResourceFlag<=0) {
1255 $theImage=t3lib_BEfunc::thumbCode(array("resources"=>$selectThisFile),"sys_template","resources",$GLOBALS["BACK_PATH"],"");
1256 } else {
1257 $theImage=t3lib_BEfunc::thumbCode(array("resources"=>$fI["file"]),"sys_template","resources",$GLOBALS["BACK_PATH"],"",$fI["path"]);
1258 }
1259 }
1260
1261 if ($onlineResourceFlag<=0) {
1262 $onlineResourceFlag--;
1263 // Value is set with a *
1264 $val = $this->ext_setStar($val);
1265 $p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$val.$dims.'</option>';
1266 } else {
1267 $p_field.='<option value="'.htmlspecialchars($val).'"'.$sel.'>'.$fI["file"].$dims.'</option>';
1268 }
1269 }
1270 }
1271 if (trim($params["value"]) && !$selectThisFile) {
1272 $val = $params["value"];
1273 $p_field.='<option value=""></option>';
1274 $p_field.='<option value="'.htmlspecialchars($val).'" selected>'.$val.'</option>';
1275 }
1276 // }
1277 $p_field='<select name="'.$fN.'" onChange="uFormUrl('.$aname.')">'.$p_field.'</select>';
1278 $p_field.=$theImage;
1279
1280 if (!$this->ext_noCEUploadAndCopying) {
1281 // Copy a resource
1282 $copyFile = $this->extractFromResources($this->setup["resources"],$params["value"]);
1283 if (!$copyFile) {
1284 if ($params["value"]) {
1285 $copyFile=PATH_site.$this->ext_detectAndFixExtensionPrefix($params["value"]);
1286 }
1287 } else {
1288 // $copyFile=PATH_site."uploads/tf/".$copyFile;
1289 $copyFile="";
1290 }
1291 #debug($copyFile);
1292 if ($copyFile && @is_file($copyFile)) {
1293 $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"])).'\'));}">';
1294 }
1295 // Upload?
1296 $p_field.='<BR>';
1297 $p_field.='<input type="file" name="upload_'.$fN.'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth().' onChange="uFormUrl('.$aname.')" size="50" />';
1298 }
1299 break;
1300 case 'small':
1301 default:
1302 $fwidth= $typeDat["type"]=="small" ? 10 : 46;
1303 $p_field='<input type="text" name="'.$fN.'" value="'.$fV.'"'.$GLOBALS["TBE_TEMPLATE"]->formWidth($fwidth).' onChange="uFormUrl('.$aname.')">';
1304 break;
1305 }
1306 }
1307 if (!$this->ext_dontCheckIssetValues) $p_field='<input type="Checkbox" name="check['.$params["name"].']" value="1"'.$checked.' onClick="uFormUrl('.$aname.')">'.$p_field;
1308 if ($typeDat["type"]=="color" && substr($params["value"],0,2)!='{$') {
1309 $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>';
1310 } else {
1311 $p_field='<span class="nobr">'.$p_field.'</span><br />';
1312 }
1313
1314 $p_name = '<span class="typo3-dimmed">['.$params["name"].']</span><BR>';
1315 $p_dlabel='<span class="typo3-dimmed"><b>Default:</b> '.htmlspecialchars($params["default_value"]).'</span><BR>';
1316 $p_label = '<b>'.htmlspecialchars($head).'</b>';
1317 $p_descrip = $body ? htmlspecialchars($body)."<BR>" : "";
1318
1319 $output.='<tr>';
1320 $output.='<td valign=top nowrap><a name="'.$raname.'"></a>'.$help["constants"][$params["name"]].$p_label.'</td>';
1321 $output.='<td valign=top align="right">'.$p_name.'</td>';
1322 $output.='</tr>';
1323 $output.='<tr>';
1324 $output.='<td colspan=2>'.$p_descrip.$p_field.$p_dlabel.'<br></td>';
1325 $output.='</tr>';
1326 // }
1327 } else {
1328 debug("Error. Constant did not exits. Should not happen.");
1329 }
1330 }
1331 $output='<table border=0 cellpadding=0 cellspacing=0>'.$output.'</table>';
1332 }
1333 return $output;
1334 }
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1347 /***************************
1348 *
1349 * Processing input values
1350 *
1351 ***************************/
1352
1353 /**
1354 * @param [type] $constants: ...
1355 * @return [type] ...
1356 */
1357 function ext_regObjectPositions($constants) {
1358 // 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
1359 $this->raw = explode(chr(10),$constants);
1360 $this->rawP=0;
1361
1362 $this->objReg=array(); // resetting the objReg if the divider is found!!
1363 $this->ext_regObjects("");
1364 }
1365
1366 /**
1367 * [Describe function...]
1368 *
1369 * @param [type] $pre: ...
1370 * @return [type] ...
1371 */
1372 function ext_regObjects($pre) {
1373 // works with regObjectPositions. "expands" the names of the TypoScript objects
1374 while (isset($this->raw[$this->rawP])) {
1375 $line = ltrim($this->raw[$this->rawP]);
1376 if (strstr($line,$this->edit_divider)) {
1377 $this->objReg=array(); // resetting the objReg if the divider is found!!
1378 }
1379 $this->rawP++;
1380 if ($line) {
1381 if (substr($line,0,1)=="[") {
1382 // return $line;
1383 } elseif (strcspn($line,"}#/")!=0) {
1384 $varL = strcspn($line," {=<");
1385 $var=substr($line,0,$varL);
1386 $line = ltrim(substr($line,$varL));
1387 switch(substr($line,0,1)) {
1388 case "=":
1389 $this->objReg[$pre.$var]=$this->rawP-1;
1390 break;
1391 case "{":
1392 $this->ext_inBrace++;
1393 $this->ext_regObjects($pre.$var.".");
1394 break;
1395 }
1396 $this->lastComment="";
1397 } elseif (substr($line,0,1)=="}") {
1398 $this->lastComment="";
1399 $this->ext_inBrace--;
1400 if ($this->ext_inBrace<0) {
1401 $this->ext_inBrace=0;
1402 } else {
1403 break;
1404 }
1405 }
1406 }
1407 }
1408 }
1409
1410 /**
1411 * [Describe function...]
1412 *
1413 * @param [type] $key: ...
1414 * @param [type] $var: ...
1415 * @return [type] ...
1416 */
1417 function ext_putValueInConf($key, $var) {
1418 // Puts the value $var to the TypoScript value $key in the current lines of the templates.
1419 // If the $key is not found in the template constants field, a new line is inserted in the bottom.
1420 $theValue = " ".trim($var);
1421 if (isset($this->objReg[$key])) {
1422 $lineNum = $this->objReg[$key];
1423 $parts = explode("=",$this->raw[$lineNum],2);
1424 if (count($parts)==2) {
1425 $parts[1]= $theValue;
1426 }
1427 $this->raw[$lineNum]=implode($parts,"=");
1428 } else {
1429 $this->raw[]=$key." =".$theValue;
1430 }
1431 $this->changed=1;
1432 }
1433
1434 /**
1435 * [Describe function...]
1436 *
1437 * @param [type] $key: ...
1438 * @return [type] ...
1439 */
1440 function ext_removeValueInConf($key) {
1441 // Removes the value in the configuration
1442 if (isset($this->objReg[$key])) {
1443 $lineNum = $this->objReg[$key];
1444 unset($this->raw[$lineNum]);
1445 }
1446 $this->changed=1;
1447 }
1448
1449 /**
1450 * [Describe function...]
1451 *
1452 * @param [type] $arr: ...
1453 * @param [type] $settings: ...
1454 * @return [type] ...
1455 */
1456 function ext_depthKeys($arr,$settings) {
1457 reset($arr);
1458 $tsbrArray=array();
1459 while(list($theK,$theV)=each($arr)) {
1460 $theKeyParts = explode(".",$theK);
1461 $depth="";
1462 $c=count($theKeyParts);
1463 $a=0;
1464 while(list(,$p)=each($theKeyParts)) {
1465 $a++;
1466 $depth.=($depth?".":"").$p;
1467 $tsbrArray[$depth]= ($c==$a) ? $theV : 1;
1468 }
1469 }
1470 // Modify settings
1471 reset($tsbrArray);
1472 while(list($theK,$theV)=each($tsbrArray)) {
1473 if ($theV) {
1474 $settings[$theK] = 1;
1475 } else {
1476 unset($settings[$theK]);
1477 }
1478 }
1479 return $settings;
1480 }
1481
1482 /**
1483 * [Describe function...]
1484 *
1485 * @param [type] $http_post_vars: ...
1486 * @param [type] $http_post_files: ...
1487 * @param [type] $theConstants: ...
1488 * @param [type] $tplRow: ...
1489 * @return [type] ...
1490 */
1491 function ext_procesInput($http_post_vars,$http_post_files,$theConstants,$tplRow) {
1492 $data=$http_post_vars["data"];
1493 $check=$http_post_vars["check"];
1494 $copyResource=$http_post_vars["_copyResource"];
1495 $Wdata=$http_post_vars["Wdata"];
1496 $W2data=$http_post_vars["W2data"];
1497 $W3data=$http_post_vars["W3data"];
1498 $W4data=$http_post_vars["W4data"];
1499 $W5data=$http_post_vars["W5data"];
1500
1501 if (is_array($data)) {
1502 reset($data);
1503 while(list($key,$var)=each($data)) {
1504 if (isset($theConstants[$key])) {
1505 if ($this->ext_dontCheckIssetValues || isset($check[$key])) { // If checkbox is set, update the value
1506 list($var) = explode(chr(10),$var); // exploding with linebreak, just to make sure that no multiline input is given!
1507 $typeDat=$this->ext_getTypeData($theConstants[$key]["type"]);
1508 switch($typeDat["type"]) {
1509 case "int":
1510 if ($typeDat["paramstr"]) {
1511 $var=t3lib_div::intInRange($var,$typeDat["params"][0],$typeDat["params"][1]);
1512 } else {
1513 $var=intval($var);
1514 }
1515 break;
1516 case "int+":
1517 $var=t3lib_div::intInRange($var,0,10000);
1518 break;
1519 case "color":
1520 $col=array();
1521 if($var && !t3lib_div::inList($this->HTMLcolorList,strtolower($var))) {
1522 $var = ereg_replace("[^A-Fa-f0-9]*","",$var);
1523 $col[]=HexDec(substr($var,0,2));
1524 $col[]=HexDec(substr($var,2,2));
1525 $col[]=HexDec(substr($var,4,2));
1526 $var="#".strtoupper(substr("0".DecHex($col[0]),-2).substr("0".DecHex($col[1]),-2).substr("0".DecHex($col[2]),-2));
1527 }
1528 break;
1529 case "comment":
1530 if ($val) {
1531 $val="#";
1532 } else {
1533 $val="";
1534 }
1535 break;
1536 case "wrap":
1537 if (isset($Wdata[$key])) {
1538 $var.="|".$Wdata[$key];
1539 }
1540 break;
1541 case "offset":
1542 if (isset($Wdata[$key])) {
1543 $var=intval($var).",".intval($Wdata[$key]);
1544 if (isset($W2data[$key])) {
1545 $var.=",".intval($W2data[$key]);
1546 if (isset($W3data[$key])) {
1547 $var.=",".intval($W3data[$key]);
1548 if (isset($W4data[$key])) {
1549 $var.=",".intval($W4data[$key]);
1550 if (isset($W5data[$key])) {
1551 $var.=",".intval($W5data[$key]);
1552 }
1553 }
1554 }
1555 }
1556 }
1557 break;
1558 case "boolean":
1559 if ($var) {
1560 $var = $typeDat["paramstr"] ? $typeDat["paramstr"] : 1;
1561 }
1562 break;
1563 case "file":
1564 if (!$this->ext_noCEUploadAndCopying) {
1565 if ($http_post_files["upload_data"]["name"][$key] && $http_post_files["upload_data"]["tmp_name"][$key]!="none") {
1566 $var = $this->upload_copy_file(
1567 $typeDat,
1568 $tplRow,
1569 trim($http_post_files["upload_data"]["name"][$key]),
1570 $http_post_files["upload_data"]["tmp_name"][$key]
1571 );
1572 }
1573 if ($copyResource[$key]) {
1574 $var = $this->upload_copy_file(
1575 $typeDat,
1576 $tplRow,
1577 basename($copyResource[$key]),
1578 $copyResource[$key]
1579 );
1580 }
1581 }
1582 break;
1583 }
1584 if ($this->ext_printAll || strcmp($theConstants[$key]["value"],$var)) {
1585 $this->ext_putValueInConf($key, $var); // Put value in, if changed.
1586 }
1587 unset($check[$key]); // Remove the entry because it has been "used"
1588 } else {
1589 $this->ext_removeValueInConf($key);
1590 }
1591 }
1592 }
1593 }
1594 // 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...
1595 if (!$this->ext_dontCheckIssetValues && is_array($check)) {
1596 reset($check);
1597 while(list($key,$var)=each($check)) {
1598 if (isset($theConstants[$key])) {
1599 $dValue = $theConstants[$key]["default_value"];
1600 // debug($dValue);
1601 $this->ext_putValueInConf($key, $dValue);
1602 // debug($key,1);
1603 }
1604 }
1605 }
1606 // debug($this->objReg);
1607 }
1608
1609 /**
1610 * [Describe function...]
1611 *
1612 * @param [type] $typeDat: ...
1613 * @param [type] $tplRow: ...
1614 * @param [type] $theRealFileName: ...
1615 * @param [type] $tmp_name: ...
1616 * @return [type] ...
1617 */
1618 function upload_copy_file($typeDat,&$tplRow,$theRealFileName,$tmp_name) {
1619
1620 // extensions
1621 $extList = $typeDat["paramstr"];
1622 if ($extList=="IMAGE_EXT") {
1623 $extList = $GLOBALS["TYPO3_CONF_VARS"]["GFX"]["imagefile_ext"];
1624 }
1625 $fI=t3lib_div::split_fileref($theRealFileName);
1626 if ($theRealFileName && (!$extList || t3lib_div::inList($extList,$fI["fileext"]))) {
1627 $tmp_upload_name = t3lib_div::upload_to_tempfile($tmp_name); // If there is an uploaded file, move it for the sake of safe_mode.
1628
1629 // Saving resource
1630 $alternativeFileName=array();
1631 $alternativeFileName[$tmp_upload_name] = $theRealFileName;
1632 // Making list of resources
1633 $resList = $tplRow["resources"];
1634 $resList = $tmp_upload_name.",".$resList;
1635 $resList=implode(t3lib_div::trimExplode(",",$resList,1),",");
1636 // Making data-array
1637 $saveId = $tplRow['_ORIG_uid'] ? $tplRow['_ORIG_uid'] : $tplRow['uid'];
1638 debug($saveId);
1639 $recData=array();
1640 $recData["sys_template"][$saveId]["resources"] = $resList;
1641 // Saving
1642 $tce = t3lib_div::makeInstance("t3lib_TCEmain");
1643 $tce->stripslashes_values=0;
1644 $tce->alternativeFileName = $alternativeFileName;
1645 $tce->start($recData,Array());
1646 $tce->process_datamap();
1647
1648 t3lib_div::unlink_tempfile($tmp_upload_name);
1649
1650 $tmpRow = t3lib_BEfunc::getRecordWSOL("sys_template",$saveId,"resources");
1651
1652 $tplRow["resources"] = $tmpRow["resources"];
1653
1654 // Setting the value
1655 $var = $this->ext_setStar($theRealFileName);
1656 }
1657 return $var;
1658 }
1659
1660 /**
1661 * [Describe function...]
1662 *
1663 * @param [type] $id: ...
1664 * @param [type] $perms_clause: ...
1665 * @return [type] ...
1666 */
1667 function ext_prevPageWithTemplate($id,$perms_clause) {
1668 $rootLine = t3lib_BEfunc::BEgetRootLine($id,$perms_clause?" AND ".$perms_clause:"");
1669 reset($rootLine);
1670 while(list(,$p)=each($rootLine)) {
1671 if ($this->ext_getFirstTemplate($p["uid"])) {
1672 return $p;
1673 }
1674 }
1675 }
1676
1677 /**
1678 * [Describe function...]
1679 *
1680 * @param [type] $val: ...
1681 * @return [type] ...
1682 */
1683 function ext_setStar($val) {
1684 $fParts = explode(".",strrev($val),2);
1685 $val=ereg_replace("_[0-9][0-9]$","",strrev($fParts[1]))."*.".strrev($fParts[0]);
1686 return $val;
1687 }
1688
1689 /**
1690 * [Describe function...]
1691 *
1692 * @param [type] $value: ...
1693 * @return [type] ...
1694 */
1695 function ext_detectAndFixExtensionPrefix($value) {
1696 if (substr($value,0,4)=="EXT:") {
1697 $parts = explode("/",substr($value,4),2);
1698 #debug($parts);
1699 $extPath = t3lib_extMgm::siteRelPath($parts[0]);
1700 $value = $extPath.$parts[1];
1701 return $value;
1702 } else {
1703 return $value;
1704 }
1705 }
1706 }
1707
1708
1709 if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_tsparser_ext.php']) {
1710 include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_tsparser_ext.php']);
1711 }
1712 ?>
TYPO3 CMS Core Development