Rev Author Line No. Line
185 miho 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");
54 unlink($tmpname);
55 if (mkdir($tmpname))
56 {
57 // Get the name of the directory being archived
58 $arcname = substr($path, 0, -1);
59 $arcname = basename($arcname);
60 if (empty($arcname))
61 $arcname = $rep->name;
62  
63 $svnrep->exportDirectory($path, $tmpname.DIRECTORY_SEPARATOR.$arcname, $rev);
64  
65 // Create the tar file
66 chdir($tmpname);
261 kakl 67 //!!!KAKL exec($config->tar." -cf ".quote("$arcname.tar")." ".quote($arcname));
68 exec("zip -r ".quote("$arcname")." .");
185 miho 69  
70 // ZIP it up
261 kakl 71 //!!!KAKL exec($config->gzip." ".quote("$arcname.tar"));
72 //!!!KAKL $size = filesize("$arcname.tar.gz");
73 $size = filesize("$arcname.zip");
185 miho 74  
75 // Give the file to the browser
76  
261 kakl 77 if ($fp = @fopen("$arcname.zip","rb"))
185 miho 78 {
79 header("Content-Type: application/x-gzip");
80 header("Content-Length: $size");
261 kakl 81 header("Content-Disposition: attachment; filename=\"".$rep->name."-$arcname.zip\"");
185 miho 82 // Use a loop to transfer the data 4KB at a time.
83 while(!feof($fp))
84 {
85 echo fread($fp, 4096);
86 ob_flush();
87 }
88 }
89 else
90 {
261 kakl 91 print "Unable to open file $arcname.zip";
185 miho 92 }
93  
94 fclose($fp);
95  
96 chdir("..");
97  
98 // Delete the directory. Why doesn't PHP have a generic recursive directory
99 // deletion command? It's stupid.
100  
101 if ($config->serverIsWindows)
102 {
103 $cmd = quoteCommand("rmdir /S /Q ".quote($tmpname), false);
104 }
105 else
106 {
107 $cmd = quoteCommand("rm -rf ".quote($tmpname), false);
108 }
109  
110 @exec($cmd);
111 }
112 ?>