<?php

/*
Copyright (c) 2005, Till Brehm, projektfarm Gmbh
All rights reserved.

Redistribution and use in source and binary forms, with or without modification,
are permitted provided that the following conditions are met:

    * Redistributions of source code must retain the above copyright notice,
      this list of conditions and the following disclaimer.
    * Redistributions in binary form must reproduce the above copyright notice,
      this list of conditions and the following disclaimer in the documentation
      and/or other materials provided with the distribution.
    * Neither the name of ISPConfig nor the names of its contributors
      may be used to endorse or promote products derived from this software without
      specific prior written permission.

THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/

/**
* Formularbehandlung
*
* Funktionen zur Umwandlung von Formulardaten
* sowie zum vorbereiten von HTML und SQL
* Ausgaben
*
*	Tabellendefinition
*	
*	Datentypen:
*	- INTEGER (Wandelt Ausdrücke in Int um)
*	- DOUBLE
*	- CURRENCY (Formatiert Zahlen nach Währungsnotation)
*	- VARCHAR (kein weiterer Format Check)
*	- DATE (Datumsformat, Timestamp Umwandlung)
*	
*	Formtype:
*	- TEXT (normales Textfeld)
*	- PASSWORD (Feldinhalt wird nicht angezeigt)
*	- SELECT (Gibt Werte als option Feld aus)
*	- MULTIPLE (Select-Feld mit nehreren Werten)
*	
*	VALUE:
*	- Wert oder Array
*	
*	SEPARATOR
*	- Trennzeichen für multiple Felder
*
*	Hinweis:
*	Das ID-Feld ist nicht bei den Table Values einzufügen.
*
* @package form
* @author Till Brehm
* @version 1.1
*/

class tform {
	
	/**
	* Definition der Tabelle (array)
	* @var tableDef
	*/
	var $tableDef;
	
	/**
	* Private
	* @var action
	*/
	var $action;
	
	/**
	* Tabellenname (String)
	* @var table_name
	*/
	var $table_name;
	
	/**
	* Debug Variable
	* @var debug
	*/
	var $debug = 0;
	
	/**
	* name des primary Field der Tabelle (string)
	* @var table_index
	*/
	var $table_index;
	
	/**
	* enthält die Fehlermeldung bei Überprüfung
	* der Variablen mit Regex
	* @var errorMessage
	*/
	var $errorMessage;
	
	var $dateformat = "d.m.Y";
    var $formDef;
	var $wordbook;
	var $module;
	var $primary_id;
	
	/**
	* Laden der Tabellendefinition
	*
	* @param file: Pfad zur Tabellendefinition
	* @return true
	*/
	/*
	function loadTableDef($file) {
		global $app,$conf;
		
		include_once($file);
		$this->tableDef = $table;
		$this->table_name = $table_name;
		$this->table_index = $table_index;
		return true;
	}
	*/
    
    function loadFormDef($file,$module = '') {
		global $app,$conf;
		
		include_once($file);
		$this->formDef = $form;
		
		$this->module = $module;
		if($module == '') {
			include_once("lib/lang/".$_SESSION["s"]["language"]."_".$this->formDef["name"].".lng");
		} else {
			include_once("../$module/lib/lang/".$_SESSION["s"]["language"]."_".$this->formDef["name"].".lng");
		}
		$this->wordbook = $wb;
		
		return true;
	}
	
	
	/**
	* Konvertiert die Daten des übergebenen assoziativen
	* Arrays in "menschenlesbare" Form.
	* Datentyp Konvertierung, z.B. für Ausgabe in Listen.
	*
	* @param record
	* @return record
	*/
	function decode($record,$tab) {
		if(!is_array($this->formDef['tabs'][$tab])) $app->error("Tab ist leer oder existiert nicht (TAB: $tab).");
		if(is_array($record)) {
			foreach($this->formDef['tabs'][$tab]['fields'] as $key => $field) {
				switch ($field['datatype']) {
				case 'VARCHAR':
					$new_record[$key] = stripslashes($record[$key]);
				break;
				
				case 'TEXT':
					$new_record[$key] = stripslashes($record[$key]);
				break;
				
				case 'DATE':
					if($record[$key] > 0) {
						$new_record[$key] = date($this->dateformat,$record[$key]);
					}
				break;
				
				case 'INTEGER':
					$new_record[$key] = intval($record[$key]);
				break;
				
				case 'DOUBLE':
					$new_record[$key] = $record[$key];
				break;
				
				case 'CURRENCY':
					$new_record[$key] = number_format($record[$key], 2, ',', '');
				break;
				
				default:
					$new_record[$key] = stripslashes($record[$key]);
				}
			}
			
		}
	return $new_record;
	}
	
