# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1602043316 -32373
# Node ID a7ae0d67edffd8d62682fdd90b30f696ee3ba257
# Parent  b2bb87a9b8a1cd269c7ec3d3b942fdd48760c0a1
XXX: Lead password resetting to base world

diff -r b2bb87a9b8a1 -r a7ae0d67edff s4-funcs.sh
--- a/s4-funcs.sh	Thu Sep 10 12:11:37 2020 +0859
+++ b/s4-funcs.sh	Wed Oct 07 13:01:29 2020 +0859
@@ -1449,6 +1449,15 @@
     err "Login USER failed: [$user]"
     return 2			# 2=login fail
   elif [ x"$pswd" = x"wasureta" ]; then
+    if [ -n "$S4MASTERDB" ]; then
+      contenttype; echo
+      echo "Reset password is valid in BASE world." | html p
+      echo "パスワードリセットはベースワールドでおこなってください。" | html p
+      cat <<-EOF | html p
+	<a href="$S4MASTERURL">BASE World</a>
+	EOF
+      exit 0			# XXXXX more smart...
+    fi
     wasureta "$user"
     err wasureta issued for "$user"
     return 1			# wasureta error