<?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
//
// --
//
// listing.php
//
// Show the listing for the given repository/path/revision

require_once 'include/setup.php';
require_once 'include/svnlook.php';
require_once 'include/utils.php';
require_once 'include/template.php';
require_once 'include/bugtraq.php';

function removeURLSeparator($url)
{
        return preg_replace('#(\?|&(amp;)?)$#', '', $url);
}

function urlForPath($fullpath, $passRevString)
{
        global $config, $rep;

        $isDir = $fullpath[strlen($fullpath) - 1] == '/';

        if ($isDir)
        {
                if ($config->treeView)
                {
                        $url = $config->getURL($rep, $fullpath, 'dir').$passRevString;
                        $id = anchorForPath($fullpath);
                        $url .= '#'.$id.'" id="'.$id;
                }
                else
                {
                        $url = $config->getURL($rep, $fullpath, 'dir').$passRevString;
                }
        }
        else
        {
                $url = $config->getURL($rep, $fullpath, 'file').$passRevString;
        }
        return removeURLSeparator($url);
}

function showDirFiles($svnrep, $subs, $level, $limit, $rev, $peg, $listing, $index, $treeview = true)
{
        global $config, $lang, $rep, $passrev, $peg, $passRevString;

        $path = '';

        if (!$treeview)
        {
                $level = $limit;
        }

        // TODO: Fix node links to use the path and number of peg revision (if exists)
        // This applies to file detail, log, and RSS -- leave the download link as-is
        for ($n = 0; $n <= $level; $n++)
        {
                $path .= $subs[$n].'/';
        }

        // List each file in the current directory
        $loop = 0;
        $last_index = 0;
        $accessToThisDir = $rep->hasReadAccess($path, false);

        // If using flat view and not at the root, create a '..' entry at the top.
        if (!$treeview && count($subs) > 2)
        {
                $parentPath = $subs;
                unset($parentPath[count($parentPath) - 2]);
                $parentPath = implode('/', $parentPath);

                if ($rep->hasReadAccess($parentPath, false))
                {
                        $listvar = &$listing[$index];
                        $listvar['rowparity'] = $index % 2;
                        $listvar['path'] = str_replace('%2F', '/', rawurlencode($parentPath));
                        $listvar['filetype'] = 'dir';
                        $listvar['filename'] = '..';
                        $listvar['fileurl'] = urlForPath($parentPath, $passRevString);
                        $listvar['filelink'] = '<a href="'.$listvar['fileurl'].'">'.$listvar['filename'].'</a>';
                        $listvar['level'] = 0;
                        $listvar['node'] = 0; // t-node
                        $listvar['revision'] = $rev;
                        $listvar['revurl'] = $config->getURL($rep, $parentPath, 'revision').'rev='.$rev.'&amp;isdir=1';
                        global $vars;
                        $listvar['date'] = $vars['date'];
                        $listvar['age'] = datetimeFormatDuration(time() - strtotime($vars['date']), true, true);
                        $index++;
                }
        }

        $openDir = false;
        $logList = $svnrep->getList($path, $rev, $peg);

        if (!$logList)
        {
                return $listing;
        }

        $downloadRevAndPeg = createRevAndPegString($rev, $peg ? $peg : $rev);
        foreach ($logList->entries as $entry)
        {
                $isDir = $entry->isdir;
                if (!$isDir && $level != $limit)
                {
                        continue; // Skip any files outside the current directory
                }
                $file = $entry->file;
                $isDirString = ($isDir) ? 'isdir=1&amp;' : '';

                // Only list files/directories that are not designated as off-limits
                $access = ($isDir)      ? $rep->hasReadAccess($path.$file, false)
                                                        : $accessToThisDir;

                if (!$access)
                {
                        continue;
                }

                $listvar = &$listing[$index];
                $listvar['rowparity'] = $index % 2;

                if ($isDir)
                {
                        $openDir = isset($subs[$level + 1]) && (!strcmp($subs[$level + 1].'/', $file) || !strcmp($subs[$level + 1], $file));
                        $listvar['filetype'] = ($openDir) ? 'diropen' : 'dir';
                }
                else
                {
                        $openDir = false;
                        $listvar['filetype'] = strtolower(strrchr($file, '.'));
                }

                $listvar['isDir'] = $isDir;
                $listvar['openDir'] = $openDir;
                $listvar['level'] = ($treeview) ? $level : 0;
                $listvar['node'] = 0; // t-node
                $listvar['path'] = str_replace('%2F', '/', rawurlencode($path.$file));
                $listvar['filename'] = escape($file);

                if ($isDir)
                {
                        $listvar['fileurl'] = urlForPath($path.$file, $passRevString);
                }
                else
                {
                        $listvar['fileurl'] = urlForPath($path.$file, createDifferentRevAndPegString($passrev, $peg));
                }

                $listvar['filelink'] = '<a href="'.$listvar['fileurl'].'">'.$listvar['filename'].'</a>';

                if ($isDir)
                {
                        $listvar['logurl'] = $config->getURL($rep, $path.$file, 'log').$isDirString.$passRevString;
                }
                else
                {
                        $listvar['logurl'] = $config->getURL($rep, $path.$file, 'log').$isDirString.createDifferentRevAndPegString($passrev, $peg);
                }

                if ($treeview)
                {
                        $listvar['compare_box'] = '<input type="checkbox" name="compare[]" value="'.escape($path.$file).'@'.$passrev.'" onclick="enforceOnlyTwoChecked(this)" />';
                }

                if ($config->showLastModInListing())
                {
                        $listvar['committime'] = $entry->committime;
                        $listvar['revision'] = $entry->rev;
                        $listvar['author'] = $entry->author;
                        $listvar['age'] = $entry->age;
                        $listvar['date'] = $entry->date;
                        $listvar['revurl'] = $config->getURL($rep, $path.$file, 'revision').$isDirString.createRevAndPegString($entry->rev, $peg ? $peg : $rev);
                }

                if ($rep->isDownloadAllowed($path.$file))
                {
                        $downloadurl = $config->getURL($rep, $path.$file, 'dl').$isDirString.$downloadRevAndPeg;

                        if ($isDir)
                        {
                                $listvar['downloadurl'] = $downloadurl;
                                $listvar['downloadplainurl'] = '';
                        }
                        else
                        {
                                $listvar['downloadplainurl'] = $downloadurl;
                                $listvar['downloadurl'] = '';
                        }
                }
                else
                {
                        $listvar['downloadplainurl'] = '';
                        $listvar['downloadurl'] = '';
                }

                if ($rep->isRssEnabled())
                {
                        // RSS should always point to the latest revision, so don't include rev
                        $listvar['rssurl'] = $config->getURL($rep, $path.$file, 'rss').$isDirString.createRevAndPegString('', $peg);
                }

                $loop++;
                $index++;
                $last_index = $index;

                if ($isDir && ($level != $limit))
                {
                        // @todo remove the alternate check with htmlentities when assured that there are not side effects
                        if (isset($subs[$level + 1]) && (!strcmp($subs[$level + 1].'/', $file) || !strcmp(htmlentities($subs[$level + 1], ENT_QUOTES).'/', htmlentities($file))))
                        {
                                $listing = showDirFiles($svnrep, $subs, $level + 1, $limit, $rev, $peg, $listing, $index);
                                $index = count($listing);
                        }
                }
        }

        // For an expanded tree, give the last entry an "L" node to close the grouping
        if ($treeview && $last_index != 0)
        {
                $listing[$last_index - 1]['node'] = 1; // l-node
        }

        return $listing;
}