	/**
	* Get the key => value array of a form filed from a datasource definitiom
	*
	* @param field = NEW oder EDIT 
	* @param record = Dataset as array
	* @return key => value array for the value field of a form
	*/
	
	function getDatasourceData($field, $record) {
		global $app;
		
		$values = array();
		
		if($field["datasource"]["type"] == 'SQL') {
			
			// Preparing SQL string. We will replace some
			// common placeholders
			$querystring = $field["datasource"]["querystring"];
			$querystring = str_replace("{USERID}",$_SESSION["s"]["user"]["userid"],$querystring);
			$querystring = str_replace("{GROUPID}",$_SESSION["s"]["user"]["default_group"],$querystring);
			$querystring = str_replace("{GROUPS}",$_SESSION["s"]["user"]["groups"],$querystring);
			$table_idx = $this->formDef['db_table_idx'];
			$querystring = str_replace("{RECORDID}",$record[$table_idx],$querystring);
			
			// Getting the records
			$tmp_records = $app->db->queryAllRecords($querystring);
			if($app->db->errorMessage != '') die($app->db->errorMessage);
			if(is_array($tmp_records)) {
				$key_field = $field["datasource"]["keyfield"];
				$value_field = $field["datasource"]["valuefield"];
				foreach($tmp_records as $tmp_rec) {
					$tmp_id = $tmp_rec[$key_field];
					$values[$tmp_id] = $tmp_rec[$value_field];
				}
			}
		}
		
		if($field["datasource"]["type"] == 'CUSTOM') {
			// Calls a custom class to validate this record
			if($field["datasource"]['class'] != '' and $field["datasource"]['function'] != '') {
				$datasource_class = $field["datasource"]['class'];
				$datasource_function = $field["datasource"]['function'];
				$app->uses($datasource_class);
				$values = $app->$datasource_class->$datasource_function($field, $record);
			} else {
				$this->errorMessage .= "Custom datasource class or function is empty<br>\r\n";
			}
		}
		
		return $values;
		
	}
	
	
	/**
	* Record für Ausgabe in Formularen vorbereiten.
	*
	* @param record = Datensatz als Array
	* @param action = NEW oder EDIT 
	* @return record
	*/
	function getHTML($record, $tab, $action = 'NEW') {
		
		global $app;
		
		$this->action = $action;
		
		if(!is_array($this->formDef)) $app->error("Keine Formdefinition vorhanden.");
		if(!is_array($this->formDef['tabs'][$tab])) $app->error("Tab ist leer oder existiert nicht (TAB: $tab).");
		
		$new_record = array();
		if($action == 'EDIT') {
			$record = $this->decode($record,$tab);
			if(is_array($record)) {
				foreach($this->formDef['tabs'][$tab]['fields'] as $key => $field) {
					$val = $record[$key];
					
					// If Datasource is set, get the data from there
					if(is_array($field['datasource'])) {
						$field["value"] = $this->getDatasourceData($field, $record);
					}
					
					switch ($field['formtype']) {
					case 'SELECT':
						if(is_array($field['value'])) {
							$out = '';
							foreach($field['value'] as $k => $v) {
								$selected = ($k == $val)?' SELECTED':'';
								$out .= "<option value='$k'$selected>$v</option>\r\n";
							}
						}
						$new_record[$key] = $out;
					break;
					case 'MULTIPLE':
						if(is_array($field['value'])) {
							
							// aufsplitten ergebnisse
							$vals = explode($field['separator'],$val);
							
							// HTML schreiben
							$out = '';
							foreach($field['value'] as $k => $v) {
								
								$selected = '';
								foreach($vals as $tvl) {
									if(trim($tvl) == trim($k)) $selected = ' SELECTED';
								}
								
								$out .= "<option value='$k'$selected>$v</option>\r\n";
							}
						}
						$new_record[$key] = $out;
					break;
					
					case 'PASSWORD':
						$new_record[$key] = '';
					break;
					
					case 'CHECKBOX':
						$checked = (empty($val))?'':' CHECKED';
						$new_record[$key] = "<input name=\"".$key."\" type=\"checkbox\" value=\"".$field['value']."\" $checked>\r\n";
					break;
					
					case 'CHECKBOXARRAY':
						if(is_array($field['value'])) {
							
							// aufsplitten ergebnisse
							$vals = explode($field['separator'],$val);
							
							// HTML schreiben
							$out = '';
							foreach($field['value'] as $k => $v) {
								
								$checked = '';
								foreach($vals as $tvl) {
									if(trim($tvl) == trim($k)) $checked = ' CHECKED';
								}
								
								$out .= "<input name=\"".$key."[]\" type=\"checkbox\" value=\"$k\" $checked>$v <br />\r\n";
							}
						}
						$new_record[$key] = $out;
					break;
					
					case 'RADIO':
						if(is_array($field['value'])) {
							
							// HTML schreiben
							$out = '';
							foreach($field['value'] as $k => $v) {
								$checked = ($k == $val)?' CHECKED':'';
								$out .= "<input name='".$key."[]' type='radio' value='$k'$checked> $v<br>\r\n";
							}
						}
						$new_record[$key] = $out;
					break;
					
					default:
						$new_record[$key] = htmlspecialchars($record[$key]);
					}
				}
			}
		} else {
			// Action: NEW
			foreach($this->formDef['tabs'][$tab]['fields'] as $key => $field) {
				
				// If Datasource is set, get the data from there
				if(is_array($field['datasource'])) {
					$field["value"] = $this->getDatasourceData($field, $record);
				}
				
				switch ($field['formtype']) {
				case 'SELECT':
					if(is_array($field['value'])) {
						$out = '';
						foreach($field['value'] as $k => $v) {
							$selected = ($k == $val)?' SELECTED':'';
							$out .= "<option value='$k'$selected>$v</option>\r\n";
						}
					}
					$new_record[$key] = $out;
				break;
				case 'MULTIPLE':
						if(is_array($field['value'])) {
							
							// aufsplitten ergebnisse
							$vals = explode($field['separator'],$val);
							
							// HTML schreiben
							$out = '';
							foreach($field['value'] as $k => $v) {
								
								$out .= "<option value='$k'>$v</option>\r\n";
							}
						}
						$new_record[$key] = $out;
					break;
				
				case 'PASSWORD':
					$new_record[$key] = '';
				break;
				
				case 'CHECKBOX':
					$checked = (empty($field["default"]))?'':' CHECKED';
					$new_record[$key] = "<input name=\"".$key."\" type=\"checkbox\" value=\"".$field['value']."\" $checked>\r\n";
				break;
				
				case 'CHECKBOXARRAY':
					if(is_array($field['value'])) {
						
						// aufsplitten ergebnisse
						$vals = explode($field['separator'],$field["default"]);
						
						// HTML schreiben
						$out = '';
						foreach($field['value'] as $k => $v) {
							
							$checked = '';
							foreach($vals as $tvl) {
								if(trim($tvl) == trim($k)) $checked = ' CHECKED';
							}
								
							$out .= "<input name=\"".$key."[]\" type=\"checkbox\" value=\"$k\" $checked> $v<br />\r\n";
						}
					}
					$new_record[$key] = $out;
				break;
					
				case 'RADIO':
					if(is_array($field['value'])) {
					
						// HTML schreiben
						$out = '';
						foreach($field['value'] as $k => $v) {
							$checked = ($k == $field["default"])?' CHECKED':'';
							$out .= "<input name='".$key."[]' type='radio' value='$k'$checked> $v<br>\r\n";
						}
					}
					$new_record[$key] = $out;
				break;
				
				default:
					$new_record[$key] = htmlspecialchars($field['value']);
				}
			}
		
		}
		
		if($this->debug == 1) $this->dbg($new_record);
		
		return $new_record;
	}
	
