2010-01-20 Zoltan Varga <vargaz@gmail.com>
[mono.git] / mono / tests / verifier / make_store_test.sh
1 #! /bin/sh
2
3 TEST_NAME=$1
4 TEST_VALIDITY=$2
5 TEST_OP=$3
6 TEST_TYPE1=$4
7 TEST_TYPE2=$5
8
9 TEST_NAME=${TEST_VALIDITY}_${TEST_NAME}
10 TEST_FILE=${TEST_NAME}_generated.il
11 echo $TEST_FILE
12 TEST_TYPE1=`echo $TEST_TYPE1 | sed -s 's/&/\\\&/'`
13 TEST_TYPE2=`echo $TEST_TYPE2 | sed -s 's/&/\\\&/'`
14 sed -e "s/VALIDITY/${TEST_VALIDITY}/g" -e "s/TYPE1/${TEST_TYPE1}/g" -e "s/TYPE2/${TEST_TYPE2}/g" -e "s/OPCODE/${TEST_OP}/g" > $TEST_FILE <<//EOF
15
16 // VALIDITY CIL which breaks the ECMA-335 rules. 
17 // this CIL should fail verification by a conforming CLI verifier.
18
19 .assembly '${TEST_NAME}_generated'
20 {
21   .hash algorithm 0x00008004
22   .ver  0:0:0:0
23 }
24
25 .assembly extern mscorlib
26 {
27   .ver 1:0:5000:0
28   .publickeytoken = (B7 7A 5C 56 19 34 E0 89 ) // .z\V.4..
29 }
30
31 .class ClassA extends [mscorlib]System.Object
32 {
33 }
34
35 .class ClassB extends [mscorlib]System.Object
36 {
37 }
38
39 .class interface abstract InterfaceA
40 {
41 }
42
43 .class interface abstract InterfaceB
44 {
45 }
46
47 .class sealed ValueType extends [mscorlib]System.ValueType
48 {
49         .field private int32 v
50 }
51
52
53 .method public static void Foo(TYPE1 arg, TYPE2 arg2) cil managed
54 {
55         .maxstack 2
56         .locals init (
57             TYPE1 V_0,
58             TYPE2 V_1
59         )
60         ldloc.1
61         OPCODE // VALIDITY, TYPE2 cannot be stored in TYPE1.
62         ret
63 }
64
65 .method public static void Main() cil managed
66 {
67         .entrypoint
68         .maxstack 4
69         .locals init (
70             TYPE1 V_0,
71             TYPE2 V_1
72         )
73         ldloc.0
74         ldloc.1
75         call void Foo(TYPE1, TYPE2)
76
77         ret
78 }
79 //EOF