Fixed possible buf in proto.c
[yaz-moved-to-github.git] / odr / odr_oid.c
1 /*
2  * Copyright (C) 1994, Index Data I/S 
3  * All rights reserved.
4  * Sebastian Hammer, Adam Dickmeiss
5  *
6  * $Log: odr_oid.c,v $
7  * Revision 1.8  1995-03-17 10:17:55  quinn
8  * Added memory management.
9  *
10  * Revision 1.7  1995/03/08  12:12:29  quinn
11  * Added better error checking.
12  *
13  * Revision 1.6  1995/03/01  08:40:56  quinn
14  * Smallish changes.
15  *
16  * Revision 1.5  1995/02/10  18:57:26  quinn
17  * More in the way of error-checking.
18  *
19  * Revision 1.4  1995/02/10  15:55:29  quinn
20  * Bug fixes, mostly.
21  *
22  * Revision 1.3  1995/02/09  15:51:49  quinn
23  * Works better now.
24  *
25  * Revision 1.2  1995/02/07  14:13:46  quinn
26  * Bug fixes.
27  *
28  * Revision 1.1  1995/02/03  17:04:38  quinn
29  * Initial revision
30  *
31  *
32  */
33
34 #include <odr.h>
35
36 /*
37  * Top level oid en/decoder.
38  * Returns 1 on success, 0 on error.
39  */
40 int odr_oid(ODR o, Odr_oid **p, int opt)
41 {
42     int res, cons = 0;
43
44     if (o->error)
45         return 0;
46     if (o->t_class < 0)
47     {
48         o->t_class = ODR_UNIVERSAL;
49         o->t_tag = ODR_OID;
50     }
51     if ((res = ber_tag(o, p, o->t_class, o->t_tag, &cons, opt)) < 0)
52         return 0;
53     if (!res)
54         return opt;
55     if (cons)
56     {
57         o->error = OPROTO;
58         return 0;
59     }
60     if (o->direction == ODR_PRINT)
61     {
62         int i;
63
64         fprintf(o->print, "%sOID:", odr_indent(o));
65         for (i = 0; (*p)[i] > -1; i++)
66             fprintf(o->print, " %d", (*p)[i]);
67         fprintf(o->print, "\n");
68         return 1;
69     }
70     if (o->direction == ODR_DECODE)
71         *p = odr_malloc(o, ODR_OID_SIZE * sizeof(**p));
72     return ber_oidc(o, *p);
73 }