d/freebsd-dev
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Various fixes to make this work better when called from other tools.

Browse Source 
Submitted by:	Coranth Gryphon <gryphon@healer.com> & Wolfram Schneider <wosch@cs.tu-berlin.de>
This commit is contained in:
jkh 1995-10-19 06:26:49 +00:00
parent 70660b7ba0
commit b8e94e5ffb
1 changed files with 14 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
usr.sbin/adduser/adduser.perl
View File

@ -32,7 +32,7 @@
#
# Email: Wolfram Schneider <wosch@cs.tu-berlin.de>
#
# $Id: adduser.perl,v 1.6 1995/04/30 19:20:25 ache Exp $
# $Id: adduser.perl,v 1.7 1995/05/20 13:05:22 jkh Exp $
#
# read variables
@ -123,6 +123,16 @@ sub shells_read {
}
}
}
# Allow /nonexistant and /bin/date as a valid shell for system utils
push(@list, "/nonexistant");
push(@shellpref, "no");
$shell{"no"} = "/nonexistant";
push(@list, "/bin/date");
push(@shellpref, "date");
$shell{"date"} = "/bin/date";
return $err;
}
@ -928,6 +938,8 @@ sub home_create {
return 0;
}
return mkdir("$homedir",0755) if $dotdir eq "no";
# copy files from $dotdir to $homedir
# rename 'dot.foo' files to '.foo'
print "Copy files from $dotdir to $homedir\n" if $verbose;
@ -1378,7 +1390,7 @@ $home = &home_partition($home); # find HOME partition
$dotdir = &dotdir_default; # check $dotdir
$send_message = &message_default; # send message to new user
$defaultpasswd = &password_default; # maybe use password
&config_write(0); # write variables in file
&config_write(!$verbose); # write variables in file
# main loop for creating new users
&new_users; # add new users