fileManager.php

<?php
/*
* File Manager
*
* Copyright (c) 2010 Tom Kay - oridan82@gmail.com
*
* 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 3 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, see <http://www.gnu.org/licenses/>.*
*
*/

class jqFileManager {
	private static $data = array();
	static function GetRelativePath($path) {
		//$path = realpath($path); // dont use realpath as it doesnt work with files that dont exist.
    $path = preg_replace('/[^\/]+\/\.\.\/?/', '', $path);
		$pos = strpos($path,$_SERVER['DOCUMENT_ROOT']);
		return '/'.ltrim(substr($path,$pos+strlen($_SERVER['DOCUMENT_ROOT'])),DIRECTORY_SEPARATOR);
	}
	static function GetPathFolder() {
		return self::GetRelativePath(dirname(__FILE__)).DIRECTORY_SEPARATOR;
	}
	static function GetPathSelf() {
		return self::GetRelativePath(__FILE__);
	}
	static function GetPathJS() {
		return self::GetPathFolder().'jquery.fileManager.js';
	}
	static function GetPathCSS() {
		return self::GetPathFolder().'jquery.fileManager.css';
	}

	static function AddIcon($path, $title='',$folder=false) {
		self::$data[] = array('path'=>$path,'title'=>$title,'type'=>$folder);
	}
	static function ProcessAjax($rootPath,$deleteCallback=null,$renameCallback=null) {
		$pMod = array_key_exists('path',$_GET) ? $_GET['path'] : '';
		$path = $rootPath.'/'.trim($pMod,'/');

		// translate path
		$path = preg_replace('/[^\/]+\/\.\.\/?/', '', $path);
		$path = '/'.trim($path,'/');
		if (!file_exists($path)) mkdir($path,octdec('0777'),true);
//		chmod($path,0777);

		if (array_key_exists('delete',$_GET)) {
			$from = $path.'/'.$_GET['delete'];
			if (!file_exists($from)) {
				echo 'alert("File or Folder no longer exists");';
				return false;
			}
			try {
				if (is_dir($from)) rmdir($from);
				else unlink($from);
			} catch (Exception $e) {
				echo 'alert("Cannot Delete.  Folder may not be empty.");';
				return false;
			}
			return true;
		}
		if (array_key_exists('mFrom',$_GET) && array_key_exists('mTo',$_GET)) {
			$from = $path.'/'.$_GET['mFrom'];
			$to = $path.'/'.$_GET['mTo'];
			$to = preg_replace('/\w+\/\.\.\//', '', $to);
			if (file_exists($to)) {
				echo 'alert("Destination already exists");';
				return false;
			}
			try {
				rename($from,$to);
			} catch(Exception $e) {
				echo $e->getMessage();
				echo 'alert("Cannot move or rename.");';
				return false;
			}
			$from = $path.'/'.$_GET['mFrom'];
			$to = $path.'/'.$_GET['mTo'];
			if (is_callable($renameCallback)) call_user_func($renameCallback,$from,$to);
			return true;
		}

		$glob = glob($path.'/{,.}*',GLOB_BRACE);
		$files = array_merge(array_filter($glob, 'is_dir'),array_filter($glob, 'is_file'));
		foreach ($files as $file) {
			$filename = basename($file);
			if ($filename === '..' || $filename === '.') continue;
			if (!is_dir($file) && array_key_exists('filter',$_GET) && !preg_match('/'.$_GET['filter'].'/i',$filename)) continue;
		//	$fldr = is_dir($file) ? 'cmsMediaFolder cmsDrop cmsDrag' : 'cmsDrag';
			self::AddIcon($filename,$filename,is_dir($file)?1:0);
			//echo "<div class=\"cmsMediaIcon$fldr\" title=\"$filename\">$filename</div>";
		}

		// uPath is full path less rootpath less filename
		$uPath = substr(self::GetRelativePath($path),strlen(self::GetRelativePath($rootPath)));
		if (!$uPath) $uPath = '';
		die(json_encode(array('rootPath'=>self::GetRelativePath($rootPath),'path'=>$uPath,'files'=>self::$data)));
	}

