PROJETS en licence Informatique, an 2003
 

 

Comment la liste des mini-projets est-elle générée ?

Comment les mini-projets sont-ils rapatriés automatiquement ?

 

# on vérifie que le répertoire existe... if (!is_dir($nomdir)) { echo "
" ; echo "    le répertoire $nomdir n'existe pas." ; echo "
" ; return ; } ; # fin de si # lecture du répertoire, on ne garde que les .zip et .tar $d = dir($nomdir) ; $nf = 0 ; echo "" ; while ($entry=$d->read()) { $nentry = strtolower($entry) ; if ((strpos($nentry,"zip")>0) or (strpos($nentry,"tar")>0)) { if (substr($entry,-4) != "desc") { $nbf++ ; $dernac = filemtime("$nomdir$entry") ; $tnom[$nbf] = $entry ; $tdat[$nbf] = $dernac ; } ; # fin de si sur mot desc absent } ; # fin de si sur mot zip vu } ; # fin tant que echo "
" ; $d->close() ; # si aucun fichier, on prévient if($nbf==0) { echo "
" ; echo "   aucun fichier présent à ce jour..." ; echo "
" ; } else { echo "
" ; echo "   $nbf fichier[s] présent[s] à ce jour..." ; echo "
" ; } ; # fin si # on trie par ordre décroissant de date $idf = 1 ; while ($idf<=$nbf-1) { $jdf = $idf+1 ; while ($jdf<=$nbf) { if ($tdat[$jdf]>$tdat[$idf]) { $tmp = $tdat[$jdf] ; $tdat[$jdf] = $tdat[$idf] ; $tdat[$idf] = $tmp ; $tmp = $tnom[$jdf] ; $tnom[$jdf] = $tnom[$idf] ; $tnom[$idf] = $tmp ; } ; # fin de si $jdf++; } ; # fin tant que sur $jdf $idf++; } ; # fin tant que sur idf # on affiche en pour un "beau" cadrage $d = dir($nomdir) ; echo "
" ; $idf = 1 ; $nbz = 0 ; while ($idf<=$nbf) { $entry = $tnom[$idf] ; $dernac = $tdat[$idf] ; $dernac = filemtime("$nomdir$entry") ; $ftaille = filesize("$nomdir$entry") ; $dernacH = date("H",$dernac) ; $dernacM = date("i",$dernac) ; $dernacJ = date("d",$dernac) ; $dernacO = date("m",$dernac) ; $dernacA = date("Y",$dernac) ; $lenum = $idf ; $lentry = strtolower($entry) ; if ((substr($lentry,-3) == "zip") or (substr($lentry,-3) == "tar")) { $nbz++ ; $lenum = $nbz ; } else { $lenum = "" ; } ; $vln = $nbf+1-$lenum ; echo "" ; echo "" ; echo "" ; echo "" ; echo "" ; echo "" ; echo "" ; if ($idf==1) { echo "" ; } ; $idf++; } ; # fin tant que echo "
$vln     $lentry       " ; echo "   à    $dernacH h $dernacM    le    $dernacJ /$dernacO /$dernacA   $ftaille   octets
" ; $d->close() ; } # fin fonction zipdir ?> Fichiers .zip reçus en date du $ladate à $lesh h $lesm" ; echo "
" ; $znomdir = "/home/info/gh/Crs/Projets/Pli/" ; zipdir($znomdir) ; echo "
" ; ?> Comment la liste des mini-projets est-elle générée ?

... par un script écrit en PHP.

Vous pouvez consulter le texte du programme PHP ICI
et mon tuteur pour PHP est LA.

Comment les mini-projets sont-ils rapatriés automatiquement ?

... par PROCMAIL via le fichier .procmailrc qui utilise un script BASH.

Le mail doit contenir projliciy2k licence info dans le sujet et le fichier .zip ou .tar doit etre envoyé en attaché ("pièce jointe").

Vous pouvez consulter une copie de mon fichier procmailrc ICI
et une copie du texte du script nommé plirec LA.