f2666cab30701b63af36b4537ed786fb9351a2aa
[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']) {
899 $lTTS_url = $this->backPath.'alt_doc.php?edit['.$table.']['.$row['uid'].']=edit&columnsOnly='.$field.
900 ($PA['fieldTSConfig']['linkTitleToSelf.']['returnUrl']?'&returnUrl='.rawurlencode($this->thisReturnUrl()):'');
901 $PA['label'] = '<a href="'.htmlspecialchars($lTTS_url).'">'.$PA['label'].'</a>';
902 }
903
904 // Create output value:
905 if ($PA['fieldConf']['config']['form_type']=='user' && $PA['fieldConf']['config']['noTableWrapping']) {
906 $out = $item;
907 } elseif ($PA['palette']) {
908 // Array:
909 $out=array(
910 'NAME'=>$PA['label'],
911 'ID'=>$row['uid'],
912 'FIELD'=>$field,
913 'TABLE'=>$table,
914 'ITEM'=>$item,
915 'HELP_ICON' => $this->helpTextIcon($table,$field,1)
916 );
917 $out = $this->addUserTemplateMarkers($out,$table,$field,$row,$PA);
918 } else {
919 // String:
920 $out=array(
921 'NAME'=>$PA['label'],
922 'ITEM'=>$item,
923 'TABLE'=>$table,
924 'ID'=>$row['uid'],
925 'HELP_ICON'=>$this->helpTextIcon($table,$field),
926 'HELP_TEXT'=>$this->helpText($table,$field),
927 'PAL_LINK_ICON'=>$thePalIcon,
928 'FIELD'=>$field
929 );
930 $out = $this->addUserTemplateMarkers($out,$table,$field,$row,$PA);
931 // String:
932 $out=$this->intoTemplate($out);
933 }
934 }
935 } else $this->commentMessages[]=$this->prependFormFieldNames.'['.$table.']['.$row['uid'].']['.$field.']: Disabled by TSconfig';
936 }
937 // Hook: getSingleField_postProcess
938 foreach ($this->hookObjectsSingleField as $hookObj) {
939 if (method_exists($hookObj,'getSingleField_postProcess')) {
940 $hookObj->getSingleField_postProcess($table, $field, $row, $out, $PA, $this);
941 }
942 }
943 // Return value (string or array)
944 return $out;
945 }
946
947 /**
948 * Rendering a single item for the form
949 *
950 * @param string Table name of record
951 * @param string Fieldname to render
952 * @param array The record
953 * @param array parameters array containing a lot of stuff. Value by Reference!
954 * @return string Returns the item as HTML code to insert
955 * @access private
956 * @see getSingleField(), getSingleField_typeFlex_draw()
957 */
958 function getSingleField_SW($table,$field,$row,&$PA) {
959 $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
960
961 switch($PA['fieldConf']['config']['form_type']) {
962 case 'input':
963 $item = $this->getSingleField_typeInput($table,$field,$row,$PA);
964 break;
965 case 'text':
966 $item = $this->getSingleField_typeText($table,$field,$row,$PA);
967 break;
968 case 'check':
969 $item = $this->getSingleField_typeCheck($table,$field,$row,$PA);
970 break;
971 case 'radio':
972 $item = $this->getSingleField_typeRadio($table,$field,$row,$PA);
973 break;
974 case 'select':
975 $item = $this->getSingleField_typeSelect($table,$field,$row,$PA);
976 break;
977 case 'group':
978 $item = $this->getSingleField_typeGroup($table,$field,$row,$PA);
979 break;
980 case 'inline':
981 $item = $this->inline->getSingleField_typeInline($table,$field,$row,$PA);
982 break;
983 case 'none':
984 $item = $this->getSingleField_typeNone($table,$field,$row,$PA);
985 break;
986 case 'user':
987 $item = $this->getSingleField_typeUser($table,$field,$row,$PA);
988 break;
989 case 'flex':
990 $item = $this->getSingleField_typeFlex($table,$field,$row,$PA);
991 break;
992 default:
993 $item = $this->getSingleField_typeUnknown($table,$field,$row,$PA);
994 break;
995 }
996
997 return $item;
998 }
999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018 /**********************************************************
1019 *
1020 * Rendering of each TCEform field type
1021 *
1022 ************************************************************/
1023
1024 /**
1025 * Generation of TCEform elements of the type "input"
1026 * This will render a single-line input form field, possibly with various control/validation features
1027 *
1028 * @param string The table name of the record
1029 * @param string The field name which this element is supposed to edit
1030 * @param array The record data array where the value(s) for the field can be found
1031 * @param array An array with additional configuration options.
1032 * @return string The HTML code for the TCEform field
1033 */
1034 function getSingleField_typeInput($table,$field,$row,&$PA) {
1035 // typo3FormFieldSet(theField, evallist, is_in, checkbox, checkboxValue)
1036 // typo3FormFieldGet(theField, evallist, is_in, checkbox, checkboxValue, checkbox_off)
1037
1038 $config = $PA['fieldConf']['config'];
1039
1040 # $specConf = $this->getSpecConfForField($table,$row,$field);
1041 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1042 $size = t3lib_div::intInRange($config['size']?$config['size']:30,5,$this->maxInputWidth);
1043 $evalList = t3lib_div::trimExplode(',',$config['eval'],1);
1044
1045
1046 if($this->renderReadonly || $config['readOnly']) {
1047 $itemFormElValue = $PA['itemFormElValue'];
1048 if (in_array('date',$evalList)) {
1049 $config['format'] = 'date';
1050 } elseif (in_array('date',$evalList)) {
1051 $config['format'] = 'date';
1052 } elseif (in_array('datetime',$evalList)) {
1053 $config['format'] = 'datetime';
1054 } elseif (in_array('time',$evalList)) {
1055 $config['format'] = 'time';
1056 }
1057 if (in_array('password',$evalList)) {
1058 $itemFormElValue = $itemFormElValue ? '*********' : '';
1059 }
1060 return $this->getSingleField_typeNone_render($config, $itemFormElValue);
1061 }
1062
1063 if (in_array('required',$evalList)) {
1064 $this->requiredFields[$table.'_'.$row['uid'].'_'.$field]=$PA['itemFormElName'];
1065 }
1066
1067 $paramsList = "'".$PA['itemFormElName']."','".implode(',',$evalList)."','".trim($config['is_in'])."',".(isset($config['checkbox'])?1:0).",'".$config['checkbox']."'";
1068 if (isset($config['checkbox'])) {
1069 // Setting default "click-checkbox" values for eval types "date" and "datetime":
1070 $thisMidnight = mktime(0,0,0);
1071 $checkSetValue = in_array('date',$evalList) ? $thisMidnight : '';
1072 $checkSetValue = in_array('datetime',$evalList) ? time() : $checkSetValue;
1073
1074 $cOnClick = 'typo3form.fieldGet('.$paramsList.',1,\''.$checkSetValue.'\');'.implode('',$PA['fieldChangeFunc']);
1075 $item.='<input type="checkbox"'.$this->insertDefStyle('check').' name="'.$PA['itemFormElName'].'_cb" onclick="'.htmlspecialchars($cOnClick).'" />';
1076 }
1077
1078 $PA['fieldChangeFunc'] = array_merge(array('typo3form.fieldGet'=>'typo3form.fieldGet('.$paramsList.');'), $PA['fieldChangeFunc']);
1079 $mLgd = ($config['max']?$config['max']:256);
1080 $iOnChange = implode('',$PA['fieldChangeFunc']);
1081 $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.
1082 $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.
1083 $this->extJSCODE.='typo3form.fieldSet('.$paramsList.');';
1084
1085 // going through all custom evaluations configured for this field
1086 foreach ($evalList as $evalData) {
1087 if (substr($evalData, 0, 3) == 'tx_') {
1088 $evalObj = t3lib_div::getUserObj($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['tce']['formevals'][$evalData].':&'.$evalData);
1089 if(is_object($evalObj) && method_exists($evalObj, 'returnFieldJS')) {
1090 $this->extJSCODE .= "\n\nfunction ".$evalData."(value) {\n".$evalObj->returnFieldJS()."\n}\n";
1091 }
1092 }
1093 }
1094
1095 // Creating an alternative item without the JavaScript handlers.
1096 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'_hr" value="" />';
1097 $altItem.= '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
1098
1099 // Wrap a wizard around the item?
1100 $item= $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'].'_hr',$specConf);
1101
1102 return $item;
1103 }
1104
1105 /**
1106 * Generation of TCEform elements of the type "text"
1107 * This will render a <textarea> OR RTE area form field, possibly with various control/validation features
1108 *
1109 * @param string The table name of the record
1110 * @param string The field name which this element is supposed to edit
1111 * @param array The record data array where the value(s) for the field can be found
1112 * @param array An array with additional configuration options.
1113 * @return string The HTML code for the TCEform field
1114 */
1115 function getSingleField_typeText($table,$field,$row,&$PA) {
1116
1117 // Init config:
1118 $config = $PA['fieldConf']['config'];
1119
1120 if($this->renderReadonly || $config['readOnly']) {
1121 return $this->getSingleField_typeNone_render($config, $PA['itemFormElValue']);
1122 }
1123
1124 // Setting columns number:
1125 $cols = t3lib_div::intInRange($config['cols'] ? $config['cols'] : 30, 5, $this->maxTextareaWidth);
1126
1127 // Setting number of rows:
1128 $origRows = $rows = t3lib_div::intInRange($config['rows'] ? $config['rows'] : 5, 1, 20);
1129 if (strlen($PA['itemFormElValue']) > $this->charsPerRow*2) {
1130 $cols = $this->maxTextareaWidth;
1131 $rows = t3lib_div::intInRange(round(strlen($PA['itemFormElValue'])/$this->charsPerRow), count(explode(chr(10),$PA['itemFormElValue'])), 20);
1132 if ($rows<$origRows) $rows = $origRows;
1133 }
1134
1135 // Init RTE vars:
1136 $RTEwasLoaded = 0; // Set true, if the RTE is loaded; If not a normal textarea is shown.
1137 $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...
1138
1139 // "Extra" configuration; Returns configuration for the field based on settings found in the "types" fieldlist. Traditionally, this is where RTE configuration has been found.
1140 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1141
1142 // Setting up the altItem form field, which is a hidden field containing the value
1143 $altItem = '<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
1144
1145 // If RTE is generally enabled (TYPO3_CONF_VARS and user settings)
1146 if ($this->RTEenabled) {
1147 $p = t3lib_BEfunc::getSpecConfParametersFromArray($specConf['rte_transform']['parameters']);
1148 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.
1149 t3lib_BEfunc::fixVersioningPid($table,$row);
1150 list($tscPID,$thePidValue) = $this->getTSCpid($table,$row['uid'],$row['pid']);
1151
1152 // If the pid-value is not negative (that is, a pid could NOT be fetched)
1153 if ($thePidValue >= 0) {
1154 $RTEsetup = $GLOBALS['BE_USER']->getTSConfig('RTE',t3lib_BEfunc::getPagesTSconfig($tscPID));
1155 $RTEtypeVal = t3lib_BEfunc::getTCAtypeValue($table,$row);
1156 $thisConfig = t3lib_BEfunc::RTEsetup($RTEsetup['properties'],$table,$field,$RTEtypeVal);
1157
1158 if (!$thisConfig['disabled']) {
1159 if (!$this->disableRTE) {
1160 $this->RTEcounter++;
1161
1162 // Find alternative relative path for RTE images/links:
1163 $eFile = t3lib_parsehtml_proc::evalWriteFile($specConf['static_write'], $row);
1164 $RTErelPath = is_array($eFile) ? dirname($eFile['relEditFile']) : '';
1165
1166 // Get RTE object, draw form and set flag:
1167 $RTEobj = &t3lib_BEfunc::RTEgetObj();
1168 $item = $RTEobj->drawRTE($this,$table,$field,$row,$PA,$specConf,$thisConfig,$RTEtypeVal,$RTErelPath,$thePidValue);
1169
1170 // Wizard:
1171 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf,1);
1172
1173 $RTEwasLoaded = 1;
1174 } else {
1175 $RTEwouldHaveBeenLoaded = 1;
1176 $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!)';
1177 }
1178 } else $this->commentMessages[] = $PA['itemFormElName'].': RTE is disabled by the Page TSconfig, "RTE"-key (eg. by RTE.default.disabled=0 or such)';
1179 } else $this->commentMessages[] = $PA['itemFormElName'].': PID value could NOT be fetched. Rare error, normally with new records.';
1180 } else {
1181 if (!isset($specConf['richtext'])) $this->commentMessages[] = $PA['itemFormElName'].': RTE was not configured for this field in TCA-types';
1182 if (!(!$p['flag'] || !$row[$p['flag']])) $this->commentMessages[] = $PA['itemFormElName'].': Field-flag ('.$PA['flag'].') has been set to disable RTE!';
1183 }
1184 }
1185
1186 // Display ordinary field if RTE was not loaded.
1187 if (!$RTEwasLoaded) {
1188 if ($specConf['rte_only']) { // Show message, if no RTE (field can only be edited with RTE!)
1189 $item = '<p><em>'.htmlspecialchars($this->getLL('l_noRTEfound')).'</em></p>';
1190 } else {
1191 if ($specConf['nowrap']) {
1192 $wrap = 'off';
1193 } else {
1194 $wrap = ($config['wrap'] ? $config['wrap'] : 'virtual');
1195 }
1196
1197 $classes = array();
1198 if ($specConf['fixed-font']) { $classes[] = 'fixed-font'; }
1199 if ($specConf['enable-tab']) { $classes[] = 'enable-tab'; }
1200
1201 $formWidthText = $this->formWidthText($cols,$wrap);
1202
1203 // Extract class attributes from $formWidthText (otherwise it would be added twice to the output)
1204 if (preg_match('/ class="(.+?)"/',$formWidthText,$res)) {
1205 $formWidthText = str_replace(' class="'.$res[1].'"','',$formWidthText);
1206 $classes = array_merge($classes, explode(' ',$res[1]));
1207 }
1208
1209 if (count($classes)) {
1210 $class = ' class="'.implode(' ',$classes).'"';
1211 } else $class='';
1212
1213 $iOnChange = implode('',$PA['fieldChangeFunc']);
1214 $item.= '
1215 <textarea name="'.$PA['itemFormElName'].'"'.$formWidthText.$class.' rows="'.$rows.'" wrap="'.$wrap.'" onchange="'.htmlspecialchars($iOnChange).'"'.$PA['onFocus'].'>'.
1216 t3lib_div::formatForTextarea($PA['itemFormElValue']).
1217 '</textarea>';
1218 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf,$RTEwouldHaveBeenLoaded);
1219 }
1220 }
1221
1222 // Return field HTML:
1223 return $item;
1224 }
1225
1226 /**
1227 * Generation of TCEform elements of the type "check"
1228 * This will render a check-box OR an array of checkboxes
1229 *
1230 * @param string The table name of the record
1231 * @param string The field name which this element is supposed to edit
1232 * @param array The record data array where the value(s) for the field can be found
1233 * @param array An array with additional configuration options.
1234 * @return string The HTML code for the TCEform field
1235 */
1236 function getSingleField_typeCheck($table,$field,$row,&$PA) {
1237 $config = $PA['fieldConf']['config'];
1238
1239 $disabled = '';
1240 if($this->renderReadonly || $config['readOnly']) {
1241 $disabled = ' disabled="disabled"';
1242 }
1243
1244 // Traversing the array of items:
1245 $selItems = $this->initItemArray($PA['fieldConf']);
1246 if ($config['itemsProcFunc']) $selItems = $this->procItems($selItems,$PA['fieldTSConfig']['itemsProcFunc.'],$config,$table,$row,$field);
1247
1248 if (!count($selItems)) {
1249 $selItems[]=array('','');
1250 }
1251 $thisValue = intval($PA['itemFormElValue']);
1252
1253 $cols = intval($config['cols']);
1254 if ($cols > 1) {
1255 $item.= '<table border="0" cellspacing="0" cellpadding="0" class="typo3-TCEforms-checkboxArray">';
1256 for ($c=0;$c<count($selItems);$c++) {
1257 $p = $selItems[$c];
1258 if(!($c%$cols)) { $item.='<tr>'; }
1259 $cBP = $this->checkBoxParams($PA['itemFormElName'],$thisValue,$c,count($selItems),implode('',$PA['fieldChangeFunc']));
1260 $cBName = $PA['itemFormElName'].'_'.$c;
1261 $cBID = $PA['itemFormElID'].'_'.$c;
1262 $item.= '<td nowrap="nowrap">'.
1263 '<input type="checkbox"'.$this->insertDefStyle('check').' value="1" name="'.$cBName.'"'.$cBP.$disabled.' id="'.$cBID.'" />'.
1264 $this->wrapLabels('<label for="'.$cBID.'">'.htmlspecialchars($p[0]).'</label>&nbsp;').
1265 '</td>';
1266 if(($c%$cols)+1==$cols) {$item.='</tr>';}
1267 }
1268 if ($c%$cols) {
1269 $rest=$cols-($c%$cols);
1270 for ($c=0;$c<$rest;$c++) {
1271 $item.= '<td></td>';
1272 }
1273 if ($c>0) { $item.= '</tr>'; }
1274 }
1275 $item.= '</table>';
1276 } else {
1277 for ($c=0;$c<count($selItems);$c++) {
1278 $p = $selItems[$c];
1279 $cBP = $this->checkBoxParams($PA['itemFormElName'],$thisValue,$c,count($selItems),implode('',$PA['fieldChangeFunc']));
1280 $cBName = $PA['itemFormElName'].'_'.$c;
1281 $cBID = $PA['itemFormElID'].'_'.$c;
1282 $item.= ($c>0?'<br />':'').
1283 '<input type="checkbox"'.$this->insertDefStyle('check').' value="1" name="'.$cBName.'"'.$cBP.$PA['onFocus'].$disabled.' id="'.$cBID.'" />'.
1284 htmlspecialchars($p[0]);
1285 }
1286 }
1287 if (!$disabled) {
1288 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($thisValue).'" />';
1289 }
1290
1291 return $item;
1292 }
1293
1294 /**
1295 * Generation of TCEform elements of the type "radio"
1296 * This will render a series of radio buttons.
1297 *
1298 * @param string The table name of the record
1299 * @param string The field name which this element is supposed to edit
1300 * @param array The record data array where the value(s) for the field can be found
1301 * @param array An array with additional configuration options.
1302 * @return string The HTML code for the TCEform field
1303 */
1304 function getSingleField_typeRadio($table,$field,$row,&$PA) {
1305 $config = $PA['fieldConf']['config'];
1306
1307 $disabled = '';
1308 if($this->renderReadonly || $config['readOnly']) {
1309 $disabled = ' disabled="disabled"';
1310 }
1311
1312 // Get items for the array:
1313 $selItems = $this->initItemArray($PA['fieldConf']);
1314 if ($config['itemsProcFunc']) $selItems = $this->procItems($selItems,$PA['fieldTSConfig']['itemsProcFunc.'],$config,$table,$row,$field);
1315
1316 // Traverse the items, making the form elements:
1317 for ($c=0;$c<count($selItems);$c++) {
1318 $p = $selItems[$c];
1319 $rID = $PA['itemFormElID'].'_'.$c;
1320 $rOnClick = implode('',$PA['fieldChangeFunc']);
1321 $rChecked = (!strcmp($p[1],$PA['itemFormElValue'])?' checked="checked"':'');
1322 $item.= '<input type="radio"'.$this->insertDefStyle('radio').' name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($p[1]).'" onclick="'.htmlspecialchars($rOnClick).'"'.$rChecked.$PA['onFocus'].$disabled.' id="'.$rID.'" />
1323 <label for="'.$rID.'">'.htmlspecialchars($p[0]).'</label>
1324 <br />';
1325 }
1326
1327 return $item;
1328 }
1329
1330 /**
1331 * Generation of TCEform elements of the type "select"
1332 * This will render a selector box element, or possibly a special construction with two selector boxes. That depends on configuration.
1333 *
1334 * @param string The table name of the record
1335 * @param string The field name which this element is supposed to edit
1336 * @param array The record data array where the value(s) for the field can be found
1337 * @param array An array with additional configuration options.
1338 * @return string The HTML code for the TCEform field
1339 */
1340 function getSingleField_typeSelect($table,$field,$row,&$PA) {
1341 global $TCA;
1342
1343 // Field configuration from TCA:
1344 $config = $PA['fieldConf']['config'];
1345
1346 $disabled = '';
1347 if($this->renderReadonly || $config['readOnly']) {
1348 $disabled = ' disabled="disabled"';
1349 }
1350
1351 // "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/.
1352 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1353
1354 // Getting the selector box items from the system
1355 $selItems = $this->addSelectOptionsToItemArray($this->initItemArray($PA['fieldConf']),$PA['fieldConf'],$this->setTSconfig($table,$row),$field);
1356 $selItems = $this->addItems($selItems,$PA['fieldTSConfig']['addItems.']);
1357 if ($config['itemsProcFunc']) $selItems = $this->procItems($selItems,$PA['fieldTSConfig']['itemsProcFunc.'],$config,$table,$row,$field);
1358
1359 // Possibly remove some items:
1360 $removeItems = t3lib_div::trimExplode(',',$PA['fieldTSConfig']['removeItems'],1);
1361 foreach($selItems as $tk => $p) {
1362
1363 // Checking languages and authMode:
1364 $languageDeny = $TCA[$table]['ctrl']['languageField'] && !strcmp($TCA[$table]['ctrl']['languageField'], $field) && !$GLOBALS['BE_USER']->checkLanguageAccess($p[1]);
1365 $authModeDeny = $config['form_type']=='select' && $config['authMode'] && !$GLOBALS['BE_USER']->checkAuthMode($table,$field,$p[1],$config['authMode']);
1366 if (in_array($p[1],$removeItems) || $languageDeny || $authModeDeny) {
1367 unset($selItems[$tk]);
1368 } elseif (isset($PA['fieldTSConfig']['altLabels.'][$p[1]])) {
1369 $selItems[$tk][0]=$this->sL($PA['fieldTSConfig']['altLabels.'][$p[1]]);
1370 }
1371
1372 // Removing doktypes with no access:
1373 if ($table.'.'.$field == 'pages.doktype') {
1374 if (!($GLOBALS['BE_USER']->isAdmin() || t3lib_div::inList($GLOBALS['BE_USER']->groupData['pagetypes_select'],$p[1]))) {
1375 unset($selItems[$tk]);
1376 }
1377 }
1378 }
1379
1380 // Creating the label for the "No Matching Value" entry.
1381 $nMV_label = isset($PA['fieldTSConfig']['noMatchingValue_label']) ? $this->sL($PA['fieldTSConfig']['noMatchingValue_label']) : '[ '.$this->getLL('l_noMatchingValue').' ]';
1382
1383 // Prepare some values:
1384 $maxitems = intval($config['maxitems']);
1385
1386 // If a SINGLE selector box...
1387 if ($maxitems<=1) {
1388 $item = $this->getSingleField_typeSelect_single($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1389 } elseif (!strcmp($config['renderMode'],'checkbox')) { // Checkbox renderMode
1390 $item = $this->getSingleField_typeSelect_checkbox($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1391 } elseif (!strcmp($config['renderMode'],'singlebox')) { // Single selector box renderMode
1392 $item = $this->getSingleField_typeSelect_singlebox($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1393 } else { // Traditional multiple selector box:
1394 $item = $this->getSingleField_typeSelect_multiple($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1395 }
1396
1397 // Wizards:
1398 if (!$disabled) {
1399 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
1400 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf);
1401 }
1402
1403 return $item;
1404 }
1405
1406 /**
1407 * Creates a single-selector box
1408 * (Render function for getSingleField_typeSelect())
1409 *
1410 * @param string See getSingleField_typeSelect()
1411 * @param string See getSingleField_typeSelect()
1412 * @param array See getSingleField_typeSelect()
1413 * @param array See getSingleField_typeSelect()
1414 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1415 * @param array Items available for selection
1416 * @param string Label for no-matching-value
1417 * @return string The HTML code for the item
1418 * @see getSingleField_typeSelect()
1419 */
1420 function getSingleField_typeSelect_single($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1421 // check against inline uniqueness
1422 $inlineParent = $this->inline->getStructureLevel(-1);
1423 if(is_array($inlineParent) && $inlineParent['uid']) {
1424 if ($inlineParent['config']['foreign_table'] == $table && $inlineParent['config']['foreign_unique'] == $field) {
1425 $uniqueIds = $this->inline->inlineData['unique'][$this->inline->inlineNames['object'].'['.$table.']']['used'];
1426 $PA['fieldChangeFunc']['inlineUnique'] = "inline.updateUnique(this,'".$this->inline->inlineNames['object'].'['.$table."]','".$this->inline->inlineNames['form']."','".$row['uid']."');";
1427 }
1428 // hide uid of parent record for symmetric relations
1429 if ($inlineParent['config']['foreign_table'] == $table && ($inlineParent['config']['foreign_field'] == $field || $inlineParent['config']['symmetric_field'] == $field)) {
1430 $uniqueIds[] = $inlineParent['uid'];
1431 }
1432 }
1433
1434 // Initialization:
1435 $c = 0;
1436 $sI = 0;
1437 $noMatchingValue = 1;
1438 $opt = array();
1439 $selicons = array();
1440 $onlySelectedIconShown = 0;
1441 $size = intval($config['size']);
1442
1443 $disabled = '';
1444 if($this->renderReadonly || $config['readOnly']) {
1445 $disabled = ' disabled="disabled"';
1446 $onlySelectedIconShown = 1;
1447 }
1448
1449 // Icon configuration:
1450 if ($config['suppress_icons']=='IF_VALUE_FALSE') {
1451 $suppressIcons = !$PA['itemFormElValue'] ? 1 : 0;
1452 } elseif ($config['suppress_icons']=='ONLY_SELECTED') {
1453 $suppressIcons=0;
1454 $onlySelectedIconShown=1;
1455 } elseif ($config['suppress_icons']) {
1456 $suppressIcons = 1;
1457 } else $suppressIcons = 0;
1458
1459 // Traverse the Array of selector box items:
1460 foreach($selItems as $p) {
1461 $sM = (!strcmp($PA['itemFormElValue'],$p[1])?' selected="selected"':'');
1462 if ($sM) {
1463 $sI = $c;
1464 $noMatchingValue = 0;
1465 }
1466
1467 // Getting style attribute value (for icons):
1468 if ($config['iconsInOptionTags']) {
1469 $styleAttrValue = $this->optionTagStyle($p[2]);
1470 }
1471
1472 // Compiling the <option> tag:
1473 if (!($p[1] != $PA['itemFormElValue'] && is_array($uniqueIds) && in_array($p[1], $uniqueIds))) {
1474 $opt[]= '<option value="'.htmlspecialchars($p[1]).'"'.
1475 $sM.
1476 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1477 (!strcmp($p[1],'--div--') ? ' class="c-divider"' : '').
1478 '>'.t3lib_div::deHSCentities(htmlspecialchars($p[0])).'</option>';
1479 }
1480
1481 // If there is an icon for the selector box (rendered in table under)...:
1482 if ($p[2] && !$suppressIcons && (!$onlySelectedIconShown || $sM)) {
1483 list($selIconFile,$selIconInfo)=$this->getIcon($p[2]);
1484 $iOnClick = $this->elName($PA['itemFormElName']).'.selectedIndex='.$c.'; '.implode('',$PA['fieldChangeFunc']).$this->blur().'return false;';
1485 $selicons[]=array(
1486 (!$onlySelectedIconShown ? '<a href="#" onclick="'.htmlspecialchars($iOnClick).'">' : '').
1487 '<img src="'.$selIconFile.'" '.$selIconInfo[3].' vspace="2" border="0" title="'.htmlspecialchars($p[0]).'" alt="'.htmlspecialchars($p[0]).'" />'.
1488 (!$onlySelectedIconShown ? '</a>' : ''),
1489 $c,$sM);
1490 }
1491 $c++;
1492 }
1493
1494 // No-matching-value:
1495 if ($PA['itemFormElValue'] && $noMatchingValue && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1496 $nMV_label = @sprintf($nMV_label, $PA['itemFormElValue']);
1497 $opt[]= '<option value="'.htmlspecialchars($PA['itemFormElValue']).'" selected="selected">'.htmlspecialchars($nMV_label).'</option>';
1498 }
1499
1500 // Create item form fields:
1501 $sOnChange = 'if (this.options[this.selectedIndex].value==\'--div--\') {this.selectedIndex='.$sI.';} '.implode('',$PA['fieldChangeFunc']);
1502 if(!$disabled) {
1503 $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...
1504 }
1505 $item.= '<select name="'.$PA['itemFormElName'].'"'.
1506 $this->insertDefStyle('select').
1507 ($size?' size="'.$size.'"':'').
1508 ' onchange="'.htmlspecialchars($sOnChange).'"'.
1509 $PA['onFocus'].$disabled.'>';
1510 $item.= implode('',$opt);
1511 $item.= '</select>';
1512
1513 // Create icon table:
1514 if (count($selicons)) {
1515 $item.='<table border="0" cellpadding="0" cellspacing="0" class="typo3-TCEforms-selectIcons">';
1516 $selicon_cols = intval($config['selicon_cols']);
1517 if (!$selicon_cols) $selicon_cols=count($selicons);
1518 $sR = ceil(count($selicons)/$selicon_cols);
1519 $selicons = array_pad($selicons,$sR*$selicon_cols,'');
1520 for($sa=0;$sa<$sR;$sa++) {
1521 $item.='<tr>';
1522 for($sb=0;$sb<$selicon_cols;$sb++) {
1523 $sk=($sa*$selicon_cols+$sb);
1524 $imgN = 'selIcon_'.$table.'_'.$row['uid'].'_'.$field.'_'.$selicons[$sk][1];
1525 $imgS = ($selicons[$sk][2]?$this->backPath.'gfx/content_selected.gif':'clear.gif');
1526 $item.='<td><img name="'.htmlspecialchars($imgN).'" src="'.$imgS.'" width="7" height="10" alt="" /></td>';
1527 $item.='<td>'.$selicons[$sk][0].'</td>';
1528 }
1529 $item.='</tr>';
1530 }
1531 $item.='</table>';
1532 }
1533
1534 return $item;
1535 }
1536
1537 /**
1538 * Creates a checkbox list (renderMode = "checkbox")
1539 * (Render function for getSingleField_typeSelect())
1540 *
1541 * @param string See getSingleField_typeSelect()
1542 * @param string See getSingleField_typeSelect()
1543 * @param array See getSingleField_typeSelect()
1544 * @param array See getSingleField_typeSelect()
1545 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1546 * @param array Items available for selection
1547 * @param string Label for no-matching-value
1548 * @return string The HTML code for the item
1549 * @see getSingleField_typeSelect()
1550 */
1551 function getSingleField_typeSelect_checkbox($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1552
1553 // Get values in an array (and make unique, which is fine because there can be no duplicates anyway):
1554 $itemArray = array_flip($this->extractValuesOnlyFromValueLabelList($PA['itemFormElValue']));
1555
1556 $disabled = '';
1557 if($this->renderReadonly || $config['readOnly']) {
1558 $disabled = ' disabled="disabled"';
1559 }
1560
1561 // Traverse the Array of selector box items:
1562 $tRows = array();
1563 $c=0;
1564 if (!$disabled) {
1565 $sOnChange = implode('',$PA['fieldChangeFunc']);
1566 $setAll = array(); // Used to accumulate the JS needed to restore the original selection.
1567 foreach($selItems as $p) {
1568 // Non-selectable element:
1569 if (!strcmp($p[1],'--div--')) {
1570 if (count($setAll)) {
1571 $tRows[] = '
1572 <tr>
1573 <td colspan="2">'.
1574 '<a href="#" onclick="'.htmlspecialchars(implode('',$setAll).' return false;').'">'.
1575 htmlspecialchars($this->getLL('l_setAllCheckboxes')).
1576 '</a></td>
1577 </tr>';
1578 $setAll = array();
1579 }
1580
1581 $tRows[] = '
1582 <tr class="c-header">
1583 <td colspan="2">'.htmlspecialchars($p[0]).'</td>
1584 </tr>';
1585 } else {
1586 // Selected or not by default:
1587 $sM = '';
1588 if (isset($itemArray[$p[1]])) {
1589 $sM = ' checked="checked"';
1590 unset($itemArray[$p[1]]);
1591 }
1592
1593 // Icon:
1594 $selIconFile = '';
1595 if ($p[2]) {
1596 list($selIconFile,$selIconInfo) = $this->getIcon($p[2]);
1597 }
1598
1599 // Compile row:
1600 $onClickCell = $this->elName($PA['itemFormElName'].'['.$c.']').'.checked=!'.$this->elName($PA['itemFormElName'].'['.$c.']').'.checked;';
1601 $onClick = 'this.attributes.getNamedItem("class").nodeValue = '.$this->elName($PA['itemFormElName'].'['.$c.']').'.checked ? "c-selectedItem" : "";';
1602 $setAll[] = $this->elName($PA['itemFormElName'].'['.$c.']').'.checked=1;';
1603 $tRows[] = '
1604 <tr class="'.($sM ? 'c-selectedItem' : '').'" onclick="'.htmlspecialchars($onClick).'" style="cursor: pointer;">
1605 <td><input type="checkbox"'.$this->insertDefStyle('check').' name="'.htmlspecialchars($PA['itemFormElName'].'['.$c.']').'" value="'.htmlspecialchars($p[1]).'"'.$sM.' onclick="'.htmlspecialchars($sOnChange).'"'.$PA['onFocus'].' /></td>
1606 <td class="c-labelCell" onclick="'.htmlspecialchars($onClickCell).'">'.
1607 ($selIconFile ? '<img src="'.$selIconFile.'" '.$selIconInfo[3].' vspace="2" border="0" class="absmiddle" style="margin-right: 4px;" alt="" />' : '').
1608 t3lib_div::deHSCentities(htmlspecialchars($p[0])).
1609 (strcmp($p[3],'') ? '<br/><p class="c-descr">'.nl2br(trim(htmlspecialchars($p[3]))).'</p>' : '').
1610 '</td>
1611 </tr>';
1612 $c++;
1613 }
1614 }
1615
1616 // Remaining checkboxes will get their set-all link:
1617 if (count($setAll)) {
1618 $tRows[] = '
1619 <tr>
1620 <td colspan="2">'.
1621 '<a href="#" onclick="'.htmlspecialchars(implode('',$setAll).' return false;').'">'.
1622 htmlspecialchars($this->getLL('l_setAllCheckboxes')).
1623 '</a></td>
1624 </tr>';
1625 }
1626 }
1627
1628 // Remaining values (invalid):
1629 if (count($itemArray) && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1630 foreach($itemArray as $theNoMatchValue => $temp) {
1631 // Compile <checkboxes> tag:
1632 array_unshift($tRows,'
1633 <tr class="c-invalidItem">
1634 <td><input type="checkbox"'.$this->insertDefStyle('check').' name="'.htmlspecialchars($PA['itemFormElName'].'['.$c.']').'" value="'.htmlspecialchars($theNoMatchValue).'" checked="checked" onclick="'.htmlspecialchars($sOnChange).'"'.$PA['onFocus'].$disabled.' /></td>
1635 <td class="c-labelCell">'.
1636 t3lib_div::deHSCentities(htmlspecialchars(@sprintf($nMV_label, $theNoMatchValue))).
1637 '</td>
1638 </tr>');
1639 $c++;
1640 }
1641 }
1642
1643 // Add an empty hidden field which will send a blank value if all items are unselected.
1644 $item.='<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="" />';
1645
1646 // Implode rows in table:
1647 $item.= '
1648 <table border="0" cellpadding="0" cellspacing="0" class="typo3-TCEforms-select-checkbox">'.
1649 implode('',$tRows).'
1650 </table>
1651 ';
1652
1653 return $item;
1654 }
1655
1656 /**
1657 * Creates a selectorbox list (renderMode = "singlebox")
1658 * (Render function for getSingleField_typeSelect())
1659 *
1660 * @param string See getSingleField_typeSelect()
1661 * @param string See getSingleField_typeSelect()
1662 * @param array See getSingleField_typeSelect()
1663 * @param array See getSingleField_typeSelect()
1664 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1665 * @param array Items available for selection
1666 * @param string Label for no-matching-value
1667 * @return string The HTML code for the item
1668 * @see getSingleField_typeSelect()
1669 */
1670 function getSingleField_typeSelect_singlebox($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1671
1672 // Get values in an array (and make unique, which is fine because there can be no duplicates anyway):
1673 $itemArray = array_flip($this->extractValuesOnlyFromValueLabelList($PA['itemFormElValue']));
1674
1675 $disabled = '';
1676 if($this->renderReadonly || $config['readOnly']) {
1677 $disabled = ' disabled="disabled"';
1678 }
1679
1680 // Traverse the Array of selector box items:
1681 $opt = array();
1682 $restoreCmd = array(); // Used to accumulate the JS needed to restore the original selection.
1683 $c = 0;
1684 foreach($selItems as $p) {
1685 // Selected or not by default:
1686 $sM = '';
1687 if (isset($itemArray[$p[1]])) {
1688 $sM = ' selected="selected"';
1689 $restoreCmd[] = $this->elName($PA['itemFormElName'].'[]').'.options['.$c.'].selected=1;';
1690 unset($itemArray[$p[1]]);
1691 }
1692
1693 // Non-selectable element:
1694 $nonSel = '';
1695 if (!strcmp($p[1],'--div--')) {
1696 $nonSel = ' onclick="this.selected=0;" class="c-divider"';
1697 }
1698
1699 // Icon style for option tag:
1700 if ($config['iconsInOptionTags']) {
1701 $styleAttrValue = $this->optionTagStyle($p[2]);
1702 }
1703
1704 // Compile <option> tag:
1705 $opt[] = '<option value="'.htmlspecialchars($p[1]).'"'.
1706 $sM.
1707 $nonSel.
1708 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1709 '>'.t3lib_div::deHSCentities(htmlspecialchars($p[0])).'</option>';
1710 $c++;
1711 }
1712
1713 // Remaining values:
1714 if (count($itemArray) && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1715 foreach($itemArray as $theNoMatchValue => $temp) {
1716 // Compile <option> tag:
1717 array_unshift($opt,'<option value="'.htmlspecialchars($theNoMatchValue).'" selected="selected">'.t3lib_div::deHSCentities(htmlspecialchars(@sprintf($nMV_label, $theNoMatchValue))).'</option>');
1718 }
1719 }
1720
1721 // Compile selector box:
1722 $sOnChange = implode('',$PA['fieldChangeFunc']);
1723 $selector_itemListStyle = isset($config['itemListStyle']) ? ' style="'.htmlspecialchars($config['itemListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"';
1724 $size = intval($config['size']);
1725 $size = $config['autoSizeMax'] ? t3lib_div::intInRange(count($selItems)+1,t3lib_div::intInRange($size,1),$config['autoSizeMax']) : $size;
1726 $selectBox = '<select name="'.$PA['itemFormElName'].'[]"'.
1727 $this->insertDefStyle('select').
1728 ($size ? ' size="'.$size.'"' : '').
1729 ' multiple="multiple" onchange="'.htmlspecialchars($sOnChange).'"'.
1730 $PA['onFocus'].
1731 $selector_itemListStyle.
1732 $disabled.'>
1733 '.
1734 implode('
1735 ',$opt).'
1736 </select>';
1737
1738 // Add an empty hidden field which will send a blank value if all items are unselected.
1739 if (!$disabled) {
1740 $item.='<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="" />';
1741 }
1742
1743 // Put it all into a table:
1744 $item.= '
1745 <table border="0" cellspacing="0" cellpadding="0" width="1" class="typo3-TCEforms-select-singlebox">
1746 <tr>
1747 <td>
1748 '.$selectBox.'
1749 <br/>
1750 <em>'.
1751 htmlspecialchars($this->getLL('l_holdDownCTRL')).
1752 '</em>
1753 </td>
1754 <td valign="top">
1755 <a href="#" onclick="'.htmlspecialchars($this->elName($PA['itemFormElName'].'[]').'.selectedIndex=-1;'.implode('',$restoreCmd).' return false;').'">'.
1756 '<img'.t3lib_iconWorks::skinImg($this->backPath,'gfx/history.gif','width="13" height="12"').' title="'.htmlspecialchars($this->getLL('l_revertSelection')).'" alt="" />'.
1757 '</a>
1758 </td>
1759 </tr>
1760 </table>
1761 ';
1762
1763 return $item;
1764 }
1765
1766 /**
1767 * Creates a multiple-selector box (two boxes, side-by-side)
1768 * (Render function for getSingleField_typeSelect())
1769 *
1770 * @param string See getSingleField_typeSelect()
1771 * @param string See getSingleField_typeSelect()
1772 * @param array See getSingleField_typeSelect()
1773 * @param array See getSingleField_typeSelect()
1774 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1775 * @param array Items available for selection
1776 * @param string Label for no-matching-value
1777 * @return string The HTML code for the item
1778 * @see getSingleField_typeSelect()
1779 */
1780 function getSingleField_typeSelect_multiple($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1781
1782 $disabled = '';
1783 if($this->renderReadonly || $config['readOnly']) {
1784 $disabled = ' disabled="disabled"';
1785 }
1786
1787 // Setting this hidden field (as a flag that JavaScript can read out)
1788 if (!$disabled) {
1789 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'_mul" value="'.($config['multiple']?1:0).'" />';
1790 }
1791
1792 // Set max and min items:
1793 $maxitems = t3lib_div::intInRange($config['maxitems'],0);
1794 if (!$maxitems) $maxitems=100000;
1795 $minitems = t3lib_div::intInRange($config['minitems'],0);
1796
1797 // Register the required number of elements:
1798 $this->requiredElements[$PA['itemFormElName']] = array($minitems,$maxitems,'imgName'=>$table.'_'.$row['uid'].'_'.$field);
1799
1800 // Get "removeItems":
1801 $removeItems = t3lib_div::trimExplode(',',$PA['fieldTSConfig']['removeItems'],1);
1802
1803 // Perform modification of the selected items array:
1804 $itemArray = t3lib_div::trimExplode(',',$PA['itemFormElValue'],1);
1805 foreach($itemArray as $tk => $tv) {
1806 $tvP = explode('|',$tv,2);
1807 $evalValue = rawurldecode($tvP[0]);
1808 $isRemoved = in_array($evalValue,$removeItems) || ($config['form_type']=='select' && $config['authMode'] && !$GLOBALS['BE_USER']->checkAuthMode($table,$field,$evalValue,$config['authMode']));
1809 if ($isRemoved && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1810 $tvP[1] = rawurlencode(@sprintf($nMV_label, $evalValue));
1811 } elseif (isset($PA['fieldTSConfig']['altLabels.'][$evalValue])) {
1812 $tvP[1] = rawurlencode($this->sL($PA['fieldTSConfig']['altLabels.'][$evalValue]));
1813 }
1814 $itemArray[$tk] = implode('|',$tvP);
1815 }
1816 $itemsToSelect = '';
1817
1818 if(!$disabled) {
1819 // Create option tags:
1820 $opt = array();
1821 $styleAttrValue = '';
1822 foreach($selItems as $p) {
1823 if ($config['iconsInOptionTags']) {
1824 $styleAttrValue = $this->optionTagStyle($p[2]);
1825 }
1826 $opt[]= '<option value="'.htmlspecialchars($p[1]).'"'.
1827 ($styleAttrValue ? ' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1828 '>'.htmlspecialchars($p[0]).'</option>';
1829 }
1830
1831 // Put together the selector box:
1832 $selector_itemListStyle = isset($config['itemListStyle']) ? ' style="'.htmlspecialchars($config['itemListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"';
1833 $size = intval($config['size']);
1834 $size = $config['autoSizeMax'] ? t3lib_div::intInRange(count($itemArray)+1,t3lib_div::intInRange($size,1),$config['autoSizeMax']) : $size;
1835 if ($config['exclusiveKeys']) {
1836 $sOnChange = 'setFormValueFromBrowseWin(\''.$PA['itemFormElName'].'\',this.options[this.selectedIndex].value,this.options[this.selectedIndex].text,\''.$config['exclusiveKeys'].'\'); ';
1837 } else {
1838 $sOnChange = 'setFormValueFromBrowseWin(\''.$PA['itemFormElName'].'\',this.options[this.selectedIndex].value,this.options[this.selectedIndex].text); ';
1839 }
1840 $sOnChange .= implode('',$PA['fieldChangeFunc']);
1841 $itemsToSelect = '
1842 <select name="'.$PA['itemFormElName'].'_sel"'.
1843 $this->insertDefStyle('select').
1844 ($size ? ' size="'.$size.'"' : '').
1845 ' onchange="'.htmlspecialchars($sOnChange).'"'.
1846 $PA['onFocus'].
1847 $selector_itemListStyle.'>
1848 '.implode('
1849 ',$opt).'
1850 </select>';
1851 }
1852
1853 // Pass to "dbFileIcons" function:
1854 $params = array(
1855 'size' => $size,
1856 'autoSizeMax' => t3lib_div::intInRange($config['autoSizeMax'],0),
1857 'style' => isset($config['selectedListStyle']) ? ' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"',
1858 'dontShowMoveIcons' => ($maxitems<=1),
1859 'maxitems' => $maxitems,
1860 'info' => '',
1861 'headers' => array(
1862 'selector' => $this->getLL('l_selected').':<br />',
1863 'items' => $this->getLL('l_items').':<br />'
1864 ),
1865 'noBrowser' => 1,
1866 'thumbnails' => $itemsToSelect,
1867 'readOnly' => $disabled
1868 );
1869 $item.= $this->dbFileIcons($PA['itemFormElName'],'','',$itemArray,'',$params,$PA['onFocus']);
1870
1871 return $item;
1872 }
1873
1874 /**
1875 * Generation of TCEform elements of the type "group"
1876 * This will render a selectorbox into which elements from either the file system or database can be inserted. Relations.
1877 *
1878 * @param string The table name of the record
1879 * @param string The field name which this element is supposed to edit
1880 * @param array The record data array where the value(s) for the field can be found
1881 * @param array An array with additional configuration options.
1882 * @return string The HTML code for the TCEform field
1883 */
1884 function getSingleField_typeGroup($table,$field,$row,&$PA) {
1885 // Init:
1886 $config = $PA['fieldConf']['config'];
1887 $internal_type = $config['internal_type'];
1888 $show_thumbs = $config['show_thumbs'];
1889 $size = intval($config['size']);
1890 $maxitems = t3lib_div::intInRange($config['maxitems'],0);
1891 if (!$maxitems) $maxitems=100000;
1892 $minitems = t3lib_div::intInRange($config['minitems'],0);
1893 $allowed = $config['allowed'];
1894 $disallowed = $config['disallowed'];
1895
1896 $disabled = '';
1897 if($this->renderReadonly || $config['readOnly']) {
1898 $disabled = ' disabled="disabled"';
1899 }
1900
1901 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'_mul" value="'.($config['multiple']?1:0).'"'.$disabled.' />';
1902 $this->requiredElements[$PA['itemFormElName']] = array($minitems,$maxitems,'imgName'=>$table.'_'.$row['uid'].'_'.$field);
1903 $info='';
1904
1905 // "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/.
1906 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1907
1908 // Acting according to either "file" or "db" type:
1909 switch((string)$config['internal_type']) {
1910 case 'file': // If the element is of the internal type "file":
1911
1912 // Creating string showing allowed types:
1913 $tempFT = t3lib_div::trimExplode(',',$allowed,1);
1914 if (!count($tempFT)) {$info.='*';}
1915 foreach($tempFT as $ext) {
1916 if ($ext) {
1917 $info.=strtoupper($ext).' ';
1918 }
1919 }
1920 // Creating string, showing disallowed types:
1921 $tempFT_dis = t3lib_div::trimExplode(',',$disallowed,1);
1922 if (count($tempFT_dis)) {$info.='<br />';}
1923 foreach($tempFT_dis as $ext) {
1924 if ($ext) {
1925 $info.='-'.strtoupper($ext).' ';
1926 }
1927 }
1928
1929 // Making the array of file items:
1930 $itemArray = t3lib_div::trimExplode(',',$PA['itemFormElValue'],1);
1931
1932 // Showing thumbnails:
1933 $thumbsnail = '';
1934 if ($show_thumbs) {
1935 $imgs = array();
1936 foreach($itemArray as $imgRead) {
1937 $imgP = explode('|',$imgRead);
1938 $imgPath = rawurldecode($imgP[0]);
1939
1940 $rowCopy = array();
1941 $rowCopy[$field] = $imgPath;
1942
1943 // Icon + clickmenu:
1944 $absFilePath = t3lib_div::getFileAbsFileName($config['uploadfolder'].'/'.$imgPath);
1945
1946 $fI = pathinfo($imgPath);
1947 $fileIcon = t3lib_BEfunc::getFileIcon(strtolower($fI['extension']));
1948 $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="" />';
1949
1950 $imgs[] = '<span class="nobr">'.t3lib_BEfunc::thumbCode($rowCopy,$table,$field,$this->backPath,'thumbs.php',$config['uploadfolder'],0,' align="middle"').
1951 ($absFilePath ? $this->getClickMenu($fileIcon, $absFilePath) : $fileIcon).
1952 $imgPath.
1953 '</span>';
1954 }
1955 $thumbsnail = implode('<br />',$imgs);
1956 }
1957
1958 // Creating the element:
1959 $params = array(
1960 'size' => $size,
1961 'dontShowMoveIcons' => ($maxitems<=1),
1962 'autoSizeMax' => t3lib_div::intInRange($config['autoSizeMax'],0),
1963 'maxitems' => $maxitems,
1964 'style' => isset($config['selectedListStyle']) ? ' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"',
1965 'info' => $info,
1966 'thumbnails' => $thumbsnail,
1967 'readOnly' => $disabled
1968 );
1969 $item.= $this->dbFileIcons($PA['itemFormElName'],'file',implode(',',$tempFT),$itemArray,'',$params,$PA['onFocus']);
1970
1971 if(!$disabled) {
1972 // Adding the upload field:
1973 if ($this->edit_docModuleUpload) $item.='<input type="file" name="'.$PA['itemFormElName_file'].'"'.$this->formWidth().' size="60" />';
1974 }
1975 break;
1976 case 'db': // If the element is of the internal type "db":
1977
1978 // Creating string showing allowed types:
1979 $tempFT = t3lib_div::trimExplode(',',$allowed,1);
1980 if (!strcmp(trim($tempFT[0]),'*')) {
1981 $info.='<span class="nobr">&nbsp;&nbsp;&nbsp;&nbsp;'.
1982 htmlspecialchars($this->getLL('l_allTables')).
1983 '</span><br />';
1984 } else {
1985 while(list(,$theT)=each($tempFT)) {
1986 if ($theT) {
1987 $info.='<span class="nobr">&nbsp;&nbsp;&nbsp;&nbsp;'.
1988 t3lib_iconWorks::getIconImage($theT,array(),$this->backPath,'align="top"').
1989 htmlspecialchars($this->sL($GLOBALS['TCA'][$theT]['ctrl']['title'])).
1990 '</span><br />';
1991 }
1992 }
1993 }
1994
1995 $perms_clause = $GLOBALS['BE_USER']->getPagePermsClause(1);
1996 $itemArray = array();
1997 $imgs = array();
1998
1999 // Thumbnails:
2000 $temp_itemArray = t3lib_div::trimExplode(',',$PA['itemFormElValue'],1);
2001 foreach($temp_itemArray as $dbRead) {
2002 $recordParts = explode('|',$dbRead);
2003 list($this_table,$this_uid) = t3lib_BEfunc::splitTable_Uid($recordParts[0]);
2004 $itemArray[] = array('table'=>$this_table, 'id'=>$this_uid);
2005 if (!$disabled && $show_thumbs) {
2006 $rr = t3lib_BEfunc::getRecordWSOL($this_table,$this_uid);
2007 $imgs[] = '<span class="nobr">'.
2008 $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).
2009 '&nbsp;'.
2010 t3lib_BEfunc::getRecordTitle($this_table,$rr,TRUE).' <span class="typo3-dimmed"><em>['.$rr['uid'].']</em></span>'.
2011 '</span>';
2012 }
2013 }
2014 $thumbsnail='';
2015 if (!$disabled && $show_thumbs) {
2016 $thumbsnail = implode('<br />',$imgs);
2017 }
2018
2019 // Creating the element:
2020 $params = array(
2021 'size' => $size,
2022 'dontShowMoveIcons' => ($maxitems<=1),
2023 'autoSizeMax' => t3lib_div::intInRange($config['autoSizeMax'],0),
2024 'maxitems' => $maxitems,
2025 'style' => isset($config['selectedListStyle']) ? ' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle.'"',
2026 'info' => $info,
2027 'thumbnails' => $thumbsnail,
2028 'readOnly' => $disabled
2029 );
2030 $item.= $this->dbFileIcons($PA['itemFormElName'],'db',implode(',',$tempFT),$itemArray,'',$params,$PA['onFocus'],$table,$field,$row['uid']);
2031
2032 break;
2033 }
2034
2035 // Wizards:
2036 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
2037 if (!$disabled) {
2038 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf);
2039 }
2040
2041 return $item;
2042 }
2043
2044 /**
2045 * Generation of TCEform elements of the type "none"
2046 * This will render a non-editable display of the content of the field.
2047 *
2048 * @param string The table name of the record
2049 * @param string The field name which this element is supposed to edit
2050 * @param array The record data array where the value(s) for the field can be found
2051 * @param array An array with additional configuration options.
2052 * @return string The HTML code for the TCEform field
2053 */
2054 function getSingleField_typeNone($table,$field,$row,&$PA) {
2055 // Init:
2056 $config = $PA['fieldConf']['config'];
2057 $itemValue = $PA['itemFormElValue'];
2058
2059 return $this->getSingleField_typeNone_render($config,$itemValue);
2060 }
2061
2062 /**
2063 * HTML rendering of a value which is not editable.
2064 *
2065 * @param array Configuration for the display
2066 * @param string The value to display
2067 * @return string The HTML code for the display
2068 * @see getSingleField_typeNone();
2069 */
2070 function getSingleField_typeNone_render($config,$itemValue) {
2071
2072 // is colorScheme[0] the right value?
2073 $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;';
2074
2075 if ($config['format']) {
2076 $itemValue = $this->formatValue($config, $itemValue);
2077 }
2078
2079 $rows = intval($config['rows']);
2080 if ($rows > 1) {
2081 if(!$config['pass_content']) {
2082 $itemValue = nl2br(htmlspecialchars($itemValue));
2083 }
2084 // like textarea
2085 $cols = t3lib_div::intInRange($config['cols'] ? $config['cols'] : 30, 5, $this->maxTextareaWidth);
2086 if (!$config['fixedRows']) {
2087 $origRows = $rows = t3lib_div::intInRange($rows, 1, 20);
2088 if (strlen($itemValue)>$this->charsPerRow*2) {
2089 $cols = $this->maxTextareaWidth;
2090 $rows = t3lib_div::intInRange(round(strlen($itemValue)/$this->charsPerRow),count(explode(chr(10),$itemValue)),20);
2091 if ($rows<$origRows) $rows=$origRows;
2092 }
2093 }
2094
2095 if ($this->docLarge) $cols = round($cols*$this->form_largeComp);
2096 $width = ceil($cols*$this->form_rowsToStylewidth);
2097 // hardcoded: 12 is the height of the font
2098 $height=$rows*12;
2099
2100 $item='
2101 <div style="'.htmlspecialchars($divStyle.' overflow:auto; height:'.$height.'px; width:'.$width.'px;').'" class="'.htmlspecialchars($this->formElClass('none')).'">'.
2102 $itemValue.
2103 '</div>';
2104 } else {
2105 if(!$config['pass_content']) {
2106 $itemValue = htmlspecialchars($itemValue);
2107 }
2108
2109 $cols = $config['cols']?$config['cols']:($config['size']?$config['size']:$this->maxInputWidth);
2110 if ($this->docLarge) $cols = round($cols*$this->form_largeComp);
2111 $width = ceil($cols*$this->form_rowsToStylewidth);
2112
2113 // overflow:auto crashes mozilla here. Title tag is usefull when text is longer than the div box (overflow:hidden).
2114 $item = '
2115 <div style="'.htmlspecialchars($divStyle.' overflow:hidden; width:'.$width.'px;').'" class="'.htmlspecialchars($this->formElClass('none')).'" title="'.$itemValue.'">'.
2116 '<span class="nobr">'.(strcmp($itemValue,'')?$itemValue:'&nbsp;').'</span>'.
2117 '</div>';
2118 }
2119
2120 return $item;
2121 }
2122
2123 /**
2124 * Handler for Flex Forms
2125 *
2126 * @param string The table name of the record
2127 * @param string The field name which this element is supposed to edit
2128 * @param array The record data array where the value(s) for the field can be found
2129 * @param array An array with additional configuration options.
2130 * @return string The HTML code for the TCEform field
2131 */
2132 function getSingleField_typeFlex($table,$field,$row,&$PA) {
2133
2134 // Data Structure:
2135 $dataStructArray = t3lib_BEfunc::getFlexFormDS($PA['fieldConf']['config'],$row,$table);
2136
2137 // Get data structure:
2138 if (is_array($dataStructArray)) {
2139
2140 // Get data:
2141 $xmlData = $PA['itemFormElValue'];
2142 $xmlHeaderAttributes = t3lib_div::xmlGetHeaderAttribs($xmlData);
2143 $storeInCharset = strtolower($xmlHeaderAttributes['encoding']);
2144 if ($storeInCharset) {
2145 $currentCharset=$GLOBALS['LANG']->charSet;
2146 $xmlData = $GLOBALS['LANG']->csConvObj->conv($xmlData,$storeInCharset,$currentCharset,1);
2147 }
2148 $editData=t3lib_div::xml2array($xmlData);
2149 if (!is_array($editData)) { // Must be XML parsing error...
2150 $editData=array();
2151 } elseif (!isset($editData['meta']) || !is_array($editData['meta'])) {
2152 $editData['meta'] = array();
2153 }
2154
2155 // Find the data structure if sheets are found:
2156 $sheet = $editData['meta']['currentSheetId'] ? $editData['meta']['currentSheetId'] : 'sDEF'; // Sheet to display
2157
2158 // Create sheet menu:
2159 // if (is_array($dataStructArray['sheets'])) {
2160 // #$item.=$this->getSingleField_typeFlex_sheetMenu($dataStructArray['sheets'], $PA['itemFormElName'].'[meta][currentSheetId]', $sheet).'<br />';
2161 // }
2162
2163 // Create language menu:
2164 $langChildren = $dataStructArray['meta']['langChildren'] ? 1 : 0;
2165 $langDisabled = $dataStructArray['meta']['langDisable'] ? 1 : 0;
2166
2167 $editData['meta']['currentLangId']=array();
2168 $languages = $this->getAvailableLanguages();
2169
2170 foreach($languages as $lInfo) {
2171 if ($GLOBALS['BE_USER']->checkLanguageAccess($lInfo['uid'])) {
2172 $editData['meta']['currentLangId'][] = $lInfo['ISOcode'];
2173 }
2174 }
2175 if (!is_array($editData['meta']['currentLangId']) || !count($editData['meta']['currentLangId'])) {
2176 $editData['meta']['currentLangId']=array('DEF');
2177 }
2178
2179 $editData['meta']['currentLangId'] = array_unique($editData['meta']['currentLangId']);
2180
2181
2182 // if (!$langDisabled && count($languages) > 1) {
2183 // $item.=$this->getSingleField_typeFlex_langMenu($languages, $PA['itemFormElName'].'[meta][currentLangId]', $editData['meta']['currentLangId']).'<br />';
2184 // }
2185
2186 $PA['_noEditDEF'] = FALSE;
2187 if ($langChildren || $langDisabled) {
2188 $rotateLang = array('DEF');
2189 } else {
2190 if (!in_array('DEF',$editData['meta']['currentLangId'])) {
2191 array_unshift($editData['meta']['currentLangId'],'DEF');
2192 $PA['_noEditDEF'] = TRUE;
2193 }
2194 $rotateLang = $editData['meta']['currentLangId'];
2195 }
2196
2197 // Tabs sheets
2198 if (is_array($dataStructArray['sheets'])) {
2199 $tabsToTraverse = array_keys($dataStructArray['sheets']);
2200 } else {
2201 $tabsToTraverse = array($sheet);
2202 }
2203
2204 foreach ($rotateLang as $lKey) {
2205 if (!$langChildren && !$langDisabled) {
2206 $item.= '<b>'.$this->getLanguageIcon($table,$row,'v'.$lKey).$lKey.':</b>';
2207 }
2208
2209 $tabParts = array();
2210 foreach ($tabsToTraverse as $sheet) {
2211 $sheetCfg = $dataStructArray['sheets'][$sheet];
2212 list ($dataStruct, $sheet) = t3lib_div::resolveSheetDefInDS($dataStructArray,$sheet);
2213
2214 // Render sheet:
2215 if (is_array($dataStruct['ROOT']) && is_array($dataStruct['ROOT']['el'])) {
2216 $cmdData = t3lib_div::_GP('flexFormsCmdData');
2217 $lang = 'l'.$lKey; // Default language, other options are "lUK" or whatever country code (independant of system!!!)
2218 $PA['_valLang'] = $langChildren && !$langDisabled ? $editData['meta']['currentLangId'] : 'DEF'; // Default language, other options are "lUK" or whatever country code (independant of system!!!)
2219 $PA['_lang'] = $lang;
2220
2221 // Render flexform:
2222 $tRows = $this->getSingleField_typeFlex_draw(
2223 $dataStruct['ROOT']['el'],
2224 $editData['data'][$sheet][$lang],
2225 $cmdData['data'][$sheet][$lang],
2226 $table,
2227 $field,
2228 $row,
2229 $PA,
2230 '[data]['.$sheet.']['.$lang.']'
2231 );
2232 $sheetContent= '<table border="0" cellpadding="1" cellspacing="1" class="typo3-TCEforms-flexForm">'.implode('',$tRows).'</table>';
2233
2234 # $item = '<div style=" position:absolute;">'.$item.'</div>';
2235 //visibility:hidden;
2236 } else $sheetContent='Data Structure ERROR: No ROOT element found for sheet "'.$sheet.'".';
2237
2238 // Add to tab:
2239 $tabParts[] = array(
2240 'label' => ($sheetCfg['ROOT']['TCEforms']['sheetTitle'] ? $this->sL($sheetCfg['ROOT']['TCEforms']['sheetTitle']) : $sheet),
2241 'description' => ($sheetCfg['ROOT']['TCEforms']['sheetDescription'] ? $this->sL($sheetCfg['ROOT']['TCEforms']['sheetDescription']) : ''),
2242 'linkTitle' => ($sheetCfg['ROOT']['TCEforms']['sheetShortDescr'] ? $this->sL($sheetCfg['ROOT']['TCEforms']['sheetShortDescr']) : ''),
2243 'content' => $sheetContent
2244 );
2245 }
2246
2247 if (is_array($dataStructArray['sheets'])) {
2248 $item.= $this->getDynTabMenu($tabParts,'TCEFORMS:flexform:'.$PA['itemFormElName'].$PA['_lang']);
2249 } else {
2250 $item.= $sheetContent;
2251 }
2252 }
2253 } else $item='Data Structure ERROR: '.$dataStructArray;
2254
2255 return $item;
2256 }
2257
2258 /**
2259 * Creates the language menu for FlexForms:
2260 *
2261 * @param [type] $languages: ...
2262 * @param [type] $elName: ...
2263 * @param [type] $selectedLanguage: ...
2264 * @param [type] $multi: ...
2265 * @return string HTML for menu
2266 */
2267 function getSingleField_typeFlex_langMenu($languages,$elName,$selectedLanguage,$multi=1) {
2268 $opt=array();
2269 foreach($languages as $lArr) {
2270 $opt[]='<option value="'.htmlspecialchars($lArr['ISOcode']).'"'.(in_array($lArr['ISOcode'],$selectedLanguage)?' selected="selected"':'').'>'.htmlspecialchars($lArr['title']).'</option>';
2271 }
2272
2273 $output = '<select name="'.$elName.'[]"'.($multi ? ' multiple="multiple" size="'.count($languages).'"' : '').'>'.implode('',$opt).'</select>';
2274
2275 return $output;
2276 }
2277
2278 /**
2279 * Creates the menu for selection of the sheets:
2280 *
2281 * @param array Sheet array for which to render the menu
2282 * @param string Form element name of the field containing the sheet pointer
2283 * @param string Current sheet key
2284 * @return string HTML for menu
2285 */
2286 function getSingleField_typeFlex_sheetMenu($sArr,$elName,$sheetKey) {
2287
2288 $tCells =array();
2289 $pct = round(100/count($sArr));
2290 foreach($sArr as $sKey => $sheetCfg) {
2291 if ($GLOBALS['BE_USER']->jsConfirmation(1)) {
2292 $onClick = 'if (confirm(TBE_EDITOR.labels.onChangeAlert) && TBE_EDITOR.checkSubmit(-1)){'.$this->elName($elName).".value='".$sKey."'; TBE_EDITOR.submitForm()};";
2293 } else {
2294 $onClick = 'if(TBE_EDITOR.checkSubmit(-1)){ '.$this->elName($elName).".value='".$sKey."'; TBE_EDITOR.submitForm();}";
2295 }
2296
2297
2298 $tCells[]='<td width="'.$pct.'%" style="'.($sKey==$sheetKey ? 'background-color: #9999cc; font-weight: bold;' : 'background-color: #aaaaaa;').' cursor: hand;" onclick="'.htmlspecialchars($onClick).'" align="center">'.
2299 ($sheetCfg['ROOT']['TCEforms']['sheetTitle'] ? $this->sL($sheetCfg['ROOT']['TCEforms']['sheetTitle']) : $sKey).
2300 '</td>';
2301 }
2302
2303 return '<table border="0" cellpadding="0" cellspacing="2" class="typo3-TCEforms-flexForm-sheetMenu"><tr>'.implode('',$tCells).'</tr></table>';
2304 }
2305
2306 /**
2307 * [Describe function...]
2308 *
2309 * @param [type] $dataStruct: ...
2310 * @param [type] $editData: ...
2311 * @param [type] $cmdData: ...
2312 * @param [type] $table: ...
2313 * @param [type] $field: ...
2314 * @param [type] $row: ...
2315 * @param [type] $PA: ...
2316 * @param [type] $formPrefix: ...
2317 * @param [type] $level: ...
2318 * @param [type] $tRows: ...
2319 * @return [type] ...
2320 */
2321 function getSingleField_typeFlex_draw($dataStruct,$editData,$cmdData,$table,$field,$row,&$PA,$formPrefix='',$level=0,$tRows=array()) {
2322
2323 // Data Structure array must be ... and array of course...
2324 if (is_array($dataStruct)) {
2325 foreach($dataStruct as $key => $value) {
2326 if (is_array($value)) { // The value of each entry must be an array.
2327
2328 // ********************
2329 // Making the row:
2330 // ********************
2331 $rowCells=array();
2332
2333 // Icon:
2334 $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>';;
2335
2336 $rowCells['formEl']='';
2337 if ($value['type']=='array') {
2338 if ($value['section']) {
2339 // Render "NEW [container]" selectorbox:
2340 if (is_array($value['el'])) {
2341 $opt=array();
2342 $opt[]='<option value=""></option>';
2343 foreach($value['el'] as $kk => $vv) {
2344 $opt[]='<option value="'.$kk.'">'.htmlspecialchars($this->getLL('l_new') . ' "'.$this->sL($value['el'][$kk]['tx_templavoila']['title']).'"').'</option>';
2345 }
2346 $rowCells['formEl']='<select name="flexFormsCmdData'.$formPrefix.'['.$key.'][value]">'.implode('',$opt).'</select>';
2347 }
2348
2349 // Put row together
2350 $tRows[]='<tr class="bgColor2">
2351 <td nowrap="nowrap" valign="top">'.$rowCells['title'].'</td>
2352 <td>'.$rowCells['formEl'].'</td>
2353 </tr>';
2354
2355 $cc=0;
2356 if (is_array($editData[$key]['el'])) {
2357 foreach ($editData[$key]['el'] as $k3 => $v3) {
2358 $cc=$k3;
2359 $theType = key($v3);
2360 $theDat = $v3[$theType];
2361 $newSectionEl = $value['el'][$theType];
2362 if (is_array($newSectionEl)) {
2363 $tRows = $this->getSingleField_typeFlex_draw(
2364 array($theType => $newSectionEl),
2365 array($theType => $theDat),
2366 $cmdData[$key]['el'][$cc],
2367 $table,
2368 $field,
2369 $row,
2370 $PA,
2371 $formPrefix.'['.$key.'][el]['.$cc.']',
2372 $level+1,
2373 $tRows
2374 );
2375 }
2376 }
2377 }
2378
2379
2380
2381 // New form?
2382 if ($cmdData[$key]['value']) {
2383 $newSectionEl = $value['el'][$cmdData[$key]['value']];
2384 if (is_array($newSectionEl)) {
2385 $tRows = $this->getSingleField_typeFlex_draw(
2386 array($cmdData[$key]['value'] => $newSectionEl),
2387 array(),
2388 array(),
2389 $table,
2390 $field,
2391 $row,
2392 $PA,
2393 $formPrefix.'['.$key.'][el]['.($cc+1).']',
2394 $level+1,
2395 $tRows
2396 );
2397 }
2398 }
2399 } else {
2400 $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
2401
2402 // Put row together
2403 $tRows[]='<tr class="bgColor2">
2404 <td nowrap="nowrap" valign="top">'.
2405 '<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>'.
2406 '<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>'.
2407 '<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>'.
2408 $rowCells['title'].'</td>
2409 <td>'.$rowCells['formEl'].'</td>
2410 </tr>';
2411
2412 $tRows = $this->getSingleField_typeFlex_draw(
2413 $value['el'],
2414 $editData[$key]['el'],
2415 $cmdData[$key]['el'],
2416 $table,
2417 $field,
2418 $row,
2419 $PA,
2420 $formPrefix.'['.$key.'][el]',
2421 $level+1,
2422 $tRows
2423 );
2424 }
2425
2426 } elseif (is_array($value['TCEforms']['config'])) { // Rendering a single form element:
2427
2428 if (is_array($PA['_valLang'])) {
2429 $rotateLang = $PA['_valLang'];
2430 } else {
2431 $rotateLang = array($PA['_valLang']);
2432 }
2433
2434 foreach($rotateLang as $vDEFkey) {
2435 $vDEFkey = 'v'.$vDEFkey;
2436
2437 if (!$value['TCEforms']['displayCond'] || $this->isDisplayCondition($value['TCEforms']['displayCond'],$editData,$vDEFkey)) {
2438 $fakePA=array();
2439 $fakePA['fieldConf']=array(
2440 'label' => $this->sL(trim($value['TCEforms']['label'])),
2441 'config' => $value['TCEforms']['config'],
2442 'defaultExtras' => $value['TCEforms']['defaultExtras'],
2443 'onChange' => $value['TCEforms']['onChange']
2444 );
2445 if ($PA['_noEditDEF'] && $PA['_lang']==='lDEF') {
2446 $fakePA['fieldConf']['config'] = array(
2447 'type' => 'none',
2448 'rows' => 2
2449 );
2450 }
2451
2452 if (
2453 $fakePA['fieldConf']['onChange'] == 'reload' ||
2454 ($GLOBALS['TCA'][$table]['ctrl']['type'] && !strcmp($key,$GLOBALS['TCA'][$table]['ctrl']['type'])) ||
2455 ($GLOBALS['TCA'][$table]['ctrl']['requestUpdate'] && t3lib_div::inList($GLOBALS['TCA'][$table]['ctrl']['requestUpdate'],$key))) {
2456 if ($GLOBALS['BE_USER']->jsConfirmation(1)) {
2457 $alertMsgOnChange = 'if (confirm(TBE_EDITOR.labels.onChangeAlert) && TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm() };';
2458 } else {
2459 $alertMsgOnChange = 'if(TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm();}';
2460 }
2461 } else {
2462 $alertMsgOnChange = '';
2463 }
2464
2465 $fakePA['fieldChangeFunc']=$PA['fieldChangeFunc'];
2466 if (strlen($alertMsgOnChange)) {
2467 $fakePA['fieldChangeFunc']['alert']=$alertMsgOnChange;
2468 }
2469 $fakePA['onFocus']=$PA['onFocus'];
2470 $fakePA['label']=$PA['label'];
2471
2472 $fakePA['itemFormElName']=$PA['itemFormElName'].$formPrefix.'['.$key.']['.$vDEFkey.']';
2473 $fakePA['itemFormElName_file']=$PA['itemFormElName_file'].$formPrefix.'['.$key.']['.$vDEFkey.']';
2474
2475 if(isset($editData[$key][$vDEFkey])) {
2476 $fakePA['itemFormElValue']=$editData[$key][$vDEFkey];
2477 } else {
2478 $fakePA['itemFormElValue']=$fakePA['fieldConf']['config']['default'];
2479 }
2480
2481 $rowCells['formEl']= $this->getSingleField_SW($table,$field,$row,$fakePA);
2482 $rowCells['title']= htmlspecialchars($fakePA['fieldConf']['label']);
2483
2484 if (!in_array('DEF',$rotateLang)) {
2485 $defInfo = '<div class="typo3-TCEforms-originalLanguageValue">'.$this->getLanguageIcon($table,$row,0).$this->previewFieldValue($editData[$key]['vDEF'], $fakePA['fieldConf']).'&nbsp;</div>';
2486 } else {
2487 $defInfo = '';
2488 }
2489
2490 if (!$PA['_noEditDEF']) {
2491 $prLang = $this->getAdditionalPreviewLanguages();
2492 foreach($prLang as $prL) {
2493 $defInfo.= '<div class="typo3-TCEforms-originalLanguageValue">'.$this->getLanguageIcon($table,$row,'v'.$prL['ISOcode']).$this->previewFieldValue($editData[$key]['v'.$prL['ISOcode']], $fakePA['fieldConf']).'&nbsp;</div>';
2494 }
2495 }
2496
2497 // Put row together
2498 $tRows[]='<tr>
2499 <td nowrap="nowrap" valign="top" class="bgColor5">'.($vDEFkey=='vDEF' ? '' : $this->getLanguageIcon($table,$row,$vDEFkey)).$rowCells['title'].'</td>
2500 <td class="bgColor4">'.$rowCells['formEl'].$defInfo.'</td>
2501 </tr>';
2502 }
2503 }
2504 }
2505 }
2506 }
2507 }
2508
2509 return $tRows;
2510 }
2511
2512 /**
2513 * Handler for unknown types.
2514 *
2515 * @param string The table name of the record
2516 * @param string The field name which this element is supposed to edit
2517 * @param array The record data array where the value(s) for the field can be found
2518 * @param array An array with additional configuration options.
2519 * @return string The HTML code for the TCEform field
2520 */
2521 function getSingleField_typeUnknown($table,$field,$row,&$PA) {
2522 $item='Unknown type: '.$PA['fieldConf']['config']['form_type'].'<br />';
2523
2524 return $item;
2525 }
2526
2527 /**
2528 * User defined field type
2529 *
2530 * @param string The table name of the record
2531 * @param string The field name which this element is supposed to edit
2532 * @param array The record data array where the value(s) for the field can be found
2533 * @param array An array with additional configuration options.
2534 * @return string The HTML code for the TCEform field
2535 */
2536 function getSingleField_typeUser($table,$field,$row,&$PA) {
2537 $PA['table']=$table;
2538 $PA['field']=$field;
2539 $PA['row']=$row;
2540
2541 $PA['pObj']=&$this;
2542
2543 return t3lib_div::callUserFunction($PA['fieldConf']['config']['userFunc'],$PA,$this);
2544 }
2545
2546
2547
2548
2549
2550
2551 /************************************************************
2552 *
2553 * Field content processing
2554 *
2555 ************************************************************/
2556
2557 /**
2558 * Format field content of various types if $config['format'] is set to date, filesize, ..., user
2559 * This is primarily for the field type none but can be used for user field types for example
2560 *
2561 * @param array Configuration for the display
2562 * @param string The value to display
2563 * @return string Formatted Field content
2564 */
2565 function formatValue ($config, $itemValue) {
2566 $format = trim($config['format']);
2567 switch($format) {
2568 case 'date':
2569 if ($itemValue) {
2570 $option = trim($config['format.']['option']);
2571 if ($option) {
2572 if ($config['format.']['strftime']) {
2573 $value = strftime($option,$itemValue);
2574 } else {
2575 $value = date($option,$itemValue);
2576 }
2577 } else {
2578 $value = date('d-m-Y',$itemValue);
2579 }
2580 } else {
2581 $value = '';
2582 }
2583 if ($config['format.']['appendAge']) {
2584 $value .= ' ('.t3lib_BEfunc::calcAge((time()-$itemValue), $GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_core.php:labels.minutesHoursDaysYears')).')';
2585 }
2586 $itemValue = $value;
2587 break;
2588 case 'datetime': // compatibility with "eval" (type "input")
2589 $itemValue = date('H:i d-m-Y',$itemValue);
2590 break;
2591 case 'time': // compatibility with "eval" (type "input")
2592 $itemValue = date('H:i',$itemValue);
2593 break;
2594 case 'timesec': // compatibility with "eval" (type "input")
2595 $itemValue = date('H:i:s',$itemValue);
2596 break;
2597 case 'year': // compatibility with "eval" (type "input")
2598 $itemValue = date('Y',$itemValue);
2599 break;
2600 case 'int':
2601 $baseArr = array('dec'=>'d','hex'=>'x','HEX'=>'X','oct'=>'o','bin'=>'b');
2602 $base = trim($config['format.']['base']);
2603 $format = $baseArr[$base] ? $baseArr[$base] : 'd';
2604 $itemValue = sprintf('%'.$format,$itemValue);
2605 break;
2606 case 'float':
2607 $precision = t3lib_div::intInRange($config['format.']['precision'],1,10,2);
2608 $itemValue = sprintf('%.'.$precision.'f',$itemValue);
2609 break;
2610 case 'number':
2611 $format = trim($config['format.']['option']);
2612 $itemValue = sprintf('%'.$format,$itemValue);
2613 break;
2614 case 'md5':
2615 $itemValue = md5($itemValue);
2616 break;
2617 case 'filesize':
2618 $value = t3lib_div::formatSize(intval($itemValue));
2619 if ($config['format.']['appendByteSize']) {
2620 $value .= ' ('.$itemValue.')';
2621 }
2622 $itemValue = $value;
2623 break;
2624 case 'user':
2625 $func = trim($config['format.']['userFunc']);
2626 if ($func) {
2627 $params = array(
2628 'value' => $itemValue,
2629 'args' => $config['format.']['userFunc'],
2630 'config' => $config,
2631 'pObj' => &$this
2632 );
2633 $itemValue = t3lib_div::callUserFunction($func,$params,$this);
2634 }
2635 break;
2636 default:
2637 break;
2638 }
2639
2640 return $itemValue;
2641 }
2642
2643
2644
2645
2646
2647
2648 /************************************************************
2649 *
2650 * "Configuration" fetching/processing functions
2651 *
2652 ************************************************************/
2653
2654 /**
2655 * Calculate and return the current "types" pointer value for a record
2656 *
2657 * @param string The table name. MUST be in $TCA
2658 * @param array The row from the table, should contain at least the "type" field, if applicable.
2659 * @return string Return the "type" value for this record, ready to pick a "types" configuration from the $TCA array.
2660 */
2661 function getRTypeNum($table,$row) {
2662 global $TCA;
2663 // If there is a "type" field configured...
2664 if ($TCA[$table]['ctrl']['type']) {
2665 $typeFieldName = $TCA[$table]['ctrl']['type'];
2666 $typeNum=$row[$typeFieldName]; // Get value of the row from the record which contains the type value.
2667 if (!strcmp($typeNum,'')) $typeNum=0; // If that value is an empty string, set it to "0" (zero)
2668 } else {
2669 $typeNum = 0; // If no "type" field, then set to "0" (zero)
2670 }
2671
2672 $typeNum = (string)$typeNum; // Force to string. Necessary for eg '-1' to be recognized as a type value.
2673 if (!$TCA[$table]['types'][$typeNum]) { // However, if the type "0" is not found in the "types" array, then default to "1" (for historical reasons)
2674 $typeNum = 1;
2675 }
2676
2677 return $typeNum;
2678 }
2679
2680 /**
2681 * Used to adhoc-rearrange the field order normally set in the [types][showitem] list
2682 *
2683 * @param array A [types][showitem] list of fields, exploded by ","
2684 * @return array Returns rearranged version (keys are changed around as well.)
2685 * @see getMainFields()
2686 */
2687 function rearrange($fields) {
2688 $fO = array_flip(t3lib_div::trimExplode(',',$this->fieldOrder,1));
2689 reset($fields);
2690 $newFields=array();
2691 while(list($cc,$content)=each($fields)) {
2692 $cP = t3lib_div::trimExplode(';',$content);
2693 if (isset($fO[$cP[0]])) {
2694 $newFields[$fO[$cP[0]]] = $content;
2695 unset($fields[$cc]);
2696 }
2697 }
2698 ksort($newFields);
2699 $fields=array_merge($newFields,$fields); // Candidate for t3lib_div::array_merge() if integer-keys will some day make trouble...
2700 return $fields;
2701 }
2702
2703 /**
2704 * Producing an array of field names NOT to display in the form, based on settings from subtype_value_field, bitmask_excludelist_bits etc.
2705 * Notice, this list is in NO way related to the "excludeField" flag
2706 *
2707 * @param string Table name, MUST be in $TCA