# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1554545258 -32400
# Node ID 1c784b64d9f0a13301d33c53eedffe6f1ae4a2f0
# Parent  6daa70fbf97c5dd74410e4dac36df13e12690460
Set default administrators password from admin name

diff -r 6daa70fbf97c -r 1c784b64d9f0 s4-start.sh
--- a/s4-start.sh	Sat Apr 06 18:58:10 2019 +0900
+++ b/s4-start.sh	Sat Apr 06 19:07:38 2019 +0900
@@ -3,6 +3,8 @@
 # Start s4 - Generate s4.cgi
 mydir=`dirname $0`
 myname=`basename $0`
+$dpsuffix="password"
+# Default password: "$dpsuffix of $ADMIN"
 
 script_dir=${SCRIPT_DIR:-scripts}
 
@@ -98,6 +100,7 @@
      [ "$guest" ] && echo "guestonlymode=1") >> s4-config.sh
     sqlite3 -cmd "pragma FOREIGH_KEYS=ON" $db \
 	   "REPLACE INTO user VALUES('$ADMIN');"
+    dbsetbyid user "$ADMIN" pswd "`echo $dpsuffix of $ADMIN|mypwhash`"
     cat > .htaccess <<-EOF
 	DirectoryIndex	index.cgi
 	AddHandler cgi-script .cgi