<?

// diese function verschlüsselt einen string 
function stringencode($enc) {
	$ip=$REMOTE_ADDR;
	$pw=NULL;
	$laenge=strlen($enc);
	$schluessel=explode(".",$ip);
	$l=0;
	for($i=0; $i<$laenge; $i++ ) {	
		if($l>3) { $l=0; }
		$data=substr($enc,$i,1);
		$data2=Ord($data);
		$key=$schluessel[$l];
		if($key>127) { $key=127; }
		if($key==0) {
			switch($l) {
				case 0: $key=107; break;
				case 1: $key=53; break;
				case 2: $key=12; break;
				case 3: $key=123; break;
			}
		}
		for($j=0; $j<$key; $j++) {
			$data2++;
		}
		$l++;	
		$data=chr($data2);	
		$randausgang=$key+$randausgang;
		mt_srand($randausgang);
		$b=mt_rand();
		mt_srand($b);
		$pos=mt_rand(1,127);
		$streu=chr($pos);	
		$string="$string$data$streu";
	}
	$stringencode="$string";
	return $stringencode;
}

// diese funktion entschlüsselt einen mit stringencode() 
// verschlüsselten string
function srtingdecode($pw) {	
	$ip=$REMOTE_ADDR;
	$strdecoded=NULL;		
	$laenge=strlen($pw)/2;
	$schluessel=explode(".",$ip);
	$l=0; $f=0;		
	for($i=0; $i<$laenge; $i++ ) {	
		if($l>3) { $l=0; }	
		$data=substr($pw,$f,1);		
		$data2=Ord($data);	
		$key=$schluessel[$l];
		if($key>127) { $key=127; }
		if($key==0) {
			switch($l) {
				case 0: $key=107; break;
				case 1: $key=53; break;
				case 2: $key=12; break;
				case 3: $key=123; break;
			}
		}		
		for($j=0; $j<$key; $j++) {	
			$data2--;	
		}
		$l++; $f+=2;	
		$data=chr($data2);	
		$strdecoded="$strdecoded$data";
	}
	return $strdecoded;	
}

// diese function generiert ein zufälliges passwort aus klei-, großbuchstaben
// zahlen und onderzeichen. die länge des zu generierenden passwortes wird als
// integer übergeben.
function genpassword($u) {
	if($u>14) { $u=14; }
	$passwort=NULL;
	$randausgang=date("U");
	for($i=0; $i<$u; $i++) {		
		$randaus=$u+$randausgang;
		mt_srand($randaus);
		$c=mt_rand();
		mt_srand($c);
		$p=mt_rand(1,15);		
		switch($p) {
			case 1: $min=48; $max=57; break;
			case 2: $min=97; $max=122; break;
			case 3: $min=97; $max=122; break;
			case 4: $min=65; $max=90; break;
			case 5: $min=97; $max=122; break;
			case 6: $min=48; $max=57; break;
			case 7: $min=97; $max=122; break;
			case 8: $min=65; $max=90; break;
			case 9: $min=48; $max=57; break;
			case 10: $min=65; $max=90; break;
			case 11: $min=48; $max=57; break;
			case 12: $min=65; $max=90; break;
			case 13: $min=97; $max=122; break;
			case 14: $min=48; $max=57; break;
			case 15: $min=65; $max=90; break;
		}		
		$randausgang=$u+$randausgang;
		mt_srand($randausgang);
		$b=mt_rand();
		mt_srand($b);
		$pos=mt_rand($min,$max);
		$streu=chr($pos);	
		$passwort="$passwort$streu";
	}
	return $passwort;
}

?>