robust_excel_ole 1.37 → 1.40

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 646308c3740c8716d9fb91b9c0288edc6e915c060bdd713401980608d412119a
-  data.tar.gz: 379a3bd099724e9cd6adc2542d804d4f4737eafc47742892dbc1ba4914f7b7c2
+  metadata.gz: a3d804db077d2eb3c4eaf9a14a0e16cefcf9b6ba62b28f5e72863b76adf1fea8
+  data.tar.gz: 72e7f2f169fa6a945380326c22b45921aa34785741fb4380317551db78a42596
 SHA512:
-  metadata.gz: '02308d88008a6e7d5362b0c793f1ab4e55025b7df0d19741dbe66775450f672b654c9766ac3e49d6ec840d497b9fa39befd1f66e6d20e5a5539d6cf3eefbc276'
-  data.tar.gz: 874eaf4089951eb94ac101699198e35981b72084036eb171ec70eb69dc2c135951138f773844b945ff7f4ebbd8d3a4020f3bdaf3f4286f165334e270ada23118
+  metadata.gz: 188397edb880279b9c5510a6b625a11fde2b4c5366de48f90728c4689293d21096c397a4da10fe10f09ae67a234f686906b5245c6f0f9f3750e69a6c95d4ab82
+  data.tar.gz: 927aa043117fbbec3fd517ecc9e13ea522aebc87f04bacc84ffcf334df4c7a54f285480ef597bdb2505497ef450862446915dd1d0191e99128c2932f78ba260a

data/lib/robust_excel_ole/cygwin.rb

@@ -1,7 +1,10 @@
 # -*- coding: utf-8 -*-
 
 module RobustExcelOle
+ 
   module Cygwin
+
+=begin  
     require 'Win32API'
 
     @conv_to_full_posix_path =
@@ -38,6 +41,15 @@ module RobustExcelOle
       buf.delete!("\0")
       buf
     end
+=end
+
+    require "open3"
+
+    # @private
+    def cygpath(options, path)
+      Open3.popen3("cygpath #{options} #{path}") { |stdin, stdout, stderr| stdout.read }[0..-2]
+    end
+
     module_function :cygpath
   end
 end

data/lib/robust_excel_ole/excel.rb

@@ -10,52 +10,60 @@ end
 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
 
 module RobustExcelOle
@@ -348,10 +356,14 @@ module RobustExcelOle
       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
+          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?
@@ -414,6 +426,7 @@ module RobustExcelOle
     # returns running Excel instances
     # !!! This is work in progress
     # the approach is currently restricted to visible Excel instances with at least one workbook
+=begin    
     def self.running_excel_instances
       win32ole_excel_instances = []
       hwnd = 0
@@ -478,6 +491,8 @@ module RobustExcelOle
       alias known_excel_instances known_running_instances # :deprecated: #
     end
 
+=end
+
   private
 
     # returns a Win32OLE object that represents a Excel instance to which Excel connects
@@ -554,15 +569,26 @@ module RobustExcelOle
 
     # returns true, if the Excel instances responds to VBA methods, false otherwise
     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
+      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
@@ -726,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.37"
+  VERSION = "1.40"
 end

data/spec/cygwin_spec.rb

@@ -1,6 +1,12 @@
 # -*- coding: utf-8 -*-
+
 require_relative 'spec_helper'
 
+$VERBOSE = nil
+
+include RobustExcelOle
+include General
+
 describe "on cygwin",  :if => RUBY_PLATFORM =~ /cygwin/ do
   describe ".cygpath" do
     context "cygwin path is '/cygdrive/c/Users'" do
@@ -18,25 +24,26 @@ describe "on cygwin",  :if => RUBY_PLATFORM =~ /cygwin/ do
     end
 
     context "windows path is 'C:\\Users'" do
-      context "with '-u option" do
-        it { RobustExcelOle::Cygwin.cygpath('-u', 'C:\\Users').should eq '/cygdrive/c/Users'}
+      context "with '-p option" do
+        it { RobustExcelOle::Cygwin.cygpath('-p', 'C:\\Users').should eq '/cygdrive/c/Users'}
       end
     end
 
     context "cygwin path is './'" do
-      context "with '-u' options" do
-        it { RobustExcelOle::Cygwin.cygpath('-u', './').should eq './' }
+      context "with '-p' options" do
+        it { RobustExcelOle::Cygwin.cygpath('-p', './').should eq './' }
       end
 
-      context "with '-ua' options" do
-        it { RobustExcelOle::Cygwin.cygpath('-ua', './').should eq File.expand_path('./') + '/' }
-      end
+     # context "with '-pa' options" do
+     #   it { RobustExcelOle::Cygwin.cygpath('-pa', './').should eq File.expand_path('./') + '/' }
+     # end
 
-      context "with '-us' options" do
-        it { RobustExcelOle::Cygwin.cygpath('-us', './').should eq './' }
-      end
+      #context "with '-ps' options" do
+      #  it { RobustExcelOle::Cygwin.cygpath('-ps', './').should eq './' }
+      #end
     end
 
   end
 
 end
+

data/spec/excel_spec.rb

@@ -1922,6 +1922,7 @@ module RobustExcelOle
 
     end
 
+=begin
     describe "known_running_instances" do
 
       it "should return empty list" do
@@ -1952,7 +1953,7 @@ module RobustExcelOle
       end
 
     end
-
+=end
     context "with hwnd and hwnd2excel" do
       
       before do

metadata

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