robust_excel_ole 1.39 → 1.40

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 3b55888236ecd8ff3750b2b961c15ba52b67d3525566dc58ff6f6144c4a3d4ac
-  data.tar.gz: c1585bfc357054685c44cea38aa597bbb6b3e5d9fc5ed97978a81857bf83679a
+  metadata.gz: a3d804db077d2eb3c4eaf9a14a0e16cefcf9b6ba62b28f5e72863b76adf1fea8
+  data.tar.gz: 72e7f2f169fa6a945380326c22b45921aa34785741fb4380317551db78a42596
 SHA512:
-  metadata.gz: 0fc661d429fea1ad21bf62b453e899090e854467b09846b230b86ca2b4f8fb448ed0afe13a1e86dde0c91c8da9fc72a80eb16429588ce6fdb5a1469695f9a16c
-  data.tar.gz: 0e88736e07de3ff534c10efc4a635b2dffdbaf1f9c962106e4f1773d7422ee516052bbcea21eb2bf3f88b3038d2dbd0409d3734b0f09f20c98700f27e1599736
+  metadata.gz: 188397edb880279b9c5510a6b625a11fde2b4c5366de48f90728c4689293d21096c397a4da10fe10f09ae67a234f686906b5245c6f0f9f3750e69a6c95d4ab82
+  data.tar.gz: 927aa043117fbbec3fd517ecc9e13ea522aebc87f04bacc84ffcf334df4c7a54f285480ef597bdb2505497ef450862446915dd1d0191e99128c2932f78ba260a

data/lib/robust_excel_ole/excel.rb

@@ -7,58 +7,64 @@ def ka
   Excel.kill_all
 end
 
-=begin
 module User32
   # Extend this module to an importer
   extend Fiddle::Importer
-  # Load 'user32' dynamic library into this importer
-  dlload 'user32'
-  # Set C aliases to this importer for further understanding of function signatures
-  typealias 'HWND', 'HANDLE'
-  typealias 'HANDLE', 'void*'
-  typealias 'LPCSTR', 'const char*'
-  typealias 'LPCWSTR', 'const wchar_t*'
-  typealias 'UINT', 'unsigned int'
-  typealias 'ppvObject', 'void**'
-  typealias 'DWORD', 'unsigned long'
-  typealias 'LPDWORD', 'DWORD*'
-  typealias 'PDWORD_PTR', 'DWORD**'
-  typealias 'WPARAM', 'UINT*'
-  typealias 'LPARAM', 'INT*'
-  typealias 'LRESULT', 'DWORD'
-  # Import C functions from loaded libraries and set them as module functions
-  extern 'DWORD GetWindowThreadProcessId(HWND, LPDWORD)'
-  extern 'HWND FindWindowExA(HWND, HWND, LPCSTR, LPCSTR)'
-  extern 'DWORD SetForegroundWindow(HWND)'
-  extern 'LRESULT SendMessageTimeoutA(HWND, UINT, WPARAM, LPARAM, UINT, UINT, PDWORD_PTR)'
+  begin
+    # Load 'user32' dynamic library into this importer
+    dlload 'user32'
+    # Set C aliases to this importer for further understanding of function signatures
+    typealias 'HWND', 'HANDLE'
+    typealias 'HANDLE', 'void*'
+    typealias 'LPCSTR', 'const char*'
+    typealias 'LPCWSTR', 'const wchar_t*'
+    typealias 'UINT', 'unsigned int'
+    typealias 'ppvObject', 'void**'
+    typealias 'DWORD', 'unsigned long'
+    typealias 'LPDWORD', 'DWORD*'
+    typealias 'PDWORD_PTR', 'DWORD**'
+    typealias 'WPARAM', 'UINT*'
+    typealias 'LPARAM', 'INT*'
+    typealias 'LRESULT', 'DWORD'
+    # Import C functions from loaded libraries and set them as module functions
+    extern 'DWORD GetWindowThreadProcessId(HWND, LPDWORD)'
+    extern 'HWND FindWindowExA(HWND, HWND, LPCSTR, LPCSTR)'
+    extern 'DWORD SetForegroundWindow(HWND)'
+    extern 'LRESULT SendMessageTimeoutA(HWND, UINT, WPARAM, LPARAM, UINT, UINT, PDWORD_PTR)'
+  rescue Fiddle::DLError => e
+    #trace "user32.dll not found: #{e}"
+  end
 end
 
 module Oleacc
   # Extend this module to an importer
   extend Fiddle::Importer
