SKK のはてなキーワード辞書を作る。

さっき、IRC で、ATOK のはてなキーワード辞書が便利という話が出たので、以前、id:antipop さんがSKK用辞書を作ると便利と言っていたのを思いだしました。
また忘れない内に、さっさと作ってしまおうというわけで、ちょっと調べて作ってみました。

辞書メンテナンスツールをインストールする。

辞書を作るために、skktools-1.3.1を入れます。

$ wget http://openlab.ring.gr.jp/skk/tools/skktools-1.3.1.tar.gz
$ tar zxf skktools-1.3.1.tar.gz
$ ./configure
$ make
$ sudo make install
./mkinstalldirs /usr/local/bin
/usr/bin/install -c skkdic-expr /usr/local/bin/
/usr/bin/install -c skkdic-sort /usr/local/bin/
/usr/bin/install -c skkdic-count /usr/local/bin/

skkdic-expr2 が入っていませんね。

$ make skkdic-expr2
gcc -I. -I. -I. -g -O2  -o skkdic-expr2 ./skkdic-expr2.c  
./skkdic-expr2.c:34:18: error: glib.h: No such file or directory
...

と、glib ねえよと怒られてしまいます。なので、

$ sudo port install glib2

で、glib2 をインストールしておきます。
念のため、

$ ./configure --with-skkdic-expr2

して、

$ make
gcc -I. -I. -I. -g -O2 -I/opt/local/include/glib-2.0 -I/opt/local\
/lib/glib-2.0/include -I/opt/local/include   -o skkdic-expr2 ./sk\
kdic-expr2.c -L/opt/local/lib -lglib-2.0 -lintl -liconv
$ sudo make install
./mkinstalldirs /usr/local/bin
 /usr/bin/install -c skkdic-expr /usr/local/bin/
 /usr/bin/install -c skkdic-sort /usr/local/bin/
 /usr/bin/install -c skkdic-count /usr/local/bin/
 /usr/bin/install -c skkdic-expr2 /usr/local/bin/

無事、skkdic-expr2 も入りました :-)

辞書を作る。

を参考に、keywordlist_furigana2skkdic.rb スクリプトを作る。元ソースは、20行目に改行が入っているので改行を削除。あと、僕は ruby を別途インストールしていないので、ruby のパスを変更。

#!/usr/bin/ruby -Ke
# はてなダイアリーキーワードふりがなリストをSKKの辞書に変換
#
# 使い方:
#  wget http://d.hatena.ne.jp/images/keyword/keywordlist_furigana.csv
#  ruby keywordlist_furigana2skkdic.rb keywordlist_furigana.csv > tmp.skkdic
#  skkdic-expr2 -o keywordlist_furigana.skkdic tmp.skkdic
#
# 同一の読みをまとめたりはしていないので、一度skkdic-expr2を通してください。

require 'nkf'

class String
  # borrowed from http://openlab.jp/skk/skk/tools/filters/skkdictools.rb
  def concatify
    #if !(/^([-\w]+.*)$/ =~ self) && (/[;\r\n\/\"]/ =~ self)
    if /[;\r\n\/\"]/ =~ self
      tmp = self.gsub(/;/, '\\\073').gsub(/\//, '\\\057').gsub(/\r/, '\\r').gsub(/\n/, '\\n').gsub(/"/, '\\"')
      return '(concat "' + tmp + '")'
    else
      return self
    end
  end
end

# http://d.hatena.ne.jp/hatenadiary/20060922/1158908401
# http://d.hatena.ne.jp/images/keyword/keywordlist_furigana.csv
ARGF.each do |line|
  line.chomp!
  furigana, keyword = line.split(/\t/, 2)
  if furigana.empty?
    next # ふりがながないキーワードを無視
  end
  if furigana == keyword
    next # ひらがなだけのキーワードを無視
  end
  if furigana == NKF.nkf('-Ee -m0 --hiragana', keyword)
    next # カタカナ語は無視
  end
  if /^「.*」$/ =~ keyword
    next # 「」語は無視
  end
  puts "#{furigana} /#{keyword.gsub(/&amp;/, '&').concatify}/"
end

はてなダイアリーキーワードふりがなリストを公開しましたから、keywordlist_furigana.csv をダウンロードして、

$ ruby ./keywordlist_furigana2skkdic.rb keywordlist_furigana.csv > tmp.skkdic
$ skkdic-expr2 -o keywordlist_furigana.skkdic tmp.skkdic

とすると、keywordlist_furigana.skkdic ができるので、これを SKK の辞書に登録する。僕の場合、AquaSKK に登録しておけば、skkserv 機能を通しているので、Emacs の ddskk は設定の必要なし。

これで、はてなキーワードによる強力な補完を手に入れる事ができました!