implab/ImplabNet Commit - r30:2fad2d1f4b03

small refactoring, cleanup.

cin -

r30:2fad2d1f4b03 default

parent child

Context file:

r30:2fad2d1f4b03

Collapse all files

Implab.Fx/AnimationHelpers.cs +2 -2

             using System;
             using System.Collections.Generic;
             using System.Linq;
             using System.Text;
             using System.Windows.Forms;
             using System.Diagnostics;
             namespace Implab.Fx
             {
                 public static class AnimationHelpers
                 {
                     public static Animation<TTarget> AnimateProperty<TTarget, TVal>(this Animation<TTarget> animation, Action<TTarget, TVal> setter, Func<TTarget, TVal> getter, TVal newValue, Func<TVal, TVal, int, int, TVal> fx) where TTarget : class
                     {
                         if (animation == null)
                             throw new ArgumentNullException("animation");
                         TVal oldValue = getter(animation.Traget);
                         animation.Step += (target, elaped, duration) =>
                         {
                             var value = fx(oldValue, newValue, elaped, duration);
                             setter(target, value);
                         };
                         return animation;
                     }
                     public static Animation<T> AnimateTransparency<T>(this T ctl, float newValue) where T : Form
                     {
                         var anim = new Animation<T>(ctl);
                         anim.AnimateProperty(
                             (target, value) => target.Opacity = value,
                             target => target.Opacity,
                             newValue,
                             (ov, nv, el, du) => ov + ((float)el / du) * (nv - ov)
                         );
                         return anim;
                     }
-                    public static Promise<T> CloseFadeOut<T>(this T ctl) where T : Form
+                    public static IPromise<T> CloseFadeOut<T>(this T ctl) where T : Form
                     {
                         var anim = ctl.AnimateTransparency(0);
                         return anim.Play().DispatchToControl(ctl).Then(frm => frm.Close());
                     }
-                    public static Promise<T> OverlayFadeIn<T>(this Form that, T overlay) where T : Form
+                    public static IPromise<T> OverlayFadeIn<T>(this Form that, T overlay) where T : Form
                     {
                         if (that == null)
                             throw new ArgumentNullException("that");
                         if (overlay == null)
                             throw new ArgumentNullException("overlay");
                         // setup overlay
                         overlay.Opacity = 0;
                         overlay.FormBorderStyle = FormBorderStyle.None;
                         overlay.ShowInTaskbar = false;
                         that.AddOwnedForm(overlay);
                         EventHandler handler = (object sender, EventArgs args) =>
                         {
                             overlay.Bounds = that.RectangleToScreen(that.ClientRectangle);
                         };
                         // attach handlers
                         that.Move += handler;
                         that.Resize += handler;
                         that.Shown += handler;
                         // remove handlers to release overlay
                         overlay.FormClosed += (sender, args) =>
                         {
                             that.Move -= handler;
                             that.Resize -= handler;
                             that.Shown -= handler;
                         };
                         overlay.Show(that);
                         overlay.Bounds = that.RectangleToScreen(that.ClientRectangle);
                         return overlay
                             .AnimateTransparency(1)
                             .Play()
                             .DispatchToControl(overlay);
                     }
                 }
             }