-  # Load 'oleacc' dynamic library into this importer
-  dlload 'oleacc'
-  # Set C aliases to this importer for further understanding of function signatures
-  typealias 'HWND', 'HANDLE'
-  typealias 'HANDLE', 'void*'
-  typealias 'ppvObject', 'void**'
-  typealias 'DWORD', 'unsigned long'
-  typealias 'HRESULT', 'long'  
-  Guid = struct [
-  'unsigned long data1',
-  'unsigned short data2',
-  'unsigned short data3',
-  'unsigned char data4[8]'
-  ]
-  # Import C functions from loaded libraries and set them as module functions
-  extern 'HRESULT AccessibleObjectFromWindow(HWND, DWORD, struct guid*, ppvObject)'
-  #typealias 'REFIID', 'struct guid*'
-  #extern 'HRESULT AccessibleObjectFromWindow(HWND, DWORD, REFIID, ppvObject)'
-  #extern 'HRESULT AccessibleObjectFromWindow(HWND, DWORD, struct GUID*, ppvObject)'
-  #extern 'HRESULT AccessibleObjectFromWindow(HWND, DWORD, void*, ppvObject)'
-  #extern 'HRESULT AccessibleObjectFromWindow(HWND, DWORD, struct GUID*, ppvObject)'
+  begin
+    # Load 'oleacc' dynamic library into this importer
+    dlload 'oleacc'
+    # Set C aliases to this importer for further understanding of function signatures
+    typealias 'HWND', 'HANDLE'
+    typealias 'HANDLE', 'void*'
+    typealias 'ppvObject', 'void**'
+    typealias 'DWORD', 'unsigned long'
+    typealias 'HRESULT', 'long'  
+    Guid = struct [
+    'unsigned long data1',
+    'unsigned short data2',
+    'unsigned short data3',
+    'unsigned char data4[8]'
+    ]
+    # Import C functions from loaded libraries and set them as module functions
+    extern 'HRESULT AccessibleObjectFromWindow(HWND, DWORD, struct guid*, ppvObject)'
+    #typealias 'REFIID', 'struct guid*'
+    #extern 'HRESULT AccessibleObjectFromWindow(HWND, DWORD, REFIID, ppvObject)'
+    #extern 'HRESULT AccessibleObjectFromWindow(HWND, DWORD, struct GUID*, ppvObject)'
+    #extern 'HRESULT AccessibleObjectFromWindow(HWND, DWORD, void*, ppvObject)'
+    #extern 'HRESULT AccessibleObjectFromWindow(HWND, DWORD, struct GUID*, ppvObject)'
+  rescue Fiddle::DLError => e
+    #trace "oleacc.dll not found: #{e}"
+  end
 end
-=end
 
 module RobustExcelOle
 
@@ -349,12 +355,16 @@ module RobustExcelOle
       GC.start
       sleep 0.1
       if finishing_living_excel
-      #  if hwnd
-      #    pid_puffer = ' ' * 32
-       #   User32::GetWindowThreadProcessId(hwnd, pid_puffer)         
-       #   pid = pid_puffer.unpack('L')[0]
-       #   Process.kill('KILL', pid) rescue nil
-      #  end
+        if hwnd
+          begin
+            pid_puffer = ' ' * 32
+            User32::GetWindowThreadProcessId(hwnd, pid_puffer)         
+            pid = pid_puffer.unpack('L')[0]
+            Process.kill('KILL', pid) rescue nil
+          rescue NoMethodError => e
+            # trace "#{e}"
+          end
+        end
         @@hwnd2excel.delete(hwnd)
         weak_xl.ole_free if weak_xl.weakref_alive?
       end
@@ -557,29 +567,30 @@ module RobustExcelOle
       self.Hwnd == other_excel.Hwnd if other_excel.is_a?(Excel) && alive? && other_excel.alive?
     end
 
-    # def alive?
-      #msg = 0x2008 
-      #wparam = 0
-      #lparam = 0
-      #flags = 0x0000 # 0x0002
-      #duration = 5000
-      #lpdw_result_puffer = ' ' * 32
-      #status = User32::SendMessageTimeoutA(hwnd, msg, wparam, lparam, flags, duration, lpdw_result_puffer)
-      #result = lpdw_result_puffer.unpack('L')[0]
-      #status != 0
-    # end
-
     # returns true, if the Excel instances responds to VBA methods, false otherwise
     def alive?
-      @ole_excel.Name
-      true
-    rescue
-      # trace $!.message
-      false
+      begin
+        msg = 0x2008 
+        wparam = 0
+        lparam = 0
+        flags = 0x0000 # 0x0002
+        duration = 5000
+        lpdw_result_puffer = ' ' * 32
+        status = User32::SendMessageTimeoutA(hwnd, msg, wparam, lparam, flags, duration, lpdw_result_puffer)
+        result = lpdw_result_puffer.unpack('L')[0]
+        status != 0
+      rescue NoMethodError => e
+        #trace "#{e}"
+        begin
+          @ole_excel.Name
+          true
+        rescue
+          # trace $!.message
+          false
+        end
+      end
     end
 
-
-
     # returns unsaved workbooks in known (not opened by user) Excel instances
     # @private
     def self.unsaved_known_workbooks       
@@ -741,8 +752,12 @@ module RobustExcelOle
 
     def focus
       self.visible = true
-      status = User32::SetForegroundWindow(@ole_excel.Hwnd)
-      raise ExcelREOError, "could not set Excel window as foreground" if status == 0     
+      begin
+        status = User32::SetForegroundWindow(@ole_excel.Hwnd)
+        raise ExcelREOError, "could not set Excel window as foreground" if status == 0 
+      rescue NoMethodError => e
+        raise ExcelREOError, "could not set Excel window as foreground because user32.dll not found"
+      end
     end
     
     # @private

data/lib/robust_excel_ole/version.rb

@@ -1,3 +1,3 @@
 module RobustExcelOle
-  VERSION = "1.39"
+  VERSION = "1.40"
 end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: robust_excel_ole
 version: !ruby/object:Gem::Version
-  version: '1.39'
+  version: '1.40'
 platform: ruby
 authors:
 - traths
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2022-03-29 00:00:00.000000000 Z
+date: 2022-03-31 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: pry