tdiary-contrib 3.2.2.20130518

data/plugin/hb_footer.rb

@@ -0,0 +1,255 @@
+#
+# hb_footer.rb
+#
+# はてなブックマーク (http://b.hatena.ne.jp/) のコメントを該当日付に貼り付けるtDiaryプラグイン
+# 改造版rss_recent Version 0.0.5i2と共に使用する
+#
+# Licence: GPL
+# Author: ishinao <ishinao@ishinao.net>
+#
+
+add_body_leave_proc(Proc.new do |date|
+  if @mode == 'day' or @mode == 'latest'
+    diary = @diaries[date.strftime('%Y%m%d')]
+    pnum = 1
+    hbsrc = ''
+    diary.each_section do |para|
+      td_url = "http://tdiary.ishinao.net/#{date.strftime('%Y%m%d')}.html%23p#{'%02d' % pnum}"
+      hb_url = "http://b.hatena.ne.jp/entry/#{td_url}"
+      rss_url = "http://b.hatena.ne.jp/entry/rss/#{td_url}"
+
+      template_head = %Q[<div class="section">\n<h3><a href="#{CGI.escapeHTML(hb_url)}">はてなブックマークの反応</a></h3>\n<ul class="hb_footer">\n]
+      template_list = '<li><span class="date">#{time.strftime("%Y年%m月%d日")}</span> <span class="hatenaid"><a href="#{CGI.escapeHTML(url)}">#{CGI.escapeHTML(title)}</a></span> <span class="comment">#{CGI.escapeHTML(description.to_s)}</span></li>'
+      template_foot = "</ul>\n</div>\n"
+
+      cache_time = 3600;
+      if date.strftime('%Y-%m-%d') != Time.now.strftime('%Y-%m-%d')
+        cache_time = 3600 * 12;
+      end
+      hbsrc << hb_footer(rss_url, 50, cache_time, template_head, template_list, template_foot)
+      pnum+=1
+    end
+    hbsrc
+  else
+    ''
+  end
+end)
+
+# rss-recent.rb: RSS recent plugin 
+#
+# rss_recnet: show recnet list from RSS
+#   parameters (default):
+#      url: URL of RSS
+#      max: max of list itmes(5)
+#      cache_time: cache time(second) of RSS(60*60)
+#      template_head: rendering header part
+#      template_list: rendering RSS item part(with loop)
+#      template_foot: rendering footer part
+#
+# Copyright (c) 2003-2004 Kouhei Sutou <kou@cozmixng.org>
+# Distributed under the GPL
+#
+# Modified using template string and content:encoded
+# Version 0.0.5i2 by ishinao <ishinao@ishinao.net>
+#
+
+require "rss/rss"
+
+RSS_RECENT_FIELD_SEPARATOR = "\0"
+RSS_RECENT_ENTRY_SEPARATOR = "\1"
+RSS_RECENT_VERSION = "0.0.5i2"
+RSS_RECENT_HTTP_HEADER = {
+	"User-Agent" => "tDiary RSS recent plugin version #{RSS_RECENT_VERSION}. " <<
+	"Using RSS parser version is #{::RSS::VERSION}.",
+}
+
+def hb_footer(url, max = 5, cache_time = 3600, \
+	template_head = "<ul>\n", \
+	template_list = '<li><span class="#{hb_footer_modified_class(time)}"><a href="#{CGI.escapeHTML(url)}" title="#{CGI.escapeHTML(title)}">#{CGI::escapeHTML(title)}</a></span></li>\n', \
+	template_foot = "</ul>\n")
+	url.untaint
+
+	cache_file = "#{@cache_path}/rss-recent.#{CGI.escape(url)}"
+
+	hb_footer_cache_rss(url, cache_file, cache_time.to_i)
+	
+	return '' unless test(?r, cache_file)
+
+	rv = template_head
+	
+	i = 0
+	hb_footer_read_from_cache(cache_file).each do |title, url, time, content, description|
+		break if i >= max
+		next if (url.nil? or title.nil?)
+		rv << eval('%Q[' + template_list + ']')
+		i += 1
+	end
+
+	rv << template_foot
+
+	if i > 0
+		rv
+	else
+		''
+	end
+end
+
+class InvalidResourceError < StandardError; end
+
+def hb_footer_cache_rss(url, cache_file, cache_time)
+
+	cached_time = nil
+	cached_time = File.mtime(cache_file) if File.exist?(cache_file)
+
+	if cached_time.nil? or Time.now > cached_time + cache_time
+		require 'time'
+		require 'open-uri'
+		require 'net/http'
+		require 'uri/generic'
+		require 'rss/parser'
+		require 'rss/1.0'
+		require 'rss/2.0'
+		require 'rss/dublincore'
+		require 'rss/content'
+		
+		begin
+			uri = URI.parse(url)
+
+			raise URI::InvalidURIError if uri.scheme != "http"
+
+			rss_source = hb_footer_fetch_rss(uri, cached_time)
+			
+			raise InvalidResourceError if rss_source.nil?
+
+			# parse RSS
+			rss = ::RSS::Parser.parse(rss_source, false)
+			raise ::RSS::Error if rss.nil?
+
+			# pre processing
+			begin
+				rss.output_encoding = @conf.charset || charset
+			rescue ::RSS::UnknownConversionMethodError
+			end
+
+			rss_infos = rss.items.collect do |item|
+				hb_footer_pubDate_to_dc_date(item)
+				[item.title, item.link, item.dc_date, item.content_encoded, item.description]
+			end
+			hb_footer_write_to_cache(cache_file, rss_infos)
+
+		rescue URI::InvalidURIError
+			hb_footer_write_to_cache(cache_file, [['Invalid URI', url]])
+		rescue InvalidResourceError, ::RSS::Error
+#			hb_footer_write_to_cache(cache_file, [['Invalid Resource', url]])
+# when cannot get valid RSS, use old cache
+		end
+	end
+
+end
+
+def hb_footer_fetch_rss(uri, cache_time)
+	rss = nil
+	begin
+		uri.open(hb_footer_http_header(cache_time)) do |f|
+			case f.status.first
+			when "200"
+				rss = f.read
+				# STDERR.puts "Got RSS of #{uri}"
+			when "304"
+				# not modified
+				# STDERR.puts "#{uri} does not modified"
+			else
+				raise InvalidResourceError
+			end
+		end
+	rescue TimeoutError, SocketError, StandardError,
+			SecurityError # occured in redirect
+		raise InvalidResourceError
+	end
+	rss
+end
+
+def hb_footer_http_header(cache_time)
+	header = RSS_RECENT_HTTP_HEADER.dup
+	if cache_time.respond_to?(:rfc2822)
+		header["If-Modified-Since"] = cache_time.rfc2822
+	end
+	header
+end
+
+def hb_footer_write_to_cache(cache_file, rss_infos)
+	File.open(cache_file, 'w') do |f|
+		f.flock(File::LOCK_EX)
+		rss_infos.each do |info|
+			f << info.join(RSS_RECENT_FIELD_SEPARATOR)
+			f << RSS_RECENT_ENTRY_SEPARATOR
+		end
+		f.flock(File::LOCK_UN)
+	end
+end
+
+def hb_footer_read_from_cache(cache_file)
+	require 'time'
+	infos = []
+	File.open(cache_file) do |f|
+		while info = f.gets(RSS_RECENT_ENTRY_SEPARATOR)
+			info = info.chomp(RSS_RECENT_ENTRY_SEPARATOR)
+			infos << info.split(RSS_RECENT_FIELD_SEPARATOR)
+		end
+	end
+	infos.collect do |title, url, time, content, description|
+		[
+			hb_footer_convert(title),
+			hb_footer_convert(url),
+			hb_footer_convert(time) {|time| Time.parse(time)},
+			hb_footer_convert(content),
+            hb_footer_convert(description),
+		]
+	end
+end
+
+def hb_footer_convert(str)
+	if str.nil? or str.empty?
+		nil
+	else
+		if block_given?
+			yield str
+		else
+			str
+		end
+	end
+end
+
+# from RWiki
+def hb_footer_modified(t)
+	return '-' unless t
+	dif = (Time.now - t).to_i
+	dif = dif / 60
+	return "#{dif}m" if dif <= 60
+	dif = dif / 60
+	return "#{dif}h" if dif <= 24
+	dif = dif / 24
+	return "#{dif}d"
+end
+
+# from RWiki
+def hb_footer_modified_class(t)
+	return 'dangling' unless t
+	dif = (Time.now - t).to_i
+	dif = dif / 60
+	return "modified-hour" if dif <= 60
+	dif = dif / 60
+	return "modified-today" if dif <= 24
+	dif = dif / 24
+	return "modified-month" if dif <= 30
+	return "modified-year" if dif <= 365
+	return "modified-old"
+end
+
+def hb_footer_pubDate_to_dc_date(target)
+	if target.respond_to?(:pubDate)
+		class << target
+			alias_method(:dc_date, :pubDate)
+		end
+	end
+end

