<?php

//recup_club("05220264");

function recup_club($num_fft) {
	$res=0;
	$handle=ouvre_adresse_web_club($num_fft);
	if($handle!=NULL) {
		$res_erreur=erreur_page($num_fft);
		if($res_erreur==0) {
			passeEnTeteHtmlClub($handle);
			$tab=lectureDonneesHtmlClub($handle);
			//lectureTableauClub($tab);
			insertion_bdd_club($tab);
			$res=1;
		}
	}
	return $res;
}

function ouvre_adresse_web_club($num_fft) {
	$ad_web="http://www.fft.fr/palmares/bdd/recherche_clubs/fiche_club.asp?NOM_CLUB=&VILLE=&NUMERO_CLUB=%s&DPT=&Rechercher=Rechercher&NIVEAU=0&ID_CLUB=%s";
	$ad_web=sprintf($ad_web, $num_fft, $num_fft);
	if($file_handle=fopen($ad_web,"r")) {
		return $file_handle;
	}
	else {
		echo "Erreur ouverture fichier";
		return NULL;
	}
}

function erreur_page($num_fft) {
	$res=0;
	$ad_web="http://www.fft.fr/palmares/bdd/recherche_clubs/fiche_club.asp?NOM_CLUB=&VILLE=&NUMERO_CLUB=%s&DPT=&Rechercher=Rechercher&NIVEAU=0&ID_CLUB=%s";
	$ad_web=sprintf($ad_web, $num_fft, $num_fft);
	$html = implode ('', file ($ad_web));

	if(ereg("Fiche", $html)>0) {
		$ok=0;
	}
	else {
		$ok=1;
	}

	return $res;
}

/* Passe l'en-tete du fichier html */
function passeEnTeteHtmlClub($file_handle) {
	for($i=0;$i<5;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<6;$i++)
		passeTag($file_handle);
}

