会员控制台 会员登陆 会员注册 最后更新 高级搜索 会员投稿 退出登陆
设为首页
收藏本站
留言给我
  首页 | 操作系统类 | 程序设计类 | 数据库类 | 应用服务类 | 网络及硬件类 | 其他技术 | GBunix论坛
操作系统类
程序设计类
数据库类
应用服务类
网络及硬件类
其他技术
Unix中文 / 程序设计类 / 其他程序 / 用php写的serv-u的web申请账号的程序
用php写的serv-u的web申请账号的程序
2004-08-06          点击:
用php写的serv-u的web申请账号的程序
<?
//Sign.php
//系统适用于win2000
$path="e:serv-uServUDaemon.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("rn",substr($str,$start1,$start2-$start1)));
        }else
        {
$usernum=1;
        }
$userinfo="User".$usernum."=".$userid."|1|0"."rn";
$userpath=$fabu.$userid;
@mkdir($userpath,0700);
$maxsize=$size*1024;
$userp="[USER=".$userid."|1]"."rn";
$userp.="Password=".$password."rn";
$userp.="HomeDir=".$userpath."rn";
$userp.="RelPaths=1"."rn";
$userp.="DiskQuota=1|".$maxsize."|0"."rn";
$userp.="MaxUsersLoginPerIP=2"."rn";
$userp.="TimeOut=600"."rn";
$userp.="Access1=".$userpath."|RWAMLCDP"."rn";

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 "<br>";
//echo $end;
            }
fclose($fp);
fclose($fp1);
}
?>

<FORM METHOD=POST ACTION="sign.php">
账号:<INPUT TYPE="text" NAME="userid" size=10 maxlength=20 ><br>密码:
<INPUT TYPE="password" name="password" size=10 maxlength=20 ><br>空间大小:<INPUT TYPE="text" NAME="size" size=4 maxlength=4> M<br><INPUT TYPE="submit" name="add" value="增加用户">
</FORM>

了解更多详情,参与讨论,请进入GBUNIX论坛

http://www.gbunix.com/bbs/index.php
责任编辑: trotter

相关文章
用Perl来管理Apache验证身份时所用的密码 - 08-07 02:55 pm - 点击: 139
Apache的目录安全措施 - 08-07 02:05 pm - 点击: 166

发表评论 查看评论 加入收藏 Email给朋友 打印本文
给该文章评分
1 2 3 4 5 6 7 8 9 10
平均得分 0, 共 0 人评分
1 2 3 4 5 6 7 8 9 10
发表评论
标题:
内容:
声明:本站资讯均来自互联网,所有文章版权归原作者和出版者所有,如涉及版权问题,请来信告知!
Copyright © 2002-2004 GBunix.com. All rights reserved.