	/**
	* Record in "maschinen lesbares" Format überführen
	* und Werte gegen reguläre Ausdrücke prüfen.
	*
	* @param record = Datensatz als Array
	* @return record
	*/
	function encode($record,$tab) {
		
		if(!is_array($this->formDef['tabs'][$tab])) $app->error("Tab ist leer oder existiert nicht (TAB: $tab).");
		$this->errorMessage = '';
		
		if(is_array($record)) {
			foreach($this->formDef['tabs'][$tab]['fields'] as $key => $field) {
				
				if(is_array($field['validators'])) $this->validateField($key, $record[$key], $field['validators']);
				
				switch ($field['datatype']) {
				case 'VARCHAR':
					if(!is_array($record[$key])) {
						$new_record[$key] = addslashes($record[$key]);
					} else {
						$new_record[$key] = implode($field['separator'],$record[$key]);
					}
				break;
				case 'TEXT':
					if(!is_array($record[$key])) {
						$new_record[$key] = addslashes($record[$key]);
					} else {
						$new_record[$key] = implode($field['separator'],$record[$key]);
					}
				break;
				case 'DATE':
					if($record[$key] > 0) {
						list($tag,$monat,$jahr) = explode('.',$record[$key]);
						$new_record[$key] = mktime(0,0,0,$monat,$tag,$jahr);
					}
				break;
				case 'INTEGER':
					$new_record[$key] = intval($record[$key]);
				break;
				case 'DOUBLE':
					$new_record[$key] = addslashes($record[$key]);
				break;
				case 'CURRENCY':
					$new_record[$key] = str_replace(",",".",$record[$key]);
				break;
				}
				
				// The use of the field value is deprecated, use validators instead
				if($field['regex'] != '') {
					// Enable that "." matches also newlines
					$field['regex'] .= 's';
					if(!preg_match($field['regex'], $record[$key])) {
						$errmsg = $field['errmsg'];
						$this->errorMessage .= $this->wordbook[$errmsg]."<br>\r\n";
					}
				}
				
				
			}
		}
		return $new_record;
	}
	
