Initial attempt at Monitor class.

lib/process_shared.rb

@@ -28,4 +28,5 @@ end
 require 'process_shared/binary_semaphore'
 require 'process_shared/mutex'
 require 'process_shared/condition_variable'
+require 'process_shared/monitor'
 

lib/process_shared/monitor.rb

@@ -0,0 +1,31 @@
+require 'process_shared'
+require 'process_shared/mutex'
+
+module ProcessShared
+  class Monitor < Mutex
+    def initialize
+      super
+      @lock_count = 0
+    end
+
+    def lock
+      if locked_by == ::Process.pid
+        @lock_count += 1
+      else
+        super
+      end
+    end
+
+    def unlock
+      if locked_by == ::Process.pid
+        if @lock_count > 0
+          @lock_count -= 1
+        else
+          super
+        end
+      else
+        super
+      end
+    end
+  end
+end

lib/process_shared/mutex.rb

@@ -94,7 +94,7 @@ module ProcessShared
       end
     end
 
-    private
+    protected
 
     def locked_by
       with_internal_lock do