éditeur PHP test programme

éditeur PHP test programme - PHP - Programmation

Marsh Posté le 03-12-2009 à 16:30:59    

Bonjour,
 
N'arrivant pas à trouver un éditeur PHP simple d'utilisation sur le net (eh oui il y a des jours comme ça), je voudrais savoir si ma macro (qui était en Python à la base) fonctionne.
Cette macro lit 4 fichiers textes dans un dossier, les traitent (les fichiers textes ont des en têtes dont on n'a pas besoin et après ce sont des mesures de test (valeurs numériques séparées par des tabulations), et retourne un résultat qui est un nouveau fichier texte ou apparait les noms des fichiers traitées, deux valeurs numériques en dessous, puis une moyenne.
Voici mon code, merci de me dire s’il n’y a pas d’erreurs et s’il y aurait des améliorations.
Merci bien  et bonne soirée !
 

Code :
  1. <?php
  2. /* Creation de la matrice dynamique*/
  3. matricedynamique(fp) {
  4. $matrice = array();
  5. $taille = 0;
  6. $tab_X = array();
  7. $tab_charge = array();
  8. $taille2 = 0;
  9. $tab_cf = array();
  10. $tabNbr = array();
  11. $fin_fp=1;
  12. while (!feof($fp)) {
  13.     $ligne = fgets($fp, 1024);
  14.     $fin_fp++;
  15. }
  16. for ($ligne>=35; $ligne=$fin_fp; $ligne++){
  17.     $tabNbr = explode("\t",$ligne);
  18.     del($tabNbr[4]);
  19.     del($tabNbr[4]);
  20.     $matrice[] = $tabNbr;
  21.     $taille = count($matrice);
  22. }
  23. for ($cpt=0; $cpt<($taille-1); $cpt++){
  24.     if( ($matrice[$cpt][0] == $matrice[$cpt+1][0]) && ($matrice[$cpt][0]<1) ){
  25.         $cpt++ ;
  26.     }
  27.     else {
  28.         $tab_X[] = $matrice[$cpt][0];
  29.         $cf = atan2($matrice[$cpt][3],$matrice[$cpt][1]);
  30.         $tab_cf[] =$cf;
  31.         $tab_charge[] = $matrice[$cpt][2];
  32.     }
  33. }
  34. $taille2 = count($tab_cf);
  35. /*calcul de l'ecart type pour resultat*/
  36. $tab_utilisateur = array();
  37. $ecarttype = 0;
  38. $ecart_type = array();
  39. for ($n=0;$n=2;$n++)
  40.     ($n ==0) ? $tabutilisateur = float(6) : $tabutilisateur = float(8);
  41. if ($tab_charge[3]>100){
  42.     $tabutilisateur = $tabutilisateur*1000;
  43.     $ecarttype = 0.01*$tabutilisateur;
  44.     $tab_utilisateur[] = $tabutilisateur;
  45.     $ecart_type[] = $ecarttype;
  46. }
  47. /*Calcul la longueur de delamination sur X*/
  48. global $del1,  $del2,  $somme_del,  $critere;
  49. $del1 = 0; del2 = 0, $somme_del = 0, $critere = 0;
  50. global $tab_critere;
  51. $tab_critere = array();
  52. $A1 = ($tab_utilisateur[0] + $ecart_type[0]);
  53. $A2 = ($tab_utilisateur[0] - $ecart_type[0]);
  54. $B1 = ($tab_utilisateur[1] + $ecart_type[1]);
  55. $B2 = ($tab_utilisateur[1] - $ecart_type[1]);
  56. for ($cpt=0; $cpt<($taille2-1); $cpt++) {
  57.     $ecart = ($tab_X[$cpt+1]-$tab_X[$cpt]);
  58.     if ($ecart<0.1){
  59.         if(($tab_cf[$cpt+1]>=0.4) && ($tab_cf[$cpt]>=0.4)) {
  60.             if (($tab_charge[$cpt]<=$A1) && ($tab_charge[$cpt]>$A2))
  61.                 $delam1 = $delam1 + $tab_X[$cpt+1] - $tab_X[$cpt];
  62.             if (($tab_charge[$cpt]<=$B1) && ($tab_charge[$cpt]>$B2))
  63.                 $delam2 = $delam2 + $tab_X[$cpt+1] - $tab_X[$cpt];
  64. }
  65.     }
  66. }
  67. $somme_del = $del1 + $del2;
  68. $critere = $somme_del / 30 ;
  69. $tab_critere[] = $critere;
  70. }
  71. #####################################################################################
  72. chdir("C:/Mesdocs" );
  73. $taux = 0;
  74. $listfiles = glob("*.txt" );
  75. $T = count($listfiles);
  76. for ($h=0; $h=$T; $h++){
  77.     $fwork = $listfiles[$h];
  78.     $fp = @fopen($fwork,"r" );
  79.     matricedynamique($fp);
  80.     $obFichier= file("Fresultats.xls","a" );
  81.     fputs($obFichier, $fwork);
  82.     fputs($obFichier, "\n" );
  83.     fputs($obFichier, str($del1));
  84.     fputs($obFichier, "\t" );
  85.     fputs($obFichier, str($del2));
  86.     fputs($obFichier, "\n" );
  87.     fclose($obFichier);
  88. }
  89. $taille_critere = count($tab_critere);
  90. for($n=0;$n<($taille_critere);$n++)
  91.     $taux = $taux + $tab_critere[$n];
  92. $taux = $taux / $taille_critere;
  93. fputs($obFichier,"\n" );
  94. fputs($obFichier, "taux de del pour %d echantillon : " %taille_critere);
  95. fputs($obFichier,(str($taux)));
  96. fclose($fp);
  97. ?>

Reply

Marsh Posté le 03-12-2009 à 16:30:59   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed