/*

 * LIBOIL - Library of Optimized Inner Loops

 * Copyright (c) 2003,2004 David A. Schleef <ds@schleef.org>

 * 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.

 * 

 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS 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 AUTHOR 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.

 */

//Portions Copyright (c)  2008-2009 Nokia Corporation and/or its subsidiary(-ies). All rights reserved. 

#ifdef HAVE_CONFIG_H

#include "config.h"

#endif

#include <liboil/liboil.h>

#include <liboil/liboilfunction.h>

#include <liboil/liboiltest.h>

#include <liboil/liboilrandom.h>

/**

 * oil_resample_linear_u8:

 * @d_n:

 * @s_2xn:

 * @n:

 * @i_2:

 *

 * Linearly resamples a row of pixels.  FIXME.

 */

static void

resample_linear_u8_test (OilTest *test)

{

  uint32_t *in = (uint32_t *) oil_test_get_source_data (test, OIL_ARG_INPLACE1);

  in[0] = 0;

  in[1] = 65536;

}

OIL_DEFINE_CLASS_FULL (resample_linear_u8,

    "uint8_t *d_n, uint8_t *s_2xn, int n, uint32_t *i_2",

    resample_linear_u8_test);

/**

 * oil_resample_linear_argb:

 * @d_n:

 * @s_2xn:

 * @n:

 * @i_2:

 *

 * Linearly resamples a row of pixels.  FIXME.

 */

static void

resample_linear_argb_test (OilTest *test)

{

  uint32_t *in = (uint32_t *) oil_test_get_source_data (test, OIL_ARG_INPLACE1);

  in[0] = 0;

  in[1] = 65536;

}

OIL_DEFINE_CLASS_FULL (resample_linear_argb,

    "uint32_t *d_n, uint32_t *s_2xn, int n, uint32_t *i_2",

    resample_linear_argb_test);

static void

resample_linear_u8_ref (uint8_t *dest, uint8_t *src, int n,

    uint32_t *in)

{

  int acc = in[0];

  int increment = in[1];

  int i;

  int j;

  int x;

  for(i=0;i<n;i++){

    j = acc>>16;

    x = (acc&0xffff)>>8;

    dest[i] = (src[j]*(256-x) + src[j+1]*x) >> 8;

    acc += increment;

  }

  in[0] = acc;

}

OIL_DEFINE_IMPL_REF (resample_linear_u8_ref, resample_linear_u8);

static void

resample_linear_argb_ref (uint32_t *d, uint32_t *s, int n, uint32_t *in)

{

  uint8_t *src = (uint8_t *)s;

  uint8_t *dest = (uint8_t *)d;

  int acc = in[0];

  int increment = in[1];

  int i;

  int j;

  int x;

  for(i=0;i<n;i++){

    j = acc>>16;

    x = (acc&0xffff)>>8;

    dest[4*i+0] = (src[4*j+0]*(256-x) + src[4*j+4]*x) >> 8;

    dest[4*i+1] = (src[4*j+1]*(256-x) + src[4*j+5]*x) >> 8;

    dest[4*i+2] = (src[4*j+2]*(256-x) + src[4*j+6]*x) >> 8;

    dest[4*i+3] = (src[4*j+3]*(256-x) + src[4*j+7]*x) >> 8;

    acc += increment;

  }

  in[0] = acc;

}

OIL_DEFINE_IMPL_REF (resample_linear_argb_ref, resample_linear_argb);

static void

merge_linear_test (OilTest *test)

{

  uint32_t *src3 = (uint32_t *) oil_test_get_source_data (test, OIL_ARG_SRC3);

  do {

    src3[0] = oil_rand_u16() & 0x1ff;

  } while (src3[0] > 256);

}

OIL_DEFINE_CLASS_FULL (merge_linear_argb,

    "uint32_t *d_n, uint32_t *s_n, uint32_t *s2_n, uint32_t *s3_1, int n",

    merge_linear_test);

OIL_DEFINE_CLASS_FULL (merge_linear_u8,

    "uint8_t *d_n, uint8_t *s_n, uint8_t *s2_n, uint32_t *s3_1, int n",

    merge_linear_test);

/**

 * oil_merge_linear_argb:

 * @d_n:

 * @s_n:

 * @s2_n:

 * @s3_1:

 * @n:

 *

 * Linearly interpolate the @s_n and @s2_n arrays using the scale

 * factor in @s3_1.  The value @s3_1 must be in the range [0, 256]

 * A value of 0 indicates weights of 1.0 and 0.0 for

 * the s_n and s2_n arrays respectively.  A value of 256 indicates

 * weights of 0.0 and 1.0 respectively.

 *

 * This function is not intended for alpha blending; use one of the

 * compositing functions instead.

 */

