4 // Authors: Marek Safar (marek.safar@gmail.com)
6 // Copyright 2014 Xamarin Inc
8 // Permission is hereby granted, free of charge, to any person obtaining
9 // a copy of this software and associated documentation files (the
10 // "Software"), to deal in the Software without restriction, including
11 // without limitation the rights to use, copy, modify, merge, publish,
12 // distribute, sublicense, and/or sell copies of the Software, and to
13 // permit persons to whom the Software is furnished to do so, subject to
14 // the following conditions:
16 // The above copyright notice and this permission notice shall be
17 // included in all copies or substantial portions of the Software.
19 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
20 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
21 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
22 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
23 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
24 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
25 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
30 using System.Diagnostics;
31 using Microsoft.Scripting.Runtime;
32 using Microsoft.Scripting.Utils;
34 namespace Microsoft.Scripting.Interpreter {
35 internal abstract class MulInstruction : Instruction {
36 private static Instruction _Int16, _Int32, _Int64, _UInt16, _UInt32, _UInt64, _Single, _Double;
38 public override int ConsumedStack { get { return 2; } }
39 public override int ProducedStack { get { return 1; } }
41 private MulInstruction() {
44 internal sealed class MulInt32 : MulInstruction {
45 public override int Run(InterpretedFrame frame) {
46 object l = frame.Data[frame.StackIndex - 2];
47 object r = frame.Data[frame.StackIndex - 1];
48 frame.Data[frame.StackIndex - 2] = ScriptingRuntimeHelpers.Int32ToObject(unchecked((Int32)l * (Int32)r));
54 internal sealed class MulInt16 : MulInstruction {
55 public override int Run(InterpretedFrame frame) {
56 object l = frame.Data[frame.StackIndex - 2];
57 object r = frame.Data[frame.StackIndex - 1];
58 frame.Data[frame.StackIndex - 2] = (Int16)unchecked((Int16)l * (Int16)r);
64 internal sealed class MulInt64 : MulInstruction {
65 public override int Run(InterpretedFrame frame) {
66 object l = frame.Data[frame.StackIndex - 2];
67 object r = frame.Data[frame.StackIndex - 1];
68 frame.Data[frame.StackIndex - 2] = (Int64)unchecked((Int64)l * (Int64)r);
74 internal sealed class MulUInt16 : MulInstruction {
75 public override int Run(InterpretedFrame frame) {
76 object l = frame.Data[frame.StackIndex - 2];
77 object r = frame.Data[frame.StackIndex - 1];
78 frame.Data[frame.StackIndex - 2] = (UInt16)unchecked((UInt16)l * (UInt16)r);
84 internal sealed class MulUInt32 : MulInstruction {
85 public override int Run(InterpretedFrame frame) {
86 object l = frame.Data[frame.StackIndex - 2];
87 object r = frame.Data[frame.StackIndex - 1];
88 frame.Data[frame.StackIndex - 2] = (UInt32)unchecked((UInt32)l * (UInt32)r);
94 internal sealed class MulUInt64 : MulInstruction {
95 public override int Run(InterpretedFrame frame) {
96 object l = frame.Data[frame.StackIndex - 2];
97 object r = frame.Data[frame.StackIndex - 1];
98 frame.Data[frame.StackIndex - 2] = (UInt64)unchecked((UInt64)l * (UInt64)r);
104 internal sealed class MulSingle : MulInstruction {
105 public override int Run(InterpretedFrame frame) {
106 object l = frame.Data[frame.StackIndex - 2];
107 object r = frame.Data[frame.StackIndex - 1];
108 frame.Data[frame.StackIndex - 2] = (Single)((Single)l * (Single)r);
114 internal sealed class MulDouble : MulInstruction {
115 public override int Run(InterpretedFrame frame) {
116 object l = frame.Data[frame.StackIndex - 2];
117 object r = frame.Data[frame.StackIndex - 1];
118 frame.Data[frame.StackIndex - 2] = (Double)l * (Double)r;
124 public static Instruction Create(Type type) {
125 Debug.Assert(!type.IsEnum());
126 switch (type.GetTypeCode()) {
127 case TypeCode.Int16: return _Int16 ?? (_Int16 = new MulInt16());
128 case TypeCode.Int32: return _Int32 ?? (_Int32 = new MulInt32());
129 case TypeCode.Int64: return _Int64 ?? (_Int64 = new MulInt64());
130 case TypeCode.UInt16: return _UInt16 ?? (_UInt16 = new MulUInt16());
131 case TypeCode.UInt32: return _UInt32 ?? (_UInt32 = new MulUInt32());
132 case TypeCode.UInt64: return _UInt64 ?? (_UInt64 = new MulUInt64());
133 case TypeCode.Single: return _Single ?? (_Single = new MulSingle());
134 case TypeCode.Double: return _Double ?? (_Double = new MulDouble());
137 throw Assert.Unreachable;
141 public override string ToString() {
146 internal abstract class MulOvfInstruction : Instruction {
147 private static Instruction _Int16, _Int32, _Int64, _UInt16, _UInt32, _UInt64, _Single, _Double;
149 public override int ConsumedStack { get { return 2; } }
150 public override int ProducedStack { get { return 1; } }
152 private MulOvfInstruction() {
155 internal sealed class MulOvfInt32 : MulOvfInstruction {
156 public override int Run(InterpretedFrame frame) {
157 object l = frame.Data[frame.StackIndex - 2];
158 object r = frame.Data[frame.StackIndex - 1];
159 frame.Data[frame.StackIndex - 2] = ScriptingRuntimeHelpers.Int32ToObject(checked((Int32)l * (Int32)r));
165 internal sealed class MulOvfInt16 : MulOvfInstruction {
166 public override int Run(InterpretedFrame frame) {
167 object l = frame.Data[frame.StackIndex - 2];
168 object r = frame.Data[frame.StackIndex - 1];
169 frame.Data[frame.StackIndex - 2] = checked((Int16)((Int16)l * (Int16)r));
175 internal sealed class MulOvfInt64 : MulOvfInstruction {
176 public override int Run(InterpretedFrame frame) {
177 object l = frame.Data[frame.StackIndex - 2];
178 object r = frame.Data[frame.StackIndex - 1];
179 frame.Data[frame.StackIndex - 2] = checked((Int64)((Int64)l * (Int64)r));
185 internal sealed class MulOvfUInt16 : MulOvfInstruction {
186 public override int Run(InterpretedFrame frame) {
187 object l = frame.Data[frame.StackIndex - 2];
188 object r = frame.Data[frame.StackIndex - 1];
189 frame.Data[frame.StackIndex - 2] = checked((UInt16)((UInt16)l * (UInt16)r));
195 internal sealed class MulOvfUInt32 : MulOvfInstruction {
196 public override int Run(InterpretedFrame frame) {
197 object l = frame.Data[frame.StackIndex - 2];
198 object r = frame.Data[frame.StackIndex - 1];
199 frame.Data[frame.StackIndex - 2] = checked((UInt32)((UInt32)l * (UInt32)r));
205 internal sealed class MulOvfUInt64 : MulOvfInstruction {
206 public override int Run(InterpretedFrame frame) {
207 object l = frame.Data[frame.StackIndex - 2];
208 object r = frame.Data[frame.StackIndex - 1];
209 frame.Data[frame.StackIndex - 2] = checked((UInt64)((UInt64)l * (UInt64)r));
215 internal sealed class MulOvfSingle : MulOvfInstruction {
216 public override int Run(InterpretedFrame frame) {
217 object l = frame.Data[frame.StackIndex - 2];
218 object r = frame.Data[frame.StackIndex - 1];
219 frame.Data[frame.StackIndex - 2] = (Single)((Single)l * (Single)r);
225 internal sealed class MulOvfDouble : MulOvfInstruction {
226 public override int Run(InterpretedFrame frame) {
227 object l = frame.Data[frame.StackIndex - 2];
228 object r = frame.Data[frame.StackIndex - 1];
229 frame.Data[frame.StackIndex - 2] = (Double)l * (Double)r;
235 public static Instruction Create(Type type) {
236 Debug.Assert(!type.IsEnum());
237 switch (type.GetTypeCode()) {
238 case TypeCode.Int16: return _Int16 ?? (_Int16 = new MulOvfInt16());
239 case TypeCode.Int32: return _Int32 ?? (_Int32 = new MulOvfInt32());
240 case TypeCode.Int64: return _Int64 ?? (_Int64 = new MulOvfInt64());
241 case TypeCode.UInt16: return _UInt16 ?? (_UInt16 = new MulOvfUInt16());
242 case TypeCode.UInt32: return _UInt32 ?? (_UInt32 = new MulOvfUInt32());
243 case TypeCode.UInt64: return _UInt64 ?? (_UInt64 = new MulOvfUInt64());
244 case TypeCode.Single: return _Single ?? (_Single = new MulOvfSingle());
245 case TypeCode.Double: return _Double ?? (_Double = new MulOvfDouble());
248 throw Assert.Unreachable;
252 public override string ToString() {