/*

 * gnome-keyring

 *

 * Copyright (C) 2010 Stefan Walter

 *

 * This program is free software; you can redistribute it and/or modify

 * it under the terms of the GNU Lesser General Public License as

 * published by the Free Software Foundation; either version 2.1 of

 * the License, or (at your option) any later version.

 *

 * This program 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

 * Lesser General Public License for more details.

 *

 * You should have received a copy of the GNU Lesser General Public

 * License along with this program; if not, see <http://www.gnu.org/licenses/>.

 */

#include "config.h"

#include "gck-test.h"

#include <p11-kit/pkcs11.h>

#include <glib.h>

#include <string.h>

static const gchar*

defined_rv_to_string (CK_RV rv)

{

	#define GKM_X(rv) case rv: return #rv;

	switch (rv) {

	/* These are not really errors, or not current */

	GKM_X (CKR_OK)

	GKM_X (CKR_NO_EVENT)

	GKM_X (CKR_FUNCTION_NOT_PARALLEL)

	GKM_X (CKR_SESSION_PARALLEL_NOT_SUPPORTED)

	GKM_X (CKR_CANCEL)

	GKM_X (CKR_FUNCTION_CANCELED)

	GKM_X (CKR_HOST_MEMORY)

	GKM_X (CKR_SLOT_ID_INVALID)

	GKM_X (CKR_GENERAL_ERROR)

	GKM_X (CKR_FUNCTION_FAILED)

	GKM_X (CKR_ARGUMENTS_BAD)

	GKM_X (CKR_NEED_TO_CREATE_THREADS)

	GKM_X (CKR_CANT_LOCK)

	GKM_X (CKR_ATTRIBUTE_READ_ONLY)

	GKM_X (CKR_ATTRIBUTE_SENSITIVE)

	GKM_X (CKR_ATTRIBUTE_TYPE_INVALID)

	GKM_X (CKR_ATTRIBUTE_VALUE_INVALID)

	GKM_X (CKR_DATA_INVALID)

	GKM_X (CKR_DATA_LEN_RANGE)

	GKM_X (CKR_DEVICE_ERROR)

	GKM_X (CKR_DEVICE_MEMORY)

	GKM_X (CKR_DEVICE_REMOVED)

	GKM_X (CKR_ENCRYPTED_DATA_INVALID)

	GKM_X (CKR_ENCRYPTED_DATA_LEN_RANGE)

	GKM_X (CKR_FUNCTION_NOT_SUPPORTED)

	GKM_X (CKR_KEY_HANDLE_INVALID)

	GKM_X (CKR_KEY_SIZE_RANGE)

	GKM_X (CKR_KEY_TYPE_INCONSISTENT)

	GKM_X (CKR_KEY_NOT_NEEDED)

	GKM_X (CKR_KEY_CHANGED)

	GKM_X (CKR_KEY_NEEDED)

	GKM_X (CKR_KEY_INDIGESTIBLE)

	GKM_X (CKR_KEY_FUNCTION_NOT_PERMITTED)

	GKM_X (CKR_KEY_NOT_WRAPPABLE)

	GKM_X (CKR_KEY_UNEXTRACTABLE)

	GKM_X (CKR_MECHANISM_INVALID)

	GKM_X (CKR_MECHANISM_PARAM_INVALID)

	GKM_X (CKR_OBJECT_HANDLE_INVALID)

	GKM_X (CKR_OPERATION_ACTIVE)

	GKM_X (CKR_OPERATION_NOT_INITIALIZED)

	GKM_X (CKR_PIN_INCORRECT)

	GKM_X (CKR_PIN_INVALID)

	GKM_X (CKR_PIN_LEN_RANGE)

	GKM_X (CKR_PIN_EXPIRED)

	GKM_X (CKR_PIN_LOCKED)

	GKM_X (CKR_SESSION_CLOSED)

	GKM_X (CKR_SESSION_COUNT)

	GKM_X (CKR_SESSION_HANDLE_INVALID)

	GKM_X (CKR_SESSION_READ_ONLY)

	GKM_X (CKR_SESSION_EXISTS)

	GKM_X (CKR_SESSION_READ_ONLY_EXISTS)

	GKM_X (CKR_SESSION_READ_WRITE_SO_EXISTS)

	GKM_X (CKR_SIGNATURE_INVALID)

	GKM_X (CKR_SIGNATURE_LEN_RANGE)

	GKM_X (CKR_TEMPLATE_INCOMPLETE)

	GKM_X (CKR_TEMPLATE_INCONSISTENT)

	GKM_X (CKR_TOKEN_NOT_PRESENT)

	GKM_X (CKR_TOKEN_NOT_RECOGNIZED)

	GKM_X (CKR_TOKEN_WRITE_PROTECTED)

	GKM_X (CKR_UNWRAPPING_KEY_HANDLE_INVALID)

	GKM_X (CKR_UNWRAPPING_KEY_SIZE_RANGE)

	GKM_X (CKR_UNWRAPPING_KEY_TYPE_INCONSISTENT)

	GKM_X (CKR_USER_ALREADY_LOGGED_IN)

	GKM_X (CKR_USER_NOT_LOGGED_IN)

	GKM_X (CKR_USER_PIN_NOT_INITIALIZED)

	GKM_X (CKR_USER_TYPE_INVALID)

	GKM_X (CKR_USER_ANOTHER_ALREADY_LOGGED_IN)

	GKM_X (CKR_USER_TOO_MANY_TYPES)

	GKM_X (CKR_WRAPPED_KEY_INVALID)

	GKM_X (CKR_WRAPPED_KEY_LEN_RANGE)

	GKM_X (CKR_WRAPPING_KEY_HANDLE_INVALID)

	GKM_X (CKR_WRAPPING_KEY_SIZE_RANGE)

	GKM_X (CKR_WRAPPING_KEY_TYPE_INCONSISTENT)

	GKM_X (CKR_RANDOM_SEED_NOT_SUPPORTED)

	GKM_X (CKR_RANDOM_NO_RNG)

	GKM_X (CKR_DOMAIN_PARAMS_INVALID)

	GKM_X (CKR_BUFFER_TOO_SMALL)

	GKM_X (CKR_SAVED_STATE_INVALID)

	GKM_X (CKR_INFORMATION_SENSITIVE)

	GKM_X (CKR_STATE_UNSAVEABLE)

	GKM_X (CKR_CRYPTOKI_NOT_INITIALIZED)

	GKM_X (CKR_CRYPTOKI_ALREADY_INITIALIZED)

	GKM_X (CKR_MUTEX_BAD)

	GKM_X (CKR_MUTEX_NOT_LOCKED)

	GKM_X (CKR_FUNCTION_REJECTED)

	default:

		return NULL;

	}

	#undef GKM_X

}

