tdiary 3.2.2.20130507

data/tdiary/response.rb

@@ -0,0 +1,29 @@
+# -*- coding: utf-8 -*-
+# stolen from okkez http://github.com/hiki/hiki/blob/rack/hiki/response.rb
+module TDiary
+	if Object.const_defined?(:Rack)
+		Response = ::Rack::Response
+	else
+		class Response
+			attr_reader :body, :status, :headers
+			def initialize(body = [], status = 200, headers = {}, &block)
+				@body = body
+				@status = status
+				@headers = headers
+				yield self if block_given?
+			end
+
+			def finish
+				[status, headers, body]
+			end
+			alias to_a finish
+		end
+	end
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:

data/tdiary/server.rb

@@ -0,0 +1,85 @@
+# -*- coding: utf-8; -*-
+#
+# server.rb: standalone tdiary cgi server via WEBrick.
+#
+# Copyright (C) 2008-2010, Kakutani Shintaro <shintaro@kakutani.com>
+# You can redistribute it and/or modify it under GPL2.
+
+module TDiary
+	class Server
+		require 'webrick'
+		require 'webrick/httpservlet/cgihandler'
+		require 'webrick/httputils'
+		require 'webrick/accesslog'
+		require 'tempfile'
+
+		class << self
+			def run( option )
+				@@server = new( option )
+
+				trap( "INT" ) { @@server.shutdown }
+				trap( "TERM" ) { @@server.shutdown }
+
+				@@server.start
+			end
+
+			def stop
+				@@server.shutdown
+			end
+		end
+
+		def initialize( opts )
+			@server = WEBrick::HTTPServer.new(
+				:Port => opts[:port], :BindAddress => opts[:bind],
+				:DocumentRoot => TDiary.root,
+				:MimeTypes => tdiary_mime_types,
+				:Logger => webrick_logger_to( opts[:logger] ),
+				:AccessLog => webrick_access_log_to( opts[:access_log] ),
+				:ServerType => opts[:daemon] ? WEBrick::Daemon : nil,
+				:CGIInterpreter => WEBrick::HTTPServlet::CGIHandler::Ruby
+			)
+			@server.logger.level = WEBrick::Log::DEBUG
+			@server.mount("/", WEBrick::HTTPServlet::CGIHandler, TDiary.root + "/index.rb")
+			@server.mount("/index.rb", WEBrick::HTTPServlet::CGIHandler, TDiary.root + '/index.rb')
+			@server.mount("/update.rb", WEBrick::HTTPServlet::CGIHandler, TDiary.root + "/update.rb")
+			@server.mount("/theme", WEBrick::HTTPServlet::FileHandler, TDiary.root + '/theme')
+			@server.mount("/js", WEBrick::HTTPServlet::FileHandler, TDiary.root + '/js')
+		end
+
+		def start
+			@server.start
+		end
+
+		def shutdown
+			@server.shutdown
+		end
+
+	private
+
+		def tdiary_mime_types
+			WEBrick::HTTPUtils::DefaultMimeTypes.merge( {
+					"rdf" => "application/xml",
+				} )
+		end
+
+		def webrick_logger_to( io )
+			io ||= Tempfile.new( "webrick_logger" )
+			WEBrick::Log::new( io, WEBrick::Log::DEBUG )
+		end
+
+		def webrick_access_log_to( io )
+			io ||= Tempfile.new( "webrick_access_log" )
+			[
+				[ io, WEBrick::AccessLog::COMMON_LOG_FORMAT ],
+				[ io, WEBrick::AccessLog::REFERER_LOG_FORMAT ]
+			]
+		end
+	end
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:

data/tdiary/style.rb

