tdiary 3.2.2.20130507

data/tdiary/comment.rb

@@ -0,0 +1,40 @@
+# -*- coding: utf-8; -*-
+#
+# class Comment
+#	Management a comment.
+#
+module TDiary
+	class Comment
+		attr_reader :name, :mail, :body, :date
+
+		def initialize( name, mail, body, date = Time::now )
+			@name, @mail, @body, @date = name, mail, body, date
+			@show = true
+		end
+
+		def shorten( length = 120 )
+			matched = body.gsub( /\n/, ' ' ).scan( /^.{0,#{length - 2}}/u )[0]
+
+			unless $'.empty? then
+				matched + '..'
+			else
+				matched
+			end
+		end
+
+		def visible?; @show; end
+		def show=( s ); @show = s; end
+
+		def ==( c )
+			(@name == c.name) and (@mail == c.mail) and (@body == c.body)
+		end
+	end
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:
+# vim: ts=3

data/tdiary/comment_manager.rb

@@ -0,0 +1,94 @@
+# -*- coding: utf-8; -*-
+#
+# module CommentManager
+#	 Management comments in a day. Include in Diary class.
+#
+module TDiary
+	module CommentManager
+		private
+		#
+		# call this method when initialize
+		#
+		def init_comments
+			@comments = []
+		end
+
+		public
+		def add_comment( com )
+			@comments << com
+			if not @last_modified or @last_modified < com.date
+				@last_modified = com.date
+			end
+			com
+		end
+
+		def count_comments( all = false )
+			i = 0
+			@comments.each do |comment|
+				i += 1 if all or comment.visible?
+			end
+			i
+		end
+
+		def each_comment( limit = -1 )
+			@comments.each_with_index do |com,idx|
+				break if idx >= limit and limit >= 0
+				yield com
+			end
+		end
+
+		def each_comment_tail( limit = 3 )
+			idx = 0
+			comments = @comments.collect {|c|
+				idx += 1
+				if c.visible? then
+					[c, idx]
+				else
+					nil
+				end
+			}.compact
+			s = comments.size - limit
+			s = 0 if s < 0
+			for idx in s...comments.size
+				yield comments[idx][0], comments[idx][1] # idx is start with 1.
+			end
+		end
+
+		def each_visible_comment( limit = -1 )
+			@comments.each_with_index do |com,idx|
+				break if idx >= limit and limit >= 0
+				next unless com.visible?
+				yield com,idx+1 # idx is start with 1.
+			end
+		end
+
+		def each_visible_trackback( limit = -1 )
+			i = 0
+			@comments.each do |com|
+				break if i >= limit and limit >= 0
+				next unless /^TrackBack$/ =~ com.name
+				next unless com.visible_true?
+				i += 1
+				yield com, i
+			end
+		end
+
+		def each_visible_trackback_tail( limit = 3 )
+			i = 0
+			@comments.find_all {|com|
+				com.visible_true? and /^TrackBack$/ =~ com.name
+			}.reverse[0,limit].reverse.each do |com|
+				i += 1 # i starts with 1.
+				yield com,i
+			end
+		end
+	end
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:
+# vim: ts=3

data/tdiary/compatible.rb

@@ -0,0 +1,72 @@
+# -*- coding: utf-8 -*-
+
+# ENV#[] raises an exception on secure mode
+class CGI
+	ENV = ::ENV.to_hash
+end
+
+# for Ruby 1.9.3
+if ::Object.method_defined?(:untrust)
+	class Object
+		def taint
+			super
+			untrust
+		end
+	end
+end
+
+# for Ruby 1.9.X
+
+# Auto convert ASCII_8BIT pstore data (created by Ruby-1.8) to UTF-8.
+if ::String.method_defined?(:force_encoding)
+	require 'pstore'
+	class PStoreRuby18Exception < Exception; end
+
+	class PStore
+		alias compatible_transaction_original transaction unless defined?(compatible_transaction_original)
+		def transaction(*args, &block)
+			begin
+				compatible_transaction_original(*args, &block)
+			rescue PStoreRuby18Exception => e
+				# first loaded the pstore file (it's created by Ruby-1.8)
+				# force convert ASCII_8BIT pstore data to UTF_8
+				file = open_and_lock_file(@filename, false)
+				table = Marshal::load(file, proc {|obj|
+					if obj.respond_to?('force_encoding') && obj.encoding == Encoding::ASCII_8BIT
+						obj.force_encoding('UTF-8')
+					end
+					obj
+				})
+				table[:__ruby_version] = RUBY_VERSION
+				if on_windows?
+					save_data_with_fast_strategy(Marshal::dump(table), file)
+				else
+					save_data_with_atomic_file_rename_strategy(Marshal::dump(table), file)
+				end
+				retry
+			end
+		end
+
+		private
+
+		def load(content)
+			table = Marshal::load(content)
+			raise PStoreRuby18Exception.new if !table[:__ruby_version] || table[:__ruby_version] < '1.9'
+			# hide __ruby_version to caller
+			table.delete(:__ruby_version)
+			table
+		end
+
+		def dump(table)
+			table[:__ruby_version] = RUBY_VERSION
+			Marshal::dump(table)
+		end
+	end
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:

data/tdiary/config.rb

@@ -0,0 +1,270 @@
+# -*- coding: utf-8; -*-
+#
+# class Config
+#  configuration class
+#
+module TDiary
+	class Config
+		attr_reader :database_url
+
+		def initialize( cgi = nil, request = nil )
+			@request = request
+			configure_attrs
+			configure_bot_pattern
+			setup_attr_accessor_to_all_ivars
+			load_logger
+		end
+
+		def save
+			result = ERB.new(File.read("#{TDiary::PATH}/skel/tdiary.rconf").untaint).result(binding)
+			result.untaint unless @secure
+			Safe::safe( @secure ? 4 : 1 ) do
+				eval( result, binding, "(TDiary::Config#save)", 1 )
+			end
+			@io_class.save_cgi_conf(self, result)
+		end
+
+		# backword compatibility, you can use @cgi.mobile_agent?
+		def mobile_agent?
+			@request.mobile_agent?
+		end
+
+		# backword compatibility, you can use @cgi.smartphone?
+		def smartphone?
+			@request.smartphone?
+		end
+		alias iphone? smartphone?
+
+		# backword compatibility, you can use bot? or @conf.bot =~ @cgi.user_agent
+		def bot?
+			@bot =~ @request.user_agent
+		end
+
+		# backword compatibility, you can use TDiary::ViewHelper#base_url
+		def base_url
+			if @options['base_url'] && @options['base_url'].length > 0
+				@options['base_url']
+			else
+				@request.base_url
+			end
+		end
+
+		#
+		# get/set/delete plugin options
+		#
+		def []( key )
+			@options[key]
+		end
+
+		def []=( key, val )
+			@options2[key] = @options[key] = val
+		end
+
+		def delete( key )
+			@options.delete( key )
+			@options2.delete( key )
+		end
+
+		if String.method_defined?(:encode)
+			# preload transcodes outside $SAFE=4 environment, that is a workaround
+			# for the possible SecurityError. see the following uri for the detail.
+			# http://redmine.ruby-lang.org/issues/5279
+			%w(utf-16be euc-jp iso-2022-jp Shift_JIS).each do |enc|
+				"\uFEFF".encode(enc) rescue nil
+			end
+
+			def to_native( str, charset = nil )
+				str = str.dup
+				if str.encoding == Encoding::ASCII_8BIT
+					str.force_encoding(charset || 'utf-8')
+				end
+				unless str.valid_encoding?
+					str.encode!('utf-16be', {:invalid => :replace, :undef => :replace})
+				end
+				unless str.encoding == Encoding::UTF_8
+					str.encode!('utf-8', {:invalid => :replace, :undef => :replace})
+				end
+				str
+			end
+		else
+			require 'kconv'
+			require 'iconv'
+			require 'nkf'
+
+			def to_native( str, charset = nil )
+				return str if Kconv.isutf8(str)
+				begin
+					Iconv.conv('utf-8', charset || 'utf-8', str)
+				rescue
+					from = case charset
+						when /^utf-8$/i
+							'W'
+						when /^shift_jis/i
+							'S'
+						when /^EUC-JP/i
+							'E'
+						else
+							''
+					end
+					NKF::nkf("-m0 -#{from}w", str)
+				end
+			end
+		end
+
+	private
+		# loading tdiary.conf in current directory
+		def configure_attrs
+			@secure = true unless @secure
+			@options = {}
+
+			eval( File::open( 'tdiary.conf' ) {|f| f.read }.untaint, b, "(tdiary.conf)", 1 )
+
+			# language setup
+			@lang = 'ja' unless @lang
+			begin
+				instance_eval( File::open( "#{TDiary::PATH}/tdiary/lang/#{@lang}.rb" ){|f| f.read }.untaint, "(tdiary/lang/#{@lang}.rb)", 1 )
+			rescue Errno::ENOENT
+				@lang = 'ja'
+				retry
+			end
+
+			@data_path += '/' if @data_path && /\/$/ !~ @data_path
+			@style = 'tDiary' unless @style
+			@index = './' unless @index
+			@update = 'update.rb' unless @update
+			@hide_comment_form = false unless defined?( @hide_comment_form )
+
+			@author_name = '' unless @author_name
+			@index_page = '' unless @index_page
+			@hour_offset = 0 unless @hour_offset
+
+			@html_title = '' unless @html_title
+			@x_frame_options = nil unless @x_frame_options
+			@header = '' unless @header
+			@footer = '' unless @footer
+
+			@section_anchor = '<span class="sanchor">_</span>' unless @section_anchor
+			@comment_anchor = '<span class="canchor">_</span>' unless @comment_anchor
+			@date_format = '%Y-%m-%d' unless @date_format
+			@latest_limit = 10 unless @latest_limit
+			@show_nyear = false unless @show_nyear
+
+			@theme = 'default' if not @theme and not @css
+			@css = '' unless @css
+
+			@show_comment = true unless defined?( @show_comment )
+			@comment_limit = 3 unless @comment_limit
+			@comment_limit_per_day = 100 unless @comment_limit_per_day
+
+			@show_referer = true unless defined?( @show_referer )
+			@referer_limit = 10 unless @referer_limit
+			@referer_day_only = true unless defined?( @referer_day_only )
+			@no_referer = [] unless @no_referer
+			@no_referer2 = [] unless @no_referer2
+			@no_referer = @no_referer2 + @no_referer
+			@only_volatile = [] unless @only_volatile
+			@only_volatile2 = [] unless @only_volatile2
+			@only_volatile = @only_volatile2 + @only_volatile
+			@referer_table = [] unless @referer_table
+			@referer_table2 = [] unless @referer_table2
+			@referer_table = @referer_table2 + @referer_table
+
+			@options = {} unless @options.class == Hash
+			if @options2 then
+				@options.update( @options2 )
+			else
+				@options2 = {}.taint
+			end
+			@options.taint
+
+			# for 1.4 compatibility
+			@section_anchor = @paragraph_anchor unless @section_anchor
+		end
+
+		# loading tdiary.conf in @data_path.
+		def load_cgi_conf
+			def_vars1 = ''
+			def_vars2 = ''
+			[
+				:tdiary_version,
+				:html_title, :author_name, :author_mail, :index_page, :hour_offset,
+				:description, :icon, :banner, :x_frame_options,
+				:header, :footer,
+				:section_anchor, :comment_anchor, :date_format, :latest_limit, :show_nyear,
+				:theme, :css,
+				:show_comment, :comment_limit, :comment_limit_per_day,
+				:mail_on_comment, :mail_header,
+				:show_referer, :no_referer2, :only_volatile2, :referer_table2,
+				:options2,
+			].each do |var|
+				def_vars1 << "#{var} = nil\n"
+				def_vars2 << "@#{var} = #{var} unless #{var} == nil\n"
+			end
+
+			unless @io_class
+				require 'tdiary/io/cache/file'
+				require 'tdiary/io/default'
+				@io_class = DefaultIO
+			end
+
+			cgi_conf = @io_class.load_cgi_conf(self)
+			cgi_conf.untaint unless @secure
+
+			b = binding.taint
+			eval( def_vars1, b )
+			Safe::safe( @secure ? 4 : 1 ) do
+				begin
+					eval( cgi_conf, b, "(TDiary::Config#load_cgi_conf)", 1 )
+				rescue SyntaxError
+					enc = case @lang
+							when 'en'
+								'UTF-8'
+							else
+								'EUC-JP'
+							end
+					cgi_conf.force_encoding( enc )
+					retry
+				end
+			end if cgi_conf
+			eval( def_vars2, b )
+		end
+
+	private
+
+		def setup_attr_accessor_to_all_ivars
+			names = instance_variables().collect {|ivar| ivar.to_s.sub(/@/, '') }
+			(class << self; self; end).class_eval { attr_accessor *names }
+		end
+
+		def configure_bot_pattern
+			bot = ["bot", "spider", "antenna", "crawler", "moget", "slurp"]
+			bot += @options['bot'] || []
+			@bot = Regexp::new( "(#{bot.uniq.join( '|' )})", true )
+		end
+
+		def load_logger
+			if @logger
+				TDiary.logger = @logger
+			else
+				require 'logger'
+				log_path = (@log_path || "#{@data_path}/log")
+				FileUtils.mkdir_p(log_path.untaint)
+				TDiary.logger = Logger.new(File.join(log_path, "debug.log"), 'daily')
+				TDiary.logger.level = Logger.const_get(@log_level || 'DEBUG')
+			end
+		end
+
+		def method_missing( *m )
+			(class << self; self; end).class_eval { attr_accessor m[0] } if m.length == 1
+			nil
+		end
+	end
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:
+# vim: ts=3