开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > WEB源码(ASP,PHP,...) > 查看源码
function.php
资源名称：BBWPS.rar　[点击查看]
上传用户：yttaitong
上传日期：2009-05-10
资源大小：128k
文件大小：14k
源码类别：

WEB源码(ASP,PHP,...)

开发平台：

PHP

function.php：源码内容
  1. <?php
  2. /*
  3. －－－－－－－－－－－－－－－－－－－－－－－－－－
  4. Copyright by T.muqiao(39号天堂桥)
  5. 本程序仅供学习讨论使用,在未通知作者作为任何商业用途
  6.          视为中华人民共和国不道德公民
  7. 联系方式:442536278@qq.com
  8. －－－－－－－－－－－－－－－－－－－－－－－－－*/
  9. if(!defined('IN_SELF')){
  10. //header('HTTP/1.1 404 not found');
  11. exit("Access Denied!");
  12. }
  13. class ZipAllFloder{//压缩文件夹
  14.     
  15. var $datasec      = array();
  16. var $ctrl_dir     = array();
  17. var $eof_ctrl_dir = "x50x4bx05x06x00x00x00x00";
  18. var $old_offset   = 0; 
  19. var $dirs         = array(".","");
  20. var $dirlen       = 0;
  21.     
  22. function IniVars(){//初始化变量
  23.         $this -> datasec      = array();
  24.         $this -> ctrl_dir     = array();
  25.         $this -> eof_ctrl_dir = "x50x4bx05x06x00x00x00x00";
  26.         $this -> old_offset   = 0;
  27.         $this -> dirs         = array(".","");
  28. $this -> dirlen       = 0;
  29.     }
  30.     function ZipFolder($dir,$zipfilename){//将所有二进制数据转化为16进制数据写入到压缩文件 
  31.         if(substr($dir,-1)!="/"){
  32. $dir .= "/";
  33. }
  34. $this -> dirlen = strlen($dir); 
  35.         $this -> AddFolderContent($dir);
  36.         $out = $this -> get_file();
  37.         $this -> IniVars();
  38.         $fp = fopen($zipfilename,"w");  
  39.         fwrite($fp,$out,strlen($out));  
  40.         fclose($fp);
  41.     }
  42.     function AddFolderContent($dir){//添加文件夹中文件及文件夹内容
  43.         if(is_dir($dir)){
  44. $folder = substr($dir,$this ->dirlen);
  45.             if(!in_array($folder,$this->dirs)){
  46.                 $this->add_Dir($folder);
  47.             }
  48.             $handle = opendir($dir);
  49.             do{
  50.                 $files = readdir($handle);
  51. if (($files==".")||($files=="..")) continue; 
  52.                 if(is_dir($dir.$files)&&$files!=""){
  53.                     $this->AddFolderContent($dir.$files."/");
  54.                 }elseif(is_file($dir.$files)){
  55.                     $fp = fopen ($dir.$files,"r");
  56.                     $content = @fread ($fp,filesize($dir.$files));  
  57.                     fclose ($fp);  
  58.                     $this->add_File($content,$folder.$files);
  59.                 }
  60.             }while($files!="");  
  61.             closedir($handle);
  62.         }
  63.     }
  64. function get_file(){//获得压缩文件数据
  65.         $data = implode('', $this -> datasec);
  66.         $ctrldir = implode('', $this -> ctrl_dir);
  67.         return $data . $ctrldir . $this -> eof_ctrl_dir .
  68.         pack('v', sizeof($this -> ctrl_dir)).pack('v', sizeof($this -> ctrl_dir)).
  69.         pack('V', strlen($ctrldir)) . pack('V', strlen($data)) . "x00x00";
  70.     }
  71.     function add_dir($name){ 
  72.         $name   = str_replace("\", "/", $name); 
  73.         $fr     = "x50x4bx03x04x0ax00x00x00x00x00x00x00x00x00"; 
  74.         $fr    .= pack("V",0).pack("V",0).pack("V",0).pack("v", strlen($name) ); 
  75.         $fr    .= pack("v", 0 ).$name.pack("V", 0).pack("V", 0).pack("V", 0); 
  76.         $this -> datasec[] = $fr;
  77.         $new_offset = strlen(implode("", $this->datasec)); 
  78.         $cdrec = "x50x4bx01x02x00x00x0ax00x00x00x00x00x00x00x00x00"; 
  79.         $cdrec .= pack("V",0).pack("V",0).pack("V",0).pack("v", strlen($name) ); 
  80.         $cdrec .= pack("v", 0 ).pack("v", 0 ).pack("v", 0 ).pack("v", 0 ); 
  81.         $ext = "xffxffxffxff"; 
  82.         $cdrec .= pack("V", 16 ).pack("V", $this -> old_offset ).$name; 
  83.         $this -> ctrl_dir[] = $cdrec; 
  84.         $this -> old_offset = $new_offset; 
  85.         $this -> dirs[] = $name;
  86.     }
  87.     function add_File($data, $name, $compact = 1){
  88.         $name     = str_replace('\', '/', $name);
  89.         $dtime    = dechex($this->DosTime());
  90.         $hexdtime = 'x' . $dtime[6] . $dtime[7].'x'.$dtime[4] . $dtime[5] . 'x' . $dtime[2] 
  91. . $dtime[3].'x'.$dtime[0].$dtime[1];
  92.         eval('$hexdtime = "' . $hexdtime . '";');
  93.         if($compact){
  94.             $fr = "x50x4bx03x04x14x00x00x00x08x00".$hexdtime;
  95.         }else{
  96.             $fr = "x50x4bx03x04x0ax00x00x00x00x00".$hexdtime;
  97.         }
  98.         $unc_len = strlen($data); $crc = crc32($data);
  99.         if($compact){
  100.             $zdata = gzcompress($data); $c_len = strlen($zdata);
  101.             $zdata = substr(substr($zdata, 0, strlen($zdata) - 4), 2);
  102.         }else{
  103.             $zdata = $data;
  104.         }
  105.         $c_len=strlen($zdata);
  106.         $fr .= pack('V', $crc).pack('V', $c_len).pack('V', $unc_len);
  107.         $fr .= pack('v', strlen($name)).pack('v', 0).$name.$zdata;
  108.         $fr .= pack('V', $crc).pack('V', $c_len).pack('V', $unc_len);
  109.         $this -> datasec[] = $fr;
  110.         $new_offset        = strlen(implode('', $this->datasec));
  111.         if($compact){
  112.             $cdrec = "x50x4bx01x02x00x00x14x00x00x00x08x00";
  113.         }else{ 
  114.             $cdrec = "x50x4bx01x02x14x00x0ax00x00x00x00x00";
  115.         }
  116.         $cdrec .= $hexdtime.pack('V', $crc).pack('V', $c_len).pack('V', $unc_len);
  117.         $cdrec .= pack('v', strlen($name) ).pack('v', 0 ).pack('v', 0 );
  118.         $cdrec .= pack('v', 0 ).pack('v', 0 ).pack('V', 32 );
  119.         $cdrec .= pack('V', $this -> old_offset );
  120.         $this -> old_offset = $new_offset;
  121.         $cdrec .= $name;
  122.         $this -> ctrl_dir[] = $cdrec;
  123.         return true;
  124.     }
  125.     function DosTime() {
  126.         $timearray = getdate();
  127.         if ($timearray['year'] < 1980) {
  128.             $timearray['year'] = 1980; $timearray['mon'] = 1;
  129.             $timearray['mday'] = 1; $timearray['hours'] = 0;
  130.             $timearray['minutes'] = 0; $timearray['seconds'] = 0;
  131.         }
  132.         return (($timearray['year']-1980)<<25)|($timearray['mon']<<21)|
  133. ($timearray['mday']<<16)|($timearray['hours']<<11)|($timearray['minutes']<<5)|
  134. ($timearray['seconds']>>1);
  135.     }
  136. }
  138. class StatFolder{//统计文件夹内容
  139. var $Num       = 0;
  140. var $Size      = 0;
  141. var $TypeNum   = 0;
  142. var $FolderNum = 0;
  143. var $Type      = array();
  144. function __construct($folder){
  145. $this -> ReadFolder($folder);
  146. }
  147. function StatFolder($folder){
  148. $this -> ReadFolder($folder);
  149. }
  150. function ReadFolder($folder){
  151. if(is_dir($folder)){
  152. $handle = opendir($folder);
  153.             do{
  154.                 $files = readdir($handle);
  155. if (($files==".")||($files=="..")) continue; 
  156.                 if(is_dir($folder."/".$files)&&$files!=""){
  157. $this ->FolderNum++;
  158.                     $this ->ReadFolder($folder."/".$files);
  159.                 }elseif(is_file($folder."/".$files)){
  160. $this ->Num++;
  161. $type = fileext($files);
  162. if(!in_array($type,$this ->Type)){
  163. $this ->Type[] = $type;
  164. $this ->TypeNum++;
  165. }
  166.                     $size = filesize($folder."/".$files);  
  167.                     $this->Size +=$size;
  168. clearstatcache();
  169.                 }
  170.             }while($files!="");  
  171.             closedir($handle);
  172.         }
  173. }
  174. function GetFileNum(){
  175. return $this -> Num;
  176. }
  177. function GetTotalSize(){
  178. $switch = $this->Size/1024;
  179. if($switch<1024){
  180. $return = explode(".",$switch);
  181. if($return[0]==0){
  182. return $this->Size."　bytes";
  183. }
  184. return $return[0].".".substr($return[1],0,3)."　Kbytes";
  185. }else{
  186. $switch /=1024;
  187. $return = explode(".",$switch);
  188. return $return[0].".".substr($return[1],0,3)."　Mbytes";
  189. }
  190. }
  191. function GetTypeNum(){
  192. return $this -> TypeNum;
  193. }
  194. function GetFolderNum(){
  195. return $this -> FolderNum;
  196. }
  197. }
  199. function matchpath($reference,$testpath){//返回$testpath与$reference参照路径匹配度 
  200. $reference = explode("/",$reference);
  201. $testpath  = explode("/",$testpath);
  202. $num1 = count($reference);
  203. $num2 = count($testpath);
  204. if($num1 < $num2){
  205. return false;
  206. }
  207. $degree = 0;
  208. for($i=0;$i<$num2;$i++){
  209. if(strtolower($testpath[$i])==strtolower($reference[$i])){
  210. $degree++;
  211. continue;
  212. }else{
  213. return false;
  214. break;
  215. }
  216. }
  217. if($degree==$num2){
  218. return true;
  219. }
  220. }
  222. function checkcore($path){//检查核心文件是否包含其中
  223. global $T_corefile;//核心文件中没有哪个项是"0"的,否则循环条件要换
  224. for($i=0;$p=$T_corefile[$i];$i++){
  225. $absps = visualpath(truepath($p,2));
  226. if(matchpath($absps,$path)){
  227. return true;
  228. break;
  229. }
  230. }
  231. }
  233. function copypath($source,$target,$uncover=true){//拷贝整个目录   默认不允许覆盖
  234. global $T_lang;
  235. if(is_dir($target)){
  236. if($uncover){
  237. $errors .= str_replace("--replace--",$target,$T_lang['func'][0]);
  238. $gocover = false;
  239. }else{
  240. $gocover = true;
  241. }
  242. }else{
  243. if(matchpath($target,$source)){//检测目录$source是否包含于$target
  244. $errors .= str_replace("--replace--",$source,$T_lang['func'][1]);
  245. $gocover = false;
  246. }else{
  247. if(@mkdir($target,0777)){
  248. $gocover = true;
  249. }else{
  250. $errors .= str_replace("--replace--",$target,$T_lang['func'][2]);
  251. $gocover = false;
  252. }
  253. }
  254. }
  255. if($gocover){
  256. $handle = opendir($source);
  257. do{
  258. $file = readdir($handle);
  259. clearstatcache();
  260. if(substr($file,-1)=="."||substr($file,-2)=="..") continue;
  261. if(is_dir($source."/".$file)&&$file!=""){
  262. $errors .= copypath($source."/".$file,$target."/".$file,$uncover);
  263. }elseif(is_file($source."/".$file)){
  264. $gocopy = true;
  265. if(file_exists($target."/".$file)){
  266. if($uncover){
  267. $gocopy = false;
  268. }else{
  269. if(@unlink($target."/".$file)){
  270. $gocopy = true;
  271. }else{
  272. $gocopy = false;
  273. }
  274. }
  275. }
  276. if($gocopy){
  277. if(@copy($source."/".$file,$target."/".$file)){
  278. $errors .= "";
  279. }else{
  280. $errors .= str_replace("--replace--",$source."/".$file,$T_lang['func'][3]);
  281. }
  282. }else{
  283. $errors .= str_replace("--replace--",$target."/".$file,$T_lang['func'][4]);
  284. }
  285. }
  286. }while($file!="");
  287. closedir($handle);
  288. }
  289. if($errors){
  290. return $errors;
  291. }else{
  292. return "";
  293. }
  294. }
  296. function movepath($source,$target,$uncover=true){//移动整个目录  默认不允许覆盖
  297. global $T_lang;
  298. if(is_dir($target)){
  299. if($uncover){
  300. $errors .= str_replace("--replace--",$target,$T_lang['func'][0]);
  301. $gocover = false;
  302. }else{
  303. $gocover = true;
  304. }
  305. }else{
  306. if(matchpath($target,$source)){//检测目录$source是否包含于$target
  307. $errors .= str_replace("--replace--",$source,$T_lang['func'][5]);
  308. $gocover = false;
  309. }else{
  310. if(@mkdir($target,0777)){
  311. $gocover = true;
  312. }else{
  313. $errors .= str_replace("--replace--",$target,$T_lang['func'][2]);
  314. $gocover = false;
  315. }
  316. }
  317. }
  318. if($gocover){
  319. $handle = opendir($source);
  320. do{
  321. $file = readdir($handle);
  322. clearstatcache();
  323. if(substr($file,-1)=="."||substr($file,-2)=="..") continue;
  324. if(is_dir($source."/".$file)&&$file!=""){
  325. $errors .= movepath($source."/".$file,$target."/".$file,$uncover);
  326. }elseif(is_file($source."/".$file)){
  327. $gocopy = true;
  328. if(file_exists($target."/".$file)){
  329. if($uncover){
  330. $gocopy = false;
  331. }else{
  332. $gocopy = true;
  333. }
  334. }
  335. if($gocopy){
  336. if(@copy($source."/".$file,$target."/".$file)){
  337. unlink($source."/".$file);
  338. }else{
  339. $errors .= str_replace("--replace--",$source."/".$file,$T_lang['func'][3]);
  340. }
  341. }else{
  342. $errors .= str_replace("--replace--",$target."/".$file,$T_lang['func'][6]);
  343. }
  344. }
  345. }while($file!="");
  346. closedir($handle);
  347. }
  348. if($errors){
  349. return $errors;
  350. }else{
  351. if(@rmdir($source."/".$file)){
  352. return "";
  353. }else{
  354. $errors .= str_replace("--replace--",$source,$T_lang['func'][7]);
  355. }
  356. }
  357. }
  359. function delpath($source){//删除整个目录
  360. global $T_lang,$T_Recycled;
  361. $handle = opendir($source);
  362. do{
  363. $file = readdir($handle);
  364. clearstatcache();
  365. if(substr($file,-1)=="."||substr($file,-2)=="..") continue;
  366. if(is_dir($source."/".$file)&&$file!=""){
  367. $errors .= delpath($source."/".$file);
  368. }elseif(is_file($source."/".$file)){
  369. if(@unlink($source."/".$file)){
  370. }else{
  371. $errors .= str_replace("--replace--",$source,$T_lang['func'][7]);
  372. }
  373. }
  374. }while($file!="");
  375. closedir($handle);
  376. if($errors){
  377. $errors .= str_replace("--replace--",$source,$T_lang['func'][8]);
  378. return $errors;
  379. }else{
  380. if($source==$T_Recycled){//清空回收站时 这个判断条件用的上
  381. return "";
  382. }else{
  383. if(@rmdir($source)){
  384. return "";
  385. }else{
  386. $errors .= str_replace("--replace--",$source,$T_lang['func'][8]);
  387. return $errors;
  388. }
  389. }
  390. }
  391. }
  393. function limitname($title,$limitlength =13){//限制标题长度
  394. $length = strlen($title);
  395. if($length>$limitlength){
  396. $gbk = 0;
  397. for($i=0;$i<$limitlength-1;$i++){
  398. $temp = substr($title,$i,1);
  399. if(ord($temp)>127) $gbk +=1;
  400. }
  401. if($gbk%2){
  402. $title = substr($title,0,$limitlength)."...";
  403. }else{
  404. $title = substr($title,0,$limitlength-1)."...";
  405. }
  406. }
  407. return $title;
  408. }
  410. function fileext($filename){
  411. return trim(substr(strrchr($filename, '.'), 1));
  412. }
  414. function checkpath($path){//检查path合法和合格性(返回符合本程序的正确路径) 
  415. $path = preg_replace("/^[.](.*)/","root\1",$path);
  416. //$path = str_replace(".","",$path);
  417. $path = str_replace("\","/",$path);
  418. $path = ereg_replace("/{1,}","/",$path);
  419. $path = preg_replace("/(root.*)?[/]$/i","\1",$path);
  420. if(is_dir(truepath($path))){
  421. return $path;
  422. }else{
  423. return false;
  424. }
  425. }
  427. function truepath($path,$type=1){//将'root'、'.'替换成真实路径
  428. global $T_basedir,$T_rootdir;
  429. if($type==1){
  430. return preg_replace("/^(root|.)(.*)/i",$T_rootdir."\2",$path);
  431. }elseif($type==2){//将程序文件前面的点换成$T_basedir
  432. return preg_replace("/^(root|.)(.*)/i",$T_basedir."\2",$path);
  433. }
  434. }
  436. function direction($path){//返回当前路径父路径
  437. if($path=="root"||$path=="."){
  438. $dirname = "root";
  439. }else{
  440. $dirname = dirname($path);
  441. $dirname = preg_replace("/^.(.*)/","root\1",$dirname);
  442. }
  443. return $dirname;
  444. }
  446. function visualpath($path){
  447. global $T_rootdir;
  448. return str_replace($T_rootdir,"root",$path);
  449. }
  451. function historypath($path){//历史路径 路径长度超过给定的$T_rlength后只显示后面的$T_rlength长度
  452. global $T_rlength,$T_images,$T_main,$T_Recycled;
  453. $ruote = explode("/",$path);
  454. $num   = count($ruote);
  455. if($num<=1){
  456. return;
  457. }else{
  458. if($num-1>$T_rlength){
  459. $i = $num-$T_rlength;
  460. }else{
  461. $i = 1;
  462. }
  463.     for(;$i<=$num-1;$i++){
  464. $rs .= "<a href="{$T_main}?path=";
  465. $single = "root";
  466. for($j=1;$j<=$i;$j++){
  467. $single .= "/".$ruote[$j];
  468. }
  469. $rs .= urlencode($single)."">";
  471. $rs .=limitname($ruote[$i])."</a>>>";
  472. }
  473. return $rs;
  474. }
  475. }
  476. ?>