<?
// THE BONIFMEISTER RULES THE UNIVERSE
//////////////////////////////////////
require "../fonctions.php";

$req = "select id_domaine from domaine where id_status in (1,4,5,6,8,43)";
$res =r_exec('local',$req,false);
echo "Suppression domaines.";
while ($data=pg_fetch_array($res))
{
	echo "\n".$data[0]." ";
	echo r_exec('local','delete from dom_contacts where id_domaine='.$data[0],false);
	echo r_exec('local','delete from dns_domain where id_domaine='.$data[0],false);
	echo r_exec('local','delete from domaine where id_domaine='.$data[0],false);
}

echo "\nMAJ domaines supprimés. ";
r_exec('local','update domaine set id_status=99 where id_status=7',false);
echo "\nMAJ domaines actifs. ";
echo r_exec('local','update domaine set id_status=1 where id_status=2',false);
echo "\nSuppression contacts sans domaines. ";
echo r_exec('local','delete from contact where (select count(*) from dom_contacts where dom_contacts.id_contact=contact.id_contact) <1',false);
echo "\nSuppression registrars sans domaines. ";
echo r_exec('local','delete from registrar where (select count(*) from domaine where domaine.id_registrar=registrar.id_registrar) <1',false);
echo "\nDomaines titulaires orphelins. ";
echo r_exec('local','update domaine set id_status=5 where id_registrar=247',false);
echo "\nSuppression nameservers inutiles. ";
echo r_exec('local','delete from nameserver where (select count(id_nameserver) from dns_domain where dns_domain.id_nameserver=nameserver.id_nameserver)<1',false);
$req = "update domaine set d_date_expiration=date(concat('2021-',date_part('month',d_date_enregistrement),'-',date_part('day',d_date_enregistrement)))";
$req.= " where id_status=1";
//////////////////////////   and text(d_date_enregistrement) not like ('%-02-29%')";
echo "\nModif expiration. ";
echo r_exec('local',$req,false);
echo "\nDesactivation registrars. ";
echo r_exec('local','update registrar set valid=0',false);
echo "\nMAJ contacts nouveaux champs. ";
echo r_exec('local',"update contact set status=1,is_admin=0,is_registrar=0,passwd='1234'",false);

$req ="update contact set societe=(select registrar.designation from registrar where contact.id_registrar_parent=registrar.id_registrar),is_registrar=1 where id_registrar_parent<>-1";
echo "\nMAJ Contact bureau. ";
echo r_exec('local',$req,false);


// CREATION DES NIC HANDLES
// REGISTRAR
$liste="select id_registrar, upper(replace(replace(designation,'.',''),' ','')),upper(replace(replace(nom,'.',''),' ','')),upper(replace(replace(prenom,'.',''),' ','')) from registrar order by id_registrar";
$result = r_exec('local',$liste,false);
echo "\nMAJ NICHNDLE Regsitrar. ";
while ($data = pg_fetch_array($result))
	{
		$erreur=1;
		$chiffre=1;
		while ($erreur != 0)
                        {
                                $nichandle_r = substr($data[1].$data[2].$data[3],0,3).$chiffre."-MCNIC";
                                $compte="select count(nichandle) from registrar where nichandle = '".$nichandle_r."';";
                                $nb = pg_fetch_array(r_exec('local',$compte,false));
                                if ($nb[0] > 0)
                                        $chiffre++;
                                else $erreur=0;
                        }

		echo $data[0]." ".$nichandle_r."\n";
		$maj="update registrar set nichandle='".$nichandle_r."' where id_registrar=".$data[0].";";
		r_exec('local',$maj,false);
	}
// CONTACT
echo "\nMAJ NCHANDLE contacts. ";
$liste="select id_contact, upper(replace(replace(replace(nom,'.',''),' ',''),'''','')),upper(replace(replace(replace(prenom,'\.',''),' ',''),'''','')),upper(replace(replace(replace(societe,'.',''),' ',''),'''',''))";
$liste.= " from contact order by id_contact";
$result=r_exec('local',$liste,false);
while ($data = pg_fetch_array($result))
{
	$erreur=1;
	$chiffre=1;
	while ($erreur != 0)
    		{
                                $nichandle_c = substr($data[1].$data[2].$data[3],0,3).$chiffre."-MCNIC";
                                $compte="select count(nichandle) from contact where nichandle = '".$nichandle_c."';";
				$nb = pg_fetch_array(r_exec('local',$compte,false));
                                if ($nb[0] > 0)
                                        $chiffre++;
                                else
                                        {
                                                $compte="select count(nichandle) from registrar where nichandle = '".$nichandle_c."';";
						$nb = pg_fetch_array(r_exec('local',$compte,false));
                                                if ($nb[0] > 0)
                                                        $chiffre++;
                                                else
                                                        $erreur=0;
                                }
        	}

	echo $data[0]." ".$nichandle_c."\n";
	$maj="update contact set nichandle='".$nichandle_c."' where id_contact=".$data[0].";";
	r_exec('local',$maj,false);
}

// DUPLIQUER LES CONTACTS NECESSAIRES
?>