ec29359e4b3e1e9fdef3ac52798a2576427bb778
[yaz-moved-to-github.git] / odr / odr_use.c
1 /*
2  * Copyright (c) 1995, Index Data
3  * See the file LICENSE for details.
4  * Sebastian Hammer, Adam Dickmeiss
5  *
6  * $Log: odr_use.c,v $
7  * Revision 1.5  1995-08-10 08:54:47  quinn
8  * Added Explain.
9  *
10  * Revision 1.4  1995/06/16  13:16:12  quinn
11  * Fixed Defaultdiagformat.
12  *
13  * Revision 1.3  1995/05/16  08:51:00  quinn
14  * License, documentation, and memory fixes
15  *
16  * Revision 1.2  1995/02/09  15:51:50  quinn
17  * Works better now.
18  *
19  * Revision 1.1  1995/02/03  17:04:39  quinn
20  * Initial revision
21  *
22  */
23
24 #include <odr.h>
25 #include <odr_use.h>
26
27 int odr_external(ODR o, Odr_external **p, int opt)
28 {
29     Odr_external *pp;
30     static Odr_arm arm[] =
31     {
32         {ODR_EXPLICIT, ODR_CONTEXT, 0, ODR_EXTERNAL_single, odr_any},
33         {ODR_IMPLICIT, ODR_CONTEXT, 1, ODR_EXTERNAL_octet, odr_octetstring},
34         {ODR_IMPLICIT, ODR_CONTEXT, 2, ODR_EXTERNAL_arbitrary, odr_bitstring},
35         {-1, -1, -1, -1, 0}
36     };
37
38     odr_implicit_settag(o, ODR_UNIVERSAL, ODR_EXTERNAL);
39     if (!odr_sequence_begin(o, p, sizeof(Odr_external)))
40         return opt;
41     pp = *p;
42     return
43         odr_oid(o, &pp->direct_reference, 1) &&
44         odr_integer(o, &pp->indirect_reference, 1) &&
45         odr_graphicstring(o, &pp->descriptor, 1) &&
46         odr_choice(o, arm, &pp->u, &pp->which) &&
47         odr_sequence_end(o);
48 }
49
50 int odr_visiblestring(ODR o, char **p, int opt)
51 {
52     return odr_implicit(o, odr_cstring, p, ODR_UNIVERSAL, ODR_VISIBLESTRING,
53         opt);
54 }    
55
56 /*
57  * a char may not be sufficient to hold a general string, but we'll deal
58  * with that once we start looking more closely at UniCode & co.
59  */
60 int odr_generalstring(ODR o, char **p, int opt)
61 {
62     return odr_implicit(o, odr_cstring, p, ODR_UNIVERSAL, ODR_GENERALSTRING,
63         opt);
64 }    
65
66 int odr_graphicstring(ODR o, char **p, int opt)
67 {
68     return odr_implicit(o, odr_cstring, p, ODR_UNIVERSAL, ODR_GRAPHICSTRING,
69         opt);
70 }    
71
72 int odr_generalizedtime(ODR o, char **p, int opt)
73 {
74     return odr_implicit(o, odr_cstring, p, ODR_UNIVERSAL, ODR_GENERALIZEDTIME,
75         opt);
76 }