tdiary-contrib 3.2.2.20130518

data/plugin/openid.rb

@@ -0,0 +1,90 @@
+#
+# openid.rb: Insert OpenID delegation information. $Revision: 1.10 $
+#
+# Copyright (C) 2005, TADA Tadashi <sho@spc.gr.jp>
+# You can redistribute it and/or modify it under GPL2.
+#
+
+@openid_config = (Struct.const_defined?("OpenIdConfig") ? Struct::OpenIdConfig :
+	Struct.new("OpenIdConfig", :openid, :openid2, :x_xrds_location))
+
+if /^(?:latest|conf|saveconf)$/ =~ @mode then
+	@openid_list = {
+		# service => @openid_config.new(
+		#    [openid.server, openid.delegate(replace <ID> as account name)],   # openid
+		#    [openid2.provider, openid2.local_id(replace <ID> as account name)], # openid2
+		#    'X-XRDS-Location(replace <ID> as account name)'),
+		'Hatena' => @openid_config.new(['https://www.hatena.ne.jp/openid/server', 'http://www.hatena.ne.jp/<ID>/']),
+		'livedoor' => @openid_config.new(['http://auth.livedoor.com/openid/server', 'http://profile.livedoor.com/<ID>']),
+		'LiveJournal' => @openid_config.new(['http://www.livejournal.com/openid/server.bml', 'http://<ID>.livejournal.com/']),
+		'OpenID.ne.jp' => @openid_config.new(
+			['http://www.openid.ne.jp/user/auth', 'http://<ID>.openid.ne.jp'],
+			nil,
+			'http://<ID>.openid.ne.jp/user/xrds'),
+		'TypeKey' => @openid_config.new(['http://www.typekey.com/t/openid/', 'http://profile.typekey.com/<ID>/']),
+		'Vox' => @openid_config.new(['http://www.vox.com/services/openid/server', 'http://<ID>.vox.com/']),
+		'myopenid.com' => @openid_config.new(
+			['http://www.myopenid.com/server', 'http://<ID>.myopenid.com'], # openid
+			['http://www.myopenid.com/server', 'http://<ID>.myopenid.com'], # openid2
+			"http://www.myopenid.com/xrds?username=<ID>"),
+		'claimID.com' => @openid_config.new(
+			['http://openid.claimid.com/server', 'http://openid.claimid.com/<ID>'],
+			nil, #['http://openid.claimid.com/server', 'http://openid.claimid.com/<ID>'],
+			'http://claimid.com/<ID>/xrds'),
+		'Personal Identity Provider (PIP)' => @openid_config.new(
+			['http://pip.verisignlabs.com/server', 'http://<ID>.pip.verisignlabs.com/'],
+			['http://pip.verisignlabs.com/server', 'http://<ID>.pip.verisignlabs.com/'],
+			'http://pip.verisignlabs.com/user/<ID>/yadisxrds'),
+		'Yahoo! Japan' => @openid_config.new(
+			nil,
+			['https://open.login.yahooapis.jp/openid/op/auth', 'https://me.yahoo.co.jp/a/<ID>'],
+			'http://open.login.yahoo.co.jp/openid20/www.yahoo.co.jp/xrds'),
+		'Yahoo!' => @openid_config.new(
+			nil,
+			['https://open.login.yahooapis.com/openid/op/auth', 'https://me.yahoo.com/a/<ID>'],
+			'http://open.login.yahooapis.com/openid20/www.yahoo.com/xrds'),
+	}
+
+	if @conf['openid.service'] and @conf['openid.id'] then
+		openid_service = @openid_list[@conf['openid.service']]
+		openid_id = @conf['openid.id']
+		result = ''
+		add_header_proc do
+			result = <<-HTML if openid_service.openid
+			<link rel="openid.server" href="#{h openid_service.openid[0]}">
+			<link rel="openid.delegate" href="#{h openid_service.openid[1].sub( /<ID>/, openid_id )}">
+			HTML
+			result << <<-HTML if openid_service.openid2
+			<link rel="openid2.provider" href="#{h openid_service.openid2[0]}">
+			<link rel="openid2.local_id" href="#{h openid_service.openid2[1].sub( /<ID>/, openid_id )}">
+			HTML
+			result << <<-HTML if openid_service.x_xrds_location
+			<meta http-equiv="X-XRDS-Location" content="#{h openid_service.x_xrds_location.sub( /<ID>/, openid_id )}">
+			HTML
+			result.gsub( /^\t{2}/, '' )
+		end if openid_service
+	end
+end
+
+add_conf_proc( 'openid', @openid_conf_label ) do
+	if @mode == 'saveconf' then
+		@conf['openid.service'] = @cgi.params['openid.service'][0]
+		@conf['openid.id'] = @cgi.params['openid.id'][0]
+	end
+
+	options = ''
+	@openid_list.each_key do |key|
+		options << %Q|<option value="#{h key}"#{" selected" if @conf['openid.service'] == key}>#{h key}</option>\n|
+	end
+	<<-HTML
+	<h3 class="subtitle">#{@openid_service_label}</h3>
+	<p>#{@openid_service_desc}</p>
+	<p><select name="openid.service">
+		#{options}
+	</select></p>
+
+	<h3 class="subtitle">#{@openid_id_label}</h3>
+	<p>#{@openid_id_desc}</p>
+	<p><input name="openid.id" value="#{h @conf['openid.id']}"></p>
+	HTML
+end

