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