FreeRDP/libfreerdp/primitives/test/TestPrimitivesAlphaComp.c
2014-09-04 15:46:20 -04:00

258 lines
7.3 KiB
C

/* test_alphaComp.c
* vi:ts=4 sw=4
*
* (c) Copyright 2012 Hewlett-Packard Development Company, L.P.
* Licensed under the Apache License, Version 2.0 (the "License"); you may
* not use this file except in compliance with the License. You may obtain
* a copy of the License at http://www.apache.org/licenses/LICENSE-2.0.
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express
* or implied. See the License for the specific language governing
* permissions and limitations under the License.
*/
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <winpr/sysinfo.h>
#include "prim_test.h"
static const int ALPHA_PRETEST_ITERATIONS = 5000000;
static const float TEST_TIME = 5.0;
extern BOOL g_TestPrimitivesPerformance;
static const int block_size[] = { 4, 64, 256 };
#define NUM_BLOCK_SIZES (sizeof(block_size)/sizeof(int))
#define MAX_BLOCK_SIZE 256
#define SIZE_SQUARED (MAX_BLOCK_SIZE*MAX_BLOCK_SIZE)
extern pstatus_t general_alphaComp_argb(
const BYTE *pSrc1, int src1Step,
const BYTE *pSrc2, int src2Step,
BYTE *pDst, int dstStep,
int width, int height);
extern pstatus_t sse2_alphaComp_argb(
const BYTE *pSrc1, int src1Step,
const BYTE *pSrc2, int src2Step,
BYTE *pDst, int dstStep,
int width, int height);
extern pstatus_t ipp_alphaComp_argb(
const BYTE *pSrc1, int src1Step,
const BYTE *pSrc2, int src2Step,
BYTE *pDst, int dstStep,
int width, int height);
/* ========================================================================= */
#define ALF(_c_) (((_c_) & 0xFF000000U) >> 24)
#define RED(_c_) (((_c_) & 0x00FF0000U) >> 16)
#define GRN(_c_) (((_c_) & 0x0000FF00U) >> 8)
#define BLU(_c_) ((_c_) & 0x000000FFU)
#define TOLERANCE 1
#define PIXEL(_addr_, _bytes_, _x_, _y_) \
((UINT32 *) (((BYTE *) (_addr_)) + (_x_)*4 + (_y_)*(_bytes_)))
#define SRC1_WIDTH 6
#define SRC1_HEIGHT 6
#define SRC2_WIDTH 7
#define SRC2_HEIGHT 7
#define DST_WIDTH 9
#define DST_HEIGHT 9
#define TEST_WIDTH 4
#define TEST_HEIGHT 5
/* ------------------------------------------------------------------------- */
static UINT32 alpha_add(
UINT32 c1,
UINT32 c2)
{
UINT32 a1 = ALF(c1);
UINT32 r1 = RED(c1);
UINT32 g1 = GRN(c1);
UINT32 b1 = BLU(c1);
UINT32 a2 = ALF(c2);
UINT32 r2 = RED(c2);
UINT32 g2 = GRN(c2);
UINT32 b2 = BLU(c2);
UINT32 a3 = ((a1 * a1 + (255-a1) * a2) / 255) & 0xff;
UINT32 r3 = ((a1 * r1 + (255-a1) * r2) / 255) & 0xff;
UINT32 g3 = ((a1 * g1 + (255-a1) * g2) / 255) & 0xff;
UINT32 b3 = ((a1 * b1 + (255-a1) * b2) / 255) & 0xff;
return (a3 << 24) | (r3 << 16) | (g3 << 8) | b3;
}
/* ------------------------------------------------------------------------- */
static UINT32 colordist(
UINT32 c1,
UINT32 c2)
{
int d, maxd = 0;
d = ABS(ALF(c1) - ALF(c2));
if (d > maxd) maxd = d;
d = ABS(RED(c1) - RED(c2));
if (d > maxd) maxd = d;
d = ABS(GRN(c1) - GRN(c2));
if (d > maxd) maxd = d;
d = ABS(BLU(c1) - BLU(c2));
if (d > maxd) maxd = d;
return maxd;
}
/* ------------------------------------------------------------------------- */
int test_alphaComp_func(void)
{
UINT32 ALIGN(src1[SRC1_WIDTH*SRC1_HEIGHT]);
UINT32 ALIGN(src2[SRC2_WIDTH*SRC2_HEIGHT]);
UINT32 ALIGN(dst1[DST_WIDTH*DST_HEIGHT]);
UINT32 ALIGN(dst2a[DST_WIDTH*DST_HEIGHT]);
UINT32 ALIGN(dst2u[DST_WIDTH*DST_HEIGHT+1]);
UINT32 ALIGN(dst3[DST_WIDTH*DST_HEIGHT]);
int error = 0;
char testStr[256];
UINT32 *ptr;
int i, x, y;
testStr[0] = '\0';
get_random_data(src1, sizeof(src1));
/* Special-case the first two values */
src1[0] &= 0x00FFFFFFU;
src1[1] |= 0xFF000000U;
get_random_data(src2, sizeof(src2));
/* Set the second operand to fully-opaque. */
ptr = src2;
for (i=0; i<sizeof(src2)/4; ++i) *ptr++ |= 0xFF000000U;
memset(dst1, 0, sizeof(dst1));
memset(dst2a, 0, sizeof(dst2a));
memset(dst2u, 0, sizeof(dst2u));
memset(dst3, 0, sizeof(dst3));
general_alphaComp_argb((const BYTE *) src1, 4*SRC1_WIDTH,
(const BYTE *) src2, 4*SRC2_WIDTH,
(BYTE *) dst1, 4*DST_WIDTH, TEST_WIDTH, TEST_HEIGHT);
#ifdef WITH_SSE2
if (IsProcessorFeaturePresent(PF_SSE2_INSTRUCTIONS_AVAILABLE))
{
strcat(testStr, " SSE2");
sse2_alphaComp_argb((const BYTE *) src1, 4*SRC1_WIDTH,
(const BYTE *) src2, 4*SRC2_WIDTH,
(BYTE *) dst2a, 4*DST_WIDTH, TEST_WIDTH, TEST_HEIGHT);
sse2_alphaComp_argb((const BYTE *) src1, 4*SRC1_WIDTH,
(const BYTE *) src2, 4*SRC2_WIDTH,
(BYTE *) (dst2u+1), 4*DST_WIDTH, TEST_WIDTH, TEST_HEIGHT);
}
#endif /* i386 */
#ifdef WITH_IPP
strcat(testStr, " IPP");
ipp_alphaComp_argb((const BYTE *) src1, 4*SRC1_WIDTH,
(const BYTE *) src2, 4*SRC2_WIDTH,
(BYTE *) dst3, 4*DST_WIDTH, TEST_WIDTH, TEST_HEIGHT);
#endif
for (y=0; y<TEST_HEIGHT; ++y)
{
for (x=0; x<TEST_WIDTH; ++x)
{
UINT32 s1 = *PIXEL(src1, 4*SRC1_WIDTH, x, y);
UINT32 s2 = *PIXEL(src2, 4*SRC2_WIDTH, x, y);
UINT32 c0 = alpha_add(s1, s2);
UINT32 c1 = *PIXEL(dst1, 4*DST_WIDTH, x, y);
if (colordist(c0, c1) > TOLERANCE)
{
printf("alphaComp-general: [%d,%d] 0x%08x+0x%08x=0x%08x, got 0x%08x\n",
x, y, s1, s2, c0, c1);
error = 1;
}
#ifdef WITH_SSE2
if (IsProcessorFeaturePresent(PF_SSE2_INSTRUCTIONS_AVAILABLE))
{
UINT32 c2 = *PIXEL(dst2a, 4*DST_WIDTH, x, y);
if (colordist(c0, c2) > TOLERANCE)
{
printf("alphaComp-SSE-aligned: [%d,%d] 0x%08x+0x%08x=0x%08x, got 0x%08x\n",
x, y, s1, s2, c0, c2);
error = 1;
}
c2 = *PIXEL(dst2u+1, 4*DST_WIDTH, x, y);
if (colordist(c0, c2) > TOLERANCE)
{
printf("alphaComp-SSE-unaligned: [%d,%d] 0x%08x+0x%08x=0x%08x, got 0x%08x\n",
x, y, s1, s2, c0, c2);
error = 1;
}
}
#endif /* i386 */
#ifdef WITH_IPP
{
UINT32 c3 = *PIXEL(dst3, 4*DST_WIDTH, x, y);
if (colordist(c0, c3) > TOLERANCE)
{
printf("alphaComp-IPP: [%d,%d] 0x%08x+0x%08x=0x%08x, got 0x%08x\n",
x, y, s1, s2, c0, c3);
error = 1;
}
}
#endif
}
}
if (!error) printf("All alphaComp tests passed (%s).\n", testStr);
return (error > 0) ? FAILURE : SUCCESS;
}
/* ------------------------------------------------------------------------- */
STD_SPEED_TEST(alphaComp_speed, BYTE, BYTE, int bytes __attribute__((unused)) = size*4,
TRUE, general_alphaComp_argb(src1, bytes, src2, bytes, dst, bytes,
size, size),
#ifdef WITH_SSE2
TRUE, sse2_alphaComp_argb(src1, bytes, src2, bytes, dst, bytes,
size, size), PF_SSE2_INSTRUCTIONS_AVAILABLE, FALSE,
#else
FALSE, PRIM_NOP, 0, FALSE,
#endif
TRUE, ipp_alphaComp_argb(src1, bytes, src2, bytes, dst, bytes,
size, size));
int test_alphaComp_speed(void)
{
INT32 ALIGN(src1[MAX_BLOCK_SIZE*(MAX_BLOCK_SIZE+1)]),
ALIGN(src2[SIZE_SQUARED]),
ALIGN(dst[SIZE_SQUARED]);
get_random_data(src1, sizeof(src1));
get_random_data(src2, sizeof(src2));
alphaComp_speed("alphaComp", "aligned",
(BYTE *) src1, (BYTE *) src2, 0, (BYTE *) dst,
block_size, NUM_BLOCK_SIZES, ALPHA_PRETEST_ITERATIONS, TEST_TIME);
alphaComp_speed("alphaComp", "unaligned",
(BYTE *) src1+1, (BYTE *) src2, 0, (BYTE *) dst,
block_size, NUM_BLOCK_SIZES, ALPHA_PRETEST_ITERATIONS, TEST_TIME);
return SUCCESS;
}
int TestPrimitivesAlphaComp(int argc, char* argv[])
{
int status;
status = test_alphaComp_func();
if (status != SUCCESS)
return 1;
if (g_TestPrimitivesPerformance)
{
status = test_alphaComp_speed();
if (status != SUCCESS)
return 1;
}
return 0;
}