X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=odr%2Fodr_seq.c;h=f135d8523f0a467a4a05d669265eacfc1a5d5117;hb=10981b2f116449523a9f628c20a78212ce91553e;hp=e2d0cbf943758cf8b06321f60d4b972eaaa592c9;hpb=b40d7c8dfa49bf5e6800688e1dfb1373856796a8;p=yaz-moved-to-github.git diff --git a/odr/odr_seq.c b/odr/odr_seq.c index e2d0cbf..f135d85 100644 --- a/odr/odr_seq.c +++ b/odr/odr_seq.c @@ -4,7 +4,13 @@ * Sebastian Hammer, Adam Dickmeiss * * $Log: odr_seq.c,v $ - * Revision 1.3 1995-02-07 14:13:46 quinn + * Revision 1.5 1995-02-09 15:51:49 quinn + * Works better now. + * + * Revision 1.4 1995/02/07 17:53:00 quinn + * A damn mess, but now things work, I think. + * + * Revision 1.3 1995/02/07 14:13:46 quinn * Bug fixes. * * Revision 1.2 1995/02/06 16:45:03 quinn @@ -16,6 +22,7 @@ */ #include +#include int odr_sequence_begin(ODR o, void *p, int size) { @@ -27,10 +34,17 @@ int odr_sequence_begin(ODR o, void *p, int size) o->t_tag = ODR_SEQUENCE; } - if (odr_constructed_begin(o, p, o->t_class, o->t_tag, 0)) + if (o->direction == ODR_DECODE) + *pp = 0; + if (odr_constructed_begin(o, p, o->t_class, o->t_tag)) { if (o->direction == ODR_DECODE && size) *pp = nalloc(o, size); + if (o->direction == ODR_PRINT) + { + fprintf(o->print, "%s{\n", odr_indent(o)); + o->indent++; + } return 1; } else @@ -39,6 +53,12 @@ int odr_sequence_begin(ODR o, void *p, int size) int odr_sequence_end(ODR o) { + if (o->direction == ODR_PRINT) + { + assert(o->indent > 0); + o->indent--; + fprintf(o->print, "%s}\n", odr_indent(o)); + } return odr_constructed_end(o); } @@ -56,9 +76,10 @@ int odr_sequence_of(ODR o, Odr_fun type, void *p, int *num) { char ***pp = (char***) p; /* for dereferencing */ char **tmp; + char *dummy = "Nothing"; int size = 0, i; - if (!odr_sequence_begin(o, p, 0)) + if (!odr_sequence_begin(o, &dummy, 0)) return 0; switch (o->direction) @@ -88,12 +109,11 @@ int odr_sequence_of(ODR o, Odr_fun type, void *p, int *num) (*num)++; } break; - case ODR_ENCODE: + case ODR_ENCODE: case ODR_PRINT: for (i = 0; i < *num; i++) if (!(*type)(o, *pp + i, 0)) return 0; break; - case ODR_PRINT: return 1; default: return 0; } return odr_sequence_end(o);