Fixed bug #7184: Login has probably expired, when you create a new page (only in...
[Packages/TYPO3.CMS.git] / t3lib / class.t3lib_tceforms.php
1 <?php
2 /***************************************************************
3 * Copyright notice
4 *
5 * (c) 1999-2006 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: $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 var $dividers2tabs=0; // Will be set to TCA[ctrl][dividers2tabs]
234
235 /**
236 * Set to initialized clipboard object; Then the element browser will offer a link to paste in records from clipboard.
237 *
238 * @var t3lib_clipboard
239 */
240 var $clipObj=FALSE;
241 var $enableClickMenu=FALSE; // Enable click menu on reference icons.
242 var $enableTabMenu = FALSE; // Enable Tab Menus. If set to true, the JavaScript content from template::getDynTabMenuJScode() must be included in the document.
243 var $renderReadonly = FALSE; // When enabled all fields are rendered non-editable.
244
245 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)
246 var $form_largeComp = 1.33; // Form field width compensation: Compensation for large documents, doc-tab (editing)
247 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.
248 var $maxTextareaWidth=48; // The maximum abstract value for textareas
249 var $maxInputWidth=48; // The maximum abstract value for input fields
250 var $defaultMultipleSelectorStyle='width:250px;'; // Default style for the selector boxes used for multiple items in "select" and "group" types.
251
252
253 // INTERNAL, static
254 var $prependFormFieldNames = 'data'; // The string to prepend formfield names with.
255 var $prependCmdFieldNames = 'cmd'; // The string to prepend commands for tcemain::process_cmdmap with.
256 var $prependFormFieldNames_file = 'data_files'; // The string to prepend FILE form field names with.
257 var $formName = 'editform'; // The name attribute of the form.
258 var $allowOverrideMatrix = array(); // Whitelist that allows TCA field configuration to be overridden by TSconfig, @see overrideFieldConf()
259
260
261
262 // INTERNAL, dynamic
263 var $perms_clause=''; // Set by readPerms() (caching)
264 var $perms_clause_set=0; // Set by readPerms() (caching-flag)
265 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).
266 var $docLarge=0; // If set, the forms will be rendered a little wider, more precisely with a factor of $this->form_largeComp.
267 var $clientInfo=array(); // Loaded with info about the browser when class is instantiated.
268 var $RTEenabled=0; // True, if RTE is possible for the current user (based on result from BE_USER->isRTE())
269 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)
270 var $RTEcounter = 0; // Counter that is incremented before an RTE is created. Can be used for unique ids etc.
271
272 var $colorScheme; // Contains current color scheme
273 var $classScheme; // Contains current class scheme
274 var $defColorScheme; // Contains the default color scheme
275 var $defClassScheme; // Contains the default class scheme
276 var $fieldStyle; // Contains field style values
277 var $borderStyle; // Contains border style values.
278
279 var $commentMessages=array(); // An accumulation of messages from the class.
280
281 // INTERNAL, templates
282 var $totalWrap='<hr />|<hr />'; // Total wrapping for the table rows.
283 var $fieldTemplate='<b>###FIELD_NAME###</b><br />###FIELD_ITEM###<hr />'; // Field template
284 var $sectionWrap=''; // Wrapping template code for a section
285 var $palFieldTemplateHeader=''; // Template for palette headers
286 var $palFieldTemplate=''; // Template for palettes
287
288 // INTERNAL, working memory
289 var $excludeElements=''; // Set to the fields NOT to display, if any.
290 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)
291 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!
292 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.
293 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.
294 var $requiredElements=array(); // Used to register the min and max number of elements for selectorboxes where that apply (in the "group" type for instance)
295 var $requiredNested=array(); // Used to determine where $requiredFields or $requiredElements are nested (in Tabs or IRRE)
296 var $renderDepth=0; // Keeps track of the rendering depth of nested records.
297 var $savedSchemes=array(); // Color scheme buffer.
298 var $dynNestedStack = array(); // holds the path an element is nested in (e.g. required for RTEhtmlarea)
299
300 // Internal, registers for user defined functions etc.
301 var $additionalCode_pre = array(); // Additional HTML code, printed before the form.
302 var $additionalJS_pre = array(); // Additional JavaScript, printed before the form
303 var $additionalJS_post = array(); // Additional JavaScript printed after the form
304 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.
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'),
360 'inline' => array('appearance', '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
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 // Loads the dividers2tabs from the $TCA
504 $this->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 && $this->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 && $this->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
673 $output = $this->getDynTabMenu($parts, $tabIdentString);
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='') {
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 $collapsed = $this->isPalettesCollapsed($table,$palette);
764 $out .= $this->intoTemplate(
765 array('PALETTE' => $this->wrapPaletteField($this->printPalette($parts), $table, $row ,$palette, $collapsed)),
766 $this->palFieldTemplate
767 );
768 }
769 return $out;
770 }
771
772 /**
773 * Returns the form HTML code for a database table field.
774 *
775 * @param string The table name
776 * @param string The field name
777 * @param array The record to edit from the database table.
778 * @param string Alternative field name label to show.
779 * @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).
780 * @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.
781 * @param integer The palette pointer.
782 * @return mixed String (normal) or array (palettes)
783 */
784 function getSingleField($table,$field,$row,$altName='',$palette=0,$extra='',$pal=0) {
785 global $TCA,$BE_USER;
786
787 // Hook: getSingleField_preProcess
788 foreach ($this->hookObjectsSingleField as $hookObj) {
789 if (method_exists($hookObj,'getSingleField_preProcess')) {
790 $hookObj->getSingleField_preProcess($table, $field, $row, $altName, $palette, $extra, $pal, $this);
791 }
792 }
793
794 $out = '';
795 $PA = array();
796 $PA['altName'] = $altName;
797 $PA['palette'] = $palette;
798 $PA['extra'] = $extra;
799 $PA['pal'] = $pal;
800
801 // Make sure to load full $TCA array for the table:
802 t3lib_div::loadTCA($table);
803
804 // Get the TCA configuration for the current field:
805 $PA['fieldConf'] = $TCA[$table]['columns'][$field];
806 $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
807
808 $skipThisField = $this->inline->skipField($table, $field, $row, $PA['fieldConf']['config']);
809
810 // Now, check if this field is configured and editable (according to excludefields + other configuration)
811 if ( is_array($PA['fieldConf']) &&
812 !$skipThisField &&
813 (!$PA['fieldConf']['exclude'] || $BE_USER->check('non_exclude_fields',$table.':'.$field)) &&
814 $PA['fieldConf']['config']['form_type']!='passthrough' &&
815 ($this->RTEenabled || !$PA['fieldConf']['config']['showIfRTE']) &&
816 (!$PA['fieldConf']['displayCond'] || $this->isDisplayCondition($PA['fieldConf']['displayCond'],$row)) &&
817 (!$TCA[$table]['ctrl']['languageField'] || $PA['fieldConf']['l10n_display'] || strcmp($PA['fieldConf']['l10n_mode'],'exclude') || $row[$TCA[$table]['ctrl']['languageField']]<=0) &&
818 (!$TCA[$table]['ctrl']['languageField'] || !$this->localizationMode || $this->localizationMode===$PA['fieldConf']['l10n_cat'])
819 ) {
820
821
822
823 // Fetching the TSconfig for the current table/field. This includes the $row which means that
824 $PA['fieldTSConfig'] = $this->setTSconfig($table,$row,$field);
825
826 // If the field is NOT disabled from TSconfig (which it could have been) then render it
827 if (!$PA['fieldTSConfig']['disabled']) {
828 // Override fieldConf by fieldTSconfig:
829 $PA['fieldConf']['config'] = $this->overrideFieldConf($PA['fieldConf']['config'], $PA['fieldTSConfig']);
830
831 // Init variables:
832 $PA['itemFormElName']=$this->prependFormFieldNames.'['.$table.']['.$row['uid'].']['.$field.']'; // Form field name
833 $PA['itemFormElName_file']=$this->prependFormFieldNames_file.'['.$table.']['.$row['uid'].']['.$field.']'; // Form field name, in case of file uploads
834 $PA['itemFormElValue']=$row[$field]; // The value to show in the form field.
835 $PA['itemFormElID']=$this->prependFormFieldNames.'_'.$table.'_'.$row['uid'].'_'.$field;
836
837 // set field to read-only if configured for translated records to show default language content as readonly
838 if ($PA['fieldConf']['l10n_display'] AND t3lib_div::inList($PA['fieldConf']['l10n_display'], 'defaultAsReadonly') AND $row[$TCA[$table]['ctrl']['languageField']]) {
839 $PA['fieldConf']['config']['readOnly'] = true;
840 $PA['itemFormElValue'] = $this->defaultLanguageData[$table.':'.$row['uid']][$field];
841 }
842
843 // 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"
844 if (
845 ($TCA[$table]['ctrl']['type'] && !strcmp($field,$TCA[$table]['ctrl']['type'])) ||
846 ($TCA[$table]['ctrl']['requestUpdate'] && t3lib_div::inList($TCA[$table]['ctrl']['requestUpdate'],$field))) {
847 if($GLOBALS['BE_USER']->jsConfirmation(1)) {
848 $alertMsgOnChange = 'if (confirm(TBE_EDITOR.labels.onChangeAlert) && TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm() };';
849 } else {
850 $alertMsgOnChange = 'if (TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm() };';
851 }
852 } else {
853 $alertMsgOnChange = '';
854 }
855
856 // Render as a hidden field?
857 if (in_array($field,$this->hiddenFieldListArr)) {
858 $this->hiddenFieldAccum[]='<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
859 } else { // Render as a normal field:
860
861 // 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.
862 if (!$PA['palette']) {
863 $paletteFields = $this->loadPaletteElements($table, $row, $PA['pal']);
864 if ($PA['pal'] && $this->isPalettesCollapsed($table,$PA['pal']) && count($paletteFields)) {
865 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);
866 } else {
867 $thePalIcon = '';
868 $palJSfunc = '';
869 }
870 }
871 // onFocus attribute to add to the field:
872 $PA['onFocus'] = ($palJSfunc && !$BE_USER->uc['dontShowPalettesOnFocusInAB']) ? ' onfocus="'.htmlspecialchars($palJSfunc).'"' : '';
873
874 // Find item
875 $item='';
876 $PA['label'] = ($PA['altName'] ? $PA['altName'] : $PA['fieldConf']['label']);
877 $PA['label'] = ($PA['fieldTSConfig']['label'] ? $PA['fieldTSConfig']['label'] : $PA['label']);
878 $PA['label'] = ($PA['fieldTSConfig']['label.'][$GLOBALS['LANG']->lang] ? $PA['fieldTSConfig']['label.'][$GLOBALS['LANG']->lang] : $PA['label']);
879 $PA['label'] = $this->sL($PA['label']);
880 // JavaScript code for event handlers:
881 $PA['fieldChangeFunc']=array();
882 $PA['fieldChangeFunc']['TBE_EDITOR_fieldChanged'] = "TBE_EDITOR.fieldChanged('".$table."','".$row['uid']."','".$field."','".$PA['itemFormElName']."');";
883 $PA['fieldChangeFunc']['alert']=$alertMsgOnChange;
884 // if this is the child of an inline type and it is the field creating the label
885 if ($this->inline->isInlineChildAndLabelField($table, $field)) {
886 $PA['fieldChangeFunc']['inline'] = "inline.handleChangedField('".$PA['itemFormElName']."','".$this->inline->inlineNames['object']."[$table][".$row['uid']."]');";
887 }
888
889 // Based on the type of the item, call a render function:
890 $item = $this->getSingleField_SW($table,$field,$row,$PA);
891
892 // Add language + diff
893 if ($PA['fieldConf']['l10n_display'] && (t3lib_div::inList($PA['fieldConf']['l10n_display'], 'hideDiff') || t3lib_div::inList($PA['fieldConf']['l10n_display'], 'defaultAsReadonly'))) {
894 $renderLanguageDiff = false;
895 } else {
896 $renderLanguageDiff = true;
897 }
898
899 if ($renderLanguageDiff) {
900 $item = $this->renderDefaultLanguageContent($table,$field,$row,$item);
901 $item = $this->renderDefaultLanguageDiff($table,$field,$row,$item);
902 }
903
904 // 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
905 $PA['label'] = t3lib_div::deHSCentities(htmlspecialchars($PA['label']));
906 if (t3lib_div::testInt($row['uid']) && $PA['fieldTSConfig']['linkTitleToSelf'] && !t3lib_div::_GP('columnsOnly')) {
907 $lTTS_url = $this->backPath.'alt_doc.php?edit['.$table.']['.$row['uid'].']=edit&columnsOnly='.$field.'&returnUrl='.rawurlencode($this->thisReturnUrl());
908 $PA['label'] = '<a href="'.htmlspecialchars($lTTS_url).'">'.$PA['label'].'</a>';
909 }
910
911 // Create output value:
912 if ($PA['fieldConf']['config']['form_type']=='user' && $PA['fieldConf']['config']['noTableWrapping']) {
913 $out = $item;
914 } elseif ($PA['palette']) {
915 // Array:
916 $out=array(
917 'NAME'=>$PA['label'],
918 'ID'=>$row['uid'],
919 'FIELD'=>$field,
920 'TABLE'=>$table,
921 'ITEM'=>$item,
922 'HELP_ICON' => $this->helpTextIcon($table,$field,1)
923 );
924 $out = $this->addUserTemplateMarkers($out,$table,$field,$row,$PA);
925 } else {
926 // String:
927 $out=array(
928 'NAME'=>$PA['label'],
929 'ITEM'=>$item,
930 'TABLE'=>$table,
931 'ID'=>$row['uid'],
932 'HELP_ICON'=>$this->helpTextIcon($table,$field),
933 'HELP_TEXT'=>$this->helpText($table,$field),
934 'PAL_LINK_ICON'=>$thePalIcon,
935 'FIELD'=>$field
936 );
937 $out = $this->addUserTemplateMarkers($out,$table,$field,$row,$PA);
938 // String:
939 $out=$this->intoTemplate($out);
940 }
941 }
942 } else $this->commentMessages[]=$this->prependFormFieldNames.'['.$table.']['.$row['uid'].']['.$field.']: Disabled by TSconfig';
943 }
944 // Hook: getSingleField_postProcess
945 foreach ($this->hookObjectsSingleField as $hookObj) {
946 if (method_exists($hookObj,'getSingleField_postProcess')) {
947 $hookObj->getSingleField_postProcess($table, $field, $row, $out, $PA, $this);
948 }
949 }
950 // Return value (string or array)
951 return $out;
952 }
953
954 /**
955 * Rendering a single item for the form
956 *
957 * @param string Table name of record
958 * @param string Fieldname to render
959 * @param array The record
960 * @param array parameters array containing a lot of stuff. Value by Reference!
961 * @return string Returns the item as HTML code to insert
962 * @access private
963 * @see getSingleField(), getSingleField_typeFlex_draw()
964 */
965 function getSingleField_SW($table,$field,$row,&$PA) {
966 $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
967
968 switch($PA['fieldConf']['config']['form_type']) {
969 case 'input':
970 $item = $this->getSingleField_typeInput($table,$field,$row,$PA);
971 break;
972 case 'text':
973 $item = $this->getSingleField_typeText($table,$field,$row,$PA);
974 break;
975 case 'check':
976 $item = $this->getSingleField_typeCheck($table,$field,$row,$PA);
977 break;
978 case 'radio':
979 $item = $this->getSingleField_typeRadio($table,$field,$row,$PA);
980 break;
981 case 'select':
982 $item = $this->getSingleField_typeSelect($table,$field,$row,$PA);
983 break;
984 case 'group':
985 $item = $this->getSingleField_typeGroup($table,$field,$row,$PA);
986 break;
987 case 'inline':
988 $item = $this->inline->getSingleField_typeInline($table,$field,$row,$PA);
989 break;
990 case 'none':
991 $item = $this->getSingleField_typeNone($table,$field,$row,$PA);
992 break;
993 case 'user':
994 $item = $this->getSingleField_typeUser($table,$field,$row,$PA);
995 break;
996 case 'flex':
997 $item = $this->getSingleField_typeFlex($table,$field,$row,$PA);
998 break;
999 default:
1000 $item = $this->getSingleField_typeUnknown($table,$field,$row,$PA);
1001 break;
1002 }
1003
1004 return $item;
1005 }
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025 /**********************************************************
1026 *
1027 * Rendering of each TCEform field type
1028 *
1029 ************************************************************/
1030
1031 /**
1032 * Generation of TCEform elements of the type "input"
1033 * This will render a single-line input form field, possibly with various control/validation features
1034 *
1035 * @param string The table name of the record
1036 * @param string The field name which this element is supposed to edit
1037 * @param array The record data array where the value(s) for the field can be found
1038 * @param array An array with additional configuration options.
1039 * @return string The HTML code for the TCEform field
1040 */
1041 function getSingleField_typeInput($table,$field,$row,&$PA) {
1042 // typo3FormFieldSet(theField, evallist, is_in, checkbox, checkboxValue)
1043 // typo3FormFieldGet(theField, evallist, is_in, checkbox, checkboxValue, checkbox_off)
1044
1045 $config = $PA['fieldConf']['config'];
1046
1047 # $specConf = $this->getSpecConfForField($table,$row,$field);
1048 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1049 $size = t3lib_div::intInRange($config['size']?$config['size']:30,5,$this->maxInputWidth);
1050 $evalList = t3lib_div::trimExplode(',',$config['eval'],1);
1051
1052 if($this->renderReadonly || $config['readOnly']) {
1053 $itemFormElValue = $PA['itemFormElValue'];
1054 if (in_array('date',$evalList)) {
1055 $config['format'] = 'date';
1056 } elseif (in_array('date',$evalList)) {
1057 $config['format'] = 'date';
1058 } elseif (in_array('datetime',$evalList)) {
1059 $config['format'] = 'datetime';
1060 } elseif (in_array('time',$evalList)) {
1061 $config['format'] = 'time';
1062 }
1063 if (in_array('password',$evalList)) {
1064 $itemFormElValue = $itemFormElValue ? '*********' : '';
1065 }
1066 return $this->getSingleField_typeNone_render($config, $itemFormElValue);
1067 }
1068
1069 foreach ($evalList as $func) {
1070 switch ($func) {
1071 case 'required':
1072 $this->registerRequiredProperty('field', $table.'_'.$row['uid'].'_'.$field, $PA['itemFormElName']);
1073 // Mark this field for date/time disposal:
1074 if (array_intersect($evalList, array('date', 'datetime', 'time'))) {
1075 $this->requiredAdditional[$PA['itemFormElName']]['isPositiveNumber'] = true;
1076 }
1077 break;
1078 default:
1079 if (substr($func, 0, 3) == 'tx_') {
1080 // Pair hook to the one in t3lib_TCEmain::checkValue_input_Eval()
1081 $evalObj = t3lib_div::getUserObj($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['tce']['formevals'][$func].':&'.$func);
1082 if (is_object($evalObj) && method_exists($evalObj, 'deevaluateFieldValue')) {
1083 $_params = array(
1084 'value' => $PA['itemFormElValue']
1085 );
1086 $PA['itemFormElValue'] = $evalObj->deevaluateFieldValue($_params);
1087 }
1088 }
1089 break;
1090 }
1091 }
1092
1093 $paramsList = "'".$PA['itemFormElName']."','".implode(',',$evalList)."','".trim($config['is_in'])."',".(isset($config['checkbox'])?1:0).",'".$config['checkbox']."'";
1094 if (isset($config['checkbox'])) {
1095 // Setting default "click-checkbox" values for eval types "date" and "datetime":
1096 $thisMidnight = gmmktime(0,0,0);
1097 if (in_array('date',$evalList)) {
1098 $checkSetValue = $thisMidnight;
1099 } elseif (in_array('datetime',$evalList)) {
1100 $checkSetValue = time();
1101 } elseif (in_array('year',$evalList)) {
1102 $checkSetValue = gmdate('Y');
1103 }
1104 $cOnClick = 'typo3form.fieldGet('.$paramsList.',1,\''.$checkSetValue.'\');'.implode('',$PA['fieldChangeFunc']);
1105 $item.='<input type="checkbox"'.$this->insertDefStyle('check').' name="'.$PA['itemFormElName'].'_cb" onclick="'.htmlspecialchars($cOnClick).'" />';
1106 }
1107 if((in_array('date',$evalList) || in_array('datetime',$evalList)) && $PA['itemFormElValue']>0){
1108 // Add server timezone offset to UTC to our stored date
1109 $hoursOffset = date('O',$PA['itemFormElValue'])/100;
1110 $PA['itemFormElValue'] += ($hoursOffset*60*60);
1111 }
1112
1113 $PA['fieldChangeFunc'] = array_merge(array('typo3form.fieldGet'=>'typo3form.fieldGet('.$paramsList.');'), $PA['fieldChangeFunc']);
1114 $mLgd = ($config['max']?$config['max']:256);
1115 $iOnChange = implode('',$PA['fieldChangeFunc']);
1116 $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.
1117 $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.
1118 $this->extJSCODE.='typo3form.fieldSet('.$paramsList.');';
1119
1120 // going through all custom evaluations configured for this field
1121 foreach ($evalList as $evalData) {
1122 if (substr($evalData, 0, 3) == 'tx_') {
1123 $evalObj = t3lib_div::getUserObj($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['tce']['formevals'][$evalData].':&'.$evalData);
1124 if(is_object($evalObj) && method_exists($evalObj, 'returnFieldJS')) {
1125 $this->extJSCODE .= "\n\nfunction ".$evalData."(value) {\n".$evalObj->returnFieldJS()."\n}\n";
1126 }
1127 }
1128 }
1129
1130 // Creating an alternative item without the JavaScript handlers.
1131 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'_hr" value="" />';
1132 $altItem.= '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
1133
1134 // Wrap a wizard around the item?
1135 $item= $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'].'_hr',$specConf);
1136
1137 return $item;
1138 }
1139
1140 /**
1141 * Generation of TCEform elements of the type "text"
1142 * This will render a <textarea> OR RTE area form field, possibly with various control/validation features
1143 *
1144 * @param string The table name of the record
1145 * @param string The field name which this element is supposed to edit
1146 * @param array The record data array where the value(s) for the field can be found
1147 * @param array An array with additional configuration options.
1148 * @return string The HTML code for the TCEform field
1149 */
1150 function getSingleField_typeText($table,$field,$row,&$PA) {
1151
1152 // Init config:
1153 $config = $PA['fieldConf']['config'];
1154
1155 if($this->renderReadonly || $config['readOnly']) {
1156 return $this->getSingleField_typeNone_render($config, $PA['itemFormElValue']);
1157 }
1158
1159 // Setting columns number:
1160 $cols = t3lib_div::intInRange($config['cols'] ? $config['cols'] : 30, 5, $this->maxTextareaWidth);
1161
1162 // Setting number of rows:
1163 $origRows = $rows = t3lib_div::intInRange($config['rows'] ? $config['rows'] : 5, 1, 20);
1164 if (strlen($PA['itemFormElValue']) > $this->charsPerRow*2) {
1165 $cols = $this->maxTextareaWidth;
1166 $rows = t3lib_div::intInRange(round(strlen($PA['itemFormElValue'])/$this->charsPerRow), count(explode(chr(10),$PA['itemFormElValue'])), 20);
1167 if ($rows<$origRows) $rows = $origRows;
1168 }
1169
1170 // Init RTE vars:
1171 $RTEwasLoaded = 0; // Set true, if the RTE is loaded; If not a normal textarea is shown.
1172 $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...
1173
1174 // "Extra" configuration; Returns configuration for the field based on settings found in the "types" fieldlist. Traditionally, this is where RTE configuration has been found.
1175 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1176
1177 // Setting up the altItem form field, which is a hidden field containing the value
1178 $altItem = '<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
1179
1180 // If RTE is generally enabled (TYPO3_CONF_VARS and user settings)
1181 if ($this->RTEenabled) {
1182 $p = t3lib_BEfunc::getSpecConfParametersFromArray($specConf['rte_transform']['parameters']);
1183 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.
1184 t3lib_BEfunc::fixVersioningPid($table,$row);
1185 list($tscPID,$thePidValue) = $this->getTSCpid($table,$row['uid'],$row['pid']);
1186
1187 // If the pid-value is not negative (that is, a pid could NOT be fetched)
1188 if ($thePidValue >= 0) {
1189 $RTEsetup = $GLOBALS['BE_USER']->getTSConfig('RTE',t3lib_BEfunc::getPagesTSconfig($tscPID));
1190 $RTEtypeVal = t3lib_BEfunc::getTCAtypeValue($table,$row);
1191 $thisConfig = t3lib_BEfunc::RTEsetup($RTEsetup['properties'],$table,$field,$RTEtypeVal);
1192
1193 if (!$thisConfig['disabled']) {
1194 if (!$this->disableRTE) {
1195 $this->RTEcounter++;
1196
1197 // Find alternative relative path for RTE images/links:
1198 $eFile = t3lib_parsehtml_proc::evalWriteFile($specConf['static_write'], $row);
1199 $RTErelPath = is_array($eFile) ? dirname($eFile['relEditFile']) : '';
1200
1201 // Get RTE object, draw form and set flag:
1202 $RTEobj = &t3lib_BEfunc::RTEgetObj();
1203 $item = $RTEobj->drawRTE($this,$table,$field,$row,$PA,$specConf,$thisConfig,$RTEtypeVal,$RTErelPath,$thePidValue);
1204
1205 // Wizard:
1206 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf,1);
1207
1208 $RTEwasLoaded = 1;
1209 } else {
1210 $RTEwouldHaveBeenLoaded = 1;
1211 $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!)';
1212 }
1213 } else $this->commentMessages[] = $PA['itemFormElName'].': RTE is disabled by the Page TSconfig, "RTE"-key (eg. by RTE.default.disabled=0 or such)';
1214 } else $this->commentMessages[] = $PA['itemFormElName'].': PID value could NOT be fetched. Rare error, normally with new records.';
1215 } else {
1216 if (!isset($specConf['richtext'])) $this->commentMessages[] = $PA['itemFormElName'].': RTE was not configured for this field in TCA-types';
1217 if (!(!$p['flag'] || !$row[$p['flag']])) $this->commentMessages[] = $PA['itemFormElName'].': Field-flag ('.$PA['flag'].') has been set to disable RTE!';
1218 }
1219 }
1220
1221 // Display ordinary field if RTE was not loaded.
1222 if (!$RTEwasLoaded) {
1223 if ($specConf['rte_only']) { // Show message, if no RTE (field can only be edited with RTE!)
1224 $item = '<p><em>'.htmlspecialchars($this->getLL('l_noRTEfound')).'</em></p>';
1225 } else {
1226 if ($specConf['nowrap']) {
1227 $wrap = 'off';
1228 } else {
1229 $wrap = ($config['wrap'] ? $config['wrap'] : 'virtual');
1230 }
1231
1232 $classes = array();
1233 if ($specConf['fixed-font']) { $classes[] = 'fixed-font'; }
1234 if ($specConf['enable-tab']) { $classes[] = 'enable-tab'; }
1235
1236 $formWidthText = $this->formWidthText($cols,$wrap);
1237
1238 // Extract class attributes from $formWidthText (otherwise it would be added twice to the output)
1239 $res = array();
1240 if (preg_match('/ class="(.+?)"/',$formWidthText,$res)) {
1241 $formWidthText = str_replace(' class="'.$res[1].'"','',$formWidthText);
1242 $classes = array_merge($classes, explode(' ',$res[1]));
1243 }
1244
1245 if (count($classes)) {
1246 $class = ' class="'.implode(' ',$classes).'"';
1247 } else $class='';
1248
1249 $iOnChange = implode('',$PA['fieldChangeFunc']);
1250 $item.= '
1251 <textarea name="'.$PA['itemFormElName'].'"'.$formWidthText.$class.' rows="'.$rows.'" wrap="'.$wrap.'" onchange="'.htmlspecialchars($iOnChange).'"'.$PA['onFocus'].'>'.
1252 t3lib_div::formatForTextarea($PA['itemFormElValue']).
1253 '</textarea>';
1254 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf,$RTEwouldHaveBeenLoaded);
1255 }
1256 }
1257
1258 // Return field HTML:
1259 return $item;
1260 }
1261
1262 /**
1263 * Generation of TCEform elements of the type "check"
1264 * This will render a check-box OR an array of checkboxes
1265 *
1266 * @param string The table name of the record
1267 * @param string The field name which this element is supposed to edit
1268 * @param array The record data array where the value(s) for the field can be found
1269 * @param array An array with additional configuration options.
1270 * @return string The HTML code for the TCEform field
1271 */
1272 function getSingleField_typeCheck($table,$field,$row,&$PA) {
1273 $config = $PA['fieldConf']['config'];
1274
1275 $disabled = '';
1276 if($this->renderReadonly || $config['readOnly']) {
1277 $disabled = ' disabled="disabled"';
1278 }
1279
1280 // Traversing the array of items:
1281 $selItems = $this->initItemArray($PA['fieldConf']);
1282 if ($config['itemsProcFunc']) $selItems = $this->procItems($selItems,$PA['fieldTSConfig']['itemsProcFunc.'],$config,$table,$row,$field);
1283
1284 if (!count($selItems)) {
1285 $selItems[]=array('','');
1286 }
1287 $thisValue = intval($PA['itemFormElValue']);
1288
1289 $cols = intval($config['cols']);
1290 if ($cols > 1) {
1291 $item.= '<table border="0" cellspacing="0" cellpadding="0" class="typo3-TCEforms-checkboxArray">';
1292 for ($c=0;$c<count($selItems);$c++) {
1293 $p = $selItems[$c];
1294 if(!($c%$cols)) { $item.='<tr>'; }
1295 $cBP = $this->checkBoxParams($PA['itemFormElName'],$thisValue,$c,count($selItems),implode('',$PA['fieldChangeFunc']));
1296 $cBName = $PA['itemFormElName'].'_'.$c;
1297 $cBID = $PA['itemFormElID'].'_'.$c;
1298 $item.= '<td nowrap="nowrap">'.
1299 '<input type="checkbox"'.$this->insertDefStyle('check').' value="1" name="'.$cBName.'"'.$cBP.$disabled.' id="'.$cBID.'" />'.
1300 $this->wrapLabels('<label for="'.$cBID.'">'.htmlspecialchars($p[0]).'</label>&nbsp;').
1301 '</td>';
1302 if(($c%$cols)+1==$cols) {$item.='</tr>';}
1303 }
1304 if ($c%$cols) {
1305 $rest=$cols-($c%$cols);
1306 for ($c=0;$c<$rest;$c++) {
1307 $item.= '<td></td>';
1308 }
1309 if ($c>0) { $item.= '</tr>'; }
1310 }
1311 $item.= '</table>';
1312 } else {
1313 for ($c=0;$c<count($selItems);$c++) {
1314 $p = $selItems[$c];
1315 $cBP = $this->checkBoxParams($PA['itemFormElName'],$thisValue,$c,count($selItems),implode('',$PA['fieldChangeFunc']));
1316 $cBName = $PA['itemFormElName'].'_'.$c;
1317 $cBID = $PA['itemFormElID'].'_'.$c;
1318 $item.= ($c>0?'<br />':'').
1319 '<input type="checkbox"'.$this->insertDefStyle('check').' value="1" name="'.$cBName.'"'.$cBP.$PA['onFocus'].$disabled.' id="'.$cBID.'" />'.
1320 htmlspecialchars($p[0]);
1321 }
1322 }
1323 if (!$disabled) {
1324 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($thisValue).'" />';
1325 }
1326
1327 return $item;
1328 }
1329
1330 /**
1331 * Generation of TCEform elements of the type "radio"
1332 * This will render a series of radio buttons.
1333 *
1334 * @param string The table name of the record
1335 * @param string The field name which this element is supposed to edit
1336 * @param array The record data array where the value(s) for the field can be found
1337 * @param array An array with additional configuration options.
1338 * @return string The HTML code for the TCEform field
1339 */
1340 function getSingleField_typeRadio($table,$field,$row,&$PA) {
1341 $config = $PA['fieldConf']['config'];
1342
1343 $disabled = '';
1344 if($this->renderReadonly || $config['readOnly']) {
1345 $disabled = ' disabled="disabled"';
1346 }
1347
1348 // Get items for the array:
1349 $selItems = $this->initItemArray($PA['fieldConf']);
1350 if ($config['itemsProcFunc']) $selItems = $this->procItems($selItems,$PA['fieldTSConfig']['itemsProcFunc.'],$config,$table,$row,$field);
1351
1352 // Traverse the items, making the form elements:
1353 for ($c=0;$c<count($selItems);$c++) {
1354 $p = $selItems[$c];
1355 $rID = $PA['itemFormElID'].'_'.$c;
1356 $rOnClick = implode('',$PA['fieldChangeFunc']);
1357 $rChecked = (!strcmp($p[1],$PA['itemFormElValue'])?' checked="checked"':'');
1358 $item.= '<input type="radio"'.$this->insertDefStyle('radio').' name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($p[1]).'" onclick="'.htmlspecialchars($rOnClick).'"'.$rChecked.$PA['onFocus'].$disabled.' id="'.$rID.'" />
1359 <label for="'.$rID.'">'.htmlspecialchars($p[0]).'</label>
1360 <br />';
1361 }
1362
1363 return $item;
1364 }
1365
1366 /**
1367 * Generation of TCEform elements of the type "select"
1368 * This will render a selector box element, or possibly a special construction with two selector boxes. That depends on configuration.
1369 *
1370 * @param string The table name of the record
1371 * @param string The field name which this element is supposed to edit
1372 * @param array The record data array where the value(s) for the field can be found
1373 * @param array An array with additional configuration options.
1374 * @return string The HTML code for the TCEform field
1375 */
1376 function getSingleField_typeSelect($table,$field,$row,&$PA) {
1377 global $TCA;
1378
1379 // Field configuration from TCA:
1380 $config = $PA['fieldConf']['config'];
1381
1382 $disabled = '';
1383 if($this->renderReadonly || $config['readOnly']) {
1384 $disabled = ' disabled="disabled"';
1385 }
1386
1387 // "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/.
1388 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1389
1390 // Getting the selector box items from the system
1391 $selItems = $this->addSelectOptionsToItemArray($this->initItemArray($PA['fieldConf']),$PA['fieldConf'],$this->setTSconfig($table,$row),$field);
1392 $selItems = $this->addItems($selItems,$PA['fieldTSConfig']['addItems.']);
1393 if ($config['itemsProcFunc']) $selItems = $this->procItems($selItems,$PA['fieldTSConfig']['itemsProcFunc.'],$config,$table,$row,$field);
1394
1395 // Possibly remove some items:
1396 $removeItems = t3lib_div::trimExplode(',',$PA['fieldTSConfig']['removeItems'],1);
1397 foreach($selItems as $tk => $p) {
1398
1399 // Checking languages and authMode:
1400 $languageDeny = $TCA[$table]['ctrl']['languageField'] && !strcmp($TCA[$table]['ctrl']['languageField'], $field) && !$GLOBALS['BE_USER']->checkLanguageAccess($p[1]);
1401 $authModeDeny = $config['form_type']=='select' && $config['authMode'] && !$GLOBALS['BE_USER']->checkAuthMode($table,$field,$p[1],$config['authMode']);
1402 if (in_array($p[1],$removeItems) || $languageDeny || $authModeDeny) {
1403 unset($selItems[$tk]);
1404 } elseif (isset($PA['fieldTSConfig']['altLabels.'][$p[1]])) {
1405 $selItems[$tk][0]=$this->sL($PA['fieldTSConfig']['altLabels.'][$p[1]]);
1406 }
1407
1408 // Removing doktypes with no access:
1409 if ($table.'.'.$field == 'pages.doktype') {
1410 if (!($GLOBALS['BE_USER']->isAdmin() || t3lib_div::inList($GLOBALS['BE_USER']->groupData['pagetypes_select'],$p[1]))) {
1411 unset($selItems[$tk]);
1412 }
1413 }
1414 }
1415
1416 // Creating the label for the "No Matching Value" entry.
1417 $nMV_label = isset($PA['fieldTSConfig']['noMatchingValue_label']) ? $this->sL($PA['fieldTSConfig']['noMatchingValue_label']) : '[ '.$this->getLL('l_noMatchingValue').' ]';
1418
1419 // Prepare some values:
1420 $maxitems = intval($config['maxitems']);
1421
1422 // If a SINGLE selector box...
1423 if ($maxitems<=1) {
1424 $item = $this->getSingleField_typeSelect_single($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1425 } elseif (!strcmp($config['renderMode'],'checkbox')) { // Checkbox renderMode
1426 $item = $this->getSingleField_typeSelect_checkbox($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1427 } elseif (!strcmp($config['renderMode'],'singlebox')) { // Single selector box renderMode
1428 $item = $this->getSingleField_typeSelect_singlebox($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1429 } else { // Traditional multiple selector box:
1430 $item = $this->getSingleField_typeSelect_multiple($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1431 }
1432
1433 // Wizards:
1434 if (!$disabled) {
1435 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
1436 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf);
1437 }
1438
1439 return $item;
1440 }
1441
1442 /**
1443 * Creates a single-selector box
1444 * (Render function for getSingleField_typeSelect())
1445 *
1446 * @param string See getSingleField_typeSelect()
1447 * @param string See getSingleField_typeSelect()
1448 * @param array See getSingleField_typeSelect()
1449 * @param array See getSingleField_typeSelect()
1450 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1451 * @param array Items available for selection
1452 * @param string Label for no-matching-value
1453 * @return string The HTML code for the item
1454 * @see getSingleField_typeSelect()
1455 */
1456 function getSingleField_typeSelect_single($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1457 // check against inline uniqueness
1458 $inlineParent = $this->inline->getStructureLevel(-1);
1459 if(is_array($inlineParent) && $inlineParent['uid']) {
1460 if ($inlineParent['config']['foreign_table'] == $table && $inlineParent['config']['foreign_unique'] == $field) {
1461 $uniqueIds = $this->inline->inlineData['unique'][$this->inline->inlineNames['object'].'['.$table.']']['used'];
1462 $PA['fieldChangeFunc']['inlineUnique'] = "inline.updateUnique(this,'".$this->inline->inlineNames['object'].'['.$table."]','".$this->inline->inlineNames['form']."','".$row['uid']."');";
1463 }
1464 // hide uid of parent record for symmetric relations
1465 if ($inlineParent['config']['foreign_table'] == $table && ($inlineParent['config']['foreign_field'] == $field || $inlineParent['config']['symmetric_field'] == $field)) {
1466 $uniqueIds[] = $inlineParent['uid'];
1467 }
1468 }
1469
1470 // Initialization:
1471 $c = 0;
1472 $sI = 0;
1473 $noMatchingValue = 1;
1474 $opt = array();
1475 $selicons = array();
1476 $onlySelectedIconShown = 0;
1477 $size = intval($config['size']);
1478
1479 $disabled = '';
1480 if($this->renderReadonly || $config['readOnly']) {
1481 $disabled = ' disabled="disabled"';
1482 $onlySelectedIconShown = 1;
1483 }
1484
1485 // Icon configuration:
1486 if ($config['suppress_icons']=='IF_VALUE_FALSE') {
1487 $suppressIcons = !$PA['itemFormElValue'] ? 1 : 0;
1488 } elseif ($config['suppress_icons']=='ONLY_SELECTED') {
1489 $suppressIcons=0;
1490 $onlySelectedIconShown=1;
1491 } elseif ($config['suppress_icons']) {
1492 $suppressIcons = 1;
1493 } else $suppressIcons = 0;
1494
1495 // Traverse the Array of selector box items:
1496 foreach($selItems as $p) {
1497 $sM = (!strcmp($PA['itemFormElValue'],$p[1])?' selected="selected"':'');
1498 if ($sM) {
1499 $sI = $c;
1500 $noMatchingValue = 0;
1501 }
1502
1503 // Getting style attribute value (for icons):
1504 if ($config['iconsInOptionTags']) {
1505 $styleAttrValue = $this->optionTagStyle($p[2]);
1506 }
1507
1508 // Compiling the <option> tag:
1509 if (!($p[1] != $PA['itemFormElValue'] && is_array($uniqueIds) && in_array($p[1], $uniqueIds))) {
1510 if(!strcmp($p[1],'--div--')) {
1511 if($optGroupOpen) { // Closing last optgroup before next one starts
1512 $opt[]='</optgroup>';
1513 }
1514 $opt[]= '<optgroup label="'.t3lib_div::deHSCentities(htmlspecialchars($p[0])).'"'.
1515 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1516 ' class="c-divider">';
1517 $optGroupOpen = true;
1518 } else {
1519 $opt[]= '<option value="'.htmlspecialchars($p[1]).'"'.
1520 $sM.
1521 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1522 '>'.t3lib_div::deHSCentities(htmlspecialchars($p[0])).'</option>';
1523 }
1524 }
1525
1526 // If there is an icon for the selector box (rendered in table under)...:
1527 if ($p[2] && !$suppressIcons && (!$onlySelectedIconShown || $sM)) {
1528 list($selIconFile,$selIconInfo)=$this->getIcon($p[2]);
1529 $iOnClick = $this->elName($PA['itemFormElName']).'.selectedIndex='.$c.'; '.implode('',$PA['fieldChangeFunc']).$this->blur().'return false;';
1530 $selicons[]=array(
1531 (!$onlySelectedIconShown ? '<a href="#" onclick="'.htmlspecialchars($iOnClick).'">' : '').
1532 '<img src="'.$selIconFile.'" '.$selIconInfo[3].' vspace="2" border="0" title="'.htmlspecialchars($p[0]).'" alt="'.htmlspecialchars($p[0]).'" />'.
1533 (!$onlySelectedIconShown ? '</a>' : ''),
1534 $c,$sM);
1535 }
1536 $c++;
1537 }
1538
1539 if($optGroupOpen) { // Closing optgroup if open
1540 $opt[]='</optgroup>';
1541 $optGroupOpen = false;
1542 }
1543
1544 // No-matching-value:
1545 if ($PA['itemFormElValue'] && $noMatchingValue && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1546 $nMV_label = @sprintf($nMV_label, $PA['itemFormElValue']);
1547 $opt[]= '<option value="'.htmlspecialchars($PA['itemFormElValue']).'" selected="selected">'.htmlspecialchars($nMV_label).'</option>';
1548 }
1549
1550 // Create item form fields:
1551 $sOnChange = 'if (this.options[this.selectedIndex].value==\'--div--\') {this.selectedIndex='.$sI.';} '.implode('',$PA['fieldChangeFunc']);
1552 if(!$disabled) {
1553 $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...
1554 }
1555 $item.= '<select name="'.$PA['itemFormElName'].'"'.
1556 $this->insertDefStyle('select').
1557 ($size?' size="'.$size.'"':'').
1558 ' onchange="'.htmlspecialchars($sOnChange).'"'.
1559 $PA['onFocus'].$disabled.'>';
1560 $item.= implode('',$opt);
1561 $item.= '</select>';
1562
1563 // Create icon table:
1564 if (count($selicons) && !$config['noIconsBelowSelect']) {
1565 $item.='<table border="0" cellpadding="0" cellspacing="0" class="typo3-TCEforms-selectIcons">';
1566 $selicon_cols = intval($config['selicon_cols']);
1567 if (!$selicon_cols) $selicon_cols=count($selicons);
1568 $sR = ceil(count($selicons)/$selicon_cols);
1569 $selicons = array_pad($selicons,$sR*$selicon_cols,'');
1570 for($sa=0;$sa<$sR;$sa++) {
1571 $item.='<tr>';
1572 for($sb=0;$sb<$selicon_cols;$sb++) {
1573 $sk=($sa*$selicon_cols+$sb);
1574 $imgN = 'selIcon_'.$table.'_'.$row['uid'].'_'.$field.'_'.$selicons[$sk][1];
1575 $imgS = ($selicons[$sk][2]?$this->backPath.'gfx/content_selected.gif':'clear.gif');
1576 $item.='<td><img name="'.htmlspecialchars($imgN).'" src="'.$imgS.'" width="7" height="10" alt="" /></td>';
1577 $item.='<td>'.$selicons[$sk][0].'</td>';
1578 }
1579 $item.='</tr>';
1580 }
1581 $item.='</table>';
1582 }
1583
1584 return $item;
1585 }
1586
1587 /**
1588 * Creates a checkbox list (renderMode = "checkbox")
1589 * (Render function for getSingleField_typeSelect())
1590 *
1591 * @param string See getSingleField_typeSelect()
1592 * @param string See getSingleField_typeSelect()
1593 * @param array See getSingleField_typeSelect()
1594 * @param array See getSingleField_typeSelect()
1595 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1596 * @param array Items available for selection
1597 * @param string Label for no-matching-value
1598 * @return string The HTML code for the item
1599 * @see getSingleField_typeSelect()
1600 */
1601 function getSingleField_typeSelect_checkbox($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1602
1603 // Get values in an array (and make unique, which is fine because there can be no duplicates anyway):
1604 $itemArray = array_flip($this->extractValuesOnlyFromValueLabelList($PA['itemFormElValue']));
1605
1606 $disabled = '';
1607 if($this->renderReadonly || $config['readOnly']) {
1608 $disabled = ' disabled="disabled"';
1609 }
1610
1611 // Traverse the Array of selector box items:
1612 $tRows = array();
1613 $c=0;
1614 if (!$disabled) {
1615 $sOnChange = implode('',$PA['fieldChangeFunc']);
1616 $setAll = array(); // Used to accumulate the JS needed to restore the original selection.
1617 foreach($selItems as $p) {
1618 // Non-selectable element:
1619 if (!strcmp($p[1],'--div--')) {
1620 if (count($setAll)) {
1621 $tRows[] = '
1622 <tr>
1623 <td colspan="2">'.
1624 '<a href="#" onclick="'.htmlspecialchars(implode('',$setAll).' return false;').'">'.
1625 htmlspecialchars($this->getLL('l_setAllCheckboxes')).
1626 '</a></td>
1627 </tr>';
1628 $setAll = array();
1629 }
1630
1631 $tRows[] = '
1632 <tr class="c-header">
1633 <td colspan="2">'.htmlspecialchars($p[0]).'</td>
1634 </tr>';
1635 } else {
1636 // Selected or not by default:
1637 $sM = '';
1638 if (isset($itemArray[$p[1]])) {
1639 $sM = ' checked="checked"';
1640 unset($itemArray[$p[1]]);
1641 }
1642
1643 // Icon:
1644 $selIconFile = '';
1645 if ($p[2]) {
1646 list($selIconFile,$selIconInfo) = $this->getIcon($p[2]);
1647 }
1648
1649 // Compile row:
1650 $onClickCell = $this->elName($PA['itemFormElName'].'['.$c.']').'.checked=!'.$this->elName($PA['itemFormElName'].'['.$c.']').'.checked;';
1651 $onClick = 'this.attributes.getNamedItem("class").nodeValue = '.$this->elName($PA['itemFormElName'].'['.$c.']').'.checked ? "c-selectedItem" : "";';
1652 $setAll[] = $this->elName($PA['itemFormElName'].'['.$c.']').'.checked=1;';
1653 $tRows[] = '
1654 <tr class="'.($sM ? 'c-selectedItem' : '').'" onclick="'.htmlspecialchars($onClick).'" style="cursor: pointer;">
1655 <td><input type="checkbox"'.$this->insertDefStyle('check').' name="'.htmlspecialchars($PA['itemFormElName'].'['.$c.']').'" value="'.htmlspecialchars($p[1]).'"'.$sM.' onclick="'.htmlspecialchars($sOnChange).'"'.$PA['onFocus'].' /></td>
1656 <td class="c-labelCell" onclick="'.htmlspecialchars($onClickCell).'">'.
1657 ($selIconFile ? '<img src="'.$selIconFile.'" '.$selIconInfo[3].' vspace="2" border="0" class="absmiddle" style="margin-right: 4px;" alt="" />' : '').
1658 t3lib_div::deHSCentities(htmlspecialchars($p[0])).
1659 (strcmp($p[3],'') ? '<br/><p class="c-descr">'.nl2br(trim(htmlspecialchars($p[3]))).'</p>' : '').
1660 '</td>
1661 </tr>';
1662 $c++;
1663 }
1664 }
1665
1666 // Remaining checkboxes will get their set-all link:
1667 if (count($setAll)) {
1668 $tRows[] = '
1669 <tr>
1670 <td colspan="2">'.
1671 '<a href="#" onclick="'.htmlspecialchars(implode('',$setAll).' return false;').'">'.
1672 htmlspecialchars($this->getLL('l_setAllCheckboxes')).
1673 '</a></td>
1674 </tr>';
1675 }
1676 }
1677
1678 // Remaining values (invalid):
1679 if (count($itemArray) && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1680 foreach($itemArray as $theNoMatchValue => $temp) {
1681 // Compile <checkboxes> tag:
1682 array_unshift($tRows,'
1683 <tr class="c-invalidItem">
1684 <td><input type="checkbox"'.$this->insertDefStyle('check').' name="'.htmlspecialchars($PA['itemFormElName'].'['.$c.']').'" value="'.htmlspecialchars($theNoMatchValue).'" checked="checked" onclick="'.htmlspecialchars($sOnChange).'"'.$PA['onFocus'].$disabled.' /></td>
1685 <td class="c-labelCell">'.
1686 t3lib_div::deHSCentities(htmlspecialchars(@sprintf($nMV_label, $theNoMatchValue))).
1687 '</td>
1688 </tr>');
1689 $c++;
1690 }
1691 }
1692
1693 // Add an empty hidden field which will send a blank value if all items are unselected.
1694 $item.='<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="" />';
1695
1696 // Implode rows in table:
1697 $item.= '
1698 <table border="0" cellpadding="0" cellspacing="0" class="typo3-TCEforms-select-checkbox">'.
1699 implode('',$tRows).'
1700 </table>
1701 ';
1702
1703 return $item;
1704 }
1705
1706 /**
1707 * Creates a selectorbox list (renderMode = "singlebox")
1708 * (Render function for getSingleField_typeSelect())
1709 *
1710 * @param string See getSingleField_typeSelect()
1711 * @param string See getSingleField_typeSelect()
1712 * @param array See getSingleField_typeSelect()
1713 * @param array See getSingleField_typeSelect()
1714 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1715 * @param array Items available for selection
1716 * @param string Label for no-matching-value
1717 * @return string The HTML code for the item
1718 * @see getSingleField_typeSelect()
1719 */
1720 function getSingleField_typeSelect_singlebox($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1721
1722 // Get values in an array (and make unique, which is fine because there can be no duplicates anyway):
1723 $itemArray = array_flip($this->extractValuesOnlyFromValueLabelList($PA['itemFormElValue']));
1724
1725 $disabled = '';
1726 if($this->renderReadonly || $config['readOnly']) {
1727 $disabled = ' disabled="disabled"';
1728 }
1729
1730 // Traverse the Array of selector box items:
1731 $opt = array();
1732 $restoreCmd = array(); // Used to accumulate the JS needed to restore the original selection.
1733 $c = 0;
1734 foreach($selItems as $p) {
1735 // Selected or not by default:
1736 $sM = '';
1737 if (isset($itemArray[$p[1]])) {
1738 $sM = ' selected="selected"';
1739 $restoreCmd[] = $this->elName($PA['itemFormElName'].'[]').'.options['.$c.'].selected=1;';
1740 unset($itemArray[$p[1]]);
1741 }
1742
1743 // Non-selectable element:
1744 $nonSel = '';
1745 if (!strcmp($p[1],'--div--')) {
1746 $nonSel = ' onclick="this.selected=0;" class="c-divider"';
1747 }
1748
1749 // Icon style for option tag:
1750 if ($config['iconsInOptionTags']) {
1751 $styleAttrValue = $this->optionTagStyle($p[2]);
1752 }
1753
1754 // Compile <option> tag:
1755 $opt[] = '<option value="'.htmlspecialchars($p[1]).'"'.
1756 $sM.
1757 $nonSel.
1758 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1759 '>'.t3lib_div::deHSCentities(htmlspecialchars($p[0])).'</option>';
1760 $c++;
1761 }
1762
1763 // Remaining values:
1764 if (count($itemArray) && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1765 foreach($itemArray as $theNoMatchValue => $temp) {
1766 // Compile <option> tag:
1767 array_unshift($opt,'<option value="'.htmlspecialchars($theNoMatchValue).'" selected="selected">'.t3lib_div::deHSCentities(htmlspecialchars(@sprintf($nMV_label, $theNoMatchValue))).'</option>');
1768 }
1769 }
1770
1771 // Compile selector box:
1772 $sOnChange = implode('',$PA['fieldChangeFunc']);
1773 $selector_itemListStyle = isset($config['itemListStyle']) ? ' style="'.htmlspecialchars($config['itemListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"';
1774 $size = intval($config['size']);
1775 $size = $config['autoSizeMax'] ? t3lib_div::intInRange(count($selItems)+1,t3lib_div::intInRange($size,1),$config['autoSizeMax']) : $size;
1776 $selectBox = '<select name="'.$PA['itemFormElName'].'[]"'.
1777 $this->insertDefStyle('select').
1778 ($size ? ' size="'.$size.'"' : '').
1779 ' multiple="multiple" onchange="'.htmlspecialchars($sOnChange).'"'.
1780 $PA['onFocus'].
1781 $selector_itemListStyle.
1782 $disabled.'>
1783 '.
1784 implode('
1785 ',$opt).'
1786 </select>';
1787
1788 // Add an empty hidden field which will send a blank value if all items are unselected.
1789 if (!$disabled) {
1790 $item.='<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="" />';
1791 }
1792
1793 // Put it all into a table:
1794 $item.= '
1795 <table border="0" cellspacing="0" cellpadding="0" width="1" class="typo3-TCEforms-select-singlebox">
1796 <tr>
1797 <td>
1798 '.$selectBox.'
1799 <br/>
1800 <em>'.
1801 htmlspecialchars($this->getLL('l_holdDownCTRL')).
1802 '</em>
1803 </td>
1804 <td valign="top">
1805 <a href="#" onclick="'.htmlspecialchars($this->elName($PA['itemFormElName'].'[]').'.selectedIndex=-1;'.implode('',$restoreCmd).' return false;').'">'.
1806 '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/history.gif','width="13" height="12"').' title="'.htmlspecialchars($this->getLL('l_revertSelection')).'" alt="" />'.
1807 '</a>
1808 </td>
1809 </tr>
1810 </table>
1811 ';
1812
1813 return $item;
1814 }
1815
1816 /**
1817 * Creates a multiple-selector box (two boxes, side-by-side)
1818 * (Render function for getSingleField_typeSelect())
1819 *
1820 * @param string See getSingleField_typeSelect()
1821 * @param string See getSingleField_typeSelect()
1822 * @param array See getSingleField_typeSelect()
1823 * @param array See getSingleField_typeSelect()
1824 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1825 * @param array Items available for selection
1826 * @param string Label for no-matching-value
1827 * @return string The HTML code for the item
1828 * @see getSingleField_typeSelect()
1829 */
1830 function getSingleField_typeSelect_multiple($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1831
1832 $disabled = '';
1833 if($this->renderReadonly || $config['readOnly']) {
1834 $disabled = ' disabled="disabled"';
1835 }
1836
1837 // Setting this hidden field (as a flag that JavaScript can read out)
1838 if (!$disabled) {
1839 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'_mul" value="'.($config['multiple']?1:0).'" />';
1840 }
1841
1842 // Set max and min items:
1843 $maxitems = t3lib_div::intInRange($config['maxitems'],0);
1844 if (!$maxitems) $maxitems=100000;
1845 $minitems = t3lib_div::intInRange($config['minitems'],0);
1846
1847 // Register the required number of elements:
1848 $this->registerRequiredProperty('range', $PA['itemFormElName'], array($minitems,$maxitems,'imgName'=>$table.'_'.$row['uid'].'_'.$field));
1849
1850 // Get "removeItems":
1851 $removeItems = t3lib_div::trimExplode(',',$PA['fieldTSConfig']['removeItems'],1);
1852
1853 // Perform modification of the selected items array:
1854 $itemArray = t3lib_div::trimExplode(',',$PA['itemFormElValue'],1);
1855 foreach($itemArray as $tk => $tv) {
1856 $tvP = explode('|',$tv,2);
1857 $evalValue = rawurldecode($tvP[0]);
1858 $isRemoved = in_array($evalValue,$removeItems) || ($config['form_type']=='select' && $config['authMode'] && !$GLOBALS['BE_USER']->checkAuthMode($table,$field,$evalValue,$config['authMode']));
1859 if ($isRemoved && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1860 $tvP[1] = rawurlencode(@sprintf($nMV_label, $evalValue));
1861 } elseif (isset($PA['fieldTSConfig']['altLabels.'][$evalValue])) {
1862 $tvP[1] = rawurlencode($this->sL($PA['fieldTSConfig']['altLabels.'][$evalValue]));
1863 }
1864 $itemArray[$tk] = implode('|',$tvP);
1865 }
1866 $itemsToSelect = '';
1867
1868 if(!$disabled) {
1869 // Create option tags:
1870 $opt = array();
1871 $styleAttrValue = '';
1872 foreach($selItems as $p) {
1873 if ($config['iconsInOptionTags']) {
1874 $styleAttrValue = $this->optionTagStyle($p[2]);
1875 }
1876 $opt[]= '<option value="'.htmlspecialchars($p[1]).'"'.
1877 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1878 '>'.htmlspecialchars($p[0]).'</option>';
1879 }
1880
1881 // Put together the selector box:
1882 $selector_itemListStyle = isset($config['itemListStyle']) ? ' style="'.htmlspecialchars($config['itemListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"';
1883 $size = intval($config['size']);
1884 $size = $config['autoSizeMax'] ? t3lib_div::intInRange(count($itemArray)+1,t3lib_div::intInRange($size,1),$config['autoSizeMax']) : $size;
1885 if ($config['exclusiveKeys']) {
1886 $sOnChange = 'setFormValueFromBrowseWin(\''.$PA['itemFormElName'].'\',this.options[this.selectedIndex].value,this.options[this.selectedIndex].text,\''.$config['exclusiveKeys'].'\'); ';
1887 } else {
1888 $sOnChange = 'setFormValueFromBrowseWin(\''.$PA['itemFormElName'].'\',this.options[this.selectedIndex].value,this.options[this.selectedIndex].text); ';
1889 }
1890 $sOnChange .= implode('',$PA['fieldChangeFunc']);
1891 $itemsToSelect = '
1892 <select name="'.$PA['itemFormElName'].'_sel"'.
1893 $this->insertDefStyle('select').
1894 ($size ? ' size="'.$size.'"' : '').
1895 ' onchange="'.htmlspecialchars($sOnChange).'"'.
1896 $PA['onFocus'].
1897 $selector_itemListStyle.'>
1898 '.implode('
1899 ',$opt).'
1900 </select>';
1901 }
1902
1903 // Pass to "dbFileIcons" function:
1904 $params = array(
1905 'size' => $size,
1906 'autoSizeMax' => t3lib_div::intInRange($config['autoSizeMax'],0),
1907 'style' => isset($config['selectedListStyle']) ? ' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"',
1908 'dontShowMoveIcons' => ($maxitems<=1),
1909 'maxitems' => $maxitems,
1910 'info' => '',
1911 'headers' => array(
1912 'selector' => $this->getLL('l_selected').':<br />',
1913 'items' => $this->getLL('l_items').':<br />'
1914 ),
1915 'noBrowser' => 1,
1916 'thumbnails' => $itemsToSelect,
1917 'readOnly' => $disabled
1918 );
1919 $item.= $this->dbFileIcons($PA['itemFormElName'],'','',$itemArray,'',$params,$PA['onFocus']);
1920
1921 return $item;
1922 }
1923
1924 /**
1925 * Generation of TCEform elements of the type "group"
1926 * This will render a selectorbox into which elements from either the file system or database can be inserted. Relations.
1927 *
1928 * @param string The table name of the record
1929 * @param string The field name which this element is supposed to edit
1930 * @param array The record data array where the value(s) for the field can be found
1931 * @param array An array with additional configuration options.
1932 * @return string The HTML code for the TCEform field
1933 */
1934 function getSingleField_typeGroup($table,$field,$row,&$PA) {
1935 // Init:
1936 $config = $PA['fieldConf']['config'];
1937 $internal_type = $config['internal_type'];
1938 $show_thumbs = $config['show_thumbs'];
1939 $size = intval($config['size']);
1940 $maxitems = t3lib_div::intInRange($config['maxitems'],0);
1941 if (!$maxitems) $maxitems=100000;
1942 $minitems = t3lib_div::intInRange($config['minitems'],0);
1943 $allowed = $config['allowed'];
1944 $disallowed = $config['disallowed'];
1945
1946 $disabled = '';
1947 if($this->renderReadonly || $config['readOnly']) {
1948 $disabled = ' disabled="disabled"';
1949 }
1950
1951 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'_mul" value="'.($config['multiple']?1:0).'"'.$disabled.' />';
1952 $this->registerRequiredProperty('range', $PA['itemFormElName'], array($minitems,$maxitems,'imgName'=>$table.'_'.$row['uid'].'_'.$field));
1953 $info='';
1954
1955 // "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/.
1956 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1957
1958 // Acting according to either "file" or "db" type:
1959 switch((string)$config['internal_type']) {
1960 case 'file': // If the element is of the internal type "file":
1961
1962 // Creating string showing allowed types:
1963 $tempFT = t3lib_div::trimExplode(',',$allowed,1);
1964 if (!count($tempFT)) {$info.='*';}
1965 foreach($tempFT as $ext) {
1966 if ($ext) {
1967 $info.=strtoupper($ext).' ';
1968 }
1969 }
1970 // Creating string, showing disallowed types:
1971 $tempFT_dis = t3lib_div::trimExplode(',',$disallowed,1);
1972 if (count($tempFT_dis)) {$info.='<br />';}
1973 foreach($tempFT_dis as $ext) {
1974 if ($ext) {
1975 $info.='-'.strtoupper($ext).' ';
1976 }
1977 }
1978
1979 // Making the array of file items:
1980 $itemArray = t3lib_div::trimExplode(',',$PA['itemFormElValue'],1);
1981
1982 // Showing thumbnails:
1983 $thumbsnail = '';
1984 if ($show_thumbs) {
1985 $imgs = array();
1986 foreach($itemArray as $imgRead) {
1987 $imgP = explode('|',$imgRead);
1988 $imgPath = rawurldecode($imgP[0]);
1989
1990 $rowCopy = array();
1991 $rowCopy[$field] = $imgPath;
1992
1993 // Icon + clickmenu:
1994 $absFilePath = t3lib_div::getFileAbsFileName($config['uploadfolder'].'/'.$imgPath);
1995
1996 $fI = pathinfo($imgPath);
1997 $fileIcon = t3lib_BEfunc::getFileIcon(strtolower($fI['extension']));
1998 $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="" />';
1999
2000 $imgs[] = '<span class="nobr">'.t3lib_BEfunc::thumbCode($rowCopy,$table,$field,$this->backPath,'thumbs.php',$config['uploadfolder'],0,' align="middle"').
2001 ($absFilePath ? $this->getClickMenu($fileIcon, $absFilePath) : $fileIcon).
2002 $imgPath.
2003 '</span>';
2004 }
2005 $thumbsnail = implode('<br />',$imgs);
2006 }
2007
2008 // Creating the element:
2009 $noList = isset($config['disable_controls']) && t3lib_div::inList($config['disable_controls'], 'list');
2010 $params = array(
2011 'size' => $size,
2012 'dontShowMoveIcons' => ($maxitems<=1),
2013 'autoSizeMax' => t3lib_div::intInRange($config['autoSizeMax'],0),
2014 'maxitems' => $maxitems,
2015 'style' => isset($config['selectedListStyle']) ? ' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"',
2016 'info' => $info,
2017 'thumbnails' => $thumbsnail,
2018 'readOnly' => $disabled,
2019 'noBrowser' => $noList || isset($config['disable_controls']) && t3lib_div::inList($config['disable_controls'], 'browser'),
2020 'noList' => $noList,
2021 );
2022 $item.= $this->dbFileIcons($PA['itemFormElName'],'file',implode(',',$tempFT),$itemArray,'',$params,$PA['onFocus']);
2023
2024 if(!$disabled && !(isset($config['disable_controls']) && t3lib_div::inList($config['disable_controls'], 'upload'))) {
2025 // Adding the upload field:
2026 if ($this->edit_docModuleUpload) $item.='<input type="file" name="'.$PA['itemFormElName_file'].'"'.$this->formWidth().' size="60" />';
2027 }
2028 break;
2029 case 'db': // If the element is of the internal type "db":
2030
2031 // Creating string showing allowed types:
2032 $tempFT = t3lib_div::trimExplode(',',$allowed,1);
2033 if (!strcmp(trim($tempFT[0]),'*')) {
2034 $info.='<span class="nobr">&nbsp;&nbsp;&nbsp;&nbsp;'.
2035 htmlspecialchars($this->getLL('l_allTables')).
2036 '</span><br />';
2037 } else {
2038 while(list(,$theT)=each($tempFT)) {
2039 if ($theT) {
2040 $info.='<span class="nobr">&nbsp;&nbsp;&nbsp;&nbsp;'.
2041 t3lib_iconWorks::getIconImage($theT,array(),$this->backPath,'align="top"').
2042 htmlspecialchars($this->sL($GLOBALS['TCA'][$theT]['ctrl']['title'])).
2043 '</span><br />';
2044 }
2045 }
2046 }
2047
2048 $perms_clause = $GLOBALS['BE_USER']->getPagePermsClause(1);
2049 $itemArray = array();
2050 $imgs = array();
2051
2052 // Thumbnails:
2053 $temp_itemArray = t3lib_div::trimExplode(',',$PA['itemFormElValue'],1);
2054 foreach($temp_itemArray as $dbRead) {
2055 $recordParts = explode('|',$dbRead);
2056 list($this_table,$this_uid) = t3lib_BEfunc::splitTable_Uid($recordParts[0]);
2057 $itemArray[] = array('table'=>$this_table, 'id'=>$this_uid);
2058 if (!$disabled && $show_thumbs) {
2059 $rr = t3lib_BEfunc::getRecordWSOL($this_table,$this_uid);
2060 $imgs[] = '<span class="nobr">'.
2061 $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).
2062 '&nbsp;'.
2063 t3lib_BEfunc::getRecordTitle($this_table,$rr,TRUE).' <span class="typo3-dimmed"><em>['.$rr['uid'].']</em></span>'.
2064 '</span>';
2065 }
2066 }
2067 $thumbsnail='';
2068 if (!$disabled && $show_thumbs) {
2069 $thumbsnail = implode('<br />',$imgs);
2070 }
2071
2072 // Creating the element:
2073 $params = array(
2074 'size' => $size,
2075 'dontShowMoveIcons' => ($maxitems<=1),
2076 'autoSizeMax' => t3lib_div::intInRange($config['autoSizeMax'],0),
2077 'maxitems' => $maxitems,
2078 'style' => isset($config['selectedListStyle']) ? ' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"',
2079 'info' => $info,
2080 'thumbnails' => $thumbsnail,
2081 'readOnly' => $disabled
2082 );
2083 $item.= $this->dbFileIcons($PA['itemFormElName'],'db',implode(',',$tempFT),$itemArray,'',$params,$PA['onFocus'],$table,$field,$row['uid']);
2084
2085 break;
2086 }
2087
2088 // Wizards:
2089 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
2090 if (!$disabled) {
2091 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf);
2092 }
2093
2094 return $item;
2095 }
2096
2097 /**
2098 * Generation of TCEform elements of the type "none"
2099 * This will render a non-editable display of the content of the field.
2100 *
2101 * @param string The table name of the record
2102 * @param string The field name which this element is supposed to edit
2103 * @param array The record data array where the value(s) for the field can be found
2104 * @param array An array with additional configuration options.
2105 * @return string The HTML code for the TCEform field
2106 */
2107 function getSingleField_typeNone($table,$field,$row,&$PA) {
2108 // Init:
2109 $config = $PA['fieldConf']['config'];
2110 $itemValue = $PA['itemFormElValue'];
2111
2112 return $this->getSingleField_typeNone_render($config,$itemValue);
2113 }
2114
2115 /**
2116 * HTML rendering of a value which is not editable.
2117 *
2118 * @param array Configuration for the display
2119 * @param string The value to display
2120 * @return string The HTML code for the display
2121 * @see getSingleField_typeNone();
2122 */
2123 function getSingleField_typeNone_render($config,$itemValue) {
2124
2125 // is colorScheme[0] the right value?
2126 $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;';
2127
2128 if ($config['format']) {
2129 $itemValue = $this->formatValue($config, $itemValue);
2130 }
2131
2132 $rows = intval($config['rows']);
2133 if ($rows > 1) {
2134 if(!$config['pass_content']) {
2135 $itemValue = nl2br(htmlspecialchars($itemValue));
2136 }
2137 // like textarea
2138 $cols = t3lib_div::intInRange($config['cols'] ? $config['cols'] : 30, 5, $this->maxTextareaWidth);
2139 if (!$config['fixedRows']) {
2140 $origRows = $rows = t3lib_div::intInRange($rows, 1, 20);
2141 if (strlen($itemValue)>$this->charsPerRow*2) {
2142 $cols = $this->maxTextareaWidth;
2143 $rows = t3lib_div::intInRange(round(strlen($itemValue)/$this->charsPerRow),count(explode(chr(10),$itemValue)),20);
2144 if ($rows<$origRows) $rows=$origRows;
2145 }
2146 }
2147
2148 if ($this->docLarge) $cols = round($cols*$this->form_largeComp);
2149 $width = ceil($cols*$this->form_rowsToStylewidth);
2150 // hardcoded: 12 is the height of the font
2151 $height=$rows*12;
2152
2153 $item='
2154 <div style="'.htmlspecialchars($divStyle.' overflow:auto; height:'.$height.'px; width:'.$width.'px;').'" class="'.htmlspecialchars($this->formElClass('none')).'">'.
2155 $itemValue.
2156 '</div>';
2157 } else {
2158 if(!$config['pass_content']) {
2159 $itemValue = htmlspecialchars($itemValue);
2160 }
2161
2162 $cols = $config['cols']?$config['cols']:($config['size']?$config['size']:$this->maxInputWidth);
2163 if ($this->docLarge) $cols = round($cols*$this->form_largeComp);
2164 $width = ceil($cols*$this->form_rowsToStylewidth);
2165
2166 // overflow:auto crashes mozilla here. Title tag is usefull when text is longer than the div box (overflow:hidden).
2167 $item = '
2168 <div style="'.htmlspecialchars($divStyle.' overflow:hidden; width:'.$width.'px;').'" class="'.htmlspecialchars($this->formElClass('none')).'" title="'.$itemValue.'">'.
2169 '<span class="nobr">'.(strcmp($itemValue,'')?$itemValue:'&nbsp;').'</span>'.
2170 '</div>';
2171 }
2172
2173 return $item;
2174 }
2175
2176 /**
2177 * Handler for Flex Forms
2178 *
2179 * @param string The table name of the record
2180 * @param string The field name which this element is supposed to edit
2181 * @param array The record data array where the value(s) for the field can be found
2182 * @param array An array with additional configuration options.
2183 * @return string The HTML code for the TCEform field
2184 */
2185 function getSingleField_typeFlex($table,$field,$row,&$PA) {
2186
2187 // Data Structure:
2188 $dataStructArray = t3lib_BEfunc::getFlexFormDS($PA['fieldConf']['config'],$row,$table);
2189
2190 // Get data structure:
2191 if (is_array($dataStructArray)) {
2192
2193 // Get data:
2194 $xmlData = $PA['itemFormElValue'];
2195 $xmlHeaderAttributes = t3lib_div::xmlGetHeaderAttribs($xmlData);
2196 $storeInCharset = strtolower($xmlHeaderAttributes['encoding']);
2197 if ($storeInCharset) {
2198 $currentCharset=$GLOBALS['LANG']->charSet;
2199 $xmlData = $GLOBALS['LANG']->csConvObj->conv($xmlData,$storeInCharset,$currentCharset,1);
2200 }
2201 $editData=t3lib_div::xml2array($xmlData);
2202 if (!is_array($editData)) { // Must be XML parsing error...
2203 $editData=array();
2204 } elseif (!isset($editData['meta']) || !is_array($editData['meta'])) {
2205 $editData['meta'] = array();
2206 }
2207
2208 // Find the data structure if sheets are found:
2209 $sheet = $editData['meta']['currentSheetId'] ? $editData['meta']['currentSheetId'] : 'sDEF'; // Sheet to display
2210
2211 // Create sheet menu:
2212 // if (is_array($dataStructArray['sheets'])) {
2213 // #$item.=$this->getSingleField_typeFlex_sheetMenu($dataStructArray['sheets'], $PA['itemFormElName'].'[meta][currentSheetId]', $sheet).'<br />';
2214 // }
2215
2216 // Create language menu:
2217 $langChildren = $dataStructArray['meta']['langChildren'] ? 1 : 0;
2218 $langDisabled = $dataStructArray['meta']['langDisable'] ? 1 : 0;
2219
2220 $editData['meta']['currentLangId']=array();
2221 $languages = $this->getAvailableLanguages();
2222
2223 foreach($languages as $lInfo) {
2224 if ($GLOBALS['BE_USER']->checkLanguageAccess($lInfo['uid'])) {
2225 $editData['meta']['currentLangId'][] = $lInfo['ISOcode'];
2226 }
2227 }
2228 if (!is_array($editData['meta']['currentLangId']) || !count($editData['meta']['currentLangId'])) {
2229 $editData['meta']['currentLangId']=array('DEF');
2230 }
2231
2232 $editData['meta']['currentLangId'] = array_unique($editData['meta']['currentLangId']);
2233
2234
2235 // if (!$langDisabled && count($languages) > 1) {
2236 // $item.=$this->getSingleField_typeFlex_langMenu($languages, $PA['itemFormElName'].'[meta][currentLangId]', $editData['meta']['currentLangId']).'<br />';
2237 // }
2238
2239 $PA['_noEditDEF'] = FALSE;
2240 if ($langChildren || $langDisabled) {
2241 $rotateLang = array('DEF');
2242 } else {
2243 if (!in_array('DEF',$editData['meta']['currentLangId'])) {
2244 array_unshift($editData['meta']['currentLangId'],'DEF');
2245 $PA['_noEditDEF'] = TRUE;
2246 }
2247 $rotateLang = $editData['meta']['currentLangId'];
2248 }
2249
2250 // Tabs sheets
2251 if (is_array($dataStructArray['sheets'])) {
2252 $tabsToTraverse = array_keys($dataStructArray['sheets']);
2253 } else {
2254 $tabsToTraverse = array($sheet);
2255 }
2256
2257 foreach ($rotateLang as $lKey) {
2258 if (!$langChildren && !$langDisabled) {
2259 $item.= '<b>'.$this->getLanguageIcon($table,$row,'v'.$lKey).$lKey.':</b>';
2260 }
2261
2262 $tabParts = array();
2263 foreach ($tabsToTraverse as $sheet) {
2264 list ($dataStruct, $sheet) = t3lib_div::resolveSheetDefInDS($dataStructArray,$sheet);
2265
2266 // Render sheet:
2267 if (is_array($dataStruct['ROOT']) && is_array($dataStruct['ROOT']['el'])) {
2268 $lang = 'l'.$lKey; // Default language, other options are "lUK" or whatever country code (independant of system!!!)
2269 $PA['_valLang'] = $langChildren && !$langDisabled ? $editData['meta']['currentLangId'] : 'DEF'; // Default language, other options are "lUK" or whatever country code (independant of system!!!)
2270 $PA['_lang'] = $lang;
2271 $PA['_cshFile'] = ((isset($dataStruct['ROOT']['TCEforms']) && isset($dataStruct['ROOT']['TCEforms']['cshFile'])) ? $dataStruct['ROOT']['TCEforms']['cshFile'] : '');
2272
2273 // Render flexform:
2274 $tRows = $this->getSingleField_typeFlex_draw(
2275 $dataStruct['ROOT']['el'],
2276 $editData['data'][$sheet][$lang],
2277 $table,
2278 $field,
2279 $row,
2280 $PA,
2281 '[data]['.$sheet.']['.$lang.']'
2282 );
2283 #$sheetContent= '<table border="0" cellpadding="1" cellspacing="1" class="typo3-TCEforms-flexForm">'.implode('',$tRows).'</table>';
2284 $sheetContent = '<div class="typo3-TCEforms-flexForm">'.$tRows.'</div>';
2285
2286 # $item = '<div style=" position:absolute;">'.$item.'</div>';
2287 //visibility:hidden;
2288 } else $sheetContent='Data Structure ERROR: No ROOT element found for sheet "'.$sheet.'".';
2289
2290 // Add to tab:
2291 $tabParts[] = array(
2292 'label' => ($dataStruct['ROOT']['TCEforms']['sheetTitle'] ? $this->sL($dataStruct['ROOT']['TCEforms']['sheetTitle']) : $sheet),
2293 'description' => ($dataStruct['ROOT']['TCEforms']['sheetDescription'] ? $this->sL($dataStruct['ROOT']['TCEforms']['sheetDescription']) : ''),
2294 'linkTitle' => ($dataStruct['ROOT']['TCEforms']['sheetShortDescr'] ? $this->sL($dataStruct['ROOT']['TCEforms']['sheetShortDescr']) : ''),
2295 'content' => $sheetContent
2296 );
2297 }
2298
2299 if (is_array($dataStructArray['sheets'])) {
2300 $item.= $this->getDynTabMenu($tabParts,'TCEFORMS:flexform:'.$PA['itemFormElName'].$PA['_lang']);
2301 } else {
2302 $item.= $sheetContent;
2303 }
2304 }
2305 } else $item='Data Structure ERROR: '.$dataStructArray;
2306
2307 return $item;
2308 }
2309
2310 /**
2311 * Creates the language menu for FlexForms:
2312 *
2313 * @param [type] $languages: ...
2314 * @param [type] $elName: ...
2315 * @param [type] $selectedLanguage: ...
2316 * @param [type] $multi: ...
2317 * @return string HTML for menu
2318 */
2319 function getSingleField_typeFlex_langMenu($languages,$elName,$selectedLanguage,$multi=1) {
2320 $opt=array();
2321 foreach($languages as $lArr) {
2322 $opt[]='<option value="'.htmlspecialchars($lArr['ISOcode']).'"'.(in_array($lArr['ISOcode'],$selectedLanguage)?' selected="selected"':'').'>'.htmlspecialchars($lArr['title']).'</option>';
2323 }
2324
2325 $output = '<select name="'.$elName.'[]"'.($multi ? ' multiple="multiple" size="'.count($languages).'"' : '').'>'.implode('',$opt).'</select>';
2326
2327 return $output;
2328 }
2329
2330 /**
2331 * Creates the menu for selection of the sheets:
2332 *
2333 * @param array Sheet array for which to render the menu
2334 * @param string Form element name of the field containing the sheet pointer
2335 * @param string Current sheet key
2336 * @return string HTML for menu
2337 */
2338 function getSingleField_typeFlex_sheetMenu($sArr,$elName,$sheetKey) {
2339
2340 $tCells =array();
2341 $pct = round(100/count($sArr));
2342 foreach($sArr as $sKey => $sheetCfg) {
2343 if ($GLOBALS['BE_USER']->jsConfirmation(1)) {
2344 $onClick = 'if (confirm(TBE_EDITOR.labels.onChangeAlert) && TBE_EDITOR.checkSubmit(-1)){'.$this->elName($elName).".value='".$sKey."'; TBE_EDITOR.submitForm()};";
2345 } else {
2346 $onClick = 'if(TBE_EDITOR.checkSubmit(-1)){ '.$this->elName($elName).".value='".$sKey."'; TBE_EDITOR.submitForm();}";
2347 }
2348
2349
2350 $tCells[]='<td width="'.$pct.'%" style="'.($sKey==$sheetKey ? 'background-color: #9999cc; font-weight: bold;' : 'background-color: #aaaaaa;').' cursor: hand;" onclick="'.htmlspecialchars($onClick).'" align="center">'.
2351 ($sheetCfg['ROOT']['TCEforms']['sheetTitle'] ? $this->sL($sheetCfg['ROOT']['TCEforms']['sheetTitle']) : $sKey).
2352 '</td>';
2353 }
2354
2355 return '<table border="0" cellpadding="0" cellspacing="2" class="typo3-TCEforms-flexForm-sheetMenu"><tr>'.implode('',$tCells).'</tr></table>';
2356 }
2357
2358 /**
2359 * Recursive rendering of flexforms
2360 *
2361 * @param array (part of) Data Structure for which to render. Keys on first level is flex-form fields
2362 * @param array (part of) Data array of flexform corresponding to the input DS. Keys on first level is flex-form field names
2363 * @param string Table name, eg. tt_content
2364 * @param string Field name, eg. tx_templavoila_flex
2365 * @param array The particular record from $table in which the field $field is found
2366 * @param array Array of standard information for rendering of a form field in TCEforms, see other rendering functions too
2367 * @param string Form field prefix, eg. "[data][sDEF][lDEF][...][...]"
2368 * @param integer Indicates nesting level for the function call
2369 * @param string Prefix for ID-values
2370 * @param boolean Defines whether the next flexform level is open or closed. Comes from _TOGGLE pseudo field in FlexForm xml.
2371 * @return string HTMl code for form.
2372 */
2373 function getSingleField_typeFlex_draw($dataStruct,$editData,$table,$field,$row,&$PA,$formPrefix='',$level=0,$idPrefix='ID',$toggleClosed=FALSE) {
2374
2375 $output = '';
2376 $mayRestructureFlexforms = $GLOBALS['BE_USER']->checkLanguageAccess(0);
2377
2378 // Data Structure array must be ... and array of course...
2379 if (is_array($dataStruct)) {
2380 foreach($dataStruct as $key => $value) { // Traversing fields in structure:
2381 if (is_array($value)) { // The value of each entry must be an array.
2382
2383 // ********************
2384 // Making the row:
2385 // ********************
2386 // Title of field:
2387 $theTitle = htmlspecialchars(t3lib_div::fixed_lgd_cs($this->sL($value['tx_templavoila']['title']),30));
2388
2389 // If it's a "section" or "container":
2390 if ($value['type']=='array') {
2391
2392 // Creating IDs for form fields:
2393 // 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.
2394 $thisId = t3lib_div::shortMd5(uniqid('id',true)); // This is a suffix used for forms on this level
2395 $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.
2396
2397 // If it's a "section" containing other elements:
2398 if ($value['section']) {
2399
2400 // Render header of section:
2401 $output.= '<div class="bgColor2"><strong>'.$theTitle.'</strong></div>';
2402
2403 // Render elements in data array for section:
2404 $tRows = array();
2405 $cc=0;
2406 if (is_array($editData[$key]['el'])) {
2407 foreach ($editData[$key]['el'] as $k3 => $v3) {
2408 $cc=$k3;
2409 if (is_array($v3)) {
2410 $theType = key($v3);
2411 $theDat = $v3[$theType];
2412 $newSectionEl = $value['el'][$theType];
2413 if (is_array($newSectionEl)) {
2414 $tRows[]= $this->getSingleField_typeFlex_draw(
2415 array($theType => $newSectionEl),
2416 array($theType => $theDat),
2417 $table,
2418 $field,
2419 $row,
2420 $PA,
2421 $formPrefix.'['.$key.'][el]['.$cc.']',
2422 $level+1,
2423 $idTagPrefix,
2424 $v3['_TOGGLE']
2425 );
2426 }
2427 }
2428 }
2429 }
2430
2431 // Now, we generate "templates" for new elements that could be added to this section by traversing all possible types of content inside the section:
2432 // 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...
2433
2434 // Preserving internal variables we don't want to change:
2435 $TEMP_requiredElements = $this->requiredElements;
2436
2437 // Traversing possible types of new content in the section:
2438 $newElementsLinks = array();
2439 foreach($value['el'] as $nnKey => $nCfg) {
2440 $newElementTemplate = $this->getSingleField_typeFlex_draw(
2441 array($nnKey => $nCfg),
2442 array(),
2443 $table,
2444 $field,
2445 $row,
2446 $PA,
2447 $formPrefix.'['.$key.'][el]['.$idTagPrefix.'-form]',
2448 $level+1,
2449 $idTagPrefix
2450 );
2451
2452 // Makes a "Add new" link:
2453 $onClickInsert = 'new Insertion.Bottom($("'.$idTagPrefix.'"), unescape("'.rawurlencode($newElementTemplate).'").replace(/'.$idTagPrefix.'-/g,"'.$idTagPrefix.'-idx"+Math.floor(Math.random()*100000+1)+"-")); setActionStatus("'.$idTagPrefix.'"); return false;'; // 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...
2454 $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>';
2455 }
2456
2457 // Reverting internal variables we don't want to change:
2458 $this->requiredElements = $TEMP_requiredElements;
2459
2460 // Adding the sections:
2461 $output.= '
2462 <div style="padding: 2px 0px 2px 20px;">
2463 <a href="#" onclick="'.htmlspecialchars('flexFormToggleSubs("'.$idTagPrefix.'"); return false;').'">
2464 <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
2465 </a>
2466 </div>
2467
2468 <div id="'.$idTagPrefix.'" style="padding-left: 20px;">'.implode('',$tRows).'</div>';
2469 $output.= $mayRestructureFlexforms ? '<div style="padding: 10px 5px 5px 20px;"><b>Add new:</b> '.implode(' | ',$newElementsLinks).'</div>' : '';
2470 // If it's a container:
2471 } else {
2472
2473 $toggleIcon_open = '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/pil2down.gif','width="12" height="7"').' hspace="2" alt="Open" title="Open" />';
2474 $toggleIcon_close = '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/pil2right.gif','width="7" height="12"').' hspace="2" alt="Close" title="Close" />';
2475
2476 // Create on-click actions.
2477 # $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.
2478 $onClickRemove = 'if (confirm("Are you sure?")){$("'.$idTagPrefix.'").hide();setActionStatus("'.$idPrefix.'");} return false;';
2479 $onClickToggle = 'flexFormToggle("'.$idTagPrefix.'"); return false;';
2480
2481 $onMove = 'flexFormSortable("'.$idPrefix.'")';
2482 // 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.
2483
2484
2485 // Putting together header of a section. Sections can be removed, copied, opened/closed, moved up and down:
2486 // 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.
2487 // 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.
2488 $ctrlHeader= '
2489 <table border="0" cellpadding="0" cellspacing="0" width="100%" onmousedown="'.($mayRestructureFlexforms?htmlspecialchars($onMove):'').'">
2490 <tr>
2491 <td>
2492 <a href="#" onclick="'.htmlspecialchars($onClickToggle).'" id="'.$idTagPrefix.'-toggle">
2493 '.($toggleClosed?$toggleIcon_close:$toggleIcon_open).'
2494 </a>
2495 <strong>'.$theTitle.'</strong> <em><span id="'.$idTagPrefix.'-preview"></span></em>
2496 </td>
2497 <td align="right">'.
2498 ($mayRestructureFlexforms ? '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/move.gif','width="16" height="16"').' alt="Drag to Move" title="Drag to Move" />' : '').
2499 # '<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
2500 ($mayRestructureFlexforms ? '<a href="#" onclick="'.htmlspecialchars($onClickRemove).'"><img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/garbage.gif','width="11" height="12"').' alt="Delete" title="Delete" /></a>' : '').
2501 '</td>
2502 </tr>
2503 </table>';
2504
2505 $s = t3lib_div::revExplode('[]',$formPrefix,2);
2506 $actionFieldName = '_ACTION_FLEX_FORM'.$PA['itemFormElName'].$s[0].'][_ACTION]['.$s[1];
2507
2508 // Putting together the container:
2509 $output.= '
2510 <div id="'.$idTagPrefix.'" class="bgColor2">
2511 <input id="'.$idTagPrefix.'-action" type="hidden" name="'.htmlspecialchars($actionFieldName).'" value=""/>
2512
2513 '.$ctrlHeader.'
2514 <div id="'.$idTagPrefix.'-content"'.($toggleClosed?' style="display:none;"':'').'>'.$this->getSingleField_typeFlex_draw(
2515 $value['el'],
2516 $editData[$key]['el'],
2517 $table,
2518 $field,
2519 $row,
2520 $PA,
2521 $formPrefix.'['.$key.'][el]',
2522 $level+1,
2523 $idTagPrefix
2524 ).'
2525 </div>
2526 <input id="'.$idTagPrefix.'-toggleClosed" type="hidden" name="'.htmlspecialchars('data['.$table.']['.$row['uid'].']['.$field.']'.$formPrefix.'[_TOGGLE]').'" value="'.($toggleClosed?1:0).'" />
2527 </div>';
2528 // NOTICE: We are saving the toggle-state directly in the flexForm XML and "unauthorized" according to the data structure. It means that flexform XML will report unclean and a cleaning operation will remove the recorded togglestates. This is not a fatal problem. Ideally we should save the toggle states in meta-data but it is much harder to do that. And this implementation was easy to make and with no really harmful impact.
2529 }
2530
2531 // If it's a "single form element":
2532 } elseif (is_array($value['TCEforms']['config'])) { // Rendering a single form element:
2533
2534 if (is_array($PA['_valLang'])) {
2535 $rotateLang = $PA['_valLang'];
2536 } else {
2537 $rotateLang = array($PA['_valLang']);
2538 }
2539
2540 $tRows = array();
2541 foreach($rotateLang as $vDEFkey) {
2542 $vDEFkey = 'v'.$vDEFkey;
2543
2544 if (!$value['TCEforms']['displayCond'] || $this->isDisplayCondition($value['TCEforms']['displayCond'],$editData,$vDEFkey)) {
2545 $fakePA=array();
2546 $fakePA['fieldConf']=array(
2547 'label' => $this->sL(trim($value['TCEforms']['label'])),
2548 'config' => $value['TCEforms']['config'],
2549 'defaultExtras' => $value['TCEforms']['defaultExtras'],
2550 'onChange' => $value['TCEforms']['onChange']
2551 );
2552 if ($PA['_noEditDEF'] && $PA['_lang']==='lDEF') {
2553 $fakePA['fieldConf']['config'] = array(
2554 'type' => 'none',
2555 'rows' => 2
2556 );
2557 }
2558
2559 if (
2560 $fakePA['fieldConf']['onChange'] == 'reload' ||
2561 ($GLOBALS['TCA'][$table]['ctrl']['type'] && !strcmp($key,$GLOBALS['TCA'][$table]['ctrl']['type'])) ||
2562 ($GLOBALS['TCA'][$table]['ctrl']['requestUpdate'] && t3lib_div::inList($GLOBALS['TCA'][$table]['ctrl']['requestUpdate'],$key))) {
2563 if ($GLOBALS['BE_USER']->jsConfirmation(1)) {
2564 $alertMsgOnChange = 'if (confirm(TBE_EDITOR.labels.onChangeAlert) && TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm() };';
2565 } else {
2566 $alertMsgOnChange = 'if(TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm();}';
2567 }
2568 } else {
2569 $alertMsgOnChange = '';
2570 }
2571
2572 $fakePA['fieldChangeFunc']=$PA['fieldChangeFunc'];
2573 if (strlen($alertMsgOnChange)) {
2574 $fakePA['fieldChangeFunc']['alert']=$alertMsgOnChange;
2575 }
2576 $fakePA['onFocus']=$PA['onFocus'];
2577 $fakePA['label']=$PA['label'];
2578
2579 $fakePA['itemFormElName']=$PA['itemFormElName'].$formPrefix.'['.$key.']['.$vDEFkey.']';
2580 $fakePA['itemFormElName_file']=$PA['itemFormElName_file'].$formPrefix.'['.$key.']['.$vDEFkey.']';
2581
2582 if(isset($editData[$key][$vDEFkey])) {
2583 $fakePA['itemFormElValue']=$editData[$key][$vDEFkey];
2584 } else {
2585 $fakePA['itemFormElValue']=$fakePA['fieldConf']['config']['default'];
2586 }
2587
2588 $theFormEl= $this->getSingleField_SW($table,$field,$row,$fakePA);
2589 $theTitle= htmlspecialchars($fakePA['fieldConf']['label']);
2590
2591 if (!in_array('DEF',$rotateLang)) {
2592 $defInfo = '<div class="typo3-TCEforms-originalLanguageValue">'.$this->getLanguageIcon($table,$row,0).$this->previewFieldValue($editData[$key]['vDEF'], $fakePA['fieldConf']).'&nbsp;</div>';
2593 } else {
2594 $defInfo = '';
2595 }
2596
2597 if (!$PA['_noEditDEF']) {
2598 $prLang = $this->getAdditionalPreviewLanguages();
2599 foreach($prLang as $prL) {
2600 $defInfo.= '<div class="typo3-TCEforms-originalLanguageValue">'.$this->getLanguageIcon($table,$row,'v'.$prL['ISOcode']).$this->previewFieldValue($editData[$key]['v'.$prL['ISOcode']], $fakePA['fieldConf']).'&nbsp;</div>';
2601 }
2602 }
2603
2604 // Put row together
2605 // possible linebreaks in the label through xml: \n => <br/>, usage of nl2br() not possible, so it's done through str_replace
2606 $processedTitle = str_replace('\n', '<br />', $theTitle);
2607 $helpText = $this->helpText_typeFlex($key, $processedTitle, $PA['_cshFile']);
2608 $tRows[]='<div>' .
2609 '<div class="bgColor5">' .
2610 ($helpText ?
2611 ($vDEFkey=='vDEF' ? '' : $this->getLanguageIcon($table, $row, $vDEFkey)) . '<strong>' . $processedTitle . '</strong>' . $helpText :
2612 $this->helpTextIcon_typeFlex($key, $processedTitle, $PA['_cshFile']) . ($vDEFkey == 'vDEF' ? '' : $this->getLanguageIcon($table, $row, $vDEFkey)) . $processedTitle
2613 ) .
2614 '</div>
2615 <div class="bgColor4">'.$theFormEl.$defInfo.$this->renderVDEFDiff($editData[$key],$vDEFkey).'</div>
2616 </div>';
2617 }
2618 }
2619 if (count($tRows)) $output.= implode('',$tRows);
2620 }
2621 }
2622 }
2623 }
2624
2625 return $output;
2626 }
2627
2628 /**
2629 * Handler for unknown types.
2630 *
2631 * @param string The table name of the record
2632 * @param string The field name which this element is supposed to edit
2633 * @param array The record data array where the value(s) for the field can be found
2634 * @param array An array with additional configuration options.
2635 * @return string The HTML code for the TCEform field
2636 */
2637 function getSingleField_typeUnknown($table,$field,$row,&$PA) {
2638 $item='Unknown type: '.$PA['fieldConf']['config']['form_type'].'<br />';
2639
2640 return $item;
2641 }
2642
2643 /**
2644 * User defined field type
2645 *
2646 * @param string The table name of the record
2647 * @param string The field name which this element is supposed to edit
2648 * @param array The record data array where the value(s) for the field can be found
2649 * @param array An array with additional configuration options.
2650 * @return string The HTML code for the TCEform field
2651 */
2652 function getSingleField_typeUser($table,$field,$row,&$PA) {
2653 $PA['table']=$table;
2654 $PA['field']=$field;
2655 $PA['row']=$row;
2656
2657 $PA['pObj']=&$this;
2658
2659 return t3lib_div::callUserFunction($PA['fieldConf']['config']['userFunc'],$PA,$this);
2660 }
2661
2662
2663
2664
2665
2666
2667 /************************************************************
2668 *
2669 * Field content processing
2670 *
2671 ************************************************************/
2672
2673 /**
2674 * Format field content of various types if $config['format'] is set to date, filesize, ..., user
2675 * This is primarily for the field type none but can be used for user field types for example
2676 *
2677 * @param array Configuration for the display
2678 * @param string The value to display
2679 * @return string Formatted Field content
2680 */
2681 function formatValue ($config, $itemValue) {
2682 $format