New test.
[mono.git] / mcs / class / corlib / System.Security.Permissions / EnvironmentPermissionAttribute.cs
1 //
2 // System.Security.Permissions.EnvironmentPermissionAttribute.cs
3 //
4 // Authors
5 //      Duncan Mak <duncan@ximian.com>
6 //      Sebastien Pouliot  <sebastien@ximian.com>
7 //
8 // (C) 2002 Ximian, Inc. http://www.ximian.com
9 // Portions Copyright (C) 2003 Motus Technologies (http://www.motus.com)
10 // Copyright (C) 2004-2005 Novell, Inc (http://www.novell.com)
11 //
12 // Permission is hereby granted, free of charge, to any person obtaining
13 // a copy of this software and associated documentation files (the
14 // "Software"), to deal in the Software without restriction, including
15 // without limitation the rights to use, copy, modify, merge, publish,
16 // distribute, sublicense, and/or sell copies of the Software, and to
17 // permit persons to whom the Software is furnished to do so, subject to
18 // the following conditions:
19 // 
20 // The above copyright notice and this permission notice shall be
21 // included in all copies or substantial portions of the Software.
22 // 
23 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
24 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
25 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
26 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
27 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
28 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
29 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
30 //
31
32 using System.Runtime.InteropServices;
33 \r
34 namespace System.Security.Permissions {\r
35 \r
36 #if NET_2_0
37         [ComVisible (true)]
38 #endif
39         [AttributeUsage (AttributeTargets.Assembly | AttributeTargets.Class |
40                          AttributeTargets.Struct | AttributeTargets.Constructor |
41                          AttributeTargets.Method, AllowMultiple=true, Inherited=false)]
42         [Serializable]
43         public sealed class EnvironmentPermissionAttribute : CodeAccessSecurityAttribute {
44
45                 // Fields
46                 private string read;
47                 private string write;
48                 
49                 // Constructor
50                 public EnvironmentPermissionAttribute (SecurityAction action) : base (action)
51                 {
52                 }
53                 
54                 // Properties
55                 public string All {
56 #if NET_1_1
57                         get { throw new NotSupportedException ("All"); }
58 #endif
59                         set { 
60                                 read = value; 
61                                 write = value;
62                         }
63                 }
64
65                 public string Read {
66                         get { return read; }
67                         set { read = value; }
68                 }
69
70                 public string Write {
71                         get { return write; }
72                         set { write = value; }
73                 }
74
75                 // Methods
76                 public override IPermission CreatePermission ()
77                 {
78                         EnvironmentPermission perm = null;
79                         if (this.Unrestricted)
80                                 perm = new EnvironmentPermission (PermissionState.Unrestricted);
81                         else {
82                                 perm = new EnvironmentPermission (PermissionState.None);
83                                 if (read != null)
84                                         perm.AddPathList (EnvironmentPermissionAccess.Read, read);
85                                 if (write != null)
86                                         perm.AddPathList (EnvironmentPermissionAccess.Write, write);
87                         }
88                         return perm;
89                 }
90         }
91 }