2005-01-31 Zoltan Varga <vargaz@freemail.hu>
[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 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 namespace System.Security.Permissions {
33
34         [AttributeUsage (AttributeTargets.Assembly | AttributeTargets.Class |
35                          AttributeTargets.Struct | AttributeTargets.Constructor |
36                          AttributeTargets.Method, AllowMultiple=true, Inherited=false)]
37         [Serializable]
38         public sealed class EnvironmentPermissionAttribute : CodeAccessSecurityAttribute {
39
40                 // Fields
41                 private string read;
42                 private string write;
43                 
44                 // Constructor
45                 public EnvironmentPermissionAttribute (SecurityAction action) : base (action)
46                 {
47                 }
48                 
49                 // Properties
50                 public string All {
51 #if NET_1_1
52                         get { throw new NotSupportedException ("All"); }
53 #endif
54                         set { 
55                                 read = value; 
56                                 write = value;
57                         }
58                 }
59
60                 public string Read {
61                         get { return read; }
62                         set { read = value; }
63                 }
64
65                 public string Write {
66                         get { return write; }
67                         set { write = value; }
68                 }
69
70                 // Methods
71                 public override IPermission CreatePermission ()
72                 {
73                         EnvironmentPermission perm = null;
74                         if (this.Unrestricted)
75                                 perm = new EnvironmentPermission (PermissionState.Unrestricted);
76                         else {
77                                 perm = new EnvironmentPermission (PermissionState.None);
78                                 if (read != null)
79                                         perm.AddPathList (EnvironmentPermissionAccess.Read, read);
80                                 if (write != null)
81                                         perm.AddPathList (EnvironmentPermissionAccess.Write, write);
82                         }
83                         return perm;
84                 }
85         }
86 }