2 /***************************************************************
5 * (c) 1999-2009 Kasper Skaarhoj (kasperYYYY@typo3.com)
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.
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.
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.
25 * This copyright notice MUST APPEAR in all copies of the script!
26 ***************************************************************/
28 * Contains TYPO3 Core Form generator - AKA "TCEforms"
31 * Revised for TYPO3 3.6 August/2003 by Kasper Skaarhoj
34 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
37 * [CLASS/FUNCTION INDEX of SCRIPT]
41 * 196: class t3lib_TCEforms
42 * 302: function t3lib_TCEforms()
43 * 338: function initDefaultBEmode()
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)
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)
73 * SECTION: Field content processing
74 * 2496: function formatValue ($config, $itemValue)
76 * SECTION: "Configuration" fetching/processing functions
77 * 2588: function getRTypeNum($table,$row)
78 * 2614: function rearrange($fields)
79 * 2640: function getExcludeElements($table,$row,$typeNum)
80 * 2688: function getFieldsToAdd($table,$row,$typeNum)
81 * 2713: function mergeFieldsWithAddedFields($fields,$fieldsToAdd)
82 * 2745: function setTSconfig($table,$row,$field='')
83 * 2767: function getSpecConfForField($table,$row,$field)
84 * 2788: function getSpecConfFromString($extraString, $defaultExtras)
85 * 3007: function loadPaletteElements($table, $row, $palette, $itemList='')
87 * SECTION: Display of localized content etc.
88 * 2816: function registerDefaultLanguageData($table,$rec)
89 * 2848: function getLanguageOverlayRawValue($table, $row, $field, $fieldConf)
90 * 2876: function renderDefaultLanguageContent($table,$field,$row,$item)
91 * 2899: function renderDefaultLanguageDiff($table,$field,$row,$item)
93 * SECTION: Form element helper functions
94 * 2955: function dbFileIcons($fName,$mode,$allowed,$itemArray,$selector='',$params=array(),$onFocus='')
95 * 3108: function getClipboardElements($allowed,$mode)
96 * 3157: function getClickMenu($str,$table,$uid='')
97 * 3178: function renderWizards($itemKinds,$wizConf,$table,$row,$field,&$PA,$itemName,$specConf,$RTE=0)
98 * 3382: function getIcon($icon)
99 * 3409: function optionTagStyle($iconString)
100 * 3425: function extractValuesOnlyFromValueLabelList($itemFormElValue)
101 * 3447: function wrapOpenPalette($header,$table,$row,$palette,$retFunc=0)
102 * 3471: function checkBoxParams($itemName,$thisValue,$c,$iCount,$addFunc='')
103 * 3485: function elName($itemName)
104 * 3496: function noTitle($str,$wrapParts=array())
105 * 3505: function blur()
106 * 3514: function thisReturnUrl()
107 * 3527: function getSingleHiddenField($table,$field,$row)
108 * 3549: function formWidth($size=48,$textarea=0)
109 * 3576: function formWidthText($size=48,$wrap='')
110 * 3592: function formElStyle($type)
111 * 3603: function formElClass($type)
112 * 3614: function formElStyleClassValue($type, $class=FALSE)
113 * 3638: function insertDefStyle($type)
114 * 3657: function getDynTabMenu($parts, $idString)
116 * SECTION: Item-array manipulation functions (check/select/radio)
117 * 3696: function initItemArray($fieldValue)
118 * 3714: function addItems($items,$iArray)
119 * 3736: function procItems($items,$iArray,$config,$table,$row,$field)
120 * 3760: function addSelectOptionsToItemArray($items,$fieldValue,$TSconfig,$field)
121 * 3980: function addSelectOptionsToItemArray_makeModuleData($value)
122 * 4002: function foreignTable($items,$fieldValue,$TSconfig,$field,$pFFlag=0)
124 * SECTION: Template functions
125 * 4083: function setNewBEDesign()
126 * 4138: function intoTemplate($inArr,$altTemplate='')
127 * 4162: function addUserTemplateMarkers($marker,$table,$field,$row,&$PA)
128 * 4173: function wrapLabels($str)
129 * 4186: function wrapTotal($c,$rec,$table)
130 * 4199: function replaceTableWrap($arr,$rec,$table)
131 * 4236: function wrapBorder(&$out_array,&$out_pointer)
132 * 4258: function rplColorScheme($inTemplate)
133 * 4278: function getDivider()
134 * 4288: function printPalette($palArr)
135 * 4339: function helpTextIcon($table,$field,$force=0)
136 * 4359: function helpText($table,$field)
137 * 4380: function setColorScheme($scheme)
138 * 4404: function resetSchemes()
139 * 4415: function storeSchemes()
140 * 4427: function restoreSchemes()
142 * SECTION: JavaScript related functions
143 * 4457: function JStop()
144 * 4508: function JSbottom($formname='forms[0]')
145 * 4835: function dbFileCon($formObj='document.forms[0]')
146 * 5053: function printNeededJSFunctions()
147 * 5080: function printNeededJSFunctions_top()
149 * SECTION: Various helper functions
150 * 5128: function getDefaultRecord($table,$pid=0)
151 * 5167: function getRecordPath($table,$rec)
152 * 5181: function readPerms()
153 * 5195: function sL($str)
154 * 5208: function getLL($str)
155 * 5229: function isPalettesCollapsed($table,$palette)
156 * 5245: function isDisplayCondition($displayCond,$row,$ffValueKey='')
157 * 5349: function getTSCpid($table,$uid,$pid)
158 * 5363: function doLoadTableDescr($table)
159 * 5375: function getAvailableLanguages($onlyIsoCoded=1,$setDefault=1)
162 * 5417: class t3lib_TCEforms_FE extends t3lib_TCEforms
163 * 5425: function wrapLabels($str)
164 * 5435: function printPalette($palArr)
165 * 5460: function setFancyDesign()
167 * TOTAL FUNCTIONS: 100
168 * (This index is automatically created/updated by the extension "extdeveval")
187 * 'TCEforms' - Class for creating the backend editing forms.
189 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
190 * @coauthor Rene Fritz <r.fritz@colorcube.de>
194 class t3lib_TCEforms
{
196 // variables not commented yet.... (do so...)
197 var $palFieldArr = array();
198 var $disableWizards = 0;
199 var $isPalettedoc = 0;
200 var $paletteMargin = 1;
201 var $defStyle = ''; // 'font-family:Verdana;font-size:10px;';
202 var $cachedTSconfig = array();
203 var $cachedTSconfig_fieldLevel = array();
204 var $cachedLanguageFlag = array();
205 var $cachedAdditionalPreviewLanguages = NULL;
206 var $transformedRow = array();
208 var $printNeededJS = array();
209 var $hiddenFieldAccum=array();
210 var $TBE_EDITOR_fieldChanged_func='';
212 var $prevBorderStyle='[nothing here...]'; // Something unique...
213 var $allowUpload=0; // If set direct upload fields will be shown
214 var $titleLen=15; // @deprecated since TYPO3 4.1: $BE_USER->uc['titleLen'] but what is default??
215 var $defaultLanguageData = array(); // Array where records in the default language is stored. (processed by transferdata)
216 var $defaultLanguageData_diff = array(); // Array where records in the default language is stored (raw without any processing. used for making diff)
217 var $additionalPreviewLanguageData = array();
221 var $backPath=''; // Set this to the 'backPath' pointing back to the typo3 admin directory from the script where this form is displayed.
222 var $returnUrl=''; // Alternative return URL path (default is t3lib_div::linkThisScript())
223 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.
224 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.
225 var $disableRTE=0; // If set, the RTE is disabled (from form display, eg. by checkbox in the bottom of the page!)
226 var $globalShowHelp=1; // If false, then all CSH will be disabled, regardless of settings in $this->edit_showFieldHelp
227 var $localizationMode=''; // If true, the forms are rendering only localization relevant fields of the records.
228 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.
229 var $doPrintPalette=1; // If set to false, palettes will NEVER be rendered.
232 * Set to initialized clipboard object; Then the element browser will offer a link to paste in records from clipboard.
234 * @var t3lib_clipboard
237 var $enableClickMenu=FALSE; // Enable click menu on reference icons.
238 var $enableTabMenu = FALSE; // Enable Tab Menus. If set to true, the JavaScript content from template::getDynTabMenuJScode() must be included in the document.
239 var $renderReadonly = FALSE; // When enabled all fields are rendered non-editable.
241 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)
242 var $form_largeComp = 1.33; // Form field width compensation: Compensation for large documents, doc-tab (editing)
243 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.
244 var $maxTextareaWidth=48; // The maximum abstract value for textareas
245 var $maxInputWidth=48; // The maximum abstract value for input fields
246 var $defaultMultipleSelectorStyle='width:250px;'; // Default style for the selector boxes used for multiple items in "select" and "group" types.
250 var $prependFormFieldNames = 'data'; // The string to prepend formfield names with.
251 var $prependCmdFieldNames = 'cmd'; // The string to prepend commands for tcemain::process_cmdmap with.
252 var $prependFormFieldNames_file = 'data_files'; // The string to prepend FILE form field names with.
253 var $formName = 'editform'; // The name attribute of the form.
254 var $allowOverrideMatrix = array(); // Whitelist that allows TCA field configuration to be overridden by TSconfig, @see overrideFieldConf()
259 var $perms_clause=''; // Set by readPerms() (caching)
260 var $perms_clause_set=0; // Set by readPerms() (caching-flag)
261 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).
262 var $docLarge=0; // If set, the forms will be rendered a little wider, more precisely with a factor of $this->form_largeComp.
263 var $clientInfo=array(); // Loaded with info about the browser when class is instantiated.
264 var $RTEenabled=0; // True, if RTE is possible for the current user (based on result from BE_USER->isRTE())
265 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)
266 var $RTEcounter = 0; // Counter that is incremented before an RTE is created. Can be used for unique ids etc.
268 var $colorScheme; // Contains current color scheme
269 var $classScheme; // Contains current class scheme
270 var $defColorScheme; // Contains the default color scheme
271 var $defClassScheme; // Contains the default class scheme
272 var $fieldStyle; // Contains field style values
273 var $borderStyle; // Contains border style values.
275 var $commentMessages=array(); // An accumulation of messages from the class.
277 // INTERNAL, templates
278 var $totalWrap='<hr />|<hr />'; // Total wrapping for the table rows.
279 var $fieldTemplate='<b>###FIELD_NAME###</b><br />###FIELD_ITEM###<hr />'; // Field template
280 var $sectionWrap=''; // Wrapping template code for a section
281 var $palFieldTemplateHeader=''; // Template for palette headers
282 var $palFieldTemplate=''; // Template for palettes
284 // INTERNAL, working memory
285 var $excludeElements=''; // Set to the fields NOT to display, if any.
286 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)
287 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!
288 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.
289 var $requiredAdditional=array(); // Used to register input-field names, which are required an have additional requirements (e.g. like a date/time must be positive integer). The information of this array is merged with $this->requiredFields later.
290 var $requiredElements=array(); // Used to register the min and max number of elements for selectorboxes where that apply (in the "group" type for instance)
291 var $requiredNested=array(); // Used to determine where $requiredFields or $requiredElements are nested (in Tabs or IRRE)
292 var $renderDepth=0; // Keeps track of the rendering depth of nested records.
293 var $savedSchemes=array(); // Color scheme buffer.
294 var $dynNestedStack = array(); // holds the path an element is nested in (e.g. required for RTEhtmlarea)
296 // Internal, registers for user defined functions etc.
297 var $additionalCode_pre = array(); // Additional HTML code, printed before the form.
298 var $additionalJS_pre = array(); // Additional JavaScript, printed before the form
299 var $additionalJS_post = array(); // Additional JavaScript printed after the form
300 var $additionalJS_submit = array(); // Additional JavaScript executed on submit; If you set "OK" variable it will raise an error about RTEs not being loaded and offer to block further submission.
301 var $additionalJS_delete = array(); // Additional JavaScript executed when section element is deleted. This is neceessary, for example, to correctly clean up HTMLArea RTE (bug #8232)
304 * Instance of t3lib_tceforms_inline
306 * @var t3lib_TCEforms_inline
309 var $hookObjectsMainFields = array(); // Array containing hook class instances called once for a form
310 var $hookObjectsSingleField = array(); // Array containing hook class instances called for each field
311 var $extraFormHeaders = array(); // Rows gettings inserted into the alt_doc headers (when called from alt_doc.php)
318 * Constructor function, setting internal variables, loading the styles used.
322 function t3lib_TCEforms() {
323 global $CLIENT, $TYPO3_CONF_VARS;
325 $this->clientInfo
= t3lib_div
::clientInfo();
327 $this->RTEenabled
= $GLOBALS['BE_USER']->isRTE();
328 if (!$this->RTEenabled
) {
329 $this->RTEenabled_notReasons
= implode(chr(10),$GLOBALS['BE_USER']->RTE_errors
);
330 $this->commentMessages
[] = 'RTE NOT ENABLED IN SYSTEM due to:'.chr(10).$this->RTEenabled_notReasons
;
333 // Default color+class scheme
334 $this->defColorScheme
= array(
335 $GLOBALS['SOBE']->doc
->bgColor
, // Background for the field AND palette
336 t3lib_div
::modifyHTMLColorAll($GLOBALS['SOBE']->doc
->bgColor
,-20), // Background for the field header
337 t3lib_div
::modifyHTMLColorAll($GLOBALS['SOBE']->doc
->bgColor
,-10), // Background for the palette field header
338 'black', // Field header font color
339 '#666666' // Palette field header font color
341 $this->defColorScheme
= array();
343 // Override / Setting defaults from TBE_STYLES array
344 $this->resetSchemes();
346 // Setting the current colorScheme to default.
347 $this->defColorScheme
= $this->colorScheme
;
348 $this->defClassScheme
= $this->classScheme
;
350 // Define whitelist that allows TCA field configuration to be overridden by TSconfig, @see overrideFieldConf():
351 $this->allowOverrideMatrix
= array(
352 'input' => array('size', 'max'),
353 'text' => array('cols', 'rows', 'wrap'),
354 'check' => array('cols', 'showIfRTE'),
355 'select' => array('size', 'autoSizeMax', 'maxitems', 'minitems'),
356 'group' => array('size', 'autoSizeMax', 'max_size', 'show_thumbs', 'maxitems', 'minitems', 'disable_controls'),
357 'inline' => array('appearance', 'behaviour', 'foreign_label', 'foreign_selector', 'foreign_unique', 'maxitems', 'minitems', 'size', 'autoSizeMax', 'symmetric_label'),
360 // Create instance of t3lib_TCEforms_inline only if this a non-IRRE-AJAX call:
361 if (!isset($GLOBALS['ajaxID']) ||
strpos($GLOBALS['ajaxID'], 't3lib_TCEforms_inline::')!==0) {
362 $this->inline
= t3lib_div
::makeInstance('t3lib_TCEforms_inline');
365 // Prepare user defined objects (if any) for hooks which extend this function:
366 $this->hookObjectsMainFields
= array();
367 if (is_array ($TYPO3_CONF_VARS['SC_OPTIONS']['t3lib/class.t3lib_tceforms.php']['getMainFieldsClass'])) {
368 foreach ($TYPO3_CONF_VARS['SC_OPTIONS']['t3lib/class.t3lib_tceforms.php']['getMainFieldsClass'] as $classRef) {
369 $this->hookObjectsMainFields
[] = &t3lib_div
::getUserObj($classRef);
372 $this->hookObjectsSingleField
= array();
373 if (is_array ($TYPO3_CONF_VARS['SC_OPTIONS']['t3lib/class.t3lib_tceforms.php']['getSingleFieldClass'])) {
374 foreach ($TYPO3_CONF_VARS['SC_OPTIONS']['t3lib/class.t3lib_tceforms.php']['getSingleFieldClass'] as $classRef) {
375 $this->hookObjectsSingleField
[] = &t3lib_div
::getUserObj($classRef);
382 * Initialize various internal variables.
386 function initDefaultBEmode() {
388 $this->prependFormFieldNames
= 'data';
389 $this->formName
= 'editform';
390 $this->setNewBEDesign();
391 $this->docLarge
= $BE_USER->uc
['edit_wideDocument'] ?
1 : 0;
392 $this->edit_showFieldHelp
= $BE_USER->uc
['edit_showFieldHelp'];
394 $this->edit_docModuleUpload
= $BE_USER->uc
['edit_docModuleUpload'];
395 $this->titleLen
= $BE_USER->uc
['titleLen']; // @deprecated since TYPO3 4.1
397 $this->inline
->init($this);
416 /*******************************************************
418 * Rendering the forms, fields etc
420 *******************************************************/
423 * Will return the TCEform element for just a single field from a record.
424 * The field must be listed in the currently displayed fields (as found in [types][showitem]) for the record.
425 * This also means that the $table/$row supplied must be complete so the list of fields to show can be found correctly
427 * @param string The table name
428 * @param array The record from the table for which to render a field.
429 * @param string The field name to return the TCEform element for.
430 * @return string HTML output
431 * @see getMainFields()
433 function getSoloField($table,$row,$theFieldToReturn) {
437 t3lib_div
::loadTCA($table);
438 $typeNum = $this->getRTypeNum($table,$row);
439 if ($TCA[$table]['types'][$typeNum]) {
440 $itemList = $TCA[$table]['types'][$typeNum]['showitem'];
442 $fields = t3lib_div
::trimExplode(',',$itemList,1);
443 $excludeElements = $this->excludeElements
= $this->getExcludeElements($table,$row,$typeNum);
446 while(list(,$fieldInfo)=each($fields)) {
447 $parts = explode(';',$fieldInfo);
449 $theField = trim($parts[0]);
450 if (!in_array($theField,$excludeElements) && !strcmp($theField,$theFieldToReturn)) {
451 if ($TCA[$table]['columns'][$theField]) {
452 $sField = $this->getSingleField($table,$theField,$row,$parts[1],1,$parts[3],$parts[2]);
453 return $sField['ITEM'];
463 * Based on the $table and $row of content, this displays the complete TCEform for the record.
464 * 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.
466 * @param string The table name
467 * @param array The record from the table for which to render a field.
468 * @param integer Depth level
469 * @return string HTML output
470 * @see getSoloField()
472 function getMainFields($table,$row,$depth=0) {
473 global $TCA, $TYPO3_CONF_VARS;
475 $this->renderDepth
=$depth;
478 $out_array = array(array());
479 $out_array_meta = array(array(
480 'title' => $this->getLL('l_generalTab')
485 $this->palettesRendered
=array();
486 $this->palettesRendered
[$this->renderDepth
][$table]=array();
488 // Hook: getMainFields_preProcess (requested by Thomas Hempel for use with the "dynaflex" extension)
489 foreach ($this->hookObjectsMainFields
as $hookObj) {
490 if (method_exists($hookObj,'getMainFields_preProcess')) {
491 $hookObj->getMainFields_preProcess($table,$row,$this);
497 // Load the full TCA for the table.
498 t3lib_div
::loadTCA($table);
500 // Get dividers2tabs setting from TCA of the current table:
501 $dividers2tabs =& $TCA[$table]['ctrl']['dividers2tabs'];
503 // Load the description content for the table.
504 if ($this->edit_showFieldHelp ||
$this->doLoadTableDescr($table)) {
505 $GLOBALS['LANG']->loadSingleTableDescription($table);
507 // Get the current "type" value for the record.
508 $typeNum = $this->getRTypeNum($table,$row);
510 // Find the list of fields to display:
511 if ($TCA[$table]['types'][$typeNum]) {
512 $itemList = $TCA[$table]['types'][$typeNum]['showitem'];
513 if ($itemList) { // If such a list existed...
514 // Explode the field list and possibly rearrange the order of the fields, if configured for
515 $fields = t3lib_div
::trimExplode(',',$itemList,1);
516 if ($this->fieldOrder
) {
517 $fields = $this->rearrange($fields);
520 // Get excluded fields, added fiels and put it together:
521 $excludeElements = $this->excludeElements
= $this->getExcludeElements($table,$row,$typeNum);
522 $fields = $this->mergeFieldsWithAddedFields($fields,$this->getFieldsToAdd($table,$row,$typeNum));
524 // If TCEforms will render a tab menu in the next step, push the name to the tab stack:
525 $tabIdentString = '';
526 $tabIdentStringMD5 = '';
527 if (strstr($itemList, '--div--') !== false && $this->enableTabMenu
&& $dividers2tabs) {
528 $tabIdentString = 'TCEforms:'.$table.':'.$row['uid'];
529 $tabIdentStringMD5 = $GLOBALS['TBE_TEMPLATE']->getDynTabMenuId($tabIdentString);
530 // Remember that were currently working on the general tab:
531 if (isset($fields[0]) && strpos($fields[0], '--div--') !== 0) {
532 $this->pushToDynNestedStack('tab', $tabIdentStringMD5.'-1');
536 // Traverse the fields to render:
538 foreach($fields as $fieldInfo) {
539 // Exploding subparts of the field configuration:
540 $parts = explode(';',$fieldInfo);
542 // Getting the style information out:
543 $color_style_parts = t3lib_div
::trimExplode('-',$parts[4]);
544 if (strcmp($color_style_parts[0],'')) {
545 $this->setColorScheme($GLOBALS['TBE_STYLES']['colorschemes'][intval($color_style_parts[0])]);
547 if (strcmp($color_style_parts[1],'')) {
548 $this->fieldStyle
= $GLOBALS['TBE_STYLES']['styleschemes'][intval($color_style_parts[1])];
549 if (!isset($this->fieldStyle
)) $this->fieldStyle
= $GLOBALS['TBE_STYLES']['styleschemes'][0];
551 if (strcmp($color_style_parts[2],'')) {
552 $this->wrapBorder($out_array[$out_sheet],$out_pointer);
553 $this->borderStyle
= $GLOBALS['TBE_STYLES']['borderschemes'][intval($color_style_parts[2])];
554 if (!isset($this->borderStyle
)) $this->borderStyle
= $GLOBALS['TBE_STYLES']['borderschemes'][0];
558 $theField = $parts[0];
559 if (!in_array($theField,$excludeElements)) {
560 if ($TCA[$table]['columns'][$theField]) {
563 if ($parts[2] && !isset($this->palettesRendered
[$this->renderDepth
][$table][$parts[2]])) {
564 $sFieldPal=$this->getPaletteFields($table,$row,$parts[2]);
565 $this->palettesRendered
[$this->renderDepth
][$table][$parts[2]] = 1;
567 $sField = $this->getSingleField($table,$theField,$row,$parts[1],0,$parts[3],$parts[2]);
568 if ($sField) { $sField.= $sFieldPal; }
570 $out_array[$out_sheet][$out_pointer].= $sField;
571 } elseif ($theField=='--div--') {
573 $out_array[$out_sheet][$out_pointer].=$this->getDivider();
575 if ($this->enableTabMenu
&& $dividers2tabs) {
576 $this->wrapBorder($out_array[$out_sheet],$out_pointer);
577 // Remove last tab entry from the dynNestedStack:
579 // Remove the previous sheet from stack (if any):
580 $this->popFromDynNestedStack('tab', $tabIdentStringMD5.'-'.($out_sheet));
581 // Remember on which sheet we're currently working:
582 $this->pushToDynNestedStack('tab', $tabIdentStringMD5.'-'.($out_sheet+
1));
583 $out_array[$out_sheet] = array();
584 $out_array_meta[$out_sheet]['title'] = $this->sL($parts[1]);
585 // Register newline for Tab
586 $out_array_meta[$out_sheet]['newline'] = ($parts[2] == "newline");
588 } else { // Setting alternative title for "General" tab if "--div--" is the very first element.
589 $out_array_meta[$out_sheet]['title'] = $this->sL($parts[1]);
590 // Only add the first tab to the dynNestedStack if there are more tabs:
591 if ($tabIdentString && strpos($itemList, '--div--', strlen($fieldInfo))) {
592 $this->pushToDynNestedStack('tab', $tabIdentStringMD5.'-1');
595 } elseif($theField=='--palette--') {
596 if ($parts[2] && !isset($this->palettesRendered
[$this->renderDepth
][$table][$parts[2]])) {
597 // render a 'header' if not collapsed
598 if ($TCA[$table]['palettes'][$parts[2]]['canNotCollapse'] AND $parts[1]) {
599 $out_array[$out_sheet][$out_pointer].=$this->getPaletteFields($table,$row,$parts[2],$this->sL($parts[1]));
601 $out_array[$out_sheet][$out_pointer].=$this->getPaletteFields($table,$row,$parts[2],'','',$this->sL($parts[1]));
603 $this->palettesRendered
[$this->renderDepth
][$table][$parts[2]] = 1;
614 // Hook: getMainFields_postProcess (requested by Thomas Hempel for use with the "dynaflex" extension)
615 foreach ($this->hookObjectsMainFields
as $hookObj) {
616 if (method_exists($hookObj,'getMainFields_postProcess')) {
617 $hookObj->getMainFields_postProcess($table,$row,$this);
621 // Wrapping a border around it all:
622 $this->wrapBorder($out_array[$out_sheet],$out_pointer);
625 $this->resetSchemes();
627 // Rendering Main palettes, if any
628 $mParr = t3lib_div
::trimExplode(',',$TCA[$table]['ctrl']['mainpalette']);
631 foreach ($mParr as $mP) {
632 if (!isset($this->palettesRendered
[$this->renderDepth
][$table][$mP])) {
633 $temp_palettesCollapsed=$this->palettesCollapsed
;
634 $this->palettesCollapsed
=0;
635 $label = ($i==0?
$this->getLL('l_generalOptions'):$this->getLL('l_generalOptions_more'));
636 $out_array[$out_sheet][$out_pointer].=$this->getPaletteFields($table,$row,$mP,$label);
637 $this->palettesCollapsed
=$temp_palettesCollapsed;
638 $this->palettesRendered
[$this->renderDepth
][$table][$mP] = 1;
640 $this->wrapBorder($out_array[$out_sheet],$out_pointer);
642 if ($this->renderDepth
) {
643 $this->renderDepth
--;
648 // Return the imploded $out_array:
649 if ($out_sheet>0) { // There were --div-- dividers around...
651 // Create parts array for the tab menu:
653 foreach ($out_array as $idx => $sheetContent) {
654 $content = implode('', $sheetContent);
656 // Wrap content (row) with table-tag, otherwise tab/sheet will be disabled (see getdynTabMenu() )
657 $content = '<table border="0" cellspacing="0" cellpadding="0" width="100%">'.$content.'</table>';
659 $parts[$idx] = array(
660 'label' => $out_array_meta[$idx]['title'],
661 'content' => $content,
662 'newline' => $out_array_meta[$idx]['newline'], // Newline for this tab/sheet
666 if (count($parts) > 1) {
667 // Unset the current level of tab menus:
668 $this->popFromDynNestedStack('tab', $tabIdentStringMD5.'-'.($out_sheet+
1));
669 $dividersToTabsBehaviour = (isset($TCA[$table]['ctrl']['dividers2tabs']) ?
$TCA[$table]['ctrl']['dividers2tabs'] : 1);
670 $output = $this->getDynTabMenu($parts, $tabIdentString, $dividersToTabsBehaviour);
673 // If there is only one tab/part there is no need to wrap it into the dynTab code
674 $output = isset($parts[0]) ?
trim($parts[0]['content']) : '';
685 // Only one, so just implode:
686 $output = implode('',$out_array[$out_sheet]);
693 * Will return the TCEform elements for a pre-defined list of fields.
694 * 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.
695 * Used for displaying forms for the frontend edit icons for instance.
697 * @param string The table name
698 * @param array The record array.
699 * @param string Commalist of fields from the table. These will be shown in the specified order in a form.
700 * @return string TCEform elements in a string.
702 function getListedFields($table,$row,$list) {
705 t3lib_div
::loadTCA($table);
706 if ($this->edit_showFieldHelp ||
$this->doLoadTableDescr($table)) {
707 $GLOBALS['LANG']->loadSingleTableDescription($table);
711 $types_fieldConfig = t3lib_BEfunc
::getTCAtypes($table,$row,1);
713 $editFieldList=array_unique(t3lib_div
::trimExplode(',',$list,1));
714 foreach($editFieldList as $theFieldC) {
715 list($theField,$palFields) = preg_split('/\[|\]/', $theFieldC);
716 $theField = trim($theField);
717 $palFields = trim($palFields);
718 if ($TCA[$table]['columns'][$theField]) {
719 $parts = t3lib_div
::trimExplode(';',$types_fieldConfig[$theField]['origString']);
720 $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.
722 } elseif($theField=='--div--') {
723 $out.= $this->getDivider();
726 $out.= $this->getPaletteFields($table,$row,'','',implode(',',t3lib_div
::trimExplode('|',$palFields,1)));
734 * Creates a palette (collection of secondary options).
736 * @param string The table name
737 * @param array The row array
738 * @param string The palette number/pointer
739 * @param string Header string for the palette (used when in-form). If not set, no header item is made.
740 * @param string Optional alternative list of fields for the palette
741 * @param string Optional Link text for activating a palette (when palettes does not have another form element to belong to).
742 * @return string HTML code.
744 function getPaletteFields($table,$row,$palette,$header='',$itemList='',$collapsedHeader=NULL) {
745 if (!$this->doPrintPalette
) {
750 $parts = $this->loadPaletteElements($table, $row, $palette, $itemList);
752 // Put palette together if there are fields in it:
755 $out .= $this->intoTemplate(
756 array('HEADER' => htmlspecialchars($header)),
757 $this->palFieldTemplateHeader
761 $collapsed = $this->isPalettesCollapsed($table,$palette);
764 if ($collapsed && $collapsedHeader !== NULL) {
765 list($thePalIcon,) = $this->wrapOpenPalette('<img'.t3lib_iconWorks
::skinImg($this->backPath
,'gfx/options.gif','width="18" height="16"').' border="0" title="'.htmlspecialchars($this->getLL('l_moreOptions')).'" alt="" />',$table,$row,$palette,1);
766 $thePalIcon = '<span style="margin-left: 20px;">' . $thePalIcon . $collapsedHeader . '</span>';
769 $paletteHtml = $this->wrapPaletteField($this->printPalette($parts), $table, $row ,$palette, $collapsed);
771 $out .= $this->intoTemplate(
772 array('PALETTE' => $thePalIcon . $paletteHtml),
773 $this->palFieldTemplate
780 * Returns the form HTML code for a database table field.
782 * @param string The table name
783 * @param string The field name
784 * @param array The record to edit from the database table.
785 * @param string Alternative field name label to show.
786 * @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).
787 * @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.
788 * @param integer The palette pointer.
789 * @return mixed String (normal) or array (palettes)
791 function getSingleField($table,$field,$row,$altName='',$palette=0,$extra='',$pal=0) {
792 global $TCA,$BE_USER;
794 // Hook: getSingleField_preProcess
795 foreach ($this->hookObjectsSingleField
as $hookObj) {
796 if (method_exists($hookObj,'getSingleField_preProcess')) {
797 $hookObj->getSingleField_preProcess($table, $field, $row, $altName, $palette, $extra, $pal, $this);
803 $PA['altName'] = $altName;
804 $PA['palette'] = $palette;
805 $PA['extra'] = $extra;
808 // Make sure to load full $TCA array for the table:
809 t3lib_div
::loadTCA($table);
811 // Get the TCA configuration for the current field:
812 $PA['fieldConf'] = $TCA[$table]['columns'][$field];
813 $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
815 $skipThisField = $this->inline
->skipField($table, $field, $row, $PA['fieldConf']['config']);
817 // Now, check if this field is configured and editable (according to excludefields + other configuration)
818 if ( is_array($PA['fieldConf']) &&
820 (!$PA['fieldConf']['exclude'] ||
$BE_USER->check('non_exclude_fields',$table.':'.$field)) &&
821 $PA['fieldConf']['config']['form_type']!='passthrough' &&
822 ($this->RTEenabled ||
!$PA['fieldConf']['config']['showIfRTE']) &&
823 (!$PA['fieldConf']['displayCond'] ||
$this->isDisplayCondition($PA['fieldConf']['displayCond'],$row)) &&
824 (!$TCA[$table]['ctrl']['languageField'] ||
$PA['fieldConf']['l10n_display'] ||
strcmp($PA['fieldConf']['l10n_mode'],'exclude') ||
$row[$TCA[$table]['ctrl']['languageField']]<=0) &&
825 (!$TCA[$table]['ctrl']['languageField'] ||
!$this->localizationMode ||
$this->localizationMode
===$PA['fieldConf']['l10n_cat'])
830 // Fetching the TSconfig for the current table/field. This includes the $row which means that
831 $PA['fieldTSConfig'] = $this->setTSconfig($table,$row,$field);
833 // If the field is NOT disabled from TSconfig (which it could have been) then render it
834 if (!$PA['fieldTSConfig']['disabled']) {
835 // Override fieldConf by fieldTSconfig:
836 $PA['fieldConf']['config'] = $this->overrideFieldConf($PA['fieldConf']['config'], $PA['fieldTSConfig']);
839 $PA['itemFormElName']=$this->prependFormFieldNames
.'['.$table.']['.$row['uid'].']['.$field.']'; // Form field name
840 $PA['itemFormElName_file']=$this->prependFormFieldNames_file
.'['.$table.']['.$row['uid'].']['.$field.']'; // Form field name, in case of file uploads
841 $PA['itemFormElValue']=$row[$field]; // The value to show in the form field.
842 $PA['itemFormElID']=$this->prependFormFieldNames
.'_'.$table.'_'.$row['uid'].'_'.$field;
844 // set field to read-only if configured for translated records to show default language content as readonly
845 if ($PA['fieldConf']['l10n_display'] && t3lib_div
::inList($PA['fieldConf']['l10n_display'], 'defaultAsReadonly') && $row[$TCA[$table]['ctrl']['languageField']] > 0) {
846 $PA['fieldConf']['config']['readOnly'] = true;
847 $PA['itemFormElValue'] = $this->defaultLanguageData
[$table.':'.$row['uid']][$field];
850 // 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"
852 ($TCA[$table]['ctrl']['type'] && !strcmp($field,$TCA[$table]['ctrl']['type'])) ||
853 ($TCA[$table]['ctrl']['requestUpdate'] && t3lib_div
::inList($TCA[$table]['ctrl']['requestUpdate'],$field))) {
854 if($GLOBALS['BE_USER']->jsConfirmation(1)) {
855 $alertMsgOnChange = 'if (confirm(TBE_EDITOR.labels.onChangeAlert) && TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm() };';
857 $alertMsgOnChange = 'if (TBE_EDITOR.checkSubmit(-1)){ TBE_EDITOR.submitForm() };';
860 $alertMsgOnChange = '';
863 // Render as a hidden field?
864 if (in_array($field,$this->hiddenFieldListArr
)) {
865 $this->hiddenFieldAccum
[]='<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
866 } else { // Render as a normal field:
868 // 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.
869 if (!$PA['palette']) {
870 $paletteFields = $this->loadPaletteElements($table, $row, $PA['pal']);
871 if ($PA['pal'] && $this->isPalettesCollapsed($table,$PA['pal']) && count($paletteFields)) {
872 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);
878 // onFocus attribute to add to the field:
879 $PA['onFocus'] = ($palJSfunc && !$BE_USER->uc
['dontShowPalettesOnFocusInAB']) ?
' onfocus="'.htmlspecialchars($palJSfunc).'"' : '';
883 $PA['label'] = ($PA['altName'] ?
$PA['altName'] : $PA['fieldConf']['label']);
884 $PA['label'] = ($PA['fieldTSConfig']['label'] ?
$PA['fieldTSConfig']['label'] : $PA['label']);
885 $PA['label'] = ($PA['fieldTSConfig']['label.'][$GLOBALS['LANG']->lang
] ?
$PA['fieldTSConfig']['label.'][$GLOBALS['LANG']->lang
] : $PA['label']);
886 $PA['label'] = $this->sL($PA['label']);
887 // JavaScript code for event handlers:
888 $PA['fieldChangeFunc']=array();
889 $PA['fieldChangeFunc']['TBE_EDITOR_fieldChanged'] = "TBE_EDITOR.fieldChanged('".$table."','".$row['uid']."','".$field."','".$PA['itemFormElName']."');";
890 $PA['fieldChangeFunc']['alert']=$alertMsgOnChange;
891 // if this is the child of an inline type and it is the field creating the label
892 if ($this->inline
->isInlineChildAndLabelField($table, $field)) {
893 $PA['fieldChangeFunc']['inline'] = "inline.handleChangedField('".$PA['itemFormElName']."','".$this->inline
->inlineNames
['object']."[$table][".$row['uid']."]');";
896 // Based on the type of the item, call a render function:
897 $item = $this->getSingleField_SW($table,$field,$row,$PA);
899 // Add language + diff
900 if ($PA['fieldConf']['l10n_display'] && (t3lib_div
::inList($PA['fieldConf']['l10n_display'], 'hideDiff') || t3lib_div
::inList($PA['fieldConf']['l10n_display'], 'defaultAsReadonly'))) {
901 $renderLanguageDiff = false;
903 $renderLanguageDiff = true;
906 if ($renderLanguageDiff) {
907 $item = $this->renderDefaultLanguageContent($table,$field,$row,$item);
908 $item = $this->renderDefaultLanguageDiff($table,$field,$row,$item);
911 // If the record has been saved and the "linkTitleToSelf" is set, we make the field name into a link, which will load ONLY this field in alt_doc.php
912 $PA['label'] = t3lib_div
::deHSCentities(htmlspecialchars($PA['label']));
913 if (t3lib_div
::testInt($row['uid']) && $PA['fieldTSConfig']['linkTitleToSelf'] && !t3lib_div
::_GP('columnsOnly')) {
914 $lTTS_url = $this->backPath
.'alt_doc.php?edit['.$table.']['.$row['uid'].']=edit&columnsOnly='.$field.'&returnUrl='.rawurlencode($this->thisReturnUrl());
915 $PA['label'] = '<a href="'.htmlspecialchars($lTTS_url).'">'.$PA['label'].'</a>';
918 // Create output value:
919 if ($PA['fieldConf']['config']['form_type']=='user' && $PA['fieldConf']['config']['noTableWrapping']) {
921 } elseif ($PA['palette']) {
924 'NAME'=>$PA['label'],
929 'HELP_ICON' => $this->helpTextIcon($table,$field,1)
931 $out = $this->addUserTemplateMarkers($out,$table,$field,$row,$PA);
935 'NAME'=>$PA['label'],
939 'HELP_ICON'=>$this->helpTextIcon($table,$field),
940 'HELP_TEXT'=>$this->helpText($table,$field),
941 'PAL_LINK_ICON'=>$thePalIcon,
944 $out = $this->addUserTemplateMarkers($out,$table,$field,$row,$PA);
946 $out=$this->intoTemplate($out);
949 } else $this->commentMessages
[]=$this->prependFormFieldNames
.'['.$table.']['.$row['uid'].']['.$field.']: Disabled by TSconfig';
951 // Hook: getSingleField_postProcess
952 foreach ($this->hookObjectsSingleField
as $hookObj) {
953 if (method_exists($hookObj,'getSingleField_postProcess')) {
954 $hookObj->getSingleField_postProcess($table, $field, $row, $out, $PA, $this);
957 // Return value (string or array)
962 * Rendering a single item for the form
964 * @param string Table name of record
965 * @param string Fieldname to render
966 * @param array The record
967 * @param array parameters array containing a lot of stuff. Value by Reference!
968 * @return string Returns the item as HTML code to insert
970 * @see getSingleField(), getSingleField_typeFlex_draw()
972 function getSingleField_SW($table,$field,$row,&$PA) {
973 $PA['fieldConf']['config']['form_type'] = $PA['fieldConf']['config']['form_type'] ?
$PA['fieldConf']['config']['form_type'] : $PA['fieldConf']['config']['type']; // Using "form_type" locally in this script
975 // Hook: getSingleField_beforeRender
976 foreach ($this->hookObjectsSingleField
as $hookObject) {
977 if (method_exists($hookObject, 'getSingleField_beforeRender')) {
978 $hookObject->getSingleField_beforeRender($table, $field, $row, $PA);
982 switch($PA['fieldConf']['config']['form_type']) {
984 $item = $this->getSingleField_typeInput($table,$field,$row,$PA);
987 $item = $this->getSingleField_typeText($table,$field,$row,$PA);
990 $item = $this->getSingleField_typeCheck($table,$field,$row,$PA);
993 $item = $this->getSingleField_typeRadio($table,$field,$row,$PA);
996 $item = $this->getSingleField_typeSelect($table,$field,$row,$PA);
999 $item = $this->getSingleField_typeGroup($table,$field,$row,$PA);
1002 $item = $this->inline
->getSingleField_typeInline($table,$field,$row,$PA);
1005 $item = $this->getSingleField_typeNone($table,$field,$row,$PA);
1008 $item = $this->getSingleField_typeUser($table,$field,$row,$PA);
1011 $item = $this->getSingleField_typeFlex($table,$field,$row,$PA);
1014 $item = $this->getSingleField_typeUnknown($table,$field,$row,$PA);
1039 /**********************************************************
1041 * Rendering of each TCEform field type
1043 ************************************************************/
1046 * Generation of TCEform elements of the type "input"
1047 * This will render a single-line input form field, possibly with various control/validation features
1049 * @param string The table name of the record
1050 * @param string The field name which this element is supposed to edit
1051 * @param array The record data array where the value(s) for the field can be found
1052 * @param array An array with additional configuration options.
1053 * @return string The HTML code for the TCEform field
1055 function getSingleField_typeInput($table,$field,$row,&$PA) {
1056 // typo3FormFieldSet(theField, evallist, is_in, checkbox, checkboxValue)
1057 // typo3FormFieldGet(theField, evallist, is_in, checkbox, checkboxValue, checkbox_off)
1059 $config = $PA['fieldConf']['config'];
1061 # $specConf = $this->getSpecConfForField($table,$row,$field);
1062 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1063 $size = t3lib_div
::intInRange($config['size']?
$config['size']:30,5,$this->maxInputWidth
);
1064 $evalList = t3lib_div
::trimExplode(',',$config['eval'],1);
1066 if($this->renderReadonly ||
$config['readOnly']) {
1067 $itemFormElValue = $PA['itemFormElValue'];
1068 if (in_array('date',$evalList)) {
1069 $config['format'] = 'date';
1070 } elseif (in_array('datetime',$evalList)) {
1071 $config['format'] = 'datetime';
1072 } elseif (in_array('time',$evalList)) {
1073 $config['format'] = 'time';
1075 if (in_array('password',$evalList)) {
1076 $itemFormElValue = $itemFormElValue ?
'*********' : '';
1078 return $this->getSingleField_typeNone_render($config, $itemFormElValue);
1081 foreach ($evalList as $func) {
1084 $this->registerRequiredProperty('field', $table.'_'.$row['uid'].'_'.$field, $PA['itemFormElName']);
1085 // Mark this field for date/time disposal:
1086 if (array_intersect($evalList, array('date', 'datetime', 'time'))) {
1087 $this->requiredAdditional
[$PA['itemFormElName']]['isPositiveNumber'] = true;
1091 if (substr($func, 0, 3) == 'tx_') {
1092 // Pair hook to the one in t3lib_TCEmain::checkValue_input_Eval()
1093 $evalObj = t3lib_div
::getUserObj($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['tce']['formevals'][$func].':&'.$func);
1094 if (is_object($evalObj) && method_exists($evalObj, 'deevaluateFieldValue')) {
1096 'value' => $PA['itemFormElValue']
1098 $PA['itemFormElValue'] = $evalObj->deevaluateFieldValue($_params);
1105 $paramsList = "'".$PA['itemFormElName']."','".implode(',',$evalList)."','".trim($config['is_in'])."',".(isset($config['checkbox'])?
1:0).",'".$config['checkbox']."'";
1106 if (isset($config['checkbox'])) {
1107 // Setting default "click-checkbox" values for eval types "date" and "datetime":
1108 $thisMidnight = gmmktime(0,0,0);
1109 if (in_array('date',$evalList)) {
1110 $checkSetValue = $thisMidnight;
1111 } elseif (in_array('datetime',$evalList)) {
1112 $checkSetValue = time();
1113 } elseif (in_array('year',$evalList)) {
1114 $checkSetValue = gmdate('Y');
1116 $cOnClick = 'typo3form.fieldGet('.$paramsList.',1,\''.$checkSetValue.'\');'.implode('',$PA['fieldChangeFunc']);
1117 $item .= '<input type="checkbox" class="' . $this->formElStyleClassValue('check', TRUE) . ' alignToInputText" name="' . $PA['itemFormElName'] . '_cb" onclick="' . htmlspecialchars($cOnClick) . '" />';
1119 if ((in_array('date',$evalList) ||
in_array('datetime',$evalList)) && $PA['itemFormElValue']>0){
1120 // Add server timezone offset to UTC to our stored date
1121 $PA['itemFormElValue'] +
= date('Z', $PA['itemFormElValue']);
1124 $PA['fieldChangeFunc'] = array_merge(array('typo3form.fieldGet'=>'typo3form.fieldGet('.$paramsList.');'), $PA['fieldChangeFunc']);
1125 $mLgd = ($config['max']?
$config['max']:256);
1126 $iOnChange = implode('',$PA['fieldChangeFunc']);
1127 $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.
1128 $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.
1129 $this->extJSCODE
.='typo3form.fieldSet('.$paramsList.');';
1131 // going through all custom evaluations configured for this field
1132 foreach ($evalList as $evalData) {
1133 if (substr($evalData, 0, 3) == 'tx_') {
1134 $evalObj = t3lib_div
::getUserObj($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['tce']['formevals'][$evalData].':&'.$evalData);
1135 if(is_object($evalObj) && method_exists($evalObj, 'returnFieldJS')) {
1136 $this->extJSCODE
.= "\n\nfunction ".$evalData."(value) {\n".$evalObj->returnFieldJS()."\n}\n";
1141 // Creating an alternative item without the JavaScript handlers.
1142 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'_hr" value="" />';
1143 $altItem.= '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
1145 // Wrap a wizard around the item?
1146 $item= $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'].'_hr',$specConf);
1152 * Generation of TCEform elements of the type "text"
1153 * This will render a <textarea> OR RTE area form field, possibly with various control/validation features
1155 * @param string The table name of the record
1156 * @param string The field name which this element is supposed to edit
1157 * @param array The record data array where the value(s) for the field can be found
1158 * @param array An array with additional configuration options.
1159 * @return string The HTML code for the TCEform field
1161 function getSingleField_typeText($table,$field,$row,&$PA) {
1164 $config = $PA['fieldConf']['config'];
1166 if($this->renderReadonly ||
$config['readOnly']) {
1167 return $this->getSingleField_typeNone_render($config, $PA['itemFormElValue']);
1170 // Setting columns number:
1171 $cols = t3lib_div
::intInRange($config['cols'] ?
$config['cols'] : 30, 5, $this->maxTextareaWidth
);
1173 // Setting number of rows:
1174 $origRows = $rows = t3lib_div
::intInRange($config['rows'] ?
$config['rows'] : 5, 1, 20);
1175 if (strlen($PA['itemFormElValue']) > $this->charsPerRow
*2) {
1176 $cols = $this->maxTextareaWidth
;
1177 $rows = t3lib_div
::intInRange(round(strlen($PA['itemFormElValue'])/$this->charsPerRow
), count(explode(chr(10),$PA['itemFormElValue'])), 20);
1178 if ($rows<$origRows) $rows = $origRows;
1182 $RTEwasLoaded = 0; // Set true, if the RTE is loaded; If not a normal textarea is shown.
1183 $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...
1185 // "Extra" configuration; Returns configuration for the field based on settings found in the "types" fieldlist. Traditionally, this is where RTE configuration has been found.
1186 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1188 // Setting up the altItem form field, which is a hidden field containing the value
1189 $altItem = '<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
1191 // If RTE is generally enabled (TYPO3_CONF_VARS and user settings)
1192 if ($this->RTEenabled
) {
1193 $p = t3lib_BEfunc
::getSpecConfParametersFromArray($specConf['rte_transform']['parameters']);
1194 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.
1195 t3lib_BEfunc
::fixVersioningPid($table,$row);
1196 list($tscPID,$thePidValue) = $this->getTSCpid($table,$row['uid'],$row['pid']);
1198 // If the pid-value is not negative (that is, a pid could NOT be fetched)
1199 if ($thePidValue >= 0) {
1200 $RTEsetup = $GLOBALS['BE_USER']->getTSConfig('RTE',t3lib_BEfunc
::getPagesTSconfig($tscPID));
1201 $RTEtypeVal = t3lib_BEfunc
::getTCAtypeValue($table,$row);
1202 $thisConfig = t3lib_BEfunc
::RTEsetup($RTEsetup['properties'],$table,$field,$RTEtypeVal);
1204 if (!$thisConfig['disabled']) {
1205 if (!$this->disableRTE
) {
1206 $this->RTEcounter++
;
1208 // Find alternative relative path for RTE images/links:
1209 $eFile = t3lib_parsehtml_proc
::evalWriteFile($specConf['static_write'], $row);
1210 $RTErelPath = is_array($eFile) ?
dirname($eFile['relEditFile']) : '';
1212 // Get RTE object, draw form and set flag:
1213 $RTEobj = &t3lib_BEfunc
::RTEgetObj();
1214 $item = $RTEobj->drawRTE($this,$table,$field,$row,$PA,$specConf,$thisConfig,$RTEtypeVal,$RTErelPath,$thePidValue);
1217 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf,1);
1221 $RTEwouldHaveBeenLoaded = 1;
1222 $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!)';
1224 } else $this->commentMessages
[] = $PA['itemFormElName'].': RTE is disabled by the Page TSconfig, "RTE"-key (eg. by RTE.default.disabled=0 or such)';
1225 } else $this->commentMessages
[] = $PA['itemFormElName'].': PID value could NOT be fetched. Rare error, normally with new records.';
1227 if (!isset($specConf['richtext'])) $this->commentMessages
[] = $PA['itemFormElName'].': RTE was not configured for this field in TCA-types';
1228 if (!(!$p['flag'] ||
!$row[$p['flag']])) $this->commentMessages
[] = $PA['itemFormElName'].': Field-flag ('.$PA['flag'].') has been set to disable RTE!';
1232 // Display ordinary field if RTE was not loaded.
1233 if (!$RTEwasLoaded) {
1234 if ($specConf['rte_only']) { // Show message, if no RTE (field can only be edited with RTE!)
1235 $item = '<p><em>'.htmlspecialchars($this->getLL('l_noRTEfound')).'</em></p>';
1237 if ($specConf['nowrap']) {
1240 $wrap = ($config['wrap'] ?
$config['wrap'] : 'virtual');
1244 if ($specConf['fixed-font']) { $classes[] = 'fixed-font'; }
1245 if ($specConf['enable-tab']) { $classes[] = 'enable-tab'; }
1247 $formWidthText = $this->formWidthText($cols,$wrap);
1249 // Extract class attributes from $formWidthText (otherwise it would be added twice to the output)
1251 if (preg_match('/ class="(.+?)"/',$formWidthText,$res)) {
1252 $formWidthText = str_replace(' class="'.$res[1].'"','',$formWidthText);
1253 $classes = array_merge($classes, explode(' ',$res[1]));
1256 if (count($classes)) {
1257 $class = ' class="'.implode(' ',$classes).'"';
1260 $evalList = t3lib_div
::trimExplode(',',$config['eval'],1);
1261 foreach ($evalList as $func) {
1264 $this->registerRequiredProperty('field', $table.'_'.$row['uid'].'_'.$field, $PA['itemFormElName']);
1267 if (substr($func, 0, 3) == 'tx_') {
1268 // Pair hook to the one in t3lib_TCEmain::checkValue_input_Eval() and t3lib_TCEmain::checkValue_text_Eval()
1269 $evalObj = t3lib_div
::getUserObj($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['tce']['formevals'][$func].':&'.$func);
1270 if (is_object($evalObj) && method_exists($evalObj, 'deevaluateFieldValue')) {
1272 'value' => $PA['itemFormElValue']
1274 $PA['itemFormElValue'] = $evalObj->deevaluateFieldValue($_params);
1281 $iOnChange = implode('',$PA['fieldChangeFunc']);
1283 <textarea name="'.$PA['itemFormElName'].'"'.$formWidthText.$class.' rows="'.$rows.'" wrap="'.$wrap.'" onchange="'.htmlspecialchars($iOnChange).'"'.$PA['onFocus'].'>'.
1284 t3lib_div
::formatForTextarea($PA['itemFormElValue']).
1286 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf,$RTEwouldHaveBeenLoaded);
1290 // Return field HTML:
1295 * Generation of TCEform elements of the type "check"
1296 * This will render a check-box OR an array of checkboxes
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
1304 function getSingleField_typeCheck($table,$field,$row,&$PA) {
1305 $config = $PA['fieldConf']['config'];
1308 if($this->renderReadonly ||
$config['readOnly']) {
1309 $disabled = ' disabled="disabled"';
1312 // Traversing the array of items:
1313 $selItems = $this->initItemArray($PA['fieldConf']);
1314 if ($config['itemsProcFunc']) $selItems = $this->procItems($selItems,$PA['fieldTSConfig']['itemsProcFunc.'],$config,$table,$row,$field);
1316 if (!count($selItems)) {
1317 $selItems[]=array('','');
1319 $thisValue = intval($PA['itemFormElValue']);
1321 $cols = intval($config['cols']);
1323 $item.= '<table border="0" cellspacing="0" cellpadding="0" class="typo3-TCEforms-checkboxArray">';
1324 for ($c=0;$c<count($selItems);$c++
) {
1326 if(!($c%
$cols)) { $item.='<tr>'; }
1327 $cBP = $this->checkBoxParams($PA['itemFormElName'],$thisValue,$c,count($selItems),implode('',$PA['fieldChangeFunc']));
1328 $cBName = $PA['itemFormElName'].'_'.$c;
1329 $cBID = $PA['itemFormElID'].'_'.$c;
1330 $item.= '<td nowrap="nowrap">'.
1331 '<input type="checkbox"'.$this->insertDefStyle('check').' value="1" name="'.$cBName.'"'.$cBP.$disabled.' id="'.$cBID.'" />'.
1332 $this->wrapLabels('<label for="'.$cBID.'">'.htmlspecialchars($p[0]).'</label> ').
1334 if(($c%
$cols)+
1==$cols) {$item.='</tr>';}
1337 $rest=$cols-($c%
$cols);
1338 for ($c=0;$c<$rest;$c++
) {
1339 $item.= '<td></td>';
1341 if ($c>0) { $item.= '</tr>'; }
1345 for ($c=0;$c<count($selItems);$c++
) {
1347 $cBP = $this->checkBoxParams($PA['itemFormElName'],$thisValue,$c,count($selItems),implode('',$PA['fieldChangeFunc']));
1348 $cBName = $PA['itemFormElName'].'_'.$c;
1349 $cBID = $PA['itemFormElID'].'_'.$c;
1350 $item.= ($c>0?
'<br />':'').
1351 '<input type="checkbox"'.$this->insertDefStyle('check').' value="1" name="'.$cBName.'"'.$cBP.$PA['onFocus'].$disabled.' id="'.$cBID.'" />'.
1352 $this->wrapLabels('<label for="'.$cBID.'">'.htmlspecialchars($p[0]).'</label>');
1356 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($thisValue).'" />';
1363 * Generation of TCEform elements of the type "radio"
1364 * This will render a series of radio buttons.
1366 * @param string The table name of the record
1367 * @param string The field name which this element is supposed to edit
1368 * @param array The record data array where the value(s) for the field can be found
1369 * @param array An array with additional configuration options.
1370 * @return string The HTML code for the TCEform field
1372 function getSingleField_typeRadio($table,$field,$row,&$PA) {
1373 $config = $PA['fieldConf']['config'];
1376 if($this->renderReadonly ||
$config['readOnly']) {
1377 $disabled = ' disabled="disabled"';
1380 // Get items for the array:
1381 $selItems = $this->initItemArray($PA['fieldConf']);
1382 if ($config['itemsProcFunc']) $selItems = $this->procItems($selItems,$PA['fieldTSConfig']['itemsProcFunc.'],$config,$table,$row,$field);
1384 // Traverse the items, making the form elements:
1385 for ($c=0;$c<count($selItems);$c++
) {
1387 $rID = $PA['itemFormElID'].'_'.$c;
1388 $rOnClick = implode('',$PA['fieldChangeFunc']);
1389 $rChecked = (!strcmp($p[1],$PA['itemFormElValue'])?
' checked="checked"':'');
1390 $item.= '<input type="radio"'.$this->insertDefStyle('radio').' name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($p[1]).'" onclick="'.htmlspecialchars($rOnClick).'"'.$rChecked.$PA['onFocus'].$disabled.' id="'.$rID.'" />
1391 <label for="'.$rID.'">'.htmlspecialchars($p[0]).'</label>
1399 * Generation of TCEform elements of the type "select"
1400 * This will render a selector box element, or possibly a special construction with two selector boxes. That depends on configuration.
1402 * @param string The table name of the record
1403 * @param string The field name which this element is supposed to edit
1404 * @param array The record data array where the value(s) for the field can be found
1405 * @param array An array with additional configuration options.
1406 * @return string The HTML code for the TCEform field
1408 function getSingleField_typeSelect($table,$field,$row,&$PA) {
1411 // Field configuration from TCA:
1412 $config = $PA['fieldConf']['config'];
1415 if($this->renderReadonly ||
$config['readOnly']) {
1416 $disabled = ' disabled="disabled"';
1419 // "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/.
1420 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
1422 // Getting the selector box items from the system
1423 $selItems = $this->addSelectOptionsToItemArray(
1424 $this->initItemArray($PA['fieldConf']),
1426 $this->setTSconfig($table, $row),
1429 // Possibly filter some items:
1430 $keepItemsFunc = create_function('$value', 'return $value[1];');
1431 $selItems = t3lib_div
::keepItemsInArray($selItems, $PA['fieldTSConfig']['keepItems'], $keepItemsFunc);
1432 // Possibly add some items:
1433 $selItems = $this->addItems($selItems, $PA['fieldTSConfig']['addItems.']);
1434 // Process items by a user function:
1435 if (isset($config['itemsProcFunc']) && $config['itemsProcFunc']) {
1436 $selItems = $this->procItems($selItems, $PA['fieldTSConfig']['itemsProcFunc.'], $config, $table, $row, $field);
1439 // Possibly remove some items:
1440 $removeItems = t3lib_div
::trimExplode(',',$PA['fieldTSConfig']['removeItems'],1);
1441 foreach($selItems as $tk => $p) {
1443 // Checking languages and authMode:
1444 $languageDeny = $TCA[$table]['ctrl']['languageField'] && !strcmp($TCA[$table]['ctrl']['languageField'], $field) && !$GLOBALS['BE_USER']->checkLanguageAccess($p[1]);
1445 $authModeDeny = $config['form_type']=='select' && $config['authMode'] && !$GLOBALS['BE_USER']->checkAuthMode($table,$field,$p[1],$config['authMode']);
1446 if (in_array($p[1],$removeItems) ||
$languageDeny ||
$authModeDeny) {
1447 unset($selItems[$tk]);
1448 } elseif (isset($PA['fieldTSConfig']['altLabels.'][$p[1]])) {
1449 $selItems[$tk][0]=$this->sL($PA['fieldTSConfig']['altLabels.'][$p[1]]);
1452 // Removing doktypes with no access:
1453 if ($table.'.'.$field == 'pages.doktype') {
1454 if (!($GLOBALS['BE_USER']->isAdmin() || t3lib_div
::inList($GLOBALS['BE_USER']->groupData
['pagetypes_select'],$p[1]))) {
1455 unset($selItems[$tk]);
1460 // Creating the label for the "No Matching Value" entry.
1461 $nMV_label = isset($PA['fieldTSConfig']['noMatchingValue_label']) ?
$this->sL($PA['fieldTSConfig']['noMatchingValue_label']) : '[ '.$this->getLL('l_noMatchingValue').' ]';
1463 // Prepare some values:
1464 $maxitems = intval($config['maxitems']);
1466 // If a SINGLE selector box...
1468 $item = $this->getSingleField_typeSelect_single($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1469 } elseif (!strcmp($config['renderMode'],'checkbox')) { // Checkbox renderMode
1470 $item = $this->getSingleField_typeSelect_checkbox($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1471 } elseif (!strcmp($config['renderMode'],'singlebox')) { // Single selector box renderMode
1472 $item = $this->getSingleField_typeSelect_singlebox($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1473 } else { // Traditional multiple selector box:
1474 $item = $this->getSingleField_typeSelect_multiple($table,$field,$row,$PA,$config,$selItems,$nMV_label);
1479 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
1480 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf);
1487 * Creates a single-selector box
1488 * (Render function for getSingleField_typeSelect())
1490 * @param string See getSingleField_typeSelect()
1491 * @param string See getSingleField_typeSelect()
1492 * @param array See getSingleField_typeSelect()
1493 * @param array See getSingleField_typeSelect()
1494 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1495 * @param array Items available for selection
1496 * @param string Label for no-matching-value
1497 * @return string The HTML code for the item
1498 * @see getSingleField_typeSelect()
1500 function getSingleField_typeSelect_single($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1501 // check against inline uniqueness
1502 $inlineParent = $this->inline
->getStructureLevel(-1);
1503 if(is_array($inlineParent) && $inlineParent['uid']) {
1504 if ($inlineParent['config']['foreign_table'] == $table && $inlineParent['config']['foreign_unique'] == $field) {
1505 $uniqueIds = $this->inline
->inlineData
['unique'][$this->inline
->inlineNames
['object'].'['.$table.']']['used'];
1506 $PA['fieldChangeFunc']['inlineUnique'] = "inline.updateUnique(this,'".$this->inline
->inlineNames
['object'].'['.$table."]','".$this->inline
->inlineNames
['form']."','".$row['uid']."');";
1508 // hide uid of parent record for symmetric relations
1509 if ($inlineParent['config']['foreign_table'] == $table && ($inlineParent['config']['foreign_field'] == $field ||
$inlineParent['config']['symmetric_field'] == $field)) {
1510 $uniqueIds[] = $inlineParent['uid'];
1517 $noMatchingValue = 1;
1519 $selicons = array();
1520 $onlySelectedIconShown = 0;
1521 $size = intval($config['size']);
1522 $selectedStyle = ''; // Style set on <select/>
1525 if($this->renderReadonly ||
$config['readOnly']) {
1526 $disabled = ' disabled="disabled"';
1527 $onlySelectedIconShown = 1;
1530 // Icon configuration:
1531 if ($config['suppress_icons']=='IF_VALUE_FALSE') {
1532 $suppressIcons = !$PA['itemFormElValue'] ?
1 : 0;
1533 } elseif ($config['suppress_icons']=='ONLY_SELECTED') {
1535 $onlySelectedIconShown=1;
1536 } elseif ($config['suppress_icons']) {
1538 } else $suppressIcons = 0;
1540 // Traverse the Array of selector box items:
1541 $optGroupStart = array();
1542 foreach($selItems as $p) {
1543 $sM = (!strcmp($PA['itemFormElValue'],$p[1])?
' selected="selected"':'');
1546 $noMatchingValue = 0;
1549 // Getting style attribute value (for icons):
1550 if ($config['iconsInOptionTags']) {
1551 $styleAttrValue = $this->optionTagStyle($p[2]);
1553 list($selectIconFile,$selectIconInfo) = $this->getIcon($p[2]);
1554 if (!empty($selectIconInfo)) {
1555 $selectedStyle = ' style="background-image: url('.$selectIconFile.'); background-repeat: no-repeat; background-position: 0% 50%; padding: 1px; padding-left: 24px; -webkit-background-size: 0;"';
1560 // Compiling the <option> tag:
1561 if (!($p[1] != $PA['itemFormElValue'] && is_array($uniqueIds) && in_array($p[1], $uniqueIds))) {
1562 if(!strcmp($p[1],'--div--')) {
1563 $optGroupStart[0] = $p[0];
1564 $optGroupStart[1] = $styleAttrValue;
1567 if (count($optGroupStart)) {
1568 if($optGroupOpen) { // Closing last optgroup before next one starts
1569 $opt[]='</optgroup>' . "\n";
1571 $opt[]= '<optgroup label="'.t3lib_div
::deHSCentities(htmlspecialchars($optGroupStart[0])).'"'.
1572 ($optGroupStart[1] ?
' style="'.htmlspecialchars($optGroupStart[1]).'"' : '').
1573 ' class="c-divider">' . "\n";
1574 $optGroupOpen = true;
1576 $optGroupStart = array();
1578 $opt[]= '<option value="'.htmlspecialchars($p[1]).'"'.
1580 ($styleAttrValue ?
' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1581 '>'.t3lib_div
::deHSCentities(htmlspecialchars($p[0])).'</option>' . "\n";
1585 // If there is an icon for the selector box (rendered in table under)...:
1586 if ($p[2] && !$suppressIcons && (!$onlySelectedIconShown ||
$sM)) {
1587 list($selIconFile,$selIconInfo)=$this->getIcon($p[2]);
1588 $iOnClick = $this->elName($PA['itemFormElName']) . '.selectedIndex=' . $c . '; ' .
1589 $this->elName($PA['itemFormElName']) . '.style.backgroundImage=' . $this->elName($PA['itemFormElName']) . '.options[' . $c .'].style.backgroundImage; ' .
1590 implode('',$PA['fieldChangeFunc']).$this->blur().'return false;';
1592 (!$onlySelectedIconShown ?
'<a href="#" onclick="'.htmlspecialchars($iOnClick).'">' : '').
1593 '<img src="'.$selIconFile.'" '.$selIconInfo[3].' vspace="2" border="0" title="'.htmlspecialchars($p[0]).'" alt="'.htmlspecialchars($p[0]).'" />'.
1594 (!$onlySelectedIconShown ?
'</a>' : ''),
1596 $onChangeIcon = 'this.style.backgroundImage=this.options[this.selectedIndex].style.backgroundImage;';
1601 if($optGroupOpen) { // Closing optgroup if open
1602 $opt[]='</optgroup>';
1603 $optGroupOpen = false;
1606 // No-matching-value:
1607 if ($PA['itemFormElValue'] && $noMatchingValue && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1608 $nMV_label = @sprintf
($nMV_label, $PA['itemFormElValue']);
1609 $opt[]= '<option value="'.htmlspecialchars($PA['itemFormElValue']).'" selected="selected">'.htmlspecialchars($nMV_label).'</option>';
1612 // Create item form fields:
1613 $sOnChange = 'if (this.options[this.selectedIndex].value==\'--div--\') {this.selectedIndex='.$sI.';} '.implode('',$PA['fieldChangeFunc']);
1615 $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...
1617 $item .= '<select' . $selectedStyle . ' name="' . $PA['itemFormElName'] . '"' .
1618 ($config['iconsInOptionTags'] ?
$this->insertDefStyle('select', 'icon-select') : $this->insertDefStyle('select')) .
1619 ($size ?
' size="' . $size . '"' : '') .
1620 ' onchange="' . htmlspecialchars($onChangeIcon . $sOnChange) . '"' .
1621 $PA['onFocus'] . $disabled . '>';
1622 $item.= implode('',$opt);
1623 $item.= '</select>';
1625 // Create icon table:
1626 if (count($selicons) && !$config['noIconsBelowSelect']) {
1627 $item.='<table border="0" cellpadding="0" cellspacing="0" class="typo3-TCEforms-selectIcons">';
1628 $selicon_cols = intval($config['selicon_cols']);
1629 if (!$selicon_cols) $selicon_cols=count($selicons);
1630 $sR = ceil(count($selicons)/$selicon_cols);
1631 $selicons = array_pad($selicons,$sR*$selicon_cols,'');
1632 for($sa=0;$sa<$sR;$sa++
) {
1634 for($sb=0;$sb<$selicon_cols;$sb++
) {
1635 $sk=($sa*$selicon_cols+
$sb);
1636 $imgN = 'selIcon_'.$table.'_'.$row['uid'].'_'.$field.'_'.$selicons[$sk][1];
1637 $imgS = ($selicons[$sk][2]?
$this->backPath
.'gfx/content_selected.gif':'clear.gif');
1638 $item.='<td><img name="'.htmlspecialchars($imgN).'" src="'.$imgS.'" width="7" height="10" alt="" /></td>';
1639 $item.='<td>'.$selicons[$sk][0].'</td>';
1650 * Creates a checkbox list (renderMode = "checkbox")
1651 * (Render function for getSingleField_typeSelect())
1653 * @param string See getSingleField_typeSelect()
1654 * @param string See getSingleField_typeSelect()
1655 * @param array See getSingleField_typeSelect()
1656 * @param array See getSingleField_typeSelect()
1657 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1658 * @param array Items available for selection
1659 * @param string Label for no-matching-value
1660 * @return string The HTML code for the item
1661 * @see getSingleField_typeSelect()
1663 function getSingleField_typeSelect_checkbox($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1665 // Get values in an array (and make unique, which is fine because there can be no duplicates anyway):
1666 $itemArray = array_flip($this->extractValuesOnlyFromValueLabelList($PA['itemFormElValue']));
1669 if($this->renderReadonly ||
$config['readOnly']) {
1670 $disabled = ' disabled="disabled"';
1673 // Traverse the Array of selector box items:
1677 $sOnChange = implode('',$PA['fieldChangeFunc']);
1678 $setAll = array(); // Used to accumulate the JS needed to restore the original selection.
1679 foreach($selItems as $p) {
1680 // Non-selectable element:
1681 if (!strcmp($p[1],'--div--')) {
1682 if (count($setAll)) {
1684 <tr class="c-header-checkbox-controls">
1686 '<a href="#" onclick="' . htmlspecialchars(implode('', $setAll).' return false;') . '">' .
1687 htmlspecialchars($this->getLL('l_checkAll')) .
1689 <a href="#" onclick="' . htmlspecialchars(implode('', $unSetAll).' return false;').'">' .
1690 htmlspecialchars($this->getLL('l_uncheckAll')) .
1698 <tr class="c-header">
1699 <td colspan="3">'.htmlspecialchars($p[0]).'</td>
1702 // Selected or not by default:
1704 if (isset($itemArray[$p[1]])) {
1705 $sM = ' checked="checked"';
1706 unset($itemArray[$p[1]]);
1712 list($selIconFile,$selIconInfo) = $this->getIcon($p[2]);
1716 $rowId = uniqid('select_checkbox_row_');
1717 $onClickCell = $this->elName($PA['itemFormElName'] . '[' . $c . ']') . '.checked=!' . $this->elName($PA['itemFormElName'] . '[' . $c . ']') . '.checked;';
1718 $onClick = 'this.attributes.getNamedItem("class").nodeValue = ' . $this->elName($PA['itemFormElName'] . '[' . $c . ']') . '.checked ? "c-selectedItem" : "c-unselectedItem";';
1719 $setAll[] = $this->elName($PA['itemFormElName'] . '[' . $c . ']') . '.checked=1;';
1720 $setAll[] .= '$(\'' . $rowId . '\').removeClassName(\'c-unselectedItem\');$(\'' . $rowId . '\').addClassName(\'c-selectedItem\');';
1721 $unSetAll[] = $this->elName($PA['itemFormElName'].'['.$c.']').'.checked=0;';
1722 $unSetAll[] .= '$(\'' . $rowId . '\').removeClassName(\'c-selectedItem\');$(\'' . $rowId . '\').addClassName(\'c-unselectedItem\');';
1723 $restoreCmd[] = $this->elName($PA['itemFormElName'] . '[' . $c . ']') . '.checked=' . ($sM ?
1 : 0) . ';' .
1724 '$(\'' . $rowId . '\').removeClassName(\'c-selectedItem\');$(\'' . $rowId . '\').removeClassName(\'c-unselectedItem\');' .
1725 '$(\'' . $rowId . '\').addClassName(\'c-' . ($sM ?
'' : 'un') . 'selectedItem\');';
1727 $hasHelp = ($p[3] !='');
1729 $label = t3lib_div
::deHSCentities(htmlspecialchars($p[0]));
1730 $help = $hasHelp ?
'<span class="typo3-csh-inline show-right"><span class="header">' . $label . '</span>' .
1731 '<span class="paragraph">' . $GLOBALS['LANG']->hscAndCharConv(nl2br(trim(htmlspecialchars($p[3]))), false) . '</span></span>' : '';
1733 if ($hasHelp && $this->edit_showFieldHelp
== 'icon') {
1734 $helpIcon = '<a class="typo3-csh-link" href="#">';
1735 $helpIcon .= '<img' . t3lib_iconWorks
::skinImg($this->backPath
, 'gfx/helpbubble.gif', 'width="14" height="14"');
1736 $helpIcon .= ' hspace="2" border="0" class="absmiddle"' . ($GLOBALS['CLIENT']['FORMSTYLE'] ?
' style="cursor:help;"' : '') . ' alt="" />' . $help;
1737 $helpIcon .= '</a>';
1742 <tr id="' . $rowId . '" class="'.($sM ?
'c-selectedItem' : 'c-unselectedItem').'" onclick="'.htmlspecialchars($onClick).'" style="cursor: pointer;">
1743 <td width="12"><input type="checkbox"'.$this->insertDefStyle('check').' name="'.htmlspecialchars($PA['itemFormElName'].'['.$c.']').'" value="'.htmlspecialchars($p[1]).'"'.$sM.' onclick="'.htmlspecialchars($sOnChange).'"'.$PA['onFocus'].' /></td>
1744 <td class="c-labelCell" onclick="'.htmlspecialchars($onClickCell).'">'.
1745 ($selIconFile ?
'<img src="'.$selIconFile.'" '.$selIconInfo[3].' vspace="2" border="0" class="absmiddle" style="margin-right: 4px;" alt="" />' : '').
1748 <td class="c-descr" onclick="'.htmlspecialchars($onClickCell).'">' . (strcmp($p[3],'') ?
$help : '') . '</td>
1754 // Remaining checkboxes will get their set-all link:
1755 if (count($setAll)) {
1757 <tr class="c-header-checkbox-controls">
1759 '<a href="#" onclick="' . htmlspecialchars(implode('', $setAll).' return false;') . '">' .
1760 htmlspecialchars($this->getLL('l_checkAll')) .
1762 <a href="#" onclick="' . htmlspecialchars(implode('', $unSetAll).' return false;') . '">' .
1763 htmlspecialchars($this->getLL('l_uncheckAll')) .
1770 // Remaining values (invalid):
1771 if (count($itemArray) && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1772 foreach($itemArray as $theNoMatchValue => $temp) {
1773 // Compile <checkboxes> tag:
1774 array_unshift($tRows,'
1775 <tr class="c-invalidItem">
1776 <td><input type="checkbox"'.$this->insertDefStyle('check').' name="'.htmlspecialchars($PA['itemFormElName'].'['.$c.']').'" value="'.htmlspecialchars($theNoMatchValue).'" checked="checked" onclick="'.htmlspecialchars($sOnChange).'"'.$PA['onFocus'].$disabled.' /></td>
1777 <td class="c-labelCell">'.
1778 t3lib_div
::deHSCentities(htmlspecialchars(@sprintf
($nMV_label, $theNoMatchValue))).
1779 '</td><td> </td>
1785 // Add an empty hidden field which will send a blank value if all items are unselected.
1786 $item .= '<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']) . '" value="" />';
1789 if (is_array($restoreCmd)) {
1790 $item .= '<a href="#" onclick="' . implode('', $restoreCmd).' return false;' . '">' .
1791 '<img'.t3lib_iconWorks
::skinImg($this->backPath
,'gfx/undo.gif','width="13" height="12"') . ' title="' .
1792 htmlspecialchars($this->getLL('l_revertSelection')) . '" alt="" />' .'</a>';
1794 // Implode rows in table:
1796 <table border="0" cellpadding="0" cellspacing="0" class="typo3-TCEforms-select-checkbox">'.
1797 implode('',$tRows).'
1805 * Creates a selectorbox list (renderMode = "singlebox")
1806 * (Render function for getSingleField_typeSelect())
1808 * @param string See getSingleField_typeSelect()
1809 * @param string See getSingleField_typeSelect()
1810 * @param array See getSingleField_typeSelect()
1811 * @param array See getSingleField_typeSelect()
1812 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1813 * @param array Items available for selection
1814 * @param string Label for no-matching-value
1815 * @return string The HTML code for the item
1816 * @see getSingleField_typeSelect()
1818 function getSingleField_typeSelect_singlebox($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1820 // Get values in an array (and make unique, which is fine because there can be no duplicates anyway):
1821 $itemArray = array_flip($this->extractValuesOnlyFromValueLabelList($PA['itemFormElValue']));
1824 if($this->renderReadonly ||
$config['readOnly']) {
1825 $disabled = ' disabled="disabled"';
1828 // Traverse the Array of selector box items:
1830 $restoreCmd = array(); // Used to accumulate the JS needed to restore the original selection.
1832 foreach($selItems as $p) {
1833 // Selected or not by default:
1835 if (isset($itemArray[$p[1]])) {
1836 $sM = ' selected="selected"';
1837 $restoreCmd[] = $this->elName($PA['itemFormElName'].'[]').'.options['.$c.'].selected=1;';
1838 unset($itemArray[$p[1]]);
1841 // Non-selectable element:
1843 if (!strcmp($p[1],'--div--')) {
1844 $nonSel = ' onclick="this.selected=0;" class="c-divider"';
1847 // Icon style for option tag:
1848 if ($config['iconsInOptionTags']) {
1849 $styleAttrValue = $this->optionTagStyle($p[2]);
1852 // Compile <option> tag:
1853 $opt[] = '<option value="'.htmlspecialchars($p[1]).'"'.
1856 ($styleAttrValue ?
' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1857 '>'.t3lib_div
::deHSCentities(htmlspecialchars($p[0])).'</option>';
1861 // Remaining values:
1862 if (count($itemArray) && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1863 foreach($itemArray as $theNoMatchValue => $temp) {
1864 // Compile <option> tag:
1865 array_unshift($opt,'<option value="'.htmlspecialchars($theNoMatchValue).'" selected="selected">'.t3lib_div
::deHSCentities(htmlspecialchars(@sprintf
($nMV_label, $theNoMatchValue))).'</option>');
1869 // Compile selector box:
1870 $sOnChange = implode('',$PA['fieldChangeFunc']);
1871 $selector_itemListStyle = isset($config['itemListStyle']) ?
' style="'.htmlspecialchars($config['itemListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle
.'"';
1872 $size = intval($config['size']);
1873 $size = $config['autoSizeMax'] ? t3lib_div
::intInRange(count($selItems)+
1,t3lib_div
::intInRange($size,1),$config['autoSizeMax']) : $size;
1874 $selectBox = '<select name="'.$PA['itemFormElName'].'[]"'.
1875 $this->insertDefStyle('select').
1876 ($size ?
' size="'.$size.'"' : '').
1877 ' multiple="multiple" onchange="'.htmlspecialchars($sOnChange).'"'.
1879 $selector_itemListStyle.
1886 // Add an empty hidden field which will send a blank value if all items are unselected.
1888 $item.='<input type="hidden" name="'.htmlspecialchars($PA['itemFormElName']).'" value="" />';
1891 // Put it all into a table:
1893 <table border="0" cellspacing="0" cellpadding="0" width="1" class="typo3-TCEforms-select-singlebox">
1899 htmlspecialchars($this->getLL('l_holdDownCTRL')).
1903 <a href="#" onclick="'.htmlspecialchars($this->elName($PA['itemFormElName'].'[]').'.selectedIndex=-1;'.implode('',$restoreCmd).' return false;').'">'.
1904 '<img'.t3lib_iconWorks
::skinImg($this->backPath
,'gfx/undo.gif','width="13" height="12"').' title="'.htmlspecialchars($this->getLL('l_revertSelection')).'" alt="" />'.
1915 * Creates a multiple-selector box (two boxes, side-by-side)
1916 * (Render function for getSingleField_typeSelect())
1918 * @param string See getSingleField_typeSelect()
1919 * @param string See getSingleField_typeSelect()
1920 * @param array See getSingleField_typeSelect()
1921 * @param array See getSingleField_typeSelect()
1922 * @param array (Redundant) content of $PA['fieldConf']['config'] (for convenience)
1923 * @param array Items available for selection
1924 * @param string Label for no-matching-value
1925 * @return string The HTML code for the item
1926 * @see getSingleField_typeSelect()
1928 function getSingleField_typeSelect_multiple($table,$field,$row,&$PA,$config,$selItems,$nMV_label) {
1931 if($this->renderReadonly ||
$config['readOnly']) {
1932 $disabled = ' disabled="disabled"';
1935 // Setting this hidden field (as a flag that JavaScript can read out)
1937 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'_mul" value="'.($config['multiple']?
1:0).'" />';
1940 // Set max and min items:
1941 $maxitems = t3lib_div
::intInRange($config['maxitems'],0);
1942 if (!$maxitems) $maxitems=100000;
1943 $minitems = t3lib_div
::intInRange($config['minitems'],0);
1945 // Register the required number of elements:
1946 $this->registerRequiredProperty('range', $PA['itemFormElName'], array($minitems,$maxitems,'imgName'=>$table.'_'.$row['uid'].'_'.$field));
1948 // Get "removeItems":
1949 $removeItems = t3lib_div
::trimExplode(',',$PA['fieldTSConfig']['removeItems'],1);
1951 // Get the array with selected items:
1952 $itemArray = t3lib_div
::trimExplode(',', $PA['itemFormElValue'], 1);
1954 // Possibly filter some items:
1955 $keepItemsFunc = create_function('$value', '$parts=explode(\'|\',$value,2); return rawurldecode($parts[0]);');
1956 $itemArray = t3lib_div
::keepItemsInArray($itemArray, $PA['fieldTSConfig']['keepItems'], $keepItemsFunc);
1958 // Perform modification of the selected items array:
1959 foreach($itemArray as $tk => $tv) {
1960 $tvP = explode('|',$tv,2);
1961 $evalValue = rawurldecode($tvP[0]);
1962 $isRemoved = in_array($evalValue,$removeItems) ||
($config['form_type']=='select' && $config['authMode'] && !$GLOBALS['BE_USER']->checkAuthMode($table,$field,$evalValue,$config['authMode']));
1963 if ($isRemoved && !$PA['fieldTSConfig']['disableNoMatchingValueElement'] && !$config['disableNoMatchingValueElement']) {
1964 $tvP[1] = rawurlencode(@sprintf
($nMV_label, $evalValue));
1965 } elseif (isset($PA['fieldTSConfig']['altLabels.'][$evalValue])) {
1966 $tvP[1] = rawurlencode($this->sL($PA['fieldTSConfig']['altLabels.'][$evalValue]));
1968 $itemArray[$tk] = implode('|',$tvP);
1970 $itemsToSelect = '';
1973 // Create option tags:
1975 $styleAttrValue = '';
1976 foreach($selItems as $p) {
1977 if ($config['iconsInOptionTags']) {
1978 $styleAttrValue = $this->optionTagStyle($p[2]);
1980 $opt[]= '<option value="'.htmlspecialchars($p[1]).'"'.
1981 ($styleAttrValue ?
' style="'.htmlspecialchars($styleAttrValue).'"' : '').
1982 '>'.htmlspecialchars($p[0]).'</option>';
1985 // Put together the selector box:
1986 $selector_itemListStyle = isset($config['itemListStyle']) ?
' style="'.htmlspecialchars($config['itemListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle
.'"';
1987 $size = intval($config['size']);
1988 $size = $config['autoSizeMax'] ? t3lib_div
::intInRange(count($itemArray)+
1,t3lib_div
::intInRange($size,1),$config['autoSizeMax']) : $size;
1989 if ($config['exclusiveKeys']) {
1990 $sOnChange = 'setFormValueFromBrowseWin(\''.$PA['itemFormElName'].'\',this.options[this.selectedIndex].value,this.options[this.selectedIndex].text,\''.$config['exclusiveKeys'].'\'); ';
1992 $sOnChange = 'setFormValueFromBrowseWin(\''.$PA['itemFormElName'].'\',this.options[this.selectedIndex].value,this.options[this.selectedIndex].text); ';
1994 $sOnChange .= implode('',$PA['fieldChangeFunc']);
1996 <select name="'.$PA['itemFormElName'].'_sel"'.
1997 $this->insertDefStyle('select').
1998 ($size ?
' size="'.$size.'"' : '').
1999 ' onchange="'.htmlspecialchars($sOnChange).'"'.
2001 $selector_itemListStyle.'>
2007 // Pass to "dbFileIcons" function:
2010 'autoSizeMax' => t3lib_div
::intInRange($config['autoSizeMax'],0),
2011 'style' => isset($config['selectedListStyle']) ?
' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle
.'"',
2012 'dontShowMoveIcons' => ($maxitems<=1),
2013 'maxitems' => $maxitems,
2016 'selector' => $this->getLL('l_selected').':<br />',
2017 'items' => $this->getLL('l_items').':<br />'
2020 'thumbnails' => $itemsToSelect,
2021 'readOnly' => $disabled
2023 $item.= $this->dbFileIcons($PA['itemFormElName'],'','',$itemArray,'',$params,$PA['onFocus']);
2029 * Generation of TCEform elements of the type "group"
2030 * This will render a selectorbox into which elements from either the file system or database can be inserted. Relations.
2032 * @param string The table name of the record
2033 * @param string The field name which this element is supposed to edit
2034 * @param array The record data array where the value(s) for the field can be found
2035 * @param array An array with additional configuration options.
2036 * @return string The HTML code for the TCEform field
2038 function getSingleField_typeGroup($table,$field,$row,&$PA) {
2040 $config = $PA['fieldConf']['config'];
2041 $internal_type = $config['internal_type'];
2042 $show_thumbs = $config['show_thumbs'];
2043 $size = intval($config['size']);
2044 $maxitems = t3lib_div
::intInRange($config['maxitems'],0);
2045 if (!$maxitems) $maxitems=100000;
2046 $minitems = t3lib_div
::intInRange($config['minitems'],0);
2047 $allowed = trim($config['allowed']);
2048 $disallowed = trim($config['disallowed']);
2051 if($this->renderReadonly ||
$config['readOnly']) {
2052 $disabled = ' disabled="disabled"';
2055 $item.= '<input type="hidden" name="'.$PA['itemFormElName'].'_mul" value="'.($config['multiple']?
1:0).'"'.$disabled.' />';
2056 $this->registerRequiredProperty('range', $PA['itemFormElName'], array($minitems,$maxitems,'imgName'=>$table.'_'.$row['uid'].'_'.$field));
2059 // "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/.
2060 $specConf = $this->getSpecConfFromString($PA['extra'], $PA['fieldConf']['defaultExtras']);
2062 // Acting according to either "file" or "db" type:
2063 switch((string)$config['internal_type']) {
2064 case 'file': // If the element is of the internal type "file":
2066 // Creating string showing allowed types:
2067 $tempFT = t3lib_div
::trimExplode(',',$allowed,1);
2068 if (!count($tempFT)) {$info.='*';}
2069 foreach($tempFT as $ext) {
2071 $info.=strtoupper($ext).' ';
2074 // Creating string, showing disallowed types:
2075 $tempFT_dis = t3lib_div
::trimExplode(',',$disallowed,1);
2076 if (count($tempFT_dis)) {$info.='<br />';}
2077 foreach($tempFT_dis as $ext) {
2079 $info.='-'.strtoupper($ext).' ';
2083 // Making the array of file items:
2084 $itemArray = t3lib_div
::trimExplode(',',$PA['itemFormElValue'],1);
2086 // Showing thumbnails:
2090 foreach($itemArray as $imgRead) {
2091 $imgP = explode('|',$imgRead);
2092 $imgPath = rawurldecode($imgP[0]);
2095 $rowCopy[$field] = $imgPath;
2097 // Icon + clickmenu:
2098 $absFilePath = t3lib_div
::getFileAbsFileName($config['uploadfolder'].'/'.$imgPath);
2100 $fI = pathinfo($imgPath);
2101 $fileIcon = t3lib_BEfunc
::getFileIcon(strtolower($fI['extension']));
2102 $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="" />';
2104 $imgs[] = '<span class="nobr">'.t3lib_BEfunc
::thumbCode($rowCopy,$table,$field,$this->backPath
,'thumbs.php',$config['uploadfolder'],0,' align="middle"').
2105 ($absFilePath ?
$this->getClickMenu($fileIcon, $absFilePath) : $fileIcon).
2109 $thumbsnail = implode('<br />',$imgs);
2112 // Creating the element:
2113 $noList = isset($config['disable_controls']) && t3lib_div
::inList($config['disable_controls'], 'list');
2116 'dontShowMoveIcons' => ($maxitems<=1),
2117 'autoSizeMax' => t3lib_div
::intInRange($config['autoSizeMax'],0),
2118 'maxitems' => $maxitems,
2119 'style' => isset($config['selectedListStyle']) ?
' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle
.'"',
2121 'thumbnails' => $thumbsnail,
2122 'readOnly' => $disabled,
2123 'noBrowser' => $noList ||
isset($config['disable_controls']) && t3lib_div
::inList($config['disable_controls'], 'browser'),
2124 'noList' => $noList,
2126 $item.= $this->dbFileIcons($PA['itemFormElName'],'file',implode(',',$tempFT),$itemArray,'',$params,$PA['onFocus']);
2128 if(!$disabled && !(isset($config['disable_controls']) && t3lib_div
::inList($config['disable_controls'], 'upload'))) {
2129 // Adding the upload field:
2130 if ($this->edit_docModuleUpload
) $item.='<input type="file" name="'.$PA['itemFormElName_file'].'"'.$this->formWidth().' size="60" />';
2133 case 'folder': // If the element is of the internal type "folder":
2135 // array of folder items:
2136 $itemArray = t3lib_div
::trimExplode(',', $PA['itemFormElValue'], 1);
2138 // Creating the element:
2141 'dontShowMoveIcons' => ($maxitems <= 1),
2142 'autoSizeMax' => t3lib_div
::intInRange($config['autoSizeMax'], 0),
2143 'maxitems' => $maxitems,
2144 'style' => isset($config['selectedListStyle']) ?
2145 ' style="'.htmlspecialchars($config['selectedListStyle']).'"'
2146 : ' style="'.$this->defaultMultipleSelectorStyle
.'"',
2148 'readOnly' => $disabled
2151 $item.= $this->dbFileIcons(
2152 $PA['itemFormElName'],
2161 case 'db': // If the element is of the internal type "db":
2163 // Creating string showing allowed types:
2164 $tempFT = t3lib_div
::trimExplode(',', $allowed, true);
2165 if (!strcmp(trim($tempFT[0]), '*')) {
2166 $onlySingleTableAllowed = false;
2167 $info.='<span class="nobr"> '.
2168 htmlspecialchars($this->getLL('l_allTables')).
2170 } elseif ($tempFT) {
2171 $onlySingleTableAllowed = (count($tempFT) == 1);
2172 foreach ($tempFT as $theT) {
2173 $info.= '<span class="nobr"> ' .
2174 t3lib_iconWorks
::getIconImage($theT, array(), $this->backPath
, 'align="top"') .
2175 htmlspecialchars($this->sL($GLOBALS['TCA'][$theT]['ctrl']['title'])) .
2180 $perms_clause = $GLOBALS['BE_USER']->getPagePermsClause(1);
2181 $itemArray = array();
2185 $temp_itemArray = t3lib_div
::trimExplode(',',$PA['itemFormElValue'],1);
2186 foreach($temp_itemArray as $dbRead) {
2187 $recordParts = explode('|',$dbRead);
2188 list($this_table,$this_uid) = t3lib_BEfunc
::splitTable_Uid($recordParts[0]);
2189 // For the case that no table was found and only a single table is defined to be allowed, use that one:
2190 if (!$this_table && $onlySingleTableAllowed) {
2191 $this_table = $allowed;
2193 $itemArray[] = array('table'=>$this_table, 'id'=>$this_uid);
2194 if (!$disabled && $show_thumbs) {
2195 $rr = t3lib_BEfunc
::getRecordWSOL($this_table,$this_uid);
2196 $imgs[] = '<span class="nobr">'.
2197 $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).
2199 t3lib_BEfunc
::getRecordTitle($this_table,$rr,TRUE).' <span class="typo3-dimmed"><em>['.$rr['uid'].']</em></span>'.
2204 if (!$disabled && $show_thumbs) {
2205 $thumbsnail = implode('<br />',$imgs);
2208 // Creating the element:
2211 'dontShowMoveIcons' => ($maxitems<=1),
2212 'autoSizeMax' => t3lib_div
::intInRange($config['autoSizeMax'],0),
2213 'maxitems' => $maxitems,
2214 'style' => isset($config['selectedListStyle']) ?
' style="'.htmlspecialchars($config['selectedListStyle']).'"' : ' style="'.$this->defaultMultipleSelectorStyle
.'"',
2216 'thumbnails' => $thumbsnail,
2217 'readOnly' => $disabled
2219 $item.= $this->dbFileIcons($PA['itemFormElName'],'db',implode(',',$tempFT),$itemArray,'',$params,$PA['onFocus'],$table,$field,$row['uid']);
2225 $altItem = '<input type="hidden" name="'.$PA['itemFormElName'].'" value="'.htmlspecialchars($PA['itemFormElValue']).'" />';
2227 $item = $this->renderWizards(array($item,$altItem),$config['wizards'],$table,$row,$field,$PA,$PA['itemFormElName'],$specConf);
2234 * Generation of TCEform elements of the type "none"
2235 * This will render a non-editable display of the content of the field.
2237 * @param string The table name of the record
2238 * @param string The field name which this element is supposed to edit
2239 * @param array The record data array where the value(s) for the field can be found
2240 * @param array An array with additional configuration options.
2241 * @return string The HTML code for the TCEform field
2243 function getSingleField_typeNone($table,$field,$row,&$PA) {
2245 $config = $PA['fieldConf']['config'];
2246 $itemValue = $PA['itemFormElValue'];
2248 return $this->getSingleField_typeNone_render($config,$itemValue);
2252 * HTML rendering of a value which is not editable.
2254 * @param array Configuration for the display
2255 * @param string The value to display
2256 * @return string The HTML code for the display
2257 * @see getSingleField_typeNone();
2259 function getSingleField_typeNone_render($config,$itemValue) {
2261 // is colorScheme[0] the right value?
2262 $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;';
2264 if ($config['format']) {
2265 $itemValue = $this->formatValue($config, $itemValue);
2268 $rows = intval($config['rows']);
2270 if(!$config['pass_content']) {
2271 $itemValue = nl2br(htmlspecialchars($itemValue));
2274 $cols = t3lib_div
::intInRange($config['cols'] ?
$config['cols'] : 30, 5, $this->maxTextareaWidth
);
2275 if (!$config['fixedRows']) {
2276 $origRows = $rows = t3lib_div
::intInRange($rows, 1, 20);
2277 if (strlen($itemValue)>$this->charsPerRow
*2) {
2278 $cols = $this->maxTextareaWidth
;
2279 $rows = t3lib_div
::intInRange(round(strlen($itemValue)/$this->charsPerRow
),count(explode(chr(10),$itemValue)),20);
2280 if ($rows<$origRows) $rows=$origRows;
2284 if ($this->docLarge
) $cols = round($cols*$this->form_largeComp
);
2285 $width = ceil($cols*$this->form_rowsToStylewidth
);
2286 // hardcoded: 12 is the height of the font
2290 <div style="'.htmlspecialchars($divStyle.' overflow:auto; height:'.$height.'px; width:'.$width.'px;').'" class="'.htmlspecialchars($this->formElClass('none')).'">'.
2294 if(!$config['pass_content']) {
2295 $itemValue = htmlspecialchars($itemValue);
2298 $cols = $config['cols']?
$config['cols']:($config['size']?
$config['size']:$this->maxInputWidth
);
2299 if ($this->docLarge
) $cols = round($cols*$this->form_largeComp
);
2300 $width = ceil($cols*$this->form_rowsToStylewidth
);
2302 // overflow:auto crashes mozilla here. Title tag is usefull when text is longer than the div box (overflow:hidden).
2304 <div style="'.htmlspecialchars($divStyle.' overflow:hidden; width:'.$width.'px;').'" class="'.htmlspecialchars($this->formElClass('none')).'" title="'.$itemValue.'">'.
2305 '<span class="nobr">'.(strcmp($itemValue,'')?
$itemValue:' ').'</span>'.
2313 * Handler for Flex Forms
2315 * @param string The table name of the record
2316 * @param string The field name which this element is supposed to edit
2317 * @param array The record data array where the value(s) for the field can be found
2318 * @param array An array with additional configuration options.
2319 * @return string The HTML code for the TCEform field
2321 function getSingleField_typeFlex($table,$field,$row,&$PA) {
2324 $dataStructArray = t3lib_BEfunc
::getFlexFormDS($PA['fieldConf']['config'],$row,$table);
2326 // Get data structure:
2327 if (is_array($dataStructArray)) {
2330 $xmlData = $PA['itemFormElValue'];
2331 $xmlHeaderAttributes = t3lib_div
::xmlGetHeaderAttribs($xmlData);
2332 $storeInCharset = strtolower($xmlHeaderAttributes['encoding']);
2333 if ($storeInCharset) {
2334 $currentCharset=$GLOBALS['LANG']->charSet
;
2335 $xmlData = $GLOBALS['LANG']->csConvObj
->conv($xmlData,$storeInCharset,$currentCharset,1);
2337 $editData=t3lib_div
::xml2array($xmlData);
2338 if (!is_array($editData)) { // Must be XML parsing error...
2340 } elseif (!isset($editData['meta']) ||
!is_array($editData['meta'])) {
2341 $editData['meta'] = array();
2344 // Find the data structure if sheets are found:
2345 $sheet = $editData['meta']['currentSheetId'] ?
$editData['meta']['currentSheetId'] : 'sDEF'; // Sheet to display
2347 // Create sheet menu:
2348 // if (is_array($dataStructArray['sheets'])) {
2349 // #$item.=$this->getSingleField_typeFlex_sheetMenu($dataStructArray['sheets'], $PA['itemFormElName'].'[meta][currentSheetId]', $sheet).'<br />';
2352 // Create language menu:
2353 $langChildren = $dataStructArray['meta']['langChildren'] ?
1 : 0;
2354 $langDisabled = $dataStructArray['meta']['langDisable'] ?
1 : 0;
2356 $editData['meta']['currentLangId']=array();
2357 $languages = $this->getAvailableLanguages();
2359 foreach($languages as $lInfo) {
2360 if ($GLOBALS['BE_USER']->checkLanguageAccess($lInfo['uid'])) {
2361 $editData['meta']['currentLangId'][] = $lInfo['ISOcode'];
2364 if (!is_array($editData['meta']['currentLangId']) ||
!count($editData['meta']['currentLangId'])) {
2365 $editData['meta']['currentLangId']=array('DEF');
2368 $editData['meta']['currentLangId'] = array_unique($editData['meta']['currentLangId']);
2371 // if (!$langDisabled && count($languages) > 1) {
2372 // $item.=$this->getSingleField_typeFlex_langMenu($languages, $PA['itemFormElName'].'[meta][currentLangId]', $editData['meta']['currentLangId']).'<br />';
2375 $PA['_noEditDEF'] = FALSE;
2376 if ($langChildren ||
$langDisabled) {
2377 $rotateLang = array('DEF');
2379 if (!in_array('DEF',$editData['meta']['currentLangId'])) {
2380 array_unshift($editData['meta']['currentLangId'],'DEF');
2381 $PA['_noEditDEF'] = TRUE;
2383 $rotateLang = $editData['meta']['currentLangId'];
2387 if (is_array($dataStructArray['sheets'])) {
2388 $tabsToTraverse = array_keys($dataStructArray['sheets']);
2390 $tabsToTraverse = array($sheet);
2393 foreach ($rotateLang as $lKey) {
2394 if (!$langChildren && !$langDisabled) {
2395 $item.= '<b>'.$this->getLanguageIcon($table,$row,'v'.$lKey).$lKey.':</b>';
2398 $tabParts = array();
2399 foreach ($tabsToTraverse as $sheet) {
2400 list ($dataStruct, $sheet) = t3lib_div
::resolveSheetDefInDS($dataStructArray,$sheet);
2403 if (is_array($dataStruct['ROOT']) && is_array($dataStruct['ROOT']['el'])) {
2404 $lang = 'l'.$lKey; // Default language, other options are "lUK" or whatever country code (independant of system!!!)
2405 $PA['_valLang'] = $langChildren && !$langDisabled ?
$editData['meta']['currentLangId'] : 'DEF'; // Default language, other options are "lUK" or whatever country code (independant of system!!!)
2406 $PA['_lang'] = $lang;
2407 $PA['_cshFile'] = ((isset($dataStruct['ROOT']['TCEforms']) && isset($dataStruct['ROOT']['TCEforms']['cshFile'])) ?
$dataStruct['ROOT']['TCEforms']['cshFile'] : '');
2410 $tRows = $this->getSingleField_typeFlex_draw(
2411 $dataStruct['ROOT']['el'],
2412 $editData['data'][$sheet][$lang],
2417 '[data]['.$sheet.']['.$lang.']'
2419 #$sheetContent= '<table border="0" cellpadding="1" cellspacing="1" class="typo3-TCEforms-flexForm">'.implode('',$tRows).'</table>';
2420 $sheetContent = '<div class="typo3-TCEforms-flexForm">'.$tRows.'</div>';
2422 # $item = '<div style=" position:absolute;">'.$item.'</div>';
2423 //visibility:hidden;
2424 } else $sheetContent='Data Structure ERROR: No ROOT element found for sheet "'.$sheet.'".';
2427 $tabParts[] = array(
2428 'label' => ($dataStruct['ROOT']['TCEforms']['sheetTitle'] ?
$this->sL($dataStruct['ROOT']['TCEforms']['sheetTitle']) : $sheet),
2429 'description' => ($dataStruct['ROOT']['TCEforms']['sheetDescription'] ?
$this->sL($dataStruct['ROOT']['TCEforms']['sheetDescription']) : ''),
2430 'linkTitle' => ($dataStruct['ROOT']['TCEforms']['sheetShortDescr'] ?
$this->sL($dataStruct['ROOT']['TCEforms']['sheetShortDescr']) : ''),
2431 'content' => $sheetContent
2435 if (is_array($dataStructArray['sheets'])) {
2436 $dividersToTabsBehaviour = (isset($GLOBALS['TCA'][$table]['ctrl']['dividers2tabs']) ?
$GLOBALS['TCA'][$table]['ctrl']['dividers2tabs'] : 1);
2437 $item.= $this->getDynTabMenu($tabParts, 'TCEFORMS:flexform:'.$PA['itemFormElName'].$PA['_lang'], $dividersToTabsBehaviour);
2439 $item.= $sheetContent;
2442 } else $item='Data Structure ERROR: '.$dataStructArray;
2448 * Creates the language menu for FlexForms:
2450 * @param [type] $languages: ...
2451 * @param [type] $elName: ...
2452 * @param [type] $selectedLanguage: ...
2453 * @param [type] $multi: ...
2454 * @return string HTML for menu
2456 function getSingleField_typeFlex_langMenu($languages,$elName,$selectedLanguage,$multi=1) {
2458 foreach($languages as $lArr) {
2459 $opt[]='<option value="'.htmlspecialchars($lArr['ISOcode']).'"'.(in_array($lArr['ISOcode'],$selectedLanguage)?
' selected="selected"':'').'>'.htmlspecialchars($lArr['title']).'</option>';
2462 $output = '<select name="'.$elName.'[]"'.($multi ?
' multiple="multiple" size="'.count($languages).'"' : '').'>'.implode('',$opt).'</select>';
2468 * Creates the menu for selection of the sheets:
2470 * @param array Sheet array for which to render the menu
2471 * @param string Form element name of the field containing the sheet pointer
2472 * @param string Current sheet key
2473 * @return string HTML for menu
2475 function getSingleField_typeFlex_sheetMenu($sArr,$elName,$sheetKey) {
2478 $pct = round(100/count($sArr));
2479 foreach($sArr as $sKey => $sheetCfg) {
2480 if ($GLOBALS['BE_USER']->jsConfirmation(1)) {
2481 $onClick = 'if (confirm(TBE_EDITOR.labels.onChangeAlert) && TBE_EDITOR.checkSubmit(-1)){'.$this->elName($elName).".value='".$sKey."'; TBE_EDITOR.submitForm()};";
2483 $onClick = 'if(TBE_EDITOR.checkSubmit(-1)){ '.$this->elName($elName).".value='".$sKey."'; TBE_EDITOR.submitForm();}";
2487 $tCells[]='<td width="'.$pct.'%" style="'.($sKey==$sheetKey ?
'background-color: #9999cc; font-weight: bold;' : 'background-color: #aaaaaa;').' cursor: hand;" onclick="'.htmlspecialchars($onClick).'" align="center">'.
2488 ($sheetCfg['ROOT']['TCEforms']['sheetTitle'] ?
$this->sL($sheetCfg['ROOT']['TCEforms']['sheetTitle']) : $sKey).
2492 return '<table border="0" cellpadding="0" cellspacing="2" class="typo3-TCEforms-flexForm-sheetMenu"><tr>'.implode('',$tCells).'</tr></table>';
2496 * Recursive rendering of flexforms
2498 * @param array (part of) Data Structure for which to render. Keys on first level is flex-form fields
2499 * @param array (part of) Data array of flexform corresponding to the input DS. Keys on first level is flex-form field names
2500 * @param string Table name, eg. tt_content
2501 * @param string Field name, eg. tx_templavoila_flex
2502 * @param array The particular record from $table in which the field $field is found
2503 * @param array Array of standard information for rendering of a form field in TCEforms, see other rendering functions too
2504 * @param string Form field prefix, eg. "[data][sDEF][lDEF][...][...]"
2505 * @param integer Indicates nesting level for the function call
2506 * @param string Prefix for ID-values
2507 * @param boolean Defines whether the next flexform level is open or closed. Comes from _TOGGLE pseudo field in FlexForm xml.
2508 * @return string HTMl code for form.
2510 function getSingleField_typeFlex_draw($dataStruct,$editData,$table,$field,$row,&$PA,$formPrefix='',$level=0,$idPrefix='ID',$toggleClosed=FALSE) {
2513 $mayRestructureFlexforms = $GLOBALS['BE_USER']->checkLanguageAccess(0);
2515 // Data Structure array must be ... and array of course...
2516 if (is_array($dataStruct)) {
2517 foreach($dataStruct as $key => $value) { // Traversing fields in structure:
2518 if (is_array($value)) { // The value of each entry must be an array.
2520 // ********************
2522 // ********************
2524 $theTitle = htmlspecialchars(t3lib_div
::fixed_lgd_cs($this->sL($value['tx_templavoila']['title']),30));
2526 // If it's a "section" or "container":
2527 if ($value['type']=='array') {
2529 // Creating IDs for form fields:
2530 // It's important that the IDs "cascade" - otherwise we can't dynamically expand the flex form because this relies on simple string substitution of the first parts of the id values.
2531 $thisId = t3lib_div
::shortMd5(uniqid('id',true)); // This is a suffix used for forms on this level
2532 $idTagPrefix = $idPrefix.'-'.$thisId; // $idPrefix is the prefix for elements on lower levels in the hierarchy and we combine this with the thisId value to form a new ID on this level.
2534 // If it's a "section" containing other elements:
2535 if ($value['section']) {
2537 // Load script.aculo.us if flexform sections can be moved by drag'n'drop:
2538 $GLOBALS['SOBE']->doc
->loadScriptaculous();
2539 // Render header of section:
2540 $output.= '<div class="bgColor2"><strong>'.$theTitle.'</strong></div>';
2542 // Render elements in data array for section:
2545 if (is_array($editData[$key]['el'])) {
2546 foreach ($editData[$key]['el'] as $k3 => $v3) {
2548 if (is_array($v3)) {
2549 $theType = key($v3);
2550 $theDat = $v3[$theType];
2551 $newSectionEl = $value['el'][$theType];
2552 if (is_array($newSectionEl)) {
2553 $tRows[]= $this->getSingleField_typeFlex_draw(
2554 array($theType => $newSectionEl),
2555 array($theType => $theDat),
2560 $formPrefix.'['.$key.'][el]['.$cc.']',
2570 // Now, we generate "templates" for new elements that could be added to this section by traversing all possible types of content inside the section:
2571 // We have to handle the fact that requiredElements and such may be set during this rendering process and therefore we save and reset the state of some internal variables - little crude, but works...
2573 // Preserving internal variables we don't want to change:
2574 $TEMP_requiredElements = $this->requiredElements
;
2576 // Traversing possible types of new content in the section:
2577 $newElementsLinks = array();
2578 foreach($value['el'] as $nnKey => $nCfg) {
2579 $additionalJS_post_saved = $this->additionalJS_post
;
2580 $this->additionalJS_post
= array();
2581 $additionalJS_submit_saved = $this->additionalJS_submit
;
2582 $this->additionalJS_submit
= array();
2583 $newElementTemplate = $this->getSingleField_typeFlex_draw(
2584 array($nnKey => $nCfg),
2590 $formPrefix.'['.$key.'][el]['.$idTagPrefix.'-form]',
2595 // Makes a "Add new" link:
2596 $var = uniqid('idvar');
2597 $replace = 'replace(/' . $idTagPrefix . '-/g,"' . $idTagPrefix . '"+' . $var . '+"-")';
2598 $onClickInsert = 'var ' . $var . ' = "' . $idTagPrefix . '-idx"+(new Date()).getTime();';
2599 // Do not replace $isTagPrefix in setActionStatus() because it needs section id!
2600 $onClickInsert .= 'new Insertion.Bottom($("'.$idTagPrefix.'"), unescape("'.rawurlencode($newElementTemplate).'").' . $replace . '); setActionStatus("'.$idTagPrefix.'");';
2601 $onClickInsert .= 'eval(unescape("' . rawurlencode(implode(';', $this->additionalJS_post
)) . '").' . $replace . ');';
2602 $onClickInsert .= 'TBE_EDITOR.addActionChecks("submit", unescape("' . rawurlencode(implode(';', $this->additionalJS_submit
)) . '").' . $replace . ');';
2603 $onClickInsert .= 'return false;';
2604 // Kasper's comment (kept for history): Maybe there is a better way to do this than store the HTML for the new element in rawurlencoded format - maybe it even breaks with certain charsets? But for now this works...
2605 $this->additionalJS_post
= $additionalJS_post_saved;
2606 $this->additionalJS_submit
= $additionalJS_submit_saved;
2607 $new = $GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_core.php:cm.new', 1);
2608 $newElementsLinks[]= '<a href="#" onclick="'.htmlspecialchars($onClickInsert).'">
2609 <img'.t3lib_iconWorks
::skinImg($this->backPath
,'gfx/new_el.gif','width="11" height="12"').' alt="' . $new . '" title="' . $new . '" align="absmiddle" />' .
2610 htmlspecialchars(t3lib_div
::fixed_lgd_cs($this->sL($nCfg['tx_templavoila']['title']),30)) . '</a>';
2613 // Reverting internal variables we don't want to change:
2614 $this->requiredElements
= $TEMP_requiredElements;
2616 // Adding the sections:
2617 $toggleAll = $GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_core.php:labels.toggleall', 1);
2619 <div style="padding: 5px 0px 5px 20px;">
2620 <a href="#" onclick="'.htmlspecialchars