1 /* This file is part of the YAZ toolkit.
2 * Copyright (C) 1995-2012 Index Data
3 * See the file LICENSE for details.
10 #include <yaz/oid_util.h>
11 #include "test_odrcodec.h"
15 #define MYOID "1.2.3.4.5.6.7.8.9.10.11.12.13.14.15.16.17.18.19"
17 void tst_MySequence1(ODR encode, ODR decode)
22 Yc_MySequence *s = (Yc_MySequence *) odr_malloc(encode, sizeof(*s));
26 s->first = odr_intdup(encode, 12345);
27 s->second = (Odr_oct *) odr_malloc(encode, sizeof(*s->second));
28 s->second->buf = (unsigned char *) "hello";
31 s->third = odr_booldup(encode, 1);
32 s->fourth = odr_nullval();
33 s->fifth = odr_intdup(encode, YC_MySequence_enum1);
35 s->myoid = odr_getoidbystr(decode, MYOID);
37 ret = yc_MySequence(encode, &s, 0, 0);
42 ber_buf = odr_getbuf(encode, &ber_len, 0);
44 odr_setbuf(decode, ber_buf, ber_len, 0);
46 ret = yc_MySequence(decode, &t, 0, 0);
53 YAZ_CHECK(t->first && *t->first == 12345);
55 YAZ_CHECK(t->second && t->second->buf && t->second->len == 5);
57 YAZ_CHECK(t->second && t->second->buf && t->second->len == 5 &&
58 memcmp(t->second->buf, "hello", t->second->len) == 0);
60 YAZ_CHECK(t->third && *t->third == 1);
64 YAZ_CHECK(t->fifth && *t->fifth == YC_MySequence_enum1);
69 Odr_oid *myoid = odr_getoidbystr(decode, MYOID);
71 YAZ_CHECK(oid_oidcmp(myoid, t->myoid) == 0);
75 void tst_MySequence2(ODR encode, ODR decode)
78 Yc_MySequence *s = (Yc_MySequence *) odr_malloc(encode, sizeof(*s));
81 s->first = 0; /* deliberately miss this .. */
82 s->second = (Odr_oct *) odr_malloc(encode, sizeof(*s->second));
83 s->second->buf = (unsigned char *) "hello";
86 s->third = odr_booldup(encode, 1);
87 s->fourth = odr_nullval();
88 s->fifth = odr_intdup(encode, YC_MySequence_enum1);
89 s->myoid = odr_getoidbystr(encode, MYOID);
91 ret = yc_MySequence(encode, &s, 0, 0); /* should fail */
94 YAZ_CHECK(odr_geterror(encode) == OREQUIRED);
96 YAZ_CHECK(strcmp(odr_getelement(encode), "first") == 0);
99 YAZ_CHECK(odr_geterror(encode) == ONONE);
101 YAZ_CHECK(strcmp(odr_getelement(encode), "") == 0);
104 void tst_MySequence3(ODR encode, ODR decode)
111 for (i = 0; i < 1000; i++)
114 for (j = 0; j < (int) sizeof(buf); j++)
117 for (j = 1; j < (int) sizeof(buf); j++)
119 odr_setbuf(decode, buf, j, 0);
120 yc_MySequence(decode, &t, 0, 0);
126 static void tst_berint32(ODR encode, ODR decode)
136 r = ber_integer(encode, &val);
138 buf = odr_getbuf(encode, &len, 0);
140 YAZ_CHECK_EQ(len, 2);
141 YAZ_CHECK_EQ(buf[0], 1);
142 YAZ_CHECK_EQ(buf[1], 0);
145 odr_setbuf(decode, buf, len, 0);
146 ber_integer(decode, &ret_val);
147 YAZ_CHECK_EQ(ret_val, 0);
151 r = ber_integer(encode, &val);
153 buf = odr_getbuf(encode, &len, 0);
155 YAZ_CHECK_EQ(len, 2);
156 YAZ_CHECK_EQ(buf[0], 1);
157 YAZ_CHECK_EQ(buf[1], 1);
160 odr_setbuf(decode, buf, len, 0);
161 ber_integer(decode, &ret_val);
162 YAZ_CHECK_EQ(ret_val, 1);
166 r = ber_integer(encode, &val);
168 buf = odr_getbuf(encode, &len, 0);
170 YAZ_CHECK_EQ(len, 2);
171 YAZ_CHECK_EQ(buf[0], 1);
172 YAZ_CHECK_EQ((unsigned char) buf[1], 255);
175 odr_setbuf(decode, buf, len, 0);
176 ber_integer(decode, &ret_val);
177 YAZ_CHECK_EQ(ret_val, -1);
181 r = ber_integer(encode, &val);
183 buf = odr_getbuf(encode, &len, 0);
185 YAZ_CHECK_EQ(len, 2);
186 YAZ_CHECK_EQ(buf[0], 1);
187 YAZ_CHECK_EQ(buf[1], 127);
190 odr_setbuf(decode, buf, len, 0);
191 ber_integer(decode, &ret_val);
192 YAZ_CHECK_EQ(ret_val, 127);
197 r = ber_integer(encode, &val);
199 buf = odr_getbuf(encode, &len, 0);
201 YAZ_CHECK_EQ(len, 3);
202 YAZ_CHECK_EQ(buf[0], 2);
203 YAZ_CHECK_EQ(buf[1], 0);
204 YAZ_CHECK_EQ(((unsigned char *) buf)[2], 128);
207 odr_setbuf(decode, buf, len, 0);
208 ber_integer(decode, &ret_val);
209 YAZ_CHECK_EQ(ret_val, 128);
211 val = 2147483647; /* 2^31-1 */
213 r = ber_integer(encode, &val);
215 buf = odr_getbuf(encode, &len, 0);
217 YAZ_CHECK_EQ(len, 5);
218 YAZ_CHECK_EQ(buf[0], 4);
219 YAZ_CHECK_EQ(buf[1], 127);
220 YAZ_CHECK_EQ((unsigned char) buf[2], 255);
221 YAZ_CHECK_EQ((unsigned char) buf[3], 255);
222 YAZ_CHECK_EQ((unsigned char) buf[4], 255);
225 odr_setbuf(decode, buf, len, 0);
226 ber_integer(decode, &ret_val);
227 YAZ_CHECK_EQ(ret_val, 2147483647);
229 val = -2147483647L -1; /* -2^31 */
231 r = ber_integer(encode, &val);
233 buf = odr_getbuf(encode, &len, 0);
235 YAZ_CHECK_EQ(len, 5);
236 YAZ_CHECK_EQ(buf[0], 4);
237 YAZ_CHECK_EQ((unsigned char) buf[1], 128);
238 YAZ_CHECK_EQ(buf[2], 0);
239 YAZ_CHECK_EQ(buf[3], 0);
240 YAZ_CHECK_EQ(buf[4], 0);
243 odr_setbuf(decode, buf, len, 0);
244 ber_integer(decode, &ret_val);
245 YAZ_CHECK_EQ(ret_val, (Odr_int) -2147483647L -1);
248 static void tst_berint64(ODR encode, ODR decode)
257 val = (Odr_int) 2 * 2147483648UL; /* 2^32 */
259 r = ber_integer(encode, &val);
261 buf = odr_getbuf(encode, &len, 0);
263 YAZ_CHECK_EQ(len, 6);
264 YAZ_CHECK_EQ(buf[0], 5);
265 YAZ_CHECK_EQ(buf[1], 1);
266 YAZ_CHECK_EQ(buf[2], 0);
267 YAZ_CHECK_EQ(buf[3], 0);
268 YAZ_CHECK_EQ(buf[4], 0);
269 YAZ_CHECK_EQ(buf[5], 0);
272 odr_setbuf(decode, buf, len, 0);
273 ber_integer(decode, &ret_val);
274 YAZ_CHECK_EQ(ret_val, val);
276 val = (Odr_int) -2 * 2147483648UL; /* -2^32 */
278 r = ber_integer(encode, &val);
280 buf = odr_getbuf(encode, &len, 0);
282 YAZ_CHECK_EQ(len, 6);
283 YAZ_CHECK_EQ(buf[0], 5);
284 YAZ_CHECK_EQ((unsigned char) buf[1], 255);
285 YAZ_CHECK_EQ(buf[2], 0);
286 YAZ_CHECK_EQ(buf[3], 0);
287 YAZ_CHECK_EQ(buf[4], 0);
288 YAZ_CHECK_EQ(buf[5], 0);
291 odr_setbuf(decode, buf, len, 0);
292 ber_integer(decode, &ret_val);
293 YAZ_CHECK_EQ(ret_val, val);
295 val = (Odr_int) 1000 * 1000000000L; /* 10^12 */
297 r = ber_integer(encode, &val);
299 buf = odr_getbuf(encode, &len, 0);
301 YAZ_CHECK_EQ(len, 7);
302 YAZ_CHECK_EQ(buf[0], 6);
303 YAZ_CHECK_EQ(buf[1], 0);
304 YAZ_CHECK_EQ((unsigned char) buf[2], 232);
305 YAZ_CHECK_EQ((unsigned char) buf[3], 212);
306 YAZ_CHECK_EQ((unsigned char) buf[4], 165);
307 YAZ_CHECK_EQ(buf[5], 16);
308 YAZ_CHECK_EQ(buf[6], 0);
311 odr_setbuf(decode, buf, len, 0);
312 ber_integer(decode, &ret_val);
313 YAZ_CHECK_EQ(ret_val, val);
317 static void tst(void)
319 ODR odr_encode = odr_createmem(ODR_ENCODE);
320 ODR odr_decode = odr_createmem(ODR_DECODE);
322 YAZ_CHECK(odr_encode);
323 YAZ_CHECK(odr_decode);
325 tst_MySequence1(odr_encode, odr_decode);
326 tst_MySequence2(odr_encode, odr_decode);
327 tst_MySequence3(odr_encode, odr_decode);
329 tst_berint32(odr_encode, odr_decode);
330 tst_berint64(odr_encode, odr_decode);
332 odr_destroy(odr_encode);
333 odr_destroy(odr_decode);
336 /* example from documentation.. 'Using Odr' */
337 void do_nothing_useful(Odr_int value)
340 Odr_int *valp, *resvalp;
344 /* allocate streams */
345 if (!(encode = odr_createmem(ODR_ENCODE)))
347 if (!(decode = odr_createmem(ODR_DECODE)))
351 if (odr_integer(encode, &valp, 0, 0) == 0)
353 printf("encoding went bad\n");
356 bufferp = odr_getbuf(encode, &len, 0);
357 printf("length of encoded data is %d\n", len);
359 /* now let's decode the thing again */
360 odr_setbuf(decode, bufferp, len, 0);
361 if (odr_integer(decode, &resvalp, 0, 0) == 0)
363 printf("decoding went bad\n");
366 /* ODR_INT_PRINTF format for printf (such as %d) */
367 printf("the value is " ODR_INT_PRINTF "\n", *resvalp);
374 int main(int argc, char **argv)
376 YAZ_CHECK_INIT(argc, argv);
384 * c-file-style: "Stroustrup"
385 * indent-tabs-mode: nil
387 * vim: shiftwidth=4 tabstop=8 expandtab