提供一个生成CVS用户的脚本

如何能够生成CVS的用户是个比较麻烦的问题,主要原因是密码需要加密.

下面提供一个生成CVS用户名密码的shell脚本password.pl

具体见下面的脚本,也可以直接下载附件,解压缩后放到CVS的安装目录里即可

[root@yf3 cvsroot]# vi password.pl
#!/usr/bin/perl
srand (time());
my $randletter = "(int (rand (26)) + (int (rand (1) + .5) % 2 ? 65 : 97))";
my $salt = sprintf ("%c%c", eval $randletter, eval $randletter);
my $user = shift;
my $plaintext = shift;
my $crypttext = crypt ($plaintext, $salt);
print "$user:${crypttext}:cvsroot";
print "\n";

网上也有类似的shell,比如我以前用过的passwdgen.pl,和我的脚本的算法是一致的,只是打印的内容略有差别而已.

执行password.pl创建用户

如果我要为目'klib_dev"项目创建用户"liujt",需要执行以下命令

[root@yf3 cvsroot]# chmod +x  password.pl  //增加执行脚本的权限

[root@yf3 cvsroot]# ./password.pl liujt 123456 >> klib_dev/CVSROOT/passwd

 

password.pl共有2个参数,第一个是"用户名",如上例中的"liujt";第二个是密码,如上例中的"123456".

上面的例子将生成的用户名密码追加保存到klib_dev/CVSROOT/passwd中,也就是为项目''klib_dev"增加了用户liujt

查看passwd文件,确认脚本执行结果

[root@yf3 cvsroot]# vi /home/cvsroot/klib_dev/CVSROOT/passwd
liujt:cg3qeBDlI0MvM:cvsroot

文件中增加了一行记录,说明密码创建成功,可以用此用户访问CVS的''klib_dev"项目