Fixed bug #5913: RTEhtmlarea not correctly displayed in IRRE child form-fields and...
[Packages/TYPO3.CMS.git] / t3lib / class.t3lib_tceforms.php
1 <?php
2 /***************************************************************
3 * Copyright notice
4 *
5 * (c) 1999-2006 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 * Contains TYPO3 Core Form generator - AKA "TCEforms"
29 *
30 * $Id$
31 * Revised for TYPO3 3.6 August/2003 by Kasper Skaarhoj
32 * XHTML compliant
33 *
34 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
35 */
36 /**
37 * [CLASS/FUNCTION INDEX of SCRIPT]
38 *
39 *
40 *
41 * 196: class t3lib_TCEforms
42 * 302: function t3lib_TCEforms()
43 * 338: function initDefaultBEmode()
44 *
45 * SECTION: Rendering the forms, fields etc
46 * 385: function getSoloField($table,$row,$theFieldToReturn)
47 * 424: function getMainFields($table,$row,$depth=0)
48 * 618: function getListedFields($table,$row,$list)
49 * 660: function getPaletteFields($table,$row,$palette,$header='',$itemList='',$collapsedHeader='')
50 * 737: function getSingleField($table,$field,$row,$altName='',$palette=0,$extra='',$pal=0)
51 * 900: function getSingleField_SW($table,$field,$row,&$PA)
52 *
53 * SECTION: Rendering of each TCEform field type
54 * 976: function getSingleField_typeInput($table,$field,$row,&$PA)
55 * 1057: function getSingleField_typeText($table,$field,$row,&$PA)
56 * 1178: function getSingleField_typeCheck($table,$field,$row,&$PA)
57 * 1244: function getSingleField_typeRadio($table,$field,$row,&$PA)
58 * 1279: function getSingleField_typeSelect($table,$field,$row,&$PA)
59 * 1359: function getSingleField_typeSelect_single($table,$field,$row,&$PA,$config,$selItems,$nMV_label)
60 * 1490: function getSingleField_typeSelect_checkbox($table,$field,$row,&$PA,$config,$selItems,$nMV_label)
61 * 1609: function getSingleField_typeSelect_singlebox($table,$field,$row,&$PA,$config,$selItems,$nMV_label)
62 * 1719: function getSingleField_typeSelect_multiple($table,$field,$row,&$PA,$config,$selItems,$nMV_label)
63 * 1823: function getSingleField_typeGroup($table,$field,$row,&$PA)
64 * 1992: function getSingleField_typeNone($table,$field,$row,&$PA)
65 * 2008: function getSingleField_typeNone_render($config,$itemValue)
66 * 2070: function getSingleField_typeFlex($table,$field,$row,&$PA)
67 * 2205: function getSingleField_typeFlex_langMenu($languages,$elName,$selectedLanguage,$multi=1)
68 * 2224: function getSingleField_typeFlex_sheetMenu($sArr,$elName,$sheetKey)
69 * 2259: function getSingleField_typeFlex_draw($dataStruct,$editData,$cmdData,$table,$field,$row,&$PA,$formPrefix='',$level=0,$tRows=array())
70 * 2452: function getSingleField_typeUnknown($table,$field,$row,&$PA)
71 * 2467: function getSingleField_typeUser($table,$field,$row,&$PA)
72 *
73 * SECTION: Field content processing
74 * 2496: function formatValue ($config, $itemValue)
75 *
76 * SECTION: "Configuration" fetching/processing functions
77 * 2588: function getRTypeNum($table,$row)
78 * 2614: function rearrange($fields)
79 * 2640: function getExcludeElements($table,$row,$typeNum)
80 * 2688: function getFieldsToAdd($table,$row,$typeNum)
81 * 2713: function mergeFieldsWithAddedFields($fields,$fieldsToAdd)
82 * 2745: function setTSconfig($table,$row,$field='')
83 * 2767: function getSpecConfForField($table,$row,$field)
84 * 2788: function getSpecConfFromString($extraString, $defaultExtras)
85 *
86 * SECTION: Display of localized content etc.
87 * 2816: function registerDefaultLanguageData($table,$rec)
88 * 2848: function getLanguageOverlayRawValue($table, $row, $field, $fieldConf)
89 * 2876: function renderDefaultLanguageContent($table,$field,$row,$item)
90 * 2899: function renderDefaultLanguageDiff($table,$field,$row,$item)
91 *
92 * SECTION: Form element helper functions
93 * 2955: function dbFileIcons($fName,$mode,$allowed,$itemArray,$selector='',$params=array(),$onFocus='')
94 * 3108: function getClipboardElements($allowed,$mode)
95 * 3157: function getClickMenu($str,$table,$uid='')
96 * 3178: function renderWizards($itemKinds,$wizConf,$table,$row,$field,&$PA,$itemName,$specConf,$RTE=0)
97 * 3382: function getIcon($icon)
98 * 3409: function optionTagStyle($iconString)
99 * 3425: function extractValuesOnlyFromValueLabelList($itemFormElValue)
100 * 3447: function wrapOpenPalette($header,$table,$row,$palette,$retFunc=0)
101 * 3471: function checkBoxParams($itemName,$thisValue,$c,$iCount,$addFunc='')
102 * 3485: function elName($itemName)
103 * 3496: function noTitle($str,$wrapParts=array())
104 * 3505: function blur()
105 * 3514: function thisReturnUrl()
106 * 3527: function getSingleHiddenField($table,$field,$row)
107 * 3549: function formWidth($size=48,$textarea=0)
108 * 3576: function formWidthText($size=48,$wrap='')
109 * 3592: function formElStyle($type)
110 * 3603: function formElClass($type)
111 * 3614: function formElStyleClassValue($type, $class=FALSE)
112 * 3638: function insertDefStyle($type)
113 * 3657: function getDynTabMenu($parts, $idString)
114 *
115 * SECTION: Item-array manipulation functions (check/select/radio)
116 * 3696: function initItemArray($fieldValue)
117 * 3714: function addItems($items,$iArray)
118 * 3736: function procItems($items,$iArray,$config,$table,$row,$field)
119 * 3760: function addSelectOptionsToItemArray($items,$fieldValue,$TSconfig,$field)
120 * 3980: function addSelectOptionsToItemArray_makeModuleData($value)
121 * 4002: function foreignTable($items,$fieldValue,$TSconfig,$field,$pFFlag=0)
122 *
123 * SECTION: Template functions
124 * 4083: function setNewBEDesign()
125 * 4138: function intoTemplate($inArr,$altTemplate='')
126 * 4162: function addUserTemplateMarkers($marker,$table,$field,$row,&$PA)
127 * 4173: function wrapLabels($str)
128 * 4186: function wrapTotal($c,$rec,$table)
129 * 4199: function replaceTableWrap($arr,$rec,$table)
130 * 4236: function wrapBorder(&$out_array,&$out_pointer)
131 * 4258: function rplColorScheme($inTemplate)
132 * 4278: function getDivider()
133 * 4288: function printPalette($palArr)
134 * 4339: function helpTextIcon($table,$field,$force=0)
135 * 4359: function helpText($table,$field)
136 * 4380: function setColorScheme($scheme)
137 * 4404: function resetSchemes()
138 * 4415: function storeSchemes()
139 * 4427: function restoreSchemes()
140 *
141 * SECTION: JavaScript related functions
142 * 4457: function JStop()
143 * 4508: function JSbottom($formname='forms[0]')
144 * 4835: function dbFileCon($formObj='document.forms[0]')
145 * 5053: function printNeededJSFunctions()
146 * 5080: function printNeededJSFunctions_top()
147 *
148 * SECTION: Various helper functions
149 * 5128: function getDefaultRecord($table,$pid=0)
150 * 5167: function getRecordPath($table,$rec)
151 * 5181: function readPerms()
152 * 5195: function sL($str)
153 * 5208: function getLL($str)
154 * 5229: function isPalettesCollapsed($table,$palette)
155 * 5245: function isDisplayCondition($displayCond,$row,$ffValueKey='')
156 * 5349: function getTSCpid($table,$uid,$pid)
157 * 5363: function doLoadTableDescr($table)
158 * 5375: function getAvailableLanguages($onlyIsoCoded=1,$setDefault=1)
159 *
160 *
161 * 5417: class t3lib_TCEforms_FE extends t3lib_TCEforms
162 * 5425: function wrapLabels($str)
163 * 5435: function printPalette($palArr)
164 * 5460: function setFancyDesign()
165 *
166 * TOTAL FUNCTIONS: 100
167 * (This index is automatically created/updated by the extension "extdeveval")
168 *
169 */
170
171
172
173
174
175
176
177
178
179
180
181
182
183 require_once(PATH_t3lib.'class.t3lib_diff.php');
184 require_once(PATH_t3lib.'class.t3lib_tceforms_inline.php');
185
186
187
188 /**
189 * 'TCEforms' - Class for creating the backend editing forms.
190 *
191 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
192 * @coauthor Rene Fritz <r.fritz@colorcube.de>
193 * @package TYPO3
194 * @subpackage t3lib
195 */
196 class t3lib_TCEforms {
197
198 // variables not commented yet.... (do so...)
199 var $palFieldArr = array();
200 var $disableWizards = 0;
201 var $isPalettedoc = 0;
202 var $paletteMargin = 1;
203 var $defStyle = ''; // 'font-family:Verdana;font-size:10px;';
204 var $cachedTSconfig = array();
205 var $cachedTSconfig_fieldLevel = array();
206 var $cachedLanguageFlag = array();
207 var $cachedAdditionalPreviewLanguages = NULL;
208 var $transformedRow = array();
209 var $extJSCODE = '';
210 var $printNeededJS = array();
211 var $hiddenFieldAccum=array();
212 var $TBE_EDITOR_fieldChanged_func='';
213 var $loadMD5_JS=1;
214 var $prevBorderStyle='[nothing here...]'; // Something unique...
215 var $allowUpload=0; // If set direct upload fields will be shown
216 var $titleLen=15; // @deprecated: $BE_USER->uc['titleLen'] but what is default??
217 var $defaultLanguageData = array(); // Array where records in the default language is stored. (processed by transferdata)
218 var $defaultLanguageData_diff = array(); // Array where records in the default language is stored (raw without any processing. used for making diff)
219 var $additionalPreviewLanguageData = array();
220
221
222 // EXTERNAL, static
223 var $backPath=''; // Set this to the 'backPath' pointing back to the typo3 admin directory from the script where this form is displayed.
224 var $returnUrl=''; // Alternative return URL path (default is t3lib_div::linkThisScript())
225 var $doSaveFieldName=''; // Can be set to point to a field name in the form which will be set to '1' when the form is submitted with a *save* button. This way the recipient script can determine that the form was submitted for save and not "close" for example.
226 var $palettesCollapsed=0; // Can be set true/false to whether palettes (secondary options) are in the topframe or in form. True means they are NOT IN-form. So a collapsed palette is one, which is shown in the top frame, not in the page.
227 var $disableRTE=0; // If set, the RTE is disabled (from form display, eg. by checkbox in the bottom of the page!)
228 var $globalShowHelp=1; // If false, then all CSH will be disabled, regardless of settings in $this->edit_showFieldHelp
229 var $localizationMode=''; // If true, the forms are rendering only localization relevant fields of the records.
230 var $fieldOrder=''; // Overrule the field order set in TCA[types][showitem], eg for tt_content this value, 'bodytext,image', would make first the 'bodytext' field, then the 'image' field (if set for display)... and then the rest in the old order.
231 var $doPrintPalette=1; // If set to false, palettes will NEVER be rendered.
232 var $clipObj=FALSE; // Set to initialized clipboard object; Then the element browser will offer a link to paste in records from clipboard.
233 var $enableClickMenu=FALSE; // Enable click menu on reference icons.
234 var $enableTabMenu = FALSE; // Enable Tab Menus. If set to true, the JavaScript content from template::getDynTabMenuJScode() must be included in the document.
235 var $renderReadonly = FALSE; // When enabled all fields are rendered non-editable.
236
237 var $form_rowsToStylewidth = 9.58; // Form field width compensation: Factor from NN4 form field widths to style-aware browsers (like NN6+ and MSIE, with the $CLIENT[FORMSTYLE] value set)
238 var $form_largeComp = 1.33; // Form field width compensation: Compensation for large documents, doc-tab (editing)
239 var $charsPerRow=40; // The number of chars expected per row when the height of a text area field is automatically calculated based on the number of characters found in the field content.
240 var $maxTextareaWidth=48; // The maximum abstract value for textareas
241 var $maxInputWidth=48; // The maximum abstract value for input fields
242 var $defaultMultipleSelectorStyle='width:250px;'; // Default style for the selector boxes used for multiple items in "select" and "group" types.
243
244
245 // INTERNAL, static
246 var $prependFormFieldNames = 'data'; // The string to prepend formfield names with.
247 var $prependCmdFieldNames = 'cmd'; // The string to prepend commands for tcemain::process_cmdmap with.
248 var $prependFormFieldNames_file = 'data_files'; // The string to prepend FILE form field names with.
249 var $formName = 'editform'; // The name attribute of the form.
250 var $allowOverrideMatrix = array(); // Whitelist that allows TCA field configuration to be overridden by TSconfig, @see overrideFieldConf()
251
252
253
254 // INTERNAL, dynamic
255 var $perms_clause=''; // Set by readPerms() (caching)
256 var $perms_clause_set=0; // Set by readPerms() (caching-flag)
257 var $edit_showFieldHelp=''; // Used to indicate the mode of CSH (Context Sensitive Help), whether it should be icons-only ('icon'), full description ('text') or not at all (blank).
258 var $docLarge=0; // If set, the forms will be rendered a little wider, more precisely with a factor of $this->form_largeComp.
259 var $clientInfo=array(); // Loaded with info about the browser when class is instantiated.
260 var $RTEenabled=0; // True, if RTE is possible for the current user (based on result from BE_USER->isRTE())
261 var $RTEenabled_notReasons=''; // If $this->RTEenabled was false, you can find the reasons listed in this array which is filled with reasons why the RTE could not be loaded)
262 var $RTEcounter = 0; // Counter that is incremented before an RTE is created. Can be used for unique ids etc.
263
264 var $colorScheme; // Contains current color scheme
265 var $classScheme; // Contains current class scheme
266 var $defColorScheme; // Contains the default color scheme
267 var $defClassScheme; // Contains the default class scheme
268 var $fieldStyle; // Contains field style values
269 var $borderStyle; // Contains border style values.
270
271 var $commentMessages=array(); // An accumulation of messages from the class.
272
273 // INTERNAL, templates
274 var $totalWrap='<hr />|<hr />'; // Total wrapping for the table rows.
275 var $fieldTemplate='<b>###FIELD_NAME###</b><br />###FIELD_ITEM###<hr />'; // Field template
276 var $sectionWrap=''; // Wrapping template code for a section
277 var $palFieldTemplateHeader=''; // Template for palette headers
278 var $palFieldTemplate=''; // Template for palettes
279
280 // INTERNAL, working memory
281 var $excludeElements=''; // Set to the fields NOT to display, if any.
282 var $palettesRendered=array(); // During rendering of forms this will keep track of which palettes has already been rendered (so they are not rendered twice by mistake)
283 var $hiddenFieldListArr = array(); // This array of fields will be set as hidden-fields instead of rendered normally! For instance palette fields edited in the top frame are set as hidden fields since the main form has to submit the values. The top frame actually just sets the value in the main form!
284 var $requiredFields=array(); // Used to register input-field names, which are required. (Done during rendering of the fields). This information is then used later when the JavaScript is made.
285 var $requiredElements=array(); // Used to register the min and max number of elements for selectorboxes where that apply (in the "group" type for instance)
286 var $renderDepth=0; // Keeps track of the rendering depth of nested records.
287 var $savedSchemes=array(); // Color scheme buffer.
288 var $dynNestedStack = array(); // holds the path an element is nested in (e.g. required for RTEhtmlarea)
289
290 // Internal, registers for user defined functions etc.
291 var $additionalCode_pre = array(); // Additional HTML code, printed before the form.
292 var $additionalJS_pre = array(); // Additional JavaScript, printed before the form
293 var $additionalJS_post = array(); // Additional JavaScript printed after the form
294 var $additionalJS_submit = array(); // Additional JavaScript executed on submit; If you set "OK" variable it will raise an error about RTEs not being loaded and offer to block further submission.
295
296 var $inline; // Instance of t3lib_tceforms_inline
297 var $hookObjectsMainFields = array(); // Array containing hook class instances called once for a form
298 var $hookObjectsSingleField = array(); // Array containing hook class instances called for each field
299 var $extraFormHeaders = array(); // Rows gettings inserted into the alt_doc headers (when called from alt_doc.php)
300
301
302
303
304
305 /**
306 * Constructor function, setting internal variables, loading the styles used.
307 *
308 * @return void
309 */
310 function t3lib_TCEforms() {
311 global $CLIENT, $TYPO3_CONF_VARS;
312
313 $this->clientInfo = t3lib_div::clientInfo();
314
315 $this->RTEenabled = $GLOBALS['BE_USER']->isRTE();
316 if (!$this->RTEenabled) {
317 $this->RTEenabled_notReasons = implode(chr(10),$GLOBALS['BE_USER']->RTE_errors);
318 $this->commentMessages[] = 'RTE NOT ENABLED IN SYSTEM due to:'.chr(10).$this->RTEenabled_notReasons;
319 }
320
321 // Default color+class scheme
322 $this->defColorScheme = array(
323 $GLOBALS['SOBE']->doc->bgColor, // Background for the field AND palette
324 t3lib_div::modifyHTMLColorAll($GLOBALS['SOBE']->doc->bgColor,-20), // Background for the field header
325 t3lib_div::modifyHTMLColorAll($GLOBALS['SOBE']->doc->bgColor,-10), // Background for the palette field header
326 'black', // Field header font color
327 '#666666' // Palette field header font color
328 );
329 $this->defColorScheme = array();
330
331 // Override / Setting defaults from TBE_STYLES array
332 $this->resetSchemes();
333
334 // Setting the current colorScheme to default.
335 $this->defColorScheme = $this->colorScheme;
336 $this->defClassScheme = $this->classScheme;
337
338 // Define whitelist that allows TCA field configuration to be overridden by TSconfig, @see overrideFieldConf():
339 $this->allowOverrideMatrix = array(
340 'input' => array('size', 'max'),
341 'text' => array('cols', 'rows', 'wrap'),
342 'check' => array('cols', 'showIfRTE'),
343 'select' => array('size', 'autoSizeMax', 'maxitems', 'minitems'),
344 'group' => array('size', 'autoSizeMax', 'max_size', 'show_thumbs', 'maxitems', 'minitems'),
345 'inline' => array('appearance', 'foreign_label', 'foreign_selector', 'foreign_unique', 'maxitems', 'minitems', 'size', 'autoSizeMax', 'symmetric_label'),
346 );
347
348 $this->inline = t3lib_div::makeInstance('t3lib_TCEforms_inline');
349
350 // Prepare user defined objects (if any) for hooks which extend this function:
351 $this->hookObjectsMainFields = array();
352 if (is_array ($TYPO3_CONF_VARS['SC_OPTIONS']['t3lib/class.t3lib_tceforms.php']['getMainFieldsClass'])) {
353 foreach ($TYPO3_CONF_VARS['SC_OPTIONS']['t3lib/class.t3lib_tceforms.php']['getMainFieldsClass'] as $classRef) {
354 $this->hookObjectsMainFields[] = &t3lib_div::getUserObj($classRef);
355 }
356 }
357 $this->hookObjectsSingleField = array();
358 if (is_array ($TYPO3_CONF_VARS['SC_OPTIONS']['t3lib/class.t3lib_tceforms.php']['getSingleFieldClass'])) {
359 foreach ($TYPO3_CONF_VARS['SC_OPTIONS']['t3lib/class.t3lib_tceforms.php']['getSingleFieldClass'] as $classRef) {
360 $this->hookObjectsSingleField[] = &t3lib_div::getUserObj($classRef);
361 }
362 }
363
364 }
365
366 /**
367 * Initialize various internal variables.
368 *
369 * @return void
370 */
371 function initDefaultBEmode() {
372 global $BE_USER;
373 $this->prependFormFieldNames = 'data';
374 $this->formName = 'editform';
375 $this->setNewBEDesign();
376 $this->docLarge = $BE_USER->uc['edit_wideDocument'] ? 1 : 0;
377 $this->edit_showFieldHelp = $BE_USER->uc['edit_showFieldHelp'];
378
379 $this->edit_docModuleUpload = $BE_USER->uc['edit_docModuleUpload'];
380 $this->titleLen = $BE_USER->uc['titleLen']; // @deprecated
381
382 $this->inline->init($this);
383 }
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401 /*******************************************************
402 *
403 * Rendering the forms, fields etc
404 *
405 *******************************************************/
406
407 /**
408 * Will return the TCEform element for just a single field from a record.
409 * The field must be listed in the currently displayed fields (as found in [types][showitem]) for the record.
410 * This also means that the $table/$row supplied must be complete so the list of fields to show can be found correctly
411 *
412 * @param string The table name
413 * @param array The record from the table for which to render a field.
414 * @param string The field name to return the TCEform element for.
415 * @return string HTML output
416 * @see getMainFields()
417 */
418 function getSoloField($table,$row,$theFieldToReturn) {
419 global $TCA;
420
421 if ($TCA[$table]) {
422 t3lib_div::loadTCA($table);
423 $typeNum = $this->getRTypeNum($table,$row);
424 if ($TCA[$table]['types'][$typeNum]) {
425 $itemList = $TCA[$table]['types'][$typeNum]['showitem'];
426 if ($itemList) {
427 $fields = t3lib_div::trimExplode(',',$itemList,1);
428 $excludeElements = $this->excludeElements = $this->getExcludeElements($table,$row,$typeNum);
429
430 reset($fields);
431 while(list(,$fieldInfo)=each($fields)) {
432 $parts = explode(';',$fieldInfo);
433
434 $theField = trim($parts[0]);
435 if (!in_array($theField,$excludeElements) && !strcmp($theField,$theFieldToReturn)) {
436 if ($TCA[$table]['columns'][$theField]) {
437 $sField = $this->getSingleField($table,$theField,$row,$parts[1],1,$parts[3],$parts[2]);
438 return $sField['ITEM'];
439 }
440 }
441 }
442 }
443 }
444 }
445 }
446
447 /**
448 * Based on the $table and $row of content, this displays the complete TCEform for the record.
449 * The input-$row is required to be preprocessed if necessary by eg. the t3lib_transferdata class. For instance the RTE content should be transformed through this class first.
450 *
451 * @param string The table name
452 * @param array The record from the table for which to render a field.
453 * @param integer Depth level
454 * @return string HTML output
455 * @see getSoloField()
456 */
457 function getMainFields($table,$row,$depth=0) {
458 global $TCA, $TYPO3_CONF_VARS;
459
460 $this->renderDepth=$depth;
461
462 // Init vars:
463 $out_array = array(array());
464 $out_array_meta = array(array(
465 'title' => $this->getLL('l_generalTab')
466 ));
467
468 $out_pointer=0;
469 $out_sheet=0;
470 $this->palettesRendered=array();
471 $this->palettesRendered[$this->renderDepth][$table]=array();
472
473 // Hook: getMainFields_preProcess (requested by Thomas Hempel for use with the "dynaflex" extension)
474 foreach ($this->hookObjectsMainFields as $hookObj) {
475 if (method_exists($hookObj,'getMainFields_preProcess')) {
476 $hookObj->getMainFields_preProcess($table,$row,$this);
477 }
478 }
479
480 if ($TCA[$table]) {
481
482 // Load the full TCA for the table.
483 t3lib_div::loadTCA($table);
484
485 // Load the description content for the table.
486 if ($this->edit_showFieldHelp || $this->doLoadTableDescr($table)) {
487 $GLOBALS['LANG']->loadSingleTableDescription($table);
488 }
489 // Get the current "type" value for the record.
490 $typeNum = $this->getRTypeNum($table,$row);
491
492 // Find the list of fields to display:
493 if ($TCA[$table]['types'][$typeNum]) {
494 $itemList = $TCA[$table]['types'][$typeNum]['showitem'];
495 if ($itemList) { // If such a list existed...
496 // Explode the field list and possibly rearrange the order of the fields, if configured for
497 $fields = t3lib_div::trimExplode(',',$itemList,1);
498 if ($this->fieldOrder) {
499 $fields = $this->rearrange($fields);
500 }
501
502 // Get excluded fields, added fiels and put it together:
503 $excludeElements = $this->excludeElements = $this->getExcludeElements($table,$row,$typeNum);
504 $fields = $this->mergeFieldsWithAddedFields($fields,$this->getFieldsToAdd($table,$row,$typeNum));
505
506 // If TCEforms will render a tab menu in the next step, push the name to the tab stack:
507 if (strstr($itemList, '--div--') !== false && $this->enableTabMenu && $TCA[$table]['ctrl']['dividers2tabs']) {
508 $tabIdentString = 'TCEforms:'.$table.':'.$row['uid'];
509 $tabIdentStringMD5 = $GLOBALS['TBE_TEMPLATE']->getDynTabMenuId('TCEforms:'.$table.':'.$row['uid']);
510 // Remember that were currently working on the general tab:
511 if (isset($fields[0]) && strpos($fields[0], '--div--') !== 0) {
512 $this->pushToDynNestedStack('tab', $tabIdentStringMD5.'-1');
513 }
514 }
515
516 // Traverse the fields to render:
517 $cc=0;
518 foreach($fields as $fieldInfo) {
519 // Exploding subparts of the field configuration:
520 $parts = explode(';',$fieldInfo);
521
522 // Getting the style information out:
523 $color_style_parts = t3lib_div::trimExplode('-',$parts[4]);
524 if (strcmp($color_style_parts[0],'')) {
525 $this->setColorScheme($GLOBALS['TBE_STYLES']['colorschemes'][intval($color_style_parts[0])]);
526 }
527 if (strcmp($color_style_parts[1],'')) {
528 $this->fieldStyle = $GLOBALS['TBE_STYLES']['styleschemes'][intval($color_style_parts[1])];
529 if (!isset($this->fieldStyle)) $this->fieldStyle = $GLOBALS['TBE_STYLES']['styleschemes'][0];
530 }
531 if (strcmp($color_style_parts[2],'')) {
532 $this->wrapBorder($out_array[$out_sheet],$out_pointer);
533 $this->borderStyle = $GLOBALS['TBE_STYLES']['borderschemes'][intval($color_style_parts[2])];
534 if (!isset($this->borderStyle)) $this->borderStyle = $GLOBALS['TBE_STYLES']['borderschemes'][0];
535 }
536
537 // Render the field:
538 $theField = $parts[0];
539 if (!in_array($theField,$excludeElements)) {
540 if ($TCA[$table]['columns'][$theField]) {
541 $sFieldPal='';
542
543 if ($parts[2] && !isset($this->palettesRendered[$this->renderDepth][$table][$parts[2]])) {
544 $sFieldPal=$this->getPaletteFields($table,$row,$parts[2]);
545 $this->palettesRendered[$this->renderDepth][$table][$parts[2]] = 1;
546 }
547 $sField = $this->getSingleField($table,$theField,$row,$parts[1],0,$parts[3],$parts[2]);
548 if ($sField) { $sField.= $sFieldPal; }
549
550 $out_array[$out_sheet][$out_pointer].= $sField;
551 } elseif ($theField=='--div--') {
552 if ($cc>0) {
553 $out_array[$out_sheet][$out_pointer].=$this->getDivider();
554
555 if ($this->enableTabMenu && $TCA[$table]['ctrl']['dividers2tabs']) {
556 $this->wrapBorder($out_array[$out_sheet],$out_pointer);
557 // Remove last tab entry from the dynNestedStack:
558 $out_sheet++;
559 // Remove the previous sheet from stack (if any):
560 $this->popFromDynNestedStack('tab', $tabIdentStringMD5.'-'.($out_sheet));
561 // Remember on which sheet we're currently working:
562 $this->pushToDynNestedStack('tab', $tabIdentStringMD5.'-'.($out_sheet+1));
563 $out_array[$out_sheet] = array();
564 $out_array_meta[$out_sheet]['title'] = $this->sL($parts[1]);
565 }
566 } else { // Setting alternative title for "General" tab if "--div--" is the very first element.
567 $out_array_meta[$out_sheet]['title'] = $this->sL($parts[1]);
568 // Only add the first tab to the dynNestedStack if there are more tabs:
569 if (strpos($itemList, '--div--', strlen($fieldInfo))) {
570 $this->pushToDynNestedStack('tab', $tabIdentStringMD5.'-1');
571 }
572 }
573 } elseif($theField=='--palette--') {
574 if ($parts[2] && !isset($this->palettesRendered[$this->renderDepth][$table][$parts[2]])) {
575 // render a 'header' if not collapsed
576 if ($TCA[$table]['palettes'][$parts[2]]['canNotCollapse'] AND $parts[1]) {
577 $out_array[$out_sheet][$out_pointer].=$this->getPaletteFields($table,$row,$parts[2],$this->sL($parts[1]));
578 } else {
579 $out_array[$out_sheet][$out_pointer].=$this->getPaletteFields($table,$row,$parts[2],'','',$this->sL($parts[1]));
580 }
581 $this->palettesRendered[$this->renderDepth][$table][$parts[2]] = 1;
582 }
583 }
584 }
585
586 $cc++;
587 }
588 }
589 }
590 }
591
592 // Hook: getMainFields_postProcess (requested by Thomas Hempel for use with the "dynaflex" extension)
593 foreach ($this->hookObjectsMainFields as $hookObj) {
594 if (method_exists($hookObj,'getMainFields_postProcess')) {
595 $hookObj->getMainFields_postProcess($table,$row,$this);
596 }
597 }
598
599 // Wrapping a border around it all:
600 $this->wrapBorder($out_array[$out_sheet],$out_pointer);
601
602 // Resetting styles:
603 $this->resetSchemes();
604
605 // Rendering Main palettes, if any
606 $mParr = t3lib_div::trimExplode(',',$TCA[$table]['ctrl']['mainpalette']);
607 $i = 0;
608 if (count($mParr)) {
609 foreach ($mParr as $mP) {
610 if (!isset($this->palettesRendered[$this->renderDepth][$table][$mP])) {
611 $temp_palettesCollapsed=$this->palettesCollapsed;
612 $this->palettesCollapsed=0;
613 $label = ($i==0?$this->getLL('l_generalOptions'):$this->getLL('l_generalOptions_more'));
614 $out_array[$out_sheet][$out_pointer].=$this->getPaletteFields($table,$row,$mP,$label);
615 $this->palettesCollapsed=$temp_palettesCollapsed;
616 $this->palettesRendered[$this->renderDepth][$table][$mP] = 1;
617 }
618 $this->wrapBorder($out_array[$out_sheet],$out_pointer);
619 $i++;
620 if ($this->renderDepth) {
621 $this->renderDepth--;
622 }
623 }
624 }
625
626 // Return the imploded $out_array:
627 if ($out_sheet>0) { // There were --div-- dividers around...
628
629 // Create parts array for the tab menu:
630 $parts = array();
631 foreach ($out_array as $idx => $sheetContent) {
632 $parts[] = array(
633 'label' => $out_array_meta[$idx]['title'],
634 'content' => '<table border="0" cellspacing="0" cellpadding="0" width="100%">'.
635 implode('',$sheetContent).
636 '</table>'
637 );
638 }
639
640 // Unset the current level of tab menus:
641 $this->popFromDynNestedStack('tab', $tabIdentStringMD5.'-'.($out_sheet+1));
642
643 return '
644 <tr>
645 <td colspan="2">
646 '.$this->getDynTabMenu($parts, $tabIdentString).'
647 </td>
648 </tr>';
649 } else { // Only one, so just implode:
650 return implode('',$out_array[$out_sheet]);
651 }
652 }
653
654 /**
655 * Will return the TCEform elements for a pre-defined list of fields.
656 * Notice that this will STILL use the configuration found in the list [types][showitem] for those fields which are found there. So ideally the list of fields given as argument to this function should also be in the current [types][showitem] list of the record.
657 * Used for displaying forms for the frontend edit icons for instance.
658 *
659 * @param string The table name
660 * @param array The record array.
661 * @param string Commalist of fields from the table. These will be shown in the specified order in a form.
662 * @return string TCEform elements in a string.
663 */
664 function getListedFields($table,$row,$list) {
665 global $TCA;
666
667 t3lib_div::loadTCA($table);
668 if ($this->edit_showFieldHelp || $this->doLoadTableDescr($table)) {
669 $GLOBALS['LANG']->loadSingleTableDescription($table);
670 }
671
672 $out = '';
673 $types_fieldConfig = t3lib_BEfunc::getTCAtypes($table,$row,1);
674
675 $editFieldList=array_unique(t3lib_div::trimExplode(',',$list,1));
676 foreach($editFieldList as $theFieldC) {
677 list($theField,$palFields) = split('\[|\]',$theFieldC);
678 $theField = trim($theField);
679 $palFields = trim($palFields);
680 if ($TCA[$table]['columns'][$theField]) {
681 $parts = t3lib_div::trimExplode(';',$types_fieldConfig[$theField]['origString']);
682 $sField = $this->getSingleField($table,$theField,$row,$parts[1],0,$parts[3],0); // Don't sent palette pointer - there are no options anyways for a field-list.
683 $out.= $sField;
684 } elseif($theField=='--div--') {
685 $out.= $this->getDivider();
686 }
687 if ($palFields) {
688 $out.= $this->getPaletteFields($table,$row,'','',implode(',',t3lib_div::trimExplode('|',$palFields,1)));
689 }
690 }
691
692 return $out;
693 }
694
695 /**
696 * Creates a palette (collection of secondary options).
697 *
698 * @param string The table name
699 * @param array The row array
700 * @param string The palette number/pointer
701 * @param string Header string for the palette (used when in-form). If not set, no header item is made.
702 * @param string Optional alternative list of fields for the palette
703 * @param string Optional Link text for activating a palette (when palettes does not have another form element to belong to).
704 * @return string HTML code.
705 */
706 function getPaletteFields($table,$row,$palette,$header='',$itemList='',$collapsedHeader='') {
707 global $TCA;
708 if (!$this->doPrintPalette) return '';
709
710 $out='';
711 $palParts = array();
712 t3lib_div::loadTCA($table);
713
714 // Getting excludeElements, if any.
715 if (!is_array($this->excludeElements)) {
716 $this->excludeElements = $this->getExcludeElements($table,$row,$this->getRTypeNum($table,$row));
717 }
718
719 // Render the palette TCEform elements.
720 if ($TCA[$table] && (is_array($TCA[$table]['palettes'][$palette]) || $itemList)) {
721 $itemList = $itemList?$itemList:$TCA[$table]['palettes'][$palette]['showitem'];
722 if ($itemList) {
723 $fields = t3lib_div::trimExplode(',',$itemList,1);
724 reset($fields);
725 while(list(,$fieldInfo)=each($fields)) {
726 $parts = t3lib_div::trimExplode(';',$fieldInfo);
727 $theField = $parts[0];
728
729 if (!in_array($theField,$this->excludeElements) && $TCA[$table]['columns'][$theField]) {
730 $this->palFieldArr[$palette][] = $theField;
731 if ($this->isPalettesCollapsed($table,$palette)) {
732 $this->hiddenFieldListArr[] = $theField;
733 }
734
735 $part = $this->getSingleField($table,$theField,$row,$parts[1],1,'',$parts[2]);
736 if (is_array($part)) {
737 $palParts[] = $part;
738 }
739 }
740 }
741 }
742 }
743 // Put palette together if there are fields in it:
744 if (count($palParts)) {
745 if ($header) {
746 $out.= $this->intoTemplate(array(
747 'HEADER' => htmlspecialchars($header)
748 ),
749 $this->palFieldTemplateHeader
750 );
751 }
752 $out.= $this->intoTemplate(array(
753 'PALETTE' => $this->printPalette($palParts)
754 ),
755 $this->palFieldTemplate
756 );
757 }
758 // If a palette is collapsed (not shown in form, but in top frame instead) AND a collapse header string is given, then make that string a link to activate the palette.
759 if ($this->isPalettesCollapsed($table,$palette) && $collapsedHeader) {
760 $pC = $this->intoTemplate(array(
761 'PALETTE' => $this->wrapOpenPalette('<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/options.gif','width="18" height="16"').' border="0" title="'.htmlspecialchars($this->getLL('l_moreOptions')).'" align="top" alt="" /><strong>'.$collapsedHeader.'</strong>',$table,$row,$palette),
762 ),
763 $this->palFieldTemplate
764 );
765 $out.= $pC;
766 }
767
768 return $out;
769 }
770
771 /**
772 * Returns the form HTML code for a database table field.
773 *
774 * @param string The table name
775 * @param string The field name
776 * @param array The record to edit from the database table.
777 * @param string Alternative field name label to show.
778 * @param boolean Set this if the field is on a palette (in top frame), otherwise not. (if set, field will render as a hidden field).
779 * @param string The "extra" options from "Part 4" of the field configurations found in the "types" "showitem" list. Typically parsed by $this->getSpecConfFromString() in order to get the options as an associative array.
780 * @param integer The palette pointer.
781 * @return mixed String (normal) or array (palettes)
782 */
783 function getSingleField($table,$field,$row,$altName='',$palette=0,$extra='',$pal=0) {
784 global $TCA,$BE_USER;
785
786 // Hook: getSingleField_preProcess
787 foreach ($this->hookObjectsSingleField as $hookObj) {
788 if (method_exists($hookObj,'getSingleField_preProcess')) {
789 $hookObj->getSingleField_preProcess($table, $field, $row, $altName, $palette, $extra, $pal, $this);
790 }
791 }
792
793 $out = '';
794 $PA = array();
795 $PA['altName'] = $altName;
796 $PA['palette'] = $palette;
797 $PA['extra'] = $extra;
798 $PA['pal'] = $pal;
799
800 // Make sure to load full $TCA array for the table:
801 t3lib_div::loadTCA($table);
802
803 // Get the TCA configuration for the current field:
804 $PA['fieldConf'] = $TCA[$table]['columns'][$field];
805 $PA['fieldConf']['config']['form_type'] = $PA['fieldConf']['config']['form_type'] ? $PA['fieldConf']['config']['form_type'] : $PA['fieldConf']['config']['type']; // Using "form_type" locally in this script
806
807 $skipThisField = $this->inline->skipField($table, $field, $row, $PA['fieldConf']['config']);
808
809 // Now, check if this field is configured and editable (according to excludefields + other configuration)
810 if ( is_array($PA['fieldConf']) &&
811 !$skipThisField &&
812 (!$PA['fieldConf']['exclude'] || $BE_USER->check('non_exclude_fields',$table.':'.$field)) &&
813 $PA['fieldConf']['config']['form_type']!='passthrough' &&
814 ($this->RTEenabled || !$PA['fieldConf']['config']['showIfRTE']) &&
815 (!$PA['fieldConf']['displayCond'] || $this->isDisplayCondition($PA['fieldConf']['displayCond'],$row)) &&
816 (!$TCA[$table]['ctrl']['languageField'] || $PA['fieldConf']['l10n_display'] || strcmp($PA['fieldConf']['l10n_mode'],'exclude') || $row[$TCA[$table]['ctrl']['languageField']]<=0) &&
817 (!$TCA[$table]['ctrl']['languageField'] || !$this->localizationMode || $this->localizationMode===$PA['fieldConf']['l10n_cat'])
818 ) {
819
820
821
822 // Fetching the TSconfig for the current table/field. This includes the $row which means that
823 $PA['fieldTSConfig'] = $this->setTSconfig($table,$row,$field);
824
825 // If the field is NOT disabled from TSconfig (which it could have been) then render it
826 if (!$PA['fieldTSConfig']['disabled']) {
827 // Override fieldConf by fieldTSconfig:
828 $PA['fieldConf']['config'] = $this->overrideFieldConf($PA['fieldConf']['config'], $PA['fieldTSConfig']);
829
830 // Init variables:
831 $PA['itemFormElName']=$this->prependFormFieldNames.'['.$table.']['.$row['uid'].']['.$field.']'; // Form field name
832 $PA['itemFormElName_file']=$this->prependFormFieldNames_file.'['.$table.']['.$row['uid'].']['.$field.']'; // Form field name, in case of file uploads
833 $PA['itemFormElValue']=$row[$field]; // The value to show in the form field.
834 $PA['itemFormElID']=$this->prependFormFieldNames.'_'.$table.'_'.$row['uid'].'_'.$field;
835
836 // set field to read-only if configured for translated records to show default language content as readonly
837 if ($PA['fieldConf']['l10n_display'] AND t3lib_div::inList($PA['fieldConf']['l10n_display'], 'defaultAsReadonly') AND $row[$TCA[$table]['ctrl']['languageField']]) {
838 $PA['fieldConf']['config']['readOnly'] = true;
839 $PA['itemFormElValue'] = $this->defaultLanguageData[$table.':'.$row['uid']][$field];
840 }
841
842 // Create a JavaScript code line which will ask the user to save/update the form due to changing the element. This is used for eg. "type" fields and others configured with "requestUpdate"
843 if (
844 ($TCA[$table]['ctrl']['type'] && !strcmp($field,$TCA[$table]['ctrl']['type'])) ||
845 ($TCA[$table]['ctrl']['requestUpdate'] && t3lib_div::inList($TCA[$table]['ctrl']['requestUpdate'],$field))) {
846 if($GLOBALS['BE_USER']->jsConfirmation(1)) {
847 $alertMsgOnChange = 'if (confirm(TBE_EDITOR.labels.onChangeAlert) && TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm() };';
848 } else {
849 $alertMsgOnChange = 'if (TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm() };';
850 }
851 } else {
852 $alertMsgOnChange = '';
853 }
854
855 // Render as a hidden field?
856 if (in_array($field,$this->hiddenFieldListArr)) {
857 $this->hiddenFieldAccum[]='<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
858 } else { // Render as a normal field:
859
860 // If the field is NOT a palette field, then we might create an icon which links to a palette for the field, if one exists.
861 if (!$PA['palette']) {
862 if ($PA['pal'] && $this->isPalettesCollapsed($table,$PA['pal'])) {
863 list($thePalIcon,$palJSfunc) = $this->wrapOpenPalette('<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/options.gif','width="18" height="16"').' border="0" title="'.htmlspecialchars($this->getLL('l_moreOptions')).'" alt="" />',$table,$row,$PA['pal'],1);
864 } else {
865 $thePalIcon = '';
866 $palJSfunc = '';
867 }
868 }
869 // onFocus attribute to add to the field:
870 $PA['onFocus'] = ($palJSfunc && !$BE_USER->uc['dontShowPalettesOnFocusInAB']) ? ' onfocus="'.htmlspecialchars($palJSfunc).'"' : '';
871
872 // Find item
873 $item='';
874 $PA['label'] = $PA['altName'] ? $PA['altName'] : $PA['fieldConf']['label'];
875 $PA['label'] = $this->sL($PA['label']);
876 // JavaScript code for event handlers:
877 $PA['fieldChangeFunc']=array();
878 $PA['fieldChangeFunc']['TBE_EDITOR_fieldChanged'] = "TBE_EDITOR.fieldChanged('".$table."','".$row['uid']."','".$field."','".$PA['itemFormElName']."');";
879 $PA['fieldChangeFunc']['alert']=$alertMsgOnChange;
880 // if this is the child of an inline type and it is the field creating the label
881 if ($this->inline->isInlineChildAndLabelField($table, $field)) {
882 $PA['fieldChangeFunc']['inline'] = "inline.handleChangedField('".$PA['itemFormElName']."','".$this->inline->inlineNames['object']."[$table][".$row['uid']."]');";
883 }
884
885 // Based on the type of the item, call a render function:
886 $item = $this->getSingleField_SW($table,$field,$row,$PA);
887
888 // Add language + diff
889 if ($PA['fieldConf']['l10n_display'] && (t3lib_div::inList($PA['fieldConf']['l10n_display'], 'hideDiff') || t3lib_div::inList($PA['fieldConf']['l10n_display'], 'defaultAsReadonly'))) {
890 $renderLanguageDiff = false;
891 } else {
892 $renderLanguageDiff = true;
893 }
894
895 if ($renderLanguageDiff) {
896 $item = $this->renderDefaultLanguageContent($table,$field,$row,$item);
897 $item = $this->renderDefaultLanguageDiff($table,$field,$row,$item);
898 }
899
900 // If the record has been saved and the "linkTitleToSelf" is set, we make the field name into a link, which will load ONLY this field in alt_doc.php
901 $PA['label'] = t3lib_div::deHSCentities(htmlspecialchars($PA['label']));
902 if (t3lib_div::testInt($row['uid']) && $PA['fieldTSConfig']['linkTitleToSelf'] && !t3lib_div::_GP('columnsOnly')) {
903 $lTTS_url = $this->backPath.'alt_doc.php?edit['.$table.']['.$row['uid'].']=edit&columnsOnly='.$field.'&returnUrl='.rawurlencode($this->thisReturnUrl());
904 $PA['label'] = '<a href="'.htmlspecialchars($lTTS_url).'">'.$PA['label'].'</a>';
905 }
906
907 // Create output value:
908 if ($PA['fieldConf']['config']['form_type']=='user' && $PA['fieldConf']['config']['noTableWrapping']) {
909 $out = $item;
910 } elseif ($PA['palette']) {
911 // Array:
912 $out=array(
913 'NAME'=>$PA['label'],
914 'ID'=>$row['uid'],
915 'FIELD'=>$field,
916 'TABLE'=>$table,
917 'ITEM'=>$item,
918 'HELP_ICON' => $this->helpTextIcon($table,$field,1)
919 );
920 $out = $this->addUserTemplateMarkers($out,$table,$field,$row,$PA);
921 } else {
922 // String:
923 $out=array(
924 'NAME'=>$PA['label'],
925 'ITEM'=>$item,
926 'TABLE'=>$table,
927 'ID'=>$row['uid'],
928 'HELP_ICON'=>$this->helpTextIcon($table,$field),
929 'HELP_TEXT'=>$this->helpText($table,$field),
930 'PAL_LINK_ICON'=>$thePalIcon,
931 'FIELD'=>$field
932 );
933 $out = $this->addUserTemplateMarkers($out,$table,$field,$row,$PA);
934 // String:
935 $out=$this->intoTemplate($out);
936 }
937 }
938 } else $this->commentMessages[]=$this->prependFormFieldNames.'['.$table.']['.$row['uid'].']['.$field.']: Disabled by TSconfig';
939 }
940 // Hook: getSingleField_postProcess
941 foreach ($this->hookObjectsSingleField as $hookObj) {
942 if (method_exists($hookObj,'getSingleField_postProcess')) {
943 $hookObj->getSingleField_postProcess($table, $field, $row, $out, $PA, $this);
944 }
945 }
946 // Return value (string or array)
947 return $out;
948 }
949
950 /**
951 * Rendering a single item for the form
952 *
953 * @param string Table name of record
954 * @param string Fieldname to render
955 * @param array The record
956 * @param array parameters array containing a lot of stuff. Value by Reference!
957 * @return string Returns the item as HTML code to insert
958 * @access private
959 * @see getSingleField(), getSingleField_typeFlex_draw()
960 */
961 function getSingleField_SW($table,$field,$row,&$PA) {
962 $PA['fieldConf']['config']['form_type'] = $PA['fieldConf']['config']['form_type'] ? $PA['fieldConf']['config']['form_type'] : $PA['fieldConf']['config']['type']; // Using "form_type" locally in this script
963
964 switch($PA['fieldConf']['config']['form_type']) {
965 case 'input':
966 $item = $this->getSingleField_typeInput($table,$field,$row,$PA);
967 break;
968 case 'text':
969 $item = $this->getSingleField_typeText($table,$field,$row,$PA);
970 break;
971 case 'check':
972 $item = $this->getSingleField_typeCheck($table,$field,$row,$PA);
973 break;
974 case 'radio':
975 $item = $this->getSingleField_typeRadio($table,$field,$row,$PA);
976 break;
977 case 'select':
978 $item = $this->getSingleField_typeSelect($table,$field,$row,$PA);
979 break;
980 case 'group':
981 $item = $this->getSingleField_typeGroup($table,$field,$row,$PA);
982 break;
983 case 'inline':
984 $item = $this->inline->getSingleField_typeInline($table,$field,$row,$PA);
985 break;
986 case 'none':
987 $item = $this->getSingleField_typeNone($table,$field,$row,$PA);
988 break;
989 case 'user':
990 $item = $this->getSingleField_typeUser($table,$field,$row,$PA);
991 break;
992 case 'flex':
993 $item = $this->getSingleField_typeFlex($table,$field,$row,$PA);
994 break;
995 default:
996 $item = $this->getSingleField_typeUnknown($table,$field,$row,$PA);
997 break;
998 }
999
1000 return $item;
1001 }
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021 /**********************************************************
1022 *
1023 * Rendering of each TCEform field type
1024 *
1025 ************************************************************/
1026
1027 /**
1028 * Generation of TCEform elements of the type "input"
1029 * This will render a single-line input form field, possibly with various control/validation features
1030 *
1031 * @param string The table name of the record
1032 * @param string The field name which this element is supposed to edit
1033 * @param array The record data array where the value(s) for the field can be found
1034 * @param array An array with additional configuration options.
1035 * @return string The HTML code for the TCEform field
1036 */
1037 function getSingleField_typeInput($table,$field,$row,&$PA) {
1038 // typo3FormFieldSet(theField, evallist, is_in, checkbox, checkboxValue)
1039 // typo3FormFieldGet(theField, evallist, is_in, checkbox, checkboxValue, checkbox_off)
1040
1041 $config = $PA['fieldConf']['config'];
1042
1043 # $specConf = $this->getSpecConfForField($table,$row,$field);
1044 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1045 $size = t3lib_div::intInRange($config['size']?$config['size']:30,5,$this->maxInputWidth);
1046 $evalList = t3lib_div::trimExplode(',',$config['eval'],1);
1047
1048
1049 if($this->renderReadonly || $config['readOnly']) {
1050 $itemFormElValue = $PA['itemFormElValue'];
1051 if (in_array('date',$evalList)) {
1052 $config['format'] = 'date';
1053 } elseif (in_array('date',$evalList)) {
1054 $config['format'] = 'date';
1055 } elseif (in_array('datetime',$evalList)) {
1056 $config['format'] = 'datetime';
1057 } elseif (in_array('time',$evalList)) {
1058 $config['format'] = 'time';
1059 }
1060 if (in_array('password',$evalList)) {
1061 $itemFormElValue = $itemFormElValue ? '*********' : '';
1062 }
1063 return $this->getSingleField_typeNone_render($config, $itemFormElValue);
1064 }
1065
1066 if (in_array('required',$evalList)) {
1067 $this->requiredFields[$table.'_'.$row['uid'].'_'.$field]=$PA['itemFormElName'];
1068 }
1069
1070 $paramsList = "'".$PA['itemFormElName']."','".implode(',',$evalList)."','".trim($config['is_in'])."',".(isset($config['checkbox'])?1:0).",'".$config['checkbox']."'";
1071 if (isset($config['checkbox'])) {
1072 // Setting default "click-checkbox" values for eval types "date" and "datetime":
1073 $thisMidnight = mktime(0,0,0);
1074 $checkSetValue = in_array('date',$evalList) ? $thisMidnight : '';
1075 $checkSetValue = in_array('datetime',$evalList) ? time() : $checkSetValue;
1076
1077 $cOnClick = 'typo3form.fieldGet('.$paramsList.',1,\''.$checkSetValue.'\');'.implode('',$PA['fieldChangeFunc']);
1078 $item.='<input type="checkbox"'.$this->insertDefStyle('check').' name="'.$PA['itemFormElName'].'_cb" onclick="'.htmlspecialchars($cOnClick).'" />';
1079 }
1080
1081 $PA['fieldChangeFunc'] = array_merge(array('typo3form.fieldGet'=>'typo3form.fieldGet('.$paramsList.');'), $PA['fieldChangeFunc']);
1082 $mLgd = ($config['max']?$config['max']:256);
1083 $iOnChange = implode('',$PA['fieldChangeFunc']);
1084 $item.='<input type="text" name="'.$PA['itemFormElName'].'_hr" value=""'.$this->formWidth($size).' maxlength="'.$mLgd.'" onchange="'.htmlspecialchars($iOnChange).'"'.$PA['onFocus'].' />'; // This is the EDITABLE form field.
1085 $item.='<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />'; // This is the ACTUAL form field - values from the EDITABLE field must be transferred to this field which is the one that is written to the database.
1086 $this->extJSCODE.='typo3form.fieldSet('.$paramsList.');';
1087
1088 // going through all custom evaluations configured for this field
1089 foreach ($evalList as $evalData) {
1090 if (substr($evalData, 0, 3) == 'tx_') {
1091 $evalObj = t3lib_div::getUserObj($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['tce']['formevals'][$evalData].':&'.$evalData);
1092 if(is_object($evalObj) && method_exists($evalObj, 'returnFieldJS')) {
1093 $this->extJSCODE .= "\n\nfunction ".$evalData."(value) {\n".$evalObj->returnFieldJS()."\n}\n";
1094 }
1095 }
1096 }
1097
1098 // Creating an alternative item without the JavaScript handlers.
1099 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'_hr" value="" />';
1100 $altItem.= '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
1101
1102 // Wrap a wizard around the item?
1103 $item= $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'].'_hr',$specConf);
1104
1105 return $item;
1106 }
1107
1108 /**
1109 * Generation of TCEform elements of the type "text"
1110 * This will render a <textarea> OR RTE area form field, possibly with various control/validation features
1111 *
1112 * @param string The table name of the record
1113 * @param string The field name which this element is supposed to edit
1114 * @param array The record data array where the value(s) for the field can be found
1115 * @param array An array with additional configuration options.
1116 * @return string The HTML code for the TCEform field
1117 */
1118 function getSingleField_typeText($table,$field,$row,&$PA) {
1119
1120 // Init config:
1121 $config = $PA['fieldConf']['config'];
1122
1123 if($this->renderReadonly || $config['readOnly']) {
1124 return $this->getSingleField_typeNone_render($config, $PA['itemFormElValue']);
1125 }
1126
1127 // Setting columns number:
1128 $cols = t3lib_div::intInRange($config['cols'] ? $config['cols'] : 30, 5, $this->maxTextareaWidth);
1129
1130 // Setting number of rows:
1131 $origRows = $rows = t3lib_div::intInRange($config['rows'] ? $config['rows'] : 5, 1, 20);
1132 if (strlen($PA['itemFormElValue']) > $this->charsPerRow*2) {
1133 $cols = $this->maxTextareaWidth;
1134 $rows = t3lib_div::intInRange(round(strlen($PA['itemFormElValue'])/$this->charsPerRow), count(explode(chr(10),$PA['itemFormElValue'])), 20);
1135 if ($rows<$origRows) $rows = $origRows;
1136 }
1137
1138 // Init RTE vars:
1139 $RTEwasLoaded = 0; // Set true, if the RTE is loaded; If not a normal textarea is shown.
1140 $RTEwouldHaveBeenLoaded = 0; // Set true, if the RTE would have been loaded if it wasn't for the disable-RTE flag in the bottom of the page...
1141
1142 // "Extra" configuration; Returns configuration for the field based on settings found in the "types" fieldlist. Traditionally, this is where RTE configuration has been found.
1143 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1144
1145 // Setting up the altItem form field, which is a hidden field containing the value
1146 $altItem = '<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
1147
1148 // If RTE is generally enabled (TYPO3_CONF_VARS and user settings)
1149 if ($this->RTEenabled) {
1150 $p = t3lib_BEfunc::getSpecConfParametersFromArray($specConf['rte_transform']['parameters']);
1151 if (isset($specConf['richtext']) && (!$p['flag'] || !$row[$p['flag']])) { // If the field is configured for RTE and if any flag-field is not set to disable it.
1152 t3lib_BEfunc::fixVersioningPid($table,$row);
1153 list($tscPID,$thePidValue) = $this->getTSCpid($table,$row['uid'],$row['pid']);
1154
1155 // If the pid-value is not negative (that is, a pid could NOT be fetched)
1156 if ($thePidValue >= 0) {
1157 $RTEsetup = $GLOBALS['BE_USER']->getTSConfig('RTE',t3lib_BEfunc::getPagesTSconfig($tscPID));
1158 $RTEtypeVal = t3lib_BEfunc::getTCAtypeValue($table,$row);
1159 $thisConfig = t3lib_BEfunc::RTEsetup($RTEsetup['properties'],$table,$field,$RTEtypeVal);
1160
1161 if (!$thisConfig['disabled']) {
1162 if (!$this->disableRTE) {
1163 $this->RTEcounter++;
1164
1165 // Find alternative relative path for RTE images/links:
1166 $eFile = t3lib_parsehtml_proc::evalWriteFile($specConf['static_write'], $row);
1167 $RTErelPath = is_array($eFile) ? dirname($eFile['relEditFile']) : '';
1168
1169 // Get RTE object, draw form and set flag:
1170 $RTEobj = &t3lib_BEfunc::RTEgetObj();
1171 $item = $RTEobj->drawRTE($this,$table,$field,$row,$PA,$specConf,$thisConfig,$RTEtypeVal,$RTErelPath,$thePidValue);
1172
1173 // Wizard:
1174 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf,1);
1175
1176 $RTEwasLoaded = 1;
1177 } else {
1178 $RTEwouldHaveBeenLoaded = 1;
1179 $this->commentMessages[] = $PA['itemFormElName'].': RTE is disabled by the on-page RTE-flag (probably you can enable it by the check-box in the bottom of this page!)';
1180 }
1181 } else $this->commentMessages[] = $PA['itemFormElName'].': RTE is disabled by the Page TSconfig, "RTE"-key (eg. by RTE.default.disabled=0 or such)';
1182 } else $this->commentMessages[] = $PA['itemFormElName'].': PID value could NOT be fetched. Rare error, normally with new records.';
1183 } else {
1184 if (!isset($specConf['richtext'])) $this->commentMessages[] = $PA['itemFormElName'].': RTE was not configured for this field in TCA-types';
1185 if (!(!$p['flag'] || !$row[$p['flag']])) $this->commentMessages[] = $PA['itemFormElName'].': Field-flag ('.$PA['flag'].') has been set to disable RTE!';
1186 }
1187 }
1188
1189 // Display ordinary field if RTE was not loaded.
1190 if (!$RTEwasLoaded) {
1191 if ($specConf['rte_only']) { // Show message, if no RTE (field can only be edited with RTE!)
1192 $item = '<p><em>'.htmlspecialchars($this->getLL('l_noRTEfound')).'</em></p>';
1193 } else {
1194 if ($specConf['nowrap']) {
1195 $wrap = 'off';
1196 } else {
1197 $wrap = ($config['wrap'] ? $config['wrap'] : 'virtual');
1198 }
1199
1200 $classes = array();
1201 if ($specConf['fixed-font']) { $classes[] = 'fixed-font'; }
1202 if ($specConf['enable-tab']) { $classes[] = 'enable-tab'; }
1203
1204 $formWidthText = $this->formWidthText($cols,$wrap);
1205
1206 // Extract class attributes from $formWidthText (otherwise it would be added twice to the output)
1207 if (preg_match('/ class="(.+?)"/',$formWidthText,$res)) {
1208 $formWidthText = str_replace(' class="'.$res[1].'"','',$formWidthText);
1209 $classes = array_merge($classes, explode(' ',$res[1]));
1210 }
1211
1212 if (count($classes)) {
1213 $class = ' class="'.implode(' ',$classes).'"';
1214 } else $class='';
1215
1216 $iOnChange = implode('',$PA['fieldChangeFunc']);
1217 $item.= '
1218 <textarea name="'.$PA['itemFormElName'].'"'.$formWidthText.$class.' rows="'.$rows.'" wrap="'.$wrap.'" onchange="'.htmlspecialchars($iOnChange).'"'.$PA['onFocus'].'>'.
1219 t3lib_div::formatForTextarea($PA['itemFormElValue']).
1220 '</textarea>';
1221 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf,$RTEwouldHaveBeenLoaded);
1222 }
1223 }
1224
1225 // Return field HTML:
1226 return $item;
1227 }
1228
1229 /**
1230 * Generation of TCEform elements of the type "check"
1231 * This will render a check-box OR an array of checkboxes
1232 *
1233 * @param string The table name of the record
1234 * @param string The field name which this element is supposed to edit
1235 * @param array The record data array where the value(s) for the field can be found
1236 * @param array An array with additional configuration options.
1237 * @return string The HTML code for the TCEform field
1238 */
1239 function getSingleField_typeCheck($table,$field,$row,&$PA) {
1240 $config = $PA['fieldConf']['config'];
1241
1242 $disabled = '';
1243 if($this->renderReadonly || $config['readOnly']) {
1244 $disabled = ' disabled="disabled"';
1245 }
1246
1247 // Traversing the array of items:
1248 $selItems = $this->initItemArray($PA['fieldConf']);
1249 if ($config['itemsProcFunc']) $selItems = $this->procItems($selItems,$PA['fieldTSConfig']['itemsProcFunc.'],$config,$table,$row,$field);
1250
1251 if (!count($selItems)) {
1252 $selItems[]=array('','');
1253 }
1254 $thisValue = intval($PA['itemFormElValue']);
1255
1256 $cols = intval($config['cols']);
1257 if ($cols > 1) {
1258 $item.= '<table border="0" cellspacing="0" cellpadding="0" class="typo3-TCEforms-checkboxArray">';
1259 for ($c=0;$c<count($selItems);$c++) {
1260 $p = $selItems[$c];
1261 if(!($c%$cols)) { $item.='<tr>'; }
1262 $cBP = $this->checkBoxParams($PA['itemFormElName'],$thisValue,$c,count($selItems),implode('',$PA['fieldChangeFunc']));
1263 $cBName = $PA['itemFormElName'].'_'.$c;
1264 $cBID = $PA['itemFormElID'].'_'.$c;
1265 $item.= '<td nowrap="nowrap">'.
1266 '<input type="checkbox"'.$this->insertDefStyle('check').' value="1" name="'.$cBName.'"'.$cBP.$disabled.' id="'.$cBID.'" />'.
1267 $this->wrapLabels('<label for="'.$cBID.'">'.htmlspecialchars($p[0]).'</label>&nbsp;').
1268 '</td>';
1269 if(($c%$cols)+1==$cols) {$item.='</tr>';}
1270 }
1271 if ($c%$cols) {
1272 $rest=$cols-($c%$cols);
1273 for ($c=0;$c<$rest;$c++) {
1274 $item.= '<td></td>';
1275 }
1276 if ($c>0) { $item.= '</tr>'; }
1277 }
1278 $item.= '</table>';
1279 } else {
1280 for ($c=0;$c<count($selItems);$c++) {
1281 $p = $selItems[$c];
1282 $cBP = $this->checkBoxParams($PA['itemFormElName'],$thisValue,$c,count($selItems),implode('',$PA['fieldChangeFunc']));
1283 $cBName = $PA['itemFormElName'].'_'.$c;
1284 $cBID = $PA['itemFormElID'].'_'.$c;
1285 $item.= ($c>0?'<br />':'').
1286 '<input type="checkbox"'.$this->insertDefStyle('check').' value="1" name="'.$cBName.'"'.$cBP.$PA['onFocus'].$disabled.' id="'.$cBID.'" />'.
1287 htmlspecialchars($p[0]);
1288 }
1289 }
1290 if (!$disabled) {
1291 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($thisValue).'" />';
1292 }
1293
1294 return $item;
1295 }
1296
1297 /**
1298 * Generation of TCEform elements of the type "radio"
1299 * This will render a series of radio buttons.
1300 *
1301 * @param string The table name of the record
1302 * @param string The field name which this element is supposed to edit
1303 * @param array The record data array where the value(s) for the field can be found
1304 * @param array An array with additional configuration options.
1305 * @return string The HTML code for the TCEform field
1306 */
1307 function getSingleField_typeRadio($table,$field,$row,&$PA) {
1308 $config = $PA['fieldConf']['config'];
1309
1310 $disabled = '';
1311 if($this->renderReadonly || $config['readOnly']) {
1312 $disabled = ' disabled="disabled"';
1313 }
1314
1315 // Get items for the array:
1316 $selItems = $this->initItemArray($PA['fieldConf']);
1317 if ($config['itemsProcFunc']) $selItems = $this->procItems($selItems,$PA['fieldTSConfig']['itemsProcFunc.'],$config,$table,$row,$field);
1318
1319 // Traverse the items, making the form elements:
1320 for ($c=0;$c<count($selItems);$c++) {
1321 $p = $selItems[$c];
1322 $rID = $PA['itemFormElID'].'_'.$c;
1323 $rOnClick = implode('',$PA['fieldChangeFunc']);
1324 $rChecked = (!strcmp($p[1],$PA['itemFormElValue'])?' checked="checked"':'');
1325 $item.= '<input type="radio"'.$this->insertDefStyle('radio').' name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($p[1]).'" onclick="'.htmlspecialchars($rOnClick).'"'.$rChecked.$PA['onFocus'].$disabled.' id="'.$rID.'" />
1326 <label for="'.$rID.'">'.htmlspecialchars($p[0]).'</label>
1327 <br />';
1328 }
1329
1330 return $item;
1331 }
1332
1333 /**
1334 * Generation of TCEform elements of the type "select"
1335 * This will render a selector box element, or possibly a special construction with two selector boxes. That depends on configuration.
1336 *
1337 * @param string The table name of the record
1338 * @param string The field name which this element is supposed to edit
1339 * @param array The record data array where the value(s) for the field can be found
1340 * @param array An array with additional configuration options.
1341 * @return string The HTML code for the TCEform field
1342 */
1343 function getSingleField_typeSelect($table,$field,$row,&$PA) {
1344 global $TCA;
1345
1346 // Field configuration from TCA:
1347 $config = $PA['fieldConf']['config'];
1348
1349 $disabled = '';
1350 if($this->renderReadonly || $config['readOnly']) {
1351 $disabled = ' disabled="disabled"';
1352 }
1353
1354 // "Extra" configuration; Returns configuration for the field based on settings found in the "types" fieldlist. See http://typo3.org/documentation/document-library/doc_core_api/Wizards_Configuratio/.
1355 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1356
1357 // Getting the selector box items from the system
1358 $selItems = $this->addSelectOptionsToItemArray($this->initItemArray($PA['fieldConf']),$PA['fieldConf'],$this->setTSconfig($table,$row),$field);
1359 $selItems = $this->addItems($selItems,$PA['fieldTSConfig']['addItems.']);
1360 if ($config['itemsProcFunc']) $selItems = $this->procItems($selItems,$PA['fieldTSConfig']['itemsProcFunc.'],$config,$table,$row,$field);
1361
1362 // Possibly remove some items:
1363 $removeItems = t3lib_div::trimExplode(',',$PA['fieldTSConfig']['removeItems'],1);
1364 foreach($selItems as $tk => $p) {
1365
1366 // Checking languages and authMode:
1367 $languageDeny = $TCA[$table]['ctrl']['languageField'] && !strcmp($TCA[$table]['ctrl']['languageField'], $field) && !$GLOBALS['BE_USER']->checkLanguageAccess($p[1]);
1368 $authModeDeny = $config['form_type']=='select' && $config['authMode'] && !$GLOBALS['BE_USER']->checkAuthMode($table,$field,$p[1],$config['authMode']);
1369 if (in_array($p[1],$removeItems) || $languageDeny || $authModeDeny) {
1370 unset($selItems[$tk]);
1371 } elseif (isset($PA['fieldTSConfig']['altLabels.'][$p[1]])) {
1372 $selItems[$tk][0]=$this->sL($PA['fieldTSConfig']['altLabels.'][$p[1]]);
1373 }
1374
1375 // Removing doktypes with no access:
1376 if ($table.'.'.$field == 'pages.doktype') {
1377 if (!($GLOBALS['BE_USER']->isAdmin() || t3lib_div::inList($GLOBALS['BE_USER']->groupData['pagetypes_select'],$p[1]))) {
1378 unset($selItems[$tk]);
1379 }
1380 }
1381 }
1382
1383 // Creating the label for the "No Matching Value" entry.
1384 $nMV_label = isset($PA['fieldTSConfig']['noMatchingValue_label']) ? $this->sL($PA['fieldTSConfig']['noMatchingValue_label']) : '[ '.$this->getLL('l_noMatchingValue').' ]';
1385
1386 // Prepare some values:
1387 $maxitems = intval($config['maxitems']);
1388
1389 // If a SINGLE selector box...
1390 if ($maxitems<=1) {
1391 $item = $this->getSingleField_typeSelect_single($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1392 } elseif (!strcmp($config['renderMode'],'checkbox')) { // Checkbox renderMode
1393 $item = $this->getSingleField_typeSelect_checkbox($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1394 } elseif (!strcmp($config['renderMode'],'singlebox')) { // Single selector box renderMode
1395 $item = $this->getSingleField_typeSelect_singlebox($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1396 } else { // Traditional multiple selector box:
1397 $item = $this->getSingleField_typeSelect_multiple($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1398 }
1399
1400 // Wizards:
1401 if (!$disabled) {
1402 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
1403 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf);
1404 }
1405
1406 return $item;
1407 }
1408
1409 /**
1410 * Creates a single-selector box
1411 * (Render function for getSingleField_typeSelect())
1412 *
1413 * @param string See getSingleField_typeSelect()
1414 * @param string See getSingleField_typeSelect()
1415 * @param array See getSingleField_typeSelect()
1416 * @param array See getSingleField_typeSelect()
1417 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1418 * @param array Items available for selection
1419 * @param string Label for no-matching-value
1420 * @return string The HTML code for the item
1421 * @see getSingleField_typeSelect()
1422 */
1423 function getSingleField_typeSelect_single($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1424 // check against inline uniqueness
1425 $inlineParent = $this->inline->getStructureLevel(-1);
1426 if(is_array($inlineParent) && $inlineParent['uid']) {
1427 if ($inlineParent['config']['foreign_table'] == $table && $inlineParent['config']['foreign_unique'] == $field) {
1428 $uniqueIds = $this->inline->inlineData['unique'][$this->inline->inlineNames['object'].'['.$table.']']['used'];
1429 $PA['fieldChangeFunc']['inlineUnique'] = "inline.updateUnique(this,'".$this->inline->inlineNames['object'].'['.$table."]','".$this->inline->inlineNames['form']."','".$row['uid']."');";
1430 }
1431 // hide uid of parent record for symmetric relations
1432 if ($inlineParent['config']['foreign_table'] == $table && ($inlineParent['config']['foreign_field'] == $field || $inlineParent['config']['symmetric_field'] == $field)) {
1433 $uniqueIds[] = $inlineParent['uid'];
1434 }
1435 }
1436
1437 // Initialization:
1438 $c = 0;
1439 $sI = 0;
1440 $noMatchingValue = 1;
1441 $opt = array();
1442 $selicons = array();
1443 $onlySelectedIconShown = 0;
1444 $size = intval($config['size']);
1445
1446 $disabled = '';
1447 if($this->renderReadonly || $config['readOnly']) {
1448 $disabled = ' disabled="disabled"';
1449 $onlySelectedIconShown = 1;
1450 }
1451
1452 // Icon configuration:
1453 if ($config['suppress_icons']=='IF_VALUE_FALSE') {
1454 $suppressIcons = !$PA['itemFormElValue'] ? 1 : 0;
1455 } elseif ($config['suppress_icons']=='ONLY_SELECTED') {
1456 $suppressIcons=0;
1457 $onlySelectedIconShown=1;
1458 } elseif ($config['suppress_icons']) {
1459 $suppressIcons = 1;
1460 } else $suppressIcons = 0;
1461
1462 // Traverse the Array of selector box items:
1463 foreach($selItems as $p) {
1464 $sM = (!strcmp($PA['itemFormElValue'],$p[1])?' selected="selected"':'');
1465 if ($sM) {
1466 $sI = $c;
1467 $noMatchingValue = 0;
1468 }
1469
1470 // Getting style attribute value (for icons):
1471 if ($config['iconsInOptionTags']) {
1472 $styleAttrValue = $this->optionTagStyle($p[2]);
1473 }
1474
1475 // Compiling the <option> tag:
1476 if (!($p[1] != $PA['itemFormElValue'] && is_array($uniqueIds) && in_array($p[1], $uniqueIds))) {
1477 $opt[]= '<option value="'.htmlspecialchars($p[1]).'"'.
1478 $sM.
1479 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1480 (!strcmp($p[1],'--div--') ? ' class="c-divider"' : '').
1481 '>'.t3lib_div::deHSCentities(htmlspecialchars($p[0])).'</option>';
1482 }
1483
1484 // If there is an icon for the selector box (rendered in table under)...:
1485 if ($p[2] && !$suppressIcons && (!$onlySelectedIconShown || $sM)) {
1486 list($selIconFile,$selIconInfo)=$this->getIcon($p[2]);
1487 $iOnClick = $this->elName($PA['itemFormElName']).'.selectedIndex='.$c.'; '.implode('',$PA['fieldChangeFunc']).$this->blur().'return false;';
1488 $selicons[]=array(
1489 (!$onlySelectedIconShown ? '<a href="#" onclick="'.htmlspecialchars($iOnClick).'">' : '').
1490 '<img src="'.$selIconFile.'" '.$selIconInfo[3].' vspace="2" border="0" title="'.htmlspecialchars($p[0]).'" alt="'.htmlspecialchars($p[0]).'" />'.
1491 (!$onlySelectedIconShown ? '</a>' : ''),
1492 $c,$sM);
1493 }
1494 $c++;
1495 }
1496
1497 // No-matching-value:
1498 if ($PA['itemFormElValue'] && $noMatchingValue && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1499 $nMV_label = @sprintf($nMV_label, $PA['itemFormElValue']);
1500 $opt[]= '<option value="'.htmlspecialchars($PA['itemFormElValue']).'" selected="selected">'.htmlspecialchars($nMV_label).'</option>';
1501 }
1502
1503 // Create item form fields:
1504 $sOnChange = 'if (this.options[this.selectedIndex].value==\'--div--\') {this.selectedIndex='.$sI.';} '.implode('',$PA['fieldChangeFunc']);
1505 if(!$disabled) {
1506 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'_selIconVal" value="'.htmlspecialchars($sI).'" />'; // MUST be inserted before the selector - else is the value of the hiddenfield here mysteriously submitted...
1507 }
1508 $item.= '<select name="'.$PA['itemFormElName'].'"'.
1509 $this->insertDefStyle('select').
1510 ($size?' size="'.$size.'"':'').
1511 ' onchange="'.htmlspecialchars($sOnChange).'"'.
1512 $PA['onFocus'].$disabled.'>';
1513 $item.= implode('',$opt);
1514 $item.= '</select>';
1515
1516 // Create icon table:
1517 if (count($selicons)) {
1518 $item.='<table border="0" cellpadding="0" cellspacing="0" class="typo3-TCEforms-selectIcons">';
1519 $selicon_cols = intval($config['selicon_cols']);
1520 if (!$selicon_cols) $selicon_cols=count($selicons);
1521 $sR = ceil(count($selicons)/$selicon_cols);
1522 $selicons = array_pad($selicons,$sR*$selicon_cols,'');
1523 for($sa=0;$sa<$sR;$sa++) {
1524 $item.='<tr>';
1525 for($sb=0;$sb<$selicon_cols;$sb++) {
1526 $sk=($sa*$selicon_cols+$sb);
1527 $imgN = 'selIcon_'.$table.'_'.$row['uid'].'_'.$field.'_'.$selicons[$sk][1];
1528 $imgS = ($selicons[$sk][2]?$this->backPath.'gfx/content_selected.gif':'clear.gif');
1529 $item.='<td><img name="'.htmlspecialchars($imgN).'" src="'.$imgS.'" width="7" height="10" alt="" /></td>';
1530 $item.='<td>'.$selicons[$sk][0].'</td>';
1531 }
1532 $item.='</tr>';
1533 }
1534 $item.='</table>';
1535 }
1536
1537 return $item;
1538 }
1539
1540 /**
1541 * Creates a checkbox list (renderMode = "checkbox")
1542 * (Render function for getSingleField_typeSelect())
1543 *
1544 * @param string See getSingleField_typeSelect()
1545 * @param string See getSingleField_typeSelect()
1546 * @param array See getSingleField_typeSelect()
1547 * @param array See getSingleField_typeSelect()
1548 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1549 * @param array Items available for selection
1550 * @param string Label for no-matching-value
1551 * @return string The HTML code for the item
1552 * @see getSingleField_typeSelect()
1553 */
1554 function getSingleField_typeSelect_checkbox($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1555
1556 // Get values in an array (and make unique, which is fine because there can be no duplicates anyway):
1557 $itemArray = array_flip($this->extractValuesOnlyFromValueLabelList($PA['itemFormElValue']));
1558
1559 $disabled = '';
1560 if($this->renderReadonly || $config['readOnly']) {
1561 $disabled = ' disabled="disabled"';
1562 }
1563
1564 // Traverse the Array of selector box items:
1565 $tRows = array();
1566 $c=0;
1567 if (!$disabled) {
1568 $sOnChange = implode('',$PA['fieldChangeFunc']);
1569 $setAll = array(); // Used to accumulate the JS needed to restore the original selection.
1570 foreach($selItems as $p) {
1571 // Non-selectable element:
1572 if (!strcmp($p[1],'--div--')) {
1573 if (count($setAll)) {
1574 $tRows[] = '
1575 <tr>
1576 <td colspan="2">'.
1577 '<a href="#" onclick="'.htmlspecialchars(implode('',$setAll).' return false;').'">'.
1578 htmlspecialchars($this->getLL('l_setAllCheckboxes')).
1579 '</a></td>
1580 </tr>';
1581 $setAll = array();
1582 }
1583
1584 $tRows[] = '
1585 <tr class="c-header">
1586 <td colspan="2">'.htmlspecialchars($p[0]).'</td>
1587 </tr>';
1588 } else {
1589 // Selected or not by default:
1590 $sM = '';
1591 if (isset($itemArray[$p[1]])) {
1592 $sM = ' checked="checked"';
1593 unset($itemArray[$p[1]]);
1594 }
1595
1596 // Icon:
1597 $selIconFile = '';
1598 if ($p[2]) {
1599 list($selIconFile,$selIconInfo) = $this->getIcon($p[2]);
1600 }
1601
1602 // Compile row:
1603 $onClickCell = $this->elName($PA['itemFormElName'].'['.$c.']').'.checked=!'.$this->elName($PA['itemFormElName'].'['.$c.']').'.checked;';
1604 $onClick = 'this.attributes.getNamedItem("class").nodeValue = '.$this->elName($PA['itemFormElName'].'['.$c.']').'.checked ? "c-selectedItem" : "";';
1605 $setAll[] = $this->elName($PA['itemFormElName'].'['.$c.']').'.checked=1;';
1606 $tRows[] = '
1607 <tr class="'.($sM ? 'c-selectedItem' : '').'" onclick="'.htmlspecialchars($onClick).'" style="cursor: pointer;">
1608 <td><input type="checkbox"'.$this->insertDefStyle('check').' name="'.htmlspecialchars($PA['itemFormElName'].'['.$c.']').'" value="'.htmlspecialchars($p[1]).'"'.$sM.' onclick="'.htmlspecialchars($sOnChange).'"'.$PA['onFocus'].' /></td>
1609 <td class="c-labelCell" onclick="'.htmlspecialchars($onClickCell).'">'.
1610 ($selIconFile ? '<img src="'.$selIconFile.'" '.$selIconInfo[3].' vspace="2" border="0" class="absmiddle" style="margin-right: 4px;" alt="" />' : '').
1611 t3lib_div::deHSCentities(htmlspecialchars($p[0])).
1612 (strcmp($p[3],'') ? '<br/><p class="c-descr">'.nl2br(trim(htmlspecialchars($p[3]))).'</p>' : '').
1613 '</td>
1614 </tr>';
1615 $c++;
1616 }
1617 }
1618
1619 // Remaining checkboxes will get their set-all link:
1620 if (count($setAll)) {
1621 $tRows[] = '
1622 <tr>
1623 <td colspan="2">'.
1624 '<a href="#" onclick="'.htmlspecialchars(implode('',$setAll).' return false;').'">'.
1625 htmlspecialchars($this->getLL('l_setAllCheckboxes')).
1626 '</a></td>
1627 </tr>';
1628 }
1629 }
1630
1631 // Remaining values (invalid):
1632 if (count($itemArray) && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1633 foreach($itemArray as $theNoMatchValue => $temp) {
1634 // Compile <checkboxes> tag:
1635 array_unshift($tRows,'
1636 <tr class="c-invalidItem">
1637 <td><input type="checkbox"'.$this->insertDefStyle('check').' name="'.htmlspecialchars($PA['itemFormElName'].'['.$c.']').'" value="'.htmlspecialchars($theNoMatchValue).'" checked="checked" onclick="'.htmlspecialchars($sOnChange).'"'.$PA['onFocus'].$disabled.' /></td>
1638 <td class="c-labelCell">'.
1639 t3lib_div::deHSCentities(htmlspecialchars(@sprintf($nMV_label, $theNoMatchValue))).
1640 '</td>
1641 </tr>');
1642 $c++;
1643 }
1644 }
1645
1646 // Add an empty hidden field which will send a blank value if all items are unselected.
1647 $item.='<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="" />';
1648
1649 // Implode rows in table:
1650 $item.= '
1651 <table border="0" cellpadding="0" cellspacing="0" class="typo3-TCEforms-select-checkbox">'.
1652 implode('',$tRows).'
1653 </table>
1654 ';
1655
1656 return $item;
1657 }
1658
1659 /**
1660 * Creates a selectorbox list (renderMode = "singlebox")
1661 * (Render function for getSingleField_typeSelect())
1662 *
1663 * @param string See getSingleField_typeSelect()
1664 * @param string See getSingleField_typeSelect()
1665 * @param array See getSingleField_typeSelect()
1666 * @param array See getSingleField_typeSelect()
1667 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1668 * @param array Items available for selection
1669 * @param string Label for no-matching-value
1670 * @return string The HTML code for the item
1671 * @see getSingleField_typeSelect()
1672 */
1673 function getSingleField_typeSelect_singlebox($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1674
1675 // Get values in an array (and make unique, which is fine because there can be no duplicates anyway):
1676 $itemArray = array_flip($this->extractValuesOnlyFromValueLabelList($PA['itemFormElValue']));
1677
1678 $disabled = '';
1679 if($this->renderReadonly || $config['readOnly']) {
1680 $disabled = ' disabled="disabled"';
1681 }
1682
1683 // Traverse the Array of selector box items:
1684 $opt = array();
1685 $restoreCmd = array(); // Used to accumulate the JS needed to restore the original selection.
1686 $c = 0;
1687 foreach($selItems as $p) {
1688 // Selected or not by default:
1689 $sM = '';
1690 if (isset($itemArray[$p[1]])) {
1691 $sM = ' selected="selected"';
1692 $restoreCmd[] = $this->elName($PA['itemFormElName'].'[]').'.options['.$c.'].selected=1;';
1693 unset($itemArray[$p[1]]);
1694 }
1695
1696 // Non-selectable element:
1697 $nonSel = '';
1698 if (!strcmp($p[1],'--div--')) {
1699 $nonSel = ' onclick="this.selected=0;" class="c-divider"';
1700 }
1701
1702 // Icon style for option tag:
1703 if ($config['iconsInOptionTags']) {
1704 $styleAttrValue = $this->optionTagStyle($p[2]);
1705 }
1706
1707 // Compile <option> tag:
1708 $opt[] = '<option value="'.htmlspecialchars($p[1]).'"'.
1709 $sM.
1710 $nonSel.
1711 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1712 '>'.t3lib_div::deHSCentities(htmlspecialchars($p[0])).'</option>';
1713 $c++;
1714 }
1715
1716 // Remaining values:
1717 if (count($itemArray) && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1718 foreach($itemArray as $theNoMatchValue => $temp) {
1719 // Compile <option> tag:
1720 array_unshift($opt,'<option value="'.htmlspecialchars($theNoMatchValue).'" selected="selected">'.t3lib_div::deHSCentities(htmlspecialchars(@sprintf($nMV_label, $theNoMatchValue))).'</option>');
1721 }
1722 }
1723
1724 // Compile selector box:
1725 $sOnChange = implode('',$PA['fieldChangeFunc']);
1726 $selector_itemListStyle = isset($config['itemListStyle']) ? ' style="'.htmlspecialchars($config['itemListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"';
1727 $size = intval($config['size']);
1728 $size = $config['autoSizeMax'] ? t3lib_div::intInRange(count($selItems)+1,t3lib_div::intInRange($size,1),$config['autoSizeMax']) : $size;
1729 $selectBox = '<select name="'.$PA['itemFormElName'].'[]"'.
1730 $this->insertDefStyle('select').
1731 ($size ? ' size="'.$size.'"' : '').
1732 ' multiple="multiple" onchange="'.htmlspecialchars($sOnChange).'"'.
1733 $PA['onFocus'].
1734 $selector_itemListStyle.
1735 $disabled.'>
1736 '.
1737 implode('
1738 ',$opt).'
1739 </select>';
1740
1741 // Add an empty hidden field which will send a blank value if all items are unselected.
1742 if (!$disabled) {
1743 $item.='<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="" />';
1744 }
1745
1746 // Put it all into a table:
1747 $item.= '
1748 <table border="0" cellspacing="0" cellpadding="0" width="1" class="typo3-TCEforms-select-singlebox">
1749 <tr>
1750 <td>
1751 '.$selectBox.'
1752 <br/>
1753 <em>'.
1754 htmlspecialchars($this->getLL('l_holdDownCTRL')).
1755 '</em>
1756 </td>
1757 <td valign="top">
1758 <a href="#" onclick="'.htmlspecialchars($this->elName($PA['itemFormElName'].'[]').'.selectedIndex=-1;'.implode('',$restoreCmd).' return false;').'">'.
1759 '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/history.gif','width="13" height="12"').' title="'.htmlspecialchars($this->getLL('l_revertSelection')).'" alt="" />'.
1760 '</a>
1761 </td>
1762 </tr>
1763 </table>
1764 ';
1765
1766 return $item;
1767 }
1768
1769 /**
1770 * Creates a multiple-selector box (two boxes, side-by-side)
1771 * (Render function for getSingleField_typeSelect())
1772 *
1773 * @param string See getSingleField_typeSelect()
1774 * @param string See getSingleField_typeSelect()
1775 * @param array See getSingleField_typeSelect()
1776 * @param array See getSingleField_typeSelect()
1777 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1778 * @param array Items available for selection
1779 * @param string Label for no-matching-value
1780 * @return string The HTML code for the item
1781 * @see getSingleField_typeSelect()
1782 */
1783 function getSingleField_typeSelect_multiple($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1784
1785 $disabled = '';
1786 if($this->renderReadonly || $config['readOnly']) {
1787 $disabled = ' disabled="disabled"';
1788 }
1789
1790 // Setting this hidden field (as a flag that JavaScript can read out)
1791 if (!$disabled) {
1792 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'_mul" value="'.($config['multiple']?1:0).'" />';
1793 }
1794
1795 // Set max and min items:
1796 $maxitems = t3lib_div::intInRange($config['maxitems'],0);
1797 if (!$maxitems) $maxitems=100000;
1798 $minitems = t3lib_div::intInRange($config['minitems'],0);
1799
1800 // Register the required number of elements:
1801 $this->requiredElements[$PA['itemFormElName']] = array($minitems,$maxitems,'imgName'=>$table.'_'.$row['uid'].'_'.$field);
1802
1803 // Get "removeItems":
1804 $removeItems = t3lib_div::trimExplode(',',$PA['fieldTSConfig']['removeItems'],1);
1805
1806 // Perform modification of the selected items array:
1807 $itemArray = t3lib_div::trimExplode(',',$PA['itemFormElValue'],1);
1808 foreach($itemArray as $tk => $tv) {
1809 $tvP = explode('|',$tv,2);
1810 $evalValue = rawurldecode($tvP[0]);
1811 $isRemoved = in_array($evalValue,$removeItems) || ($config['form_type']=='select' && $config['authMode'] && !$GLOBALS['BE_USER']->checkAuthMode($table,$field,$evalValue,$config['authMode']));
1812 if ($isRemoved && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1813 $tvP[1] = rawurlencode(@sprintf($nMV_label, $evalValue));
1814 } elseif (isset($PA['fieldTSConfig']['altLabels.'][$evalValue])) {
1815 $tvP[1] = rawurlencode($this->sL($PA['fieldTSConfig']['altLabels.'][$evalValue]));
1816 }
1817 $itemArray[$tk] = implode('|',$tvP);
1818 }
1819 $itemsToSelect = '';
1820
1821 if(!$disabled) {
1822 // Create option tags:
1823 $opt = array();
1824 $styleAttrValue = '';
1825 foreach($selItems as $p) {
1826 if ($config['iconsInOptionTags']) {
1827 $styleAttrValue = $this->optionTagStyle($p[2]);
1828 }
1829 $opt[]= '<option value="'.htmlspecialchars($p[1]).'"'.
1830 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1831 '>'.htmlspecialchars($p[0]).'</option>';
1832 }
1833
1834 // Put together the selector box:
1835 $selector_itemListStyle = isset($config['itemListStyle']) ? ' style="'.htmlspecialchars($config['itemListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"';
1836 $size = intval($config['size']);
1837 $size = $config['autoSizeMax'] ? t3lib_div::intInRange(count($itemArray)+1,t3lib_div::intInRange($size,1),$config['autoSizeMax']) : $size;
1838 if ($config['exclusiveKeys']) {
1839 $sOnChange = 'setFormValueFromBrowseWin(\''.$PA['itemFormElName'].'\',this.options[this.selectedIndex].value,this.options[this.selectedIndex].text,\''.$config['exclusiveKeys'].'\'); ';
1840 } else {
1841 $sOnChange = 'setFormValueFromBrowseWin(\''.$PA['itemFormElName'].'\',this.options[this.selectedIndex].value,this.options[this.selectedIndex].text); ';
1842 }
1843 $sOnChange .= implode('',$PA['fieldChangeFunc']);
1844 $itemsToSelect = '
1845 <select name="'.$PA['itemFormElName'].'_sel"'.
1846 $this->insertDefStyle('select').
1847 ($size ? ' size="'.$size.'"' : '').
1848 ' onchange="'.htmlspecialchars($sOnChange).'"'.
1849 $PA['onFocus'].
1850 $selector_itemListStyle.'>
1851 '.implode('
1852 ',$opt).'
1853 </select>';
1854 }
1855
1856 // Pass to "dbFileIcons" function:
1857 $params = array(
1858 'size' => $size,
1859 'autoSizeMax' => t3lib_div::intInRange($config['autoSizeMax'],0),
1860 'style' => isset($config['selectedListStyle']) ? ' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"',
1861 'dontShowMoveIcons' => ($maxitems<=1),
1862 'maxitems' => $maxitems,
1863 'info' => '',
1864 'headers' => array(
1865 'selector' => $this->getLL('l_selected').':<br />',
1866 'items' => $this->getLL('l_items').':<br />'
1867 ),
1868 'noBrowser' => 1,
1869 'thumbnails' => $itemsToSelect,
1870 'readOnly' => $disabled
1871 );
1872 $item.= $this->dbFileIcons($PA['itemFormElName'],'','',$itemArray,'',$params,$PA['onFocus']);
1873
1874 return $item;
1875 }
1876
1877 /**
1878 * Generation of TCEform elements of the type "group"
1879 * This will render a selectorbox into which elements from either the file system or database can be inserted. Relations.
1880 *
1881 * @param string The table name of the record
1882 * @param string The field name which this element is supposed to edit
1883 * @param array The record data array where the value(s) for the field can be found
1884 * @param array An array with additional configuration options.
1885 * @return string The HTML code for the TCEform field
1886 */
1887 function getSingleField_typeGroup($table,$field,$row,&$PA) {
1888 // Init:
1889 $config = $PA['fieldConf']['config'];
1890 $internal_type = $config['internal_type'];
1891 $show_thumbs = $config['show_thumbs'];
1892 $size = intval($config['size']);
1893 $maxitems = t3lib_div::intInRange($config['maxitems'],0);
1894 if (!$maxitems) $maxitems=100000;
1895 $minitems = t3lib_div::intInRange($config['minitems'],0);
1896 $allowed = $config['allowed'];
1897 $disallowed = $config['disallowed'];
1898
1899 $disabled = '';
1900 if($this->renderReadonly || $config['readOnly']) {
1901 $disabled = ' disabled="disabled"';
1902 }
1903
1904 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'_mul" value="'.($config['multiple']?1:0).'"'.$disabled.' />';
1905 $this->requiredElements[$PA['itemFormElName']] = array($minitems,$maxitems,'imgName'=>$table.'_'.$row['uid'].'_'.$field);
1906 $info='';
1907
1908 // "Extra" configuration; Returns configuration for the field based on settings found in the "types" fieldlist. See http://typo3.org/documentation/document-library/doc_core_api/Wizards_Configuratio/.
1909 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1910
1911 // Acting according to either "file" or "db" type:
1912 switch((string)$config['internal_type']) {
1913 case 'file': // If the element is of the internal type "file":
1914
1915 // Creating string showing allowed types:
1916 $tempFT = t3lib_div::trimExplode(',',$allowed,1);
1917 if (!count($tempFT)) {$info.='*';}
1918 foreach($tempFT as $ext) {
1919 if ($ext) {
1920 $info.=strtoupper($ext).' ';
1921 }
1922 }
1923 // Creating string, showing disallowed types:
1924 $tempFT_dis = t3lib_div::trimExplode(',',$disallowed,1);
1925 if (count($tempFT_dis)) {$info.='<br />';}
1926 foreach($tempFT_dis as $ext) {
1927 if ($ext) {
1928 $info.='-'.strtoupper($ext).' ';
1929 }
1930 }
1931
1932 // Making the array of file items:
1933 $itemArray = t3lib_div::trimExplode(',',$PA['itemFormElValue'],1);
1934
1935 // Showing thumbnails:
1936 $thumbsnail = '';
1937 if ($show_thumbs) {
1938 $imgs = array();
1939 foreach($itemArray as $imgRead) {
1940 $imgP = explode('|',$imgRead);
1941 $imgPath = rawurldecode($imgP[0]);
1942
1943 $rowCopy = array();
1944 $rowCopy[$field] = $imgPath;
1945
1946 // Icon + clickmenu:
1947 $absFilePath = t3lib_div::getFileAbsFileName($config['uploadfolder'].'/'.$imgPath);
1948
1949 $fI = pathinfo($imgPath);
1950 $fileIcon = t3lib_BEfunc::getFileIcon(strtolower($fI['extension']));
1951 $fileIcon = '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/fileicons/'.$fileIcon,'width="18" height="16"').' class="absmiddle" title="'.htmlspecialchars($fI['basename'].($absFilePath && @is_file($absFilePath) ? ' ('.t3lib_div::formatSize(filesize($absFilePath)).'bytes)' : ' - FILE NOT FOUND!')).'" alt="" />';
1952
1953 $imgs[] = '<span class="nobr">'.t3lib_BEfunc::thumbCode($rowCopy,$table,$field,$this->backPath,'thumbs.php',$config['uploadfolder'],0,' align="middle"').
1954 ($absFilePath ? $this->getClickMenu($fileIcon, $absFilePath) : $fileIcon).
1955 $imgPath.
1956 '</span>';
1957 }
1958 $thumbsnail = implode('<br />',$imgs);
1959 }
1960
1961 // Creating the element:
1962 $params = array(
1963 'size' => $size,
1964 'dontShowMoveIcons' => ($maxitems<=1),
1965 'autoSizeMax' => t3lib_div::intInRange($config['autoSizeMax'],0),
1966 'maxitems' => $maxitems,
1967 'style' => isset($config['selectedListStyle']) ? ' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"',
1968 'info' => $info,
1969 'thumbnails' => $thumbsnail,
1970 'readOnly' => $disabled
1971 );
1972 $item.= $this->dbFileIcons($PA['itemFormElName'],'file',implode(',',$tempFT),$itemArray,'',$params,$PA['onFocus']);
1973
1974 if(!$disabled) {
1975 // Adding the upload field:
1976 if ($this->edit_docModuleUpload) $item.='<input type="file" name="'.$PA['itemFormElName_file'].'"'.$this->formWidth().' size="60" />';
1977 }
1978 break;
1979 case 'db': // If the element is of the internal type "db":
1980
1981 // Creating string showing allowed types:
1982 $tempFT = t3lib_div::trimExplode(',',$allowed,1);
1983 if (!strcmp(trim($tempFT[0]),'*')) {
1984 $info.='<span class="nobr">&nbsp;&nbsp;&nbsp;&nbsp;'.
1985 htmlspecialchars($this->getLL('l_allTables')).
1986 '</span><br />';
1987 } else {
1988 while(list(,$theT)=each($tempFT)) {
1989 if ($theT) {
1990 $info.='<span class="nobr">&nbsp;&nbsp;&nbsp;&nbsp;'.
1991 t3lib_iconWorks::getIconImage($theT,array(),$this->backPath,'align="top"').
1992 htmlspecialchars($this->sL($GLOBALS['TCA'][$theT]['ctrl']['title'])).
1993 '</span><br />';
1994 }
1995 }
1996 }
1997
1998 $perms_clause = $GLOBALS['BE_USER']->getPagePermsClause(1);
1999 $itemArray = array();
2000 $imgs = array();
2001
2002 // Thumbnails:
2003 $temp_itemArray = t3lib_div::trimExplode(',',$PA['itemFormElValue'],1);
2004 foreach($temp_itemArray as $dbRead) {
2005 $recordParts = explode('|',$dbRead);
2006 list($this_table,$this_uid) = t3lib_BEfunc::splitTable_Uid($recordParts[0]);
2007 $itemArray[] = array('table'=>$this_table, 'id'=>$this_uid);
2008 if (!$disabled && $show_thumbs) {
2009 $rr = t3lib_BEfunc::getRecordWSOL($this_table,$this_uid);
2010 $imgs[] = '<span class="nobr">'.
2011 $this->getClickMenu(t3lib_iconWorks::getIconImage($this_table,$rr,$this->backPath,'align="top" title="'.htmlspecialchars(t3lib_BEfunc::getRecordPath($rr['pid'],$perms_clause,15)).' [UID: '.$rr['uid'].']"'),$this_table, $this_uid).
2012 '&nbsp;'.
2013 t3lib_BEfunc::getRecordTitle($this_table,$rr,TRUE).' <span class="typo3-dimmed"><em>['.$rr['uid'].']</em></span>'.
2014 '</span>';
2015 }
2016 }
2017 $thumbsnail='';
2018 if (!$disabled && $show_thumbs) {
2019 $thumbsnail = implode('<br />',$imgs);
2020 }
2021
2022 // Creating the element:
2023 $params = array(
2024 'size' => $size,
2025 'dontShowMoveIcons' => ($maxitems<=1),
2026 'autoSizeMax' => t3lib_div::intInRange($config['autoSizeMax'],0),
2027 'maxitems' => $maxitems,
2028 'style' => isset($config['selectedListStyle']) ? ' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"',
2029 'info' => $info,
2030 'thumbnails' => $thumbsnail,
2031 'readOnly' => $disabled
2032 );
2033 $item.= $this->dbFileIcons($PA['itemFormElName'],'db',implode(',',$tempFT),$itemArray,'',$params,$PA['onFocus'],$table,$field,$row['uid']);
2034
2035 break;
2036 }
2037
2038 // Wizards:
2039 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
2040 if (!$disabled) {
2041 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf);
2042 }
2043
2044 return $item;
2045 }
2046
2047 /**
2048 * Generation of TCEform elements of the type "none"
2049 * This will render a non-editable display of the content of the field.
2050 *
2051 * @param string The table name of the record
2052 * @param string The field name which this element is supposed to edit
2053 * @param array The record data array where the value(s) for the field can be found
2054 * @param array An array with additional configuration options.
2055 * @return string The HTML code for the TCEform field
2056 */
2057 function getSingleField_typeNone($table,$field,$row,&$PA) {
2058 // Init:
2059 $config = $PA['fieldConf']['config'];
2060 $itemValue = $PA['itemFormElValue'];
2061
2062 return $this->getSingleField_typeNone_render($config,$itemValue);
2063 }
2064
2065 /**
2066 * HTML rendering of a value which is not editable.
2067 *
2068 * @param array Configuration for the display
2069 * @param string The value to display
2070 * @return string The HTML code for the display
2071 * @see getSingleField_typeNone();
2072 */
2073 function getSingleField_typeNone_render($config,$itemValue) {
2074
2075 // is colorScheme[0] the right value?
2076 $divStyle = 'border:solid 1px '.t3lib_div::modifyHTMLColorAll($this->colorScheme[0],-30).';'.$this->defStyle.$this->formElStyle('none').' background-color: '.$this->colorScheme[0].'; padding-left:1px;color:#555;';
2077
2078 if ($config['format']) {
2079 $itemValue = $this->formatValue($config, $itemValue);
2080 }
2081
2082 $rows = intval($config['rows']);
2083 if ($rows > 1) {
2084 if(!$config['pass_content']) {
2085 $itemValue = nl2br(htmlspecialchars($itemValue));
2086 }
2087 // like textarea
2088 $cols = t3lib_div::intInRange($config['cols'] ? $config['cols'] : 30, 5, $this->maxTextareaWidth);
2089 if (!$config['fixedRows']) {
2090 $origRows = $rows = t3lib_div::intInRange($rows, 1, 20);
2091 if (strlen($itemValue)>$this->charsPerRow*2) {
2092 $cols = $this->maxTextareaWidth;
2093 $rows = t3lib_div::intInRange(round(strlen($itemValue)/$this->charsPerRow),count(explode(chr(10),$itemValue)),20);
2094 if ($rows<$origRows) $rows=$origRows;
2095 }
2096 }
2097
2098 if ($this->docLarge) $cols = round($cols*$this->form_largeComp);
2099 $width = ceil($cols*$this->form_rowsToStylewidth);
2100 // hardcoded: 12 is the height of the font
2101 $height=$rows*12;
2102
2103 $item='
2104 <div style="'.htmlspecialchars($divStyle.' overflow:auto; height:'.$height.'px; width:'.$width.'px;').'" class="'.htmlspecialchars($this->formElClass('none')).'">'.
2105 $itemValue.
2106 '</div>';
2107 } else {
2108 if(!$config['pass_content']) {
2109 $itemValue = htmlspecialchars($itemValue);
2110 }
2111
2112 $cols = $config['cols']?$config['cols']:($config['size']?$config['size']:$this->maxInputWidth);
2113 if ($this->docLarge) $cols = round($cols*$this->form_largeComp);
2114 $width = ceil($cols*$this->form_rowsToStylewidth);
2115
2116 // overflow:auto crashes mozilla here. Title tag is usefull when text is longer than the div box (overflow:hidden).
2117 $item = '
2118 <div style="'.htmlspecialchars($divStyle.' overflow:hidden; width:'.$width.'px;').'" class="'.htmlspecialchars($this->formElClass('none')).'" title="'.$itemValue.'">'.
2119 '<span class="nobr">'.(strcmp($itemValue,'')?$itemValue:'&nbsp;').'</span>'.
2120 '</div>';
2121 }
2122
2123 return $item;
2124 }
2125
2126 /**
2127 * Handler for Flex Forms
2128 *
2129 * @param string The table name of the record
2130 * @param string The field name which this element is supposed to edit
2131 * @param array The record data array where the value(s) for the field can be found
2132 * @param array An array with additional configuration options.
2133 * @return string The HTML code for the TCEform field
2134 */
2135 function getSingleField_typeFlex($table,$field,$row,&$PA) {
2136
2137 // Data Structure:
2138 $dataStructArray = t3lib_BEfunc::getFlexFormDS($PA['fieldConf']['config'],$row,$table);
2139
2140 // Get data structure:
2141 if (is_array($dataStructArray)) {
2142
2143 // Get data:
2144 $xmlData = $PA['itemFormElValue'];
2145 $xmlHeaderAttributes = t3lib_div::xmlGetHeaderAttribs($xmlData);
2146 $storeInCharset = strtolower($xmlHeaderAttributes['encoding']);
2147 if ($storeInCharset) {
2148 $currentCharset=$GLOBALS['LANG']->charSet;
2149 $xmlData = $GLOBALS['LANG']->csConvObj->conv($xmlData,$storeInCharset,$currentCharset,1);
2150 }
2151 $editData=t3lib_div::xml2array($xmlData);
2152 if (!is_array($editData)) { // Must be XML parsing error...
2153 $editData=array();
2154 } elseif (!isset($editData['meta']) || !is_array($editData['meta'])) {
2155 $editData['meta'] = array();
2156 }
2157
2158 // Find the data structure if sheets are found:
2159 $sheet = $editData['meta']['currentSheetId'] ? $editData['meta']['currentSheetId'] : 'sDEF'; // Sheet to display
2160
2161 // Create sheet menu:
2162 // if (is_array($dataStructArray['sheets'])) {
2163 // #$item.=$this->getSingleField_typeFlex_sheetMenu($dataStructArray['sheets'], $PA['itemFormElName'].'[meta][currentSheetId]', $sheet).'<br />';
2164 // }
2165
2166 // Create language menu:
2167 $langChildren = $dataStructArray['meta']['langChildren'] ? 1 : 0;
2168 $langDisabled = $dataStructArray['meta']['langDisable'] ? 1 : 0;
2169
2170 $editData['meta']['currentLangId']=array();
2171 $languages = $this->getAvailableLanguages();
2172
2173 foreach($languages as $lInfo) {
2174 if ($GLOBALS['BE_USER']->checkLanguageAccess($lInfo['uid'])) {
2175 $editData['meta']['currentLangId'][] = $lInfo['ISOcode'];
2176 }
2177 }
2178 if (!is_array($editData['meta']['currentLangId']) || !count($editData['meta']['currentLangId'])) {
2179 $editData['meta']['currentLangId']=array('DEF');
2180 }
2181
2182 $editData['meta']['currentLangId'] = array_unique($editData['meta']['currentLangId']);
2183
2184
2185 // if (!$langDisabled && count($languages) > 1) {
2186 // $item.=$this->getSingleField_typeFlex_langMenu($languages, $PA['itemFormElName'].'[meta][currentLangId]', $editData['meta']['currentLangId']).'<br />';
2187 // }
2188
2189 $PA['_noEditDEF'] = FALSE;
2190 if ($langChildren || $langDisabled) {
2191 $rotateLang = array('DEF');
2192 } else {
2193 if (!in_array('DEF',$editData['meta']['currentLangId'])) {
2194 array_unshift($editData['meta']['currentLangId'],'DEF');
2195 $PA['_noEditDEF'] = TRUE;
2196 }
2197 $rotateLang = $editData['meta']['currentLangId'];
2198 }
2199
2200 // Tabs sheets
2201 if (is_array($dataStructArray['sheets'])) {
2202 $tabsToTraverse = array_keys($dataStructArray['sheets']);
2203 } else {
2204 $tabsToTraverse = array($sheet);
2205 }
2206
2207 foreach ($rotateLang as $lKey) {
2208 if (!$langChildren && !$langDisabled) {
2209 $item.= '<b>'.$this->getLanguageIcon($table,$row,'v'.$lKey).$lKey.':</b>';
2210 }
2211
2212 $tabParts = array();
2213 foreach ($tabsToTraverse as $sheet) {
2214 $sheetCfg = $dataStructArray['sheets'][$sheet];
2215 list ($dataStruct, $sheet) = t3lib_div::resolveSheetDefInDS($dataStructArray,$sheet);
2216
2217 // Render sheet:
2218 if (is_array($dataStruct['ROOT']) && is_array($dataStruct['ROOT']['el'])) {
2219 $cmdData = t3lib_div::_GP('flexFormsCmdData');
2220 $lang = 'l'.$lKey; // Default language, other options are "lUK" or whatever country code (independant of system!!!)
2221 $PA['_valLang'] = $langChildren && !$langDisabled ? $editData['meta']['currentLangId'] : 'DEF'; // Default language, other options are "lUK" or whatever country code (independant of system!!!)
2222 $PA['_lang'] = $lang;
2223
2224 // Render flexform:
2225 $tRows = $this->getSingleField_typeFlex_draw(
2226 $dataStruct['ROOT']['el'],
2227 $editData['data'][$sheet][$lang],
2228 $cmdData['data'][$sheet][$lang],
2229 $table,
2230 $field,
2231 $row,
2232 $PA,
2233 '[data]['.$sheet.']['.$lang.']'
2234 );
2235 $sheetContent= '<table border="0" cellpadding="1" cellspacing="1" class="typo3-TCEforms-flexForm">'.implode('',$tRows).'</table>';
2236
2237 # $item = '<div style=" position:absolute;">'.$item.'</div>';
2238 //visibility:hidden;
2239 } else $sheetContent='Data Structure ERROR: No ROOT element found for sheet "'.$sheet.'".';
2240
2241 // Add to tab:
2242 $tabParts[] = array(
2243 'label' => ($sheetCfg['ROOT']['TCEforms']['sheetTitle'] ? $this->sL($sheetCfg['ROOT']['TCEforms']['sheetTitle']) : $sheet),
2244 'description' => ($sheetCfg['ROOT']['TCEforms']['sheetDescription'] ? $this->sL($sheetCfg['ROOT']['TCEforms']['sheetDescription']) : ''),
2245 'linkTitle' => ($sheetCfg['ROOT']['TCEforms']['sheetShortDescr'] ? $this->sL($sheetCfg['ROOT']['TCEforms']['sheetShortDescr']) : ''),
2246 'content' => $sheetContent
2247 );
2248 }
2249
2250 if (is_array($dataStructArray['sheets'])) {
2251 $item.= $this->getDynTabMenu($tabParts,'TCEFORMS:flexform:'.$PA['itemFormElName'].$PA['_lang']);
2252 } else {
2253 $item.= $sheetContent;
2254 }
2255 }
2256 } else $item='Data Structure ERROR: '.$dataStructArray;
2257
2258 return $item;
2259 }
2260
2261 /**
2262 * Creates the language menu for FlexForms:
2263 *
2264 * @param [type] $languages: ...
2265 * @param [type] $elName: ...
2266 * @param [type] $selectedLanguage: ...
2267 * @param [type] $multi: ...
2268 * @return string HTML for menu
2269 */
2270 function getSingleField_typeFlex_langMenu($languages,$elName,$selectedLanguage,$multi=1) {
2271 $opt=array();
2272 foreach($languages as $lArr) {
2273 $opt[]='<option value="'.htmlspecialchars($lArr['ISOcode']).'"'.(in_array($lArr['ISOcode'],$selectedLanguage)?' selected="selected"':'').'>'.htmlspecialchars($lArr['title']).'</option>';
2274 }
2275
2276 $output = '<select name="'.$elName.'[]"'.($multi ? ' multiple="multiple" size="'.count($languages).'"' : '').'>'.implode('',$opt).'</select>';
2277
2278 return $output;
2279 }
2280
2281 /**
2282 * Creates the menu for selection of the sheets:
2283 *
2284 * @param array Sheet array for which to render the menu
2285 * @param string Form element name of the field containing the sheet pointer
2286 * @param string Current sheet key
2287 * @return string HTML for menu
2288 */
2289 function getSingleField_typeFlex_sheetMenu($sArr,$elName,$sheetKey) {
2290
2291 $tCells =array();
2292 $pct = round(100/count($sArr));
2293 foreach($sArr as $sKey => $sheetCfg) {
2294 if ($GLOBALS['BE_USER']->jsConfirmation(1)) {
2295 $onClick = 'if (confirm(TBE_EDITOR.labels.onChangeAlert) && TBE_EDITOR.checkSubmit(-1)){'.$this->elName($elName).".value='".$sKey."'; TBE_EDITOR.submitForm()};";
2296 } else {
2297 $onClick = 'if(TBE_EDITOR.checkSubmit(-1)){ '.$this->elName($elName).".value='".$sKey."'; TBE_EDITOR.submitForm();}";
2298 }
2299
2300
2301 $tCells[]='<td width="'.$pct.'%" style="'.($sKey==$sheetKey ? 'background-color: #9999cc; font-weight: bold;' : 'background-color: #aaaaaa;').' cursor: hand;" onclick="'.htmlspecialchars($onClick).'" align="center">'.
2302 ($sheetCfg['ROOT']['TCEforms']['sheetTitle'] ? $this->sL($sheetCfg['ROOT']['TCEforms']['sheetTitle']) : $sKey).
2303 '</td>';
2304 }
2305
2306 return '<table border="0" cellpadding="0" cellspacing="2" class="typo3-TCEforms-flexForm-sheetMenu"><tr>'.implode('',$tCells).'</tr></table>';
2307 }
2308
2309 /**
2310 * [Describe function...]
2311 *
2312 * @param [type] $dataStruct: ...
2313 * @param [type] $editData: ...
2314 * @param [type] $cmdData: ...
2315 * @param [type] $table: ...
2316 * @param [type] $field: ...
2317 * @param [type] $row: ...
2318 * @param [type] $PA: ...
2319 * @param [type] $formPrefix: ...
2320 * @param [type] $level: ...
2321 * @param [type] $tRows: ...
2322 * @return [type] ...
2323 */
2324 function getSingleField_typeFlex_draw($dataStruct,$editData,$cmdData,$table,$field,$row,&$PA,$formPrefix='',$level=0,$tRows=array()) {
2325
2326 // Data Structure array must be ... and array of course...
2327 if (is_array($dataStruct)) {
2328 foreach($dataStruct as $key => $value) {
2329 if (is_array($value)) { // The value of each entry must be an array.
2330
2331 // ********************
2332 // Making the row:
2333 // ********************
2334 $rowCells=array();
2335
2336 // Icon:
2337 $rowCells['title'] = '<img src="clear.gif" width="'.($level*16).'" height="1" alt="" /><strong>'.htmlspecialchars(t3lib_div::fixed_lgd_cs($this->sL($value['tx_templavoila']['title']),30)).'</strong>';;
2338
2339 $rowCells['formEl']='';
2340 if ($value['type']=='array') {
2341 if ($value['section']) {
2342 // Render "NEW [container]" selectorbox:
2343 if (is_array($value['el'])) {
2344 $opt=array();
2345 $opt[]='<option value=""></option>';
2346 foreach($value['el'] as $kk => $vv) {
2347 $opt[]='<option value="'.$kk.'">'.htmlspecialchars($this->sL($value['el'][$kk]['tx_templavoila']['title'])).'</option>';
2348 }
2349 $rowCells['formEl']=$this->getLL('l_new_section') . ' <select name="flexFormsCmdData'.$formPrefix.'['.$key.'][value]">'.implode('',$opt).'</select> ';
2350 $rowCells['formEl'].=$this->getLL('l_count') . ' <select name="flexFormsCmdData'.$formPrefix.'['.$key.'][count]">';
2351 for ($i = 1; $i <= 10; $i++) {
2352 $rowCells['formEl'].='<option value="' . $i . '">' . $i . '</option>';
2353 }
2354 $rowCells['formEl'].='</select>';
2355 }
2356
2357 // Put row together
2358 $tRows[]='<tr class="bgColor2">
2359 <td nowrap="nowrap" valign="top">'.$rowCells['title'].'</td>
2360 <td>'.$rowCells['formEl'].'</td>
2361 </tr>';
2362
2363 $cc=0;
2364 if (is_array($editData[$key]['el'])) {
2365 foreach ($editData[$key]['el'] as $k3 => $v3) {
2366 $cc=$k3;
2367 $theType = key($v3);
2368 $theDat = $v3[$theType];
2369 $newSectionEl = $value['el'][$theType];
2370 if (is_array($newSectionEl)) {
2371 $tRows = $this->getSingleField_typeFlex_draw(
2372 array($theType => $newSectionEl),
2373 array($theType => $theDat),
2374 $cmdData[$key]['el'][$cc],
2375 $table,
2376 $field,
2377 $row,
2378 $PA,
2379 $formPrefix.'['.$key.'][el]['.$cc.']',
2380 $level+1,
2381 $tRows
2382 );
2383 }
2384 }
2385 }
2386
2387 // New form?
2388 if ($cmdData[$key]['value']) {
2389 $newSectionEl = $value['el'][$cmdData[$key]['value']];
2390 if (is_array($newSectionEl)) {
2391 $newElCount = max(1, intval($cmdData[$key]['count']));
2392 for ($newElNum = 0; $newElNum < $newElCount; $newElNum++) {
2393 $tRows = $this->getSingleField_typeFlex_draw(
2394 array($cmdData[$key]['value'] => $newSectionEl),
2395 array(),
2396 array(),
2397 $table,
2398 $field,
2399 $row,
2400 $PA,
2401 $formPrefix.'['.$key.'][el]['.($cc+1+$newElNum).']',
2402 $level+1,
2403 $tRows
2404 );
2405 }
2406 }
2407 }
2408 } else {
2409 $idTagPrefix = uniqid('id',true); // ID attributes are used for the move and delete checkboxes for referencing to them in the label tag (<label for="the form field id">) that's rendered around the icons
2410
2411 // Put row together
2412 $tRows[]='<tr class="bgColor2">
2413 <td nowrap="nowrap" valign="top">'.
2414 '<input name="_DELETE_FLEX_FORM'.$PA['itemFormElName'].$formPrefix.'" id="'.$idTagPrefix.'-del" type="checkbox"'.$this->insertDefStyle('check').' value="1" /><label for="'.$idTagPrefix.'-del"><img src="'.$this->backPath.'gfx/garbage.gif" border="0" alt="" /></label>'.
2415 '<input name="_MOVEUP_FLEX_FORM'.$PA['itemFormElName'].$formPrefix.'" id="'.$idTagPrefix.'-mvup" type="checkbox"'.$this->insertDefStyle('check').' value="1" /><label for="'.$idTagPrefix.'-mvup"><img src="'.$this->backPath.'gfx/button_up.gif" border="0" alt="" /></label>'.
2416 '<input name="_MOVEDOWN_FLEX_FORM'.$PA['itemFormElName'].$formPrefix.'" id="'.$idTagPrefix.'-mvdown" type="checkbox"'.$this->insertDefStyle('check').' value="1" /><label for="'.$idTagPrefix.'-mvdown"><img src="'.$this->backPath.'gfx/button_down.gif" border="0" alt="" /></label>'.
2417 $rowCells['title'].'</td>
2418 <td>'.$rowCells['formEl'].'</td>
2419 </tr>';
2420
2421 $tRows = $this->getSingleField_typeFlex_draw(
2422 $value['el'],
2423 $editData[$key]['el'],
2424 $cmdData[$key]['el'],
2425 $table,
2426 $field,
2427 $row,
2428 $PA,
2429 $formPrefix.'['.$key.'][el]',
2430 $level+1,
2431 $tRows
2432 );
2433 }
2434
2435 } elseif (is_array($value['TCEforms']['config'])) { // Rendering a single form element:
2436
2437 if (is_array($PA['_valLang'])) {
2438 $rotateLang = $PA['_valLang'];
2439 } else {
2440 $rotateLang = array($PA['_valLang']);
2441 }
2442
2443 foreach($rotateLang as $vDEFkey) {
2444 $vDEFkey = 'v'.$vDEFkey;
2445
2446 if (!$value['TCEforms']['displayCond'] || $this->isDisplayCondition($value['TCEforms']['displayCond'],$editData,$vDEFkey)) {
2447 $fakePA=array();
2448 $fakePA['fieldConf']=array(
2449 'label' => $this->sL(trim($value['TCEforms']['label'])),
2450 'config' => $value['TCEforms']['config'],
2451 'defaultExtras' => $value['TCEforms']['defaultExtras'],
2452 'onChange' => $value['TCEforms']['onChange']
2453 );
2454 if ($PA['_noEditDEF'] && $PA['_lang']==='lDEF') {
2455 $fakePA['fieldConf']['config'] = array(
2456 'type' => 'none',
2457 'rows' => 2
2458 );
2459 }
2460
2461 if (
2462 $fakePA['fieldConf']['onChange'] == 'reload' ||
2463 ($GLOBALS['TCA'][$table]['ctrl']['type'] && !strcmp($key,$GLOBALS['TCA'][$table]['ctrl']['type'])) ||
2464 ($GLOBALS['TCA'][$table]['ctrl']['requestUpdate'] && t3lib_div::inList($GLOBALS['TCA'][$table]['ctrl']['requestUpdate'],$key))) {
2465 if ($GLOBALS['BE_USER']->jsConfirmation(1)) {
2466 $alertMsgOnChange = 'if (confirm(TBE_EDITOR.labels.onChangeAlert) && TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm() };';
2467 } else {
2468 $alertMsgOnChange = 'if(TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm();}';
2469 }
2470 } else {
2471 $alertMsgOnChange = '';
2472 }
2473
2474 $fakePA['fieldChangeFunc']=$PA['fieldChangeFunc'];
2475 if (strlen($alertMsgOnChange)) {
2476 $fakePA['fieldChangeFunc']['alert']=$alertMsgOnChange;
2477 }
2478 $fakePA['onFocus']=$PA['onFocus'];
2479 $fakePA['label']=$PA['label'];
2480
2481 $fakePA['itemFormElName']=$PA['itemFormElName'].$formPrefix.'['.$key.']['.$vDEFkey.']';
2482 $fakePA['itemFormElName_file']=$PA['itemFormElName_file'].$formPrefix.'['.$key.']['.$vDEFkey.']';
2483
2484 if(isset($editData[$key][$vDEFkey])) {
2485 $fakePA['itemFormElValue']=$editData[$key][$vDEFkey];
2486 } else {
2487 $fakePA['itemFormElValue']=$fakePA['fieldConf']['config']['default'];
2488 }
2489
2490 $rowCells['formEl']= $this->getSingleField_SW($table,$field,$row,$fakePA);
2491 $rowCells['title']= htmlspecialchars($fakePA['fieldConf']['label']);
2492
2493 if (!in_array('DEF',$rotateLang)) {
2494 $defInfo = '<div class="typo3-TCEforms-originalLanguageValue">'.$this->getLanguageIcon($table,$row,0).$this->previewFieldValue($editData[$key]['vDEF'], $fakePA['fieldConf']).'&nbsp;</div>';
2495 } else {
2496 $defInfo = '';
2497 }
2498
2499 if (!$PA['_noEditDEF']) {
2500 $prLang = $this->getAdditionalPreviewLanguages();
2501 foreach($prLang as $prL) {
2502 $defInfo.= '<div class="typo3-TCEforms-originalLanguageValue">'.$this->getLanguageIcon($table,$row,'v'.$prL['ISOcode']).$this->previewFieldValue($editData[$key]['v'.$prL['ISOcode']], $fakePA['fieldConf']).'&nbsp;</div>';
2503 }
2504 }
2505
2506 // Put row together
2507 $tRows[]='<tr>
2508 <td nowrap="nowrap" valign="top" class="bgColor5">'.($vDEFkey=='vDEF' ? '' : $this->getLanguageIcon($table,$row,$vDEFkey)).$rowCells['title'].'</td>
2509 <td class="bgColor4">'.$rowCells['formEl'].$defInfo.'</td>
2510 </tr>';
2511 }
2512 }
2513 }
2514 }
2515 }
2516 }
2517
2518 return $tRows;
2519 }
2520
2521 /**
2522 * Handler for unknown types.
2523 *
2524 * @param string The table name of the record
2525 * @param string The field name which this element is supposed to edit
2526 * @param array The record data array where the value(s) for the field can be found
2527 * @param array An array with additional configuration options.
2528 * @return string The HTML code for the TCEform field
2529 */
2530 function getSingleField_typeUnknown($table,$field,$row,&$PA) {
2531 $item='Unknown type: '.$PA['fieldConf']['config']['form_type'].'<br />';
2532
2533 return $item;
2534 }
2535
2536 /**
2537 * User defined field type
2538 *
2539 * @param string The table name of the record
2540 * @param string The field name which this element is supposed to edit
2541 * @param array The record data array where the value(s) for the field can be found
2542 * @param array An array with additional configuration options.
2543 * @return string The HTML code for the TCEform field
2544 */
2545 function getSingleField_typeUser($table,$field,$row,&$PA) {
2546 $PA['table']=$table;
2547 $PA['field']=$field;
2548 $PA['row']=$row;
2549
2550 $PA['pObj']=&$this;
2551
2552 return t3lib_div::callUserFunction($PA['fieldConf']['config']['userFunc'],$PA,$this);
2553 }
2554
2555
2556
2557
2558
2559
2560 /************************************************************
2561 *
2562 * Field content processing
2563 *
2564 ************************************************************/
2565
2566 /**
2567 * Format field content of various types if $config['format'] is set to date, filesize, ..., user
2568 * This is primarily for the field type none but can be used for user field types for example
2569 *
2570 * @param array Configuration for the display
2571 * @param string The value to display
2572 * @return string Formatted Field content
2573 */
2574 function formatValue ($config, $itemValue) {
2575 $format = trim($config['format']);
2576 switch($format) {
2577 case 'date':
2578 if ($itemValue) {
2579 $option = trim($config['format.']['option']);
2580 if ($option) {
2581 if ($config['format.']['strftime']) {
2582 $value = strftime($option,$itemValue);
2583 } else {
2584 $value = date($option,$itemValue);
2585 }
2586 } else {
2587 $value = date('d-m-Y',$itemValue);
2588 }
2589 } else {
2590 $value = '';
2591 }
2592 if ($config['format.']['appendAge']) {
2593 $value .= ' ('.t3lib_BEfunc::calcAge((time()-$itemValue), $GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_core.php:labels.minutesHoursDaysYears')).')';
2594 }
2595 $itemValue = $value;
2596 break;
2597 case 'datetime': // compatibility with "eval" (type "input")
2598 $itemValue = date('H:i d-m-Y',$itemValue);
2599 break;
2600 case 'time': // compatibility with "eval" (type "input")
2601 $itemValue = date('H:i',$itemValue);
2602 break;
2603 case 'timesec': // compatibility with "eval" (type "input")
2604 $itemValue = date('H:i:s',$itemValue);
2605 break;
2606 case 'year': // compatibility with "eval" (type "input")
2607 $itemValue = date('Y',$itemValue);
2608 break;
2609 case 'int':
2610 $baseArr = array('dec'=>'d','hex'=>'x','HEX'=>'X','oct'=>'o','bin'=>'b');
2611 $base = trim($config['format.']['base']);
2612 $format = $baseArr[$base] ? $baseArr[$base] : 'd';
2613 $itemValue = sprintf('%'.$format,$itemValue);
2614 break;
2615 case 'float':
2616 $precision = t3lib_div::intInRange($config['format.']['precision'],1,10,2);
2617 $itemValue = sprintf('%.'.$precision.'f',$itemValue);
2618 break;
2619 case 'number':
2620 $format = trim($config['format.']['option']);
2621 $itemValue = sprintf('%'.$format,$itemValue);
2622 break;
2623 case 'md5':
2624 $itemValue = md5($itemValue);
2625 break;
2626 case 'filesize':
2627 $value = t3lib_div::formatSize(intval($itemValue));
2628 if ($config['format.']['appendByteSize']) {
2629 $value .= ' ('.$itemValue.')';
2630 }
2631 $itemValue = $value;
2632 break;
2633 case 'user':
2634 $func = trim($config['format.']['userFunc']);
2635 if ($func) {
2636 $params = array(
2637 'value' => $itemValue,
2638 'args' => $config['format.']['userFunc'],
2639 'config' => $config,
2640 'pObj' => &$this
2641 );
2642 $itemValue = t3lib_div::callUserFunction($func,$params,$this);
2643 }
2644 break;
2645 default:
2646 break;
2647 }
2648
2649 return $itemValue;
2650 }
2651
2652
2653
2654
2655
2656
2657 /************************************************************
2658 *
2659 * "Configuration" fetching/processing functions
2660 *
2661 ************************************************************/
2662
2663 /**
2664 * Calculate and return the current "types" pointer value for a record
2665 *
2666 * @param string The table name. MUST be in $TCA
2667 * @param array The row from the table, should contain at least the "type" field, if applicable.
2668 * @return string Return the "type" value for this record, ready to pick a "types" configuration from the $TCA array.
2669 */
2670 function getRTypeNum($table,$row) {
2671 global $TCA;
2672 // If there is a "type" field configured...
2673 if ($TCA[$table]['ctrl']['type']) {
2674 $typeFieldName = $TCA[$table]['ctrl']['type'];
2675 $typeNum=$row[$typeFieldName]; // Get value of the row from the record which contains the type value.
2676 if (!strcmp($typeNum,'')) $typeNum=0; // If that value is an empty string, set it to "0" (zero)
2677 } else {
2678 $typeNum = 0; // If no "type" field, then set to "0" (zero)
2679 }
2680
2681 $typeNum = (string)$typeNum; // Force to string. Necessary for eg '-1' to be recognized as a type value.
2682 if (!$TCA[$table]['types'][$typeNum]) { // However, if the type "0" is not found in the "types" array, then default to "1" (for historical reasons)
2683 $typeNum = 1;
2684 }
2685
2686 return $typeNum;
2687 }
2688
2689 /**
2690 * Used to adhoc-rearrange the field order normally set in the [types][showitem] list
2691 *
2692 * @param array A [types][showitem] list of fields, exploded by ","
2693 * @return array Returns rearranged version (keys are changed around as well.)
2694 * @see getMainFields()
2695 */
2696 function rearrange($fields) {
2697 $fO = array_flip(t3lib_div::trimExplode(',',$this->fieldOrder,1));
2698 reset($fields);
2699 $newFields=array();
2700 while(list($cc,$content)=each($fields)) {
2701 $cP = t3lib_div::trimExplode(';',$content);
2702 if (isset($fO[$cP[0]])) {
2703 $newFields[$fO[