asn1/ftam/ftam.cnf

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