Implab.Test/AsyncTests.cs +1 -1

             using System;
             using Microsoft.VisualStudio.TestTools.UnitTesting;
             using System.Reflection;
             using System.Threading;
             using Implab.Parallels;
             namespace Implab.Test {
                 [TestClass]
                 public class AsyncTests {
                     [TestMethod]
                     public void ResolveTest() {
                         int res = -1;
                         var p = new Promise<int>();
                         p.Then(x => res = x);
                         p.Resolve(100);
                         Assert.AreEqual(100, res);
                     }
                     [TestMethod]
                     public void RejectTest() {
                         int res = -1;
                         Exception err = null;
                         var p = new Promise<int>();
                         p.Then(x => res = x, e => err = e);
                         p.Reject(new ApplicationException("error"));
                         Assert.AreEqual(res, -1);
                         Assert.AreEqual(err.Message, "error");
                     }
                     [TestMethod]
                     public void JoinSuccessTest() {
                         var p = new Promise<int>();
                         p.Resolve(100);
                         Assert.AreEqual(p.Join(), 100);
                     }
                     [TestMethod]
                     public void JoinFailTest() {
                         var p = new Promise<int>();
                         p.Reject(new ApplicationException("failed"));
                         try {
                             p.Join();
                             throw new ApplicationException("WRONG!");
                         } catch (TargetInvocationException err) {
                             Assert.AreEqual(err.InnerException.Message, "failed");
                         } catch {
                             Assert.Fail("Got wrong excaption");
                         }
                     }
                     [TestMethod]
                     public void MapTest() {
                         var p = new Promise<int>();
                         var p2 = p.Map(x => x.ToString());
                         p.Resolve(100);
                         Assert.AreEqual(p2.Join(), "100");
                     }
                     [TestMethod]
                     public void FixErrorTest() {
                         var p = new Promise<int>();
                         var p2 = p.Error(e => 101);
                         p.Reject(new Exception());
                         Assert.AreEqual(p2.Join(), 101);
                     }
                     [TestMethod]
                     public void ChainTest() {
                         var p1 = new Promise<int>();
                         var p3 = p1.Chain(x => {
                             var p2 = new Promise<string>();
                             p2.Resolve(x.ToString());
                             return p2;
                         });
                         p1.Resolve(100);
                         Assert.AreEqual(p3.Join(), "100");
                     }
                     [TestMethod]
                     public void PoolTest() {
                         var pid = Thread.CurrentThread.ManagedThreadId;
                         var p = AsyncPool.Invoke(() => Thread.CurrentThread.ManagedThreadId);
                         Assert.AreNotEqual(pid, p.Join());
                     }
                     [TestMethod]
                     public void WorkerPoolSizeTest() {
                         var pool = new WorkerPool(5, 10, 0);
                         Assert.AreEqual(5, pool.PoolSize);
                         pool.Invoke(() => { Thread.Sleep(100000000); return 10; });
                         pool.Invoke(() => { Thread.Sleep(100000000); return 10; });
                         pool.Invoke(() => { Thread.Sleep(100000000); return 10; });
                         Assert.AreEqual(5, pool.PoolSize);
                         for (int i = 0; i < 100; i++)
                             pool.Invoke(() => { Thread.Sleep(100000000); return 10; });
                         Thread.Sleep(200);
                         Assert.AreEqual(10, pool.PoolSize);
                         pool.Dispose();
                     }
                     [TestMethod]
                     public void WorkerPoolCorrectTest() {
                         var pool = new WorkerPool(0,1000,100);
                         int iterations = 1000;
                         int pending = iterations;
                         var stop = new ManualResetEvent(false);
                         var count = 0;
                         for (int i = 0; i < iterations; i++) {
                             pool
                                 .Invoke(() => 1)
                                 .Then(x => Interlocked.Add(ref count, x))
                                 .Then(x => Math.Log10(x))
                                 .Anyway(() => {
                                     Interlocked.Decrement(ref pending);
                                     if (pending == 0)
                                         stop.Set();
                                 });
                         }
                         stop.WaitOne();
                         Assert.AreEqual(iterations, count);
                         Console.WriteLine("Max threads: {0}", pool.MaxRunningThreads);
                         pool.Dispose();
                     }
                     [TestMethod]
                     public void WorkerPoolDisposeTest() {
                         var pool = new WorkerPool(5, 20);
                         Assert.AreEqual(5, pool.PoolSize);
                         pool.Dispose();
                         Thread.Sleep(500);
                         Assert.AreEqual(0, pool.PoolSize);
                         pool.Dispose();
                     }
                     [TestMethod]
                     public void MTQueueTest() {
                         var queue = new MTQueue<int>();
                         int res;
                         queue.Enqueue(10);
                         Assert.IsTrue(queue.TryDequeue(out res));
                         Assert.AreEqual(10, res);
                         Assert.IsFalse(queue.TryDequeue(out res));
                         for (int i = 0; i < 1000; i++)
                             queue.Enqueue(i);
                         for (int i = 0; i < 1000; i++) {
                             queue.TryDequeue(out res);
                             Assert.AreEqual(i, res);
                         }
                         int writers = 0;
                         int readers = 0;
                         var stop = new ManualResetEvent(false);
                         int total = 0;
                         int itemsPerWriter = 1000;
                         int writersCount = 3;
                         for (int i = 0; i < writersCount; i++) {
                             Interlocked.Increment(ref writers);
                             var wn = i;
                             AsyncPool
                                 .InvokeNewThread(() => {
                                     for (int ii = 0; ii < itemsPerWriter; ii++) {
                                         queue.Enqueue(1);
                                     }
                                     return 1;
                                 })
                                 .Anyway(() => Interlocked.Decrement(ref writers));
                         }
                         for (int i = 0; i < 10; i++) {
                             Interlocked.Increment(ref readers);
                             var wn = i;
                             AsyncPool
                                 .InvokeNewThread(() => {
                                     int t;
                                     do {
                                         while (queue.TryDequeue(out t))
                                             Interlocked.Add(ref total, t);
                                     } while (writers > 0);
                                     return 1;
                                 })
                                 .Anyway(() => {
                                     Interlocked.Decrement(ref readers);
                                     if (readers == 0)
                                         stop.Set();
                                 });
                         }
                         stop.WaitOne();
                         Assert.AreEqual(itemsPerWriter * writersCount, total);
                     }
                     [TestMethod]
                     public void ParallelMapTest() {
                         int count = 100000;
                         double[] args = new double[count];
                         var rand = new Random();
                         for (int i = 0; i < count; i++)
                             args[i] = rand.NextDouble();
                         var t = Environment.TickCount;
                         var res = args.ParallelMap(x => Math.Sin(x*x), 4).Join();
                         Console.WriteLine("Map complete in {0} ms", Environment.TickCount - t);
                         t = Environment.TickCount;
                         for (int i = 0; i < count; i++)
                             Assert.AreEqual(Math.Sin(args[i] * args[i]), res[i]);
                         Console.WriteLine("Verified in {0} ms", Environment.TickCount - t);
                     }
                     [TestMethod]
                     public void ChainedMapTest() {
                         using (var pool = new WorkerPool(0,100,0)) {
                             int count = 10000;
                             double[] args = new double[count];
                             var rand = new Random();
                             for (int i = 0; i < count; i++)
                                 args[i] = rand.NextDouble();
                             var t = Environment.TickCount;
                             var res = args
-                                .ChainedMap2(
+                                .ChainedMap(
                                     x => pool.Invoke(
                                         () => Math.Sin(x * x)
                                     ),
                                 )
                                 .Join();
                             Console.WriteLine("Map complete in {0} ms", Environment.TickCount - t);
                             t = Environment.TickCount;
                             for (int i = 0; i < count; i++)
                                 Assert.AreEqual(Math.Sin(args[i] * args[i]), res[i]);
                             Console.WriteLine("Verified in {0} ms", Environment.TickCount - t);
                             Console.WriteLine("Max workers: {0}", pool.MaxRunningThreads);
                         }
                     }
                     [TestMethod]
                     public void ParallelForEachTest() {
                         int count = 100000;
                         int[] args = new int[count];
                         var rand = new Random();
                         for (int i = 0; i < count; i++)
                             args[i] = (int)(rand.NextDouble() * 100);
                         int result = 0;
                         var t = Environment.TickCount;
                         args.ParallelForEach(x => Interlocked.Add(ref result, x), 4).Join();
                         Console.WriteLine("Iteration complete in {0} ms, result: {1}", Environment.TickCount - t, result);
                         int result2 = 0;
                         t = Environment.TickCount;
                         for (int i = 0; i < count; i++)
                             result2 += args[i];
                         Assert.AreEqual(result2, result);
                         Console.WriteLine("Verified in {0} ms", Environment.TickCount - t);
                     }
                     [TestMethod]
                     public void ComplexCase1Test() {
                         var flags = new bool[3];
                         // op1 (aync 200ms) => op2 (async 200ms) => op3 (sync map)
                         var p = PromiseHelper
                             .Sleep(200, "Alan")
                             .Cancelled(() => flags[0] = true)
                             .Chain(x =>
                                 PromiseHelper
                                     .Sleep(200, "Hi, " + x)
                                     .Map(y => y)
                                     .Cancelled(() => flags[1] = true)
                             )
                             .Cancelled(() => flags[2] = true);
                         Thread.Sleep(300);
                         p.Cancel();
                         try {
                             Assert.AreEqual(p.Join(), "Hi, Alan");
                             Assert.Fail("Shouldn't get here");
                         } catch (OperationCanceledException) {
                         }
                         Assert.IsFalse(flags[0]);
                         Assert.IsTrue(flags[1]);
                         Assert.IsTrue(flags[2]);
                     }
                 }
             }

Implab/Parallels/ArrayTraits.cs +3 -2

             using System;
             using System.Collections.Generic;
             using System.Diagnostics;
             using System.Linq;
             using System.Text;
             using System.Threading;
             namespace Implab.Parallels {
                 public static class ArrayTraits {
                     class ArrayIterator<TSrc> : DispatchPool<int> {
                         readonly Action<TSrc> m_action;
                         readonly TSrc[] m_source;
                         readonly Promise<int> m_promise = new Promise<int>();
                         int m_pending;
                         int m_next;
                         public ArrayIterator(TSrc[] source, Action<TSrc> action, int threads)
                             : base(threads) {
                             Debug.Assert(source != null);
                             Debug.Assert(action != null);
                             m_next = 0;
                             m_source = source;
                             m_pending = source.Length;
                             m_action = action;
                             m_promise.Anyway(() => Dispose());
                             m_promise.Cancelled(() => Dispose());
                             InitPool();
                         }
                         public Promise<int> Promise {
                             get {
                                 return m_promise;
                             }
                         }
                         protected override bool TryDequeue(out int unit) {
                             unit = Interlocked.Increment(ref m_next) - 1;
                             return unit >= m_source.Length ? false : true;
                         }
                         protected override void InvokeUnit(int unit) {
                             try {
                                 m_action(m_source[unit]);
                                 var pending = Interlocked.Decrement(ref m_pending);
                                 if (pending == 0)
                                     m_promise.Resolve(m_source.Length);
                             } catch (Exception e) {
                                 m_promise.Reject(e);
                             }
                         }
                     }
                     class ArrayMapper<TSrc, TDst>: DispatchPool<int> {
                         readonly Func<TSrc, TDst> m_transform;
                         readonly TSrc[] m_source;
                         readonly TDst[] m_dest;
                         readonly Promise<TDst[]> m_promise = new Promise<TDst[]>();
                         int m_pending;
                         int m_next;
                         public ArrayMapper(TSrc[] source, Func<TSrc, TDst> transform, int threads)
                             : base(threads) {
                             Debug.Assert (source != null);
                             Debug.Assert( transform != null);
                             m_next = 0;
                             m_source = source;
                             m_dest = new TDst[source.Length];
                             m_pending = source.Length;
                             m_transform = transform;
                             m_promise.Anyway(() => Dispose());
                             m_promise.Cancelled(() => Dispose());
                             InitPool();
                         }
                         public Promise<TDst[]> Promise {
                             get {
                                 return m_promise;
                             }
                         }
                         protected override bool TryDequeue(out int unit) {
                             unit = Interlocked.Increment(ref m_next) - 1;
                             return unit >= m_source.Length ? false : true;
                         }
                         protected override void InvokeUnit(int unit) {
                             try {
                                 m_dest[unit] = m_transform(m_source[unit]);
                                 var pending = Interlocked.Decrement(ref m_pending);
                                 if (pending == 0)
                                     m_promise.Resolve(m_dest);
                             } catch (Exception e) {
                                 m_promise.Reject(e);
                             }
                         }
                     }
-                    public static Promise<TDst[]> ParallelMap<TSrc, TDst> (this TSrc[] source, Func<TSrc,TDst> transform, int threads) {
+                    public static IPromise<TDst[]> ParallelMap<TSrc, TDst> (this TSrc[] source, Func<TSrc,TDst> transform, int threads) {
                         if (source == null)
                             throw new ArgumentNullException("source");
                         if (transform == null)
                             throw new ArgumentNullException("transform");
                         var mapper = new ArrayMapper<TSrc, TDst>(source, transform, threads);
                         return mapper.Promise;
                     }
-                    public static Promise<int> ParallelForEach<TSrc>(this TSrc[] source, Action<TSrc> action, int threads) {
+                    public static IPromise<int> ParallelForEach<TSrc>(this TSrc[] source, Action<TSrc> action, int threads) {
                         if (source == null)
                             throw new ArgumentNullException("source");
                         if (action == null)
                             throw new ArgumentNullException("action");
                         var iter = new ArrayIterator<TSrc>(source, action, threads);
                         return iter.Promise;
                     }
                     public static IPromise<TDst[]> ChainedMap<TSrc, TDst>(this TSrc[] source, ChainedOperation<TSrc, TDst> transform, int threads) {
                         if (source == null)
                             throw new ArgumentNullException("source");
                         if (transform == null)
                             throw new ArgumentNullException("transform");
                         if (threads <= 0)
                             throw new ArgumentOutOfRangeException("Threads number must be greater then zero");
                         var promise = new Promise<TDst[]>();
                         var res = new TDst[source.Length];
                         var pending = source.Length;
                         var semaphore = new Semaphore(threads, threads);
                         AsyncPool.InvokeNewThread(() => {
                             for (int i = 0; i < source.Length; i++) {
                                 if(promise.IsResolved)
                                     break; // stop processing in case of error or cancellation
                                 var idx = i;
                                 semaphore.WaitOne();
                                 try {
                                     var p1 = transform(source[i]);
                                     p1.Anyway(() => semaphore.Release());
                                     p1.Cancelled(() => semaphore.Release());
                                     p1.Then(
                                         x => {
                                             res[idx] = x;
                                             var left = Interlocked.Decrement(ref pending);
                                             if (left == 0)
                                                 promise.Resolve(res);
                                         },
                                         e => promise.Reject(e)
                                     );
                                 } catch (Exception e) {
                                     promise.Reject(e);
                                 }
                             }
                             return 0;
                         });
                         return promise.Anyway(() => semaphore.Dispose());
                     }
                 }
             }

Implab/Parallels/DispatchPool.cs +16 -13

             using System;
             using System.Collections.Generic;
             using System.Linq;
             using System.Text;
             using System.Threading;
             using System.Diagnostics;
             namespace Implab.Parallels {
                 public abstract class DispatchPool<TUnit> : IDisposable {
                     readonly int m_minThreads;
                     readonly int m_maxThreads;
                     int m_createdThreads = 0; // the current size of the pool
                     int m_activeThreads = 0; // the count of threads which are active
                     int m_sleepingThreads = 0; // the count of currently inactive threads
                     int m_maxRunningThreads = 0; // the meximum reached size of the pool
                     int m_exitRequired = 0; // the pool is going to shutdown, all unused workers are released
                     int m_releaseTimeout = 100; // the timeout while the working thread will wait for the new tasks before exit
                     int m_wakeEvents = 0; // the count of wake events
                     AutoResetEvent m_hasTasks = new AutoResetEvent(false);
                     protected DispatchPool(int min, int max) {
                         if (min < 0)
                             throw new ArgumentOutOfRangeException("min");
                         if (max <= 0)
                             throw new ArgumentOutOfRangeException("max");
                         if (min > max)
                             min = max;
                         m_minThreads = min;
                         m_maxThreads = max;
                     }
                     protected DispatchPool(int threads)
                         : this(threads, threads) {
                     }
                     protected DispatchPool() {
                         int maxThreads, maxCP;
                         ThreadPool.GetMaxThreads(out maxThreads, out maxCP);
                         m_minThreads = 0;
                         m_maxThreads = maxThreads;
                     }
                     protected void InitPool() {
                         for (int i = 0; i < m_minThreads; i++)
                             StartWorker();
                     }
                     public int PoolSize {
                         get {
                             return m_createdThreads;
                         }
                     }
                     public int ActiveThreads {
                         get {
                             return m_activeThreads;
                         }
                     }
                     public int MaxRunningThreads {
                         get {
                             return m_maxRunningThreads;
                         }
                     }
                     protected bool IsDisposed {
                         get {
                             return m_exitRequired != 0;
                         }
                     }
                     protected abstract bool TryDequeue(out TUnit unit);
                     #region thread execution traits
                     int SignalThread() {
                         var signals = Interlocked.Increment(ref m_wakeEvents);
                         if(signals == 1)
                             m_hasTasks.Set();
                         return signals;
                     }
                     bool FetchSignalOrWait(int timeout) {
                         var start = Environment.TickCount;
                         // означает, что поток владеет блокировкой и при успешном получении сигнала должен
                         // ее вернуть, чтобы другой ожидающий поток смог
                         bool hasLock = false;
                         do {
                             int signals;
                             do {
                                 signals = m_wakeEvents;
                                 if (signals == 0)
                                     break;
                             } while (Interlocked.CompareExchange(ref m_wakeEvents, signals - 1, signals) != signals);
                             if (signals >= 1) {
                                 if (signals > 1 && hasLock)
                                     m_hasTasks.Set();
                                 return true;
                             }
                             if (timeout != -1)
                                 timeout = Math.Max(0, timeout - (Environment.TickCount - start));
                             // если сигналов больше не осталось, то первый поток, который дошел сюда сбросит событие
                             // и уйдет на пустой цикл, после чего заблокируется
                             hasLock = true;
                         } while (m_hasTasks.WaitOne(timeout));
                         return false;
                     }
                     bool Sleep(int timeout) {
                         Interlocked.Increment(ref m_sleepingThreads);
                         if (FetchSignalOrWait(timeout)) {
                             Interlocked.Decrement(ref m_sleepingThreads);
                             return true;
                         } else {
                             Interlocked.Decrement(ref m_sleepingThreads);
                             return false;
                         }
                     }
                     #endregion
                     /// <summary>
                     /// Запускает либо новый поток, если раньше не было ни одного потока, либо устанавливает событие пробуждение одного спящего потока
                     /// </summary>
                     protected void GrowPool() {
                         if (m_exitRequired != 0)
                             return;
                         if (m_sleepingThreads > m_wakeEvents) {
                             //Console.WriteLine("Waking threads (sleeps {0}, pending {1})", m_sleepingThreads, m_wakeEvents);
                             // all sleeping threads may gone
                             SignalThread(); // wake a sleeping thread;
                             // we can't check whether signal has been processed
                             // anyway it may take some time for the thread to start
                             // we will ensure that at least one thread is running
+                            EnsurePoolIsAlive();
+                        } else {
+                            // if there is no sleeping threads in the pool
+                            if (!StartWorker()) {
+                                // we haven't started a new thread, but the current can be on the way to terminate and it can't process the queue
+                                // send it a signal to spin again
+                                SignalThread();
+                                EnsurePoolIsAlive();
+                            }
+                        }
+                    }
+                    private void EnsurePoolIsAlive() {
                         if (AllocateThreadSlot(1)) {
                             // if there were no threads in the pool
                             var worker = new Thread(this.Worker);
                             worker.IsBackground = true;
                             worker.Start();
                         }
-                        } else {
-                            // if there is no sleeping threads in the pool
-                            if (!StartWorker())
-                                // we haven't started a new thread, but the current can be on the way and it can't process the queue
-                                // send it a signal to spin again
-                                SignalThread();
                     }
                     private bool Suspend() {
                         //no tasks left, exit if the thread is no longer needed
                         bool last;
                         bool requestExit;
                         // if threads have a timeout before releasing
                         if (m_releaseTimeout > 0)
                             requestExit = !Sleep(m_releaseTimeout);
                         else
                             requestExit = true;
                         if (!requestExit)
                             return true;
                         // release unsused thread
                         if (requestExit && ReleaseThreadSlot(out last)) {
                             // in case at the moment the last thread was being released
                             // a new task was added to the queue, we need to try
                             // to revoke the thread to avoid the situation when the task is left unprocessed
-                            if (last && Sleep(0)) { // Sleep(0) will fetch pending task or will return false
+                            if (last && FetchSignalOrWait(0)) { // FetchSignalOrWait(0) will fetch pending task or will return false
-                                if (AllocateThreadSlot(1))
+                                SignalThread(); // since FetchSignalOrWait(0) has fetched the signal we need to reschedule it
-                                    return true; // spin again...
+                                return AllocateThreadSlot(1); // ensure that at least one thread is alive
-                                else
-                                    SignalThread(); // since Sleep(0) has fetched the signal we neet to reschedule it
                             }
                             return false;
                         }
                         // wait till infinity
                         Sleep(-1);
                         return true;
                     }
                     #region thread slots traits
                     bool AllocateThreadSlot() {
                         int current;
                         // use spins to allocate slot for the new thread
                         do {
                             current = m_createdThreads;
                             if (current >= m_maxThreads || m_exitRequired != 0)
                                 // no more slots left or the pool has been disposed
                                 return false;
                         } while (current != Interlocked.CompareExchange(ref m_createdThreads, current + 1, current));
                         UpdateMaxThreads(current + 1);
                         return true;
                     }
                     bool AllocateThreadSlot(int desired) {
                         if (desired - 1 != Interlocked.CompareExchange(ref m_createdThreads, desired, desired - 1))
                             return false;
                         UpdateMaxThreads(desired);
                         return true;
                     }
                     bool ReleaseThreadSlot(out bool last) {
                         last = false;
                         int current;
                         // use spins to release slot for the new thread
                         do {
                             current = m_createdThreads;
                             if (current <= m_minThreads && m_exitRequired == 0)
                                 // the thread is reserved
                                 return false;
                         } while (current != Interlocked.CompareExchange(ref m_createdThreads, current - 1, current));
                         last = (current == 1);
                         return true;
                     }
                     /// <summary>
                     /// releases thread slot unconditionally, used during cleanup
                     /// </summary>
                     /// <returns>true - no more threads left</returns>
                     bool ReleaseThreadSlotAnyway() {
                         var left = Interlocked.Decrement(ref m_createdThreads);
                         return left == 0;
                     }
                     void UpdateMaxThreads(int count) {
                         int max;
                         do {
                             max = m_maxRunningThreads;
                             if (max >= count)
                                 break;
                         } while(max != Interlocked.CompareExchange(ref m_maxRunningThreads, count, max));
                     }
                     #endregion
                     bool StartWorker() {
                         if (AllocateThreadSlot()) {
                             // slot successfully allocated
                             var worker = new Thread(this.Worker);
                             worker.IsBackground = true;
                             worker.Start();
                             return true;
                         } else {
                             return false;
                         }
                     }
                     protected abstract void InvokeUnit(TUnit unit);
                     void Worker() {
                         TUnit unit;
                         //Console.WriteLine("{0}: Active", Thread.CurrentThread.ManagedThreadId);
                         Interlocked.Increment(ref m_activeThreads);
                         do {
                             // exit if requested
                             if (m_exitRequired != 0) {
                                 // release the thread slot
                                 Interlocked.Decrement(ref m_activeThreads);
                                 if (ReleaseThreadSlotAnyway()) // it was the last worker
                                     m_hasTasks.Dispose();
                                 else
                                     SignalThread(); // wake next worker
                                 break;
                             }
                             // fetch task
                             if (TryDequeue(out unit)) {
                                 InvokeUnit(unit);
                                 continue;
                             }
                             Interlocked.Decrement(ref m_activeThreads);
                             // entering suspend state
                             // keep this thread and wait
                             if (!Suspend())
                                 break;
                             //Console.WriteLine("{0}: Awake", Thread.CurrentThread.ManagedThreadId);
                             Interlocked.Increment(ref m_activeThreads);
                         } while (true);
                         //Console.WriteLine("{0}: Exited", Thread.CurrentThread.ManagedThreadId);
                     }
                     protected virtual void Dispose(bool disposing) {
                         if (disposing) {
                             if (m_exitRequired == 0) {
                                 if (Interlocked.CompareExchange(ref m_exitRequired, 1, 0) != 0)
                                     return;
                                 // wake sleeping threads
                                 if (m_createdThreads > 0)
                                     SignalThread();
                                 else
                                     m_hasTasks.Dispose();
                                 GC.SuppressFinalize(this);
                             }
                         }
                     }
                     public void Dispose() {
                         Dispose(true);
                     }
                     ~DispatchPool() {
                         Dispose(false);
                     }
                 }
             }

Implab/Promise.cs +2 -2

             using System;
             using System.Collections.Generic;
             using System.Reflection;
             using System.Diagnostics;
             using System.Threading;
             using Implab.Parallels;
             namespace Implab {
                 public delegate void ErrorHandler(Exception e);
                 public delegate T ErrorHandler<out T>(Exception e);
                 public delegate void ResultHandler<in T>(T result);
                 public delegate TNew ResultMapper<in TSrc, out TNew>(TSrc result);
-                public delegate Promise<TNew> ChainedOperation<in TSrc,TNew>(TSrc result);
+                public delegate IPromise<TNew> ChainedOperation<in TSrc,TNew>(TSrc result);
                 /// <summary>
                 /// Класс для асинхронного получения результатов. Так называемое "обещание".
                 /// </summary>
                 /// <typeparam name="T">Тип получаемого результата</typeparam>
                 /// <remarks>
                 /// <para>Сервис при обращении к его методу дает обещаиние о выполнении операции,
                 /// клиент получив такое обещание может установить ряд обратных вызово для получения
                 /// событий выполнения обещания, тоесть завершения операции и предоставлении результатов.</para>
                 /// <para>
                 /// Обещение может быть как выполнено, так и выполнено с ошибкой. Для подписки на
                 /// данные события клиент должен использовать методы <c>Then</c>.
                 /// </para>
                 /// <para>
                 /// Сервис, в свою очередь, по окончанию выполнения операции (возможно с ошибкой),
                 /// использует методы <c>Resolve</c> либо <c>Reject</c> для оповещения клиетна о
                 /// выполнении обещания.
                 /// </para>
                 /// <para>
                 /// Если сервер успел выполнить обещание еще до того, как клиент на него подписался,
                 /// то в момент подписки клиента будут вызваны соответсвующие события в синхронном
                 /// режиме и клиент будет оповещен в любом случае. Иначе, обработчики добавляются в
                 /// список в порядке подписания и в этом же порядке они будут вызваны при выполнении
                 /// обещания.
                 /// </para>
                 /// <para>
                 /// Обрабатывая результаты обещания можно преобразовывать результаты либо инициировать
                 /// связанные асинхронные операции, которые также возвращают обещания. Для этого следует
                 /// использовать соответствующую форму методе <c>Then</c>.
                 /// </para>
                 /// <para>
                 /// Также хорошим правилом является то, что <c>Resolve</c> и <c>Reject</c> должен вызывать
                 /// только инициатор обещания иначе могут возникнуть противоречия.
                 /// </para>
                 /// </remarks>
                 public class Promise<T> : IPromise<T> {
                     protected struct HandlerDescriptor {
                         public ResultHandler<T> resultHandler;
                         public ErrorHandler errorHandler;
                         public Action cancellHandler;
                         public void Resolve(T result) {
                             if (resultHandler != null)
                                 try {
                                     resultHandler(result);
                                 } catch (Exception e) {
                                     Reject(e);
                                 }
                         }
                         public void Reject(Exception err) {
                             if (errorHandler != null)
                                 try {
                                     errorHandler(err);
                                 } catch {
                                 }
                         }
                         public void Cancel() {
                             if (cancellHandler != null)
                                 try {
                                     cancellHandler();
                                 } catch {
                                 }
                         }
                     }
                     const int UnresolvedSate = 0;
                     const int TransitionalState = 1;
                     const int SucceededState = 2;
                     const int RejectedState = 3;
                     const int CancelledState = 4;
                     readonly IPromiseBase m_parent;
                     readonly bool m_cancellable;
                     int m_childrenCount = 0;
                     int m_state;
                     T m_result;
                     Exception m_error;
                     readonly MTQueue<HandlerDescriptor> m_handlers = new MTQueue<HandlerDescriptor>();
                     public Promise() {
                         m_cancellable = true;
                     }
                     public Promise(IPromiseBase parent, bool cancellable) {
                         m_cancellable = cancellable;
                         m_parent = parent;
                     }
                     void InternalCancel() {
                         // don't try to cancel parent :)
                         Cancel(false);
                     }
                     bool BeginTransit() {
                         return UnresolvedSate == Interlocked.CompareExchange(ref m_state, TransitionalState, UnresolvedSate);
                     }
                     void CompleteTransit(int state) {
                         if (TransitionalState != Interlocked.CompareExchange(ref m_state, state, TransitionalState))
                             throw new InvalidOperationException("Can't complete transition when the object isn't in the transitional state");
                     }
                     void WaitTransition() {
                         while (m_state == TransitionalState) {
                             /* noop */
                         }
                     }
                     public bool IsResolved {
                         get {
                             return m_state > 1;
                         }
                     }
                     public bool IsCancelled {
                         get {
                             return m_state == CancelledState;
                         }
                     }
                     public Type PromiseType {
                         get { return typeof(T); }
                     }
                     /// <summary>
                     /// Выполняет обещание, сообщая об успешном выполнении.
                     /// </summary>
                     /// <param name="result">Результат выполнения.</param>
                     /// <exception cref="InvalidOperationException">Данное обещание уже выполнено</exception>
                     public void Resolve(T result) {
                         if (BeginTransit()) {
                             m_result = result;
                             CompleteTransit(SucceededState);
                             OnStateChanged();
                         } else {
                             WaitTransition();
                             if (m_state != CancelledState)
                                 throw new InvalidOperationException("The promise is already resolved");
                         }
                     }
                     /// <summary>
                     /// Выполняет обещание, сообщая об ошибке
                     /// </summary>
                     /// <remarks>
                     /// Поскольку обещание должно работать в многопточной среде, при его выполнении сразу несколько потоков
                     /// могу вернуть ошибку, при этом только первая будет использована в качестве результата, остальные
                     /// будут проигнорированы.
                     /// </remarks>
                     /// <param name="error">Исключение возникшее при выполнении операции</param>
                     /// <exception cref="InvalidOperationException">Данное обещание уже выполнено</exception>
                     public void Reject(Exception error) {
                         if (BeginTransit()) {
                             m_error = error;
                             CompleteTransit(RejectedState);
                             OnStateChanged();
                         } else {
                             WaitTransition();
                             if (m_state == SucceededState)
                                 throw new InvalidOperationException("The promise is already resolved");
                         }
                     }
                     /// <summary>
                     /// Отменяет операцию, если это возможно.
                     /// </summary>
                     /// <returns><c>true</c> Операция была отменена, обработчики не будут вызваны.<c>false</c> отмена не возможна, поскольку обещание уже выполнено и обработчики отработали.</returns>
                     public bool Cancel() {
                         return Cancel(true);
                     }
                     /// <summary>
                     /// Adds new handlers to this promise.
                     /// </summary>
                     /// <param name="success">The handler of the successfully completed operation.
                     /// This handler will recieve an operation result as a parameter.</param>
                     /// <param name="error">Handles an exception that may occur during the operation.</param>
                     /// <returns>The new promise chained to this one.</returns>
                     public IPromise<T> Then(ResultHandler<T> success, ErrorHandler error) {
                         if (success == null && error == null)
                             return this;
                         var medium = new Promise<T>(this, true);
                         ResultHandler<T> resultHandler;
                         if (success != null)
                             resultHandler = x => {
                                 success(x);
                                 medium.Resolve(x);
                             };
                         else
                             resultHandler = medium.Resolve;
                         ErrorHandler errorHandler;
                         if (error != null)
                             errorHandler = x => {
                                 // несмотря на то, что обработчик ошибки вызывается безопасно,
                                 // т.е. возникшие в нем ошибки будут подавлены, нам нужно
                                 // гарантировать, что ошибка будет передана дальше по цепочке обещаний
                                 try {
                                     error(x);
                                 } catch { }
                                 medium.Reject(x);
                             };
                         else
                             errorHandler = medium.Reject;
                         AddHandler(resultHandler, errorHandler, medium.InternalCancel);
                         return medium;
                     }
                     public IPromiseBase Then(Action success,ErrorHandler error)
                     {
                         return Then(x => success(), error);
                     }
                     public IPromiseBase Then(Action success)
                     {
                         return Then(success);
                     }
                     /// <summary>
                     /// Adds new handlers to this promise.
                     /// </summary>
                     /// <param name="success">The handler of the successfully completed operation.
                     /// This handler will recieve an operation result as a parameter.</param>
                     /// <param name="error">Handles an exception that may occur during the operation and returns the value which will be used as the result of the operation.</param>
                     /// <returns>The new promise chained to this one.</returns>
                     public IPromise<T> Then(ResultHandler<T> success, ErrorHandler<T> error) {
                         if (success == null && error == null)
                             return this;
                         var medium = new Promise<T>(this, true);
                         ResultHandler<T> resultHandler;
                         ErrorHandler errorHandler;
                         if (success != null)
                             resultHandler = x => {
                                 success(x);
                                 medium.Resolve(x);
                             };
                         else
                             resultHandler = medium.Resolve;
                         if (error != null)
                             errorHandler = x => {
                                 try {
                                     medium.Resolve(error(x));
                                 } catch(Exception e) {
                                     medium.Reject(e);
                                 }
                             };
                         else
                             errorHandler = medium.Reject;
                         AddHandler(resultHandler, errorHandler, medium.InternalCancel);
                         return medium;
                     }
                     public IPromise<T> Then(ResultHandler<T> success) {
                         if (success == null)
                             return this;
                         var medium = new Promise<T>(this, true);
                         ResultHandler<T> resultHandler;
                         if (success != null)
                             resultHandler = x => {
                                 success(x);
                                 medium.Resolve(x);
                             };
                         else
                             resultHandler = medium.Resolve;
                         AddHandler(resultHandler, medium.Reject, medium.InternalCancel);
                         return medium;
                     }
                     public IPromise<T> Error(ErrorHandler error) {
                         return Then((ResultHandler<T>)null, error);
                     }
                     /// <summary>
                     /// Handles error and allows to keep the promise.
                     /// </summary>
                     /// <remarks>
                     /// If the specified handler throws an exception, this exception will be used to reject the promise.
                     /// </remarks>
                     /// <param name="handler">The error handler which returns the result of the promise.</param>
                     /// <returns>New promise.</returns>
                     public IPromise<T> Error(ErrorHandler<T> handler) {
                         if (handler == null)
                             return this;
                         var medium = new Promise<T>(this, true);
                         AddHandler(
                             x => medium.Resolve(x),
                             e => {
                                 try {
                                     medium.Resolve(handler(e));
                                 } catch (Exception e2) {
                                     medium.Reject(e2);
                                 }
                             },
                             medium.InternalCancel
                         );
                         return medium;
                     }
                     public IPromise<T> Anyway(Action handler) {
                         if (handler == null)
                             return this;
                         var medium = new Promise<T>();
                         AddHandler(
                             x => {
                                 // to avoid handler being called multiple times we handle exception by ourselfs
                                 try {
                                     handler();
                                     medium.Resolve(x);
                                 } catch (Exception e) {
                                     medium.Reject(e);
                                 }
                             },
                             e => {
                                 try {
                                     handler();
                                 } catch { }
                                 medium.Reject(e);
                             },
                             medium.InternalCancel
                         );
                         return medium;
                     }
                     /// <summary>
                     /// Позволяет преобразовать результат выполения операции к новому типу.
                     /// </summary>
                     /// <typeparam name="TNew">Новый тип результата.</typeparam>
                     /// <param name="mapper">Преобразование результата к новому типу.</param>
                     /// <param name="error">Обработчик ошибки. Данный обработчик получит
                     /// исключение возникшее при выполнении операции.</param>
                     /// <returns>Новое обещание, которое будет выполнено при выполнении исходного обещания.</returns>
                     public IPromise<TNew> Map<TNew>(ResultMapper<T, TNew> mapper, ErrorHandler error) {
                         if (mapper == null)
                             throw new ArgumentNullException("mapper");
                         // создаем прицепленное обещание
                         var chained = new Promise<TNew>();
                         ResultHandler<T> resultHandler = result => chained.Resolve(mapper(result));
                         ErrorHandler errorHandler = delegate(Exception e) {
                             if (error != null)
                                 try {
                                     error(e);
                                 } catch { }
                             // в случае ошибки нужно передать исключение дальше по цепочке
                             chained.Reject(e);
                         };
                         AddHandler(
                             resultHandler,
                             errorHandler,
                             chained.InternalCancel
                         );
                         return chained;
                     }
                     public IPromise<TNew> Map<TNew>(ResultMapper<T, TNew> mapper) {
                         return Map(mapper, null);
                     }
                     /// <summary>
                     /// Сцепляет несколько аснхронных операций. Указанная асинхронная операция будет вызвана после
                     /// выполнения текущей, а результат текущей операции может быть использован для инициализации
                     /// новой операции.
                     /// </summary>
                     /// <typeparam name="TNew">Тип результата указанной асинхронной операции.</typeparam>
                     /// <param name="chained">Асинхронная операция, которая должна будет начаться после выполнения текущей.</param>
                     /// <param name="error">Обработчик ошибки. Данный обработчик получит
                     /// исключение возникшее при выполнении текуещй операции.</param>
                     /// <returns>Новое обещание, которое будет выполнено по окончанию указанной аснхронной операции.</returns>
                     public IPromise<TNew> Chain<TNew>(ChainedOperation<T, TNew> chained, ErrorHandler error) {
                         // проблема в том, что на момент связывания еще не начата асинхронная операция, поэтому нужно
                         // создать посредника, к которому будут подвызяваться следующие обработчики.
                         // когда будет выполнена реальная асинхронная операция, она обратиться к посреднику, чтобы
                         // передать через него результаты работы.
                         var medium = new Promise<TNew>(this, true);
                         ResultHandler<T> resultHandler = delegate(T result) {
                             if (medium.IsCancelled)
                                 return;
                             var promise = chained(result);
                             // notify chained operation that it's not needed
                             medium.Cancelled(() => promise.Cancel());
                             promise.Then(
                                 x => medium.Resolve(x),
                                 e => medium.Reject(e)
                             );
                         };
                         ErrorHandler errorHandler = delegate(Exception e) {
                             if (error != null)
                                 error(e);
                             // в случае ошибки нужно передать исключение дальше по цепочке
                             medium.Reject(e);
                         };
                         AddHandler(
                             resultHandler,
                             errorHandler,
                             medium.InternalCancel
                         );
                         return medium;
                     }
                     public IPromise<TNew> Chain<TNew>(ChainedOperation<T, TNew> chained) {
                         return Chain(chained, null);
                     }
                     public IPromise<T> Cancelled(Action handler) {
                         AddHandler(null, null, handler);
                         return this;
                     }
                     /// <summary>
                     /// Adds the specified handler for all cases (success, error, cancel)
                     /// </summary>
                     /// <param name="handler">The handler that will be called anyway</param>
                     /// <returns>self</returns>
                     public IPromise<T> Finally(Action handler) {
                         if (handler == null)
                             throw new ArgumentNullException("handler");
                         AddHandler(
                             x => handler(),
                             e => handler(),
                             handler
                         );
                         return this;
                     }
                     /// <summary>
                     /// Преобразует результат обещания к нужному типу
                     /// </summary>
                     /// <typeparam name="T2"></typeparam>
                     /// <returns></returns>
                     public IPromise<T2> Cast<T2>() {
                         return Map(x => (T2)(object)x, null);
                     }
                     /// <summary>
                     /// Дожидается отложенного обещания и в случае успеха, возвращает
                     /// его, результат, в противном случае бросает исключение.
                     /// </summary>
                     /// <remarks>
                     /// <para>
                     /// Если ожидание обещания было прервано по таймауту, это не значит,
                     /// что обещание было отменено или что-то в этом роде, это только
                     /// означает, что мы его не дождались, однако все зарегистрированные
                     /// обработчики, как были так остались и они будут вызваны, когда
                     /// обещание будет выполнено.
                     /// </para>
                     /// <para>
                     /// Такое поведение вполне оправдано поскольку таймаут может истечь
                     /// в тот момент, когда началась обработка цепочки обработчиков, и
                     /// к тому же текущее обещание может стоять в цепочке обещаний и его
                     /// отклонение может привести к непрогнозируемому результату.
                     /// </para>
                     /// </remarks>
                     /// <param name="timeout">Время ожидания</param>
                     /// <returns>Результат выполнения обещания</returns>
                     public T Join(int timeout) {
                         var evt = new ManualResetEvent(false);
                         Anyway(() => evt.Set());
                         Cancelled(() => evt.Set());
                         if (!evt.WaitOne(timeout, true))
                             throw new TimeoutException();
                         switch (m_state) {
                             case SucceededState:
                                 return m_result;
                             case CancelledState:
                                 throw new OperationCanceledException();
                             case RejectedState:
                                 throw new TargetInvocationException(m_error);
                             default:
                                 throw new ApplicationException(String.Format("Invalid promise state {0}", m_state));
                         }
                     }
                     public T Join() {
                         return Join(Timeout.Infinite);
                     }
                     void AddHandler(ResultHandler<T> success, ErrorHandler error, Action cancel) {
                         Interlocked.Increment(ref m_childrenCount);
                         HandlerDescriptor handler = new HandlerDescriptor {
                             resultHandler = success,
                             errorHandler = error,
                             cancellHandler = cancel
                         };
                         bool queued;
                         if (!IsResolved) {
                             m_handlers.Enqueue(handler);
                             queued = true;
                         } else {
                             // the promise is in resolved state, just invoke the handled with minimum overhead
                             queued = false;
                             InvokeHandler(handler);
                         }
                         if (queued && IsResolved && m_handlers.TryDequeue(out handler))
                             // if the promise have been resolved while we was adding handler to the queue
                             // we can't guarantee that someone is still processing it
                             // therefore we will fetch a handler from the queue and execute it
                             // note that fetched handler may be not the one that we have added
                             // even we can fetch no handlers at all :)
                             InvokeHandler(handler);
                     }
                     protected virtual void InvokeHandler(HandlerDescriptor handler) {
                         switch (m_state) {
                             case SucceededState:
                                 handler.Resolve(m_result);
                                 break;
                             case RejectedState:
                                 handler.Reject(m_error);
                                 break;
                             case CancelledState:
                                 handler.Cancel();
                                 break;
                             default:
                                 // do nothing
                                 return;
                         }
                     }
                     protected virtual void OnStateChanged() {
                         HandlerDescriptor handler;
                         while (m_handlers.TryDequeue(out handler))
                             InvokeHandler(handler);
                     }
                     public bool IsExclusive {
                         get {
                             return m_childrenCount <= 1;
                         }
                     }
                     protected bool Cancel(bool dependencies) {
                         if (BeginTransit()) {
                             CompleteTransit(CancelledState);
                             OnStateChanged();
                             if (dependencies && m_parent != null && m_parent.IsExclusive)
                                 m_parent.Cancel();
                             return true;
                         } else {
                             return false;
                         }
                     }
                     /// <summary>
                     /// Объединяет несколько обещаний в одно, результатом которого является массив результатов других обещаний.
                     /// Если хотябы одно из переданных обещаний не будет выполнено, то новое обещение тоже не будет выполнено.
                     /// При отмене нового обещания, переданные обещания также будут отменены, если никто больше на них не подписан.
                     /// </summary>
                     /// <param name="promises">Список обещаний. Если список пустой, то результирующее обещание возвращается уже выполненным.</param>
                     /// <returns>Обещание объединяющее в себе результат переданных обещаний.</returns>
                     /// <exception cref="ArgumentNullException"><paramref name="promises"/> не может быть null</exception>
-                    public static Promise<T[]> CreateComposite(IList<Promise<T>> promises) {
+                    public static IPromise<T[]> CreateComposite(IList<IPromise<T>> promises) {
                         if (promises == null)
                             throw new ArgumentNullException();
                         // создаем аккумулятор для результатов и результирующее обещание
                         var result = new T[promises.Count];
                         var promise = new Promise<T[]>();
                         // special case
                         if (promises.Count == 0) {
                             promise.Resolve(result);
                             return promise;
                         }
                         int pending = promises.Count;
                         for (int i = 0; i < promises.Count; i++) {
                             var dest = i;
                             promises[i].Then(
                                 x => {
                                     result[dest] = x;
                                     if(Interlocked.Decrement(ref pending) == 0)
                                         promise.Resolve(result);
                                 },
                                 e => promise.Reject(e)
                             );
                         }
                         promise.Cancelled(
                             () => {
                                 foreach(var d in promises)
                                     if(d.IsExclusive)
                                         d.Cancel();
                             }
                         );
                         return promise;
                     }
                     public static Promise<T> ResultToPromise(T result) {
                         var p = new Promise<T>();
                         p.Resolve(result);
                         return p;
                     }
                     public static Promise<T> ExceptionToPromise(Exception error) {
                         if (error == null)
                             throw new ArgumentNullException();
                         var p = new Promise<T>();
                         p.Reject(error);
                         return p;
                     }
                 }
             }

General Comments 0

Write
Preview

You need to be logged in to leave comments. Login now

No TODOs yet

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages