more-functional

uim/Programming/Scheme/2010/12/23/skkserv

2010-12-22T17:40:47+00:00

SKK Advent Calendar16日目の記事です。プログラミングねたを書いてみます。

プログラミング言語を学習する場合、ネットワークプログラミングは避けて通れません。手始めに書くのはおそらくechoサーバでしょうが、その次はどれを書こうかな、とそんなときにskkservはいかがでしょうか。

簡単なプロトコル
かな漢字変換エンジンが簡単
実際に動くと楽しい

skkのプロトコルは単純です。 skkserv.cの先頭部分のコメントに入りきるくらい単純なものです。それでいて、なにがあってもクライアントと接続を維持しつづけないといけない、というあたりがなかなか微妙な感じで、学ぼうとしてる言語の癖が掴めてよろしいのではないでしょうか。

また、かな漢字変換の仕掛けが簡単で、ここではまることがまずありません。モチベーションの維持によいです。

書いてみる

せっかくですのでuimで書いてみました。

uimも1.5.xまではそれぞれのimが各クライアント付属のライブラリを使って通信していたのですが、いまではソケットまわりの低レベルな操作より上のレベルでは、 schemeで書かれた各モジュールが各プロトコルでサーバと対話するようになっています。

ネットワークの基本的な部分は汎用の部品が用意されているわけです。

さて、肝心の漢字変換ですが、 uimにはlookというモジュールがありまして、これはlook(1)をそのままライブラリとして使えるようにしたものです。正確にマッチするようにすると普通の変換、先頭にマッチするすべてのエントリを列挙すると予測変換ということになります。辞書はソートされている必要があるのですが、便利なのでuimのいろいろなところで使われています。

というわけで、部品は揃ったので、これらをうまくつないでやれば結構簡単に書けます。コードはこんな具合です。

gist:751706

サーバの機能よりも辞書のパースの方がコードが長いくらいですね。

 uim-sh /path/uim-skkserv

でport 1178で起動します。辞書は~/.uim.d/dict/SKK-JISYOを使います。

ipv6も使えますし、予測入力も対応しています。

lookは単純に二分検索するだけですが、手元の辞書500900エントリでも一瞬で出ます。

string-concatenate-reverseはuim-1.6.0に入れ忘れたものです。ごめんなさい。

Programming/2009/11/03/patch-tag

2009-11-03T06:34:19+00:00

http://patch-tag.com/ でdarcsのホスティングをやっているらしいので、 githubから移動中[移動先]。

darcsはメール経由でパッチ当てたりできて便利。

ユーザ間でレポジトリを共有するためにはレポジトリに直接書き込み権限を与えたりしないといけないので、ホスティングするには結構難易度高いのじゃないだろうか。

Programming/2009/11/03/ji

2009-11-03T06:29:51+00:00

patch-tag:tiの姉妹品でpatch-tag:jiというものを作ってみた。これはxmppをfifoするためのもの。

tiと組み合わせて使ってるけど、こんな感じ。

 twitter <=> ti <=> ji <=> ejabberd <=> bitlbee <=> emacs

結構間にはさまってるけど、きちんと投稿できてるみたい。

InterWikiName

2009-11-03T06:20:30+00:00

WiLiKi: practical-scheme.net/wiliki/wiliki2.cgi?
CLiki: www.cliki.net/
CSW: community.schemewiki.org/?
HaWiki: haskell.org/hawiki/
eggs: www.call-with-current-continuation.org/eggs/
ねるWiki: www.soraneko.com/~nel/wiliki.cgi?
itazura: www.akatsukinishisu.net/wiki.cgi?
EmacsWiki: www.emacswiki.org/cgi-bin/wiki/
OpenBSD-man: www.openbsd.org/cgi-bin/man.cgi?format=html&arch=i386&manpath=OpenBSD-current&query=
OpenBSD-cvs: www.openbsd.org/cgi-bin/cvsweb/
undeadly: undeadly.org/cgi?action=article&sid=
marc: marc.theaimsgroup.com/?t=
marc-openbsd-cvs: marc.theaimsgroup.com/?l=openbsd-cvs&m=
marc-openbsd-tech: marc.theaimsgroup.com/?l=openbsd-tech&m=
marc-openbsd-ports: marc.theaimsgroup.com/?l=openbsd-ports&m=
marc-openbsd-misc: marc.theaimsgroup.com/?l=openbsd-misc&m=
FreeBSD-cvs: www.freebsd.org/cgi/cvsweb.cgi/
NetBSD-cvs: cvsweb.netbsd.org/bsdweb.cgi/
sf: www.sf.net/projects/
Wikipedia: www.wikipedia.org/wiki/
Wikipedia-ja: ja.wikipedia.org/wiki/
Google: www.google.com/search?hl=ja&ie=utf-8&oe=utf-8&lr=lang_ja&q=
HSPWiki: quasiquote.org/hspwiki/
webarchive: web.archive.org/web/
Landscape: sonic64.com/
g.o.o.cvs: permalink.gmane.org/gmane.os.openbsd.cvs/
uim-en: groups.google.com/group/uim-en/browse_thread/thread/
gist: gist.github.com/
patch-tag: patch-tag.com/r/iratqq/
log: quasiquote.org/log/
files: quasiquote.org/files/

