tdiary 3.2.2.20130507

data/misc/plugin/ja/xmlrpc.rb

@@ -0,0 +1,15 @@
+# -*- coding: utf-8 -*-
+def label_xmlrpc_url; 'XML-RPC API 設置先URL'; end
+def label_xmlrpc_blogid; 'Blog ID'; end
+def label_xmlrpc_username; 'ユーザ名'; end
+def label_xmlrpc_password; 'パスワード'; end
+def label_xmlrpc_lastname; '名'; end
+def label_xmlrpc_firstname; '姓'; end
+def label_xmlrpc_userid; 'ユーザID'; end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:

data/misc/plugin/kw.rb

@@ -0,0 +1,150 @@
+# -*- coding: utf-8 -*-
+# kw.rb
+#
+# kw: keyword link generator
+#   Parameters:
+#     keyword: keyword or InterWikiName (separated by ':').
+#     name: anchor string (optional).
+#     title: title attribute (optional).
+#
+# @options['kw.dic']
+#   array of dictionary table array. an item of array is:
+#
+#       [key, URL, style]
+#
+#   key:   nil or string of key.
+#          If keyword is 'foo', it has key nil.
+#          If keyword is 'google:foo', it has key 'google'.
+#   URL:   the URL for link. '$1' is replace by keyword.
+#   style: encoding style as: 'euc-jp', 'sjis', 'jis', 'utf-8' or nil.
+#
+#   if there isn't @options['kw.dic'], the plugin links to google.
+#
+# @options['kw.show_inter']
+#   Show InterWikiName.
+#   If this options is true, the keyword 'google:foo' shows 'google:foo'.
+#   But it is false, that shows only 'foo'.
+#   The default of this option is true.
+#
+# Copyright (C) 2003, TADA Tadashi <sho@spc.gr.jp>
+# You can distribute this under GPL.
+#
+
+unless String.method_defined?(:encode)
+	require 'nkf'
+end
+
+def kw_parse( str )
+	kw_list = []
+	str.each_line do |pair|
+		k, u, s = pair.sub( /[\r\n]+/, '' ).split( /[ \t]+/, 3 )
+		k = nil if k == '' or k == 'nil'
+		s = nil if s != 'euc-jp' && s != 'sjis' && s != 'jis' && s != 'utf-8'
+		kw_list << [k, u, s] if u
+	end
+	kw_list
+end
+
+def kw_generate_dic
+	kw_dic = {nil => ['http://www.google.com/search?ie=utf-8&q=$1', 'utf-8']}
+
+	kw_list = []
+	case @conf['kw.dic'].class.to_s
+	when "String"
+		kw_list = kw_parse( @conf['kw.dic'] )
+	when "Array"
+		kw_list = @conf['kw.dic']
+	end
+	kw_list.each do |pair|
+		kw_dic[pair[0]] = pair[1..-1]
+	end
+	kw_dic
+end
+
+def kw( keyword, name = nil, title = nil )
+	@kw_dic = kw_generate_dic unless @kw_dic
+	show_inter = @options['kw.show_inter'] == nil ? true : @options['kw.show_inter']
+
+	inter, key = keyword.split( /:/, 2 )
+	unless key then
+		inter = nil
+		key = keyword
+	end
+	keyword = key unless show_inter
+	name = keyword unless name
+	title = title ? %Q[ title="#{h title}"] : ''
+
+	unless @kw_dic.has_key?(inter)
+		inter = nil
+	end
+	style = @kw_dic[inter][1]
+	if String.method_defined?(:encode)
+		if style
+			key = key.encode({'jis'=>'ISO-2022-JP', 'sjis'=>'Shift_JIS'}[style] || style)
+		end
+	else
+		key = case style
+			when 'euc-jp'
+				NKF::nkf( '-m0 -W -e', key )
+			when 'sjis'
+				NKF::nkf( '-m0 -W -s', key )
+			when 'jis'
+				NKF::nkf( '-m0 -W -j', key )
+			when 'utf-8'
+				key
+			else # none
+				key
+		end
+	end
+	%Q[<a href="#{h @kw_dic[inter][0].sub( /\$1/, u( key ))}"#{title}>#{h name}</a>]
+end
+
+#
+# config
+#
+unless @resource_loaded then
+	def kw_label
+		"キーワード"
+	end
+
+	def kw_desc
+		<<-HTML
+		<h3>リンクリストの指定</h3>
+		<p>特定のサイトへのリンクを、簡単な記述で生成するためのプラグイン(kw)です。
+		「キー URL エンコードスタイル」と空白で区切って指定します。例えば、</p>
+		<pre>google http://www.google.com/search?ie=utf-8&amp;q=$1 utf-8</pre>
+		<p>と指定すると、</p>
+		<pre>&lt;%=kw('google:tdiary')%&gt;</pre>
+		<p>のように日記に書けばgoogleでtdiaryを検索するリンクになります
+		(記述方法はスタイルによって変わります)。なお、キーにnilを指定すると、
+		「google:」の部分を書かない場合の指定ができます。</p>
+		HTML
+	end
+end
+
+add_conf_proc( 'kw', kw_label ) do
+	if @mode == 'saveconf' then
+		kw_list = kw_parse( @conf.to_native( @cgi.params['kw.dic'][0] ) )
+		if kw_list.empty? then
+			@conf.delete( 'kw.dic' )
+		else
+			@conf['kw.dic'] = kw_list.collect{|a|a.join( ' ' )}.join( "\n" )
+		end
+	end
+	dic = kw_generate_dic
+	if dic[nil] then
+		dic['nil'] = dic[nil]
+		dic.delete( nil )
+	end
+	<<-HTML
+	#{kw_desc}
+	<p><textarea name="kw.dic" cols="60" rows="10">#{h dic.collect{|a|a.flatten.join( " " )}.join( "\n" )}</textarea></p>
+	HTML
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:

data/misc/plugin/list.rb

@@ -0,0 +1,40 @@
+# -*- coding: utf-8 -*-
+# list.rb
+#
+# <ol> 順番付きリスト生成
+#   <%= ol l %>
+#   パラメタ:
+#     l: リスト文字列(\nくぎり)
+#
+# <ul> 順番無しリスト
+#   <%= ul l , t %>
+#   パラメタ:
+#     l: リスト文字列(\nくぎり)
+#
+# Copyright (c) 2002 abbey <inlet@cello.no-ip.org>
+# Distributed under the GPL.
+#
+
+def ol( l, t = nil, s = nil )
+	apply_plugin( %Q[<ol>#{li l}</ol>] )
+end
+
+def ul( l, t = nil)
+	apply_plugin( %Q[<ul>#{li l}</ul>] )
+end
+
+def li( text )
+	list = ""
+	text.each_line do |line|
+		list << ("<li>" + line.chomp + "</li>")
+	end
+	result = list
+end
+
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:

data/misc/plugin/makelirs.rb

@@ -0,0 +1,89 @@
+# -*- coding: utf-8 -*-
+# makelirs.rb
+#
+# 更新情報をLIRSフォーマットのファイルに吐き出す
+#
+#   pluginディレクトリに置くだけで動作します。
+#
+#   tdiary.confにおいて、@options['makelirs.file']に
+#   ファイル名を指定すると、そのファイルを出力先の
+#   LIRSファイルとします。無指定時にはindex.rbと同じ
+#   パスにantenna.lirsというファイルになります。
+#   いずれも、Webサーバから書き込める権限が必要です。
+#
+# Copyright (C) 2002 by Kazuhiro NISHIYAMA
+# You can redistribute it and/or modify it under GPL2.
+#
+
+add_header_proc do
+	<<-LINK
+	<!--link rel="alternate" type="application/x-lirs" title="lirs" href="#{File::basename( @options['makelirs.file'] || 'antenna.lirs' )}"-->
+	LINK
+end
+
+
+add_update_proc do
+	eval( <<-MODIFY_CLASS, TOPLEVEL_BINDING )
+		unless Time.method_defined?(:utc_offset)
+			class Time
+				def utc_offset
+					l = self.dup.localtime
+					u = self.dup.utc
+	
+					if l.year != u.year
+						off = l.year < u.year ? -1 : 1
+					elsif l.mon != u.mon
+						off = l.mon < u.mon ? -1 : 1
+					elsif l.mday != u.mday
+						off = l.mday < u.mday ? -1 : 1
+					else    
+						off = 0
+					end
+	
+					off = off * 24 + l.hour - u.hour
+					off = off * 60 + l.min - u.min
+					off = off * 60 + l.sec - u.sec
+	
+					return off
+				end
+			end
+		end
+	MODIFY_CLASS
+
+	file = @options['makelirs.file'] || 'antenna.lirs'
+
+	# create_lirs
+	cgi = @cgi.clone
+	conf = @conf.clone
+	def cgi.mobile_agent?; false; end
+	def cgi.mobile_agent?; false; end
+
+	t = TDiaryLatest::new( cgi, "latest.rhtml", conf )
+	body = t.eval_rhtml
+	# escape comma
+	e = proc{|str| str.gsub(/[,\\]/){ "\\#{$&}" }.gsub( /[\r\n]/, '' ) }
+
+	now = Time.now
+	utc_offset = now.utc_offset
+
+	uri = @index.dup
+	uri[0, 0] = base_url if %r|^https?://|i !~ @index
+	uri.gsub!( %r|/\./|, '/' )
+
+	lirs = "LIRS,#{t.last_modified.tv_sec},#{Time.now.tv_sec},#{utc_offset},#{body.size},#{e[uri]},#{e[@html_title]},#{e[@author_name]},,\n"
+	File::open( file, 'w' ) do |o|
+		o.puts lirs
+	end
+	begin
+		File::utime( t.last_modified.tv_sec, t.last_modified.tv_sec, file )
+	rescue
+	end
+end
+
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:

data/misc/plugin/makerss.rb

@@ -0,0 +1,744 @@
+# makerss.rb
+#
+# generate RSS file when updating.
+#
+# options configurable through settings:
+#   @conf['makerss.hidecontent'] : hide full-text content. default: false
+#   @conf['makerss.shortdesc'] : shorter description. default: false
+#   @conf['makerss.comment_link'] : insert tsukkomi's link. default: false
+#
+# options to be edited in tdiary.conf:
+#   @conf['makerss.file']  : local file name of RSS file. default: 'index.rdf'.
+#   @conf['makerss.url']   : URL of RSS file.
+#   @conf['makerss.no_comments.file']  : local file name of RSS file without
+#                            comments. default: 'no_comments.rdf'.
+#   @conf['makerss.no_comments.url']   : URL of RSS file without TSUKOMI.
+#   @conf.banner           : URL of site banner image (can be relative)
+#   @conf.description      : desciption of the diary
+#   @conf['makerss.partial'] : how much portion of body to be in description
+#                            used when makerss.shortdesc, default: 0.25
+#   @conf['makerss.suffix'] : strings which are appended to the title tag.
+#   @conf['makerss.no_comments.suffix'] : strings which are appended to
+#                            the title tag of the commentless rdf.
+#
+#   CAUTION: Before using, make 'index.rdf' and 'no_comments.rdf' file
+#            into the directory of your diary, and permit writable to httpd.
+#
+# Copyright (c) 2009 TADA Tadashi <t@tdtds.jp>
+# Distributed under the GPL
+#
+
+if /^append|replace|comment|showcomment$/ =~ @mode then
+	unless @conf.description
+		@conf.description = @conf['whatsnew_list.rdf.description']
+	end
+	module ::TDiary
+		class RDFSection
+			attr_reader :id, :time, :section, :diary_title
+
+			# 'id' has 'YYYYMMDDpNN' format (p or c).
+			# 'time' is Last-Modified this section as a Time object.
+			def initialize( id, time, section )
+				@id, @time, @section, @diary_title = id, time, section, diary_title
+			end
+
+			def time_string
+				g = @time.dup.gmtime
+				l = Time::local( g.year, g.month, g.day, g.hour, g.min, g.sec )
+				tz = (g.to_i - l.to_i)
+				zone = sprintf( "%+03d:%02d", tz / 3600, tz % 3600 / 60 )
+				@time.strftime( "%Y-%m-%dT%H:%M:%S" ) + zone
+			end
+
+			def <=>( other )
+				other.time <=> @time
+			end
+		end
+	end
+end
+
+@makerss_rsses = @makerss_rsses || []
+
+class MakeRssFull
+	include ERB::Util
+	include TDiary::ViewHelper
+
+	def initialize(conf, cgi = CGI.new)
+		@conf, @cgi = conf, cgi
+		@item_num = 0
+	end
+
+	def title
+		@conf['makerss.suffix'] || ''
+	end
+
+	def head( str )
+		@head = str
+		@head.sub!( /<\/title>/, "#{h title}</title>" )
+	end
+
+	def foot( str ); @foot = str; end
+	def image( str ); @image = str; end
+	def banner( str ); @banner = str; end
+
+	def item( seq, body, rdfsec )
+		@item_num += 1
+		return if @item_num > 15
+		@seq = '' unless @seq
+		@seq << seq
+		@body = '' unless @body
+		@body << body
+	end
+
+	def xml
+		xml = @head.to_s
+		xml << @image.to_s
+		xml << "<items><rdf:Seq>\n"
+		xml << @seq.to_s
+		xml << "</rdf:Seq></items>\n</channel>\n"
+		xml << @banner.to_s
+		xml << @body.to_s
+		xml << @foot.to_s
+		xml.gsub( /[\x00-\x1f]/ ){|s| s =~ /[\r\n\t]/ ? s : ""}
+	end
+
+	def file
+		f = @conf['makerss.file'] || 'index.rdf'
+		f = 'index.rdf' if f.empty?
+		f =~ %r|^/| ? f : "#{TDiary.document_root}/#{f}"
+	end
+
+	def writable?
+		if FileTest::writable?( file ) then
+			return true
+		elsif FileTest::exist?( file )
+			return false
+		else # try to create
+			begin
+				File::open( file, 'w' ){|f|}
+				return true
+			rescue
+				return false
+			end
+		end
+	end
+
+	def write( encoder )
+		begin
+			File::open( file, 'w' ) do |f|
+				f.write( encoder.call( xml ) )
+			end
+		rescue
+		end
+	end
+
+	def url
+		u = @conf['makerss.url'] || "#{base_url}#{File.basename(file)}"
+		u = "#{base_url}#{File.basename(file)}" if u.empty?
+		u
+	end
+end
+
+@makerss_rsses << MakeRssFull::new(@conf, @cgi)
+
+class MakeRssNoComments < MakeRssFull
+	def title
+		@conf['makerss.no_comments.suffix'] || '(without comments)'
+	end
+
+	def item( seq, body, rdfsec )
+		return unless rdfsec.section.respond_to?( :body_to_html )
+		super
+	end
+
+	def file
+		f = @conf['makerss.no_comments.file'] || 'no_comments.rdf'
+		f = 'no_comments.rdf' if f.empty?
+		f =~ %r|^/| ? f : "#{TDiary.document_root}/#{f}"
+	end
+
+	def write( encoder )
+		return unless @conf['makerss.no_comments']
+		super( encoder )
+	end
+
+	def url
+		return nil unless @conf['makerss.no_comments']
+		u = @conf['makerss.no_comments.url'] || "#{base_url}#{File.basename(file)}"
+		u = "#{base_url}#{File.basename(file)}" if u.empty?
+		u
+	end
+end
+
+@makerss_rsses << MakeRssNoComments::new(@conf, @cgi)
+
+def makerss_update
+	date = @date.strftime( "%Y%m%d" )
+	diary = @diaries[date]
+
+	uri = @conf.index.dup
+	uri[0, 0] = base_url if %r|^https?://|i !~ @conf.index
+	uri.gsub!( %r|/\./|, '/' )
+
+	require 'pstore'
+	cache = {}
+	rsses = @makerss_rsses
+
+	begin
+		PStore::new( "#{@cache_path}/makerss.cache" ).transaction do |db|
+			begin
+				cache = db['cache'] if db.root?( 'cache' )
+
+				if /^append|replace$/ =~ @mode then
+					format = "#{date}p%02d"
+					index = 0
+					diary.each_section do |section|
+						index += 1
+						id = format % index
+						if diary.visible? and !cache[id] then
+							cache[id] = RDFSection::new( id, Time::now, section )
+						elsif !diary.visible? and cache[id]
+							cache.delete( id )
+						elsif diary.visible? and cache[id]
+							if cache[id].section.body_to_html != section.body_to_html or
+									cache[id].section.subtitle_to_html != section.subtitle_to_html then
+								cache[id] = RDFSection::new( id, Time::now, section )
+							end
+						end
+					end
+
+					loop do
+						index += 1
+						id = format % index
+						if cache[id] then
+							cache.delete( id )
+						else
+							break
+						end
+					end
+				elsif /^comment$/ =~ @mode and @conf.show_comment
+					id = "#{date}c%02d" % diary.count_comments( true )
+					cache[id] = RDFSection::new( id, @comment.date, @comment )
+				elsif /^showcomment$/ =~ @mode
+					index = 0
+					diary.each_comment do |comment|
+						index += 1
+						id = "#{date}c%02d" % index
+						if !cache[id] and (@conf.show_comment and comment.visible? and /^(TrackBack|Pingback)$/i !~ comment.name) then
+							cache[id] = RDFSection::new( id, comment.date, comment )
+						elsif cache[id] and !(@conf.show_comment and comment.visible? and /^(TrackBack|Pingback)$/i !~ comment.name)
+							cache.delete( id )
+						end
+					end
+				end
+
+				rsses.each{|rss| rss.head( makerss_header( uri ) ) }
+				cache.values.sort{|a,b| b.time <=> a.time}.each_with_index do |rdfsec, idx|
+					unless rdfsec.section.respond_to?( :visible? ) and !rdfsec.section.visible?
+						rsses.each {|rss|
+							rss.item( makerss_seq( uri, rdfsec ), makerss_body( uri, rdfsec ), rdfsec )
+						}
+					end
+					if idx > 50
+						cache.delete( rdfsec.id )
+					end
+				end
+
+				db['cache'] = cache
+			rescue PStore::Error
+			end
+		end
+	rescue ArgumentError
+		File.unlink( "#{@cache_path}/makerss.cache" )
+		retry
+	end
+
+	if @conf.banner and not @conf.banner.empty?
+		if /^http/ =~ @conf.banner
+			rdf_image = @conf.banner
+		else
+			rdf_image = base_url + @conf.banner
+		end
+		rsses.each {|r| r.image( %Q[<image rdf:resource="#{h rdf_image}" />\n] ) }
+	end
+
+	rsses.each {|r|
+		r.banner( makerss_banner( uri, rdf_image ) ) if rdf_image
+		r.foot( makerss_footer )
+		r.write( Proc::new{|s| replace_entities( to_utf8( s ) )} )
+	}
+end
+
+def makerss_header( uri )
+	rdf_url = @conf['makerss.url'] || "#{base_url}index.rdf"
+	rdf_url = "#{base_url}index.rdf" if rdf_url.empty?
+
+	desc = @conf.description || ''
+
+	copyright = Time::now.strftime( "Copyright %Y #{@conf.author_name}" )
+	copyright += " <#{@conf.author_mail}>" if @conf.author_mail and not @conf.author_mail.empty?
+	copyright += ", copyright of comments by respective authors"
+
+	xml = %Q[<?xml version="1.0" encoding="UTF-8"?>
+<?xml-stylesheet href="rss.css" type="text/css"?>
+<rdf:RDF xmlns="http://purl.org/rss/1.0/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:xhtml="http://www.w3.org/1999/xhtml" xml:lang="#{h @conf.html_lang}">
+	<channel rdf:about="#{h rdf_url}">
+	<title>#{h @conf.html_title}</title>
+	<link>#{h uri}</link>
+	<xhtml:link xhtml:rel="alternate" xhtml:media="handheld" xhtml:type="text/html" xhtml:href="#{h uri}" />
+	<description>#{h desc}</description>
+	<dc:creator>#{h @conf.author_name}</dc:creator>
+	<dc:rights>#{h copyright}</dc:rights>
+	]
+end
+
+def makerss_seq( uri, rdfsec )
+	%Q|<rdf:li rdf:resource="#{h uri}#{anchor rdfsec.id}"/>\n|
+end
+
+def makerss_banner( uri, rdf_image )
+	%Q[<image rdf:about="#{h rdf_image}">
+	<title>#{h @conf.html_title}</title>
+	<url>#{h rdf_image}</url>
+	<link>#{h uri}</link>
+	</image>
+	]
+end
+
+def makerss_desc_shorten( text )
+	if @conf['makerss.shortdesc'] then
+		@conf['makerss.partial'] = 0.25 unless @conf['makerss.partial']
+		len = ( text.size.to_f * @conf['makerss.partial'] ).ceil.to_i
+		len = 500 if len > 500
+	else
+		len = 500
+	end
+	@conf.shorten( text, len )
+end
+
+def feed?
+	@makerss_in_feed
+end
+
+def makerss_body( uri, rdfsec )
+	rdf = ""
+	if rdfsec.section.respond_to?( :body_to_html ) then
+		rdf = %Q|<item rdf:about="#{h uri}#{anchor rdfsec.id}">\n|
+		rdf << %Q|<link>#{h uri}#{anchor rdfsec.id}</link>\n|
+		rdf << %Q|<xhtml:link xhtml:rel="alternate" xhtml:media="handheld" xhtml:type="text/html" xhtml:href="#{h uri}#{anchor rdfsec.id}" />\n|
+		rdf << %Q|<dc:date>#{h rdfsec.time_string}</dc:date>\n|
+		a = rdfsec.id.scan( /(\d{4})(\d\d)(\d\d)/ ).flatten.map{|s| s.to_i}
+		date = Time::local( *a )
+		old_apply_plugin = @conf['apply_plugin']
+		@conf['apply_plugin'] = true
+
+		@makerss_in_feed = true
+		subtitle = rdfsec.section.subtitle_to_html
+		sec_id = rdfsec.id[9,2].to_i
+		body_enter = body_enter_proc( date )
+		body = apply_plugin( rdfsec.section.body_to_html )
+		body_leave = body_leave_proc( date )
+		@makerss_in_feed = false
+
+		sub = (subtitle || '').sub( /^(\[([^\]]+)\])+ */, '' )
+		sub = apply_plugin( sub, true ).strip
+		if sub.empty?
+			sub = @conf.shorten( remove_tag( body ).strip, 20 )
+		end
+		rdf << %Q|<title>#{sub}</title>\n|
+		rdf << %Q|<dc:creator>#{h @conf.author_name}</dc:creator>\n|
+		unless rdfsec.section.categories.empty?
+			rdfsec.section.categories.each do |category|
+				rdf << %Q|<dc:subject>#{h category}</dc:subject>\n|
+			end
+		end
+		desc = remove_tag( body ).strip
+		desc.gsub!( /&.*?;/, '' )
+		rdf << %Q|<description>#{h makerss_desc_shorten( desc )}</description>\n|
+		unless @conf['makerss.hidecontent']
+			text = ''
+			text << '<h3>' + apply_plugin( subtitle.sub( /^(\[([^\]]+)\])+ */, '' ) ).strip + '</h3>' if subtitle and not subtitle.empty?
+			text << body_enter
+			text << body
+			text << body_leave
+			unless text.empty?
+				uri = @conf.index.dup
+				uri[0, 0] = base_url unless %r|^https?://|i =~ uri
+				uri.gsub!( %r|/\./|, '/' )
+				text = absolutify( text, uri )
+				text.gsub!( /\]\]>/, ']]]]><![CDATA[>' )
+				rdf << %Q|<content:encoded><![CDATA[#{text}|
+				unless @conf['makerss.comment_link']
+					ymd = date.strftime( "%Y%m%d" )
+					rdf << %Q|\n<p><a href="#{h uri}#{anchor "#{ymd}c"}">#{comment_new}</a></p>|
+				end
+				rdf << %Q|]]></content:encoded>\n|
+			end
+		end
+
+		@conf['apply_plugin'] = old_apply_plugin
+		rdf << "</item>\n"
+	else # TSUKKOMI
+		rdf = %Q|<item rdf:about="#{h uri}#{anchor rdfsec.id}">\n|
+		rdf << %Q|<link>#{h uri}#{anchor rdfsec.id}</link>\n|
+		rdf << %Q|<dc:date>#{h rdfsec.time_string}</dc:date>\n|
+		rdf << %Q|<title>#{makerss_tsukkomi_label( rdfsec.id )} (#{h rdfsec.section.name})</title>\n|
+		rdf << %Q|<dc:creator>#{h rdfsec.section.name}</dc:creator>\n|
+		text = rdfsec.section.body
+		rdf << %Q|<description>#{h makerss_desc_shorten( text )}</description>\n|
+		unless @conf['makerss.hidecontent']
+			rdf << %Q|<content:encoded><![CDATA[#{text.make_link.gsub( /\n/, '<br>' ).gsub( /<br><br>\Z/, '' ).gsub( /\]\]>/, ']]]]><![CDATA[>' )}]]></content:encoded>\n|
+		end
+		rdf << "</item>\n"
+	end
+	rdf
+end
+
+def makerss_footer
+	"</rdf:RDF>\n"
+end
+
+add_update_proc do
+	makerss_update unless @cgi.params['makerss_update'][0] == 'false'
+end
+
+add_header_proc {
+	html = ''
+	@makerss_rsses.each do |rss|
+		next unless rss.url
+		html << %Q|\t<link rel="alternate" type="application/rss+xml" title="RSS#{h rss.title}" href="#{h rss.url}">\n|
+	end
+	html
+}
+
+add_conf_proc( 'makerss', @makerss_conf_label, 'update' ) do
+	if @mode == 'saveconf' then
+		%w( hidecontent shortdesc comment_link no_comments).each do |s|
+			item = "makerss.#{s}"
+			@conf[item] = ( 't' == @cgi.params[item][0] )
+		end
+	end
+
+	@makerss_rsses.each do |rss|
+		if rss.class == MakeRssFull then
+			@makerss_full = rss
+		elsif rss.class == MakeRssNoComments
+			@makerss_no_comments = rss
+		end
+	end
+	makerss_conf_html
+end
+
+add_edit_proc do
+	checked = if @cgi.params['makerss_update'][0] == 'false' then
+		' checked'
+	elsif @date < (Time::now - 30*24*60*60) # older over a month
+		' checked'
+	else
+		''
+	end
+	r = <<-HTML
+	<div class="makerss"><label for="makerss_update">
+	<input type="checkbox" id="makerss_update" name="makerss_update" value="false"#{checked} tabindex="390">
+	#{@makerss_edit_label}
+	</label></div>
+	HTML
+end
+
+def replace_entities( text )
+	unless @xml_entity_table then
+		@xml_entity_table = {
+			'&nbsp;' => '&#160;',
+			'&iexcl;' => '&#161;',
+			'&cent;' => '&#162;',
+			'&pound;' => '&#163;',
+			'&curren;' => '&#164;',
+			'&yen;' => '&#165;',
+			'&brvbar;' => '&#166;',
+			'&sect;' => '&#167;',
+			'&uml;' => '&#168;',
+			'&copy;' => '&#169;',
+			'&ordf;' => '&#170;',
+			'&laquo;' => '&#171;',
+			'&not;' => '&#172;',
+			'&shy;' => '&#173;',
+			'&reg;' => '&#174;',
+			'&macr;' => '&#175;',
+			'&deg;' => '&#176;',
+			'&plusmn;' => '&#177;',
+			'&sup2;' => '&#178;',
+			'&sup3;' => '&#179;',
+			'&acute;' => '&#180;',
+			'&micro;' => '&#181;',
+			'&para;' => '&#182;',
+			'&middot;' => '&#183;',
+			'&cedil;' => '&#184;',
+			'&sup1;' => '&#185;',
+			'&ordm;' => '&#186;',
+			'&raquo;' => '&#187;',
+			'&frac14;' => '&#188;',
+			'&frac12;' => '&#189;',
+			'&frac34;' => '&#190;',
+			'&iquest;' => '&#191;',
+			'&Agrave;' => '&#192;',
+			'&Aacute;' => '&#193;',
+			'&Acirc;' => '&#194;',
+			'&Atilde;' => '&#195;',
+			'&Auml;' => '&#196;',
+			'&Aring;' => '&#197;',
+			'&Aelig;' => '&#198;',
+			'&Ccedil;' => '&#199;',
+			'&Egrave;' => '&#200;',
+			'&Eacute;' => '&#201;',
+			'&Ecirc;' => '&#202;',
+			'&Euml;' => '&#203;',
+			'&Igrave;' => '&#204;',
+			'&Iacute;' => '&#205;',
+			'&Icirc;' => '&#206;',
+			'&Iuml;' => '&#207;',
+			'&ETH;' => '&#208;',
+			'&Ntilde;' => '&#209;',
+			'&Ograve;' => '&#210;',
+			'&Oacute;' => '&#211;',
+			'&Ocirc;' => '&#212;',
+			'&Otilde;' => '&#213;',
+			'&Ouml;' => '&#214;',
+			'&times;' => '&#215;',
+			'&Oslash;' => '&#216;',
+			'&Ugrave;' => '&#217;',
+			'&Uacute;' => '&#218;',
+			'&Ucirc;' => '&#219;',
+			'&Uuml;' => '&#220;',
+			'&Yacute;' => '&#221;',
+			'&THORN;' => '&#222;',
+			'&szlig;' => '&#223;',
+			'&agrave;' => '&#224;',
+			'&aacute;' => '&#225;',
+			'&acirc;' => '&#226;',
+			'&atilde;' => '&#227;',
+			'&auml;' => '&#228;',
+			'&aring;' => '&#229;',
+			'&aelig;' => '&#230;',
+			'&ccedil;' => '&#231;',
+			'&egrave;' => '&#232;',
+			'&eacute;' => '&#233;',
+			'&ecirc;' => '&#234;',
+			'&euml;' => '&#235;',
+			'&igrave;' => '&#236;',
+			'&iacute;' => '&#237;',
+			'&icirc;' => '&#238;',
+			'&iuml;' => '&#239;',
+			'&eth;' => '&#240;',
+			'&ntilde;' => '&#241;',
+			'&ograve;' => '&#242;',
+			'&oacute;' => '&#243;',
+			'&ocirc;' => '&#244;',
+			'&otilde;' => '&#245;',
+			'&ouml;' => '&#246;',
+			'&divide;' => '&#247;',
+			'&oslash;' => '&#248;',
+			'&ugrave;' => '&#249;',
+			'&uacute;' => '&#250;',
+			'&ucirc;' => '&#251;',
+			'&uuml;' => '&#252;',
+			'&yacute;' => '&#253;',
+			'&thorn;' => '&#254;',
+			'&yuml;' => '&#255;',
+			'&oelig;' => '&#338;',
+			'&oelig;' => '&#339;',
+			'&scaron;' => '&#352;',
+			'&scaron;' => '&#353;',
+			'&yuml;' => '&#376;',
+			'&circ;' => '&#710;',
+			'&tilde;' => '&#732;',
+			'&ensp;' => '&#8194;',
+			'&emsp;' => '&#8195;',
+			'&thinsp;' => '&#8201;',
+			'&zwnj;' => '&#8204;',
+			'&zwj;' => '&#8205;',
+			'&lrm;' => '&#8206;',
+			'&rlm;' => '&#8207;',
+			'&ndash;' => '&#8211;',
+			'&mdash;' => '&#8212;',
+			'&lsquo;' => '&#8216;',
+			'&rsquo;' => '&#8217;',
+			'&sbquo;' => '&#8218;',
+			'&ldquo;' => '&#8220;',
+			'&rdquo;' => '&#8221;',
+			'&bdquo;' => '&#8222;',
+			'&dagger;' => '&#8224;',
+			'&Dagger;' => '&#8225;',
+			'&permil;' => '&#8240;',
+			'&lsaquo;' => '&#8249;',
+			'&rsaquo;' => '&#8250;',
+			'&euro;' => '&#8364;',
+			'&fnof;' => '&#402;',
+			'&Alpha;' => '&#913;',
+			'&Beta;' => '&#914;',
+			'&Gamma;' => '&#915;',
+			'&Delta;' => '&#916;',
+			'&Epsilon;' => '&#917;',
+			'&Zeta;' => '&#918;',
+			'&Eta;' => '&#919;',
+			'&Theta;' => '&#920;',
+			'&Iota;' => '&#921;',
+			'&Kappa;' => '&#922;',
+			'&Lambda;' => '&#923;',
+			'&Mu;' => '&#924;',
+			'&Nu;' => '&#925;',
+			'&Xi;' => '&#926;',
+			'&Omicron;' => '&#927;',
+			'&Pi;' => '&#928;',
+			'&Rho;' => '&#929;',
+			'&Sigma;' => '&#931;',
+			'&Tau;' => '&#932;',
+			'&Upsilon;' => '&#933;',
+			'&Phi;' => '&#934;',
+			'&Chi;' => '&#935;',
+			'&Psi;' => '&#936;',
+			'&Omega;' => '&#937;',
+			'&alpha;' => '&#945;',
+			'&beta;' => '&#946;',
+			'&gamma;' => '&#947;',
+			'&delta;' => '&#948;',
+			'&epsilon;' => '&#949;',
+			'&zeta;' => '&#950;',
+			'&eta;' => '&#951;',
+			'&theta;' => '&#952;',
+			'&iota;' => '&#953;',
+			'&kappa;' => '&#954;',
+			'&lambda;' => '&#955;',
+			'&mu;' => '&#956;',
+			'&nu;' => '&#957;',
+			'&xi;' => '&#958;',
+			'&omicron;' => '&#959;',
+			'&pi;' => '&#960;',
+			'&rho;' => '&#961;',
+			'&sigmaf;' => '&#962;',
+			'&sigma;' => '&#963;',
+			'&tau;' => '&#964;',
+			'&upsilon;' => '&#965;',
+			'&phi;' => '&#966;',
+			'&chi;' => '&#967;',
+			'&psi;' => '&#968;',
+			'&omega;' => '&#969;',
+			'&thetasym;' => '&#977;',
+			'&upsih;' => '&#978;',
+			'&piv;' => '&#982;',
+			'&bull;' => '&#8226;',
+			'&hellip;' => '&#8230;',
+			'&prime;' => '&#8242;',
+			'&prime;' => '&#8243;',
+			'&oline;' => '&#8254;',
+			'&frasl;' => '&#8260;',
+			'&weierp;' => '&#8472;',
+			'&image;' => '&#8465;',
+			'&real;' => '&#8476;',
+			'&trade;' => '&#8482;',
+			'&alefsym;' => '&#8501;',
+			'&larr;' => '&#8592;',
+			'&rarr;' => '&#8594;',
+			'&darr;' => '&#8595;',
+			'&harr;' => '&#8596;',
+			'&crarr;' => '&#8629;',
+			'&lArr;' => '&#8656;',
+			'&uArr;' => '&#8657;',
+			'&rArr;' => '&#8658;',
+			'&dArr;' => '&#8659;',
+			'&hArr;' => '&#8660;',
+			'&forall;' => '&#8704;',
+			'&part;' => '&#8706;',
+			'&exist;' => '&#8707;',
+			'&empty;' => '&#8709;',
+			'&nabla;' => '&#8711;',
+			'&isin;' => '&#8712;',
+			'&notin;' => '&#8713;',
+			'&ni;' => '&#8715;',
+			'&prod;' => '&#8719;',
+			'&sum;' => '&#8721;',
+			'&minus;' => '&#8722;',
+			'&lowast;' => '&#8727;',
+			'&radic;' => '&#8730;',
+			'&prop;' => '&#8733;',
+			'&infin;' => '&#8734;',
+			'&ang;' => '&#8736;',
+			'&and;' => '&#8743;',
+			'&or;' => '&#8744;',
+			'&cap;' => '&#8745;',
+			'&cup;' => '&#8746;',
+			'&int;' => '&#8747;',
+			'&there4;' => '&#8756;',
+			'&sim;' => '&#8764;',
+			'&cong;' => '&#8773;',
+			'&asymp;' => '&#8776;',
+			'&ne;' => '&#8800;',
+			'&equiv;' => '&#8801;',
+			'&le;' => '&#8804;',
+			'&ge;' => '&#8805;',
+			'&sub;' => '&#8834;',
+			'&sup;' => '&#8835;',
+			'&nsub;' => '&#8836;',
+			'&sube;' => '&#8838;',
+			'&supe;' => '&#8839;',
+			'&oplus;' => '&#8853;',
+			'&otimes;' => '&#8855;',
+			'&perp;' => '&#8869;',
+			'&sdot;' => '&#8901;',
+			'&lceil;' => '&#8968;',
+			'&rceil;' => '&#8969;',
+			'&lfloor;' => '&#8970;',
+			'&rfloor;' => '&#8971;',
+			'&lang;' => '&#9001;',
+			'&rang;' => '&#9002;',
+			'&loz;' => '&#9674;',
+			'&spades;' => '&#9824;',
+			'&clubs;' => '&#9827;',
+			'&hearts;' => '&#9829;',
+			'&diams;' => '&#9830;'
+		}
+	end
+	text.gsub( /&[a-z]+;/im ) do |e|
+		@xml_entity_table[e] || e
+	end
+end
+
+# Copied from below which includes some tests
+# http://github.com/zunda/ruby-absolutify/tree/master
+def absolutify(html, baseurl)
+	@@_absolutify_attr_regexp ||= Hash.new
+	baseuri = URI.parse(URI.encode(baseurl))
+	r = html.gsub(%r|<\S[^>]*/?>|) do |tag|
+		type = tag.scan(/\A<(\S+)/)[0][0].downcase
+		if attr = {'a' => 'href', 'img' => 'src'}[type]
+			@@_absolutify_attr_regexp[attr] ||= %r|(.*#{attr}\s*=\s*)(['"]?)([^\2>]+?)(\2.*)|im
+			m = tag.match(@@_absolutify_attr_regexp[attr])
+			unless m.nil?
+				prefix = m[1] + m[2]
+				location = m[3]
+				postfix = m[4]
+				begin
+					uri = URI.parse(location)
+					if uri.relative?
+						location = (baseuri + location).to_s
+					elsif not uri.host and uri.path
+						path = uri.path
+						path += '?' + uri.query if uri.query
+						path += '#' + uri.fragment if uri.fragment
+						location = (baseuri + path).to_s
+					end
+					tag = prefix + location + postfix
+				rescue URI::InvalidURIError
+				end
+			end
+		end
+		tag
+	end
+	return r
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End: