Hex Artifact Content

Artifact b4f2f9070a80621895dbf5bc2d2da6295e0d6319:


0000: 2f 2a 0a 20 2a 20 42 61 73 69 63 20 69 6d 70 6c  /*. * Basic impl
0010: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 49 54  ementation of IT
0020: 55 2d 54 20 58 2e 36 39 30 20 28 30 37 2f 32 30  U-T X.690 (07/20
0030: 30 32 29 20 66 6f 72 20 70 61 72 73 69 6e 67 20  02) for parsing 
0040: 42 45 52 20 65 6e 63 6f 64 65 64 0a 20 2a 20 58  BER encoded. * X
0050: 2e 35 30 39 20 63 65 72 74 69 66 69 63 61 74 65  .509 certificate
0060: 73 0a 20 2a 2f 0a 0a 23 69 66 64 65 66 20 48 41  s. */..#ifdef HA
0070: 56 45 5f 43 4f 4e 46 49 47 5f 48 0a 23 20 20 69  VE_CONFIG_H.#  i
0080: 6e 63 6c 75 64 65 20 22 63 6f 6e 66 69 67 2e 68  nclude "config.h
0090: 22 0a 23 65 6e 64 69 66 0a 0a 23 69 66 64 65 66  ".#endif..#ifdef
00a0: 20 48 41 56 45 5f 55 4e 49 53 54 44 5f 48 0a 23   HAVE_UNISTD_H.#
00b0: 20 20 69 6e 63 6c 75 64 65 20 3c 75 6e 69 73 74    include <unist
00c0: 64 2e 68 3e 0a 23 65 6e 64 69 66 0a 23 69 66 64  d.h>.#endif.#ifd
00d0: 65 66 20 48 41 56 45 5f 53 54 44 4c 49 42 5f 48  ef HAVE_STDLIB_H
00e0: 0a 23 20 20 69 6e 63 6c 75 64 65 20 3c 73 74 64  .#  include <std
00f0: 6c 69 62 2e 68 3e 0a 23 65 6e 64 69 66 0a 23 69  lib.h>.#endif.#i
0100: 66 64 65 66 20 48 41 56 45 5f 53 54 44 41 52 47  fdef HAVE_STDARG
0110: 5f 48 0a 23 20 20 69 6e 63 6c 75 64 65 20 3c 73  _H.#  include <s
0120: 74 64 61 72 67 2e 68 3e 0a 23 65 6e 64 69 66 0a  tdarg.h>.#endif.
0130: 23 69 66 64 65 66 20 48 41 56 45 5f 53 54 44 49  #ifdef HAVE_STDI
0140: 4f 5f 48 0a 23 20 20 69 6e 63 6c 75 64 65 20 3c  O_H.#  include <
0150: 73 74 64 69 6f 2e 68 3e 0a 23 65 6e 64 69 66 0a  stdio.h>.#endif.
0160: 23 69 66 64 65 66 20 48 41 56 45 5f 53 54 52 49  #ifdef HAVE_STRI
0170: 4e 47 5f 48 0a 23 20 20 69 6e 63 6c 75 64 65 20  NG_H.#  include 
0180: 3c 73 74 72 69 6e 67 2e 68 3e 0a 23 65 6e 64 69  <string.h>.#endi
0190: 66 0a 0a 23 69 6e 63 6c 75 64 65 20 22 61 73 6e  f..#include "asn
01a0: 31 2d 78 35 30 39 2e 68 22 0a 0a 73 74 72 75 63  1-x509.h"..struc
01b0: 74 20 61 73 6e 31 5f 6f 62 6a 65 63 74 20 7b 0a  t asn1_object {.
01c0: 09 75 6e 73 69 67 6e 65 64 20 6c 6f 6e 67 20 74  .unsigned long t
01d0: 61 67 3b 0a 09 75 6e 73 69 67 6e 65 64 20 6c 6f  ag;..unsigned lo
01e0: 6e 67 20 73 69 7a 65 3b 0a 09 76 6f 69 64 20 2a  ng size;..void *
01f0: 63 6f 6e 74 65 6e 74 73 3b 0a 0a 09 75 6e 73 69  contents;...unsi
0200: 67 6e 65 64 20 6c 6f 6e 67 20 61 73 6e 31 72 65  gned long asn1re
0210: 70 5f 6c 65 6e 3b 0a 09 76 6f 69 64 20 2a 61 73  p_len;..void *as
0220: 6e 31 72 65 70 3b 0a 7d 3b 0a 0a 73 74 72 75 63  n1rep;.};..struc
0230: 74 20 78 35 30 39 5f 6f 62 6a 65 63 74 20 7b 0a  t x509_object {.
0240: 09 73 74 72 75 63 74 20 61 73 6e 31 5f 6f 62 6a  .struct asn1_obj
0250: 65 63 74 20 77 68 6f 6c 65 74 68 69 6e 67 3b 0a  ect wholething;.
0260: 09 09 73 74 72 75 63 74 20 61 73 6e 31 5f 6f 62  ..struct asn1_ob
0270: 6a 65 63 74 20 63 65 72 74 69 66 69 63 61 74 65  ject certificate
0280: 3b 0a 09 09 09 73 74 72 75 63 74 20 61 73 6e 31  ;....struct asn1
0290: 5f 6f 62 6a 65 63 74 20 76 65 72 73 69 6f 6e 3b  _object version;
02a0: 0a 09 09 09 73 74 72 75 63 74 20 61 73 6e 31 5f  ....struct asn1_
02b0: 6f 62 6a 65 63 74 20 73 65 72 69 61 6c 5f 6e 75  object serial_nu
02c0: 6d 62 65 72 3b 0a 09 09 09 73 74 72 75 63 74 20  mber;....struct 
02d0: 61 73 6e 31 5f 6f 62 6a 65 63 74 20 73 69 67 6e  asn1_object sign
02e0: 61 74 75 72 65 5f 61 6c 67 6f 3b 0a 09 09 09 73  ature_algo;....s
02f0: 74 72 75 63 74 20 61 73 6e 31 5f 6f 62 6a 65 63  truct asn1_objec
0300: 74 20 69 73 73 75 65 72 3b 0a 09 09 09 73 74 72  t issuer;....str
0310: 75 63 74 20 61 73 6e 31 5f 6f 62 6a 65 63 74 20  uct asn1_object 
0320: 76 61 6c 69 64 69 74 79 3b 0a 09 09 09 73 74 72  validity;....str
0330: 75 63 74 20 61 73 6e 31 5f 6f 62 6a 65 63 74 20  uct asn1_object 
0340: 73 75 62 6a 65 63 74 3b 0a 09 09 09 73 74 72 75  subject;....stru
0350: 63 74 20 61 73 6e 31 5f 6f 62 6a 65 63 74 20 70  ct asn1_object p
0360: 75 62 6b 65 79 69 6e 66 6f 3b 0a 09 09 09 09 73  ubkeyinfo;.....s
0370: 74 72 75 63 74 20 61 73 6e 31 5f 6f 62 6a 65 63  truct asn1_objec
0380: 74 20 70 75 62 6b 65 79 5f 61 6c 67 6f 69 64 3b  t pubkey_algoid;
0390: 0a 09 09 09 09 09 73 74 72 75 63 74 20 61 73 6e  ......struct asn
03a0: 31 5f 6f 62 6a 65 63 74 20 70 75 62 6b 65 79 5f  1_object pubkey_
03b0: 61 6c 67 6f 3b 0a 09 09 09 09 09 73 74 72 75 63  algo;......struc
03c0: 74 20 61 73 6e 31 5f 6f 62 6a 65 63 74 20 70 75  t asn1_object pu
03d0: 62 6b 65 79 5f 61 6c 67 6f 70 61 72 6d 3b 0a 09  bkey_algoparm;..
03e0: 09 09 09 73 74 72 75 63 74 20 61 73 6e 31 5f 6f  ...struct asn1_o
03f0: 62 6a 65 63 74 20 70 75 62 6b 65 79 3b 0a 7d 3b  bject pubkey;.};
0400: 0a 0a 73 74 61 74 69 63 20 69 6e 74 20 5f 61 73  ..static int _as
0410: 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 61 73 6e  n1_x509_read_asn
0420: 31 5f 6f 62 6a 65 63 74 28 75 6e 73 69 67 6e 65  1_object(unsigne
0430: 64 20 63 68 61 72 20 2a 62 75 66 2c 20 73 69 7a  d char *buf, siz
0440: 65 5f 74 20 62 75 66 6c 65 6e 2c 20 76 61 5f 6c  e_t buflen, va_l
0450: 69 73 74 20 2a 61 72 67 73 29 20 7b 0a 09 75 6e  ist *args) {..un
0460: 73 69 67 6e 65 64 20 63 68 61 72 20 73 6d 61 6c  signed char smal
0470: 6c 5f 6f 62 6a 65 63 74 5f 73 69 7a 65 3b 0a 09  l_object_size;..
0480: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 62  unsigned char *b
0490: 75 66 5f 70 3b 0a 09 73 74 72 75 63 74 20 61 73  uf_p;..struct as
04a0: 6e 31 5f 6f 62 6a 65 63 74 20 2a 6f 75 74 62 75  n1_object *outbu
04b0: 66 3b 0a 0a 09 6f 75 74 62 75 66 20 3d 20 76 61  f;...outbuf = va
04c0: 5f 61 72 67 28 2a 61 72 67 73 2c 20 73 74 72 75  _arg(*args, stru
04d0: 63 74 20 61 73 6e 31 5f 6f 62 6a 65 63 74 20 2a  ct asn1_object *
04e0: 29 3b 0a 0a 09 69 66 20 28 6f 75 74 62 75 66 20  );...if (outbuf 
04f0: 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 72 65 74  == NULL) {...ret
0500: 75 72 6e 28 30 29 3b 0a 09 7d 0a 0a 09 69 66 20  urn(0);..}...if 
0510: 28 62 75 66 6c 65 6e 20 3d 3d 20 30 29 20 7b 0a  (buflen == 0) {.
0520: 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d  ..return(-1);..}
0530: 0a 0a 09 62 75 66 5f 70 20 3d 20 62 75 66 3b 0a  ...buf_p = buf;.
0540: 0a 09 6f 75 74 62 75 66 2d 3e 74 61 67 20 3d 20  ..outbuf->tag = 
0550: 2a 62 75 66 5f 70 3b 0a 09 62 75 66 5f 70 2b 2b  *buf_p;..buf_p++
0560: 3b 0a 09 62 75 66 6c 65 6e 2d 2d 3b 0a 09 69 66  ;..buflen--;..if
0570: 20 28 62 75 66 6c 65 6e 20 3d 3d 20 30 29 20 7b   (buflen == 0) {
0580: 0a 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09  ...return(-1);..
0590: 7d 0a 0a 09 2f 2a 20 4e 55 4c 4c 20 54 61 67 20  }.../* NULL Tag 
05a0: 2d 2d 20 6e 6f 20 73 69 7a 65 20 69 73 20 72 65  -- no size is re
05b0: 71 75 69 72 65 64 20 2a 2f 0a 09 69 66 20 28 6f  quired */..if (o
05c0: 75 74 62 75 66 2d 3e 74 61 67 20 3d 3d 20 30 78  utbuf->tag == 0x
05d0: 30 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28 5f  00) {...return(_
05e0: 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 61  asn1_x509_read_a
05f0: 73 6e 31 5f 6f 62 6a 65 63 74 28 62 75 66 5f 70  sn1_object(buf_p
0600: 2c 20 62 75 66 6c 65 6e 2c 20 61 72 67 73 29 29  , buflen, args))
0610: 3b 0a 09 7d 0a 0a 09 73 6d 61 6c 6c 5f 6f 62 6a  ;..}...small_obj
0620: 65 63 74 5f 73 69 7a 65 20 3d 20 2a 62 75 66 5f  ect_size = *buf_
0630: 70 3b 0a 09 62 75 66 5f 70 2b 2b 3b 0a 09 62 75  p;..buf_p++;..bu
0640: 66 6c 65 6e 2d 2d 3b 0a 09 69 66 20 28 62 75 66  flen--;..if (buf
0650: 6c 65 6e 20 3d 3d 20 30 29 20 7b 0a 09 09 72 65  len == 0) {...re
0660: 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 69  turn(-1);..}...i
0670: 66 20 28 28 73 6d 61 6c 6c 5f 6f 62 6a 65 63 74  f ((small_object
0680: 5f 73 69 7a 65 20 26 20 30 78 38 30 29 20 3d 3d  _size & 0x80) ==
0690: 20 30 78 38 30 29 20 7b 0a 09 09 6f 75 74 62 75   0x80) {...outbu
06a0: 66 2d 3e 73 69 7a 65 20 3d 20 30 3b 0a 0a 09 09  f->size = 0;....
06b0: 66 6f 72 20 28 73 6d 61 6c 6c 5f 6f 62 6a 65 63  for (small_objec
06c0: 74 5f 73 69 7a 65 20 5e 3d 20 30 78 38 30 3b 20  t_size ^= 0x80; 
06d0: 73 6d 61 6c 6c 5f 6f 62 6a 65 63 74 5f 73 69 7a  small_object_siz
06e0: 65 3b 20 73 6d 61 6c 6c 5f 6f 62 6a 65 63 74 5f  e; small_object_
06f0: 73 69 7a 65 2d 2d 29 20 7b 0a 09 09 09 6f 75 74  size--) {....out
0700: 62 75 66 2d 3e 73 69 7a 65 20 3c 3c 3d 20 38 3b  buf->size <<= 8;
0710: 0a 09 09 09 6f 75 74 62 75 66 2d 3e 73 69 7a 65  ....outbuf->size
0720: 20 2b 3d 20 2a 62 75 66 5f 70 3b 0a 0a 09 09 09   += *buf_p;.....
0730: 62 75 66 5f 70 2b 2b 3b 0a 09 09 09 62 75 66 6c  buf_p++;....bufl
0740: 65 6e 2d 2d 3b 0a 09 09 09 69 66 20 28 62 75 66  en--;....if (buf
0750: 6c 65 6e 20 3d 3d 20 30 29 20 7b 0a 09 09 09 09  len == 0) {.....
0760: 62 72 65 61 6b 3b 0a 09 09 09 7d 0a 09 09 7d 0a  break;....}...}.
0770: 09 7d 20 65 6c 73 65 20 7b 0a 09 09 6f 75 74 62  .} else {...outb
0780: 75 66 2d 3e 73 69 7a 65 20 3d 20 73 6d 61 6c 6c  uf->size = small
0790: 5f 6f 62 6a 65 63 74 5f 73 69 7a 65 3b 0a 09 7d  _object_size;..}
07a0: 0a 0a 09 69 66 20 28 6f 75 74 62 75 66 2d 3e 73  ...if (outbuf->s
07b0: 69 7a 65 20 3e 20 62 75 66 6c 65 6e 29 20 7b 0a  ize > buflen) {.
07c0: 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d  ..return(-1);..}
07d0: 0a 0a 09 6f 75 74 62 75 66 2d 3e 63 6f 6e 74 65  ...outbuf->conte
07e0: 6e 74 73 20 3d 20 62 75 66 5f 70 3b 0a 09 6f 75  nts = buf_p;..ou
07f0: 74 62 75 66 2d 3e 61 73 6e 31 72 65 70 5f 6c 65  tbuf->asn1rep_le
0800: 6e 20 3d 20 6f 75 74 62 75 66 2d 3e 73 69 7a 65  n = outbuf->size
0810: 20 2b 20 28 62 75 66 5f 70 20 2d 20 62 75 66 29   + (buf_p - buf)
0820: 3b 0a 09 6f 75 74 62 75 66 2d 3e 61 73 6e 31 72  ;..outbuf->asn1r
0830: 65 70 20 3d 20 62 75 66 3b 0a 0a 09 62 75 66 5f  ep = buf;...buf_
0840: 70 20 2b 3d 20 6f 75 74 62 75 66 2d 3e 73 69 7a  p += outbuf->siz
0850: 65 3b 0a 09 62 75 66 6c 65 6e 20 2d 3d 20 6f 75  e;..buflen -= ou
0860: 74 62 75 66 2d 3e 73 69 7a 65 3b 0a 0a 09 72 65  tbuf->size;...re
0870: 74 75 72 6e 28 5f 61 73 6e 31 5f 78 35 30 39 5f  turn(_asn1_x509_
0880: 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74  read_asn1_object
0890: 28 62 75 66 5f 70 2c 20 62 75 66 6c 65 6e 2c 20  (buf_p, buflen, 
08a0: 61 72 67 73 29 29 3b 0a 7d 0a 0a 73 74 61 74 69  args));.}..stati
08b0: 63 20 69 6e 74 20 61 73 6e 31 5f 78 35 30 39 5f  c int asn1_x509_
08c0: 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74  read_asn1_object
08d0: 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a  (unsigned char *
08e0: 62 75 66 2c 20 73 69 7a 65 5f 74 20 62 75 66 6c  buf, size_t bufl
08f0: 65 6e 2c 20 2e 2e 2e 29 20 7b 0a 09 76 61 5f 6c  en, ...) {..va_l
0900: 69 73 74 20 61 72 67 73 3b 0a 09 69 6e 74 20 72  ist args;..int r
0910: 65 74 76 61 6c 3b 0a 0a 09 76 61 5f 73 74 61 72  etval;...va_star
0920: 74 28 61 72 67 73 2c 20 62 75 66 6c 65 6e 29 3b  t(args, buflen);
0930: 0a 0a 09 72 65 74 76 61 6c 20 3d 20 5f 61 73 6e  ...retval = _asn
0940: 31 5f 78 35 30 39 5f 72 65 61 64 5f 61 73 6e 31  1_x509_read_asn1
0950: 5f 6f 62 6a 65 63 74 28 62 75 66 2c 20 62 75 66  _object(buf, buf
0960: 6c 65 6e 2c 20 26 61 72 67 73 29 3b 0a 0a 09 76  len, &args);...v
0970: 61 5f 65 6e 64 28 61 72 67 73 29 3b 0a 0a 09 72  a_end(args);...r
0980: 65 74 75 72 6e 28 72 65 74 76 61 6c 29 3b 0a 7d  eturn(retval);.}
0990: 0a 0a 73 74 61 74 69 63 20 69 6e 74 20 61 73 6e  ..static int asn
09a0: 31 5f 78 35 30 39 5f 72 65 61 64 5f 6f 62 6a 65  1_x509_read_obje
09b0: 63 74 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72  ct(unsigned char
09c0: 20 2a 62 75 66 2c 20 73 69 7a 65 5f 74 20 62 75   *buf, size_t bu
09d0: 66 6c 65 6e 2c 20 73 74 72 75 63 74 20 78 35 30  flen, struct x50
09e0: 39 5f 6f 62 6a 65 63 74 20 2a 6f 75 74 62 75 66  9_object *outbuf
09f0: 29 20 7b 0a 09 69 6e 74 20 72 65 61 64 5f 72 65  ) {..int read_re
0a00: 74 3b 0a 0a 09 72 65 61 64 5f 72 65 74 20 3d 20  t;...read_ret = 
0a10: 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 61  asn1_x509_read_a
0a20: 73 6e 31 5f 6f 62 6a 65 63 74 28 62 75 66 2c 20  sn1_object(buf, 
0a30: 62 75 66 6c 65 6e 2c 20 26 6f 75 74 62 75 66 2d  buflen, &outbuf-
0a40: 3e 77 68 6f 6c 65 74 68 69 6e 67 2c 20 4e 55 4c  >wholething, NUL
0a50: 4c 29 3b 0a 09 69 66 20 28 72 65 61 64 5f 72 65  L);..if (read_re
0a60: 74 20 21 3d 20 30 29 20 7b 0a 09 09 72 65 74 75  t != 0) {...retu
0a70: 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 72 65 61  rn(-1);..}...rea
0a80: 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30  d_ret = asn1_x50
0a90: 39 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65  9_read_asn1_obje
0aa0: 63 74 28 6f 75 74 62 75 66 2d 3e 77 68 6f 6c 65  ct(outbuf->whole
0ab0: 74 68 69 6e 67 2e 63 6f 6e 74 65 6e 74 73 2c 20  thing.contents, 
0ac0: 6f 75 74 62 75 66 2d 3e 77 68 6f 6c 65 74 68 69  outbuf->wholethi
0ad0: 6e 67 2e 73 69 7a 65 2c 20 26 6f 75 74 62 75 66  ng.size, &outbuf
0ae0: 2d 3e 63 65 72 74 69 66 69 63 61 74 65 2c 20 4e  ->certificate, N
0af0: 55 4c 4c 29 3b 0a 09 69 66 20 28 72 65 61 64 5f  ULL);..if (read_
0b00: 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 72 65  ret != 0) {...re
0b10: 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 72  turn(-1);..}...r
0b20: 65 61 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78  ead_ret = asn1_x
0b30: 35 30 39 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62  509_read_asn1_ob
0b40: 6a 65 63 74 28 6f 75 74 62 75 66 2d 3e 63 65 72  ject(outbuf->cer
0b50: 74 69 66 69 63 61 74 65 2e 63 6f 6e 74 65 6e 74  tificate.content
0b60: 73 2c 20 6f 75 74 62 75 66 2d 3e 63 65 72 74 69  s, outbuf->certi
0b70: 66 69 63 61 74 65 2e 73 69 7a 65 2c 20 26 6f 75  ficate.size, &ou
0b80: 74 62 75 66 2d 3e 76 65 72 73 69 6f 6e 2c 20 26  tbuf->version, &
0b90: 6f 75 74 62 75 66 2d 3e 73 65 72 69 61 6c 5f 6e  outbuf->serial_n
0ba0: 75 6d 62 65 72 2c 20 26 6f 75 74 62 75 66 2d 3e  umber, &outbuf->
0bb0: 73 69 67 6e 61 74 75 72 65 5f 61 6c 67 6f 2c 20  signature_algo, 
0bc0: 26 6f 75 74 62 75 66 2d 3e 69 73 73 75 65 72 2c  &outbuf->issuer,
0bd0: 20 26 6f 75 74 62 75 66 2d 3e 76 61 6c 69 64 69   &outbuf->validi
0be0: 74 79 2c 20 26 6f 75 74 62 75 66 2d 3e 73 75 62  ty, &outbuf->sub
0bf0: 6a 65 63 74 2c 20 26 6f 75 74 62 75 66 2d 3e 70  ject, &outbuf->p
0c00: 75 62 6b 65 79 69 6e 66 6f 2c 20 4e 55 4c 4c 29  ubkeyinfo, NULL)
0c10: 3b 0a 09 69 66 20 28 72 65 61 64 5f 72 65 74 20  ;..if (read_ret 
0c20: 21 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e  != 0) {...return
0c30: 28 2d 31 29 3b 0a 09 7d 0a 0a 09 72 65 61 64 5f  (-1);..}...read_
0c40: 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f  ret = asn1_x509_
0c50: 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74  read_asn1_object
0c60: 28 6f 75 74 62 75 66 2d 3e 70 75 62 6b 65 79 69  (outbuf->pubkeyi
0c70: 6e 66 6f 2e 63 6f 6e 74 65 6e 74 73 2c 20 6f 75  nfo.contents, ou
0c80: 74 62 75 66 2d 3e 70 75 62 6b 65 79 69 6e 66 6f  tbuf->pubkeyinfo
0c90: 2e 73 69 7a 65 2c 20 26 6f 75 74 62 75 66 2d 3e  .size, &outbuf->
0ca0: 70 75 62 6b 65 79 5f 61 6c 67 6f 69 64 2c 20 26  pubkey_algoid, &
0cb0: 6f 75 74 62 75 66 2d 3e 70 75 62 6b 65 79 2c 20  outbuf->pubkey, 
0cc0: 4e 55 4c 4c 29 3b 0a 09 69 66 20 28 72 65 61 64  NULL);..if (read
0cd0: 5f 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 72  _ret != 0) {...r
0ce0: 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09  eturn(-1);..}...
0cf0: 72 65 74 75 72 6e 28 30 29 3b 0a 7d 0a 0a 73 73  return(0);.}..ss
0d00: 69 7a 65 5f 74 20 78 35 30 39 5f 74 6f 5f 69 73  ize_t x509_to_is
0d10: 73 75 65 72 28 76 6f 69 64 20 2a 78 35 30 39 5f  suer(void *x509_
0d20: 64 65 72 5f 62 75 66 2c 20 73 69 7a 65 5f 74 20  der_buf, size_t 
0d30: 78 35 30 39 5f 64 65 72 5f 62 75 66 5f 6c 65 6e  x509_der_buf_len
0d40: 2c 20 76 6f 69 64 20 2a 2a 6f 75 74 62 75 66 29  , void **outbuf)
0d50: 20 7b 0a 09 73 74 72 75 63 74 20 78 35 30 39 5f   {..struct x509_
0d60: 6f 62 6a 65 63 74 20 78 35 30 39 3b 0a 09 69 6e  object x509;..in
0d70: 74 20 72 65 61 64 5f 72 65 74 3b 0a 0a 09 72 65  t read_ret;...re
0d80: 61 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35  ad_ret = asn1_x5
0d90: 30 39 5f 72 65 61 64 5f 6f 62 6a 65 63 74 28 78  09_read_object(x
0da0: 35 30 39 5f 64 65 72 5f 62 75 66 2c 20 78 35 30  509_der_buf, x50
0db0: 39 5f 64 65 72 5f 62 75 66 5f 6c 65 6e 2c 20 26  9_der_buf_len, &
0dc0: 78 35 30 39 29 3b 0a 09 69 66 20 28 72 65 61 64  x509);..if (read
0dd0: 5f 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 72  _ret != 0) {...r
0de0: 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09  eturn(-1);..}...
0df0: 69 66 20 28 6f 75 74 62 75 66 29 20 7b 0a 09 09  if (outbuf) {...
0e00: 2a 6f 75 74 62 75 66 20 3d 20 78 35 30 39 2e 69  *outbuf = x509.i
0e10: 73 73 75 65 72 2e 61 73 6e 31 72 65 70 3b 0a 09  ssuer.asn1rep;..
0e20: 7d 0a 0a 09 72 65 74 75 72 6e 28 78 35 30 39 2e  }...return(x509.
0e30: 69 73 73 75 65 72 2e 61 73 6e 31 72 65 70 5f 6c  issuer.asn1rep_l
0e40: 65 6e 29 3b 0a 7d 0a 0a 73 73 69 7a 65 5f 74 20  en);.}..ssize_t 
0e50: 78 35 30 39 5f 74 6f 5f 73 75 62 6a 65 63 74 28  x509_to_subject(
0e60: 76 6f 69 64 20 2a 78 35 30 39 5f 64 65 72 5f 62  void *x509_der_b
0e70: 75 66 2c 20 73 69 7a 65 5f 74 20 78 35 30 39 5f  uf, size_t x509_
0e80: 64 65 72 5f 62 75 66 5f 6c 65 6e 2c 20 76 6f 69  der_buf_len, voi
0e90: 64 20 2a 2a 6f 75 74 62 75 66 29 20 7b 0a 09 73  d **outbuf) {..s
0ea0: 74 72 75 63 74 20 78 35 30 39 5f 6f 62 6a 65 63  truct x509_objec
0eb0: 74 20 78 35 30 39 3b 0a 09 69 6e 74 20 72 65 61  t x509;..int rea
0ec0: 64 5f 72 65 74 3b 0a 0a 09 72 65 61 64 5f 72 65  d_ret;...read_re
0ed0: 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f 72 65  t = asn1_x509_re
0ee0: 61 64 5f 6f 62 6a 65 63 74 28 78 35 30 39 5f 64  ad_object(x509_d
0ef0: 65 72 5f 62 75 66 2c 20 78 35 30 39 5f 64 65 72  er_buf, x509_der
0f00: 5f 62 75 66 5f 6c 65 6e 2c 20 26 78 35 30 39 29  _buf_len, &x509)
0f10: 3b 0a 09 69 66 20 28 72 65 61 64 5f 72 65 74 20  ;..if (read_ret 
0f20: 21 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e  != 0) {...return
0f30: 28 2d 31 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 6f  (-1);..}...if (o
0f40: 75 74 62 75 66 29 20 7b 0a 09 09 2a 6f 75 74 62  utbuf) {...*outb
0f50: 75 66 20 3d 20 78 35 30 39 2e 73 75 62 6a 65 63  uf = x509.subjec
0f60: 74 2e 61 73 6e 31 72 65 70 3b 0a 09 7d 0a 0a 09  t.asn1rep;..}...
0f70: 72 65 74 75 72 6e 28 78 35 30 39 2e 73 75 62 6a  return(x509.subj
0f80: 65 63 74 2e 61 73 6e 31 72 65 70 5f 6c 65 6e 29  ect.asn1rep_len)
0f90: 3b 0a 7d 0a 0a 73 73 69 7a 65 5f 74 20 78 35 30  ;.}..ssize_t x50
0fa0: 39 5f 74 6f 5f 73 65 72 69 61 6c 28 76 6f 69 64  9_to_serial(void
0fb0: 20 2a 78 35 30 39 5f 64 65 72 5f 62 75 66 2c 20   *x509_der_buf, 
0fc0: 73 69 7a 65 5f 74 20 78 35 30 39 5f 64 65 72 5f  size_t x509_der_
0fd0: 62 75 66 5f 6c 65 6e 2c 20 76 6f 69 64 20 2a 2a  buf_len, void **
0fe0: 6f 75 74 62 75 66 29 20 7b 0a 09 73 74 72 75 63  outbuf) {..struc
0ff0: 74 20 78 35 30 39 5f 6f 62 6a 65 63 74 20 78 35  t x509_object x5
1000: 30 39 3b 0a 09 69 6e 74 20 72 65 61 64 5f 72 65  09;..int read_re
1010: 74 3b 0a 0a 09 72 65 61 64 5f 72 65 74 20 3d 20  t;...read_ret = 
1020: 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 6f  asn1_x509_read_o
1030: 62 6a 65 63 74 28 78 35 30 39 5f 64 65 72 5f 62  bject(x509_der_b
1040: 75 66 2c 20 78 35 30 39 5f 64 65 72 5f 62 75 66  uf, x509_der_buf
1050: 5f 6c 65 6e 2c 20 26 78 35 30 39 29 3b 0a 09 69  _len, &x509);..i
1060: 66 20 28 72 65 61 64 5f 72 65 74 20 21 3d 20 30  f (read_ret != 0
1070: 29 20 7b 0a 09 09 72 65 74 75 72 6e 28 2d 31 29  ) {...return(-1)
1080: 3b 0a 09 7d 0a 0a 09 69 66 20 28 6f 75 74 62 75  ;..}...if (outbu
1090: 66 29 20 7b 0a 09 09 2a 6f 75 74 62 75 66 20 3d  f) {...*outbuf =
10a0: 20 78 35 30 39 2e 73 65 72 69 61 6c 5f 6e 75 6d   x509.serial_num
10b0: 62 65 72 2e 61 73 6e 31 72 65 70 3b 0a 09 7d 0a  ber.asn1rep;..}.
10c0: 0a 09 72 65 74 75 72 6e 28 78 35 30 39 2e 73 65  ..return(x509.se
10d0: 72 69 61 6c 5f 6e 75 6d 62 65 72 2e 61 73 6e 31  rial_number.asn1
10e0: 72 65 70 5f 6c 65 6e 29 3b 0a 7d 0a 0a 73 73 69  rep_len);.}..ssi
10f0: 7a 65 5f 74 20 78 35 30 39 5f 74 6f 5f 6d 6f 64  ze_t x509_to_mod
1100: 75 6c 75 73 28 76 6f 69 64 20 2a 78 35 30 39 5f  ulus(void *x509_
1110: 64 65 72 5f 62 75 66 2c 20 73 69 7a 65 5f 74 20  der_buf, size_t 
1120: 78 35 30 39 5f 64 65 72 5f 62 75 66 5f 6c 65 6e  x509_der_buf_len
1130: 2c 20 76 6f 69 64 20 2a 2a 6f 75 74 62 75 66 29  , void **outbuf)
1140: 20 7b 0a 09 73 74 72 75 63 74 20 61 73 6e 31 5f   {..struct asn1_
1150: 6f 62 6a 65 63 74 20 6e 75 6c 6c 2c 20 70 75 62  object null, pub
1160: 6b 65 79 2c 20 6d 6f 64 75 6c 75 73 2c 20 65 78  key, modulus, ex
1170: 70 6f 6e 65 6e 74 3b 0a 09 73 74 72 75 63 74 20  ponent;..struct 
1180: 78 35 30 39 5f 6f 62 6a 65 63 74 20 78 35 30 39  x509_object x509
1190: 3b 0a 09 69 6e 74 20 72 65 61 64 5f 72 65 74 3b  ;..int read_ret;
11a0: 0a 0a 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73  ...read_ret = as
11b0: 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 6f 62 6a  n1_x509_read_obj
11c0: 65 63 74 28 78 35 30 39 5f 64 65 72 5f 62 75 66  ect(x509_der_buf
11d0: 2c 20 78 35 30 39 5f 64 65 72 5f 62 75 66 5f 6c  , x509_der_buf_l
11e0: 65 6e 2c 20 26 78 35 30 39 29 3b 0a 09 69 66 20  en, &x509);..if 
11f0: 28 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29 20  (read_ret != 0) 
1200: 7b 0a 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a  {...return(-1);.
1210: 09 7d 0a 0a 09 2f 2a 20 54 68 65 20 73 74 72 75  .}.../* The stru
1220: 63 74 75 72 65 20 6f 66 20 22 70 75 62 6b 65 79  cture of "pubkey
1230: 22 20 69 73 20 73 70 65 63 69 66 69 65 64 20 69  " is specified i
1240: 6e 20 50 4b 43 53 20 23 31 20 2a 2f 0a 09 72 65  n PKCS #1 */..re
1250: 61 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35  ad_ret = asn1_x5
1260: 30 39 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a  09_read_asn1_obj
1270: 65 63 74 28 78 35 30 39 2e 70 75 62 6b 65 79 2e  ect(x509.pubkey.
1280: 63 6f 6e 74 65 6e 74 73 2c 20 78 35 30 39 2e 70  contents, x509.p
1290: 75 62 6b 65 79 2e 73 69 7a 65 2c 20 26 6e 75 6c  ubkey.size, &nul
12a0: 6c 2c 20 26 70 75 62 6b 65 79 2c 20 4e 55 4c 4c  l, &pubkey, NULL
12b0: 29 3b 0a 09 69 66 20 28 72 65 61 64 5f 72 65 74  );..if (read_ret
12c0: 20 21 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72   != 0) {...retur
12d0: 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 72 65 61 64  n(-1);..}...read
12e0: 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39  _ret = asn1_x509
12f0: 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63  _read_asn1_objec
1300: 74 28 70 75 62 6b 65 79 2e 63 6f 6e 74 65 6e 74  t(pubkey.content
1310: 73 2c 20 70 75 62 6b 65 79 2e 73 69 7a 65 2c 20  s, pubkey.size, 
1320: 26 6d 6f 64 75 6c 75 73 2c 20 26 65 78 70 6f 6e  &modulus, &expon
1330: 65 6e 74 2c 20 4e 55 4c 4c 29 3b 0a 09 69 66 20  ent, NULL);..if 
1340: 28 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29 20  (read_ret != 0) 
1350: 7b 0a 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a  {...return(-1);.
1360: 09 7d 0a 0a 09 69 66 20 28 6f 75 74 62 75 66 29  .}...if (outbuf)
1370: 20 7b 0a 09 09 2a 6f 75 74 62 75 66 20 3d 20 6d   {...*outbuf = m
1380: 6f 64 75 6c 75 73 2e 63 6f 6e 74 65 6e 74 73 3b  odulus.contents;
1390: 0a 09 7d 0a 0a 09 72 65 74 75 72 6e 28 6d 6f 64  ..}...return(mod
13a0: 75 6c 75 73 2e 73 69 7a 65 29 3b 0a 7d 0a 0a 73  ulus.size);.}..s
13b0: 73 69 7a 65 5f 74 20 78 35 30 39 5f 74 6f 5f 65  size_t x509_to_e
13c0: 78 70 6f 6e 65 6e 74 28 76 6f 69 64 20 2a 78 35  xponent(void *x5
13d0: 30 39 5f 64 65 72 5f 62 75 66 2c 20 73 69 7a 65  09_der_buf, size
13e0: 5f 74 20 78 35 30 39 5f 64 65 72 5f 62 75 66 5f  _t x509_der_buf_
13f0: 6c 65 6e 2c 20 76 6f 69 64 20 2a 2a 6f 75 74 62  len, void **outb
1400: 75 66 29 20 7b 0a 09 73 74 72 75 63 74 20 61 73  uf) {..struct as
1410: 6e 31 5f 6f 62 6a 65 63 74 20 6e 75 6c 6c 2c 20  n1_object null, 
1420: 70 75 62 6b 65 79 2c 20 6d 6f 64 75 6c 75 73 2c  pubkey, modulus,
1430: 20 65 78 70 6f 6e 65 6e 74 3b 0a 09 73 74 72 75   exponent;..stru
1440: 63 74 20 78 35 30 39 5f 6f 62 6a 65 63 74 20 78  ct x509_object x
1450: 35 30 39 3b 0a 09 69 6e 74 20 72 65 61 64 5f 72  509;..int read_r
1460: 65 74 3b 0a 0a 09 72 65 61 64 5f 72 65 74 20 3d  et;...read_ret =
1470: 20 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f   asn1_x509_read_
1480: 6f 62 6a 65 63 74 28 78 35 30 39 5f 64 65 72 5f  object(x509_der_
1490: 62 75 66 2c 20 78 35 30 39 5f 64 65 72 5f 62 75  buf, x509_der_bu
14a0: 66 5f 6c 65 6e 2c 20 26 78 35 30 39 29 3b 0a 09  f_len, &x509);..
14b0: 69 66 20 28 72 65 61 64 5f 72 65 74 20 21 3d 20  if (read_ret != 
14c0: 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28 2d 31  0) {...return(-1
14d0: 29 3b 0a 09 7d 0a 0a 09 2f 2a 20 54 68 65 20 73  );..}.../* The s
14e0: 74 72 75 63 74 75 72 65 20 6f 66 20 22 70 75 62  tructure of "pub
14f0: 6b 65 79 22 20 69 73 20 73 70 65 63 69 66 69 65  key" is specifie
1500: 64 20 69 6e 20 50 4b 43 53 20 23 31 20 2a 2f 0a  d in PKCS #1 */.
1510: 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73 6e 31  .read_ret = asn1
1520: 5f 78 35 30 39 5f 72 65 61 64 5f 61 73 6e 31 5f  _x509_read_asn1_
1530: 6f 62 6a 65 63 74 28 78 35 30 39 2e 70 75 62 6b  object(x509.pubk
1540: 65 79 2e 63 6f 6e 74 65 6e 74 73 2c 20 78 35 30  ey.contents, x50
1550: 39 2e 70 75 62 6b 65 79 2e 73 69 7a 65 2c 20 26  9.pubkey.size, &
1560: 6e 75 6c 6c 2c 20 26 70 75 62 6b 65 79 2c 20 4e  null, &pubkey, N
1570: 55 4c 4c 29 3b 0a 09 69 66 20 28 72 65 61 64 5f  ULL);..if (read_
1580: 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 72 65  ret != 0) {...re
1590: 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 72  turn(-1);..}...r
15a0: 65 61 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78  ead_ret = asn1_x
15b0: 35 30 39 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62  509_read_asn1_ob
15c0: 6a 65 63 74 28 70 75 62 6b 65 79 2e 63 6f 6e 74  ject(pubkey.cont
15d0: 65 6e 74 73 2c 20 70 75 62 6b 65 79 2e 73 69 7a  ents, pubkey.siz
15e0: 65 2c 20 26 6d 6f 64 75 6c 75 73 2c 20 26 65 78  e, &modulus, &ex
15f0: 70 6f 6e 65 6e 74 2c 20 4e 55 4c 4c 29 3b 0a 09  ponent, NULL);..
1600: 69 66 20 28 72 65 61 64 5f 72 65 74 20 21 3d 20  if (read_ret != 
1610: 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28 2d 31  0) {...return(-1
1620: 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 6f 75 74 62  );..}...if (outb
1630: 75 66 29 20 7b 0a 09 09 2a 6f 75 74 62 75 66 20  uf) {...*outbuf 
1640: 3d 20 65 78 70 6f 6e 65 6e 74 2e 63 6f 6e 74 65  = exponent.conte
1650: 6e 74 73 3b 0a 09 7d 0a 0a 09 72 65 74 75 72 6e  nts;..}...return
1660: 28 65 78 70 6f 6e 65 6e 74 2e 73 69 7a 65 29 3b  (exponent.size);
1670: 0a 7d 0a 0a 73 73 69 7a 65 5f 74 20 78 35 30 39  .}..ssize_t x509
1680: 5f 74 6f 5f 6b 65 79 73 69 7a 65 28 76 6f 69 64  _to_keysize(void
1690: 20 2a 78 35 30 39 5f 64 65 72 5f 62 75 66 2c 20   *x509_der_buf, 
16a0: 73 69 7a 65 5f 74 20 78 35 30 39 5f 64 65 72 5f  size_t x509_der_
16b0: 62 75 66 5f 6c 65 6e 29 20 7b 0a 09 73 74 72 75  buf_len) {..stru
16c0: 63 74 20 61 73 6e 31 5f 6f 62 6a 65 63 74 20 6e  ct asn1_object n
16d0: 75 6c 6c 2c 20 70 75 62 6b 65 79 2c 20 6d 6f 64  ull, pubkey, mod
16e0: 75 6c 75 73 2c 20 65 78 70 6f 6e 65 6e 74 3b 0a  ulus, exponent;.
16f0: 09 73 74 72 75 63 74 20 78 35 30 39 5f 6f 62 6a  .struct x509_obj
1700: 65 63 74 20 78 35 30 39 3b 0a 09 69 6e 74 20 72  ect x509;..int r
1710: 65 61 64 5f 72 65 74 3b 0a 0a 09 72 65 61 64 5f  ead_ret;...read_
1720: 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f  ret = asn1_x509_
1730: 72 65 61 64 5f 6f 62 6a 65 63 74 28 78 35 30 39  read_object(x509
1740: 5f 64 65 72 5f 62 75 66 2c 20 78 35 30 39 5f 64  _der_buf, x509_d
1750: 65 72 5f 62 75 66 5f 6c 65 6e 2c 20 26 78 35 30  er_buf_len, &x50
1760: 39 29 3b 0a 09 69 66 20 28 72 65 61 64 5f 72 65  9);..if (read_re
1770: 74 20 21 3d 20 30 29 20 7b 0a 09 09 72 65 74 75  t != 0) {...retu
1780: 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 2f 2a 20  rn(-1);..}.../* 
1790: 54 68 65 20 73 74 72 75 63 74 75 72 65 20 6f 66  The structure of
17a0: 20 22 70 75 62 6b 65 79 22 20 69 73 20 73 70 65   "pubkey" is spe
17b0: 63 69 66 69 65 64 20 69 6e 20 50 4b 43 53 20 23  cified in PKCS #
17c0: 31 20 2a 2f 0a 09 72 65 61 64 5f 72 65 74 20 3d  1 */..read_ret =
17d0: 20 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f   asn1_x509_read_
17e0: 61 73 6e 31 5f 6f 62 6a 65 63 74 28 78 35 30 39  asn1_object(x509
17f0: 2e 70 75 62 6b 65 79 2e 63 6f 6e 74 65 6e 74 73  .pubkey.contents
1800: 2c 20 78 35 30 39 2e 70 75 62 6b 65 79 2e 73 69  , x509.pubkey.si
1810: 7a 65 2c 20 26 6e 75 6c 6c 2c 20 26 70 75 62 6b  ze, &null, &pubk
1820: 65 79 2c 20 4e 55 4c 4c 29 3b 0a 09 69 66 20 28  ey, NULL);..if (
1830: 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29 20 7b  read_ret != 0) {
1840: 0a 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09  ...return(-1);..
1850: 7d 0a 0a 09 72 65 61 64 5f 72 65 74 20 3d 20 61  }...read_ret = a
1860: 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 61 73  sn1_x509_read_as
1870: 6e 31 5f 6f 62 6a 65 63 74 28 70 75 62 6b 65 79  n1_object(pubkey
1880: 2e 63 6f 6e 74 65 6e 74 73 2c 20 70 75 62 6b 65  .contents, pubke
1890: 79 2e 73 69 7a 65 2c 20 26 6d 6f 64 75 6c 75 73  y.size, &modulus
18a0: 2c 20 26 65 78 70 6f 6e 65 6e 74 2c 20 4e 55 4c  , &exponent, NUL
18b0: 4c 29 3b 0a 09 69 66 20 28 72 65 61 64 5f 72 65  L);..if (read_re
18c0: 74 20 21 3d 20 30 29 20 7b 0a 09 09 72 65 74 75  t != 0) {...retu
18d0: 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 72 65 74  rn(-1);..}...ret
18e0: 75 72 6e 28 6d 6f 64 75 6c 75 73 2e 73 69 7a 65  urn(modulus.size
18f0: 20 2d 20 31 29 3b 0a 7d 0a 0a 2f 2a 0a 20 2a 20   - 1);.}../*. * 
1900: 68 74 74 70 3a 2f 2f 77 77 77 2e 62 6c 61 63 6b  http://www.black
1910: 62 65 72 72 79 2e 63 6f 6d 2f 64 65 76 65 6c 6f  berry.com/develo
1920: 70 65 72 73 2f 64 6f 63 73 2f 34 2e 36 2e 30 61  pers/docs/4.6.0a
1930: 70 69 2f 6a 61 76 61 78 2f 6d 69 63 72 6f 65 64  pi/javax/microed
1940: 69 74 69 6f 6e 2f 70 6b 69 2f 43 65 72 74 69 66  ition/pki/Certif
1950: 69 63 61 74 65 2e 68 74 6d 6c 0a 20 2a 2f 0a 73  icate.html. */.s
1960: 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72  tatic const char
1970: 20 2a 5f 78 35 30 39 5f 6f 62 6a 65 63 74 69 64   *_x509_objectid
1980: 5f 74 6f 5f 6c 61 62 65 6c 5f 73 74 72 69 6e 67  _to_label_string
1990: 28 76 6f 69 64 20 2a 62 75 66 2c 20 73 69 7a 65  (void *buf, size
19a0: 5f 74 20 62 75 66 6c 65 6e 29 20 7b 0a 09 73 77  _t buflen) {..sw
19b0: 69 74 63 68 20 28 62 75 66 6c 65 6e 29 20 7b 0a  itch (buflen) {.
19c0: 09 09 63 61 73 65 20 33 3a 0a 09 09 09 69 66 20  ..case 3:....if 
19d0: 28 6d 65 6d 63 6d 70 28 62 75 66 2c 20 22 5c 78  (memcmp(buf, "\x
19e0: 35 35 5c 78 30 34 5c 78 30 33 22 2c 20 33 29 20  55\x04\x03", 3) 
19f0: 3d 3d 20 30 29 20 7b 0a 09 09 09 09 72 65 74 75  == 0) {.....retu
1a00: 72 6e 28 22 43 4e 22 29 3b 0a 09 09 09 7d 0a 09  rn("CN");....}..
1a10: 09 09 69 66 20 28 6d 65 6d 63 6d 70 28 62 75 66  ..if (memcmp(buf
1a20: 2c 20 22 5c 78 35 35 5c 78 30 34 5c 78 30 34 22  , "\x55\x04\x04"
1a30: 2c 20 33 29 20 3d 3d 20 30 29 20 7b 0a 09 09 09  , 3) == 0) {....
1a40: 09 72 65 74 75 72 6e 28 22 53 4e 22 29 3b 0a 09  .return("SN");..
1a50: 09 09 7d 0a 09 09 09 69 66 20 28 6d 65 6d 63 6d  ..}....if (memcm
1a60: 70 28 62 75 66 2c 20 22 5c 78 35 35 5c 78 30 34  p(buf, "\x55\x04
1a70: 5c 78 30 36 22 2c 20 33 29 20 3d 3d 20 30 29 20  \x06", 3) == 0) 
1a80: 7b 0a 09 09 09 09 72 65 74 75 72 6e 28 22 43 22  {.....return("C"
1a90: 29 3b 0a 09 09 09 7d 0a 09 09 09 69 66 20 28 6d  );....}....if (m
1aa0: 65 6d 63 6d 70 28 62 75 66 2c 20 22 5c 78 35 35  emcmp(buf, "\x55
1ab0: 5c 78 30 34 5c 78 30 37 22 2c 20 33 29 20 3d 3d  \x04\x07", 3) ==
1ac0: 20 30 29 20 7b 0a 09 09 09 09 72 65 74 75 72 6e   0) {.....return
1ad0: 28 22 4c 22 29 3b 0a 09 09 09 7d 0a 09 09 09 69  ("L");....}....i
1ae0: 66 20 28 6d 65 6d 63 6d 70 28 62 75 66 2c 20 22  f (memcmp(buf, "
1af0: 5c 78 35 35 5c 78 30 34 5c 78 30 38 22 2c 20 33  \x55\x04\x08", 3
1b00: 29 20 3d 3d 20 30 29 20 7b 0a 09 09 09 09 72 65  ) == 0) {.....re
1b10: 74 75 72 6e 28 22 53 54 22 29 3b 0a 09 09 09 7d  turn("ST");....}
1b20: 0a 09 09 09 69 66 20 28 6d 65 6d 63 6d 70 28 62  ....if (memcmp(b
1b30: 75 66 2c 20 22 5c 78 35 35 5c 78 30 34 5c 78 30  uf, "\x55\x04\x0
1b40: 39 22 2c 20 33 29 20 3d 3d 20 30 29 20 7b 0a 09  9", 3) == 0) {..
1b50: 09 09 09 72 65 74 75 72 6e 28 22 53 54 52 45 45  ...return("STREE
1b60: 54 22 29 3b 0a 09 09 09 7d 0a 09 09 09 69 66 20  T");....}....if 
1b70: 28 6d 65 6d 63 6d 70 28 62 75 66 2c 20 22 5c 78  (memcmp(buf, "\x
1b80: 35 35 5c 78 30 34 5c 78 30 41 22 2c 20 33 29 20  55\x04\x0A", 3) 
1b90: 3d 3d 20 30 29 20 7b 0a 09 09 09 09 72 65 74 75  == 0) {.....retu
1ba0: 72 6e 28 22 4f 22 29 3b 0a 09 09 09 7d 0a 09 09  rn("O");....}...
1bb0: 09 69 66 20 28 6d 65 6d 63 6d 70 28 62 75 66 2c  .if (memcmp(buf,
1bc0: 20 22 5c 78 35 35 5c 78 30 34 5c 78 30 42 22 2c   "\x55\x04\x0B",
1bd0: 20 33 29 20 3d 3d 20 30 29 20 7b 0a 09 09 09 09   3) == 0) {.....
1be0: 72 65 74 75 72 6e 28 22 4f 55 22 29 3b 0a 09 09  return("OU");...
1bf0: 09 7d 0a 09 09 09 62 72 65 61 6b 3b 0a 09 09 63  .}....break;...c
1c00: 61 73 65 20 39 3a 0a 09 09 09 69 66 20 28 6d 65  ase 9:....if (me
1c10: 6d 63 6d 70 28 62 75 66 2c 20 22 5c 78 32 41 5c  mcmp(buf, "\x2A\
1c20: 78 38 36 5c 78 34 38 5c 78 38 36 5c 78 46 37 5c  x86\x48\x86\xF7\
1c30: 78 30 44 5c 78 30 31 5c 78 30 39 5c 78 30 31 22  x0D\x01\x09\x01"
1c40: 2c 20 39 29 20 3d 3d 20 30 29 20 7b 0a 09 09 09  , 9) == 0) {....
1c50: 09 72 65 74 75 72 6e 28 22 45 6d 61 69 6c 41 64  .return("EmailAd
1c60: 64 72 65 73 73 22 29 3b 0a 09 09 09 7d 0a 09 09  dress");....}...
1c70: 09 62 72 65 61 6b 3b 0a 09 7d 0a 0a 09 72 65 74  .break;..}...ret
1c80: 75 72 6e 28 22 3f 3f 3f 22 29 3b 0a 7d 0a 0a 73  urn("???");.}..s
1c90: 73 69 7a 65 5f 74 20 78 35 30 39 5f 64 6e 5f 74  size_t x509_dn_t
1ca0: 6f 5f 73 74 72 69 6e 67 28 76 6f 69 64 20 2a 61  o_string(void *a
1cb0: 73 6e 31 5f 64 65 72 5f 62 75 66 2c 20 73 69 7a  sn1_der_buf, siz
1cc0: 65 5f 74 20 61 73 6e 31 5f 64 65 72 5f 62 75 66  e_t asn1_der_buf
1cd0: 5f 6c 65 6e 2c 20 63 68 61 72 20 2a 6f 75 74 62  _len, char *outb
1ce0: 75 66 2c 20 73 69 7a 65 5f 74 20 6f 75 74 62 75  uf, size_t outbu
1cf0: 66 5f 6c 65 6e 2c 20 63 68 61 72 20 2a 6d 61 74  f_len, char *mat
1d00: 63 68 6c 61 62 65 6c 29 20 7b 0a 09 73 74 72 75  chlabel) {..stru
1d10: 63 74 20 61 73 6e 31 5f 6f 62 6a 65 63 74 20 77  ct asn1_object w
1d20: 68 6f 6c 65 5f 74 68 69 6e 67 2c 20 63 75 72 72  hole_thing, curr
1d30: 65 6e 74 5f 73 65 74 2c 20 63 75 72 72 65 6e 74  ent_set, current
1d40: 5f 73 65 71 3b 0a 09 73 74 72 75 63 74 20 61 73  _seq;..struct as
1d50: 6e 31 5f 6f 62 6a 65 63 74 20 6c 61 62 65 6c 2c  n1_object label,
1d60: 20 76 61 6c 75 65 3b 0a 09 63 6f 6e 73 74 20 63   value;..const c
1d70: 68 61 72 20 2a 6c 61 62 65 6c 5f 73 74 72 3b 0a  har *label_str;.
1d80: 09 73 73 69 7a 65 5f 74 20 73 6e 70 72 69 6e 74  .ssize_t snprint
1d90: 66 5f 72 65 74 2c 20 72 65 74 76 61 6c 3b 0a 09  f_ret, retval;..
1da0: 63 68 61 72 20 2a 6f 75 74 62 75 66 5f 73 3b 0a  char *outbuf_s;.
1db0: 09 69 6e 74 20 72 65 61 64 5f 72 65 74 3b 0a 09  .int read_ret;..
1dc0: 69 6e 74 20 6f 66 66 73 65 74 3b 0a 0a 09 69 66  int offset;...if
1dd0: 20 28 6f 75 74 62 75 66 20 3d 3d 20 4e 55 4c 4c   (outbuf == NULL
1de0: 29 20 7b 0a 09 09 72 65 74 75 72 6e 28 2d 31 29  ) {...return(-1)
1df0: 3b 0a 09 7d 0a 0a 09 69 66 20 28 6f 75 74 62 75  ;..}...if (outbu
1e00: 66 5f 6c 65 6e 20 3d 3d 20 30 20 7c 7c 20 61 73  f_len == 0 || as
1e10: 6e 31 5f 64 65 72 5f 62 75 66 5f 6c 65 6e 20 3d  n1_der_buf_len =
1e20: 3d 20 30 20 7c 7c 20 61 73 6e 31 5f 64 65 72 5f  = 0 || asn1_der_
1e30: 62 75 66 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09  buf == NULL) {..
1e40: 09 72 65 74 75 72 6e 28 30 29 3b 0a 09 7d 0a 0a  .return(0);..}..
1e50: 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73 6e 31  .read_ret = asn1
1e60: 5f 78 35 30 39 5f 72 65 61 64 5f 61 73 6e 31 5f  _x509_read_asn1_
1e70: 6f 62 6a 65 63 74 28 61 73 6e 31 5f 64 65 72 5f  object(asn1_der_
1e80: 62 75 66 2c 20 61 73 6e 31 5f 64 65 72 5f 62 75  buf, asn1_der_bu
1e90: 66 5f 6c 65 6e 2c 20 26 77 68 6f 6c 65 5f 74 68  f_len, &whole_th
1ea0: 69 6e 67 2c 20 4e 55 4c 4c 29 3b 0a 09 69 66 20  ing, NULL);..if 
1eb0: 28 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29 20  (read_ret != 0) 
1ec0: 7b 0a 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a  {...return(-1);.
1ed0: 09 7d 0a 0a 09 2f 2a 20 54 65 72 6d 69 6e 61 74  .}.../* Terminat
1ee0: 65 20 73 74 72 69 6e 67 2c 20 69 6e 20 63 61 73  e string, in cas
1ef0: 65 20 6e 6f 20 76 61 6c 69 64 20 65 6c 65 6d 65  e no valid eleme
1f00: 6e 74 73 20 61 72 65 20 66 6f 75 6e 64 20 77 65  nts are found we
1f10: 20 73 74 69 6c 6c 20 72 65 74 75 72 6e 20 61 20   still return a 
1f20: 76 61 6c 69 64 20 73 74 72 69 6e 67 20 2a 2f 0a  valid string */.
1f30: 09 2a 6f 75 74 62 75 66 20 3d 20 27 5c 30 27 3b  .*outbuf = '\0';
1f40: 0a 09 6f 75 74 62 75 66 5f 73 20 3d 20 6f 75 74  ..outbuf_s = out
1f50: 62 75 66 3b 0a 0a 09 6f 66 66 73 65 74 20 3d 20  buf;...offset = 
1f60: 30 3b 0a 09 77 68 69 6c 65 20 28 31 29 20 7b 0a  0;..while (1) {.
1f70: 09 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73 6e  ..read_ret = asn
1f80: 31 5f 78 35 30 39 5f 72 65 61 64 5f 61 73 6e 31  1_x509_read_asn1
1f90: 5f 6f 62 6a 65 63 74 28 77 68 6f 6c 65 5f 74 68  _object(whole_th
1fa0: 69 6e 67 2e 63 6f 6e 74 65 6e 74 73 20 2b 20 6f  ing.contents + o
1fb0: 66 66 73 65 74 2c 20 77 68 6f 6c 65 5f 74 68 69  ffset, whole_thi
1fc0: 6e 67 2e 73 69 7a 65 20 2d 20 6f 66 66 73 65 74  ng.size - offset
1fd0: 2c 20 26 63 75 72 72 65 6e 74 5f 73 65 74 2c 20  , &current_set, 
1fe0: 4e 55 4c 4c 29 3b 0a 09 09 69 66 20 28 72 65 61  NULL);...if (rea
1ff0: 64 5f 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09  d_ret != 0) {...
2000: 09 62 72 65 61 6b 3b 0a 09 09 7d 0a 0a 09 09 6f  .break;...}....o
2010: 66 66 73 65 74 20 2b 3d 20 63 75 72 72 65 6e 74  ffset += current
2020: 5f 73 65 74 2e 73 69 7a 65 20 2b 20 32 3b 0a 0a  _set.size + 2;..
2030: 09 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73 6e  ..read_ret = asn
2040: 31 5f 78 35 30 39 5f 72 65 61 64 5f 61 73 6e 31  1_x509_read_asn1
2050: 5f 6f 62 6a 65 63 74 28 63 75 72 72 65 6e 74 5f  _object(current_
2060: 73 65 74 2e 63 6f 6e 74 65 6e 74 73 2c 20 63 75  set.contents, cu
2070: 72 72 65 6e 74 5f 73 65 74 2e 73 69 7a 65 2c 20  rrent_set.size, 
2080: 26 63 75 72 72 65 6e 74 5f 73 65 71 2c 20 4e 55  &current_seq, NU
2090: 4c 4c 29 3b 0a 09 09 69 66 20 28 72 65 61 64 5f  LL);...if (read_
20a0: 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 09 62  ret != 0) {....b
20b0: 72 65 61 6b 3b 0a 09 09 7d 0a 0a 09 09 72 65 61  reak;...}....rea
20c0: 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30  d_ret = asn1_x50
20d0: 39 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65  9_read_asn1_obje
20e0: 63 74 28 63 75 72 72 65 6e 74 5f 73 65 71 2e 63  ct(current_seq.c
20f0: 6f 6e 74 65 6e 74 73 2c 20 63 75 72 72 65 6e 74  ontents, current
2100: 5f 73 65 71 2e 73 69 7a 65 2c 20 26 6c 61 62 65  _seq.size, &labe
2110: 6c 2c 20 26 76 61 6c 75 65 2c 20 4e 55 4c 4c 29  l, &value, NULL)
2120: 3b 0a 0a 09 09 6c 61 62 65 6c 5f 73 74 72 20 3d  ;....label_str =
2130: 20 5f 78 35 30 39 5f 6f 62 6a 65 63 74 69 64 5f   _x509_objectid_
2140: 74 6f 5f 6c 61 62 65 6c 5f 73 74 72 69 6e 67 28  to_label_string(
2150: 6c 61 62 65 6c 2e 63 6f 6e 74 65 6e 74 73 2c 20  label.contents, 
2160: 6c 61 62 65 6c 2e 73 69 7a 65 29 3b 0a 0a 09 09  label.size);....
2170: 2f 2a 20 49 66 20 74 68 65 20 75 73 65 72 20 72  /* If the user r
2180: 65 71 75 65 73 74 65 64 20 6f 6e 6c 79 20 63 65  equested only ce
2190: 72 74 61 69 6e 20 6c 61 62 65 6c 73 2c 20 65 78  rtain labels, ex
21a0: 63 6c 75 64 65 20 6f 74 68 65 72 73 20 2a 2f 0a  clude others */.
21b0: 09 09 69 66 20 28 6d 61 74 63 68 6c 61 62 65 6c  ..if (matchlabel
21c0: 29 20 7b 0a 09 09 09 69 66 20 28 73 74 72 63 6d  ) {....if (strcm
21d0: 70 28 6d 61 74 63 68 6c 61 62 65 6c 2c 20 6c 61  p(matchlabel, la
21e0: 62 65 6c 5f 73 74 72 29 20 21 3d 20 30 29 20 7b  bel_str) != 0) {
21f0: 0a 09 09 09 09 63 6f 6e 74 69 6e 75 65 3b 0a 09  .....continue;..
2200: 09 09 7d 0a 09 09 7d 0a 0a 09 09 2f 2a 20 49 66  ..}...}..../* If
2210: 20 74 68 65 20 75 73 65 72 20 72 65 71 75 65 73   the user reques
2220: 74 65 64 20 6f 6e 6c 79 20 63 65 72 74 61 69 6e  ted only certain
2230: 20 6c 61 62 65 6c 73 2c 20 64 6f 6e 27 74 20 69   labels, don't i
2240: 6e 63 6c 75 64 65 20 74 68 65 6d 20 69 6e 20 74  nclude them in t
2250: 68 65 20 72 65 70 6c 79 20 2a 2f 0a 09 09 69 66  he reply */...if
2260: 20 28 6d 61 74 63 68 6c 61 62 65 6c 29 20 7b 0a   (matchlabel) {.
2270: 09 09 09 73 6e 70 72 69 6e 74 66 5f 72 65 74 20  ...snprintf_ret 
2280: 3d 20 73 6e 70 72 69 6e 74 66 28 6f 75 74 62 75  = snprintf(outbu
2290: 66 2c 20 6f 75 74 62 75 66 5f 6c 65 6e 2c 20 22  f, outbuf_len, "
22a0: 25 2e 2a 73 2c 20 22 2c 20 28 75 6e 73 69 67 6e  %.*s, ", (unsign
22b0: 65 64 20 69 6e 74 29 20 76 61 6c 75 65 2e 73 69  ed int) value.si
22c0: 7a 65 2c 20 28 63 68 61 72 20 2a 29 20 76 61 6c  ze, (char *) val
22d0: 75 65 2e 63 6f 6e 74 65 6e 74 73 29 3b 0a 09 09  ue.contents);...
22e0: 7d 20 65 6c 73 65 20 7b 0a 09 09 09 73 6e 70 72  } else {....snpr
22f0: 69 6e 74 66 5f 72 65 74 20 3d 20 73 6e 70 72 69  intf_ret = snpri
2300: 6e 74 66 28 6f 75 74 62 75 66 2c 20 6f 75 74 62  ntf(outbuf, outb
2310: 75 66 5f 6c 65 6e 2c 20 22 25 73 3d 25 2e 2a 73  uf_len, "%s=%.*s
2320: 2c 20 22 2c 20 6c 61 62 65 6c 5f 73 74 72 2c 20  , ", label_str, 
2330: 28 75 6e 73 69 67 6e 65 64 20 69 6e 74 29 20 76  (unsigned int) v
2340: 61 6c 75 65 2e 73 69 7a 65 2c 20 28 63 68 61 72  alue.size, (char
2350: 20 2a 29 20 76 61 6c 75 65 2e 63 6f 6e 74 65 6e   *) value.conten
2360: 74 73 29 3b 0a 09 09 7d 0a 09 09 69 66 20 28 73  ts);...}...if (s
2370: 6e 70 72 69 6e 74 66 5f 72 65 74 20 3c 20 30 29  nprintf_ret < 0)
2380: 20 7b 0a 09 09 09 62 72 65 61 6b 3b 0a 09 09 7d   {....break;...}
2390: 0a 0a 09 09 69 66 20 28 73 6e 70 72 69 6e 74 66  ....if (snprintf
23a0: 5f 72 65 74 20 3e 20 6f 75 74 62 75 66 5f 6c 65  _ret > outbuf_le
23b0: 6e 29 20 7b 0a 09 09 09 73 6e 70 72 69 6e 74 66  n) {....snprintf
23c0: 5f 72 65 74 20 3d 20 6f 75 74 62 75 66 5f 6c 65  _ret = outbuf_le
23d0: 6e 3b 0a 09 09 7d 0a 0a 09 09 6f 75 74 62 75 66  n;...}....outbuf
23e0: 20 2b 3d 20 73 6e 70 72 69 6e 74 66 5f 72 65 74   += snprintf_ret
23f0: 3b 0a 09 09 6f 75 74 62 75 66 5f 6c 65 6e 20 2d  ;...outbuf_len -
2400: 3d 20 73 6e 70 72 69 6e 74 66 5f 72 65 74 3b 0a  = snprintf_ret;.
2410: 0a 09 09 69 66 20 28 6f 75 74 62 75 66 5f 6c 65  ...if (outbuf_le
2420: 6e 20 3c 20 32 29 20 7b 0a 09 09 09 62 72 65 61  n < 2) {....brea
2430: 6b 3b 0a 09 09 7d 0a 09 7d 0a 0a 09 72 65 74 76  k;...}..}...retv
2440: 61 6c 20 3d 20 6f 75 74 62 75 66 20 2d 20 6f 75  al = outbuf - ou
2450: 74 62 75 66 5f 73 3b 0a 0a 09 2f 2a 20 52 65 6d  tbuf_s;.../* Rem
2460: 6f 76 65 20 74 72 61 69 6c 69 6e 67 20 22 2c 20  ove trailing ", 
2470: 22 20 61 64 64 65 64 20 62 79 20 63 75 6d 75 6c  " added by cumul
2480: 61 74 69 76 65 20 70 72 6f 63 65 73 73 2c 20 69  ative process, i
2490: 66 20 66 6f 75 6e 64 2e 20 2a 2f 0a 09 69 66 20  f found. */..if 
24a0: 28 72 65 74 76 61 6c 20 3e 20 32 29 20 7b 0a 09  (retval > 2) {..
24b0: 09 69 66 20 28 6f 75 74 62 75 66 5f 73 5b 72 65  .if (outbuf_s[re
24c0: 74 76 61 6c 20 2d 20 32 5d 20 3d 3d 20 27 2c 27  tval - 2] == ','
24d0: 29 20 7b 0a 09 09 09 6f 75 74 62 75 66 5f 73 5b  ) {....outbuf_s[
24e0: 72 65 74 76 61 6c 20 2d 20 32 5d 20 3d 20 27 5c  retval - 2] = '\
24f0: 30 27 3b 0a 09 09 09 72 65 74 76 61 6c 20 2d 3d  0';....retval -=
2500: 20 32 3b 0a 09 09 7d 0a 09 7d 0a 0a 09 72 65 74   2;...}..}...ret
2510: 75 72 6e 28 72 65 74 76 61 6c 29 3b 0a 7d 0a     urn(retval);.}.