function showAllDirFiles($svnrep, $path, $rev, $peg, $listing, $index, $treeView = true)
{
        global $config, $lang, $rep, $passrev, $peg, $passRevString;

        // List each file in the current directory
        $loop = 0;
        $last_index = 0;
        $accessToThisDir = $rep->hasReadAccess($path, false);

        // If using flat view and not at the root, create a '..' entry at the top.
        if (!$treeView && count($subs) > 2)
        {
                $parentPath = $subs;
                unset($parentPath[count($parentPath) - 2]);
                $parentPath = implode('/', $parentPath);

                if ($rep->hasReadAccess($parentPath, false))
                {
                        $listvar = &$listing[$index];
                        $listvar['rowparity'] = $index % 2;
                        $listvar['path'] = str_replace('%2F', '/', rawurlencode($parentPath));
                        $listvar['filetype'] = 'dir';
                        $listvar['filename'] = '..';
                        $listvar['fileurl'] = urlForPath($parentPath, $passRevString);
                        $listvar['filelink'] = '<a href="'.$listvar['fileurl'].'">'.$listvar['filename'].'</a>';
                        $listvar['level'] = 0;
                        $listvar['node'] = 0; // t-node
                        $listvar['revision'] = $rev;
                        $listvar['revurl'] = $config->getURL($rep, $parentPath, 'revision').'rev='.$rev.'&amp;isdir=1';
                        global $vars;
                        $listvar['date'] = $vars['date'];
                        $listvar['age'] = datetimeFormatDuration(time() - strtotime($vars['date']), true, true);
                        $index++;
                }
        }

        $openDir = false;
        $logList = $svnrep->getList($path, $rev, $peg);

        if (!$logList)
        {
                return $listing;
        }

        $downloadRevAndPeg = createRevAndPegString($rev, $peg ? $peg : $rev);

        foreach ($logList->entries as $entry)
        {
                $isDir = $entry->isdir;

                $file = $entry->file;
                $isDirString = ($isDir) ? 'isdir=1&amp;' : '';

                // Only list files/directories that are not designated as off-limits
                $access = ($isDir)      ? $rep->hasReadAccess($path.$file, false)
                                                        : $accessToThisDir;

                if (!$access)
                {
                        continue;
                }

                $listvar = &$listing[$index];
                $listvar['rowparity'] = $index % 2;

                if ($isDir)
                {
                        $listvar['filetype'] = 'dir';
                        $openDir = true;
                }
                else
                {
                        $listvar['filetype'] = strtolower(strrchr($file, '.'));
                        $openDir = false;
                }

                $listvar['isDir'] = $isDir;
                $listvar['openDir'] = $openDir;
                $listvar['path'] = str_replace('%2F', '/', rawurlencode($path.$file));
                $tempelements = explode('/',$file);

                if ($tempelements[count($tempelements)-1] === "")
                {
                        $lastindexfile = count($tempelements)-1 - 1;
                        $listvar['node'] = $lastindexfile; // t-node
                        $listvar['level'] = ($treeView) ? $lastindexfile : 0;
                        $listvar['filename'] = escape($tempelements[$lastindexfile]);
                        $listvar['classname'] = '';

                        for ($n = 0; $n < $lastindexfile; ++$n)
                        {
                                $listvar['last_i_node'][$n]     = false;
                                $listvar['classname']           = $listvar['classname'].$tempelements[$n].'/';
                        }

                        $listvar['classname'] = $listvar['classname'].$tempelements[$lastindexfile];
                        $listvar['last_i_node'][$lastindexfile] = true;
                }
                else
                {
                        $lastindexfile = count($tempelements)-1;
                        $listvar['node'] = $lastindexfile; // t-node
                        $listvar['level'] = ($treeView) ? $lastindexfile : 0;
                        $listvar['filename'] = escape($tempelements[$lastindexfile]);
                        $listvar['classname'] = '';

                        for ($n=0; $n < $lastindexfile; ++$n)
                        {
                                $listvar['last_i_node'][$n]     = false;
                                $listvar['classname']           = $listvar['classname'].$tempelements[$n].'/';
                        }

                        $listvar['last_i_node'][$lastindexfile] = true;
                }

                if ($isDir)
                {
                        $listvar['fileurl'] = urlForPath($path.$file, $passRevString);
                }
                else
                {
                        $listvar['fileurl'] = urlForPath($path.$file, createDifferentRevAndPegString($passrev, $peg));
                }

                $listvar['filelink'] = '<a href="'.$listvar['fileurl'].'">'.$listvar['filename'].'</a>';

                if ($isDir)
                {
                        $listvar['logurl'] = $config->getURL($rep, $path.$file, 'log').$isDirString.$passRevString;
                }
                else
                {
                        $listvar['logurl'] = $config->getURL($rep, $path.$file, 'log').$isDirString.createDifferentRevAndPegString($passrev, $peg);
                }

                if ($treeView)
                {
                        $listvar['compare_box'] = '<input type="checkbox" name="compare[]" value="'.escape($path.$file).'@'.$passrev.'" onclick="enforceOnlyTwoChecked(this)" />';
                }

                if ($config->showLastModInListing())
                {
                        $listvar['committime'] = $entry->committime;
                        $listvar['revision'] = $entry->rev;
                        $listvar['author'] = $entry->author;
                        $listvar['age'] = $entry->age;
                        $listvar['date'] = $entry->date;
                        $listvar['revurl'] = $config->getURL($rep, $path.$file, 'revision').$isDirString.createRevAndPegString($entry->rev, $peg ? $peg : $rev);
                }

                if ($rep->isDownloadAllowed($path.$file))
                {
                        $downloadurl = $config->getURL($rep, $path.$file, 'dl').$isDirString.$downloadRevAndPeg;

                        if ($isDir)
                        {
                                $listvar['downloadurl'] = $downloadurl;
                                $listvar['downloadplainurl'] = '';
                        }
                        else
                        {
                                $listvar['downloadplainurl'] = $downloadurl;
                                $listvar['downloadurl'] = '';
                        }
                }
                else
                {
                        $listvar['downloadplainurl'] = '';
                        $listvar['downloadurl'] = '';
                }

                if ($rep->isRssEnabled())
                {
                        // RSS should always point to the latest revision, so don't include rev
                        $listvar['rssurl'] = $config->getURL($rep, $path.$file, 'rss').$isDirString.createRevAndPegString('', $peg);
                }

                $loop++;
                $index++;
                $last_index = $index;
        }

        return $listing;
}

