[Mew-dist 13289] LDAP support for Mew

Shun-ichi GOTO gotoh at example.com
2000年 6月 12日 (月) 16:33:21 JST


ちょっと かめれすネタなのですが、

>>>>> at Mon, 5 Jun 2000 11:38:59 +0900
>>>>> 後藤 == Shun-ichi GOTO <gotoh at example.com> said,
scho> IMAP 4 とは直接関係無いかもしれませんが,“LDAP に対応”というのは話題
scho> になっていませんか?
...snip...
後藤> 現在手元ではEUDCを使ってそれが出来るようにはしてありますが、
後藤> まだMew のAddrBook との整合が不十分なまま放置してあるので、
後藤> もう少し元気を出してもう少しマシなものを作ってみようかと思います。

... ということで1週間も経ちましたが、エイヤッと書いてみました。

mew-lap.el を添付します。

これは本体に対するパッチではなく、defadvice を使ったものです。
Mew 本体の mew-complete と mew-addrbook-name-get を引っかけています。
パッチにするにしても cache の使い方など、ちょっと迷うところがあるため、
defadvice する事にし、本体改造は別途考えるようにしました。

本当はEUDC をバックエンドに使用するようなものを想定していたのですが、冗
長なのと整合させるのがホネなのと、単なるアドレス引きには大げさかな、と思っ
たため、よりシンプルに外部プログラムldapsearch 直接操作するものにしまし
た。とはいえ、ちょっと大きくなってしまったけど。


使い方や内部動作は .el 本体にコメントで記述しています。
とりあえず使うためには ldapsearch プログラムを入手し、
 mew をload した後に mew-ldap.el をロードし、
(setq mew-ldap-server "xxxx") としてサーバを指定するだけです。

あとは draft mode のTo: 部分などで今までと同様に補間動作を行なうと、
LDAP 検索も行ないます。そのため若干余計な時間がかかる事はご容赦下さい。


UNIX(BSD/OS) + Emacs 20.6 + Mew-1.95b3/b39 + OpenLDAP および
Win2000 + Meadow 1.13b1 (Emacs 20.6) + Mew-1.95b3/b39 
+ Netscape Directory SDK にて確認しました。


本パッケージは ldapsearch プログラムに依存していますので、これがないと始
まりません。UNIX な環境の人は、OpenLDAP を入手しコンパイルする事で得られ
ます。Win32 の人は Netscape Directory SDK を入手するか、Notes 5 Client 
をインストールしてそのままldapsearch.exe は既に存在しているはずです。
ただしNotes のldapsearch.exe はほとんど試していません。

OpenLDAP                http://www.openldap.org/
ミシガン大学のLDAP      http://www.umich.edu/~dirsvcs/ldap/ldap.html
Netscape Directory SDK  http://developer.netscape.com/tech/directory/

ちなみにNote5 のldapsearch を使用する人は、
(setq mew-ldap-program-arguments 'notes)
として下さい。それ以外の人は自動判定でうまくいくと思います。
## 指定するならば 'openldap あるいは 'netscape になります。

以上、LDAP 環境をお持ちの方はお試し下さいませ。
## バグレポート歓迎

--- Regards,
 Shun-ichi Goto  <gotoh at example.com>
   R&D Group, TAIYO Corp., Tokyo, JAPAN
-------------- next part --------------
テキスト形式以外の添付ファイルを保管しました...
ファイル名: mew-ldap.el-1.7.gz
型:         application/octet-stream
サイズ:     10182 バイト
説明:       無し
URL:        <http://www.mew.org/pipermail/mew-dist/attachments/20000612/030cfbb0/attachment.obj>


Mew-dist メーリングリストの案内