<?php# vim:et:ts=3:sts=3:sw=3:fdm=marker:// WebSVN - Subversion repository viewing via the web using PHP// Copyright © 2004-2006 Tim Armes, Matt Sicker//// 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//// --//// comp.php//// Compare two paths using "svn diff"//require_once("include/setup.inc");require_once("include/svnlook.inc");require_once("include/utils.inc");require_once("include/template.inc");$svnrep = new SVNRepository($rep);function checkRevision($rev){if (is_numeric($rev) && ((int)$rev > 0))return $rev;$rev = strtoupper($rev);switch($rev){case "HEAD":case "PREV":case "COMMITTED":return $rev;}return "HEAD";}$svnrep = new SVNRepository($rep);// Retrieve the request information$path1 = @$_REQUEST["compare"][0];$path2 = @$_REQUEST["compare"][1];$rev1 = @$_REQUEST["compare_rev"][0];$rev2 = @$_REQUEST["compare_rev"][1];// Some page links put the revision with the path...if (strpos($path1, "@")) list($path1, $rev1) = explode("@", $path1);if (strpos($path2, "@")) list($path2, $rev2) = explode("@", $path2);$rev1 = checkRevision($rev1);$rev2 = checkRevision($rev2);// Choose a sensible comparison order unless told not toif (!@$_REQUEST["manualorder"] && is_numeric($rev1) && is_numeric($rev2)){if ($rev1 > $rev2){$temppath = $path1;$temprev = $rev1;$path1 = $path2;$rev1 = $rev2;$path2 = $temppath;$rev2 = $temprev;}}$url = $config->getURL($rep, "/", "comp");$vars["revlink"] = "<a href=\"${url}compare%5B%5D=".urlencode($path2)."@$rev2&compare%5B%5D=".urlencode($path1)."@$rev1&manualorder=1\">${lang["REVCOMP"]}</a>";if ($rev1 == 0) $rev1 = "HEAD";if ($rev2 == 0) $rev2 = "HEAD";$vars["repname"] = $rep->getDisplayName();$vars["action"] = $lang["PATHCOMPARISON"];$vars["compare_form"] = "<form action=\"$url\" method=\"post\" name=\"compareform\">";$vars["compare_path1input"] = "<input type=\"text\" size=\"40\" name=\"compare[0]\" value=\"$path1\" />";$vars["compare_rev1input"] = "<input type=\"text\" size=\"5\" name=\"compare_rev[0]\" value=\"$rev1\" />";$vars["compare_path2input"] = "<input type=\"text\" size=\"40\" name=\"compare[1]\" value=\"$path2\" />";$vars["compare_rev2input"] = "<input type=\"text\" size=\"5\" name=\"compare_rev[1]\" value=\"$rev2\" />";$vars["compare_submit"] = "<input name=\"comparesubmit\" type=\"submit\" value=\"${lang["COMPAREPATHS"]}\" />";$vars["compare_endform"] = "<input type=\"hidden\" name=\"op\" value=\"comp\" /><input type=\"hidden\" name=\"manualorder\" value=\"1\" /><input type=\"hidden\" name=\"sc\" value=\"$showchanged\" /></form>";# safe paths are a hack for fixing XSS sploit$vars["path1"] = $path1;$vars['safepath1'] = htmlentities($path1);$vars["path2"] = $path2;$vars['safepath2'] = htmlentities($path2);$vars["rev1"] = $rev1;$vars["rev2"] = $rev2;$noinput = empty($path1) || empty($path2);$listing = array();// Generate the diff listing$path1 = encodepath(str_replace(DIRECTORY_SEPARATOR, "/", $svnrep->repConfig->path.$path1));$path2 = encodepath(str_replace(DIRECTORY_SEPARATOR, "/", $svnrep->repConfig->path.$path2));$debug = false;if (!$noinput){$rawcmd = $config->svn." diff ".$rep->svnParams().quote($path1."@".$rev1)." ".quote($path2."@".$rev2);$cmd = quoteCommand($rawcmd, true);if ($debug) echo "$cmd\n";}function clearVars(){global $listing, $index;$listing[$index]["newpath"] = null;$listing[$index]["endpath"] = null;$listing[$index]["info"] = null;$listing[$index]["diffclass"] = null;$listing[$index]["difflines"] = null;$listing[$index]["enddifflines"] = null;$listing[$index]["properties"] = null;}$vars["success"] = false;if (!$noinput){if ($diff = popen($cmd, "r")){$index = 0;$indiff = false;$indiffproper = false;$getLine = true;$node = null;$vars["success"] = true;while (!feof($diff)){if ($getLine)$line = fgets($diff);clearVars();$getLine = true;if ($debug) print "Line = '$line'<br />" ;if ($indiff){// If we're in a diff proper, just set up the lineif ($indiffproper){if ($line[0] == " " || $line[0] == "+" || $line[0] == "-"){switch ($line[0]){case " ":$listing[$index]["diffclass"] = "diff";$subline = hardspace(replaceEntities(rtrim(substr($line, 1)), $rep));if (empty($subline)) $subline = " ";$listing[$index++]["line"] = $subline;if ($debug) print "Including as diff: $subline<br />";break;case "+":$listing[$index]["diffclass"] = "diffadded";$subline = hardspace(replaceEntities(rtrim(substr($line, 1)), $rep));if (empty($subline)) $subline = " ";$listing[$index++]["line"] = $subline;if ($debug) print "Including as added: $subline<br />";break;case "-":$listing[$index]["diffclass"] = "diffdeleted";$subline = hardspace(replaceEntities(rtrim(substr($line, 1)), $rep));if (empty($subline)) $subline = " ";$listing[$index++]["line"] = $subline;if ($debug) print "Including as removed: $subline<br />";break;}continue;}else{$indiffproper = false;$listing[$index++]["enddifflines"] = true;$getLine = false;if ($debug) print "Ending lines<br />";continue;}}// Check for the start of a new diff areaif (!strncmp($line, "@@", 2)){$pos = strpos($line, "+");$posline = substr($line, $pos);sscanf($posline, "+%d,%d", $sline, $eline);if ($debug) print "sline = '$sline', eline = '$eline'<br />";// Check that this isn't a file deletionif ($sline == 0 && $eline == 0){$line = fgets($diff);if ($debug) print "Ignoring: $line<br />" ;while ($line[0] == " " || $line[0] == "+" || $line[0] == "-"){$line = fgets($diff);if ($debug) print "Ignoring: $line<br />" ;}$getLine = false;if ($debug) print "Unignoring previous - marking as deleted<b>";$listing[$index++]["info"] = $lang["FILEDELETED"];}else{$listing[$index++]["difflines"] = $line;$indiffproper = true;}continue;}else{$indiff = false;if ($debug) print "Ending diff";}}// Check for a new node entryif (strncmp(trim($line), "Index: ", 7) == 0){// End the current nodeif ($node){$listing[$index++]["endpath"] = true;clearVars();}$node = trim($line);$node = substr($node, 7);$listing[$index]["newpath"] = $node;if ($debug) echo "Creating node $node<br />";// Skip past the line of ='s$line = fgets($diff);if ($debug) print "Skipping: $line<br />" ;// Check for a file addition$line = fgets($diff);if ($debug) print "Examining: $line<br />" ;if (strpos($line, "(revision 0)"))$listing[$index]["info"] = $lang["FILEADDED"];if (strncmp(trim($line), "Cannot display:", 15) == 0){$index++;clearVars();$listing[$index++]["info"] = $line;continue;}// Skip second file info$line = fgets($diff);if ($debug) print "Skipping: $line<br />" ;$indiff = true;$index++;continue;}if (strncmp(trim($line), "Property changes on: ", 21) == 0){$propnode = trim($line);$propnode = substr($propnode, 21);if ($debug) print "Properties on $propnode (cur node $ $node)";if ($propnode != $node){if ($node){$listing[$index++]["endpath"] = true;clearVars();}$node = $propnode;$listing[$index++]["newpath"] = $node;clearVars();}$listing[$index++]["properties"] = true;clearVars();if ($debug) echo "Creating node $node<br />";// Skip the row of underscores$line = fgets($diff);if ($debug) print "Skipping: $line<br />" ;while ($line = trim(fgets($diff))){$listing[$index++]["info"] = $line;clearVars();}continue;}// Check for error messagesif (strncmp(trim($line), "svn: ", 5) == 0){$listing[$index++]["info"] = urldecode($line);$vars["success"] = false;continue;}$listing[$index++]["info"] = $line;}if ($node){clearVars();$listing[$index++]["endpath"] = true;}if ($debug) print_r($listing);}}$vars["version"] = $version;if (!$rep->hasUnrestrictedReadAccess($path1) || !$rep->hasUnrestrictedReadAccess($path2, false))$vars["noaccess"] = true;parseTemplate($rep->getTemplatePath()."header.tmpl", $vars, $listing);parseTemplate($rep->getTemplatePath()."compare.tmpl", $vars, $listing);parseTemplate($rep->getTemplatePath()."footer.tmpl", $vars, $listing);?>