function showTreeDir($svnrep, $path, $rev, $peg, $listing)
{
        global $vars, $config;

        if ($config->showLoadAllRepos())
        {
                $vars['compare_box'] = ''; // Set blank once in case tree view is not enabled.
                return showAllDirFiles($svnrep, $path, $rev, $peg, $listing, 0, $config->treeView);
        }

        $subs = explode('/', $path);

        // The last element in "$subs" is empty for directories, some file name for files, but ALWAYS
        // exists as an additional element. Hence, "-2" is necessary.
        //
        // Additionally, level and limit are conceptually different things, first to e.g. start access
        // checks FROM, latter to process UNTIL. So don't merge those values too easily, especially as
        // both values needed to be different in some environments in the past for some unkown reason.
        //
        // https://github.com/websvnphp/websvn/issues/146#issuecomment-913353366
        $limit = count($subs) - 2;
        $level = $limit;
        $level = $level <= 0 ? 0 : $level;

        for ($n = 0; $n < $limit; $n++)
        {
                $vars['last_i_node'][$n] = false;
        }

        $vars['compare_box'] = ''; // Set blank once in case tree view is not enabled.
        return showDirFiles($svnrep, $subs, $level, $limit, $rev, $peg, $listing, 0, $config->treeView);
}

// Make sure that we have a repository
if (!$rep)
{
        renderTemplate404('directory','NOREP');
}

