<?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
//
// --
//
// setup.php
//
// Global setup

// --- DON'T CHANGE THIS FILE ---
//
// User changes should be done in config.ini

// Include the configuration class
require_once 'include/configclass.php';

// Create the config
$config = new WebSvnConfig();

if (DIRECTORY_SEPARATOR == '\\') {
  $config->setServerIsWindows();
}

// Set up the default character encodings
if (function_exists('iconv_get_encoding')) {
  $config->setInputEncoding(iconv_get_encoding('input_encoding'));
}

// Set up locwebsvnhttp
// Note: we will use nothing in MultiViews mode so that the URLs use the root
//     directory by default.
if (empty($locwebsvnhttp)) {
  $locwebsvnhttp = defined('WSVN_MULTIVIEWS') ? '' : '.';
}
if (empty($locwebsvnreal)) {
  $locwebsvnreal = '.';
}

$vars['locwebsvnhttp'] = $locwebsvnhttp;

// {{{ Content-Type's
// Set up the default content-type extension handling

$contentType = array (
'.dwg' => 'application/acad', // AutoCAD Drawing files
'.arj' => 'application/arj', //  
'.ccad' => 'application/clariscad', // ClarisCAD files
'.drw' => 'application/drafting', // MATRA Prelude drafting
'.dxf' => 'application/dxf', // DXF (AutoCAD)
'.xl' => 'application/excel', // Microsoft Excel
'.unv' => 'application/i-deas', //SDRC I-DEAS files
'.igs' => 'application/iges', // IGES graphics format
'.iges' => 'application/iges', // IGES graphics format
'.hqx' => 'application/mac-binhex40', // Macintosh BinHex format
'.word' => 'application/msword', // Microsoft Word
'.w6w' => 'application/msword', // Microsoft Word
'.doc' => 'application/msword', // Microsoft Word
'.wri' => 'application/mswrite', // Microsoft Write
'.bin' => 'application/octet-stream', // Uninterpreted binary
'.exe' => 'application/x-msdownload', // Windows EXE
'.oda' => 'application/oda', //  
'.pdf' => 'application/pdf', // PDF (Adobe Acrobat)
'.ai' => 'application/postscript', // PostScript
'.ps' => 'application/postscript', // PostScript
'.eps' => 'application/postscript', // PostScript
'.prt' => 'application/pro_eng', // PTC Pro/ENGINEER
'.part' => 'application/pro_eng', // PTC Pro/ENGINEER
'.rtf' => 'application/rtf', // Rich Text Format
'.set' => 'application/set', // SET (French CAD standard)
'.stl' => 'application/sla', // Stereolithography
'.sol' => 'application/solids', // MATRA Prelude Solids
'.stp' => 'application/STEP', // ISO-10303 STEP data files
'.step' => 'application/STEP', // ISO-10303 STEP data files
'.vda' => 'application/vda', // VDA-FS Surface data
'.dir' => 'application/x-director', // Macromedia Director
'.dcr' => 'application/x-director', // Macromedia Director
'.dxr' => 'application/x-director', // Macromedia Director
'.mif' => 'application/x-mif', // FrameMaker MIF Format
'.csh' => 'application/x-csh', // C-shell script
'.dvi' => 'application/x-dvi', // TeX DVI
'.gz' => 'application/x-gzip', // GNU Zip
'.gzip' => 'application/x-gzip', // GNU Zip
'.hdf' => 'application/x-hdf', // ncSA HDF Data File
'.latex' => 'application/x-latex', // LaTeX source
'.nc' => 'application/x-netcdf', // Unidata netCDF
'.cdf' => 'application/x-netcdf', // Unidata netCDF
'.sit' => 'application/x-stuffit', // Stiffut Archive
'.tcl' => 'application/x-tcl', // TCL script
'.texinfo' => 'application/x-texinfo', // Texinfo (Emacs)
'.texi' => 'application/x-texinfo', // Texinfo (Emacs)
'.t' => 'application/x-troff', // Troff
'.tr' => 'application/x-troff', // Troff
'.roff' => 'application/x-troff', // Troff
'.man' => 'application/x-troff-man', // Troff with MAN macros
'.me' => 'application/x-troff-me', // Troff with ME macros
'.ms' => 'application/x-troff-ms', // Troff with MS macros
'.src' => 'application/x-wais-source', // WAIS source
'.bcpio' => 'application/x-bcpio', // Old binary CPIO
'.cpio' => 'application/x-cpio', // POSIX CPIO
'.gtar' => 'application/x-gtar', // GNU tar
'.shar' => 'application/x-shar', // Shell archive
'.sv4cpio' => 'application/x-sv4cpio', // SVR4 CPIO
'.sv4crc' => 'application/x-sv4crc', // SVR4 CPIO with CRC
'.tar' => 'application/x-tar', // 4.3BSD tar format
'.ustar' => 'application/x-ustar', // POSIX tar format
'.hlp' => 'application/x-winhelp', // Windows Help
'.zip' => 'application/zip', // ZIP archive
'.au' => 'audio/basic', // Basic audio (usually m-law)
'.snd' => 'audio/basic', // Basic audio (usually m-law)
'.aif' => 'audio/x-aiff', // AIFF audio
'.aiff' => 'audio/x-aiff', // AIFF audio
'.aifc' => 'audio/x-aiff', // AIFF audio
'.ra' => 'audio/x-pn-realaudio', // RealAudio
'.ram' => 'audio/x-pn-realaudio', // RealAudio
'.rpm' => 'audio/x-pn-realaudio-plugin', // RealAudio (plug-in)
'.wav' => 'audio/x-wav', // Windows WAVE audio
'.mp3' => 'audio/x-mp3', // MP3 files
'.gif' => 'image/gif', // gif image
'.ief' => 'image/ief', // Image Exchange Format
'.jpg' => 'image/jpeg', // JPEG image
'.jpe' => 'image/jpeg', // JPEG image
'.jpeg' => 'image/jpeg', // JPEG image
'.pict' => 'image/pict', // Macintosh PICT
'.tiff' => 'image/tiff', // TIFF image
'.tif' => 'image/tiff', // TIFF image
'.ras' => 'image/x-cmu-raster', // CMU raster
'.pnm' => 'image/x-portable-anymap', // PBM Anymap format
'.pbm' => 'image/x-portable-bitmap', // PBM Bitmap format
'.pgm' => 'image/x-portable-graymap', // PBM Graymap format
'.ppm' => 'image/x-portable-pixmap', // PBM Pixmap format
'.rgb' => 'image/x-rgb', // RGB Image
'.xbm' => 'image/x-xbitmap', // X Bitmap
'.xpm' => 'image/x-xpixmap', // X Pixmap
'.xwd' => 'image/x-xwindowdump', // X Windows dump (xwd) format
'.zip' => 'multipart/x-zip', // PKZIP Archive
'.gzip' => 'multipart/x-gzip', // GNU ZIP Archive
'.mpeg' => 'video/mpeg', // MPEG video
'.mpg' => 'video/mpeg', // MPEG video
'.mpe' => 'video/mpeg', // MPEG video
'.mpeg' => 'video/mpeg', // MPEG video
'.qt' => 'video/quicktime', // QuickTime Video
'.mov' => 'video/quicktime', // QuickTime Video
'.avi' => 'video/msvideo', // Microsoft Windows Video
'.movie' => 'video/x-sgi-movie', // SGI Movieplayer format
'.wrl' => 'x-world/x-vrml', // VRML Worlds
'.odt' => 'application/vnd.oasis.opendocument.text',            // OpenDocument Text
'.ott' => 'application/vnd.oasis.opendocument.text-template',      // OpenDocument Text Template
'.ods' => 'application/vnd.oasis.opendocument.spreadsheet',        // OpenDocument Spreadsheet
'.ots' => 'application/vnd.oasis.opendocument.spreadsheet-template',  // OpenDocument Spreadsheet Template
'.odp' => 'application/vnd.oasis.opendocument.presentation',       // OpenDocument Presentation
'.otp' => 'application/vnd.oasis.opendocument.presentation-template', // OpenDocument Presentation Template
'.odg' => 'application/vnd.oasis.opendocument.graphics',          // OpenDocument Drawing
'.otg' => 'application/vnd.oasis.opendocument.graphics-template',    // OpenDocument Drawing Template
'.odc' => 'application/vnd.oasis.opendocument.chart',            // OpenDocument Chart
'.otc' => 'application/vnd.oasis.opendocument.chart-template',      // OpenDocument Chart Template
'.odf' => 'application/vnd.oasis.opendocument.formula',          // OpenDocument Formula
'.otf' => 'application/vnd.oasis.opendocument.formula-template',    // OpenDocument Formula Template
'.odi' => 'application/vnd.oasis.opendocument.image',            // OpenDocument Image
'.oti' => 'application/vnd.oasis.opendocument.image-template',      // OpenDocument Image Template
'.odm' => 'application/vnd.oasis.opendocument.text-master',        // OpenDocument Master Document
'.oth' => 'application/vnd.oasis.opendocument.text-web',          // HTML Document Template
'.odb' => 'application/vnd.oasis.opendocument.database',          // OpenDocument Database
);

