• 文件管理函数的草稿


    <?php
    header("Content-Type:text/html;charset=utf-8");
    $path='./';
    if(isset($_GET['dir'])){
     $path=$_GET['dir'];
     if(realpath($path)==realpath(dirname(__FILE__))) $path='.';
     if(is_file($path)){
      echo '<pre>';
      echo htmlspecialchars(file_get_contents($path));
      echo '</pre>';
      exit;
     }
    }
    list_addlink($path);
    /**
    +--------------------------------------------
    *列出路径下所有文件或文件夹,并附加链接
    +--------------------------------------------
    public
    +--------------------------------------------
    string $path 文件夹或文件的路径
    */
    function list_addlink($path){
     if(file_exists($path)){
      if(is_file($path)){
       echo "文件:<a href=\"".$_SERVER['PHP_SELF']."?dir={$path}\">{$path}</a><br/>";
      }else if(is_dir($path)){
       $dir=opendir($path);
       while($files=readdir($dir)){
        if(is_file($files)){
         echo "文件:<a href=\"".$_SERVER['PHP_SELF']."?dir={$path}/{$files}\" target=\"_blank\">{$files}</a><br/>";
        }else if(is_dir($path.'/'.$files)){
         if(realpath($path)==realpath('..')) die('参数错误');
         if(realpath($path)==dirname(__FILE__)){
          //echo '<hr/>'.$files.'<hr/>';
          if($files!='.' && $files!='..'){
           echo "目录:<a href=\"".$_SERVER['PHP_SELF']."?dir={$path}/{$files}\">{$files}</a><br/>";   
           }
         }else{
          if($files=='.' || $files=='..'){
           echo "目录:<a href=\"".$_SERVER['PHP_SELF']."?dir={$path}/{$files}\">{$files}</a><br/>";   
          }else{
          echo "目录:<a href=\"".$_SERVER['PHP_SELF']."?dir={$path}/{$files}\">{$files}</a><br/>";   
          }
          
         }
        }
       }
       closedir($dir);
      }
     }else{
      die("文件或目录不存在");
     }
    }
    ?>

  • 相关阅读:
    Android Studio使用笔记
    Android Material Design之在RecyclerView中嵌套CardView实现
    RR 和RC 幻读问题
    mysql rr和rc区别
    7.2 Database Backup Methods 数据备份方法:
    7.1 Backup and Recovery Types 备份和恢复类型
    Chapter 7 Backup and Recovery 备份和恢复:
    mysqldump 一些参数体验
    (?m) 可以让.去匹配换行
    perl 正则前导字符
  • 原文地址:https://www.cnblogs.com/itfenqing/p/4429499.html
Copyright © 2020-2023  润新知