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