header ("Content-Type: text/xml");
if(isset($_GET['name']))
$sep= $_GET['name'];
else{
$sep="";
}
if(isset($_GET['pwd']))
$pwd=$_GET['pwd'];
else{
$pwd="";
}
if(isset($_GET['momtant']))
$momtant=$_GET['momtant'];
else{
$momtant="";
}
if(isset($_GET['lp']))
$line_recep=$_GET['lp'];
else{
$line_recep="";
}
if ($sep=="")
{
echo ("\r\n");
//echo ("N° de ligne non indiqué\r\n");
echo ("N° de ligne non indiqué\r\n");
echo ("\r\n");
exit();
}
//mot de passe
if ($pwd=="")
{
echo ("\r\n");
//echo ("Indiquez votre mot de passe\r\n");
echo ("Indiquez votre mot de passe\r\n");
echo ("\r\n");
exit();
}
//verifier le momtant
if ($momtant=="")
{
echo ("\r\n");
//echo ("Veuillez specifier le momtant\r\n");
echo ("Veuillez specifier le momtant\r\n");
echo ("\r\n");
exit();
}
//verifier le numero de ligne
if ($line_recep=="")
{
echo ("\r\n");
//echo ("Veuillez specifier le numero de ligne de reception\r\n");
echo ("Veuillez specifier le numero de ligne de reception\r\n");
echo ("\r\n");
exit();
}
//Vérifier le mot de passe
if (file_exists("codage.tcs"))
$fp = fopen("codage.tcs", "r");
else
{
//echo "fichier n'existe pas!!!";
echo ("\r\n");
//echo ("fichier n'existe pas!!!\r\n");
echo ("fichier n'existe pas!!!\r\n");
echo ("\r\n");
exit();
}
//Verifier le momtant
//-----------------------------------------------------------------------
if (file_exists("pwd".$sep.".txt"))
{
$fp = fopen("pwd".$sep.".txt", "r");
$ligne1=fgets($fp,255);
$ligne1=trim($ligne1);
//.................................................
if ($ligne1==$sep.",".$pwd )
{
}
else
{
echo ("\r\n");
echo ("password incorrrrrect\r\n");
echo ("password incorrect\r\n");
echo ("\r\n");
fclose($fp);
exit();
}
/////////////////////////////////////
$ligne1="";
$fp = fopen("codage.tcs", "a+");
while(!feof($fp))
{
$i=0;
while($i<1)
{
$ligne1=fgets($fp,255);
$ligne2=fgets($fp,255);
$ligne3=fgets($fp,255);
$ligne4=fgets($fp,255);
$ligne5=fgets($fp,255);
$cible = (string)$ligne2;
$cib=trim($cible);
if (file_exists($cib))
{
if(trim($ligne1)==trim($sep))
{
$fp2 = fopen($cib,'r');
$het=fgets($fp2);
$cons=substr($het,22,10);
$u=floatval(substr($het,11,10))-floatval(substr($het,22,10));
$solde=$u;
$somm=floatval(substr($het,11,10));
if(floatval($solde)\r\n");
//echo ("Solde insuffisant. Votre solde est ".$solde." DT\r\n");
echo ("Solde insuffisant\r\n\r\n Votre solde est ".$solde." DT\r\n");
echo ("\r\n");
fclose($fp2);
exit();
}
if (floatval($solde)>=floatval($momtant))
{
$fcodage=fopen("codage.tcs","r");
$testline="f";
while(!feof($fcodage)and$testline=="f"){
$line=fgets($fcodage);
if(trim($line)==trim($line_recep)){
$testline="t";
}
}
if($testline=="t"){
echo ("\r\n");
fclose($fp2);
$fenv=fopen("C:\datawtx\b".$sep.".txt","r+");
$cons=fgets($fenv);
$cons=substr($cons,10);
$nsolde=floatval($somm)- floatval($momtant);
$sep=trim($sep);
$nsolde=trim($nsolde);
$con=trim($cons);
while($sep.length<10){$sep=$sep." ";}
while($nsolde.length<10){$nsolde=$nsolde." ";}
while($cons.length<10){$cons=$cons." ";}
$var=$sep.$nsolde.$cons;
fclose($fenv);
unlink("C:\datawtx\b".$sep.".txt");
$fenv=fopen("C:\datawtx\b".$sep.".txt","a+");
fseek($fenv,0);
fputs($fenv,$var);
//////////////////////////////////////////////////////////////////////////////////////////////////////
$frecp=fopen("C:\datawtx\b".$line_recep.".txt","r+");
$l=fgets($frecp);
$ansolde=substr($l,11,10);
$conrecep=substr($l,22,10);
$tot=$ansolde+$momtant;
$line_recep=trim($line_recep);
$tot=trim($tot);
$conrecep=trim($conrecep);
while($line_recep.length<10){$line_recep=$line_recep." ";}
while($tot.length<10){$tot=$tot." ";}
while($conrecep.length<10){$conrecep=$conrecep." ";}
$varrecep=$line_recep.$tot.$conrecep;
fclose($frecp);
unlink("C:\datawtx\b".$sep.".txt");
$frecp=fopen("C:\datawtx\b".$line_recep.".txt","a+");
fseek($frecp,0);
fputs($frecp,$varrecep);
fclose($frecp);
echo ("Votre transfert de ".$momtant." DT au poste ".$line_recep." à été effectué avec succes.\r\n\nVotre solde restant est ".trim($u)." DT\r\n");
echo ("\r\n");
echo ("EXIT\r\n");
echo ("SoftKey:Exit\r\n");
echo ("1\r\n");
echo ("\r\n");
echo ("\r\n");
$i=$i+1;
exit();
}
else{
echo ("\r\n");
echo ("N° de ligne incorrect\r\n");
echo ("\r\n");
fclose($fp2);
exit();
}
}
}
//$i=$i+1;
}
}
}
}
//////////////////////////////////////////////////////
?>