	public static function ProcessUpload($rootPath) {
		if (ob_get_level()) ob_end_clean();
		$pMod = array_key_exists('path',$_GET) ? $_GET['path'] : '';
		if (!file_exists($rootPath)) mkdir($rootPath);
		$destination = realpath(rtrim($rootPath,'/').DIRECTORY_SEPARATOR.trim($pMod,'/'));

		// HTTP headers for no cache etc
		header('Content-type: text/plain; charset=UTF-8');
		header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
		header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
		header("Cache-Control: no-store, no-cache, must-revalidate");
		header("Cache-Control: post-check=0, pre-check=0", false);
		header("Pragma: no-cache");

		// Settings
		$targetDir = $destination;// ini_get("upload_tmp_dir") . DIRECTORY_SEPARATOR . "plupload";
		$cleanupTargetDir = false; // Remove old files
		$maxFileAge = 60 * 60; // Temp file age in seconds

		// 5 minutes execution time
		//set_time_limit(0);
		// usleep(5000);

		// Get parameters
		$chunk = array_key_exists('chunk',$_REQUEST) ? $_REQUEST["chunk"] : 0;
		$chunks = array_key_exists('chunks',$_REQUEST) ? $_REQUEST["chunks"] : 0;
		$fileName = array_key_exists('name',$_REQUEST) ? $_REQUEST["name"] : '';

		// Clean the fileName for security reasons
		$fileName = preg_replace('/[^\w\._]+/', '', $fileName);
		if (is_dir($targetDir . DIRECTORY_SEPARATOR . $fileName)) die('{"jsonrpc" : "2.0", "error" : {"code": 102, "message": "Failed to open output stream."}, "id" : "id"}');


		// Create target dir
		if (!file_exists($targetDir)) {
			mkdir($targetDir);
			chmod($targetDir,0777);
		}

		// Remove old temp files
		if (is_dir($targetDir) && ($dir = opendir($targetDir))) {
			while (($file = readdir($dir)) !== false) {
				$filePath = $targetDir . DIRECTORY_SEPARATOR . $file;

				// Remove temp files if they are older than the max age
				if (preg_match('/\\.tmp$/', $file) && (filemtime($filePath) < time() - $maxFileAge))
					unlink($filePath);
			}

			closedir($dir);
		} else
			die('{"jsonrpc" : "2.0", "error" : {"code": 100, "message": "Failed to open temp directory."}, "id" : "id"}');

		$contentType = '';
		// Look for the content type header
		if (isset($_SERVER["HTTP_CONTENT_TYPE"]))
			$contentType = $_SERVER["HTTP_CONTENT_TYPE"];

		if (isset($_SERVER["CONTENT_TYPE"]))
			$contentType = $_SERVER["CONTENT_TYPE"];

		if (strpos($contentType, "multipart") !== false) {
			if (isset($_FILES['file']['tmp_name']) && is_uploaded_file($_FILES['file']['tmp_name'])) {
				// Open temp file
				$out = fopen($targetDir . DIRECTORY_SEPARATOR . $fileName, $chunk == 0 ? "wb" : "ab");
				if ($out) {
					// Read binary input stream and append it to temp file
					$in = fopen($_FILES['file']['tmp_name'], "rb");

					if ($in) {
						while ($buff = fread($in, 4096))
							fwrite($out, $buff);
					} else
						die('{"jsonrpc" : "2.0", "error" : {"code": 101, "message": "Failed to open input stream."}, "id" : "id"}');

					fclose($out);
					unlink($_FILES['file']['tmp_name']);
				} else
					die('{"jsonrpc" : "2.0", "error" : {"code": 102, "message": "Failed to open output stream."}, "id" : "id"}');
			} else
				die('{"jsonrpc" : "2.0", "error" : {"code": 103, "message": "Failed to move uploaded file."}, "id" : "id"}');
		} else {
			// Open temp file
			$out = fopen($targetDir . DIRECTORY_SEPARATOR . $fileName, $chunk == 0 ? "wb" : "ab");
			if ($out) {
				// Read binary input stream and append it to temp file
				$in = fopen("php://input", "rb");

				if ($in) {
					while ($buff = fread($in, 4096))
						fwrite($out, $buff);
				} else
					die('{"jsonrpc" : "2.0", "error" : {"code": 101, "message": "Failed to open input stream."}, "id" : "id"}');

				fclose($out);
			} else
				die('{"jsonrpc" : "2.0", "error" : {"code": 102, "message": "Failed to open output stream."}, "id" : "id"}');
		}

		// Return JSON-RPC response
		die('{"jsonrpc" : "2.0", "result" : null, "id" : "id"}');
	}
}
?>