New test.
[mono.git] / mcs / class / corlib / System.Runtime.InteropServices / RuntimeEnvironment.cs
1 //
2 // System.Runtime.InteropServices/RuntimeEnvironment.cs
3 //
4 // Authors:
5 //      Dominik Fretz (roboto@gmx.net)
6 //      Sebastien Pouliot (sebastien@ximian.com)
7 //
8 // (C) 2003 Dominik Fretz
9 // Copyright (C) 2004-2005 Novell, Inc (http://www.novell.com)
10 //
11 // Permission is hereby granted, free of charge, to any person obtaining
12 // a copy of this software and associated documentation files (the
13 // "Software"), to deal in the Software without restriction, including
14 // without limitation the rights to use, copy, modify, merge, publish,
15 // distribute, sublicense, and/or sell copies of the Software, and to
16 // permit persons to whom the Software is furnished to do so, subject to
17 // the following conditions:
18 // 
19 // The above copyright notice and this permission notice shall be
20 // included in all copies or substantial portions of the Software.
21 // 
22 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
23 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
24 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
25 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
26 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
27 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
28 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
29 //
30
31 using System.IO;
32 using System.Reflection;
33 using System.Runtime.InteropServices;
34 using System.Security;
35 using System.Security.Permissions;
36
37 namespace System.Runtime.InteropServices
38 {
39 #if NET_2_0
40         [ComVisible (true)]
41 #endif
42         public class RuntimeEnvironment
43         {
44                 public RuntimeEnvironment ()
45                 {
46                 }
47
48                 public static string SystemConfigurationFile {
49                         get {
50                                 // GetMachineConfigPath is internal and not protected by CAS
51                                 string path = Environment.GetMachineConfigPath ();
52                                 if (SecurityManager.SecurityEnabled) {
53                                         new FileIOPermission (FileIOPermissionAccess.PathDiscovery, path).Demand ();
54                                 }
55                                 return path;
56                         }
57                 }
58
59                 public static bool FromGlobalAccessCache (Assembly a)
60                 {
61                         // yes, this will throw a NullReferenceException (just like MS, reported as ...)
62                         return a.GlobalAssemblyCache;
63                 }
64         
65                 public static string GetRuntimeDirectory ()
66                 {
67                         return Path.GetDirectoryName (typeof (int).Assembly.Location);  
68                 }
69
70                 [SecurityPermission (SecurityAction.Demand, UnmanagedCode = true)]
71                 public static string GetSystemVersion ()
72                 {
73                         return "v" + Environment.Version.Major + "." + Environment.Version.Minor + "." + Environment.Version.Build;
74                 }
75         }
76 }