RetroZilla/security/nss/cmd/libpkix/pkix_pl/system/test_object.c
2018-05-19 22:01:21 +08:00

290 lines
7.7 KiB
C

/* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, You can obtain one at http://mozilla.org/MPL/2.0/. */
/*
* test_object.c
*
* Test Object Allocation, toString, Equals, Destruction
*
*/
#include "testutil.h"
#include "testutil_nss.h"
static void *plContext = NULL;
static PKIX_Error *
destructor(
/* ARGSUSED */ PKIX_PL_Object *object,
/* ARGSUSED */ void *plContext)
{
(void) printf("\tUser defined destructor called\n");
return (NULL);
}
static PKIX_Error*
toStringCallback(
PKIX_PL_Object *obj,
PKIX_PL_String **pString,
/* ARGSUSED */ void* plContext) {
PKIX_Error *errorResult;
PKIX_UInt32 type;
char *format = "(addr: %x, type: %d)";
PKIX_PL_String *formatString = NULL;
errorResult = PKIX_PL_String_Create(
PKIX_ESCASCII,
format,
PL_strlen(format),
&formatString,
plContext);
if (errorResult) testError("PKIX_PL_String_Create failed");
if (pString == plContext)
testError("Null String");
type = (unsigned int)0;
(void) PKIX_PL_Object_GetType(obj, &type, plContext);
errorResult = PKIX_PL_Sprintf(pString, plContext,
formatString,
(int)obj, type);
if (errorResult) testError("PKIX_PL_Sprintf failed");
errorResult = PKIX_PL_Object_DecRef((PKIX_PL_Object*)formatString,
plContext);
if (errorResult) testError("PKIX_PL_Object_DecRef failed");
return (NULL);
}
static PKIX_Error *
comparator(
PKIX_PL_Object *first,
PKIX_PL_Object *second,
PKIX_Int32 *pValue,
/* ARGSUSED */ void *plContext)
{
if (*(char *)first > *(char *)second)
*pValue = 1;
else if (*(char *)first < *(char *)second)
*pValue = -1;
else
*pValue = 0;
return (NULL);
}
static PKIX_Error *
hashcodeCallback(
PKIX_PL_Object *object,
PKIX_UInt32 *pValue,
/* ARGSUSED */ void *plContext)
{
*pValue = 123456789;
return (NULL);
}
static PKIX_Error*
equalsCallback(
PKIX_PL_Object *first,
PKIX_PL_Object *second,
PKIX_Boolean *result,
void* plContext) {
PKIX_UInt32 firstType = 0, secondType = 0;
if ((first == plContext)||(second == plContext))
testError("Null Object");
(void) PKIX_PL_Object_GetType(first, &firstType, plContext);
(void) PKIX_PL_Object_GetType(second, &secondType, plContext);
*result = (firstType == secondType)?PKIX_TRUE:PKIX_FALSE;
return (NULL);
}
static void
createObjects(
PKIX_PL_Object **obj,
PKIX_PL_Object **obj2,
PKIX_PL_Object **obj3,
PKIX_PL_Object **obj4)
{
PKIX_TEST_STD_VARS();
#ifdef PKIX_USER_OBJECT_TYPE
PKIX_TEST_EXPECT_NO_ERROR(PKIX_PL_Object_RegisterType
(1000, /* type */
"thousand", /* description */
NULL, /* destructor */
NULL, /* equals */
(PKIX_PL_HashcodeCallback)hashcodeCallback,
NULL, /* toString */
NULL, /* Comparator */
NULL,
plContext));
PKIX_TEST_EXPECT_NO_ERROR(PKIX_PL_Object_Alloc
(1000, /* type */
12, /* size */
obj,
plContext));
PKIX_TEST_EXPECT_NO_ERROR(PKIX_PL_Object_RegisterType
(2000, /* type */
"two thousand" /* description */,
(PKIX_PL_DestructorCallback)destructor,
(PKIX_PL_EqualsCallback)equalsCallback,
NULL, /* hashcode */
(PKIX_PL_ToStringCallback)toStringCallback,
(PKIX_PL_ComparatorCallback)comparator,
NULL,
plContext));
PKIX_TEST_EXPECT_NO_ERROR(PKIX_PL_Object_Alloc
(2000, /* type */
1, /* size */
obj2,
plContext));
PKIX_TEST_EXPECT_NO_ERROR(PKIX_PL_Object_Alloc
(2000, /* type */
1, /* size */
obj4,
plContext));
*obj3 = *obj;
PKIX_TEST_EXPECT_NO_ERROR(PKIX_PL_Object_IncRef(*obj3, plContext));
cleanup:
#endif /* PKIX_USER_OBJECT_TYPE */
PKIX_TEST_RETURN();
}
static void
testGetType(
PKIX_PL_Object *obj,
PKIX_PL_Object *obj2,
PKIX_PL_Object *obj3)
{
PKIX_UInt32 testType;
PKIX_TEST_STD_VARS();
PKIX_TEST_EXPECT_NO_ERROR
(PKIX_PL_Object_GetType(obj, &testType, plContext));
if (testType != 1000)
testError("Object 1 returned the wrong type");
PKIX_TEST_EXPECT_NO_ERROR
(PKIX_PL_Object_GetType(obj2, &testType, plContext));
if (testType != 2000)
testError("Object 2 returned the wrong type");
PKIX_TEST_EXPECT_NO_ERROR
(PKIX_PL_Object_GetType(obj3, &testType, plContext));
if (testType != 1000)
testError("Object 3 returned the wrong type");
cleanup:
PKIX_TEST_RETURN();
}
static void
testCompare(
PKIX_PL_Object *obj2,
PKIX_PL_Object *obj4)
{
PKIX_Int32 cmpResult;
PKIX_TEST_STD_VARS();
*(char *)obj2 = 0x20;
*(char *)obj4 = 0x10;
PKIX_TEST_EXPECT_NO_ERROR
(PKIX_PL_Object_Compare(obj2, obj4, &cmpResult, plContext));
if (cmpResult <= 0) testError("Invalid Result from Object Compare");
PKIX_TEST_EXPECT_NO_ERROR
(PKIX_PL_Object_Compare(obj4, obj2, &cmpResult, plContext));
if (cmpResult >= 0) testError("Invalid Result from Object Compare");
PKIX_TEST_EXPECT_NO_ERROR
(PKIX_PL_Object_Compare(obj4, obj4, &cmpResult, plContext));
*(char *)obj2 = 0x10;
if (cmpResult != 0) testError("Invalid Result from Object Compare");
cleanup:
PKIX_TEST_RETURN();
}
static void
testDestroy(
PKIX_PL_Object *obj,
PKIX_PL_Object *obj2,
PKIX_PL_Object *obj3,
PKIX_PL_Object *obj4)
{
PKIX_TEST_STD_VARS();
PKIX_TEST_DECREF_BC(obj);
PKIX_TEST_DECREF_BC(obj2);
PKIX_TEST_DECREF_BC(obj3);
PKIX_TEST_DECREF_BC(obj4);
cleanup:
PKIX_TEST_RETURN();
}
int test_object(int argc, char *argv[]) {
#ifdef PKIX_USER_OBJECT_TYPE
PKIX_PL_Object *obj, *obj2, *obj3, *obj4;
PKIX_UInt32 actualMinorVersion;
PKIX_UInt32 j = 0;
PKIX_TEST_STD_VARS();
startTests("Objects");
PKIX_TEST_EXPECT_NO_ERROR(
PKIX_PL_NssContext_Create(0, PKIX_FALSE, NULL, &plContext));
subTest("PKIX_PL_Object_Create");
createObjects(&obj, &obj2, &obj3, &obj4);
PKIX_TEST_EQ_HASH_TOSTR_DUP(obj, obj3, obj2, NULL, Object, PKIX_FALSE);
subTest("PKIX_PL_Object_GetType");
testGetType(obj, obj2, obj3);
subTest("PKIX_PL_Object_Compare");
testCompare(obj2, obj4);
subTest("PKIX_PL_Object_Destroy");
testDestroy(obj, obj2, obj3, obj4);
cleanup:
PKIX_Shutdown(plContext);
endTests("Objects");
#endif /* PKIX_USER_OBJECT_TYPE */
return (0);
}