<?php

// $Header: /cvsroot/tikiwiki/tiki/tiki-map_upload.php,v 1.8.4.14 2006/09/03 16:32:32 ohertel Exp $

// Copyright (c) 2002-2005, Luis Argerich, Garland Foster, Eduardo Polidor, et. al.
// All Rights Reserved. See copyright.txt for details and a complete list of authors.
// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.

// Initialization
require_once ('tiki-setup.php');

if(@$feature_maps != 'y') {
  $smarty->assign('msg',tra("Feature disabled"));
  $smarty->display("error.tpl");
  die;
}

if ($tiki_p_map_edit !='y') {
  $smarty->assign('msg',tra("You do not have permissions to view the layers"));
  $smarty->display("error.tpl");
  die;      
}

if (!is_dir($map_path)) {
  $smarty->assign('msg', tra("Please create a directory named $map_path to hold your map files."));
	$smarty->display('error.tpl');
	die;
}


$DSEP=DIRECTORY_SEPARATOR;

$max_file_size=ini_get("upload_max_filesize");
$smarty->assign('max_file_size', $max_file_size);

// checks to ensure no variable contains .. or ~ in file name or directory name
if (isset($_REQUEST["file"])) {
	$_REQUEST["file"] = preg_replace('~\.\.~','',$_REQUEST["file"]);
	$_REQUEST["file"] = preg_replace('~\~~','',$_REQUEST["file"]);
	$_REQUEST["file"] = preg_replace('~/+~','/',$_REQUEST["file"]);
}

if (isset($_REQUEST["directory"])) {
	$_REQUEST["directory"] = preg_replace('~\.\.~','',$_REQUEST["directory"]);
	$_REQUEST["directory"] = preg_replace('~\~~','',$_REQUEST["directory"]);
	$_REQUEST["directory"] = preg_replace('~/+~','/',$_REQUEST["directory"]);
}

if (isset($_REQUEST["dir"])) {
	$_REQUEST["dir"] = preg_replace('~\~~','',$_REQUEST["dir"]);
	$_REQUEST["dir"] = preg_replace('~/+~','/',$_REQUEST["dir"]);
	$directory_path = inpath($map_path.$_REQUEST["dir"],$map_path."data");
	if ($directory_path) {
		$dir = $DSEP."data".substr($directory_path,strlen($map_path)+4);
	} else {
	  $dir=$DSEP."data";
		$directory_path=$map_path.$DSEP."data";
	}
	$basedir = dirname($_REQUEST["dir"]);

  if (substr($dir,0,5) != $DSEP."data") {
    $directory_path = $map_path.$DSEP."data";
    $dir = $DSEP."data";
		$basedir = $DSEP;
  }
} else {
  $directory_path=$map_path.$DSEP."data";
  $dir=$DSEP."data";
	$basedir = $DSEP;
}
$smarty->assign('dir', $dir);	
$smarty->assign('basedir', $basedir);	

//Do we have a file to upload?
if (isset($_REQUEST["upload"])) {
  for ($i = 1; $i <= 6; $i++) {
    if(isset($_FILES["userfile$i"]) && is_uploaded_file($_FILES["userfile$i"]['tmp_name'])) {
      if(!@move_uploaded_file($_FILES["userfile$i"]['tmp_name'], $directory_path.$DSEP.$_FILES["userfile$i"]['name'])) {
        $smarty->assign('msg',tra("Could not upload the file"));
        $smarty->display("error.tpl");
        die;
      }
    }
  }
}

//Do we have a file to delete?
if (isset($_REQUEST["action"]) && isset($_REQUEST["file"])) {
  if ($_REQUEST["action"]=="delete") {
		$area = "delmapupload";
		if ($feature_ticketlib2 != 'y' or (isset($_POST['daconfirm']) and isset($_SESSION["ticket_$area"]))) {
			key_check($area);
					
         if (is_file($directory_path.$DSEP.$_REQUEST["file"]) &&
        		!preg_match("/^\./", $_REQUEST["file"])) {
      		if ($tiki_p_map_delete !='y') {
        			$smarty->assign('msg',tra("You do not have permissions to delete a file"));
        			$smarty->display("error.tpl");
        			die;      
      		}
      		unlink($directory_path.$DSEP.$_REQUEST["file"]);

    		} else {
        		$smarty->assign('msg',tra("File not found"));
        		$smarty->display("error.tpl");
        		die;    
    		}
    	} else {
			key_get($area);
		}
  }
}