// }}}

// {{{ Enscript file extensions

// List of extensions recognised by enscript.

$extEnscript = array
(
  '.ada'     => 'ada',
  '.adb'     => 'ada',
  '.ads'     => 'ada',
  '.awk'     => 'awk',
  '.c'       => 'c',
  '.c++'     => 'cpp',
  '.cc'      => 'cpp',
  '.cpp'     => 'cpp',
  '.csh'     => 'csh',
  '.cxx'     => 'cpp',
  '.diff'    => 'diffu',
  '.dpr'     => 'delphi',
  '.e'       => 'eiffel',
  '.el'      => 'elisp',
  '.eps'     => 'postscript',
  '.f'       => 'fortran',
  '.for'     => 'fortran',
  '.gs'      => 'haskell',
  '.h'       => 'c',
  '.hpp'     => 'cpp',
  '.hs'      => 'haskell',
  '.htm'     => 'html',
  '.html'    => 'html',
  '.idl'     => 'idl',
  '.java'    => 'java',
  '.js'      => 'javascript',
  '.lgs'     => 'haskell',
  '.lhs'     => 'haskell',
  '.m'       => 'objc',
  '.m4'      => 'm4',
  '.man'     => 'nroff',
  '.nr'      => 'nroff',
  '.p'       => 'pascal',
  '.pas'     => 'delphi',
  '.patch'   => 'diffu',
  '.pkg'     => 'sql',
  '.pl'      => 'perl',
  '.pm'      => 'perl',
  '.pp'      => 'pascal',
  '.ps'      => 'postscript',
  '.s'       => 'asm',
  '.scheme'  => 'scheme',
  '.scm'     => 'scheme',
  '.scr'     => 'synopsys',
  '.sh'      => 'sh',
  '.shtml'   => 'html',
  '.sql'     => 'sql',
  '.st'      => 'states',
  '.syn'     => 'synopsys',
  '.synth'   => 'synopsys',
  '.tcl'     => 'tcl',
  '.tex'     => 'tex',
  '.texi'    => 'tex',
  '.texinfo' => 'tex',
  '.v'       => 'verilog',
  '.vba'     => 'vba',
  '.vh'      => 'verilog',
  '.vhd'     => 'vhdl',
  '.vhdl'    => 'vhdl',
  '.py'      => 'python',
);

