Mercurial > hgrepos > hgweb.cgi > s4
comparison s4-funcs.sh @ 691:39879f81afc8
Login failure message changed
| author | HIROSE Yuuji <yuuji@gentei.org> |
|---|---|
| date | Tue, 19 May 2020 09:10:34 +0900 |
| parents | 87ce0eef5872 |
| children | 9ff4603fc920 |
comparison
equal
deleted
inserted
replaced
| 690:87ce0eef5872 | 691:39879f81afc8 |
|---|---|
| 1282 fi | 1282 fi |
| 1283 fi | 1283 fi |
| 1284 pswd=`getpar pswd` | 1284 pswd=`getpar pswd` |
| 1285 quser=`sqlquotestr "$user"` | 1285 quser=`sqlquotestr "$user"` |
| 1286 dbuser=`query "SELECT name FROM user WHERE name=$quser;"` | 1286 dbuser=`query "SELECT name FROM user WHERE name=$quser;"` |
| 1287 if [ -z "$dbuser" ]; then | 1287 if [ $? != 0 ]; then # Maybe DB locked |
| 1288 return 1 | 1288 return 4 # 4=server too heavy |
| 1289 elif [ -z "$dbuser" ]; then | |
| 1290 return 2 # 2=login fail | |
| 1289 elif [ x"$pswd" = x"wasureta" ]; then | 1291 elif [ x"$pswd" = x"wasureta" ]; then |
| 1290 wasureta "$user" | 1292 wasureta "$user" |
| 1291 return 1 # wasureta error | 1293 return 1 # wasureta error |
| 1292 fi | 1294 fi |
| 1293 # dbpswd="`sq $db \"select pswd from passwd where name='$user'\"`" | 1295 # dbpswd="`sq $db \"select pswd from passwd where name='$user'\"`" |
| 1294 # putheader; echo; echo user=$user, db=$dbpswd, enc=$encpswd | 1296 # putheader; echo; echo user=$user, db=$dbpswd, enc=$encpswd |
| 1295 if pwcheck "$pswd"; then | 1297 if pwcheck "$pswd"; then |
| 1296 newsession=`genrandom 50` | 1298 newsession=`genrandom 50` |
