Add unit tests for the lhash functionality. (508ee8f5) · Commits · CYBER - Cyber Security / TS 103 523 MSP / TLMSP / TLMSP OpenSSL

test/build.info

+5 −1

Original line number	Diff line number	Diff line
		@@ -22,7 +22,7 @@ IF[{- !$disabled{tests} -}]
		randtest dhtest enginetest casttest \
		bftest ssltest_old dsatest exptest rsa_test \
		evp_test evp_extra_test igetest v3nametest v3ext \
		crltest danetest bad_dtls_test \
		crltest danetest bad_dtls_test lhash_test \
		constant_time_test verify_extra_test clienthellotest \
		packettest asynctest secmemtest srptest memleaktest stack_test \
		dtlsv1listentest ct_test threadstest afalgtest d2i_test \
		@@ -214,6 +214,10 @@ IF[{- !$disabled{tests} -}]
		INCLUDE[stack_test]=.. ../include
		DEPEND[stack_test]=../libcrypto

		SOURCE[lhash_test]=lhash_test.c testutil.c test_main.c
		INCLUDE[lhash_test]=.. ../include
		DEPEND[lhash_test]=../libcrypto

		SOURCE[dtlsv1listentest]=dtlsv1listentest.c
		INCLUDE[dtlsv1listentest]=.. ../include
		DEPEND[dtlsv1listentest]=../libssl

test/lhash_test.c

0 → 100644

+249 −0

