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