mcs/class/System.Core/System.Linq.Expressions/LambdaExpression.cs

   1 //
   2 // LambdaExpression.cs
   3 //
   4 // Author:
   5 //   Jb Evain (jbevain@novell.com)
   6 //   Miguel de Icaza (miguel@novell.com)
   7 //
   8 // (C) 2008 Novell, Inc. (http://www.novell.com)
   9 //
  10 // Permission is hereby granted, free of charge, to any person obtaining
  11 // a copy of this software and associated documentation files (the
  12 // "Software"), to deal in the Software without restriction, including
  13 // without limitation the rights to use, copy, modify, merge, publish,
  14 // distribute, sublicense, and/or sell copies of the Software, and to
  15 // permit persons to whom the Software is furnished to do so, subject to
  16 // the following conditions:
  17 //
  18 // The above copyright notice and this permission notice shall be
  19 // included in all copies or substantial portions of the Software.
  20 //
  21 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  22 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  23 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  24 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
  25 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  26 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  27 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  28 //
  29
  30 using System;
  31 using System.Collections.ObjectModel;
  32 using System.Collections.Generic;
  33 using System.Reflection;
  34 using System.Reflection.Emit;
  35
  36 namespace System.Linq.Expressions {
  37
  38         public class LambdaExpression : Expression {
  39
  40                 Expression body;
  41                 ReadOnlyCollection<ParameterExpression> parameters;
  42
  43                 public Expression Body {
  44                         get { return body; }
  45                 }
  46
  47                 public ReadOnlyCollection<ParameterExpression> Parameters {
  48                         get { return parameters; }
  49                 }
  50
  51                 static bool CanAssign (Type target, Type source)
  52                 {
  53                         // This catches object and value type mixage, type compatibility is handled later
  54                         if (target.IsValueType ^ source.IsValueType)
  55                                 return false;
  56
  57                         return source.IsAssignableTo (target);
  58                 }
  59
  60                 internal LambdaExpression (Type delegateType, Expression body, ReadOnlyCollection<ParameterExpression> parameters)
  61                         : base (ExpressionType.Lambda, delegateType)
  62                 {
  63                         if (!delegateType.IsSubclassOf (typeof (System.Delegate)))
  64                                 throw new ArgumentException ("delegateType");
  65
  66                         var invoke = delegateType.GetMethod ("Invoke", BindingFlags.Instance | BindingFlags.Public);
  67                         if (invoke == null)
  68                                 throw new ArgumentException ("delegate must contain an Invoke method", "delegateType");
  69
  70                         var invoke_parameters = invoke.GetParameters ();
  71                         if (invoke_parameters.Length != parameters.Count)
  72                                 throw new ArgumentException (string.Format ("Different number of arguments in delegate {0}", delegateType), "delegateType");
  73
  74                         for (int i = 0; i < invoke_parameters.Length; i++){
  75                                 if (!CanAssign (parameters [i].Type, invoke_parameters [i].ParameterType))
  76                                         throw new ArgumentException (String.Format ("Can not assign a {0} to a {1}", invoke_parameters [i].ParameterType, parameters [i].Type));
  77                         }
  78
  79                         if (invoke.ReturnType != typeof (void) && !CanAssign (invoke.ReturnType, body.Type))
  80                                 throw new ArgumentException (String.Format ("body type {0} can not be assigned to {1}", body.Type, invoke.ReturnType));
  81
  82                         this.body = body;
  83                         this.parameters = parameters;
  84                 }
  85
  86                 void EmitPopIfNeeded (EmitContext ec)
  87                 {
  88                         if (GetReturnType () == typeof (void) && body.Type != typeof (void))
  89                                 ec.ig.Emit (OpCodes.Pop);
  90                 }
  91
  92                 internal override void Emit (EmitContext ec)
  93                 {
  94                         body.Emit (ec);
  95                         EmitPopIfNeeded (ec);
  96                         ec.ig.Emit (OpCodes.Ret);
  97                 }
  98
  99                 internal Type GetReturnType ()
 100                 {
 101                         return this.Type.GetMethod ("Invoke").ReturnType;
 102                 }
 103
 104                 public Delegate Compile ()
 105                 {
 106 #if TARGET_JVM
 107                         System.Linq.jvm.Interpreter inter =
 108                                 new System.Linq.jvm.Interpreter (this);
 109                         inter.Validate ();
 110                         return inter.CreateDelegate ();
 111 #else
 112                         var context = EmitContext.Create (this);
 113                         return context.CreateDelegate ();
 114 #endif
 115                 }
 116         }
 117 }