2 * Copyright (C) 1994, Index Data I/S
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.1 1995-02-02 16:21:52 quinn
13 #include <netinet/in.h>
16 static int ber_encinteger(unsigned char *buf, int val, int maxlen);
17 static int ber_decinteger(unsigned char *buf, int *val);
19 int ber_integer(ODR o, int *val)
26 if ((res = ber_decinteger(o->bp, val)) <= 0)
32 if ((res = ber_encinteger(o->bp, *val, o->left)) <= 0)
37 case ODR_PRINT: return 1;
43 * Returns: number of bytes written or -1 for error (out of bounds).
45 int ber_encinteger(unsigned char *buf, int val, int maxlen)
47 unsigned char *b = buf, *lenpos;
49 union { int i; unsigned char c[sizeof(int)]; } tmp;
55 tmp.i = htonl(val); /* ensure that that we're big-endian */
56 for (a = 0; a < sizeof(int) - 1; a++) /* skip superfluous octets */
57 if (!((tmp.c[a] == 0 && !(tmp.c[a+1] & 0X80)) ||
58 (tmp.c[a] == 0XFF && (tmp.c[a+1] & 0X80))))
60 if ((len = sizeof(int) - a) > maxlen)
62 memcpy(b, tmp.c + a, len);
64 if (ber_enclen(lenpos, len, 1, 1) != 1)
66 fprintf(stderr, "[val=%d]\n", val);
71 * Returns: Number of bytes read or 0 if no match, -1 if error.
73 int ber_decinteger(unsigned char *buf, int *val)
75 unsigned char *b = buf, fill;
76 int res, len, remains;
77 union { int i; unsigned char c[sizeof(int)]; } tmp;
79 if ((res = ber_declen(b, &len)) < 0)
81 if (len > sizeof(int)) /* let's be reasonable, here */
85 remains = sizeof(int) - len;
86 memcpy(tmp.c + remains, b, len);
91 memset(tmp.c, fill, remains);
95 fprintf(stderr, "[val=%d]\n", *val);