Hex Artifact Content

Artifact f9aa197383677688fa838be2cbf85ad74cd9788c:


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 43 41 43 4b  t != 0) {...CACK
0a70: 45 59 5f 44 45 42 55 47 5f 50 52 49 4e 54 46 28  EY_DEBUG_PRINTF(
0a80: 22 46 61 69 6c 65 64 20 61 74 20 72 65 61 64 69  "Failed at readi
0a90: 6e 67 20 74 68 65 20 63 6f 6e 74 65 6e 74 73 20  ng the contents 
0aa0: 66 72 6f 6d 20 74 68 65 20 77 72 61 70 70 65 72  from the wrapper
0ab0: 22 29 0a 0a 09 09 72 65 74 75 72 6e 28 2d 31 29  ")....return(-1)
0ac0: 3b 0a 09 7d 0a 0a 09 72 65 61 64 5f 72 65 74 20  ;..}...read_ret 
0ad0: 3d 20 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64  = asn1_x509_read
0ae0: 5f 61 73 6e 31 5f 6f 62 6a 65 63 74 28 6f 75 74  _asn1_object(out
0af0: 62 75 66 2d 3e 77 68 6f 6c 65 74 68 69 6e 67 2e  buf->wholething.
0b00: 63 6f 6e 74 65 6e 74 73 2c 20 6f 75 74 62 75 66  contents, outbuf
0b10: 2d 3e 77 68 6f 6c 65 74 68 69 6e 67 2e 73 69 7a  ->wholething.siz
0b20: 65 2c 20 26 6f 75 74 62 75 66 2d 3e 63 65 72 74  e, &outbuf->cert
0b30: 69 66 69 63 61 74 65 2c 20 4e 55 4c 4c 29 3b 0a  ificate, NULL);.
0b40: 09 69 66 20 28 72 65 61 64 5f 72 65 74 20 21 3d  .if (read_ret !=
0b50: 20 30 29 20 7b 0a 09 09 43 41 43 4b 45 59 5f 44   0) {...CACKEY_D
0b60: 45 42 55 47 5f 50 52 49 4e 54 46 28 22 46 61 69  EBUG_PRINTF("Fai
0b70: 6c 65 64 20 61 74 20 72 65 61 64 69 6e 67 20 74  led at reading t
0b80: 68 65 20 63 65 72 74 69 66 69 63 61 74 65 20 66  he certificate f
0b90: 72 6f 6d 20 74 68 65 20 63 6f 6e 74 65 6e 74 73  rom the contents
0ba0: 22 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28 2d 31  ");....return(-1
0bb0: 29 3b 0a 09 7d 0a 0a 09 72 65 61 64 5f 72 65 74  );..}...read_ret
0bc0: 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f 72 65 61   = asn1_x509_rea
0bd0: 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74 28 6f 75  d_asn1_object(ou
0be0: 74 62 75 66 2d 3e 63 65 72 74 69 66 69 63 61 74  tbuf->certificat
0bf0: 65 2e 63 6f 6e 74 65 6e 74 73 2c 20 6f 75 74 62  e.contents, outb
0c00: 75 66 2d 3e 63 65 72 74 69 66 69 63 61 74 65 2e  uf->certificate.
0c10: 73 69 7a 65 2c 20 26 6f 75 74 62 75 66 2d 3e 76  size, &outbuf->v
0c20: 65 72 73 69 6f 6e 2c 20 26 6f 75 74 62 75 66 2d  ersion, &outbuf-
0c30: 3e 73 65 72 69 61 6c 5f 6e 75 6d 62 65 72 2c 20  >serial_number, 
0c40: 26 6f 75 74 62 75 66 2d 3e 73 69 67 6e 61 74 75  &outbuf->signatu
0c50: 72 65 5f 61 6c 67 6f 2c 20 26 6f 75 74 62 75 66  re_algo, &outbuf
0c60: 2d 3e 69 73 73 75 65 72 2c 20 26 6f 75 74 62 75  ->issuer, &outbu
0c70: 66 2d 3e 76 61 6c 69 64 69 74 79 2c 20 26 6f 75  f->validity, &ou
0c80: 74 62 75 66 2d 3e 73 75 62 6a 65 63 74 2c 20 26  tbuf->subject, &
0c90: 6f 75 74 62 75 66 2d 3e 70 75 62 6b 65 79 69 6e  outbuf->pubkeyin
0ca0: 66 6f 2c 20 4e 55 4c 4c 29 3b 0a 09 69 66 20 28  fo, NULL);..if (
0cb0: 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29 20 7b  read_ret != 0) {
0cc0: 0a 09 09 43 41 43 4b 45 59 5f 44 45 42 55 47 5f  ...CACKEY_DEBUG_
0cd0: 50 52 49 4e 54 46 28 22 46 61 69 6c 65 64 20 61  PRINTF("Failed a
0ce0: 74 20 72 65 61 64 69 6e 67 20 74 68 65 20 63 65  t reading the ce
0cf0: 72 74 69 66 69 63 61 74 65 20 63 6f 6d 70 6f 6e  rtificate compon
0d00: 65 6e 74 73 20 66 72 6f 6d 20 74 68 65 20 63 65  ents from the ce
0d10: 72 74 69 66 69 63 61 74 65 22 29 3b 0a 0a 09 09  rtificate");....
0d20: 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a  return(-1);..}..
0d30: 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73 6e 31  .read_ret = asn1
0d40: 5f 78 35 30 39 5f 72 65 61 64 5f 61 73 6e 31 5f  _x509_read_asn1_
0d50: 6f 62 6a 65 63 74 28 6f 75 74 62 75 66 2d 3e 70  object(outbuf->p
0d60: 75 62 6b 65 79 69 6e 66 6f 2e 63 6f 6e 74 65 6e  ubkeyinfo.conten
0d70: 74 73 2c 20 6f 75 74 62 75 66 2d 3e 70 75 62 6b  ts, outbuf->pubk
0d80: 65 79 69 6e 66 6f 2e 73 69 7a 65 2c 20 26 6f 75  eyinfo.size, &ou
0d90: 74 62 75 66 2d 3e 70 75 62 6b 65 79 5f 61 6c 67  tbuf->pubkey_alg
0da0: 6f 69 64 2c 20 26 6f 75 74 62 75 66 2d 3e 70 75  oid, &outbuf->pu
0db0: 62 6b 65 79 2c 20 4e 55 4c 4c 29 3b 0a 09 69 66  bkey, NULL);..if
0dc0: 20 28 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29   (read_ret != 0)
0dd0: 20 7b 0a 09 09 43 41 43 4b 45 59 5f 44 45 42 55   {...CACKEY_DEBU
0de0: 47 5f 50 52 49 4e 54 46 28 22 46 61 69 6c 65 64  G_PRINTF("Failed
0df0: 20 61 74 20 72 65 61 64 69 6e 67 20 74 68 65 20   at reading the 
0e00: 70 75 62 6c 69 63 20 6b 65 79 20 66 72 6f 6d 20  public key from 
0e10: 74 68 65 20 63 65 72 74 69 66 69 63 61 74 65 20  the certificate 
0e20: 63 6f 6d 70 6f 6e 65 6e 74 73 22 29 3b 0a 0a 09  components");...
0e30: 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a  .return(-1);..}.
0e40: 0a 09 72 65 74 75 72 6e 28 30 29 3b 0a 7d 0a 0a  ..return(0);.}..
0e50: 73 73 69 7a 65 5f 74 20 78 35 30 39 5f 74 6f 5f  ssize_t x509_to_
0e60: 69 73 73 75 65 72 28 76 6f 69 64 20 2a 78 35 30  issuer(void *x50
0e70: 39 5f 64 65 72 5f 62 75 66 2c 20 73 69 7a 65 5f  9_der_buf, size_
0e80: 74 20 78 35 30 39 5f 64 65 72 5f 62 75 66 5f 6c  t x509_der_buf_l
0e90: 65 6e 2c 20 76 6f 69 64 20 2a 2a 6f 75 74 62 75  en, void **outbu
0ea0: 66 29 20 7b 0a 09 73 74 72 75 63 74 20 78 35 30  f) {..struct x50
0eb0: 39 5f 6f 62 6a 65 63 74 20 78 35 30 39 3b 0a 09  9_object x509;..
0ec0: 69 6e 74 20 72 65 61 64 5f 72 65 74 3b 0a 0a 09  int read_ret;...
0ed0: 72 65 61 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f  read_ret = asn1_
0ee0: 78 35 30 39 5f 72 65 61 64 5f 6f 62 6a 65 63 74  x509_read_object
0ef0: 28 78 35 30 39 5f 64 65 72 5f 62 75 66 2c 20 78  (x509_der_buf, x
0f00: 35 30 39 5f 64 65 72 5f 62 75 66 5f 6c 65 6e 2c  509_der_buf_len,
0f10: 20 26 78 35 30 39 29 3b 0a 09 69 66 20 28 72 65   &x509);..if (re
0f20: 61 64 5f 72 65 74 20 21 3d 20 30 29 20 7b 0a 09  ad_ret != 0) {..
0f30: 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a  .return(-1);..}.
0f40: 0a 09 69 66 20 28 6f 75 74 62 75 66 29 20 7b 0a  ..if (outbuf) {.
0f50: 09 09 2a 6f 75 74 62 75 66 20 3d 20 78 35 30 39  ..*outbuf = x509
0f60: 2e 69 73 73 75 65 72 2e 61 73 6e 31 72 65 70 3b  .issuer.asn1rep;
0f70: 0a 09 7d 0a 0a 09 72 65 74 75 72 6e 28 78 35 30  ..}...return(x50
0f80: 39 2e 69 73 73 75 65 72 2e 61 73 6e 31 72 65 70  9.issuer.asn1rep
0f90: 5f 6c 65 6e 29 3b 0a 7d 0a 0a 73 73 69 7a 65 5f  _len);.}..ssize_
0fa0: 74 20 78 35 30 39 5f 74 6f 5f 73 75 62 6a 65 63  t x509_to_subjec
0fb0: 74 28 76 6f 69 64 20 2a 78 35 30 39 5f 64 65 72  t(void *x509_der
0fc0: 5f 62 75 66 2c 20 73 69 7a 65 5f 74 20 78 35 30  _buf, size_t x50
0fd0: 39 5f 64 65 72 5f 62 75 66 5f 6c 65 6e 2c 20 76  9_der_buf_len, v
0fe0: 6f 69 64 20 2a 2a 6f 75 74 62 75 66 29 20 7b 0a  oid **outbuf) {.
0ff0: 09 73 74 72 75 63 74 20 78 35 30 39 5f 6f 62 6a  .struct x509_obj
1000: 65 63 74 20 78 35 30 39 3b 0a 09 69 6e 74 20 72  ect x509;..int r
1010: 65 61 64 5f 72 65 74 3b 0a 0a 09 72 65 61 64 5f  ead_ret;...read_
1020: 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f  ret = asn1_x509_
1030: 72 65 61 64 5f 6f 62 6a 65 63 74 28 78 35 30 39  read_object(x509
1040: 5f 64 65 72 5f 62 75 66 2c 20 78 35 30 39 5f 64  _der_buf, x509_d
1050: 65 72 5f 62 75 66 5f 6c 65 6e 2c 20 26 78 35 30  er_buf_len, &x50
1060: 39 29 3b 0a 09 69 66 20 28 72 65 61 64 5f 72 65  9);..if (read_re
1070: 74 20 21 3d 20 30 29 20 7b 0a 09 09 72 65 74 75  t != 0) {...retu
1080: 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 69 66 20  rn(-1);..}...if 
1090: 28 6f 75 74 62 75 66 29 20 7b 0a 09 09 2a 6f 75  (outbuf) {...*ou
10a0: 74 62 75 66 20 3d 20 78 35 30 39 2e 73 75 62 6a  tbuf = x509.subj
10b0: 65 63 74 2e 61 73 6e 31 72 65 70 3b 0a 09 7d 0a  ect.asn1rep;..}.
10c0: 0a 09 72 65 74 75 72 6e 28 78 35 30 39 2e 73 75  ..return(x509.su
10d0: 62 6a 65 63 74 2e 61 73 6e 31 72 65 70 5f 6c 65  bject.asn1rep_le
10e0: 6e 29 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 73 73  n);.}..static ss
10f0: 69 7a 65 5f 74 20 78 35 30 39 5f 74 6f 5f 73 65  ize_t x509_to_se
1100: 72 69 61 6c 28 76 6f 69 64 20 2a 78 35 30 39 5f  rial(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 78 35 30 39 5f   {..struct x509_
1150: 6f 62 6a 65 63 74 20 78 35 30 39 3b 0a 09 69 6e  object x509;..in
1160: 74 20 72 65 61 64 5f 72 65 74 3b 0a 0a 09 72 65  t read_ret;...re
1170: 61 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35  ad_ret = asn1_x5
1180: 30 39 5f 72 65 61 64 5f 6f 62 6a 65 63 74 28 78  09_read_object(x
1190: 35 30 39 5f 64 65 72 5f 62 75 66 2c 20 78 35 30  509_der_buf, x50
11a0: 39 5f 64 65 72 5f 62 75 66 5f 6c 65 6e 2c 20 26  9_der_buf_len, &
11b0: 78 35 30 39 29 3b 0a 09 69 66 20 28 72 65 61 64  x509);..if (read
11c0: 5f 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 43  _ret != 0) {...C
11d0: 41 43 4b 45 59 5f 44 45 42 55 47 5f 50 52 49 4e  ACKEY_DEBUG_PRIN
11e0: 54 46 28 22 55 6e 61 62 6c 65 20 74 6f 20 72 65  TF("Unable to re
11f0: 61 64 20 73 65 72 69 61 6c 20 6e 75 6d 62 65 72  ad serial number
1200: 20 66 72 6f 6d 20 61 20 25 6c 75 20 62 79 74 65   from a %lu byte
1210: 20 62 75 66 66 65 72 22 2c 20 78 35 30 39 5f 64   buffer", x509_d
1220: 65 72 5f 62 75 66 5f 6c 65 6e 29 3b 0a 09 09 43  er_buf_len);...C
1230: 41 43 4b 45 59 5f 44 45 42 55 47 5f 50 52 49 4e  ACKEY_DEBUG_PRIN
1240: 54 42 55 46 28 22 58 2e 35 30 39 20 44 45 52 3a  TBUF("X.509 DER:
1250: 22 2c 20 78 35 30 39 5f 64 65 72 5f 62 75 66 2c  ", x509_der_buf,
1260: 20 78 35 30 39 5f 64 65 72 5f 62 75 66 5f 6c 65   x509_der_buf_le
1270: 6e 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28 2d 31  n);....return(-1
1280: 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 6f 75 74 62  );..}...if (outb
1290: 75 66 29 20 7b 0a 09 09 2a 6f 75 74 62 75 66 20  uf) {...*outbuf 
12a0: 3d 20 78 35 30 39 2e 73 65 72 69 61 6c 5f 6e 75  = x509.serial_nu
12b0: 6d 62 65 72 2e 61 73 6e 31 72 65 70 3b 0a 09 7d  mber.asn1rep;..}
12c0: 0a 0a 09 72 65 74 75 72 6e 28 78 35 30 39 2e 73  ...return(x509.s
12d0: 65 72 69 61 6c 5f 6e 75 6d 62 65 72 2e 61 73 6e  erial_number.asn
12e0: 31 72 65 70 5f 6c 65 6e 29 3b 0a 7d 0a 0a 73 74  1rep_len);.}..st
12f0: 61 74 69 63 20 73 73 69 7a 65 5f 74 20 78 35 30  atic ssize_t x50
1300: 39 5f 74 6f 5f 70 75 62 6b 65 79 28 76 6f 69 64  9_to_pubkey(void
1310: 20 2a 78 35 30 39 5f 64 65 72 5f 62 75 66 2c 20   *x509_der_buf, 
1320: 73 69 7a 65 5f 74 20 78 35 30 39 5f 64 65 72 5f  size_t x509_der_
1330: 62 75 66 5f 6c 65 6e 2c 20 76 6f 69 64 20 2a 2a  buf_len, void **
1340: 6f 75 74 62 75 66 29 20 7b 0a 09 73 74 72 75 63  outbuf) {..struc
1350: 74 20 78 35 30 39 5f 6f 62 6a 65 63 74 20 78 35  t x509_object x5
1360: 30 39 3b 0a 09 69 6e 74 20 72 65 61 64 5f 72 65  09;..int read_re
1370: 74 3b 0a 0a 09 72 65 61 64 5f 72 65 74 20 3d 20  t;...read_ret = 
1380: 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 6f  asn1_x509_read_o
1390: 62 6a 65 63 74 28 78 35 30 39 5f 64 65 72 5f 62  bject(x509_der_b
13a0: 75 66 2c 20 78 35 30 39 5f 64 65 72 5f 62 75 66  uf, x509_der_buf
13b0: 5f 6c 65 6e 2c 20 26 78 35 30 39 29 3b 0a 09 69  _len, &x509);..i
13c0: 66 20 28 72 65 61 64 5f 72 65 74 20 21 3d 20 30  f (read_ret != 0
13d0: 29 20 7b 0a 09 09 72 65 74 75 72 6e 28 2d 31 29  ) {...return(-1)
13e0: 3b 0a 09 7d 0a 0a 09 2a 6f 75 74 62 75 66 20 3d  ;..}...*outbuf =
13f0: 20 78 35 30 39 2e 70 75 62 6b 65 79 2e 63 6f 6e   x509.pubkey.con
1400: 74 65 6e 74 73 3b 0a 09 72 65 74 75 72 6e 28 78  tents;..return(x
1410: 35 30 39 2e 70 75 62 6b 65 79 2e 73 69 7a 65 29  509.pubkey.size)
1420: 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 73 73 69 7a  ;.}..static ssiz
1430: 65 5f 74 20 78 35 30 39 5f 74 6f 5f 6d 6f 64 75  e_t x509_to_modu
1440: 6c 75 73 28 76 6f 69 64 20 2a 78 35 30 39 5f 64  lus(void *x509_d
1450: 65 72 5f 62 75 66 2c 20 73 69 7a 65 5f 74 20 78  er_buf, size_t x
1460: 35 30 39 5f 64 65 72 5f 62 75 66 5f 6c 65 6e 2c  509_der_buf_len,
1470: 20 76 6f 69 64 20 2a 2a 6f 75 74 62 75 66 29 20   void **outbuf) 
1480: 7b 0a 09 73 74 72 75 63 74 20 61 73 6e 31 5f 6f  {..struct asn1_o
1490: 62 6a 65 63 74 20 6e 75 6c 6c 2c 20 70 75 62 6b  bject null, pubk
14a0: 65 79 2c 20 6d 6f 64 75 6c 75 73 2c 20 65 78 70  ey, modulus, exp
14b0: 6f 6e 65 6e 74 3b 0a 09 73 74 72 75 63 74 20 78  onent;..struct x
14c0: 35 30 39 5f 6f 62 6a 65 63 74 20 78 35 30 39 3b  509_object x509;
14d0: 0a 09 69 6e 74 20 72 65 61 64 5f 72 65 74 3b 0a  ..int read_ret;.
14e0: 0a 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73 6e  ..read_ret = asn
14f0: 31 5f 78 35 30 39 5f 72 65 61 64 5f 6f 62 6a 65  1_x509_read_obje
1500: 63 74 28 78 35 30 39 5f 64 65 72 5f 62 75 66 2c  ct(x509_der_buf,
1510: 20 78 35 30 39 5f 64 65 72 5f 62 75 66 5f 6c 65   x509_der_buf_le
1520: 6e 2c 20 26 78 35 30 39 29 3b 0a 09 69 66 20 28  n, &x509);..if (
1530: 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29 20 7b  read_ret != 0) {
1540: 0a 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09  ...return(-1);..
1550: 7d 0a 0a 09 2f 2a 20 54 68 65 20 73 74 72 75 63  }.../* The struc
1560: 74 75 72 65 20 6f 66 20 22 70 75 62 6b 65 79 22  ture of "pubkey"
1570: 20 69 73 20 73 70 65 63 69 66 69 65 64 20 69 6e   is specified in
1580: 20 50 4b 43 53 20 23 31 20 2a 2f 0a 09 72 65 61   PKCS #1 */..rea
1590: 64 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30  d_ret = asn1_x50
15a0: 39 5f 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65  9_read_asn1_obje
15b0: 63 74 28 78 35 30 39 2e 70 75 62 6b 65 79 2e 63  ct(x509.pubkey.c
15c0: 6f 6e 74 65 6e 74 73 2c 20 78 35 30 39 2e 70 75  ontents, x509.pu
15d0: 62 6b 65 79 2e 73 69 7a 65 2c 20 26 6e 75 6c 6c  bkey.size, &null
15e0: 2c 20 26 70 75 62 6b 65 79 2c 20 4e 55 4c 4c 29  , &pubkey, NULL)
15f0: 3b 0a 09 69 66 20 28 72 65 61 64 5f 72 65 74 20  ;..if (read_ret 
1600: 21 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e  != 0) {...return
1610: 28 2d 31 29 3b 0a 09 7d 0a 0a 09 72 65 61 64 5f  (-1);..}...read_
1620: 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f  ret = asn1_x509_
1630: 72 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74  read_asn1_object
1640: 28 70 75 62 6b 65 79 2e 63 6f 6e 74 65 6e 74 73  (pubkey.contents
1650: 2c 20 70 75 62 6b 65 79 2e 73 69 7a 65 2c 20 26  , pubkey.size, &
1660: 6d 6f 64 75 6c 75 73 2c 20 26 65 78 70 6f 6e 65  modulus, &expone
1670: 6e 74 2c 20 4e 55 4c 4c 29 3b 0a 09 69 66 20 28  nt, NULL);..if (
1680: 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29 20 7b  read_ret != 0) {
1690: 0a 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09  ...return(-1);..
16a0: 7d 0a 0a 09 69 66 20 28 6f 75 74 62 75 66 29 20  }...if (outbuf) 
16b0: 7b 0a 09 09 2a 6f 75 74 62 75 66 20 3d 20 6d 6f  {...*outbuf = mo
16c0: 64 75 6c 75 73 2e 63 6f 6e 74 65 6e 74 73 3b 0a  dulus.contents;.
16d0: 09 7d 0a 0a 09 72 65 74 75 72 6e 28 6d 6f 64 75  .}...return(modu
16e0: 6c 75 73 2e 73 69 7a 65 29 3b 0a 7d 0a 0a 73 74  lus.size);.}..st
16f0: 61 74 69 63 20 73 73 69 7a 65 5f 74 20 78 35 30  atic ssize_t x50
1700: 39 5f 74 6f 5f 65 78 70 6f 6e 65 6e 74 28 76 6f  9_to_exponent(vo
1710: 69 64 20 2a 78 35 30 39 5f 64 65 72 5f 62 75 66  id *x509_der_buf
1720: 2c 20 73 69 7a 65 5f 74 20 78 35 30 39 5f 64 65  , size_t x509_de
1730: 72 5f 62 75 66 5f 6c 65 6e 2c 20 76 6f 69 64 20  r_buf_len, void 
1740: 2a 2a 6f 75 74 62 75 66 29 20 7b 0a 09 73 74 72  **outbuf) {..str
1750: 75 63 74 20 61 73 6e 31 5f 6f 62 6a 65 63 74 20  uct asn1_object 
1760: 6e 75 6c 6c 2c 20 70 75 62 6b 65 79 2c 20 6d 6f  null, pubkey, mo
1770: 64 75 6c 75 73 2c 20 65 78 70 6f 6e 65 6e 74 3b  dulus, exponent;
1780: 0a 09 73 74 72 75 63 74 20 78 35 30 39 5f 6f 62  ..struct x509_ob
1790: 6a 65 63 74 20 78 35 30 39 3b 0a 09 69 6e 74 20  ject x509;..int 
17a0: 72 65 61 64 5f 72 65 74 3b 0a 0a 09 72 65 61 64  read_ret;...read
17b0: 5f 72 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39  _ret = asn1_x509
17c0: 5f 72 65 61 64 5f 6f 62 6a 65 63 74 28 78 35 30  _read_object(x50
17d0: 39 5f 64 65 72 5f 62 75 66 2c 20 78 35 30 39 5f  9_der_buf, x509_
17e0: 64 65 72 5f 62 75 66 5f 6c 65 6e 2c 20 26 78 35  der_buf_len, &x5
17f0: 30 39 29 3b 0a 09 69 66 20 28 72 65 61 64 5f 72  09);..if (read_r
1800: 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 72 65 74  et != 0) {...ret
1810: 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 2f 2a  urn(-1);..}.../*
1820: 20 54 68 65 20 73 74 72 75 63 74 75 72 65 20 6f   The structure o
1830: 66 20 22 70 75 62 6b 65 79 22 20 69 73 20 73 70  f "pubkey" is sp
1840: 65 63 69 66 69 65 64 20 69 6e 20 50 4b 43 53 20  ecified in PKCS 
1850: 23 31 20 2a 2f 0a 09 72 65 61 64 5f 72 65 74 20  #1 */..read_ret 
1860: 3d 20 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64  = asn1_x509_read
1870: 5f 61 73 6e 31 5f 6f 62 6a 65 63 74 28 78 35 30  _asn1_object(x50
1880: 39 2e 70 75 62 6b 65 79 2e 63 6f 6e 74 65 6e 74  9.pubkey.content
1890: 73 2c 20 78 35 30 39 2e 70 75 62 6b 65 79 2e 73  s, x509.pubkey.s
18a0: 69 7a 65 2c 20 26 6e 75 6c 6c 2c 20 26 70 75 62  ize, &null, &pub
18b0: 6b 65 79 2c 20 4e 55 4c 4c 29 3b 0a 09 69 66 20  key, NULL);..if 
18c0: 28 72 65 61 64 5f 72 65 74 20 21 3d 20 30 29 20  (read_ret != 0) 
18d0: 7b 0a 09 09 72 65 74 75 72 6e 28 2d 31 29 3b 0a  {...return(-1);.
18e0: 09 7d 0a 0a 09 72 65 61 64 5f 72 65 74 20 3d 20  .}...read_ret = 
18f0: 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 61  asn1_x509_read_a
1900: 73 6e 31 5f 6f 62 6a 65 63 74 28 70 75 62 6b 65  sn1_object(pubke
1910: 79 2e 63 6f 6e 74 65 6e 74 73 2c 20 70 75 62 6b  y.contents, pubk
1920: 65 79 2e 73 69 7a 65 2c 20 26 6d 6f 64 75 6c 75  ey.size, &modulu
1930: 73 2c 20 26 65 78 70 6f 6e 65 6e 74 2c 20 4e 55  s, &exponent, NU
1940: 4c 4c 29 3b 0a 09 69 66 20 28 72 65 61 64 5f 72  LL);..if (read_r
1950: 65 74 20 21 3d 20 30 29 20 7b 0a 09 09 72 65 74  et != 0) {...ret
1960: 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a 09 69 66  urn(-1);..}...if
1970: 20 28 6f 75 74 62 75 66 29 20 7b 0a 09 09 2a 6f   (outbuf) {...*o
1980: 75 74 62 75 66 20 3d 20 65 78 70 6f 6e 65 6e 74  utbuf = exponent
1990: 2e 63 6f 6e 74 65 6e 74 73 3b 0a 09 7d 0a 0a 09  .contents;..}...
19a0: 72 65 74 75 72 6e 28 65 78 70 6f 6e 65 6e 74 2e  return(exponent.
19b0: 73 69 7a 65 29 3b 0a 7d 0a 0a 73 74 61 74 69 63  size);.}..static
19c0: 20 73 73 69 7a 65 5f 74 20 78 35 30 39 5f 74 6f   ssize_t x509_to
19d0: 5f 6b 65 79 73 69 7a 65 28 76 6f 69 64 20 2a 78  _keysize(void *x
19e0: 35 30 39 5f 64 65 72 5f 62 75 66 2c 20 73 69 7a  509_der_buf, siz
19f0: 65 5f 74 20 78 35 30 39 5f 64 65 72 5f 62 75 66  e_t x509_der_buf
1a00: 5f 6c 65 6e 29 20 7b 0a 09 73 74 72 75 63 74 20  _len) {..struct 
1a10: 61 73 6e 31 5f 6f 62 6a 65 63 74 20 6e 75 6c 6c  asn1_object null
1a20: 2c 20 70 75 62 6b 65 79 2c 20 6d 6f 64 75 6c 75  , pubkey, modulu
1a30: 73 2c 20 65 78 70 6f 6e 65 6e 74 3b 0a 09 73 74  s, exponent;..st
1a40: 72 75 63 74 20 78 35 30 39 5f 6f 62 6a 65 63 74  ruct x509_object
1a50: 20 78 35 30 39 3b 0a 09 69 6e 74 20 72 65 61 64   x509;..int read
1a60: 5f 72 65 74 3b 0a 0a 09 72 65 61 64 5f 72 65 74  _ret;...read_ret
1a70: 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f 72 65 61   = asn1_x509_rea
1a80: 64 5f 6f 62 6a 65 63 74 28 78 35 30 39 5f 64 65  d_object(x509_de
1a90: 72 5f 62 75 66 2c 20 78 35 30 39 5f 64 65 72 5f  r_buf, x509_der_
1aa0: 62 75 66 5f 6c 65 6e 2c 20 26 78 35 30 39 29 3b  buf_len, &x509);
1ab0: 0a 09 69 66 20 28 72 65 61 64 5f 72 65 74 20 21  ..if (read_ret !
1ac0: 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28  = 0) {...return(
1ad0: 2d 31 29 3b 0a 09 7d 0a 0a 09 2f 2a 20 54 68 65  -1);..}.../* The
1ae0: 20 73 74 72 75 63 74 75 72 65 20 6f 66 20 22 70   structure of "p
1af0: 75 62 6b 65 79 22 20 69 73 20 73 70 65 63 69 66  ubkey" is specif
1b00: 69 65 64 20 69 6e 20 50 4b 43 53 20 23 31 20 2a  ied in PKCS #1 *
1b10: 2f 0a 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73  /..read_ret = as
1b20: 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 61 73 6e  n1_x509_read_asn
1b30: 31 5f 6f 62 6a 65 63 74 28 78 35 30 39 2e 70 75  1_object(x509.pu
1b40: 62 6b 65 79 2e 63 6f 6e 74 65 6e 74 73 2c 20 78  bkey.contents, x
1b50: 35 30 39 2e 70 75 62 6b 65 79 2e 73 69 7a 65 2c  509.pubkey.size,
1b60: 20 26 6e 75 6c 6c 2c 20 26 70 75 62 6b 65 79 2c   &null, &pubkey,
1b70: 20 4e 55 4c 4c 29 3b 0a 09 69 66 20 28 72 65 61   NULL);..if (rea
1b80: 64 5f 72 65 74 20 21 3d 20 30 29 20 7b 0a 09 09  d_ret != 0) {...
1b90: 72 65 74 75 72 6e 28 2d 31 29 3b 0a 09 7d 0a 0a  return(-1);..}..
1ba0: 09 72 65 61 64 5f 72 65 74 20 3d 20 61 73 6e 31  .read_ret = asn1
1bb0: 5f 78 35 30 39 5f 72 65 61 64 5f 61 73 6e 31 5f  _x509_read_asn1_
1bc0: 6f 62 6a 65 63 74 28 70 75 62 6b 65 79 2e 63 6f  object(pubkey.co
1bd0: 6e 74 65 6e 74 73 2c 20 70 75 62 6b 65 79 2e 73  ntents, pubkey.s
1be0: 69 7a 65 2c 20 26 6d 6f 64 75 6c 75 73 2c 20 26  ize, &modulus, &
1bf0: 65 78 70 6f 6e 65 6e 74 2c 20 4e 55 4c 4c 29 3b  exponent, NULL);
1c00: 0a 09 69 66 20 28 72 65 61 64 5f 72 65 74 20 21  ..if (read_ret !
1c10: 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28  = 0) {...return(
1c20: 2d 31 29 3b 0a 09 7d 0a 0a 09 72 65 74 75 72 6e  -1);..}...return
1c30: 28 6d 6f 64 75 6c 75 73 2e 73 69 7a 65 20 2d 20  (modulus.size - 
1c40: 31 29 3b 0a 7d 0a 0a 2f 2a 0a 20 2a 20 68 74 74  1);.}../*. * htt
1c50: 70 3a 2f 2f 77 77 77 2e 62 6c 61 63 6b 62 65 72  p://www.blackber
1c60: 72 79 2e 63 6f 6d 2f 64 65 76 65 6c 6f 70 65 72  ry.com/developer
1c70: 73 2f 64 6f 63 73 2f 34 2e 36 2e 30 61 70 69 2f  s/docs/4.6.0api/
1c80: 6a 61 76 61 78 2f 6d 69 63 72 6f 65 64 69 74 69  javax/microediti
1c90: 6f 6e 2f 70 6b 69 2f 43 65 72 74 69 66 69 63 61  on/pki/Certifica
1ca0: 74 65 2e 68 74 6d 6c 0a 20 2a 2f 0a 73 74 61 74  te.html. */.stat
1cb0: 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 5f  ic const char *_
1cc0: 78 35 30 39 5f 6f 62 6a 65 63 74 69 64 5f 74 6f  x509_objectid_to
1cd0: 5f 6c 61 62 65 6c 5f 73 74 72 69 6e 67 28 76 6f  _label_string(vo
1ce0: 69 64 20 2a 62 75 66 2c 20 73 69 7a 65 5f 74 20  id *buf, size_t 
1cf0: 62 75 66 6c 65 6e 29 20 7b 0a 09 73 77 69 74 63  buflen) {..switc
1d00: 68 20 28 62 75 66 6c 65 6e 29 20 7b 0a 09 09 63  h (buflen) {...c
1d10: 61 73 65 20 33 3a 0a 09 09 09 69 66 20 28 6d 65  ase 3:....if (me
1d20: 6d 63 6d 70 28 62 75 66 2c 20 22 5c 78 35 35 5c  mcmp(buf, "\x55\
1d30: 78 30 34 5c 78 30 33 22 2c 20 33 29 20 3d 3d 20  x04\x03", 3) == 
1d40: 30 29 20 7b 0a 09 09 09 09 72 65 74 75 72 6e 28  0) {.....return(
1d50: 22 43 4e 22 29 3b 0a 09 09 09 7d 0a 09 09 09 69  "CN");....}....i
1d60: 66 20 28 6d 65 6d 63 6d 70 28 62 75 66 2c 20 22  f (memcmp(buf, "
1d70: 5c 78 35 35 5c 78 30 34 5c 78 30 34 22 2c 20 33  \x55\x04\x04", 3
1d80: 29 20 3d 3d 20 30 29 20 7b 0a 09 09 09 09 72 65  ) == 0) {.....re
1d90: 74 75 72 6e 28 22 53 4e 22 29 3b 0a 09 09 09 7d  turn("SN");....}
1da0: 0a 09 09 09 69 66 20 28 6d 65 6d 63 6d 70 28 62  ....if (memcmp(b
1db0: 75 66 2c 20 22 5c 78 35 35 5c 78 30 34 5c 78 30  uf, "\x55\x04\x0
1dc0: 36 22 2c 20 33 29 20 3d 3d 20 30 29 20 7b 0a 09  6", 3) == 0) {..
1dd0: 09 09 09 72 65 74 75 72 6e 28 22 43 22 29 3b 0a  ...return("C");.
1de0: 09 09 09 7d 0a 09 09 09 69 66 20 28 6d 65 6d 63  ...}....if (memc
1df0: 6d 70 28 62 75 66 2c 20 22 5c 78 35 35 5c 78 30  mp(buf, "\x55\x0
1e00: 34 5c 78 30 37 22 2c 20 33 29 20 3d 3d 20 30 29  4\x07", 3) == 0)
1e10: 20 7b 0a 09 09 09 09 72 65 74 75 72 6e 28 22 4c   {.....return("L
1e20: 22 29 3b 0a 09 09 09 7d 0a 09 09 09 69 66 20 28  ");....}....if (
1e30: 6d 65 6d 63 6d 70 28 62 75 66 2c 20 22 5c 78 35  memcmp(buf, "\x5
1e40: 35 5c 78 30 34 5c 78 30 38 22 2c 20 33 29 20 3d  5\x04\x08", 3) =
1e50: 3d 20 30 29 20 7b 0a 09 09 09 09 72 65 74 75 72  = 0) {.....retur
1e60: 6e 28 22 53 54 22 29 3b 0a 09 09 09 7d 0a 09 09  n("ST");....}...
1e70: 09 69 66 20 28 6d 65 6d 63 6d 70 28 62 75 66 2c  .if (memcmp(buf,
1e80: 20 22 5c 78 35 35 5c 78 30 34 5c 78 30 39 22 2c   "\x55\x04\x09",
1e90: 20 33 29 20 3d 3d 20 30 29 20 7b 0a 09 09 09 09   3) == 0) {.....
1ea0: 72 65 74 75 72 6e 28 22 53 54 52 45 45 54 22 29  return("STREET")
1eb0: 3b 0a 09 09 09 7d 0a 09 09 09 69 66 20 28 6d 65  ;....}....if (me
1ec0: 6d 63 6d 70 28 62 75 66 2c 20 22 5c 78 35 35 5c  mcmp(buf, "\x55\
1ed0: 78 30 34 5c 78 30 41 22 2c 20 33 29 20 3d 3d 20  x04\x0A", 3) == 
1ee0: 30 29 20 7b 0a 09 09 09 09 72 65 74 75 72 6e 28  0) {.....return(
1ef0: 22 4f 22 29 3b 0a 09 09 09 7d 0a 09 09 09 69 66  "O");....}....if
1f00: 20 28 6d 65 6d 63 6d 70 28 62 75 66 2c 20 22 5c   (memcmp(buf, "\
1f10: 78 35 35 5c 78 30 34 5c 78 30 42 22 2c 20 33 29  x55\x04\x0B", 3)
1f20: 20 3d 3d 20 30 29 20 7b 0a 09 09 09 09 72 65 74   == 0) {.....ret
1f30: 75 72 6e 28 22 4f 55 22 29 3b 0a 09 09 09 7d 0a  urn("OU");....}.
1f40: 09 09 09 62 72 65 61 6b 3b 0a 09 09 63 61 73 65  ...break;...case
1f50: 20 39 3a 0a 09 09 09 69 66 20 28 6d 65 6d 63 6d   9:....if (memcm
1f60: 70 28 62 75 66 2c 20 22 5c 78 32 41 5c 78 38 36  p(buf, "\x2A\x86
1f70: 5c 78 34 38 5c 78 38 36 5c 78 46 37 5c 78 30 44  \x48\x86\xF7\x0D
1f80: 5c 78 30 31 5c 78 30 39 5c 78 30 31 22 2c 20 39  \x01\x09\x01", 9
1f90: 29 20 3d 3d 20 30 29 20 7b 0a 09 09 09 09 72 65  ) == 0) {.....re
1fa0: 74 75 72 6e 28 22 45 6d 61 69 6c 41 64 64 72 65  turn("EmailAddre
1fb0: 73 73 22 29 3b 0a 09 09 09 7d 0a 09 09 09 62 72  ss");....}....br
1fc0: 65 61 6b 3b 0a 09 7d 0a 0a 09 72 65 74 75 72 6e  eak;..}...return
1fd0: 28 22 3f 3f 3f 22 29 3b 0a 7d 0a 0a 73 74 61 74  ("???");.}..stat
1fe0: 69 63 20 73 73 69 7a 65 5f 74 20 78 35 30 39 5f  ic ssize_t x509_
1ff0: 64 6e 5f 74 6f 5f 73 74 72 69 6e 67 28 76 6f 69  dn_to_string(voi
2000: 64 20 2a 61 73 6e 31 5f 64 65 72 5f 62 75 66 2c  d *asn1_der_buf,
2010: 20 73 69 7a 65 5f 74 20 61 73 6e 31 5f 64 65 72   size_t asn1_der
2020: 5f 62 75 66 5f 6c 65 6e 2c 20 63 68 61 72 20 2a  _buf_len, char *
2030: 6f 75 74 62 75 66 2c 20 73 69 7a 65 5f 74 20 6f  outbuf, size_t o
2040: 75 74 62 75 66 5f 6c 65 6e 2c 20 63 68 61 72 20  utbuf_len, char 
2050: 2a 6d 61 74 63 68 6c 61 62 65 6c 29 20 7b 0a 09  *matchlabel) {..
2060: 73 74 72 75 63 74 20 61 73 6e 31 5f 6f 62 6a 65  struct asn1_obje
2070: 63 74 20 77 68 6f 6c 65 5f 74 68 69 6e 67 2c 20  ct whole_thing, 
2080: 63 75 72 72 65 6e 74 5f 73 65 74 2c 20 63 75 72  current_set, cur
2090: 72 65 6e 74 5f 73 65 71 3b 0a 09 73 74 72 75 63  rent_seq;..struc
20a0: 74 20 61 73 6e 31 5f 6f 62 6a 65 63 74 20 6c 61  t asn1_object la
20b0: 62 65 6c 2c 20 76 61 6c 75 65 3b 0a 09 63 6f 6e  bel, value;..con
20c0: 73 74 20 63 68 61 72 20 2a 6c 61 62 65 6c 5f 73  st char *label_s
20d0: 74 72 3b 0a 09 73 73 69 7a 65 5f 74 20 73 6e 70  tr;..ssize_t snp
20e0: 72 69 6e 74 66 5f 72 65 74 2c 20 72 65 74 76 61  rintf_ret, retva
20f0: 6c 3b 0a 09 63 68 61 72 20 2a 6f 75 74 62 75 66  l;..char *outbuf
2100: 5f 73 3b 0a 09 69 6e 74 20 72 65 61 64 5f 72 65  _s;..int read_re
2110: 74 3b 0a 09 69 6e 74 20 6f 66 66 73 65 74 3b 0a  t;..int offset;.
2120: 0a 09 69 66 20 28 6f 75 74 62 75 66 20 3d 3d 20  ..if (outbuf == 
2130: 4e 55 4c 4c 29 20 7b 0a 09 09 72 65 74 75 72 6e  NULL) {...return
2140: 28 2d 31 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 6f  (-1);..}...if (o
2150: 75 74 62 75 66 5f 6c 65 6e 20 3d 3d 20 30 20 7c  utbuf_len == 0 |
2160: 7c 20 61 73 6e 31 5f 64 65 72 5f 62 75 66 5f 6c  | asn1_der_buf_l
2170: 65 6e 20 3d 3d 20 30 20 7c 7c 20 61 73 6e 31 5f  en == 0 || asn1_
2180: 64 65 72 5f 62 75 66 20 3d 3d 20 4e 55 4c 4c 29  der_buf == NULL)
2190: 20 7b 0a 09 09 72 65 74 75 72 6e 28 30 29 3b 0a   {...return(0);.
21a0: 09 7d 0a 0a 09 72 65 61 64 5f 72 65 74 20 3d 20  .}...read_ret = 
21b0: 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 61  asn1_x509_read_a
21c0: 73 6e 31 5f 6f 62 6a 65 63 74 28 61 73 6e 31 5f  sn1_object(asn1_
21d0: 64 65 72 5f 62 75 66 2c 20 61 73 6e 31 5f 64 65  der_buf, asn1_de
21e0: 72 5f 62 75 66 5f 6c 65 6e 2c 20 26 77 68 6f 6c  r_buf_len, &whol
21f0: 65 5f 74 68 69 6e 67 2c 20 4e 55 4c 4c 29 3b 0a  e_thing, NULL);.
2200: 09 69 66 20 28 72 65 61 64 5f 72 65 74 20 21 3d  .if (read_ret !=
2210: 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28 2d   0) {...return(-
2220: 31 29 3b 0a 09 7d 0a 0a 09 2f 2a 20 54 65 72 6d  1);..}.../* Term
2230: 69 6e 61 74 65 20 73 74 72 69 6e 67 2c 20 69 6e  inate string, in
2240: 20 63 61 73 65 20 6e 6f 20 76 61 6c 69 64 20 65   case no valid e
2250: 6c 65 6d 65 6e 74 73 20 61 72 65 20 66 6f 75 6e  lements are foun
2260: 64 20 77 65 20 73 74 69 6c 6c 20 72 65 74 75 72  d we still retur
2270: 6e 20 61 20 76 61 6c 69 64 20 73 74 72 69 6e 67  n a valid string
2280: 20 2a 2f 0a 09 2a 6f 75 74 62 75 66 20 3d 20 27   */..*outbuf = '
2290: 5c 30 27 3b 0a 09 6f 75 74 62 75 66 5f 73 20 3d  \0';..outbuf_s =
22a0: 20 6f 75 74 62 75 66 3b 0a 0a 09 6f 66 66 73 65   outbuf;...offse
22b0: 74 20 3d 20 30 3b 0a 09 77 68 69 6c 65 20 28 31  t = 0;..while (1
22c0: 29 20 7b 0a 09 09 72 65 61 64 5f 72 65 74 20 3d  ) {...read_ret =
22d0: 20 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f   asn1_x509_read_
22e0: 61 73 6e 31 5f 6f 62 6a 65 63 74 28 28 28 75 6e  asn1_object(((un
22f0: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 29 20 77  signed char *) w
2300: 68 6f 6c 65 5f 74 68 69 6e 67 2e 63 6f 6e 74 65  hole_thing.conte
2310: 6e 74 73 29 20 2b 20 6f 66 66 73 65 74 2c 20 77  nts) + offset, w
2320: 68 6f 6c 65 5f 74 68 69 6e 67 2e 73 69 7a 65 20  hole_thing.size 
2330: 2d 20 6f 66 66 73 65 74 2c 20 26 63 75 72 72 65  - offset, &curre
2340: 6e 74 5f 73 65 74 2c 20 4e 55 4c 4c 29 3b 0a 09  nt_set, NULL);..
2350: 09 69 66 20 28 72 65 61 64 5f 72 65 74 20 21 3d  .if (read_ret !=
2360: 20 30 29 20 7b 0a 09 09 09 62 72 65 61 6b 3b 0a   0) {....break;.
2370: 09 09 7d 0a 0a 09 09 6f 66 66 73 65 74 20 2b 3d  ..}....offset +=
2380: 20 63 75 72 72 65 6e 74 5f 73 65 74 2e 73 69 7a   current_set.siz
2390: 65 20 2b 20 32 3b 0a 0a 09 09 72 65 61 64 5f 72  e + 2;....read_r
23a0: 65 74 20 3d 20 61 73 6e 31 5f 78 35 30 39 5f 72  et = asn1_x509_r
23b0: 65 61 64 5f 61 73 6e 31 5f 6f 62 6a 65 63 74 28  ead_asn1_object(
23c0: 63 75 72 72 65 6e 74 5f 73 65 74 2e 63 6f 6e 74  current_set.cont
23d0: 65 6e 74 73 2c 20 63 75 72 72 65 6e 74 5f 73 65  ents, current_se
23e0: 74 2e 73 69 7a 65 2c 20 26 63 75 72 72 65 6e 74  t.size, &current
23f0: 5f 73 65 71 2c 20 4e 55 4c 4c 29 3b 0a 09 09 69  _seq, NULL);...i
2400: 66 20 28 72 65 61 64 5f 72 65 74 20 21 3d 20 30  f (read_ret != 0
2410: 29 20 7b 0a 09 09 09 62 72 65 61 6b 3b 0a 09 09  ) {....break;...
2420: 7d 0a 0a 09 09 72 65 61 64 5f 72 65 74 20 3d 20  }....read_ret = 
2430: 61 73 6e 31 5f 78 35 30 39 5f 72 65 61 64 5f 61  asn1_x509_read_a
2440: 73 6e 31 5f 6f 62 6a 65 63 74 28 63 75 72 72 65  sn1_object(curre
2450: 6e 74 5f 73 65 71 2e 63 6f 6e 74 65 6e 74 73 2c  nt_seq.contents,
2460: 20 63 75 72 72 65 6e 74 5f 73 65 71 2e 73 69 7a   current_seq.siz
2470: 65 2c 20 26 6c 61 62 65 6c 2c 20 26 76 61 6c 75  e, &label, &valu
2480: 65 2c 20 4e 55 4c 4c 29 3b 0a 0a 09 09 6c 61 62  e, NULL);....lab
2490: 65 6c 5f 73 74 72 20 3d 20 5f 78 35 30 39 5f 6f  el_str = _x509_o
24a0: 62 6a 65 63 74 69 64 5f 74 6f 5f 6c 61 62 65 6c  bjectid_to_label
24b0: 5f 73 74 72 69 6e 67 28 6c 61 62 65 6c 2e 63 6f  _string(label.co
24c0: 6e 74 65 6e 74 73 2c 20 6c 61 62 65 6c 2e 73 69  ntents, label.si
24d0: 7a 65 29 3b 0a 0a 09 09 2f 2a 20 49 66 20 74 68  ze);..../* If th
24e0: 65 20 75 73 65 72 20 72 65 71 75 65 73 74 65 64  e user requested
24f0: 20 6f 6e 6c 79 20 63 65 72 74 61 69 6e 20 6c 61   only certain la
2500: 62 65 6c 73 2c 20 65 78 63 6c 75 64 65 20 6f 74  bels, exclude ot
2510: 68 65 72 73 20 2a 2f 0a 09 09 69 66 20 28 6d 61  hers */...if (ma
2520: 74 63 68 6c 61 62 65 6c 29 20 7b 0a 09 09 09 69  tchlabel) {....i
2530: 66 20 28 73 74 72 63 6d 70 28 6d 61 74 63 68 6c  f (strcmp(matchl
2540: 61 62 65 6c 2c 20 6c 61 62 65 6c 5f 73 74 72 29  abel, label_str)
2550: 20 21 3d 20 30 29 20 7b 0a 09 09 09 09 63 6f 6e   != 0) {.....con
2560: 74 69 6e 75 65 3b 0a 09 09 09 7d 0a 09 09 7d 0a  tinue;....}...}.
2570: 0a 09 09 2f 2a 20 49 66 20 74 68 65 20 75 73 65  .../* If the use
2580: 72 20 72 65 71 75 65 73 74 65 64 20 6f 6e 6c 79  r requested only
2590: 20 63 65 72 74 61 69 6e 20 6c 61 62 65 6c 73 2c   certain labels,
25a0: 20 64 6f 6e 27 74 20 69 6e 63 6c 75 64 65 20 74   don't include t
25b0: 68 65 6d 20 69 6e 20 74 68 65 20 72 65 70 6c 79  hem in the reply
25c0: 20 2a 2f 0a 09 09 69 66 20 28 6d 61 74 63 68 6c   */...if (matchl
25d0: 61 62 65 6c 29 20 7b 0a 09 09 09 73 6e 70 72 69  abel) {....snpri
25e0: 6e 74 66 5f 72 65 74 20 3d 20 73 6e 70 72 69 6e  ntf_ret = snprin
25f0: 74 66 28 6f 75 74 62 75 66 2c 20 6f 75 74 62 75  tf(outbuf, outbu
2600: 66 5f 6c 65 6e 2c 20 22 25 2e 2a 73 2c 20 22 2c  f_len, "%.*s, ",
2610: 20 28 75 6e 73 69 67 6e 65 64 20 69 6e 74 29 20   (unsigned int) 
2620: 76 61 6c 75 65 2e 73 69 7a 65 2c 20 28 63 68 61  value.size, (cha
2630: 72 20 2a 29 20 76 61 6c 75 65 2e 63 6f 6e 74 65  r *) value.conte
2640: 6e 74 73 29 3b 0a 09 09 7d 20 65 6c 73 65 20 7b  nts);...} else {
2650: 0a 09 09 09 73 6e 70 72 69 6e 74 66 5f 72 65 74  ....snprintf_ret
2660: 20 3d 20 73 6e 70 72 69 6e 74 66 28 6f 75 74 62   = snprintf(outb
2670: 75 66 2c 20 6f 75 74 62 75 66 5f 6c 65 6e 2c 20  uf, outbuf_len, 
2680: 22 25 73 3d 25 2e 2a 73 2c 20 22 2c 20 6c 61 62  "%s=%.*s, ", lab
2690: 65 6c 5f 73 74 72 2c 20 28 75 6e 73 69 67 6e 65  el_str, (unsigne
26a0: 64 20 69 6e 74 29 20 76 61 6c 75 65 2e 73 69 7a  d int) value.siz
26b0: 65 2c 20 28 63 68 61 72 20 2a 29 20 76 61 6c 75  e, (char *) valu
26c0: 65 2e 63 6f 6e 74 65 6e 74 73 29 3b 0a 09 09 7d  e.contents);...}
26d0: 0a 09 09 69 66 20 28 73 6e 70 72 69 6e 74 66 5f  ...if (snprintf_
26e0: 72 65 74 20 3c 20 30 29 20 7b 0a 09 09 09 62 72  ret < 0) {....br
26f0: 65 61 6b 3b 0a 09 09 7d 0a 0a 09 09 69 66 20 28  eak;...}....if (
2700: 73 6e 70 72 69 6e 74 66 5f 72 65 74 20 3e 20 6f  snprintf_ret > o
2710: 75 74 62 75 66 5f 6c 65 6e 29 20 7b 0a 09 09 09  utbuf_len) {....
2720: 73 6e 70 72 69 6e 74 66 5f 72 65 74 20 3d 20 6f  snprintf_ret = o
2730: 75 74 62 75 66 5f 6c 65 6e 3b 0a 09 09 7d 0a 0a  utbuf_len;...}..
2740: 09 09 6f 75 74 62 75 66 20 2b 3d 20 73 6e 70 72  ..outbuf += snpr
2750: 69 6e 74 66 5f 72 65 74 3b 0a 09 09 6f 75 74 62  intf_ret;...outb
2760: 75 66 5f 6c 65 6e 20 2d 3d 20 73 6e 70 72 69 6e  uf_len -= snprin
2770: 74 66 5f 72 65 74 3b 0a 0a 09 09 69 66 20 28 6f  tf_ret;....if (o
2780: 75 74 62 75 66 5f 6c 65 6e 20 3c 20 32 29 20 7b  utbuf_len < 2) {
2790: 0a 09 09 09 62 72 65 61 6b 3b 0a 09 09 7d 0a 09  ....break;...}..
27a0: 7d 0a 0a 09 72 65 74 76 61 6c 20 3d 20 6f 75 74  }...retval = out
27b0: 62 75 66 20 2d 20 6f 75 74 62 75 66 5f 73 3b 0a  buf - outbuf_s;.
27c0: 0a 09 2f 2a 20 52 65 6d 6f 76 65 20 74 72 61 69  ../* Remove trai
27d0: 6c 69 6e 67 20 22 2c 20 22 20 61 64 64 65 64 20  ling ", " added 
27e0: 62 79 20 63 75 6d 75 6c 61 74 69 76 65 20 70 72  by cumulative pr
27f0: 6f 63 65 73 73 2c 20 69 66 20 66 6f 75 6e 64 2e  ocess, if found.
2800: 20 2a 2f 0a 09 69 66 20 28 72 65 74 76 61 6c 20   */..if (retval 
2810: 3e 20 32 29 20 7b 0a 09 09 69 66 20 28 6f 75 74  > 2) {...if (out
2820: 62 75 66 5f 73 5b 72 65 74 76 61 6c 20 2d 20 32  buf_s[retval - 2
2830: 5d 20 3d 3d 20 27 2c 27 29 20 7b 0a 09 09 09 6f  ] == ',') {....o
2840: 75 74 62 75 66 5f 73 5b 72 65 74 76 61 6c 20 2d  utbuf_s[retval -
2850: 20 32 5d 20 3d 20 27 5c 30 27 3b 0a 09 09 09 72   2] = '\0';....r
2860: 65 74 76 61 6c 20 2d 3d 20 32 3b 0a 09 09 7d 0a  etval -= 2;...}.
2870: 09 7d 0a 0a 09 72 65 74 75 72 6e 28 72 65 74 76  .}...return(retv
2880: 61 6c 29 3b 0a 7d 0a                             al);.}.