tdiary 3.2.2.20130507

data/misc/plugin/whatsnew.rb

@@ -0,0 +1,100 @@
+# -*- coding: utf-8 -*-
+# whatsnew.rb
+#
+# 名称：
+# What's Newプラグイン
+#
+# 概要：
+# 未読のセクションに指定したマークをつけることができます．
+#
+# 使い方：
+# tdiary.conf の @section_anchor の先頭に以下のように <%= whats_new %> を追加します．
+#
+#   @section_anchor = '<%= whats_new %><span class="sanchor">_</span>'
+#
+# セクションの未読/既読によって <%= whats_new %> の部分があらかじめ指
+# 定したマークで置き換えられます．デフォルトでは未読セクションでは
+# "!!!NEW!!!"，既読セクションでは "" に展開されます．
+#
+# 注：Revision が 1.1 の whats_new.rb の説明では，<span> の中に
+#     <%= whats_new %> を含めるように書いていましたが，sanchorで画像を
+#     表示するようなテーマでは，whats_new の出力と sanchor の画像が重
+#     なってしまうという問題がありました．
+#     この変更に伴い，既読時のデフォルトは '' に変更しました．
+#
+# 置き換えられる文字列を変更したい場合は tdiary.conf 中で
+#
+#   @options['whats_new.new_mark'] = '<img src="/Images/new.png" alt="NEW!" border="0">'
+#   @options['whats_new.read_mark'] = '既'
+#
+# のように指定します．
+#
+# Copyright (c) 2002 Junichiro KITA <kita@kitaj.no-ip.com>
+# Distributed under the GPL
+#
+
+@whats_new = {}.taint
+
+def whats_new
+	return apply_plugin( @whats_new[:read_mark] ) unless @cgi
+	@whats_new[:section] += 1
+	t = @whats_new[:current_date] + "%03d" % @whats_new[:section]
+	if t > @whats_new[:this_time]
+		@whats_new[:this_time] = t
+	end
+	# 初回もしくは cookie を使わない設定の場合は機能しない
+	return apply_plugin( @whats_new[:read_mark] ) if @whats_new[:last_time] == "00000000000"
+	if t > @whats_new[:last_time]
+		apply_plugin( @whats_new[:new_mark] )
+	else
+		apply_plugin( @whats_new[:read_mark] )
+	end
+end
+
+add_body_enter_proc do |date|
+	if @cgi
+		@whats_new[:current_date] = Time::at(date).strftime('%Y%m%d')
+		@whats_new[:section] = 0
+		@whats_new[:last_time]
+	end
+	""
+end
+
+add_header_proc do
+	if @cgi
+		if @cgi.cookies['tdiary_whats_new'][0]
+			@whats_new[:this_time] = @whats_new[:last_time] = @cgi.cookies['tdiary_whats_new'][0]
+		else
+			# 初めて，もしくは cookie は使わない設定
+			@whats_new[:this_time] = @whats_new[:last_time] = "00000000000"
+		end
+		@whats_new[:new_mark] = @options['whats_new.new_mark'] || '!!!new!!!'
+		@whats_new[:read_mark] = @options['whats_new.read_mark'] || ''
+	end
+	""
+end
+
+add_footer_proc do
+	if @cgi.script_name
+		if @whats_new[:this_time] > @whats_new[:last_time]
+			cookie_path = File::dirname(@cgi.script_name)
+			cookie_path += '/' if cookie_path !~ /\/$/
+			cookie = CGI::Cookie::new({
+				'name' => 'tdiary_whats_new',
+				'value' => [@whats_new[:this_time]],
+				'path' => cookie_path,
+				'expires' => Time::now.gmtime + 90*24*60*60 
+			})
+			add_cookie(cookie)
+		end
+	end
+	""
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:
+# vim: ts=3

data/misc/plugin/xmlrpc.rb

