Commit | Line | Data |
---|---|---|
970ed795 EL |
1 | --///////////////////////////////////////////////////////////////////////////// |
2 | -- Copyright (c) 2000-2014 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 | VIRAG | |
9 | DEFINITIONS | |
10 | ||
11 | AUTOMATIC TAGS | |
12 | EXTENSIBILITY IMPLIED | |
13 | ||
14 | ::= | |
15 | ||
16 | BEGIN | |
17 | ||
18 | IMPORTS ; | |
19 | ||
20 | VIRAG-EXTERNAL ::= [UNIVERSAL 8] IMPLICIT SEQUENCE { | |
21 | identification CHOICE { | |
22 | syntaxes SEQUENCE { | |
23 | abstract OBJECT IDENTIFIER, | |
24 | transfer OBJECT IDENTIFIER | |
25 | }, | |
26 | syntax OBJECT IDENTIFIER, | |
27 | presentation-context-id INTEGER, | |
28 | context-negotiation SEQUENCE { | |
29 | presentation-context-id INTEGER, | |
30 | transfer-syntax OBJECT IDENTIFIER | |
31 | }, | |
32 | transfer-syntax OBJECT IDENTIFIER, | |
33 | fixed NULL | |
34 | }, | |
35 | data-value-descriptor ObjectDescriptor OPTIONAL, | |
36 | data-value OCTET STRING | |
37 | } (WITH COMPONENTS { | |
38 | ..., | |
39 | identification (WITH COMPONENTS { | |
40 | ..., | |
41 | syntaxes ABSENT, | |
42 | transfer-syntax ABSENT, | |
43 | fixed ABSENT | |
44 | }) | |
45 | }) | |
46 | ||
47 | VIRAG-EMBEDDED-PDV ::= [UNIVERSAL 11] IMPLICIT SEQUENCE { | |
48 | identification CHOICE { | |
49 | syntaxes SEQUENCE { | |
50 | abstract OBJECT IDENTIFIER, | |
51 | transfer OBJECT IDENTIFIER | |
52 | }, | |
53 | syntax OBJECT IDENTIFIER, | |
54 | presentation-context-id INTEGER, | |
55 | context-negotiation SEQUENCE { | |
56 | presentation-context-id INTEGER, | |
57 | transfer-syntax OBJECT IDENTIFIER | |
58 | }, | |
59 | transfer-syntax OBJECT IDENTIFIER, | |
60 | fixed NULL | |
61 | }, | |
62 | data-value-descriptor ObjectDescriptor OPTIONAL, | |
63 | data-value OCTET STRING | |
64 | } (WITH COMPONENTS { | |
65 | ..., | |
66 | data-value-descriptor ABSENT | |
67 | }) | |
68 | ||
69 | VIRAG-CHARACTER-STRING ::= [UNIVERSAL 29] IMPLICIT SEQUENCE { | |
70 | identification CHOICE { | |
71 | syntaxes SEQUENCE { | |
72 | abstract OBJECT IDENTIFIER, | |
73 | transfer OBJECT IDENTIFIER | |
74 | }, | |
75 | syntax OBJECT IDENTIFIER, | |
76 | presentation-context-id INTEGER, | |
77 | context-negotiation SEQUENCE { | |
78 | presentation-context-id INTEGER, | |
79 | transfer-syntax OBJECT IDENTIFIER | |
80 | }, | |
81 | transfer-syntax OBJECT IDENTIFIER, | |
82 | fixed NULL | |
83 | }, | |
84 | data-value-descriptor ObjectDescriptor OPTIONAL, | |
85 | string-value OCTET STRING | |
86 | } (WITH COMPONENTS { | |
87 | ..., | |
88 | data-value-descriptor ABSENT | |
89 | }) | |
90 | ||
91 | VIRAG-REAL ::= [UNIVERSAL 9] IMPLICIT SEQUENCE { | |
92 | mantissa INTEGER, | |
93 | base INTEGER (2|10), | |
94 | exponent INTEGER | |
95 | } | |
96 | ||
97 | VIRAG-TYPE-IDENTIFIER ::= CLASS | |
98 | { | |
99 | &id OBJECT IDENTIFIER UNIQUE, | |
100 | &Type | |
101 | } | |
102 | WITH SYNTAX { | |
103 | &Type IDENTIFIED BY &id | |
104 | } | |
105 | ||
106 | VIRAG-ABSTRACT-SYNTAX ::= CLASS { | |
107 | &id OBJECT IDENTIFIER UNIQUE, | |
108 | &Type, | |
109 | &property BIT STRING {handles-invalid-encodings(0)} DEFAULT {} | |
110 | } | |
111 | WITH SYNTAX { | |
112 | &Type IDENTIFIED BY &id [HAS PROPERTY &property] | |
113 | } | |
114 | ||
115 | END |