Feature #6710: Use optgroups in selectorboxes
[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 if(!strcmp($p[1],'--div--')) {
1515 if($optGroupOpen) { // Closing last optgroup before next one starts
1516 $opt[]='</optgroup>';
1517 }
1518 $opt[]= '<optgroup label="'.t3lib_div::deHSCentities(htmlspecialchars($p[0])).'"'.
1519 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1520 ' class="c-divider">';
1521 $optGroupOpen = true;
1522 } else {
1523 $opt[]= '<option value="'.htmlspecialchars($p[1]).'"'.
1524 $sM.
1525 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1526 '>'.t3lib_div::deHSCentities(htmlspecialchars($p[0])).'</option>';
1527 }
1528 }
1529
1530 // If there is an icon for the selector box (rendered in table under)...:
1531 if ($p[2] && !$suppressIcons && (!$onlySelectedIconShown || $sM)) {
1532 list($selIconFile,$selIconInfo)=$this->getIcon($p[2]);
1533 $iOnClick = $this->elName($PA['itemFormElName']).'.selectedIndex='.$c.'; '.implode('',$PA['fieldChangeFunc']).$this->blur().'return false;';
1534 $selicons[]=array(
1535 (!$onlySelectedIconShown ? '<a href="#" onclick="'.htmlspecialchars($iOnClick).'">' : '').
1536 '<img src="'.$selIconFile.'" '.$selIconInfo[3].' vspace="2" border="0" title="'.htmlspecialchars($p[0]).'" alt="'.htmlspecialchars($p[0]).'" />'.
1537 (!$onlySelectedIconShown ? '</a>' : ''),
1538 $c,$sM);
1539 }
1540 $c++;
1541 }
1542
1543 if($optGroupOpen) { // Closing optgroup if open
1544 $opt[]='</optgroup>';
1545 $optGroupOpen = false;
1546 }
1547
1548 // No-matching-value:
1549 if ($PA['itemFormElValue'] && $noMatchingValue && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1550 $nMV_label = @sprintf($nMV_label, $PA['itemFormElValue']);
1551 $opt[]= '<option value="'.htmlspecialchars($PA['itemFormElValue']).'" selected="selected">'.htmlspecialchars($nMV_label).'</option>';
1552 }
1553
1554 // Create item form fields:
1555 $sOnChange = 'if (this.options[this.selectedIndex].value==\'--div--\') {this.selectedIndex='.$sI.';} '.implode('',$PA['fieldChangeFunc']);
1556 if(!$disabled) {
1557 $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...
1558 }
1559 $item.= '<select name="'.$PA['itemFormElName'].'"'.
1560 $this->insertDefStyle('select').
1561 ($size?' size="'.$size.'"':'').
1562 ' onchange="'.htmlspecialchars($sOnChange).'"'.
1563 $PA['onFocus'].$disabled.'>';
1564 $item.= implode('',$opt);
1565 $item.= '</select>';
1566
1567 // Create icon table:
1568 if (count($selicons) && !$config['noIconsBelowSelect']) {
1569 $item.='<table border="0" cellpadding="0" cellspacing="0" class="typo3-TCEforms-selectIcons">';
1570 $selicon_cols = intval($config['selicon_cols']);
1571 if (!$selicon_cols) $selicon_cols=count($selicons);
1572 $sR = ceil(count($selicons)/$selicon_cols);
1573 $selicons = array_pad($selicons,$sR*$selicon_cols,'');
1574 for($sa=0;$sa<$sR;$sa++) {
1575 $item.='<tr>';
1576 for($sb=0;$sb<$selicon_cols;$sb++) {
1577 $sk=($sa*$selicon_cols+$sb);
1578 $imgN = 'selIcon_'.$table.'_'.$row['uid'].'_'.$field.'_'.$selicons[$sk][1];
1579 $imgS = ($selicons[$sk][2]?$this->backPath.'gfx/content_selected.gif':'clear.gif');
1580 $item.='<td><img name="'.htmlspecialchars($imgN).'" src="'.$imgS.'" width="7" height="10" alt="" /></td>';
1581 $item.='<td>'.$selicons[$sk][0].'</td>';
1582 }
1583 $item.='</tr>';
1584 }
1585 $item.='</table>';
1586 }
1587
1588 return $item;
1589 }
1590
1591 /**
1592 * Creates a checkbox list (renderMode = "checkbox")
1593 * (Render function for getSingleField_typeSelect())
1594 *
1595 * @param string See getSingleField_typeSelect()
1596 * @param string See getSingleField_typeSelect()
1597 * @param array See getSingleField_typeSelect()
1598 * @param array See getSingleField_typeSelect()
1599 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1600 * @param array Items available for selection
1601 * @param string Label for no-matching-value
1602 * @return string The HTML code for the item
1603 * @see getSingleField_typeSelect()
1604 */
1605 function getSingleField_typeSelect_checkbox($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1606
1607 // Get values in an array (and make unique, which is fine because there can be no duplicates anyway):
1608 $itemArray = array_flip($this->extractValuesOnlyFromValueLabelList($PA['itemFormElValue']));
1609
1610 $disabled = '';
1611 if($this->renderReadonly || $config['readOnly']) {
1612 $disabled = ' disabled="disabled"';
1613 }
1614
1615 // Traverse the Array of selector box items:
1616 $tRows = array();
1617 $c=0;
1618 if (!$disabled) {
1619 $sOnChange = implode('',$PA['fieldChangeFunc']);
1620 $setAll = array(); // Used to accumulate the JS needed to restore the original selection.
1621 foreach($selItems as $p) {
1622 // Non-selectable element:
1623 if (!strcmp($p[1],'--div--')) {
1624 if (count($setAll)) {
1625 $tRows[] = '
1626 <tr>
1627 <td colspan="2">'.
1628 '<a href="#" onclick="'.htmlspecialchars(implode('',$setAll).' return false;').'">'.
1629 htmlspecialchars($this->getLL('l_setAllCheckboxes')).
1630 '</a></td>
1631 </tr>';
1632 $setAll = array();
1633 }
1634
1635 $tRows[] = '
1636 <tr class="c-header">
1637 <td colspan="2">'.htmlspecialchars($p[0]).'</td>
1638 </tr>';
1639 } else {
1640 // Selected or not by default:
1641 $sM = '';
1642 if (isset($itemArray[$p[1]])) {
1643 $sM = ' checked="checked"';
1644 unset($itemArray[$p[1]]);
1645 }
1646
1647 // Icon:
1648 $selIconFile = '';
1649 if ($p[2]) {
1650 list($selIconFile,$selIconInfo) = $this->getIcon($p[2]);
1651 }
1652
1653 // Compile row:
1654 $onClickCell = $this->elName($PA['itemFormElName'].'['.$c.']').'.checked=!'.$this->elName($PA['itemFormElName'].'['.$c.']').'.checked;';
1655 $onClick = 'this.attributes.getNamedItem("class").nodeValue = '.$this->elName($PA['itemFormElName'].'['.$c.']').'.checked ? "c-selectedItem" : "";';
1656 $setAll[] = $this->elName($PA['itemFormElName'].'['.$c.']').'.checked=1;';
1657 $tRows[] = '
1658 <tr class="'.($sM ? 'c-selectedItem' : '').'" onclick="'.htmlspecialchars($onClick).'" style="cursor: pointer;">
1659 <td><input type="checkbox"'.$this->insertDefStyle('check').' name="'.htmlspecialchars($PA['itemFormElName'].'['.$c.']').'" value="'.htmlspecialchars($p[1]).'"'.$sM.' onclick="'.htmlspecialchars($sOnChange).'"'.$PA['onFocus'].' /></td>
1660 <td class="c-labelCell" onclick="'.htmlspecialchars($onClickCell).'">'.
1661 ($selIconFile ? '<img src="'.$selIconFile.'" '.$selIconInfo[3].' vspace="2" border="0" class="absmiddle" style="margin-right: 4px;" alt="" />' : '').
1662 t3lib_div::deHSCentities(htmlspecialchars($p[0])).
1663 (strcmp($p[3],'') ? '<br/><p class="c-descr">'.nl2br(trim(htmlspecialchars($p[3]))).'</p>' : '').
1664 '</td>
1665 </tr>';
1666 $c++;
1667 }
1668 }
1669
1670 // Remaining checkboxes will get their set-all link:
1671 if (count($setAll)) {
1672 $tRows[] = '
1673 <tr>
1674 <td colspan="2">'.
1675 '<a href="#" onclick="'.htmlspecialchars(implode('',$setAll).' return false;').'">'.
1676 htmlspecialchars($this->getLL('l_setAllCheckboxes')).
1677 '</a></td>
1678 </tr>';
1679 }
1680 }
1681
1682 // Remaining values (invalid):
1683 if (count($itemArray) && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1684 foreach($itemArray as $theNoMatchValue => $temp) {
1685 // Compile <checkboxes> tag:
1686 array_unshift($tRows,'
1687 <tr class="c-invalidItem">
1688 <td><input type="checkbox"'.$this->insertDefStyle('check').' name="'.htmlspecialchars($PA['itemFormElName'].'['.$c.']').'" value="'.htmlspecialchars($theNoMatchValue).'" checked="checked" onclick="'.htmlspecialchars($sOnChange).'"'.$PA['onFocus'].$disabled.' /></td>
1689 <td class="c-labelCell">'.
1690 t3lib_div::deHSCentities(htmlspecialchars(@sprintf($nMV_label, $theNoMatchValue))).
1691 '</td>
1692 </tr>');
1693 $c++;
1694 }
1695 }
1696
1697 // Add an empty hidden field which will send a blank value if all items are unselected.
1698 $item.='<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="" />';
1699
1700 // Implode rows in table:
1701 $item.= '
1702 <table border="0" cellpadding="0" cellspacing="0" class="typo3-TCEforms-select-checkbox">'.
1703 implode('',$tRows).'
1704 </table>
1705 ';
1706
1707 return $item;
1708 }
1709
1710 /**
1711 * Creates a selectorbox list (renderMode = "singlebox")
1712 * (Render function for getSingleField_typeSelect())
1713 *
1714 * @param string See getSingleField_typeSelect()
1715 * @param string See getSingleField_typeSelect()
1716 * @param array See getSingleField_typeSelect()
1717 * @param array See getSingleField_typeSelect()
1718 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1719 * @param array Items available for selection
1720 * @param string Label for no-matching-value
1721 * @return string The HTML code for the item
1722 * @see getSingleField_typeSelect()
1723 */
1724 function getSingleField_typeSelect_singlebox($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1725
1726 // Get values in an array (and make unique, which is fine because there can be no duplicates anyway):
1727 $itemArray = array_flip($this->extractValuesOnlyFromValueLabelList($PA['itemFormElValue']));
1728
1729 $disabled = '';
1730 if($this->renderReadonly || $config['readOnly']) {
1731 $disabled = ' disabled="disabled"';
1732 }
1733
1734 // Traverse the Array of selector box items:
1735 $opt = array();
1736 $restoreCmd = array(); // Used to accumulate the JS needed to restore the original selection.
1737 $c = 0;
1738 foreach($selItems as $p) {
1739 // Selected or not by default:
1740 $sM = '';
1741 if (isset($itemArray[$p[1]])) {
1742 $sM = ' selected="selected"';
1743 $restoreCmd[] = $this->elName($PA['itemFormElName'].'[]').'.options['.$c.'].selected=1;';
1744 unset($itemArray[$p[1]]);
1745 }
1746
1747 // Non-selectable element:
1748 $nonSel = '';
1749 if (!strcmp($p[1],'--div--')) {
1750 $nonSel = ' onclick="this.selected=0;" class="c-divider"';
1751 }
1752
1753 // Icon style for option tag:
1754 if ($config['iconsInOptionTags']) {
1755 $styleAttrValue = $this->optionTagStyle($p[2]);
1756 }
1757
1758 // Compile <option> tag:
1759 $opt[] = '<option value="'.htmlspecialchars($p[1]).'"'.
1760 $sM.
1761 $nonSel.
1762 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1763 '>'.t3lib_div::deHSCentities(htmlspecialchars($p[0])).'</option>';
1764 $c++;
1765 }
1766
1767 // Remaining values:
1768 if (count($itemArray) && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1769 foreach($itemArray as $theNoMatchValue => $temp) {
1770 // Compile <option> tag:
1771 array_unshift($opt,'<option value="'.htmlspecialchars($theNoMatchValue).'" selected="selected">'.t3lib_div::deHSCentities(htmlspecialchars(@sprintf($nMV_label, $theNoMatchValue))).'</option>');
1772 }
1773 }
1774
1775 // Compile selector box:
1776 $sOnChange = implode('',$PA['fieldChangeFunc']);
1777 $selector_itemListStyle = isset($config['itemListStyle']) ? ' style="'.htmlspecialchars($config['itemListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"';
1778 $size = intval($config['size']);
1779 $size = $config['autoSizeMax'] ? t3lib_div::intInRange(count($selItems)+1,t3lib_div::intInRange($size,1),$config['autoSizeMax']) : $size;
1780 $selectBox = '<select name="'.$PA['itemFormElName'].'[]"'.
1781 $this->insertDefStyle('select').
1782 ($size ? ' size="'.$size.'"' : '').
1783 ' multiple="multiple" onchange="'.htmlspecialchars($sOnChange).'"'.
1784 $PA['onFocus'].
1785 $selector_itemListStyle.
1786 $disabled.'>
1787 '.
1788 implode('
1789 ',$opt).'
1790 </select>';
1791
1792 // Add an empty hidden field which will send a blank value if all items are unselected.
1793 if (!$disabled) {
1794 $item.='<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="" />';
1795 }
1796
1797 // Put it all into a table:
1798 $item.= '
1799 <table border="0" cellspacing="0" cellpadding="0" width="1" class="typo3-TCEforms-select-singlebox">
1800 <tr>
1801 <td>
1802 '.$selectBox.'
1803 <br/>
1804 <em>'.
1805 htmlspecialchars($this->getLL('l_holdDownCTRL')).
1806 '</em>
1807 </td>
1808 <td valign="top">
1809 <a href="#" onclick="'.htmlspecialchars($this->elName($PA['itemFormElName'].'[]').'.selectedIndex=-1;'.implode('',$restoreCmd).' return false;').'">'.
1810 '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/history.gif','width="13" height="12"').' title="'.htmlspecialchars($this->getLL('l_revertSelection')).'" alt="" />'.
1811 '</a>
1812 </td>
1813 </tr>
1814 </table>
1815 ';
1816
1817 return $item;
1818 }
1819
1820 /**
1821 * Creates a multiple-selector box (two boxes, side-by-side)
1822 * (Render function for getSingleField_typeSelect())
1823 *
1824 * @param string See getSingleField_typeSelect()
1825 * @param string See getSingleField_typeSelect()
1826 * @param array See getSingleField_typeSelect()
1827 * @param array See getSingleField_typeSelect()
1828 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1829 * @param array Items available for selection
1830 * @param string Label for no-matching-value
1831 * @return string The HTML code for the item
1832 * @see getSingleField_typeSelect()
1833 */
1834 function getSingleField_typeSelect_multiple($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1835
1836 $disabled = '';
1837 if($this->renderReadonly || $config['readOnly']) {
1838 $disabled = ' disabled="disabled"';
1839 }
1840
1841 // Setting this hidden field (as a flag that JavaScript can read out)
1842 if (!$disabled) {
1843 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'_mul" value="'.($config['multiple']?1:0).'" />';
1844 }
1845
1846 // Set max and min items:
1847 $maxitems = t3lib_div::intInRange($config['maxitems'],0);
1848 if (!$maxitems) $maxitems=100000;
1849 $minitems = t3lib_div::intInRange($config['minitems'],0);
1850
1851 // Register the required number of elements:
1852 $this->requiredElements[$PA['itemFormElName']] = array($minitems,$maxitems,'imgName'=>$table.'_'.$row['uid'].'_'.$field);
1853
1854 // Get "removeItems":
1855 $removeItems = t3lib_div::trimExplode(',',$PA['fieldTSConfig']['removeItems'],1);
1856
1857 // Perform modification of the selected items array:
1858 $itemArray = t3lib_div::trimExplode(',',$PA['itemFormElValue'],1);
1859 foreach($itemArray as $tk => $tv) {
1860 $tvP = explode('|',$tv,2);
1861 $evalValue = rawurldecode($tvP[0]);
1862 $isRemoved = in_array($evalValue,$removeItems) || ($config['form_type']=='select' && $config['authMode'] && !$GLOBALS['BE_USER']->checkAuthMode($table,$field,$evalValue,$config['authMode']));
1863 if ($isRemoved && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1864 $tvP[1] = rawurlencode(@sprintf($nMV_label, $evalValue));
1865 } elseif (isset($PA['fieldTSConfig']['altLabels.'][$evalValue])) {
1866 $tvP[1] = rawurlencode($this->sL($PA['fieldTSConfig']['altLabels.'][$evalValue]));
1867 }
1868 $itemArray[$tk] = implode('|',$tvP);
1869 }
1870 $itemsToSelect = '';
1871
1872 if(!$disabled) {
1873 // Create option tags:
1874 $opt = array();
1875 $styleAttrValue = '';
1876 foreach($selItems as $p) {
1877 if ($config['iconsInOptionTags']) {
1878 $styleAttrValue = $this->optionTagStyle($p[2]);
1879 }
1880 $opt[]= '<option value="'.htmlspecialchars($p[1]).'"'.
1881 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1882 '>'.htmlspecialchars($p[0]).'</option>';
1883 }
1884
1885 // Put together the selector box:
1886 $selector_itemListStyle = isset($config['itemListStyle']) ? ' style="'.htmlspecialchars($config['itemListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"';
1887 $size = intval($config['size']);
1888 $size = $config['autoSizeMax'] ? t3lib_div::intInRange(count($itemArray)+1,t3lib_div::intInRange($size,1),$config['autoSizeMax']) : $size;
1889 if ($config['exclusiveKeys']) {
1890 $sOnChange = 'setFormValueFromBrowseWin(\''.$PA['itemFormElName'].'\',this.options[this.selectedIndex].value,this.options[this.selectedIndex].text,\''.$config['exclusiveKeys'].'\'); ';
1891 } else {
1892 $sOnChange = 'setFormValueFromBrowseWin(\''.$PA['itemFormElName'].'\',this.options[this.selectedIndex].value,this.options[this.selectedIndex].text); ';
1893 }
1894 $sOnChange .= implode('',$PA['fieldChangeFunc']);
1895 $itemsToSelect = '
1896 <select name="'.$PA['itemFormElName'].'_sel"'.
1897 $this->insertDefStyle('select').
1898 ($size ? ' size="'.$size.'"' : '').
1899 ' onchange="'.htmlspecialchars($sOnChange).'"'.
1900 $PA['onFocus'].
1901 $selector_itemListStyle.'>
1902 '.implode('
1903 ',$opt).'
1904 </select>';
1905 }
1906
1907 // Pass to "dbFileIcons" function:
1908 $params = array(
1909 'size' => $size,
1910 'autoSizeMax' => t3lib_div::intInRange($config['autoSizeMax'],0),
1911 'style' => isset($config['selectedListStyle']) ? ' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"',
1912 'dontShowMoveIcons' => ($maxitems<=1),
1913 'maxitems' => $maxitems,
1914 'info' => '',
1915 'headers' => array(
1916 'selector' => $this->getLL('l_selected').':<br />',
1917 'items' => $this->getLL('l_items').':<br />'
1918 ),
1919 'noBrowser' => 1,
1920 'thumbnails' => $itemsToSelect,
1921 'readOnly' => $disabled
1922 );
1923 $item.= $this->dbFileIcons($PA['itemFormElName'],'','',$itemArray,'',$params,$PA['onFocus']);
1924
1925 return $item;
1926 }
1927
1928 /**
1929 * Generation of TCEform elements of the type "group"
1930 * This will render a selectorbox into which elements from either the file system or database can be inserted. Relations.
1931 *
1932 * @param string The table name of the record
1933 * @param string The field name which this element is supposed to edit
1934 * @param array The record data array where the value(s) for the field can be found
1935 * @param array An array with additional configuration options.
1936 * @return string The HTML code for the TCEform field
1937 */
1938 function getSingleField_typeGroup($table,$field,$row,&$PA) {
1939 // Init:
1940 $config = $PA['fieldConf']['config'];
1941 $internal_type = $config['internal_type'];
1942 $show_thumbs = $config['show_thumbs'];
1943 $size = intval($config['size']);
1944 $maxitems = t3lib_div::intInRange($config['maxitems'],0);
1945 if (!$maxitems) $maxitems=100000;
1946 $minitems = t3lib_div::intInRange($config['minitems'],0);
1947 $allowed = $config['allowed'];
1948 $disallowed = $config['disallowed'];
1949
1950 $disabled = '';
1951 if($this->renderReadonly || $config['readOnly']) {
1952 $disabled = ' disabled="disabled"';
1953 }
1954
1955 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'_mul" value="'.($config['multiple']?1:0).'"'.$disabled.' />';
1956 $this->requiredElements[$PA['itemFormElName']] = array($minitems,$maxitems,'imgName'=>$table.'_'.$row['uid'].'_'.$field);
1957 $info='';
1958
1959 // "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/.
1960 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1961
1962 // Acting according to either "file" or "db" type:
1963 switch((string)$config['internal_type']) {
1964 case 'file': // If the element is of the internal type "file":
1965
1966 // Creating string showing allowed types:
1967 $tempFT = t3lib_div::trimExplode(',',$allowed,1);
1968 if (!count($tempFT)) {$info.='*';}
1969 foreach($tempFT as $ext) {
1970 if ($ext) {
1971 $info.=strtoupper($ext).' ';
1972 }
1973 }
1974 // Creating string, showing disallowed types:
1975 $tempFT_dis = t3lib_div::trimExplode(',',$disallowed,1);
1976 if (count($tempFT_dis)) {$info.='<br />';}
1977 foreach($tempFT_dis as $ext) {
1978 if ($ext) {
1979 $info.='-'.strtoupper($ext).' ';
1980 }
1981 }
1982
1983 // Making the array of file items:
1984 $itemArray = t3lib_div::trimExplode(',',$PA['itemFormElValue'],1);
1985
1986 // Showing thumbnails:
1987 $thumbsnail = '';
1988 if ($show_thumbs) {
1989 $imgs = array();
1990 foreach($itemArray as $imgRead) {
1991 $imgP = explode('|',$imgRead);
1992 $imgPath = rawurldecode($imgP[0]);
1993
1994 $rowCopy = array();
1995 $rowCopy[$field] = $imgPath;
1996
1997 // Icon + clickmenu:
1998 $absFilePath = t3lib_div::getFileAbsFileName($config['uploadfolder'].'/'.$imgPath);
1999
2000 $fI = pathinfo($imgPath);
2001 $fileIcon = t3lib_BEfunc::getFileIcon(strtolower($fI['extension']));
2002 $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="" />';
2003
2004 $imgs[] = '<span class="nobr">'.t3lib_BEfunc::thumbCode($rowCopy,$table,$field,$this->backPath,'thumbs.php',$config['uploadfolder'],0,' align="middle"').
2005 ($absFilePath ? $this->getClickMenu($fileIcon, $absFilePath) : $fileIcon).
2006 $imgPath.
2007 '</span>';
2008 }
2009 $thumbsnail = implode('<br />',$imgs);
2010 }
2011
2012 // Creating the element:
2013 $params = array(
2014 'size' => $size,
2015 'dontShowMoveIcons' => ($maxitems<=1),
2016 'autoSizeMax' => t3lib_div::intInRange($config['autoSizeMax'],0),
2017 'maxitems' => $maxitems,
2018 'style' => isset($config['selectedListStyle']) ? ' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"',
2019 'info' => $info,
2020 'thumbnails' => $thumbsnail,
2021 'readOnly' => $disabled
2022 );
2023 $item.= $this->dbFileIcons($PA['itemFormElName'],'file',implode(',',$tempFT),$itemArray,'',$params,$PA['onFocus']);
2024
2025 if(!$disabled) {
2026 // Adding the upload field:
2027 if ($this->edit_docModuleUpload) $item.='<input type="file" name="'.$PA['itemFormElName_file'].'"'.$this->formWidth().' size="60" />';
2028 }
2029 break;
2030 case 'db': // If the element is of the internal type "db":
2031
2032 // Creating string showing allowed types:
2033 $tempFT = t3lib_div::trimExplode(',',$allowed,1);
2034 if (!strcmp(trim($tempFT[0]),'*')) {
2035 $info.='<span class="nobr">&nbsp;&nbsp;&nbsp;&nbsp;'.
2036 htmlspecialchars($this->getLL('l_allTables')).
2037 '</span><br />';
2038 } else {
2039 while(list(,$theT)=each($tempFT)) {
2040 if ($theT) {
2041 $info.='<span class="nobr">&nbsp;&nbsp;&nbsp;&nbsp;'.
2042 t3lib_iconWorks::getIconImage($theT,array(),$this->backPath,'align="top"').
2043 htmlspecialchars($this->sL($GLOBALS['TCA'][$theT]['ctrl']['title'])).
2044 '</span><br />';
2045 }
2046 }
2047 }
2048
2049 $perms_clause = $GLOBALS['BE_USER']->getPagePermsClause(1);
2050 $itemArray = array();
2051 $imgs = array();
2052
2053 // Thumbnails:
2054 $temp_itemArray = t3lib_div::trimExplode(',',$PA['itemFormElValue'],1);
2055 foreach($temp_itemArray as $dbRead) {
2056 $recordParts = explode('|',$dbRead);
2057 list($this_table,$this_uid) = t3lib_BEfunc::splitTable_Uid($recordParts[0]);
2058 $itemArray[] = array('table'=>$this_table, 'id'=>$this_uid);
2059 if (!$disabled && $show_thumbs) {
2060 $rr = t3lib_BEfunc::getRecordWSOL($this_table,$this_uid);
2061 $imgs[] = '<span class="nobr">'.
2062 $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).
2063 '&nbsp;'.
2064 t3lib_BEfunc::getRecordTitle($this_table,$rr,TRUE).' <span class="typo3-dimmed"><em>['.$rr['uid'].']</em></span>'.
2065 '</span>';
2066 }
2067 }
2068 $thumbsnail='';
2069 if (!$disabled && $show_thumbs) {
2070 $thumbsnail = implode('<br />',$imgs);
2071 }
2072
2073 // Creating the element:
2074 $params = array(
2075 'size' => $size,
2076 'dontShowMoveIcons' => ($maxitems<=1),
2077 'autoSizeMax' => t3lib_div::intInRange($config['autoSizeMax'],0),
2078 'maxitems' => $maxitems,
2079 'style' => isset($config['selectedListStyle']) ? ' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"',
2080 'info' => $info,
2081 'thumbnails' => $thumbsnail,
2082 'readOnly' => $disabled
2083 );
2084 $item.= $this->dbFileIcons($PA['itemFormElName'],'db',implode(',',$tempFT),$itemArray,'',$params,$PA['onFocus'],$table,$field,$row['uid']);
2085
2086 break;
2087 }
2088
2089 // Wizards:
2090 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
2091 if (!$disabled) {
2092 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf);
2093 }
2094
2095 return $item;
2096 }
2097
2098 /**
2099 * Generation of TCEform elements of the type "none"
2100 * This will render a non-editable display of the content of the field.
2101 *
2102 * @param string The table name of the record
2103 * @param string The field name which this element is supposed to edit
2104 * @param array The record data array where the value(s) for the field can be found
2105 * @param array An array with additional configuration options.
2106 * @return string The HTML code for the TCEform field
2107 */
2108 function getSingleField_typeNone($table,$field,$row,&$PA) {
2109 // Init:
2110 $config = $PA['fieldConf']['config'];
2111 $itemValue = $PA['itemFormElValue'];
2112
2113 return $this->getSingleField_typeNone_render($config,$itemValue);
2114 }
2115
2116 /**
2117 * HTML rendering of a value which is not editable.
2118 *
2119 * @param array Configuration for the display
2120 * @param string The value to display
2121 * @return string The HTML code for the display
2122 * @see getSingleField_typeNone();
2123 */
2124 function getSingleField_typeNone_render($config,$itemValue) {
2125
2126 // is colorScheme[0] the right value?
2127 $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;';
2128
2129 if ($config['format']) {
2130 $itemValue = $this->formatValue($config, $itemValue);
2131 }
2132
2133 $rows = intval($config['rows']);
2134 if ($rows > 1) {
2135 if(!$config['pass_content']) {
2136 $itemValue = nl2br(htmlspecialchars($itemValue));
2137 }
2138 // like textarea
2139 $cols = t3lib_div::intInRange($config['cols'] ? $config['cols'] : 30, 5, $this->maxTextareaWidth);
2140 if (!$config['fixedRows']) {
2141 $origRows = $rows = t3lib_div::intInRange($rows, 1, 20);
2142 if (strlen($itemValue)>$this->charsPerRow*2) {
2143 $cols = $this->maxTextareaWidth;
2144 $rows = t3lib_div::intInRange(round(strlen($itemValue)/$this->charsPerRow),count(explode(chr(10),$itemValue)),20);
2145 if ($rows<$origRows) $rows=$origRows;
2146 }
2147 }
2148
2149 if ($this->docLarge) $cols = round($cols*$this->form_largeComp);
2150 $width = ceil($cols*$this->form_rowsToStylewidth);
2151 // hardcoded: 12 is the height of the font
2152 $height=$rows*12;
2153
2154 $item='
2155 <div style="'.htmlspecialchars($divStyle.' overflow:auto; height:'.$height.'px; width:'.$width.'px;').'" class="'.htmlspecialchars($this->formElClass('none')).'">'.
2156 $itemValue.
2157 '</div>';
2158 } else {
2159 if(!$config['pass_content']) {
2160 $itemValue = htmlspecialchars($itemValue);
2161 }
2162
2163 $cols = $config['cols']?$config['cols']:($config['size']?$config['size']:$this->maxInputWidth);
2164 if ($this->docLarge) $cols = round($cols*$this->form_largeComp);
2165 $width = ceil($cols*$this->form_rowsToStylewidth);
2166
2167 // overflow:auto crashes mozilla here. Title tag is usefull when text is longer than the div box (overflow:hidden).
2168 $item = '
2169 <div style="'.htmlspecialchars($divStyle.' overflow:hidden; width:'.$width.'px;').'" class="'.htmlspecialchars($this->formElClass('none')).'" title="'.$itemValue.'">'.
2170 '<span class="nobr">'.(strcmp($itemValue,'')?$itemValue:'&nbsp;').'</span>'.
2171 '</div>';
2172 }
2173
2174 return $item;
2175 }
2176
2177 /**
2178 * Handler for Flex Forms
2179 *
2180 * @param string The table name of the record
2181 * @param string The field name which this element is supposed to edit
2182 * @param array The record data array where the value(s) for the field can be found
2183 * @param array An array with additional configuration options.
2184 * @return string The HTML code for the TCEform field
2185 */
2186 function getSingleField_typeFlex($table,$field,$row,&$PA) {
2187
2188 // Data Structure:
2189 $dataStructArray = t3lib_BEfunc::getFlexFormDS($PA['fieldConf']['config'],$row,$table);
2190
2191 // Get data structure:
2192 if (is_array($dataStructArray)) {
2193
2194 // Get data:
2195 $xmlData = $PA['itemFormElValue'];
2196 $xmlHeaderAttributes = t3lib_div::xmlGetHeaderAttribs($xmlData);
2197 $storeInCharset = strtolower($xmlHeaderAttributes['encoding']);
2198 if ($storeInCharset) {
2199 $currentCharset=$GLOBALS['LANG']->charSet;
2200 $xmlData = $GLOBALS['LANG']->csConvObj->conv($xmlData,$storeInCharset,$currentCharset,1);
2201 }
2202 $editData=t3lib_div::xml2array($xmlData);
2203 if (!is_array($editData)) { // Must be XML parsing error...
2204 $editData=array();
2205 } elseif (!isset($editData['meta']) || !is_array($editData['meta'])) {
2206 $editData['meta'] = array();
2207 }
2208
2209 // Find the data structure if sheets are found:
2210 $sheet = $editData['meta']['currentSheetId'] ? $editData['meta']['currentSheetId'] : 'sDEF'; // Sheet to display
2211
2212 // Create sheet menu:
2213 // if (is_array($dataStructArray['sheets'])) {
2214 // #$item.=$this->getSingleField_typeFlex_sheetMenu($dataStructArray['sheets'], $PA['itemFormElName'].'[meta][currentSheetId]', $sheet).'<br />';
2215 // }
2216
2217 // Create language menu:
2218 $langChildren = $dataStructArray['meta']['langChildren'] ? 1 : 0;
2219 $langDisabled = $dataStructArray['meta']['langDisable'] ? 1 : 0;
2220
2221 $editData['meta']['currentLangId']=array();
2222 $languages = $this->getAvailableLanguages();
2223
2224 foreach($languages as $lInfo) {
2225 if ($GLOBALS['BE_USER']->checkLanguageAccess($lInfo['uid'])) {
2226 $editData['meta']['currentLangId'][] = $lInfo['ISOcode'];
2227 }
2228 }
2229 if (!is_array($editData['meta']['currentLangId']) || !count($editData['meta']['currentLangId'])) {
2230 $editData['meta']['currentLangId']=array('DEF');
2231 }
2232
2233 $editData['meta']['currentLangId'] = array_unique($editData['meta']['currentLangId']);
2234
2235
2236 // if (!$langDisabled && count($languages) > 1) {
2237 // $item.=$this->getSingleField_typeFlex_langMenu($languages, $PA['itemFormElName'].'[meta][currentLangId]', $editData['meta']['currentLangId']).'<br />';
2238 // }
2239
2240 $PA['_noEditDEF'] = FALSE;
2241 if ($langChildren || $langDisabled) {
2242 $rotateLang = array('DEF');
2243 } else {
2244 if (!in_array('DEF',$editData['meta']['currentLangId'])) {
2245 array_unshift($editData['meta']['currentLangId'],'DEF');
2246 $PA['_noEditDEF'] = TRUE;
2247 }
2248 $rotateLang = $editData['meta']['currentLangId'];
2249 }
2250
2251 // Tabs sheets
2252 if (is_array($dataStructArray['sheets'])) {
2253 $tabsToTraverse = array_keys($dataStructArray['sheets']);
2254 } else {
2255 $tabsToTraverse = array($sheet);
2256 }
2257
2258 foreach ($rotateLang as $lKey) {
2259 if (!$langChildren && !$langDisabled) {
2260 $item.= '<b>'.$this->getLanguageIcon($table,$row,'v'.$lKey).$lKey.':</b>';
2261 }
2262
2263 $tabParts = array();
2264 foreach ($tabsToTraverse as $sheet) {
2265 list ($dataStruct, $sheet) = t3lib_div::resolveSheetDefInDS($dataStructArray,$sheet);
2266
2267 // Render sheet:
2268 if (is_array($dataStruct['ROOT']) && is_array($dataStruct['ROOT']['el'])) {
2269 $lang = 'l'.$lKey; // Default language, other options are "lUK" or whatever country code (independant of system!!!)
2270 $PA['_valLang'] = $langChildren && !$langDisabled ? $editData['meta']['currentLangId'] : 'DEF'; // Default language, other options are "lUK" or whatever country code (independant of system!!!)
2271 $PA['_lang'] = $lang;
2272
2273 // Render flexform:
2274 $tRows = $this->getSingleField_typeFlex_draw(
2275 $dataStruct['ROOT']['el'],
2276 $editData['data'][$sheet][$lang],
2277 $table,
2278 $field,
2279 $row,
2280 $PA,
2281 '[data]['.$sheet.']['.$lang.']'
2282 );
2283 #$sheetContent= '<table border="0" cellpadding="1" cellspacing="1" class="typo3-TCEforms-flexForm">'.implode('',$tRows).'</table>';
2284 $sheetContent = '<div class="typo3-TCEforms-flexForm">'.$tRows.'</div>';
2285
2286 # $item = '<div style=" position:absolute;">'.$item.'</div>';
2287 //visibility:hidden;
2288 } else $sheetContent='Data Structure ERROR: No ROOT element found for sheet "'.$sheet.'".';
2289
2290 // Add to tab:
2291 $tabParts[] = array(
2292 'label' => ($dataStruct['ROOT']['TCEforms']['sheetTitle'] ? $this->sL($dataStruct['ROOT']['TCEforms']['sheetTitle']) : $sheet),
2293 'description' => ($dataStruct['ROOT']['TCEforms']['sheetDescription'] ? $this->sL($dataStruct['ROOT']['TCEforms']['sheetDescription']) : ''),
2294 'linkTitle' => ($dataStruct['ROOT']['TCEforms']['sheetShortDescr'] ? $this->sL($dataStruct['ROOT']['TCEforms']['sheetShortDescr']) : ''),
2295 'content' => $sheetContent
2296 );
2297 }
2298
2299 if (is_array($dataStructArray['sheets'])) {
2300 $item.= $this->getDynTabMenu($tabParts,'TCEFORMS:flexform:'.$PA['itemFormElName'].$PA['_lang']);
2301 } else {
2302 $item.= $sheetContent;
2303 }
2304 }
2305 } else $item='Data Structure ERROR: '.$dataStructArray;
2306
2307 return $item;
2308 }
2309
2310 /**
2311 * Creates the language menu for FlexForms:
2312 *
2313 * @param [type] $languages: ...
2314 * @param [type] $elName: ...
2315 * @param [type] $selectedLanguage: ...
2316 * @param [type] $multi: ...
2317 * @return string HTML for menu
2318 */
2319 function getSingleField_typeFlex_langMenu($languages,$elName,$selectedLanguage,$multi=1) {
2320 $opt=array();
2321 foreach($languages as $lArr) {
2322 $opt[]='<option value="'.htmlspecialchars($lArr['ISOcode']).'"'.(in_array($lArr['ISOcode'],$selectedLanguage)?' selected="selected"':'').'>'.htmlspecialchars($lArr['title']).'</option>';
2323 }
2324
2325 $output = '<select name="'.$elName.'[]"'.($multi ? ' multiple="multiple" size="'.count($languages).'"' : '').'>'.implode('',$opt).'</select>';
2326
2327 return $output;
2328 }
2329
2330 /**
2331 * Creates the menu for selection of the sheets:
2332 *
2333 * @param array Sheet array for which to render the menu
2334 * @param string Form element name of the field containing the sheet pointer
2335 * @param string Current sheet key
2336 * @return string HTML for menu
2337 */
2338 function getSingleField_typeFlex_sheetMenu($sArr,$elName,$sheetKey) {
2339
2340 $tCells =array();
2341 $pct = round(100/count($sArr));
2342 foreach($sArr as $sKey => $sheetCfg) {
2343 if ($GLOBALS['BE_USER']->jsConfirmation(1)) {
2344 $onClick = 'if (confirm(TBE_EDITOR.labels.onChangeAlert) && TBE_EDITOR.checkSubmit(-1)){'.$this->elName($elName).".value='".$sKey."'; TBE_EDITOR.submitForm()};";
2345 } else {
2346 $onClick = 'if(TBE_EDITOR.checkSubmit(-1)){ '.$this->elName($elName).".value='".$sKey."'; TBE_EDITOR.submitForm();}";
2347 }
2348
2349
2350 $tCells[]='<td width="'.$pct.'%" style="'.($sKey==$sheetKey ? 'background-color: #9999cc; font-weight: bold;' : 'background-color: #aaaaaa;').' cursor: hand;" onclick="'.htmlspecialchars($onClick).'" align="center">'.
2351 ($sheetCfg['ROOT']['TCEforms']['sheetTitle'] ? $this->sL($sheetCfg['ROOT']['TCEforms']['sheetTitle']) : $sKey).
2352 '</td>';
2353 }
2354
2355 return '<table border="0" cellpadding="0" cellspacing="2" class="typo3-TCEforms-flexForm-sheetMenu"><tr>'.implode('',$tCells).'</tr></table>';
2356 }
2357
2358 /**
2359 * Recursive rendering of flexforms
2360 *
2361 * @param array (part of) Data Structure for which to render. Keys on first level is flex-form fields
2362 * @param array (part of) Data array of flexform corresponding to the input DS. Keys on first level is flex-form field names
2363 * @param string Table name, eg. tt_content
2364 * @param string Field name, eg. tx_templavoila_flex
2365 * @param array The particular record from $table in which the field $field is found
2366 * @param array Array of standard information for rendering of a form field in TCEforms, see other rendering functions too
2367 * @param string Form field prefix, eg. "[data][sDEF][lDEF][...][...]"
2368 * @param integer Indicates nesting level for the function call
2369 * @param string Prefix for ID-values
2370 * @param boolean Defines whether the next flexform level is open or closed. Comes from _TOGGLE pseudo field in FlexForm xml.
2371 * @return string HTMl code for form.
2372 */
2373 function getSingleField_typeFlex_draw($dataStruct,$editData,$table,$field,$row,&$PA,$formPrefix='',$level=0,$idPrefix='ID',$toggleClosed=FALSE) {
2374
2375 $output = '';
2376 $mayRestructureFlexforms = $GLOBALS['BE_USER']->checkLanguageAccess(0);
2377
2378 // Data Structure array must be ... and array of course...
2379 if (is_array($dataStruct)) {
2380 foreach($dataStruct as $key => $value) { // Traversing fields in structure:
2381 if (is_array($value)) { // The value of each entry must be an array.
2382
2383 // ********************
2384 // Making the row:
2385 // ********************
2386 // Title of field:
2387 $theTitle = htmlspecialchars(t3lib_div::fixed_lgd_cs($this->sL($value['tx_templavoila']['title']),30));
2388
2389 // If it's a "section" or "container":
2390 if ($value['type']=='array') {
2391
2392 // Creating IDs for form fields:
2393 // 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.
2394 $thisId = t3lib_div::shortMd5(uniqid('id',true)); // This is a suffix used for forms on this level
2395 $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.
2396
2397 // If it's a "section" containing other elements:
2398 if ($value['section']) {
2399
2400 // Render header of section:
2401 $output.= '<div class="bgColor2"><strong>'.$theTitle.'</strong></div>';
2402
2403 // Render elements in data array for section:
2404 $tRows = array();
2405 $cc=0;
2406 if (is_array($editData[$key]['el'])) {
2407 foreach ($editData[$key]['el'] as $k3 => $v3) {
2408 $cc=$k3;
2409 if (is_array($v3)) {
2410 $theType = key($v3);
2411 $theDat = $v3[$theType];
2412 $newSectionEl = $value['el'][$theType];
2413 if (is_array($newSectionEl)) {
2414 $tRows[]= $this->getSingleField_typeFlex_draw(
2415 array($theType => $newSectionEl),
2416 array($theType => $theDat),
2417 $table,
2418 $field,
2419 $row,
2420 $PA,
2421 $formPrefix.'['.$key.'][el]['.$cc.']',
2422 $level+1,
2423 $idTagPrefix,
2424 $v3['_TOGGLE']
2425 );
2426 }
2427 }
2428 }
2429 }
2430
2431 // Now, we generate "templates" for new elements that could be added to this section by traversing all possible types of content inside the section:
2432 // 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...
2433
2434 // Preserving internal variables we don't want to change:
2435 $TEMP_requiredElements = $this->requiredElements;
2436
2437 // Traversing possible types of new content in the section:
2438 $newElementsLinks = array();
2439 foreach($value['el'] as $nnKey => $nCfg) {
2440 $newElementTemplate = $this->getSingleField_typeFlex_draw(
2441 array($nnKey => $nCfg),
2442 array(),
2443 $table,
2444 $field,
2445 $row,
2446 $PA,
2447 $formPrefix.'['.$key.'][el]['.$idTagPrefix.'-form]',
2448 $level+1,
2449 $idTagPrefix
2450 );
2451
2452 // Makes a "Add new" link:
2453 $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...
2454 $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>';
2455 }
2456
2457 // Reverting internal variables we don't want to change:
2458 $this->requiredElements = $TEMP_requiredElements;
2459
2460 // Adding the sections:
2461 $output.= '
2462 <div style="padding: 2px 0px 2px 20px;">
2463 <a href="#" onclick="'.htmlspecialchars('flexFormToggleSubs("'.$idTagPrefix.'"); return false;').'">
2464 <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
2465 </a>
2466 </div>
2467
2468 <div id="'.$idTagPrefix.'" style="padding-left: 20px;">'.implode('',$tRows).'</div>';
2469 $output.= $mayRestructureFlexforms ? '<div style="padding: 10px 5px 5px 20px;"><b>Add new:</b> '.implode(' | ',$newElementsLinks).'</div>' : '';
2470 // If it's a container:
2471 } else {
2472
2473 $toggleIcon_open = '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/pil2down.gif','width="12" height="7"').' hspace="2" alt="Open" title="Open" />';
2474 $toggleIcon_close = '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/pil2right.gif','width="7" height="12"').' hspace="2" alt="Close" title="Close" />';
2475
2476 // Create on-click actions.
2477 # $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.
2478 $onClickRemove = 'if (confirm("Are you sure?")){$("'.$idTagPrefix.'").hide();setActionStatus("'.$idPrefix.'");} return false;';
2479 $onClickToggle = 'flexFormToggle("'.$idTagPrefix.'"); return false;';
2480
2481 $onMove = 'flexFormSortable("'.$idPrefix.'")';
2482 // 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.
2483
2484
2485 // Putting together header of a section. Sections can be removed, copied, opened/closed, moved up and down:
2486 // 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.
2487 // 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.
2488 $ctrlHeader= '
2489 <table border="0" cellpadding="0" cellspacing="0" width="100%" onmousedown="'.($mayRestructureFlexforms?htmlspecialchars($onMove):'').'">
2490 <tr>
2491 <td>
2492 <a href="#" onclick="'.htmlspecialchars($onClickToggle).'" id="'.$idTagPrefix.'-toggle">
2493 '.($toggleClosed?$toggleIcon_close:$toggleIcon_open).'
2494 </a>
2495 <strong>'.$theTitle.'</strong> <em><span id="'.$idTagPrefix.'-preview"></span></em>
2496 </td>
2497 <td align="right">'.
2498 ($mayRestructureFlexforms ? '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/move.gif','width="16" height="16"').' alt="Drag to Move" title="Drag to Move" />' : '').
2499 # '<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
2500 ($mayRestructureFlexforms ? '<a href="#" onclick="'.htmlspecialchars($onClickRemove).'"><img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/garbage.gif','width="11" height="12"').' alt="Delete" title="Delete" /></a>' : '').
2501 '</td>
2502 </tr>
2503 </table>';
2504
2505 $s = t3lib_div::revExplode('[]',$formPrefix,2);
2506 $actionFieldName = '_ACTION_FLEX_FORM'.$PA['itemFormElName'].$s[0].'][_ACTION]['.$s[1];
2507
2508 // Putting together the container:
2509 $output.= '
2510 <div id="'.$idTagPrefix.'" class="bgColor2">
2511 <input id="'.$idTagPrefix.'-action" type="hidden" name="'.htmlspecialchars($actionFieldName).'" value=""/>
2512
2513 '.$ctrlHeader.'
2514 <div id="'.$idTagPrefix.'-content"'.($toggleClosed?' style="display:none;"':'').'>'.$this->getSingleField_typeFlex_draw(
2515 $value['el'],
2516 $editData[$key]['el'],
2517 $table,
2518 $field,
2519 $row,
2520 $PA,
2521 $formPrefix.'['.$key.'][el]',
2522 $level+1,
2523 $idTagPrefix
2524 ).'
2525 </div>
2526 <input id="'.$idTagPrefix.'-toggleClosed" type="hidden" name="'.htmlspecialchars('data['.$table.']['.$row['uid'].']['.$field.']'.$formPrefix.'[_TOGGLE]').'" value="'.($toggleClosed?1:0).'" />
2527 </div>';
2528 // 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.
2529 }
2530
2531 // If it's a "single form element":
2532 } elseif (is_array($value['TCEforms']['config'])) { // Rendering a single form element:
2533
2534 if (is_array($PA['_valLang'])) {
2535 $rotateLang = $PA['_valLang'];
2536 } else {
2537 $rotateLang = array($PA['_valLang']);
2538 }
2539
2540 $tRows = array();
2541 foreach($rotateLang as $vDEFkey) {
2542 $vDEFkey = 'v'.$vDEFkey;
2543
2544 if (!$value['TCEforms']['displayCond'] || $this->isDisplayCondition($value['TCEforms']['displayCond'],$editData,$vDEFkey)) {
2545 $fakePA=array();
2546 $fakePA['fieldConf']=array(
2547 'label' => $this->sL(trim($value['TCEforms']['label'])),
2548 'config' => $value['TCEforms']['config'],
2549 'defaultExtras' => $value['TCEforms']['defaultExtras'],
2550 'onChange' => $value['TCEforms']['onChange']
2551 );
2552 if ($PA['_noEditDEF'] && $PA['_lang']==='lDEF') {
2553 $fakePA['fieldConf']['config'] = array(
2554 'type' => 'none',
2555 'rows' => 2
2556 );
2557 }
2558
2559 if (
2560 $fakePA['fieldConf']['onChange'] == 'reload' ||
2561 ($GLOBALS['TCA'][$table]['ctrl']['type'] && !strcmp($key,$GLOBALS['TCA'][$table]['ctrl']['type'])) ||
2562 ($GLOBALS['TCA'][$table]['ctrl']['requestUpdate'] && t3lib_div::inList($GLOBALS['TCA'][$table]['ctrl']['requestUpdate'],$key))) {
2563 if ($GLOBALS['BE_USER']->jsConfirmation(1)) {
2564 $alertMsgOnChange = 'if (confirm(TBE_EDITOR.labels.onChangeAlert) && TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm() };';
2565 } else {
2566 $alertMsgOnChange = 'if(TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm();}';
2567 }
2568 } else {
2569 $alertMsgOnChange = '';
2570 }
2571
2572 $fakePA['fieldChangeFunc']=$PA['fieldChangeFunc'];
2573 if (strlen($alertMsgOnChange)) {
2574 $fakePA['fieldChangeFunc']['alert']=$alertMsgOnChange;
2575 }
2576 $fakePA['onFocus']=$PA['onFocus'];
2577 $fakePA['label']=$PA['label'];
2578
2579 $fakePA['itemFormElName']=$PA['itemFormElName'].$formPrefix.'['.$key.']['.$vDEFkey.']';
2580 $fakePA['itemFormElName_file']=$PA['itemFormElName_file'].$formPrefix.'['.$key.']['.$vDEFkey.']';
2581
2582 if(isset($editData[$key][$vDEFkey])) {
2583 $fakePA['itemFormElValue']=$editData[$key][$vDEFkey];
2584 } else {
2585 $fakePA['itemFormElValue']=$fakePA['fieldConf']['config']['default'];
2586 }
2587
2588 $theFormEl= $this->getSingleField_SW($table,$field,$row,$fakePA);
2589 $theTitle= htmlspecialchars($fakePA['fieldConf']['label']);
2590
2591 if (!in_array('DEF',$rotateLang)) {
2592 $defInfo = '<div class="typo3-TCEforms-originalLanguageValue">'.$this->getLanguageIcon($table,$row,0).$this->previewFieldValue($editData[$key]['vDEF'], $fakePA['fieldConf']).'&nbsp;</div>';
2593 } else {
2594 $defInfo = '';
2595 }
2596
2597 if (!$PA['_noEditDEF']) {
2598 $prLang = $this->getAdditionalPreviewLanguages();
2599 foreach($prLang as $prL) {
2600 $defInfo.= '<div class="typo3-TCEforms-originalLanguageValue">'.$this->getLanguageIcon($table,$row,'v'.$prL['ISOcode']).$this->previewFieldValue($editData[$key]['v'.$prL['ISOcode']], $fakePA['fieldConf']).'&nbsp;</div>';
2601 }
2602 }
2603
2604 // Put row together
2605 $tRows[]='<div>
2606 <div class="bgColor5">'.($vDEFkey=='vDEF' ? '' : $this->getLanguageIcon($table,$row,$vDEFkey)).$theTitle.'</div>
2607 <div class="bgColor4">'.$theFormEl.$defInfo.$this->renderVDEFDiff($editData[$key],$vDEFkey).'</div>
2608 </div>';
2609 }
2610 }
2611 if (count($tRows)) $output.= implode('',$tRows);
2612 }
2613 }
2614 }
2615 }
2616
2617 return $output;
2618 }
2619
2620 /**
2621 * Handler for unknown types.
2622 *
2623 * @param string The table name of the record
2624 * @param string The field name which this element is supposed to edit
2625 * @param array The record data array where the value(s) for the field can be found
2626 * @param array An array with additional configuration options.
2627 * @return string The HTML code for the TCEform field
2628 */
2629 function getSingleField_typeUnknown($table,$field,$row,&$PA) {
2630 $item='Unknown type: '.$PA['fieldConf']['config']['form_type'].'<br />';
2631
2632 return $item;
2633 }
2634
2635 /**
2636 * User defined field type
2637 *
2638 * @param string The table name of the record
2639 * @param string The field name which this element is supposed to edit
2640 * @param array The record data array where the value(s) for the field can be found
2641 * @param array An array with additional configuration options.
2642 * @return string The HTML code for the TCEform field
2643 */
2644 function getSingleField_typeUser($table,$field,$row,&$PA) {
2645 $PA['table']=$table;
2646 $PA['field']=$field;
2647 $PA['row']=$row;
2648
2649 $PA['pObj']=&$this;
2650
2651 return t3lib_div::callUserFunction($PA['fieldConf']['config']['userFunc'],$PA,$this);
2652 }
2653
2654
2655
2656
2657
2658
2659 /************************************************************
2660 *
2661 * Field content processing
2662 *
2663 ************************************************************/
2664
2665 /**
2666 * Format field content of various types if $config['format'] is set to date, filesize, ..., user
2667 * This is primarily for the field type none but can be used for user field types for example
2668 *
2669 * @param array Configuration for the display
2670 * @param string The value to display
2671 * @return string Formatted Field content
2672 */
2673 function formatValue ($config, $itemValue) {
2674 $format = trim($config['format']);
2675 switch($format) {
2676 case 'date':
2677 if ($itemValue) {
2678 $option = trim($config['format.']['option']);
2679 if ($option) {
2680 if ($config['format.']['strftime']) {
2681 $value = strftime($option,$itemValue);
2682 } else {
2683 $value = date($option,$itemValue);
2684 }
2685 } else {
2686 $value = date('d-m-Y',$itemValue);
2687 }
2688 } else {
2689 $value = '';
2690 }
2691 if ($config['format.']['appendAge']) {
2692 $value .= ' ('.t3lib_BEfunc::calcAge((time()-$itemValue), $GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_core.php:labels.minutesHoursDaysYears')).')';
2693 }
2694 $itemValue = $value;
2695 break;
2696 case 'datetime': // compatibility with "eval" (type "input")
2697 $itemValue = <