@@ -0,0 +1,80 @@
+# xmlrpc.rb
+#
+# XML-RPC API
+#
+# Copyright (c) 2004 MoonWolf <moonwolf@moonwolf.com>
+# Distributed under the GPL
+#
+
+add_header_proc do
+  %Q!\t<link rel="EditURI" type="application/rsd+xml" title="RSD" href="#{h base_url}rsd.xml" />\n!
+end
+
+add_conf_proc('XMLRPC', 'XML-RPC API') do
+	saveconf_xmlrpc
+	xmlrpc_init
+
+	<<-HTML
+	<h3 class="subtitle">#{label_xmlrpc_url}</h3>
+	<p><input type="text" name="xmlrpc.url" value="#{h @conf['xmlrpc.url']}" size="100"></p>
+	<h3 class="subtitle">#{label_xmlrpc_blogid}</h3>
+	<p><input type="text" name="xmlrpc.blogid" value="#{h @conf['xmlrpc.blogid']}" size="20"></p>
+	<h3 class="subtitle">#{label_xmlrpc_username}</h3>
+	<p><input type="text" name="xmlrpc.username" value="#{h @conf['xmlrpc.username']}" size="20"></p>
+	<h3 class="subtitle">#{label_xmlrpc_password}</h3>
+	<p><input type="password" name="xmlrpc.password" value="#{h @conf['xmlrpc.password']}" size="20"></p>
+	<h3 class="subtitle">#{label_xmlrpc_lastname}</h3>
+	<p><input type="text" name="xmlrpc.lastname" value="#{h @conf['xmlrpc.lastname']}" size="20"></p>
+	<h3 class="subtitle">#{label_xmlrpc_firstname}</h3>
+	<p><input type="text" name="xmlrpc.firstname" value="#{h @conf['xmlrpc.firstname']}" size="20"></p>
+	<h3 class="subtitle">#{label_xmlrpc_userid}</h3>
+	<p><input type="text" name="xmlrpc.userid" value="#{h @conf['xmlrpc.userid']}" size="20"></p>
+	HTML
+end
+
+#
+# for conf_proc
+#
+def xmlrpc_init
+  @conf['xmlrpc.url']       ||= base_url + 'xmlrpc.rb'
+  @conf['xmlrpc.blogid']    ||= 'devlog'
+  @conf['xmlrpc.username']  ||= 'default'
+  @conf['xmlrpc.password']  ||= ''
+  @conf['xmlrpc.lastname']  ||= ''
+  @conf['xmlrpc.firstname'] ||= 'default'
+  @conf['xmlrpc.userid']    ||= 'default'
+end
+
+def saveconf_xmlrpc
+  if @mode == 'saveconf' then
+    @conf['xmlrpc.url']       = @cgi.params['xmlrpc.url'][0] || 'xmlrpc.rb'
+    @conf['xmlrpc.blogid']    = @cgi.params['xmlrpc.blogid'][0] || 'default'
+    @conf['xmlrpc.username']  = @cgi.params['xmlrpc.username'][0] || 'default'
+    @conf['xmlrpc.password']  = @cgi.params['xmlrpc.password'][0] || ''
+    @conf['xmlrpc.lastname']  = @cgi.params['xmlrpc.lastname'][0] || ''
+    @conf['xmlrpc.firstname'] = @cgi.params['xmlrpc.firstname'][0] || 'default'
+    @conf['xmlrpc.userid']    = @cgi.params['xmlrpc.userid'][0] || 'default'
+    open('rsd.xml','w') {|f|
+      f.write <<-EOS
+      <rsd version="1.0">
+        <service>
+          <engineName>tDiary</engineName>
+          <engineLink>http://www.tdiary.org/</engineLink>
+          <homePageLink>#{h base_url}</homePageLink>
+          <apis>
+          <api name="MetaWeblog" preferred="true" apiLink="#{h @conf['xmlrpc.url']}" blogID="#{h @conf['xmlrpc.blogid']}"/>
+          <api name="Blogger" preferred="false" apiLink="#{h @conf['xmlrpc.url']}" blogID="#{h @conf['xmlrpc.blogid']}"/>
+          </apis>
+        </service>
+      </rsd>
+      EOS
+    }
+  end
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:

