tests/ocsp.c

   1 /*
   2  * Copyright (C) 2011-2012 Free Software Foundation, Inc.
   3  *
   4  * Author: Simon Josefsson
   5  *
   6  * This file is part of GnuTLS.
   7  *
   8  * GnuTLS is free software; you can redistribute it and/or modify it
   9  * under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 3 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * GnuTLS is distributed in the hope that it will be useful, but
  14  * WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with GnuTLS; if not, write to the Free Software Foundation,
  20  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
  21  */
  22
  23 #ifdef HAVE_CONFIG_H
  24 #include <config.h>
  25 #endif
  26
  27 #include <stdlib.h>
  28 #include <stdio.h>
  29 #include <string.h>
  30 #include <gnutls/gnutls.h>
  31 #include <gnutls/ocsp.h>
  32 #include <gnutls/x509.h>
  33
  34 #include "utils.h"
  35
  36 /* sample request */
  37
  38 static void
  39 tls_log_func (int level, const char *str)
  40 {
  41   fprintf (stderr, "|<%d>| %s", level, str);
  42 }
  43
  44 #define REQ1 "\x30\x67\x30\x65\x30\x3e\x30\x3c\x30\x3a\x30\x09\x06\x05\x2b\x0e\x03\x02\x1a\x05\x00\x04\x14\x13\x9d\xa0\x9e\xf4\x32\xab\x8f\xe2\x89\x56\x67\xfa\xd0\xd4\xe3\x35\x86\x71\xb9\x04\x14\x5d\xa7\xdd\x70\x06\x51\x32\x7e\xe7\xb6\x6d\xb3\xb5\xe5\xe0\x60\xea\x2e\x4d\xef\x02\x01\x1d\xa2\x23\x30\x21\x30\x1f\x06\x09\x2b\x06\x01\x05\x05\x07\x30\x01\x02\x04\x12\x04\x10\x35\xc5\xe3\x50\xc3\xcf\x04\x33\xcc\x9e\x06\x3a\x9a\x18\x80\xcc"
  45
  46 static const gnutls_datum_t req1 =
  47   { (unsigned char *) REQ1, sizeof (REQ1) - 1 };
  48
  49 #define REQ1INFO                                                        \
  50   "OCSP Request Information:\n"                                         \
  51   "     Version: 1\n"                                                   \
  52   "     Request List:\n"                                                \
  53   "             Certificate ID:\n"                                      \
  54   "                     Hash Algorithm: SHA1\n"                         \
  55   "                     Issuer Name Hash: 139da09ef432ab8fe2895667fad0d4e3358671b9\n" \
  56   "                     Issuer Key Hash: 5da7dd700651327ee7b66db3b5e5e060ea2e4def\n" \
  57   "                     Serial Number: 1d\n"                            \
  58   "     Extensions:\n"                                                  \
  59   "             Nonce: 35c5e350c3cf0433cc9e063a9a1880cc\n"
  60
  61 #define REQ1NONCE "\x04\x10\x35\xc5\xe3\x50\xc3\xcf\x04\x33\xcc\x9e\x06\x3a\x9a\x18\x80\xcc"
  62
  63 #define REQ1INH "\x13\x9d\xa0\x9e\xf4\x32\xab\x8f\xe2\x89\x56\x67\xfa\xd0\xd4\xe3\x35\x86\x71\xb9"
  64 #define REQ1IKH "\x5d\xa7\xdd\x70\x06\x51\x32\x7e\xe7\xb6\x6d\xb3\xb5\xe5\xe0\x60\xea\x2e\x4d\xef"
  65 #define REQ1SN "\x1d"
  66
  67 /* sample response */
  68
  69 #define RESP1 "\x30\x03\x0a\x01\x01"
  70
  71 static const gnutls_datum_t resp1 =
  72   { (unsigned char*) RESP1, sizeof (RESP1) - 1 };
  73
  74 #define RESP1INFO                                                       \
  75   "OCSP Response Information:\n"                                        \
  76   "     Response Status: malformedRequest\n"
  77
  78 #define RESP2 "\x30\x82\x06\x8C\x0A\x01\x00\xA0\x82\x06\x85\x30\x82\x06\x81\x06\x09\x2B\x06\x01\x05\x05\x07\x30\x01\x01\x04\x82\x06\x72\x30\x82\x06\x6E\x30\x82\x01\x07\xA1\x69\x30\x67\x31\x0B\x30\x09\x06\x03\x55\x04\x06\x13\x02\x43\x48\x31\x19\x30\x17\x06\x03\x55\x04\x0A\x13\x10\x4C\x69\x6E\x75\x78\x20\x73\x74\x72\x6F\x6E\x67\x53\x77\x61\x6E\x31\x1F\x30\x1D\x06\x03\x55\x04\x0B\x13\x16\x4F\x43\x53\x50\x20\x53\x69\x67\x6E\x69\x6E\x67\x20\x41\x75\x74\x68\x6F\x72\x69\x74\x79\x31\x1C\x30\x1A\x06\x03\x55\x04\x03\x13\x13\x6F\x63\x73\x70\x2E\x73\x74\x72\x6F\x6E\x67\x73\x77\x61\x6E\x2E\x6F\x72\x67\x18\x0F\x32\x30\x31\x31\x30\x39\x32\x37\x30\x39\x35\x34\x32\x38\x5A\x30\x64\x30\x62\x30\x3A\x30\x09\x06\x05\x2B\x0E\x03\x02\x1A\x05\x00\x04\x14\x13\x9D\xA0\x9E\xF4\x32\xAB\x8F\xE2\x89\x56\x67\xFA\xD0\xD4\xE3\x35\x86\x71\xB9\x04\x14\x5D\xA7\xDD\x70\x06\x51\x32\x7E\xE7\xB6\x6D\xB3\xB5\xE5\xE0\x60\xEA\x2E\x4D\xEF\x02\x01\x1D\x80\x00\x18\x0F\x32\x30\x31\x31\x30\x39\x32\x37\x30\x39\x35\x34\x32\x38\x5A\xA0\x11\x18\x0F\x32\x30\x31\x31\x30\x39\x32\x37\x30\x39\x35\x39\x32\x38\x5A\xA1\x23\x30\x21\x30\x1F\x06\x09\x2B\x06\x01\x05\x05\x07\x30\x01\x02\x04\x12\x04\x10\x16\x89\x7D\x91\x3A\xB5\x25\xA4\x45\xFE\xC9\xFD\xC2\xE5\x08\xA4\x30\x0D\x06\x09\x2A\x86\x48\x86\xF7\x0D\x01\x01\x05\x05\x00\x03\x82\x01\x01\x00\x4E\xAD\x6B\x2B\xF7\xF2\xBF\xA9\x23\x1E\x3A\x0B\x06\xDB\x55\x53\x2B\x64\x54\x11\x32\xBF\x60\xF7\x4F\xE0\x8E\x9B\xA0\xA2\x4C\x79\xC3\x2A\xE0\x43\xF7\x40\x1A\xDC\xB9\xB4\x25\xEF\x48\x01\x97\x8C\xF5\x1E\xDB\xD1\x30\x37\x73\x69\xD6\xA7\x7A\x2D\x8E\xDE\x5C\xAA\xEA\x39\xB9\x52\xAA\x25\x1E\x74\x7D\xF9\x78\x95\x8A\x92\x1F\x98\x21\xF4\x60\x7F\xD3\x28\xEE\x47\x9C\xBF\xE2\x5D\xF6\x3F\x68\x0A\xD6\xFF\x08\xC1\xDC\x95\x1E\x29\xD7\x3E\x85\xD5\x65\xA4\x4B\xC0\xAF\xC3\x78\xAB\x06\x98\x88\x19\x8A\x64\xA6\x83\x91\x87\x13\xDB\x17\xCC\x46\xBD\xAB\x4E\xC7\x16\xD1\xF8\x35\xFD\x27\xC8\xF6\x6B\xEB\x37\xB8\x08\x6F\xE2\x6F\xB4\x7E\xD5\x68\xDB\x7F\x5D\x5E\x36\x38\xF2\x77\x59\x13\xE7\x3E\x4D\x67\x5F\xDB\xA2\xF5\x5D\x7C\xBF\xBD\xB5\x37\x33\x51\x36\x63\xF8\x21\x1E\xFC\x73\x8F\x32\x69\xBB\x97\xA7\xBD\xF1\xB6\xE0\x40\x09\x68\xEA\xD5\x93\xB8\xBB\x39\x8D\xA8\x16\x1B\xBF\x04\x7A\xBC\x18\x43\x01\xE9\x3C\x19\x5C\x4D\x4B\x98\xD8\x23\x37\x39\xA4\xC4\xDD\xED\x9C\xEC\x37\xAB\x66\x44\x9B\xE7\x5B\x5D\x32\xA2\xDB\xA6\x0B\x3B\x8C\xE1\xF5\xDB\xCB\x7D\x58\xA0\x82\x04\x4B\x30\x82\x04\x47\x30\x82\x04\x43\x30\x82\x03\x2B\xA0\x03\x02\x01\x02\x02\x01\x1E\x30\x0D\x06\x09\x2A\x86\x48\x86\xF7\x0D\x01\x01\x0B\x05\x00\x30\x45\x31\x0B\x30\x09\x06\x03\x55\x04\x06\x13\x02\x43\x48\x31\x19\x30\x17\x06\x03\x55\x04\x0A\x13\x10\x4C\x69\x6E\x75\x78\x20\x73\x74\x72\x6F\x6E\x67\x53\x77\x61\x6E\x31\x1B\x30\x19\x06\x03\x55\x04\x03\x13\x12\x73\x74\x72\x6F\x6E\x67\x53\x77\x61\x6E\x20\x52\x6F\x6F\x74\x20\x43\x41\x30\x1E\x17\x0D\x30\x39\x31\x31\x32\x34\x31\x32\x35\x31\x35\x33\x5A\x17\x0D\x31\x34\x31\x31\x32\x33\x31\x32\x35\x31\x35\x33\x5A\x30\x67\x31\x0B\x30\x09\x06\x03\x55\x04\x06\x13\x02\x43\x48\x31\x19\x30\x17\x06\x03\x55\x04\x0A\x13\x10\x4C\x69\x6E\x75\x78\x20\x73\x74\x72\x6F\x6E\x67\x53\x77\x61\x6E\x31\x1F\x30\x1D\x06\x03\x55\x04\x0B\x13\x16\x4F\x43\x53\x50\x20\x53\x69\x67\x6E\x69\x6E\x67\x20\x41\x75\x74\x68\x6F\x72\x69\x74\x79\x31\x1C\x30\x1A\x06\x03\x55\x04\x03\x13\x13\x6F\x63\x73\x70\x2E\x73\x74\x72\x6F\x6E\x67\x73\x77\x61\x6E\x2E\x6F\x72\x67\x30\x82\x01\x22\x30\x0D\x06\x09\x2A\x86\x48\x86\xF7\x0D\x01\x01\x01\x05\x00\x03\x82\x01\x0F\x00\x30\x82\x01\x0A\x02\x82\x01\x01\x00\xBC\x05\x3E\x4B\xBE\xC6\xB1\x33\x48\x0E\xC3\xD4\x0C\xEF\x83\x0B\xBD\xBC\x57\x5F\x14\xEF\xF5\x6D\x0B\xFF\xFA\x01\x9C\xFA\x21\x6D\x5C\xAE\x79\x29\x74\xFE\xBD\xAB\x70\x87\x98\x6B\x48\x35\x79\xE3\xE0\xC1\x14\x41\x1F\x0A\xF7\xE7\xA3\xA6\xDA\x6B\xFF\xCD\x74\xE9\x95\x00\x38\xAA\xD6\x3A\x60\xC6\x64\xA1\xE6\x02\x39\x58\x4E\xFD\xF2\x78\x08\x63\xB6\xD7\x7A\x96\x79\x62\x18\x39\xEE\x27\x8D\x3B\xA2\x3D\x48\x88\xDB\x43\xD6\x6A\x77\x20\x6A\x27\x39\x50\xE0\x02\x50\x19\xF2\x7A\xCF\x78\x23\x99\x01\xD4\xE5\xB1\xD1\x31\xE6\x6B\x84\xAF\xD0\x77\x41\x46\x85\xB0\x3B\xE6\x6A\x00\x0F\x3B\x7E\x95\x7F\x59\xA8\x22\xE8\x49\x49\x05\xC8\xCB\x6C\xEE\x47\xA7\x2D\xC9\x74\x5B\xEB\x8C\xD5\x99\xC2\xE2\x70\xDB\xEA\x87\x43\x84\x0E\x4F\x83\x1C\xA6\xEB\x1F\x22\x38\x17\x69\x9B\x72\x12\x95\x48\x71\xB2\x7B\x92\x73\x52\xAB\xE3\x1A\xA5\xD3\xF4\x44\x14\xBA\xC3\x35\xDA\x91\x6C\x7D\xB4\xC2\x00\x07\xD8\x0A\x51\xF1\x0D\x4C\xD9\x7A\xD1\x99\xE6\xA8\x8D\x0A\x80\xA8\x91\xDD\x8A\xA2\x6B\xF6\xDB\xB0\x3E\xC9\x71\xA9\xE0\x39\xC3\xA3\x58\x0D\x87\xD0\xB2\xA7\x9C\xB7\x69\x02\x03\x01\x00\x01\xA3\x82\x01\x1A\x30\x82\x01\x16\x30\x09\x06\x03\x55\x1D\x13\x04\x02\x30\x00\x30\x0B\x06\x03\x55\x1D\x0F\x04\x04\x03\x02\x03\xA8\x30\x1D\x06\x03\x55\x1D\x0E\x04\x16\x04\x14\x34\x91\x6E\x91\x32\xBF\x35\x25\x43\xCC\x28\x74\xEF\x82\xC2\x57\x92\x79\x13\x73\x30\x6D\x06\x03\x55\x1D\x23\x04\x66\x30\x64\x80\x14\x5D\xA7\xDD\x70\x06\x51\x32\x7E\xE7\xB6\x6D\xB3\xB5\xE5\xE0\x60\xEA\x2E\x4D\xEF\xA1\x49\xA4\x47\x30\x45\x31\x0B\x30\x09\x06\x03\x55\x04\x06\x13\x02\x43\x48\x31\x19\x30\x17\x06\x03\x55\x04\x0A\x13\x10\x4C\x69\x6E\x75\x78\x20\x73\x74\x72\x6F\x6E\x67\x53\x77\x61\x6E\x31\x1B\x30\x19\x06\x03\x55\x04\x03\x13\x12\x73\x74\x72\x6F\x6E\x67\x53\x77\x61\x6E\x20\x52\x6F\x6F\x74\x20\x43\x41\x82\x01\x00\x30\x1E\x06\x03\x55\x1D\x11\x04\x17\x30\x15\x82\x13\x6F\x63\x73\x70\x2E\x73\x74\x72\x6F\x6E\x67\x73\x77\x61\x6E\x2E\x6F\x72\x67\x30\x13\x06\x03\x55\x1D\x25\x04\x0C\x30\x0A\x06\x08\x2B\x06\x01\x05\x05\x07\x03\x09\x30\x39\x06\x03\x55\x1D\x1F\x04\x32\x30\x30\x30\x2E\xA0\x2C\xA0\x2A\x86\x28\x68\x74\x74\x70\x3A\x2F\x2F\x63\x72\x6C\x2E\x73\x74\x72\x6F\x6E\x67\x73\x77\x61\x6E\x2E\x6F\x72\x67\x2F\x73\x74\x72\x6F\x6E\x67\x73\x77\x61\x6E\x2E\x63\x72\x6C\x30\x0D\x06\x09\x2A\x86\x48\x86\xF7\x0D\x01\x01\x0B\x05\x00\x03\x82\x01\x01\x00\x6D\x78\xD7\x66\x90\xA6\xEB\xDD\xB5\x09\x48\xA4\xDA\x27\xFA\xAC\xB1\xBC\x8F\x8C\xBE\xCC\x8C\x09\xA2\x40\x0D\x6C\x4A\xAE\x72\x22\x1E\xC8\xAF\x6D\xF1\x12\xAF\xD7\x40\x51\x79\xD4\xDD\xB2\x0C\xDB\x97\x84\xB6\x24\xD5\xF5\xA8\xBB\xC0\x4B\xF9\x7F\x71\xF7\xB0\x65\x42\x4A\x7D\xFE\x76\x7E\x05\xD2\x46\xB8\x7D\xB3\x39\x4C\x5C\xB1\xFA\xB9\xEE\x3B\x70\x33\x39\x57\x1A\xB9\x95\x51\x33\x00\x25\x1B\x4C\xAA\xB4\xA7\x55\xAF\x63\x6D\x6F\x88\x17\x6A\x7F\xB0\x97\xDE\x49\x14\x6A\x27\x6A\xB0\x42\x80\xD6\xA6\x9B\xEF\x04\x5E\x11\x7D\xD5\x8E\x54\x20\xA2\x76\xD4\x66\x58\xAC\x9C\x12\xD3\xF5\xCA\x54\x98\xCA\x21\xEC\xC1\x55\xA1\x2F\x68\x0B\x5D\x04\x50\xD2\x5E\x70\x25\xD8\x13\xD9\x44\x51\x0E\x8A\x42\x08\x18\x84\xE6\x61\xCE\x5A\x7D\x7B\x81\x35\x90\xC3\xD4\x9D\x19\xB6\x37\xEE\x8F\x63\x5C\xDA\xD8\xF0\x64\x60\x39\xEB\x9B\x1C\x54\x66\x75\x76\xB5\x0A\x58\xB9\x3F\x91\xE1\x21\x9C\xA0\x50\x15\x97\xB6\x7E\x41\xBC\xD0\xC4\x21\x4C\xF5\xD7\xF0\x13\xF8\x77\xE9\x74\xC4\x8A\x0E\x20\x17\x32\xAE\x38\xC2\xA5\xA8\x62\x85\x17\xB1\xA2\xD3\x22\x9F\x95\xB7\xA3\x4C"
  79
  80 #define RESP2INFO                               \
  81   "OCSP Response Information:\n"                \
  82   "     Response Status: Successful\n"          \
  83   "     Response Type: Basic OCSP Response\n"   \
  84   "     Version: 1\n" \
  85   "     Responder ID: C=CH,O=Linux strongSwan,OU=OCSP Signing Authority,CN=ocsp.strongswan.org\n" \
  86   "     Produced At: Tue Sep 27 09:54:28 UTC 2011\n" \
  87   "     Responses:\n" \
  88   "             Certificate ID:\n" \
  89   "                     Hash Algorithm: SHA1\n" \
  90   "                     Issuer Name Hash: 139da09ef432ab8fe2895667fad0d4e3358671b9\n" \
  91   "                     Issuer Key Hash: 5da7dd700651327ee7b66db3b5e5e060ea2e4def\n" \
  92   "                     Serial Number: 1d\n" \
  93   "             Certificate Status: good\n" \
  94   "             This Update: Tue Sep 27 09:54:28 UTC 2011\n" \
  95   "             Next Update: Tue Sep 27 09:59:28 UTC 2011\n" \
  96   "     Extensions:\n" \
  97   "             Nonce: 16897d913ab525a445fec9fdc2e508a4\n" \
  98   "     Signature Algorithm: RSA-SHA1\n" \
  99   "     Signature:\n" \
 100   "             4e:ad:6b:2b:f7:f2:bf:a9:23:1e:3a:0b:06:db:55:53\n" \
 101   "             2b:64:54:11:32:bf:60:f7:4f:e0:8e:9b:a0:a2:4c:79\n" \
 102   "             c3:2a:e0:43:f7:40:1a:dc:b9:b4:25:ef:48:01:97:8c\n" \
 103   "             f5:1e:db:d1:30:37:73:69:d6:a7:7a:2d:8e:de:5c:aa\n" \
 104   "             ea:39:b9:52:aa:25:1e:74:7d:f9:78:95:8a:92:1f:98\n" \
 105   "             21:f4:60:7f:d3:28:ee:47:9c:bf:e2:5d:f6:3f:68:0a\n" \
 106   "             d6:ff:08:c1:dc:95:1e:29:d7:3e:85:d5:65:a4:4b:c0\n" \
 107   "             af:c3:78:ab:06:98:88:19:8a:64:a6:83:91:87:13:db\n" \
 108   "             17:cc:46:bd:ab:4e:c7:16:d1:f8:35:fd:27:c8:f6:6b\n" \
 109   "             eb:37:b8:08:6f:e2:6f:b4:7e:d5:68:db:7f:5d:5e:36\n" \
 110   "             38:f2:77:59:13:e7:3e:4d:67:5f:db:a2:f5:5d:7c:bf\n" \
 111   "             bd:b5:37:33:51:36:63:f8:21:1e:fc:73:8f:32:69:bb\n" \
 112   "             97:a7:bd:f1:b6:e0:40:09:68:ea:d5:93:b8:bb:39:8d\n" \
 113   "             a8:16:1b:bf:04:7a:bc:18:43:01:e9:3c:19:5c:4d:4b\n" \
 114   "             98:d8:23:37:39:a4:c4:dd:ed:9c:ec:37:ab:66:44:9b\n" \
 115   "             e7:5b:5d:32:a2:db:a6:0b:3b:8c:e1:f5:db:cb:7d:58\n"
 116   /* cut */
 117
 118 static const gnutls_datum_t resp2 =
 119   { (unsigned char*) RESP2, sizeof (RESP2) - 1 };
 120
 121 static unsigned char issuer_pem[] =
 122   "-----BEGIN CERTIFICATE-----\n"
 123   "MIIDuDCCAqCgAwIBAgIBADANBgkqhkiG9w0BAQsFADBFMQswCQYDVQQGEwJDSDEZ\n"
 124   "MBcGA1UEChMQTGludXggc3Ryb25nU3dhbjEbMBkGA1UEAxMSc3Ryb25nU3dhbiBS\n"
 125   "b290IENBMB4XDTA0MDkxMDEwMDExOFoXDTE5MDkwNzEwMDExOFowRTELMAkGA1UE\n"
 126   "BhMCQ0gxGTAXBgNVBAoTEExpbnV4IHN0cm9uZ1N3YW4xGzAZBgNVBAMTEnN0cm9u\n"
 127   "Z1N3YW4gUm9vdCBDQTCCASIwDQYJKoZIhvcNAQEBBQADggEPADCCAQoCggEBAL/y\n"
 128   "X2LqPVZuWLPIeknK86xhz6ljd3NNhC2z+P1uoCP3sBMuZiZQEjFzhnKcbXxCeo2f\n"
 129   "FnvhOOjrrisSuVkzuu82oxXD3fIkzuS7m9V4E10EZzgmKWIf+WuNRfbgAuUINmLc\n"
 130   "4YGAXBQLPyzpP4Ou48hhz/YQo58Bics6PHy5v34qCVROIXDvqhj91P8g+pS+F21/\n"
 131   "7P+CH2jRcVIEHZtG8M/PweTPQ95dPzpYd2Ov6SZ/U7EWmbMmT8VcUYn1aChxFmy5\n"
 132   "gweVBWlkH6MP+1DeE0/tL5c87xo5KCeGK8Tdqpe7sBRC4pPEEHDQciTUvkeuJ1Pr\n"
 133   "K+1LwdqRxo7HgMRiDw8CAwEAAaOBsjCBrzASBgNVHRMBAf8ECDAGAQH/AgEBMAsG\n"
 134   "A1UdDwQEAwIBBjAdBgNVHQ4EFgQUXafdcAZRMn7ntm2zteXgYOouTe8wbQYDVR0j\n"
 135   "BGYwZIAUXafdcAZRMn7ntm2zteXgYOouTe+hSaRHMEUxCzAJBgNVBAYTAkNIMRkw\n"
 136   "FwYDVQQKExBMaW51eCBzdHJvbmdTd2FuMRswGQYDVQQDExJzdHJvbmdTd2FuIFJv\n"
 137   "b3QgQ0GCAQAwDQYJKoZIhvcNAQELBQADggEBACOSmqEBtBLR9aV3UyCI8gmzR5in\n"
 138   "Lte9aUXXS+qis6F2h2Stf4sN+Nl6Gj7REC6SpfEH4wWdwiUL5J0CJhyoOjQuDl3n\n"
 139   "1Dw3dE4/zqMZdyDKEYTU75TmvusNJBdGsLkrf7EATAjoi/nrTOYPPhSUZvPp/D+Y\n"
 140   "vORJ9Ej51GXlK1nwEB5iA8+tDYniNQn6BD1MEgIejzK+fbiy7braZB1kqhoEr2Si\n"
 141   "7luBSnU912sw494E88a2EWbmMvg2TVHPNzCpVkpNk7kifCiwmw9VldkqYy9y/lCa\n"
 142   "Epyp7lTfKw7cbD04Vk8QJW782L6Csuxkl346b17wmOqn8AZips3tFsuAY3w=\n"
 143   "-----END CERTIFICATE-----\n";
 144 const gnutls_datum_t issuer_data = { issuer_pem, sizeof (issuer_pem) };
 145
 146 static unsigned char subject_pem[] =
 147   "-----BEGIN CERTIFICATE-----\n"
 148   "MIIEIjCCAwqgAwIBAgIBHTANBgkqhkiG9w0BAQsFADBFMQswCQYDVQQGEwJDSDEZ\n"
 149   "MBcGA1UEChMQTGludXggc3Ryb25nU3dhbjEbMBkGA1UEAxMSc3Ryb25nU3dhbiBS\n"
 150   "b290IENBMB4XDTA5MDgyNzEwNDQ1MVoXDTE0MDgyNjEwNDQ1MVowWjELMAkGA1UE\n"
 151   "BhMCQ0gxGTAXBgNVBAoTEExpbnV4IHN0cm9uZ1N3YW4xETAPBgNVBAsTCFJlc2Vh\n"
 152   "cmNoMR0wGwYDVQQDFBRjYXJvbEBzdHJvbmdzd2FuLm9yZzCCASIwDQYJKoZIhvcN\n"
 153   "AQEBBQADggEPADCCAQoCggEBANBdWU+BF7x4lyo+xHnr4UAOU89yQQuT5vdPoXzx\n"
 154   "6kRPsjYAuuktgXR+SaLkQHw/YRgDPSKj5nzmmlOQf/rWRr+8O2q+C92aUICmkNvZ\n"
 155   "Gamo5w2WlOMZ6T5dk2Hv+QM6xT/GzWyVr1dMYu/7tywD1Bw7aW/HqkRESDu6q95V\n"
 156   "Wu+Lzg6XlxCNEez0YsZrN/fC6BL2qzKAqMBbIHFW8OOnh+nEY4IF5AzkZnFrw12G\n"
 157   "I72Z882pw97lyKwZhSz/GMQFBJx+rnNdw5P1IJwTlG5PUdoDCte/Mcr1iiA+zOov\n"
 158   "x55x1GoGxduoXWU5egrf1MtalRf9Pc8Xr4q3WEKTAmsZrVECAwEAAaOCAQYwggEC\n"
 159   "MAkGA1UdEwQCMAAwCwYDVR0PBAQDAgOoMB0GA1UdDgQWBBQfoamI2WSMtaCiVGQ5\n"
 160   "tPI9dF1ufDBtBgNVHSMEZjBkgBRdp91wBlEyfue2bbO15eBg6i5N76FJpEcwRTEL\n"
 161   "MAkGA1UEBhMCQ0gxGTAXBgNVBAoTEExpbnV4IHN0cm9uZ1N3YW4xGzAZBgNVBAMT\n"
 162   "EnN0cm9uZ1N3YW4gUm9vdCBDQYIBADAfBgNVHREEGDAWgRRjYXJvbEBzdHJvbmdz\n"
 163   "d2FuLm9yZzA5BgNVHR8EMjAwMC6gLKAqhihodHRwOi8vY3JsLnN0cm9uZ3N3YW4u\n"
 164   "b3JnL3N0cm9uZ3N3YW4uY3JsMA0GCSqGSIb3DQEBCwUAA4IBAQC8pqX3KrSzKeul\n"
 165   "GdzydAV4hGwYB3WiB02oJ2nh5MJBu7J0Kn4IVkvLUHSSZhSRxx55tQZfdYqtXVS7\n"
 166   "ZuyG+6rV7sb595SIRwfkLAdjbvv0yZIl4xx8j50K3yMR+9aXW1NSGPEkb8BjBUMr\n"
 167   "F2kjGTOqomo8OIzyI369z9kJrtEhnS37nHcdpewZC1wHcWfJ6wd9wxmz2dVXmgVQ\n"
 168   "L2BjXd/BcpLFaIC4h7jMXQ5FURjnU7K9xSa4T8PpR6FrQhOcIYBXAp94GiM8JqmK\n"
 169   "ZBGUpeP+3cy4i3DV18Kyr64Q4XZlzhZClNE43sgMqiX88dc3znpDzT7T51j+d+9k\n"
 170   "Rf5Z0GOR\n"
 171   "-----END CERTIFICATE-----\n";
 172 const gnutls_datum_t subject_data = { subject_pem, sizeof (subject_pem) };
 173
 174 /* For testing verify functions. */
 175
 176 #define BLOG_RESP "\x30\x82\x06\xF8\x0A\x01\x00\xA0\x82\x06\xF1\x30\x82\x06\xED\x06\x09\x2B\x06\x01\x05\x05\x07\x30\x01\x01\x04\x82\x06\xDE\x30\x82\x06\xDA\x30\x82\x01\x25\xA1\x7E\x30\x7C\x31\x0B\x30\x09\x06\x03\x55\x04\x06\x13\x02\x41\x55\x31\x0C\x30\x0A\x06\x03\x55\x04\x08\x13\x03\x4E\x53\x57\x31\x0F\x30\x0D\x06\x03\x55\x04\x07\x13\x06\x53\x79\x64\x6E\x65\x79\x31\x14\x30\x12\x06\x03\x55\x04\x0A\x13\x0B\x43\x41\x63\x65\x72\x74\x20\x49\x6E\x63\x2E\x31\x1E\x30\x1C\x06\x03\x55\x04\x0B\x13\x15\x53\x65\x72\x76\x65\x72\x20\x41\x64\x6D\x69\x6E\x69\x73\x74\x72\x61\x74\x69\x6F\x6E\x31\x18\x30\x16\x06\x03\x55\x04\x03\x13\x0F\x6F\x63\x73\x70\x2E\x63\x61\x63\x65\x72\x74\x2E\x6F\x72\x67\x18\x0F\x32\x30\x31\x32\x30\x31\x31\x33\x30\x38\x35\x30\x34\x32\x5A\x30\x66\x30\x64\x30\x3C\x30\x09\x06\x05\x2B\x0E\x03\x02\x1A\x05\x00\x04\x14\xF2\x2A\x62\x16\x93\xA6\xDA\x5A\xD0\xB9\x8D\x3A\x13\x5E\x35\xD1\xEB\x18\x36\x61\x04\x14\x75\xA8\x71\x60\x4C\x88\x13\xF0\x78\xD9\x89\x77\xB5\x6D\xC5\x89\xDF\xBC\xB1\x7A\x02\x03\x00\xBC\xE0\x80\x00\x18\x0F\x32\x30\x31\x32\x30\x31\x31\x33\x30\x37\x32\x30\x34\x39\x5A\xA0\x11\x18\x0F\x32\x30\x31\x32\x30\x31\x31\x35\x30\x38\x35\x30\x34\x32\x5A\xA1\x2A\x30\x28\x30\x26\x06\x09\x2B\x06\x01\x05\x05\x07\x30\x01\x02\x04\x19\x04\x17\x73\x69\xD2\xC5\x6F\xC7\x7E\x2E\xB0\x2F\xCC\xC3\xE2\x80\xD6\x2A\xCE\xD3\xDE\x8F\x27\x1B\xB2\x30\x0D\x06\x09\x2A\x86\x48\x86\xF7\x0D\x01\x01\x05\x05\x00\x03\x82\x01\x01\x00\x3E\x50\x9D\xE9\xA2\xE0\xCA\x33\x88\x9B\x28\x7E\xE7\xA4\xAF\xDA\xBB\x75\x2D\xD9\x66\xA6\xD5\xFA\x17\x56\xC0\x3B\xDD\x74\xB6\x7E\x42\x2C\x28\xD0\x73\x91\x54\x69\xFA\xCF\xD8\xC7\x74\x1C\x5D\xBC\x8E\xCD\xE3\x0E\xD5\x3F\x80\x71\x9C\x95\x53\xC4\xD1\x95\x63\x5D\x72\xCE\xCC\x77\x9D\x7C\xAD\x47\x3F\x34\xDA\x90\x80\xC5\x15\xE1\x2B\xEE\x98\x57\xA3\xA7\x9F\xA2\xC3\xF5\x5E\xF7\x13\x26\x52\xDA\x09\x38\x5B\x18\x91\x07\x38\xCF\x09\xDA\x08\xED\x80\x4F\x26\x3A\xB9\xBE\xF6\xED\x65\x3F\xB1\x3A\x6D\xA3\x87\x22\xA3\x2A\xA5\x99\xCC\x06\xF3\x5A\xD5\x34\xFB\x9E\x32\x28\xC3\x3E\xF4\xAF\x33\x02\xCF\x6A\x74\x73\x17\x24\x17\x41\x0D\x7E\x86\x79\x83\x34\xE8\x82\x0A\x0D\x21\xED\xCB\x3B\xB7\x31\x64\xC9\xB6\x1E\xC7\x0C\x75\xCE\xBA\xB7\xDC\xB2\x67\x96\x2B\xAD\xBF\x86\x22\x81\x54\x66\xBA\x68\x89\xD7\x7E\x35\x60\x93\xEC\x6B\xD8\x59\x23\xA0\xD0\x95\x55\x8F\x93\x52\x48\x4E\x48\xCB\x92\xE9\x67\x71\x60\x07\xC9\xA3\x3B\xAC\xD1\xEA\x5B\x71\xDB\xC1\x94\x79\x85\x55\x8C\x03\x61\x9E\xC7\xD6\x32\x40\xFA\xDD\xF6\xC9\xF8\xE0\xFF\x4D\xAC\x54\xED\x61\xFE\xB2\xA0\x82\x04\x99\x30\x82\x04\x95\x30\x82\x04\x91\x30\x82\x02\x79\xA0\x03\x02\x01\x02\x02\x03\x00\xDC\xA6\x30\x0D\x06\x09\x2A\x86\x48\x86\xF7\x0D\x01\x01\x05\x05\x00\x30\x54\x31\x14\x30\x12\x06\x03\x55\x04\x0A\x13\x0B\x43\x41\x63\x65\x72\x74\x20\x49\x6E\x63\x2E\x31\x1E\x30\x1C\x06\x03\x55\x04\x0B\x13\x15\x68\x74\x74\x70\x3A\x2F\x2F\x77\x77\x77\x2E\x43\x41\x63\x65\x72\x74\x2E\x6F\x72\x67\x31\x1C\x30\x1A\x06\x03\x55\x04\x03\x13\x13\x43\x41\x63\x65\x72\x74\x20\x43\x6C\x61\x73\x73\x20\x33\x20\x52\x6F\x6F\x74\x30\x1E\x17\x0D\x31\x31\x30\x38\x32\x33\x30\x30\x30\x38\x33\x37\x5A\x17\x0D\x31\x33\x30\x38\x32\x32\x30\x30\x30\x38\x33\x37\x5A\x30\x7C\x31\x0B\x30\x09\x06\x03\x55\x04\x06\x13\x02\x41\x55\x31\x0C\x30\x0A\x06\x03\x55\x04\x08\x13\x03\x4E\x53\x57\x31\x0F\x30\x0D\x06\x03\x55\x04\x07\x13\x06\x53\x79\x64\x6E\x65\x79\x31\x14\x30\x12\x06\x03\x55\x04\x0A\x13\x0B\x43\x41\x63\x65\x72\x74\x20\x49\x6E\x63\x2E\x31\x1E\x30\x1C\x06\x03\x55\x04\x0B\x13\x15\x53\x65\x72\x76\x65\x72\x20\x41\x64\x6D\x69\x6E\x69\x73\x74\x72\x61\x74\x69\x6F\x6E\x31\x18\x30\x16\x06\x03\x55\x04\x03\x13\x0F\x6F\x63\x73\x70\x2E\x63\x61\x63\x65\x72\x74\x2E\x6F\x72\x67\x30\x82\x01\x22\x30\x0D\x06\x09\x2A\x86\x48\x86\xF7\x0D\x01\x01\x01\x05\x00\x03\x82\x01\x0F\x00\x30\x82\x01\x0A\x02\x82\x01\x01\x00\x9C\xC6\xD4\x6F\xE4\x23\xC7\xC3\x70\x4B\x75\x1F\xE4\xFC\xAE\xF6\x62\xC4\x60\xA1\xD6\xCF\xF9\x47\x40\x38\xD9\xAF\x06\xF5\xB3\x87\x09\xBA\x07\xC8\x7A\x3B\xE3\x3A\xE2\xC1\x6B\xDB\x0E\x9B\x7B\xB4\x98\x04\x40\x88\xC8\xE4\x20\x34\x9D\x5F\x94\xAE\x0C\xA0\x05\xA1\x74\x10\x3F\x1F\x93\x6D\xC5\xA0\xCE\x29\xB0\x2A\x03\x6E\xED\x3B\xD1\x9A\x7A\xF7\x0F\xA7\xB7\x39\xD7\xC3\xB4\xDE\x15\x67\x94\xF2\xEF\xB0\xDD\x5F\xE3\xC9\xD8\xD2\x34\x0E\x5D\x44\xDF\xBF\x99\xD8\x5E\x60\xF4\x39\x24\x8A\xFD\x5D\xC8\x46\x8D\x0A\xB1\x60\x7A\x4F\xD5\x27\x30\x60\x9E\x13\x06\xF8\x3A\xAA\xB3\xBB\x33\x34\x6F\x84\x81\x7E\x5C\xCC\x12\x89\xF2\xFE\x6E\x93\x83\xFA\x8B\xEE\xAB\x36\x4C\xB6\x40\xA9\xEE\xFB\xF8\x16\x5A\x55\xD1\x64\x0D\x49\xDA\x04\xDE\xD1\xC8\xCA\xEE\x5F\x24\xB1\x79\x78\xB3\x9A\x88\x13\xDD\x68\x51\x39\xE9\x68\x31\xAF\xD7\xF8\x4D\x35\x6D\x60\x58\x04\x42\xBB\x55\x92\x18\xF6\x98\x01\xA5\x74\x3B\xBC\x36\xDB\x20\x68\x18\xB8\x85\xD4\x8B\x6D\x30\x87\x4D\xD6\x33\x2D\x7A\x54\x36\x1D\x57\x42\x14\x5C\x7A\x62\x74\xD5\x1E\x2B\xD5\xBF\x04\xF3\xFF\xEC\x03\xC1\x02\x03\x01\x00\x01\xA3\x44\x30\x42\x30\x0C\x06\x03\x55\x1D\x13\x01\x01\xFF\x04\x02\x30\x00\x30\x27\x06\x03\x55\x1D\x25\x04\x20\x30\x1E\x06\x08\x2B\x06\x01\x05\x05\x07\x03\x02\x06\x08\x2B\x06\x01\x05\x05\x07\x03\x01\x06\x08\x2B\x06\x01\x05\x05\x07\x03\x09\x30\x09\x06\x03\x55\x1D\x11\x04\x02\x30\x00\x30\x0D\x06\x09\x2A\x86\x48\x86\xF7\x0D\x01\x01\x05\x05\x00\x03\x82\x02\x01\x00\x50\xDD\x63\xB7\x1A\x6F\x91\x4C\xE8\x7F\x82\x1A\x27\x04\x81\x05\xBB\xA6\x69\xAC\x41\x7B\x62\xFC\x4B\x08\xDC\x60\xCF\xB2\x5A\xF1\xB4\xB5\x27\x69\x6B\x12\xE4\x07\xC8\x16\xCE\x3B\x42\xCC\x02\x90\x66\x0E\x79\xB8\x6C\x4B\x90\x00\xC5\x66\x64\x92\x2B\x2B\x48\x0E\x84\xC2\x6D\xBF\xA5\xDE\x16\xE3\xBD\x19\xF5\x5C\x93\xA1\x86\x7F\xD9\x89\x78\x6A\x3F\x83\xF0\xAA\xF8\xEA\x1D\xA4\x13\xF7\x2A\x15\x4C\x51\x9C\xC4\xB0\xBE\x58\x66\xCF\x4C\x6C\x3D\x31\xE5\xF9\x54\x21\xCD\xA1\x30\x01\x6A\xB3\x1A\x48\x85\x34\x93\xB8\xF9\x15\x19\x48\x34\x8D\x73\xE7\x03\x50\xAF\xDE\x50\xC7\x62\xAF\x25\x22\x2B\xF6\xE8\x37\x2E\xE4\x71\xA9\x5C\x26\xEA\x79\xCB\x04\x29\x73\x6B\x8F\xDF\x1F\x5C\x41\x52\xC0\x36\xAA\xD7\x7D\x8E\x44\x54\x98\x06\x4C\x63\xA6\x0B\x01\x94\x5D\x0C\x5C\xD4\xCF\xCB\x0B\x7B\x2D\x56\xCC\xBF\x97\x7F\x15\x24\x1D\xBA\xEA\xB7\x97\xB0\x32\xAD\xFC\xEA\x6D\x94\x39\x7A\xE3\x25\x54\xFC\x4A\xF5\x3D\xBD\x2E\xD5\x31\x07\x49\x24\xCC\x92\x69\x0E\x79\xB9\xDF\xDB\x36\xBF\x04\x44\x15\xD0\x46\x99\x8C\xD2\x4C\x94\x38\x0E\x10\x64\x13\xAB\xD9\x1B\x54\x02\x31\x56\x20\xEE\x69\x95\xDF\x39\xBB\xE9\xA7\x6D\xC3\x23\x86\x0B\xD6\x34\x40\x37\xC3\xD4\x41\xA8\x2E\x71\x1D\x6E\x5B\xD7\xC5\x9F\x2A\xE6\x02\x80\xAE\x0A\x28\x69\x63\x4B\x89\x2E\xBD\x4F\x42\x58\xFB\x86\x9A\xA2\x18\xDC\xC6\x32\xC1\x46\xBA\x28\xD2\x8B\xCE\x56\x63\x04\x80\x51\x51\x39\x00\x3B\x00\xB9\x5F\x67\xFA\x90\x1E\xDA\x76\xB5\x31\xA5\xBD\x11\xD2\x5F\xDA\x5D\xD5\xF7\xEE\xAB\xC0\x62\x74\x60\x47\x32\x42\xFD\xB2\x2E\x04\x3A\x2E\xF2\xC8\xB3\x41\xA3\xBD\xFE\x94\x5F\xEF\x6E\xD7\x92\x7C\x1D\x04\xF0\xC6\x53\x8E\x46\xDC\x30\x3A\x35\x5F\x1A\x4B\xEA\x3B\x00\x8B\x97\xB5\xB9\xCE\x71\x6E\x5C\xD5\xA0\x0B\xB1\x33\x08\x89\x61\x23\xCF\x97\x9F\x8F\x9A\x50\xB5\xEC\xCE\x40\x8D\x82\x95\x8B\x79\x26\x66\xF3\xF4\x70\xD8\xEE\x58\xDD\x75\x29\xD5\x6A\x91\x51\x7A\x17\xBC\x4F\xD4\xA3\x45\x7B\x84\xE7\xBE\x69\x53\xC1\xE2\x5C\xC8\x45\xA0\x3A\xEC\xDF\x8A\x1E\xC1\x18\x84\x8B\x7A\x4E\x4E\x9E\x3A\x26\xFE\x5D\x22\xD4\xC5\x14\xBE\xEE\x06\xEB\x05\x4A\x66\xC9\xA4\xB3\x68\x04\xB0\x5D\x25\x54\xB3\x05\xED\x41\xF0\x65\x69\x6D\xA5\x4E\xB7\x97\xD8\xD8\xF5"
 177
 178 static const gnutls_datum_t blog_resp =
 179   { (unsigned char*) BLOG_RESP, sizeof (BLOG_RESP) - 1 };
 180
 181 static unsigned char blog_cert_pem[] =
 182   "-----BEGIN CERTIFICATE-----\n"
 183   "MIIE8DCCAtigAwIBAgIDALzgMA0GCSqGSIb3DQEBBQUAMFQxFDASBgNVBAoTC0NB\n"
 184   "Y2VydCBJbmMuMR4wHAYDVQQLExVodHRwOi8vd3d3LkNBY2VydC5vcmcxHDAaBgNV\n"
 185   "BAMTE0NBY2VydCBDbGFzcyAzIFJvb3QwHhcNMTAxMTE2MjI1MjMzWhcNMTIxMTE1\n"
 186   "MjI1MjMzWjAdMRswGQYDVQQDExJibG9nLmpvc2Vmc3Nvbi5vcmcwggEiMA0GCSqG\n"
 187   "SIb3DQEBAQUAA4IBDwAwggEKAoIBAQDBKA6bm/Kip0i00vU+BOmUF2MBDTwps41c\n"
 188   "xKN5bDn7usWZj8loi6BHRPE2WzCVPnPRD1FJXBc4rXL8zZWrCRe1b4A+l8NjPN2o\n"
 189   "uUgJvYLXYQ2hXkvxlPBQPKNOudaOAVsahpyxk6g6Z3mskOfqPhxvjutHvMC4fOsJ\n"
 190   "1+FstMzvg5SpDd4uYM9m0UK8pbEUSuwW+fxyWqhciSi7kJtdrD6bwx3ub3t9GFkM\n"
 191   "9uTzImIslTq19w8AHQsTICNnmNwfUGF5XMUIuxun0HlFt2KUP5G3Qg9Cd18wZFql\n"
 192   "RQJvLA3nbVFtmN3M3yKXnGSsEn38ZJvC+UxFuSfYJN9UwgoG6gwhAgMBAAGjggEA\n"
 193   "MIH9MAwGA1UdEwEB/wQCMAAwNAYDVR0lBC0wKwYIKwYBBQUHAwIGCCsGAQUFBwMB\n"
 194   "BglghkgBhvhCBAEGCisGAQQBgjcKAwMwCwYDVR0PBAQDAgWgMDMGCCsGAQUFBwEB\n"
 195   "BCcwJTAjBggrBgEFBQcwAYYXaHR0cDovL29jc3AuY2FjZXJ0Lm9yZy8wdQYDVR0R\n"
 196   "BG4wbIISYmxvZy5qb3NlZnNzb24ub3JnoCAGCCsGAQUFBwgFoBQMEmJsb2cuam9z\n"
 197   "ZWZzc29uLm9yZ4ISYmxvZy5qb3NlZnNzb24ub3JnoCAGCCsGAQUFBwgFoBQMEmJs\n"
 198   "b2cuam9zZWZzc29uLm9yZzANBgkqhkiG9w0BAQUFAAOCAgEACQX0KziT81G0XJ4C\n"
 199   "SlVumGN0KcVPDjtiUYskMpUvyLF951Q4Uuih0Aa9c0LynyZq8yqr6sW5OTmnRfSU\n"
 200   "DuUK5IH+IPq5PU7qteQSIy+63yjMQ+1wye1zfCWI+MyaS54AOn6uZObsr4grq41i\n"
 201   "sTwnX8OF/z15dQBjDR18WoehsnbuMz3Ld7+w5UcVWRGDzTyZ7JrYisEywQ7TXcoK\n"
 202   "1IlhD1TqwFucH7lIr4mPWNjL7Nw0sw11HN0Syt9H3upcq6lqyEI0ygfNZ9cdxvmX\n"
 203   "WqOBxxLc6G/87G4nGW4jw3WrCX7LqSmChlR3SbEC1UhWpaQMQ+mOU5+vXon7blRV\n"
 204   "zGJ/1wK8mKu3fKw9rm5TQ1xfJuRABbzsD3BrrUaHlREQQ+i6SCPVFGer6oeAaxyv\n"
 205   "so0NCbmBQkcpmUUl0COIR/Lh/YT78PjIEfxaUnUlaZXvCbKPKP2cM8LY7ltEaTgJ\n"
 206   "4W6sZi3QNFySzd4sz7J/YhY/jGjqku7TfpN/GOheW8AzKTBlm3WLps1YXys4TKrB\n"
 207   "0RStfaPfRJI1PeSlrWl6+kQu/5O8WA8NK0JZ/0Jc4d5LNrtUXo4VU9XCthrxLkgL\n"
 208   "3XWgZKFrqJd1UeJJ7OvkRYfI1c5i4oAP5ksuF0SHTpqnXE8K39kUnUx3B+ItJlZP\n"
 209   "VXTFhXRc06QwYqYXuYSAmj7/GJk=\n"
 210   "-----END CERTIFICATE-----\n";
 211 const gnutls_datum_t blog_cert_data = { blog_cert_pem,
 212                                         sizeof (blog_cert_pem) };
 213
 214 static unsigned char blog_issuer_pem[] =
 215   "-----BEGIN CERTIFICATE-----\n"
 216   "MIIHWTCCBUGgAwIBAgIDCkGKMA0GCSqGSIb3DQEBCwUAMHkxEDAOBgNVBAoTB1Jv\n"
 217   "b3QgQ0ExHjAcBgNVBAsTFWh0dHA6Ly93d3cuY2FjZXJ0Lm9yZzEiMCAGA1UEAxMZ\n"
 218   "Q0EgQ2VydCBTaWduaW5nIEF1dGhvcml0eTEhMB8GCSqGSIb3DQEJARYSc3VwcG9y\n"
 219   "dEBjYWNlcnQub3JnMB4XDTExMDUyMzE3NDgwMloXDTIxMDUyMDE3NDgwMlowVDEU\n"
 220   "MBIGA1UEChMLQ0FjZXJ0IEluYy4xHjAcBgNVBAsTFWh0dHA6Ly93d3cuQ0FjZXJ0\n"
 221   "Lm9yZzEcMBoGA1UEAxMTQ0FjZXJ0IENsYXNzIDMgUm9vdDCCAiIwDQYJKoZIhvcN\n"
 222   "AQEBBQADggIPADCCAgoCggIBAKtJNRFIfNImflOUz0Op3SjXQiqL84d4GVh8D57a\n"
 223   "iX3h++tykA10oZZkq5+gJJlz2uJVdscXe/UErEa4w75/ZI0QbCTzYZzA8pD6Ueb1\n"
 224   "aQFjww9W4kpCz+JEjCUoqMV5CX1GuYrz6fM0KQhF5Byfy5QEHIGoFLOYZcRD7E6C\n"
 225   "jQnRvapbjZLQ7N6QxX8KwuPr5jFaXnQ+lzNZ6MMDPWAzv/fRb0fEze5ig1JuLgia\n"
 226   "pNkVGJGmhZJHsK5I6223IeyFGmhyNav/8BBdwPSUp2rVO5J+TJAFfpPBLIukjmJ0\n"
 227   "FXFuC3ED6q8VOJrU0gVyb4z5K+taciX5OUbjchs+BMNkJyIQKopPWKcDrb60LhPt\n"
 228   "XapI19V91Cp7XPpGBFDkzA5CW4zt2/LP/JaT4NsRNlRiNDiPDGCbO5dWOK3z0luL\n"
 229   "oFvqTpa4fNfVoIZwQNORKbeiPK31jLvPGpKK5DR7wNhsX+kKwsOnIJpa3yxdUly6\n"
 230   "R9Wb7yQocDggL9V/KcCyQQNokszgnMyXS0XvOhAKq3A6mJVwrTWx6oUrpByAITGp\n"
 231   "rmB6gCZIALgBwJNjVSKRPFbnr9s6JfOPMVTqJouBWfmh0VMRxXudA/Z0EeBtsSw/\n"
 232   "LIaRmXGapneLNGDRFLQsrJ2vjBDTn8Rq+G8T/HNZ92ZCdB6K4/jc0m+YnMtHmJVA\n"
 233   "BfvpAgMBAAGjggINMIICCTAdBgNVHQ4EFgQUdahxYEyIE/B42Yl3tW3Fid+8sXow\n"
 234   "gaMGA1UdIwSBmzCBmIAUFrUyG9TH8+DmjvO90rA67rI5GNGhfaR7MHkxEDAOBgNV\n"
 235   "BAoTB1Jvb3QgQ0ExHjAcBgNVBAsTFWh0dHA6Ly93d3cuY2FjZXJ0Lm9yZzEiMCAG\n"
 236   "A1UEAxMZQ0EgQ2VydCBTaWduaW5nIEF1dGhvcml0eTEhMB8GCSqGSIb3DQEJARYS\n"
 237   "c3VwcG9ydEBjYWNlcnQub3JnggEAMA8GA1UdEwEB/wQFMAMBAf8wXQYIKwYBBQUH\n"
 238   "AQEEUTBPMCMGCCsGAQUFBzABhhdodHRwOi8vb2NzcC5DQWNlcnQub3JnLzAoBggr\n"
 239   "BgEFBQcwAoYcaHR0cDovL3d3dy5DQWNlcnQub3JnL2NhLmNydDBKBgNVHSAEQzBB\n"
 240   "MD8GCCsGAQQBgZBKMDMwMQYIKwYBBQUHAgEWJWh0dHA6Ly93d3cuQ0FjZXJ0Lm9y\n"
 241   "Zy9pbmRleC5waHA/aWQ9MTAwNAYJYIZIAYb4QgEIBCcWJWh0dHA6Ly93d3cuQ0Fj\n"
 242   "ZXJ0Lm9yZy9pbmRleC5waHA/aWQ9MTAwUAYJYIZIAYb4QgENBEMWQVRvIGdldCB5\n"
 243   "b3VyIG93biBjZXJ0aWZpY2F0ZSBmb3IgRlJFRSwgZ28gdG8gaHR0cDovL3d3dy5D\n"
 244   "QWNlcnQub3JnMA0GCSqGSIb3DQEBCwUAA4ICAQApKIWuRKm5r6R5E/CooyuXYPNc\n"
 245   "7uMvwfbiZqARrjY3OnYVBFPqQvX56sAV2KaC2eRhrnILKVyQQ+hBsuF32wITRHhH\n"
 246   "Va9Y/MyY9kW50SD42CEH/m2qc9SzxgfpCYXMO/K2viwcJdVxjDm1Luq+GIG6sJO4\n"
 247   "D+Pm1yaMMVpyA4RS5qb1MyJFCsgLDYq4Nm+QCaGrvdfVTi5xotSu+qdUK+s1jVq3\n"
 248   "VIgv7nSf7UgWyg1I0JTTrKSi9iTfkuO960NAkW4cGI5WtIIS86mTn9S8nK2cde5a\n"
 249   "lxuV53QtHA+wLJef+6kzOXrnAzqSjiL2jA3k2X4Ndhj3AfnvlpaiVXPAPHG0HRpW\n"
 250   "Q7fDCo1y/OIQCQtBzoyUoPkD/XFzS4pXM+WOdH4VAQDmzEoc53+VGS3FpQyLu7Xt\n"
 251   "hbNc09+4ufLKxw0BFKxwWMWMjTPUnWajGlCVI/xI4AZDEtnNp4Y5LzZyo4AQ5OHz\n"
 252   "0ctbGsDkgJp8E3MGT9ujayQKurMcvEp4u+XjdTilSKeiHq921F73OIZWWonO1sOn\n"
 253   "ebJSoMbxhbQljPI/lrMQ2Y1sVzufb4Y6GIIiNsiwkTjbKqGTqoQ/9SdlrnPVyNXT\n"
 254   "d+pLncdBu8fA46A/5H2kjXPmEkvfoXNzczqA6NXLji/L6hOn1kGLrPo8idck9U60\n"
 255   "4GGSt/M3mMS+lqO3ig==\n"
 256   "-----END CERTIFICATE-----\n";
 257 const gnutls_datum_t blog_issuer_data = { blog_issuer_pem,
 258                                           sizeof (blog_issuer_pem) };
 259
 260 static unsigned char blog_signer_pem[] =
 261   "-----BEGIN CERTIFICATE-----\n"
 262   "MIIEkTCCAnmgAwIBAgIDANymMA0GCSqGSIb3DQEBBQUAMFQxFDASBgNVBAoTC0NB\n"
 263   "Y2VydCBJbmMuMR4wHAYDVQQLExVodHRwOi8vd3d3LkNBY2VydC5vcmcxHDAaBgNV\n"
 264   "BAMTE0NBY2VydCBDbGFzcyAzIFJvb3QwHhcNMTEwODIzMDAwODM3WhcNMTMwODIy\n"
 265   "MDAwODM3WjB8MQswCQYDVQQGEwJBVTEMMAoGA1UECBMDTlNXMQ8wDQYDVQQHEwZT\n"
 266   "eWRuZXkxFDASBgNVBAoTC0NBY2VydCBJbmMuMR4wHAYDVQQLExVTZXJ2ZXIgQWRt\n"
 267   "aW5pc3RyYXRpb24xGDAWBgNVBAMTD29jc3AuY2FjZXJ0Lm9yZzCCASIwDQYJKoZI\n"
 268   "hvcNAQEBBQADggEPADCCAQoCggEBAJzG1G/kI8fDcEt1H+T8rvZixGCh1s/5R0A4\n"
 269   "2a8G9bOHCboHyHo74zriwWvbDpt7tJgEQIjI5CA0nV+UrgygBaF0ED8fk23FoM4p\n"
 270   "sCoDbu070Zp69w+ntznXw7TeFWeU8u+w3V/jydjSNA5dRN+/mdheYPQ5JIr9XchG\n"
 271   "jQqxYHpP1ScwYJ4TBvg6qrO7MzRvhIF+XMwSifL+bpOD+ovuqzZMtkCp7vv4FlpV\n"
 272   "0WQNSdoE3tHIyu5fJLF5eLOaiBPdaFE56Wgxr9f4TTVtYFgEQrtVkhj2mAGldDu8\n"
 273   "NtsgaBi4hdSLbTCHTdYzLXpUNh1XQhRcemJ01R4r1b8E8//sA8ECAwEAAaNEMEIw\n"
 274   "DAYDVR0TAQH/BAIwADAnBgNVHSUEIDAeBggrBgEFBQcDAgYIKwYBBQUHAwEGCCsG\n"
 275   "AQUFBwMJMAkGA1UdEQQCMAAwDQYJKoZIhvcNAQEFBQADggIBAFDdY7cab5FM6H+C\n"
 276   "GicEgQW7pmmsQXti/EsI3GDPslrxtLUnaWsS5AfIFs47QswCkGYOebhsS5AAxWZk\n"
 277   "kisrSA6Ewm2/pd4W470Z9VyToYZ/2Yl4aj+D8Kr46h2kE/cqFUxRnMSwvlhmz0xs\n"
 278   "PTHl+VQhzaEwAWqzGkiFNJO4+RUZSDSNc+cDUK/eUMdiryUiK/boNy7kcalcJup5\n"
 279   "ywQpc2uP3x9cQVLANqrXfY5EVJgGTGOmCwGUXQxc1M/LC3stVsy/l38VJB266reX\n"
 280   "sDKt/OptlDl64yVU/Er1Pb0u1TEHSSTMkmkOebnf2za/BEQV0EaZjNJMlDgOEGQT\n"
 281   "q9kbVAIxViDuaZXfObvpp23DI4YL1jRAN8PUQagucR1uW9fFnyrmAoCuCihpY0uJ\n"
 282   "Lr1PQlj7hpqiGNzGMsFGuijSi85WYwSAUVE5ADsAuV9n+pAe2na1MaW9EdJf2l3V\n"
 283   "9+6rwGJ0YEcyQv2yLgQ6LvLIs0Gjvf6UX+9u15J8HQTwxlOORtwwOjVfGkvqOwCL\n"
 284   "l7W5znFuXNWgC7EzCIlhI8+Xn4+aULXszkCNgpWLeSZm8/Rw2O5Y3XUp1WqRUXoX\n"
 285   "vE/Uo0V7hOe+aVPB4lzIRaA67N+KHsEYhIt6Tk6eOib+XSLUxRS+7gbrBUpmyaSz\n"
 286   "aASwXSVUswXtQfBlaW2lTreX2Nj1\n"
 287   "-----END CERTIFICATE-----\n";
 288 const gnutls_datum_t blog_signer_data = { blog_signer_pem,
 289                                           sizeof (blog_signer_pem) };
 290
 291 static void
 292 ocsp_invalid_calls (void)
 293 {
 294   gnutls_ocsp_req_t req;
 295   gnutls_ocsp_resp_t resp;
 296   gnutls_datum_t dat;
 297   char c = 42;
 298   void *p = &c;
 299   int rc;
 300
 301   rc = gnutls_ocsp_req_init (&req);
 302   if (rc != GNUTLS_E_SUCCESS)
 303     {
 304       fail ("gnutls_ocsp_req_init alloc\n");
 305       exit (1);
 306     }
 307   rc = gnutls_ocsp_resp_init (&resp);
 308   if (rc != GNUTLS_E_SUCCESS)
 309     {
 310       fail ("gnutls_ocsp_resp_init alloc\n");
 311       exit (1);
 312     }
 313
 314   gnutls_ocsp_req_deinit (NULL);
 315   gnutls_ocsp_resp_deinit (NULL);
 316
 317   rc = gnutls_ocsp_req_import (NULL, NULL);
 318   if (rc != GNUTLS_E_INVALID_REQUEST)
 319     {
 320       fail ("gnutls_ocsp_req_import NULL\n");
 321       exit (1);
 322     }
 323
 324   rc = gnutls_ocsp_req_import (NULL, p);
 325   if (rc != GNUTLS_E_INVALID_REQUEST)
 326     {
 327       fail ("gnutls_ocsp_req_import NULL\n");
 328       exit (1);
 329     }
 330
 331   rc = gnutls_ocsp_req_import (req, NULL);
 332   if (rc != GNUTLS_E_INVALID_REQUEST)
 333     {
 334       fail ("gnutls_ocsp_req_import NULL\n");
 335       exit (1);
 336     }
 337
 338   rc = gnutls_ocsp_resp_import (NULL, NULL);
 339   if (rc != GNUTLS_E_INVALID_REQUEST)
 340     {
 341       fail ("gnutls_ocsp_resp_import NULL\n");
 342       exit (1);
 343     }
 344
 345   rc = gnutls_ocsp_resp_import (NULL, p);
 346   if (rc != GNUTLS_E_INVALID_REQUEST)
 347     {
 348       fail ("gnutls_ocsp_resp_import NULL\n");
 349       exit (1);
 350     }
 351
 352   rc = gnutls_ocsp_resp_import (resp, NULL);
 353   if (rc != GNUTLS_E_INVALID_REQUEST)
 354     {
 355       fail ("gnutls_ocsp_resp_import NULL\n");
 356       exit (1);
 357     }
 358
 359   rc = gnutls_ocsp_req_export (NULL, NULL);
 360   if (rc != GNUTLS_E_INVALID_REQUEST)
 361     {
 362       fail ("gnutls_ocsp_req_export NULL\n");
 363       exit (1);
 364     }
 365
 366   rc = gnutls_ocsp_req_export (NULL, p);
 367   if (rc != GNUTLS_E_INVALID_REQUEST)
 368     {
 369       fail ("gnutls_ocsp_req_export NULL\n");
 370       exit (1);
 371     }
 372
 373   rc = gnutls_ocsp_req_export (req, NULL);
 374   if (rc != GNUTLS_E_INVALID_REQUEST)
 375     {
 376       fail ("gnutls_ocsp_req_export NULL\n");
 377       exit (1);
 378     }
 379
 380   rc = gnutls_ocsp_resp_export (NULL, NULL);
 381   if (rc != GNUTLS_E_INVALID_REQUEST)
 382     {
 383       fail ("gnutls_ocsp_resp_export NULL\n");
 384       exit (1);
 385     }
 386
 387   rc = gnutls_ocsp_resp_export (NULL, p);
 388   if (rc != GNUTLS_E_INVALID_REQUEST)
 389     {
 390       fail ("gnutls_ocsp_resp_export NULL\n");
 391       exit (1);
 392     }
 393
 394   rc = gnutls_ocsp_resp_export (resp, NULL);
 395   if (rc != GNUTLS_E_INVALID_REQUEST)
 396     {
 397       fail ("gnutls_ocsp_resp_export NULL\n");
 398       exit (1);
 399     }
 400
 401   rc = gnutls_ocsp_req_get_version (NULL);
 402   if (rc != GNUTLS_E_INVALID_REQUEST)
 403     {
 404       fail ("gnutls_ocsp_req_get_version NULL\n");
 405       exit (1);
 406     }
 407
 408   rc = gnutls_ocsp_req_get_cert_id (NULL, 0, NULL, NULL, NULL, NULL);
 409   if (rc != GNUTLS_E_INVALID_REQUEST)
 410     {
 411       fail ("gnutls_ocsp_req_get_cert_id NULL\n");
 412       exit (1);
 413     }
 414
 415   rc = gnutls_ocsp_req_get_cert_id (req, 0, NULL, NULL, NULL, NULL);
 416   if (rc != GNUTLS_E_REQUESTED_DATA_NOT_AVAILABLE)
 417     {
 418       fail ("gnutls_ocsp_req_get_cert_id empty\n");
 419       exit (1);
 420     }
 421
 422   rc = gnutls_ocsp_req_add_cert_id (NULL, 0, NULL, NULL, NULL);
 423   if (rc != GNUTLS_E_INVALID_REQUEST)
 424     {
 425       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 426       exit (1);
 427     }
 428
 429   rc = gnutls_ocsp_req_add_cert_id (req, 0, NULL, NULL, NULL);
 430   if (rc != GNUTLS_E_INVALID_REQUEST)
 431     {
 432       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 433       exit (1);
 434     }
 435
 436   rc = gnutls_ocsp_req_add_cert_id (req, GNUTLS_DIG_SHA1, NULL, NULL, NULL);
 437   if (rc != GNUTLS_E_INVALID_REQUEST)
 438     {
 439       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 440       exit (1);
 441     }
 442
 443   rc = gnutls_ocsp_req_add_cert_id (req, GNUTLS_DIG_SHA1, p, NULL, NULL);
 444   if (rc != GNUTLS_E_INVALID_REQUEST)
 445     {
 446       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 447       exit (1);
 448     }
 449
 450   rc = gnutls_ocsp_req_add_cert_id (req, GNUTLS_DIG_SHA1, NULL, p, NULL);
 451   if (rc != GNUTLS_E_INVALID_REQUEST)
 452     {
 453       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 454       exit (1);
 455     }
 456
 457   rc = gnutls_ocsp_req_add_cert_id (req, GNUTLS_DIG_SHA1, NULL, NULL, p);
 458   if (rc != GNUTLS_E_INVALID_REQUEST)
 459     {
 460       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 461       exit (1);
 462     }
 463
 464   rc = gnutls_ocsp_req_add_cert_id (req, GNUTLS_DIG_SHA1, p, p, NULL);
 465   if (rc != GNUTLS_E_INVALID_REQUEST)
 466     {
 467       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 468       exit (1);
 469     }
 470
 471   rc = gnutls_ocsp_req_add_cert_id (req, GNUTLS_DIG_SHA1, p, NULL, p);
 472   if (rc != GNUTLS_E_INVALID_REQUEST)
 473     {
 474       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 475       exit (1);
 476     }
 477
 478   rc = gnutls_ocsp_req_add_cert_id (req, GNUTLS_DIG_SHA1, NULL, p, p);
 479   if (rc != GNUTLS_E_INVALID_REQUEST)
 480     {
 481       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 482       exit (1);
 483     }
 484
 485   rc = gnutls_ocsp_req_add_cert (NULL, 0, NULL, NULL);
 486   if (rc != GNUTLS_E_INVALID_REQUEST)
 487     {
 488       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 489       exit (1);
 490     }
 491
 492   rc = gnutls_ocsp_req_add_cert (req, 0, NULL, NULL);
 493   if (rc != GNUTLS_E_INVALID_REQUEST)
 494     {
 495       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 496       exit (1);
 497     }
 498
 499
 500   rc = gnutls_ocsp_req_add_cert (req, 0, p, NULL);
 501   if (rc != GNUTLS_E_INVALID_REQUEST)
 502     {
 503       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 504       exit (1);
 505     }
 506
 507   rc = gnutls_ocsp_req_add_cert (req, 0, NULL, p);
 508   if (rc != GNUTLS_E_INVALID_REQUEST)
 509     {
 510       fail ("gnutls_ocsp_req_add_cert_id NULL\n");
 511       exit (1);
 512     }
 513
 514   rc = gnutls_ocsp_req_get_extension (NULL, 0, NULL, NULL, NULL);
 515   if (rc != GNUTLS_E_INVALID_REQUEST)
 516     {
 517       fail ("gnutls_ocsp_req_get_extension NULL\n");
 518       exit (1);
 519     }
 520
 521   rc = gnutls_ocsp_req_get_extension (req, 0, NULL, NULL, NULL);
 522   if (rc != GNUTLS_E_REQUESTED_DATA_NOT_AVAILABLE)
 523     {
 524       fail ("gnutls_ocsp_req_get_extension NULL\n");
 525       exit (1);
 526     }
 527
 528   rc = gnutls_ocsp_req_get_extension (req, 0, p, p, p);
 529   if (rc != GNUTLS_E_REQUESTED_DATA_NOT_AVAILABLE)
 530     {
 531       fail ("gnutls_ocsp_req_get_extension NULL\n");
 532       exit (1);
 533     }
 534
 535   rc = gnutls_ocsp_req_set_extension (NULL, NULL, 0, NULL);
 536   if (rc != GNUTLS_E_INVALID_REQUEST)
 537     {
 538       fail ("gnutls_ocsp_req_set_extension NULL\n");
 539       exit (1);
 540     }
 541
 542   rc = gnutls_ocsp_req_set_extension (req, NULL, 0, NULL);
 543   if (rc != GNUTLS_E_INVALID_REQUEST)
 544     {
 545       fail ("gnutls_ocsp_req_set_extension NULL\n");
 546       exit (1);
 547     }
 548
 549   rc = gnutls_ocsp_req_set_extension (req, p, 0, NULL);
 550   if (rc != GNUTLS_E_INVALID_REQUEST)
 551     {
 552       fail ("gnutls_ocsp_req_set_extension NULL\n");
 553       exit (1);
 554     }
 555
 556   rc = gnutls_ocsp_req_set_extension (req, NULL, 0, p);
 557   if (rc != GNUTLS_E_INVALID_REQUEST)
 558     {
 559       fail ("gnutls_ocsp_req_set_extension NULL\n");
 560       exit (1);
 561     }
 562
 563   rc = gnutls_ocsp_req_get_nonce (NULL, NULL, NULL);
 564   if (rc != GNUTLS_E_INVALID_REQUEST)
 565     {
 566       fail ("gnutls_ocsp_req_get_nonce NULL\n");
 567       exit (1);
 568     }
 569
 570   rc = gnutls_ocsp_req_get_nonce (NULL, NULL, p);
 571   if (rc != GNUTLS_E_INVALID_REQUEST)
 572     {
 573       fail ("gnutls_ocsp_req_get_nonce NULL\n");
 574       exit (1);
 575     }
 576
 577   rc = gnutls_ocsp_req_set_nonce (NULL, 0, NULL);
 578   if (rc != GNUTLS_E_INVALID_REQUEST)
 579     {
 580       fail ("gnutls_ocsp_req_set_nonce NULL\n");
 581       exit (1);
 582     }
 583
 584   rc = gnutls_ocsp_req_set_nonce (req, 0, NULL);
 585   if (rc != GNUTLS_E_INVALID_REQUEST)
 586     {
 587       fail ("gnutls_ocsp_req_set_nonce NULL\n");
 588       exit (1);
 589     }
 590
 591   rc = gnutls_ocsp_req_randomize_nonce (NULL);
 592   if (rc != GNUTLS_E_INVALID_REQUEST)
 593     {
 594       fail ("gnutls_ocsp_req_randomize_nonce NULL\n");
 595       exit (1);
 596     }
 597
 598   rc = gnutls_ocsp_resp_get_status (NULL);
 599   if (rc != GNUTLS_E_INVALID_REQUEST)
 600     {
 601       fail ("gnutls_ocsp_resp_get_status NULL\n");
 602       exit (1);
 603     }
 604
 605   rc = gnutls_ocsp_resp_get_status (resp);
 606   if (rc != GNUTLS_E_ASN1_VALUE_NOT_FOUND)
 607     {
 608       fail ("gnutls_ocsp_resp_get_status %d\n", rc);
 609       exit (1);
 610     }
 611
 612   rc = gnutls_ocsp_resp_get_response (NULL, NULL, NULL);
 613   if (rc != GNUTLS_E_INVALID_REQUEST)
 614     {
 615       fail ("gnutls_ocsp_resp_get_response NULL\n");
 616       exit (1);
 617     }
 618
 619   rc = gnutls_ocsp_resp_get_response (NULL, p, p);
 620   if (rc != GNUTLS_E_INVALID_REQUEST)
 621     {
 622       fail ("gnutls_ocsp_resp_get_response NULL\n");
 623       exit (1);
 624     }
 625
 626   rc = gnutls_ocsp_resp_get_response (resp, NULL, NULL);
 627   if (rc != GNUTLS_E_SUCCESS)
 628     {
 629       fail ("gnutls_ocsp_resp_get_response %d\n", rc);
 630       exit (1);
 631     }
 632
 633   rc = gnutls_ocsp_resp_get_version (NULL);
 634   if (rc != GNUTLS_E_INVALID_REQUEST)
 635     {
 636       fail ("gnutls_ocsp_resp_get_version NULL\n");
 637       exit (1);
 638     }
 639
 640   rc = gnutls_ocsp_resp_get_version (resp);
 641   if (rc != 1)
 642     {
 643       fail ("gnutls_ocsp_resp_get_version ret %d\n", rc);
 644       exit (1);
 645     }
 646
 647   rc = gnutls_ocsp_resp_get_responder (NULL, NULL);
 648   if (rc != GNUTLS_E_INVALID_REQUEST)
 649     {
 650       fail ("gnutls_ocsp_resp_get_responder NULL\n");
 651       exit (1);
 652     }
 653
 654   rc = gnutls_ocsp_resp_get_responder (resp, NULL);
 655   if (rc != GNUTLS_E_INVALID_REQUEST)
 656     {
 657       fail ("gnutls_ocsp_resp_get_responder 2nd %d\n", rc);
 658       exit (1);
 659     }
 660
 661   rc = gnutls_ocsp_resp_get_responder (resp, &dat);
 662   if (rc != GNUTLS_E_SUCCESS || dat.size != 0)
 663     {
 664       fail ("gnutls_ocsp_resp_get_responder %d\n", rc);
 665       exit (1);
 666     }
 667
 668   gnutls_free (dat.data);
 669
 670   gnutls_ocsp_req_deinit (req);
 671   gnutls_ocsp_resp_deinit (resp);
 672 }
 673
 674 /* import a request, query some fields and print and export it */
 675 static void
 676 req_parse (void)
 677 {
 678   gnutls_ocsp_req_t req;
 679   int ret;
 680   gnutls_datum_t d;
 681
 682   /* init request */
 683
 684   ret = gnutls_ocsp_req_init (&req);
 685   if (ret != 0)
 686     {
 687       fail ("gnutls_ocsp_req_init\n");
 688       exit (1);
 689     }
 690
 691   /* import ocsp request */
 692
 693   ret = gnutls_ocsp_req_import (req, &req1);
 694   if (ret != 0)
 695     {
 696       fail ("gnutls_ocsp_req_import %d\n", ret);
 697       exit (1);
 698     }
 699
 700   /* simple version query */
 701
 702   ret = gnutls_ocsp_req_get_version (req);
 703   if (ret != 1)
 704     {
 705       fail ("gnutls_ocsp_req_get_version %d\n", ret);
 706       exit (1);
 707     }
 708
 709   /* check nonce */
 710   {
 711     gnutls_datum_t expect =
 712       { (unsigned char*) REQ1NONCE + 2, sizeof (REQ1NONCE) - 3 };
 713     gnutls_datum_t got;
 714     unsigned int critical;
 715
 716     ret = gnutls_ocsp_req_get_nonce (req, &critical, &got);
 717     if (ret != 0)
 718       {
 719         fail ("gnutls_ocsp_req_get_nonce %d\n", ret);
 720         exit (1);
 721       }
 722
 723     if (critical != 0)
 724       {
 725         fail ("unexpected critical %d\n", critical);
 726         exit (1);
 727       }
 728
 729     if (expect.size != got.size ||
 730         memcmp (expect.data, got.data, got.size) != 0)
 731       {
 732         fail ("ocsp request nonce memcmp failed\n");
 733         exit (1);
 734       }
 735
 736     gnutls_free (got.data);
 737   }
 738
 739   /* print request */
 740
 741   ret = gnutls_ocsp_req_print (req, GNUTLS_OCSP_PRINT_FULL, &d);
 742   if (ret != 0)
 743     {
 744       fail ("gnutls_ocsp_req_print\n");
 745       exit (1);
 746     }
 747
 748   if (strlen (REQ1INFO) != d.size - 1 ||
 749       memcmp (REQ1INFO, d.data, strlen (REQ1INFO)) != 0)
 750     {
 751       printf ("expected (len %ld):\n%s\ngot (len %d):\n%.*s\n",
 752               strlen (REQ1INFO), REQ1INFO, (int) d.size - 1,
 753               (int) d.size, d.data);
 754       fail ("ocsp request print failed\n");
 755       exit (1);
 756     }
 757   gnutls_free (d.data);
 758
 759   /* test export */
 760   ret = gnutls_ocsp_req_export (req, &d);
 761   if (ret != 0)
 762     {
 763       fail ("gnutls_ocsp_req_export %d\n", ret);
 764       exit (1);
 765     }
 766
 767   /* compare against earlier imported bytes */
 768
 769   if (req1.size != d.size ||
 770       memcmp (req1.data, d.data, d.size) != 0)
 771     {
 772       fail ("ocsp request export memcmp failed\n");
 773       exit (1);
 774     }
 775   gnutls_free (d.data);
 776
 777   /* test setting nonce */
 778   {
 779     gnutls_datum_t n1 = { (unsigned char *) "foo", 3 };
 780     gnutls_datum_t n2 = { (unsigned char *) "foobar", 6 };
 781     gnutls_datum_t got;
 782     unsigned critical;
 783
 784     ret = gnutls_ocsp_req_set_nonce (req, 0, &n1);
 785     if (ret != 0)
 786       {
 787         fail ("gnutls_ocsp_req_set_nonce %d\n", ret);
 788         exit (1);
 789       }
 790
 791     ret = gnutls_ocsp_req_get_nonce (req, &critical, &got);
 792     if (ret != 0)
 793       {
 794         fail ("gnutls_ocsp_req_get_nonce %d\n", ret);
 795         exit (1);
 796       }
 797
 798     if (critical != 0)
 799       {
 800         fail ("unexpected critical %d\n", critical);
 801         exit (1);
 802       }
 803
 804     if (n1.size != got.size ||
 805         memcmp (n1.data, got.data, got.size) != 0)
 806       {
 807         fail ("ocsp request parse nonce memcmp failed\n");
 808         exit (1);
 809       }
 810
 811     gnutls_free (got.data);
 812
 813     /* set another time */
 814
 815     ret = gnutls_ocsp_req_set_nonce (req, 1, &n2);
 816     if (ret != 0)
 817       {
 818         fail ("gnutls_ocsp_req_set_nonce %d\n", ret);
 819         exit (1);
 820       }
 821
 822     ret = gnutls_ocsp_req_get_nonce (req, &critical, &got);
 823     if (ret != 0)
 824       {
 825         fail ("gnutls_ocsp_req_get_nonce %d\n", ret);
 826         exit (1);
 827       }
 828
 829     if (critical != 1)
 830       {
 831         fail ("unexpected critical %d\n", critical);
 832         exit (1);
 833       }
 834
 835     if (n2.size != got.size ||
 836         memcmp (n2.data, got.data, got.size) != 0)
 837       {
 838         fail ("ocsp request parse2 nonce memcmp failed\n");
 839         exit (1);
 840       }
 841
 842     gnutls_free (got.data);
 843
 844     /* randomize nonce */
 845
 846     ret = gnutls_ocsp_req_randomize_nonce (req);
 847     if (ret != 0)
 848       {
 849         fail ("gnutls_ocsp_req_randomize_nonce %d\n", ret);
 850         exit (1);
 851       }
 852
 853     ret = gnutls_ocsp_req_get_nonce (req, &critical, &n1);
 854     if (ret != 0)
 855       {
 856         fail ("gnutls_ocsp_req_get_nonce %d\n", ret);
 857         exit (1);
 858       }
 859
 860     if (critical != 0)
 861       {
 862         fail ("unexpected random critical %d\n", critical);
 863         exit (1);
 864       }
 865
 866     ret = gnutls_ocsp_req_randomize_nonce (req);
 867     if (ret != 0)
 868       {
 869         fail ("gnutls_ocsp_req_randomize_nonce %d\n", ret);
 870         exit (1);
 871       }
 872
 873     ret = gnutls_ocsp_req_get_nonce (req, &critical, &n2);
 874     if (ret != 0)
 875       {
 876         fail ("gnutls_ocsp_req_get_nonce %d\n", ret);
 877         exit (1);
 878       }
 879
 880     if (critical != 0)
 881       {
 882         fail ("unexpected random critical %d\n", critical);
 883         exit (1);
 884       }
 885
 886     if (n2.size == got.size && memcmp (n1.data, n2.data, n1.size) == 0)
 887       {
 888         fail ("ocsp request random nonce memcmp failed\n");
 889         exit (1);
 890       }
 891
 892     gnutls_free (n1.data);
 893     gnutls_free (n2.data);
 894   }
 895
 896   /* cleanup */
 897
 898   gnutls_ocsp_req_deinit (req);
 899 }
 900
 901 /* check that creating a request (using low-level add_cert_id) ends up
 902    with same DER as above. */
 903 static void
 904 req_addcert_id (void)
 905 {
 906   gnutls_ocsp_req_t req;
 907   int ret;
 908   gnutls_datum_t d;
 909
 910   /* init request */
 911
 912   ret = gnutls_ocsp_req_init (&req);
 913   if (ret != 0)
 914     {
 915       fail ("gnutls_ocsp_req_init\n");
 916       exit (1);
 917     }
 918
 919   /* add ocsp request nonce */
 920
 921   {
 922     gnutls_datum_t nonce =
 923       { (unsigned char*) REQ1NONCE, sizeof (REQ1NONCE) - 1 };
 924
 925     ret = gnutls_ocsp_req_set_extension (req, "1.3.6.1.5.5.7.48.1.2",
 926                                          0, &nonce);
 927     if (ret != 0)
 928       {
 929         fail ("gnutls_ocsp_req_set_extension %d\n", ret);
 930         exit (1);
 931       }
 932   }
 933
 934   /* add cert_id */
 935   {
 936     gnutls_datum_t issuer_name_hash =
 937       { (unsigned char*) REQ1INH, sizeof (REQ1INH) - 1 };
 938     gnutls_datum_t issuer_key_hash =
 939       { (unsigned char*) REQ1IKH, sizeof (REQ1IKH) - 1 };
 940     gnutls_datum_t serial_number =
 941       { (unsigned char*) REQ1SN, sizeof (REQ1SN) - 1 };
 942
 943     ret = gnutls_ocsp_req_add_cert_id (req, GNUTLS_DIG_SHA1,
 944                                       &issuer_name_hash,
 945                                       &issuer_key_hash,
 946                                       &serial_number);
 947     if (ret != 0)
 948       {
 949         fail ("gnutls_ocsp_add_cert_id %d\n", ret);
 950         exit (1);
 951       }
 952   }
 953
 954   /* print request */
 955
 956   ret = gnutls_ocsp_req_print (req, GNUTLS_OCSP_PRINT_FULL, &d);
 957   if (ret != 0)
 958     {
 959       fail ("gnutls_ocsp_req_print\n");
 960       exit (1);
 961     }
 962
 963   if (strlen (REQ1INFO) != d.size - 1 ||
 964       memcmp (REQ1INFO, d.data, strlen (REQ1INFO)) != 0)
 965     {
 966       printf ("expected (len %ld):\n%s\ngot (len %d):\n%.*s\n",
 967               strlen (REQ1INFO), REQ1INFO, (int) d.size - 1,
 968               (int) d.size, d.data);
 969       fail ("ocsp request print failed\n");
 970       exit (1);
 971     }
 972   gnutls_free (d.data);
 973
 974   /* test export */
 975   ret = gnutls_ocsp_req_export (req, &d);
 976   if (ret != 0)
 977     {
 978       fail ("gnutls_ocsp_req_export %d\n", ret);
 979       exit (1);
 980     }
 981
 982   /* compare against earlier imported bytes */
 983
 984   if (req1.size != d.size ||
 985       memcmp (req1.data, d.data, d.size) != 0)
 986     {
 987       fail ("ocsp request export memcmp failed\n");
 988       exit (1);
 989     }
 990   gnutls_free (d.data);
 991
 992   /* cleanup */
 993
 994   gnutls_ocsp_req_deinit (req);
 995 }
 996
 997 /* check that creating a request (using high-level add_cert) ends up
 998    with same DER as above. */
 999 static void