	/**
	* process the validators for a given field.
	*
	* @param field_name = Name of the field
	* @param field_value = value of the field
	* @param validatoors = Array of validators
	* @return record
	*/
	
	function validateField($field_name, $field_value, $validators) {
		
		global $app;
		
		// loop trough the validators
		foreach($validators as $validator) {
			
			switch ($validator['type']) {
				case 'REGEX':
					$validator['regex'] .= 's';
					if(!preg_match($validator['regex'], $field_value)) {
						$errmsg = $validator['errmsg'];
						$this->errorMessage .= $this->wordbook[$errmsg]."<br>\r\n";
					}
				break;
				case 'UNIQUE':
					if($this->action == 'NEW') {
						$num_rec = $app->db->queryOneRecord("SELECT count(*) as number FROM ".$escape.$this->formDef['db_table'].$escape. " WHERE $field_name = '".$app->db->quote($field_value)."'");
						if($num_rec["number"] > 0) {
							$errmsg = $validator['errmsg'];
							$this->errorMessage .= $this->wordbook[$errmsg]."<br>\r\n";
						}
					} else {
						$num_rec = $app->db->queryOneRecord("SELECT count(*) as number FROM ".$escape.$this->formDef['db_table'].$escape. " WHERE $field_name = '".$app->db->quote($field_value)."' AND ".$this->formDef['db_table_idx']." != ".$this->primary_id); 
						if($num_rec["number"] > 0) {
							$errmsg = $validator['errmsg'];
							$this->errorMessage .= $this->wordbook[$errmsg]."<br>\r\n";
						}
					}
				break;
				case 'NOTEMPTY':
					if(empty($field_value)) {
						$errmsg = $validator['errmsg'];
						$this->errorMessage .= $this->wordbook[$errmsg]."<br>\r\n";
					}
				break;
				/*
				case 'ISEMAIL':
					if(!preg_match("", $field_value)) {
						$errmsg = $validator['errmsg'];
						$this->errorMessage .= $this->wordbook[$errmsg]."<br>\r\n";
					}
				break;
				*/
				case 'ISINT':
					$tmpval = intval($field_value);
					if($tmpval === 0 and !empty($field_value)) {
						$errmsg = $validator['errmsg'];
						$this->errorMessage .= $this->wordbook[$errmsg]."<br>\r\n";
					}
				break;
				case 'CUSTOM':
					// Calls a custom class to validate this record
					if($validator['class'] != '' and $validator['function'] != '') {
						$validator_class = $validator['class'];
						$validator_function = $validator['function'];
						$app->uses($validator_class);
						$this->errorMessage .= $app->$validator_class->$validator_function($validator);
					} else {
						$this->errorMessage .= "Custom validator class or function is empty<br>\r\n";
					}
				break;
			}
			
			
		}
		
		return true;
	}
	
