<?php
// WebSVN - Subversion repository viewing via the web using PHP
// Copyright (C) 2004-2006 Tim Armes
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
//
// --
//
// dl.php
//
// Create gz/tar files of the requested item

require_once("include/setup.php");
require_once("include/svnlook.php");
require_once("include/utils.php");

ini_set('include_path', $locwebsvnreal.'/lib/pear'.$config->pathSeparator.ini_get('include_path'));
@include_once("Archive/Tar.php");

function setDirectoryTimestamp($dir, $ts) {
  global $config;
  // changing the modification time of a directory under windows is only supported since php 5.3.0
  if (!$config->serverIsWindows || version_compare(PHP_VERSION, '5.3.0alpha') !== -1) {
    touch($dir, $ts);

    $handle = opendir($dir);
    if ($handle) {
      while (($file = readdir($handle)) !== false) {
        if ($file == '.' || $file == '..') {
          continue;
        }
        $f = $dir.DIRECTORY_SEPARATOR.$file;
        if (is_dir($f)) {
          setDirectoryTimestamp($f, $ts);
        }
      }
      closedir($handle);
    }
  }
}

function removeDirectory($dir) {
  if (is_dir($dir)) {
    $dir = rtrim($dir, '/');
    $handle = dir($dir);
    while (($file = $handle->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)) {
  header('HTTP/1.x 403 Forbidden', true, 403);
  print 'Unable to download path '.$path."\n";
  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);
}
if (is_string($history)) {
  echo $history;
  exit;
}
$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;
  $isDir = (substr($arcname, -1) == '/');
  if ($isDir) {
    $arcname = substr($arcname, 0, -1);
  }
  $arcname = basename($arcname);
  if ($arcname == '') {
    $arcname = $rep->name;
  }

  $plainfilename = $arcname;
  $arcname = $arcname.'.r'.$rev;

  $svnrep->exportDirectory($path, $tmpname.DIRECTORY_SEPARATOR.$arcname, $rev);

  // Set datetime of exported directory (and subdirectories) to datetime of revision so that every archive is equal
  $date = $logEntry->date;
  $ts = mktime(substr($date, 11, 2), substr($date, 14, 2), substr($date, 17, 2), substr($date, 5, 2), substr($date, 8, 2), substr($date, 0, 4));
  setDirectoryTimestamp($tmpname.DIRECTORY_SEPARATOR.$arcname, $ts);

  // change to temp directory so that only relative paths are stored in tar
  chdir($tmpname);

  if ($isDir) {
    $dlmode = $config->getDefaultFolderDlMode();
  } else {
    $dlmode = $config->getDefaultFileDlMode();
  }

  // $_REQUEST parameter can override dlmode
  if (!empty($_REQUEST['dlmode'])) {
    $dlmode = $_REQUEST['dlmode'];
    if (substr($logEntry->path, -1) == '/') {
      if (!in_array($dlmode, $config->validFolderDlModes)) {
        $dlmode = $config->getDefaultFolderDlMode();
      }
    } else {
      if (!in_array($dlmode, $config->validFileDlModes)) {
        $dlmode = $config->getDefaultFileDlMode();
      }
    }
  }

  if ($dlmode == 'plain') {
    $dlarc  = $arcname;
    $dlmime = 'application/octetstream';

  } else if ($dlmode == 'zip') {
    $dlarc  = $arcname.'.zip';
    $dlmime = 'application/x-zip';
    // Create zip file
    $cmd = $config->zip.' -r '.quote($dlarc).' '.quote($arcname);
    execCommand($cmd, $retcode);
    if ($retcode != 0) {
      print'Unable to call zip command "'.$config->zip.'"';
    }

  } else {
    $tararc = $arcname.'.tar';
    $dlarc = $arcname.'.tar.gz';
    $dlmime = 'application/x-gzip';

    // Create the tar file
    $retcode = 0;
    if (class_exists('Archive_Tar')) {
      $tar = new Archive_Tar($tararc);
      $created = $tar->create($arcname);
      if (!$created) {
        $retcode = 1;
        print'Unable to create tar archive';
      }

    } else {
      $cmd = $config->tar.' -cf '.quote($tararc).' '.quote($arcname);
      execCommand($cmd, $retcode);
      if ($retcode != 0) {
        print'Unable to call tar command "'.$config->tar.'"';
      }
    }
    if ($retcode != 0) {
      chdir('..');
      removeDirectory($tmpname);
      exit(0);
    }

    // Set datetime of tar file to datetime of revision
    touch($tararc, $ts);

    // GZIP it up
    if (function_exists('gzopen')) {
      $srcHandle = fopen($tmpname.DIRECTORY_SEPARATOR.$tararc, 'rb');
      $dstHandle = gzopen($tmpname.DIRECTORY_SEPARATOR.$dlarc, 'wb');
      if (!$srcHandle || !$dstHandle) {
        print'Unable to open file for gz-compression';
        chdir('..');
        removeDirectory($tmpname);
        exit(0);
      }
      while (!feof($srcHandle)) {
        gzwrite($dstHandle, fread($srcHandle, 1024 * 512));
      }
      fclose($srcHandle);
      gzclose($dstHandle);

    } else {
      $cmd = $config->gzip.' '.quote($tararc);
      $retcode = 0;
      execCommand($cmd, $retcode);
      if ($retcode != 0) {
        print'Unable to call gzip command "'.$config->gzip.'"';
        chdir('..');
        removeDirectory($tmpname);
        exit(0);
      }
    }
  }

  // Give the file to the browser
  if (is_readable($dlarc)) {
    $size = filesize($dlarc);

    if ($dlmode == 'plain') {
      $dlfilename = $plainfilename;
    } else {
      $dlfilename = $rep->name.'-'.$dlarc;
    }

    header('Content-Type: '.$dlmime);
    header('Content-Length: '.$size);
    header('Content-Disposition: attachment; filename="'. $dlfilename .'"');

    readfile($dlarc);

  } else {
    header('HTTP/1.x 404 Not Found', true, 404);

    print 'Unable to open file '.$dlarc."\n";
  }

  chdir('..');

  removeDirectory($tmpname);
}
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
   <head>
      <meta http-equiv="content-type" content="text/html;charset=UTF-8">
      <meta http-equiv="generator" content="WebSVN 2.2.1" /> <!-- leave this for stats -->
      <link rel="shortcut icon" type="image/x-icon" href="./templates/BlueGrey/favicon.ico" />
      <link type="text/css" href="./templates/BlueGrey/styles.css" rel="stylesheet" media="screen">
      <!--[if lt IE 7]>
      <script type="text/javascript" src="./templates/BlueGrey/png.js"></script>
      <![endif]-->
      <script type="text/javascript" src="./templates/BlueGrey/collapse.js"></script>
      <title>
         WebSVN
            - websvn
            - Blame
               - Rev 4
            - /dl.php
      </title>

      <script type="text/javascript">
         function checkCB(chBox)
         {
            count = 0
            first = null
            f = chBox.form
            for (i = 0 ; i < f.elements.length ; i++)
            if (f.elements[i].type == 'checkbox' && f.elements[i].checked)
            {
               if (first == null && f.elements[i] != chBox)
                  first = f.elements[i]
               count += 1
            }
            
            if (count > 2) 
            {
               first.checked = false
               count -= 1
            }
         }
         
      </script>