1000 req_addcert (void)
1001 {
1002   gnutls_ocsp_req_t req;
1003   int ret;
1004   gnutls_datum_t d;
1005
1006   /* init request */
1007
1008   ret = gnutls_ocsp_req_init (&req);
1009   if (ret != 0)
1010     {
1011       fail ("gnutls_ocsp_req_init\n");
1012       exit (1);
1013     }
1014
1015   /* add ocsp request nonce */
1016
1017   {
1018     gnutls_datum_t nonce =
1019       { (unsigned char*) REQ1NONCE, sizeof (REQ1NONCE) - 1 };
1020
1021     ret = gnutls_ocsp_req_set_extension (req, "1.3.6.1.5.5.7.48.1.2",
1022                                          0, &nonce);
1023     if (ret != 0)
1024       {
1025         fail ("gnutls_ocsp_req_set_extension %d\n", ret);
1026         exit (1);
1027       }
1028   }
1029
1030   /* add cert_id */
1031   {
1032     gnutls_x509_crt_t issuer = NULL, subject = NULL;
1033
1034     ret = gnutls_x509_crt_init (&issuer);
1035     if (ret < 0)
1036       {
1037         fail ("gnutls_x509_crt_init (issuer) %d\n", ret);
1038         exit (1);
1039       }
1040
1041     ret = gnutls_x509_crt_init (&subject);
1042     if (ret < 0)
1043       {
1044         fail ("gnutls_x509_crt_init (subject) %d\n", ret);
1045         exit (1);
1046       }
1047
1048     ret = gnutls_x509_crt_import (issuer, &issuer_data, GNUTLS_X509_FMT_PEM);
1049     if (ret < 0)
1050       {
1051         fail ("gnutls_x509_crt_import (issuer) %d\n", ret);
1052         exit (1);
1053       }
1054
1055     ret = gnutls_x509_crt_import (subject, &subject_data, GNUTLS_X509_FMT_PEM);
1056     if (ret < 0)
1057       {
1058         fail ("gnutls_x509_crt_import (subject) %d\n", ret);
1059         exit (1);
1060       }
1061
1062     ret = gnutls_ocsp_req_add_cert (req, GNUTLS_DIG_SHA1,
1063                                     issuer, subject);
1064     if (ret != 0)
1065       {
1066         fail ("gnutls_ocsp_add_cert %d\n", ret);
1067         exit (1);
1068       }
1069
1070     gnutls_x509_crt_deinit (subject);
1071     gnutls_x509_crt_deinit (issuer);
1072   }
1073
1074   /* print request */
1075
1076   ret = gnutls_ocsp_req_print (req, GNUTLS_OCSP_PRINT_FULL, &d);
1077   if (ret != 0)
1078     {
1079       fail ("gnutls_ocsp_req_print\n");
1080       exit (1);
1081     }
1082
1083   if (strlen (REQ1INFO) != d.size - 1 ||
1084       memcmp (REQ1INFO, d.data, strlen (REQ1INFO)) != 0)
1085     {
1086       printf ("expected (len %ld):\n%s\ngot (len %d):\n%.*s\n",
1087               strlen (REQ1INFO), REQ1INFO, (int) d.size - 1,
1088               (int) d.size, d.data);
1089       fail ("ocsp request print failed\n");
1090       exit (1);
1091     }
1092   gnutls_free (d.data);
1093
1094   /* test export */
1095   ret = gnutls_ocsp_req_export (req, &d);
1096   if (ret != 0)
1097     {
1098       fail ("gnutls_ocsp_req_export %d\n", ret);
1099       exit (1);
1100     }
1101
1102   /* compare against earlier imported bytes */
1103
1104   if (req1.size != d.size ||
1105       memcmp (req1.data, d.data, d.size) != 0)
1106     {
1107       fail ("ocsp request export memcmp failed\n");
1108       exit (1);
1109     }
1110   gnutls_free (d.data);
1111
1112   /* cleanup */
1113
1114   gnutls_ocsp_req_deinit (req);
1115 }
1116
1117 static void
1118 resp_import (void)
1119 {
1120   gnutls_ocsp_resp_t resp;
1121   int ret;
1122   gnutls_datum_t d;
1123
1124   /* init response */
1125
1126   ret = gnutls_ocsp_resp_init (&resp);
1127   if (ret != 0)
1128     {
1129       fail ("gnutls_ocsp_resp_init\n");
1130       exit (1);
1131     }
1132
1133   /* import ocsp response */
1134
1135   ret = gnutls_ocsp_resp_import (resp, &resp1);
1136   if (ret != 0)
1137     {
1138       fail ("gnutls_ocsp_resp_import %d\n", ret);
1139       exit (1);
1140     }
1141
1142   /* print response */
1143
1144   ret = gnutls_ocsp_resp_print (resp, GNUTLS_OCSP_PRINT_FULL, &d);
1145   if (ret != 0)
1146     {
1147       fail ("gnutls_ocsp_resp_print\n");
1148       exit (1);
1149     }
1150
1151   if (strlen (RESP1INFO) != d.size - 1 ||
1152       memcmp (RESP1INFO, d.data, strlen (RESP1INFO)) != 0)
1153     {
1154       printf ("expected (len %ld):\n%s\ngot (len %d):\n%.*s\n",
1155               strlen (RESP1INFO), RESP1INFO, (int) d.size - 1,
1156               (int) d.size, d.data);
1157       fail ("ocsp response print failed\n");
1158       exit (1);
1159     }
1160   gnutls_free (d.data);
1161
1162   /* import ocsp response */
1163
1164   ret = gnutls_ocsp_resp_import (resp, &resp2);
1165   if (ret != 0)
1166     {
1167       fail ("gnutls_ocsp_resp_import %d\n", ret);
1168       exit (1);
1169     }
1170
1171   /* print response */
1172
1173   ret = gnutls_ocsp_resp_print (resp, GNUTLS_OCSP_PRINT_FULL, &d);
1174   if (ret != 0)
1175     {
1176       fail ("gnutls_ocsp_resp_print\n");
1177       exit (1);
1178     }
1179
1180   if (memcmp (RESP2INFO, d.data, strlen (RESP2INFO)) != 0)
1181     {
1182       printf ("expected (len %ld):\n%s\ngot (len %d):\n%.*s\n",
1183               strlen (RESP2INFO), RESP2INFO, (int) d.size - 1,
1184               (int) d.size, d.data);
1185       fail ("ocsp response print failed\n");
1186       exit (1);
1187     }
1188   gnutls_free (d.data);
1189
1190   /* cleanup */
1191
1192   gnutls_ocsp_resp_deinit (resp);
1193 }
1194
1195 static void
1196 resp_verify (void)
1197 {
1198   gnutls_ocsp_resp_t resp;
1199   int ret;
1200   gnutls_x509_crt_t cert = NULL, issuer = NULL, signer = NULL;
1201   gnutls_x509_trust_list_t list;
1202   unsigned verify;
1203
1204   /* init response */
1205
1206   ret = gnutls_ocsp_resp_init (&resp);
1207   if (ret != 0)
1208     {
1209       fail ("gnutls_ocsp_resp_init\n");
1210       exit (1);
1211     }
1212
1213   /* import ocsp response */
1214
1215   ret = gnutls_ocsp_resp_import (resp, &blog_resp);
1216   if (ret != 0)
1217     {
1218       fail ("gnutls_ocsp_resp_import %d\n", ret);
1219       exit (1);
1220     }
1221
1222   ret = gnutls_x509_crt_init (&cert);
1223   if (ret < 0)
1224     {
1225       fail ("gnutls_x509_crt_init (cert) %d\n", ret);
1226       exit (1);
1227     }
1228
1229   ret = gnutls_x509_crt_init (&issuer);
1230   if (ret < 0)
1231     {
1232       fail ("gnutls_x509_crt_init (issuer) %d\n", ret);
1233       exit (1);
1234     }
1235
1236   ret = gnutls_x509_crt_init (&signer);
1237   if (ret < 0)
1238     {
1239       fail ("gnutls_x509_crt_init (signer) %d\n", ret);
1240       exit (1);
1241     }
1242
1243   ret = gnutls_x509_crt_import (cert, &blog_cert_data, GNUTLS_X509_FMT_PEM);
1244   if (ret < 0)
1245     {
1246       fail ("gnutls_x509_crt_import (cert) %d\n", ret);
1247       exit (1);
1248     }
1249
1250   ret = gnutls_x509_crt_import (issuer, &blog_issuer_data, GNUTLS_X509_FMT_PEM);
1251   if (ret < 0)
1252     {
1253       fail ("gnutls_x509_crt_import (issuer) %d\n", ret);
1254       exit (1);
1255     }
1256
1257   ret = gnutls_x509_crt_import (signer, &blog_signer_data, GNUTLS_X509_FMT_PEM);
1258   if (ret < 0)
1259     {
1260       fail ("gnutls_x509_crt_import (signer) %d\n", ret);
1261       exit (1);
1262     }
1263
1264   /* check direct verify with signer (should succeed) */
1265
1266   ret = gnutls_ocsp_resp_verify_direct (resp, signer, &verify, 0);
1267   if (ret < 0)
1268     {
1269       fail ("gnutls_ocsp_resp_verify_direct (signer) %d\n", ret);
1270       exit (1);
1271     }
1272
1273   if (verify != 0)
1274     {
1275       fail ("gnutls_ocsp_resp_verify_direct %d\n", verify);
1276       exit (1);
1277     }
1278
1279   /* check direct verify with cert (should fail) */
1280
1281   ret = gnutls_ocsp_resp_verify_direct (resp, cert, &verify, 0);
1282   if (ret < 0)
1283     {
1284       fail ("gnutls_ocsp_resp_verify_direct (cert) %d\n", ret);
1285       exit (1);
1286     }
1287
1288   if (verify != GNUTLS_OCSP_VERIFY_UNTRUSTED_SIGNER)
1289     {
1290       fail ("gnutls_ocsp_resp_verify_direct3 %d\n", verify);
1291       exit (1);
1292     }
1293
1294   /* check trust verify with issuer (should succeed) */
1295
1296   ret = gnutls_x509_trust_list_init (&list, 0);
1297   if (ret < 0)
1298     {
1299       fail ("gnutls_x509_trust_list_init %d\n", ret);
1300       exit (1);
1301     }
1302
1303   ret = gnutls_x509_trust_list_add_cas (list, &issuer, 1, 0);
1304   if (ret < 0)
1305     {
1306       fail ("gnutls_x509_trust_list_add_cas %d\n", ret);
1307       exit (1);
1308     }
1309
1310   ret = gnutls_ocsp_resp_verify (resp, list, &verify, 0);
1311   if (ret < 0)
1312     {
1313       fail ("gnutls_ocsp_resp_verify (issuer) %d\n", ret);
1314       exit (1);
1315     }
1316
1317   if (verify != 0)
1318     {
1319       fail ("gnutls_ocsp_resp_verify %d\n", verify);
1320       exit (1);
1321     }
1322
1323   gnutls_x509_trust_list_deinit (list, 0);
1324
1325   /* check trust verify with signer (should succeed) */
1326
1327   ret = gnutls_x509_trust_list_init (&list, 0);
1328   if (ret < 0)
1329     {
1330       fail ("gnutls_x509_trust_list_init %d\n", ret);
1331       exit (1);
1332     }
1333
1334   ret = gnutls_x509_trust_list_add_cas (list, &signer, 1, 0);
1335   if (ret < 0)
1336     {
1337       fail ("gnutls_x509_trust_list_add_cas %d\n", ret);
1338       exit (1);
1339     }
1340
1341   ret = gnutls_ocsp_resp_verify (resp, list, &verify, 0);
1342   if (ret < 0)
1343     {
1344       fail ("gnutls_ocsp_resp_verify (issuer) %d\n", ret);
1345       exit (1);
1346     }
1347
1348   if (verify != 0)
1349     {
1350       fail ("gnutls_ocsp_resp_verify %d\n", verify);
1351       exit (1);
1352     }
1353
1354   gnutls_x509_trust_list_deinit (list, 0);
1355
1356   /* check trust verify with cert (should fail) */
1357
1358   ret = gnutls_x509_trust_list_init (&list, 0);
1359   if (ret < 0)
1360     {
1361       fail ("gnutls_x509_trust_list_init %d\n", ret);
1362       exit (1);
1363     }
1364
1365   ret = gnutls_x509_trust_list_add_cas (list, &cert, 1, 0);
1366   if (ret < 0)
1367     {
1368       fail ("gnutls_x509_trust_list_add_cas %d\n", ret);
1369       exit (1);
1370     }
1371
1372   ret = gnutls_ocsp_resp_verify (resp, list, &verify, 0);
1373   if (ret < 0)
1374     {
1375       fail ("gnutls_ocsp_resp_verify (issuer) %d\n", ret);
1376       exit (1);
1377     }
1378
1379   if (verify != GNUTLS_OCSP_VERIFY_UNTRUSTED_SIGNER)
1380     {
1381       fail ("gnutls_ocsp_resp_verify %d\n", verify);
1382       exit (1);
1383     }
1384
1385   gnutls_x509_trust_list_deinit (list, 0);
1386
1387   /* check trust verify with all certs (should succeed) */
1388
1389   ret = gnutls_x509_trust_list_init (&list, 0);
1390   if (ret < 0)
1391     {
1392       fail ("gnutls_x509_trust_list_init %d\n", ret);
1393       exit (1);
1394     }
1395
1396   ret = gnutls_x509_trust_list_add_cas (list, &cert, 1, 0);
1397   if (ret < 0)
1398     {
1399       fail ("gnutls_x509_trust_list_add_cas %d\n", ret);
1400       exit (1);
1401     }
1402
1403   ret = gnutls_x509_trust_list_add_cas (list, &issuer, 1, 0);
1404   if (ret < 0)
1405     {
1406       fail ("gnutls_x509_trust_list_add_cas %d\n", ret);
1407       exit (1);
1408     }
1409
1410   ret = gnutls_x509_trust_list_add_cas (list, &signer, 1, 0);
1411   if (ret < 0)
1412     {
1413       fail ("gnutls_x509_trust_list_add_cas %d\n", ret);
1414       exit (1);
1415     }
1416
1417   ret = gnutls_ocsp_resp_verify (resp, list, &verify, 0);
1418   if (ret < 0)
1419     {
1420       fail ("gnutls_ocsp_resp_verify (issuer) %d\n", ret);
1421       exit (1);
1422     }
1423
1424   if (verify != 0)
1425     {
1426       fail ("gnutls_ocsp_resp_verify %d\n", verify);
1427       exit (1);
1428     }
1429
1430   gnutls_x509_trust_list_deinit (list, 0);
1431
1432   /* cleanup */
1433
1434   gnutls_ocsp_resp_deinit (resp);
1435   gnutls_x509_crt_deinit (cert);
1436   gnutls_x509_crt_deinit (issuer);
1437   gnutls_x509_crt_deinit (signer);
1438 }
1439
1440 void
1441 doit (void)
1442 {
1443   int ret;
1444
1445   ret = gnutls_global_init ();
1446   if (ret < 0)
1447     {
1448       fail ("gnutls_global_init\n");
1449       exit (1);
1450     }
1451
1452   gnutls_global_set_log_function (tls_log_func);
1453   gnutls_global_set_log_level (0);
1454
1455   ocsp_invalid_calls ();
1456   req_parse ();
1457   resp_import ();
1458   req_addcert_id ();
1459   req_addcert ();
1460   resp_verify ();
1461
1462   /* we're done */
1463
1464   gnutls_global_deinit ();
1465 }