data/plugin/opensearch_ad.rb

@@ -0,0 +1,33 @@
+# opensearch_ad.rb $Revision: 1.1 $
+#
+# Copyright (c) 2008 SHIBATA Hiroshi <h-sbt@nifty.com>
+# Distributed under the GPL
+#
+
+if /\A(?:latest|day)\z/ =~ @mode then
+	if @conf['opensearch.xml'] and @conf['opensearch.title'] then
+		opensearch_xml = @conf['opensearch.xml']
+		opensearch_title = @conf['opensearch.title']
+
+		add_header_proc do
+			result = <<-HTML
+			<link type="application/opensearchdescription+xml" rel="search" title="#{h(opensearch_title)}" href="#{h(opensearch_xml)}">
+			HTML
+			result.gsub( /^\t\t/, '' )
+		end
+	end
+end
+
+add_conf_proc( 'opensearch_ad', 'OpenSearch Auto-Discovery' ) do
+	if @mode == 'saveconf'
+		@conf['opensearch.xml'] = @cgi.params['opensearch.xml'][0]
+		@conf['opensearch.title'] = @cgi.params['opensearch.title'][0]
+	end
+
+	<<-HTML
+	<h3 class="subtitle">Tilte for OpenSearch</h3>
+	<p><input name="opensearch.title" value="#{h(@conf['opensearch.title'])}" size="80"></p>
+	<h3 class="subtitle">URI for OpenSearch description XML</h3>
+	<p><input name="opensearch.xml" value="#{h(@conf['opensearch.xml'])}" size="80"></p>
+	HTML
+end

data/plugin/picasa.rb

@@ -0,0 +1,56 @@
+# show photo image on Picasa Web Album
+#
+# usage:
+#   picasa( src[, title[, place]] )
+#     - src: The url of the photo to show.
+#     - title: title of photo. (optional)
+#     - place: class name of img element. default is 'photo'.
+#
+#   picasa_left( src[, title] )
+#
+#   picasa_right( src[, title] )
+#
+# options configurable through settings:
+#   @conf['picasa.user'] : picasa username
+#   @conf['picasa.default_size'] : default image size
+#
+# Copyright (c) hb <http://www.smallstyle.com>
+# Distributed under the GPL.
+#
+
+def picasa( src, alt = "photo", place = 'photo' )
+	src.sub!( %r|/s\d+/|, "/s200/" ) if @conf.iphone?
+	
+	if @cgi.mobile_agent?
+		body = %Q|<a href="#{src}">#{alt}</a>|
+	else
+		body = %Q|<img title="#{alt}" alt="#{alt}" src="#{src}" class="#{place} picasa">|
+	end
+	body
+end
+
+def picasa_left( src, alt = "photo" )
+	picasa( src, alt, 'left' )
+end
+
+def picasa_right( src, alt = "photo" )
+	picasa( src, alt, 'right' )
+end
+
+if /\A(form|edit|preview|showcomment)\z/ === @mode then
+	enable_js( 'picasa.js' )
+	add_js_setting( '$tDiary.plugin.picasa' )
+	add_js_setting( '$tDiary.plugin.picasa.userId', %Q|'#{@conf['picasa.user']}'| )
+	add_js_setting( '$tDiary.plugin.picasa.imgMax', %Q|'#{@conf[ 'picasa.default_size'] || 400}'| )
+end
+
+add_edit_proc do |date|
+	unless @conf['picasa.user'] 
+		'<p>[ERROR] picasa.rb: Picasa username is not specified.</p>'
+	else
+		<<-HTML
+			<h3 class="plugin_picasa"><span>Picasa Web Album</span></h3>
+			<div id="plugin_picasa"></div>
+		HTML
+	end
+end