data/misc/plugin/xmlrpc/README

@@ -0,0 +1,20 @@
+!機能
+
+blogger API/metaWeblog API/MovableType APIでのtDiaryの更新ができます。
+
+!インストール方法
+xmlrpc.rb,ja/xmlrpc.rb,en/xmlrpc.rb,zh/xmlrpc.rbをpluginディレクトリにコピーします。
+xmlrpc/xmlrpc.rbをtDiaryのインストールされているディレクトリ(index.rbなどと同じディレクトリ)にコピーします。xmlrpc.rbのパーミッションは、755などに変更する必要があります。
+index.rbを設置したディレクトリにrsd.xmlというファイルを作成し、CGIから書き換えられるように書き込み権限を設定します。
+
+!使用方法
+
+設定画面から'XML-RPC API'を選択してXML-RPC APIの設定を行いOKボタンをクリックします。
+
+あとはblogger API/metaWeblog API/MovableType APIに対応したツールからアクセスします。
+たとえばubicast BloggerだとXMl-RPCエンドポイントという設定にはxmlrpc.rbのURLを指定します。
+
+  (MovableTypeの場合) http://<youdomain>/<path>/mt-xmlrpc.cgi
+  (xmlrpc.rbの場合)   http://<youdomain>/<path>/xmlrpc.rb
+
+rsd.xmlに対応したクライアントならサイトのトップページのURLを指定すればOKです。

data/misc/plugin/xmlrpc/xmlrpc.rb

