2 * Copyright (c) 1995, Index Data
3 * See the file LICENSE for details.
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.16 1995-09-27 15:02:57 quinn
8 * Modified function heads & prototypes.
10 * Revision 1.15 1995/08/15 12:00:22 quinn
13 * Revision 1.14 1995/06/19 12:38:46 quinn
16 * Revision 1.13 1995/05/22 11:32:02 quinn
17 * Fixing Interface to odr_null.
19 * Revision 1.12 1995/05/16 08:50:49 quinn
20 * License, documentation, and memory fixes
22 * Revision 1.11 1995/05/15 11:56:08 quinn
23 * More work on memory management.
25 * Revision 1.10 1995/04/18 08:15:20 quinn
26 * Added dynamic memory allocation on encoding (whew). Code is now somewhat
27 * neater. We'll make the same change for decoding one day.
29 * Revision 1.9 1995/04/10 10:23:11 quinn
32 * Revision 1.8 1995/03/17 10:17:43 quinn
33 * Added memory management.
35 * Revision 1.7 1995/03/10 11:44:41 quinn
36 * Fixed serious stack-bug in odr_cons_begin
38 * Revision 1.6 1995/03/08 12:12:15 quinn
39 * Added better error checking.
41 * Revision 1.5 1995/03/07 13:28:57 quinn
42 * *** empty log message ***
44 * Revision 1.4 1995/03/07 13:16:13 quinn
45 * Fixed bug in odr_reset
47 * Revision 1.3 1995/03/07 10:21:31 quinn
48 * odr_errno-->odr_error
50 * Revision 1.2 1995/03/07 10:19:05 quinn
51 * Addded some method functions to the ODR type.
53 * Revision 1.1 1995/03/07 09:23:15 quinn
54 * Installing top-level API and documentation.
65 Odr_null *ODR_NULLVAL = "NULL"; /* the presence of a null value */
70 "Memory allocation failed",
73 "Required data element missing",
79 "Length of constructed type different from sum of members"
82 void MDF odr_perror(ODR o, char *message)
84 fprintf(stderr, "%s: %s\n", message, odr_errlist[o->error]);
87 int MDF odr_geterror(ODR o)
92 void MDF odr_setprint(ODR o, FILE *file)
97 ODR MDF odr_createmem(int direction)
101 if (!(r = malloc(sizeof(*r))))
103 r->direction = direction;
107 r->ecb.size = r->ecb.pos = r->ecb.top = 0;
115 void MDF odr_reset(ODR o)
119 odr_seek(o, ODR_S_SET, 0);
126 odr_release_mem(o->mem);
131 void MDF odr_destroy(ODR o)
133 odr_release_mem(o->mem);
134 if (o->ecb.buf && o->ecb.can_grow)
136 if (o->print != stderr)
141 void MDF odr_setbuf(ODR o, char *buf, int len, int can_grow)
143 o->buf = o->bp = (unsigned char *) buf;
144 o->buflen = o->left = len;
146 o->ecb.buf = (unsigned char *) buf;
147 o->ecb.can_grow = can_grow;
148 o->ecb.top = o->ecb.pos = 0;
152 char MDF *odr_getbuf(ODR o, int *len, int *size)
157 return (char*) o->ecb.buf;