<?
/*-- lecture du grilletemp.dat --*/	
$fichier = 'grilletemp.dat';	
    $fp = fopen($fichier, 'r ');		
		for ($j = 1; $j <= 9; $j++) {	
			for ($i = 1; $i <= 9; $i++) {				
				$line = fgets($fp);
				$A[$i][$j] = chop(ltrim($line));	
				$B[$i][$j] = chop(ltrim($line));					
			}
		}
	fclose($fp);
	//est-ce fini?	
	$perdu=0;
	for ($v = 1; $v <= 9; $v++) {	
		for ($i = 1; $i <= 9; $i++) {
				$flagnb[$i]='';					
		}	
		for ($h = 1; $h <= 9; $h++) {		
			$case=$B[$h][$v];			
			$flagnb[$case]=$flagnb[$case].$case;
		}
		for ($i = 1; $i <= 9; $i++) {
			$test=$flagnb[$i];	
			if(strlen($test)!=1){
				$perdu=1;
			}	
		}	
	}	
	
	for ($h = 1; $h <= 9; $h++) {	
		for ($i = 1; $i <= 9; $i++) {
				$flagnb[$i]='';					
		}	
		for ($v = 1; $v <= 9; $v++) {		
			$case=$B[$h][$v];//echo"$case<br>";			
			$flagnb[$case]=$flagnb[$case].$case;				
		}
		for ($i = 1; $i <= 9; $i++) {
			$test=$flagnb[$i];//echo"$test<br>";	
			if(strlen($test)!=1){
				$perdu=1;
			}	
		}	
	}	
	
	
	$h0=1;$hm=3;$v0=1;$vm=3;$perdu=0;
	$tperdu[1]=testblock($h0,$hm,$v0,$vm,$perdu);
	$h0=4;$hm=6;$v0=1;$vm=3;$perdu=0;
	$tperdu[2]=testblock($h0,$hm,$v0,$vm,$perdu);
	$h0=7;$hm=9;$v0=1;$vm=3;$perdu=0;
	$tperdu[3]=testblock($h0,$hm,$v0,$vm,$perdu);
	$h0=1;$hm=3;$v0=4;$vm=6;$perdu=0;
	$tperdu[4]=testblock($h0,$hm,$v0,$vm,$perdu);
	$h0=4;$hm=6;$v0=4;$vm=6;$perdu=0;
	$tperdu[5]=testblock($h0,$hm,$v0,$vm,$perdu);
	$h0=7;$hm=9;$v0=4;$vm=6;$perdu=0;
	$tperdu[6]=testblock($h0,$hm,$v0,$vm,$perdu);
	$h0=1;$hm=3;$v0=7;$vm=9;$perdu=0;
	$tperdu[7]=testblock($h0,$hm,$v0,$vm,$perdu);
	$h0=4;$hm=6;$v0=7;$vm=9;$perdu=0;
	$tperdu[8]=testblock($h0,$hm,$v0,$vm,$perdu);
	$h0=7;$hm=9;$v0=7;$vm=9;$perdu=0;
	$tperdu[9]=testblock($h0,$hm,$v0,$vm,$perdu);
	for ($t = 1; $t <= 9; $t++) {
		if($tperdu[$t]==1){$perdu=1;}
	}	
	function testblock($h0,$hm,$v0,$vm,$perdu){
	/*-- lecture du grilletemp.dat --*/	
	$fichier = 'grilletemp.dat';	
    $fp = fopen($fichier, 'r ');		
		for ($j = 1; $j <= 9; $j++) {	
			for ($i = 1; $i <= 9; $i++) {				
				$line = fgets($fp);
				$C[$i][$j] = chop(ltrim($line));					
			}
		}
	fclose($fp);
		for ($i = 1; $i <= 9; $i++) {
			$flagnb[$i]='';			
		}	
		for ($h = $h0; $h <= $hm; $h++) {	
			for ($v = $v0; $v <= $vm; $v++) {
				$case=$C[$h][$v];//echo"$case<br>";			
				$flagnb[$case]=$flagnb[$case].$case;	
			}
		}	
		for ($i = 1; $i <= 9; $i++) {
			$test=$flagnb[$i];//echo"$test<br>";	
			if(strlen($test)!=1){
				$perdu=1;
			}	
		}
		return $perdu;	
	}
		
	if ($perdu==0){
	/*-- on efface les temporaires --*/
		$dir = './';
		if (file_exists ($dir)){ 
		   $od = opendir($dir); 
		   while ($fich = readdir($od)){ 
		      	if ($fich != "." AND $fich != ".." AND $fich != 'grilletemp.dat'){ 
		       		$l=strlen($fich);
					$dat=substr($fich,$l-4,4);
					if(($dat=='.dat')||($dat=='.DAT')){
						unlink($fich);
					}	
		        } 
		   }     
		   closedir($od); 
		}
else{ echo' <h4><font color=#ff0000>Le rpertoire spcifi '.$dir.' n\'existe pas!!!</font></h4>';} 
   				 
		$text='<font color=#ff0000>Gagn</font>';
		$music='Gagne.wav';
	}
	else{$text='<font color=#008000>Perdu</font>';
		$music='Perdu.wav';
		include('choixPageF.txt');
	}
?>