PHP文件管理函数（无样式）

hkshadow — Sun, 02 Oct 2011 17:03:51 +0000
该函数对小型文件仓库管理，还是够用的，可当文件管理整合在自己编写的网站系统里，样式无加载，需要自行设计样式。
仅供参考。
代码如下：
';
echo ' [创建目录 | ';
echo ' 创建文件 | ';
echo ' 上传文件]';
echo '
当前路径('."$pathw".'):  ';
echo '';
echo '';
echo '';
echo '';
echo '';
echo '';
echo '';
$spider=@opendir($path);
while (false !== ($file=@readdir($spider))){
	$filebug = strlen($file)>50 ? substr($file,0,50) : $file;
	$filedir="$path"."$file";
	$dir=@is_dir($filedir);
	if($dir=="1"){
		if($file!="."){
			if($file==".."){
				echo '';
				echo '';
				echo '';
				echo ''."\n";
			}
			else{
				$dirw=is_writable($filedir) ? "可写" : "不可写";
				echo '';
				echo '';
				echo ''."\n";
			}
		}
	}
}
@closedir($spider);
$spider=@opendir($path);
while (false !== ($file=@readdir($spider))){
	$filebug = strlen($file)>50 ? substr($file,0,50) : $file;
	$filedir="$path"."$file";
	$dir=@is_dir($filedir);
	$pathg=str_replace('\\', '/', dirname(__FILE__)).'/';
	$fileurl = str_replace($pathg,'',$path);
	if($dir=="0"){
		if($file!='..'){
		$fsize=@filesize($filedir);
		$fsize=$fsize/1024;
		$fsize=@number_format($fsize, 3);
			echo '';
			echo '';
			echo '';
			echo ''."\n";
		}
	}
}
@closedir($spider);
echo '名称 下载 大小 操作
';
				echo '[返回上级目录] === === ===
';
				echo '1'."$filebug".'';
				echo ' '."$dirw".' dir ';
				echo '[删除] ';
				echo '[属性] ';
				echo '[改名]
