Blame lib/debug.c

Packit aea12f
/*
Packit aea12f
 * Copyright (C) 2001-2012 Free Software Foundation, Inc.
Packit aea12f
 *
Packit aea12f
 * Author: Nikos Mavrogiannopoulos
Packit aea12f
 *
Packit aea12f
 * This file is part of GnuTLS.
Packit aea12f
 *
Packit aea12f
 * The GnuTLS is free software; you can redistribute it and/or
Packit aea12f
 * modify it under the terms of the GNU Lesser General Public License
Packit aea12f
 * as published by the Free Software Foundation; either version 2.1 of
Packit aea12f
 * the License, or (at your option) any later version.
Packit aea12f
 *
Packit aea12f
 * This library is distributed in the hope that it will be useful, but
Packit aea12f
 * WITHOUT ANY WARRANTY; without even the implied warranty of
Packit aea12f
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Packit aea12f
 * Lesser General Public License for more details.
Packit aea12f
 *
Packit aea12f
 * You should have received a copy of the GNU Lesser General Public License
Packit aea12f
 * along with this program.  If not, see <https://www.gnu.org/licenses/>
Packit aea12f
 *
Packit aea12f
 */
Packit aea12f
Packit aea12f
#include "gnutls_int.h"
Packit aea12f
#include "errors.h"
Packit aea12f
#include <stdio.h>
Packit aea12f
#include <stdlib.h>
Packit aea12f
#include "debug.h"
Packit aea12f
#include <mpi.h>
Packit aea12f
Packit aea12f
#ifdef DEBUG
Packit aea12f
void _gnutls_dump_mpi(const char *prefix, bigint_t a)
Packit aea12f
{
Packit aea12f
	char buf[400];
Packit aea12f
	char buf_hex[2 * sizeof(buf) + 1];
Packit aea12f
	size_t n = sizeof buf;
Packit aea12f
Packit aea12f
	if (_gnutls_mpi_print(a, buf, &n))
Packit aea12f
		strcpy(buf, "[can't print value]");	/* Flawfinder: ignore */
Packit aea12f
	_gnutls_debug_log("MPI: length: %d\n\t%s%s\n", (int) n, prefix,
Packit aea12f
			  _gnutls_bin2hex(buf, n, buf_hex, sizeof(buf_hex),
Packit aea12f
					  NULL));
Packit aea12f
}
Packit aea12f
Packit aea12f
void
Packit aea12f
_gnutls_dump_vector(const char *prefix, const uint8_t * a, size_t a_size)
Packit aea12f
{
Packit aea12f
	char buf_hex[2 * a_size + 1];
Packit aea12f
Packit aea12f
	_gnutls_debug_log("Vector: length: %d\n\t%s%s\n", (int) a_size,
Packit aea12f
			  prefix, _gnutls_bin2hex(a, a_size, buf_hex,
Packit aea12f
						  sizeof(buf_hex), NULL));
Packit aea12f
}
Packit aea12f
#endif
Packit aea12f
Packit aea12f
const char *_gnutls_packet2str(content_type_t packet)
Packit aea12f
{
Packit aea12f
	switch (packet) {
Packit aea12f
	case GNUTLS_CHANGE_CIPHER_SPEC:
Packit aea12f
		return "ChangeCipherSpec";
Packit aea12f
	case GNUTLS_ALERT:
Packit aea12f
		return "Alert";
Packit aea12f
	case GNUTLS_HANDSHAKE:
Packit aea12f
		return "Handshake";
Packit aea12f
	case GNUTLS_APPLICATION_DATA:
Packit aea12f
		return "Application Data";
Packit aea12f
	case GNUTLS_HEARTBEAT:
Packit aea12f
		return "HeartBeat";
Packit aea12f
	default:
Packit aea12f
		return "Unknown Packet";
Packit aea12f
	}
Packit aea12f
}
Packit aea12f
Packit aea12f
/**
Packit aea12f
 * gnutls_handshake_description_get_name:
Packit aea12f
 * @type: is a handshake message description
Packit aea12f
 *
Packit aea12f
 * Convert a #gnutls_handshake_description_t value to a string.
Packit aea12f
 *
Packit aea12f
 * Returns: a string that contains the name of the specified handshake
Packit aea12f
 *   message or %NULL.
Packit aea12f
 **/