uim/2009/10/13/ffi

2009-10-12T15:46:48+00:00

uimのschemeから共有ライブラリにアクセスするには、モジュールを作って(module-load)する、という方法が用意されているのだけど、そもそも共有ライブラリを作成できる言語処理系でないとモジュールを作成できないし、ちょっとライブラリを試したいだけなのにファイルを作るのはめんどう。

ということで、uim-trunkにlibffiにアクセスするモジュールを投入した。

libffiをインストール後、 --with-ffiでconfigureしたuimをインストールすれば、 uim-shから、

uim> (module-load "ffi")
#t
(define libm
       (dlopen "libm.so" (assq-cdr '$RTLD_LAZY (dlopen-mode))))
libm
uim> (ffi-function libm 'double "atan" '((double . "1.0")))
"0.785398"
uim> (dlclose libm)
#t

とかできる。

もちろん引数の数や型を間違えると即死するので注意が必要。

無茶な例: gist:207980 リトルエンディアンの32bitCPU前提だし、ここまでくるとモジュール作ったほうがいい。まねしちゃだめ。

Programming/2009/10/11/ti

2009-10-10T15:59:37+00:00

誰もが通る道、twitterクライアントを書いてみた。

files:ti-0.1.tar.gz

実行すると、

~/ti +
     + /in
     + /out

というファイルができて、in、outをfifoを通して書き込み、読み出し出来るようになる。

いちおうtwitter以外のcloneにも対応してて、 identi.caだと、

 $ ti -b https://identi.ca/api

ちゅいったーだと、

 $ ti -b http://chuitter.jp/api

など、status.net系でも使える。

ソース覗きたいたいひとは

 git clone git://github.com/iratqq/ti.git

でどぞ。

uim/2009/08/09/prediction

2009-08-09T15:05:37+00:00

Canna/SJ3/Wnnで予測入力できないのは悲しいので書いた。

files:uim-predict.diff.gz

せっかくだから日本語以外のimでも使えるように。

これをcommitしたら、look-imは廃止することになるんだろうなあ。

sqlite3は動作が重いかもしれない。というかこういう用途は想定してないだろうし。

wlos初めて使ってみたけど、tinyclosと勝手が違って涙目。

uim/2009/03/03/uim-help

2009-03-03T12:06:52+00:00

uim-toolbarの浮き輪ボタンを押しても反応がないのはあまりにむなしいので、 uim-helpを適当にでっちあげた。

files:uim-help.diff.gz

とても手抜きだけど、機能はこれから追加するということで。

uim/2009/02/26/social-ime

2009-02-25T15:53:36+00:00

uim-trunkにて、uim-social-imeで予測入力できるようになった。 ekatoさん、patchありがとうございます！

http://ekato.wordpress.com/2009/02/25/macuim-060-14/

しかし重い。重すぎる… いまのuim-social-imeはuim/2008/11/07/social-imeのころと違って、 uim-curlではなくuim-socketを使うように変更したので、これが効いてるかも知れないし、そうだとしたら残念過ぎる。

あ、uim-pref-gtkでuim-social-ime周りを変更したあと、 "適用"ボタンを押すと、

 Error: in scm_symbol_value: unbound variable: social-ime-configure-widgets

なるエラーが出る模様。どうなってるのだろうか。

uim/2009/02/16/statusd_uim-1.1

2009-02-16T03:32:32+00:00

アップロードするのを長らく放置してたので改めて。

uim/statusd_uim

変更点はメモリリークを塞いだ点と、poll(2)をデフォルトにしたこと。 iconv(3)は恐ろしいですね。

uim/statusd_uim

2009-02-16T03:28:33+00:00

[[$$toc]]

About

statesd_uim is uim indicator for ion3.

Screenshot


SKK - Direct Mode

SKK - Hankaku Katakana Mode	SKK - Hiragana Mode

Look - Look Mode

Install

Edit Makefile
`make && make install',
Copy cfg_statusbar.lua from installed directory of ion3 to ~/.ion3 and edit it.
Restart ion3

Setup

You must open file ~/.ion3/cfg_statusbar.lua, append im status values to line of template="..." and add entry of statesd_uim to mod_statusbar.launch_statusd.

For example,

-- Create a statusbar
mod_statusbar.create {
  -- snip
  template="[ %date || load:% %>load || mail:% %>mail_new/%>mail_total || im:% %<uim_im_name %<uim_im_mode ] %filler%systray",
}

-- Launch ion-statusd. This must be done after creating any statusbars
-- for necessary statusd modules to be parsed from the templates.
mod_statusbar.launch_statusd {
  -- snip
  uim = {
      interval=100,
   },
}

Variables

uim_im_name: name of input method
uim_im_mode: input mode

Download

sj3/2009/02/10/いろいろ

2009-02-10T12:23:39+00:00

sj3のインストール

http://www.lins.jp/~obata/diary/200902051.html#200902051

うーむ。

sj3 の新しめの奴を pkgsrc 化して build してみた。現状の分け方 (lib, server, dict) が、最新版の configure オプションで効く分け方と異なるから，名前をオプション名と同じ client, server, dict に変えようとしたが、 dict するには、server の中 sj3mkdic コマンドが必要で，今の server + dict = server-bin というのは、無駄な気がして，一緒にしてやれ！と思って続いて client 試したら server と同じ header ファイルをインストールしてしまうし。

sj3mkdicがsj3servとおなじくlibsj3core(元kanakan)に依存してるので、ややこしい構成にしたような記憶があります。いっそのこと全部ビルドして、インストールするときに振り分けたほうがいいのかしら。

sj3lib.hはクライアントのヘッダファイルですけど、それ以外のヘッダファイルは入れない設定のはずだけど間違ってるかもしれない。

環境変数SJ3SERVに""を設定するとkinput2もunix domain socketでつなぐはず。

scim-uim & uim-scim

http://www.hi-matic.org/diary/index.cgi?20090210#10-1

いまのuim-scimはこわr

Chicken/Scheme/2008/12/15/loudmouth.egg

2008-12-15T08:07:04+00:00

XMPPクライアントをまっさらのschemeで書くのに挫折したので、かわりにloudmouthをchickenから呼べるようにした。

files:egg/loudmouth.egg

マニュアルはないけど、C APIを移しかえただけなので、サンプルのloudmouthのコードそのまま持ってくれば動く。

オウムがえしするだけならこんな感じ。

gist:11760

コールバックの形式だけは普通にforeign-lambdaできないので、ヘルパーマクロを使って、

(lm:define-message-handler
 presence-cb
 (conn mes data)
 (begin ここにコールバックの内容))

(lm:call-with-message-handler
  presence-cb #f #f
  (lambda (handler)
    (lm:connection-register-message-handler
      conn handler
      *LM-MESSAGE-TYPE-PRESENCE*
      *LM-HANDLER-PRIORITY-LAST*)))

みたいに書く。

コールバックの第一引数がvoid*なものだから、データの移送はかなり面倒なことに。これをscheme-objectにすると、gcされちゃう。

これを使ったtwitter->xmppボットは安定動作しているようなので、モジュール部分だけ公開してみる。

CLだとcl-xmppなんてのがあって、 asdf-installで簡単インストールできたりしてちょっと羨ましかったり。

gist:10812: cl-xmppの例

Topics

2008-12-13T20:57:17+00:00

Category
- Audio
- Emacs
- Erlang
- FreeBSD
- Haskell
- Lisp/Scheme
- Memo
- NetBSD?
- OpenBSD
- Programming
- Security
- SJ3
- uim
- WiLiKi:いわた
- CategoryIcons

Archives

Planet

Info
- RSS
- InterWikiName

uim

2008-12-13T20:56:45+00:00

日本語入力ねた。おいらコミッタ。

つくったもの

look input method: 英語でも予測入力
sj3 input method: いにしえの日本語変換サーバsj3を使って日本語変換
wnn input method: こちらはwnnを使って日本語変換
social-ime input method: webベースの日本語変換サービスSocial IMEを使って日本語変換
ajax-ime input method: webベースの日本語変換サービスajax-imeを使って日本語変換
yahoo-jp input method: yahooのかな漢字変換サービスを使って日本語変換
uim/statusd_uim: ion3のステータスバーにuimの状態表示

Link

http://code.google.com/p/uim/ : project page
http://code.google.com/p/uim-doc-ja/ : wiki

uim/Programming/Scheme/skkserv