data/plugin/hb_footer4sec.rb

@@ -0,0 +1,244 @@
+#
+# hb_footer.rb
+#
+# はてなブックマーク (http://b.hatena.ne.jp/) のコメントを該当セクションに貼り付けるtDiaryプラグイン
+# 改造版rss_recent Version 0.0.5i2と共に使用する
+#
+# Licence: GPL
+# Author: ishinao <ishinao@ishinao.net>
+#
+
+add_section_leave_proc do |date, index|
+  td_url = "http://tdiary.ishinao.net/#{date.strftime('%Y%m%d')}.html%23p#{'%02d' % index}"
+  hb_url = "http://b.hatena.ne.jp/entry/#{td_url}"
+  rss_url = "http://b.hatena.ne.jp/entry/rss/#{td_url}"
+
+  template_head = %Q[<div class="section">\n<h4>このセクションに対する<a href="#{CGI.escapeHTML(hb_url)}">はてブ</a></h4>\n<ul class="hb_footer">\n]
+  template_list = '<li><span class="date">#{time.strftime("%Y年%m月%d日")}</span> <span class="hatenaid"><a href="#{CGI.escapeHTML(url)}">#{CGI.escapeHTML(title)}</a></span> <span class="comment">#{CGI.escapeHTML(description.to_s)}</span></li>'
+  template_foot = "</ul>\n</div>\n"
+
+  cache_time = 3600;
+  if date.strftime('%Y-%m-%d') != Time.now.strftime('%Y-%m-%d')
+    cache_time = 3600 * 12;
+  end
+  hb_footer4sec(rss_url, 50, cache_time, template_head, template_list, template_foot)
+end
+
+# rss-recent.rb: RSS recent plugin 
+#
+# rss_recnet: show recnet list from RSS
+#   parameters (default):
+#      url: URL of RSS
+#      max: max of list itmes(5)
+#      cache_time: cache time(second) of RSS(60*60)
+#      template_head: rendering header part
+#      template_list: rendering RSS item part(with loop)
+#      template_foot: rendering footer part
+#
+# Copyright (c) 2003-2004 Kouhei Sutou <kou@cozmixng.org>
+# Distributed under the GPL
+#
+# Modified using template string and content:encoded
+# Version 0.0.5i2 by ishinao <ishinao@ishinao.net>
+#
+
+require "rss/rss"
+
+RSS_RECENT_FIELD_SEPARATOR = "\0"
+RSS_RECENT_ENTRY_SEPARATOR = "\1"
+RSS_RECENT_VERSION = "0.0.5i2"
+RSS_RECENT_HTTP_HEADER = {
+	"User-Agent" => "tDiary RSS recent plugin version #{RSS_RECENT_VERSION}. " <<
+	"Using RSS parser version is #{::RSS::VERSION}.",
+}
+
+def hb_footer4sec(url, max = 5, cache_time = 3600, \
+	template_head = "<ul>\n", \
+	template_list = '<li><span class="#{hb_footer4sec_modified_class(time)}"><a href="#{CGI.escapeHTML(url)}" title="#{CGI.escapeHTML(title)}">#{CGI::escapeHTML(title)}</a></span></li>\n', \
+	template_foot = "</ul>\n")
+	url.untaint
+
+	cache_file = "#{@cache_path}/rss-recent.#{CGI.escape(url)}"
+
+	hb_footer4sec_cache_rss(url, cache_file, cache_time.to_i)
+	
+	return '' unless test(?r, cache_file)
+
+	rv = template_head
+	
+	i = 0
+	hb_footer4sec_read_from_cache(cache_file).each do |title, url, time, content, description|
+		break if i >= max
+		next if (url.nil? or title.nil?)
+		rv << eval('%Q[' + template_list + ']')
+		i += 1
+	end
+
+	rv << template_foot
+
+	if i > 0
+		rv
+	else
+		''
+	end
+end
+
+class InvalidResourceError < StandardError; end
+
+def hb_footer4sec_cache_rss(url, cache_file, cache_time)
+
+	cached_time = nil
+	cached_time = File.mtime(cache_file) if File.exist?(cache_file)
+
+	if cached_time.nil? or Time.now > cached_time + cache_time
+		require 'time'
+		require 'open-uri'
+		require 'net/http'
+		require 'uri/generic'
+		require 'rss/parser'
+		require 'rss/1.0'
+		require 'rss/2.0'
+		require 'rss/dublincore'
+		require 'rss/content'
+		
+		begin
+			uri = URI.parse(url)
+
+			raise URI::InvalidURIError if uri.scheme != "http"
+
+			rss_source = hb_footer4sec_fetch_rss(uri, cached_time)
+			
+			raise InvalidResourceError if rss_source.nil?
+
+			# parse RSS
+			rss = ::RSS::Parser.parse(rss_source, false)
+			raise ::RSS::Error if rss.nil?
+
+			# pre processing
+			begin
+				rss.output_encoding = @conf.charset || charset
+			rescue ::RSS::UnknownConversionMethodError
+			end
+
+			rss_infos = rss.items.collect do |item|
+				hb_footer4sec_pubDate_to_dc_date(item)
+				[item.title, item.link, item.dc_date, item.content_encoded, item.description]
+			end
+			hb_footer4sec_write_to_cache(cache_file, rss_infos)
+
+		rescue URI::InvalidURIError
+			hb_footer4sec_write_to_cache(cache_file, [['Invalid URI', url]])
+		rescue InvalidResourceError, ::RSS::Error
+#			hb_footer4sec_write_to_cache(cache_file, [['Invalid Resource', url]])
+# when cannot get valid RSS, use old cache
+		end
+	end
+
+end
+
+def hb_footer4sec_fetch_rss(uri, cache_time)
+	rss = nil
+	begin
+		uri.open(hb_footer4sec_http_header(cache_time)) do |f|
+			case f.status.first
+			when "200"
+				rss = f.read
+				# STDERR.puts "Got RSS of #{uri}"
+			when "304"
+				# not modified
+				# STDERR.puts "#{uri} does not modified"
+			else
+				raise InvalidResourceError
+			end
+		end
+	rescue TimeoutError, SocketError, StandardError,
+			SecurityError # occured in redirect
+		raise InvalidResourceError
+	end
+	rss
+end
+
+def hb_footer4sec_http_header(cache_time)
+	header = RSS_RECENT_HTTP_HEADER.dup
+	if cache_time.respond_to?(:rfc2822)
+		header["If-Modified-Since"] = cache_time.rfc2822
+	end
+	header
+end
+
+def hb_footer4sec_write_to_cache(cache_file, rss_infos)
+	File.open(cache_file, 'w') do |f|
+		f.flock(File::LOCK_EX)
+		rss_infos.each do |info|
+			f << info.join(RSS_RECENT_FIELD_SEPARATOR)
+			f << RSS_RECENT_ENTRY_SEPARATOR
+		end
+		f.flock(File::LOCK_UN)
+	end
+end
+
+def hb_footer4sec_read_from_cache(cache_file)
+	require 'time'
+	infos = []
+	File.open(cache_file) do |f|
+		while info = f.gets(RSS_RECENT_ENTRY_SEPARATOR)
+			info = info.chomp(RSS_RECENT_ENTRY_SEPARATOR)
+			infos << info.split(RSS_RECENT_FIELD_SEPARATOR)
+		end
+	end
+	infos.collect do |title, url, time, content, description|
+		[
+			hb_footer4sec_convert(title),
+			hb_footer4sec_convert(url),
+			hb_footer4sec_convert(time) {|time| Time.parse(time)},
+			hb_footer4sec_convert(content),
+            hb_footer4sec_convert(description),
+		]
+	end
+end
+
+def hb_footer4sec_convert(str)
+	if str.nil? or str.empty?
+		nil
+	else
+		if block_given?
+			yield str
+		else
+			str
+		end
+	end
+end
+
+# from RWiki
+def hb_footer4sec_modified(t)
+	return '-' unless t
+	dif = (Time.now - t).to_i
+	dif = dif / 60
+	return "#{dif}m" if dif <= 60
+	dif = dif / 60
+	return "#{dif}h" if dif <= 24
+	dif = dif / 24
+	return "#{dif}d"
+end
+
+# from RWiki
+def hb_footer4sec_modified_class(t)
+	return 'dangling' unless t
+	dif = (Time.now - t).to_i
+	dif = dif / 60
+	return "modified-hour" if dif <= 60
+	dif = dif / 60
+	return "modified-today" if dif <= 24
+	dif = dif / 24
+	return "modified-month" if dif <= 30
+	return "modified-year" if dif <= 365
+	return "modified-old"
+end
+
+def hb_footer4sec_pubDate_to_dc_date(target)
+	if target.respond_to?(:pubDate)
+		class << target
+			alias_method(:dc_date, :pubDate)
+		end
+	end
+end

