read()) !== false) {
if ($file == '.' || $file == '..') {
continue;
}
$f = $dir.DIRECTORY_SEPARATOR.$file;
if (!is_link($f) && is_dir($f)) {
removeDirectory($f);
} else {
@unlink($f);
}
}
$handle->close();
@rmdir($dir);
return true;
}
return false;
}
// Make sure that this operation is allowed
if (!$rep->isDownloadAllowed($path)) {
exit;
}
$svnrep = new SVNRepository($rep);
// Fetch information about latest revision for this path
if (empty($rev)) {
$history = $svnrep->getLog($path, 'HEAD', '', true, 1);
} else {
$history = $svnrep->getLog($path, $rev, $rev - 1, true, 1);
}
$logEntry = $history->entries[0];
if (empty($rev)) {
$rev = $logEntry->rev;
}
// Create a temporary directory. Here we have an unavoidable but highly
// unlikely to occure race condition
$tmpname = tempnam($config->getTarballTmpDir(), 'wsvn');
@unlink($tmpname);
if (mkdir($tmpname)) {
// Get the name of the directory being archived
$arcname = $path;
if (substr($arcname, -1) == '/') {
$arcname = substr($arcname, 0, -1);
}
$arcname = basename($arcname);
if ($arcname == '') {
$arcname = $rep->name;
}
$arcname = $arcname.'.r'.$rev;
$tararc = $arcname.'.tar';
$gzarc = $arcname.'.tar.gz';
$svnrep->exportDirectory($path, $tmpname.DIRECTORY_SEPARATOR.$arcname, $rev);
// change to temp directory so that only relative paths are stored in tar
chdir($tmpname);
// Set datetime of exported and directory to datetime of revision
$date = $logEntry->date;
$ts = substr($date, 0, 4).substr($date, 5, 2).substr($date, 8, 2).substr($date, 11, 2).substr($date, 14, 2).'.'.substr($date, 17, 2);
exec(quoteCommand($config->touch.' -t '.$ts.' '.quote($tmpname.DIRECTORY_SEPARATOR.$arcname)));
// Create the tar file
exec(quoteCommand($config->tar.' -cf '.quote($tmpname.DIRECTORY_SEPARATOR.$tararc).' '.quote($arcname)));
// Set datetime of tar file to datetime of revision
exec(quoteCommand($config->touch.' -t '.$ts.' '.quote($tmpname.DIRECTORY_SEPARATOR.$tararc)));
// ZIP it up
exec(quoteCommand($config->gzip.' '.quote($tmpname.DIRECTORY_SEPARATOR.$tararc)));
// Give the file to the browser
if (is_readable($tmpname.DIRECTORY_SEPARATOR.$gzarc)) {
$size = filesize($tmpname.DIRECTORY_SEPARATOR.$gzarc);
header('Content-Type: application/x-gzip');
header('Content-Length: '.$size);
header('Content-Disposition: attachment; filename="'.$rep->name.'-'.$gzarc.'"');
readfile($tmpname.DIRECTORY_SEPARATOR.$gzarc);
} else {
print'Unable to open file '.$gzarc;
}
chdir('..');
removeDirectory($tmpname);
}
WebSVN
- websvn
- Blame
- Rev 1
- /dl.php