// }}}

// {{{ GeSHi file extensions

// List of extensions recognised by GeSHi.

$extGeshi = array
(
  'actionscript3' => array('as'),
  'ada' => array('ada', 'adb', 'ads'),
  'asm' => array('ash', 'asi', 'asm'),
  'asp' => array('asp'),
  'bash' => array('sh'),
  'c' => array('c'),
  'cfm' => array('cfm', 'cfml'),
  'cobol' => array('cbl'),
  'cpp' => array('cc', 'cpp', 'cxx', 'c++', 'h', 'hpp'),
  'csharp' => array('cs'),
  'css' => array('css'),
  'd' => array('d'),
  'delphi' => array('dpk', 'dpr', 'pas'),
  'diff' => array('diff', 'patch'),
  'dos' => array('bat', 'cmd'),
  'eiffel' => array('e'),
  'email' => array('eml'),
  'fortran' => array('f', 'for'),
  'gettext' => array('po', 'pot'),
  'gml' => array('gml'),
  'gnuplot' => array('plt'),
  'groovy' => array('groovy'),
  'haskell' => array('gs', 'hs', 'lgs', 'lhs'),
  'html4strict' => array('html', 'htm'),
  'idl' => array('idl'),
  'ini' => array('desktop', 'ini'),
  'java5' => array('java'),
  'javascript' => array('js'),
  'latex' => array('tex'),
  'lisp' => array('lisp'),
  'lua' => array('lua'),
  'make' => array('make'),
  'matlab' => array('m'),
  'perl' => array('pl', 'pm'),
  'php' => array('php', 'php3', 'php4', 'php5', 'phps', 'phtml'),
  'povray' => array('pov'),
  'providex' => array('pvc', 'pvx'),
  'python' => array('py'),
  'reg' => array('reg'),
  'ruby' => array('rb'),
  'scala' => array('scala'),
  'scheme' => array('scm', 'scheme'),
  'scilab' => array('sci'),
  'smalltalk' => array('st'),
  'sql' => array('sql'),
  'tcl' => array('tcl'),
  'vb' => array('bas'),
  'vh' => array('v', 'verilog'),
  'vhdl' => array('vhd', 'vhdl'),
  'vim' => array('vim'),
  'whitespace' => array('ws'),
  'xml' => array('xml', 'xsl', 'xsd', 'xib', 'wsdl', 'svg', 'plist'),
  'z80' => array('z80'),
);

