/*
* Copyright (C) 2012 Free Software Foundation, Inc.
*
* Author: Nikos Mavrogiannopoulos
*
* This file is part of GnuTLS.
*
* GnuTLS is free software; you can redistribute it and/or modify it
* under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 3 of the License, or
* (at your option) any later version.
*
* GnuTLS is distributed in the hope that it will be useful, but
* WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with GnuTLS; if not, write to the Free Software Foundation,
* Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <errno.h>
#include <gnutls/gnutls.h>
#include <unistd.h>
#include "utils.h"
#include "cert-common.h"
/* This will test whether the default public key storage backend
* is operating properly */
static void tls_log_func(int level, const char *str)
{
fprintf(stderr, "|<%d>| %s", level, str);
}
static unsigned char tofu_server_cert_pem[] =
"-----BEGIN CERTIFICATE-----\n"
"MIICVjCCAcGgAwIBAgIERiYdMTALBgkqhkiG9w0BAQUwGTEXMBUGA1UEAxMOR251\n"
"VExTIHRlc3QgQ0EwHhcNMDcwNDE4MTMyOTIxWhcNMDgwNDE3MTMyOTIxWjA3MRsw\n"
"GQYDVQQKExJHbnVUTFMgdGVzdCBzZXJ2ZXIxGDAWBgNVBAMTD3Rlc3QuZ251dGxz\n"
"Lm9yZzCBnDALBgkqhkiG9w0BAQEDgYwAMIGIAoGA17pcr6MM8C6pJ1aqU46o63+B\n"
"dUxrmL5K6rce+EvDasTaDQC46kwTHzYWk95y78akXrJutsoKiFV1kJbtple8DDt2\n"
"DZcevensf9Op7PuFZKBroEjOd35znDET/z3IrqVgbtm2jFqab7a+n2q9p/CgMyf1\n"
"tx2S5Zacc1LWn9bIjrECAwEAAaOBkzCBkDAMBgNVHRMBAf8EAjAAMBoGA1UdEQQT\n"
"MBGCD3Rlc3QuZ251dGxzLm9yZzATBgNVHSUEDDAKBggrBgEFBQcDATAPBgNVHQ8B\n"
"Af8EBQMDB6AAMB0GA1UdDgQWBBTrx0Vu5fglyoyNgw106YbU3VW0dTAfBgNVHSME\n"
"GDAWgBTpPBz7rZJu5gakViyi4cBTJ8jylTALBgkqhkiG9w0BAQUDgYEAaFEPTt+7\n"
"bzvBuOf7+QmeQcn29kT6Bsyh1RHJXf8KTk5QRfwp6ogbp94JQWcNQ/S7YDFHglD1\n"
"AwUNBRXwd3riUsMnsxgeSDxYBfJYbDLeohNBsqaPDJb7XailWbMQKfAbFQ8cnOxg\n"
"rOKLUQRWJ0K3HyXRMhbqjdLIaQiCvQLuizo=\n" "-----END CERTIFICATE-----\n";
const gnutls_datum_t tofu_server_cert = { tofu_server_cert_pem,
sizeof(tofu_server_cert_pem)
};
static char client_pem[] =
"-----BEGIN CERTIFICATE-----\n"
"MIICHjCCAYmgAwIBAgIERiYdNzALBgkqhkiG9w0BAQUwGTEXMBUGA1UEAxMOR251\n"
"VExTIHRlc3QgQ0EwHhcNMDcwNDE4MTMyOTI3WhcNMDgwNDE3MTMyOTI3WjAdMRsw\n"
"GQYDVQQDExJHbnVUTFMgdGVzdCBjbGllbnQwgZwwCwYJKoZIhvcNAQEBA4GMADCB\n"
"iAKBgLtmQ/Xyxde2jMzF3/WIO7HJS2oOoa0gUEAIgKFPXKPQ+GzP5jz37AR2ExeL\n"
"ZIkiW8DdU3w77XwEu4C5KL6Om8aOoKUSy/VXHqLnu7czSZ/ju0quak1o/8kR4jKN\n"
"zj2AC41179gAgY8oBAOgIo1hBAf6tjd9IQdJ0glhaZiQo1ipAgMBAAGjdjB0MAwG\n"
"A1UdEwEB/wQCMAAwEwYDVR0lBAwwCgYIKwYBBQUHAwIwDwYDVR0PAQH/BAUDAweg\n"
"ADAdBgNVHQ4EFgQUTLkKm/odNON+3svSBxX+odrLaJEwHwYDVR0jBBgwFoAU6Twc\n"
"+62SbuYGpFYsouHAUyfI8pUwCwYJKoZIhvcNAQEFA4GBALujmBJVZnvaTXr9cFRJ\n"
"jpfc/3X7sLUsMvumcDE01ls/cG5mIatmiyEU9qI3jbgUf82z23ON/acwJf875D3/\n"
"U7jyOsBJ44SEQITbin2yUeJMIm1tievvdNXBDfW95AM507ShzP12sfiJkJfjjdhy\n"
"dc8Siq5JojruiMizAf0pA7in\n" "-----END CERTIFICATE-----\n";
const gnutls_datum_t client_cert =
{ (void *) client_pem, sizeof(client_pem) };
#define TMP_FILE "mini-tdb.tmp"
#define HOSTS_DIR ".gnutls/"
#define HOSTS_FILE HOSTS_DIR"known_hosts"
#define SHA1_HASH "\x53\x4b\x3b\xdc\x5e\xc8\x44\x4c\x02\x20\xbf\x39\x48\x6f\x4c\xfe\xcd\x25\x52\x10"
void doit(void)
{
gnutls_datum_t der_cert, der_cert2;
gnutls_datum_t der_rawpk, der_rawpk2;
int ret;
gnutls_datum_t hash;
char path[512];
/* the sha1 hash of the server's pubkey */
hash.data = (void *) SHA1_HASH;
hash.size = sizeof(SHA1_HASH) - 1;
/* General init. */
global_init();
gnutls_global_set_log_function(tls_log_func);
if (debug)
gnutls_global_set_log_level(2);
// X.509 certificates
ret =
gnutls_pem_base64_decode_alloc("CERTIFICATE", &tofu_server_cert,
&der_cert);
if (ret < 0) {
fail("base64 decoding\n");
goto fail;
}
ret =
gnutls_pem_base64_decode_alloc("CERTIFICATE", &client_cert,
&der_cert2);
if (ret < 0) {
fail("base64 decoding\n");
goto fail;
}
// Raw public keys
ret =
gnutls_pem_base64_decode_alloc("PUBLIC KEY", &rawpk_public_key1,
&der_rawpk);
if (ret < 0) {
fail("base64 decoding\n");
goto fail;
}
ret =
gnutls_pem_base64_decode_alloc("PUBLIC KEY", &rawpk_public_key2,
&der_rawpk2);
if (ret < 0) {
fail("base64 decoding\n");
goto fail;
}
remove(HOSTS_FILE);
remove(TMP_FILE);
/* verify whether the stored hash verification succeeds */
ret = gnutls_store_commitment(TMP_FILE, NULL, "localhost", "https",
GNUTLS_DIG_SHA1, &hash, 0, GNUTLS_SCOMMIT_FLAG_ALLOW_BROKEN);
if (ret != 0) {
fail("commitment storage: %s\n", gnutls_strerror(ret));
goto fail;
}
if (debug)
success("Commitment storage: passed\n");
ret =
gnutls_verify_stored_pubkey(TMP_FILE, NULL, "localhost",
"https", GNUTLS_CRT_X509,
&der_cert, 0);
remove(TMP_FILE);
if (ret != 0) {
fail("commitment verification: %s\n",
gnutls_strerror(ret));
goto fail;
}
if (debug)
success("Commitment verification: passed\n");
/* Verify access to home dir */
#ifndef _WIN32
setenv("HOME", getcwd(path, sizeof(path)), 1);
/* verify whether the stored hash verification succeeeds */
ret = gnutls_store_commitment(NULL, NULL, "localhost", "https",
GNUTLS_DIG_SHA1, &hash, 0, GNUTLS_SCOMMIT_FLAG_ALLOW_BROKEN);
if (ret != 0) {
fail("commitment storage: %s\n", gnutls_strerror(ret));
goto fail;
}
if (debug)
success("Commitment storage: passed\n");
ret =
gnutls_verify_stored_pubkey(NULL, NULL, "localhost",
"https", GNUTLS_CRT_X509,
&der_cert, 0);
if (ret != 0) {
fail("commitment verification: %s\n",
gnutls_strerror(ret));
goto fail;
}
if (debug)
success("Commitment from homedir verification: passed\n");
#endif
/* verify whether the stored pubkey verification succeeds */
// First we test regular X.509 certs
ret = gnutls_store_pubkey(TMP_FILE, NULL, "localhost", "https",
GNUTLS_CRT_X509, &der_cert, 0, 0);
if (ret != 0) {
fail("storage: %s\n", gnutls_strerror(ret));
goto fail;
}
if (debug)
success("Public key storage (from cert): passed\n");
ret =
gnutls_verify_stored_pubkey(TMP_FILE, NULL, "localhost",
"https", GNUTLS_CRT_X509,
&der_cert, 0);
if (ret != 0) {
fail("pubkey verification (from cert): %s\n", gnutls_strerror(ret));
goto fail;
}
ret =
gnutls_verify_stored_pubkey(TMP_FILE, NULL, "localhost",
"https", GNUTLS_CRT_X509,
&der_cert2, 0);
if (ret == 0) {
fail("verification succeeded when shouldn't!\n");
goto fail;
}
if (ret != GNUTLS_E_CERTIFICATE_KEY_MISMATCH) {
fail("Wrong error code returned: %s!\n",
gnutls_strerror(ret));
goto fail;
}
if (debug)
success("Public key verification (from cert): passed\n");
// Secondly we test raw public keys
ret = gnutls_store_pubkey(TMP_FILE, NULL, "localhost", "https",
GNUTLS_CRT_RAWPK, &der_rawpk, 0, 0);
if (ret != 0) {
fail("storage: %s\n", gnutls_strerror(ret));
goto fail;
}
if (debug)
success("Public key storage (from raw pk): passed\n");
ret =
gnutls_verify_stored_pubkey(TMP_FILE, NULL, "localhost",
"https", GNUTLS_CRT_RAWPK,
&der_rawpk, 0);
if (ret != 0) {
fail("pubkey verification (from raw pk): %s\n", gnutls_strerror(ret));
goto fail;
}
ret =
gnutls_verify_stored_pubkey(TMP_FILE, NULL, "localhost",
"https", GNUTLS_CRT_RAWPK,
&der_rawpk2, 0);
if (ret == 0) {
fail("verification succeeded when shouldn't!\n");
goto fail;
}
if (ret != GNUTLS_E_CERTIFICATE_KEY_MISMATCH) {
fail("Wrong error code returned: %s!\n",
gnutls_strerror(ret));
goto fail;
}
if (debug)
success("Public key verification (from raw pk): passed\n");
remove(HOSTS_FILE);
remove(TMP_FILE);
rmdir(HOSTS_DIR);
gnutls_global_deinit();
gnutls_free(der_cert.data);
gnutls_free(der_cert2.data);
gnutls_free(der_rawpk.data);
gnutls_free(der_rawpk2.data);
return;
fail:
remove(HOSTS_FILE);
remove(TMP_FILE);
rmdir(HOSTS_DIR);
exit(1);
}