X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=odr%2Fodr_int.c;h=a68576182095c874bdebe6249f1a35fa4f491a16;hb=fed4c59a3c26f04ba3764947aa2f7ecdd9b46889;hp=a7d1eef43e2c44153fd388b950b8889b9a7f819b;hpb=21ea17f766bb492a93154ec7b242653fa37dec91;p=yaz-moved-to-github.git diff --git a/odr/odr_int.c b/odr/odr_int.c index a7d1eef..a685761 100644 --- a/odr/odr_int.c +++ b/odr/odr_int.c @@ -1,54 +1,21 @@ /* - * Copyright (c) 1995-1999, Index Data + * Copyright (c) 1995-2003, Index Data * See the file LICENSE for details. * Sebastian Hammer, Adam Dickmeiss * - * $Log: odr_int.c,v $ - * Revision 1.12 1999-01-08 11:23:28 adam - * Added const modifier to some of the BER/ODR encoding routines. - * - * Revision 1.11 1998/02/11 11:53:34 adam - * Changed code so that it compiles as C++. - * - * Revision 1.10 1995/09/29 17:12:24 quinn - * Smallish - * - * Revision 1.9 1995/09/29 17:01:50 quinn - * More Windows work - * - * Revision 1.8 1995/09/27 15:02:59 quinn - * Modified function heads & prototypes. - * - * Revision 1.7 1995/05/16 08:50:54 quinn - * License, documentation, and memory fixes - * - * Revision 1.6 1995/03/17 10:17:51 quinn - * Added memory management. - * - * Revision 1.5 1995/03/08 12:12:25 quinn - * Added better error checking. - * - * Revision 1.4 1995/02/10 18:57:25 quinn - * More in the way of error-checking. - * - * Revision 1.3 1995/02/09 15:51:48 quinn - * Works better now. - * - * Revision 1.2 1995/02/07 14:13:45 quinn - * Bug fixes. - * - * Revision 1.1 1995/02/02 16:21:53 quinn - * First kick. - * + * $Id: odr_int.c,v 1.19 2003-05-20 19:55:30 adam Exp $ */ +#if HAVE_CONFIG_H +#include +#endif -#include +#include "odr-priv.h" /* * Top level integer en/decoder. * Returns 1 on success, 0 on error. */ -int odr_integer(ODR o, int **p, int opt) +int odr_integer(ODR o, int **p, int opt, const char *name) { int res, cons = 0; @@ -59,18 +26,19 @@ int odr_integer(ODR o, int **p, int opt) o->t_class = ODR_UNIVERSAL; o->t_tag = ODR_INTEGER; } - if ((res = ber_tag(o, p, o->t_class, o->t_tag, &cons, opt)) < 0) + if ((res = ber_tag(o, p, o->t_class, o->t_tag, &cons, opt, name)) < 0) return 0; if (!res) - return opt; + return odr_missing(o, opt, name); if (o->direction == ODR_PRINT) { - fprintf(o->print, "%s%d\n", odr_indent(o), **p); + odr_prname(o, name); + fprintf(o->print, "%d\n", **p); return 1; } if (cons) { - o->error = OPROTO; + odr_seterror(o, OPROTO, 1); return 0; } if (o->direction == ODR_DECODE)