用php寫的serv-u的web申請帳號的程式,很爛,供參考,修改和刪除_PHP

來源:互聯網
上載者:User
關鍵字 參考 修改 刪除 程式 帳號 申請
Serv-U

//Sign.php
//系統適用於win2000
//power by devchina.com,http://www.2oa.net
$path="e:\\serv-u\\ServUDaemon.ini";//使用者檔案的路徑
$fabu="e:\\web\\";//總web路徑
if($add)
{
$fp1=fopen($path,"r+");
$str=fread($fp1, filesize($path));
$fp=fopen($path,"a");
flock($fp,3);
$us="=".$userid;
$start=strpos($str,$us);
if($start)
{
echo "對不起,該使用者已經存在";
}else{
$start1=strpos($str,"User1");
if($start1){
$start=$start1+6;
$end=strpos($str,"|",$start);
$firstusername=substr($str,$start,$end-$start);
$start2=strpos($str,"[USER=".$firstusername."|1]");
$usernum=count(split("\r\n",substr($str,$start1,$start2-$start1)));
}else
{
$usernum=1;
}
$userinfo="User".$usernum."=".$userid."|1|0"."\r\n";
$userpath=$fabu.$userid;
@mkdir($userpath,0700);
$maxsize=$size*1024;
$userp="[USER=".$userid."|1]"."\r\n";
$userp.="Password=".$password."\r\n";
$userp.="HomeDir=".$userpath."\r\n";
$userp.="RelPaths=1"."\r\n";
$userp.="DiskQuota=1|".$maxsize."|0"."\r\n";
$userp.="MaxUsersLoginPerIP=2"."\r\n";
$userp.="TimeOut=600"."\r\n";
$userp.="Access1=".$userpath."|RWAMLCDP"."\r\n";

if($start2){
$content=substr($str,$start2,strlen($str)-$start2);
$content.=$userp;
$userinfo.=$content;
fseek($fp1,$start2,SEEK_SET);
fputs($fp1,$userinfo);
}else
{
fputs($fp,$userinfo);
fputs($fp,$userp);
}
//echo $firstusername;
//echo $start;
//echo "
";
//echo $end;


}
fclose($fp);
fclose($fp1);
}
?>



  • 相關文章

    聯繫我們

    該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

    如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

    A Free Trial That Lets You Build Big!

    Start building with 50+ products and up to 12 months usage for Elastic Compute Service

    • Sales Support

      1 on 1 presale consultation

    • After-Sales Support

      24/7 Technical Support 6 Free Tickets per Quarter Faster Response

    • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.