3 using System.Reflection;
4 using System.Runtime.InteropServices;
5 using System.Runtime.CompilerServices;
8 * Regression tests for the mono JIT.
10 * Each test needs to be of the form:
12 * static int test_<result>_<name> ();
14 * where <result> is an integer (the value that needs to be returned by
15 * the method to make it pass.
16 * <name> is a user-displayed name used to identify the test.
18 * The tests can be driven in two ways:
19 * *) running the program directly: Main() uses reflection to find and invoke
20 * the test methods (this is useful mostly to check that the tests are correct)
21 * *) with the --regression switch of the jit (this is the preferred way since
22 * all the tests will be run with optimizations on and off)
24 * The reflection logic could be moved to a .dll since we need at least another
25 * regression test file written in IL code to have better control on how
59 public void populate ()
69 return one == 1 && two == 2 &&
70 three == 3 && four == 4 &&
71 five == 5 && six == 6 &&
72 seven == 7 && eight == 8 &&
73 nine == 9 && ten == 10;
79 public Sample (int v) {
84 [StructLayout ( LayoutKind.Explicit )]
85 struct StructWithBigOffsets {
86 [ FieldOffset(10000) ] public byte b;
87 [ FieldOffset(10001) ] public sbyte sb;
88 [ FieldOffset(11000) ] public short s;
89 [ FieldOffset(11002) ] public ushort us;
90 [ FieldOffset(12000) ] public uint i;
91 [ FieldOffset(12004) ] public int si;
92 [ FieldOffset(13000) ] public long l;
93 [ FieldOffset(14000) ] public float f;
94 [ FieldOffset(15000) ] public double d;
106 return TestDriver.RunTests (typeof (Tests));
109 static int test_0_return () {
113 s.c = (short)(s.a + s.b);
118 static int test_0_string_access () {
125 static int test_0_string_virtual_call () {
127 string s2 = s.ToString ();
133 static int test_0_iface_call () {
135 object o = ((ICloneable)s).Clone ();
139 static int test_5_newobj () {
140 Sample s = new Sample (5);
144 static int test_4_box () {
149 static int test_0_enum_unbox () {
150 SampleEnum x = SampleEnum.A;
160 static Simple get_simple (int v) {
161 Simple r = new Simple ();
164 r.c = (short)(v + 2);
170 static int test_3_return_struct () {
171 Simple v = get_simple (1);
184 public virtual Simple v_get_simple (int v)
186 return get_simple (v);
189 static int test_2_return_struct_virtual () {
190 Tests t = new Tests ();
191 Simple v = t.v_get_simple (2);
204 static int receive_simple (int a, Simple v, int b) {
220 static int test_5_pass_struct () {
221 Simple v = get_simple (1);
222 if (receive_simple (7, v, 9) != 0)
224 if (receive_simple (7, get_simple (1), 9) != 0)
229 // Test alignment of small structs
231 static Small get_small (byte v) {
232 Small r = new Small ();
235 r.b2 = (byte)(v + 1);
240 static Small return_small (Small s) {
244 static int receive_small (int a, Small v, int b) {
252 static int receive_small_sparc_many_args (int a, int a2, int a3, int a4, int a5, int a6, Small v, int b) {
260 static int test_5_pass_small_struct () {
261 Small v = get_small (1);
262 if (receive_small (7, v, 9) != 0)
264 if (receive_small (7, get_small (1), 9) != 0)
266 if (receive_small_sparc_many_args (1, 2, 3, 4, 5, 6, v, 9) != 0)
268 v = return_small (v);
276 // 64-bits, 32-bit aligned
282 static int check_struct1(struct1 x) {
290 static int pass_struct1(int a, int b, struct1 x) {
295 return check_struct1(x);
298 static int pass_struct1(int a, struct1 x) {
301 return check_struct1(x);
304 static int pass_struct1(struct1 x) {
305 return check_struct1(x);
308 static int test_0_struct1_args () {
314 if ((r = check_struct1(x)) != 0)
316 if ((r = pass_struct1(x)) != 0)
318 if ((r = pass_struct1(3, x)) != 0)
320 if ((r = pass_struct1(3, 4, x)) != 0)
325 // 64-bits, 64-bit aligned
330 static int check_struct2(struct2 x) {
336 static int pass_struct2(int a, int b, int c, struct2 x) {
343 return check_struct2(x);
346 static int pass_struct2(int a, int b, struct2 x) {
351 return check_struct2(x);
354 static int pass_struct2(int a, struct2 x) {
357 return check_struct2(x);
360 static int pass_struct2(struct2 x) {
361 return check_struct2(x);
364 static int test_0_struct2_args () {
369 if ((r = check_struct2(x)) != 0)
371 if ((r = pass_struct2(x)) != 0)
373 if ((r = pass_struct2(3, x)) != 0)
375 if ((r = pass_struct2(3, 4, x)) != 0)
377 if ((r = pass_struct2(3, 4, 5, x)) != 0)
385 public AStruct (int i) {
389 public override int GetHashCode () {
394 // Test that vtypes are unboxed during a virtual call
395 static int test_44_unbox_trampoline () {
396 AStruct s = new AStruct (44);
398 return o.GetHashCode ();
401 static int test_0_unbox_trampoline2 () {
405 if (i.ToString () != "12")
407 if (((Int32)o).ToString () != "12")
409 if (o.ToString () != "12")
414 // Test fields with big offsets
415 static int test_0_fields_with_big_offsets () {
416 StructWithBigOffsets s = new StructWithBigOffsets ();
417 StructWithBigOffsets s2 = new StructWithBigOffsets ();
443 if (s2.i != 0xdeadbeef)
445 if (s2.l != 0xcafebabe)
464 int buf_length, buf_offset;
472 public long Seek (long position) {
474 /* interaction between the register allocator and
475 * allocating arguments to registers */
476 if (pos >= buf_start && pos <= buf_start + buf_length) {
477 buf_offset = (int) (pos - buf_start);
485 static int test_0_seektest () {
486 TestRegA t = new TestRegA ();
487 return (int)t.Seek (0);
490 class Super : ICloneable {
491 public virtual object Clone () {
498 static int test_0_null_cast () {
506 static int test_0_super_cast () {
507 Duper d = new Duper ();
521 d = (Duper)(object)sup;
528 static int test_0_super_cast_array () {
529 Duper[] d = new Duper [0];
540 if (!(d is Object[]))
543 d = (Duper[])(object[])sup;
550 static int test_0_multi_array_cast () {
551 Duper[,] d = new Duper [1, 1];
555 o [0, 0] = new Super ();
558 catch (ArrayTypeMismatchException) {
564 static int test_0_vector_array_cast () {
565 Array arr1 = Array.CreateInstance (typeof (int), new int[] {1}, new int[] {0});
566 Array arr2 = Array.CreateInstance (typeof (int), new int[] {1}, new int[] {10});
568 if (arr1.GetType () != typeof (int[]))
571 if (arr2.GetType () == typeof (int[]))
582 catch (InvalidCastException) {
591 static int test_0_enum_array_cast () {
592 TypeCode[] tc = new TypeCode [0];
601 if (a is ValueType[])
615 vta = (ValueType[])a;
632 static int test_0_more_cast_corner_cases () {
633 ValueType[] vta = new ValueType [0];
634 Enum[] ea = new Enum [0];
639 if (!(a is object[]))
641 if (!(a is ValueType[]))
646 if (!(a is object[]))
648 if (!(a is ValueType[]))
710 static int test_0_cast_iface_array () {
711 object o = new ICloneable [0];
712 object o2 = new Duper [0];
716 if (!(o is object[]))
718 if (!(o2 is ICloneable[]))
732 t = (ICloneable[])o2;
748 if (!(o is ICloneable[]))
751 /* add tests for interfaces that 'inherit' interfaces */
755 private static int[] daysmonthleap = { 0, 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
757 private static int AbsoluteDays (int year, int month, int day)
760 int[] days = daysmonthleap;
763 return ((day-1) + temp + (365* (year-1)) + ((year-1)/4) - ((year-1)/100) + ((year-1)/400));
766 static int test_719162_complex_div () {
767 int adays = AbsoluteDays (1970, 1, 1);
771 delegate int GetIntDel ();
773 static int return4 () {
781 static int test_2_static_delegate () {
782 GetIntDel del = new GetIntDel (return4);
789 static int test_2_instance_delegate () {
790 Tests t = new Tests ();
791 GetIntDel del = new GetIntDel (t.return5);
798 static int test_1_store_decimal () {
799 decimal[,] a = {{1}};
806 static int test_2_intptr_stobj () {
807 System.IntPtr [] arr = { new System.IntPtr () };
809 if (arr [0] != (System.IntPtr)0)
814 static int llmult (int a, int b, int c, int d) {
815 return a + b + c + d;
819 * Test that evaluation of complex arguments does not overwrite the
820 * arguments already in outgoing registers.
822 static int test_155_regalloc () {
828 int[] arr = new int [5];
830 return llmult (arr [c + d], 150, 5, 0);
833 static bool large_struct_test (Large a, Large b, Large c, Large d)
835 if (!a.check ()) return false;
836 if (!b.check ()) return false;
837 if (!c.check ()) return false;
838 if (!d.check ()) return false;
842 static int test_2_large_struct_pass ()
853 if (large_struct_test (a, b, c, d))
858 public static unsafe int test_0_pin_string () {
860 fixed (char *c = x) {
867 public static int my_flags;
868 public static int test_0_and_cmp_static ()
871 /* various forms of test [mem], imm */
873 my_flags = 0x01020304;
875 if ((my_flags & 0x01020304) == 0)
878 if ((my_flags & 0x00000304) == 0)
881 if ((my_flags & 0x00000004) == 0)
884 if ((my_flags & 0x00000300) == 0)
887 if ((my_flags & 0x00020000) == 0)
890 if ((my_flags & 0x01000000) == 0)
897 public static int test_0_byte_compares ()
903 if (!(b < System.Byte.MaxValue))
906 if (!(b <= System.Byte.MaxValue))
912 public static int test_71_long_shift_right () {
913 ulong value = 38654838087;
915 byte [] buffer = new byte [1];
916 buffer [x] = ((byte)(value >> x));
921 public static int test_0_addsub_mem ()
938 public static int test_0_sh32_mem ()
940 y = 0x0102130405060708;
946 y = 0x0102130405060708;
949 if (y != 0x0506070800000000)
952 x = 0x0102130405060708;
955 if (x != 0x0506070800000000)
962 static uint dum_de_dum = 1;
963 static int test_0_long_arg_opt ()
965 return Foo (0x1234567887654321, dum_de_dum);
968 static int Foo (ulong x, ulong y)
970 if (x != 0x1234567887654321)
979 static int test_0_long_ret_opt ()
982 if (x != 0x1234567887654321)
993 return 0x1234567887654321;
1001 /* from bug# 71515 */
1002 static int counter = 0;
1003 static bool WriteStuff () {
1007 static int test_0_cond_branch_side_effects () {
1016 public static int arg_only_written (string file_name, int[]
1018 if (file_name == null)
1027 public static int[] foo () {
1031 public static void bar (int i) {
1035 public static int test_0_arg_only_written ()
1037 return arg_only_written ("md.in", null);
1040 static long position = 0;
1042 public static int test_4_static_inc_long () {
1050 return (int)position;
1055 public FooStruct (long l) {
1059 static int test_0_calls_opcode_emulation () {
1060 // Test that emulated opcodes do not clobber arguments already in
1064 new FooStruct (val * 10000);
1069 static int test_0_intrins_string_length () {
1072 return (s.Length == 3) ? 0 : 1;
1075 static int test_0_intrins_string_chars () {
1078 return (s [0] == 'A' && s [1] == 'B' && s [2] == 'C') ? 0 : 1;
1081 static int test_0_intrins_object_gettype () {
1084 return (o.GetType () == typeof (int)) ? 0 : 1;
1087 static int test_0_intrins_object_gethashcode () {
1088 object o = new Object ();
1090 return (o.GetHashCode () == o.GetHashCode ()) ? 0 : 1;
1096 static int test_0_intrins_object_ctor () {
1097 object o = new FooClass ();
1099 return (o != null) ? 0 : 1;
1102 static int test_0_intrins_array_rank () {
1103 int[,] a = new int [10, 10];
1105 return (a.Rank == 2) ? 0 : 1;
1108 static int test_0_intrins_array_length () {
1109 int[,] a = new int [10, 10];
1112 return (a2.Length == 100) ? 0 : 1;
1115 static int test_0_intrins_runtimehelpers_offset_to_string_data () {
1116 int i = RuntimeHelpers.OffsetToStringData;
1121 static int test_0_intrins_string_setchar () {
1122 StringBuilder sb = new StringBuilder ("ABC");
1126 return sb.ToString () == "ADC" ? 0 : 1;
1130 bool allowLocation = true;
1134 static int test_0_regress_78990_unaligned_structs () {
1140 static unsafe int test_97_negative_index () {
1141 char[] arr = new char[] {'a', 'b'};
1142 fixed (char *p = arr) {
1150 static int test_0_unsigned_right_shift_imm0 () {
1152 byte[] data = new byte[256];
1153 for (int i = 0; i < 1; i ++)
1154 temp = (uint)(data[temp >> 24] | data[temp >> 0]);
1159 public virtual int foo () {
1164 sealed class Bar2 : Foo2 {
1165 public override int foo () {
1170 static int test_0_abcrem_check_this_removal () {
1171 Bar2 b = new Bar2 ();
1173 // The check_this generated here by the JIT should be removed
1179 static int invoke_twice (Bar2 b) {
1181 // The check_this generated here by the JIT should be removed
1187 static int test_0_abcrem_check_this_removal2 () {
1188 Bar2 b = new Bar2 ();
1196 static int test_0_array_access_64_bit () {
1197 int[] arr2 = new int [10];
1198 for (int i = 0; i < 10; ++i)
1200 string s = "ABCDEFGH";
1202 byte[] arr = new byte [4];
1208 int len = arr [0] | (arr [1] << 8) | (arr [2] << 16) | (arr [3] << 24);
1209 int len2 = - (len + 2);
1211 // Test array and string access with a 32 bit value whose upper 32 bits are
1214 if (arr2 [len2] != 2)
1216 if (s [len2] != 'C')