public void Execute(AdviceSpec spec) { foreach (Navigator targetNav in spec.TargetNavigators) { Narrow.TypeDefinition(targetNav, spec).Attributes |= TypeAttributes.Serializable; } }
public void Execute(AdviceSpec spec) { foreach (Navigator aspectNav in spec.AspectNavigators) { IMethodDefinition aspectMethod = Narrow.Interceptor(aspectNav, spec); foreach (Navigator targetNav in spec.TargetNavigators) { MethodDefinition targetMethod = Narrow.ConcreteMethod(targetNav, spec); // Prevent recursive weaving if (targetMethod != aspectMethod && !Cil.BelongsToAspectDng(targetMethod) && !Cil.BelongsToAspectDng(aspectMethod) && targetMethod.GenericParameters.Count == 0 && targetMethod.DeclaringType.GenericParameters.Count == 0) { // Cannot keep semantics of "ref" parameters if (targetMethod.ToString().IndexOf("&") == -1) { AddInterceptor(targetMethod, aspectMethod); } } } } }
public void Execute(AdviceSpec spec) { foreach (Navigator aspectNav in spec.AspectNavigators) { IMethodDefinition aspectMethod = Narrow.Interceptor(aspectNav, spec); foreach (Navigator targetNav in spec.TargetNavigators) { Instruction targetCallInstruction = Narrow.CallInstruction(targetNav, spec); MethodReference targetMethod = (MethodReference)targetCallInstruction.Operand; MethodDefinition containerMethod = Narrow.Method(targetNav.Parent, spec); // Prevent recursive weaving if (targetMethod != aspectMethod && containerMethod != aspectMethod && !Cil.BelongsToAspectDng(targetMethod) && !Cil.BelongsToAspectDng(aspectMethod) && !Cil.BelongsToAspectDng(containerMethod) && targetMethod.GenericParameters.Count == 0 && targetMethod.DeclaringType.GenericParameters.Count == 0) { // Cannot weave on acces to boxed arrays. Methods look like int32[0...,0...]::Get(int32, int32) if (targetMethod.DeclaringType.Name.IndexOf("]") == -1 && targetMethod.ToString().IndexOf("&") == -1 // To prevent base.SameMethod() calls from child types, event if AroundBody already occurred && Cil.GetOriginalMethodName(targetMethod) != Cil.GetOriginalMethodName(containerMethod) ) { AddInterceptor(targetCallInstruction, containerMethod, aspectMethod); } } } } }
public virtual void Execute(AdviceSpec spec) { foreach (Navigator targetNav in spec.TargetNavigators) { Log.LogWarning(targetNav.Current); } }
public void Execute(AdviceSpec spec) { foreach (Navigator targetNav in spec.TargetNavigators) { targetNav.Remove(); } }
// MetaAspect Eval /// Some definitions may have been added from outside (typically for embedded advice) /// Just add the new definitions the expressions point to private void Eval(AdviceSpec spec, string XPathBase, string XPathConstraint) { // Evaluate the XPath expressions on Cecil object model if (spec.targetXPath != null) { spec.TargetNavigators.AddRange(Cil.TargetNavigator.SelectList(spec.targetXPath + XPathConstraint)); } else if (spec.targetRegExp != null) { foreach (Navigator nav in Cil.TargetNavigator.SelectList(XPathBase + XPathConstraint)) { if (SimpleRegex.IsPreciseMatch(nav, spec.targetRegExp)) { spec.TargetNavigators.Add(nav); } } } if (spec.aspectXPath != null) { spec.AspectNavigators.AddRange(Cil.AspectsNavigator.SelectList(spec.aspectXPath)); } else if (spec.aspectRegExp != null) { foreach (Navigator nav in Cil.AspectsNavigator.SelectList(Cil.AllDeclarations)) { if (SimpleRegex.IsPreciseMatch(nav, spec.aspectRegExp)) { spec.AspectNavigators.Add(nav); } } } }
public override void Execute(AdviceSpec spec) { Console.WriteLine("ok:" + Cil.AspectsNavigator.Select("//*[match('* *::ShouldBeAvoided(*)')]").Count); Console.WriteLine("ok:" + spec.TargetNavigators.Count); foreach (Navigator targetNav in spec.TargetNavigators) { throw new ForbiddenByAspect(targetNav.ToString(), spec); } }
public void Execute(AdviceSpec spec) { foreach (Navigator targetNav in spec.TargetNavigators) { foreach (Navigator aspectNav in spec.AspectNavigators) { Cil.CopyTo(targetNav.Current, (ICloneable)aspectNav.Current); } } }
public static Instruction CallInstruction(Navigator nav, AdviceSpec spec) { Instruction result = Instruction(nav, spec); string name = result.OpCode.Name; if (!name.StartsWith("call") && !name.StartsWith("newobj")) { throw new AdviceException("Expected a call instruction, but got " + nav.Current, spec); } return(result); }
public static Instruction Instruction(Navigator nav, AdviceSpec spec) { Instruction result = nav.Current as Instruction; if (result == null) { throw new AdviceException ("Expected an instruction, but got " + nav.Current + ":" + nav.Current.GetType(), spec); } return(result); }
public static MethodDefinition ConcreteMethod(Navigator nav, AdviceSpec spec) { MethodDefinition result = Method(nav, spec); if (result.IsAbstract) { throw new AdviceException ("Expected a concrete method, but got " + result, spec); } return(result); }
// Utility methods (safe casts) public static MethodDefinition Method(object obj, AdviceSpec spec) { MethodDefinition result = obj as MethodDefinition; if (result == null) { throw new AdviceException ("Expected a method, but got " + obj + ":" + obj.GetType(), spec); } return(result); }
public static TypeDefinition InterfaceDefinition(Navigator nav, AdviceSpec spec) { TypeDefinition result = TypeDefinition(nav, spec); if (!result.IsInterface) { throw new AdviceException ("Expected an interface definition, but got " + nav.Current, spec); } return(result); }
public static TypeDefinition TypeDefinition(Navigator nav, AdviceSpec spec) { TypeDefinition result = nav.Current as TypeDefinition; if (result == null) { throw new AdviceException ("Expected a type definition, but got " + nav.Current + " : " + nav.Current.GetType(), spec); } return(result); }
public void Execute(AdviceSpec spec) { foreach (Navigator targetNav in spec.TargetNavigators) { TypeDefinition typeDef = Narrow.TypeDefinition(targetNav, spec); foreach (Navigator aspectNav in spec.AspectNavigators) { typeDef.Interfaces.Add(Cil.TargetMainModule.Import(Narrow.InterfaceDefinition(aspectNav, spec))); } } }
public void Execute(AdviceSpec spec) { if (spec.AspectNavigators.Count != 1) { throw new AdviceException("One and only one base type can be set to a target type, but got " + spec.AspectNavigators.Count, spec); } TypeDefinition parentTypeDef = Narrow.TypeDefinition((Navigator)spec.AspectNavigators[0], spec); foreach (Navigator targetNav in spec.TargetNavigators) { Narrow.TypeDefinition(targetNav, spec).BaseType = Cil.TargetMainModule.Import(parentTypeDef); } }
public void Execute(AdviceSpec spec) { foreach (Navigator aspectNav in spec.AspectNavigators) { MethodDefinition aspectMethod = Narrow.Interceptor(aspectNav, spec); foreach (Navigator targetNav in spec.TargetNavigators) { Instruction targetCallInstruction = Narrow.Instruction(targetNav, spec); MethodDefinition targetMethod = Narrow.Method(targetNav.Parent, spec); // We don't want to intercept volatile field accessors (marshalling problem) string fieldTypeName = ((FieldReference)targetCallInstruction.Operand).FieldType.Name; if (fieldTypeName.IndexOf(typeof(System.Runtime.CompilerServices.IsVolatile).Name) == -1) { AddInterceptor(targetCallInstruction, targetMethod, aspectMethod); } } } }
private MetaAspectFacade() { // Discover and instantiate every meta-aspects in the current assembly Type MetaAspectType = typeof(MetaAspect); foreach (Type t in typeof(MetaAspectFacade).Assembly.GetTypes()) { if (MetaAspectType.IsAssignableFrom(t) && !t.IsAbstract) { m_MetaAspects[t.Name] = Activator.CreateInstance(t); } } // Get attribute oriented specs foreach (Navigator declarationNav in Cil.AspectsNavigator.SelectList(Cil.AllDeclarations)) { foreach (Navigator xpoNav in declarationNav.SelectList("Attribute[contains(., '" + Cil.AdngNS + "')]")) { CustomAttribute att = (CustomAttribute)xpoNav.Current; // Get the attribute's name ("Insert", etc) and make it a config type string typeName = att.Constructor.DeclaringType.FullName; AdviceSpec spec = (AdviceSpec)Activator.CreateInstance(Type.GetType(typeName)); // Add definition to spec aspects xpoNav.MoveToParent(); spec.AspectNavigators.Add(xpoNav); string attParam = att.ConstructorParameters[0].ToString().Trim(); if (attParam.StartsWith("/")) { spec.targetXPath = attParam; } else { spec.targetRegExp = attParam; } AspectDngConfig.Instance.AddAdvice(spec, xpoNav.ToString()); } } }
public void Execute(AdviceSpec spec) { // meta-aspect attributes/xml elements have the same name as the meta-aspect type MetaAspect meta = m_MetaAspects[spec.GetType().Name] as MetaAspect; if (meta == null) { throw new AdviceException("This spec isn't supported", spec); } else { Eval(spec, meta.XPathBase, meta.XPathConstraint); meta.Execute(spec); Log.LogExecutedSpec(spec); if (!m_NeedCleanup.Contains(meta)) { m_NeedCleanup.Add(meta); } } }
public ForbiddenByAspect(string message, AdviceSpec spec) : base("This usage if forbidden by an aspect:\n\t" + message, spec) { }
public AdviceException(string message, AdviceSpec spec, Exception rootCause) : base(message, rootCause) { Spec = spec; }
public AdviceException(string message, AdviceSpec spec) : base(message) { Spec = spec; }
public static MethodDefinition Method(Navigator nav, AdviceSpec spec) { return(Method((object)nav.Current, spec)); }
public static MethodDefinition StaticMethodMatching(Navigator nav, string regex, AdviceSpec spec) { MethodDefinition result = ConcreteMethodMatching(nav, regex, spec); if (!result.IsStatic) { throw new AdviceException ("Expected a method, but got " + result, spec); } return(result); }
public void Execute(AdviceSpec spec) { foreach (Navigator aspectNav in spec.AspectNavigators) { MethodDefinition aspectMetaMethod = Narrow.Method(aspectNav, spec); MethodInfo aspectMethod = Cil.Aspects.GetType(aspectMetaMethod.DeclaringType.FullName). GetMethod(aspectMetaMethod.Name); bool preconditions = aspectMethod.IsStatic && aspectMethod.ReturnType.FullName == typeof(string).FullName && aspectMethod.GetParameters().Length == 1 && aspectMethod.GetParameters()[0].ParameterType.FullName == typeof(TypeDefinition).FullName; if (!preconditions) { throw new AdviceException("Aspect method signature must match : \n" + "public static string YourMethod(Mono.Cecil.TypeDefinition td)", spec); } foreach (Navigator targetNav in spec.TargetNavigators) { TypeDefinition targetType = Narrow.TypeDefinition(targetNav, spec); // Only insert members on classes (not structs because fields MUST be initialized in the ctor, no field initializer) preconditions = !targetType.FullName.StartsWith("<") && !targetType.IsValueType && !targetType.IsInterface && !(targetType.BaseType != null && targetType.BaseType.Name == "Delegate"); if (preconditions) { string code = aspectMethod.Invoke(null, new object[] { targetType }) as string; if (code != null) { string className = DynamicClassName + ++m_ClassIndex; code = new StringBuilder("public class "). Append(className).Append(" { \n"). Append(code).Append("\n}").ToString(); try { // CodeDom CompilerResults results = m_Compiler.CompileAssemblyFromSource(m_CompilerParams, code); TypeDefinition dynamicType = AssemblyFactory.GetAssembly(results.PathToAssembly). MainModule.Types[className]; // Copy every method and field from the dynamic type to the targetTypeDef dynamicType = Cil.TargetMainModule.Inject(dynamicType); foreach (MethodDefinition method in dynamicType.Methods) { targetType.Methods.Add(method.Clone()); } foreach (FieldDefinition field in dynamicType.Fields) { targetType.Fields.Add(field.Clone()); } if (File.Exists(m_Path)) { File.Delete(m_Path); } } catch (Exception e) { Console.WriteLine("error " + e); } } } } // Remove aspect method from target assembly TypeDefinition typeDef = (TypeDefinition)aspectMetaMethod.DeclaringType; typeDef.Methods.Remove(aspectMetaMethod); } }
public static MethodDefinition ConcreteMethodMatching(Navigator nav, string regex, AdviceSpec spec) { MethodDefinition result = Method(nav, spec); if (!SimpleRegex.IsMatch(result, regex)) { string errorMsg = string.Format ("Expected to match signature {0}, but got {1}", SimpleRegex.EscapePseudoRegex(regex), result); throw new AdviceException(errorMsg, spec); } return(result); }
public static MethodDefinition Interceptor(Navigator nav, AdviceSpec spec) { return(StaticMethodMatching(nav, "System.Object *::*(DotNetGuru.AspectDNG.Joinpoints.*)", spec)); }
public static void LogExecutedSpec(AdviceSpec spec) { m_ExecutedSpecs.Add(spec); }