Packit aea12f
const char
Packit aea12f
    *gnutls_handshake_description_get_name(gnutls_handshake_description_t
Packit aea12f
					   type)
Packit aea12f
{
Packit aea12f
	switch (type) {
Packit aea12f
	case GNUTLS_HANDSHAKE_END_OF_EARLY_DATA:
Packit aea12f
		return "END OF EARLY DATA";
Packit aea12f
	case GNUTLS_HANDSHAKE_HELLO_RETRY_REQUEST:
Packit aea12f
		return "HELLO RETRY REQUEST";
Packit aea12f
	case GNUTLS_HANDSHAKE_HELLO_REQUEST:
Packit aea12f
		return "HELLO REQUEST";
Packit aea12f
	case GNUTLS_HANDSHAKE_CLIENT_HELLO:
Packit aea12f
		return "CLIENT HELLO";
Packit aea12f
#ifdef ENABLE_SSL2
Packit aea12f
	case GNUTLS_HANDSHAKE_CLIENT_HELLO_V2:
Packit aea12f
		return "SSL2 CLIENT HELLO";
Packit aea12f
#endif
Packit aea12f
	case GNUTLS_HANDSHAKE_SERVER_HELLO:
Packit aea12f
		return "SERVER HELLO";
Packit aea12f
	case GNUTLS_HANDSHAKE_HELLO_VERIFY_REQUEST:
Packit aea12f
		return "HELLO VERIFY REQUEST";
Packit aea12f
	case GNUTLS_HANDSHAKE_CERTIFICATE_PKT:
Packit aea12f
		return "CERTIFICATE";
Packit aea12f
	case GNUTLS_HANDSHAKE_ENCRYPTED_EXTENSIONS:
Packit aea12f
		return "ENCRYPTED EXTENSIONS";
Packit aea12f
	case GNUTLS_HANDSHAKE_SERVER_KEY_EXCHANGE:
Packit aea12f
		return "SERVER KEY EXCHANGE";
Packit aea12f
	case GNUTLS_HANDSHAKE_CERTIFICATE_REQUEST:
Packit aea12f
		return "CERTIFICATE REQUEST";
Packit aea12f
	case GNUTLS_HANDSHAKE_SERVER_HELLO_DONE:
Packit aea12f
		return "SERVER HELLO DONE";
Packit aea12f
	case GNUTLS_HANDSHAKE_CERTIFICATE_VERIFY:
Packit aea12f
		return "CERTIFICATE VERIFY";
Packit aea12f
	case GNUTLS_HANDSHAKE_CLIENT_KEY_EXCHANGE:
Packit aea12f
		return "CLIENT KEY EXCHANGE";
Packit aea12f
	case GNUTLS_HANDSHAKE_FINISHED:
Packit aea12f
		return "FINISHED";
Packit aea12f
	case GNUTLS_HANDSHAKE_KEY_UPDATE:
Packit aea12f
		return "KEY_UPDATE";
Packit aea12f
	case GNUTLS_HANDSHAKE_SUPPLEMENTAL:
Packit aea12f
		return "SUPPLEMENTAL";
Packit aea12f
	case GNUTLS_HANDSHAKE_CERTIFICATE_STATUS:
Packit aea12f
		return "CERTIFICATE STATUS";
Packit aea12f
	case GNUTLS_HANDSHAKE_NEW_SESSION_TICKET:
Packit aea12f
		return "NEW SESSION TICKET";
Packit aea12f
	case GNUTLS_HANDSHAKE_CHANGE_CIPHER_SPEC:
Packit aea12f
		return "CHANGE CIPHER SPEC";
Packit aea12f
	default:
Packit aea12f
		return "Unknown Handshake packet";
Packit aea12f
	}
Packit aea12f
}