Statistics
| Branch: | Revision:

root / trunk / Pithos.Core / JobQueue.cs @ e6faf02b

History | View | Annotate | Download (3.6 kB)

1 255f5f86 Panagiotis Kanavos
#region
2 255f5f86 Panagiotis Kanavos
/* -----------------------------------------------------------------------
3 255f5f86 Panagiotis Kanavos
 * <copyright file="JobQueue.cs" company="GRNet">
4 255f5f86 Panagiotis Kanavos
 * 
5 255f5f86 Panagiotis Kanavos
 * Copyright 2011-2012 GRNET S.A. All rights reserved.
6 255f5f86 Panagiotis Kanavos
 *
7 255f5f86 Panagiotis Kanavos
 * Redistribution and use in source and binary forms, with or
8 255f5f86 Panagiotis Kanavos
 * without modification, are permitted provided that the following
9 255f5f86 Panagiotis Kanavos
 * conditions are met:
10 255f5f86 Panagiotis Kanavos
 *
11 255f5f86 Panagiotis Kanavos
 *   1. Redistributions of source code must retain the above
12 255f5f86 Panagiotis Kanavos
 *      copyright notice, this list of conditions and the following
13 255f5f86 Panagiotis Kanavos
 *      disclaimer.
14 255f5f86 Panagiotis Kanavos
 *
15 255f5f86 Panagiotis Kanavos
 *   2. Redistributions in binary form must reproduce the above
16 255f5f86 Panagiotis Kanavos
 *      copyright notice, this list of conditions and the following
17 255f5f86 Panagiotis Kanavos
 *      disclaimer in the documentation and/or other materials
18 255f5f86 Panagiotis Kanavos
 *      provided with the distribution.
19 255f5f86 Panagiotis Kanavos
 *
20 255f5f86 Panagiotis Kanavos
 *
21 255f5f86 Panagiotis Kanavos
 * THIS SOFTWARE IS PROVIDED BY GRNET S.A. ``AS IS'' AND ANY EXPRESS
22 255f5f86 Panagiotis Kanavos
 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
23 255f5f86 Panagiotis Kanavos
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24 255f5f86 Panagiotis Kanavos
 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL GRNET S.A OR
25 255f5f86 Panagiotis Kanavos
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
26 255f5f86 Panagiotis Kanavos
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
27 255f5f86 Panagiotis Kanavos
 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
28 255f5f86 Panagiotis Kanavos
 * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
29 255f5f86 Panagiotis Kanavos
 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 255f5f86 Panagiotis Kanavos
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
31 255f5f86 Panagiotis Kanavos
 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
32 255f5f86 Panagiotis Kanavos
 * POSSIBILITY OF SUCH DAMAGE.
33 255f5f86 Panagiotis Kanavos
 *
34 255f5f86 Panagiotis Kanavos
 * The views and conclusions contained in the software and
35 255f5f86 Panagiotis Kanavos
 * documentation are those of the authors and should not be
36 255f5f86 Panagiotis Kanavos
 * interpreted as representing official policies, either expressed
37 255f5f86 Panagiotis Kanavos
 * or implied, of GRNET S.A.
38 255f5f86 Panagiotis Kanavos
 * </copyright>
39 255f5f86 Panagiotis Kanavos
 * -----------------------------------------------------------------------
40 255f5f86 Panagiotis Kanavos
 */
41 255f5f86 Panagiotis Kanavos
#endregion
42 d15e99b4 Panagiotis Kanavos
using System.Collections.Concurrent;
43 d15e99b4 Panagiotis Kanavos
using System.Threading;
44 d15e99b4 Panagiotis Kanavos
using System.Threading.Tasks;
45 d15e99b4 Panagiotis Kanavos
46 d15e99b4 Panagiotis Kanavos
namespace Pithos.Core
47 d15e99b4 Panagiotis Kanavos
{
48 d15e99b4 Panagiotis Kanavos
    using System;
49 d15e99b4 Panagiotis Kanavos
    using System.Collections.Generic;
50 d15e99b4 Panagiotis Kanavos
    using System.Linq;
51 d15e99b4 Panagiotis Kanavos
    using System.Text;
52 d15e99b4 Panagiotis Kanavos
53 d15e99b4 Panagiotis Kanavos
    /// <summary>
54 d15e99b4 Panagiotis Kanavos
    /// TODO: Update summary.
55 d15e99b4 Panagiotis Kanavos
    /// </summary>
56 d15e99b4 Panagiotis Kanavos
    public class JobQueue
57 d15e99b4 Panagiotis Kanavos
    {
58 d15e99b4 Panagiotis Kanavos
        private readonly BlockingCollection<Action> _statusUpdateQueue = new BlockingCollection<Action>();
59 d15e99b4 Panagiotis Kanavos
        private CancellationToken _cancellationToken;
60 d15e99b4 Panagiotis Kanavos
        
61 d15e99b4 Panagiotis Kanavos
62 d15e99b4 Panagiotis Kanavos
        public void Start(CancellationToken token)
63 d15e99b4 Panagiotis Kanavos
        {
64 d15e99b4 Panagiotis Kanavos
            _cancellationToken = token;
65 d15e99b4 Panagiotis Kanavos
            Task.Factory.StartNew(ProcessUpdates, _cancellationToken);
66 d15e99b4 Panagiotis Kanavos
        }
67 d15e99b4 Panagiotis Kanavos
68 d15e99b4 Panagiotis Kanavos
        private void ProcessUpdates()
69 d15e99b4 Panagiotis Kanavos
        {
70 d15e99b4 Panagiotis Kanavos
            foreach (var action in _statusUpdateQueue.GetConsumingEnumerable())
71 d15e99b4 Panagiotis Kanavos
            {
72 d15e99b4 Panagiotis Kanavos
                action();
73 d15e99b4 Panagiotis Kanavos
            }
74 d15e99b4 Panagiotis Kanavos
        }
75 d15e99b4 Panagiotis Kanavos
76 d15e99b4 Panagiotis Kanavos
        public void Add(Action action)
77 d15e99b4 Panagiotis Kanavos
        {
78 d15e99b4 Panagiotis Kanavos
            _statusUpdateQueue.Add(action);
79 d15e99b4 Panagiotis Kanavos
        }
80 d15e99b4 Panagiotis Kanavos
81 d15e99b4 Panagiotis Kanavos
        public void Stop()
82 d15e99b4 Panagiotis Kanavos
        {
83 d15e99b4 Panagiotis Kanavos
            _statusUpdateQueue.CompleteAdding();
84 d15e99b4 Panagiotis Kanavos
        }
85 d15e99b4 Panagiotis Kanavos
       
86 9c4346c9 Panagiotis Kanavos
    }   
87 9c4346c9 Panagiotis Kanavos
88 9c4346c9 Panagiotis Kanavos
    public class JobAgent:Agent<Action>
89 9c4346c9 Panagiotis Kanavos
    {
90 9c4346c9 Panagiotis Kanavos
        protected JobAgent(Action<Agent<Action>>  action)
91 9c4346c9 Panagiotis Kanavos
            :base(action)
92 9c4346c9 Panagiotis Kanavos
        {
93 9c4346c9 Panagiotis Kanavos
            
94 9c4346c9 Panagiotis Kanavos
        }
95 9c4346c9 Panagiotis Kanavos
96 9c4346c9 Panagiotis Kanavos
        public static JobAgent Create()
97 9c4346c9 Panagiotis Kanavos
        {
98 9c4346c9 Panagiotis Kanavos
            return (JobAgent)Start(queue =>
99 9c4346c9 Panagiotis Kanavos
            {
100 9c4346c9 Panagiotis Kanavos
                Action loop = null;
101 9c4346c9 Panagiotis Kanavos
                loop = () =>
102 9c4346c9 Panagiotis Kanavos
                {
103 9c4346c9 Panagiotis Kanavos
                    var job = queue.Receive();
104 9c4346c9 Panagiotis Kanavos
                    job.ContinueWith(t =>
105 9c4346c9 Panagiotis Kanavos
                    {
106 24477d85 Panagiotis Kanavos
                        t.IgnoreExceptions();
107 9c4346c9 Panagiotis Kanavos
                        var action = job.Result;
108 9c4346c9 Panagiotis Kanavos
                        action();
109 9c4346c9 Panagiotis Kanavos
                        queue.DoAsync(loop);
110 9c4346c9 Panagiotis Kanavos
                    });
111 9c4346c9 Panagiotis Kanavos
                };
112 9c4346c9 Panagiotis Kanavos
                loop();
113 9c4346c9 Panagiotis Kanavos
            });
114 9c4346c9 Panagiotis Kanavos
        }
115 9c4346c9 Panagiotis Kanavos
116 d15e99b4 Panagiotis Kanavos
    }
117 d15e99b4 Panagiotis Kanavos
}