e2sim/asn1c/constr_SEQUENCE_OF_jer.c

   1 /*
   2  * Copyright (c) 2017 Lev Walkin <vlm@lionet.info>.
   3  * All rights reserved.
   4  * Redistribution and modifications are permitted subject to BSD license.
   5  */
   6 #include <asn_internal.h>
   7 #include <constr_SEQUENCE_OF.h>
   8 #include <asn_SEQUENCE_OF.h>
   9
  10 asn_enc_rval_t
  11 SEQUENCE_OF_encode_jer(const asn_TYPE_descriptor_t *td, const void *sptr,
  12                        int ilevel, enum jer_encoder_flags_e flags,
  13                        asn_app_consume_bytes_f *cb, void *app_key) {
  14     asn_enc_rval_t er = {0,0,0};
  15     const asn_SET_OF_specifics_t *specs = (const asn_SET_OF_specifics_t *)td->specifics;
  16     const asn_TYPE_member_t *elm = td->elements;
  17     const asn_anonymous_sequence_ *list = _A_CSEQUENCE_FROM_VOID(sptr);
  18     const char *mname = specs->as_XMLValueList
  19                             ? 0
  20                             : ((*elm->name) ? elm->name : elm->type->xml_tag);
  21     size_t mlen = mname ? strlen(mname) : 0;
  22     int xcan = 0;
  23     int i;
  24
  25     if(!sptr) ASN__ENCODE_FAILED;
  26
  27     er.encoded = 0;
  28     ASN__CALLBACK("[", 1);
  29
  30     for(i = 0; i < list->count; i++) {
  31         asn_enc_rval_t tmper = {0,0,0};
  32         void *memb_ptr = list->array[i];
  33         if(!memb_ptr) continue;
  34
  35         if(mname) {
  36             if(!xcan) ASN__TEXT_INDENT(1, ilevel);
  37             ASN__CALLBACK3("{\"", 2, mname, mlen, "\":", 2);
  38         }
  39
  40         tmper = elm->type->op->jer_encoder(elm->type, memb_ptr, ilevel + 1,
  41                                            flags, cb, app_key);
  42         if(tmper.encoded == -1) return tmper;
  43         er.encoded += tmper.encoded;
  44         if(tmper.encoded == 0 && specs->as_XMLValueList) {
  45             const char *name = elm->type->xml_tag;
  46             size_t len = strlen(name);
  47             if(!xcan) ASN__TEXT_INDENT(1, ilevel + 1);
  48             ASN__CALLBACK3("\"", 1, name, len, "\"", 1);
  49         }
  50
  51         if(mname) {
  52           ASN__CALLBACK("}", 1);
  53         }
  54         if (i != list->count - 1) {
  55           ASN__CALLBACK(",", 1);
  56         }
  57     }
  58
  59     if(!xcan) ASN__TEXT_INDENT(1, ilevel - 1);
  60     ASN__CALLBACK("]", 1);
  61
  62     ASN__ENCODED_OK(er);
  63 cb_failed:
  64     ASN__ENCODE_FAILED;
  65 }