File: der_decode_integer.c

package info (click to toggle)
dropbear 0.45-2sarge0
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 6,248 kB
  • ctags: 4,782
  • sloc: ansic: 53,626; sh: 2,703; makefile: 510; perl: 427; asm: 30
file content (83 lines) | stat: -rw-r--r-- 2,125 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
/* LibTomCrypt, modular cryptographic library -- Tom St Denis
 *
 * LibTomCrypt is a library that provides various cryptographic
 * algorithms in a highly modular and flexible manner.
 *
 * The library is free for all purposes without any express
 * guarantee it works.
 *
 * Tom St Denis, tomstdenis@iahu.ca, http://libtomcrypt.org
 */

#include "mycrypt.h"


/* decodes a DER INTEGER in [in].  You have to tell this function
 * how many bytes are available [inlen].  It will then attempt to 
 * read the INTEGER.  If all goes well it stores the number of bytes
 * read in [inlen] and the number in [num].
 */
int der_decode_integer(const unsigned char *in, unsigned long *inlen, mp_int *num)
{
   unsigned long tmplen, y, z;

   _ARGCHK(num    != NULL);
   _ARGCHK(in     != NULL);
   _ARGCHK(inlen  != NULL);

   /* save copy of max output size */
   tmplen = *inlen;
   *inlen = 0;

   /* min DER INTEGER is 0x02 01 00 == 0 */
   if (tmplen < (1 + 1 + 1)) {
      return CRYPT_INVALID_PACKET;
   }

   /* ok expect 0x02 when we AND with 0011 1111 [3F] */
   if ((*in++ & 0x3F) != 0x02) {
      return CRYPT_INVALID_PACKET;
   }
   ++(*inlen);

   /* now decode the len stuff */
   z = *in++;
   ++(*inlen);

   if ((z & 0x80) == 0x00) {
      /* short form */

      /* will it overflow? */
      if (*inlen + z > tmplen) {
         return CRYPT_INVALID_PACKET;
      }
     
      /* no so read it */
      (*inlen) += z;
      return mpi_to_ltc_error(mp_read_unsigned_bin(num, (unsigned char *)in, z));
   } else {
      /* long form */
      z &= 0x7F;
      
      /* will number of length bytes overflow? (or > 4) */
      if (((*inlen + z) > tmplen) || (z > 4)) {
         return CRYPT_INVALID_PACKET;
      }

      /* now read it in */
      y = 0;
      while (z--) {
         y = ((unsigned long)(*in++)) | (y << 8);
         ++(*inlen);
      }

      /* now will reading y bytes overrun? */
      if ((*inlen + y) > tmplen) {
         return CRYPT_INVALID_PACKET;
      }

      /* no so read it */
      (*inlen) += y;
      return mpi_to_ltc_error(mp_read_unsigned_bin(num, (unsigned char *)in, y));
   }
}