[interp] Fix resuming from finally block (#8195)
[mono-project.git] / mono / mini / objects.cs
blobeb27e98e178879371362129adab1d7daeebbe709
1 using System;
2 using System.Text;
3 using System.Reflection;
4 using System.Collections.Generic;
5 using System.Runtime.InteropServices;
6 using System.Runtime.CompilerServices;
8 /*
9 * Regression tests for the mono JIT.
11 * Each test needs to be of the form:
13 * static int test_<result>_<name> ();
15 * where <result> is an integer (the value that needs to be returned by
16 * the method to make it pass.
17 * <name> is a user-displayed name used to identify the test.
19 * The tests can be driven in two ways:
20 * *) running the program directly: Main() uses reflection to find and invoke
21 * the test methods (this is useful mostly to check that the tests are correct)
22 * *) with the --regression switch of the jit (this is the preferred way since
23 * all the tests will be run with optimizations on and off)
25 * The reflection logic could be moved to a .dll since we need at least another
26 * regression test file written in IL code to have better control on how
27 * the IL code looks.
30 #if __MOBILE__
31 namespace ObjectTests
33 #endif
35 struct Simple {
36 public int a;
37 public byte b;
38 public short c;
39 public long d;
42 struct Small {
43 public byte b1;
44 public byte b2;
47 // Size=2, Align=1
48 struct Foo {
49 bool b1;
50 bool b2;
53 struct Large {
54 int one;
55 int two;
56 long three;
57 long four;
58 int five;
59 long six;
60 int seven;
61 long eight;
62 long nine;
63 long ten;
65 public void populate ()
67 one = 1; two = 2;
68 three = 3; four = 4;
69 five = 5; six = 6;
70 seven = 7; eight = 8;
71 nine = 9; ten = 10;
73 public bool check ()
75 return one == 1 && two == 2 &&
76 three == 3 && four == 4 &&
77 five == 5 && six == 6 &&
78 seven == 7 && eight == 8 &&
79 nine == 9 && ten == 10;
83 class Sample {
84 public int a;
85 public Sample (int v) {
86 a = v;
90 [StructLayout ( LayoutKind.Explicit )]
91 struct StructWithBigOffsets {
92 [ FieldOffset(10000) ] public byte b;
93 [ FieldOffset(10001) ] public sbyte sb;
94 [ FieldOffset(11000) ] public short s;
95 [ FieldOffset(11002) ] public ushort us;
96 [ FieldOffset(12000) ] public uint i;
97 [ FieldOffset(12004) ] public int si;
98 [ FieldOffset(13000) ] public long l;
99 [ FieldOffset(14000) ] public float f;
100 [ FieldOffset(15000) ] public double d;
103 enum SampleEnum {
109 struct Alpha {
110 public long a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v;
113 struct Beta {
114 public Alpha a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v;
117 struct Gamma {
118 public Beta a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v;
121 class Tests {
123 #if !__MOBILE__
124 public static int Main (string[] args) {
125 return TestDriver.RunTests (typeof (Tests), args);
127 #endif
129 public static int test_0_return () {
130 Simple s;
131 s.a = 1;
132 s.b = 2;
133 s.c = (short)(s.a + s.b);
134 s.d = 4;
135 return s.a - 1;
138 public static int test_0_string_access () {
139 string s = "Hello";
140 if (s [1] != 'e')
141 return 1;
142 return 0;
145 public static int test_0_string_virtual_call () {
146 string s = "Hello";
147 string s2 = s.ToString ();
148 if (s2 [1] != 'e')
149 return 1;
150 return 0;
153 public static int test_0_iface_call () {
154 string s = "Hello";
155 object o = ((ICloneable)s).Clone ();
156 return 0;
159 public static int test_5_newobj () {
160 Sample s = new Sample (5);
161 return s.a;
164 public static int test_4_box () {
165 object obj = 4;
166 return (int)obj;
169 public static int test_0_enum_unbox () {
170 SampleEnum x = SampleEnum.A;
171 object o = x;
173 int res = 1;
175 res = (int)o;
177 return res;
180 static Simple get_simple (int v) {
181 Simple r = new Simple ();
182 r.a = v;
183 r.b = (byte)(v + 1);
184 r.c = (short)(v + 2);
185 r.d = v + 3;
187 return r;
190 public static int test_3_return_struct () {
191 Simple v = get_simple (1);
193 if (v.a != 1)
194 return 0;
195 if (v.b != 2)
196 return 0;
197 if (v.c != 3)
198 return 0;
199 if (v.d != 4)
200 return 0;
201 return 3;
204 public virtual Simple v_get_simple (int v)
206 return get_simple (v);
209 public static int test_2_return_struct_virtual () {
210 Tests t = new Tests ();
211 Simple v = t.v_get_simple (2);
213 if (v.a != 2)
214 return 0;
215 if (v.b != 3)
216 return 0;
217 if (v.c != 4)
218 return 0;
219 if (v.d != 5)
220 return 0;
221 return 2;
224 static int receive_simple (int a, Simple v, int b) {
225 if (v.a != 1)
226 return 1;
227 if (v.b != 2)
228 return 2;
229 if (v.c != 3)
230 return 3;
231 if (v.d != 4)
232 return 4;
233 if (a != 7)
234 return 5;
235 if (b != 9)
236 return 6;
237 return 0;
240 public static int test_5_pass_struct () {
241 Simple v = get_simple (1);
242 if (receive_simple (7, v, 9) != 0)
243 return 0;
244 if (receive_simple (7, get_simple (1), 9) != 0)
245 return 1;
246 return 5;
249 static Simple s_v;
250 public static int test_5_pass_static_struct () {
251 s_v = get_simple (1);
252 if (receive_simple (7, s_v, 9) != 0)
253 return 0;
254 return 5;
257 // Test alignment of small structs
259 static Small get_small (byte v) {
260 Small r = new Small ();
262 r.b1 = v;
263 r.b2 = (byte)(v + 1);
265 return r;
268 static Small return_small (Small s) {
269 return s;
272 static int receive_small (int a, Small v, int b) {
273 if (v.b1 != 1)
274 return 1;
275 if (v.b2 != 2)
276 return 2;
277 return 0;
280 static int receive_small_sparc_many_args (int a, int a2, int a3, int a4, int a5, int a6, Small v, int b) {
281 if (v.b1 != 1)
282 return 1;
283 if (v.b2 != 2)
284 return 2;
285 return 0;
288 public static int test_5_pass_small_struct () {
289 Small v = get_small (1);
290 if (receive_small (7, v, 9) != 0)
291 return 0;
292 if (receive_small (7, get_small (1), 9) != 0)
293 return 1;
294 if (receive_small_sparc_many_args (1, 2, 3, 4, 5, 6, v, 9) != 0)
295 return 2;
296 v = return_small (v);
297 if (v.b1 != 1)
298 return 3;
299 if (v.b2 != 2)
300 return 4;
301 return 5;
304 // 64-bits, 32-bit aligned
305 struct struct1 {
306 public int a;
307 public int b;
310 static int check_struct1(struct1 x) {
311 if (x.a != 1)
312 return 1;
313 if (x.b != 2)
314 return 2;
315 return 0;
318 static int pass_struct1(int a, int b, struct1 x) {
319 if (a != 3)
320 return 3;
321 if (b != 4)
322 return 4;
323 return check_struct1(x);
326 static int pass_struct1(int a, struct1 x) {
327 if (a != 3)
328 return 3;
329 return check_struct1(x);
332 static int pass_struct1(struct1 x) {
333 return check_struct1(x);
336 public static int test_0_struct1_args () {
337 int r;
338 struct1 x;
340 x.a = 1;
341 x.b = 2;
342 if ((r = check_struct1(x)) != 0)
343 return r;
344 if ((r = pass_struct1(x)) != 0)
345 return r + 10;
346 if ((r = pass_struct1(3, x)) != 0)
347 return r + 20;
348 if ((r = pass_struct1(3, 4, x)) != 0)
349 return r + 30;
350 return 0;
353 // 64-bits, 64-bit aligned
354 struct struct2 {
355 public long a;
358 static int check_struct2(struct2 x) {
359 if (x.a != 1)
360 return 1;
361 return 0;
364 static int pass_struct2(int a, int b, int c, struct2 x) {
365 if (a != 3)
366 return 3;
367 if (b != 4)
368 return 4;
369 if (c != 5)
370 return 5;
371 return check_struct2(x);
374 static int pass_struct2(int a, int b, struct2 x) {
375 if (a != 3)
376 return 3;
377 if (b != 4)
378 return 4;
379 return check_struct2(x);
382 static int pass_struct2(int a, struct2 x) {
383 if (a != 3)
384 return 3;
385 return check_struct2(x);
388 static int pass_struct2(struct2 x) {
389 return check_struct2(x);
392 public static int test_0_struct2_args () {
393 int r;
394 struct2 x;
396 x.a = 1;
397 if ((r = check_struct2(x)) != 0)
398 return r;
399 if ((r = pass_struct2(x)) != 0)
400 return r + 10;
401 if ((r = pass_struct2(3, x)) != 0)
402 return r + 20;
403 if ((r = pass_struct2(3, 4, x)) != 0)
404 return r + 30;
405 if ((r = pass_struct2(3, 4, 5, x)) != 0)
406 return r + 40;
407 return 0;
410 // 128 bits
411 struct Struct3 {
412 public long i, j, k, l;
415 static int pass_struct3 (int i, int j, int k, int l, int m, int n, int o, int p, Struct3 s, int q) {
416 if (s.i + s.j + s.k + s.l != 10)
417 return 1;
418 else
419 return 0;
422 public static int test_0_struct3_args () {
423 Struct3 s = new Struct3 ();
424 s.i = 1;
425 s.j = 2;
426 s.k = 3;
427 s.l = 4;
429 return pass_struct3 (1, 2, 3, 4, 5, 6, 7, 8, s, 9);
432 // Struct with unaligned size on 64 bit machines
433 struct Struct4 {
434 public int i, j, k, l, m;
435 public int i1, i2, i3, i4, i5, i6;
438 static int pass_struct4 (Struct4 s) {
439 if (s.i + s.j + s.k + s.l + s.m != 15)
440 return 1;
441 else
442 return 0;
445 public static int test_0_struct4_args () {
446 Struct4 s = new Struct4 ();
447 s.i = 1;
448 s.j = 2;
449 s.k = 3;
450 s.l = 4;
451 s.m = 5;
453 return pass_struct4 (s);
458 struct AStruct {
459 public int i;
461 public AStruct (int i) {
462 this.i = i;
465 public override int GetHashCode () {
466 return i;
470 // Test that vtypes are unboxed during a virtual call
471 public static int test_44_unbox_trampoline () {
472 AStruct s = new AStruct (44);
473 object o = s;
474 return o.GetHashCode ();
477 public static int test_0_unbox_trampoline2 () {
478 int i = 12;
479 object o = i;
481 if (i.ToString () != "12")
482 return 1;
483 if (((Int32)o).ToString () != "12")
484 return 2;
485 if (o.ToString () != "12")
486 return 3;
487 return 0;
490 // Test fields with big offsets
491 public static int test_0_fields_with_big_offsets () {
492 StructWithBigOffsets s = new StructWithBigOffsets ();
493 StructWithBigOffsets s2 = new StructWithBigOffsets ();
495 s.b = 0xde;
496 s.sb = 0xe;
497 s.s = 0x12de;
498 s.us = 0x12da;
499 s.i = 0xdeadbeef;
500 s.si = 0xcafe;
501 s.l = 0xcafebabe;
502 s.f = 3.14F;
503 s.d = 3.14;
505 s2.b = s.b;
506 s2.sb = s.sb;
507 s2.s = s.s;
508 s2.us = s.us;
509 s2.i = s.i;
510 s2.si = s.si;
511 s2.l = s.l;
512 s2.f = s.f;
513 s2.d = s.d;
515 if (s2.b != 0xde)
516 return 1;
517 if (s2.s != 0x12de)
518 return 2;
519 if (s2.i != 0xdeadbeef)
520 return 3;
521 if (s2.l != 0xcafebabe)
522 return 4;
523 if (s2.f != 3.14F)
524 return 5;
525 if (s2.d != 3.14)
526 return 6;
527 if (s2.sb != 0xe)
528 return 7;
529 if (s2.us != 0x12da)
530 return 9;
531 if (s2.si != 0xcafe)
532 return 10;
534 return 0;
537 class TestRegA {
539 long buf_start;
540 int buf_length, buf_offset;
542 public TestRegA () {
543 buf_start = 0;
544 buf_length = 0;
545 buf_offset = 0;
548 public long Seek (long position) {
549 long pos = position;
550 /* interaction between the register allocator and
551 * allocating arguments to registers */
552 if (pos >= buf_start && pos <= buf_start + buf_length) {
553 buf_offset = (int) (pos - buf_start);
554 return pos;
556 return buf_start;
561 public static int test_0_seektest () {
562 TestRegA t = new TestRegA ();
563 return (int)t.Seek (0);
566 class Super : ICloneable {
567 public virtual object Clone () {
568 return null;
571 class Duper: Super {
574 public static int test_0_null_cast () {
575 object o = null;
577 Super s = (Super)o;
579 return 0;
582 public static int test_0_super_cast () {
583 Duper d = new Duper ();
584 Super sup = d;
585 Object o = d;
587 if (!(o is Super))
588 return 1;
589 try {
590 d = (Duper)sup;
591 } catch {
592 return 2;
594 if (!(d is Object))
595 return 3;
596 try {
597 d = (Duper)(object)sup;
598 } catch {
599 return 4;
601 return 0;
604 public static int test_0_super_cast_array () {
605 Duper[] d = new Duper [0];
606 Super[] sup = d;
607 Object[] o = d;
609 if (!(o is Super[]))
610 return 1;
611 try {
612 d = (Duper[])sup;
613 } catch {
614 return 2;
616 if (!(d is Object[]))
617 return 3;
618 try {
619 d = (Duper[])(object[])sup;
620 } catch {
621 return 4;
623 return 0;
626 public static int test_0_multi_array_cast () {
627 Duper[,] d = new Duper [1, 1];
628 object[,] o = d;
630 try {
631 o [0, 0] = new Super ();
632 return 1;
634 catch (ArrayTypeMismatchException) {
637 return 0;
640 public static int test_0_vector_array_cast () {
641 Array arr1 = Array.CreateInstance (typeof (int), new int[] {1}, new int[] {0});
642 Array arr2 = Array.CreateInstance (typeof (int), new int[] {1}, new int[] {10});
643 Array arr5 = Array.CreateInstance (typeof (string), new int[] {1}, new int[] {10});
645 if (arr1.GetType () != typeof (int[]))
646 return 1;
648 if (arr2.GetType () == typeof (int[]))
649 return 2;
651 int[] b;
653 b = (int[])arr1;
655 try {
656 b = (int[])arr2;
657 return 3;
659 catch (InvalidCastException) {
662 if (arr2 is int[])
663 return 4;
664 var as_object_arr = arr5 as object [];
665 if (as_object_arr != null)
666 return 5;
668 int [,] [] arr3 = new int [1, 1] [];
669 object o = arr3;
670 int [,] [] arr4 = (int [,] [])o;
672 return 0;
675 public static int test_0_enum_array_cast () {
676 TypeCode[] tc = new TypeCode [0];
677 object[] oa;
678 ValueType[] vta;
679 int[] inta;
680 Array a = tc;
681 bool ok;
683 if (a is object[])
684 return 1;
685 if (a is ValueType[])
686 return 2;
687 if (a is Enum[])
688 return 3;
689 try {
690 ok = false;
691 oa = (object[])a;
692 } catch {
693 ok = true;
695 if (!ok)
696 return 4;
697 try {
698 ok = false;
699 vta = (ValueType[])a;
700 } catch {
701 ok = true;
703 if (!ok)
704 return 5;
705 try {
706 ok = true;
707 inta = (int[])a;
708 } catch {
709 ok = false;
711 if (!ok)
712 return 6;
713 return 0;
716 public static int test_0_more_cast_corner_cases () {
717 ValueType[] vta = new ValueType [0];
718 Enum[] ea = new Enum [0];
719 Array a = vta;
720 object[] oa;
721 bool ok;
723 if (!(a is object[]))
724 return 1;
725 if (!(a is ValueType[]))
726 return 2;
727 if (a is Enum[])
728 return 3;
729 a = ea;
730 if (!(a is object[]))
731 return 4;
732 if (!(a is ValueType[]))
733 return 5;
734 if (!(a is Enum[]))
735 return 6;
737 try {
738 ok = true;
739 oa = (object[])a;
740 } catch {
741 ok = false;
743 if (!ok)
744 return 7;
746 try {
747 ok = true;
748 oa = (Enum[])a;
749 } catch {
750 ok = false;
752 if (!ok)
753 return 8;
755 try {
756 ok = true;
757 oa = (ValueType[])a;
758 } catch {
759 ok = false;
761 if (!ok)
762 return 9;
764 a = vta;
765 try {
766 ok = true;
767 oa = (object[])a;
768 } catch {
769 ok = false;
771 if (!ok)
772 return 10;
774 try {
775 ok = true;
776 oa = (ValueType[])a;
777 } catch {
778 ok = false;
780 if (!ok)
781 return 11;
783 try {
784 ok = false;
785 vta = (Enum[])a;
786 } catch {
787 ok = true;
789 if (!ok)
790 return 12;
792 object arr = new int [10];
793 if (arr is IList<int?>)
794 return 13;
796 return 0;
799 public static int test_0_cast_iface_array () {
800 object o = new ICloneable [0];
801 object o2 = new Duper [0];
802 object t;
803 bool ok;
805 if (!(o is object[]))
806 return 1;
807 if (!(o2 is ICloneable[]))
808 return 2;
810 try {
811 ok = true;
812 t = (object[])o;
813 } catch {
814 ok = false;
816 if (!ok)
817 return 3;
819 try {
820 ok = true;
821 t = (ICloneable[])o2;
822 } catch {
823 ok = false;
825 if (!ok)
826 return 4;
828 try {
829 ok = true;
830 t = (ICloneable[])o;
831 } catch {
832 ok = false;
834 if (!ok)
835 return 5;
837 if (!(o is ICloneable[]))
838 return 6;
840 /* add tests for interfaces that 'inherit' interfaces */
841 return 0;
844 private static int[] daysmonthleap = { 0, 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
846 private static int AbsoluteDays (int year, int month, int day)
848 int temp = 0, m = 1;
849 int[] days = daysmonthleap;
850 while (m < month)
851 temp += days[m++];
852 return ((day-1) + temp + (365* (year-1)) + ((year-1)/4) - ((year-1)/100) + ((year-1)/400));
855 public static int test_719162_complex_div () {
856 int adays = AbsoluteDays (1970, 1, 1);
857 return adays;
860 delegate int GetIntDel ();
862 static int return4 () {
863 return 4;
866 int return5 () {
867 return 5;
870 public static int test_2_static_delegate () {
871 GetIntDel del = new GetIntDel (return4);
872 int v = del ();
873 if (v != 4)
874 return 0;
875 return 2;
878 public static int test_2_instance_delegate () {
879 Tests t = new Tests ();
880 GetIntDel del = new GetIntDel (t.return5);
881 int v = del ();
882 if (v != 5)
883 return 0;
884 return 2;
887 class InstanceDelegateTest {
888 public int a;
890 public int return_field () {
891 return a;
895 public static int test_2_instance_delegate_with_field () {
896 InstanceDelegateTest t = new InstanceDelegateTest () { a = 1337 };
897 GetIntDel del = new GetIntDel (t.return_field);
898 int v = del ();
899 if (v != 1337)
900 return 0;
901 return 2;
904 interface IFaceVirtualDel {
905 int return_field ();
908 struct VtypeVirtualDelStruct : IFaceVirtualDel {
909 public int f;
910 public int return_field_nonvirt () {
911 return f;
913 public int return_field () {
914 return f;
918 public static int test_42_vtype_delegate () {
919 var s = new VtypeVirtualDelStruct () { f = 42 };
920 Func<int> f = s.return_field_nonvirt;
921 return f ();
924 public static int test_42_vtype_virtual_delegate () {
925 IFaceVirtualDel s = new VtypeVirtualDelStruct () { f = 42 };
926 Func<int> f = s.return_field;
927 return f ();
930 public static int test_1_store_decimal () {
931 decimal[,] a = {{1}};
933 if (a[0,0] != 1m)
934 return 0;
935 return 1;
938 public static int test_2_intptr_stobj () {
939 System.IntPtr [] arr = { new System.IntPtr () };
941 if (arr [0] != (System.IntPtr)0)
942 return 1;
943 return 2;
946 static int llmult (int a, int b, int c, int d) {
947 return a + b + c + d;
951 * Test that evaluation of complex arguments does not overwrite the
952 * arguments already in outgoing registers.
954 public static int test_155_regalloc () {
955 int a = 10;
956 int b = 10;
958 int c = 0;
959 int d = 0;
960 int[] arr = new int [5];
962 return llmult (arr [c + d], 150, 5, 0);
965 static bool large_struct_test (Large a, Large b, Large c, Large d)
967 if (!a.check ()) return false;
968 if (!b.check ()) return false;
969 if (!c.check ()) return false;
970 if (!d.check ()) return false;
971 return true;
974 public static int test_2_large_struct_pass ()
976 Large a, b, c, d;
977 a = new Large ();
978 b = new Large ();
979 c = new Large ();
980 d = new Large ();
981 a.populate ();
982 b.populate ();
983 c.populate ();
984 d.populate ();
985 if (large_struct_test (a, b, c, d))
986 return 2;
987 return 0;
990 public static unsafe int test_0_pin_string () {
991 string x = "xxx";
992 fixed (char *c = x) {
993 if (*c != 'x')
994 return 1;
996 return 0;
999 public static int my_flags;
1000 public static int test_0_and_cmp_static ()
1003 /* various forms of test [mem], imm */
1005 my_flags = 0x01020304;
1007 if ((my_flags & 0x01020304) == 0)
1008 return 1;
1010 if ((my_flags & 0x00000304) == 0)
1011 return 2;
1013 if ((my_flags & 0x00000004) == 0)
1014 return 3;
1016 if ((my_flags & 0x00000300) == 0)
1017 return 4;
1019 if ((my_flags & 0x00020000) == 0)
1020 return 5;
1022 if ((my_flags & 0x01000000) == 0)
1023 return 6;
1025 return 0;
1028 static byte b;
1029 public static int test_0_byte_compares ()
1031 b = 0xff;
1032 if (b == -1)
1033 return 1;
1034 b = 0;
1035 if (!(b < System.Byte.MaxValue))
1036 return 2;
1038 if (!(b <= System.Byte.MaxValue))
1039 return 3;
1041 return 0;
1044 static Nullable<bool> s_nullb;
1045 static AStruct s_struct1;
1047 /* test if VES uses correct sizes for value type write to static field */
1048 public static int test_0_static_nullable_bool () {
1049 s_struct1 = new AStruct (0x1337dead);
1050 s_nullb = true;
1051 /* make sure that the write to s_nullb didn't smash the value after it */
1052 if (s_struct1.i != 0x1337dead)
1053 return 2;
1054 return 0;
1057 public static int test_71_long_shift_right () {
1058 ulong value = 38654838087;
1059 int x = 0;
1060 byte [] buffer = new byte [1];
1061 buffer [x] = ((byte)(value >> x));
1062 return buffer [x];
1065 static long x;
1066 public static int test_0_addsub_mem ()
1068 x = 0;
1069 x += 5;
1071 if (x != 5)
1072 return 1;
1074 x -= 10;
1076 if (x != -5)
1077 return 2;
1079 return 0;
1082 static ulong y;
1083 public static int test_0_sh32_mem ()
1085 y = 0x0102130405060708;
1086 y >>= 32;
1088 if (y != 0x01021304)
1089 return 1;
1091 y = 0x0102130405060708;
1092 y <<= 32;
1094 if (y != 0x0506070800000000)
1095 return 2;
1097 x = 0x0102130405060708;
1098 x <<= 32;
1100 if (x != 0x0506070800000000)
1101 return 2;
1103 return 0;
1107 static uint dum_de_dum = 1;
1108 public static int test_0_long_arg_opt ()
1110 return Foo (0x1234567887654321, dum_de_dum);
1113 static int Foo (ulong x, ulong y)
1115 if (x != 0x1234567887654321)
1116 return 1;
1118 if (y != 1)
1119 return 2;
1121 return 0;
1124 public static int test_0_long_ret_opt ()
1126 ulong x = X ();
1127 if (x != 0x1234567887654321)
1128 return 1;
1129 ulong y = Y ();
1130 if (y != 1)
1131 return 2;
1133 return 0;
1136 static ulong X ()
1138 return 0x1234567887654321;
1141 static ulong Y ()
1143 return dum_de_dum;
1146 /* from bug# 71515 */
1147 static int counter = 0;
1148 static bool WriteStuff () {
1149 counter = 10;
1150 return true;
1152 public static int test_0_cond_branch_side_effects () {
1153 counter = 5;
1154 if (WriteStuff()) {
1156 if (counter == 10)
1157 return 0;
1158 return 1;
1161 // bug #74992
1162 public static int arg_only_written (string file_name, int[]
1163 ncells ) {
1164 if (file_name == null)
1165 return 1;
1167 ncells = foo ();
1168 bar (ncells [0]);
1170 return 0;
1173 public static int[] foo () {
1174 return new int [3];
1177 public static void bar (int i) {
1181 public static int test_0_arg_only_written ()
1183 return arg_only_written ("md.in", null);
1186 static long position = 0;
1188 public static int test_4_static_inc_long () {
1190 int count = 4;
1192 position = 0;
1194 position += count;
1196 return (int)position;
1199 struct FooStruct {
1201 public FooStruct (long l) {
1205 public static int test_0_calls_opcode_emulation () {
1206 // Test that emulated opcodes do not clobber arguments already in
1207 // out registers
1208 checked {
1209 long val = 10000;
1210 new FooStruct (val * 10000);
1212 return 0;
1215 public static int test_0_intrins_string_length () {
1216 string s = "ABC";
1218 return (s.Length == 3) ? 0 : 1;
1221 public static int test_0_intrins_string_chars () {
1222 string s = "ABC";
1224 return (s [0] == 'A' && s [1] == 'B' && s [2] == 'C') ? 0 : 1;
1227 public static int test_0_intrins_object_gettype () {
1228 object o = 1;
1230 return (o.GetType () == typeof (int)) ? 0 : 1;
1233 public static int test_0_intrins_object_gethashcode () {
1234 object o = new Object ();
1236 return (o.GetHashCode () == o.GetHashCode ()) ? 0 : 1;
1239 class FooClass {
1242 public static int test_0_intrins_object_ctor () {
1243 object o = new FooClass ();
1245 return (o != null) ? 0 : 1;
1248 public static int test_0_intrins_array_rank () {
1249 int[,] a = new int [10, 10];
1251 return (a.Rank == 2) ? 0 : 1;
1254 public static int test_0_intrins_array_length () {
1255 int[,] a = new int [10, 10];
1256 Array a2 = a;
1258 return (a2.Length == 100) ? 0 : 1;
1261 public static int test_0_intrins_runtimehelpers_offset_to_string_data () {
1262 int i = RuntimeHelpers.OffsetToStringData;
1264 return i - i;
1267 public static int test_0_intrins_string_setchar () {
1268 StringBuilder sb = new StringBuilder ("ABC");
1270 sb [1] = 'D';
1272 return sb.ToString () == "ADC" ? 0 : 1;
1275 public class Bar {
1276 bool allowLocation = true;
1277 Foo f = new Foo ();
1280 public static int test_0_regress_78990_unaligned_structs () {
1281 new Bar ();
1283 return 0;
1286 public static unsafe int test_97_negative_index () {
1287 char[] arr = new char[] {'a', 'b'};
1288 fixed (char *p = arr) {
1289 char *i = p + 2;
1290 char a = i[-2];
1291 return a;
1295 /* bug #82281 */
1296 public static int test_0_unsigned_right_shift_imm0 () {
1297 uint temp = 0;
1298 byte[] data = new byte[256];
1299 for (int i = 0; i < 1; i ++)
1300 temp = (uint)(data[temp >> 24] | data[temp >> 0]);
1301 return 0;
1304 class Foo2 {
1305 public virtual int foo () {
1306 return 0;
1310 sealed class Bar2 : Foo2 {
1311 public override int foo () {
1312 return 0;
1316 public static int test_0_abcrem_check_this_removal () {
1317 Bar2 b = new Bar2 ();
1319 // The check_this generated here by the JIT should be removed
1320 b.foo ();
1322 return 0;
1325 static int invoke_twice (Bar2 b) {
1326 b.foo ();
1327 // The check_this generated here by the JIT should be removed
1328 b.foo ();
1330 return 0;
1333 public static int test_0_abcrem_check_this_removal2 () {
1334 Bar2 b = new Bar2 ();
1336 invoke_twice (b);
1338 return 0;
1341 /* #346563 */
1342 public static int test_0_array_access_64_bit () {
1343 int[] arr2 = new int [10];
1344 for (int i = 0; i < 10; ++i)
1345 arr2 [i] = i;
1346 string s = "ABCDEFGH";
1348 byte[] arr = new byte [4];
1349 arr [0] = 252;
1350 arr [1] = 255;
1351 arr [2] = 255;
1352 arr [3] = 255;
1354 int len = arr [0] | (arr [1] << 8) | (arr [2] << 16) | (arr [3] << 24);
1355 int len2 = - (len + 2);
1357 // Test array and string access with a 32 bit value whose upper 32 bits are
1358 // undefined
1359 // len2 = 3
1360 if (arr2 [len2] != 2)
1361 return 1;
1362 if (s [len2] != 'C')
1363 return 2;
1364 return 0;
1367 public static float return_float () {
1368 return 1.4e-45f;
1371 [Category ("!BITCODE")] // bug #59953
1372 public static int test_0_float_return_spill () {
1373 // The return value of return_float () is spilled because of the
1374 // boxing call
1375 object o = return_float ();
1376 float f = return_float ();
1377 return (float)o == f ? 0 : 1;
1380 class R4Holder {
1381 public static float pi = 3.14f;
1383 public float float_field;
1386 public static int test_0_ldsfld_soft_float () {
1387 if (R4Holder.pi == 3.14f)
1388 return 0;
1389 else
1390 return 1;
1393 public static int test_0_ldfld_stfld_soft_float () {
1394 R4Holder h = new R4Holder ();
1395 h.float_field = 3.14f;
1397 if (h.float_field == 3.14f)
1398 return 0;
1399 else
1400 return 1;
1403 class R4HolderRemote : MarshalByRefObject {
1404 public static float pi = 3.14f;
1406 public float float_field;
1409 public static int test_0_ldfld_stfld_soft_float_remote () {
1410 R4HolderRemote h = new R4HolderRemote ();
1411 h.float_field = 3.14f;
1413 if (h.float_field == 3.14f)
1414 return 0;
1415 else
1416 return 1;
1419 public static int test_0_locals_soft_float () {
1420 float f = 0.0f;
1422 f = 3.14f;
1424 if (f == 3.14f)
1425 return 0;
1426 else
1427 return 1;
1430 struct AStruct2 {
1431 public int i;
1432 public int j;
1435 static float pass_vtype_return_float (AStruct2 s) {
1436 return s.i + s.j == 6 ? 1.0f : -1.0f;
1439 public static int test_0_vtype_arg_soft_float () {
1440 return pass_vtype_return_float (new AStruct2 () { i = 2, j = 4 }) > 0.0 ? 0 : 1;
1443 static int range_check_strlen (int i, string s) {
1444 if (i < 0 || i > s.Length)
1445 return 1;
1446 else
1447 return 0;
1450 public static int test_0_range_check_opt () {
1451 if (range_check_strlen (0, "A") != 0)
1452 return 1;
1453 if (range_check_strlen (1, "A") != 0)
1454 return 2;
1455 if (range_check_strlen (2, "A") != 1)
1456 return 3;
1457 if (range_check_strlen (-100, "A") != 1)
1458 return 4;
1459 return 0;
1462 static int test_0_array_get_set_soft_float () {
1463 float[,] arr = new float [2, 2];
1464 arr [0, 0] = 256f;
1465 return arr [0, 0] == 256f ? 0 : 1;
1468 //repro for #506915
1469 struct Bug506915 { public int val; }
1470 static int test_2_ldobj_stobj_optization ()
1472 int i = 99;
1473 var a = new Bug506915 ();
1474 var b = new Bug506915 ();
1475 if (i.GetHashCode () == 99)
1476 i = 44;
1477 var array = new Bug506915 [2];
1478 array [0].val = 2;
1479 array [1] = (i == 0) ? a : array [0];
1481 return array [1].val;
1484 /* mcs can't compile this (#646744) */
1485 #if FALSE
1486 static void InitMe (out Gamma noMercyWithTheStack) {
1487 noMercyWithTheStack = new Gamma ();
1490 static int FunNoInline () {
1491 int x = 99;
1492 if (x > 344 && x < 22)
1493 return 333;
1494 return x;
1497 static float DoNothingButDontInline (float a, int b) {
1498 if (b > 0)
1499 return a;
1500 else if (b < 0 && b > 10)
1501 return 444.0f;
1502 return a;
1506 * The local register allocator emits loadr8_membase and storer8_membase
1507 * to do spilling. This code is generated after mono_arch_lowering_pass so
1508 * mono_arch_output_basic_block must know how to deal with big offsets.
1509 * This only happens because the call in middle forces the temp for "(float)obj"
1510 * to be spilled.
1512 public static int test_0_float_load_and_store_with_big_offset ()
1514 object obj = 1.0f;
1515 Gamma noMercyWithTheStack;
1516 float res;
1518 InitMe (out noMercyWithTheStack);
1520 res = DoNothingButDontInline ((float)obj, FunNoInline ());
1522 if (!(res == 1.0f))
1523 return 1;
1524 return 0;
1526 #endif
1528 struct VTypePhi {
1529 public int i;
1532 static int vtype_phi (VTypePhi v1, VTypePhi v2, bool first) {
1533 VTypePhi v = first ? v1 : v2;
1535 return v.i;
1538 static int test_0_vtype_phi ()
1540 VTypePhi v1 = new VTypePhi () { i = 1 };
1541 VTypePhi v2 = new VTypePhi () { i = 2 };
1543 if (vtype_phi (v1, v2, true) != 1)
1544 return 1;
1545 if (vtype_phi (v1, v2, false) != 2)
1546 return 2;
1548 return 0;
1551 [MethodImplAttribute (MethodImplOptions.NoInlining)]
1552 static void UseValue (int index)
1556 [MethodImplAttribute (MethodImplOptions.NoInlining)]
1557 static bool IsFalse ()
1559 return false;
1562 static int test_0_llvm_moving_faulting_loads ()
1564 int[] indexes = null;
1566 if (IsFalse ()) {
1567 indexes = new int[0];
1570 while (IsFalse ()) {
1571 UseValue (indexes[0]);
1572 UseValue (indexes[0]);
1575 return 0;
1578 public static bool flag;
1580 class B {
1582 internal static B[] d;
1584 static B () {
1585 flag = true;
1589 [MethodImplAttribute (MethodImplOptions.NoInlining)]
1590 static int regress_679467_inner () {
1591 if (flag == true)
1592 return 1;
1593 var o = B.d;
1594 var o2 = B.d;
1595 return 0;
1599 * FIXME: This fails with AOT #703317.
1602 static int test_0_multiple_cctor_calls_regress_679467 () {
1603 flag = false;
1604 return regress_679467_inner ();
1608 static int test_0_char_ctor () {
1609 string s = new String (new char[] { 'A', 'B' }, 0, 1);
1610 return 0;
1613 static object mInstance = null;
1615 [MethodImpl(MethodImplOptions.Synchronized)]
1616 public static object getInstance() {
1617 if (mInstance == null)
1618 mInstance = new object();
1619 return mInstance;
1622 static int test_0_synchronized () {
1623 getInstance ();
1624 return 0;
1627 struct BStruct {
1628 public Type t;
1631 class Del<T> {
1632 public static BStruct foo () {
1633 return new BStruct () { t = typeof (T) };
1637 delegate BStruct ADelegate ();
1639 static int test_0_regress_10601 () {
1640 var act = (ADelegate)(Del<string>.foo);
1641 BStruct b = act ();
1642 if (b.t != typeof (string))
1643 return 1;
1644 return 0;
1647 static int test_0_regress_11058 () {
1648 int foo = -252674008;
1649 int foo2 = (int)(foo ^ 0xF0F0F0F0); // = 28888
1650 var arr = new byte[foo2].Length;
1651 return 0;
1654 public static void do_throw () {
1655 throw new Exception ();
1658 [MethodImplAttribute (MethodImplOptions.NoInlining)]
1659 static void empty () {
1662 // #11297
1663 public static int test_0_llvm_inline_throw () {
1664 try {
1665 empty ();
1666 } catch (Exception) {
1667 do_throw ();
1670 return 0;
1673 enum ByteEnum : byte {
1674 Zero = 0
1677 struct BugStruct {
1678 public ByteEnum f1;
1679 public ByteEnum f2;
1680 public ByteEnum f3;
1681 public byte f4;
1682 public byte f5;
1683 public byte f6;
1684 public byte f7;
1687 public static int test_0_14217 () {
1688 t_14217_inner (new BugStruct ());
1689 return 0;
1692 [MethodImplAttribute (MethodImplOptions.NoInlining)]
1693 static void t_14217_inner (BugStruct bug) {
1696 [StructLayout(LayoutKind.Sequential)]
1697 public struct EmptyStruct {
1700 class EmptyClass {
1701 public static EmptyStruct s;
1704 // #20349
1705 static int test_0_empty_struct_as_static () {
1706 var s = EmptyClass.s;
1707 return 0;
1710 // #25487
1711 static int test_0_int_to_r4 () {
1712 return int_to_r4_inner (255);
1715 static int int_to_r4_inner (int value1) {
1716 int sub = -value1;
1717 float mult = sub * 1f;
1718 if (mult != -255.0f)
1719 return 1;
1720 else
1721 return 0;
1724 struct HFA4D {
1725 public double a, b, c, d;
1728 static double arm64_hfa_on_stack_inner (double d1, double d2, double d3, double d4, double d5, double d6, double d7, double d8, HFA4D s) {
1729 return s.a + s.b + s.c + s.d;
1732 static int test_0_arm64_hfa_on_stack () {
1733 var s = new HFA4D () { a = 1.0, b = 2.0, c = 3.0, d = 4.0 };
1734 var res = arm64_hfa_on_stack_inner (1, 2, 3, 4, 5, 6, 7, 8, s);
1735 return res == 10.0 ? 0 : 1;
1738 class MulOvfClass {
1739 [MethodImplAttribute (MethodImplOptions.NoInlining)]
1740 public unsafe void EncodeIntoBuffer(char* value, int valueLength, char* buffer, int bufferLength) {
1744 static unsafe int test_0_mul_ovf_regress_36052 () {
1745 var p = new MulOvfClass ();
1747 string typeName = typeof(int).Name;
1748 int bufferSize = 45;
1750 fixed (char* value = typeName) {
1751 char* buffer = stackalloc char[bufferSize];
1752 p.EncodeIntoBuffer(value, typeName.Length, buffer, bufferSize);
1754 return 0;
1757 struct Struct16 {
1758 public int a, b, c, d;
1761 [MethodImplAttribute (MethodImplOptions.NoInlining)]
1762 static int pass_struct16 (object o0, object o2, object o3, object o4, object o5, object o6, object o7, Struct16 o8) {
1763 // This disables LLVM
1764 try {
1765 } catch {
1767 return o8.a;
1770 [MethodImplAttribute (MethodImplOptions.NoInlining)]
1771 static int pass_struct16 (object o0, object o2, object o3, object o6, object o7, Struct16 o8) {
1772 return pass_struct16 (o0, o2, null, o3, null, o6, o7, o8);
1775 public static int test_42_pass_16byte_struct_split () {
1776 return pass_struct16 (null, null, null, null, null, new Struct16 () { a = 42 });
1779 public interface IComparer2
1781 Type foo<T> ();
1784 public class AClass : IComparer2 {
1785 public Type foo<T> () {
1786 return typeof(T);
1790 public static int test_0_delegate_to_virtual_generic_on_ifaces () {
1791 IComparer2 c = new AClass ();
1793 Func<Type> f = c.foo<string>;
1794 return f () == typeof(string) ? 0 : 1;
1797 public enum ByteEnum2 : byte {
1798 High = 142
1801 [MethodImplAttribute (MethodImplOptions.NoInlining)]
1802 public static int enum_arg_zero_extend (ByteEnum2 b) {
1803 return (int)b;
1806 public static int test_142_byte_enum_arg_zero_extend () {
1807 return enum_arg_zero_extend (ByteEnum2.High);
1810 enum Mine { One, Two }
1812 public static int test_0_enum_gethashcode_opt () {
1813 int sum = 0;
1814 for (int i = 0; i < 1000000; ++i)
1815 sum += Mine.Two.GetHashCode();
1817 return 0;
1820 public static int test_0_typedref () {
1821 int i = 5;
1822 System.TypedReference r = __makeref(i);
1823 System.Type t = __reftype(r);
1825 if (t != typeof (int))
1826 return 1;
1827 int j = __refvalue(r, int);
1828 if (j != 5)
1829 return 2;
1831 try {
1832 object o = __refvalue (r, object);
1833 } catch (InvalidCastException) {
1836 return 0;
1839 enum FooEnum { Bar }
1840 //https://github.com/mono/mono/issues/6666
1841 public static int test_0_bad_unbox_nullable_of_enum () {
1842 try {
1843 var enumValue = FooEnum.Bar;
1844 object value = (int)enumValue;
1845 var res = (FooEnum?)value; // Should throw
1846 } catch (InvalidCastException) {
1847 return 0;
1849 return 1;
1852 //https://github.com/mono/mono/issues/6666
1853 public static int test_0_unbox_nullable_of_enum () {
1854 try {
1855 var enumValue = FooEnum.Bar;
1856 object value = (object)enumValue;
1857 var res = (FooEnum?)value; // Should not throw
1858 } catch (InvalidCastException) {
1859 return 1;
1861 return 0;
1864 static void decode (out sbyte v) {
1865 byte tmp = 134;
1866 v = (sbyte)tmp;
1869 // gh #6414
1870 public static int test_0_alias_analysis_sign_extend () {
1871 sbyte t;
1872 decode (out t);
1874 return t == -122 ? 0 : 1;
1877 public interface IFoo
1879 int MyInt { get; }
1882 public class IFooImpl : IFoo
1884 public int MyInt => 0;
1887 //gh 6266
1888 public static int test_0_store_to_magic_iface_array ()
1890 ICollection<IFoo> arr1 = new IFooImpl[1] { new IFooImpl() };
1891 ICollection<IFoo> arr2 = new IFooImpl[1] { new IFooImpl() };
1893 ICollection<IFoo>[] a2d = new ICollection<IFoo>[2] {
1894 arr1,
1895 arr2,
1898 return 0;
1902 #if __MOBILE__
1904 #endif