Commit | Line | Data |
---|---|---|
970ed795 | 1 | /****************************************************************************** |
d44e3c4f | 2 | * Copyright (c) 2000-2016 Ericsson Telecom AB |
970ed795 EL |
3 | * All rights reserved. This program and the accompanying materials |
4 | * are made available under the terms of the Eclipse Public License v1.0 | |
5 | * which accompanies this distribution, and is available at | |
6 | * http://www.eclipse.org/legal/epl-v10.html | |
d44e3c4f | 7 | * |
8 | * Contributors: | |
9 | * Balasko, Jeno | |
10 | * | |
970ed795 EL |
11 | ******************************************************************************/ |
12 | module NegTest_TEXT_Types { | |
13 | ||
14 | type enumerated MyEnum { first(1), second(2), third(3) } with { variant "BEGIN('<MyEnum>')";variant "END('</MyEnum>')"; variant "TEXT_CODING()"} | |
15 | type integer MyInteger10 (1..10) with {variant "BEGIN('<MyInt>')"; variant "END('</MyInt>')"; variant "TEXT_CODING()" } | |
16 | ||
17 | //1.Sequence (record) | |
18 | type record MySeqEmpty {} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()" } | |
19 | type record MySeqBool {boolean b} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()" } | |
20 | //type record MySeqNull { NULL n} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()" } | |
21 | type record MySeqInt {integer i} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()" } | |
22 | type record MySeqMyEnum {MyEnum e} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()" } | |
23 | type record MySeqInt2 { integer i, integer j} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
24 | type record MySeqInt2opt { integer i, integer j optional} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
25 | type record MySeqInt3opt { integer i, integer j, integer k optional} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
26 | type record MySeqIntSeqInt2 { integer i, MySeqInt2 jk } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
27 | type record MySeqIntSeqInt2opt { integer i optional, MySeqInt2 jk } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
28 | type record MySeqIntSeqInt2optopt { integer i optional, MySeqInt2opt jk } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
29 | type record MySeqInt3 { integer i, integer j, integer k} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
30 | type record MySeqInt4 { integer i, integer j, integer k, integer l} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
31 | type record MySeqInt4opt { integer i, integer j, integer k, integer l optional} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
32 | ||
33 | type record MySeqCharstring { charstring x } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
34 | type record MySeqCharstring2 { charstring x, charstring y optional } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
35 | type record MySeqStr { charstring s} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
36 | type record MySeqStr2 { charstring s, charstring t} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
37 | type record MySeqBitStr { bitstring b} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
38 | type record MySeqBitStr2 { bitstring s, bitstring t} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
39 | type record MySeqIntCharstring { integer i, charstring x } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
40 | type record MySeqIntStr { integer i, charstring s} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
41 | type record MySeqIntBitStr { integer i, bitstring b} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
42 | type record MySeqOctStr { octetstring o} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
43 | type record MySeqOJKL { octetstring o, integer j, integer k, integer l} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
44 | type record MySeqIOKL { integer i, octetstring o, integer k, integer l } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
45 | type record MySeqISKL { integer i, MySeqInt4 s, integer k, integer l} with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
46 | ||
47 | //===== sequence of sequence of sequence ==== | |
48 | ||
49 | type record MySeqIntSeqIntSeqInt2SeqCharstring2 { | |
50 | integer i optional, | |
51 | MySeqIntSeqInt2 jkl, | |
52 | MySeqCharstring2 xy | |
53 | } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
54 | ||
55 | type record MySeqIntSeqIntSeqInt2optoptSeqCharstring2 { | |
56 | integer i optional, | |
57 | MySeqIntSeqInt2optopt jkl, | |
58 | MySeqCharstring2 xy | |
59 | } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
60 | ||
61 | type record MySeqIntSeqCharstring2 { | |
62 | integer i optional, | |
63 | MySeqCharstring2 xy | |
64 | } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
65 | ||
66 | type record MySeqIntSeqIntSeqInt2 { | |
67 | integer i, | |
68 | MySeqIntSeqInt2 jkl | |
69 | } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
70 | ||
71 | type record MySeqSeqIntSeqInt2SeqCharstring2 { | |
72 | MySeqIntSeqInt2 jkl, | |
73 | MySeqCharstring2 xy | |
74 | } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
75 | ||
76 | type record MySeq_SeqSeqIntSeqInt2SeqCharstring2_SeqSeqIntSeqInt2SeqCharstring2 { | |
77 | MySeqSeqIntSeqInt2SeqCharstring2 s1, | |
78 | MySeqSeqIntSeqInt2SeqCharstring2 s2 | |
79 | } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
80 | ||
81 | type record MySeq_SeqSeqIntSeqInt2optoptSeqCharstring2_SeqSeqIntSeqInt2optoptSeqCharstring2 { | |
82 | MySeqIntSeqIntSeqInt2optoptSeqCharstring2 s1, | |
83 | MySeqIntSeqIntSeqInt2optoptSeqCharstring2 s2 | |
84 | } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
85 | ||
86 | type record MySeqBasicTypes { | |
87 | boolean b, | |
88 | //NULL n, | |
89 | integer i, | |
90 | MyEnum e, | |
91 | charstring r, | |
92 | bitstring bs, | |
93 | octetstring os, | |
94 | objid oi | |
95 | //,relativeobjid | |
96 | } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
97 | //2.Sequence of (record of) | |
98 | ||
99 | type record of boolean MySeqOfBool with { variant "BEGIN('<MySeqOf>')"; variant "END('</MySeqOf>')"; variant "TEXT_CODING()"} | |
100 | // There is no such type as NULL: | |
101 | //type record of NULL MySeqOfNull; | |
102 | type record of integer MySeqOfInt with { variant "BEGIN('<MySeqOf>')"; variant "END('</MySeqOf>')"; variant "TEXT_CODING()"}; | |
103 | type record of MyEnum MySeqOfMyEnum with { variant "BEGIN('<MySeqOf>')"; variant "END('</MySeqOf>')"; variant "TEXT_CODING()"}; | |
104 | type record of charstring MySeqOfCharstring with { variant "BEGIN('<MySeqOf>')"; variant "END('</MySeqOf>')"; variant "TEXT_CODING()"}; | |
105 | type record of bitstring MySeqOfBitStr with { variant "BEGIN('<MySeqOf>')"; variant "END('</MySeqOf>')"; variant "TEXT_CODING()"}; | |
106 | type record of octetstring MySeqOfOctStr with { variant "BEGIN('<MySeqOf>')"; variant "END('</MySeqOf>')"; variant "TEXT_CODING()"}; | |
107 | type record of objid MySeqOfObjId with { variant "BEGIN('<MySeqOf>')"; variant "END('</MySeqOf>')"; variant "TEXT_CODING()"}; | |
108 | type record of MyUnionBasicTypes MySeqOfMyUnionBT with { variant "BEGIN('<MySeqOf>')"; variant "END('</MySeqOf>')"; variant "TEXT_CODING()"}; | |
109 | type record of MySeqSeqIntSeqInt2SeqCharstring2 MySeqOfSeqSeqIntSeqInt2SeqCharstring2 with { variant "BEGIN('<MySeqOf>')"; variant "END('</MySeqOf>')"; variant "TEXT_CODING()"}; | |
110 | type record of MySeqIntSeqIntSeqInt2optoptSeqCharstring2 MySeqOfMySeqIntSeqIntSeqInt2optoptSeqCharstring2 with { variant "BEGIN('<MySeqOf>')"; variant "END('</MySeqOf>')"; variant "TEXT_CODING()"}; | |
111 | //3. Set | |
112 | type set MySetEmpty {} with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
113 | type set MySetBool { boolean b } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
114 | // There is no such type as NULL | |
115 | //type set MySetNull { NULL n } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
116 | type set MySetInt { integer i } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
117 | type set MySetMyEnum { MyEnum e } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
118 | type set MySetInt2 { integer i, integer j } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
119 | type set MySetInt2opt { integer i optional, integer j optional } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
120 | type set MySetInt3opt { integer i optional, integer j optional, integer k optional } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
121 | type set MySetIntSeqInt2 { integer i, MySeqInt2 jk } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
122 | type set MySetIntSeqInt2T { integer i, MySeqInt2 jk } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
123 | type set MySetIntSeqInt2opt { integer i optional, MySeqInt2 jk } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
124 | type set MySetIntSeqInt2Topt { integer i optional, MySeqInt2 jk } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
125 | type set MySetIntSeqInt2optopt { integer i optional, MySeqInt2opt jk optional } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
126 | type set MySetIntSeqInt2Toptopt { integer i optional, MySeqInt2opt jk optional } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
127 | type set MySetInt3 { integer i, integer j, integer k } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
128 | type set MySetInt4 { integer i, integer j, integer k, integer l } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
129 | type set MySetInt4opt { integer i optional, integer j optional, integer k optional, integer l optional } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
130 | type set MySetCharstring { charstring x } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
131 | type set MySetCharstring2 { charstring x, charstring y } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
132 | type set MySetStr { charstring s } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
133 | type set MySetStr2 { charstring s, charstring t } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
134 | type set MySetBitStr { bitstring b } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
135 | type set MySetOctStr { octetstring o } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
136 | type set MySetBitStr2 { bitstring a, bitstring b } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
137 | type set MySetIntCharstring { integer i, charstring f } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
138 | type set MySetIntStr { integer i , charstring s } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
139 | type set MySetIntBitStr { integer i, bitstring b} with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
140 | type set MySetIntOctStr { integer i, octetstring o } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
141 | type set MySetOJKL { octetstring o, integer j, integer k, integer l } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
142 | type set MySetIOKL { integer i, octetstring o, integer k, integer l } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
143 | type set MySetISKL { integer i, MySeqInt4 s, integer k, integer l } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
144 | type set MySetISKLopt { integer i optional, MySeqInt4opt s optional, integer k optional, integer l optional } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
145 | type set MySetIS2KLopt { integer i optional, MySeqInt2 s optional, integer k optional, integer l optional } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
146 | type set MySetISOKL { integer i,MySeqInt4 s, octetstring o, integer k, integer l } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
147 | type set MySetISOKLopt { integer i optional,MySeqInt4opt s optional, octetstring o optional, integer k optional, integer l optional } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
148 | type set MySetIOSKL {integer i, octetstring o, MySeqInt4 s, integer k, integer l} with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
149 | type set MySetIOSKLopt {integer i optional, octetstring o optional, MySeqInt4opt s optional, integer k optional, integer l optional} with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
150 | //===== set of sequence of sequence ==== | |
151 | type set MySetIntSeqIntSeqInt2SeqCharstring2 { integer i optional, MySeqIntSeqInt2 jkl, MySeqCharstring2 xy} with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
152 | type set MySetIntSeqIntSeqInt2optoptSeqCharstring2 { integer i optional, MySeqIntSeqInt2optopt jkl, MySeqCharstring2 xy} with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
153 | //subtypes: | |
154 | type set MySetIntSeqCharstring2 { integer i optional, MySeqCharstring2 xy } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
155 | ||
156 | type set MySetIntSeqIntSeqInt2 { integer i optional, MySeqIntSeqInt2 jkl } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
157 | type set MySetSeqIntSeqInt2SeqCharstring2 { MySeqIntSeqInt2 jkl, MySeqCharstring2 xy } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
158 | type set MySet_SeqSeqIntSeqInt2SeqCharstring2_SeqSeqIntSeqInt2SeqCharstring2 { | |
159 | MySeqSeqIntSeqInt2SeqCharstring2 s1, | |
160 | MySeqSeqIntSeqInt2SeqCharstring2 s2 | |
161 | } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
162 | type set MySet_SeqSeqIntSeqInt2optoptSeqCharstring2_SeqSeqIntSeqInt2optoptSeqCharstring2 { | |
163 | MySeqIntSeqIntSeqInt2optoptSeqCharstring2 s1, | |
164 | MySeqIntSeqIntSeqInt2optoptSeqCharstring2 s2 | |
165 | } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
166 | ||
167 | type set MySetBasicTypes { | |
168 | boolean b, | |
169 | //NULL n, | |
170 | integer i, | |
171 | MyEnum e, | |
172 | charstring r, | |
173 | bitstring bs, | |
174 | octetstring os, | |
175 | objid oi | |
176 | //RELATIVE_OID roi | |
177 | } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
178 | ||
179 | type set MySetEnum { MyEnum e } with { variant "BEGIN('<MySet>')"; variant "END('</MySet>')"; variant "TEXT_CODING()"} | |
180 | ||
181 | //4. Set of | |
182 | type set of boolean MySetOfBool with { variant "BEGIN('<MySetOf>')"; variant "END('</MySetOf>')"; variant "TEXT_CODING()"} | |
183 | // There is no such type as NULL: | |
184 | //type record of NULL MySeqOfNull; | |
185 | type set of integer MySetOfInt with { variant "BEGIN('<MySetOf>')"; variant "END('</MySetOf>')"; variant "TEXT_CODING()"}; | |
186 | type set of MyEnum MySetOfMyEnum with { variant "BEGIN('<MySetOf>')"; variant "END('</MySetOf>')"; variant "TEXT_CODING()"}; | |
187 | type set of charstring MySetOfCharstring with { variant "BEGIN('<MySetOf>')"; variant "END('</MySetOf>')"; variant "TEXT_CODING()"}; | |
188 | type set of bitstring MySetOfBitStr with { variant "BEGIN('<MySetOf>')"; variant "END('</MySetOf>')"; variant "TEXT_CODING()"}; | |
189 | type set of octetstring MySetOfOctStr with { variant "BEGIN('<MySetOf>')"; variant "END('</MySetOf>')"; variant "TEXT_CODING()"}; | |
190 | type set of objid MySetOfObjId with { variant "BEGIN('<MySetOf>')"; variant "END('</MySetOf>')"; variant "TEXT_CODING()"}; | |
191 | type set of MyUnionBasicTypes MySetOfMyUnionBT with { variant "BEGIN('<MySetOf>')"; variant "END('</MySetOf>')"; variant "TEXT_CODING()"}; | |
192 | type set of MySeqSeqIntSeqInt2SeqCharstring2 MySetOfSeqSeqIntSeqInt2SeqCharstring2 with { variant "BEGIN('<MySetOf>')"; variant "END('</MySetOf>')"; variant "TEXT_CODING()"}; | |
193 | type set of MySeqIntSeqIntSeqInt2optoptSeqCharstring2 MySetOfMySeqIntSeqIntSeqInt2optoptSeqCharstring2 with { variant "BEGIN('<MySetOf>')"; variant "END('</MySetOf>')"; variant "TEXT_CODING()"}; | |
194 | ||
195 | //5.choice (union) | |
196 | type union MyUnionBasicTypes { | |
197 | boolean b, | |
198 | integer i, | |
199 | MyEnum e, | |
200 | charstring r, | |
201 | bitstring bs, | |
202 | octetstring os, | |
203 | objid oi | |
204 | } with { variant "TEXT_CODING()"} | |
205 | ||
206 | //Tagged version: | |
207 | type union MyUnionBasicTypesT { | |
208 | boolean b, | |
209 | integer i, | |
210 | MyEnum e, | |
211 | charstring r, | |
212 | bitstring bs, | |
213 | octetstring os, | |
214 | objid oi | |
215 | } with { variant "BEGIN('<MyUnion>')"; variant "END('</MyUnion>')"; variant "TEXT_CODING()"} | |
216 | ||
217 | type union MyUnionComplexTypes { | |
218 | MyUnionBasicTypes u, | |
219 | //MySeqIntSeqCharstring2 s, | |
220 | MySeqOfCharstring sofcharstring | |
221 | } with { variant "BEGIN('<MySeq>')"; variant "END('</MySeq>')"; variant "TEXT_CODING()"} | |
222 | ||
223 | } with { encode "TEXT" } | |
224 |