if (!($dh = @opendir ($d))) die("Ошибка при открытии папки.");
while (($file = readdir ($dh)) !== false)
{
if (is_dir("$d/$file"))
$dirs[] = $file;
else
$files[] = $file;
}
Здесь
rename($previous, "$new_name");
что есть и откуда взялось $previous и $new_name?
Здесь
$fp=fopen($name , "w");
что есть и откуда взялось $name?
Здесь
mkdir($name, 777);
что есть и откуда взялось $name? С какого потолка вы пытаетесь создать сначала файл, а потом папку под одним и тем же именем?
Здесь
copy($source, "$copy_to");
что есть и откуда взялось $source и $copy_to?
Дальше просто устал уже...
_____________
Gear FrameworkGear Framework на Github