e2sim/e2apv1sim/ASN1c/constr_TYPE.c

   1 /*-
   2  * Copyright (c) 2003, 2004 Lev Walkin <vlm@lionet.info>. All rights reserved.
   3  * Redistribution and modifications are permitted subject to BSD license.
   4  */
   5 #include <asn_internal.h>
   6 #include <constr_TYPE.h>
   7 #include <errno.h>
   8
   9 /*
  10  * Version of the ASN.1 infrastructure shipped with compiler.
  11  */
  12 int get_asn1c_environment_version() { return ASN1C_ENVIRONMENT_VERSION; }
  13
  14 static asn_app_consume_bytes_f _print2fp;
  15
  16 /*
  17  * Return the outmost tag of the type.
  18  */
  19 ber_tlv_tag_t
  20 asn_TYPE_outmost_tag(const asn_TYPE_descriptor_t *type_descriptor,
  21                 const void *struct_ptr, int tag_mode, ber_tlv_tag_t tag) {
  22
  23         if(tag_mode)
  24                 return tag;
  25
  26         if(type_descriptor->tags_count)
  27                 return type_descriptor->tags[0];
  28
  29         return type_descriptor->op->outmost_tag(type_descriptor, struct_ptr, 0, 0);
  30 }
  31
  32 /*
  33  * Print the target language's structure in human readable form.
  34  */
  35 int
  36 asn_fprint(FILE *stream, const asn_TYPE_descriptor_t *td,
  37            const void *struct_ptr) {
  38     if(!stream) stream = stdout;
  39     if(!td || !struct_ptr) {
  40         errno = EINVAL;
  41         return -1;
  42         }
  43
  44         /* Invoke type-specific printer */
  45     if(td->op->print_struct(td, struct_ptr, 1, _print2fp, stream)) {
  46         return -1;
  47     }
  48
  49     /* Terminate the output */
  50     if(_print2fp("\n", 1, stream)) {
  51         return -1;
  52     }
  53
  54     return fflush(stream);
  55 }
  56
  57 /* Dump the data into the specified stdio stream */
  58 static int
  59 _print2fp(const void *buffer, size_t size, void *app_key) {
  60         FILE *stream = (FILE *)app_key;
  61
  62         if(fwrite(buffer, 1, size, stream) != size)
  63                 return -1;
  64
  65         return 0;
  66 }
  67
  68
  69 /*
  70  * Some compilers do not support variable args macros.
  71  * This function is a replacement of ASN_DEBUG() macro.
  72  */
  73 void ASN_DEBUG_f(const char *fmt, ...);
  74 void ASN_DEBUG_f(const char *fmt, ...) {
  75         va_list ap;
  76         va_start(ap, fmt);
  77         vfprintf(stderr, fmt, ap);
  78         fprintf(stderr, "\n");
  79         va_end(ap);
  80 }