boolangstudio /Dependencies/boo/src/Boo.Lang/Runtime/SliceDispatcherFactory.cs

Language C# Lines 124
MD5 Hash 8cc38daeb9822545ffe2251fb318681f Estimated Cost $1,955 (why?)
Repository https://github.com/w4x/boolangstudio.git View Raw File View Project SPDX
  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
#region license
// Copyright (c) 2003, 2004, 2005 Rodrigo B. de Oliveira (rbo@acm.org)
// All rights reserved.
// 
// Redistribution and use in source and binary forms, with or without modification,
// are permitted provided that the following conditions are met:
// 
//     * Redistributions of source code must retain the above copyright notice,
//     this list of conditions and the following disclaimer.
//     * Redistributions in binary form must reproduce the above copyright notice,
//     this list of conditions and the following disclaimer in the documentation
//     and/or other materials provided with the distribution.
//     * Neither the name of Rodrigo B. de Oliveira nor the names of its
//     contributors may be used to endorse or promote products derived from this
//     software without specific prior written permission.
// 
// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
// ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
// WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
// DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
// FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
// DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
// SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
// CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
// OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
// THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
#endregion


using System;
using System.Reflection;

namespace Boo.Lang.Runtime
{
	class SliceDispatcherFactory : AbstractDispatcherFactory
	{
		public SliceDispatcherFactory(ExtensionRegistry extensions, object target, Type type, string name, params object[] arguments) : base(extensions, target, type, name == "" ? RuntimeServices.GetDefaultMemberName(type) : name, arguments)
		{
		}

		public Dispatcher CreateGetter()
		{
			MemberInfo member = ResolveMember();
			switch (member.MemberType)
			{
				case MemberTypes.Field:
				{	
					FieldInfo field = (FieldInfo)member;
					return
						delegate(object o, object[] arguments) { return RuntimeServices.GetSlice(field.GetValue(o), "", arguments); };
				}
				case MemberTypes.Property:
				{
					MethodInfo getter = ((PropertyInfo) member).GetGetMethod(true);
					if (null == getter) throw MissingField();

					if (getter.GetParameters().Length > 0) return EmitMethodDispatcher(getter);

					// TODO: remove the reflection invocation getter.Invoke from the path

					// otherwise its a simple property and the slice
					// should be applied to the return value
					return
						delegate(object o, object[] arguments) { return RuntimeServices.GetSlice(getter.Invoke(o, null), "", arguments); };
				}
				default:
				{
					throw MissingField();
				}
			}
		}

		private Dispatcher EmitMethodDispatcher(MethodInfo candidate)
		{
			CandidateMethod method = ResolveMethod(GetArgumentTypes(), new MethodInfo[] { candidate });
			if (null == method) throw MissingField();

			return new MethodDispatcherEmitter(_type, method, GetArgumentTypes()).Emit();
		}

		private MemberInfo ResolveMember()
		{
			MemberInfo[] candidates = _type.GetMember(_name, MemberTypes.Property | MemberTypes.Field, RuntimeServices.DefaultBindingFlags);
			if (candidates.Length == 0) throw MissingField();
			if (candidates.Length > 1) throw new AmbiguousMatchException(Builtins.join(candidates, ", "));

			return candidates[0];
		}

		public Dispatcher CreateSetter()
		{
			MemberInfo member = ResolveMember();
			switch (member.MemberType)
			{
				case MemberTypes.Field:
				{
					FieldInfo field = (FieldInfo)member;
					return
						delegate(object o, object[] arguments) { return RuntimeServices.SetSlice(field.GetValue(o), "", arguments); };
				}
				case MemberTypes.Property:
				{
					PropertyInfo property = (PropertyInfo)member;
					if (property.GetIndexParameters().Length > 0)
					{
						MethodInfo setter = property.GetSetMethod(true);
						if (null == setter) throw MissingField();
						return EmitMethodDispatcher(setter);
					}

					return delegate(object o, object[] arguments)
			       	{
			       		return RuntimeServices.SetSlice(RuntimeServices.GetProperty(o, _name), "", arguments);
			       	};
				}
				default:
				{
					throw MissingField();
				}
			}
		}
	}
}
Back to Top