#!/usr/local/bin/ruby -Ke
# ttt.rb ver.0.1 2001/11/01
# ttt.rb ver.0.1.2 2001/11/02 rhtml only.
# ttt.rb => Rtds. ver.0.1.2 (Carrol)
# Rtds means "Ruby Tiny Diary System."
# CodeName are from cocktail.
# Rtds. ver.0.1.4 (Princess Mary) 2001/11/04 
#	-merge Namazu- -mkdir "todo" "ttt(basehtml=$.html-non)"-
# Rtds. ver.0.1.5 (Blue Eyes Blue) 2001/11/17-18
#	-merge index diarytable-autowritable-
#	-"~" is <br> escape-
# Rtds. ver.0.1.5.2 2001/11/20 -bugfix-
# 	ver.0.1.5.3 2001/11/23 -Location-bugfix-
# Rtds. ver.0.1.6 (Egg Nog)  2001/12/06 
#        -with anchor & create Rtds class & readcount method-
require "cgi"
form = CGI.new
$version = "Rtds version 0.1.6 (Egg Nog)"

class Rtds
	def initialize
		@name = "00"
		@stream = ""
	end

	def readcount(f,t)
		f.each_line { |@line|
			if @line =~ /^--/
				@name = @name.succ!
			end
			@line.gsub!(/^--/,"<a id=\"#{t}_#{@name}\" name=\"#{t}_#{@name}\" href=\"##{t}_#{@name}\">¢§</a> <strong>")
			@line.gsub!(/--\r\n/,"</strong>\r\n")
			@line.gsub!("\r\n","<br>\n")
			@line.gsub!("~<br>\n","\n")
			#@line.gsub!("^<br>\n","</p>\n")
			@stream += @line
			}
		return(@stream)
	end
end

	fyear = form['year'][0] 
	fmonth = form['month'][0]
	fday = form['day'][0]

	fdayc = fday.to_i
		if fdayc < 16
  			fdayf = "a"
 			fdayt = "b"
 		else
 			fdayf = "b"
 			fdayt = "a"
		end

	ffile = fyear + fmonth
	tomoko = ffile + fday
	kotone = ffile + fdayf
	mikage = fmonth + fdayf

	ftime = "<div class=\"day\"><a id=\"#{tomoko}\" name=\"#{tomoko}\" href=\"\##{tomoko}\"><strong>#{fyear}/#{fmonth}/#{fday}</strong></a></div><br>\n"

	str0 = form['comment'][0]
	fstr = Rtds.new
	fstr0 = fstr.readcount(str0,tomoko)

	str1 = "<!--haruka-->\n\n#{ftime}<div class=\"diary\">\n#{fstr0}\n<br>\n<div align=\"right\"><small><a href=\"./\">back2index</a></small></div>\n</div><br>"

	begin
		hmx12 = open("#{kotone}.rhtml","r")
			hmx13 = hmx12.read
		hmx12.close

		hmx13.gsub!("<!--haruka-->","#{str1}")

		hmx14 = open("#{kotone}.rhtml","w")
			hmx14.write hmx13
		hmx14.close
		print "Location: ./\n\n"

#//////////////////////////////////////////////////////////

	rescue
		ayaka = open("./ttt/base","r")
			serika = ayaka.read
		ayaka.close

			serika.gsub!("rrrrmonth","#{fyear}/#{fmonth}#{fdayf}")
			serika.gsub!("rrrrtime","#{kotone}")
			serika.gsub!("rrrrversion","#{$version}")
			serika.gsub!("<!--haruka-->","#{str1}")

		rhtml = open("#{kotone}.rhtml","w")
			rhtml.write serika
		rhtml.close
		File.chmod(0755,"#{kotone}.rhtml")


		shiho = open("./ttt/indexbase","r")
			akari = shiho.read
		shiho.close

		table = open("./ttt/diarytable","r")
			dtable = table.read
		table.close

		if mikage == "01a"
			dtable.gsub!("<!--date-->","<!--date-->\n#{fyear}/01a&nbsp;|&nbsp;#{fyear}/01b&nbsp;|&nbsp;#{fyear}/02a&nbsp;|&nbsp;#{fyear}/02b&nbsp;|&nbsp;#{fyear}/03a&nbsp;|&nbsp;#{fyear}/03b<br>")
			dtable.gsub!("#{fyear}/#{fmonth}#{fdayf}","<a href=\"./#{kotone}.rhtml\">#{fyear}/#{fmonth}#{fdayf}</a>")
		elsif mikage == "04a"
			dtable.gsub!("<!--date-->","<!--date-->\n#{fyear}/04a&nbsp;|&nbsp;#{fyear}/04b&nbsp;|&nbsp;#{fyear}/05a&nbsp;|&nbsp;#{fyear}/05b&nbsp;|&nbsp;#{fyear}/06a&nbsp;|&nbsp;#{fyear}/06b<br>")
			dtable.gsub!("#{fyear}/#{fmonth}#{fdayf}","<a href=\"./#{kotone}.rhtml\">#{fyear}/#{fmonth}#{fdayf}</a>")
		elsif mikage == "07a"
			dtable.gsub!("<!--date-->","<!--date-->\n#{fyear}/07a&nbsp;|&nbsp;#{fyear}/07b&nbsp;|&nbsp;#{fyear}/08a&nbsp;|&nbsp;#{fyear}/08&nbsp;|&nbsp;#{fyear}/09a&nbsp;|&nbsp;#{fyear}/09b<br>")
			dtable.gsub!("#{fyear}/#{fmonth}#{fdayf}","<a href=\"./#{kotone}.rhtml\">#{fyear}/#{fmonth}#{fdayf}</a>")
		elsif mikage == "10a"
			dtable.gsub!("<!--date-->","<!--date-->\n#{fyear}/10a&nbsp;|&nbsp;#{fyear}/10b&nbsp;|&nbsp;#{fyear}/11a&nbsp;|&nbsp;#{fyear}/11b&nbsp;|&nbsp;#{fyear}/12a&nbsp;|&nbsp;#{fyear}/12b<br>")
			dtable.gsub!("#{fyear}/#{fmonth}#{fdayf}","<a href=\"./#{kotone}.rhtml\">#{fyear}/#{fmonth}#{fdayf}</a>")
		else
			dtable.gsub!("#{fyear}/#{fmonth}#{fdayf}","<a href=\"./#{kotone}.rhtml\">#{fyear}/#{fmonth}#{fdayf}</a>")
		end

			akari.gsub!("rrrrrtime","#{kotone}")
			akari.gsub!("rrrrrversion","#{$version}")
			akari.gsub!("<!--diarytable-->","#{dtable}")

		rtable = open("./ttt/diarytable","w")
			rtable.write dtable
		rtable.close

		indexr = open("index.rhtml","w")
			indexr.write akari
		indexr.close
		File.chmod(0755,"index.rhtml")

	rinzi = "<p><div align=\"right\">\n<strong>To Do.</strong><br>\n" + "To Do.¤Î·îÅÙ±Û¤·" + "\n</div></p>"

		tbase = open("./todo/#{kotone}.todo","w")
			todo = tbase.write rinzi
		tbase.close

		print "Location: ./\n\n" 

	end