Open Source :D

Open Source :D - PHP - Programmation

Marsh Posté le 30-07-2003 à 13:13:53    

Slt tlm,
 
J'ai fais un ptit script PHP qui permet de lister les repertoires : www.nowhere-web.com/listdir/ que j'ai edité pour moi (quand j'entends pour moi c'est qu'il fonctionne sur OVH) et que j'ai adapte pour lycos.
 
Vous pouvez évidemment tt changer.
$Situ = "http://www.nowhere-web.com"; c'est pr indiquer le serveur des images, vous pouvez laisser cette adresse (c'est donc moi qui hébergerai les images comme ça il n'y a qu'un fichier ;-) )
 
Vous pouvre aussi faire des fichiers genre : "Video.avi.rout" et dedans, il y a l'adresse de la vidéo sur un autre serveur, emplacement, il sera direct renomé en "Video.avi" :-)
 
Voici le code :  
 

Code :
  1. <?php
  2. /* configuration */
  3. $Situ = "http://www.nowhere-web.com";  // Serveur des images
  4. $Domaine = "1";                        // Si l'accès à cette page est par nom de domaine
  5. $NomPage = "index.php";                // Nom de la page
  6. $TitrePage = "ListDir v 2.0";          // Titre de la page
  8. /* création des fonctions */
  9. function DetectRoutage($Fichier) {
  10. $LongFichier = strlen($Fichier);
  11. $DebutDecoup = $LongFichier - 5;                 // Détecte si le fichier est un *.*.rout
  12. $FinNomFichier = substr($Fichier,$DebutDecoup, $LongFichier);
  13. if($FinNomFichier == ".rout" ){
  14. $FichierRoutage = "oui";
  15. }
  16. else {
  17. $FichierRoutage = "non";
  18. }
  19. return $FichierRoutage;
  20. }
  22. function OpenRoutage($Fichier){
  23. $fp = fopen($Fichier, "r" );
  24. $Adresse = fread($fp, "100" );                   // Ouverture des fichiers *.*.rout et retourne l'adresse de routage
  25. fclose($fp);
  26. return $Adresse;
  27. }
  29. function ModifNomRoutage($Fichier){
  30. $LongFichier = strlen($Fichier);
  31. $FinDecoup = $LongFichier - 5;
  32. $NomFichier = substr($Fichier,"0", $FinDecoup);
  33. return $NomFichier;
  34. }
  36. /* Test du dossier */
  37. $Dossier = ".";
  38. $EstDossier = is_dir($Dossier);
  39. if(!$EstDossier) {
  40. echo "<head><title>$Title</title></head><body><font face=Verdana size=1><center>Le dossier spécifié n'est pas un vrai dossier.</center></font></body>";
  41. die;
  42. }
  44. /* Initialisation du tableau des icones */
  45. $Icone = array(
  46. 'gif'=>'img/img.gif',
  47. 'bmp'=>'img/img.gif',
  48. 'png'=>'img/img.gif',
  49. 'jpg'=>'img/img.gif',
  50. 'swf'=>'img/img.gif',
  51. 'txt'=>'img/doc.gif',
  52. 'doc'=>'img/doc.gif',
  53. 'html'=>'img/html.gif',
  54. 'htm'=>'img/html.gif',
  55. 'mp3'=>'img/zic.gif',
  56. 'wma'=>'img/zic.gif',
  57. 'wav'=>'img/zic.gif',
  58. 'mpg'=>'img/zic.gif',
  59. 'avi'=>'img/zic.gif',
  60. 'lol'=>'img/zic.gif',
  61. 'mpeg'=>'img/zic.gif',
  62. 'zip'=>'img/zip.gif',
  63. 'rar'=>'img/zip.gif',
  64. 'exe'=>'img/exe.gif',
  65. 'php'=>'img/exe.gif',
  66. ''=>'img/cpp.gif');
  68. /* Initialisation des varibales */
  69. $TableauFichiers = array();
  70. $OpenDossier = opendir($Dossier);
  72. /* Boucle qui liste les fichiers */
  73. while($Fichier = readdir($OpenDossier)){
  74. if($Fichier[0] != "." ){
  75. if($Fichier == $NomPage){
  76. }
  77. else {
  78. /* Recherche de l'icone */
  79. if(is_dir($Fichier)){
  80. $ImgIcone = "img/folder.gif";
  81. }
  82. else {
  83. $Rechextension = ereg("([^.]*$)",$Fichier,$ResultatExt);
  84. $FileExt = $ResultatExt[0];
  85. if(in_array($FileExt, $Icone)){
  86. $SrcValue = $Icone[$FileExt];
  87. $ImgIcone = "$SrcValue";
  88. }
  89. else {
  90. $SrcValue = $Icone[$FileExt];
  91. $ImgIcone = "$SrcValue";
  92. }
  94. /* Recherche de la taille */
  95. $StatInfo = stat($Fichier);
  96. $TailleFichier = $StatInfo[7];
  98. /* On met tout dans une variable */
  99. $TableauFichiers[]= "$ImgIcone]$Fichier]$TailleFichier";
  100. }
  101. }
  102. }
  103. }
  104. closedir($OpenDossier);  // fin de la boucle
  106. /* Recherche du path */
  108. if($Domaine == "1" ){
  109. $Path = $REQUEST_URI;
  110. $LongNomPage = strlen($NomPage);
  111. $LongPath = strlen($Path);
  112. $DebutDecoup = $LongPath - $LongNomPage;
  113. $DernierePartiePath = substr($Path,$DebutDecoup, $LongPath);
  114. if($DernierePartiePath == $NomPage){
  115. $Path = substr($Path,"0", $DebutDecoup);
  117. }
  118. }
  119. else {
  120. $Path = $REQUEST_URI;
  121. $LongNomPage = strlen($NomPage);
  122. $PathNb = strlen($Path);               // Détection du dossier en cours sur le serveur en fonction du domaine
  123. $PathNb = $PathNb - 1;
  124. $Path = substr($Path,1,$PathNb);
  125. $PathNb1 = strpos($Path, "/" );
  126. $PathNb1 = $PathNb1 + 1;
  127. $PathNb2 = strpos($Path, $LongNomPage);
  128. $PathNb2 = $PathNb2 - $LongNomPage;
  129. $Path = substr($Path,$PathNb1, $PathNb2);
  130. }
  132. /* Affichage haut */
  133. echo "<head><title>$TitrePage</title></head>
  134. <body oncopy=\"return false\"><table border=0 cellspacing=1 cellpadding=2>
  135. <tr valign=top><td width=50%><table width=406 height=77><tr><td width=32 height=32><img src=$Situ/img/hardware.gif></td>
  136. <td width=10 height=32></td><td width=344 height=32><font face=Verdana size=2>Système de stockage :</font></td>
  137. </tr><tr><td width=32 height=21></td><td width=10 height=21></td><td width=344 height=21>&nbsp;</td>
  138. </tr><tr><td width=386 colspan=3 height=12><font size=1 face=Verdana>
  139. - Ce script a été édité par <a href=http://www.nowhere-web.com/?x=stock>nowhere-web</a>.<br>
  140. - Vous pouvez aussi l'avoir, pour celà, faites une demande à webmaster@nowhere-web.com</font>
  141. </td></tr></table></td><td width=50%><table width=406 height=77>
  142. <tr><td width=32 height=32><img src=$Situ/img/help.gif></td>
  143. <td width=10 height=32></td><td width=344 height=32><font face=Verdana size=2>Lexique</font></td>
  144. </tr><tr><td width=32 height=21></td><td width=10 height=21></td><td width=344 height=21>&nbsp;</td></tr><tr>
  145. <td width=386 colspan=3 height=12>
  146. <table border=0 width=50%><tr><td width=50%><table border=0 cellpadding=2 width=68>
  147. <tr><td width=16><img border=0 src=$Situ/img/img.gif></td>
  148. <td width=58><font face=Verdana size=1>photo</font></td></tr><tr><td width=16><img border=0 src=$Situ/img/zic.gif></td>
  149. <td width=58><font face=Verdana size=1>vidéo</font></td>
  150. </tr><tr><td width=16><img border=0 src=$Situ/img/doc.gif></td><td width=58><font face=Verdana size=1>document</font></td>
  151. </tr><tr><td width=16><img border=0 src=$Situ/img/exe.gif></td><td width=58><font face=Verdana size=1>prog</font></td>
  152. </tr></table></td><td width=50%><table border=0 cellpadding=2 width=68>
  153. <tr><td width=16><img border=0 src=$Situ/img/file.gif></td>
  154. <td width=58><font face=Verdana size=1>fichier</font></td></tr><tr>
  155. <td width=16><img border=0 src=$Situ/img/zip.gif></td><td width=58><font face=Verdana size=1>zip</font></td>
  156. </tr><tr><td width=16><img border=0 src=$Situ/img/cpp.gif></td><td width=58><font face=Verdana size=1>autre</font></td>
  157. </tr><tr><td width=16><img border=0 src=$Situ/img/folder.gif></td><td width=58><font face=Verdana size=1>dossier</font></td>
  158. </tr></table></td></tr></table></td></tr></table></td></tr></table><hr color=#3366CC noshade width=80% align=left><p><font face=Verdana size=2>Voici le contenu de $Path </font></p>
  159. <table border=0 width=70%>";
  161. /* Deuxième boucle pour l'affichage */
  162. sort($TableauFichiers);  // classement par ordre
  163. foreach($TableauFichiers as $Valeur) {
  164. list( $SrcIcone, $NomFichier, $TailleFichier ) = split( ']', $Valeur );
  165. $UrlFichier = "$NomFichier";
  166. $Routage = DetectRoutage($NomFichier);
  167. if($Routage == "oui" ){
  168. $SrcIcone = "img/rout.gif";
  169. $TailleFichier = "???";
  170. $UrlFichier = OpenRoutage($NomFichier);
  171. $NomFichier = ModifNomRoutage($NomFichier);
  172. }
  173. $SrcFinal = "$Situ/$SrcIcone";
  174. echo "<tr><td width=2%><a href=$UrlFichier><img src=$SrcFinal border=0></a></td><td width=87%><font face=Verdana size=1>&nbsp;<a href=$UrlFichier>$NomFichier</a><font></td><td width=9%><p align=right><font face=Verdana size=1>$TailleFichier</font></td></tr>";
  175. }
  176. echo "</table></body>";
  177. ?>
  178. <XML style="display:none">


Message édité par nowhere-web le 30-07-2003 à 13:18:47
Reply

Marsh Posté le 30-07-2003 à 13:13:53   

Reply

Marsh Posté le 30-07-2003 à 21:11:36    

pas mal  :)  
 
tu aurais pu rajouter la date de la derniere modification et tout..  :)  
puis il manque plein d'extensions de fichier..


---------------
yvele n'est plus.
Reply

Marsh Posté le 31-07-2003 à 09:15:33    

Je sais pr la date mais je ne voulais pas surchargé l'interface  :pt1cable:  
 
Je sais aussi pr les extentions ms comme je l'ai dis, ça a été fais mon site et je n'uppais rien d'autre  :D  

Reply

Sujets relatifs:

Leave a Replay

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