data/plugin/plugin_checker.rb

@@ -0,0 +1,41 @@
+# plugin_checker.rb
+#
+# Copyright (c) 2012 MATSUOKA Kohei <kmachu@gmail.com>
+# You can redistribute it and/or modify it under GPL2.
+#
+
+def plugin_checker_js_settings
+	enable_js('plugin_checker.js')
+	add_js_setting('$tDiary.plugins', plugins.to_json)
+	add_js_setting('$tDiary.mode', @mode.to_json)
+end
+
+if /\A(form|edit|preview|showcomment)\z/ === @mode
+  add_header_proc do
+    <<-STYLE
+    <style>
+    div.plugin_checker {
+      font-size: small;
+      margin: 0.5em;
+      padding: 0.5em;
+      border: solid 1px #999;
+	    border-radius: 5px;
+	    -moz-box-shadow:0 1px 3px rgba(0,0,0,0.25),0 -1px 0 rgba(0,0,0,0.1) inset;
+	    -webkit-box-shadow:0 1px 3px rgba(0,0,0,0.25),0 -1px 0 rgba(0,0,0,0.1) inset;
+	    box-shadow:0 1px 3px rgba(0,0,0,0.25),0 -1px 0 rgba(0,0,0,0.1) inset;
+      background: #feffff; /* Old browsers */
+      background: -moz-linear-gradient(top,  #feffff 0%, #fbfcd4 100%); /* FF3.6+ */
+      background: -webkit-gradient(linear, left top, left bottom, color-stop(0%,#feffff), color-stop(100%,#fbfcd4)); /* Chrome,Safari4+ */
+      background: -webkit-linear-gradient(top,  #feffff 0%,#fbfcd4 100%); /* Chrome10+,Safari5.1+ */
+      background: -o-linear-gradient(top,  #feffff 0%,#fbfcd4 100%); /* Opera 11.10+ */
+      background: -ms-linear-gradient(top,  #feffff 0%,#fbfcd4 100%); /* IE10+ */
+      background: linear-gradient(to bottom,  #feffff 0%,#fbfcd4 100%); /* W3C */
+    }
+    div.plugin_checker ul {
+      margin: 1em;
+    }
+    </style>
+    STYLE
+  end
+  plugin_checker_js_settings
+end

data/plugin/popit.rb

@@ -0,0 +1,22 @@
+# popit.rb:plugin embedding POP on POPit(http://pop-it.jp)
+#
+# usage:
+#   popit(pop_id) - pop_id: The id of the POP on POPit (e.g. 2000 http://pop-it.jp/item/amazon/1989/pop/2000 )
+#
+# Copyright (c) KAYA Satoshi <http://kayakaya.net/>
+# You can redistributed it and/or modify if under GPL2.
+#
+def popit(pop_id, size = "large")
+  return unless pop_id
+
+  width_size = {"large" => "260", "small" => "180" }
+  height_size = {"large" => "380", "small" => "220" }
+  width_style = {"large" => "220px", "small" => "160px" }
+
+  sizequery = size == "large" ? "?size=large" : ''
+  r = ""
+  r << %Q|<iframe src="http://pop-it.jp/pop/blogparts/#{pop_id}#{sizequery}" frameborder="0" width="#{width_size[size]}" height="#{height_size[size]}"> </iframe>|
+  r << %Q|<div style="width:#{width_style[size]};margin:0;text-align:center;font-size:12px;">Powered by <a href="http://pop-it.jp" target="_blank" style="color: #edbe26;">POPit</a></div>|
+
+  return r
+end

data/plugin/prettify.rb

@@ -0,0 +1,19 @@
+# prettify.rb
+
+if /\A(?:latest|day|month|nyear)\z/ =~ @mode then
+	add_header_proc do
+		<<-HTML
+		<link href="http://google-code-prettify.googlecode.com/svn/trunk/src/prettify.css" type="text/css" rel="stylesheet">
+		<script type="text/javascript" src="http://google-code-prettify.googlecode.com/svn/trunk/src/prettify.js"></script>
+		<script type="text/javascript"><!--
+			if(window.addEventListener){
+				window.addEventListener("load", prettyPrint, false);
+			}else if(window.attachEvent){
+				window.attachEvent("onload", prettyPrint);
+			}else{
+				window.onload=prettyPrint;
+			}
+		// --></script>
+		HTML
+	end
+end

data/plugin/prezi.rb

@@ -0,0 +1,10 @@
+#
+# prezi.rb: plugin embedding presentation on prezi.com
+#
+# Copyright (C) 2010 TADA Tadashi <t@tdtds.jp>
+# You can redistribute it and/or modify it under GPL2.
+#
+
+def prezi( prezi_id, label = 'Link to presentation', size = [512,384] )
+	%Q|<object class="prezi" id="prezi_#{prezi_id}" name="prezi_#{prezi_id}" classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" width="#{size[0]}" height="#{size[1]}"><param name="movie" value="http://prezi.com/bin/preziloader.swf"><param name="allowfullscreen" value="true"><param name="allowscriptaccess" value="always"><param name="bgcolor" value="#ffffff"><param name="flashvars" value="prezi_id=#{prezi_id}&amp;lock_to_path=1&amp;color=ffffff&amp;autoplay=no"><embed id="preziEmbed_#{prezi_id}" name="preziEmbed_#{prezi_id}" src="http://prezi.com/bin/preziloader.swf" type="application/x-shockwave-flash" allowfullscreen="true" allowscriptaccess="always" width="#{size[0]}" height="#{size[1]}" bgcolor="#ffffff" flashvars="prezi_id=#{prezi_id}&amp;lock_to_path=1&amp;color=ffffff&amp;autoplay=no"></embed></object><div class="prezi"><a href="http://prezi.com/#{prezi_id}/">#{label}</div>|
+end

data/plugin/profile.rb

@@ -0,0 +1,222 @@
+#
+# profile.rb: profile plugin for tDiary
+#
+# usage:
+#   profile(id[, service = :twitter])
+#   - id: user ID for profile service
+#   - service: profile service (default is :twitter)
+#     Choose from :github, :twitter, :friendfeed, :iddy
+#
+# Copyright (C) 2009 by MATSUOKA Kohei < http://www.machu.jp/ >
+# Distributed under the GPL.
+#
+require 'timeout'
+require 'rexml/document'
+require 'open-uri'
+require 'digest/md5'
+require 'pstore'
+
+module ::Profile
+  module Service
+    # base class for profile services
+    class Base
+      # default attributes
+      attr_reader :id
+      attr_reader :image
+      attr_reader :name
+      attr_reader :mail
+      attr_reader :description
+      attr_reader :link
+
+      # class instance variables
+      class << self
+        attr_reader :properties
+        attr_reader :endpoint_proc
+      end
+
+      # set property and xpath pair for parse XML document
+      def self.property(property, path)
+        @properties ||= {}
+        @properties[property] = path
+      end
+
+      # set endpoint proc (this proc is called by initialize method with id)
+      def self.endpoint(&block)
+        @endpoint_proc = block
+      end
+
+      def initialize(id, options = {})
+        @id = id
+        @options = options
+
+        if self.class.endpoint_proc
+          endpoint = self.class.endpoint_proc.call(id)
+          doc = fetch(endpoint)
+          parse(doc)
+        end
+      end
+
+      # get a XML document from endpoint and create REXML::Document instance
+      def fetch(endpoint)
+        timeout(5) do
+          open(endpoint) do |f|
+            doc = REXML::Document.new(f)
+          end
+        end
+      end
+
+      # parse XML document with properties
+      def parse(doc)
+        self.class.properties.each do |property, path|
+          if doc.elements[path]
+            value = doc.elements[path].text
+            instance_variable_set("@#{property}", value)
+          end
+        end
+      end
+    end
+
+    # github.com
+    class GitHub < Base
+      property :name, 'name'
+      property :mail, 'email'
+      endpoint {|id| "https://api.github.com/users/#{id}" }
+
+      def image
+        # "http://www.gravatar.com/avatar/#{Digest::MD5.hexdigest(@mail)}.jpg"
+        Gravatar.new(@mail, @options).image
+      end
+
+      def link
+        "http://github.com/#{@id}"
+      end
+
+      def fetch(endpoint)
+        require 'json'
+        timeout(5) do
+          doc = open(endpoint) {|f| JSON.parse(f.read) }
+        end
+      end
+
+      def parse(doc)
+        self.class.properties.each do |property, key|
+          instance_variable_set("@#{property}", doc[key]) if doc[key]
+        end
+      end
+    end
+
+    # twitter.com
+    class Twitter < Base
+      property :name, '//user/name'
+      property :image, '//user/profile_image_url'
+      property :description, '//user/description'
+      endpoint {|id| "http://twitter.com/users/show/#{id}.xml" }
+
+      def link
+        "http://twitter.com/#{@id}"
+      end
+    end
+
+    # friendfeed.com
+    class FriendFeed < Base
+      property :name, '//feed/name'
+      property :description, '//feed/description'
+      endpoint {|id| "http://friendfeed-api.com/v2/feed/#{id}?format=xml&num=0" }
+
+      def image
+        "http://friendfeed-api.com/v2/picture/#{id}"
+      end
+
+      def link
+        "http://friendfeed.com/#{@id}"
+      end
+    end
+
+    # iddy.jp
+    # this class is based on iddy.rb
+    class Iddy < Base
+      ######################################################################
+      # If you will modify or release another version of this code,
+      # please get your own application key from iddy.jp and replace below.
+      ######################################################################
+      API_KEY = '9262ea8ffba962aabb4f1a1d3f1cfa953b11aa23' unless defined? API_KEY
+
+      property :name, '//response/users/user/accountname'
+      property :image, '//response/users/user/imageurl'
+      property :description, '/response/users/user/profile'
+      endpoint {|id| "http://iddy.jp/api/user/?apikey=#{API_KEY}&accountname=#{id}" }
+
+      def link
+        "http://iddy.jp/profile/#{@id}/"
+      end
+    end
+
+    # gravatar.com
+    class Gravatar < Base
+      def image
+        size = @options[:size] ? "?s=#{@options[:size]}" : ""
+        "http://www.gravatar.com/avatar/#{Digest::MD5.hexdigest(@id.downcase)}.jpg#{size}"
+      end
+    end
+
+    class Hatena < Base
+      def image
+        prefix = id[0..1]
+        "http://www.hatena.ne.jp/users/#{prefix}/#{id}/profile.gif"
+      end
+
+      def link
+        "http://www.hatena.ne.jp/#{id}/"
+      end
+    end
+  end
+end
+
+PROFILE_VERSION = '20090909'
+
+def profile(id, service = :twitter, options = {})
+  html = ''
+
+  service_class = {
+    :twitter => Profile::Service::Twitter,
+    :github => Profile::Service::GitHub,
+    :friendfeed => Profile::Service::FriendFeed,
+    :iddy => Profile::Service::Iddy,
+    :gravatar => Profile::Service::Gravatar,
+    :hatena => Profile::Service::Hatena,
+  }[service.to_s.downcase.to_sym]
+
+  # TODO: create cache manager class
+
+  # cache = "#{@cache_path}/profile.yaml"
+  cache = "#{@cache_path}/profile.pstore"
+  profile = nil
+  # db = YAML::Store.new(cache)
+  db = PStore.new(cache)
+  db.transaction do
+    key = service_class.name
+    db[key] ||= {} # initialize db
+    updated = db[key][:updated]
+    if updated && (Time::now < updated + 60 * 60) && db[key][:version] == PROFILE_VERSION
+      # use cache
+      profile = db[key][:profile]
+    else
+      # get latest date and update cache
+      begin
+        profile = service_class.new(id, options)
+      rescue Timeout::Error, StandardError
+        return html << %Q{ <div class="profile">no profile</div> }
+      end
+      db[key][:updated] = Time::now
+      db[key][:profile] = profile
+      db[key][:version] = PROFILE_VERSION
+    end
+  end
+
+  html << %Q{ <div class="profile"><a href="#{CGI.escapeHTML profile.link}"> }
+  html << %Q{ <span class="profile-image"><img src="#{CGI.escapeHTML profile.image}" alt="profile image"></span> } if profile.image
+  html << %Q{ <span class="profile-name">#{CGI.escapeHTML profile.name}</span> } if profile.name
+  html << %Q{ <span class="profile-mail">#{CGI.escapeHTML profile.mail}</span> } if profile.mail
+  html << %Q{ <span class="profile-description">#{CGI.escapeHTML profile.description}</span> } if profile.description
+  html << %Q{ </a></div> }
+end

data/plugin/puboo.rb

@@ -0,0 +1,93 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2013, TADA Tadashi <t@tdtds.jp>
+# Original code from tatsu_zine.rb by KADO Masanori <kdmsnr@gmail.com>
+# You can redistribute it and/or modify it under GPL.
+#
+# display book info in http://p.booklog.jp/ like amazon.rb
+# USAGE: {{puboo 9999}}
+
+require 'open-uri'
+
+def puboo_cache_dir
+	cache = "#{@cache_path}/puboo"
+	Dir.mkdir( cache ) unless File.directory?( cache )
+	cache
+end
+
+def puboo_cache_set( id, result )
+	File.open( "#{puboo_cache_dir}/#{id}", "w" ) do |f|
+		f.write result
+	end
+end
+
+def puboo_cache_get( id )
+	File.open( "#{puboo_cache_dir}/#{id}", "r" ) do |f|
+		f.read
+	end
+rescue
+	nil
+end
+
+def puboo( id, doc = nil )
+	if !@conf.secure and !(result = puboo_cache_get(id)).nil?
+		return result
+	end
+
+	link = "http://p.booklog.jp/book/#{id}"
+	doc ||= open( link ).read
+	title = doc.match(%r|<meta property="og:title"\s*content="(.*)"|).to_a[1]
+	image = doc.match(%r|<meta property="og:image"\s*content="(.*)"|).to_a[1]
+	price = doc.match(%r|<th class="th_2">価格</th>.*?<span>(.*?)</span>.*?<br />|m).to_a[1]
+	author = doc.match(%r|<th>作者</th>(.*?)</td>|m).to_a[1].gsub(/<.*?>/, '').strip
+
+	result = <<-EOS
+	<a class="amazon-detail" href="#{h link}"><span class="amazon-detail">
+		<img class="amazon-detail left" src="#{h image}"
+		height="150" width="100"
+		alt="#{h title}">
+		<span class="amazon-detail-desc">
+			<span class="amazon-title">#{h title}</span><br>
+			<span class="amazon-author">#{h author}</span><br>
+			<span class="amazon-price">#{h price}</span>
+		</span><br style="clear: left">
+	</span></a>
+EOS
+
+	puboo_cache_set( id, result ) unless @conf.secure
+	result
+rescue
+	link
+end
+
+if __FILE__ == $0
+	require 'test/unit'
+	class TestTatsuZine < Test::Unit::TestCase
+		def setup
+			@conf = Struct.new("Conf", :secure).new(true)
+			def h(str); str; end
+		end
+
+		def test_puboo
+			expect = <<-EOS
+	<a class="amazon-detail" href="http://p.booklog.jp/book/70667"><span class="amazon-detail">
+		<img class="amazon-detail left" src="http://img.booklog.jp/667BDD9E-B13E-11E2-82F3-6425FFDA975F_l.jpg"
+		height="150" width="100"
+		alt="入門Puppet - Automate Your Infrastructure">
+		<span class="amazon-detail-desc">
+			<span class="amazon-title">入門Puppet - Automate Your Infrastructure</span><br>
+			<span class="amazon-author">栗林健太郎</span><br>
+			<span class="amazon-price">890円（税込）</span>
+		</span><br style="clear: left">
+	</span></a>
+EOS
+			assert_equal expect, puboo('70667')
+		end
+	end
+end
+
+# Local Variables:
+# mode: ruby
+# indent-tabs-mode: t
+# tab-width: 3
+# ruby-indent-level: 3
+# End:

data/plugin/pygments_css.rb

@@ -0,0 +1,76 @@
+#
+# pygments.rb: insert CSS for html formatted code with Pygments.
+#
+# Copyright (C) 2012 SHIBATA Hiroshi <shibata.hiroshi@gmail.com>
+# You can redistribute it and/or modify it under GPL2.
+#
+require 'pygments'
+
+add_header_proc do
+	<<-STYLE
+		<style type="text/css"><!--
+		.highlight { background: white; }
+		.highlight .hll { background-color: #ffffcc }
+		.highlight .c { color: #408080; font-style: italic } /* Comment */
+		.highlight .err { border: 1px solid #FF0000 } /* Error */
+		.highlight .k { color: #008000; font-weight: bold } /* Keyword */
+		.highlight .o { color: #666666 } /* Operator */
+		.highlight .cm { color: #408080; font-style: italic } /* Comment.Multiline */
+		.highlight .cp { color: #BC7A00 } /* Comment.Preproc */
+		.highlight .c1 { color: #408080; font-style: italic } /* Comment.Single */
+		.highlight .cs { color: #408080; font-style: italic } /* Comment.Special */
+		.highlight .gd { color: #A00000 } /* Generic.Deleted */
+		.highlight .ge { font-style: italic } /* Generic.Emph */
+		.highlight .gr { color: #FF0000 } /* Generic.Error */
+		.highlight .gh { color: #000080; font-weight: bold } /* Generic.Heading */
+		.highlight .gi { color: #00A000 } /* Generic.Inserted */
+		.highlight .go { color: #808080 } /* Generic.Output */
+		.highlight .gp { color: #000080; font-weight: bold } /* Generic.Prompt */
+		.highlight .gs { font-weight: bold } /* Generic.Strong */
+		.highlight .gu { color: #800080; font-weight: bold } /* Generic.Subheading */
+		.highlight .gt { color: #0040D0 } /* Generic.Traceback */
+		.highlight .kc { color: #008000; font-weight: bold } /* Keyword.Constant */
+		.highlight .kd { color: #008000; font-weight: bold } /* Keyword.Declaration */
+		.highlight .kn { color: #008000; font-weight: bold } /* Keyword.Namespace */
+		.highlight .kp { color: #008000 } /* Keyword.Pseudo */
+		.highlight .kr { color: #008000; font-weight: bold } /* Keyword.Reserved */
+		.highlight .kt { color: #B00040 } /* Keyword.Type */
+		.highlight .m { color: #666666 } /* Literal.Number */
+		.highlight .s { color: #BA2121 } /* Literal.String */
+		.highlight .na { color: #7D9029 } /* Name.Attribute */
+		.highlight .nb { color: #008000 } /* Name.Builtin */
+		.highlight .nc { color: #0000FF; font-weight: bold } /* Name.Class */
+		.highlight .no { color: #880000 } /* Name.Constant */
+		.highlight .nd { color: #AA22FF } /* Name.Decorator */
+		.highlight .ni { color: #999999; font-weight: bold } /* Name.Entity */
+		.highlight .ne { color: #D2413A; font-weight: bold } /* Name.Exception */
+		.highlight .nf { color: #0000FF } /* Name.Function */
+		.highlight .nl { color: #A0A000 } /* Name.Label */
+		.highlight .nn { color: #0000FF; font-weight: bold } /* Name.Namespace */
+		.highlight .nt { color: #008000; font-weight: bold } /* Name.Tag */
+		.highlight .nv { color: #19177C } /* Name.Variable */
+		.highlight .ow { color: #AA22FF; font-weight: bold } /* Operator.Word */
+		.highlight .w { color: #bbbbbb } /* Text.Whitespace */
+		.highlight .mf { color: #666666 } /* Literal.Number.Float */
+		.highlight .mh { color: #666666 } /* Literal.Number.Hex */
+		.highlight .mi { color: #666666 } /* Literal.Number.Integer */
+		.highlight .mo { color: #666666 } /* Literal.Number.Oct */
+		.highlight .sb { color: #BA2121 } /* Literal.String.Backtick */
+		.highlight .sc { color: #BA2121 } /* Literal.String.Char */
+		.highlight .sd { color: #BA2121; font-style: italic } /* Literal.String.Doc */
+		.highlight .s2 { color: #BA2121 } /* Literal.String.Double */
+		.highlight .se { color: #BB6622; font-weight: bold } /* Literal.String.Escape */
+		.highlight .sh { color: #BA2121 } /* Literal.String.Heredoc */
+		.highlight .si { color: #BB6688; font-weight: bold } /* Literal.String.Interpol */
+		.highlight .sx { color: #008000 } /* Literal.String.Other */
+		.highlight .sr { color: #BB6688 } /* Literal.String.Regex */
+		.highlight .s1 { color: #BA2121 } /* Literal.String.Single */
+		.highlight .ss { color: #19177C } /* Literal.String.Symbol */
+		.highlight .bp { color: #008000 } /* Name.Builtin.Pseudo */
+		.highlight .vc { color: #19177C } /* Name.Variable.Class */
+		.highlight .vg { color: #19177C } /* Name.Variable.Global */
+		.highlight .vi { color: #19177C } /* Name.Variable.Instance */
+		.highlight .il { color: #666666 } /* Literal.Number.Integer.Long */
+		--></style>
+	STYLE
+end