@@ -0,0 +1,575 @@
+#!/usr/bin/env ruby
+# xmlrpc.rb
+#
+# Copyright (c) 2004 MoonWolf <moonwolf@moonwolf.com>
+# Distributed under the GPL
+#
+# require Ruby1.8 or xml-rpc(http://raa.ruby-lang.org/project/xml-rpc/)
+
+BEGIN { $stdout.binmode }
+$KCODE = 'n'
+
+if FileTest::symlink?( __FILE__ ) then
+  org_path = File::dirname( File::readlink( __FILE__ ) )
+else
+  org_path = File::dirname( __FILE__ )
+end
+$:.unshift org_path.untaint
+require 'tdiary'
+require 'uri'
+
+require 'xmlrpc/server'
+if defined?(MOD_RUBY)
+  server = XMLRPC::ModRubyServer.new
+else
+  server = XMLRPC::CGIServer.new
+end
+
+include TDiary::ViewHelper
+
+@cgi = CGI::new
+@conf = ::TDiary::Config::new(@cgi)
+
+server.add_handler('blogger.newPost') do |appkey, blogid, username, password, content, publish|
+  ENV['REQUEST_METHOD'] = 'POST'
+  ENV['HTTP_REFERER'] = (URI.parse(base_url) + @conf.update).to_s
+  if username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    begin
+      postid = Time.now.strftime("%Y%m%d")
+      year, month, day = postid.scan(/(\d{4})(\d\d)(\d\d)/)[0]
+      @cgi.params['date']  = [postid]
+      tdiary = ::TDiary::TDiaryDay::new( @cgi, "day.rhtml", @conf )
+      time = Time::local( year, month, day ) + 12*60*60
+      diary = tdiary[time] || tdiary.instance_variable_get(:@io).diary_factory(time, '', '', @conf.style)
+
+      title,body = content.split(/\n/,2)
+      index = diary.add_section(title, body)
+      src = diary.to_src
+      
+      @cgi.params.delete 'date'
+      @cgi.params['old']   = [postid]
+      @cgi.params['hide']  = diary.visible? ? [] : ['true']
+      @cgi.params['title'] = [diary.title]
+      @cgi.params['year']  = [postid[0..3]]
+      @cgi.params['month'] = [postid[4..5]]
+      @cgi.params['day']   = [postid[6..7]]
+      @cgi.params['body']  = [src]
+      @cgi.params['csrf_protection_key']  = [@conf.options['csrf_protection_key']]
+      tdiary = ::TDiary::TDiaryReplace::new( @cgi, nil, @conf )
+      body = tdiary.eval_rhtml
+      postid + "%02d" % index
+    rescue ::TDiary::ForceRedirect => redirect
+      postid + "%02d" % index
+    end
+  else
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+end
+
+server.add_handler('blogger.editPost') do |appkey, postid, username, password, content, publish|
+  ENV['REQUEST_METHOD'] = 'POST'
+  ENV['HTTP_REFERER'] = (URI.parse(base_url) + @conf.update).to_s
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  begin
+    @cgi.params['date']  = [postid[0,8]]
+    tdiary = ::TDiary::TDiaryDay::new( @cgi, "day.rhtml", @conf )
+    year, month, day, index = postid.scan(/(\d{4})(\d\d)(\d\d)(\d\d)/)[0]
+    index = index.to_i
+    time = Time::local( year, month, day ) + 12*60*60
+    diary = tdiary[time]
+    
+    src = ''
+    i = 0
+    diary.each_section {|sec|
+      i += 1
+      if i==index
+        subtitle,body = content.split(/\n/,2)
+        sec.subtitle = subtitle
+        sec.body     = (body || '').sub(/[\n\r]+\Z/, '') + "\n\n"
+      end
+      src << sec.to_src
+    }
+    
+    @cgi.params.delete 'date'
+    @cgi.params['old']   = [postid[0,8]]
+    @cgi.params['hide']  = diary.visible? ? [] : ['true']
+    @cgi.params['title'] = [diary.title]
+    @cgi.params['year']  = [postid[0..3]]
+    @cgi.params['month'] = [postid[4..5]]
+    @cgi.params['day']   = [postid[6..7]]
+    @cgi.params['body']  = [src]
+    @cgi.params['csrf_protection_key']  = [@conf.options['csrf_protection_key']]
+    tdiary = ::TDiary::TDiaryReplace::new( @cgi, nil, @conf )
+    body = tdiary.eval_rhtml
+    true
+  rescue ::TDiary::ForceRedirect => redirect
+    true
+  rescue Exception
+    raise XMLRPC::FaultException.new(1,$!.to_s + "\n" + $!.backtrace.join("\n"))
+  end
+end
+
+server.add_handler('blogger.deletePost') do |appkey, postid, username, password|
+  ENV['REQUEST_METHOD'] = 'POST'
+  ENV['HTTP_REFERER'] = (URI.parse(base_url) + @conf.update).to_s
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  begin
+    year, month, day, index = postid.scan(/(\d{4})(\d\d)(\d\d)(\d\d)/)[0]
+    index = index.to_i
+    @cgi.params['date']  = [postid[0,8]]
+    tdiary = ::TDiary::TDiaryDay::new( @cgi, "day.rhtml", @conf )
+    time = Time::local( year, month, day ) + 12*60*60
+    diary = tdiary[time]
+    
+    diary.delete_section(index)
+    src = diary.to_src
+    
+    @cgi.params.delete 'date'
+    @cgi.params['old']   = [postid[0,8]]
+    @cgi.params['hide']  = diary.visible? ? [] : ['true']
+    @cgi.params['title'] = [diary.title]
+    @cgi.params['year']  = [postid[0..3]]
+    @cgi.params['month'] = [postid[4..5]]
+    @cgi.params['day']   = [postid[6..7]]
+    @cgi.params['body']  = [src]
+    @cgi.params['csrf_protection_key']  = [@conf.options['csrf_protection_key']]
+    tdiary = ::TDiary::TDiaryReplace::new( @cgi, nil, @conf )
+    body = tdiary.eval_rhtml
+    true
+  rescue ::TDiary::ForceRedirect => redirect
+    true
+  rescue Exception
+    raise XMLRPC::FaultException.new(1,$!.to_s + "\n" + $!.backtrace.join("\n"))
+  end
+end
+
+server.add_handler('blogger.getRecentPosts') do |appkey, blogid, username, password, numberOfPosts|
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  result = []
+  @cgi.params['title'] = ['']
+  @cgi.params['body']  = ['']
+  @cgi.params['hide']  = ['true']
+  @conf.latest_limit = numberOfPosts
+  tdiary = ::TDiary::TDiaryLatest::new( @cgi, 'latest.rhtml', @conf )
+  tdiary.latest(numberOfPosts) {|diary|
+    index = 0
+    diary.each_section {|sec|
+      index += 1
+      postid = diary.date.strftime('%Y%m%d') + "%02d" % index
+      author = sec.author || @conf['xmlrpc.userid']
+      body  = sec.subtitle + "\n" + sec.body
+      result << {
+        'postid'      => postid,
+        'userid'      => author,
+        'content'     => body,
+        'dateCreated' => diary.last_modified.utc
+      }
+    }
+  }
+  result.sort {|a,b| b['postid']<=>a['postid'] }[0,numberOfPosts]
+end
+
+server.add_handler('blogger.getUsersBlogs') do |appkey, username, password|
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  result = [
+    {
+      'blogid'   => @conf['xmlrpc.blogid'],
+      'blogName' => @conf.html_title,
+      'url'      => base_url
+    }
+  ]
+  result
+end
+
+server.add_handler('blogger.getUserInfo') do |appkey, username, password|
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  result = {
+    'nickname'  => @conf.author_name,
+    'email'     => @conf.author_mail,
+    'url'       => base_url,
+    'lastname'  => @conf['xmlrpc.lastname'],
+    'firstname' => @conf['xmlrpc.firstname'],
+    'userid'    => @conf['xmlrpc.userid']
+  }
+  result
+end
+
+server.add_handler('metaWeblog.newPost') do |blogid, username, password, content, publish|
+  ENV['REQUEST_METHOD'] = 'POST'
+  ENV['HTTP_REFERER'] = (URI.parse(base_url) + @conf.update).to_s
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  begin
+    postid = Time.now.strftime("%Y%m%d")
+    year, month, day = postid.scan(/(\d{4})(\d\d)(\d\d)/)[0]
+    @cgi.params['date']  = [postid]
+    tdiary = ::TDiary::TDiaryDay::new( @cgi, "day.rhtml", @conf )
+    time = Time::local( year, month, day ) + 12*60*60
+    diary = tdiary[time] || tdiary.instance_variable_get(:@io).diary_factory(time, '', '', @conf.style)
+    
+    index = diary.add_section(content['title'], content['description'])
+    src = diary.to_src
+    
+    @cgi.params.delete 'date'
+    @cgi.params['old']   = [postid]
+    @cgi.params['hide']  = diary.visible? ? [] : ['true']
+    @cgi.params['title'] = [diary.title]
+    @cgi.params['year']  = [postid[0..3]]
+    @cgi.params['month'] = [postid[4..5]]
+    @cgi.params['day']   = [postid[6..7]]
+    @cgi.params['body']  = [src]
+    @cgi.params['csrf_protection_key']  = [@conf.options['csrf_protection_key']]
+    tdiary = ::TDiary::TDiaryReplace::new( @cgi, nil, @conf )
+    body = tdiary.eval_rhtml
+    postid + "%02d" % index
+  rescue ::TDiary::ForceRedirect => redirect
+    postid + "%02d" % index
+  end
+end
+
+server.add_handler('metaWeblog.editPost') do |postid, username, password, content, publish|
+  ENV['REQUEST_METHOD'] = 'POST'
+  ENV['HTTP_REFERER'] = (URI.parse(base_url) + @conf.update).to_s
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  begin
+    @cgi.params['date']  = [postid[0,8]]
+    tdiary = ::TDiary::TDiaryDay::new( @cgi, "day.rhtml", @conf )
+    year, month, day, index = postid.scan(/(\d{4})(\d\d)(\d\d)(\d\d)/)[0]
+    index = index.to_i
+    time = Time::local( year, month, day ) + 12*60*60
+    diary = tdiary[time]
+    
+    src = ''
+    i = 0
+    diary.each_section {|sec|
+      i += 1
+      if i==index
+        sec.subtitle = content['title']
+        sec.body     = content['description'] || ''.sub(/[\n\r]+\Z/, '') + "\n\n"
+      end
+      src << sec.to_src
+    }
+    
+    @cgi.params.delete 'date'
+    @cgi.params['old']   = [postid[0,8]]
+    @cgi.params['hide']  = diary.visible? ? [] : ['true']
+    @cgi.params['title'] = [diary.title]
+    @cgi.params['year']  = [postid[0..3]]
+    @cgi.params['month'] = [postid[4..5]]
+    @cgi.params['day']   = [postid[6..7]]
+    @cgi.params['body']  = [src]
+    @cgi.params['csrf_protection_key']  = [@conf.options['csrf_protection_key']]
+    tdiary = ::TDiary::TDiaryReplace::new( @cgi, nil, @conf )
+    body = tdiary.eval_rhtml
+    true
+  rescue ::TDiary::ForceRedirect => redirect
+    true
+  rescue Exception
+    raise XMLRPC::FaultException.new(1,$!.to_s + "\n" + $!.backtrace.join("\n"))
+  end
+end
+
+server.add_handler('metaWeblog.getPost') do |postid, username, password|
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  @cgi.params['date'] = [postid[0,8]]
+  tdiary = TDiary::TDiaryDay::new( @cgi, 'day.rhtml', @conf )
+  year, month, day, index = postid.scan(/(\d{4})(\d\d)(\d\d)(\d\d)/)[0]
+  index = index.to_i
+  date = Time::local( year, month, day ) + 12*60*60
+  diary = tdiary[date]
+  i = 0
+  result = {}
+  diary.each_section {|sec|
+    i += 1
+    if i==index
+      link = base_url + @conf.index.sub(%r|^\./|, '') + diary.date.strftime('%Y%m%d') + ".html\#p%02d" % i
+      title = sec.stripped_subtitle || ''
+      body  = sec.body
+      result = {
+        'userid'       => @conf['xmlrpc.userid'],
+        'dateCreated'  => diary.last_modified.utc,
+        'postid'       => postid,
+        'description'  => body,
+        'title'        => title,
+        'link'         => link,
+        'permaLink'    => link,
+        'mt_excerpt'   => '',
+        'mt_text_mode' => '',
+        'mt_allow_comments' => 1,
+        'mt_allow_pings' => 1,
+        'mt_convert_breaks' => '__default__',
+        'mt_keyword'   => ''
+      }
+      break
+    end
+  }
+  result
+end
+
+server.add_handler('metaWeblog.getRecentPosts') do |blogid, username, password, numberOfPosts|
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  result = []
+  @cgi.params['title'] = ['']
+  @cgi.params['body']  = ['']
+  @cgi.params['hide']  = ['true']
+  @conf.latest_limit = numberOfPosts
+  tdiary = ::TDiary::TDiaryLatest::new( @cgi, 'latest.rhtml', @conf )
+  tdiary.latest(numberOfPosts) {|diary|
+    index = 0
+    diary.each_section {|sec|
+      index += 1
+      postid = diary.date.strftime('%Y%m%d') + "%02d" % index
+      link = base_url + @conf.index.sub(%r|^\./|, '') + diary.date.strftime('%Y%m%d') + ".html\#p%02d" % index
+      title = sec.stripped_subtitle || ''
+      body  = sec.body
+      author = sec.author || @conf['xmlrpc.userid']
+      result << {
+        'dateCreated'       => diary.last_modified.utc,
+        'userid'            => author,
+        'postid'            => postid,
+        'description'       => body,
+        'title'             => title,
+        'link'              => link,
+        'permaLink'         => link,
+        'mt_excerpt'        => '',
+        'mt_text_more'      => '',
+        'mt_allow_comments' => 1,
+        'mt_allow_pings'    => 1,
+        'mt_convert_breaks' => '__default__',
+        'mt_keywords'       => '',
+      }
+    }
+  }
+  result.sort {|a,b| b['postid']<=>a['postid'] }[0,numberOfPosts]
+end
+
+server.add_handler('metaWeblog.newMediaObject') do |blogid, username, password, file|
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  image_dir = @conf['image.dir'] || './images/'
+  image_dir.chop! if /\/$/ =~ image_dir
+  image_url = @conf['image.url'] || './images/'
+  image_url.chop! if /\/$/ =~ image_url
+  name = file['name']
+  bits = file['bits']
+  path = File.join(image_dir, name)
+  open(path,'wb') {|f|
+    f.write bits.to_s
+  }
+  {'url' => (URI.parse(base_url) + (image_url + '/' + name)).to_s }
+end
+
+server.add_handler('mt.getRecentPostTitles') do |blogid, username, password, numberOfPosts|
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  result = []
+  @cgi.params['title'] = ['']
+  @cgi.params['body']  = ['']
+  @cgi.params['hide']  = ['true']
+  @conf.latest_limit = numberOfPosts
+  tdiary = ::TDiary::TDiaryLatest::new( @cgi, 'latest.rhtml', @conf )
+  tdiary.latest(numberOfPosts) {|diary|
+    index = 0
+    diary.each_section {|sec|
+      index += 1
+      postid = diary.date.strftime('%Y%m%d') + "%02d" % index
+      author = sec.author || @conf['xmlrpc.userid']
+      result << {
+        'dateCreated'       => diary.last_modified.utc,
+        'userid'            => author,
+        'postid'            => postid,
+        'title'             => sec.subtitle,
+      }
+    }
+  }
+  result.sort {|a,b| b['postid']<=>a['postid'] }
+end
+
+server.add_handler('mt.getCategoryList') do |blogid, username, password|
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  @cgi.params['date'] = [Time.now.strftime('%Y%m%d')]
+  tdiary = TDiary::TDiaryDay::new( @cgi, 'day.rhtml', @conf )
+  list = []
+  tdiary.calendar.each do |y, ms|
+    ms.each do |m|
+      ym = "#{y}#{m}"
+      @cgi.params['date'] = [ym]
+      m = ::TDiary::TDiaryMonth.new(@cgi, '', @conf)
+      sections = {}
+      m.diaries.each do |ymd, diary|
+        next if !diary.visible?
+        diary.each_section do |s|
+          list |= s.categories unless s.categories.empty?
+        end
+      end
+    end
+  end
+  list = list.sort.uniq
+  result = []
+  list.each {|c|
+    result << {
+      'categoryId'   => c,
+      'categoryName' => c
+    }
+  }
+  result
+end
+
+server.add_handler('mt.getPostCategories') do |postid, username, password|
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  @cgi.params['date'] = [postid[0,8]]
+  tdiary = TDiary::TDiaryDay::new( @cgi, 'day.rhtml', @conf )
+  result = []
+  year, month, day, index = postid.scan(/(\d{4})(\d\d)(\d\d)(\d\d)/)[0]
+  index = index.to_i
+  time = Time::local( year, month, day ) + 12*60*60
+  diary = tdiary[time]
+  i = 0
+  diary.each_section {|sec|
+    i += 1
+    if i==index
+      sec.categories.each_with_index {|cat,j|
+        result << {
+          'categoryName' => cat,
+          'categoryId'   => cat,
+          'isPrimary'    => j==0
+        }
+      }
+      break
+    end
+  }
+  result
+end
+
+server.add_handler('mt.setPostCategories') do |postid, username, password, categories|
+  ENV['REQUEST_METHOD'] = 'POST'
+  ENV['HTTP_REFERER'] = (URI.parse(base_url) + @conf.update).to_s
+  unless username == @conf['xmlrpc.username'] && password == @conf['xmlrpc.password']
+    raise XMLRPC::FaultException.new(1,'userid or password incorrect')
+  end
+  begin
+    @cgi.params['date']  = [postid[0,8]]
+    tdiary = ::TDiary::TDiaryDay::new( @cgi, "day.rhtml", @conf )
+    year, month, day, index = postid.scan(/(\d{4})(\d\d)(\d\d)(\d\d)/)[0]
+    index = index.to_i
+    time = Time::local( year, month, day ) + 12*60*60
+    diary = tdiary[time]
+
+    @cgi.params.delete 'date'
+    
+    src = ''
+    i = 0
+    diary.each_section {|sec|
+      i += 1
+      if i==index
+        cats = []
+        categories.sort {|a,b|
+          a['isPrimary']==true ? 0 : 1
+        }.each {|c|
+          cats << c['categoryId']
+        }
+        sec.categories = cats
+      end
+      src << sec.to_src
+    }
+    
+    @cgi.params['old']   = [postid[0,8]]
+    @cgi.params['hide']  = diary.visible? ? [] : ['true']
+    @cgi.params['title'] = [diary.title]
+    @cgi.params['year']  = [postid[0..3]]
+    @cgi.params['month'] = [postid[4..5]]
+    @cgi.params['day']   = [postid[6..7]]
+    @cgi.params['body']  = [src]
+    @cgi.params['csrf_protection_key']  = [@conf.options['csrf_protection_key']]
+    tdiary = ::TDiary::TDiaryReplace::new( @cgi, nil, @conf )
+    body = tdiary.eval_rhtml
+    true
+  rescue ::TDiary::ForceRedirect => redirect
+    true
+  rescue Exception
+    raise XMLRPC::FaultException.new(1,$!.to_s + "\n" + $!.backtrace.join("\n"))
+  end
+end
+
+server.add_handler('mt.supportedMethods') do
+  [
+    'blogger.newPost',
+    'blogger.editPost',
+    'blogger.getRecentPosts',
+    'blogger.getUsersBlogs',
+    'blogger.getUserInfo',
+    'blogger.deletePost',
+    'metaWeblog.getPost',
+    'metaWeblog.newPost',
+    'metaWeblog.editPost',
+    'metaWeblog.getRecentPosts',
+    'metaWeblog.newMediaObject',
+    'mt.getCategoryList',
+    'mt.setPostCategories',
+    'mt.getPostCategories',
+    'mt.getTrackbackPings',
+    'mt.supportedTextFilters',
+    'mt.getRecentPostTitles',
+    'mt.publishPost'
+  ]
+end
+
+server.add_handler('mt.supportedTextFilters') do
+  ['__default__']
+end
+
+server.add_handler('mt.getTrackbackPings') do |postid|
+  @cgi.params['date'] = [postid[0,8]]
+  tdiary = TDiary::TDiaryDay::new( @cgi, 'day.rhtml', @conf )
+  result = []
+  date = Time::local( *postid.scan( /^(\d{4})(\d\d)(\d\d)(\d\d)$/ )[0] ) + 12*60*60
+  tdiary[date].each_visible_trackback(100) {|com,i|
+    url, name, title, excerpt = com.body.split( /\n/,4 )
+    result << {
+      'pingURL'   => url,
+      'pingIP'    => '127.0.0.1',
+      'pingTitle' => title,
+    }
+  }
+  result
+end
+
+server.add_handler('mt.publishPost') do |postid, username, password|
+  true
+end
+
+server.add_handler('mt.setNextScheduledPost') do |postid, dateCreated, username, password|
+  true
+end
+
+server.serve
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End: