<?php

// ------------------------------------------------------------------------- //
// Convertir un site avec des extensions .php3 en .php                       //
// ------------------------------------------------------------------------- //
// Ce script explore une arborescence de répertoires, y recherche les        //
// fichiers .php3, et transforme tous les .php3 en .php dans le contenu et   //
// dans le nom de chaque fichier.                                            //
// Il est fortement recommandé d'effectuer l'opération sur une copie du site //
// à transformer.                                                            //
// ------------------------------------------------------------------------- //
// Auteur: Antoine Bajolet                                                   //
// Email:  bajolet@toiletoine.net                                            //
// Web:    http://www.toiletoine.net/                                        //
// ------------------------------------------------------------------------- //

//Transform all .php3 scripts to .php including content
//Antoine Bajolet 2001-06-09

//transform a .php3 to .php
function PHP3_2_PHP($file,$delete='keep')
{
if (
ereg('\.php3$',$file))
   {
   
$file2 = str_replace('.php3','.php',$file);
   
$from_file = fopen($file,'r');
   
$to_file = fopen($file2,'w');
   while (
$line = fgets($from_file,4096))
          {
          
$line = str_replace('.php3','.php',$line);
          
fputs($to_file,$line);
          }
   
fclose($from_file);
   
fclose($to_file);

   if (
$delete == 'del')
       
unlink($file);
   }
}

//explore dir and subdirs ro transform
function TRANSFORM_SUBDIR($directory)
{
if (!
ereg('/$',$directory))
     
$directory .= '/';

$dir = opendir($directory);
while (
$file = readdir($dir))
       {
       if (
$file != '.' && $file != '..')
           {
           if (
is_dir($directory.$file))
               
$subdirs[] = $directory.$file.'/';
           elseif(
is_file($directory.$file))
                  
PHP3_2_PHP($directory.$file,'del');
           }
       }
closedir($dir);

if (
is_array($subdirs))
    {
    while (list(
$id,$sub) = each($subdirs))
           
TRANSFORM_SUBDIR($sub);
    }
}

if (
$dir)
    
TRANSFORM_SUBDIR($dir);
?>

<h2>Replace .php3 to .php in scripts and filemanes</h2>
<form method = 'post'>
Directory to recurse<br>
<input type='text' name='dir' value='<? print $dir ?>'>
<input type='submit' name='toto' value='go'>
<input type='submit' name='tata' value='cancel'>
</form>