summaryrefslogtreecommitdiff
path: root/test/win32ole/available_ole.rb
blob: ebc9baae66fc381a6ebd638e611a2ece76a98e6b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
begin
  require 'win32ole'
rescue LoadError
end

if defined?(WIN32OLE)
  module AvailableOLE
    module_function

    def sysmon_available?
      WIN32OLE_TYPE.new('System Monitor Control', 'SystemMonitor')
      true
    rescue
      false
    end

    def ado_available?
      WIN32OLE.new('ADODB.Connection')
      true
    rescue
      false
    end

    def msxml_available?
      !WIN32OLE_TYPELIB.typelibs.find { |t| t.name.start_with?('Microsoft XML') }.nil?
    end

    def event_param
      method = if msxml_available?
                 typelib = WIN32OLE_TYPELIB.typelibs.find { |t| t.name.start_with?('Microsoft XML') }
                 ole_type = WIN32OLE_TYPE.new(typelib.name, 'IVBSAXContentHandler')
                 WIN32OLE_METHOD.new(ole_type, 'startElement')
               elsif ado_available?
                 typelib = WIN32OLE.new('ADODB.Connection').ole_typelib
                 ole_type = WIN32OLE_TYPE.new(typelib.name, 'Connection')
                 WIN32OLE_METHOD.new(ole_type, 'WillConnect')
               end
      method && method.params[0]
    end
  end
end