Original line number	Diff line number	Diff line
		/*
		* Copyright 2017 The OpenSSL Project Authors. All Rights Reserved.
		*
		* Licensed under the OpenSSL license (the "License"). You may not use
		* this file except in compliance with the License. You can obtain a copy
		* in the file LICENSE in the source distribution or at
		* https://www.openssl.org/source/license.html
		*/

		/*
		* Copyright (c) 2017 Oracle and/or its affiliates. All rights reserved.
		*/

		#include <stdio.h>
		#include <string.h>

		#include <openssl/opensslconf.h>
		#include <openssl/lhash.h>
		#include <openssl/err.h>
		#include <openssl/crypto.h>

		#include "e_os.h"
		#include "test_main.h"
		#include "testutil.h"

		/*
		* The macros below generate unused functions which error out one of the clang
		* builds. We disable this check here.
		*/
		#ifdef __clang__
		#pragma clang diagnostic ignored "-Wunused-function"
		#endif

		DEFINE_LHASH_OF(int);

		static int int_tests[] = { 65537, 13, 1, 3, -5, 6, 7, 4, -10, -12, -14, 22, 9,
		-17, 16, 17, -23, 35, 37, 173, 11 };
		static const unsigned int n_int_tests = OSSL_NELEM(int_tests);
		static short int_found[OSSL_NELEM(int_tests)];

		static unsigned long int int_hash(const int *p)
		{
		return 3 & p; / To force collisions */
		}

		static int int_cmp(const int p, const int q)
		{
		return p != q;
		}

		static int int_find(int n)
		{
		unsigned int i;

		for (i = 0; i < n_int_tests; i++)
		if (int_tests[i] == n)
		return i;
		return -1;
		}

		static void int_doall(int *v)
		{
		int_found[int_find(*v)]++;
		}

		static void int_doall_arg(int p, short f)
		{
		f[int_find(*p)]++;
		}

		IMPLEMENT_LHASH_DOALL_ARG(int, short);

		static int test_int_lhash(void)
		{
		static struct {
		int data;
		int null;
		} dels[] = {
		{ 65537, 0 },
		{ 173, 0 },
		{ 999, 1 },
		{ 37, 0 },
		{ 1, 0 },
		{ 34, 1 }
		};
		const unsigned int n_dels = OSSL_NELEM(dels);
		LHASH_OF(int) *h = lh_int_new(&int_hash, &int_cmp);
		unsigned int i;
		int testresult = 0, j, *p;

		if (h == NULL) {
		fprintf(stderr, "test lhash int allocation\n");
		goto end;
		}

		/* insert */
		for (i = 0; i < n_int_tests; i++)
		if (lh_int_insert(h, int_tests + i) != NULL) {
		fprintf(stderr, "test lhash int insert %d\n", i);
		goto end;
		}

		/* num_items */
		if (lh_int_num_items(h) != n_int_tests) {
		fprintf(stderr, "test lhash int num items\n");
		goto end;
		}

		/* retrieve */
		for (i = 0; i < n_int_tests; i++)
		if (*lh_int_retrieve(h, int_tests + i) != int_tests[i]) {
		fprintf(stderr, "test lhash int retrieve value %d\n", i);
		goto end;
		}
		for (i = 0; i < n_int_tests; i++)
		if (lh_int_retrieve(h, int_tests + i) != int_tests + i) {
		fprintf(stderr, "test lhash int retrieve address %d\n", i);
		goto end;
		}
		j = 1;
		if (lh_int_retrieve(h, &j) != int_tests + 2) {
		fprintf(stderr, "test lhash int retrieve other\n");
		goto end;
		}

		/* replace */
		j = 13;
		if ((p = lh_int_insert(h, &j)) == NULL) {
		fprintf(stderr, "test lhash int replacement insert\n");
		goto end;
		}
		if (p != int_tests + 1) {
		fprintf(stderr, "test lhash int replacement pointer\n");
		goto end;
		}
		if (lh_int_retrieve(h, int_tests + 1) != &j) {
		fprintf(stderr, "test lhash int replacement variable\n");
		goto end;
		}

		/* do_all */
		memset(int_found, 0, sizeof(int_found));
		lh_int_doall(h, &int_doall);
		for (i = 0; i < n_int_tests; i++)
		if (int_found[i] != 1) {
		fprintf(stderr, "test lhash int doall %d\n", i);
		goto end;
		}

		/* do_all_arg */
		memset(int_found, 0, sizeof(int_found));
		lh_int_doall_short(h, int_doall_arg, int_found);
		for (i = 0; i < n_int_tests; i++)
		if (int_found[i] != 1) {
		fprintf(stderr, "test lhash int doall arg %d\n", i);
		goto end;
		}

		/* delete */
		for (i = 0; i < n_dels; i++) {
		const int b = lh_int_delete(h, &dels[i].data) == NULL;
		if ((b ^ dels[i].null) != 0) {
		fprintf(stderr, "test lhash int delete %d\n", i);
		goto end;
		}
		}

		/* error */
		if (lh_int_error(h) != 0) {
		fprintf(stderr, "test lhash int error\n");
		goto end;
		}

		testresult = 1;
		end:
		lh_int_free(h);
		return testresult;
		}

		static unsigned long int stress_hash(const int *p)
		{
		return *p;
		}

		static int test_stress(void)
		{
		LHASH_OF(int) *h = lh_int_new(&stress_hash, &int_cmp);
		const unsigned int n = 2500000;
		unsigned int i;
		int testresult = 0, *p;

		if (h == NULL) {
		fprintf(stderr, "test lhash stress allocation\n");
		goto end;
		}

		/* insert */
		for (i = 0; i < n; i++) {
		p = OPENSSL_malloc(sizeof(i));
		if (p == NULL) {
		fprintf(stderr, "test lhash stress out of memory %d\n", i);
		goto end;
		}
		p = 3 i + 1;
		lh_int_insert(h, p);
		}

		/* num_items */
		if (lh_int_num_items(h) != n) {
		fprintf(stderr, "test lhash stress num items\n");
		goto end;
		}

		fprintf(stderr, "hash full statistics:\n");
		OPENSSL_LH_stats((OPENSSL_LHASH *)h, stderr);
		fprintf(stderr, "\nhash full node usage:\n");
		OPENSSL_LH_node_usage_stats((OPENSSL_LHASH *)h, stderr);

		/* delete in a different order */
		for (i = 0; i < n; i++) {
		const int j = (7 * i + 4) % n * 3 + 1;

		if ((p = lh_int_delete(h, &j)) == NULL) {
		fprintf(stderr, "test lhash stress delete %d\n", i);
		goto end;
		}
		if (*p != j) {
		fprintf(stderr, "test lhash stress bad value %d\n", i);
		goto end;
		}
		OPENSSL_free(p);
		}

		fprintf(stderr, "\nhash empty statistics:\n");
		OPENSSL_LH_stats((OPENSSL_LHASH *)h, stderr);
		fprintf(stderr, "\nhash empty node usage:\n");
		OPENSSL_LH_node_usage_stats((OPENSSL_LHASH *)h, stderr);

		testresult = 1;
		end:
		lh_int_free(h);
		return testresult;
		}

		void register_tests(void)
		{
		ADD_TEST(test_int_lhash);
		ADD_TEST(test_stress);
		}

test/recipes/02-test_lhash.t

0 → 100644

+14 −0

Original line number	Diff line number	Diff line
		#! /usr/bin/env perl
		# Copyright 2017 The OpenSSL Project Authors. All Rights Reserved.
		#
		# Licensed under the OpenSSL license (the "License"). You may not use
		# this file except in compliance with the License. You can obtain a copy
		# in the file LICENSE in the source distribution or at
		# https://www.openssl.org/source/license.html
		#
		# ======================================================================
		# Copyright (c) 2017 Oracle and/or its affiliates. All rights reserved.

		use OpenSSL::Test::Simple;

		simple_test("test_lhash", "lhash_test");