diff options
Diffstat (limited to 'utils/rd-user')
-rwxr-xr-x | utils/rd-user | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/utils/rd-user b/utils/rd-user index 019f004..c891985 100755 --- a/utils/rd-user +++ b/utils/rd-user @@ -32,12 +32,13 @@ if ($> != 0 ) { my $num_args = $#ARGV + 1; if ($num_args != 2) { - print STDERR "Usage: rd-user (check|add|remove) <username>\n"; + print STDERR "Usage: rd-user (check|add|remove) <username> [ fullname ]\n"; exit 1; } my $cmd = $ARGV[0]; my $username = $ARGV[1]; +my $fullname = $ARGV[2]; my ($dbh, undef, $errorstring) = RHRD::rddb::opendb(); if(defined $dbh) { @@ -48,7 +49,7 @@ if(defined $dbh) { exit $result; } elsif($cmd eq "add") { my $token = mkpasswd(-length => 16, -minnum => 3, -minupper => 3, -minspecial => 0); - (my $cnt, undef, $errorstring) = RHRD::rddb::add_user($dbh, $username, $token); + (my $cnt, undef, $errorstring) = RHRD::rddb::add_user($dbh, $username, $token, $fullname); unless(defined $cnt) { print "$errorstring\n"; RHRD::rddb::closedb($dbh); |