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