Merge pull request #1349 from martinjt/MachineKeyProtect
[mono.git] / mcs / class / corlib / System.Threading.Tasks / TaskExceptionSlot.cs
1 //
2 // TaskExceptionSlot.cs
3 //
4 // Authors:
5 //    Marek Safar  <marek.safar@gmail.com>
6 //    Jérémie Laval <jeremie dot laval at xamarin dot com>
7 //
8 // Copyright (c) 2008 Jérémie "Garuma" Laval
9 // Copyright 2011 Xamarin Inc (http://www.xamarin.com).
10 //
11 // Permission is hereby granted, free of charge, to any person obtaining a copy
12 // of this software and associated documentation files (the "Software"), to deal
13 // in the Software without restriction, including without limitation the rights
14 // to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
15 // copies of the Software, and to permit persons to whom the Software is
16 // furnished to do so, subject to the following conditions:
17 //
18 // The above copyright notice and this permission notice shall be included in
19 // all copies or substantial portions of the Software.
20 //
21 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
22 // IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
23 // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
24 // AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
25 // LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
26 // OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
27 // THE SOFTWARE.
28 //
29 //
30
31 #if NET_4_0
32
33 using System;
34 using System.Collections.Concurrent;
35 using System.Runtime.ExceptionServices;
36
37 namespace System.Threading.Tasks
38 {
39         internal class TaskExceptionSlot
40         {
41                 public volatile bool                Observed;
42                 public ConcurrentQueue<AggregateException> ChildExceptions;
43
44                 volatile AggregateException exception;
45 #if NET_4_5
46                 volatile ExceptionDispatchInfo dispatchInfo;
47 #endif
48                 readonly Task parent;
49
50                 public TaskExceptionSlot (Task parent)
51                 {
52                         this.parent = parent;
53                 }
54
55                 public AggregateException Exception {
56                         get {
57                                 return exception;
58                         }
59                 }
60
61                 public void SetException (AggregateException exception)
62                 {
63 #if NET_4_5                     
64                         if (dispatchInfo == null) {
65                                 //
66                                 // Used by task awaiter to rethrow an exception with original call stack, it's
67                                 // needed for first exception only
68                                 //
69                                 dispatchInfo = ExceptionDispatchInfo.Capture (exception.InnerException);
70                         }
71 #endif
72                         this.exception = exception;
73                 }
74
75                 ~TaskExceptionSlot ()
76                 {
77                         if (Exception != null && !Observed && !TaskScheduler.FireUnobservedEvent (parent, Exception).Observed) {
78                                 // NET 4.5 changed the default exception behavior for unobserved exceptions. Unobserved exceptions still cause
79                                 // the UnobservedTaskException event to be raised but the process will not crash by default
80                                 //
81                                 // .NET allows to configure this using config element ThrowUnobservedTaskExceptions
82                                 //
83 #if !NET_4_5
84                                 throw Exception;
85 #endif
86                         }
87                 }
88         }
89 }
90
91 #endif