2 * Copyright (C) 1994, Index Data I/S
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.4 1995-03-08 12:12:07 quinn
8 * Added better error checking.
10 * Revision 1.3 1995/02/09 15:51:46 quinn
13 * Revision 1.2 1995/02/07 17:52:58 quinn
14 * A damn mess, but now things work, I think.
16 * Revision 1.1 1995/02/02 16:21:52 quinn
22 #include <netinet/in.h>
25 static int ber_encinteger(unsigned char *buf, int val, int maxlen);
26 static int ber_decinteger(unsigned char *buf, int *val);
28 int ber_integer(ODR o, int *val)
35 if ((res = ber_decinteger(o->bp, val)) <= 0)
44 if ((res = ber_encinteger(o->bp, *val, o->left)) <= 0)
52 case ODR_PRINT: return 1;
53 default: o->error = OOTHER; return 0;
58 * Returns: number of bytes written or -1 for error (out of bounds).
60 int ber_encinteger(unsigned char *buf, int val, int maxlen)
62 unsigned char *b = buf, *lenpos;
64 union { int i; unsigned char c[sizeof(int)]; } tmp;
70 tmp.i = htonl(val); /* ensure that that we're big-endian */
71 for (a = 0; a < sizeof(int) - 1; a++) /* skip superfluous octets */
72 if (!((tmp.c[a] == 0 && !(tmp.c[a+1] & 0X80)) ||
73 (tmp.c[a] == 0XFF && (tmp.c[a+1] & 0X80))))
75 if ((len = sizeof(int) - a) > maxlen)
77 memcpy(b, tmp.c + a, len);
79 if (ber_enclen(lenpos, len, 1, 1) != 1)
82 fprintf(stderr, "[val=%d]", val);
88 * Returns: Number of bytes read or 0 if no match, -1 if error.
90 int ber_decinteger(unsigned char *buf, int *val)
92 unsigned char *b = buf, fill;
93 int res, len, remains;
94 union { int i; unsigned char c[sizeof(int)]; } tmp;
96 if ((res = ber_declen(b, &len)) < 0)
98 if (len > sizeof(int)) /* let's be reasonable, here */
102 remains = sizeof(int) - len;
103 memcpy(tmp.c + remains, b, len);
108 memset(tmp.c, fill, remains);
113 fprintf(stderr, "[val=%d]", *val);