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