";print_r($matchall); //0 = highlevel match, 1 = attr, 2 = subst, 3 = mod

				$html = sprintf('autoFill%s(this.form)',$attr);

				if (! isset($js["autoFill".$attr]) ) {

					$js["autoFill".$attr] = sprintf("\nfunction autoFill%s( form ) {\n",$attr);
					$formula = $string;
					$formula = preg_replace('/^([^%])/','\'$1',$formula);
					$formula = preg_replace('/([^%])$/','$1\'',$formula);

					foreach ($matchall[0] as $index => $null) {
						$substrarray = array();

						$js["autoFill".$attr] .= sprintf("	var %s;\n",$matchall[1][$index]);

						if (trim($matchall[2][$index])) {
							preg_match_all('/([0-9]*)-([0-9]*)/',$matchall[2][$index],$substrarray);
						}

						if ($matchall[3][$index] == "/T") {
							$js["autoFill".$attr] .= sprintf("	%s = form.%s.options[form.%s.selectedIndex].text;\n",
								$matchall[1][$index],$matchall[1][$index],$matchall[1][$index]);

						} else {

							if ((isset($substrarray[1][0]) && $substrarray[1][0]) || (isset($substrarray[2][0]) && $substrarray[2][0])) {
								$js["autoFill".$attr] .= sprintf('	%s = form.%s.value.substr(%s,%s)',
									$matchall[1][$index],$matchall[1][$index],
									$substrarray[1][0] ? $substrarray[1][0] : '0',
									$substrarray[2][0] ? $substrarray[2][0] : sprintf('form.%s.value.length',$matchall[1][$index]));

							} else {
								$js["autoFill".$attr] .= sprintf('	%s = form.%s.value',$matchall[1][$index],$matchall[1][$index]);
							}

							switch ($matchall[3][$index]) {
								case '/l':
									$js["autoFill".$attr] .= ".toLowerCase()";
									break;
							}
							$js["autoFill".$attr] .= ";\n";
						}

						$formula = preg_replace('/^%('.$matchall[1][$index].')%$/U','$1 + \'\'',$formula);
						$formula = preg_replace('/^%('.$matchall[1][$index].')(\|[0-9]*-[0-9]*)?(\/[lTU])?%/U','$1 + \'',$formula);
						$formula = preg_replace('/%('.$matchall[1][$index].')(\|[0-9]*-[0-9]*)?(\/[lTU])?%$/U','\' + $1 ',$formula);
						$formula = preg_replace('/%('.$matchall[1][$index].')(\|[0-9]*-[0-9]*)?(\/[lTU])?%/U','\' + $1 + \'',$formula);
					}

					$js["autoFill".$attr] .= sprintf("	form.%s.value = %s;\n",$attr,$formula);
					$js["autoFill".$attr] .= "}\n";
				}

				break;

			default: $html = '';
		}
		return $html;
	}

	function OnChangeDisplay() {
		global $js;

		return (isset($js) ? implode("\n",$js) : '');
	}

	function EvaluateDefault($ldapserver,$value,$container,$counter='',$default=null) {
		if (DEBUG_ENABLED)
			debug_log('%s::EvaluateDefault(): Entered with (%s,%s,%s,%s)',2,
				get_class($this),$ldapserver->server_id,$value,$container,$counter);

		global $lang;

		if (preg_match('/^=php\.(\w+)\((.*)\)$/',$value,$matches)) {
			$args = preg_split('/,/',$matches[2]);

			switch($matches[1]) {
				case 'GetNextNumber' :
					$container = get_container_parent($ldapserver,$container,$args[0]);

					$detail['value'] = get_next_uid_number($ldapserver,$container,$args[1]);
					break;

				case 'PickList' :
					$container = get_container_parent($ldapserver,$container,$args[0]);
					preg_match_all('/%(\w+)(\|.+)?(\/[lU])?%/U',$args[3],$matchall);
					//print_r($matchall); // -1 = highlevel match, 1 = attr, 2 = subst, 3 = mod

					$ldap_attrs = $matchall[1];
					array_push($ldap_attrs,$args[2]);
					$picklistvalues = return_ldap_hash($ldapserver,$container,$args[1],$args[2],$ldap_attrs);

					$detail['value'] = sprintf('',(isset($args[4]) ? $args[4] : $args[2]));
					foreach ($picklistvalues as $key => $values) {
						$display = $args[3];

						foreach ($matchall[1] as $arg) {
							$display = preg_replace('/%('.$arg.')(\|.+)?(\/[lU])?%/U',$values[$arg],$display);
						}

						if (! isset($picklist[$display])) {
							$detail['value'] .= sprintf('%s',
								$display,$values[$args[2]],
								($default == $display ? 'selected' : ''),
								$display);
							$picklist[$display] = true;
						}
					}
					$detail['value'] .= '';

					break;

				case 'RandomPassword' :
					$detail['value'] = password_generate();
					printf('',
						$lang['random_password'],$detail['value']);
					break;

				case 'DrawChooserLink' :
					$detail['value'] = draw_chooser_link(sprintf("template_form.%s%s",$args[0],$counter),$args[1]);

					break;

				case 'Function' :
					# Capture the function name and remove function name from $args
					$function_name = array_shift($args);

					# Call the PHP function if exists (PHP 4 >= 4.0.4, PHP 5)
					if (function_exists($function_name))
						$detail['value'] = call_user_func_array($function_name,$args);

					break;

				default : $detail['value'] = 'UNKNOWN';
			}

			$return = $detail['value'];

		} else {
			$return = $value;
		}

		if (DEBUG_ENABLED)
			debug_log('%s::EvaluateDefault(): Returning (%s)',1,get_class($this),serialize($return));
		return $return;
	}

	function HelperValue($helper,$id='',$container='',$ldapserver='',$counter='',$default='') {
		if (DEBUG_ENABLED)
			debug_log('%s::HelperValue(): Entered with (%s,%s,%s,%s,%s,%s)',2,
				get_class($this),serialize($helper),$id,$container,$ldapserver->server_id,$counter,$default);

		if ($container && $ldapserver && ! is_array($helper)) {
			if (preg_match('/^=php./',$helper))
				return $this->EvaluateDefault($ldapserver,$helper,$container,$counter);

			else
				# @todo: Enable size and width configuration in template
				$html = sprintf('',$id);

		} else {
			if (is_array($helper)) {

				$html = sprintf('',$id,$id);
				foreach ($helper as $value) {
					$html .= sprintf('%s',
						$value,$value,($default == $value ? 'selected' : ''),$value);
				}
				$html .= '';

			} else {
				print "ERROR: HelperValue NOT complete, how did you get HERE?";
				die();
			}
		}

		return $html;
	}
}
?>