q/thirdculture
1
0
Fork 0
Code Issues 10 Pull requests Projects 1 Releases Packages Wiki Activity Actions

hash and salt passwords now

Browse source
This commit is contained in:
Quentin W 2024-07-22 12:11:54 -04:00
parent 9807874c4e
commit 7bdb07332b
2 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
werc/bin/aux/addwuser.rc
View file

@ -23,7 +23,7 @@ if(~ $"user_name '' || ~ $"user_pass '')
usage
mkdir etc/users/$user_name
echo $user_pass > etc/users/$user_name/password
mkpasswd $user_pass > etc/users/$user_name/password
if(! ~ $#user_groups 0)
for(g in $user_groups) {

2
werc/bin/werclib.rc
View file

@ -70,7 +70,7 @@ fn auth_user {
status=('Auth: missing user name or pass: '^$"user_name^' / '^$"user_password)
if not if(! test -f $pfile)
status=('Auth: cant find '^$pfile)
if not if(! test -s $pfile || ! ~ $user_password `{cat $pfile})
if not if(! test -s $pfile || ! ~ $user_password `{cat $pfile} && ! ~ `{mkpasswd -S `{cat $pfile | cut -d'$' -f3} $user_password} `{cat $pfile})
status=('Auth: Pass '$user_password' doesnt match '^`{cat $pfile})
if not {
logged_user=$user_name