Rev Author Line No. Line
342 kakl 1 <?php
2 # vim:et:ts=3:sts=3:sw=3:fdm=marker:
3  
4 // WebSVN - Subversion repository viewing via the web using PHP
5 // Copyright © 2004-2006 Tim Armes, Matt Sicker
6 //
7 // This program is free software; you can redistribute it and/or modify
8 // it under the terms of the GNU General Public License as published by
9 // the Free Software Foundation; either version 2 of the License, or
10 // (at your option) any later version.
11 //
12 // This program is distributed in the hope that it will be useful,
13 // but WITHOUT ANY WARRANTY; without even the implied warranty of
14 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 // GNU General Public License for more details.
16 //
17 // You should have received a copy of the GNU General Public License
18 // along with this program; if not, write to the Free Software
19 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 //
21 // --
22 //
23 // dl.php
24 //
25 // Create gz/tar files of the requested item
26  
27 require_once("include/setup.inc");
28 require_once("include/svnlook.inc");
29 require_once("include/utils.inc");
30  
31 // Make sure that this operation is allowed
32  
33 if (!$rep->isDownloadAllowed($path))
34 exit;
35  
36 $svnrep = new SVNRepository($rep);
37  
38 if ($path{0} != "/")
39 $ppath = "/".$path;
40 else
41 $ppath = $path;
42  
43 // If there's no revision info, go to the lastest revision for this path
44 $history = $svnrep->getLog($path, "", "", true);
45 $youngest = $history->entries[0]->rev;
46  
47 if (empty($rev))
48 $rev = $youngest;
49  
50 // Create a temporary directory. Here we have an unavoidable but highly
51 // unlikely to occure race condition
52  
53 $tmpname = tempnam("temp", "wsvn");
510 kakl 54 if (mkdir("dir".$tmpname))
342 kakl 55 {
56 // Get the name of the directory being archived
57 $arcname = substr($path, 0, -1);
58 $arcname = basename($arcname);
59 if (empty($arcname))
60 $arcname = $rep->name;
61  
62 $svnrep->exportDirectory($path, $tmpname.DIRECTORY_SEPARATOR.$arcname, $rev);
63  
64 // ZIP it up
65 chdir($tmpname);
66 exec("zip -r ".quote("$arcname")." .");
67  
68 $size = filesize("$arcname.zip");
69  
70 // Give the file to the browser
71  
72 if ($fp = @fopen("$arcname.zip","rb"))
73 {
508 kakl 74 header("Content-Type: application/zip");
342 kakl 75 header("Content-Length: $size");
76 header("Content-Disposition: attachment; filename=\"".$rep->name."-$arcname.zip\"");
77 // Use a loop to transfer the data 4KB at a time.
78 while(!feof($fp))
79 {
80 echo fread($fp, 4096);
81 ob_flush();
82 }
83 }
84 else
85 {
86 print "Unable to open file $arcname.zip";
87 }
88  
89 fclose($fp);
90  
91 chdir("..");
92  
93 // Delete the directory. Why doesn't PHP have a generic recursive directory
94 // deletion command? It's stupid.
95  
96 // if ($config->serverIsWindows)
97 // {
98 // $cmd = quoteCommand("rmdir /S /Q ".quote($tmpname), false);
99 // }
100 // else
101 // {
102 $cmd = quoteCommand("rm -fr ".quote($tmpname), false);
103 // }
104  
105 @exec($cmd);
106 }
509 kakl 107 unlink($tmpname);
342 kakl 108 ?>