';
			echo '4 '."$filebug".' 下载 '."$fsize".' KB ';
			echo '[编辑] ';
			echo '[删除] ';
			echo '[属性] ';
			echo '[改名] [拷贝]';
}
//返回
function back(){
	echo '
[返回]

';
}
function fanhui($p){
	echo '
[返回]

';
}
//处理路径
function opath($scriptpath,$nowpath) {
	if ($nowpath == '.') {
		$nowpath = $scriptpath;
	}
	$nowpath = str_replace('\\', '/', $nowpath);
	$nowpath = str_replace('//', '/', $nowpath);
	if (substr($nowpath, -1) != '/') {
		$nowpath = $nowpath.'/';
	}
	return $nowpath;
}
function uppath($nowpath) {
	$pathdb = explode('/', $nowpath);
	$num = count($pathdb);
	if ($num > 2) {
		unset($pathdb[$num-1],$pathdb[$num-2]);
	}
	$uppath = implode('/', $pathdb).'/';
	$uppath = str_replace('//', '/', $uppath);
	return $uppath;
}
//创建目录
function redir($repath){
echo "
创建到当前路径: $repath 
";
echo '目录名称:';
fanhui($repath);
	if($_POST['subdir']){
		$redir=$_POST['redir'];
		$repathok="$repath"."$redir";
		if(stristr($redir,'/')){
			echo '
目录名错误

';
		}
		elseif(file_exists($repathok)){
			echo '
目录'."$redir".'已存在

';
		}
		else{
			$msg=@mkdir($repathok,0777) ? '
目录'."$redir".'创建成功

' : '
目录'."$redir".'创建失败

';
			echo "$msg";
		}
	}
}
//创建文件
function refile($ref){
echo '路径文件名: 
';
echo '请输入内容
';
echo '';	fanhui($ref);
	if($_POST['subfile']){
		$refile=$_POST['refile'];	$text=$_POST['text'];
		$fp=@fopen($refile,'w');
		if($fp==null){
			echo '
创建文件失败!

';
		}
		else{
		@fwrite($fp,stripslashes($text));
		@fclose($fp);
		echo "";
		}
	}
}
//上传文件
function upload($pathname){
	echo '
允许最大单个上传文件:'.@get_cfg_var('upload_max_filesize');
	echo '
';
	echo '本地文件:  
';
	echo '上传到路径: ';	fanhui($pathname);
	if($_POST['upok']){
		$uppath=$_POST['up'];
		echo @copy($_FILES['upfile']['tmp_name'],"".$uppath."/".$_FILES['upfile']['name']."") ? "上传文件{$_FILES['upfile']['name']}成功!

" : "上传文件{$_FILES['upfile']['name']}失败!

";
	}
}
//编辑文件
function edit($p,$f){
	$ep="$p"."$f";
	$hackfp=@fopen($ep,'r');
	$redspider=@fread($hackfp, filesize($ep));
	$redspider=htmlspecialchars($redspider);
	echo '
编辑文件:'."$ep";
	echo '
';
	echo ''."$redspider".'
';
	echo '';	back();
	if($_POST['editok']){
		$fp=@fopen($ep,'w');
		if($fp==null){
			echo '保存失败

';
		}
		else{
			$ftext=$_POST['ftext'];
			fwrite($fp,stripslashes($ftext));
			fclose($fp);
			echo "";
		}
	}
}
//删除文件
function del($dp,$df,$i){
	$delfile="$dp"."$df";
	if(!file_exists($delfile)) {
		echo '
文件'."$df".'不存在! ';
		if($i=="1")
		back();
		else
		fanhui($dp);
	}
	else {
		$msg = @unlink($delfile) ? '
文件'."$df".'删除成功!
' : '
删除失败!
';
		echo "$msg";
		if($i=="1")
		back();
		else
		fanhui($dp);
	}
}
//属性
function perms($pp,$pf){
	$pfile="$pp"."$pf";
	$pold=substr(base_convert(fileperms($pfile),10,8),-4);
	$ftime=@date("Y-n-d H:i:s",filectime("$pfile"));
	echo '
'."$pfile".' 的当前属性为: '."($pold)".'    修改日期: '."$ftime".'
';
	echo '修改属性:  ';
	echo '';	fanhui($pp);
	if($_POST['subperms']){
		$pnew=$_POST['pfo'];
		$fileperm=base_convert($pnew,8,10);
		$msg=@chmod($pfile,$fileperm)?"更改成功!":"更改失败!";
		echo "";
	}
}
//重命名
function ref($rp,$rf){
	$rpf="$rp"."$rf";
	echo '
路径:'."$rp".'
将('."$rf".') 重命名为: ';
	echo '';	fanhui($rp);
	if($_POST['subref']){
		$newf=$_POST['newf'];
		$newfile="$rp"."$newf";
		$msg = file_exists($rpf) ? (@rename($rpf,$newfile) ? "重命名为{$newf}成功" : "重命名为{$newf}失败") : "不存在";
		echo "";
	}
}
//拷贝文件
function cfile($cp,$cf){
	$cpf="$cp"."$cf";
	echo '
文件: '."$cpf".'
拷贝到:  ';
	echo '';
	fanhui($cp);
	if($_POST['subcfile']){
		$newf=$_POST['newf'];
		if(file_exists($newf)){
			echo '失败:文件'."$newf".'已存在

';
		}
		else{
			$msg = @copy($cpf,$newf) ? '文件 '."$cpf".' 拷贝到 '."$newf".' 成功!

' : '失败,路径出错或不可写!

';
			echo "$msg";
		}
	}
}
//删除目录
function deldir($dp,$dd){
	$deldir="$dp"."$dd";
	if(isset($deldir)) {
		$msg = file_exists($deldir)?(deltree($deldir)?"删除成功":"删除失败"):"不存在";
		echo '

目录'."$dd"."$msg";	fanhui($dp);
	}
}
function deltree($dpath){
	$mydir=@opendir($dpath);
	while($file=@readdir($mydir)){
		if((is_dir("$dpath/$file")) && ($file!=".") && ($file!="..")) {
			if(!deltree("$dpath/$file")) return false;
		}else if(!is_dir("$dpath/$file")){
			@chmod("$dpath/$file", 0777);
			if(!@unlink("$dpath/$file")) return false;
		}
	}
	@closedir($mydir);
	@chmod("$dpath", 0777);
	if(!@rmdir($dpath)) return false;
	return true;
}
//页面执行时间
function pagetime(){
	global $stime;
	$paget = explode(' ', microtime());
	$ptime = number_format(($paget[1] + $paget[0] - $stime), 6);
	return $ptime;
}
function array_stripslashes(&$array) {
    while(list($key,$var) = each($array)) {
        if ((strtoupper($key) != $key || ''.intval($key) == "$key") && $key != 'argc' && $key != 'argv') {
            if (is_string($var)) $array[$key] = stripslashes($var);
            if (is_array($var)) $array[$key] = array_stripslashes($var);
        }
    }
    return $array;
}
?>
名称	下载	大小	操作
'; echo '[返回上级目录]	===	===	===
'; echo '1'."$filebug".''; echo '	'."$dirw".'	dir	'; echo '[删除] '; echo '[属性] '; echo '[改名]
'; echo '4 '."$filebug".'	下载	'."$fsize".' KB	'; echo '[编辑] '; echo '[删除] '; echo '[属性] '; echo '[改名] [拷贝]
文件管理 – LPC影子技术分享

PHP文件管理函数（无样式）
