[ruby-dev:35295] Re: [BUG] test_win32ole_event.rb in trunk

助田です。

arton wrote:
>> よくわかってないんですが、EVENTSINK_Invoke()などは非同期にWindows
>> から呼び出されているんでしょうか?
> メッセージポンプ（PeekMessageとかGetMessageとDispatchMessageの組み合わせ）
> を呼ばない限りはないはずです。少なくとも、Win32OLEではそれ以外でコールバッ
> クを受けません（OLEサーバの実装にバグがあっても、異なるスレッドで呼ばれ
> るはず）。

EVENTSINK_Invokeは、OLEサーバからのイベントの通知を受けとる
関数です。
で、場合によっては、メッセージポンプを呼んで、OLEサーバからの
イベント通知を待ち受けるような使い方も想定してました。

>> だとすると、これらのコールバック関数内でのrubyオブジェクト操
>> 作はちょっと考えないといけないんじゃないかという気がします。
>> それとも、単にfree処理の結果としてEVENTSINK_Invoke()がコール
>> バックされるだけなんでしょうか?
> これはあり得ますね。

この可能性は少いと思ったんですけど...。

> スタックトレースの上のほうはどうなっていますか？

次のような感じです。

*1       msvcr80-ruby190.dll!rb_newobj()
 2       msvcr80-ruby190.dll!str_alloc(unsigned long klass=12338520)
 3       msvcr80-ruby190.dll!str_new(unsigned long klass=12338520,
         const char * ptr=0x00000000, long len=0)
 4       msvcr80-ruby190.dll!rb_enc_str_new(const char * ptr=0x012fc7d0,
         long len=16, OnigEncodingTypeST * enc=0x00c330f0)
 5       win32ole.so!ole_wc2vstr(unsigned short * pw=0x00000000, int
         isfree=1)
 6       win32ole.so!EVENTSINK_Invoke(IEventSink *
         pEventSink=0x013bb4d0, long dispid=104, const _GUID * const
         riid=0x002677a4, unsigned long lcid=0, unsigned short wFlags=1,
         tagDISPPARAMS * pdispparams=0x00269d68,
         tagVARIANT * pvarResult=Empty,
         tagEXCEPINFO * pexcepinfo=0x00000000, unsigned int *
         puArgErr=0x00000000)
 7       oleaut32.dll!7714c351()
 8       [下のフレームは間違っているか、または見つかりません。
          oleaut32.dll に対して読み込まれたシンボルはありません。]
 9       oleaut32.dll!770ddb25()
 10      rpcrt4.dll!77eb658c()
 11      msvcr80-ruby190.dll!rb_gc_mark(unsigned long ptr=269465784)
 12      msvcr80-ruby190.dll!gc_mark_children(rb_objspace *
         objspace=0x00000000, unsigned long ptr=0, int lev=2287464)

  Cygwin に gdbをインストールしてなかった...。
  助田 雅紀