echo RetornaFraseDaLista($lista_frases_geral, 18) . "<p>\n"; // 145 - Copiando arquivos para novo diret�rio echo RetornaFraseDaLista($lista_frases, 145) . "...\n\n"; flush(); if (ExisteArquivo($caminho_arquivos_curso . "/" . NOME_ARQUIVOS)) { // 315: Descompactando arquivos do curso para novo diret�rio: echo "<br />" . RetornaFraseDaLista($lista_frases, 315) . "...\n\n"; MudarParaDiretorio($dir_arquivos . "/" . $novo_cod_curso); if (!shell_exec($caminho_tar . " -zxvf " . $caminho_arquivos_curso . "/" . NOME_ARQUIVOS)) { // 317: Erro ao descompactar os arquivos do curso. EncerrarScript(RetornaFraseDaLista($lista_frases, 317)); } } else { // copia todo o diretorio do curso extraido para o novo diretorio no caminho dos // cursos atuais (j� com o novo numero do curso) $subdirs = RetornaSubDiretorios($caminho_arquivos_curso); if (count($subdirs) > 0) { foreach ($subdirs as $dir) { if (!CopiaDiretorio($caminho_arquivos_curso . "/" . $dir, $dir_arquivos . "/" . $novo_cod_curso)) { // 319: Erro na c�pia de arquivos do curso. die("<br />" . RetornaFraseDaLista($lista_frases, 319) . "<p>\n"); } } } } // 18 G - OK echo RetornaFraseDaLista($lista_frases_geral, 18) . "<p>\n"; flush(); // - fim - ETAPA 2: C�PIA DOS ARQUIVOS ANEXADOS // -------------------------------------------------------------- // --------------------------------------------------------------
CopiaArquivosDiretorio($dir_arquivos . "/" . $cod_curso . "/", $caminho); /* 304 - Ok */ echo RetornaFraseDaLista($lista_frases, 304) . "<p>\n"; /* se usu�rio optou por compacta��o dos arquivos, obedece */ if (CompactarCurso($sock)) { /* 302 - Compactando arquivos do curso */ echo RetornaFraseDaLista($lista_frases, 302) . " \n\n"; MudarParaDiretorio($caminho); $t = RetornaArrayDiretorio('.'); if (is_array($t)) { if (!shell_exec($caminho_tar . "tar -zcvf " . $caminho . "/" . NOME_ARQUIVOS . " *")) { /* 303 - Erro interno ao compactar arquivos */ die(RetornaFraseDaLista($lista_frases, 303)); } // Remove os subdiret�rios. $subs = RetornaSubDiretorios($caminho); if (count($subs) > 0) { foreach ($subs as $dir) { RemoveDiretorio($caminho . "/" . $dir); } } } /*304 - Ok*/ echo RetornaFraseDaLista($lista_frases, 304) . "<p>\n"; } /* 119 - Copiando: */ echo RetornaFraseDaLista($lista_frases, 119) . " '" . $dbnamebase . DUMP_AMBIENTE . "' ...\n\n"; flush(); if (!($fp = popen($caminho_mysqldump . " --default-character-set=latin1 -u " . $dbuser . " -p " . $dbnamebase . " > " . $caminho . "/" . $dbnamebase . DUMP_AMBIENTE, "w"))) { die('Erro interno'); }