Works better now.
[yaz-moved-to-github.git] / odr / odr_any.c
1 /*
2  * Copyright (C) 1994, Index Data I/S 
3  * All rights reserved.
4  * Sebastian Hammer, Adam Dickmeiss
5  *
6  * $Log: odr_any.c,v $
7  * Revision 1.1  1995-02-09 15:51:47  quinn
8  * Works better now.
9  *
10  */
11
12 #include <odr.h>
13
14 /*
15  * This is a catch-all type. It stuffs a random ostring (assumed to be properly
16  * encoded) into the stream, or reads a full data element. Implicit tagging
17  * does not work, and neither does the optional flag, unless the element
18  * is the last in a sequence.
19  */
20 int odr_any(ODR o, Odr_any **p, int opt)
21 {
22     if (o->direction == ODR_ENCODE && !*p)
23         return opt;
24     if (o->direction == ODR_PRINT)
25     {
26         fprintf(o->print, "%sANY (len=%d)\n", odr_indent(o), (*p)->len);
27         return 1;
28     }
29     if (o->direction == ODR_DECODE)
30         *p = nalloc(o, sizeof(**p));
31     if (ber_any(o, p))
32         return 1;
33     *p = 0;
34     return opt;
35 }