diff options
| author | alonso <alonso@us.es> | 2009-11-17 11:02:43 +0000 |
|---|---|---|
| committer | alonso <alonso@us.es> | 2009-11-17 11:02:43 +0000 |
| commit | 25e3584ddf8d0b6f8d283e32c94fc4c1a9a20589 (patch) | |
| tree | ff1ab64e27d4fdb8ba6dc6a083b1e1976cc2f97d /admin/WebConsole/dirphp.php | |
| parent | 8ae6e3ae813c945198fe3a64c2cf99deef0d51f3 (diff) | |
primeros archivos de administración
git-svn-id: https://opengnsys.es/svn/trunk@553 a21b9725-9963-47de-94b9-378ad31fedc9
Diffstat (limited to 'admin/WebConsole/dirphp.php')
| -rw-r--r-- | admin/WebConsole/dirphp.php | 63 |
1 files changed, 63 insertions, 0 deletions
diff --git a/admin/WebConsole/dirphp.php b/admin/WebConsole/dirphp.php new file mode 100644 index 00000000..73dfb3a0 --- /dev/null +++ b/admin/WebConsole/dirphp.php @@ -0,0 +1,63 @@ +<?php +listar_directorios_ruta("./"); +function listar_directorios_ruta($ruta){ + // abrir un directorio y listarlo recursivo + if (is_dir($ruta)) { + if ($dh = opendir($ruta)) { + while (($file = readdir($dh)) !== false) { + if($file !=".svn" && $file!="." && $file!=".."){ + //esta línea la utilizaríamos si queremos listar todo lo que hay en el directorio + //mostraría tanto archivos como directorios + //echo "<br>Nombre de archivo: $file : Es un: " . filetype($ruta . $file); + if (is_dir($ruta . $file) && $file!="." && $file!=".."){ + //solo si el archivo es un directorio, distinto que "." y ".." + echo "<br>Directorio: $ruta$file"; + listar_directorios_ruta($ruta . $file . "/"); + } + else{ + //echo "<br>Archivp:$file"; + //if($file=="aulas.php") + procesaarchivo($ruta,$file); + } + } + } + closedir($dh); + } + }else + echo "<br>No es ruta valida"; +} + function procesaarchivo($ruta,$file){ + $meta='<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">'; + $archivo=realpath($ruta.$file); + echo "<br>Procesando Archivo:".$file; + + $tam=filesize($archivo); + $fp = fopen($archivo, "rb"); + $buffer = fread($fp, $tam); + fclose($fp); + + $pos = strpos($buffer,'<HEAD> + <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">'); + if($pos==0) + $pos = strpos($buffer,'<head>'); + if($pos==0) + return; + + $dpl=strlen('<HEAD>'); + $prebuffer=substr($buffer,0,$pos+$dpl); + $posbuffer=substr($buffer,$pos+$dpl); + + $buffer=$prebuffer."\n\t".$meta.$posbuffer; + + /* + $buffer=ereg_replace( "<"," ",$buffer); + $buffer=ereg_replace( ">"," ",$buffer); + $buffer=ereg_replace( "[\n\r]","<BR>",$buffer); + echo $buffer; + */ + + $fp = fopen($archivo,"w"); + fwrite($fp, $buffer,strlen($buffer)); + fclose($fp); +} +?>
\ No newline at end of file |