Mercurial > hgrepos > hgweb.cgi > s4
comparison s4-funcs.sh @ 732:98702a1251cd
merged
| author | HIROSE Yuuji <yuuji@gentei.org> |
|---|---|
| date | Tue, 02 Jun 2020 07:52:04 +0900 |
| parents | 33df7d50532e b73e2399994c |
| children | ebc1c0b19bf7 1ab3cc61a462 |
comparison
equal
deleted
inserted
replaced
| 731:33df7d50532e | 732:98702a1251cd |
|---|---|
| 1175 gencookie() ( | 1175 gencookie() ( |
| 1176 path=${URL#*:/} | 1176 path=${URL#*:/} |
| 1177 path=${URL%/*} | 1177 path=${URL%/*} |
| 1178 expire="`expire '' '%a, %d-%b-%Y %H:%M:%S GMT'`" | 1178 expire="`expire '' '%a, %d-%b-%Y %H:%M:%S GMT'`" |
| 1179 for kv; do | 1179 for kv; do |
| 1180 echo "Set-Cookie: $kv; expires=$expire; Path=$path" | 1180 # echo "Set-Cookie: $kv; expires=$expire; Path=$path" |
| 1181 # echo "Set-Cookie: $kv; expires=$expire;" | 1181 echo "Set-Cookie: $kv; expires=$expire;" |
| 1182 done | 1182 done |
| 1183 ) | 1183 ) |
| 1184 contenttype() { | 1184 contenttype() { |
| 1185 echo "Content-type: ${1:-text/html; charset=utf-8}" | 1185 echo "Content-type: ${1:-text/html; charset=utf-8}" |
| 1186 contenttype() {} # Only need to work once | 1186 contenttype() {} # Only need to work once |
| 1343 quser=`sqlquotestr "$user"` | 1343 quser=`sqlquotestr "$user"` |
| 1344 dbuser=`query "SELECT name FROM user WHERE name=$quser;"` | 1344 dbuser=`query "SELECT name FROM user WHERE name=$quser;"` |
| 1345 if [ $? != 0 ]; then # Maybe DB locked | 1345 if [ $? != 0 ]; then # Maybe DB locked |
| 1346 return 4 # 4=server too heavy | 1346 return 4 # 4=server too heavy |
| 1347 elif [ -z "$dbuser" ]; then | 1347 elif [ -z "$dbuser" ]; then |
| 1348 err "Login USER failed: [$user]" | |
| 1348 return 2 # 2=login fail | 1349 return 2 # 2=login fail |
| 1349 elif [ x"$pswd" = x"wasureta" ]; then | 1350 elif [ x"$pswd" = x"wasureta" ]; then |
| 1350 wasureta "$user" | 1351 wasureta "$user" |
| 1351 return 1 # wasureta error | 1352 return 1 # wasureta error |
| 1352 fi | 1353 fi |
| 1360 return 0 | 1361 return 0 |
| 1361 else | 1362 else |
| 1362 return 4 # Heavy load?? | 1363 return 4 # Heavy load?? |
| 1363 fi | 1364 fi |
| 1364 fi | 1365 fi |
| 1366 err "Login failed: [$user]" | |
| 1365 return 2 # Password mismatch | 1367 return 2 # Password mismatch |
| 1366 } | 1368 } |
| 1367 showlogin() { | 1369 showlogin() { |
| 1368 args=`echo $myargs|tr ' ' '+'` | 1370 args=`echo $myargs|tr ' ' '+'` |
| 1369 test -z "$args" && resetskey | 1371 test -z "$args" && resetskey |