$svnrep = new SVNRepository($rep);

if (!empty($rev))
{
        $info = $svnrep->getInfo($path, $rev, $peg);

        if ($info)
        {
                $path = $info->path;
                $peg = (int)$info->rev;
        }
}

$history = $svnrep->getLog($path, 'HEAD', 1, false, 2, ($path == '/') ? '' : $peg);

if (!$history)
{
        unset($vars['error']);
        $history = $svnrep->getLog($path, '', '', false, 2, ($path == '/') ? '' : $peg);

        if (!$history)
        {
                renderTemplate404('directory','NOPATH');
        }
}

$youngest = ($history && isset($history->entries[0])) ? $history->entries[0]->rev : 0;

// Unless otherwise specified, we get the log details of the latest change
$lastChangedRev = ($passrev) ? $passrev : $youngest;

if ($lastChangedRev != $youngest)
{
        $history = $svnrep->getLog($path, $lastChangedRev, 1, false, 2, $peg);
}

$logEntry = ($history && isset($history->entries[0])) ? $history->entries[0] : 0;

$headlog = $svnrep->getLog('/', '', '', true, 1);
$headrev = ($headlog && isset($headlog->entries[0])) ? $headlog->entries[0]->rev : 0;

// If we're not looking at a specific revision, get the HEAD revision number
// (the revision of the rest of the tree display)

if (empty($rev))
{
        $rev = $headrev;
}

if ($path == '' || $path[0] != '/')
{
        $ppath = '/'.$path;
}
else
{
        $ppath = $path;
}

createPathLinks($rep, $ppath, $passrev, $peg);
$passRevString = createRevAndPegString($passrev, $peg);
$isDirString = 'isdir=1&amp;';

$revurl = $config->getURL($rep, $path != '/' ? $path : '', 'dir');
$revurlSuffix = $path != '/' ? '#'.anchorForPath($path) : '';