</head>
<body>
	<table width="100%" border="0">
	  <tr>
		<td width="13%">&nbsp;</td>
		<td width="73%" align="center"><a href="http://www.jablonka.cz/"><img style="border: 0; width: 201px; height: 51px;" src="./templates/BlueGrey/logo.png" alt="jablonka.cz" /></a><a href="http://www.prosek.czf/"><img style="border: 0; width: 528px; height: 51px;" src="./templates/BlueGrey/squares.png" alt="prosek.czf" /></a></td>
		<td width="13%"><div style="float: right"><form action="?path=%2Fdl.php&amp;repname=websvn&amp;rev=4" method="post" id="langform"><select name="langchoice" onchange="javascript:this.form.submit();"><option value="ca">Catal&agrave;-Valenci&agrave; - Catalan</option><option value="cs">&#268;esky - Cesky</option><option value="da">Dansk - Dansk</option><option value="nl">Dutch - Dutch</option><option value="en" selected="selected">English - English</option><option value="fi">Finnish - Finnish</option><option value="fr">Fran&ccedil;ais - Francais</option><option value="de">Deutsch - German</option><option value="he-IL">&#1506;&#1489;&#1512;&#1497;&#1514; - Hebrew</option><option value="hu">Magyar - Hungarian</option><option value="id">Bahasa Indonesia - Indonesian</option><option value="it">Italiano - Italian</option><option value="ja">&#26085;&#26412;&#35486; - Japanese</option><option value="ko">&#54620;&#44397;&#50612; - Korean</option><option value="no">Norsk - Norwegian</option><option value="pl">Polski - Polish</option><option value="pt">Portugu&ecirc;s - Portuguese</option><option value="pt-BR">Portugu&ecirc;s - Brazilian Portuguese</option><option value="ru">&#1056;&#1091;&#1089;&#1089;&#1082;&#1080;&#1081; - Russian</option><option value="zh-CN">&#20013;&#25991; - Simplified Chinese</option><option value="sk">Sloven&#269;ina - Slovak</option><option value="sl">Sloven&#269;ina - Slovenian</option><option value="es">Espa&ntilde;ol - Spanish</option><option value="sv">Svenska - Swedish</option><option value="zh-TW">&#20013;&#25991; - Traditional Chinese</option><option value="tr">T&uuml;rk&ccedil;e - Turkish</option><option value="uz">O&euml;zbekcha - Uzbek</option></select><input type="submit" value="Go" /></form></div></td>
	  </tr>
	</table>
	<hr />