//Do we have a directory to create or delete?
if (isset($_REQUEST["action"]) && isset($_REQUEST["directory"])) {
  if ($_REQUEST["action"]=="createdir") {
    if(!preg_match("/\./", $_REQUEST["directory"])){
      if ($tiki_p_map_create !='y') {
        $smarty->assign('msg',tra("You do not have permissions to create a directory"));
        $smarty->display("error.tpl");
        die;      
      }
      if(!@mkdir($directory_path.$DSEP.$_REQUEST["directory"])) {
        $smarty->assign('msg',tra("The Directory is not empty"));
        $smarty->display("error.tpl");
        die;      
      }
    } else {
      $smarty->assign('msg',tra("Invalid directory name"));
      $smarty->display("error.tpl");
      die;    
    }
  }
  if ($_REQUEST["action"]=="deldir") {
		$area = "delmapdir";
		if ($feature_ticketlib2 != 'y' or (isset($_POST['daconfirm']) and isset($_SESSION["ticket_$area"]))) {
			key_check($area);
					
    	if(!preg_match("/^\./", $_REQUEST["directory"]) || 
    	   !preg_match("/\.\//", $_REQUEST["directory"])){
    	  if ($tiki_p_map_delete !='y') {
    	    $smarty->assign('msg',tra("You do not have permissions to delete a directory"));
    	    $smarty->display("error.tpl");
    	    die;      
    	  }
    	  if(!@rmdir($directory_path.$DSEP.$_REQUEST["directory"])) {
    	    $smarty->assign('msg',tra("The Directory is not empty"));
    	    $smarty->display("error.tpl");
    	    die;      
    	  }
    	}
		} else {
			key_get($area);
		}
  }  
}

//Do we have an index to create?
if (isset($_REQUEST["action"]) && isset($_REQUEST["indexfile"]) 
    && isset($_REQUEST["filestoindex"])) {
  if ($_REQUEST["action"]=="createindex") {
      if ($tiki_p_map_create !='y') {
        $smarty->assign('msg',tra("You do not have permissions to create an index file"));
        $smarty->display("error.tpl");
        die;      
      }
      
      if (preg_match("/\.\//", $_REQUEST["indexfile"]) || 
          !preg_match("/\.shp/", $_REQUEST["indexfile"])) {
        $smarty->assign('msg',tra("Invalid file name"));
        $smarty->display("error.tpl");
        die;      
      }
      if (preg_match("/\.\//", $_REQUEST["filestoindex"])) {
        $smarty->assign('msg',tra("Invalid files to index"));
        $smarty->display("error.tpl");
        die;      
      }
		if (!isset($gdaltindex)) {
        $smarty->assign('msg',tra("I do not know where is gdaltindex. Set correctly the Map feature"));
        $smarty->display("error.tpl");
        die;      
      }				
      
      $indexfile=inpath(dirname($directory_path.$DSEP.$_REQUEST["indexfile"]),$directory_path);
      $filestoindex=inpath(dirname($directory_path.$DSEP.$_REQUEST["filestoindex"]),$directory_path);
      if ($indexfile && $filestoindex && is_file($gdaltindex)) {
        $indexfile=escapeshellarg($indexfile.$DSEP.basename($_REQUEST["indexfile"]));
        $filestoindex=escapeshellarg($filestoindex.$DSEP.basename($_REQUEST["filestoindex"]));
	      $command=$gdaltindex." ".$indexfile." ".$filestoindex;
	      $return=shell_exec($command);
	      if ($return<>0) {
	        $smarty->assign('msg',tra("I could not create the index file"));
	        $smarty->display("error.tpl");
	        die;      
	      }
	    } else {
	    		$smarty->assign('msg',tra("I could not create the index file"));
	        $smarty->display("error.tpl");
	        die; 
	    }
  }
}  

// Get layers from the layers directory
$files = array();
$dirs = array();
if (is_dir($directory_path)) {
$h = opendir($directory_path);

while (($file = readdir($h)) !== false) {
  // Ignore hidden files
  if(!preg_match("/^(\.|CVS)/", $file)){
    // Put dirs in $dirs[] and files in $files[]
    if(is_dir($directory_path.$DSEP.$file)){
      $dirs[] = $file;
    }else{
      $files[] = $file;
    }
  }
}
closedir ($h);
}

// if $dirs[] exists, sort it and print all elements in it.
if(is_array($dirs)){
  sort($dirs);
}

// if $files[] exists, sort it and print all elements in it.
if(is_array($files)){
  sort($files);
}  

$smarty->assign('files', $files);	
$smarty->assign('dirs', $dirs);

// disallow robots to index page:
$smarty->assign('metatag_robots', 'NOINDEX, NOFOLLOW');

// Get templates from the templates/modules directori
$smarty->assign('mid', 'map/tiki-map_upload.tpl');
$smarty->display("tiki.tpl");

?>
