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