tests/infoaccess.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/x509.h>
  32
  33 #include "utils.h"
  34
  35 static char cert_with_aia_data[] =
  36   "-----BEGIN CERTIFICATE-----\n"
  37   "MIIF0DCCBLigAwIBAgIEOrZQizANBgkqhkiG9w0BAQUFADB/MQswCQYDVQQGEwJC\n"
  38   "TTEZMBcGA1UEChMQUXVvVmFkaXMgTGltaXRlZDElMCMGA1UECxMcUm9vdCBDZXJ0\n"
  39   "aWZpY2F0aW9uIEF1dGhvcml0eTEuMCwGA1UEAxMlUXVvVmFkaXMgUm9vdCBDZXJ0\n"
  40   "aWZpY2F0aW9uIEF1dGhvcml0eTAeFw0wMTAzMTkxODMzMzNaFw0yMTAzMTcxODMz\n"
  41   "MzNaMH8xCzAJBgNVBAYTAkJNMRkwFwYDVQQKExBRdW9WYWRpcyBMaW1pdGVkMSUw\n"
  42   "IwYDVQQLExxSb290IENlcnRpZmljYXRpb24gQXV0aG9yaXR5MS4wLAYDVQQDEyVR\n"
  43   "dW9WYWRpcyBSb290IENlcnRpZmljYXRpb24gQXV0aG9yaXR5MIIBIjANBgkqhkiG\n"
  44   "9w0BAQEFAAOCAQ8AMIIBCgKCAQEAv2G1lVO6V/z68mcLOhrfEYBklbTRvM16z/Yp\n"
  45   "li4kVEAkOPcahdxYTMukJ0KX0J+DisPkBgNbAKVRHnAEdOLB1Dqr1607BxgFjv2D\n"
  46   "rOpm2RgbaIr1VxqYuvXtdj182d6UajtLF8HVj71lODqV0D1VNk7feVcxKh7YWWVJ\n"
  47   "WCCYfqtffp/p1k3sg3Spx2zY7ilKhSoGFPlU5tPaZQeLYzcS19Dsw3sgQUSj7cug\n"
  48   "F+FxZc4dZjH3dgEZyH0DWLaVSR2mEiboxgx24ONmy+pdpibu5cxfvWenAScOospU\n"
  49   "xbF6lR1xHkopigPcakXBpBlebzbNw6Kwt/5cOOJSvPhEQ+aQuwIDAQABo4ICUjCC\n"
  50   "Ak4wPQYIKwYBBQUHAQEEMTAvMC0GCCsGAQUFBzABhiFodHRwczovL29jc3AucXVv\n"
  51   "dmFkaXNvZmZzaG9yZS5jb20wDwYDVR0TAQH/BAUwAwEB/zCCARoGA1UdIASCAREw\n"
  52   "ggENMIIBCQYJKwYBBAG+WAABMIH7MIHUBggrBgEFBQcCAjCBxxqBxFJlbGlhbmNl\n"
  53   "IG9uIHRoZSBRdW9WYWRpcyBSb290IENlcnRpZmljYXRlIGJ5IGFueSBwYXJ0eSBh\n"
  54   "c3N1bWVzIGFjY2VwdGFuY2Ugb2YgdGhlIHRoZW4gYXBwbGljYWJsZSBzdGFuZGFy\n"
  55   "ZCB0ZXJtcyBhbmQgY29uZGl0aW9ucyBvZiB1c2UsIGNlcnRpZmljYXRpb24gcHJh\n"
  56   "Y3RpY2VzLCBhbmQgdGhlIFF1b1ZhZGlzIENlcnRpZmljYXRlIFBvbGljeS4wIgYI\n"
  57   "KwYBBQUHAgEWFmh0dHA6Ly93d3cucXVvdmFkaXMuYm0wHQYDVR0OBBYEFItLbe3T\n"
  58   "KbkGGew5Oanwl4Rqy+/fMIGuBgNVHSMEgaYwgaOAFItLbe3TKbkGGew5Oanwl4Rq\n"
  59   "y+/foYGEpIGBMH8xCzAJBgNVBAYTAkJNMRkwFwYDVQQKExBRdW9WYWRpcyBMaW1p\n"
  60   "dGVkMSUwIwYDVQQLExxSb290IENlcnRpZmljYXRpb24gQXV0aG9yaXR5MS4wLAYD\n"
  61   "VQQDEyVRdW9WYWRpcyBSb290IENlcnRpZmljYXRpb24gQXV0aG9yaXR5ggQ6tlCL\n"
  62   "MA4GA1UdDwEB/wQEAwIBBjANBgkqhkiG9w0BAQUFAAOCAQEAitQUtf70mpKnGdSk\n"
  63   "fnIYj9lofFIk3WdvOXrEql494liwTXCYhGHoG+NpGA7O+0dQoE7/8CQfvbLO9Sf8\n"
  64   "7C9TqnN7Az10buYWnuulLsS/VidQK2K6vkscPFVcQR0kvoIgR13VRH56FmjffU1R\n"
  65   "cHhXHTMe/QKZnAzNCgVPx7uOpHX6Sm2xgI4JVrmcGmD+XcHXetwReNDWXcG31a0y\n"
  66   "mQM6isxUJTkxgXsTIlG6Rmyhu576BGxJJnSP0nPrzDCi5upZIof4l/UO/erMkqQW\n"
  67   "xFIY6iHOsfHmhIHluqmGKPJDWl0Snawe2ajlCmqnf6CHKc/yiU3U7MXi5nrQNiOK\n"
  68   "SnQ2+Q==\n"
  69   "-----END CERTIFICATE-----\n";
  70
  71 const gnutls_datum_t cert_with_aia = {
  72   (void*)cert_with_aia_data, sizeof (cert_with_aia_data)
  73 };
  74
  75 void
  76 doit (void)
  77 {
  78   gnutls_x509_crt_t crt;
  79   int ret;
  80   gnutls_datum_t data;
  81   unsigned int critical;
  82
  83   ret = gnutls_global_init ();
  84   if (ret < 0)
  85     {
  86       fail ("gnutls_global_init\n");
  87       exit (1);
  88     }
  89
  90   ret = gnutls_x509_crt_init (&crt);
  91   if (ret != 0)
  92     {
  93       fail ("gnutls_x509_crt_init\n");
  94       exit (1);
  95     }
  96
  97   ret = gnutls_x509_crt_import (crt, &cert_with_aia, GNUTLS_X509_FMT_PEM);
  98   if (ret < 0)
  99     {
 100       fail ("gnutls_x509_crt_import\n");
 101       exit (1);
 102     }
 103
 104   /* test null input */
 105   ret = gnutls_x509_crt_get_authority_info_access (NULL, 0, 0, NULL, NULL);
 106   if (ret != GNUTLS_E_INVALID_REQUEST)
 107     {
 108       fail ("gnutls_x509_crt_get_authority_info_access null input\n");
 109       exit (1);
 110     }
 111
 112   /* test unused enum */
 113   ret = gnutls_x509_crt_get_authority_info_access (crt, 0, 44, NULL, NULL);
 114   if (ret != GNUTLS_E_INVALID_REQUEST)
 115     {
 116       fail ("gnutls_x509_crt_get_authority_info_access insane input\n");
 117       exit (1);
 118     }
 119
 120   /* test basic query with null output */
 121   ret = gnutls_x509_crt_get_authority_info_access
 122     (crt, 0, GNUTLS_IA_ACCESSMETHOD_OID, NULL, NULL);
 123   if (ret < 0)
 124     {
 125       fail ("gnutls_x509_crt_get_authority_info_access "
 126             "GNUTLS_IA_ACCESSMETHOD_OID null output critical\n");
 127       exit (1);
 128     }
 129
 130   /* test same as previous but also check that critical flag is
 131      correct */
 132   ret = gnutls_x509_crt_get_authority_info_access
 133     (crt, 0, GNUTLS_IA_ACCESSMETHOD_OID, NULL, &critical);
 134   if (ret < 0)
 135     {
 136       fail ("gnutls_x509_crt_get_authority_info_access "
 137             "GNUTLS_IA_ACCESSMETHOD_OID null output\n");
 138       exit (1);
 139     }
 140
 141   if (critical != 0)
 142     {
 143       fail ("gnutls_x509_crt_get_authority_info_access "
 144             "critical failed: %d\n", critical);
 145       exit (1);
 146     }
 147
 148   /* basic query of another type */
 149   ret = gnutls_x509_crt_get_authority_info_access
 150     (crt, 0, GNUTLS_IA_ACCESSLOCATION_GENERALNAME_TYPE, NULL, NULL);
 151   if (ret < 0)
 152     {
 153       fail ("gnutls_x509_crt_get_authority_info_access "
 154             "GNUTLS_IA_ACCESSLOCATION_GENERALNAME_TYPE null output\n");
 155       exit (1);
 156     }
 157
 158   /* basic query of another type, with out-of-bound sequence */
 159   ret = gnutls_x509_crt_get_authority_info_access
 160     (crt, 1, GNUTLS_IA_ACCESSLOCATION_GENERALNAME_TYPE, NULL, NULL);
 161   if (ret != GNUTLS_E_REQUESTED_DATA_NOT_AVAILABLE)
 162     {
 163       fail ("gnutls_x509_crt_get_authority_info_access "
 164             "GNUTLS_IA_ACCESSLOCATION_GENERALNAME_TYPE out-of-bounds\n");
 165       exit (1);
 166     }
 167
 168   /* basic query and check output value */
 169   ret = gnutls_x509_crt_get_authority_info_access
 170     (crt, 0, GNUTLS_IA_ACCESSMETHOD_OID, &data, NULL);
 171   if (ret < 0)
 172     {
 173       fail ("gnutls_x509_crt_get_authority_info_access "
 174             "GNUTLS_IA_ACCESSMETHOD_OID\n");
 175       exit (1);
 176     }
 177
 178   if (memcmp ("1.3.6.1.5.5.7.48.1", data.data, data.size) != 0)
 179     {
 180       fail ("memcmp OCSP OID failed\n");
 181       exit (1);
 182     }
 183   gnutls_free (data.data);
 184
 185   /* basic query of another type and check output value */
 186   ret = gnutls_x509_crt_get_authority_info_access
 187     (crt, 0, GNUTLS_IA_ACCESSLOCATION_GENERALNAME_TYPE, &data, NULL);
 188   if (ret < 0)
 189     {
 190       fail ("gnutls_x509_crt_get_authority_info_access "
 191             "GNUTLS_IA_ACCESSLOCATION_GENERALNAME_TYPE\n");
 192       exit (1);
 193     }
 194
 195   if (memcmp ("uniformResourceIdentifier", data.data, data.size) != 0)
 196     {
 197       fail ("memcmp URI failed\n");
 198       exit (1);
 199     }
 200   gnutls_free (data.data);
 201
 202   /* specific query */
 203   ret = gnutls_x509_crt_get_authority_info_access
 204     (crt, 0, GNUTLS_IA_URI, &data, NULL);
 205   if (ret < 0)
 206     {
 207       fail ("gnutls_x509_crt_get_authority_info_access GNUTLS_IA_URI\n");
 208       exit (1);
 209     }
 210
 211   if (memcmp ("https://ocsp.quovadisoffshore.com", data.data, data.size) != 0)
 212     {
 213       fail ("memcmp URI value failed\n");
 214       exit (1);
 215     }
 216   gnutls_free (data.data);
 217
 218   /* even more specific query */
 219   ret = gnutls_x509_crt_get_authority_info_access
 220     (crt, 0, GNUTLS_IA_OCSP_URI, &data, NULL);
 221   if (ret < 0)
 222     {
 223       fail ("gnutls_x509_crt_get_authority_info_access GNUTLS_IA_OCSP_URI\n");
 224       exit (1);
 225     }
 226
 227   if (memcmp ("https://ocsp.quovadisoffshore.com", data.data, data.size) != 0)
 228     {
 229       fail ("memcmp URI value failed\n");
 230       exit (1);
 231     }
 232   gnutls_free (data.data);
 233
 234   gnutls_x509_crt_deinit (crt);
 235
 236   gnutls_global_deinit ();
 237
 238 }