static void

merge_linear_argb_ref (uint32_t *d, uint32_t *s1, uint32_t *s2,

    uint32_t *src3, int n)

{

  uint8_t *src1 = (uint8_t *)s1;

  uint8_t *src2 = (uint8_t *)s2;

  uint8_t *dest = (uint8_t *)d;

  int i;

  int x = src3[0];

  for(i=0;i<n;i++){

    dest[4*i+0] = (src1[4*i+0]*(256-x) + src2[4*i+0]*x) >> 8;

    dest[4*i+1] = (src1[4*i+1]*(256-x) + src2[4*i+1]*x) >> 8;

    dest[4*i+2] = (src1[4*i+2]*(256-x) + src2[4*i+2]*x) >> 8;

    dest[4*i+3] = (src1[4*i+3]*(256-x) + src2[4*i+3]*x) >> 8;

  }

}

OIL_DEFINE_IMPL_REF (merge_linear_argb_ref, merge_linear_argb);

/**

 * oil_merge_linear_u8:

 * @d_n:

 * @s_n:

 * @s2_n:

 * @s3_1:

 * @n:

 *

 * Linearly interpolate the @s_n and @s2_n arrays using the scale

 * factor in @s3_1.  The value @s3_1 must be in the range [0, 255].

 * The value translates into weights of 1.0-(value/256.0) and

 * (value/256.0) for the s_n and s2_n arrays respectively.

 *

 * This function is not intended for alpha blending; use one of the

 * compositing functions instead.

 */

static void

merge_linear_u8_ref (uint8_t *dest, uint8_t *src1, uint8_t *src2,

    uint32_t *src3, int n)

{

  int i;

  int x = src3[0];

  for(i=0;i<n;i++){

    dest[i] = (src1[i]*(256-x) + src2[i]*x) >> 8;

  }

}

OIL_DEFINE_IMPL_REF (merge_linear_u8_ref, merge_linear_u8);

#ifdef	__SYMBIAN32__

OilFunctionClass* __oil_function_class_resample_linear_u8() {

        return &_oil_function_class_resample_linear_u8;

}

#endif

#ifdef	__SYMBIAN32__

OilFunctionClass* __oil_function_class_resample_linear_argb() {

        return &_oil_function_class_resample_linear_argb;

}

#endif

#ifdef	__SYMBIAN32__

OilFunctionClass* __oil_function_class_merge_linear_argb() {

        return &_oil_function_class_merge_linear_argb;

}

#endif

#ifdef	__SYMBIAN32__

OilFunctionClass* __oil_function_class_merge_linear_u8() {

        return &_oil_function_class_merge_linear_u8;

}

#endif

#ifdef	__SYMBIAN32__

OilFunctionImpl* __oil_function_impl_resample_linear_u8_ref() {

        return &_oil_function_impl_resample_linear_u8_ref;

}

#endif

#ifdef	__SYMBIAN32__

OilFunctionImpl* __oil_function_impl_resample_linear_argb_ref() {

        return &_oil_function_impl_resample_linear_argb_ref;

}

#endif

#ifdef	__SYMBIAN32__

OilFunctionImpl* __oil_function_impl_merge_linear_argb_ref() {

        return &_oil_function_impl_merge_linear_argb_ref;

}

#endif

#ifdef	__SYMBIAN32__

OilFunctionImpl* __oil_function_impl_merge_linear_u8_ref() {

        return &_oil_function_impl_merge_linear_u8_ref;

}

#endif

#ifdef	__SYMBIAN32__

EXPORT_C void** _oil_function_class_ptr_resample_linear_u8 ()	{

	oil_function_class_ptr_resample_linear_u8 = __oil_function_class_resample_linear_u8();

	return &oil_function_class_ptr_resample_linear_u8->func;

	}

#endif

#ifdef	__SYMBIAN32__

EXPORT_C void** _oil_function_class_ptr_resample_linear_argb ()	{

	oil_function_class_ptr_resample_linear_argb = __oil_function_class_resample_linear_argb();

	return &oil_function_class_ptr_resample_linear_argb->func;

	}

#endif

#ifdef	__SYMBIAN32__

EXPORT_C void** _oil_function_class_ptr_merge_linear_argb ()	{

	oil_function_class_ptr_merge_linear_argb = __oil_function_class_merge_linear_argb();

	return &oil_function_class_ptr_merge_linear_argb->func;

	}

#endif

#ifdef	__SYMBIAN32__

EXPORT_C void** _oil_function_class_ptr_merge_linear_u8 ()	{

	oil_function_class_ptr_merge_linear_u8 = __oil_function_class_merge_linear_u8();

	return &oil_function_class_ptr_merge_linear_u8->func;

	}

#endif