data/plugin/hb_footer4sec_js.rb

@@ -0,0 +1,30 @@
+# hb_footer4sec_js.rb $Revision 1.0 $
+#
+# Copyright (c) 2008 SHIBATA Hiroshi <h-sbt@nifty.com>
+# You can redistribute it and/or modify it under GPL2.
+#
+
+def permalink( date, index, escape = true )
+	ymd = date.strftime( "%Y%m%d" )
+	uri = @conf.index.dup
+	uri.sub!( %r|\A(?!https?://)|i, @conf.base_url )
+	uri.gsub!( %r|/\.(?=/)|, "" ) # /././ -> /
+	link = uri + anchor( "#{ymd}p%02d" % index )
+	link.sub!( "#", "%23" ) if escape
+	link
+end
+
+add_section_leave_proc do |date, index|
+	if @mode == 'day' and not bot? and not @conf.mobile_agent? then
+		<<-SCRIPT
+		<script type= "text/javascript"><!--
+		var hatena_bookmark_anywhere_limit = 10;
+		var hatena_bookmark_anywhere_style = true;
+		var hatena_bookmark_anywhere_collapse = true;
+		var hatena_bookmark_anywhere_url = "#{permalink(date, index)}";
+		//--></script>
+		<script src="#{@conf.base_url}hatena-bookmark-anywhere.js" type="text/javascript" charset="utf-8"></script>
+		<div id="hatena_bookmark_anywhere"></div>
+		SCRIPT
+	end
+end

data/plugin/hide_comment_form.rb

@@ -0,0 +1,4 @@
+def hide_comment_form
+	@conf.hide_comment_form = true
+	return ''
+end

data/plugin/hide_sidebar_iphone.rb

@@ -0,0 +1,21 @@
+# hide_sidebar_iphone.rb
+#
+# Copyright (C) 2008 SHIBATA Hiroshi <shibata.hiroshi@gmail.com>
+# You can redistribute it and/or modify it under GPL2.
+#
+
+add_header_proc do
+	if @conf.iphone? then
+		<<-CSS
+		<style type="text/css"><!--
+		div.sidebar { 
+			display: none;
+		}
+		div.main {
+			width: 100%;
+			float: none;
+		}
+		--></style>
+		CSS
+	end
+end

data/plugin/iddy.rb

@@ -0,0 +1,81 @@
+#
+# iddy.rb: iddy.jp plugin for tDiary
+#
+# Copyright (C) 2007 by TADA Tadashi <sho@spc.gr.jp>
+# Distributed under GPL.
+#
+
+######################################################################
+# If you will modify or release another version of this code,
+# please get your own application key from iddy.jp and replace below.
+######################################################################
+@iddy_key = 'f93d2f38442fae3a1f08e82f84d335112cca0855'
+
+require 'open-uri'
+require 'timeout'
+require 'rexml/document'
+
+def iddy( id )
+	begin
+		cache = "#{@cache_path}/iddy.xml"
+		xml = open( cache ) {|f| f.read }
+		if Time::now > File::mtime( cache ) + 60*60 then
+			File::delete( cache )  # clear cache 1 hour later
+		end
+	rescue Errno::ENOENT
+		begin
+			xml = iddy_call_api( id, @iddy_key )
+			open( cache, 'wb' ) {|f| f.write( xml ) }
+		rescue Timeout::Error
+			return '<div class="iddy error">No data.</div>'
+		end
+	end
+
+	doc = REXML::Document::new( xml )
+	if doc.elements[1].attribute( 'status' ).to_s == 'fail' then
+		return '<div class="iddy error">iddy.jp returns fail.</div>'
+	end
+
+	user = doc.elements.to_a( '*/*/user' )[0].elements
+	profileurl = user.to_a( 'profileurl' )[0]
+	unless profileurl then
+		return '<div class="iddy error">No profile URL on iddy.jp.</div>'
+	end
+
+	imageurl = user.to_a( 'imageurl' )[0]
+	name = user.to_a( 'name' )[0]
+	nameroma = user.to_a( 'nameroma' )[0]
+	mail = user.to_a( 'mail' )[0]
+	submail = user.to_a( 'submail' )[0]
+	
+	html = '<div class="iddy">'
+	html << %Q|<a href="#{profileurl.text}">|
+	html << %Q|<span class="iddy-image"><img src="#{imageurl.text}" alt="image" width="96" height="96"></span>| if imageurl
+	if name then
+		html << %Q|<span class="iddy-name">#{name.text}</span>|
+	elsif nameroma
+		html << %Q|<span class="iddy-name">#{nameroma.text}</span>|
+	else
+		html << %Q|<span class="iddy-name">#{id}</span>|
+	end
+	if submail then
+		html << %Q|<span class="iddy-mail">#{submail}</span>|
+	elsif mail
+		html << %Q|<span class="iddy-mail">#{mail}</span>|
+	end
+	html << '</a>'
+	html << %Q|<span class="iddy-powered">Powerd by <a href="http://iddy.jp/">iddy.jp</a></span>|
+	html << '</div>'
+	@conf.to_native( html )
+end
+
+def iddy_call_api( id, key )
+	request = "http://iddy.jp/api/user/?apikey=#{key}"
+	request << "&accountname=#{id}"
+
+	proxy = @conf['proxy']
+	proxy = 'http://' + proxy if proxy
+	timeout( 3 ) do
+		open( request, :proxy => proxy ) {|f| f.read }
+	end
+end