diff options
author | Wolfram Schneider <wosch@FreeBSD.org> | 1997-09-20 18:26:22 +0000 |
---|---|---|
committer | Wolfram Schneider <wosch@FreeBSD.org> | 1997-09-20 18:26:22 +0000 |
commit | 1572c282e85da69851943bd7ad3c653344e25a09 (patch) | |
tree | 2a9246e32e1dd4ef20378a5930275fb4d13d0d38 /adduser | |
parent | 8da68c59fddd8b4b197043778b47e618548a0ec6 (diff) | |
download | pw-darwin-1572c282e85da69851943bd7ad3c653344e25a09.tar.gz pw-darwin-1572c282e85da69851943bd7ad3c653344e25a09.tar.zst pw-darwin-1572c282e85da69851943bd7ad3c653344e25a09.zip |
Do not accept empty user names.
Diffstat (limited to 'adduser')
-rw-r--r-- | adduser/adduser.perl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/adduser/adduser.perl b/adduser/adduser.perl index 24be225..9378bf8 100644 --- a/adduser/adduser.perl +++ b/adduser/adduser.perl @@ -24,7 +24,7 @@ # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF # SUCH DAMAGE. # -# $Id: adduser.perl,v 1.34 1997/07/31 15:24:37 pst Exp $ +# $Id: adduser.perl,v 1.35 1997/08/26 22:47:51 wosch Exp $ # read variables @@ -317,7 +317,7 @@ sub new_users_name { sub new_users_name_valid { local($name) = @_; - if ($name !~ /^[a-z0-9_][a-z0-9_\-]*$/) { + if ($name !~ /^[a-z0-9_][a-z0-9_\-]*$/ || $name eq "a-z0-9_-") { warn "Wrong username. " . "Please use only lowercase characters or digits\a\n"; return 0; |