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