2 * Copyright (c) 2017 Lev Walkin <vlm@lionet.info>.
4 * Redistribution and modifications are permitted subject to BSD license.
6 #include <asn_internal.h>
7 #include <constr_SEQUENCE_OF.h>
8 #include <asn_SEQUENCE_OF.h>
11 SEQUENCE_OF_encode_xer(const asn_TYPE_descriptor_t *td, const void *sptr,
12 int ilevel, enum xer_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
20 : ((*elm->name) ? elm->name : elm->type->xml_tag);
21 size_t mlen = mname ? strlen(mname) : 0;
22 int xcan = (flags & XER_F_CANONICAL);
25 if(!sptr) ASN__ENCODE_FAILED;
29 for(i = 0; i < list->count; i++) {
30 asn_enc_rval_t tmper = {0,0,0};
31 void *memb_ptr = list->array[i];
32 if(!memb_ptr) continue;
35 if(!xcan) ASN__TEXT_INDENT(1, ilevel);
36 ASN__CALLBACK3("<", 1, mname, mlen, ">", 1);
39 tmper = elm->type->op->xer_encoder(elm->type, memb_ptr, ilevel + 1,
41 if(tmper.encoded == -1) return tmper;
42 er.encoded += tmper.encoded;
43 if(tmper.encoded == 0 && specs->as_XMLValueList) {
44 const char *name = elm->type->xml_tag;
45 size_t len = strlen(name);
46 if(!xcan) ASN__TEXT_INDENT(1, ilevel + 1);
47 ASN__CALLBACK3("<", 1, name, len, "/>", 2);
51 ASN__CALLBACK3("</", 2, mname, mlen, ">", 1);
55 if(!xcan) ASN__TEXT_INDENT(1, ilevel - 1);