/* Lit les donnees utiles et les placent dans un tableau */
function LectureDonneesHtmlClub($file_handle) {
	/* tableau contenant la liste des coordonnées du club */
	$tableauClub=array();

	/* Passe le titre */
	for($i=0;$i<6;$i++)
		passeTag($file_handle);
	passeElement($file_handle);

	/* Nom du club */
	for($i=0;$i<10;$i++)
		passeTag($file_handle);
	$tableauClub=lecture_ElementClub($file_handle, $tableauClub);

	/* Numero fft du club */
	for($i=0;$i<8;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<9;$i++)
		passeTag($file_handle);
	$tableauClub=lecture_ElementClub($file_handle, $tableauClub);

	/* Adresse du club */
	for($i=0;$i<11;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<10;$i++)
		passeTag($file_handle);
	$tableauClub=lecture_AdresseCLub($file_handle, $tableauClub);
	$tableauClub=lecture_ElementClub($file_handle, $tableauClub);

	/*Telephone du club */
	for($i=0;$i<8;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<6;$i++)
		passeTag($file_handle);
	$tableauClub=lecture_ElementClub($file_handle, $tableauClub);

	/* President */
	for($i=0;$i<10;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<6;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<6;$i++)
		passeTag($file_handle);
	$tableauClub=lecture_ElementClub($file_handle, $tableauClub);

	/* Passe Correspondant */
	for($i=0;$i<9;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<12;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	passeTag($file_handle);passeElement($file_handle);
	passeTag($file_handle);passeElement($file_handle);
	passeTag($file_handle);passeElement($file_handle);

	/* Passe CLub House */
	for($i=0;$i<10;$i++)
		passeTag($file_handle);
	passeElement($file_handle);

	/* Passe Ecole de tennis */
	for($i=0;$i<9;$i++)
		passeTag($file_handle);
	passeElement($file_handle);

	/* Terrains decouverts */
	for($i=0;$i<11;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<11;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<4;$i++)
		passeTag($file_handle);
	$tableauClub=lecture_ElementClub($file_handle, $tableauClub);
	for($i=0;$i<5;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<4;$i++)
		passeTag($file_handle);
	$tableauClub=lecture_ElementClub($file_handle, $tableauClub);

	/* Terrains couverts */
	for($i=0;$i<6;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<11;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<4;$i++)
		passeTag($file_handle);
	$tableauClub=lecture_ElementClub($file_handle, $tableauClub);
	for($i=0;$i<5;$i++)
		passeTag($file_handle);
	passeElement($file_handle);
	for($i=0;$i<4;$i++)
		passeTag($file_handle);
	$tableauClub=lecture_ElementClub($file_handle, $tableauClub);
	
	/* retourne le tableau contenant les données des joueurs */
	return $tableauClub;
}

/* place l'élément dans le tableau - Validée */
function lecture_ElementClub($file_handle, $tableauClub) {
	while($c!='<') {
		$c=fgetc($file_handle);
		$str.=$c;
	}
	/* enleve le '<' et les espaces */
	$str=substr($str, 0, strlen($str)-1);
	$str=trim($str);
	array_push($tableauClub, $str);
	return $tableauClub;
}

function lecture_AdresseClub($file_handle, $tableauClub) {
	$i=0;
	while($i<2) {
		$c=fgetc($file_handle);
		$str.=$c;
		if($c=='<') 
			$i++;
	}
	/* enleve le '<' , le $nbsp; et les espaces */
	list($partie1, $partie2)=explode("<br>",$str);
	$partie1=trim($partie1);
	$partie2=trim($partie2);
	$partie2=substr($partie2, 0, strlen($partie2)-1);
	$partie2=trim($partie2);
	passeTag($file_handle);
	$str_fin=$partie1." ".$partie2;
	array_push($tableauClub, $str_fin);
	return $tableauClub;
}


function lectureTableauClub($tableauClub) {
	print_r($tableauClub);
}

function insertion_bdd_club($tableauClub) {
include("conf.php");
include("mysql_compat.php");
	include ("conf.php");
	$db_connection=mysql_connect($db_host,$db_user,$password);
	mysql_select_db($db_name,$db_connection);
	list($cp, $ville)=explode("  ",$tableauClub[3]);
	$requete="SELECT id_club FROM club WHERE numero_fft='$tableauClub[1]'";
	$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
	$existe=mysql_num_rows($reponse);
	$nom=addslashes($tableauClub[0]);
	if($existe==0) {
		$tableauClub[0]=ucwords(strtolower($tableauClub[0]));
		$ville=ucwords(strtolower($ville));
		$ville=addslashes($ville);
		$mdp=md5("tennis");
		$pdt=$tableauClub[5];
		$pdt=addslashes($pdt);
		$requete="INSERT INTO club(nom, numero_fft, ville, code_postal, telephone, president, mot_passe) VALUES('$nom','$tableauClub[1]','$ville','$cp','$tableauClub[4]','$pdt','$mdp')";
		$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
		/* Id du club */
		$requete="SELECT MAX(id_club) FROM club";
		$reponse1=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
		$club=mysql_fetch_array($reponse1);
		/* Crée un joueur administrateur des résa pour le numéro FFT du club */
		list($nom, $prenom)=explode(" ", $nom);
		$requete="INSERT INTO joueur(numero_fft,classement, nom, prenom, annee, e_mail, sexe) VALUES('$tableauClub[1]','','$nom', '$prenom','1920', NULL, 'm')";
		$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
		$requete="SELECT MAX(id_joueur) FROM joueur";
		$reponse1=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
		$joueur=mysql_fetch_array($reponse1);
		$temp=utf8_decode("MembreLicencié");
		$ts_now=time();
		$debut=Date("YmdHis",$ts_now);
		/* Pour cinq ans */
		$ts_fin=$ts_now+(3600*24*365*5);
		$fin=Date("YmdHis",$ts_fin);
		$requete="INSERT INTO compte(statut, droit, id_joueur, id_club, actif_debut, actif_fin, solde,paiement) VALUES('$temp','Administrateur','$joueur[0]','$club[0]','$debut','$fin','10','oui')";
		$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
		$requete="INSERT INTO admin_resa(id_joueur,id_club,mot_passe) VALUES('$joueur[0]', '$club[0]', '$mdp')";
		$reponse1=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");

		/* Création des terrains */

		/* terrains decouverts */

		/* terre battue */
		if($tableauClub[6]!=0) {
			for($i=0;$i<$tableauClub[6];$i++) {
				$nom="Court exterieur terre ".($i+1)."";
				$temp=utf8_decode("Extérieur");
				$requete="INSERT INTO reservable(id_club, nom, type, protection, surface) VALUES('$club[0]', '$nom', 'Court', '$temp','Terre')";
				$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
			}
		}

		/* Dur */
		if($tableauClub[7]!=0) {
			for($i=0;$i<$tableauClub[7];$i++) {
				$nom="Court exterieur ".($i+1)."";
				$temp=utf8_decode("Extérieur");
				$requete="INSERT INTO reservable(id_club, nom, type, protection, surface) VALUES('$club[0]', '$nom', 'Court', '$temp','Ciment')";
				$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
			}
		}

		/* terrains couverts */

		/* terre battue */
		if($tableauClub[8]!=0) {
			for($i=0;$i<$tableauClub[8];$i++) {
				$nom="Court couvert terre ".($i+1)."";
				$requete="INSERT INTO reservable(id_club, nom, type, protection, surface) VALUES('$club[0]', '$nom', 'Court', 'Couvert','Terre')";
				$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
			}
		}

		/* Dur */
		if($tableauClub[9]!=0) {
			for($i=0;$i<$tableauClub[9];$i++) {
				$nom="Court couvert ".($i+1)."";
				$temp=utf8_decode("Résine");
				$requete="INSERT INTO reservable(id_club, nom, type, protection, surface) VALUES('$club[0]', '$nom', 'Court', 'Couvert','$temp')";
				$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
			}
		}
	}
	else {
		$tableauClub[0]=ucwords(strtolower($tableauClub[0]));
		$tableauClub[0]=addslashes($tableauClub[0]);
		$ville=ucwords(strtolower($ville));
		$ville=addslashes($ville);
		$mdp=md5("tennis");
		$pdt=$tableauClub[5];
		$pdt=addslashes($pdt);
		$nom=addslashes($tableauClub[0]);
		$requete="UPDATE club SET nom='$nom', ville='$ville', code_postal='$cp', telephone='$tableauClub[4]', president='$pdt' WHERE numero_fft='$tableauClub[1]'";
		$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
		$requete="SELECT id_club FROM club WHERE numero_fft='$tableauClub[1]'";
		$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
		$club=mysql_fetch_object($reponse);
		/* Controle si un joueur correspondant au club est crée */
		$requete="SELECT id_joueur FROM joueur WHERE numero_fft='$tableauClub[1]'";
		$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
		$existe_cpte=mysql_num_rows($reponse);
		if($existe_cpte > 0) {
			$joueur=mysql_fetch_object($reponse);
			$ts_now=time();
			$debut=Date("YmdHis",$ts_now);
			/* Pour cinq ans */
			$ts_fin=$ts_now+(3600*24*365*5);
			$fin=Date("YmdHis",$ts_fin);
			$requete="UPDATE compte SET actif_debut='$debut', actif_fin='$fin', droit='Administrateur' WHERE id_joueur='$joueur->id_joueur' AND id_club='$club->id_club'";
			$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
		}
		else {
			list($nom, $prenom)=explode(" ", $nom);
			$requete="INSERT INTO joueur(numero_fft,classement, nom, prenom, annee, e_mail, sexe) VALUES('$tableauClub[1]','','$nom', '$prenom','1920', NULL, 'm')";
			$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
			$requete="SELECT MAX(id_joueur) FROM joueur";
			$reponse1=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
			$joueur=mysql_fetch_array($reponse1);
			$temp=utf8_decode("MembreLicencié");
			$ts_now=time();
			$debut=Date("YmdHis",$ts_now);
			/* Pour cinq ans */
			$ts_fin=$ts_now+(3600*24*365*5);
			$fin=Date("YmdHis",$ts_fin);
			$requete="INSERT INTO compte(statut, droit, id_joueur, id_club, actif_debut, actif_fin, solde,paiement) VALUES('$temp','Administrateur','$joueur[0]','$club->id_club','$debut','$fin','10','oui')";
			$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
			$requete="INSERT INTO admin_resa(id_joueur,id_club,mot_passe) VALUES('$joueur[0]', '$club->id_club', '$mdp')";
			$reponse1=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
		}
		/* si aucun terrain du club n'est pésent dans la base */
		$requete="SELECT id_club FROM club WHERE numero_fft='$tableauClub[1]'";
		$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
		$club=mysql_fetch_object($reponse);
		$requete="SELECT id_reservable FROM reservable WHERE id_club='$club->id_club'";
		$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
		$existe=mysql_num_rows($reponse);
		if($existe==0) {
			/* Création des terrains */

			/* terrains decouverts */

			/* terre battue */
			if($tableauClub[6]!=0) {
				for($i=0;$i<$tableauClub[6];$i++) {
					$nom="Court exterieur terre ".($i+1)."";
					$requete="INSERT INTO reservable(id_club, nom, type, surface) VALUES('$club->id_club', '$nom', 'Court', 'Terre')";
					$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
				}
			}

			/* Dur */
			if($tableauClub[7]!=0) {
				for($i=0;$i<$tableauClub[7];$i++) {
					$nom="Court exterieur ".($i+1)."";
					$requete="INSERT INTO reservable(id_club, nom, type, surface) VALUES('$club->id_club', '$nom', 'Court','Ciment')";
					$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
				}
			}

			/* terrains couverts */

			/* terre battue */
			if($tableauClub[8]!=0) {
				for($i=0;$i<$tableauClub[8];$i++) {
					$nom="Court interieur terre ".($i+1)."";
					$requete="INSERT INTO reservable(id_club, nom, type, protection, surface) VALUES('$club->id_club', '$nom', 'Court', 'Couvert','Terre')";
					$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
				}
			}

			/* Dur */
			if($tableauClub[9]!=0) {
				for($i=0;$i<$tableauClub[9];$i++) {
					$nom="Court interieur ".($i+1)."";
					$temp=utf8_decode("Résine");
					$requete="INSERT INTO reservable(id_club, nom, type, protection, surface) VALUES('$club->id_club', '$nom', 'Court', 'Couvert','$temp')";
					$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
				}
			}
		}
		else {
			/* Controle le nombre de terrains */
			/* terre battue - découvert*/
			if($tableauClub[6]!=0) {
				$requete="SELECT id_reservable FROM reservable WHERE id_club='$club->id_club' AND surface='Terre' AND protection <> 'Couvert'";
				$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
				$nb_existants=$mysql_num_rows($reponse);
				if($nb_existants < $tableauClub[6]) {
					for($i=$nb_existants;$i<$tableauClub[6];$i++) {
						$nom="Court exterieur terre ".($i+1)."";
						$requete="INSERT INTO reservable(id_club, nom, type, surface) VALUES('$club->id_club', '$nom', 'Court', 'Terre')";
						$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
					}
				}
			}
			/* Dur - découvert*/
			if($tableauClub[7]!=0) {
				$requete="SELECT id_reservable FROM reservable WHERE id_club='$club->id_club' AND surface <> 'Terre' AND protection <> 'Couvert'";
				$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
				$nb_existants=mysql_num_rows($reponse);
				if($nb_existants < $tableauClub[7]) {
					for($i=$nb_existants;$i<$tableauClub[7];$i++) {
						$nom="Court exterieur ".($i+1)."";
						$requete="INSERT INTO reservable(id_club, nom, type, surface) VALUES('$club->id_club', '$nom', 'Court', 'Ciment')";
						$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
					}
				}
			}
			/* terrains couverts */

			/* terre battue */
			if($tableauClub[8]!=0) {
				$requete="SELECT id_reservable FROM reservable WHERE id_club='$club->id_club' AND surface='Terre' AND protection = 'Couvert'";
				$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
				$nb_existants=mysql_num_rows($reponse);
				if($nb_existants < $tableauClub[8]) {
					for($i=0;$i<$tableauClub[8];$i++) {
						$nom="Court interieur terre ".($i+1)."";
						$requete="INSERT INTO reservable(id_club, nom, type, protection, surface) VALUES('$club->id_club', '$nom', 'Court', 'Couvert','Terre')";
						$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
					}
				}
			}

			/* Dur */
			if($tableauClub[9]!=0) {
				$requete="SELECT id_reservable FROM reservable WHERE id_club='$club->id_club' AND surface <> 'Terre' AND protection = 'Couvert'";
				$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
				$nb_existants=mysql_num_rows($reponse);
				if($nb_existants < $tableauClub[9]) {
					for($i=0;$i<$tableauClub[9];$i++) {
						$nom="Court interieur ".($i+1)."";
						$temp=utf8_decode("Résine");
						$requete="INSERT INTO reservable(id_club, nom, type, protection, surface) VALUES('$club->id_club', '$nom', 'Court', 'Couvert','$temp')";
						$reponse=mysql_query($requete,$db_connection) or die ("Erreur no".mysql_errno()." : ".mysql_error()."<br>");
					}
				}
			}
		}
	}
}

?>