d4f6af9448ef08ca21ec14448acc57723e60995b
[obnox/wireshark/wip.git] / asn1 / ftam / ftam.cnf
1 # FTAM.cnf
2 # FTAM conformation file
3
4 # $Id$
5
6 #.MODULE_IMPORT
7 ACSE-1 acse
8
9 #.INCLUDE ../acse/acse-exp.cnf
10
11 #.EXPORTS
12 Attribute-Extensions
13 Concurrency-Access
14 Date-and-Time-Attribute
15 Legal-Qualification-Attribute
16 Object-Availability-Attribute
17 Object-Size-Attribute
18 Pathname
19 Permitted-Actions-Attribute
20 Private-Use-Attribute
21
22 #.PDU
23
24 #.NO_EMIT
25
26 #.TYPE_RENAME
27 F-OPEN-request/recovery-mode    T_request_recovery_mode
28 F-OPEN-response/recovery-mode   T_response_recovery_mode
29 Access-Control-Change-Attribute/actual-values   T_actual_values1
30
31 #.FIELD_RENAME
32 F-OPEN-request/recovery-mode    request_recovery_mode
33 F-OPEN-response/recovery-mode   response_recovery_mode
34 Concurrency-Control/replace     replace_lock
35 Concurrency-Access/replace      replace_key
36 Concurrency-Control/read-attribute      read_attribute_lock
37 Concurrency-Access/read-attribute       read_attribute_key
38 Concurrency-Control/read        read_lock
39 Concurrency-Access/read         read_key
40 Concurrency-Control/insert      insert_lock
41 Concurrency-Access/insert       insert_key
42 Concurrency-Control/extend      extend_lock
43 Concurrency-Access/extend       extend_key
44 Concurrency-Control/erase       erase_lock
45 Concurrency-Access/erase        erase_key
46 Concurrency-Control/change-attribute    change_attribute_lock
47 Concurrency-Access/change-attribute     change_attribute_key
48 Concurrency-Control/delete-Object       delete_Object_lock
49 Concurrency-Access/delete-Object        delete_Object_key
50 F-READ-request/access-context           read_access_context
51 Change-Attributes/path-access-control   change_path_access_control
52 Create-Attributes/path-access-control   create_path_access_control
53 Attribute-Extensions-Pattern/_item/extension-set-attribute-Patterns/_item/extension-attribute-identifier        attribute_extension_attribute_identifier
54 F-OPEN-request/contents-type            open_contents_type
55 F-READ-ATTRIB-response/attributes       read_attributes
56 F-READ-LINK-ATTRIB-response/attributes  read_link_attributes
57 F-SELECT-request/attributes             select_attributes
58 F-SELECT-response/attributes            select_attributes
59 Change-Attributes/access-control        change_attributes_access_control
60 Access-Control-Change-Attribute/actual-values   actual_values1
61 Account-Attribute/actual-values actual_values2
62 Access-Control-Attribute/actual-values  actual_values3
63 Private-Use-Attribute/actual-values     actual_values4
64 Date-and-Time-Attribute/actual-values   actual_values5
65 User-Identity-Attribute/actual-values   actual_values6
66 Object-Size-Attribute/actual-values     actual_values7
67 Object-Availability-Attribute/actual-values     actual_values8
68 Legal-Qualification-Attribute/actual-values     actual_values9
69
70 #.FN_PARS Extension-Attribute/extension-attribute-identifier
71         VAL_PTR = object_identifier_id
72
73
74
75 #.FN_BODY Contents-Type-Attribute/document-type/parameter
76   offset=call_ber_oid_callback(object_identifier_id, tvb, offset, pinfo, tree);
77
78 #.FN_BODY Extension-Attribute/extension-attribute
79   offset=call_ber_oid_callback(object_identifier_id, tvb, offset, pinfo, tree);
80
81 #.FN_PARS Attribute-Extensions-Pattern/_item/extension-set-attribute-Patterns/_item/extension-attribute-identifier
82         VAL_PTR = object_identifier_id
83
84 #.FN_BODY Attribute-Extensions-Pattern/_item/extension-set-attribute-Patterns/_item/extension-attribute-Pattern
85   offset=call_ber_oid_callback(object_identifier_id, tvb, offset, pinfo, tree);
86
87 #.FN_BODY AP-title
88         /* XXX have no idea about this one */
89 #.FN_BODY AE-qualifier
90         /* XXX have no idea about this one */
91
92 #.FN_BODY Implementation-Information
93  gint8 class;
94  gboolean pc, ind_field;
95  gint32 tag;
96  guint32 len1;
97
98  if(!implicit_tag){
99    /* XXX  asn2eth can not yet handle tagged assignment yes so this
100     * XXX is some conformance file magic to work around that bug
101     */
102     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
103     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
104  }
105   offset = dissect_ber_restricted_string(TRUE, 1,
106                                          pinfo, tree, tvb, offset, hf_index,
107                                          NULL);
108
109 #.FN_BODY Protocol-Version
110  gint8 class;
111  gboolean pc, ind_field;
112  gint32 tag;
113  guint32 len1;
114
115  if(!implicit_tag){
116    /* XXX  asn2eth can not yet handle tagged assignment yes so this
117     * XXX is some conformance file magic to work around that bug
118     */
119     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
120     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
121  }
122   offset = dissect_ber_bitstring(TRUE, pinfo, tree, tvb, offset,
123                                  Protocol_Version_bits, hf_index, ett_ftam_Protocol_Version,
124                                  NULL);
125
126 #.FN_BODY Service-Class
127  gint8 class;
128  gboolean pc, ind_field;
129  gint32 tag;
130  guint32 len1;
131
132  if(!implicit_tag){
133    /* XXX  asn2eth can not yet handle tagged assignment yes so this
134     * XXX is some conformance file magic to work around that bug
135     */
136     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
137     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
138  }
139   offset = dissect_ber_bitstring(TRUE, pinfo, tree, tvb, offset,
140                                  Service_Class_bits, hf_index, ett_ftam_Service_Class,
141                                  NULL);
142
143 #.FN_BODY Functional-Units
144  gint8 class;
145  gboolean pc, ind_field;
146  gint32 tag;
147  guint32 len1;
148
149  if(!implicit_tag){
150    /* XXX  asn2eth can not yet handle tagged assignment yes so this
151     * XXX is some conformance file magic to work around that bug
152     */
153     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
154     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
155  }
156   offset = dissect_ber_bitstring(TRUE, pinfo, tree, tvb, offset,
157                                  Functional_Units_bits, hf_index, ett_ftam_Functional_Units,
158                                  NULL);
159
160
161 #.FN_BODY Attribute-Groups
162  gint8 class;
163  gboolean pc, ind_field;
164  gint32 tag;
165  guint32 len1;
166
167  if(!implicit_tag){
168    /* XXX  asn2eth can not yet handle tagged assignment yes so this
169     * XXX is some conformance file magic to work around that bug
170     */
171     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
172     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
173  }
174   offset = dissect_ber_bitstring(TRUE, pinfo, tree, tvb, offset,
175                                  Attribute_Groups_bits, hf_index, ett_ftam_Attribute_Groups,
176                                  NULL);
177
178
179 #.FN_BODY FTAM-Quality-of-Service
180  gint8 class;
181  gboolean pc, ind_field;
182  gint32 tag;
183  guint32 len1;
184
185  if(!implicit_tag){
186    /* XXX  asn2eth can not yet handle tagged assignment yes so this
187     * XXX is some conformance file magic to work around that bug
188     */
189     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
190     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
191  }
192   offset = dissect_ber_integer(TRUE, pinfo, tree, tvb, offset, hf_index,
193                                   NULL);
194
195 #.FN_BODY Contents-Type-List
196  gint8 class;
197  gboolean pc, ind_field;
198  gint32 tag;
199  guint32 len1;
200
201  if(!implicit_tag){
202    /* XXX  asn2eth can not yet handle tagged assignment yes so this
203     * XXX is some conformance file magic to work around that bug
204     */
205     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
206     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
207  }
208   offset = dissect_ber_sequence_of(TRUE, pinfo, tree, tvb, offset,
209                                    Contents_Type_List_sequence_of, hf_index, ett_ftam_Contents_Type_List);
210
211
212 #.FN_BODY Degree-Of-Overlap
213  gint8 class;
214  gboolean pc, ind_field;
215  gint32 tag;
216  guint32 len1;
217
218  if(!implicit_tag){
219    /* XXX  asn2eth can not yet handle tagged assignment yes so this
220     * XXX is some conformance file magic to work around that bug
221     */
222     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
223     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
224  }
225   offset = dissect_ber_integer(TRUE, pinfo, tree, tvb, offset, hf_index,
226                                   NULL);
227
228 #.FN_BODY Request-Type
229  gint8 class;
230  gboolean pc, ind_field;
231  gint32 tag;
232  guint32 len1;
233
234  if(!implicit_tag){
235    /* XXX  asn2eth can not yet handle tagged assignment yes so this
236     * XXX is some conformance file magic to work around that bug
237     */
238     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
239     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
240  }
241   offset = dissect_ber_integer(TRUE, pinfo, tree, tvb, offset, hf_index,
242                                   NULL);
243
244 #.FN_BODY Abstract-Syntax-Name
245  gint8 class;
246  gboolean pc, ind_field;
247  gint32 tag;
248  guint32 len1;
249
250  if(!implicit_tag){
251    /* XXX  asn2eth can not yet handle tagged assignment yes so this
252     * XXX is some conformance file magic to work around that bug
253     */
254     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
255     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
256  }
257   offset = dissect_ber_object_identifier(TRUE, pinfo, tree, tvb, offset, hf_index,
258                                             NULL);
259
260
261 #.FN_BODY Access-Context
262  gint8 class;
263  gboolean pc, ind_field;
264  gint32 tag;
265  guint32 len1;
266
267  if(!implicit_tag){
268    /* XXX  asn2eth can not yet handle tagged assignment yes so this
269     * XXX is some conformance file magic to work around that bug
270     */
271     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
272     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
273  }
274   offset = dissect_ber_sequence(TRUE, pinfo, tree, tvb, offset,
275                                 Access_Context_sequence, hf_index, ett_ftam_Access_Context);
276
277 #.FN_BODY Access-Passwords
278  gint8 class;
279  gboolean pc, ind_field;
280  gint32 tag;
281  guint32 len1;
282
283  if(!implicit_tag){
284    /* XXX  asn2eth can not yet handle tagged assignment yes so this
285     * XXX is some conformance file magic to work around that bug
286     */
287     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
288     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
289  }
290   offset = dissect_ber_sequence(TRUE, pinfo, tree, tvb, offset,
291                                 Access_Passwords_sequence, hf_index, ett_ftam_Access_Passwords);
292
293 #.FN_BODY Access-Request
294  gint8 class;
295  gboolean pc, ind_field;
296  gint32 tag;
297  guint32 len1;
298
299    if(!implicit_tag){
300      /* XXX  asn2eth can not yet handle tagged assignment yes so this
301       * XXX is some conformance file magic to work around that bug
302       */
303       offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
304       offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
305   }
306   offset = dissect_ber_bitstring(TRUE, pinfo, tree, tvb, offset,
307                                  Access_Request_bits, hf_index, ett_ftam_Access_Request,
308                                  NULL);
309 #.FN_BODY Account
310  gint8 class;
311  gboolean pc, ind_field;
312  gint32 tag;
313  guint32 len1;
314
315  if(!implicit_tag){
316    /* XXX  asn2eth can not yet handle tagged assignment yes so this
317     * XXX is some conformance file magic to work around that bug
318     */
319     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
320     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
321  }
322   offset = dissect_ber_restricted_string(TRUE, 4,
323                                          pinfo, tree, tvb, offset, hf_index,
324                                          NULL);
325 #.FN_BODY Action-Result
326  gint8 class;
327  gboolean pc, ind_field;
328  gint32 tag;
329  guint32 len1;
330
331  if(!implicit_tag){
332    /* XXX  asn2eth can not yet handle tagged assignment yes so this
333     * XXX is some conformance file magic to work around that bug
334     */
335     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
336     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
337  }
338   offset = dissect_ber_integer(TRUE, pinfo, tree, tvb, offset, hf_index,
339                                   NULL);
340
341
342 #.FN_BODY Activity-Identifier
343  gint8 class;
344  gboolean pc, ind_field;
345  gint32 tag;
346  guint32 len1;
347
348  if(!implicit_tag){
349    /* XXX  asn2eth can not yet handle tagged assignment yes so this
350     * XXX is some conformance file magic to work around that bug
351     */
352     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
353     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
354  }
355   offset = dissect_ber_integer(TRUE, pinfo, tree, tvb, offset, hf_index,
356                                   NULL);
357
358 #.FN_BODY Change-Attributes
359  gint8 class;
360  gboolean pc, ind_field;
361  gint32 tag;
362  guint32 len1;
363
364  if(!implicit_tag){
365    /* XXX  asn2eth can not yet handle tagged assignment yes so this
366     * XXX is some conformance file magic to work around that bug
367     */
368     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
369     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
370  }
371   offset = dissect_ber_sequence(TRUE, pinfo, tree, tvb, offset,
372                                 Change_Attributes_sequence, hf_index, ett_ftam_Change_Attributes);
373
374
375 #.FN_BODY Charging
376  gint8 class;
377  gboolean pc, ind_field;
378  gint32 tag;
379  guint32 len1;
380
381  if(!implicit_tag){
382    /* XXX  asn2eth can not yet handle tagged assignment yes so this
383     * XXX is some conformance file magic to work around that bug
384     */
385     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
386     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
387  }
388   offset = dissect_ber_sequence_of(TRUE, pinfo, tree, tvb, offset,
389                                    Charging_sequence_of, hf_index, ett_ftam_Charging);
390
391
392 #.FN_BODY Concurrency-Control
393  gint8 class;
394  gboolean pc, ind_field;
395  gint32 tag;
396  guint32 len1;
397
398  if(!implicit_tag){
399    /* XXX  asn2eth can not yet handle tagged assignment yes so this
400     * XXX is some conformance file magic to work around that bug
401     */
402     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
403     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
404  }
405   offset = dissect_ber_sequence(TRUE, pinfo, tree, tvb, offset,
406                                 Concurrency_Control_sequence, hf_index, ett_ftam_Concurrency_Control);
407
408
409 #.FN_BODY Constraint-Set-Name
410  gint8 class;
411  gboolean pc, ind_field;
412  gint32 tag;
413  guint32 len1;
414
415  if(!implicit_tag){
416    /* XXX  asn2eth can not yet handle tagged assignment yes so this
417     * XXX is some conformance file magic to work around that bug
418     */
419     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
420     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
421  }
422   offset = dissect_ber_object_identifier(TRUE, pinfo, tree, tvb, offset, hf_index,
423                                             NULL);
424
425 #.FN_BODY Create-Attributes
426  gint8 class;
427  gboolean pc, ind_field;
428  gint32 tag;
429  guint32 len1;
430
431  if(!implicit_tag){
432    /* XXX  asn2eth can not yet handle tagged assignment yes so this
433     * XXX is some conformance file magic to work around that bug
434     */
435     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
436     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
437  }
438   offset = dissect_ber_sequence(TRUE, pinfo, tree, tvb, offset,
439                                 Create_Attributes_sequence, hf_index, ett_ftam_Create_Attributes);
440
441 #.FN_BODY Diagnostic
442  gint8 class;
443  gboolean pc, ind_field;
444  gint32 tag;
445  guint32 len1;
446
447  if(!implicit_tag){
448    /* XXX  asn2eth can not yet handle tagged assignment yes so this
449     * XXX is some conformance file magic to work around that bug
450     */
451     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
452     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
453  }
454   offset = dissect_ber_sequence_of(TRUE, pinfo, tree, tvb, offset,
455                                    Diagnostic_sequence_of, hf_index, ett_ftam_Diagnostic);
456
457
458 #.FN_BODY Document-Type-Name
459  gint8 class;
460  gboolean pc, ind_field;
461  gint32 tag;
462  guint32 len1;
463
464  if(!implicit_tag){
465    /* XXX  asn2eth can not yet handle tagged assignment yes so this
466     * XXX is some conformance file magic to work around that bug
467     */
468     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
469     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
470  }
471   offset = dissect_ber_object_identifier(TRUE, pinfo, tree, tvb, offset,
472                                          hf_index, object_identifier_id);
473
474 #.FN_BODY FADU-Lock
475  gint8 class;
476  gboolean pc, ind_field;
477  gint32 tag;
478  guint32 len1;
479
480  if(!implicit_tag){
481    /* XXX  asn2eth can not yet handle tagged assignment yes so this
482     * XXX is some conformance file magic to work around that bug
483     */
484     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
485     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
486  }
487   offset = dissect_ber_integer(TRUE, pinfo, tree, tvb, offset, hf_index,
488                                   NULL);
489
490 #.FN_BODY Read-Attributes
491  gint8 class;
492  gboolean pc, ind_field;
493  gint32 tag;
494  guint32 len1;
495
496  if(!implicit_tag){
497    /* XXX  asn2eth can not yet handle tagged assignment yes so this
498     * XXX is some conformance file magic to work around that bug
499     */
500     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
501     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
502  }
503   offset = dissect_ber_sequence(TRUE, pinfo, tree, tvb, offset,
504                                 Read_Attributes_sequence, hf_index, ett_ftam_Read_Attributes);
505
506 #.FN_BODY Select-Attributes
507  gint8 class;
508  gboolean pc, ind_field;
509  gint32 tag;
510  guint32 len1;
511
512  if(!implicit_tag){
513    /* XXX  asn2eth can not yet handle tagged assignment yes so this
514     * XXX is some conformance file magic to work around that bug
515     */
516     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
517     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
518  }
519   offset = dissect_ber_sequence(TRUE, pinfo, tree, tvb, offset,
520                                 Select_Attributes_sequence, hf_index, ett_ftam_Select_Attributes);
521
522 #.FN_BODY State-Result
523  gint8 class;
524  gboolean pc, ind_field;
525  gint32 tag;
526  guint32 len1;
527
528  if(!implicit_tag){
529    /* XXX  asn2eth can not yet handle tagged assignment yes so this
530     * XXX is some conformance file magic to work around that bug
531     */
532     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
533     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
534  }
535   offset = dissect_ber_integer(TRUE, pinfo, tree, tvb, offset, hf_index,
536                                   NULL);
537
538 #.FN_BODY User-Identity
539  gint8 class;
540  gboolean pc, ind_field;
541  gint32 tag;
542  guint32 len1;
543
544  if(!implicit_tag){
545    /* XXX  asn2eth can not yet handle tagged assignment yes so this
546     * XXX is some conformance file magic to work around that bug
547     */
548     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
549     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
550  }
551   offset = dissect_ber_restricted_string(TRUE, 22,
552                                          pinfo, tree, tvb, offset, hf_index,
553                                          NULL);
554 #.FN_BODY Scope
555  gint8 class;
556  gboolean pc, ind_field;
557  gint32 tag;
558  guint32 len1;
559
560  if(!implicit_tag){
561    /* XXX  asn2eth can not yet handle tagged assignment yes so this
562     * XXX is some conformance file magic to work around that bug
563     */
564     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
565     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
566  }
567   offset = dissect_ber_sequence_of(TRUE, pinfo, tree, tvb, offset,
568                                    Scope_sequence_of, hf_index, ett_ftam_Scope);
569
570 #.FN_BODY Objects-Attributes-List
571  gint8 class;
572  gboolean pc, ind_field;
573  gint32 tag;
574  guint32 len1;
575
576  if(!implicit_tag){
577    /* XXX  asn2eth can not yet handle tagged assignment yes so this
578     * XXX is some conformance file magic to work around that bug
579     */
580     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
581     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
582  }
583   offset = dissect_ber_sequence_of(TRUE, pinfo, tree, tvb, offset,
584                                    Objects_Attributes_List_sequence_of, hf_index, ett_ftam_Objects_Attributes_List);
585
586
587 #.FN_BODY Path-Access-Passwords
588  gint8 class;
589  gboolean pc, ind_field;
590  gint32 tag;
591  guint32 len1;
592
593  if(!implicit_tag){
594    /* XXX  asn2eth can not yet handle tagged assignment yes so this
595     * XXX is some conformance file magic to work around that bug
596     */
597     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
598     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
599  }
600   offset = dissect_ber_sequence_of(TRUE, pinfo, tree, tvb, offset,
601                                    Path_Access_Passwords_sequence_of, hf_index, ett_ftam_Path_Access_Passwords);
602
603 #.FN_BODY Request-Operation-Result
604  gint8 class;
605  gboolean pc, ind_field;
606  gint32 tag;
607  guint32 len1;
608
609  if(!implicit_tag){
610    /* XXX  asn2eth can not yet handle tagged assignment yes so this
611     * XXX is some conformance file magic to work around that bug
612     */
613     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
614     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
615  }
616   offset = dissect_ber_integer(TRUE, pinfo, tree, tvb, offset, hf_index,
617                                   NULL);
618
619 #.FN_BODY Shared-ASE-Informatio
620  gint8 class;
621  gboolean pc, ind_field;
622  gint32 tag;
623  guint32 len1;
624
625  if(!implicit_tag){
626    /* XXX  asn2eth can not yet handle tagged assignment yes so this
627     * XXX is some conformance file magic to work around that bug
628     */
629     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
630     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
631  }
632   offset = dissect_acse_EXTERNAL(TRUE, tvb, offset, pinfo, tree, hf_index);
633
634 #.FN_BODY Attribute-Value-Assertions
635  gint8 class;
636  gboolean pc, ind_field;
637  gint32 tag;
638  guint32 len1;
639
640  if(!implicit_tag){
641    /* XXX  asn2eth can not yet handle tagged assignment yes so this
642     * XXX is some conformance file magic to work around that bug
643     */
644     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
645     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
646  }
647   offset = dissect_ftam_OR_Set(TRUE, tvb, offset, pinfo, tree, hf_index);
648
649 #.FN_BODY Referent-Indicator
650  gint8 class;
651  gboolean pc, ind_field;
652  gint32 tag;
653  guint32 len1;
654
655  if(!implicit_tag){
656    /* XXX  asn2eth can not yet handle tagged assignment yes so this
657     * XXX is some conformance file magic to work around that bug
658     */
659     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
660     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
661  }
662   offset = dissect_ber_boolean(TRUE, pinfo, tree, tvb, offset, hf_index);
663
664 #.FN_BODY Password
665  gint8 class;
666  gboolean pc, ind_field;
667  gint32 tag;
668  guint32 len1;
669
670  if(!implicit_tag){
671    /* XXX  asn2eth can not yet handle tagged assignment yes so this
672     * XXX is some conformance file magic to work around that bug
673     */
674     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
675     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
676  }
677   offset = dissect_ber_choice(pinfo, tree, tvb, offset,
678                               Password_choice, hf_index, ett_ftam_Password, NULL);
679
680
681 #.FN_BODY FADU-Identity
682  gint8 class;
683  gboolean pc, ind_field;
684  gint32 tag;
685  guint32 len1;
686
687  if(!implicit_tag){
688    /* XXX  asn2eth can not yet handle tagged assignment yes so this
689     * XXX is some conformance file magic to work around that bug
690     */
691     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
692     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
693  }
694   offset = dissect_ber_choice(pinfo, tree, tvb, offset,
695                               FADU_Identity_choice, hf_index, ett_ftam_FADU_Identity, NULL);
696
697 #.FN_BODY Operation-Result
698  gint8 class;
699  gboolean pc, ind_field;
700  gint32 tag;
701  guint32 len1;
702
703  if(!implicit_tag){
704    /* XXX  asn2eth can not yet handle tagged assignment yes so this
705     * XXX is some conformance file magic to work around that bug
706     */
707     offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
708     offset = get_ber_length(tree, tvb, offset, &len1, &ind_field);
709  }
710   offset = dissect_ber_choice(pinfo, tree, tvb, offset,
711                               Operation_Result_choice, hf_index, ett_ftam_Operation_Result, NULL);
712 #.FN_PARS FTAM-Regime-PDU
713         VAL_PTR = &branch_taken
714
715 #.FN_BODY FTAM-Regime-PDU
716   gint branch_taken;
717
718   %(DEFAULT_BODY)s
719   
720   if( (branch_taken!=-1) && ftam_FTAM_Regime_PDU_vals[branch_taken].strptr ){
721         if (check_col(pinfo->cinfo, COL_INFO)) {
722                 col_append_fstr(pinfo->cinfo, COL_INFO, " %%s:", ftam_FTAM_Regime_PDU_vals[branch_taken].strptr);
723         }
724   }
725
726 #.FN_PARS File-PDU
727         VAL_PTR = &branch_taken
728
729 #.FN_BODY File-PDU
730   gint branch_taken;
731
732   %(DEFAULT_BODY)s
733
734   if( (branch_taken!=-1) && ftam_File_PDU_vals[branch_taken].strptr ){
735         if (check_col(pinfo->cinfo, COL_INFO)) {
736                 col_append_fstr(pinfo->cinfo, COL_INFO, " %%s:", ftam_File_PDU_vals[branch_taken].strptr);
737         }
738   }
739
740 #.FN_PARS Bulk-Data-PDU
741         VAL_PTR = &branch_taken
742
743 #.FN_BODY Bulk-Data-PDU
744   gint branch_taken;
745
746   %(DEFAULT_BODY)s
747
748   if( (branch_taken!=-1) && ftam_Bulk_Data_PDU_vals[branch_taken].strptr ){
749         if (check_col(pinfo->cinfo, COL_INFO)) {
750                 col_append_fstr(pinfo->cinfo, COL_INFO, " %%s:", ftam_Bulk_Data_PDU_vals[branch_taken].strptr);
751         }
752   }
753
754 #.FN_PARS FSM-PDU
755         VAL_PTR = &branch_taken
756
757 #.FN_BODY FSM-PDU
758   gint branch_taken;
759
760   %(DEFAULT_BODY)s
761
762   if( (branch_taken!=-1) && ftam_FSM_PDU_vals[branch_taken].strptr ){
763         if (check_col(pinfo->cinfo, COL_INFO)) {
764                 col_append_fstr(pinfo->cinfo, COL_INFO, " %%s:", ftam_FSM_PDU_vals[branch_taken].strptr);
765         }
766   }