listage fichier ou dossier + lien

**koKoTis** · 30/09/2008, 07h29

Bonjour, j'ai un script qui liste les dossiers et fichiers du répertoire courant, et créer des liens pour quelqu'un d'eux:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
<?php 
$directories = glob("*",GLOB_ONLYDIR); 
foreach ($directories as $dir) 
{ 
if ($dir != 'objets' && $dir !='img')	
   echo '<a href="'.$dir.'" > '.$dir.' </a><br>'; 
} 
?> 
 
<?php 
$directories = glob("*.*"); 
foreach ($directories as $dir) 
{ 
if ($dir != 'liste_fichiers.php' && $dir !='img')
   echo '<a href="'.$dir.'" > '.$dir.' </a><br>'; 
} 
?>

Je voudrai apporter quelques améliorations à ce script:

1) lorsque je clique sur le lien d'un fichier .bat qu'il ne me propose pâs le téléchargement du fichier mais qu'il affiche le contenu texte du fichier dans le navigateur.
2) Que lorsque je clique sur le lien d'un dossier cela me liste aussi le contenu de ce sous dossier, et que je puisse aller comme cas jusqu'au bout de mon arborescence.

Pouriez vous m'aider ?

**Montor** · 05/10/2008, 12h17

essaie ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
 
<?php 
if(isset($_GET['root'])&&$_GET['root']!='')
{
$str=$_GET['root'];
$cdir= getdirs($str);
echo '<a href=?root='.substr($str,0,-1).' >Preview ...</a><br>';
}else
{
$cdir='';
}
function getdirs($inp)
{
    $filter="";
    for ($i=0;$i<strlen($inp);$i++)
		{
			$dir= glob($filter."*",GLOB_ONLYDIR); 
			$filter=$dir[$inp[$i]]."/";
   		}
	return $filter;
 
}
 
$directories = glob($cdir."*",GLOB_ONLYDIR); 
foreach ($directories as $key => $dir) 
{ 
if ($dir != 'objets' && $dir !='img')	
echo sprintf("<a href=?root=%s%d>[%s]</a><br>",$str,$key,basename($dir)); 
 
} 
 
$directories = glob($cdir."*.*"); 
foreach ($directories as $dir) 
{ 
if ($dir != 'liste_fichiers.php' && $dir !='img')
echo  sprintf("<a href=?root=%s&file=%s>%s</a><br>",$str,rawurlencode($dir),basename($dir)); 
 
} 
 
if(isset($_GET['file']))
	{
	 $file=htmlentities(file_get_contents(rawurldecode($_GET['file'])));
 
	 if(strpos($file,"\r")!==false)
	 {
	  $out="<pre>".$file."</pre>";
	 }
	 else
	 {
	 $out=$file;
	 }
	 echo <<<toend
	 <div  style="width:100%;border: 1px inset;; height:300px; overflow:scroll ;">{$out};</div>
	 
	  
toend;
	}
 
 
?>

**koKoTis** · 05/10/2008, 14h15

Bonjour et merci beaucoup

ca me renvoi ces erreur que je suis à la racine:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 28
[Batch_(bat)]
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 28
[VBScript_(vbs)]
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 36
Exploreur de script.au3
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 36
kj.php

Si non c'est pas mal, le seul truc c'est que je voyudrai que les script s'ouvre dans toute la page et pas dans un rectangle

**koKoTis** · 05/10/2008, 14h21

a vrai dire avec mon code j'en sui la:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 
 <?php
$dossier = isset($_GET['dir']) ? $_GET['dir']: './';
 
//Pour la s&eacute;curit&eacute;:
if (realpath('.') !== substr(realpath($dossier),0,strlen(realpath('.')))) $dossier = './';
chdir($dossier);
//
 
if  (is_array($dossiers = glob('*',GLOB_ONLYDIR))) {
  foreach ($dossiers as $dir) {
    if ($dir != 'objets' && $dir !='img')   
       echo '<a href="?dir='.$dossier.$dir.'/" class="dossier" >     '.$dir.' </a><br>';
  }
}
 
echo '<br>';
 
if (is_array($fichiers = glob('*.*'))) {
  foreach ($fichiers as $dir)
  {
  if ($dir != 'Exploreur de script.au3' && $dir !='index.php' && $dir !='.htaccess.txt' && $dir !='lunnatickFond.jpg')
     echo '<a href="'.$dossier.'/'.$dir.'"  class="fichier">         '.$dir.' </a><br>';
  }
}
 
?>

il ne me reste plu qu'a forcer l'ouverture des script dans le naviguateur come une page

**Montor** · 05/10/2008, 16h53

excuse moi
essaie ceci attention le code pcecedent contien une erreu il ne peux pa aller plus que dix sousdossier
ce code est pour 255 maxi
change le startpath voir le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
 
<?php 
define("startpath",'C://');//le racine 
 
 
if(isset($_GET['file']))
	{
	 $file=htmlentities(file_get_contents(rawurldecode($_GET['file'])));
	 echo "<pre>".$file."</pre>";
	}
else
   {
if(isset($_GET['root'])&&$_GET['root']!='')
{
$str=$_GET['root'];
$cdir= getdirs($str);
echo '<a href=?root='.substr($str,0,-2).' >Previous...</a><br>';
}else
{
$cdir=startpath;
}
 
 
 
 
$directories = glob($cdir."*",GLOB_ONLYDIR); 
foreach ($directories as $key => $dir) 
{ 
if ($dir != 'objets' && $dir !='img')	
echo sprintf("<a href=?root=%s%s>[%s]</a><br>",$str,dec_hex($key,2),basename($dir)); 
 
} 
 
$directories = glob($cdir."*.*"); 
foreach ($directories as $dir) 
{ 
if ($dir != 'liste_fichiers.php' && $dir !='img')
echo  sprintf("<a href=?root=%s&file=%s>%s</a><br>",$str,rawurlencode($dir),basename($dir)); 
 
} 
 
 }
 
 function getdirs($inp)
{
    $filter=startpath;
    for ($i=0;$i<strlen($inp);$i+=2)
 
		{$rv=hexdec(substr($inp,$i,2));
			$dir= glob($filter."*",GLOB_ONLYDIR); 
			$filter=$dir[$rv]."/";
 
   		}
	return $filter;
 
}
 function dec_hex($inps,$ln=0)
{
 
  $str=str_repeat('x',$ln);
   for($i=strlen($str); $i>0; $i--)
   {
   	$str[$i-1]=dechex($inps & 15);
   	$inps>>=4;
   }
 return $str;  
}
 
?>

**koKoTis** · 05/10/2008, 17h03

il me renvoi ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 30
[Documents and Settings]
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 30
[Program Files]
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 30
[RECYCLER]
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 30
[Scripting - Batch VBS ect]
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 30
[System Volume Information]
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 30
[Virtual Machines]
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 30
[WINDOWS]
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 30
[_KooKaTix]
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 30
[sauvegarde]
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 38
AUTOEXEC.BAT
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 38
Bootfont.bin
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 38
CONFIG.SYS
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 38
EyeCandyLog.txt
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 38
IO.SYS
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 38
MSDOS.SYS
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 38
NTDETECT.COM
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 38
boot.ini
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 38
pagefile.sys
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 38
sqmdata00.sqm
 
Notice: Undefined variable: str in z:\scripting - batch vbs ect\0_script_ok\kj.php on line 38
sqmnoopt00.sqm

c'est pas les dosseir ou j'ai mi la php

**Montor** · 05/10/2008, 18h17

il faut ajouter is_dir si il y a un nom d'un dossier contenent un point il serait afficher avec les fichiers
dans cette ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
!is_dir($dir)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
if ($dir != 'liste_fichiers.php' && $dirs !='img'&& !is_dir($dir))

ou dans ton code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
if (!is_dir($dir) && $dir != 'Exploreur de script.au3' && $dir !='index.php' && $dir !='.htaccess.txt' && $dir !='lunnatickFond.jpg')

**koKoTis** · 05/10/2008, 18h40

si je rajoute && !is_dir($dir) il ne me liste plu rien

**Montor** · 05/10/2008, 19h16

tu mets le variable $str au debut de code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

$str="";

**Montor** · 05/10/2008, 21h22

cette erreur se produits aussi avec $dir parceque vous avez activer peut etre l'option afficher tous les erreurs et notifications
voici la valeur par defaut dans php.ini
error_reporting = E_ALL & ~E_NOTICE & ~E_STRICT

pour le fonction is_dir tu vas la mettre seulement ici pour les fichiers imagine un dossier comme "MSXML 4.0 " il serait afficher avec les fichiers

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
$directorie = glob($cdir."*.*"); 
foreach ($directorie as $dirs) 
{ 
if ($dir != 'liste_fichiers.php' && $dirs !='img'&& !is_dir($dirs))
echo  sprintf("<a href=?root=%s&file=%s>%s</a><br>",$str,rawurlencode($dirs),basename($dirs)); 
 
}

**koKoTis** · 06/10/2008, 14h11

ok j'ai donc ajouter && !is_dir($dirs)

listage fichier ou dossier + lien

Langage PHP

Discussions similaires

Partager

Partager