Forum GraphWeather

<?php
function RecupDerImage($Repertoire, $Extension){

   // Rend le fichier le plus recent avec l'extension demandee dans le repertoire fourni en argument
   // ATTENTION:
   // Pas de traitement des erreurs ..... (repertoire inexistant ou vide)

   // Recuperation Identifiant Repertoire pour pouvoir faire "readdir()" qui permet de recuperer
   // successivement les fichiers presents dans ce repertoire
    $Repertoire_ID = opendir($Repertoire) or die('Erreur Repertoire');
   $Der_Date = 0;
   while($Fichier_Image = readdir($Repertoire_ID)) { // Balayage des fichiers du repertoire
      if( $Fichier_Image != '.' && $Fichier_Image != '..') { //On ignore . et ..
         $Fichier = $Repertoire.'/'.$Fichier_Image; // Chemin relatif a la racine
         $Infos = pathinfo($Fichier); // Pour recuperer infos concernant le fichier
         $Fic_Extension = $Infos['extension']; // Notamment l'extension ....
         if( $Fic_Extension == $Extension) { // On ne considere que les fichiers avec la bonne extension   
            $Date_Fichier = filemtime($Fichier);
            // echo $Fichier_Image." -- ".$Date_Fichier."<br/>";
            if( $Date_Fichier > $Der_Date){   // Si plus recent que meilleur deja vu
               $Der_Date = $Date_Fichier;   // memorisation date plus recente
               $Der_Fichier = $Fichier; // memorisation fichier correspondant
            }
         }
      }
   }
    closedir($Repertoire_ID);
   return $Der_Fichier;
}


function EffaceVieillesImages( $Repertoire, $Extension, $AgeMax, $SaufCelleLa){

   // Effacement des fichiers ayant l'extension "Ext" dans le repertoire fourni en argument

   // $Repertoire: Repertoire contenant les images.
   // $Extension: Extension des fichiers a effacer. Exemple: "jpg" ou "gif" ou ....
   // $AgeMax: Age maximum tolere pour les fichiers (en secondes), sinon, on efface.
   // $SaufCelleLa: image a ne pas effacer qq soit son age.

   $Repertoire_ID = opendir($Repertoire) or die('Erreur');
   while($Fichier_Image = readdir($Repertoire_ID)) { // Balayage des fichiers du repertoire
      if( $Fichier_Image != '.' && $Fichier_Image != '..') { //On ignore . et ..
         $Fichier = $Repertoire.'/'.$Fichier_Image; // Chemin relatif a la racine => $Fichier
         $Infos = pathinfo($Fichier); // Pour recuperer infos concernant le fichier
         $Fic_Extension = $Infos['extension']; // Notamment l'extension ....
         $AgeFichier = time() - filemtime($Fichier);
         if( ( $Fic_Extension == $Extension) && ($AgeFichier > $AgeMax) ){
            if ($SaufCelleLa != $Fichier) {
               //echo "Effacement prevu de: ".$Fichier."<br/>"; // Pour tester avant d'effacer .....
               unlink($Fichier);
            }
         }
      }
   }
   closedir($Repertoire_ID);
}


$Fic = RecupDerImage('Images', 'jpg'); // Recuperation du nom du fichier .jpg le plus recent du repertoire "Images"
$Date_Fic = date ("d/m/Y H:i", filemtime($Fic)); // Formatage de la date

// Generation du code html
echo '<div style="text-align: center;">A Quéménéven le:'.$Date_Fic."</div>";
echo '<div style="text-align: center;"><IMG border=0 src="'.$Fic.'"'."></div>";

// Effacement des images .jpg trop vieilles

$Minute = 60; // temps en secondes
$Heure = $Minute * 60;
$Jour = $Heure * 24;
EffaceVieillesImages( 'Images', 'jpg', $Heure * 24, $Fic); // On peut mettre une expression comme: 3*$Heure + 15*$Minutes + 10
?>