<table cellspacing="0" cellpadding="0" border="0" width="100%">
  <tr>
    <td align="left"><h1>websvn</h1></td>
    <td align="right"><b>Subversion Repositories:</b> <form action="form.php?" method="post" id="projectform"><select name="repname" onchange="javascript:this.form.submit();"><option value="banderdyn">banderdyn</option><option value="centos.prosek.czf">centos.prosek.czf</option><option value="crusader">crusader</option><option value="czf4bfu">czf4bfu</option><option value="czf4bfu.prosek.czf">czf4bfu.prosek.czf</option><option value="czfcentos">czfcentos</option><option value="czfgmap">czfgmap</option><option value="discover">discover</option><option value="fedora.prosek.czf">fedora.prosek.czf</option><option value="freenet-router">freenet-router</option><option value="ftth">ftth</option><option value="getonlineclouds">getonlineclouds</option><option value="hotsanic">hotsanic</option><option value="internet.prosek.czf">internet.prosek.czf</option><option value="is">is</option><option value="mapstats">mapstats</option><option value="meteolinger">meteolinger</option><option value="netmap">netmap</option><option value="qos">qos</option><option value="sedlo">sedlo</option><option value="sedlo.prosek.czf">sedlo.prosek.czf</option><option value="switches">switches</option><option value="vbtobb">vbtobb</option><option value="vlubnt">vlubnt</option><option value="weathermap">weathermap</option><option value="weatherstats">weatherstats</option><option value="websvn" selected="selected">websvn</option><option value="wifidashboard">wifidashboard</option><option value="wifimon">wifimon</option><option value="www.prosek.czf">www.prosek.czf</option><option value="xenstats">xenstats</option></select><input type="submit" value="Go" /><input type="hidden" name="selectproj" value="1" /><input type="hidden" name="op" value="form" /></form></td>
  </tr>
</table>

[<a href="listing.php?repname=websvn&amp;path=%2F&amp;rev=4">/</a>] [<b>dl.php</b>] - Blame information for rev <b>4</b>
<p>&nbsp;</p>

<table cellpadding="2" cellspacing="0" width="100%" class="blameTbl">
	<thead>
		<tr>
			<th class="HdrClmn"><b>Line No.</b></th>
			<th class="HdrClmn"><b>Rev</b></th>
			<th class="HdrClmn"><b>Author</b></th>
			<th class="HdrClmnEnd"><b>Line</b></th>
		</tr>
	</thead>
	<tbody>
	</tbody>
</table> 


<script type='text/javascript'>
/* <![CDATA[ */
var rev = new Array();
var a = document.getElementsByTagName('a');
for (var i = 0; i < a.length; i++) {
  if (a[i].className == 'blame-revision') {
    var id = a[i].id;
    addEvent(a[i], 'mouseover', function() { mouseover(this) } );
    addEvent(a[i], 'mouseout', function() { mouseout(this) } );
  }
}

function mouseover(a) {
  // Find the revision by using the link
  var m = /rev=(\d+)/.exec(a.href);
  var r = m[1];

  div = document.createElement('div');
  div.className = 'blame-popup';
  div.innerHTML = rev[r];
  a.parentNode.appendChild(div);
}

function mouseout(a) {
  var div = a.parentNode.parentNode.getElementsByTagName('div');
  for (var i = 0; i < div.length; i++) {
    if (div[i].className = 'blame-popup') {
      div[i].parentNode.removeChild(div[i]);
    }
  }
}

function addEvent(obj, type, func) {
  if (obj.addEventListener) {
    obj.addEventListener(type, func, false);
    return true;
  } else if (obj.attachEvent) {
    return obj.attachEvent('on' + type, func);
  } else {
    return false;
  }
}
/* ]]> */
</script>

      <p><center><font size="-1"><i><b>Powered by <a href="http://www.websvn.info/">WebSVN</a> 2.2.1</b></i></font></center>
   </body>
</html>