Merge pull request #2310 from lambdageek/dev/bug-36305
[mono.git] / mcs / class / corlib / System.Runtime.Remoting.Contexts / SynchronizationAttribute.cs
index 05cf5ad5f98e55fa548564aefc82f0be8d26219f..7ef860da45f1725dd95121b1d8a8473e9bdc6cc7 100644 (file)
-pp//
-// System.Runtime.Remoting.Contexts.SynchronizationAttribute..cs
+//
+// System.Runtime.Remoting.Contexts.SynchronizationAttribute.cs
 //
 // Author:
-//   Miguel de Icaza (miguel@ximian.com)
+//   Lluis Sanchez Gual (lluis@ximian.com)
 //
-// (C) Ximian, Inc.  http://www.ximian.com
+// (C) Novell, Inc.  http://www.ximian.com
+// Copyright (C) 2004-2005 Novell, Inc (http://www.novell.com)
+//
+// Permission is hereby granted, free of charge, to any person obtaining
+// a copy of this software and associated documentation files (the
+// "Software"), to deal in the Software without restriction, including
+// without limitation the rights to use, copy, modify, merge, publish,
+// distribute, sublicense, and/or sell copies of the Software, and to
+// permit persons to whom the Software is furnished to do so, subject to
+// the following conditions:
+// 
+// The above copyright notice and this permission notice shall be
+// included in all copies or substantial portions of the Software.
+// 
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+// LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 //
 
-
+using System.Threading;
 using System.Runtime.Remoting.Messaging;
 using System.Runtime.Remoting.Activation;
 