static gchar*

rv_to_string (CK_RV rv)

{

	gchar *string = g_strdup (defined_rv_to_string (rv));

	if (string == NULL)

		string = g_strdup_printf ("0x%08lx", (gulong)rv);

	return string;

}

void

gck_assertion_message_cmprv (const gchar *domain, const gchar *file, gint line,

                             const gchar *func, const gchar *expr,

                             CK_RV arg1, const gchar *cmp, CK_RV arg2)

{

	gchar *a1, *a2, *s;

	a1 = rv_to_string (arg1);

	a2 = rv_to_string (arg2);

	s = g_strdup_printf ("assertion failed (%s): (%s %s %s)", expr, a1, cmp, a2);

	g_free (a1);

	g_free (a2);

	g_assertion_message (domain, file, line, func, s);

	g_free (s);

}

void

gck_assertion_message_cmpulong (const gchar *domain, const gchar *file, gint line,

                                const gchar *func, const gchar *expr,

                                CK_ULONG arg1, const gchar *cmp, CK_ULONG arg2)

{

	char *s = NULL;

	s = g_strdup_printf ("assertion failed (%s): (0x%08llx %s 0x%08llx)", expr,

	                     (long long unsigned)arg1, cmp, (long long unsigned)arg2);

	g_assertion_message (domain, file, line, func, s);

	g_free (s);

}