/*

 * This product includes cryptographic software developed by the OpenSSL

 * Project for use in the OpenSSL Toolkit (http://www.openssl.org/). This

 * product includes cryptographic software written by Eric Young

 * ([email protected]).

 */

/*

 * ====================================================================

 * Copyright (c) 1998-2011 The OpenSSL Project.  All rights reserved.

 *

 * Redistribution and use in source and binary forms, with or without

 * modification, are permitted provided that the following conditions

 * are met:

 *

 * 1. Redistributions of source code must retain the above copyright

 *    notice, this list of conditions and the following disclaimer.

 *

 * 2. Redistributions in binary form must reproduce the above copyright

 *    notice, this list of conditions and the following disclaimer in

 *    the documentation and/or other materials provided with the

 *    distribution.

 *

 * 3. All advertising materials mentioning features or use of this

 *    software must display the following acknowledgment:

 *    "This product includes software developed by the OpenSSL Project

 *    for use in the OpenSSL Toolkit. (http://www.openssl.org/)"

 *

 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to

 *    endorse or promote products derived from this software without

 *    prior written permission. For written permission, please contact

 *    [email protected].

 *

 * 5. Products derived from this software may not be called "OpenSSL"

 *    nor may "OpenSSL" appear in their names without prior written

 *    permission of the OpenSSL Project.

 *

 * 6. Redistributions of any form whatsoever must retain the following

 *    acknowledgment:

 *    "This product includes software developed by the OpenSSL Project

 *    for use in the OpenSSL Toolkit (http://www.openssl.org/)"

 *

 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY

 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE

 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR

 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR

 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,

 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT

 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;

 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)

 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,

 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)

 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED

 * OF THE POSSIBILITY OF SUCH DAMAGE.

 * ====================================================================

 */

/*

 * Copyright (c) 2011, 2012, Oracle and/or its affiliates. All rights reserved.

 */

/*

 * This engine supports SPARC microprocessors that provide AES and other

 * cipher and hash instructions, such as the T4 microprocessor.

 *

 * This file implements the MD5 message digest operations.

 */

#include <openssl/opensslconf.h>

#if !defined(OPENSSL_NO_HW) && !defined(OPENSSL_NO_HW_MD_T4)

#ifndef	OPENSSL_NO_MD5

#include <sys/types.h>

#include <stdlib.h>

#include <string.h>

#include <errno.h>

#include <openssl/aes.h>

#include <openssl/engine.h>

/*

 * Solaris sys/md5.h and OpenSSL openssl/md5.h both define MD5_CTX.

 * The OpenSSL MD5_CTX has an extra "num" field at the end.

 */

#include <openssl/md5.h>

#if (defined(sun4v) || defined(__sparcv9) || defined(__sparcv8plus) || \

	defined(__sparcv8)) && !defined(OPENSSL_NO_ASM)

#define	COMPILE_HW_T4

#endif

#ifdef	COMPILE_HW_T4

/* Assembly language function; replaces C function md5_block_data_order(): */

extern void t4_md5_multiblock(MD5_CTX *ctx, const uint8_t *input,

    unsigned int input_length_in_blocks);

/* Formal declaration for functions in EVP_MD structure */

int t4_digest_init_md5(EVP_MD_CTX *ctx);

int t4_digest_update_md5(EVP_MD_CTX *ctx, const void *data, size_t count);

int t4_digest_final_md5(EVP_MD_CTX *ctx, unsigned char *md);

int t4_digest_copy_md5(EVP_MD_CTX *to, const EVP_MD_CTX *from);

/*

 * MD5 Message Digests

 *

 * OpenSSL's libcrypto EVP stuff. This is how this engine gets wired to EVP.

 * EVP_MD is defined in evp.h.  To maintain binary compatibility the

 * definition cannot be modified.

 * Stuff specific to the t4 engine is kept in t4_cipher_ctx_t, which is

 * pointed to by the last field, app_data.

 *

 * Fields: type, pkey_type, md_size, flags,

 *	init(), update(), final(),

 *	copy(), cleanup(), sign(), verify(),

 *	required_pkey_type, block_size, ctx_size, md5_ctrl()

 */

const EVP_MD t4_md5 = {

	NID_md5, NID_md5WithRSAEncryption, MD5_DIGEST_LENGTH,

	0,

	t4_digest_init_md5, t4_digest_update_md5, t4_digest_final_md5,

	t4_digest_copy_md5, NULL,

	EVP_PKEY_RSA_method, MD5_CBLOCK,

	sizeof (MD5_CTX), NULL

	};

/* These functions are implemented in md32_common.h: */

static int t4_md5_update(MD5_CTX *c, const void *data_, size_t len);

static void t4_md5_transform(MD5_CTX *c, const unsigned char *data);

static int t4_md5_final(unsigned char *md, MD5_CTX *c);

#pragma inline(t4_md5_update, t4_md5_transform, t4_md5_final)

#define	DATA_ORDER_IS_LITTLE_ENDIAN

/* HASH_LONG/MD5_LONG is a 32-bit unsigned: */

#define	HASH_LONG		MD5_LONG

#define	HASH_CTX		MD5_CTX

#define	HASH_CBLOCK		MD5_CBLOCK

#define	HASH_UPDATE		t4_md5_update

#define	HASH_TRANSFORM		t4_md5_transform

#define	HASH_FINAL		t4_md5_final

#define	HASH_BLOCK_DATA_ORDER	t4_md5_multiblock

/* Hash is already byte-swapped as Little Endian for SPARC T4: */

#define	HASH_MAKE_STRING(c, s)	memcpy((s), (c), MD5_DIGEST_LENGTH);

/* This defines HASH_UPDATE, HASH_TRANSFORM, HASH_FINAL functions: */

#include "md32_common.h"

/*

 * MD5 functions (RFC 1321 The MD5 Message-Digest Algorithm)

 */

int

t4_digest_init_md5(EVP_MD_CTX *ctx)

{

	MD5_CTX	*c = (MD5_CTX *)ctx->md_data;

	/* Optimization: don't call memset(c, 0,...) or initialize c->data[] */

	c->Nl = c->Nh = c->num = 0;

	/* Big Endian for T4 */

	c->A = 0x01234567U;

	c->B = 0x89abcdefU;

	c->C = 0xfedcba98U;

	c->D = 0x76543210U;

	return (1);

}

/*

 * Continue MD5 digest operation, using the message block to update context.

 * MD5 crunches in 64-byte blocks.

 */

int

t4_digest_update_md5(EVP_MD_CTX *ctx, const void *data, size_t len)

{

	return (t4_md5_update((MD5_CTX *)ctx->md_data, data, len));

}

/* End MD5 digest operation, finalizing message digest and zeroing context. */

int

t4_digest_final_md5(EVP_MD_CTX *ctx, unsigned char *md)

{

	return (t4_md5_final(md, (MD5_CTX *)ctx->md_data));

}

/* Required for Engine API */

int

t4_digest_copy_md5(EVP_MD_CTX *to, const EVP_MD_CTX *from)

{

	if ((to->md_data != NULL) && (from->md_data != NULL)) {

		(void) memcpy(to->md_data, from->md_data, sizeof (MD5_CTX));

	}

	return (1);

}

#endif	/* COMPILE_HW_T4 */

#endif	/* !OPENSSL_NO_MD5 */

#endif	/* !OPENSSL_NO_HW && !OPENSSL_NO_HW_MD_T4 */