-/*
- * Copyright (C) 1995-2005, Index Data ApS
+/* This file is part of the YAZ toolkit.
+ * Copyright (C) Index Data
* See the file LICENSE for details.
- *
- * $Id: odr_bit.c,v 1.5 2005-06-25 15:46:04 adam Exp $
*/
/**
if (o->error)
return 0;
- if (o->t_class < 0)
+ if (o->op->t_class < 0)
{
- o->t_class = ODR_UNIVERSAL;
- o->t_tag = ODR_BITSTRING;
+ o->op->t_class = ODR_UNIVERSAL;
+ o->op->t_tag = ODR_BITSTRING;
}
- if ((res = ber_tag(o, p, o->t_class, o->t_tag, &cons, opt, name)) < 0)
+ res = ber_tag(o, p, o->op->t_class, o->op->t_tag, &cons, opt, name);
+ if (res < 0)
return 0;
if (!res)
return odr_missing(o, opt, name);
if (o->direction == ODR_PRINT)
{
+ int i = ODR_BITMASK_SIZE;
+ int j;
odr_prname(o, name);
- odr_printf(o, "BITSTRING(len=%d)\n",(*p)->top + 1);
+ odr_printf(o, "BITSTRING(len=%d) ",(*p)->top + 1);
+ while (--i > 0)
+ if (ODR_MASK_GET(*p, i))
+ break;
+ for (j = 0; j <= i; j++)
+ {
+ odr_printf(o, "%c", ODR_MASK_GET(*p, j) ? '1' : '0');
+ if (j && ((j+1)&7) == 0)
+ odr_printf(o, "-");
+ }
+ odr_printf(o, "\n");
return 1;
}
if (o->direction == ODR_DECODE)
(*p)->top = -1;
}
#if 0
- /* ignoring the cons helps with at least one target.
+ /* ignoring the cons helps with at least one target.
* http://bugzilla.indexdata.dk/cgi-bin/bugzilla/show_bug.cgi?id=24
*/
return ber_bitstring(o, *p, 0);
/*
* Local variables:
* c-basic-offset: 4
+ * c-file-style: "Stroustrup"
* indent-tabs-mode: nil
* End:
* vim: shiftwidth=4 tabstop=8 expandtab