mcs/class/Microsoft.CSharp/Microsoft.CSharp.RuntimeBinder/CSharpSetIndexBinder.cs

   1 //
   2 // CSharpSetIndexBinder.cs
   3 //
   4 // Authors:
   5 //      Marek Safar  <marek.safar@gmail.com>
   6 //
   7 // Copyright (C) 2009 Novell, Inc (http://www.novell.com)
   8 //
   9 // Permission is hereby granted, free of charge, to any person obtaining
  10 // a copy of this software and associated documentation files (the
  11 // "Software"), to deal in the Software without restriction, including
  12 // without limitation the rights to use, copy, modify, merge, publish,
  13 // distribute, sublicense, and/or sell copies of the Software, and to
  14 // permit persons to whom the Software is furnished to do so, subject to
  15 // the following conditions:
  16 //
  17 // The above copyright notice and this permission notice shall be
  18 // included in all copies or substantial portions of the Software.
  19 //
  20 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  21 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  22 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  23 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
  24 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  25 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  26 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  27 //
  28
  29 using System;
  30 using System.Dynamic;
  31 using System.Collections.Generic;
  32 using System.Linq;
  33 using Compiler = Mono.CSharp;
  34
  35 namespace Microsoft.CSharp.RuntimeBinder
  36 {
  37         public class CSharpSetIndexBinder : SetIndexBinder
  38         {
  39                 IList<CSharpArgumentInfo> argumentInfo;
  40                 Type callingContext;
  41
  42                 public CSharpSetIndexBinder (Type callingContext, IEnumerable<CSharpArgumentInfo> argumentInfo)
  43                         : base (CSharpArgumentInfo.CreateCallInfo (argumentInfo, 2))
  44                 {
  45                         this.callingContext = callingContext;
  46                         this.argumentInfo = argumentInfo.ToReadOnly ();
  47                 }
  48
  49                 public IList<CSharpArgumentInfo> ArgumentInfo {
  50                         get {
  51                                 return argumentInfo;
  52                         }
  53                 }
  54
  55                 public Type CallingContext {
  56                         get {
  57                                 return callingContext;
  58                         }
  59                 }
  60
  61                 public override bool Equals (object obj)
  62                 {
  63                         var other = obj as CSharpSetIndexBinder;
  64                         return other != null && other.callingContext == callingContext &&
  65                                 other.argumentInfo.SequenceEqual (argumentInfo);
  66                 }
  67
  68                 public override int GetHashCode ()
  69                 {
  70                         return Extensions.HashCode (
  71                                 callingContext.GetHashCode (),
  72                                 argumentInfo.GetHashCode (),
  73                                 GetType ().GetHashCode ());
  74                 }
  75
  76                 public override DynamicMetaObject FallbackSetIndex (DynamicMetaObject target, DynamicMetaObject[] indexes, DynamicMetaObject value, DynamicMetaObject errorSuggestion)
  77                 {
  78                         if (argumentInfo.Count != indexes.Length + 2) {
  79                                 if (errorSuggestion == null)
  80                                         throw new NotImplementedException ();
  81
  82                                 return errorSuggestion;
  83                         }
  84
  85                         var expr = CSharpBinder.CreateCompilerExpression (argumentInfo [0], target);
  86                         var args = CSharpBinder.CreateCompilerArguments (argumentInfo.Skip (2), indexes);
  87                         expr = new Compiler.ElementAccess (expr, args);
  88
  89                         var source = CSharpBinder.CreateCompilerExpression (argumentInfo[1], value);
  90                         expr = new Compiler.SimpleAssign (expr, source);
  91                         expr = new Compiler.Cast (new Compiler.TypeExpression (typeof (object), Compiler.Location.Null), expr); // TODO: ReturnType replace
  92
  93                         var restrictions = CSharpBinder.CreateRestrictionsOnTarget (target).Merge (
  94                                 CSharpBinder.CreateRestrictionsOnTarget (value)).Merge (
  95                                 CSharpBinder.CreateRestrictionsOnTarget (indexes));
  96
  97                         return CSharpBinder.Bind (target, expr, callingContext, restrictions, errorSuggestion);
  98                 }
  99         }
 100 }