	/**
	* SQL Statement für Record erzeugen.
	*
	* @param record = Datensatz als Array
	* @param action = INSERT oder UPDATE
	* @param primary_id
	* @return record
	*/
	function getSQL($record, $tab, $action = 'INSERT', $primary_id = 0, $sql_ext_where = '') {
		
		global $app;
		
		// checking permissions
		if($this->formDef['auth'] == 'yes') {
			if($action == "INSERT") {
				if(!$this->checkPerm($primary_id,'i')) $this->errorMessage .= "Insert denied.<br>\r\n";
			} else {
				if(!$this->checkPerm($primary_id,'u')) $this->errorMessage .= "Insert denied.<br>\r\n";
			}
		}
		
		$this->action = $action;
		$this->primary_id = $primary_id;
		
		$record = $this->encode($record,$tab);
		$sql_insert_key = '';
		$sql_insert_val = '';
		$sql_update = '';
		
		if(!is_array($this->formDef)) $app->error("Keine Formulardefinition vorhanden.");
		if(!is_array($this->formDef['tabs'][$tab])) $app->error("Tab ist leer oder existiert nicht (TAB: $tab).");
		
		// gehe durch alle Felder des Tabs
		if(is_array($record)) {
        	foreach($this->formDef['tabs'][$tab]['fields'] as $key => $field) {
				// Wenn es kein leeres Passwortfeld ist
				if (!($field['formtype'] == 'PASSWORD' and $record[$key] == '')) {
					// Erzeuge Insert oder Update Quelltext
					if($action == "INSERT") {
						if($field['formtype'] == 'PASSWORD') {
							$sql_insert_key .= "`$key`, ";
							$sql_insert_val .= "md5('".$record[$key]."'), ";
						} else {
							$sql_insert_key .= "`$key`, ";
							$sql_insert_val .= "'".$record[$key]."', ";
						}
					} else {
						if($field['formtype'] == 'PASSWORD') {
							$sql_update .= "`$key` = md5('".$record[$key]."'), ";
						} else {
							$sql_update .= "`$key` = '".$record[$key]."', ";
						}
					}
				}
			}
        }
		
		// Füge Backticks nur bei unvollständigen Tabellennamen ein
		if(stristr($this->formDef['db_table'],'.')) {
			$escape = '';
		} else {
			$escape = '`';
		}
		
		
		if($action == "INSERT") {
			if($this->formDef['auth'] == 'yes') {
				// Setze User und Gruppe
				$sql_insert_key .= "`sys_userid`, ";
				$sql_insert_val .= ($this->formDef["auth_preset"]["userid"] > 0)?"'".$this->formDef["auth_preset"]["userid"]."', ":"'".$_SESSION["s"]["user"]["userid"]."', ";
				$sql_insert_key .= "`sys_groupid`, ";
				$sql_insert_val .= ($this->formDef["auth_preset"]["groupid"] > 0)?"'".$this->formDef["auth_preset"]["groupid"]."', ":"'".$_SESSION["s"]["user"]["default_group"]."', ";
				$sql_insert_key .= "`sys_perm_user`, ";
				$sql_insert_val .= "'".$this->formDef["auth_preset"]["perm_user"]."', ";
				$sql_insert_key .= "`sys_perm_group`, ";
				$sql_insert_val .= "'".$this->formDef["auth_preset"]["perm_group"]."', ";
				$sql_insert_key .= "`sys_perm_other`, ";
				$sql_insert_val .= "'".$this->formDef["auth_preset"]["perm_other"]."', ";
			}
			$sql_insert_key = substr($sql_insert_key,0,-2);
			$sql_insert_val = substr($sql_insert_val,0,-2);
			$sql = "INSERT INTO ".$escape.$this->formDef['db_table'].$escape." ($sql_insert_key) VALUES ($sql_insert_val)";
		} else {
			if($primary_id != 0) {
				$sql_update = substr($sql_update,0,-2);
				$sql = "UPDATE ".$escape.$this->formDef['db_table'].$escape." SET ".$sql_update." WHERE ".$this->formDef['db_table_idx']." = ".$primary_id;
				if($sql_ext_where != '') $sql .= " and ".$sql_ext_where;
			} else {
				$app->error("Primary ID fehlt!");
			}
		}
		
		// Daten in History tabelle speichern
		if($this->errorMessage == '' and $this->formDef['db_history'] == 'yes') $this->datalogSave($action,$primary_id,$record);
		
		return $sql;
	}
	
