Mercurial > hgrepos > hgweb.cgi > s4
changeset 581:8a206c6342a8
Translate email address to all lower cases. Fix parameter expansion.
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Tue, 02 Jul 2019 12:29:06 +0900 |
parents | a9faeb10a33b |
children | b37776054ba7 |
files | s4-funcs.sh |
diffstat | 1 files changed, 7 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/s4-funcs.sh Wed Jun 19 09:13:57 2019 +0900 +++ b/s4-funcs.sh Tue Jul 02 12:29:06 2019 +0900 @@ -1411,9 +1411,10 @@ # $1=email iss="invite-`date +%s`-$user" addsession $iss +${memoplimitdays}days # 1 week due date - query "replace into par values('$iss', 'invite', 'string', \"$1\");" + query "DELETE FROM par WHERE var='invite' AND val='$1';" + query "REPLACE INTO par VALUES('$iss', 'invite', 'string', '$1');" gecos=`gecos` - name=$user"${gecos:+($gecos)}" + name=$user${gecos:+"($gecos)"} regist="$urlbase?reg+$iss" _m4 -D_URL_="$urlbase" \ -D_USER_="$name" \ @@ -1439,7 +1440,7 @@ esac } invite() { - email=`getpar email` + email=`getpar email | tr '[A-Z]' '[a-z]'` case "$email" in *@*@*|*\ *) repo="無効なアドレスです" ;; *@*) @@ -1450,6 +1451,8 @@ repo="$email さんは既に加入しています。" elif sendinvitation $email; then repo="アドレス($email)宛に案内を送信しました。" + else # Cannot be reached here + repo="自動登録できない状況です。管理者に依頼してください。" fi ;; "") repo="招待したい人のメイルアドレスを入力してください。" ;; *) repo="無効なアドレスです" ;; @@ -1469,7 +1472,7 @@ echo "bye bye" | html p reutrn fi - email=`session=$1 getpar invite` + email=`session=$1 getpar invite | tr '[A-Z]' '[a-z]'` # Ensure lower case if [ -z "$email" ];then cat<<EOF <p>無効な招待状チケットです。</p>