PageRenderTime 46ms CodeModel.GetById 19ms RepoModel.GetById 0ms app.codeStats 0ms

/Dependencies/boo/src/Boo.Lang/Runtime/PropertyDispatcherFactory.cs

https://github.com/w4x/boolangstudio
C# | 111 lines | 74 code | 12 blank | 25 comment | 16 complexity | 5e2e82be2ea5cff41ba20c20bdc7edbb MD5 | raw file
Possible License(s): GPL-2.0
  1. #region license
  2. // Copyright (c) 2003, 2004, 2005 Rodrigo B. de Oliveira (rbo@acm.org)
  3. // All rights reserved.
  4. //
  5. // Redistribution and use in source and binary forms, with or without modification,
  6. // are permitted provided that the following conditions are met:
  7. //
  8. // * Redistributions of source code must retain the above copyright notice,
  9. // this list of conditions and the following disclaimer.
  10. // * Redistributions in binary form must reproduce the above copyright notice,
  11. // this list of conditions and the following disclaimer in the documentation
  12. // and/or other materials provided with the distribution.
  13. // * Neither the name of Rodrigo B. de Oliveira nor the names of its
  14. // contributors may be used to endorse or promote products derived from this
  15. // software without specific prior written permission.
  16. //
  17. // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
  18. // ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  19. // WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  20. // DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
  21. // FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22. // DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
  23. // SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
  24. // CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
  25. // OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26. // THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27. #endregion
  28. using System;
  29. using System.Collections.Generic;
  30. using System.Reflection;
  31. namespace Boo.Lang.Runtime
  32. {
  33. public class PropertyDispatcherFactory : AbstractDispatcherFactory
  34. {
  35. public PropertyDispatcherFactory(ExtensionRegistry extensions, object target, Type type, string name, params object[] arguments) : base(extensions, target, type, name, arguments)
  36. {
  37. }
  38. public Dispatcher CreateSetter()
  39. {
  40. return Create(SetOrGet.Set);
  41. }
  42. public Dispatcher CreateGetter()
  43. {
  44. return Create(SetOrGet.Get);
  45. }
  46. private Dispatcher Create(SetOrGet gos)
  47. {
  48. MemberInfo[] candidates = _type.GetMember(_name, MemberTypes.Property|MemberTypes.Field, RuntimeServices.DefaultBindingFlags);
  49. if (candidates.Length == 0) return FindExtension(GetCandidateExtensions(gos));
  50. if (candidates.Length > 1) throw new AmbiguousMatchException(Builtins.join(candidates, ", "));
  51. return EmitDispatcherFor(candidates[0], gos);
  52. }
  53. private Dispatcher FindExtension(IEnumerable<MethodInfo> candidates)
  54. {
  55. CandidateMethod found = ResolveExtension(candidates);
  56. if (null != found) return EmitExtensionDispatcher(found);
  57. throw MissingField();
  58. }
  59. private IEnumerable<MethodInfo> GetCandidateExtensions(SetOrGet gos)
  60. {
  61. foreach (PropertyInfo p in GetExtensions<PropertyInfo>(MemberTypes.Property))
  62. {
  63. MethodInfo m = Accessor(p, gos);
  64. if (null == m) continue;
  65. yield return m;
  66. }
  67. }
  68. private static MethodInfo Accessor(PropertyInfo p, SetOrGet gos)
  69. {
  70. return gos == SetOrGet.Get ? p.GetGetMethod(true) : p.GetSetMethod(true);
  71. }
  72. private Dispatcher EmitDispatcherFor(MemberInfo info, SetOrGet gos)
  73. {
  74. switch (info.MemberType)
  75. {
  76. case MemberTypes.Property:
  77. return EmitPropertyDispatcher((PropertyInfo) info, gos);
  78. default:
  79. return EmitFieldDispatcher((FieldInfo) info, gos);
  80. }
  81. }
  82. private Dispatcher EmitFieldDispatcher(FieldInfo field, SetOrGet gos)
  83. {
  84. return SetOrGet.Get == gos
  85. ? new GetFieldEmitter(field).Emit()
  86. : new SetFieldEmitter(field, GetArgumentTypes()[0]).Emit();
  87. }
  88. private Dispatcher EmitPropertyDispatcher(PropertyInfo property, SetOrGet gos)
  89. {
  90. Type[] argumentTypes = GetArgumentTypes();
  91. MethodInfo accessor = Accessor(property, gos);
  92. if (null == accessor) throw MissingField();
  93. CandidateMethod found = ResolveMethod(argumentTypes, new MethodInfo[] { accessor });
  94. if (null == found) throw MissingField();
  95. if (SetOrGet.Get == gos) return new MethodDispatcherEmitter(_type, found, argumentTypes).Emit();
  96. return new SetPropertyEmitter(_type, found, argumentTypes).Emit();
  97. }
  98. }
  99. }