@@ -0,0 +1,194 @@
+# -*- coding: utf-8 -*-
+module TDiary
+	#
+	# module SectionBase
+	#  Base module of Section.
+	#
+	module SectionBase
+
+		attr_reader :subtitle, :author
+		attr_reader :categories, :stripped_subtitle
+		attr_reader :subtitle_to_html, :stripped_subtitle_to_html, :body_to_html
+
+		def body
+			@body.dup
+		end
+
+		def body=(str)
+			@body = str
+		end
+
+		def html4(date, idx, opt)
+			r = %Q[<div class="section">\n]
+			r << %Q[<%=section_enter_proc( Time.at( #{date.to_i} ) )%>\n]
+			r << do_html4( date, idx, opt )
+			r << %Q[<%=section_leave_proc( Time.at( #{date.to_i} ) )%>\n]
+			r << "</div>\n"
+		end
+
+		def chtml(date, idx, opt)
+			r = %Q[<%=section_enter_proc( Time.at( #{date.to_i} ) )%>\n]
+			r << do_html4( date, idx, opt )
+			r << %Q[<%=section_leave_proc( Time.at( #{date.to_i} ) )%>\n]
+		end
+
+		def to_s
+			to_src
+		end
+
+		def categories_to_string
+			@categories = categories
+			cat_str = ""
+			categories.each {|cat| cat_str << "[#{cat}]"}
+			cat_str << " " unless cat_str.empty?
+		end
+	end
+
+	#
+	# module DiaryBase
+	#  Base module of Diary.
+	#
+	module DiaryBase
+		include ERB::Util
+		include CommentManager
+		include RefererManager
+
+		def init_diary
+			init_comments
+			init_referers
+			@show = true
+		end
+
+		def date
+			@date
+		end
+
+		def set_date( date )
+			if date.class == String then
+				y, m, d = date.scan( /^(\d{4})(\d\d)(\d\d)$/ )[0]
+				raise ArgumentError::new( 'date string needs YYYYMMDD format.' ) unless y
+				@date = Time::local( y, m, d )
+			else
+				@date = date
+			end
+		end
+
+		def title
+			@title || ''
+		end
+
+		def set_title( title )
+			@title = title
+			@last_modified = Time::now
+		end
+
+		def last_modified
+			# 日本語を含むツッコミを入れると diary.last_modified が String になる (原因不明)
+			# (PStore 保存前は Time だが, 保存後に String となる)
+			# 暫定的に String だったら Time へ変換する
+			if @last_modified.instance_of? String
+				@last_modified = Time.at(0)
+			elsif @last_modified
+				@last_modified
+			else
+				Time::at( 0 )
+			end
+		end
+
+		def last_modified=( lm )
+			@last_modified  = lm
+		end
+
+		def visible?
+			@show != false;
+		end
+
+		def show( s )
+			@show = s
+		end
+
+		def replace(date, title, body)
+			set_date( date )
+			set_title( title )
+			@sections = []
+			append( body )
+		end
+
+		def each_section
+			@sections.each do |section|
+				yield section
+			end
+		end
+
+		def delete_section(index)
+			@sections.delete_at(index - 1)
+		end
+
+		def eval_rhtml( opt, path = '.' )
+			ERB.new(File.read("#{path}/skel/#{opt['prefix']}diary.rhtml").untaint).result(binding)
+		end
+
+		def to_src
+			r = ''
+			each_section do |section|
+				r << section.to_src
+			end
+			r
+		end
+
+		def to_html( opt = {}, mode = :HTML )
+			case mode
+			when :CHTML
+				to_chtml( opt )
+			else
+				to_html4( opt )
+			end
+		end
+
+		def to_html4(opt)
+			r = ''
+			idx = 1
+			each_section do |section|
+				r << section.html4( date, idx, opt )
+				idx += 1
+			end
+			r
+		end
+
+		def to_chtml( opt )
+			r = ''
+			idx = 1
+			each_section do |section|
+				r << section.chtml( date, idx, opt )
+				idx += 1
+			end
+			r
+		end
+
+		def to_s
+			"date=#{date.strftime('%Y%m%d')}, title=#{title}, body=[#{@sections.join('][')}]"
+		end
+	end
+
+	#
+	# module CategorizableDiary
+	#
+	module CategorizableDiary
+		def categorizable?; true; end
+	end
+
+	#
+	# module UncategorizableDiary
+	#
+	module UncategorizableDiary
+		def categorizable?; false; end
+	end
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:
+# vim: ts=3

data/tdiary/style/tdiary_style.rb

@@ -0,0 +1,198 @@
+# -*- coding: utf-8; -*-
+#
+# tdiary_style.rb: tDiary style class for tDiary 2.x format. $Revision: 1.16 $
+#
+# if you want to use this style, add @style into tdiary.conf below:
+#
+#    @style = 'tDiary'
+#
+# Copyright (C) 2001-2005, TADA Tadashi <t@tdtds.jp>
+# You can redistribute it and/or modify it under GPL2.
+#
+module TDiary
+	class TdiarySection
+		attr_reader :subtitle, :body, :author
+		attr_reader :categories, :stripped_subtitle
+
+		alias :subtitle_to_html :subtitle
+		alias :stripped_subtitle_to_html :stripped_subtitle
+
+		def initialize( fragment, author = nil )
+			@author = author
+			lines = fragment.split( /\n+/ )
+			if lines.size > 1 then
+				if /^<</ =~ lines[0]
+					@subtitle = lines.shift.chomp.sub( /^</, '' )
+				elsif /^[　 <]/u !~ lines[0]
+					@subtitle = lines.shift.chomp
+				end
+			end
+			@body = lines.join( "\n" )
+
+			@categories = get_categories
+			@stripped_subtitle = strip_subtitle
+		end
+
+		def subtitle=(subtitle)
+			cat_str = ""
+			@categories.each {|cat|
+				cat_str << "[#{cat}]"
+			}
+			cat_str << " " unless cat_str.empty?
+			@subtitle = subtitle ? (cat_str + subtitle) : nil
+			@stripped_subtitle = strip_subtitle
+		end
+
+		def body=(str)
+			@body = str
+		end
+
+		def categories=(categories)
+			@categories = categories
+			cat_str = ""
+			categories.each {|cat|
+				cat_str << "[#{cat}]"
+			}
+			cat_str << " " unless cat_str.empty?
+			@subtitle = @subtitle ? (cat_str + @stripped_subtitle) : nil
+			@stripped_subtitle = strip_subtitle
+		end
+
+		def to_src
+			s = ''
+			if @stripped_subtitle then
+				s += "[#{@author}]" if @author
+				cat_str = ""
+				@categories.each {|cat|
+				  cat_str << "[#{cat}]"
+				}
+				cat_str << " " unless cat_str.empty?
+				s += cat_str
+				s += '<' if /^</=~@subtitle
+				s += @stripped_subtitle + "\n"
+			else
+				#s += ' ' unless @body =~ /\A\s</
+			end
+			"#{s}#{@body}\n\n"
+		end
+
+		def body_to_html
+			html = ""
+			tag = false
+			@body.lines.each do |p|
+				if p[0] == ?< then
+					html = @body.dup
+					break
+				end
+				html << "<p>#{p}</p>"
+			end
+			html
+		end
+
+		def to_s
+			"subtitle=#{@subtitle}, body=#{@body}"
+		end
+
+		def categorized_subtitle
+			@categories.collect do |c|
+				%Q|<%= category_anchor("#{c}") %>|
+			end.join + @stripped_subtitle.to_s
+		end
+
+	private
+		def get_categories
+			return [] unless @subtitle
+			cat = /^(\[(.*?)\])+/.match(@subtitle).to_a[0]
+			return [] unless cat
+			cat.scan(/\[(.*?)\]/).collect do |c|
+				c[0].split(/,/)
+			end.flatten
+		end
+
+		def strip_subtitle
+			return nil unless @subtitle
+			@subtitle.sub( /^(\[(.*?)\])+\s*/, '' )
+		end
+	end
+
+	class TdiaryDiary
+		include DiaryBase
+		include CategorizableDiary
+
+		def initialize( date, title, body, modified = Time::now )
+			init_diary
+			replace( date, title, body )
+			@last_modified = modified
+		end
+
+		def style
+			'tDiary'
+		end
+
+		def append( body, author = nil )
+			body.gsub( /\r/, '' ).split( /\n\n+/ ).each do |fragment|
+				section = TdiarySection::new( fragment, author )
+				@sections << section if section
+			end
+			@last_modified = Time::now
+			self
+		end
+
+		def add_section(subtitle, body)
+			sec = TdiarySection::new("\n\n ")
+			sec.subtitle = subtitle
+			sec.body     = body
+			@sections << sec
+			@sections.size
+		end
+
+		def to_html4( opt )
+			r = ''
+			each_section do |section|
+				r << %Q[<div class="section">\n]
+				r << %Q[<%= section_enter_proc( Time::at( #{date.to_i} ) ) %>\n]
+				if section.subtitle then
+					r << %Q[<h3><%= subtitle_proc( Time::at( #{date.to_i} ), #{section.subtitle.dump.gsub( /%/, '\\\\045' )} ) %></h3>\n]
+				end
+				if /^</ =~ section.body then
+					r << %Q[#{section.body}]
+				elsif section.subtitle
+					r << %Q[<p>#{section.body.lines.collect{|l|l.chomp.sub( /^[　 ]/u, '')}.join( "</p>\n<p>" )}</p>\n]
+				else
+					r << %Q[<p><%= subtitle_proc( Time::at( #{date.to_i} ), nil ) %>]
+					r << %Q[#{section.body.lines.collect{|l|l.chomp.sub( /^[　 ]/u, '' )}.join( "</p>\n<p>" )}</p>]
+				end
+				r << %Q[<%= section_leave_proc( Time::at( #{date.to_i} ) ) %>\n]
+				r << %Q[</div>]
+			end
+			r
+		end
+
+		def to_chtml( opt )
+			r = ''
+			each_section do |section|
+				r << %Q[<%= section_enter_proc( Time::at( #{date.to_i} ) ) %>\n]
+				if section.subtitle then
+					r << %Q[<H3><%= subtitle_proc( Time::at( #{date.to_i} ), #{section.subtitle.dump.gsub( /%/, '\\\\045' )} ) %></H3>\n]
+				end
+				if /^</ =~ section.body then
+					r << section.body
+				elsif section.subtitle
+					r << %Q[<P>#{section.body.lines.collect{|l|l.chomp.sub( /^[　 ]/u, '' )}.join( "</P>\n<P>" )}</P>\n]
+				else
+					r << %Q[<P><%= subtitle_proc( Time::at( #{date.to_i} ), nil ) %>]
+					r << %Q[#{section.body.lines.collect{|l|l.chomp.sub( /^[　 ]/u, '' )}.join( "</P>\n<P>" )}</P>\n]
+				end
+				r << %Q[<%= section_leave_proc( Time::at( #{date.to_i} ) ) %>\n]
+			end
+			r
+		end
+	end
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End: