Edit History:Diff

Changes of uim/2009/10/13/ffi since 2009/10/13 00:25:13 JST

+ added lines
- deleted lines
  uimのschemeから共有ライブラリにアクセスするには、
  モジュールを作って(module-load)する、という方法が用意されているのだけど、
  そもそも共有ライブラリを作成できる言語処理系でないとモジュールを作成できないし、ちょっとライブラリを試したいだけなのにファイルを作るのはめんどう。
  
  ということで、uim-trunkにlibffiにアクセスするモジュールを投入した。
  
+ [http://sources.redhat.com/libffi/ libffi]をインストール後、
+ --with-ffiでconfigureしたuimをインストールすれば、
- --with-ffiを有効にしたuimをインストールすれば、
  uim-shから、
  
  {{{
  uim> (module-load "ffi")
+ #t
+ (define libm
- uim> (define libm
         (dlopen "libm.so" (assq-cdr '$RTLD_LAZY (dlopen-mode))))
+ libm
+ uim> (ffi-function libm 'double "atan" '((double . "1.0")))
+ "0.785398"
- uim> (define atan (dlsym libm "atan"))
- uim> (ffi-call 'double atan '((double . "1.0"))) ;; => pi/4
  uim> (dlclose libm)
+ #t
  }}}
  
  とかできる。
  
+ もちろん引数の数や型を間違えると即死するので注意が必要。
- もちろん引数の型を間違えると即死するので注意が必要。
  
+ - 無茶な例: [[gist:207980]] リトルエンディアンの32bitCPU前提だし、ここまでくるとモジュール作ったほうがいい。まねしちゃだめ。
- - 無茶な例: [[gist:207980]] リトルエンディアン32bit前提だし、ここまでくるとモジュール作ったほうがいい。まねしちゃだめ。