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