Hex Artifact Content

Artifact bc9c145e70285c54292c6dd451d1e92733b3c782:


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 0a 09 2f  ;..buflen--;.../
0570: 2a 20 4e 55 4c 4c 20 54 61 67 20 2d 2d 20 6e 6f  * NULL Tag -- no
0580: 20 73 69 7a 65 20 69 73 20 72 65 71 75 69 72 65   size is require
0590: 64 20 2a 2f 0a 09 69 66 20 28 6f 75 74 62 75 66  d */..if (outbuf
05a0: 2d 3e 74 61 67 20 3d 3d 20 30 78 30 30 29 20 7b  ->tag == 0x00) {
05b0: 0a 09 09 6f 75 74 62 75 66 2d 3e 73 69 7a 65 20  ...outbuf->size 
05c0: 3d 20 30 3b 0a 09 09 6f 75 74 62 75 66 2d 3e 61  = 0;...outbuf->a
05d0: 73 6e 31 72 65 70 5f 6c 65 6e 20 3d 20 31 3b 0a  sn1rep_len = 1;.
05e0: 09 09 6f 75 74 62 75 66 2d 3e 61 73 6e 31 72 65  ..outbuf->asn1re
05f0: 70 20 3d 20 62 75 66 3b 0a 0a 09 09 72 65 74 75  p = buf;....retu
0600: 72 6e 28 5f 61 73 6e 31 5f 78 35 30 39 5f 72 65  rn(_asn1_x509_re
0610: 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74 28 62  ad_asn1_object(b
0620: 75 66 5f 70 2c 20 62 75 66 6c 65 6e 2c 20 61 72  uf_p, buflen, ar
0630: 67 73 29 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 62  gs));..}...if (b
0640: 75 66 6c 65 6e 20 3d 3d 20 30 29 20 7b 0a 09 09  uflen == 0) {...
0650: 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a  return(-1);..}..
0660: 09 73 6d 61 6c 6c 5f 6f 62 6a 65 63 74 5f 73 69  .small_object_si
0670: 7a 65 20 3d 20 2a 62 75 66 5f 70 3b 0a 09 62 75  ze = *buf_p;..bu
0680: 66 5f 70 2b 2b 3b 0a 09 62 75 66 6c 65 6e 2d 2d  f_p++;..buflen--
0690: 3b 0a 09 69 66 20 28 62 75 66 6c 65 6e 20 3d 3d  ;..if (buflen ==
06a0: 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28 2d   0) {...return(-
06b0: 31 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 28 73 6d  1);..}...if ((sm
06c0: 61 6c 6c 5f 6f 62 6a 65 63 74 5f 73 69 7a 65 20  all_object_size 
06d0: 26 20 30 78 38 30 29 20 3d 3d 20 30 78 38 30 29  & 0x80) == 0x80)
06e0: 20 7b 0a 09 09 6f 75 74 62 75 66 2d 3e 73 69 7a   {...outbuf->siz
06f0: 65 20 3d 20 30 3b 0a 0a 09 09 66 6f 72 20 28 73  e = 0;....for (s
0700: 6d 61 6c 6c 5f 6f 62 6a 65 63 74 5f 73 69 7a 65  mall_object_size
0710: 20 5e 3d 20 30 78 38 30 3b 20 73 6d 61 6c 6c 5f   ^= 0x80; small_
0720: 6f 62 6a 65 63 74 5f 73 69 7a 65 3b 20 73 6d 61  object_size; sma
0730: 6c 6c 5f 6f 62 6a 65 63 74 5f 73 69 7a 65 2d 2d  ll_object_size--
0740: 29 20 7b 0a 09 09 09 6f 75 74 62 75 66 2d 3e 73  ) {....outbuf->s
0750: 69 7a 65 20 3c 3c 3d 20 38 3b 0a 09 09 09 6f 75  ize <<= 8;....ou
0760: 74 62 75 66 2d 3e 73 69 7a 65 20 2b 3d 20 2a 62  tbuf->size += *b
0770: 75 66 5f 70 3b 0a 0a 09 09 09 62 75 66 5f 70 2b  uf_p;.....buf_p+
0780: 2b 3b 0a 09 09 09 62 75 66 6c 65 6e 2d 2d 3b 0a  +;....buflen--;.
0790: 0a 09 09 09 69 66 20 28 62 75 66 6c 65 6e 20 3d  ....if (buflen =
07a0: 3d 20 30 29 20 7b 0a 09 09 09 09 62 72 65 61 6b  = 0) {.....break
07b0: 3b 0a 09 09 09 7d 0a 09 09 7d 0a 09 7d 20 65 6c  ;....}...}..} el
07c0: 73 65 20 7b 0a 09 09 6f 75 74 62 75 66 2d 3e 73  se {...outbuf->s
07d0: 69 7a 65 20 3d 20 73 6d 61 6c 6c 5f 6f 62 6a 65  ize = small_obje
07e0: 63 74 5f 73 69 7a 65 3b 0a 09 7d 0a 0a 09 69 66  ct_size;..}...if
07f0: 20 28 6f 75 74 62 75 66 2d 3e 73 69 7a 65 20 3e   (outbuf->size >
0800: 20 62 75 66 6c 65 6e 29 20 7b 0a 09 09 72 65 74   buflen) {...ret
0810: 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 69 66  urn(-1);..}...if
0820: 20 28 62 75 66 6c 65 6e 20 21 3d 20 30 29 20 7b   (buflen != 0) {
0830: 0a 09 09 6f 75 74 62 75 66 2d 3e 63 6f 6e 74 65  ...outbuf->conte
0840: 6e 74 73 20 3d 20 62 75 66 5f 70 3b 0a 09 7d 0a  nts = buf_p;..}.
0850: 0a 09 6f 75 74 62 75 66 2d 3e 61 73 6e 31 72 65  ..outbuf->asn1re
0860: 70 5f 6c 65 6e 20 3d 20 6f 75 74 62 75 66 2d 3e  p_len = outbuf->
0870: 73 69 7a 65 20 2b 20 28 62 75 66 5f 70 20 2d 20  size + (buf_p - 
0880: 62 75 66 29 3b 0a 09 6f 75 74 62 75 66 2d 3e 61  buf);..outbuf->a
0890: 73 6e 31 72 65 70 20 3d 20 62 75 66 3b 0a 0a 09  sn1rep = buf;...
08a0: 62 75 66 5f 70 20 2b 3d 20 6f 75 74 62 75 66 2d  buf_p += outbuf-
08b0: 3e 73 69 7a 65 3b 0a 09 62 75 66 6c 65 6e 20 2d  >size;..buflen -
08c0: 3d 20 6f 75 74 62 75 66 2d 3e 73 69 7a 65 3b 0a  = outbuf->size;.
08d0: 0a 09 72 65 74 75 72 6e 28 5f 61 73 6e 31 5f 78  ..return(_asn1_x
08e0: 35 30 39 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62  509_read_asn1_ob
08f0: 6a 65 63 74 28 62 75 66 5f 70 2c 20 62 75 66 6c  ject(buf_p, bufl
0900: 65 6e 2c 20 61 72 67 73 29 29 3b 0a 7d 0a 0a 73  en, args));.}..s
0910: 74 61 74 69 63 20 69 6e 74 20 61 73 6e 31 5f 78  tatic int asn1_x
0920: 35 30 39 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62  509_read_asn1_ob
0930: 6a 65 63 74 28 75 6e 73 69 67 6e 65 64 20 63 68  ject(unsigned ch
0940: 61 72 20 2a 62 75 66 2c 20 73 69 7a 65 5f 74 20  ar *buf, size_t 
0950: 62 75 66 6c 65 6e 2c 20 2e 2e 2e 29 20 7b 0a 09  buflen, ...) {..
0960: 76 61 5f 6c 69 73 74 20 61 72 67 73 3b 0a 09 69  va_list args;..i
0970: 6e 74 20 72 65 74 76 61 6c 3b 0a 0a 09 76 61 5f  nt retval;...va_
0980: 73 74 61 72 74 28 61 72 67 73 2c 20 62 75 66 6c  start(args, bufl
0990: 65 6e 29 3b 0a 0a 09 72 65 74 76 61 6c 20 3d 20  en);...retval = 
09a0: 5f 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f  _asn1_x509_read_
09b0: 61 73 6e 31 5f 6f 62 6a 65 63 74 28 62 75 66 2c  asn1_object(buf,
09c0: 20 62 75 66 6c 65 6e 2c 20 26 61 72 67 73 29 3b   buflen, &args);
09d0: 0a 0a 09 76 61 5f 65 6e 64 28 61 72 67 73 29 3b  ...va_end(args);
09e0: 0a 0a 09 72 65 74 75 72 6e 28 72 65 74 76 61 6c  ...return(retval
09f0: 29 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 69 6e 74  );.}..static int
0a00: 20 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f   asn1_x509_read_
0a10: 6f 62 6a 65 63 74 28 75 6e 73 69 67 6e 65 64 20  object(unsigned 
0a20: 63 68 61 72 20 2a 62 75 66 2c 20 73 69 7a 65 5f  char *buf, size_
0a30: 74 20 62 75 66 6c 65 6e 2c 20 73 74 72 75 63 74  t buflen, struct
0a40: 20 78 35 30 39 5f 6f 62 6a 65 63 74 20 2a 6f 75   x509_object *ou
0a50: 74 62 75 66 29 20 7b 0a 09 69 6e 74 20 72 65 61  tbuf) {..int rea
0a60: 64 5f 72 65 74 3b 0a 0a 09 72 65 61 64 5f 72 65  d_ret;...read_re
0a70: 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f 72 65  t = asn1_x509_re
0a80: 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74 28 62  ad_asn1_object(b
0a90: 75 66 2c 20 62 75 66 6c 65 6e 2c 20 26 6f 75 74  uf, buflen, &out
0aa0: 62 75 66 2d 3e 77 68 6f 6c 65 74 68 69 6e 67 2c  buf->wholething,
0ab0: 20 4e 55 4c 4c 29 3b 0a 09 69 66 20 28 72 65 61   NULL);..if (rea
0ac0: 64 5f 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09  d_ret != 0) {...
0ad0: 43 41 43 4b 45 59 5f 44 45 42 55 47 5f 50 52 49  CACKEY_DEBUG_PRI
0ae0: 4e 54 46 28 22 46 61 69 6c 65 64 20 61 74 20 72  NTF("Failed at r
0af0: 65 61 64 69 6e 67 20 74 68 65 20 63 6f 6e 74 65  eading the conte
0b00: 6e 74 73 20 66 72 6f 6d 20 74 68 65 20 77 72 61  nts from the wra
0b10: 70 70 65 72 22 29 3b 0a 0a 09 09 72 65 74 75 72  pper");....retur
0b20: 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 72 65 61 64  n(-1);..}...read
0b30: 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39  _ret = asn1_x509
0b40: 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63  _read_asn1_objec
0b50: 74 28 6f 75 74 62 75 66 2d 3e 77 68 6f 6c 65 74  t(outbuf->wholet
0b60: 68 69 6e 67 2e 63 6f 6e 74 65 6e 74 73 2c 20 6f  hing.contents, o
0b70: 75 74 62 75 66 2d 3e 77 68 6f 6c 65 74 68 69 6e  utbuf->wholethin
0b80: 67 2e 73 69 7a 65 2c 20 26 6f 75 74 62 75 66 2d  g.size, &outbuf-
0b90: 3e 63 65 72 74 69 66 69 63 61 74 65 2c 20 4e 55  >certificate, NU
0ba0: 4c 4c 29 3b 0a 09 69 66 20 28 72 65 61 64 5f 72  LL);..if (read_r
0bb0: 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 43 41 43  et != 0) {...CAC
0bc0: 4b 45 59 5f 44 45 42 55 47 5f 50 52 49 4e 54 46  KEY_DEBUG_PRINTF
0bd0: 28 22 46 61 69 6c 65 64 20 61 74 20 72 65 61 64  ("Failed at read
0be0: 69 6e 67 20 74 68 65 20 63 65 72 74 69 66 69 63  ing the certific
0bf0: 61 74 65 20 66 72 6f 6d 20 74 68 65 20 63 6f 6e  ate from the con
0c00: 74 65 6e 74 73 22 29 3b 0a 0a 09 09 72 65 74 75  tents");....retu
0c10: 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 72 65 61  rn(-1);..}...rea
0c20: 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30  d_ret = asn1_x50
0c30: 39 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65  9_read_asn1_obje
0c40: 63 74 28 6f 75 74 62 75 66 2d 3e 63 65 72 74 69  ct(outbuf->certi
0c50: 66 69 63 61 74 65 2e 63 6f 6e 74 65 6e 74 73 2c  ficate.contents,
0c60: 20 6f 75 74 62 75 66 2d 3e 63 65 72 74 69 66 69   outbuf->certifi
0c70: 63 61 74 65 2e 73 69 7a 65 2c 20 26 6f 75 74 62  cate.size, &outb
0c80: 75 66 2d 3e 76 65 72 73 69 6f 6e 2c 20 26 6f 75  uf->version, &ou
0c90: 74 62 75 66 2d 3e 73 65 72 69 61 6c 5f 6e 75 6d  tbuf->serial_num
0ca0: 62 65 72 2c 20 26 6f 75 74 62 75 66 2d 3e 73 69  ber, &outbuf->si
0cb0: 67 6e 61 74 75 72 65 5f 61 6c 67 6f 2c 20 26 6f  gnature_algo, &o
0cc0: 75 74 62 75 66 2d 3e 69 73 73 75 65 72 2c 20 26  utbuf->issuer, &
0cd0: 6f 75 74 62 75 66 2d 3e 76 61 6c 69 64 69 74 79  outbuf->validity
0ce0: 2c 20 26 6f 75 74 62 75 66 2d 3e 73 75 62 6a 65  , &outbuf->subje
0cf0: 63 74 2c 20 26 6f 75 74 62 75 66 2d 3e 70 75 62  ct, &outbuf->pub
0d00: 6b 65 79 69 6e 66 6f 2c 20 4e 55 4c 4c 29 3b 0a  keyinfo, NULL);.
0d10: 09 69 66 20 28 72 65 61 64 5f 72 65 74 20 21 3d  .if (read_ret !=
0d20: 20 30 29 20 7b 0a 09 09 2f 2a 20 54 72 79 20 61   0) {.../* Try a
0d30: 67 61 69 6e 20 77 69 74 68 6f 75 74 20 61 20 76  gain without a v
0d40: 65 72 73 69 6f 6e 20 74 61 67 20 28 58 2e 35 30  ersion tag (X.50
0d50: 39 76 31 29 20 2a 2f 0a 09 09 6f 75 74 62 75 66  9v1) */...outbuf
0d60: 2d 3e 76 65 72 73 69 6f 6e 2e 74 61 67 20 3d 20  ->version.tag = 
0d70: 30 3b 0a 09 09 6f 75 74 62 75 66 2d 3e 76 65 72  0;...outbuf->ver
0d80: 73 69 6f 6e 2e 73 69 7a 65 20 3d 20 30 3b 0a 09  sion.size = 0;..
0d90: 09 6f 75 74 62 75 66 2d 3e 76 65 72 73 69 6f 6e  .outbuf->version
0da0: 2e 63 6f 6e 74 65 6e 74 73 20 3d 20 4e 55 4c 4c  .contents = NULL
0db0: 3b 0a 09 09 6f 75 74 62 75 66 2d 3e 76 65 72 73  ;...outbuf->vers
0dc0: 69 6f 6e 2e 61 73 6e 31 72 65 70 5f 6c 65 6e 20  ion.asn1rep_len 
0dd0: 3d 20 30 3b 0a 09 09 6f 75 74 62 75 66 2d 3e 76  = 0;...outbuf->v
0de0: 65 72 73 69 6f 6e 2e 61 73 6e 31 72 65 70 20 3d  ersion.asn1rep =
0df0: 20 4e 55 4c 4c 3b 0a 09 09 72 65 61 64 5f 72 65   NULL;...read_re
0e00: 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f 72 65  t = asn1_x509_re
0e10: 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74 28 6f  ad_asn1_object(o
0e20: 75 74 62 75 66 2d 3e 63 65 72 74 69 66 69 63 61  utbuf->certifica
0e30: 74 65 2e 63 6f 6e 74 65 6e 74 73 2c 20 6f 75 74  te.contents, out
0e40: 62 75 66 2d 3e 63 65 72 74 69 66 69 63 61 74 65  buf->certificate
0e50: 2e 73 69 7a 65 2c 20 26 6f 75 74 62 75 66 2d 3e  .size, &outbuf->
0e60: 73 65 72 69 61 6c 5f 6e 75 6d 62 65 72 2c 20 26  serial_number, &
0e70: 6f 75 74 62 75 66 2d 3e 73 69 67 6e 61 74 75 72  outbuf->signatur
0e80: 65 5f 61 6c 67 6f 2c 20 26 6f 75 74 62 75 66 2d  e_algo, &outbuf-
0e90: 3e 69 73 73 75 65 72 2c 20 26 6f 75 74 62 75 66  >issuer, &outbuf
0ea0: 2d 3e 76 61 6c 69 64 69 74 79 2c 20 26 6f 75 74  ->validity, &out
0eb0: 62 75 66 2d 3e 73 75 62 6a 65 63 74 2c 20 26 6f  buf->subject, &o
0ec0: 75 74 62 75 66 2d 3e 70 75 62 6b 65 79 69 6e 66  utbuf->pubkeyinf
0ed0: 6f 2c 20 4e 55 4c 4c 29 3b 0a 09 09 69 66 20 28  o, NULL);...if (
0ee0: 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29 20 7b  read_ret != 0) {
0ef0: 0a 09 09 09 43 41 43 4b 45 59 5f 44 45 42 55 47  ....CACKEY_DEBUG
0f00: 5f 50 52 49 4e 54 46 28 22 46 61 69 6c 65 64 20  _PRINTF("Failed 
0f10: 61 74 20 72 65 61 64 69 6e 67 20 74 68 65 20 63  at reading the c
0f20: 65 72 74 69 66 69 63 61 74 65 20 63 6f 6d 70 6f  ertificate compo
0f30: 6e 65 6e 74 73 20 66 72 6f 6d 20 74 68 65 20 63  nents from the c
0f40: 65 72 74 69 66 69 63 61 74 65 22 29 3b 0a 0a 09  ertificate");...
0f50: 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09 09  ..return(-1);...
0f60: 7d 0a 09 7d 0a 0a 09 72 65 61 64 5f 72 65 74 20  }..}...read_ret 
0f70: 3d 20 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64  = asn1_x509_read
0f80: 5f 61 73 6e 31 5f 6f 62 6a 65 63 74 28 6f 75 74  _asn1_object(out
0f90: 62 75 66 2d 3e 70 75 62 6b 65 79 69 6e 66 6f 2e  buf->pubkeyinfo.
0fa0: 63 6f 6e 74 65 6e 74 73 2c 20 6f 75 74 62 75 66  contents, outbuf
0fb0: 2d 3e 70 75 62 6b 65 79 69 6e 66 6f 2e 73 69 7a  ->pubkeyinfo.siz
0fc0: 65 2c 20 26 6f 75 74 62 75 66 2d 3e 70 75 62 6b  e, &outbuf->pubk
0fd0: 65 79 5f 61 6c 67 6f 69 64 2c 20 26 6f 75 74 62  ey_algoid, &outb
0fe0: 75 66 2d 3e 70 75 62 6b 65 79 2c 20 4e 55 4c 4c  uf->pubkey, NULL
0ff0: 29 3b 0a 09 69 66 20 28 72 65 61 64 5f 72 65 74  );..if (read_ret
1000: 20 21 3d 20 30 29 20 7b 0a 09 09 43 41 43 4b 45   != 0) {...CACKE
1010: 59 5f 44 45 42 55 47 5f 50 52 49 4e 54 46 28 22  Y_DEBUG_PRINTF("
1020: 46 61 69 6c 65 64 20 61 74 20 72 65 61 64 69 6e  Failed at readin
1030: 67 20 74 68 65 20 70 75 62 6c 69 63 20 6b 65 79  g the public key
1040: 20 66 72 6f 6d 20 74 68 65 20 63 65 72 74 69 66   from the certif
1050: 69 63 61 74 65 20 63 6f 6d 70 6f 6e 65 6e 74 73  icate components
1060: 22 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28 2d 31  ");....return(-1
1070: 29 3b 0a 09 7d 0a 0a 09 72 65 74 75 72 6e 28 30  );..}...return(0
1080: 29 3b 0a 7d 0a 0a 73 73 69 7a 65 5f 74 20 78 35  );.}..ssize_t x5
1090: 30 39 5f 74 6f 5f 69 73 73 75 65 72 28 76 6f 69  09_to_issuer(voi
10a0: 64 20 2a 78 35 30 39 5f 64 65 72 5f 62 75 66 2c  d *x509_der_buf,
10b0: 20 73 69 7a 65 5f 74 20 78 35 30 39 5f 64 65 72   size_t x509_der
10c0: 5f 62 75 66 5f 6c 65 6e 2c 20 76 6f 69 64 20 2a  _buf_len, void *
10d0: 2a 6f 75 74 62 75 66 29 20 7b 0a 09 73 74 72 75  *outbuf) {..stru
10e0: 63 74 20 78 35 30 39 5f 6f 62 6a 65 63 74 20 78  ct x509_object x
10f0: 35 30 39 3b 0a 09 69 6e 74 20 72 65 61 64 5f 72  509;..int read_r
1100: 65 74 3b 0a 0a 09 72 65 61 64 5f 72 65 74 20 3d  et;...read_ret =
1110: 20 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f   asn1_x509_read_
1120: 6f 62 6a 65 63 74 28 78 35 30 39 5f 64 65 72 5f  object(x509_der_
1130: 62 75 66 2c 20 78 35 30 39 5f 64 65 72 5f 62 75  buf, x509_der_bu
1140: 66 5f 6c 65 6e 2c 20 26 78 35 30 39 29 3b 0a 09  f_len, &x509);..
1150: 69 66 20 28 72 65 61 64 5f 72 65 74 20 21 3d 20  if (read_ret != 
1160: 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28 2d 31  0) {...return(-1
1170: 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 6f 75 74 62  );..}...if (outb
1180: 75 66 29 20 7b 0a 09 09 2a 6f 75 74 62 75 66 20  uf) {...*outbuf 
1190: 3d 20 78 35 30 39 2e 69 73 73 75 65 72 2e 61 73  = x509.issuer.as
11a0: 6e 31 72 65 70 3b 0a 09 7d 0a 0a 09 72 65 74 75  n1rep;..}...retu
11b0: 72 6e 28 78 35 30 39 2e 69 73 73 75 65 72 2e 61  rn(x509.issuer.a
11c0: 73 6e 31 72 65 70 5f 6c 65 6e 29 3b 0a 7d 0a 0a  sn1rep_len);.}..
11d0: 73 73 69 7a 65 5f 74 20 78 35 30 39 5f 74 6f 5f  ssize_t x509_to_
11e0: 73 75 62 6a 65 63 74 28 76 6f 69 64 20 2a 78 35  subject(void *x5
11f0: 30 39 5f 64 65 72 5f 62 75 66 2c 20 73 69 7a 65  09_der_buf, size
1200: 5f 74 20 78 35 30 39 5f 64 65 72 5f 62 75 66 5f  _t x509_der_buf_
1210: 6c 65 6e 2c 20 76 6f 69 64 20 2a 2a 6f 75 74 62  len, void **outb
1220: 75 66 29 20 7b 0a 09 73 74 72 75 63 74 20 78 35  uf) {..struct x5
1230: 30 39 5f 6f 62 6a 65 63 74 20 78 35 30 39 3b 0a  09_object x509;.
1240: 09 69 6e 74 20 72 65 61 64 5f 72 65 74 3b 0a 0a  .int read_ret;..
1250: 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73 6e 31  .read_ret = asn1
1260: 5f 78 35 30 39 5f 72 65 61 64 5f 6f 62 6a 65 63  _x509_read_objec
1270: 74 28 78 35 30 39 5f 64 65 72 5f 62 75 66 2c 20  t(x509_der_buf, 
1280: 78 35 30 39 5f 64 65 72 5f 62 75 66 5f 6c 65 6e  x509_der_buf_len
1290: 2c 20 26 78 35 30 39 29 3b 0a 09 69 66 20 28 72  , &x509);..if (r
12a0: 65 61 64 5f 72 65 74 20 21 3d 20 30 29 20 7b 0a  ead_ret != 0) {.
12b0: 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d  ..return(-1);..}
12c0: 0a 0a 09 69 66 20 28 6f 75 74 62 75 66 29 20 7b  ...if (outbuf) {
12d0: 0a 09 09 2a 6f 75 74 62 75 66 20 3d 20 78 35 30  ...*outbuf = x50
12e0: 39 2e 73 75 62 6a 65 63 74 2e 61 73 6e 31 72 65  9.subject.asn1re
12f0: 70 3b 0a 09 7d 0a 0a 09 72 65 74 75 72 6e 28 78  p;..}...return(x
1300: 35 30 39 2e 73 75 62 6a 65 63 74 2e 61 73 6e 31  509.subject.asn1
1310: 72 65 70 5f 6c 65 6e 29 3b 0a 7d 0a 0a 73 74 61  rep_len);.}..sta
1320: 74 69 63 20 73 73 69 7a 65 5f 74 20 78 35 30 39  tic ssize_t x509
1330: 5f 74 6f 5f 73 65 72 69 61 6c 28 76 6f 69 64 20  _to_serial(void 
1340: 2a 78 35 30 39 5f 64 65 72 5f 62 75 66 2c 20 73  *x509_der_buf, s
1350: 69 7a 65 5f 74 20 78 35 30 39 5f 64 65 72 5f 62  ize_t x509_der_b
1360: 75 66 5f 6c 65 6e 2c 20 76 6f 69 64 20 2a 2a 6f  uf_len, void **o
1370: 75 74 62 75 66 29 20 7b 0a 09 73 74 72 75 63 74  utbuf) {..struct
1380: 20 78 35 30 39 5f 6f 62 6a 65 63 74 20 78 35 30   x509_object x50
1390: 39 3b 0a 09 69 6e 74 20 72 65 61 64 5f 72 65 74  9;..int read_ret
13a0: 3b 0a 0a 09 72 65 61 64 5f 72 65 74 20 3d 20 61  ;...read_ret = a
13b0: 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 6f 62  sn1_x509_read_ob
13c0: 6a 65 63 74 28 78 35 30 39 5f 64 65 72 5f 62 75  ject(x509_der_bu
13d0: 66 2c 20 78 35 30 39 5f 64 65 72 5f 62 75 66 5f  f, x509_der_buf_
13e0: 6c 65 6e 2c 20 26 78 35 30 39 29 3b 0a 09 69 66  len, &x509);..if
13f0: 20 28 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29   (read_ret != 0)
1400: 20 7b 0a 09 09 43 41 43 4b 45 59 5f 44 45 42 55   {...CACKEY_DEBU
1410: 47 5f 50 52 49 4e 54 46 28 22 55 6e 61 62 6c 65  G_PRINTF("Unable
1420: 20 74 6f 20 72 65 61 64 20 73 65 72 69 61 6c 20   to read serial 
1430: 6e 75 6d 62 65 72 20 66 72 6f 6d 20 61 20 25 6c  number from a %l
1440: 75 20 62 79 74 65 20 62 75 66 66 65 72 22 2c 20  u byte buffer", 
1450: 28 75 6e 73 69 67 6e 65 64 20 6c 6f 6e 67 29 20  (unsigned long) 
1460: 78 35 30 39 5f 64 65 72 5f 62 75 66 5f 6c 65 6e  x509_der_buf_len
1470: 29 3b 0a 09 09 43 41 43 4b 45 59 5f 44 45 42 55  );...CACKEY_DEBU
1480: 47 5f 50 52 49 4e 54 42 55 46 28 22 58 2e 35 30  G_PRINTBUF("X.50
1490: 39 20 44 45 52 3a 22 2c 20 78 35 30 39 5f 64 65  9 DER:", x509_de
14a0: 72 5f 62 75 66 2c 20 78 35 30 39 5f 64 65 72 5f  r_buf, x509_der_
14b0: 62 75 66 5f 6c 65 6e 29 3b 0a 0a 09 09 72 65 74  buf_len);....ret
14c0: 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 69 66  urn(-1);..}...if
14d0: 20 28 6f 75 74 62 75 66 29 20 7b 0a 09 09 2a 6f   (outbuf) {...*o
14e0: 75 74 62 75 66 20 3d 20 78 35 30 39 2e 73 65 72  utbuf = x509.ser
14f0: 69 61 6c 5f 6e 75 6d 62 65 72 2e 61 73 6e 31 72  ial_number.asn1r
1500: 65 70 3b 0a 09 7d 0a 0a 09 72 65 74 75 72 6e 28  ep;..}...return(
1510: 78 35 30 39 2e 73 65 72 69 61 6c 5f 6e 75 6d 62  x509.serial_numb
1520: 65 72 2e 61 73 6e 31 72 65 70 5f 6c 65 6e 29 3b  er.asn1rep_len);
1530: 0a 7d 0a 0a 73 74 61 74 69 63 20 73 73 69 7a 65  .}..static ssize
1540: 5f 74 20 78 35 30 39 5f 74 6f 5f 70 75 62 6b 65  _t x509_to_pubke
1550: 79 28 76 6f 69 64 20 2a 78 35 30 39 5f 64 65 72  y(void *x509_der
1560: 5f 62 75 66 2c 20 73 69 7a 65 5f 74 20 78 35 30  _buf, size_t x50
1570: 39 5f 64 65 72 5f 62 75 66 5f 6c 65 6e 2c 20 76  9_der_buf_len, v
1580: 6f 69 64 20 2a 2a 6f 75 74 62 75 66 29 20 7b 0a  oid **outbuf) {.
1590: 09 73 74 72 75 63 74 20 78 35 30 39 5f 6f 62 6a  .struct x509_obj
15a0: 65 63 74 20 78 35 30 39 3b 0a 09 69 6e 74 20 72  ect x509;..int r
15b0: 65 61 64 5f 72 65 74 3b 0a 0a 09 72 65 61 64 5f  ead_ret;...read_
15c0: 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f  ret = asn1_x509_
15d0: 72 65 61 64 5f 6f 62 6a 65 63 74 28 78 35 30 39  read_object(x509
15e0: 5f 64 65 72 5f 62 75 66 2c 20 78 35 30 39 5f 64  _der_buf, x509_d
15f0: 65 72 5f 62 75 66 5f 6c 65 6e 2c 20 26 78 35 30  er_buf_len, &x50
1600: 39 29 3b 0a 09 69 66 20 28 72 65 61 64 5f 72 65  9);..if (read_re
1610: 74 20 21 3d 20 30 29 20 7b 0a 09 09 72 65 74 75  t != 0) {...retu
1620: 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 2a 6f 75  rn(-1);..}...*ou
1630: 74 62 75 66 20 3d 20 78 35 30 39 2e 70 75 62 6b  tbuf = x509.pubk
1640: 65 79 2e 63 6f 6e 74 65 6e 74 73 3b 0a 09 72 65  ey.contents;..re
1650: 74 75 72 6e 28 78 35 30 39 2e 70 75 62 6b 65 79  turn(x509.pubkey
1660: 2e 73 69 7a 65 29 3b 0a 7d 0a 0a 73 74 61 74 69  .size);.}..stati
1670: 63 20 73 73 69 7a 65 5f 74 20 78 35 30 39 5f 74  c ssize_t x509_t
1680: 6f 5f 6d 6f 64 75 6c 75 73 28 76 6f 69 64 20 2a  o_modulus(void *
1690: 78 35 30 39 5f 64 65 72 5f 62 75 66 2c 20 73 69  x509_der_buf, si
16a0: 7a 65 5f 74 20 78 35 30 39 5f 64 65 72 5f 62 75  ze_t x509_der_bu
16b0: 66 5f 6c 65 6e 2c 20 76 6f 69 64 20 2a 2a 6f 75  f_len, void **ou
16c0: 74 62 75 66 29 20 7b 0a 09 73 74 72 75 63 74 20  tbuf) {..struct 
16d0: 61 73 6e 31 5f 6f 62 6a 65 63 74 20 6e 75 6c 6c  asn1_object null
16e0: 2c 20 70 75 62 6b 65 79 2c 20 6d 6f 64 75 6c 75  , pubkey, modulu
16f0: 73 2c 20 65 78 70 6f 6e 65 6e 74 3b 0a 09 73 74  s, exponent;..st
1700: 72 75 63 74 20 78 35 30 39 5f 6f 62 6a 65 63 74  ruct x509_object
1710: 20 78 35 30 39 3b 0a 09 69 6e 74 20 72 65 61 64   x509;..int read
1720: 5f 72 65 74 3b 0a 0a 09 72 65 61 64 5f 72 65 74  _ret;...read_ret
1730: 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f 72 65 61   = asn1_x509_rea
1740: 64 5f 6f 62 6a 65 63 74 28 78 35 30 39 5f 64 65  d_object(x509_de
1750: 72 5f 62 75 66 2c 20 78 35 30 39 5f 64 65 72 5f  r_buf, x509_der_
1760: 62 75 66 5f 6c 65 6e 2c 20 26 78 35 30 39 29 3b  buf_len, &x509);
1770: 0a 09 69 66 20 28 72 65 61 64 5f 72 65 74 20 21  ..if (read_ret !
1780: 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28  = 0) {...return(
1790: 2d 31 29 3b 0a 09 7d 0a 0a 09 2f 2a 20 54 68 65  -1);..}.../* The
17a0: 20 73 74 72 75 63 74 75 72 65 20 6f 66 20 22 70   structure of "p
17b0: 75 62 6b 65 79 22 20 69 73 20 73 70 65 63 69 66  ubkey" is specif
17c0: 69 65 64 20 69 6e 20 50 4b 43 53 20 23 31 20 2a  ied in PKCS #1 *
17d0: 2f 0a 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73  /..read_ret = as
17e0: 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 61 73 6e  n1_x509_read_asn
17f0: 31 5f 6f 62 6a 65 63 74 28 78 35 30 39 2e 70 75  1_object(x509.pu
1800: 62 6b 65 79 2e 63 6f 6e 74 65 6e 74 73 2c 20 78  bkey.contents, x
1810: 35 30 39 2e 70 75 62 6b 65 79 2e 73 69 7a 65 2c  509.pubkey.size,
1820: 20 26 6e 75 6c 6c 2c 20 26 70 75 62 6b 65 79 2c   &null, &pubkey,
1830: 20 4e 55 4c 4c 29 3b 0a 09 69 66 20 28 72 65 61   NULL);..if (rea
1840: 64 5f 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09  d_ret != 0) {...
1850: 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a  return(-1);..}..
1860: 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73 6e 31  .read_ret = asn1
1870: 5f 78 35 30 39 5f 72 65 61 64 5f 61 73 6e 31 5f  _x509_read_asn1_
1880: 6f 62 6a 65 63 74 28 70 75 62 6b 65 79 2e 63 6f  object(pubkey.co
1890: 6e 74 65 6e 74 73 2c 20 70 75 62 6b 65 79 2e 73  ntents, pubkey.s
18a0: 69 7a 65 2c 20 26 6d 6f 64 75 6c 75 73 2c 20 26  ize, &modulus, &
18b0: 65 78 70 6f 6e 65 6e 74 2c 20 4e 55 4c 4c 29 3b  exponent, NULL);
18c0: 0a 09 69 66 20 28 72 65 61 64 5f 72 65 74 20 21  ..if (read_ret !
18d0: 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28  = 0) {...return(
18e0: 2d 31 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 6f 75  -1);..}...if (ou
18f0: 74 62 75 66 29 20 7b 0a 09 09 2a 6f 75 74 62 75  tbuf) {...*outbu
1900: 66 20 3d 20 6d 6f 64 75 6c 75 73 2e 63 6f 6e 74  f = modulus.cont
1910: 65 6e 74 73 3b 0a 09 7d 0a 0a 09 72 65 74 75 72  ents;..}...retur
1920: 6e 28 6d 6f 64 75 6c 75 73 2e 73 69 7a 65 29 3b  n(modulus.size);
1930: 0a 7d 0a 0a 73 74 61 74 69 63 20 73 73 69 7a 65  .}..static ssize
1940: 5f 74 20 78 35 30 39 5f 74 6f 5f 65 78 70 6f 6e  _t x509_to_expon
1950: 65 6e 74 28 76 6f 69 64 20 2a 78 35 30 39 5f 64  ent(void *x509_d
1960: 65 72 5f 62 75 66 2c 20 73 69 7a 65 5f 74 20 78  er_buf, size_t x
1970: 35 30 39 5f 64 65 72 5f 62 75 66 5f 6c 65 6e 2c  509_der_buf_len,
1980: 20 76 6f 69 64 20 2a 2a 6f 75 74 62 75 66 29 20   void **outbuf) 
1990: 7b 0a 09 73 74 72 75 63 74 20 61 73 6e 31 5f 6f  {..struct asn1_o
19a0: 62 6a 65 63 74 20 6e 75 6c 6c 2c 20 70 75 62 6b  bject null, pubk
19b0: 65 79 2c 20 6d 6f 64 75 6c 75 73 2c 20 65 78 70  ey, modulus, exp
19c0: 6f 6e 65 6e 74 3b 0a 09 73 74 72 75 63 74 20 78  onent;..struct x
19d0: 35 30 39 5f 6f 62 6a 65 63 74 20 78 35 30 39 3b  509_object x509;
19e0: 0a 09 69 6e 74 20 72 65 61 64 5f 72 65 74 3b 0a  ..int read_ret;.
19f0: 0a 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73 6e  ..read_ret = asn
1a00: 31 5f 78 35 30 39 5f 72 65 61 64 5f 6f 62 6a 65  1_x509_read_obje
1a10: 63 74 28 78 35 30 39 5f 64 65 72 5f 62 75 66 2c  ct(x509_der_buf,
1a20: 20 78 35 30 39 5f 64 65 72 5f 62 75 66 5f 6c 65   x509_der_buf_le
1a30: 6e 2c 20 26 78 35 30 39 29 3b 0a 09 69 66 20 28  n, &x509);..if (
1a40: 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29 20 7b  read_ret != 0) {
1a50: 0a 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09  ...return(-1);..
1a60: 7d 0a 0a 09 2f 2a 20 54 68 65 20 73 74 72 75 63  }.../* The struc
1a70: 74 75 72 65 20 6f 66 20 22 70 75 62 6b 65 79 22  ture of "pubkey"
1a80: 20 69 73 20 73 70 65 63 69 66 69 65 64 20 69 6e   is specified in
1a90: 20 50 4b 43 53 20 23 31 20 2a 2f 0a 09 72 65 61   PKCS #1 */..rea
1aa0: 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30  d_ret = asn1_x50
1ab0: 39 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65  9_read_asn1_obje
1ac0: 63 74 28 78 35 30 39 2e 70 75 62 6b 65 79 2e 63  ct(x509.pubkey.c
1ad0: 6f 6e 74 65 6e 74 73 2c 20 78 35 30 39 2e 70 75  ontents, x509.pu
1ae0: 62 6b 65 79 2e 73 69 7a 65 2c 20 26 6e 75 6c 6c  bkey.size, &null
1af0: 2c 20 26 70 75 62 6b 65 79 2c 20 4e 55 4c 4c 29  , &pubkey, NULL)
1b00: 3b 0a 09 69 66 20 28 72 65 61 64 5f 72 65 74 20  ;..if (read_ret 
1b10: 21 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e  != 0) {...return
1b20: 28 2d 31 29 3b 0a 09 7d 0a 0a 09 72 65 61 64 5f  (-1);..}...read_
1b30: 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f  ret = asn1_x509_
1b40: 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74  read_asn1_object
1b50: 28 70 75 62 6b 65 79 2e 63 6f 6e 74 65 6e 74 73  (pubkey.contents
1b60: 2c 20 70 75 62 6b 65 79 2e 73 69 7a 65 2c 20 26  , pubkey.size, &
1b70: 6d 6f 64 75 6c 75 73 2c 20 26 65 78 70 6f 6e 65  modulus, &expone
1b80: 6e 74 2c 20 4e 55 4c 4c 29 3b 0a 09 69 66 20 28  nt, NULL);..if (
1b90: 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29 20 7b  read_ret != 0) {
1ba0: 0a 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09  ...return(-1);..
1bb0: 7d 0a 0a 09 69 66 20 28 6f 75 74 62 75 66 29 20  }...if (outbuf) 
1bc0: 7b 0a 09 09 2a 6f 75 74 62 75 66 20 3d 20 65 78  {...*outbuf = ex
1bd0: 70 6f 6e 65 6e 74 2e 63 6f 6e 74 65 6e 74 73 3b  ponent.contents;
1be0: 0a 09 7d 0a 0a 09 72 65 74 75 72 6e 28 65 78 70  ..}...return(exp
1bf0: 6f 6e 65 6e 74 2e 73 69 7a 65 29 3b 0a 7d 0a 0a  onent.size);.}..
1c00: 73 74 61 74 69 63 20 73 73 69 7a 65 5f 74 20 78  static ssize_t x
1c10: 35 30 39 5f 74 6f 5f 6b 65 79 73 69 7a 65 28 76  509_to_keysize(v
1c20: 6f 69 64 20 2a 78 35 30 39 5f 64 65 72 5f 62 75  oid *x509_der_bu
1c30: 66 2c 20 73 69 7a 65 5f 74 20 78 35 30 39 5f 64  f, size_t x509_d
1c40: 65 72 5f 62 75 66 5f 6c 65 6e 29 20 7b 0a 09 73  er_buf_len) {..s
1c50: 74 72 75 63 74 20 61 73 6e 31 5f 6f 62 6a 65 63  truct asn1_objec
1c60: 74 20 6e 75 6c 6c 2c 20 70 75 62 6b 65 79 2c 20  t null, pubkey, 
1c70: 6d 6f 64 75 6c 75 73 2c 20 65 78 70 6f 6e 65 6e  modulus, exponen
1c80: 74 3b 0a 09 73 74 72 75 63 74 20 78 35 30 39 5f  t;..struct x509_
1c90: 6f 62 6a 65 63 74 20 78 35 30 39 3b 0a 09 69 6e  object x509;..in
1ca0: 74 20 72 65 61 64 5f 72 65 74 3b 0a 0a 09 72 65  t read_ret;...re
1cb0: 61 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35  ad_ret = asn1_x5
1cc0: 30 39 5f 72 65 61 64 5f 6f 62 6a 65 63 74 28 78  09_read_object(x
1cd0: 35 30 39 5f 64 65 72 5f 62 75 66 2c 20 78 35 30  509_der_buf, x50
1ce0: 39 5f 64 65 72 5f 62 75 66 5f 6c 65 6e 2c 20 26  9_der_buf_len, &
1cf0: 78 35 30 39 29 3b 0a 09 69 66 20 28 72 65 61 64  x509);..if (read
1d00: 5f 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 72  _ret != 0) {...r
1d10: 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09  eturn(-1);..}...
1d20: 2f 2a 20 54 68 65 20 73 74 72 75 63 74 75 72 65  /* The structure
1d30: 20 6f 66 20 22 70 75 62 6b 65 79 22 20 69 73 20   of "pubkey" is 
1d40: 73 70 65 63 69 66 69 65 64 20 69 6e 20 50 4b 43  specified in PKC
1d50: 53 20 23 31 20 2a 2f 0a 09 72 65 61 64 5f 72 65  S #1 */..read_re
1d60: 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f 72 65  t = asn1_x509_re
1d70: 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74 28 78  ad_asn1_object(x
1d80: 35 30 39 2e 70 75 62 6b 65 79 2e 63 6f 6e 74 65  509.pubkey.conte
1d90: 6e 74 73 2c 20 78 35 30 39 2e 70 75 62 6b 65 79  nts, x509.pubkey
1da0: 2e 73 69 7a 65 2c 20 26 6e 75 6c 6c 2c 20 26 70  .size, &null, &p
1db0: 75 62 6b 65 79 2c 20 4e 55 4c 4c 29 3b 0a 09 69  ubkey, NULL);..i
1dc0: 66 20 28 72 65 61 64 5f 72 65 74 20 21 3d 20 30  f (read_ret != 0
1dd0: 29 20 7b 0a 09 09 72 65 74 75 72 6e 28 2d 31 29  ) {...return(-1)
1de0: 3b 0a 09 7d 0a 0a 09 72 65 61 64 5f 72 65 74 20  ;..}...read_ret 
1df0: 3d 20 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64  = asn1_x509_read
1e00: 5f 61 73 6e 31 5f 6f 62 6a 65 63 74 28 70 75 62  _asn1_object(pub
1e10: 6b 65 79 2e 63 6f 6e 74 65 6e 74 73 2c 20 70 75  key.contents, pu
1e20: 62 6b 65 79 2e 73 69 7a 65 2c 20 26 6d 6f 64 75  bkey.size, &modu
1e30: 6c 75 73 2c 20 26 65 78 70 6f 6e 65 6e 74 2c 20  lus, &exponent, 
1e40: 4e 55 4c 4c 29 3b 0a 09 69 66 20 28 72 65 61 64  NULL);..if (read
1e50: 5f 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 72  _ret != 0) {...r
1e60: 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09  eturn(-1);..}...
1e70: 72 65 74 75 72 6e 28 6d 6f 64 75 6c 75 73 2e 73  return(modulus.s
1e80: 69 7a 65 20 2d 20 31 29 3b 0a 7d 0a 0a 2f 2a 0a  ize - 1);.}../*.
1e90: 20 2a 20 68 74 74 70 3a 2f 2f 77 77 77 2e 62 6c   * http://www.bl
1ea0: 61 63 6b 62 65 72 72 79 2e 63 6f 6d 2f 64 65 76  ackberry.com/dev
1eb0: 65 6c 6f 70 65 72 73 2f 64 6f 63 73 2f 34 2e 36  elopers/docs/4.6
1ec0: 2e 30 61 70 69 2f 6a 61 76 61 78 2f 6d 69 63 72  .0api/javax/micr
1ed0: 6f 65 64 69 74 69 6f 6e 2f 70 6b 69 2f 43 65 72  oedition/pki/Cer
1ee0: 74 69 66 69 63 61 74 65 2e 68 74 6d 6c 0a 20 2a  tificate.html. *
1ef0: 2f 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63  /.static const c
1f00: 68 61 72 20 2a 5f 78 35 30 39 5f 6f 62 6a 65 63  har *_x509_objec
1f10: 74 69 64 5f 74 6f 5f 6c 61 62 65 6c 5f 73 74 72  tid_to_label_str
1f20: 69 6e 67 28 76 6f 69 64 20 2a 62 75 66 2c 20 73  ing(void *buf, s
1f30: 69 7a 65 5f 74 20 62 75 66 6c 65 6e 29 20 7b 0a  ize_t buflen) {.
1f40: 09 73 77 69 74 63 68 20 28 62 75 66 6c 65 6e 29  .switch (buflen)
1f50: 20 7b 0a 09 09 63 61 73 65 20 33 3a 0a 09 09 09   {...case 3:....
1f60: 69 66 20 28 6d 65 6d 63 6d 70 28 62 75 66 2c 20  if (memcmp(buf, 
1f70: 22 5c 78 35 35 5c 78 30 34 5c 78 30 33 22 2c 20  "\x55\x04\x03", 
1f80: 33 29 20 3d 3d 20 30 29 20 7b 0a 09 09 09 09 72  3) == 0) {.....r
1f90: 65 74 75 72 6e 28 22 43 4e 22 29 3b 0a 09 09 09  eturn("CN");....
1fa0: 7d 0a 09 09 09 69 66 20 28 6d 65 6d 63 6d 70 28  }....if (memcmp(
1fb0: 62 75 66 2c 20 22 5c 78 35 35 5c 78 30 34 5c 78  buf, "\x55\x04\x
1fc0: 30 34 22 2c 20 33 29 20 3d 3d 20 30 29 20 7b 0a  04", 3) == 0) {.
1fd0: 09 09 09 09 72 65 74 75 72 6e 28 22 53 4e 22 29  ....return("SN")
1fe0: 3b 0a 09 09 09 7d 0a 09 09 09 69 66 20 28 6d 65  ;....}....if (me
1ff0: 6d 63 6d 70 28 62 75 66 2c 20 22 5c 78 35 35 5c  mcmp(buf, "\x55\
2000: 78 30 34 5c 78 30 36 22 2c 20 33 29 20 3d 3d 20  x04\x06", 3) == 
2010: 30 29 20 7b 0a 09 09 09 09 72 65 74 75 72 6e 28  0) {.....return(
2020: 22 43 22 29 3b 0a 09 09 09 7d 0a 09 09 09 69 66  "C");....}....if
2030: 20 28 6d 65 6d 63 6d 70 28 62 75 66 2c 20 22 5c   (memcmp(buf, "\
2040: 78 35 35 5c 78 30 34 5c 78 30 37 22 2c 20 33 29  x55\x04\x07", 3)
2050: 20 3d 3d 20 30 29 20 7b 0a 09 09 09 09 72 65 74   == 0) {.....ret
2060: 75 72 6e 28 22 4c 22 29 3b 0a 09 09 09 7d 0a 09  urn("L");....}..
2070: 09 09 69 66 20 28 6d 65 6d 63 6d 70 28 62 75 66  ..if (memcmp(buf
2080: 2c 20 22 5c 78 35 35 5c 78 30 34 5c 78 30 38 22  , "\x55\x04\x08"
2090: 2c 20 33 29 20 3d 3d 20 30 29 20 7b 0a 09 09 09  , 3) == 0) {....
20a0: 09 72 65 74 75 72 6e 28 22 53 54 22 29 3b 0a 09  .return("ST");..
20b0: 09 09 7d 0a 09 09 09 69 66 20 28 6d 65 6d 63 6d  ..}....if (memcm
20c0: 70 28 62 75 66 2c 20 22 5c 78 35 35 5c 78 30 34  p(buf, "\x55\x04
20d0: 5c 78 30 39 22 2c 20 33 29 20 3d 3d 20 30 29 20  \x09", 3) == 0) 
20e0: 7b 0a 09 09 09 09 72 65 74 75 72 6e 28 22 53 54  {.....return("ST
20f0: 52 45 45 54 22 29 3b 0a 09 09 09 7d 0a 09 09 09  REET");....}....
2100: 69 66 20 28 6d 65 6d 63 6d 70 28 62 75 66 2c 20  if (memcmp(buf, 
2110: 22 5c 78 35 35 5c 78 30 34 5c 78 30 41 22 2c 20  "\x55\x04\x0A", 
2120: 33 29 20 3d 3d 20 30 29 20 7b 0a 09 09 09 09 72  3) == 0) {.....r
2130: 65 74 75 72 6e 28 22 4f 22 29 3b 0a 09 09 09 7d  eturn("O");....}
2140: 0a 09 09 09 69 66 20 28 6d 65 6d 63 6d 70 28 62  ....if (memcmp(b
2150: 75 66 2c 20 22 5c 78 35 35 5c 78 30 34 5c 78 30  uf, "\x55\x04\x0
2160: 42 22 2c 20 33 29 20 3d 3d 20 30 29 20 7b 0a 09  B", 3) == 0) {..
2170: 09 09 09 72 65 74 75 72 6e 28 22 4f 55 22 29 3b  ...return("OU");
2180: 0a 09 09 09 7d 0a 09 09 09 62 72 65 61 6b 3b 0a  ....}....break;.
2190: 09 09 63 61 73 65 20 39 3a 0a 09 09 09 69 66 20  ..case 9:....if 
21a0: 28 6d 65 6d 63 6d 70 28 62 75 66 2c 20 22 5c 78  (memcmp(buf, "\x
21b0: 32 41 5c 78 38 36 5c 78 34 38 5c 78 38 36 5c 78  2A\x86\x48\x86\x
21c0: 46 37 5c 78 30 44 5c 78 30 31 5c 78 30 39 5c 78  F7\x0D\x01\x09\x
21d0: 30 31 22 2c 20 39 29 20 3d 3d 20 30 29 20 7b 0a  01", 9) == 0) {.
21e0: 09 09 09 09 72 65 74 75 72 6e 28 22 45 6d 61 69  ....return("Emai
21f0: 6c 41 64 64 72 65 73 73 22 29 3b 0a 09 09 09 7d  lAddress");....}
2200: 0a 09 09 09 62 72 65 61 6b 3b 0a 09 7d 0a 0a 09  ....break;..}...
2210: 72 65 74 75 72 6e 28 22 3f 3f 3f 22 29 3b 0a 7d  return("???");.}
2220: 0a 0a 73 74 61 74 69 63 20 73 73 69 7a 65 5f 74  ..static ssize_t
2230: 20 78 35 30 39 5f 64 6e 5f 74 6f 5f 73 74 72 69   x509_dn_to_stri
2240: 6e 67 28 76 6f 69 64 20 2a 61 73 6e 31 5f 64 65  ng(void *asn1_de
2250: 72 5f 62 75 66 2c 20 73 69 7a 65 5f 74 20 61 73  r_buf, size_t as
2260: 6e 31 5f 64 65 72 5f 62 75 66 5f 6c 65 6e 2c 20  n1_der_buf_len, 
2270: 63 68 61 72 20 2a 6f 75 74 62 75 66 2c 20 73 69  char *outbuf, si
2280: 7a 65 5f 74 20 6f 75 74 62 75 66 5f 6c 65 6e 2c  ze_t outbuf_len,
2290: 20 63 68 61 72 20 2a 6d 61 74 63 68 6c 61 62 65   char *matchlabe
22a0: 6c 29 20 7b 0a 09 73 74 72 75 63 74 20 61 73 6e  l) {..struct asn
22b0: 31 5f 6f 62 6a 65 63 74 20 77 68 6f 6c 65 5f 74  1_object whole_t
22c0: 68 69 6e 67 2c 20 63 75 72 72 65 6e 74 5f 73 65  hing, current_se
22d0: 74 2c 20 63 75 72 72 65 6e 74 5f 73 65 71 3b 0a  t, current_seq;.
22e0: 09 73 74 72 75 63 74 20 61 73 6e 31 5f 6f 62 6a  .struct asn1_obj
22f0: 65 63 74 20 6c 61 62 65 6c 2c 20 76 61 6c 75 65  ect label, value
2300: 3b 0a 09 63 6f 6e 73 74 20 63 68 61 72 20 2a 6c  ;..const char *l
2310: 61 62 65 6c 5f 73 74 72 3b 0a 09 73 73 69 7a 65  abel_str;..ssize
2320: 5f 74 20 73 6e 70 72 69 6e 74 66 5f 72 65 74 2c  _t snprintf_ret,
2330: 20 72 65 74 76 61 6c 3b 0a 09 63 68 61 72 20 2a   retval;..char *
2340: 6f 75 74 62 75 66 5f 73 3b 0a 09 69 6e 74 20 72  outbuf_s;..int r
2350: 65 61 64 5f 72 65 74 3b 0a 09 69 6e 74 20 6f 66  ead_ret;..int of
2360: 66 73 65 74 3b 0a 0a 09 69 66 20 28 6f 75 74 62  fset;...if (outb
2370: 75 66 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09  uf == NULL) {...
2380: 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a  return(-1);..}..
2390: 09 69 66 20 28 6f 75 74 62 75 66 5f 6c 65 6e 20  .if (outbuf_len 
23a0: 3d 3d 20 30 20 7c 7c 20 61 73 6e 31 5f 64 65 72  == 0 || asn1_der
23b0: 5f 62 75 66 5f 6c 65 6e 20 3d 3d 20 30 20 7c 7c  _buf_len == 0 ||
23c0: 20 61 73 6e 31 5f 64 65 72 5f 62 75 66 20 3d 3d   asn1_der_buf ==
23d0: 20 4e 55 4c 4c 29 20 7b 0a 09 09 72 65 74 75 72   NULL) {...retur
23e0: 6e 28 30 29 3b 0a 09 7d 0a 0a 09 72 65 61 64 5f  n(0);..}...read_
23f0: 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f  ret = asn1_x509_
2400: 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74  read_asn1_object
2410: 28 61 73 6e 31 5f 64 65 72 5f 62 75 66 2c 20 61  (asn1_der_buf, a
2420: 73 6e 31 5f 64 65 72 5f 62 75 66 5f 6c 65 6e 2c  sn1_der_buf_len,
2430: 20 26 77 68 6f 6c 65 5f 74 68 69 6e 67 2c 20 4e   &whole_thing, N
2440: 55 4c 4c 29 3b 0a 09 69 66 20 28 72 65 61 64 5f  ULL);..if (read_
2450: 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 72 65  ret != 0) {...re
2460: 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 2f  turn(-1);..}.../
2470: 2a 20 54 65 72 6d 69 6e 61 74 65 20 73 74 72 69  * Terminate stri
2480: 6e 67 2c 20 69 6e 20 63 61 73 65 20 6e 6f 20 76  ng, in case no v
2490: 61 6c 69 64 20 65 6c 65 6d 65 6e 74 73 20 61 72  alid elements ar
24a0: 65 20 66 6f 75 6e 64 20 77 65 20 73 74 69 6c 6c  e found we still
24b0: 20 72 65 74 75 72 6e 20 61 20 76 61 6c 69 64 20   return a valid 
24c0: 73 74 72 69 6e 67 20 2a 2f 0a 09 2a 6f 75 74 62  string */..*outb
24d0: 75 66 20 3d 20 27 5c 30 27 3b 0a 09 6f 75 74 62  uf = '\0';..outb
24e0: 75 66 5f 73 20 3d 20 6f 75 74 62 75 66 3b 0a 0a  uf_s = outbuf;..
24f0: 09 6f 66 66 73 65 74 20 3d 20 30 3b 0a 09 77 68  .offset = 0;..wh
2500: 69 6c 65 20 28 31 29 20 7b 0a 09 09 72 65 61 64  ile (1) {...read
2510: 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39  _ret = asn1_x509
2520: 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63  _read_asn1_objec
2530: 74 28 28 28 75 6e 73 69 67 6e 65 64 20 63 68 61  t(((unsigned cha
2540: 72 20 2a 29 20 77 68 6f 6c 65 5f 74 68 69 6e 67  r *) whole_thing
2550: 2e 63 6f 6e 74 65 6e 74 73 29 20 2b 20 6f 66 66  .contents) + off
2560: 73 65 74 2c 20 77 68 6f 6c 65 5f 74 68 69 6e 67  set, whole_thing
2570: 2e 73 69 7a 65 20 2d 20 6f 66 66 73 65 74 2c 20  .size - offset, 
2580: 26 63 75 72 72 65 6e 74 5f 73 65 74 2c 20 4e 55  &current_set, NU
2590: 4c 4c 29 3b 0a 09 09 69 66 20 28 72 65 61 64 5f  LL);...if (read_
25a0: 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 09 62  ret != 0) {....b
25b0: 72 65 61 6b 3b 0a 09 09 7d 0a 0a 09 09 6f 66 66  reak;...}....off
25c0: 73 65 74 20 2b 3d 20 63 75 72 72 65 6e 74 5f 73  set += current_s
25d0: 65 74 2e 73 69 7a 65 20 2b 20 32 3b 0a 0a 09 09  et.size + 2;....
25e0: 72 65 61 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f  read_ret = asn1_
25f0: 78 35 30 39 5f 72 65 61 64 5f 61 73 6e 31 5f 6f  x509_read_asn1_o
2600: 62 6a 65 63 74 28 63 75 72 72 65 6e 74 5f 73 65  bject(current_se
2610: 74 2e 63 6f 6e 74 65 6e 74 73 2c 20 63 75 72 72  t.contents, curr
2620: 65 6e 74 5f 73 65 74 2e 73 69 7a 65 2c 20 26 63  ent_set.size, &c
2630: 75 72 72 65 6e 74 5f 73 65 71 2c 20 4e 55 4c 4c  urrent_seq, NULL
2640: 29 3b 0a 09 09 69 66 20 28 72 65 61 64 5f 72 65  );...if (read_re
2650: 74 20 21 3d 20 30 29 20 7b 0a 09 09 09 62 72 65  t != 0) {....bre
2660: 61 6b 3b 0a 09 09 7d 0a 0a 09 09 72 65 61 64 5f  ak;...}....read_
2670: 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f  ret = asn1_x509_
2680: 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74  read_asn1_object
2690: 28 63 75 72 72 65 6e 74 5f 73 65 71 2e 63 6f 6e  (current_seq.con
26a0: 74 65 6e 74 73 2c 20 63 75 72 72 65 6e 74 5f 73  tents, current_s
26b0: 65 71 2e 73 69 7a 65 2c 20 26 6c 61 62 65 6c 2c  eq.size, &label,
26c0: 20 26 76 61 6c 75 65 2c 20 4e 55 4c 4c 29 3b 0a   &value, NULL);.
26d0: 0a 09 09 6c 61 62 65 6c 5f 73 74 72 20 3d 20 5f  ...label_str = _
26e0: 78 35 30 39 5f 6f 62 6a 65 63 74 69 64 5f 74 6f  x509_objectid_to
26f0: 5f 6c 61 62 65 6c 5f 73 74 72 69 6e 67 28 6c 61  _label_string(la
2700: 62 65 6c 2e 63 6f 6e 74 65 6e 74 73 2c 20 6c 61  bel.contents, la
2710: 62 65 6c 2e 73 69 7a 65 29 3b 0a 0a 09 09 2f 2a  bel.size);..../*
2720: 20 49 66 20 74 68 65 20 75 73 65 72 20 72 65 71   If the user req
2730: 75 65 73 74 65 64 20 6f 6e 6c 79 20 63 65 72 74  uested only cert
2740: 61 69 6e 20 6c 61 62 65 6c 73 2c 20 65 78 63 6c  ain labels, excl
2750: 75 64 65 20 6f 74 68 65 72 73 20 2a 2f 0a 09 09  ude others */...
2760: 69 66 20 28 6d 61 74 63 68 6c 61 62 65 6c 29 20  if (matchlabel) 
2770: 7b 0a 09 09 09 69 66 20 28 73 74 72 63 6d 70 28  {....if (strcmp(
2780: 6d 61 74 63 68 6c 61 62 65 6c 2c 20 6c 61 62 65  matchlabel, labe
2790: 6c 5f 73 74 72 29 20 21 3d 20 30 29 20 7b 0a 09  l_str) != 0) {..
27a0: 09 09 09 63 6f 6e 74 69 6e 75 65 3b 0a 09 09 09  ...continue;....
27b0: 7d 0a 09 09 7d 0a 0a 09 09 2f 2a 20 49 66 20 74  }...}..../* If t
27c0: 68 65 20 75 73 65 72 20 72 65 71 75 65 73 74 65  he user requeste
27d0: 64 20 6f 6e 6c 79 20 63 65 72 74 61 69 6e 20 6c  d only certain l
27e0: 61 62 65 6c 73 2c 20 64 6f 6e 27 74 20 69 6e 63  abels, don't inc
27f0: 6c 75 64 65 20 74 68 65 6d 20 69 6e 20 74 68 65  lude them in the
2800: 20 72 65 70 6c 79 20 2a 2f 0a 09 09 69 66 20 28   reply */...if (
2810: 6d 61 74 63 68 6c 61 62 65 6c 29 20 7b 0a 09 09  matchlabel) {...
2820: 09 73 6e 70 72 69 6e 74 66 5f 72 65 74 20 3d 20  .snprintf_ret = 
2830: 73 6e 70 72 69 6e 74 66 28 6f 75 74 62 75 66 2c  snprintf(outbuf,
2840: 20 6f 75 74 62 75 66 5f 6c 65 6e 2c 20 22 25 2e   outbuf_len, "%.
2850: 2a 73 2c 20 22 2c 20 28 75 6e 73 69 67 6e 65 64  *s, ", (unsigned
2860: 20 69 6e 74 29 20 76 61 6c 75 65 2e 73 69 7a 65   int) value.size
2870: 2c 20 28 63 68 61 72 20 2a 29 20 76 61 6c 75 65  , (char *) value
2880: 2e 63 6f 6e 74 65 6e 74 73 29 3b 0a 09 09 7d 20  .contents);...} 
2890: 65 6c 73 65 20 7b 0a 09 09 09 73 6e 70 72 69 6e  else {....snprin
28a0: 74 66 5f 72 65 74 20 3d 20 73 6e 70 72 69 6e 74  tf_ret = snprint
28b0: 66 28 6f 75 74 62 75 66 2c 20 6f 75 74 62 75 66  f(outbuf, outbuf
28c0: 5f 6c 65 6e 2c 20 22 25 73 3d 25 2e 2a 73 2c 20  _len, "%s=%.*s, 
28d0: 22 2c 20 6c 61 62 65 6c 5f 73 74 72 2c 20 28 75  ", label_str, (u
28e0: 6e 73 69 67 6e 65 64 20 69 6e 74 29 20 76 61 6c  nsigned int) val
28f0: 75 65 2e 73 69 7a 65 2c 20 28 63 68 61 72 20 2a  ue.size, (char *
2900: 29 20 76 61 6c 75 65 2e 63 6f 6e 74 65 6e 74 73  ) value.contents
2910: 29 3b 0a 09 09 7d 0a 09 09 69 66 20 28 73 6e 70  );...}...if (snp
2920: 72 69 6e 74 66 5f 72 65 74 20 3c 20 30 29 20 7b  rintf_ret < 0) {
2930: 0a 09 09 09 62 72 65 61 6b 3b 0a 09 09 7d 0a 0a  ....break;...}..
2940: 09 09 69 66 20 28 73 6e 70 72 69 6e 74 66 5f 72  ..if (snprintf_r
2950: 65 74 20 3e 20 6f 75 74 62 75 66 5f 6c 65 6e 29  et > outbuf_len)
2960: 20 7b 0a 09 09 09 73 6e 70 72 69 6e 74 66 5f 72   {....snprintf_r
2970: 65 74 20 3d 20 6f 75 74 62 75 66 5f 6c 65 6e 3b  et = outbuf_len;
2980: 0a 09 09 7d 0a 0a 09 09 6f 75 74 62 75 66 20 2b  ...}....outbuf +
2990: 3d 20 73 6e 70 72 69 6e 74 66 5f 72 65 74 3b 0a  = snprintf_ret;.
29a0: 09 09 6f 75 74 62 75 66 5f 6c 65 6e 20 2d 3d 20  ..outbuf_len -= 
29b0: 73 6e 70 72 69 6e 74 66 5f 72 65 74 3b 0a 0a 09  snprintf_ret;...
29c0: 09 69 66 20 28 6f 75 74 62 75 66 5f 6c 65 6e 20  .if (outbuf_len 
29d0: 3c 20 32 29 20 7b 0a 09 09 09 62 72 65 61 6b 3b  < 2) {....break;
29e0: 0a 09 09 7d 0a 09 7d 0a 0a 09 72 65 74 76 61 6c  ...}..}...retval
29f0: 20 3d 20 6f 75 74 62 75 66 20 2d 20 6f 75 74 62   = outbuf - outb
2a00: 75 66 5f 73 3b 0a 0a 09 2f 2a 20 52 65 6d 6f 76  uf_s;.../* Remov
2a10: 65 20 74 72 61 69 6c 69 6e 67 20 22 2c 20 22 20  e trailing ", " 
2a20: 61 64 64 65 64 20 62 79 20 63 75 6d 75 6c 61 74  added by cumulat
2a30: 69 76 65 20 70 72 6f 63 65 73 73 2c 20 69 66 20  ive process, if 
2a40: 66 6f 75 6e 64 2e 20 2a 2f 0a 09 69 66 20 28 72  found. */..if (r
2a50: 65 74 76 61 6c 20 3e 20 32 29 20 7b 0a 09 09 69  etval > 2) {...i
2a60: 66 20 28 6f 75 74 62 75 66 5f 73 5b 72 65 74 76  f (outbuf_s[retv
2a70: 61 6c 20 2d 20 32 5d 20 3d 3d 20 27 2c 27 29 20  al - 2] == ',') 
2a80: 7b 0a 09 09 09 6f 75 74 62 75 66 5f 73 5b 72 65  {....outbuf_s[re
2a90: 74 76 61 6c 20 2d 20 32 5d 20 3d 20 27 5c 30 27  tval - 2] = '\0'
2aa0: 3b 0a 09 09 09 72 65 74 76 61 6c 20 2d 3d 20 32  ;....retval -= 2
2ab0: 3b 0a 09 09 7d 0a 09 7d 0a 0a 09 72 65 74 75 72  ;...}..}...retur
2ac0: 6e 28 72 65 74 76 61 6c 29 3b 0a 7d 0a           n(retval);.}.