bb9effdb96a7f7203b36a27ac80a4dfbc411d2a1
[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.2  1995-03-08 12:12:18  quinn
8  * Added better error checking.
9  *
10  * Revision 1.1  1995/02/09  15:51:47  quinn
11  * Works better now.
12  *
13  */
14
15 #include <odr.h>
16
17 /*
18  * This is a catch-all type. It stuffs a random ostring (assumed to be properly
19  * encoded) into the stream, or reads a full data element. Implicit tagging
20  * does not work, and neither does the optional flag, unless the element
21  * is the last in a sequence.
22  */
23 int odr_any(ODR o, Odr_any **p, int opt)
24 {
25     if (o->error)
26         return 0;
27     if (o->direction == ODR_PRINT)
28     {
29         fprintf(o->print, "%sANY (len=%d)\n", odr_indent(o), (*p)->len);
30         return 1;
31     }
32     if (o->direction == ODR_DECODE)
33         *p = nalloc(o, sizeof(**p));
34     if (ber_any(o, p))
35         return 1;
36     *p = 0;
37     if (!opt)
38         o->error = OREQUIRED;
39     return opt;
40 }