if ($rev < $youngest)
{
        if ($path == '/')
        {
                $vars['goyoungesturl'] = $config->getURL($rep, '', 'dir');
        }
        else
        {
                $vars['goyoungesturl'] = $config->getURL($rep, $path, 'dir').createRevAndPegString($youngest, $peg ? $peg: $rev).$revurlSuffix;
        }

        $vars['goyoungestlink'] = '<a href="'.$vars['goyoungesturl'].'"'.($youngest ? ' title="'.$lang['REV'].' '.$youngest.'"' : '').'>'.$lang['GOYOUNGEST'].'</a>';

        $history2 = $svnrep->getLog($path, $rev, $youngest, true, 2, $peg);

        if (isset($history2->entries[1]))
        {
                $nextRev = $history2->entries[1]->rev;
                if ($nextRev != $youngest)
                {
                        $vars['nextrev'] = $nextRev;
                        $vars['nextrevurl'] = $revurl.createRevAndPegString($nextRev, $peg).$revurlSuffix;
                }
        }

        unset($vars['error']);
}

if (isset($history->entries[1]))
{
        $prevRev = $history->entries[1]->rev;
        $prevPath = $history->entries[1]->path;
        $vars['prevrev'] = $prevRev;
        $vars['prevrevurl'] = $revurl.createRevAndPegString($prevRev, $peg).$revurlSuffix;
}

$bugtraq = new Bugtraq($rep, $svnrep, $ppath);

$vars['action'] = '';
$vars['rev'] = $rev;
$vars['peg'] = $peg;
$vars['path'] = str_replace('%2F', '/', rawurlencode($ppath));
$vars['safepath'] = escape($ppath);
$vars['lastchangedrev'] = $lastChangedRev;

if ($logEntry)
{
        $vars['date'] = $logEntry->date;
        $vars['age'] = datetimeFormatDuration(time() - strtotime($logEntry->date));
        $vars['author'] = $logEntry->author;
        $vars['log'] = nl2br($bugtraq->replaceIDs(create_anchors(xml_entities($logEntry->msg))));
}

$vars['revurl'] = $config->getURL($rep, ($path == '/' ? '' : $path), 'revision').$isDirString.$passRevString;
$vars['revlink'] = '<a href="'.$vars['revurl'].'">'.$lang['LASTMOD'].'</a>';

if ($history && count($history->entries) > 1)
{
        $vars['compareurl'] = $config->getURL($rep, '', 'comp').'compare[]='.rawurlencode($history->entries[1]->path).'@'.$history->entries[1]->rev. '&amp;compare[]='.rawurlencode($history->entries[0]->path).'@'.$history->entries[0]->rev;
        $vars['comparelink'] = '<a href="'.$vars['compareurl'].'">'.$lang['DIFFPREV'].'</a>';
}

$vars['logurl'] = $config->getURL($rep, $path, 'log').$isDirString.$passRevString;
$vars['loglink'] = '<a href="'.$vars['logurl'].'">'.$lang['VIEWLOG'].'</a>';

if ($rep->isRssEnabled())
{
        $vars['rssurl'] = $config->getURL($rep, $path, 'rss').$isDirString.createRevAndPegString('', $peg);
        $vars['rsslink'] = '<a href="'.$vars['rssurl'].'">'.$lang['RSSFEED'].'</a>';
}

// Set up the tarball link
$subs = explode('/', $path);
$level = count($subs) - 2;

if ($rep->isDownloadAllowed($path) && !isset($vars['warning']))
{
        $vars['downloadurl'] = $config->getURL($rep, $path, 'dl').$isDirString.$passRevString;
}

$vars['compare_form'] = '<form method="get" action="'.$config->getURL($rep, '', 'comp').'" id="compare">';

if ($config->multiViews)
{
        $vars['compare_form'] .= '<input type="hidden" name="op" value="comp"/>';
}
else
{
        $vars['compare_form'] .= '<input type="hidden" name="repname" value="'.$repname.'" />';
}

$vars['compare_submit'] = '<input type="submit" value="'.$lang['COMPAREPATHS'].'" />';
$vars['compare_endform'] = '</form>';

$vars['showlastmod'] = $config->showLastModInListing();

$vars['loadalldir'] = $config->showLoadAllRepos();
$listing = showTreeDir($svnrep, $path, $rev, $peg, array());

if (!$rep->hasReadAccess($path))
{
        $vars['error'] = $lang['NOACCESS'];
        sendHeaderForbidden();
}

$vars['restricted'] = !$rep->hasReadAccess($path, false);
renderTemplate('directory', $path);