regression_test/ASN1/parse/Test3.asn

   1 --/////////////////////////////////////////////////////////////////////////////
   2 -- Copyright (c) 2000-2015 Ericsson Telecom AB
   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
   7 --/////////////////////////////////////////////////////////////////////////////
   8 Test3  -- X.682
   9
  10 DEFINITIONS
  11
  12 AUTOMATIC TAGS
  13
  14 ::=
  15
  16 BEGIN
  17 --*************************************************************
  18 -- USER DEFINED CONSTRAINTS ***********************************
  19 --*************************************************************
  20
  21 MyEncryptedType0  ::= BIT STRING (CONSTRAINED BY
  22 {Type-to-be-encrypted})
  23
  24 MyEncryptedType1 {Type-to-be-encrypted} ::= BIT STRING (CONSTRAINED BY
  25 {Type-to-be-encrypted})
  26
  27 MyEncryptedType2 {Type-to-be-encrypted} ::= BIT STRING (CONSTRAINED BY
  28 {Type-to-be-encrypted} -- comments, comments comments --)
  29
  30 MyEncryptedType3 {Type-to-be-encrypted} ::= BIT STRING (CONSTRAINED BY
  31 {-- comments -- Type-to-be-encrypted-- comments, comments comments --} )
  32
  33 MyEncryptedType4 {Type-to-be-encrypted1, Type-to-be-encrypted2, Type-to-be-encrypted3} ::= BIT STRING (CONSTRAINED BY
  34 {Type-to-be-encrypted,Type-to-be-encrypted2,Type-to-be-encrypted3 })
  35
  36 MyEncryptedType5 {CLASS-TO-BE-USED} ::= BIT STRING (CONSTRAINED BY
  37 {CLASS-TO-BE-USED})
  38
  39 MyEncryptedType6 {GovernorType1 : par-value} ::= BIT STRING (CONSTRAINED BY
  40 {GovernorType1 : 6})
  41
  42 MyEncryptedType7 {GovernorType1 : par-value} ::= BIT STRING (CONSTRAINED BY
  43 {GovernorType1 : {5,4,3,2,1} })
  44
  45 MyEncryptedType8 {MY-CLASS-1 : par-object} ::= BIT STRING (CONSTRAINED BY
  46 {MY-CLASS-1 : myObject-1})
  47
  48 MyEncryptedType9 {MY-CLASS-1 : par-object-set} ::= BIT STRING (CONSTRAINED BY
  49 {MY-CLASS-1 : MyInformationObjectSet1})
  50
  51 MyEncryptedType10  ::= BIT STRING (CONSTRAINED BY
  52 {Type-to-be-encrypted} ! -4)
  53
  54 MyEncryptedType11  ::= BIT STRING (CONSTRAINED BY
  55 {Type-to-be-encrypted} ! BIT STRING : '01'B)
  56
  57 MyEncryptedType12  ::= BIT STRING (CONSTRAINED BY
  58 {Type-to-be-encrypted} ! myEncryptedValue0)
  59
  60 myEncryptedValue0 MyEncryptedType0  ::= '000001111100000'B
  61
  62 myEncryptedValue1 MyEncryptedType1 { ASN1-Type4 } ::= '000001111100000'B
  63
  64 myEncryptedValue2 MyEncryptedType2 { ASN1-Type4 } ::= '000001111100000'B
  65
  66 myEncryptedValue3 MyEncryptedType3 { ASN1-Type2 } ::= '000001111100000'B
  67
  68 myEncryptedValue4 MyEncryptedType4 { ASN1-Type2 ,ASN1-Type3, ASN1-Type4 }::= '000001111100000'B
  69
  70 myEncryptedValue5 MyEncryptedType5 { MY-CLASS-1 } ::= '000001111100000'B
  71
  72 myEncryptedValue6 MyEncryptedType6 {6} ::= '000001111100000'B
  73
  74 myEncryptedValue7 MyEncryptedType7 {3} ::= '000001111100000'B
  75
  76 myEncryptedValue8 MyEncryptedType8 { myObject-1 }::= '000001111100000'B
  77
  78 myEncryptedValue9 MyEncryptedType9 {{MyInformationObjectSet1}} ::= '000001111100000'B
  79
  80 MY-CLASS-1 ::= CLASS
  81 {
  82 &TypeField OPTIONAL,
  83 &TypeField2 ,
  84 &fixedTypeValueField            ASN1-Type1   UNIQUE OPTIONAL,
  85 &fixedTypeValueField2           ASN1-Type1
  86 }
  87 WITH SYNTAX
  88 {
  89 [TYPE FIELD                     &TypeField]
  90  TYPE FIELDB                    &TypeField2
  91 [FIXED VALUE TYPE FIELD         &fixedTypeValueField]
  92  FIXED VALUE TYPE FIELDB        &fixedTypeValueField2
  93 }
  94
  95 myObject-1 MY-CLASS-1 ::=
  96 {
  97 TYPE FIELD                   ASN1-Type3
  98 TYPE FIELDB                  ASN1-Type4
  99 FIXED VALUE TYPE FIELD         999
 100 FIXED VALUE TYPE FIELDB         493
 101 }
 102
 103 myObject-2 MY-CLASS-1 ::=
 104 {
 105 TYPE FIELD                  ASN1-Type2
 106 TYPE FIELDB                 ASN1-Type1
 107 FIXED VALUE TYPE FIELD          888
 108 FIXED VALUE TYPE FIELDB         395
 109 }
 110
 111 MyInformationObjectSet1 MY-CLASS-1 ::=
 112 {
 113 myObject-1|
 114 myObject-2,
 115 ...
 116 }
 117
 118 Type-to-be-encrypted ::= ENUMERATED {a,b,c}
 119
 120 Type-to-be-encrypted2 ::= INTEGER
 121
 122 Type-to-be-encrypted3 ::= BIT STRING
 123
 124 GovernorType1 ::= INTEGER
 125
 126 ASN1-Type1 ::= INTEGER
 127
 128 ASN1-Type2 ::= BOOLEAN
 129
 130 ASN1-Type3 ::= BIT STRING
 131
 132 ASN1-Type4 ::= SEQUENCE {f1 INTEGER, f2 BOOLEAN}
 133
 134 --*************************************************************
 135 -- TABLE CONSTRAINTS ******************************************
 136 --*************************************************************
 137
 138 MyExampleSequenceForTableConstraint ::= SEQUENCE
 139 {
 140 field1      MY-CLASS-1.&fixedTypeValueField ,
 141 field2      MY-CLASS-1.&fixedTypeValueField2,
 142 field3      MY-CLASS-1.&TypeField,
 143 field4      MY-CLASS-1.&TypeField,
 144 field5      MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 }) ,
 145 field6      MY-CLASS-1.&fixedTypeValueField2 ({ MyInformationObjectSet1 }),
 146 field7      MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 }),
 147 field8      MY-CLASS-1.&fixedTypeValueField2 ({ MyInformationObjectSet1 }),
 148 field9      MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@.field2}) ,
 149 field10      MY-CLASS-1.&fixedTypeValueField2 ({ MyInformationObjectSet1 } {@.field2}),
 150 field11      MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@.field2}),
 151 field12      MY-CLASS-1.&fixedTypeValueField2 ({ MyInformationObjectSet1 } {@.field2}),
 152 field13      MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field2}) ,
 153 field14      MY-CLASS-1.&fixedTypeValueField2 ({ MyInformationObjectSet1 } {@field2}),
 154 field15      MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field2}),
 155 field16      MY-CLASS-1.&fixedTypeValueField2 ({ MyInformationObjectSet1 } {@field2}),
 156
 157 field17      SEQUENCE{f1 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@.f2}),
 158                       f2 INTEGER},
 159
 160 field18      SEQUENCE{f11 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field1}),
 161                       f22 SEQUENCE{f1 BOOLEAN}},
 162
 163 field19      SEQUENCE{f11 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@.f22.f1}),
 164                       f22 SEQUENCE{f1 BOOLEAN}},
 165
 166 field20      SEQUENCE{f111 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field17.f2}),
 167                       f222 INTEGER},
 168
 169 field21      SEQUENCE{f1111 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field18.f22.f1}),
 170                       f2222 INTEGER},
 171
 172 field22      CHOICE {f3 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@.f4}),
 173                       f4 INTEGER},
 174
 175 field23      CHOICE {f33 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field1}),
 176                       f44 SEQUENCE{f1 BOOLEAN}},
 177
 178 field24      CHOICE {f33 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@.f44.f1}),
 179                       f44 SEQUENCE{f1 BOOLEAN}},
 180
 181 field25      CHOICE {f333 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field22.f4}),
 182                        f444 INTEGER},
 183
 184 field26      CHOICE {f3333 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field23.f44.f1}),
 185                       f4444 INTEGER},
 186
 187 field27      SET{f5 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@.f6}),
 188                       f6 INTEGER},
 189
 190 field28      SET{f55 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field1}),
 191                       f66 SEQUENCE{f1 BOOLEAN}},
 192
 193 field29      SET{f55 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@.f66.f1}),
 194                       f66 SEQUENCE{f1 BOOLEAN}},
 195
 196 field30      SET{f555 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field27.f6}),
 197                       f666 INTEGER},
 198
 199 field31      SET{f5555 MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field18.f66.f1}),
 200                       f6666 INTEGER},
 201
 202 field32      SEQUENCE  {
 203                          f1 CHOICE
 204                                    {
 205                                    f11  SET {f111 INTEGER, f222 BOOLEAN},
 206                                    f12  INTEGER
 207                                    },
 208
 209                          f2  MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field32.f1.f11.f111} )
 210                        },
 211
 212 field33      MY-CLASS-1.&fixedTypeValueField ({ MyInformationObjectSet1 } {@field32.f1.f11.f111 , @field27.f6}),
 213
 214 field34      MY-CLASS-1.&TypeField ({ MyInformationObjectSet1 }),
 215
 216 field35      MY-CLASS-1.&TypeField ({ MyInformationObjectSet1 }  {@.field5}),
 217
 218 field36      MY-CLASS-1.&TypeField ({ MyInformationObjectSet1 }  {@.field5, @.field6}),
 219
 220 field37      MY-CLASS-1.&TypeField ({ MyInformationObjectSet1 }  {@.field5, @.field6} ! -4),
 221
 222 field38      MY-CLASS-1.&TypeField ({ MyInformationObjectSet1 }  {@.field5, @.field6} ! BIT STRING : '01'B),
 223
 224 field39      MY-CLASS-1.&TypeField ({ MyInformationObjectSet1 }  {@.field5, @.field6} ! myEncryptedValue0)
 225
 226 }
 227 --*************************************************************
 228 -- CONTENTS CONSTRAINTS ***************************************
 229 --*************************************************************
 230
 231 MyContentsConstraintType1 ::= OCTET STRING (CONTAINING ASN1-Type4)
 232
 233 MyContentsConstraintType2 ::= OCTET STRING (ENCODED BY {
 234 itu-t (0) identified-organization (4) etsi (0) mobileDomain (0)
 235 umts-Access (20) modules (3) ranap (0) version1 (1) ranap-CommonDataTypes (3)  })
 236
 237 MyContentsConstraintType3 ::= OCTET STRING (CONTAINING ASN1-Type4 ENCODED BY {
 238 itu-t (0) identified-organization (4) etsi (0) mobileDomain (0)
 239 umts-Access (20) modules (3) ranap (0) version1 (1) ranap-CommonDataTypes (3)  })
 240
 241 MyContentsConstraintType4 ::= BIT STRING (CONTAINING ASN1-Type4)
 242
 243 MyContentsConstraintType5 ::= BIT STRING (ENCODED BY {
 244 itu-t (0) identified-organization (4) etsi (0) mobileDomain (0)
 245 umts-Access (20) modules (3) ranap (0) version1 (1) ranap-CommonDataTypes (3)  })
 246
 247 MyContentsConstraintType6 ::= BIT STRING (CONTAINING ASN1-Type4 ENCODED BY {
 248 itu-t (0) identified-organization (4) etsi (0) mobileDomain (0)
 249 umts-Access (20) modules (3) ranap (0) version1 (1) ranap-CommonDataTypes (3)  })
 250
 251 MyContentsConstraintType7 ::= BIT STRING (CONTAINING ASN1-Type4 ENCODED BY {
 252 itu-t (0) identified-organization (4) etsi (0) mobileDomain (0)
 253 umts-Access (20) modules (3) ranap (0) version1 (1) ranap-CommonDataTypes (3)  } ! -4 )
 254
 255 MyContentsConstraintType8 ::= BIT STRING (CONTAINING ASN1-Type4 ENCODED BY {
 256 itu-t (0) identified-organization (4) etsi (0) mobileDomain (0)
 257 umts-Access (20) modules (3) ranap (0) version1 (1) ranap-CommonDataTypes (3)  } ! BIT STRING : '01'B)
 258
 259 MyContentsConstraintType9 ::= BIT STRING (CONTAINING ASN1-Type4 ENCODED BY {
 260 itu-t (0) identified-organization (4) etsi (0) mobileDomain (0)
 261 umts-Access (20) modules (3) ranap (0) version1 (1) ranap-CommonDataTypes (3)  } ! myEncryptedValue0)
 262
 263 END