defektologs.lv Par web izstrādes lietām

function validate_pk($pk){
	$pk = preg_replace("/[^\d]/","",$pk);
	$calc = 1*$pk[0]+6*$pk[1]+3*$pk[2]+7*$pk[3]+9*$pk[4]+10*$pk[5]+5*$pk[6]+8*$pk[7]+4*$pk[8]+2*$pk[9];
	$checksum = (1101-$calc)%11;
	return $checksum==$pk[10];
}

function validate_iban($str,$reformat=true,$debug=false){
	if($reformat){
		$str = preg_replace('/[\W_]+/','',strtoupper($str));
	}
	$errors = array();
	if(4>strlen($str) || strlen($str)>34){
		$errors[] = 'Invalid string length';
	}
	if(is_numeric($str[0]) || is_numeric($str[1])){
		$errors[] = 'Invalid chars at 0, 1';
	}
	if(!is_numeric($str[2]) || !is_numeric($str[3])){
		$errors[] = 'Invalid chars at 3, 4';
	}
	$ibanReplaceChars = range('A','Z');
	foreach(range(10,35) as $tempvalue){
		$ibanReplaceValues[]=strval($tempvalue);
	}
	$tmpIBAN = substr($str,4).substr($str,0,4);
	$tmpIBAN = str_replace($ibanReplaceChars,$ibanReplaceValues,$tmpIBAN);
	$tmpValue = intval(substr($tmpIBAN,0,1));
	for($i=1;$i<strlen($tmpIBAN);$i++){
		$tmpValue*= 10;
		$tmpValue+= intval(substr($tmpIBAN,$i,1));
		$tmpValue%= 97;
	}
	if($tmpValue!=1){
		$errors[] = 'Invalid checksum';
	}
	if(empty($errors)){
		return true;
	}
	if($debug){
		echo implode("\n", $errors);
	}
	return false;
}