// }}}

// Include a default language file (must go before config.php)
require 'languages/english.php';

// Get the user's personalised config (requires the locwebsvnhttp stuff above)
if (file_exists('/usr/pkg/etc'.DIRECTORY_SEPARATOR.'websvn.conf')) {
  require_once '/usr/pkg/etc'.DIRECTORY_SEPARATOR.'websvn.conf';
} else {
  die('File "/usr/pkg/etc'.DIRECTORY_SEPARATOR.'websvn.conf" does not exists, please create one. The example is located under "/usr/pkg/share/examples/websvn'.DIRECTORY_SEPARATOR.'distconfig.php"');
}

require_once 'include/svnlook.php';

// Make sure that the input locale is set up correctly
setlocale(LC_ALL, '');

// Default 'zipped' array

$zipped = array();

// Set up the version info

initSvnVersion();
$vars['svnversion'] = $config->getSubversionVersion();

// Get the user choice if there is one, and memorise the setting as a cookie
// (since we don't have user accounts, we can't store the setting anywhere
// else).  We try to memorise a permanent cookie and a per session cookie in
// case the user has disabled permanent ones.

$userLang = false;
if (!empty($_REQUEST['langchoice'])) {
  $userLang = $_REQUEST['langchoice'];
  setcookie('storedlang', $_REQUEST['langchoice'], time()+(3600*24*356*10), '/');
  setcookie('storedsesslang', $_REQUEST['langchoice']);
} else { // Try to read an existing cookie if there is one
  if (!empty($_COOKIE['storedlang'])) $userLang = $_COOKIE['storedlang'];
  else if (!empty($_COOKIE['storedsesslang'])) $userLang = $_COOKIE['storedsesslang'];
}

// Load available languages
require 'languages/languages.php';

// Get the default language as defined as the default by config.php
$defaultLang = $config->getDefaultLanguage();
if (!isset($languages[$defaultLang])) $defaultLang = 'en';

// Negotiate language
$userLang = getUserLanguage($languages, $defaultLang, $userLang);
$file = $languages[$userLang][0];

// Define the language array
$lang = array();

// XXX: this shouldn't be necessary
// ^ i.e. just require english.php, then the desired language
// Reload english to get untranslated strings
require 'languages/english.php';

// Reload the default language
require 'languages/'.$file.'.php';

$vars['lang_code'] = $userLang;

$url = '?'.buildQuery($_GET + $_POST);
$vars["lang_form"] = "<form action=\"$url\" method=\"post\" id=\"langform\">";
$vars["lang_select"] = "<select name=\"langchoice\" onchange=\"javascript:this.form.submit();\">";

foreach ($languages as $code => $d) {
  $sel = ($code == $userLang) ? ' selected="selected"' : '';
  $vars["lang_select"] .= '<option value="'.$code.'"'.$sel.'>'.$d[2].' - '.$d[1].'</option>';
}