	/**
	* Debugging arrays.
	*
	* @param array_data
	*/
	function dbg($array_data) {
		
		echo "<pre>";
		print_r($array_data);
		echo "</pre>";
		
	}
    
    
    function showForm() {
    	global $app,$conf;
        
        if(!is_array($this->formDef)) die("Form Definition wurde nicht geladen.");
		
		$active_tab = $this->getNextTab();
        
        // definiere Tabs
        foreach( $this->formDef["tabs"] as $key => $tab) {
            
			$tab['name'] = $key;
            if($tab['name'] == $active_tab) {
				
				// Wenn Modul gesetzt, dann setzte template pfad relativ zu modul.
				if($this->module != '') $tab["template"] = "../".$this->module."/".$tab["template"];
				
				// überprüfe, ob das Template existiert, wenn nicht
				// dann generiere das Template
				if(!is_file($tab["template"])) {
					$app->uses('tform_tpl_generator');
					$app->tform_tpl_generator->buildHTML($this->formDef,$tab['name']);
				}
				
            	$app->tpl->setInclude('content_tpl',$tab["template"]);
                $tab["active"] = 1;
                $_SESSION["s"]["form"]["tab"] = $tab['name'];
            } else {
            	$tab["active"] = 0;
            }
			
			// Die Datenfelder werden für die Tabs nicht benötigt
			unset($tab["fields"]);
			unset($tab["plugins"]);
			
            $frmTab[] = $tab;
        }
        
        // setting form tabs
        $app->tpl->setLoop("formTab", $frmTab);

		// Set form action
		$app->tpl->setVar('form_action',$this->formDef["action"]);
		$app->tpl->setVar('form_active_tab',$active_tab);
		
		// Set form title
		$form_hint = '<b>'.$this->formDef["title"].'</b>';
		if($this->formDef["description"] != '') $form_hint .= '<br><br>'.$this->formDef["description"];
		$app->tpl->setVar('form_hint',$form_hint);
		
		// Set Wordbook for this form
		
		$app->tpl->setVar($this->wordbook);
    }
	
	
	
