1 /* This file is part of the YAZ toolkit.
2 * Copyright (C) 1995-2008 Index Data
3 * See the file LICENSE for details.
7 * \brief Implements ODR INTEGER codec
16 * Top level integer en/decoder.
17 * Returns 1 on success, 0 on error.
19 int odr_integer(ODR o, int **p, int opt, const char *name)
25 if (o->op->t_class < 0)
27 o->op->t_class = ODR_UNIVERSAL;
28 o->op->t_tag = ODR_INTEGER;
30 res = ber_tag(o, p, o->op->t_class, o->op->t_tag, &cons, opt, name);
34 return odr_missing(o, opt, name);
35 if (o->direction == ODR_PRINT)
38 odr_printf(o, "%d\n", **p);
43 odr_seterror(o, OPROTO, 1);
46 if (o->direction == ODR_DECODE)
47 *p = (int *)odr_malloc(o, sizeof(int));
48 return ber_integer(o, *p);
53 * indent-tabs-mode: nil
55 * vim: shiftwidth=4 tabstop=8 expandtab