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