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