-namespace System.Runtime.Remoting.Contexts {
-
+namespace System.Runtime.Remoting.Contexts
+{
+       [AttributeUsage(AttributeTargets.Class)]
        [Serializable]
-       [AttributeUsage (AttributeTargets.Class)]
-       public class SynchronizationAttribute : ContextAttribute
+       [System.Runtime.InteropServices.ComVisible (true)]
+       public class SynchronizationAttribute: ContextAttribute, IContributeClientContextSink, IContributeServerContextSink
        {
                public const int NOT_SUPPORTED = 1;
                public const int SUPPORTED = 2;
                public const int REQUIRED = 4;
                public const int REQUIRES_NEW = 8;
+               
+               bool _bReEntrant;
+               int _flavor;
 
-               private bool _fReentrant = false;
-               private int _nBehavior = REQUIRED;
-               private bool _fLocked = false;
-
+               [NonSerialized]
+               bool _locked;
+               [NonSerialized]
+               int _lockCount;
+               
+               [NonSerialized]
+               Mutex _mutex = new Mutex (false);
+               [NonSerialized]
+               Thread _ownerThread;
+               
                public SynchronizationAttribute ()
+               : this (REQUIRES_NEW, false)
                {
                }
-
-               public SynchronizationAttribute (bool fReentrant)
+               
+               public SynchronizationAttribute (bool reEntrant)
+               : this (REQUIRES_NEW, reEntrant)
                {
-                       _fReentrant = fReentrant;
                }
-
-               public SynchronizationAttribute (int nBehavior)
+               
+               public SynchronizationAttribute (int flag)
+               : this (flag, false)
+               {
+               }
+               
+               public SynchronizationAttribute (int flag, bool reEntrant)
+               : base ("Synchronization")
                {
-                       if (nBehavior != NOT_SUPPORTED &&
-                               nBehavior != SUPPORTED &&
-                               nBehavior != REQUIRED &&
-                               nBehavior != REQUIRES_NEW)
+                       if (flag != NOT_SUPPORTED && flag != REQUIRED && flag != REQUIRES_NEW && flag != SUPPORTED)
+                               throw new ArgumentException ("flag");
+                               
+                       _bReEntrant = reEntrant;
+                       _flavor = flag;
+               }
+               
+               public virtual bool IsReEntrant
+               {
+                       get { return _bReEntrant; }
+               }
+               
+               public virtual bool Locked
+               {
+                       get 
+                       { 
+                               return _locked; 
+                       }
+                       
+                       set 
                        {
-                               throw new ArgumentException ("Invalid Flag");
+                               if (value)
+                               {
+                                       _mutex.WaitOne ();
+                                       lock (this)
+                                       {
+                                               _lockCount++;
+                                               if (_lockCount > 1)
+                                                       ReleaseLock (); // Thread already had the lock
+                                                       
+                                               _ownerThread = Thread.CurrentThread;
+                                       }
+                               }
+                               else
+                               {
+                                       lock (this)
+                                       {
+                                               while (_lockCount > 0 && _ownerThread == Thread.CurrentThread)
+                                               {
+                                                       _lockCount--;
+                                                       _mutex.ReleaseMutex ();
+                                                       _ownerThread = null;
+                                               }
+                                       }
+                               }
                        }
-                       _nBehavior = nBehavior;
                }
-
-               public SynchronizationAttribute (int nBehavior, bool fReentrant)
+               
+               internal void AcquireLock ()
                {
-                       if (nBehavior != NOT_SUPPORTED &&
-                               nBehavior != SUPPORTED &&
-                               nBehavior != REQUIRED &&
-                               nBehavior != REQUIRES_NEW)
+                       _mutex.WaitOne ();
+                       
+                       lock (this)
                        {
-                               throw new ArgumentException ("Invalid Flag");
+                               _ownerThread = Thread.CurrentThread;
+                               _lockCount++;
                        }
-                       _nBehavior = nBehavior;
-                       _fReentrant = fReentrant;
                }
                
-               public virtual bool IsReEntrant
+               internal void ReleaseLock ()
                {
-                       get { return _fReentrant; }
+                       lock (this)
+                       {
+                               if (_lockCount > 0 && _ownerThread == Thread.CurrentThread) {
+                                       _lockCount--;
+                                       _mutex.ReleaseMutex ();
+                                       _ownerThread = null;
+                               }
+                       }
                }
                
-               public virtual bool Locked
+               [System.Runtime.InteropServices.ComVisible (true)]
+               public override void GetPropertiesForNewContext (IConstructionCallMessage ctorMsg)
                {
-                       get { return _fLocked; }
-                       set { _fLocked = value; }
+                       if (_flavor != NOT_SUPPORTED) {
+                               ctorMsg.ContextProperties.Add (this);
+                       }
                }
-
-               [MonoTODO]
+               
                public virtual IMessageSink GetClientContextSink (IMessageSink nextSink)
                {
-                       throw new NotImplementedException ();
+                       return new SynchronizedClientContextSink (nextSink, this);
+               }
+               
+               public virtual IMessageSink GetServerContextSink (IMessageSink nextSink)
+               {
+                       return new SynchronizedServerContextSink (nextSink, this);
+               }
+               
+               [System.Runtime.InteropServices.ComVisible (true)]
+               public override bool IsContextOK (Context ctx, IConstructionCallMessage msg)
+               {
+                       SynchronizationAttribute prop = ctx.GetProperty ("Synchronization") as SynchronizationAttribute;
+                       switch (_flavor)
+                       {
+                               case NOT_SUPPORTED: return (prop == null);
+                               case REQUIRED: return (prop != null);
+                               case REQUIRES_NEW: return false;
+                               case SUPPORTED: return true;
+                       }
+                       return false;
+               }
+               
+               internal static void ExitContext ()
+               {
+                       if (Thread.CurrentContext.IsDefaultContext) return;
+                       SynchronizationAttribute prop = Thread.CurrentContext.GetProperty ("Synchronization") as SynchronizationAttribute;
+                       if (prop == null) return;
+                       prop.Locked = false;
+               }
+               
+               internal static void EnterContext ()
+               {
+                       if (Thread.CurrentContext.IsDefaultContext) return;
+                       SynchronizationAttribute prop = Thread.CurrentContext.GetProperty ("Synchronization") as SynchronizationAttribute;
+                       if (prop == null) return;
+                       prop.Locked = true;
+               }
+       }
+       
+       internal class SynchronizedClientContextSink: IMessageSink
+       {
+               IMessageSink _next;
+               SynchronizationAttribute _att;
+               
+               public SynchronizedClientContextSink (IMessageSink next, SynchronizationAttribute att)
+               {
+                       _att = att;
+                       _next = next;
+               }
+               
+               public IMessageSink NextSink 
+               {
+                       get { return _next; }
+               }
+               
+               public IMessageCtrl AsyncProcessMessage (IMessage msg, IMessageSink replySink)
+               {
+                       if (_att.IsReEntrant)
+                       {
+                               _att.ReleaseLock();     // Unlock when leaving the context
+                               replySink = new SynchronizedContextReplySink (replySink, _att, true);
+                       }
+                       return _next.AsyncProcessMessage (msg, replySink);
                }
 
-               [MonoTODO]
-               public override void GetPropertiesForNewContext (IConstructionCallMessage ctorMsg)
+               public IMessage SyncProcessMessage (IMessage msg)
+               {
+                       if (_att.IsReEntrant) 
+                               _att.ReleaseLock ();    // Unlock when leaving the context
+                       
+                       try
+                       {
+                               return _next.SyncProcessMessage (msg);
+                       }
+                       finally
+                       {
+                               if (_att.IsReEntrant)
+                                       _att.AcquireLock ();
+                       }
+               }
+       }
+       
+       internal class SynchronizedServerContextSink: IMessageSink
+       {
+               IMessageSink _next;
+               SynchronizationAttribute _att;
+               
+               public SynchronizedServerContextSink (IMessageSink next, SynchronizationAttribute att)
+               {
+                       _att = att;
+                       _next = next;
+               }
+               
+               public IMessageSink NextSink 
                {
-                       throw new NotImplementedException ();
+                       get { return _next; }
+               }
+               
+               public IMessageCtrl AsyncProcessMessage (IMessage msg, IMessageSink replySink)
+               {
+                       _att.AcquireLock ();
+                       replySink = new SynchronizedContextReplySink (replySink, _att, false);
+                       return _next.AsyncProcessMessage (msg, replySink);
                }
 
-               [MonoTODO]
-               public virtual IMessageSink GetServerContextSink (IMessageSink nextSink)
+               public IMessage SyncProcessMessage (IMessage msg)
                {
-                       throw new NotImplementedException ();
+                       _att.AcquireLock ();
+                       try
+                       {
+                               return _next.SyncProcessMessage (msg);
+                       }
+                       finally
+                       {
+                               _att.ReleaseLock ();
+                       }
+               }
+       }
+       
+       internal class SynchronizedContextReplySink: IMessageSink
+       {
+               IMessageSink _next;
+               bool _newLock;
+               SynchronizationAttribute _att;
+       
+               public SynchronizedContextReplySink (IMessageSink next, SynchronizationAttribute att, bool newLock)
+               {
+                       _newLock = newLock;
+                       _next = next;
+                       _att = att;
+               }
+               
+               public IMessageSink NextSink 
+               {
+                       get { return _next; }
+               }
+               
+               public IMessageCtrl AsyncProcessMessage (IMessage msg, IMessageSink replySink)
+               {
+                       // Never called
+                       throw new NotSupportedException ();
                }
 
-               [MonoTODO]
-               public override bool IsContextOK (Context ctx, IConstructionCallMessage msg)
+               public IMessage SyncProcessMessage (IMessage msg)
                {
-                       throw new NotImplementedException ();
+                       if (_newLock) _att.AcquireLock ();
+                       else _att.ReleaseLock ();
+
+                       try
+                       {
+                               return _next.SyncProcessMessage (msg);
+                       }
+                       finally
+                       {
+                               if (_newLock)
+                                       _att.ReleaseLock ();
+                       }
                }
        }
 }
+