<?php
/***************************************************************
 *  Copyright notice
 *
 *  (c) 2010-2011 Xavier Perseguers <typo3@perseguers.ch>
 *  (c) 2010-2011 Steffen Kamper <steffen@typo3.org>
 *  All rights reserved
 *
 *  This script is part of the TYPO3 project. The TYPO3 project is
 *  free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  The GNU General Public License can be found at
 *  http://www.gnu.org/copyleft/gpl.html.
 *  A copy is found in the textfile GPL.txt and important notices to the license
 *  from the author is found in LICENSE.txt distributed with these scripts.
 *
 *
 *  This script is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  This copyright notice MUST APPEAR in all copies of the script!
 ***************************************************************/

/**
 * Contains FORM class object.
 *
 * @author Xavier Perseguers <typo3@perseguers.ch>
 * @author Steffen Kamper <steffen@typo3.org>
 */
class tslib_content_Form extends tslib_content_Abstract {

	/**
	 * Rendering the cObject, FORM
	 *
	 * Note on $formData:
	 * In the optional $formData array each entry represents a line in the ordinary setup.
	 * In those entries each entry (0,1,2...) represents a space normally divided by the '|' line.
	 *
	 * $formData [] = array('Name:', 'name=input, 25 ', 'Default value....');
	 * $formData [] = array('Email:', 'email=input, 25 ', 'Default value for email....');
	 *
	 * - corresponds to the $conf['data'] value being :
	 * Name:|name=input, 25 |Default value....||Email:|email=input, 25 |Default value for email....
	 *
	 * If $formData is an array the value of $conf['data'] is ignored.
	 *
	 * @param	array		Array of TypoScript properties
	 * @param	array		Alternative formdata overriding whatever comes from TypoScript
	 * @return	string		Output
	 */
	public function render($conf = array(), $formData = '') {
		$content = '';
		if (is_array($formData)) {
			$dataArray = $formData;
		} else {
			$data = isset($conf['data.'])
				? $this->cObj->stdWrap($conf['data'], $conf['data.'])
				: $conf['data'];
				// Clearing dataArr
			$dataArray = array();
				// Getting the original config
			if (trim($data)) {
				$data = str_replace(LF, '||', $data);
				$dataArray = explode('||', $data);
			}
				// Adding the new dataArray config form:
			if (is_array($conf['dataArray.'])) { // dataArray is supplied
				$sortedKeyArray = t3lib_TStemplate::sortedKeyList($conf['dataArray.'], TRUE);
				foreach ($sortedKeyArray as $theKey) {
					$singleKeyArray = $conf['dataArray.'][$theKey . '.'];
					if (is_array($singleKeyArray)) {
						$temp = array();
						$label = isset($singleKeyArray['label.'])
							? $this->cObj->stdWrap($singleKeyArray['label'], $singleKeyArray['label.'])
							: $singleKeyArray['label'];
						list ($temp[0]) = explode('|', $label);
						$type = isset($singleKeyArray['type.'])
							? $this->cObj->stdWrap($singleKeyArray['type'],$singleKeyArray['type.'])
							: $singleKeyArray['type'];
						list ($temp[1]) = explode('|', $type);
						$required = isset($singleKeyArray['required.'])
							? $this->cObj->stdWrap($singleKeyArray['required'], $singleKeyArray['required.'])
							: $singleKeyArray['required'];
						if ($required) {
							$temp[1] = '*' . $temp[1];
						}
						$singleValue = isset($singleKeyArray['value.'])
							? $this->cObj->stdWrap($singleKeyArray['value'], $singleKeyArray['value.'])
							: $singleKeyArray['value'];
						list ($temp[2]) = explode('|', $singleValue);
							// If value array is set, then implode those values.
						if (is_array($singleKeyArray['valueArray.'])) {
							$temp_accumulated = array();
							foreach ($singleKeyArray['valueArray.'] as $singleKey => $singleKey_valueArray) {
								if (is_array($singleKey_valueArray) && !strcmp(intval($singleKey) . '.', $singleKey)) {
									$temp_valueArray = array();
									$valueArrayLabel = isset($singleKey_valueArray['label.'])
										? $this->cObj->stdWrap($singleKey_valueArray['label'], $singleKey_valueArray['label.'])
										: $singleKey_valueArray['label'];
									list ($temp_valueArray[0]) = explode('=', $valueArrayLabel);
									$selected = isset($singleKeyArray['selected.'])
										? $this->cObj->stdWrap($singleKeyArray['selected'], $singleKeyArray['selected.'])
										: $singleKeyArray['selected'];
									if ($selected) {
										$temp_valueArray[0] = '*' . $temp_valueArray[0];
									}
									$singleKeyValue = isset($singleKey_valueArray['value.'])
										? $this->cObj->stdWrap($singleKey_valueArray['value'], $singleKey_valueArray['value.'])
										: $singleKey_valueArray['value'];
									list ($temp_valueArray[1]) = explode(',', $singleKeyValue);
								}
								$temp_accumulated[] = implode('=', $temp_valueArray);
							}
							$temp[2] = implode(',', $temp_accumulated);
						}
						$specialEval = isset($singleKeyArray['specialEval.'])
							? $this->cObj->stdWrap($singleKeyArray['specialEval'], $singleKeyArray['specialEval.'])
							: $singleKeyArray['specialEval'];
						list ($temp[3]) = explode('|', $specialEval);

							// adding the form entry to the dataArray
						$dataArray[] = implode('|', $temp);
					}
				}
			}
		}

		$attachmentCounter = '';
		$hiddenfields = '';
		$fieldlist = array();
		$propertyOverride = array();
		$fieldname_hashArray = array();
		$counter = 0;

		$xhtmlStrict = t3lib_div::inList('xhtml_strict,xhtml_11,xhtml_2', $GLOBALS['TSFE']->xhtmlDoctype);
			// Formname
		$formName = isset($conf['formName.'])
			? $this->cObj->stdWrap($conf['formName'], $conf['formName.'])
			: $conf['formName'];
		if ($formName) {
			$formName = $this->cObj->cleanFormName($formName);
		} else {
			$formName = 'a' . $GLOBALS['TSFE']->uniqueHash(); // form name has to start with a letter to reach XHTML compliance
		}

		$fieldPrefix = isset($conf['fieldPrefix.'])
			? $this->cObj->stdWrap($conf['fieldPrefix'], $conf['fieldPrefix.'])
			: $conf['fieldPrefix'];
		if (isset($conf['fieldPrefix']) || isset($conf['fieldPrefix.'])) {
			if ($fieldPrefix) {
				$prefix = $this->cObj->cleanFormName($fieldPrefix);
			} else {
				$prefix = '';
			}
		} else {
			$prefix = $formName;
		}

		foreach ($dataArray as $dataValue) {

			$counter++;
			$confData = array();
			if (is_array($formData)) {
				$parts = $dataValue;
				$dataValue = 1; // TRUE...
			} else {
				$dataValue = trim($dataValue);
				$parts = explode('|', $dataValue);
			}
			if ($dataValue && strcspn($dataValue, '#/')) {
					// label:
				$confData['label'] = t3lib_div::removeXSS(trim($parts[0]));
					// field:
				$fParts = explode(',', $parts[1]);
				$fParts[0] = trim($fParts[0]);
				if (substr($fParts[0], 0, 1) == '*') {
					$confData['required'] = 1;
					$fParts[0] = substr($fParts[0], 1);
				}
				$typeParts = explode('=', $fParts[0]);
				$confData['type'] = trim(strtolower(end($typeParts)));
				if (count($typeParts) == 1) {
					$confData['fieldname'] = $this->cObj->cleanFormName($parts[0]);
					if (strtolower(preg_replace('/[^[:alnum:]]/', '', $confData['fieldname'])) == 'email') {
						$confData['fieldname'] = 'email';
					}
						// Duplicate fieldnames resolved
					if (isset($fieldname_hashArray[md5($confData['fieldname'])])) {
						$confData['fieldname'] .= '_' . $counter;
					}
					$fieldname_hashArray[md5($confData['fieldname'])] = $confData['fieldname'];
						// Attachment names...
					if ($confData['type'] == 'file') {
						$confData['fieldname'] = 'attachment' . $attachmentCounter;
						$attachmentCounter = intval($attachmentCounter) + 1;
					}
				} else {
					$confData['fieldname'] = str_replace(' ', '_', trim($typeParts[0]));
				}
				$confData['fieldname'] = htmlspecialchars($confData['fieldname']);
				$fieldCode = '';

				$wrapFieldName = isset($conf['wrapFieldName'])
					? $this->cObj->stdWrap($conf['wrapFieldName'], $conf['wrapFieldName.'])
					: $conf['wrapFieldName'];
				if ($wrapFieldName) {
					$confData['fieldname'] = $this->cObj->wrap($confData['fieldname'], $wrapFieldName);
				}

					// Set field name as current:
				$this->cObj->setCurrentVal($confData['fieldname']);

					// Additional parameters
				if (trim($confData['type'])) {
					if (isset($conf['params.'][$confData['type']])) {
						$addParams = isset($conf['params.'][$confData['type'] . '.'])
							? trim($this->cObj->stdWrap($conf['params.'][$confData['type']], $conf['params.'][$confData['type'] . '.']))
							: trim($conf['params.'][$confData['type']]);
					} else {
						$addParams = isset($conf['params.'])
							? trim($this->cObj->stdWrap($conf['params'], $conf['params.']))
							: trim($conf['params']);
					}
					if (strcmp('', $addParams)) {
						$addParams = ' ' . $addParams;
					}
				} else
					$addParams = '';

				$dontMd5FieldNames = isset($conf['dontMd5FieldNames.'])
					? $this->cObj->stdWrap($conf['dontMd5FieldNames'], $conf['dontMd5FieldNames.'])
					: $conf['dontMd5FieldNames'];
				if ($dontMd5FieldNames) {
					$fName = $confData['fieldname'];
				} else {
					$fName = md5($confData['fieldname']);
				}

					// Accessibility: Set id = fieldname attribute:
				$accessibility = isset($conf['accessibility.'])
					? $this->cObj->stdWrap($conf['accessibility'], $conf['accessibility.'])
					: $conf['accessibility'];
				if ($accessibility || $xhtmlStrict) {
					$elementIdAttribute = ' id="' . $prefix . $fName . '"';
				} else {
					$elementIdAttribute = '';
				}

					// Create form field based on configuration/type:
				switch ($confData['type']) {
					case 'textarea' :
						$cols = trim($fParts[1]) ? intval($fParts[1]) : 20;
						$compensateFieldWidth = isset($conf['compensateFieldWidth.'])
							? $this->cObj->stdWrap($conf['compensateFieldWidth'], $conf['compensateFieldWidth.'])
							: $conf['compensateFieldWidth'];
						$compWidth = doubleval($compensateFieldWidth
										? $compensateFieldWidth
										: $GLOBALS['TSFE']->compensateFieldWidth
									);
						$compWidth = $compWidth ? $compWidth : 1;
						$cols = t3lib_utility_Math::forceIntegerInRange($cols * $compWidth, 1, 120);

						$rows = trim($fParts[2]) ? t3lib_utility_Math::forceIntegerInRange($fParts[2], 1, 30) : 5;
						$wrap = trim($fParts[3]);
						$noWrapAttr = isset($conf['noWrapAttr.'])
							? $this->cObj->stdWrap($conf['noWrapAttr'], $conf['noWrapAttr.'])
							: $conf['noWrapAttr'];
						if ($noWrapAttr || $wrap === 'disabled') {
							$wrap = '';
						} else {
							$wrap = $wrap ? ' wrap="' . $wrap . '"' : ' wrap="virtual"';
						}
						$noValueInsert = isset($conf['noValueInsert.'])
							? $this->cObj->stdWrap($conf['noValueInsert'], $conf['noValueInsert.'])
							: $conf['noValueInsert'];
						$default = $this->cObj->getFieldDefaultValue(
							$noValueInsert,
							$confData['fieldname'],
							str_replace('\n', LF, trim($parts[2]))
						);
						$fieldCode = sprintf(
							'<textarea name="%s"%s cols="%s" rows="%s"%s%s>%s</textarea>',
							$confData['fieldname'],
							$elementIdAttribute,
							$cols,
							$rows,
							$wrap,
							$addParams,
							t3lib_div::formatForTextarea($default)
						);
					break;
					case 'input' :
					case 'password' :
						$size = trim($fParts[1]) ? intval($fParts[1]) : 20;
						$compensateFieldWidth = isset($conf['compensateFieldWidth.'])
							? $this->cObj->stdWrap($conf['compensateFieldWidth'], $conf['compensateFieldWidth.'])
							: $conf['compensateFieldWidth'];
						$compWidth = doubleval($compensateFieldWidth
										? $compensateFieldWidth
										: $GLOBALS['TSFE']->compensateFieldWidth
									);
						$compWidth = $compWidth ? $compWidth : 1;
						$size = t3lib_utility_Math::forceIntegerInRange($size * $compWidth, 1, 120);
						$noValueInsert = isset($conf['noValueInsert.'])
							? $this->cObj->stdWrap($conf['noValueInsert'], $conf['noValueInsert.'])
							: $conf['noValueInsert'];
						$default = $this->cObj->getFieldDefaultValue(
							$noValueInsert,
							$confData['fieldname'],
							trim($parts[2])
						);

						if ($confData['type'] == 'password') {
							$default = '';
						}

						$max = trim($fParts[2]) ? ' maxlength="' . t3lib_utility_Math::forceIntegerInRange($fParts[2], 1, 1000) . '"' : "";
						$theType = $confData['type'] == 'input' ? 'text' : 'password';

						$fieldCode = sprintf(
							'<input type="%s" name="%s"%s size="%s"%s value="%s"%s />',
							$theType,
							$confData['fieldname'],
							$elementIdAttribute,
							$size,
							$max,
							htmlspecialchars($default),
							$addParams
						);

					break;
					case 'file' :
						$size = trim($fParts[1]) ? t3lib_utility_Math::forceIntegerInRange($fParts[1], 1, 60) : 20;
						$fieldCode = sprintf(
							'<input type="file" name="%s"%s size="%s"%s />',
							$confData['fieldname'],
							$elementIdAttribute,
							$size,
							$addParams
						);
					break;
					case 'check' :
							// alternative default value:
						$noValueInsert = isset($conf['noValueInsert.'])
							? $this->cObj->stdWrap($conf['noValueInsert'], $conf['noValueInsert.'])
							: $conf['noValueInsert'];
						$default = $this->cObj->getFieldDefaultValue(
							$noValueInsert,
							$confData['fieldname'],
							trim($parts[2])
						);
						$checked = $default ? ' checked="checked"' : '';
						$fieldCode = sprintf(
							'<input type="checkbox" value="%s" name="%s"%s%s%s />',
							1,
							$confData['fieldname'],
							$elementIdAttribute,
							$checked,
							$addParams
						);
					break;
					case 'select' :
						$option = '';
						$valueParts = explode(',', $parts[2]);
							// size
						if (strtolower(trim($fParts[1])) == 'auto') {
							$fParts[1] = count($valueParts);
						} // Auto size set here. Max 20
						$size = trim($fParts[1]) ? t3lib_utility_Math::forceIntegerInRange($fParts[1], 1, 20) : 1;
							// multiple
						$multiple = strtolower(trim($fParts[2])) == 'm' ? ' multiple="multiple"' : '';

						$items = array(); // Where the items will be
						$defaults = array(); //RTF
						$pCount = count($valueParts);
						for ($a = 0; $a < $pCount; $a++) {
							$valueParts[$a] = trim($valueParts[$a]);
							if (substr($valueParts[$a], 0, 1) == '*') { // Finding default value
								$sel = 'selected';
								$valueParts[$a] = substr($valueParts[$a], 1);
							} else
								$sel = '';
								// Get value/label
							$subParts = explode('=', $valueParts[$a]);
							$subParts[1] = (isset($subParts[1]) ? trim($subParts[1]) : trim($subParts[0])); // Sets the value
							$items[] = $subParts; // Adds the value/label pair to the items-array
							if ($sel) {
								$defaults[] = $subParts[1];
							} // Sets the default value if value/label pair is marked as default.
						}
							// alternative default value:
						$noValueInsert = isset($conf['noValueInsert.'])
							? $this->cObj->stdWrap($conf['noValueInsert'], $conf['noValueInsert.'])
							: $conf['noValueInsert'];
						$default = $this->cObj->getFieldDefaultValue(
							$noValueInsert,
							$confData['fieldname'],
							$defaults
						);
						if (!is_array($default)) {
							$defaults = array();
							$defaults[] = $default;
						} else {
							$defaults = $default;
						}
							// Create the select-box:
						$iCount = count($items);
						for ($a = 0; $a < $iCount; $a++) {
							$option .= '<option value="' . $items[$a][1] . '"' . (in_array($items[$a][1], $defaults) ? ' selected="selected"' : '') . '>' . trim($items[$a][0]) . '</option>'; //RTF
						}

						if ($multiple) {
								// The fieldname must be prepended '[]' if multiple select. And the reason why it's prepended is, because the required-field list later must also have [] prepended.
							$confData['fieldname'] .= '[]';
						}
						$fieldCode = sprintf(
							'<select name="%s"%s size="%s"%s%s>%s</select>',
							$confData['fieldname'],
							$elementIdAttribute,
							$size,
							$multiple,
							$addParams,
							$option
						); //RTF
					break;
					case 'radio' :
						$option = '';

						$valueParts = explode(',', $parts[2]);
						$items = array(); // Where the items will be
						$default = '';
						$pCount = count($valueParts);
						for ($a = 0; $a < $pCount; $a++) {
							$valueParts[$a] = trim($valueParts[$a]);
							if (substr($valueParts[$a], 0, 1) == '*') {
								$sel = 'checked';
								$valueParts[$a] = substr($valueParts[$a], 1);
							} else
								$sel = '';
								// Get value/label
							$subParts = explode('=', $valueParts[$a]);
							$subParts[1] = (isset($subParts[1]) ? trim($subParts[1]) : trim($subParts[0])); // Sets the value
							$items[] = $subParts; // Adds the value/label pair to the items-array
							if ($sel) {
								$default = $subParts[1];
							} // Sets the default value if value/label pair is marked as default.
						}
							// alternative default value:
						$noValueInsert = isset($conf['noValueInsert.'])
							? $this->cObj->stdWrap($conf['noValueInsert'], $conf['noValueInsert.'])
							: $conf['noValueInsert'];
						$default = $this->cObj->getFieldDefaultValue(
							$noValueInsert,
							$confData['fieldname'],
							$default
						);
							// Create the select-box:
						$iCount = count($items);
						for ($a = 0; $a < $iCount; $a++) {
							$optionParts = '';
							$radioId = $prefix . $fName . $this->cObj->cleanFormName($items[$a][0]);
							if ($accessibility) {
								$radioLabelIdAttribute = ' id="' . $radioId . '"';
							} else {
								$radioLabelIdAttribute = '';
							}
							$optionParts .= '<input type="radio" name="' . $confData['fieldname'] . '"' .
									$radioLabelIdAttribute . ' value="' . $items[$a][1] . '"' .
									(!strcmp($items[$a][1], $default) ? ' checked="checked"' : '') . $addParams . ' />';
							if ($accessibility) {
								$label = isset($conf['radioWrap.'])
									? $this->cObj->stdWrap(trim($items[$a][0]), $conf['radioWrap.'])
									: trim($items[$a][0]);
								$optionParts .= '<label for="' . $radioId . '">' . $label  . '</label>';
							} else {
								$optionParts .= isset($conf['radioWrap.'])
									? $this->cObj->stdWrap(trim($items[$a][0]), $conf['radioWrap.'])
									: trim($items[$a][0]);
							}
							$option .= isset($conf['radioInputWrap.'])
								? $this->cObj->stdWrap($optionParts, $conf['radioInputWrap.'])
								: $optionParts;
						}

						if ($accessibility) {
							$accessibilityWrap = isset($conf['radioWrap.']['accessibilityWrap.'])
								? $this->cObj->stdWrap($conf['radioWrap.']['accessibilityWrap'], $conf['radioWrap.']['accessibilityWrap.'])
								: $conf['radioWrap.']['accessibilityWrap.'];

							if($accessibilityWrap) {
								$search = array(
									'###RADIO_FIELD_ID###', '###RADIO_GROUP_LABEL###'
								);
								$replace = array(
									$elementIdAttribute, $confData['label']
								);
								$accessibilityWrap = str_replace($search, $replace, $accessibilityWrap);

								$option = $this->cObj->wrap($option, $accessibilityWrap);
							}
						}

						$fieldCode = $option;
					break;
					case 'hidden' :
						$value = trim($parts[2]);

							// If this form includes an auto responder message, include a HMAC checksum field
							// in order to verify potential abuse of this feature.
						if (strlen($value) && t3lib_div::inList($confData['fieldname'], 'auto_respond_msg')) {
							$hmacChecksum = t3lib_div::hmac($value);
							$hiddenfields .= sprintf(
								'<input type="hidden" name="auto_respond_checksum" id="%sauto_respond_checksum" value="%s" />',
								$prefix,
								$hmacChecksum
							);
						}

						if (strlen($value) && t3lib_div::inList('recipient_copy,recipient',
							$confData['fieldname']) && $GLOBALS['TYPO3_CONF_VARS']['FE']['secureFormmail']) {
							break;
						}
						if (strlen($value) && t3lib_div::inList('recipient_copy,recipient', $confData['fieldname'])) {
							$value = $GLOBALS['TSFE']->codeString($value);
						}
						$hiddenfields .= sprintf(
							'<input type="hidden" name="%s"%s value="%s" />',
							$confData['fieldname'],
							$elementIdAttribute,
							htmlspecialchars($value)
						);
					break;
					case 'property' :
						if (t3lib_div::inList('type,locationData,goodMess,badMess,emailMess', $confData['fieldname'])) {
							$value = trim($parts[2]);
							$propertyOverride[$confData['fieldname']] = $value;
							$conf[$confData['fieldname']] = $value;
						}
					break;
					case 'submit' :
						$value = trim($parts[2]);
						if ($conf['image.']) {
							$this->cObj->data[$this->cObj->currentValKey] = $value;
							$image = $this->cObj->IMG_RESOURCE($conf['image.']);
							$params = $conf['image.']['params'] ? ' ' . $conf['image.']['params'] : '';
							$params .= $this->cObj->getAltParam($conf['image.'], FALSE);
							$params .= $addParams;
						} else {
							$image = '';
						}
						if ($image) {
							$fieldCode = sprintf(
								'<input type="image" name="%s"%s src="%s"%s />',
								$confData['fieldname'],
								$elementIdAttribute,
								$image,
								$params
							);
						} else {
							$fieldCode = sprintf(
								'<input type="submit" name="%s"%s value="%s"%s />',
								$confData['fieldname'],
								$elementIdAttribute,
								t3lib_div::deHSCentities(htmlspecialchars($value)),
								$addParams
							);
						}
					break;
					case 'reset' :
						$value = trim($parts[2]);
						$fieldCode = sprintf(
							'<input type="reset" name="%s"%s value="%s"%s />',
							$confData['fieldname'],
							$elementIdAttribute,
							t3lib_div::deHSCentities(htmlspecialchars($value)),
							$addParams
						);
					break;
					case 'label' :
						$fieldCode = nl2br(htmlspecialchars(trim($parts[2])));
					break;
					default :
						$confData['type'] = 'comment';
						$fieldCode = trim($parts[2]) . '&nbsp;';
					break;
				}
				if ($fieldCode) {

						// Checking for special evaluation modes:
					if (t3lib_div::inList('textarea,input,password', $confData['type']) && strlen(trim($parts[3]))) {
						$modeParameters = t3lib_div::trimExplode(':', $parts[3]);
					} else {
						$modeParameters = array();
					}

					// Adding evaluation based on settings:
					switch ((string) $modeParameters[0]) {
						case 'EREG' :
							$fieldlist[] = '_EREG';
							$fieldlist[] = $modeParameters[1];
							$fieldlist[] = $modeParameters[2];
							$fieldlist[] = $confData['fieldname'];
							$fieldlist[] = $confData['label'];
							$confData['required'] = 1; // Setting this so "required" layout is used.
						break;
						case 'EMAIL' :
							$fieldlist[] = '_EMAIL';
							$fieldlist[] = $confData['fieldname'];
							$fieldlist[] = $confData['label'];
							$confData['required'] = 1; // Setting this so "required" layout is used.
						break;
						default :
							if ($confData['required']) {
								$fieldlist[] = $confData['fieldname'];
								$fieldlist[] = $confData['label'];
							}
						break;
					}

						// Field:
					$fieldLabel = $confData['label'];
					if ($accessibility && trim($fieldLabel) && !preg_match('/^(label|hidden|comment)$/', $confData['type'])) {
						$fieldLabel = '<label for="' . $prefix . $fName . '">' . $fieldLabel . '</label>';
					}

						// Getting template code:
					if(isset($conf['fieldWrap.'])) {
						$fieldCode = $this->cObj->stdWrap($fieldCode, $conf['fieldWrap.']);
					}
					$labelCode = isset($conf['labelWrap.'])
						? $this->cObj->stdWrap($fieldLabel, $conf['labelWrap.'])
						: $fieldLabel;
					$commentCode = isset($conf['commentWrap.'])
						? $this->cObj->stdWrap($confData['label'], $conf['commentWrap.']) // RTF
						: $confData['label'];
					$result = $conf['layout'];
					$req = isset($conf['REQ.'])
						? $this->cObj->stdWrap($conf['REQ'], $conf['REQ.'])
						: $conf['REQ'];
					if ($req && $confData['required']) {
						if (isset($conf['REQ.']['fieldWrap.'])) {
							$fieldCode = $this->cObj->stdWrap($fieldCode, $conf['REQ.']['fieldWrap.']);
						}
						if (isset($conf['REQ.']['labelWrap.'])) {
							$labelCode = $this->cObj->stdWrap($fieldLabel, $conf['REQ.']['labelWrap.']);
						}
						$reqLayout = isset($conf['REQ.']['layout.'])
							? $this->cObj->stdWrap($conf['REQ.']['layout'], $conf['REQ.']['layout.'])
							: $conf['REQ.']['layout'];
						if ($reqLayout) {
							$result = $reqLayout;
						}
					}
					if ($confData['type'] == 'comment') {
						$commentLayout = isset($conf['COMMENT.']['layout.'])
							? $this->cObj->stdWrap($conf['COMMENT.']['layout'], $conf['COMMENT.']['layout.'])
							: $conf['COMMENT.']['layout'];
						if ($commentLayout) {
							$result = $commentLayout;
						}
					}
					if ($confData['type'] == 'check') {
						$checkLayout = isset($conf['CHECK.']['layout.'])
							? $this->cObj->stdWrap($conf['CHECK.']['layout'], $conf['CHECK.']['layout.'])
							: $conf['CHECK.']['layout'];
						if ($checkLayout) {
							$result = $checkLayout;
						}
					}
					if ($confData['type'] == 'radio') {
						$radioLayout = isset($conf['RADIO.']['layout.'])
							? $this->cObj->stdWrap($conf['RADIO.']['layout'], $conf['RADIO.']['layout.'])
							: $conf['RADIO.']['layout'];
						if ($radioLayout) {
							$result = $radioLayout;
						}
					}
					if ($confData['type'] == 'label') {
						$labelLayout = isset($conf['LABEL.']['layout.'])
							? $this->cObj->stdWrap($conf['LABEL.']['layout'], $conf['LABEL.']['layout.'])
							: $conf['LABEL.']['layout'];
						if ($labelLayout) {
							$result = $labelLayout;
						}
					}
					$result = str_replace('###FIELD###', $fieldCode, $result);
					$result = str_replace('###LABEL###', $labelCode, $result);
					$result = str_replace('###COMMENT###', $commentCode, $result); //RTF
					$content .= $result;
				}
			}
		}
		if (isset($conf['stdWrap.'])) {
			$content = $this->cObj->stdWrap($content, $conf['stdWrap.']);
		}


			// redirect (external: where to go afterwards. internal: where to submit to)
		$theRedirect = isset($conf['redirect.'])
			? $this->cObj->stdWrap($conf['redirect'], $conf['redirect.'])
			: $conf['redirect']; // redirect should be set to the page to redirect to after an external script has been used. If internal scripts is used, and if no 'type' is set that dictates otherwise, redirect is used as the url to jump to as long as it's an integer (page)
		$target = isset($conf['target.'])
			? $this->cObj->stdWrap($conf['target'], $conf['target.'])
			: $conf['target']; // redirect should be set to the page to redirect to after an external script has been used. If internal scripts is used, and if no 'type' is set that dictates otherwise, redirect is used as the url to jump to as long as it's an integer (page)
		$noCache = isset($conf['no_cache.'])
			? $this->cObj->stdWrap($conf['no_cache'], $conf['no_cache.'])
			: $conf['no_cache']; // redirect should be set to the page to redirect to after an external script has been used. If internal scripts is used, and if no 'type' is set that dictates otherwise, redirect is used as the url to jump to as long as it's an integer (page)
		$page = $GLOBALS['TSFE']->page;
		if (!$theRedirect) { // Internal: Just submit to current page
			$LD = $GLOBALS['TSFE']->tmpl->linkData(
				$page,
				$target,
				$noCache,
				'index.php',
				'',
				$this->cObj->getClosestMPvalueForPage($page['uid'])
			);
		} elseif (t3lib_utility_Math::canBeInterpretedAsInteger($theRedirect)) { // Internal: Submit to page with ID $theRedirect
			$page = $GLOBALS['TSFE']->sys_page->getPage_noCheck($theRedirect);
			$LD = $GLOBALS['TSFE']->tmpl->linkData(
				$page,
				$target,
				$noCache,
				'index.php',
				'',
				$this->cObj->getClosestMPvalueForPage($page['uid'])
			);
		} else { // External URL, redirect-hidden field is rendered!
			$LD = $GLOBALS['TSFE']->tmpl->linkData(
				$page,
				$target,
				$noCache,
				'',
				'',
				$this->cObj->getClosestMPvalueForPage($page['uid'])
			);
			$LD['totalURL'] = $theRedirect;
			$hiddenfields .= '<input type="hidden" name="redirect" value="' . htmlspecialchars($LD['totalURL']) . '" />'; // 18-09-00 added
		}

			// Formtype (where to submit to!):
		if($propertyOverride['type']) {
			$formtype = $propertyOverride['type'];
		} else {
			$formtype = isset($conf['type.'])
				? $this->cObj->stdWrap($conf['type'], $conf['type.'])
				: $conf['type'];
		}
		if (t3lib_utility_Math::canBeInterpretedAsInteger($formtype)) { // Submit to a specific page
			$page = $GLOBALS['TSFE']->sys_page->getPage_noCheck($formtype);
			$LD_A = $GLOBALS['TSFE']->tmpl->linkData(
				$page,
				$target,
				$noCache,
				'',
				'',
				$this->cObj->getClosestMPvalueForPage($page['uid'])
			);
			$action = $LD_A['totalURL'];
		} elseif ($formtype) { // Submit to external script
			$LD_A = $LD;
			$action = $formtype;
		} elseif (t3lib_utility_Math::canBeInterpretedAsInteger($theRedirect)) {
			$LD_A = $LD;
			$action = $LD_A['totalURL'];
		} else { // Submit to "nothing" - which is current page
			$LD_A = $GLOBALS['TSFE']->tmpl->linkData(
				$GLOBALS['TSFE']->page,
				$target,
				$noCache,
				'',
				'',
				$this->cObj->getClosestMPvalueForPage($page['uid'])
			);
			$action = $LD_A['totalURL'];
		}

			// Recipient:
		$theEmail = isset($conf['recipient.'])
			? $this->cObj->stdWrap($conf['recipient'], $conf['recipient.'])
			: $conf['recipient'];
		if ($theEmail && !$GLOBALS['TYPO3_CONF_VARS']['FE']['secureFormmail']) {
			$theEmail = $GLOBALS['TSFE']->codeString($theEmail);
			$hiddenfields .= '<input type="hidden" name="recipient" value="' . htmlspecialchars($theEmail) . '" />';
		}

			// location data:
		$location = isset($conf['locationData.'])
			? $this->cObj->stdWrap($conf['locationData'], $conf['locationData.'])
			: $conf['locationData'];
		if ($location) {
			if ($location == 'HTTP_POST_VARS' && isset($_POST['locationData'])) {
				$locationData = t3lib_div::_POST('locationData');
			} else {
					// locationData is [the page id]:[tablename]:[uid of record]. Indicates on which page the record (from tablename with uid) is shown. Used to check access.
				if (isset($this->data['_LOCALIZED_UID'])) {
					$locationData = $GLOBALS['TSFE']->id . ':' . str_replace($this->data['uid'], $this->data['_LOCALIZED_UID'], $this->cObj->currentRecord);
				} else {
					$locationData = $GLOBALS['TSFE']->id . ':' . $this->cObj->currentRecord;
				}
			}
			$hiddenfields .= '<input type="hidden" name="locationData" value="' . htmlspecialchars($locationData) . '" />';
		}

			// hidden fields:
		if (is_array($conf['hiddenFields.'])) {
			foreach ($conf['hiddenFields.'] as $hF_key => $hF_conf) {
				if (substr($hF_key, -1) != '.') {
					$hF_value = $this->cObj->cObjGetSingle($hF_conf, $conf['hiddenFields.'][$hF_key . '.'], 'hiddenfields');
					if (strlen($hF_value) && t3lib_div::inList('recipient_copy,recipient', $hF_key)) {
						if ($GLOBALS['TYPO3_CONF_VARS']['FE']['secureFormmail']) {
							continue;
						}
						$hF_value = $GLOBALS['TSFE']->codeString($hF_value);
					}
					$hiddenfields .= '<input type="hidden" name="' . $hF_key . '" value="' . htmlspecialchars($hF_value) . '" />';
				}
			}
		}

			// Wrap all hidden fields in a div tag (see http://bugs.typo3.org/view.php?id=678)
		$hiddenfields = isset($conf['hiddenFields.']['stdWrap.'])
			? $this->cObj->stdWrap($hiddenfields, $conf['hiddenFields.']['stdWrap.'])
			: '<div style="display:none;">' . $hiddenfields . '</div>';

		if ($conf['REQ']) {
			$goodMess = isset($conf['goodMess.'])
				? $this->cObj->stdWrap($conf['goodMess'], $conf['goodMess.'])
				: $conf['goodMess'];
			$badMess = isset($conf['badMess.'])
				? $this->cObj->stdWrap($conf['badMess'], $conf['badMess.'])
				: $conf['badMess'];
			$emailMess = isset($conf['emailMess.'])
				? $this->cObj->stdWrap($conf['emailMess'], $conf['emailMess.'])
				: $conf['emailMess'];
			$validateForm = ' onsubmit="return validateForm(\'' . $formName . '\',\'' . implode(',', $fieldlist)
				. '\',' . t3lib_div::quoteJSvalue($goodMess) . ',' .
				t3lib_div::quoteJSvalue($badMess) . ',' .
				t3lib_div::quoteJSvalue($emailMess) . ')"';
			$GLOBALS['TSFE']->additionalHeaderData['JSFormValidate'] = '<script type="text/javascript" src="' .
				t3lib_div::createVersionNumberedFilename($GLOBALS['TSFE']->absRefPrefix .
				't3lib/jsfunc.validateform.js') . '"></script>';
		} else {
			$validateForm = '';
		}

			// Create form tag:
		$theTarget = ($theRedirect ? $LD['target'] : $LD_A['target']);
		$method = isset($conf['method.'])
			? $this->cObj->stdWrap($conf['method'], $conf['method.'])
			: $conf['method'];
		$content = array(
			'<form' . ' action="' . htmlspecialchars($action) . '"' . ' id="' .
			$formName . '"' . ($xhtmlStrict ? '' : ' name="' . $formName . '"') .
			' enctype="' . $GLOBALS['TYPO3_CONF_VARS']['SYS']['form_enctype'] . '"' .
			' method="' . ($method ? $method : 'post') . '"' .
			($theTarget ? ' target="' . $theTarget . '"' : '') .
			$validateForm . '>', $hiddenfields . $content,
			'</form>'
		);

		$arrayReturnMode = isset($conf['arrayReturnMode.'])
			? $this->cObj->stdWrap($conf['arrayReturnMode'], $conf['arrayReturnMode.'])
			: $conf['arrayReturnMode'];
		if ($arrayReturnMode) {
			$content['validateForm'] = $validateForm;
			$content['formname'] = $formName;
			return $content;
		} else {
			return implode('', $content);
		}
	}

}


if (defined('TYPO3_MODE') && isset($GLOBALS['TYPO3_CONF_VARS'][TYPO3_MODE]['XCLASS']['tslib/content/class.tslib_content_form.php'])) {
	include_once($GLOBALS['TYPO3_CONF_VARS'][TYPO3_MODE]['XCLASS']['tslib/content/class.tslib_content_form.php']);
}

?>