$vars["lang_select"] .= "</select>";
$vars["lang_submit"] = "<input type=\"submit\" value=\"${lang["GO"]}\" />";
$vars["lang_endform"] = "</form>";

// Set up headers

header('Content-Type: text/html; charset=UTF-8');
header('Content-Language: '.$userLang);

// multiviews has custom code to load the repository
if (!$config->multiViews) {
  // if the repoparameter has been set load the corresponding
  // repository, else load the default
  $repname = @$_REQUEST["repname"];
  if (isset($repname)) {
    $rep = $config->findRepository($repname);
  } else {
    $reps = $config->getRepositories();
    $rep = (isset($reps[0]) ? $reps[0] : null);
  }

  // Make sure that the user has set up a repository
  if ($rep == null) {
    echo $lang["SUPPLYREP"];
    exit;
  }
}


// Retrieve other standard parameters

// due to possible XSS exploit, we need to clean up path first
$path = !empty($_REQUEST['path']) ? $_REQUEST['path'] : null;
if ($path === null || $path === '') $path = '/';
$vars['safepath'] = htmlentities($path, ENT_QUOTES, 'UTF-8');
$rev = (int)@$_REQUEST["rev"];

// Function to create the project selection HTML form
function createProjectSelectionForm() {
  global $config, $vars, $rep, $lang;

  if (!$config->showRepositorySelectionForm()) {
    $vars["projects_form"] = '';
    $vars["projects_select"] = '';
    $vars["projects_submit"] = '';
    $vars["projects_hidden"] = '';
    $vars["projects_endform"] = '';
    return;
  }

  $url = $config->getURL(-1, "", "form");
  $vars["projects_form"] = "<form action=\"$url\" method=\"post\" id=\"projectform\">";

  $reps = $config->getRepositories();
  $vars["projects_select"] = "<select name=\"repname\" onchange=\"javascript:this.form.submit();\">";

  foreach ($reps as $trep) {
    if ($trep->hasReadAccess("/", true)) {
      if ($rep->getDisplayName() == $trep->getDisplayName()) {
        $sel = ' selected="selected"';
      } else {
        $sel = "";
      }

      $vars["projects_select"] .= "<option value=\"".$trep->getDisplayName()."\"$sel>".$trep->getDisplayName()."</option>";
    }
  }

  $vars["projects_select"] .= "</select>";

  $vars["projects_submit"] = "<input type=\"submit\" value=\"${lang["GO"]}\" />";
  $vars["projects_hidden"] = "<input type=\"hidden\" name=\"selectproj\" value=\"1\" /><input type=\"hidden\" name=\"op\" value=\"form\" />";
  $vars["projects_endform"] = "</form>";
}

// Function to create the revision selection HTML form
function createRevisionSelectionForm() {
  global $config, $vars, $rep, $lang, $showchanged, $rev;

  if ($rev == 0) {
    $thisrev = "HEAD";
  } else {
    $thisrev  = $rev;
  }

  list($url, $params) = $config->getUrlParts($rep, '', 'revision');
  $vars["revision_form"] = "<form action=\"$url\" method=\"get\" id=\"revisionform\">";

  $vars["revision_input"] = "<input type=\"text\" size=\"5\" name=\"rev\" value=\"$thisrev\" />";
  $hidden = '';
  foreach ($params as $k => $v) {
    $hidden .= "<input type=\"hidden\" name=\"$k\" value=\"".htmlspecialchars($v)."\" />";
  }
  $vars["revision_hidden"] = $hidden;

  $vars["revision_submit"] = "<input type=\"submit\" value=\"${lang["GO"]}\" />";
  $vars["revision_endform"] = "</form>";
}

// Create the form if we're not in MultiViews.  Otherwise wsvn must create the form once the current project has
// been found

if (!$config->multiViews) {
  createProjectSelectionForm();
  createRevisionSelectionForm();
}

if (!$config->multiViews && $rep) {
  $vars["allowdownload"] = $rep->getAllowDownload();
  $vars["repname"] = htmlentities($rep->getDisplayName(), ENT_QUOTES, 'UTF-8');
}

// As of version 1.70 the output encoding is forced to be UTF-8, since this is the output
// encoding returned by svn log --xml.  This is good, since we are no longer reliant on PHP's
// rudimentary conversions.

$vars["charset"] = "UTF-8";
