[Test] Avoid MethodInfoTest.GetMethodBody failure when executed on a release (IL...
[mono.git] / mcs / class / corlib / System.Security / CodeAccessPermission.cs
old mode 100755 (executable)
new mode 100644 (file)
index 3ce879e..d6fb5d8
@@ -9,7 +9,7 @@
 // (C) Ximian, Inc. http://www.ximian.com
 // Copyright (C) 2001 Nick Drochak, All Rights Reserved
 // Portions (C) 2004 Motus Technologies Inc. (http://www.motus.com)
-// Copyright (C) 2004 Novell, Inc (http://www.novell.com)
+// Copyright (C) 2004-2005 Novell, Inc (http://www.novell.com)
 //
 // Permission is hereby granted, free of charge, to any person obtaining
 // a copy of this software and associated documentation files (the
 using System.Diagnostics;
 using System.Globalization;
 using System.Reflection;
+using System.Runtime.CompilerServices;
+using System.Runtime.InteropServices;
 using System.Security.Permissions;
-using System.Text;
+using System.Threading;
 
 namespace System.Security {
 
        [Serializable]
+       [SecurityPermission (SecurityAction.InheritanceDemand, ControlEvidence = true, ControlPolicy = true)]
+       [ComVisible (true)]
+       [MonoTODO ("CAS support is experimental (and unsupported).")]
        public abstract class CodeAccessPermission : IPermission, ISecurityEncodable, IStackWalk {
 
+
                protected CodeAccessPermission ()
                {
                }
 
-               // LAMESPEC: Documented as virtual
-               [MonoTODO]
+               [MonoTODO ("CAS support is experimental (and unsupported). Imperative mode is not implemented.")]
                public void Assert ()
                {
-                       // Not everyone can assert freely so we must check for
-                       // System.Security.Permissions.SecurityPermissionFlag.Assertion
-                       new SecurityPermission (SecurityPermissionFlag.Assertion).Demand ();
-
-                       // TODO: Only one Assert can be active in a stack frame
-                       // throw new SecurityException (Locale.GetText (
-                       //      "Only one Assert can be active in a stack frame"));
+                       new PermissionSet (this).Assert ();
                }
 
-#if NET_2_0
-               public 
-#else
-               internal
-#endif
-               virtual bool CheckAssert (CodeAccessPermission asserted)
+               internal bool CheckAssert (CodeAccessPermission asserted)
                {
                        if (asserted == null)
                                return false;
-                       if (asserted.GetType() != this.GetType ())
+                       if (asserted.GetType () != this.GetType ())
                                return false;
                        return IsSubsetOf (asserted);
                }
 
-#if NET_2_0
-               public 
-#else
-               internal
-#endif
-               virtual bool CheckDemand (CodeAccessPermission target)
+               internal bool CheckDemand (CodeAccessPermission target)
                {
                        if (target == null)
                                return false;
@@ -87,26 +76,24 @@ namespace System.Security {
                        return IsSubsetOf (target);
                }
 
-#if NET_2_0
-               public 
-#else
-               internal
-#endif
-               virtual bool CheckDeny (CodeAccessPermission denied)
+               internal bool CheckDeny (CodeAccessPermission denied)
                {
                        if (denied == null)
                                return true;
-                       if (denied.GetType () != this.GetType ())
+                       Type t = denied.GetType ();
+                       if (t != this.GetType ())
                                return true;
-                       return (Intersect (denied) == null);
+                       IPermission inter = Intersect (denied);
+                       if (inter == null)
+                               return true;
+                       // sadly that's not enough :( at this stage we must also check
+                       // if an empty (PermissionState.None) is a subset of the denied
+                       // (which is like a empty intersection looks like for flag based
+                       // permissions, e.g. AspNetHostingPermission).
+                       return denied.IsSubsetOf (PermissionBuilder.Create (t));
                }
 
-#if NET_2_0
-               public 
-#else
-               internal
-#endif
-               virtual bool CheckPermitOnly (CodeAccessPermission target)
+               internal bool CheckPermitOnly (CodeAccessPermission target)
                {
                        if (target == null)
                                return false;
@@ -117,65 +104,40 @@ namespace System.Security {
 
                public abstract IPermission Copy ();
 
-               // LAMESPEC: Documented as virtual
-               [MonoTODO ("Assert, Deny and PermitOnly aren't yet supported")]
                public void Demand ()
                {
+                       // note: here we're sure it's a CAS demand
                        if (!SecurityManager.SecurityEnabled)
                                return;
 
-                       Assembly a = null;
-                       StackTrace st = new StackTrace (1); // skip ourself
-                       StackFrame[] frames = st.GetFrames ();
-                       foreach (StackFrame sf in frames) {
-                               MethodBase mb = sf.GetMethod ();
-                               // declarative security checks, when present, must be checked
-                               // for each stack frame
-                               if ((MethodAttributes.HasSecurity & mb.Attributes) == MethodAttributes.HasSecurity) {
-                                       // TODO
-                               }
-                               // however the "final" grant set is resolved by assembly, so
-                               // there's no need to check it every time (just when we're 
-                               // changing assemblies between frames).
-                               Assembly af = mb.ReflectedType.Assembly;
-                               if (a != af) {
-                                       a = af;
-                                       if (!a.Demand (this)) {
-                                               Type t = this.GetType ();
-                                               throw new SecurityException ("Demand failed", t);
-                                       }
-                               }
-                       }
+                       // skip frames until we get the caller (of our caller)
+                       new PermissionSet (this).CasOnlyDemand (3);
                }
 
-               // LAMESPEC: Documented as virtual
-               [MonoTODO]
+               [MonoTODO ("CAS support is experimental (and unsupported). Imperative mode is not implemented.")]
                public void Deny ()
                {
+                       new PermissionSet (this).Deny ();
                }
 
-#if NET_2_0
-               [MonoTODO]
+               [ComVisible (false)]
                public override bool Equals (object obj)
                {
                        if (obj == null)
                                return false;
                        if (obj.GetType () != this.GetType ())
                                return false;
-                       // TODO: compare
-                       return true;
+                       CodeAccessPermission cap = (obj as CodeAccessPermission);
+                       return (IsSubsetOf (cap) && cap.IsSubsetOf (this));
                }
-#endif
 
                public abstract void FromXml (SecurityElement elem);
 
-#if NET_2_0
-               [MonoTODO]
+               [ComVisible (false)]
                public override int GetHashCode ()
                {
                        return base.GetHashCode ();
                }
-#endif
 
                public abstract IPermission Intersect (IPermission target);
 
@@ -196,30 +158,84 @@ namespace System.Security {
                        return null;
                }
 
-               // LAMESPEC: Documented as virtual
-               [MonoTODO]
+               [MonoTODO ("CAS support is experimental (and unsupported). Imperative mode is not implemented.")]
                public void PermitOnly ()
                {
+                       new PermissionSet (this).PermitOnly ();
                }
 
-               [MonoTODO]
+               [MonoTODO ("CAS support is experimental (and unsupported). Imperative mode is not implemented.")]
                public static void RevertAll ()
                {
+                       if (!SecurityManager.SecurityEnabled)
+                               return;
+
+                       SecurityFrame sf = new SecurityFrame (1);
+                       bool revert = false;
+                       if ((sf.Assert != null) && !sf.Assert.DeclarativeSecurity) {
+                               revert = true;
+                               throw new NotSupportedException ("Currently only declarative Assert are supported.");
+                       }
+                       if ((sf.Deny != null) && !sf.Deny.DeclarativeSecurity) {
+                               revert = true;
+                               throw new NotSupportedException ("Currently only declarative Deny are supported.");
+                       }
+                       if ((sf.PermitOnly != null) && !sf.PermitOnly.DeclarativeSecurity) {
+                               revert = true;
+                               throw new NotSupportedException ("Currently only declarative PermitOnly are supported.");
+                       }
+
+                       if (!revert) {
+                               string msg = Locale.GetText ("No stack modifiers are present on the current stack frame.");
+                               // FIXME: we don't (yet) support imperative stack modifiers
+                               msg += Environment.NewLine + "Currently only declarative stack modifiers are supported.";
+                               throw new ExecutionEngineException (msg);
+                       }
                }
 
-               [MonoTODO]
+               [MonoTODO ("CAS support is experimental (and unsupported). Imperative mode is not implemented.")]
                public static void RevertAssert ()
                {
+                       if (!SecurityManager.SecurityEnabled)
+                               return;
+
+                       SecurityFrame sf = new SecurityFrame (1);
+                       if ((sf.Assert != null) && !sf.Assert.DeclarativeSecurity) {
+                               throw new NotSupportedException ("Currently only declarative Assert are supported.");
+                       } else {
+                               // we can't revert declarative security (or an empty frame) imperatively
+                               ThrowExecutionEngineException (SecurityAction.Assert);
+                       }
                }
 
-               [MonoTODO]
+               [MonoTODO ("CAS support is experimental (and unsupported). Imperative mode is not implemented.")]
                public static void RevertDeny ()
                {
+                       if (!SecurityManager.SecurityEnabled)
+                               return;
+
+                       SecurityFrame sf = new SecurityFrame (1);
+                       if ((sf.Deny != null) && !sf.Deny.DeclarativeSecurity) {
+                               throw new NotSupportedException ("Currently only declarative Deny are supported.");
+                       } else {
+                               // we can't revert declarative security (or an empty frame) imperatively
+                               ThrowExecutionEngineException (SecurityAction.Deny);
+                       }
                }
 
-               [MonoTODO]
+               [MonoTODO ("CAS support is experimental (and unsupported). Imperative mode is not implemented.")]
                public static void RevertPermitOnly ()
                {
+                       if (!SecurityManager.SecurityEnabled)
+                               return;
+
+                       SecurityFrame sf = new SecurityFrame (1);
+                       if ((sf.PermitOnly != null) && sf.PermitOnly.DeclarativeSecurity) {
+                               throw new NotSupportedException ("Currently only declarative PermitOnly are supported.");
+                       } else {
+                               // we can't revert declarative security (or an empty frame) imperatively
+                               ThrowExecutionEngineException (SecurityAction.PermitOnly);
+                       }
                }
 
                // Internal helpers methods
@@ -236,17 +252,15 @@ namespace System.Security {
 
                internal static PermissionState CheckPermissionState (PermissionState state, bool allowUnrestricted)
                {
+                       string msg;
                        switch (state) {
                        case PermissionState.None:
                                break;
                        case PermissionState.Unrestricted:
-                               if (!allowUnrestricted) {
-                                       string msg = Locale.GetText ("Unrestricted isn't not allowed for identity permissions.");
-                                       throw new ArgumentException (msg, "state");
-                               }
+                               // unrestricted permissions are possible for identiy permissions
                                break;
                        default:
-                               string msg = String.Format (Locale.GetText ("Invalid enum {0}"), state);
+                               msg = String.Format (Locale.GetText ("Invalid enum {0}"), state);
                                throw new ArgumentException (msg, "state");
                        }
                        return state;
@@ -299,11 +313,80 @@ namespace System.Security {
                        return (String.Compare (value, Boolean.TrueString, true, CultureInfo.InvariantCulture) == 0);
                }
 
+               internal bool ProcessFrame (SecurityFrame frame)
+               { 
+                       // 1. CheckPermitOnly
+                       if (frame.PermitOnly != null) {
+                               // the demanded permission must be in one of the permitted...
+                               bool permit = frame.PermitOnly.IsUnrestricted ();
+                               if (!permit) {
+                                       // check individual permissions
+                                       foreach (IPermission p in frame.PermitOnly) {
+                                               if (CheckPermitOnly (p as CodeAccessPermission)) {
+                                                       permit = true;
+                                                       break;
+                                               }
+                                       }
+                               }
+                               if (!permit) {
+                                       // ...or else we throw
+                                       ThrowSecurityException (this, "PermitOnly", frame, SecurityAction.Demand, null);
+                               }
+                       }
+
+                       // 2. CheckDeny
+                       if (frame.Deny != null) {
+                               // special case where everything is denied (i.e. no child to be processed)
+                               if (frame.Deny.IsUnrestricted ())
+                                       ThrowSecurityException (this, "Deny", frame, SecurityAction.Demand, null);
+                               foreach (IPermission p in frame.Deny) {
+                                       if (!CheckDeny (p as CodeAccessPermission))
+                                               ThrowSecurityException (this, "Deny", frame, SecurityAction.Demand, p);
+                               }
+                       }
+
+                       // 3. CheckAssert
+                       if (frame.Assert != null) {
+                               if (frame.Assert.IsUnrestricted ())
+                                       return true; // remove permission and continue stack walk
+                               foreach (IPermission p in frame.Assert) {
+                                       if (CheckAssert (p as CodeAccessPermission)) {
+                                               return true; // remove permission and continue stack walk
+                                       }
+                               }
+                       }
+
+                       // continue the stack walk
+                       return false; 
+               }
+
                internal static void ThrowInvalidPermission (IPermission target, Type expected) 
                {
                        string msg = Locale.GetText ("Invalid permission type '{0}', expected type '{1}'.");
                        msg = String.Format (msg, target.GetType (), expected);
                        throw new ArgumentException (msg, "target");
                }
+
+               internal static void ThrowExecutionEngineException (SecurityAction stackmod)
+               {
+                       string msg = Locale.GetText ("No {0} modifier is present on the current stack frame.");
+                       // FIXME: we don't (yet) support imperative stack modifiers
+                       msg += Environment.NewLine + "Currently only declarative stack modifiers are supported.";
+                       throw new ExecutionEngineException (String.Format (msg, stackmod));
+               }
+
+               internal static void ThrowSecurityException (object demanded, string message, SecurityFrame frame,
+                       SecurityAction action, IPermission failed)
+               {
+#if NET_2_1
+                       throw new SecurityException (message);
+#else
+                       Assembly a = frame.Assembly;
+                       throw new SecurityException (Locale.GetText (message), 
+                               a.UnprotectedGetName (), a.GrantedPermissionSet, 
+                               a.DeniedPermissionSet, frame.Method, action, demanded, 
+                               failed, a.UnprotectedGetEvidence ());
+#endif
+               }
        }
 }