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