Commit bc6ef1f9 authored by Bi-Ruei, Chiu's avatar Bi-Ruei, Chiu Committed by Lev Walkin

Add two tests in tests-asn1c-compiler directory

parent e460c3b7
-- OK: Everything is fine
-- iso.org.dod.internet.private.enterprise (1.3.6.1.4.1)
-- .spelio.software.asn1c.test (9363.1.5.1)
-- .155
ModuleParameterizationMoreThanTwoLevel
{ iso org(3) dod(6) internet(1) private(4) enterprise(1)
spelio(9363) software(1) asn1c(5) test(1) 155 }
DEFINITIONS ::= BEGIN
id-TYPE1 PacketId ::= 1
PacketId ::= INTEGER (0..65535)
Color ::= ENUMERATED { red(0), green, blue }
Valid ::= ENUMERATED { crc-nok, crc-ok(1) }
PACKET ::= CLASS {
&id PacketId UNIQUE,
&color Color,
&Value,
&valid Valid
}
WITH SYNTAX {
ID &id
COLOR &color
TYPE &Value
VALID &valid
}
ClassItem PACKET ::= {
{ ID id-TYPE1 COLOR blue TYPE OCTET STRING VALID crc-ok },
...
}
Packet-List ::= UpperLayer-List { {ClassItem} }
UpperLayer-List {PACKET : Param} ::= LowerLayer-List { 1, max-items, {Param} }
LowerLayer-List {INTEGER : low, INTEGER : high, PACKET : Param} ::=
SEQUENCE (SIZE (low..high)) OF
SinglePacket {{Param}}
SinglePacket {PACKET : Param} ::=
Packet {{Param}}
Packet {PACKET : Param} ::= SEQUENCE {
id PACKET.&id ({Param}),
color PACKET.&color ({Param}{@id}),
value PACKET.&Value ({Param}{@id})
}
max-items INTEGER ::= 256
END
-- OK: Everything is fine
-- iso.org.dod.internet.private.enterprise (1.3.6.1.4.1)
-- .spelio.software.asn1c.test (9363.1.5.1)
-- .156
ModuleParameterizationMoreThanTwoLevel
{ iso org(3) dod(6) internet(1) private(4) enterprise(1)
spelio(9363) software(1) asn1c(5) test(1) 156 }
DEFINITIONS ::= BEGIN
TOTAL-CLASS SAMPLE-CLASS ::= {
CLASS-1 |
CLASS-2,
...
}
CLASS-1 SAMPLE-CLASS ::= {
item1-1 |
item1-2,
...,
item1-3
}
CLASS-2 SAMPLE-CLASS ::= {
item2-1,
...,
item2-2 |
item2-3
}
SAMPLE-CLASS ::= CLASS {
&id RELATIVE-OID UNIQUE,
&code ENUMERATED { request, response, status }
DEFAULT request,
&Type OPTIONAL
} WITH SYNTAX { [TYPE &Type] [WITH CODE &code] IDENTIFIED BY &id }
item1-1 SAMPLE-CLASS ::= { IDENTIFIED BY id1-1 }
item1-2 SAMPLE-CLASS ::= { WITH CODE 1 IDENTIFIED BY id1-2 }
item1-3 SAMPLE-CLASS ::= { TYPE SampleType WITH CODE 2 IDENTIFIED BY id1-3 }
item2-1 SAMPLE-CLASS ::= { IDENTIFIED BY id2-1 }
item2-2 SAMPLE-CLASS ::= { WITH CODE 1 IDENTIFIED BY id2-2 }
item2-3 SAMPLE-CLASS ::= { TYPE SampleType WITH CODE 2 IDENTIFIED BY id2-3 }
id1-1 RELATIVE-OID ::= { 1 1 }
id1-2 RELATIVE-OID ::= { 1 2 }
id1-3 RELATIVE-OID ::= { 1 3 }
id2-1 RELATIVE-OID ::= { 2 1 }
id2-2 RELATIVE-OID ::= { 2 2 }
id2-3 RELATIVE-OID ::= { 2 3 }
SampleType ::= SEQUENCE { ... }
Salt ::= SET { ... }
END
ModuleParameterizationMoreThanTwoLevel { iso org(3) dod(6) internet(1)
private(4) enterprise(1) spelio(9363) software(1) asn1c(5) test(1)
156 }
DEFINITIONS ::=
BEGIN
TOTAL-CLASS SAMPLE-CLASS ::= {({ IDENTIFIED BY id1-1 } | { WITH CODE 1 IDENTIFIED BY id1-2 }) ({ IDENTIFIED BY id1-1 } | { WITH CODE 1 IDENTIFIED BY id1-2 }) | ({ IDENTIFIED BY id2-1 }) ({ IDENTIFIED BY id2-1 }),...}
-- Information Object Set has 4 entries:
-- [ &id][ &code][ &Type]
-- [1] id1-1 <no entry> <no entry>
-- [2] id1-2 1 <no entry>
-- [3] id2-2 1 <no entry>
-- [4] id2-3 2 SampleType
CLASS-1 SAMPLE-CLASS ::= {{ IDENTIFIED BY id1-1 } | { WITH CODE 1 IDENTIFIED BY id1-2 },...,{ TYPE SampleType WITH CODE 2 IDENTIFIED BY id1-3 }}
-- Information Object Set has 2 entries:
-- [ &id][&code][&Type]
-- [1] id1-1 <no entry> <no entry>
-- [2] id1-2 1 <no entry>
-- [ ] ...
CLASS-2 SAMPLE-CLASS ::= {{ IDENTIFIED BY id2-1 },...,{ WITH CODE 1 IDENTIFIED BY id2-2 } | { TYPE SampleType WITH CODE 2 IDENTIFIED BY id2-3 }}
-- Information Object Set has 2 entries:
-- [ &id][ &code][ &Type]
-- [1] id2-2 1 <no entry>
-- [2] id2-3 2 SampleType
-- [ ] ...
SAMPLE-CLASS ::= CLASS {
&id RELATIVE-OID UNIQUE,
&code ENUMERATED {
request(0),
response(1),
status(2)
} DEFAULT 0,
&Type OPTIONAL
} WITH SYNTAX { [TYPE &Type] [WITH CODE &code] IDENTIFIED BY &id }
-- Information Object Set has 6 entries:
-- [ &id][ &code][ &Type]
-- [1] id1-1 <no entry> <no entry>
-- [2] id1-2 1 <no entry>
-- [3] id2-2 1 <no entry>
-- [4] id2-3 2 SampleType
-- [5] id1-3 2 SampleType
-- [6] id2-1 <no entry> <no entry>
item1-1 SAMPLE-CLASS ::= { IDENTIFIED BY id1-1 }
-- Information Object Set has 1 entry:
-- [ &id][&code][&Type]
-- [1] id1-1 <no entry> <no entry>
item1-2 SAMPLE-CLASS ::= { WITH CODE 1 IDENTIFIED BY id1-2 }
-- Information Object Set has 1 entry:
-- [ &id][&code][&Type]
-- [1] id1-2 1 <no entry>
item1-3 SAMPLE-CLASS ::= { TYPE SampleType WITH CODE 2 IDENTIFIED BY id1-3 }
-- Information Object Set has 1 entry:
-- [ &id][ &code][ &Type]
-- [1] id1-3 2 SampleType
item2-1 SAMPLE-CLASS ::= { IDENTIFIED BY id2-1 }
-- Information Object Set has 1 entry:
-- [ &id][&code][&Type]
-- [1] id2-1 <no entry> <no entry>
item2-2 SAMPLE-CLASS ::= { WITH CODE 1 IDENTIFIED BY id2-2 }
-- Information Object Set has 1 entry:
-- [ &id][&code][&Type]
-- [1] id2-2 1 <no entry>
item2-3 SAMPLE-CLASS ::= { TYPE SampleType WITH CODE 2 IDENTIFIED BY id2-3 }
-- Information Object Set has 1 entry:
-- [ &id][ &code][ &Type]
-- [1] id2-3 2 SampleType
id1-1 RELATIVE-OID ::= { 1 1 }
id1-2 RELATIVE-OID ::= { 1 2 }
id1-3 RELATIVE-OID ::= { 1 3 }
id2-1 RELATIVE-OID ::= { 2 1 }
id2-2 RELATIVE-OID ::= { 2 2 }
id2-3 RELATIVE-OID ::= { 2 3 }
SampleType ::= SEQUENCE {
...
}
Salt ::= SET {
...
}
END
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment