// --------------------------------------------------------------
// - in�cio - ETAPA 2: C�PIA DOS ARQUIVOS ANEXADOS
// descri��o: copia os arquivos do curso ou descompacta-os.
// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
// 144 - Criando diret�rio para os arquivos do curso
echo RetornaFraseDaLista($lista_frases, 144) . "...\n\n";
CriaDiretorio($dir_arquivos . "/" . $novo_cod_curso);
// 18 G - OK
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");
}
}
/* para aninhanemnto � necess�rio um par�metro ao mkdir que n�o est� dispon�vel na fun��o original */
CriaDiretorio($caminho);
/* 119 - Copiando: */
/* 120 - Arquivos do Curso */
echo RetornaFraseDaLista($lista_frases, 119) . " " . RetornaFraseDaLista($lista_frases, 120) . " ... \n\n";
flush();
/* fun��o necess�ria pois a original invariavelmente mantem o nome da �ltima pasta do caminho, */
/* o que n�o � desej�vel nesse caso */
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*/
