sl@0: /*
sl@0: * Copyright (c) 2005-2009 Nokia Corporation and/or its subsidiary(-ies).
sl@0: * All rights reserved.
sl@0: * This component and the accompanying materials are made available
sl@0: * under the terms of the License "Eclipse Public License v1.0"
sl@0: * which accompanies this distribution, and is available
sl@0: * at the URL "http://www.eclipse.org/legal/epl-v10.html".
sl@0: *
sl@0: * Initial Contributors:
sl@0: * Nokia Corporation - initial contribution.
sl@0: *
sl@0: * Contributors:
sl@0: *
sl@0: * Description: 
sl@0: *
sl@0: */
sl@0: 
sl@0: 
sl@0: 
sl@0: 
sl@0: /**
sl@0:  @file
sl@0: */
sl@0: 
sl@0: #include "utils.h"
sl@0: #include <openssl/crypto.h>
sl@0: #include <openssl/err.h>
sl@0: #include <openssl/rand.h>
sl@0: 
sl@0: void printBN(BIGNUM* bn)
sl@0:     {
sl@0:     char* text = BN_bn2hex(bn);
sl@0:     printf("%s", text);
sl@0:     OPENSSL_free(text);
sl@0:     }
sl@0: 
sl@0: void printBin(char* data, int len)
sl@0:     {
sl@0:     BIGNUM* bn = BN_new();
sl@0:     bn = BN_bin2bn(data, len, bn);
sl@0:     printBN(bn);
sl@0:     BN_free(bn);
sl@0:     }
sl@0: 
sl@0: static int vectorNumber = 1;
sl@0: 
sl@0: /**
sl@0:  * Print the first few lines of the action block.
sl@0:  */
sl@0: 
sl@0: void printActionHeader(char* name, char* type)
sl@0:     {
sl@0:     printf("<action>\n");
sl@0:     printf("\t<actionname>%s %i (%s)</actionname>\n", name, vectorNumber++, type);
sl@0:     printf("\t<actiontype>%s</actiontype>\n", type);
sl@0:     printf("\t<actionbody>\n");
sl@0:     } 
sl@0: 
sl@0: /**
sl@0:  * Print the last few lines of the action block.
sl@0:  */
sl@0: 
sl@0: void printActionFooter(BOOL passes)
sl@0:     {
sl@0:     printf("\t</actionbody>\n");
sl@0:     printf("\t<actionresult>\n");
sl@0:     printf("\t\t<result>%s</result>\n", passes ? "ETrue" : "EFalse");
sl@0:     printf("\t</actionresult>\n");
sl@0:     printf("</action>\n");
sl@0:     }
sl@0: 
sl@0: /**
sl@0:  * Print an element containg hex data.
sl@0:  */
sl@0: 
sl@0: void printHexElement(char* name, unsigned char* data, int len)
sl@0:     {
sl@0:     printf("\t\t<%s>", name);
sl@0:     printBin(data, len);
sl@0:     printf("</%s>\n", name);
sl@0:     }
sl@0: 
sl@0: /**
sl@0:  * Print an element containg hex data.
sl@0:  */
sl@0: 
sl@0: void printBNElement(char* name, BIGNUM* num)
sl@0:     {
sl@0:     printf("\t\t<%s>", name);
sl@0:     printBN(num);
sl@0:     printf("</%s>\n", name);
sl@0:     }
sl@0: 
sl@0: /**
sl@0:  * Scramble some data - used for generating tests that we expect to fail.
sl@0:  */
sl@0: 
sl@0: void scramble(unsigned char* data, int len)
sl@0:     {
sl@0:     int i;
sl@0:     for (i = 0 ; i < len ; ++ i)
sl@0:         data[i] ^= i;
sl@0:     }
sl@0: 
sl@0: /**
sl@0:  * Print an openssl error and exit.
sl@0:  */
sl@0: 
sl@0: void processError()
sl@0:     {
sl@0:     unsigned long err = ERR_get_error();
sl@0:     ERR_load_crypto_strings();
sl@0:     printf("Openssl error: %s\n", ERR_error_string(err, NULL));
sl@0:     exit(1);
sl@0:     }
sl@0: 
sl@0: ////////////////////////////////////////////////////////////////////////////////
sl@0: // Random stuff
sl@0: ////////////////////////////////////////////////////////////////////////////////
sl@0: 
sl@0: int random_value = 1;
sl@0: 
sl@0: void random_seed(const void* buf, int num)
sl@0:     {
sl@0:     }
sl@0: 
sl@0: int random_bytes(unsigned char *buf, int num)
sl@0:     {
sl@0:     int i;
sl@0:     for (i=0; i<num; i++)
sl@0: 			buf[i]=random_value++;
sl@0: 
sl@0:     return(1);
sl@0:     }
sl@0: 
sl@0: void random_cleanup(void)
sl@0:     {
sl@0:     }
sl@0: 
sl@0: void random_add(const void *buf, int num, double entropy)
sl@0:     {
sl@0:     }
sl@0: 
sl@0: int random_pseudorand(unsigned char *buf, int num)
sl@0:     {
sl@0:     return 1;
sl@0:     }
sl@0: 
sl@0: int random_status(void)
sl@0:     {
sl@0:     return 1;
sl@0:     }
sl@0: 
sl@0: RAND_METHOD ourRNG = {random_seed, random_bytes, random_cleanup, random_add, random_pseudorand, random_status};
sl@0: 
sl@0: void testOurRandom()
sl@0:     {
sl@0:     char data[16];
sl@0:     int i;
sl@0: 
sl@0:     RAND_bytes(data, 16);
sl@0: 
sl@0:     for (i = 0 ; i < 16 ; ++i)
sl@0:         {
sl@0:         if (data[i] != i + 1)
sl@0:             {
sl@0:             printf("Random number generator not crippled\n");
sl@0:             exit(1);
sl@0:             }
sl@0:         }
sl@0:     }
sl@0: 
sl@0: void setOurRandom()
sl@0:     {
sl@0:     random_value = 1;
sl@0:     RAND_set_rand_method(&ourRNG);
sl@0:     }
sl@0: 
sl@0: /** Print C source for assinging binary data to a variable. */
sl@0: void printCBin(char* varname, unsigned char* data, int len)
sl@0:     {
sl@0:     int i, j;
sl@0: 
sl@0:     printf("\tunsigned char %s[] =", varname);
sl@0:     for (i = 0 ; i < len ; i += 16)
sl@0:         {
sl@0:         printf("\n\t\t\"");
sl@0:         for (j = i ; j < len && j < (i + 16) ; ++j)
sl@0:             {
sl@0:             printf("\\x%02x", data[j]);
sl@0:             }
sl@0:         printf("\"");
sl@0:         }
sl@0: 
sl@0:     printf(";\n\n");
sl@0: 
sl@0:     printf("\tint %s_len = %i;\n\n", varname, len);
sl@0:     }
sl@0: 
sl@0: /** Print C source for assigning the binary form of a BIGNUM to a variable. */
sl@0: void printCBN(char* varname, BIGNUM* bignum)
sl@0:     {
sl@0:     int len = BN_num_bytes(bignum);
sl@0:     unsigned char buffer[len];
sl@0: 
sl@0:     BN_bn2bin(bignum, buffer);
sl@0:     printCBin(varname, buffer, len);
sl@0:     }