#!/bin/sh
cd `dirname $0`			# スクリプトのあるディレクトリへ
. ./cgilib2-sh

htmlhead "一言+写真の登録"

cat<<EOF
<form method="POST" enctype="multipart/form-data" action="./storeblog.cgi">
<p>一言:</p>
<textarea name="hitokoto" cols="40" rows="3"></textarea>
<p><label>添付ファイル:<input name="attach" type="file"></label></p>
<p><input type="submit" value="投稿">
<input type="reset" value="リセット"></p>
</form>
EOF

hitokoto=`getpar hitokoto`
if [ -n "$hitokoto" ]; then
  date=`date "+%F %T"`		# キーとなる日時は自動設定する
  query<<-EOF
	REPLACE INTO blog
	 SELECT '$date',
		max(CASE name WHEN 'hitokoto' THEN val END),
		max(CASE name WHEN 'attach' THEN filename END),
		max(CASE name WHEN 'attach' THEN val END)
	 FROM cgipars
	 WHERE tag='$_tag'
	 GROUP BY tag;
	EOF
  echo "<p>$date の日記として登録しました</p>"
fi

echo "</body></html>"