	function datalogSave($action,$primary_id,$record_new) {
		global $app,$conf;
		
		// Füge Backticks nur bei unvollständigen Tabellennamen ein
		if(stristr($this->formDef['db_table'],'.')) {
			$escape = '';
		} else {
			$escape = '`';
		}
		
		if($action == "UPDATE") {
			$sql = "SELECT * FROM ".$escape.$this->formDef['db_table'].$escape." WHERE ".$this->formDef['db_table_idx']." = ".$primary_id;
			$record_old = $app->db->queryOneRecord($sql);
		} else {
			$record_old = array();
		}
		
		$diffrec = array();
		
		if(is_array($record_new)) {
			foreach($record_new as $key => $val) {
				if($record_old[$key] != $val) {
					// Datensatz hat sich geändert
					$diffrec[$key] = array('old' => $record_old[$key],
									   'new' => $val);
				}
			}
		}
		
		if(count($diffrec) > 0) {
			$diffstr = $app->db->quote(serialize($diffrec));
			$username = $app->db->quote($_SESSION["s"]["user"]["username"]);
			$dbidx = $this->formDef['db_table_idx'].":".$primary_id;
			$action = ($action == 'INSERT')?'i':'u';
			$sql = "INSERT INTO sys_datalog (dbtable,dbidx,action,tstamp,user,data) VALUES ('".$this->formDef['db_table']."','$dbidx','$action','".time()."','$username','$diffstr')";
			$app->db->query($sql);
		}
		
		return true;
		
	}
	
	function getAuthSQL($perm) {
		
		$sql = '(';
		$sql .= "(sys_userid = ".$_SESSION["s"]["user"]["userid"]." AND sys_perm_user like '%$perm%') OR  ";
		$sql .= "(sys_groupid IN (".$_SESSION["s"]["user"]["groups"].") AND sys_perm_group like '%$perm%') OR ";
		$sql .= "sys_perm_other like '%$perm%'";
		$sql .= ')';
		
		return $sql;
	}
	
	/*
	Diese funktion überprüft, ob ein User die Berechtigung $perm für den Datensatz mit der ID $record_id
	hat. It record_id = 0, dann wird gegen die user Defaults des Formulares getestet.
	*/
	function checkPerm($record_id,$perm) {
		global $app;
		
		if($record_id > 0) {
			// Füge Backticks nur bei unvollständigen Tabellennamen ein
			if(stristr($this->formDef['db_table'],'.')) {
				$escape = '';
			} else {
				$escape = '`';
			}
		
			$sql = "SELECT ".$this->formDef['db_table_idx']." FROM ".$escape.$this->formDef['db_table'].$escape." WHERE ".$this->formDef['db_table_idx']." = ".$record_id." AND ".$this->getAuthSQL($perm);
			if($record = $app->db->queryOneRecord($sql)) {
				return true;
			} else {
				return false;
			}
		} else {
			$result = false;
			if($this->formDef["auth_preset"]["userid"] == $_SESSION["s"]["user"]["userid"] && stristr($perm,$this->formDef["auth_preset"]["perm_user"])) $result = true;
			if($this->formDef["auth_preset"]["userid"] == $_SESSION["s"]["user"]["groupid"] && stristr($perm,$this->formDef["auth_preset"]["perm_group"])) $result = true;
			if(@stristr($perm,$this->formDef["auth_preset"]["perm_other"])) $result = true;
			
			return $result;
			
		}
		
	}
	
	function getNextTab() {
		// Welcher Tab wird angezeigt
		if($this->errorMessage == '') {
    		// wenn kein Fehler vorliegt
			if($_REQUEST["next_tab"] != '') {
				// wenn nächster Tab bekannt
				$active_tab = $_REQUEST["next_tab"];
    		} else {
        		// ansonsten ersten tab nehmen
        		$active_tab = $this->formDef['tab_default'];
    		}
		} else {
    		// bei Fehlern den gleichen Tab nochmal anzeigen
    		$active_tab = $_SESSION["s"]["form"]["tab"];
		}
		
		return $active_tab;
	}
	
	function getCurrentTab() {
		return $_SESSION["s"]["form"]["tab"];
	}
	
}

?>