2 * Copyright (C) 1994, Index Data I/S
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.3 1995-02-09 15:51:46 quinn
10 * Revision 1.2 1995/02/07 17:52:58 quinn
11 * A damn mess, but now things work, I think.
13 * Revision 1.1 1995/02/02 16:21:52 quinn
19 #include <netinet/in.h>
22 static int ber_encinteger(unsigned char *buf, int val, int maxlen);
23 static int ber_decinteger(unsigned char *buf, int *val);
25 int ber_integer(ODR o, int *val)
32 if ((res = ber_decinteger(o->bp, val)) <= 0)
38 if ((res = ber_encinteger(o->bp, *val, o->left)) <= 0)
43 case ODR_PRINT: return 1;
49 * Returns: number of bytes written or -1 for error (out of bounds).
51 int ber_encinteger(unsigned char *buf, int val, int maxlen)
53 unsigned char *b = buf, *lenpos;
55 union { int i; unsigned char c[sizeof(int)]; } tmp;
61 tmp.i = htonl(val); /* ensure that that we're big-endian */
62 for (a = 0; a < sizeof(int) - 1; a++) /* skip superfluous octets */
63 if (!((tmp.c[a] == 0 && !(tmp.c[a+1] & 0X80)) ||
64 (tmp.c[a] == 0XFF && (tmp.c[a+1] & 0X80))))
66 if ((len = sizeof(int) - a) > maxlen)
68 memcpy(b, tmp.c + a, len);
70 if (ber_enclen(lenpos, len, 1, 1) != 1)
73 fprintf(stderr, "[val=%d]", val);
79 * Returns: Number of bytes read or 0 if no match, -1 if error.
81 int ber_decinteger(unsigned char *buf, int *val)
83 unsigned char *b = buf, fill;
84 int res, len, remains;
85 union { int i; unsigned char c[sizeof(int)]; } tmp;
87 if ((res = ber_declen(b, &len)) < 0)
89 if (len > sizeof(int)) /* let's be reasonable, here */
93 remains = sizeof(int) - len;
94 memcpy(tmp.c + remains, b, len);
99 memset(tmp.c, fill, remains);
104 fprintf(stderr, "[val=%d]", *val);