[deb_vid.stab.git] / src / orc / motiondetectorc.c


/* autogenerated from motiondetectorc.orc */

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#ifndef _ORC_INTEGER_TYPEDEFS_
#define _ORC_INTEGER_TYPEDEFS_
#if defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L
#include <stdint.h>
typedef int8_t orc_int8;
typedef int16_t orc_int16;
typedef int32_t orc_int32;
typedef int64_t orc_int64;
typedef uint8_t orc_uint8;
typedef uint16_t orc_uint16;
typedef uint32_t orc_uint32;
typedef uint64_t orc_uint64;
#define ORC_UINT64_C(x) UINT64_C(x)
#elif defined(_MSC_VER)
typedef signed __int8 orc_int8;
typedef signed __int16 orc_int16;
typedef signed __int32 orc_int32;
typedef signed __int64 orc_int64;
typedef unsigned __int8 orc_uint8;
typedef unsigned __int16 orc_uint16;
typedef unsigned __int32 orc_uint32;
typedef unsigned __int64 orc_uint64;
#define ORC_UINT64_C(x) (x##Ui64)
#define inline __inline
#else
#include <limits.h>
typedef signed char orc_int8;
typedef short orc_int16;
typedef int orc_int32;
typedef unsigned char orc_uint8;
typedef unsigned short orc_uint16;
typedef unsigned int orc_uint32;
#if INT_MAX == LONG_MAX
typedef long long orc_int64;
typedef unsigned long long orc_uint64;
#define ORC_UINT64_C(x) (x##ULL)
#else
typedef long orc_int64;
typedef unsigned long orc_uint64;
#define ORC_UINT64_C(x) (x##UL)
#endif
#endif
typedef union { orc_int16 i; orc_int8 x2[2]; } orc_union16;
typedef union { orc_int32 i; float f; orc_int16 x2[2]; orc_int8 x4[4]; } orc_union32;
typedef union { orc_int64 i; double f; orc_int32 x2[2]; float x2f[2]; orc_int16 x4[4]; } orc_union64;
#endif
#ifndef ORC_RESTRICT
#if defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L
#define ORC_RESTRICT restrict
#elif defined(__GNUC__) && __GNUC__ >= 4
#define ORC_RESTRICT __restrict__
#else
#define ORC_RESTRICT
#endif
#endif

#ifndef DISABLE_ORC
#include <orc/orc.h>
#endif
void image_difference_optimized (orc_uint32 * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, const orc_uint8 * ORC_RESTRICT s2, int s2_stride, int n, int m);
void image_line_difference_optimized (orc_uint32 * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, const orc_uint8 * ORC_RESTRICT s2, int n);
void image_sum_optimized (int * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, int n, int m);
void image_variance_optimized (int * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, int p2, int n, int m);


/* begin Orc C target preamble */
#define ORC_CLAMP(x,a,b) ((x)<(a) ? (a) : ((x)>(b) ? (b) : (x)))
#define ORC_ABS(a) ((a)<0 ? -(a) : (a))
#define ORC_MIN(a,b) ((a)<(b) ? (a) : (b))
#define ORC_MAX(a,b) ((a)>(b) ? (a) : (b))
#define ORC_SB_MAX 127
#define ORC_SB_MIN (-1-ORC_SB_MAX)
#define ORC_UB_MAX 255
#define ORC_UB_MIN 0
#define ORC_SW_MAX 32767
#define ORC_SW_MIN (-1-ORC_SW_MAX)
#define ORC_UW_MAX 65535
#define ORC_UW_MIN 0
#define ORC_SL_MAX 2147483647
#define ORC_SL_MIN (-1-ORC_SL_MAX)
#define ORC_UL_MAX 4294967295U
#define ORC_UL_MIN 0
#define ORC_CLAMP_SB(x) ORC_CLAMP(x,ORC_SB_MIN,ORC_SB_MAX)
#define ORC_CLAMP_UB(x) ORC_CLAMP(x,ORC_UB_MIN,ORC_UB_MAX)
#define ORC_CLAMP_SW(x) ORC_CLAMP(x,ORC_SW_MIN,ORC_SW_MAX)
#define ORC_CLAMP_UW(x) ORC_CLAMP(x,ORC_UW_MIN,ORC_UW_MAX)
#define ORC_CLAMP_SL(x) ORC_CLAMP(x,ORC_SL_MIN,ORC_SL_MAX)
#define ORC_CLAMP_UL(x) ORC_CLAMP(x,ORC_UL_MIN,ORC_UL_MAX)
#define ORC_SWAP_W(x) ((((x)&0xff)<<8) | (((x)&0xff00)>>8))
#define ORC_SWAP_L(x) ((((x)&0xff)<<24) | (((x)&0xff00)<<8) | (((x)&0xff0000)>>8) | (((x)&0xff000000)>>24))
#define ORC_SWAP_Q(x) ((((x)&ORC_UINT64_C(0xff))<<56) | (((x)&ORC_UINT64_C(0xff00))<<40) | (((x)&ORC_UINT64_C(0xff0000))<<24) | (((x)&ORC_UINT64_C(0xff000000))<<8) | (((x)&ORC_UINT64_C(0xff00000000))>>8) | (((x)&ORC_UINT64_C(0xff0000000000))>>24) | (((x)&ORC_UINT64_C(0xff000000000000))>>40) | (((x)&ORC_UINT64_C(0xff00000000000000))>>56))
#define ORC_PTR_OFFSET(ptr,offset) ((void *)(((unsigned char *)(ptr)) + (offset)))
#define ORC_DENORMAL(x) ((x) & ((((x)&0x7f800000) == 0) ? 0xff800000 : 0xffffffff))
#define ORC_ISNAN(x) ((((x)&0x7f800000) == 0x7f800000) && (((x)&0x007fffff) != 0))
#define ORC_DENORMAL_DOUBLE(x) ((x) & ((((x)&ORC_UINT64_C(0x7ff0000000000000)) == 0) ? ORC_UINT64_C(0xfff0000000000000) : ORC_UINT64_C(0xffffffffffffffff)))
#define ORC_ISNAN_DOUBLE(x) ((((x)&ORC_UINT64_C(0x7ff0000000000000)) == ORC_UINT64_C(0x7ff0000000000000)) && (((x)&ORC_UINT64_C(0x000fffffffffffff)) != 0))
#ifndef ORC_RESTRICT
#if defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L
#define ORC_RESTRICT restrict
#elif defined(__GNUC__) && __GNUC__ >= 4
#define ORC_RESTRICT __restrict__
#else
#define ORC_RESTRICT
#endif
#endif
/* end Orc C target preamble */


/* image_difference_optimized */
#ifdef DISABLE_ORC
void
image_difference_optimized (orc_uint32 * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, const orc_uint8 * ORC_RESTRICT s2, int s2_stride, int n, int m){
  int i;
  int j;
  const orc_int8 * ORC_RESTRICT ptr4;
  const orc_int8 * ORC_RESTRICT ptr5;
  orc_union32 var12 =  { 0 };
  orc_int8 var32;
  orc_int8 var33;

  for (j = 0; j < m; j++) {
    ptr4 = ORC_PTR_OFFSET(s1, s1_stride * j);
    ptr5 = ORC_PTR_OFFSET(s2, s2_stride * j);


    for (i = 0; i < n; i++) {
      /* 0: loadb */
      var32 = ptr4[i];
      /* 1: loadb */
      var33 = ptr5[i];
      /* 2: accsadubl */
      var12.i = var12.i + ORC_ABS((orc_int32)(orc_uint8)var32 - (orc_int32)(orc_uint8)var33);
    }
  }
  *a1 = var12.i;

}

#else
static void
_backup_image_difference_optimized (OrcExecutor * ORC_RESTRICT ex)
{
  int i;
  int j;
  int n = ex->n;
  int m = ex->params[ORC_VAR_A1];
  const orc_int8 * ORC_RESTRICT ptr4;
  const orc_int8 * ORC_RESTRICT ptr5;
  orc_union32 var12 =  { 0 };
  orc_int8 var32;
  orc_int8 var33;

  for (j = 0; j < m; j++) {
    ptr4 = ORC_PTR_OFFSET(ex->arrays[4], ex->params[4] * j);
    ptr5 = ORC_PTR_OFFSET(ex->arrays[5], ex->params[5] * j);


    for (i = 0; i < n; i++) {
      /* 0: loadb */
      var32 = ptr4[i];
      /* 1: loadb */
      var33 = ptr5[i];
      /* 2: accsadubl */
      var12.i = var12.i + ORC_ABS((orc_int32)(orc_uint8)var32 - (orc_int32)(orc_uint8)var33);
    }
  }
  ex->accumulators[0] = var12.i;

}

void
image_difference_optimized (orc_uint32 * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, const orc_uint8 * ORC_RESTRICT s2, int s2_stride, int n, int m)
{
  OrcExecutor _ex, *ex = &_ex;
  static int p_inited = 0;
  static OrcCode *c = 0;
  void (*func) (OrcExecutor *);

  if (!p_inited) {
    orc_once_mutex_lock ();
    if (!p_inited) {
      OrcProgram *p;

      p = orc_program_new ();
      orc_program_set_2d (p);
      orc_program_set_name (p, "image_difference_optimized");
      orc_program_set_backup_function (p, _backup_image_difference_optimized);
      orc_program_add_source (p, 1, "s1");
      orc_program_add_source (p, 1, "s2");
      orc_program_add_accumulator (p, 4, "a1");

      orc_program_append_2 (p, "accsadubl", 0, ORC_VAR_A1, ORC_VAR_S1, ORC_VAR_S2, ORC_VAR_D1);

      orc_program_compile (p);
      c = orc_program_take_code (p);
      orc_program_free (p);
    }
    p_inited = TRUE;
    orc_once_mutex_unlock ();
  }
  ex->arrays[ORC_VAR_A2] = c;
  ex->program = 0;

  ex->n = n;
  ORC_EXECUTOR_M(ex) = m;
  ex->arrays[ORC_VAR_S1] = (void *)s1;
  ex->params[ORC_VAR_S1] = s1_stride;
  ex->arrays[ORC_VAR_S2] = (void *)s2;
  ex->params[ORC_VAR_S2] = s2_stride;

  func = c->exec;
  func (ex);
  *a1 = orc_executor_get_accumulator (ex, ORC_VAR_A1);
}
#endif


/* image_line_difference_optimized */
#ifdef DISABLE_ORC
void
image_line_difference_optimized (orc_uint32 * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, const orc_uint8 * ORC_RESTRICT s2, int n){
  int i;
  const orc_int8 * ORC_RESTRICT ptr4;
  const orc_int8 * ORC_RESTRICT ptr5;
  orc_union32 var12 =  { 0 };
  orc_int8 var32;
  orc_int8 var33;

  ptr4 = (orc_int8 *)s1;
  ptr5 = (orc_int8 *)s2;


  for (i = 0; i < n; i++) {
    /* 0: loadb */
    var32 = ptr4[i];
    /* 1: loadb */
    var33 = ptr5[i];
    /* 2: accsadubl */
    var12.i = var12.i + ORC_ABS((orc_int32)(orc_uint8)var32 - (orc_int32)(orc_uint8)var33);
  }
  *a1 = var12.i;

}

#else
static void
_backup_image_line_difference_optimized (OrcExecutor * ORC_RESTRICT ex)
{
  int i;
  int n = ex->n;
  const orc_int8 * ORC_RESTRICT ptr4;
  const orc_int8 * ORC_RESTRICT ptr5;
  orc_union32 var12 =  { 0 };
  orc_int8 var32;
  orc_int8 var33;

  ptr4 = (orc_int8 *)ex->arrays[4];
  ptr5 = (orc_int8 *)ex->arrays[5];


  for (i = 0; i < n; i++) {
    /* 0: loadb */
    var32 = ptr4[i];
    /* 1: loadb */
    var33 = ptr5[i];
    /* 2: accsadubl */
    var12.i = var12.i + ORC_ABS((orc_int32)(orc_uint8)var32 - (orc_int32)(orc_uint8)var33);
  }
  ex->accumulators[0] = var12.i;

}

void
image_line_difference_optimized (orc_uint32 * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, const orc_uint8 * ORC_RESTRICT s2, int n)
{
  OrcExecutor _ex, *ex = &_ex;
  static int p_inited = 0;
  static OrcCode *c = 0;
  void (*func) (OrcExecutor *);

  if (!p_inited) {
    orc_once_mutex_lock ();
    if (!p_inited) {
      OrcProgram *p;

      p = orc_program_new ();
      orc_program_set_name (p, "image_line_difference_optimized");
      orc_program_set_backup_function (p, _backup_image_line_difference_optimized);
      orc_program_add_source (p, 1, "s1");
      orc_program_add_source (p, 1, "s2");
      orc_program_add_accumulator (p, 4, "a1");

      orc_program_append_2 (p, "accsadubl", 0, ORC_VAR_A1, ORC_VAR_S1, ORC_VAR_S2, ORC_VAR_D1);

      orc_program_compile (p);
      c = orc_program_take_code (p);
      orc_program_free (p);
    }
    p_inited = TRUE;
    orc_once_mutex_unlock ();
  }
  ex->arrays[ORC_VAR_A2] = c;
  ex->program = 0;

  ex->n = n;
  ex->arrays[ORC_VAR_S1] = (void *)s1;
  ex->arrays[ORC_VAR_S2] = (void *)s2;

  func = c->exec;
  func (ex);
  *a1 = orc_executor_get_accumulator (ex, ORC_VAR_A1);
}
#endif


/* image_sum_optimized */
#ifdef DISABLE_ORC
void
image_sum_optimized (int * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, int n, int m){
  int i;
  int j;
  const orc_int8 * ORC_RESTRICT ptr4;
  orc_union32 var12 =  { 0 };
  orc_int8 var34;
  orc_union16 var35;
  orc_union32 var36;

  for (j = 0; j < m; j++) {
    ptr4 = ORC_PTR_OFFSET(s1, s1_stride * j);


    for (i = 0; i < n; i++) {
      /* 0: loadb */
      var34 = ptr4[i];
      /* 1: convubw */
      var35.i = (orc_uint8)var34;
      /* 2: convuwl */
      var36.i = (orc_uint16)var35.i;
      /* 3: accl */
      var12.i = var12.i + var36.i;
    }
  }
  *a1 = var12.i;

}

#else
static void
_backup_image_sum_optimized (OrcExecutor * ORC_RESTRICT ex)
{
  int i;
  int j;
  int n = ex->n;
  int m = ex->params[ORC_VAR_A1];
  const orc_int8 * ORC_RESTRICT ptr4;
  orc_union32 var12 =  { 0 };
  orc_int8 var34;
  orc_union16 var35;
  orc_union32 var36;

  for (j = 0; j < m; j++) {
    ptr4 = ORC_PTR_OFFSET(ex->arrays[4], ex->params[4] * j);


    for (i = 0; i < n; i++) {
      /* 0: loadb */
      var34 = ptr4[i];
      /* 1: convubw */
      var35.i = (orc_uint8)var34;
      /* 2: convuwl */
      var36.i = (orc_uint16)var35.i;
      /* 3: accl */
      var12.i = var12.i + var36.i;
    }
  }
  ex->accumulators[0] = var12.i;

}

void
image_sum_optimized (int * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, int n, int m)
{
  OrcExecutor _ex, *ex = &_ex;
  static int p_inited = 0;
  static OrcCode *c = 0;
  void (*func) (OrcExecutor *);

  if (!p_inited) {
    orc_once_mutex_lock ();
    if (!p_inited) {
      OrcProgram *p;

      p = orc_program_new ();
      orc_program_set_2d (p);
      orc_program_set_name (p, "image_sum_optimized");
      orc_program_set_backup_function (p, _backup_image_sum_optimized);
      orc_program_add_source (p, 1, "s1");
      orc_program_add_accumulator (p, 4, "a1");
      orc_program_add_temporary (p, 2, "t1");
      orc_program_add_temporary (p, 4, "t2");

      orc_program_append_2 (p, "convubw", 0, ORC_VAR_T1, ORC_VAR_S1, ORC_VAR_D1, ORC_VAR_D1);
      orc_program_append_2 (p, "convuwl", 0, ORC_VAR_T2, ORC_VAR_T1, ORC_VAR_D1, ORC_VAR_D1);
      orc_program_append_2 (p, "accl", 0, ORC_VAR_A1, ORC_VAR_T2, ORC_VAR_D1, ORC_VAR_D1);

      orc_program_compile (p);
      c = orc_program_take_code (p);
      orc_program_free (p);
    }
    p_inited = TRUE;
    orc_once_mutex_unlock ();
  }
  ex->arrays[ORC_VAR_A2] = c;
  ex->program = 0;

  ex->n = n;
  ORC_EXECUTOR_M(ex) = m;
  ex->arrays[ORC_VAR_S1] = (void *)s1;
  ex->params[ORC_VAR_S1] = s1_stride;

  func = c->exec;
  func (ex);
  *a1 = orc_executor_get_accumulator (ex, ORC_VAR_A1);
}
#endif


/* image_variance_optimized */
#ifdef DISABLE_ORC
void
image_variance_optimized (int * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, int p2, int n, int m){
  int i;
  int j;
  const orc_int8 * ORC_RESTRICT ptr4;
  orc_union32 var12 =  { 0 };
  orc_int8 var32;
  orc_int8 var33;

  for (j = 0; j < m; j++) {
    ptr4 = ORC_PTR_OFFSET(s1, s1_stride * j);

      /* 1: loadpb */
        var33 = p2;

    for (i = 0; i < n; i++) {
      /* 0: loadb */
      var32 = ptr4[i];
      /* 2: accsadubl */
      var12.i = var12.i + ORC_ABS((orc_int32)(orc_uint8)var32 - (orc_int32)(orc_uint8)var33);
    }
  }
  *a1 = var12.i;

}

#else
static void
_backup_image_variance_optimized (OrcExecutor * ORC_RESTRICT ex)
{
  int i;
  int j;
  int n = ex->n;
  int m = ex->params[ORC_VAR_A1];
  const orc_int8 * ORC_RESTRICT ptr4;
  orc_union32 var12 =  { 0 };
  orc_int8 var32;
  orc_int8 var33;

  for (j = 0; j < m; j++) {
    ptr4 = ORC_PTR_OFFSET(ex->arrays[4], ex->params[4] * j);

      /* 1: loadpb */
        var33 = ex->params[25];

    for (i = 0; i < n; i++) {
      /* 0: loadb */
      var32 = ptr4[i];
      /* 2: accsadubl */
      var12.i = var12.i + ORC_ABS((orc_int32)(orc_uint8)var32 - (orc_int32)(orc_uint8)var33);
    }
  }
  ex->accumulators[0] = var12.i;

}

void
image_variance_optimized (int * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, int p2, int n, int m)
{
  OrcExecutor _ex, *ex = &_ex;
  static int p_inited = 0;
  static OrcCode *c = 0;
  void (*func) (OrcExecutor *);

  if (!p_inited) {
    orc_once_mutex_lock ();
    if (!p_inited) {
      OrcProgram *p;

      p = orc_program_new ();
      orc_program_set_2d (p);
      orc_program_set_name (p, "image_variance_optimized");
      orc_program_set_backup_function (p, _backup_image_variance_optimized);
      orc_program_add_source (p, 1, "s1");
      orc_program_add_accumulator (p, 4, "a1");
      orc_program_add_parameter (p, 1, "p2");

      orc_program_append_2 (p, "accsadubl", 0, ORC_VAR_A1, ORC_VAR_S1, ORC_VAR_P2, ORC_VAR_D1);

      orc_program_compile (p);
      c = orc_program_take_code (p);
      orc_program_free (p);
    }
    p_inited = TRUE;
    orc_once_mutex_unlock ();
  }
  ex->arrays[ORC_VAR_A2] = c;
  ex->program = 0;

  ex->n = n;
  ORC_EXECUTOR_M(ex) = m;
  ex->arrays[ORC_VAR_S1] = (void *)s1;
  ex->params[ORC_VAR_S1] = s1_stride;
  ex->params[ORC_VAR_P2] = p2;

  func = c->exec;
  func (ex);
  *a1 = orc_executor_get_accumulator (ex, ORC_VAR_A1);
}
#endif
Commit	Line	Data
80f575fc DM	1
	2	/* autogenerated from motiondetectorc.orc */
	3
	4	#ifdef HAVE_CONFIG_H
	5	#include "config.h"
	6	#endif
	7
	8	#ifndef _ORC_INTEGER_TYPEDEFS_
	9	#define _ORC_INTEGER_TYPEDEFS_
	10	#if defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L
	11	#include <stdint.h>
	12	typedef int8_t orc_int8;
	13	typedef int16_t orc_int16;
	14	typedef int32_t orc_int32;
	15	typedef int64_t orc_int64;
	16	typedef uint8_t orc_uint8;
	17	typedef uint16_t orc_uint16;
	18	typedef uint32_t orc_uint32;
	19	typedef uint64_t orc_uint64;
	20	#define ORC_UINT64_C(x) UINT64_C(x)
	21	#elif defined(_MSC_VER)
	22	typedef signed __int8 orc_int8;
	23	typedef signed __int16 orc_int16;
	24	typedef signed __int32 orc_int32;
	25	typedef signed __int64 orc_int64;
	26	typedef unsigned __int8 orc_uint8;
	27	typedef unsigned __int16 orc_uint16;
	28	typedef unsigned __int32 orc_uint32;
	29	typedef unsigned __int64 orc_uint64;
	30	#define ORC_UINT64_C(x) (x##Ui64)
	31	#define inline __inline
	32	#else
	33	#include <limits.h>
	34	typedef signed char orc_int8;
	35	typedef short orc_int16;
	36	typedef int orc_int32;
	37	typedef unsigned char orc_uint8;
	38	typedef unsigned short orc_uint16;
	39	typedef unsigned int orc_uint32;
	40	#if INT_MAX == LONG_MAX
	41	typedef long long orc_int64;
	42	typedef unsigned long long orc_uint64;
	43	#define ORC_UINT64_C(x) (x##ULL)
	44	#else
	45	typedef long orc_int64;
	46	typedef unsigned long orc_uint64;
	47	#define ORC_UINT64_C(x) (x##UL)
	48	#endif
	49	#endif
	50	typedef union { orc_int16 i; orc_int8 x2[2]; } orc_union16;
	51	typedef union { orc_int32 i; float f; orc_int16 x2[2]; orc_int8 x4[4]; } orc_union32;
	52	typedef union { orc_int64 i; double f; orc_int32 x2[2]; float x2f[2]; orc_int16 x4[4]; } orc_union64;
	53	#endif
	54	#ifndef ORC_RESTRICT
	55	#if defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L
	56	#define ORC_RESTRICT restrict
	57	#elif defined(__GNUC__) && __GNUC__ >= 4
	58	#define ORC_RESTRICT __restrict__
	59	#else
	60	#define ORC_RESTRICT
	61	#endif
	62	#endif
	63
	64	#ifndef DISABLE_ORC
65	#include <orc/orc.h>
66	#endif
67	void image_difference_optimized (orc_uint32 * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, const orc_uint8 * ORC_RESTRICT s2, int s2_stride, int n, int m);
68	void image_line_difference_optimized (orc_uint32 * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, const orc_uint8 * ORC_RESTRICT s2, int n);
69	void image_sum_optimized (int * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, int n, int m);
70	void image_variance_optimized (int * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, int p2, int n, int m);
71
72
73	/* begin Orc C target preamble */
74	#define ORC_CLAMP(x,a,b) ((x)<(a) ? (a) : ((x)>(b) ? (b) : (x)))
75	#define ORC_ABS(a) ((a)<0 ? -(a) : (a))
76	#define ORC_MIN(a,b) ((a)<(b) ? (a) : (b))
77	#define ORC_MAX(a,b) ((a)>(b) ? (a) : (b))
78	#define ORC_SB_MAX 127
79	#define ORC_SB_MIN (-1-ORC_SB_MAX)
80	#define ORC_UB_MAX 255
81	#define ORC_UB_MIN 0
82	#define ORC_SW_MAX 32767
83	#define ORC_SW_MIN (-1-ORC_SW_MAX)
84	#define ORC_UW_MAX 65535
85	#define ORC_UW_MIN 0
86	#define ORC_SL_MAX 2147483647
87	#define ORC_SL_MIN (-1-ORC_SL_MAX)
88	#define ORC_UL_MAX 4294967295U
89	#define ORC_UL_MIN 0
90	#define ORC_CLAMP_SB(x) ORC_CLAMP(x,ORC_SB_MIN,ORC_SB_MAX)
91	#define ORC_CLAMP_UB(x) ORC_CLAMP(x,ORC_UB_MIN,ORC_UB_MAX)
92	#define ORC_CLAMP_SW(x) ORC_CLAMP(x,ORC_SW_MIN,ORC_SW_MAX)
93	#define ORC_CLAMP_UW(x) ORC_CLAMP(x,ORC_UW_MIN,ORC_UW_MAX)
94	#define ORC_CLAMP_SL(x) ORC_CLAMP(x,ORC_SL_MIN,ORC_SL_MAX)
95	#define ORC_CLAMP_UL(x) ORC_CLAMP(x,ORC_UL_MIN,ORC_UL_MAX)
96	#define ORC_SWAP_W(x) ((((x)&0xff)<<8) \| (((x)&0xff00)>>8))
97	#define ORC_SWAP_L(x) ((((x)&0xff)<<24) \| (((x)&0xff00)<<8) \| (((x)&0xff0000)>>8) \| (((x)&0xff000000)>>24))
98	#define ORC_SWAP_Q(x) ((((x)&ORC_UINT64_C(0xff))<<56) \| (((x)&ORC_UINT64_C(0xff00))<<40) \| (((x)&ORC_UINT64_C(0xff0000))<<24) \| (((x)&ORC_UINT64_C(0xff000000))<<8) \| (((x)&ORC_UINT64_C(0xff00000000))>>8) \| (((x)&ORC_UINT64_C(0xff0000000000))>>24) \| (((x)&ORC_UINT64_C(0xff000000000000))>>40) \| (((x)&ORC_UINT64_C(0xff00000000000000))>>56))
99	#define ORC_PTR_OFFSET(ptr,offset) ((void )(((unsigned char )(ptr)) + (offset)))
100	#define ORC_DENORMAL(x) ((x) & ((((x)&0x7f800000) == 0) ? 0xff800000 : 0xffffffff))
101	#define ORC_ISNAN(x) ((((x)&0x7f800000) == 0x7f800000) && (((x)&0x007fffff) != 0))
102	#define ORC_DENORMAL_DOUBLE(x) ((x) & ((((x)&ORC_UINT64_C(0x7ff0000000000000)) == 0) ? ORC_UINT64_C(0xfff0000000000000) : ORC_UINT64_C(0xffffffffffffffff)))
103	#define ORC_ISNAN_DOUBLE(x) ((((x)&ORC_UINT64_C(0x7ff0000000000000)) == ORC_UINT64_C(0x7ff0000000000000)) && (((x)&ORC_UINT64_C(0x000fffffffffffff)) != 0))
104	#ifndef ORC_RESTRICT
105	#if defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L
106	#define ORC_RESTRICT restrict
107	#elif defined(__GNUC__) && __GNUC__ >= 4
108	#define ORC_RESTRICT __restrict__
109	#else
110	#define ORC_RESTRICT
111	#endif
112	#endif
113	/* end Orc C target preamble */
114
115
116
117	/* image_difference_optimized */
118	#ifdef DISABLE_ORC
119	void
120	image_difference_optimized (orc_uint32 * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, const orc_uint8 * ORC_RESTRICT s2, int s2_stride, int n, int m){
121	int i;
122	int j;
123	const orc_int8 * ORC_RESTRICT ptr4;
124	const orc_int8 * ORC_RESTRICT ptr5;
125	orc_union32 var12 = { 0 };
126	orc_int8 var32;
127	orc_int8 var33;
128
129	for (j = 0; j < m; j++) {
130	ptr4 = ORC_PTR_OFFSET(s1, s1_stride * j);
131	ptr5 = ORC_PTR_OFFSET(s2, s2_stride * j);
132
133
134	for (i = 0; i < n; i++) {
135	/* 0: loadb */
136	var32 = ptr4[i];
137	/* 1: loadb */
138	var33 = ptr5[i];
139	/* 2: accsadubl */
140	var12.i = var12.i + ORC_ABS((orc_int32)(orc_uint8)var32 - (orc_int32)(orc_uint8)var33);
141	}
142	}
143	*a1 = var12.i;
144
145	}
146
147	#else
148	static void
149	_backup_image_difference_optimized (OrcExecutor * ORC_RESTRICT ex)
150	{
151	int i;
152	int j;
153	int n = ex->n;
154	int m = ex->params[ORC_VAR_A1];
155	const orc_int8 * ORC_RESTRICT ptr4;
156	const orc_int8 * ORC_RESTRICT ptr5;
157	orc_union32 var12 = { 0 };
158	orc_int8 var32;
159	orc_int8 var33;
160
161	for (j = 0; j < m; j++) {
162	ptr4 = ORC_PTR_OFFSET(ex->arrays[4], ex->params[4] * j);
163	ptr5 = ORC_PTR_OFFSET(ex->arrays[5], ex->params[5] * j);
164
165
166	for (i = 0; i < n; i++) {
167	/* 0: loadb */
168	var32 = ptr4[i];
169	/* 1: loadb */
170	var33 = ptr5[i];
171	/* 2: accsadubl */
172	var12.i = var12.i + ORC_ABS((orc_int32)(orc_uint8)var32 - (orc_int32)(orc_uint8)var33);
173	}
174	}
175	ex->accumulators[0] = var12.i;
176
177	}
178
179	void
180	image_difference_optimized (orc_uint32 * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, const orc_uint8 * ORC_RESTRICT s2, int s2_stride, int n, int m)
181	{
182	OrcExecutor _ex, *ex = &_ex;
183	static int p_inited = 0;
184	static OrcCode *c = 0;
185	void (func) (OrcExecutor );
186
187	if (!p_inited) {
188	orc_once_mutex_lock ();
189	if (!p_inited) {
190	OrcProgram *p;
191
192	p = orc_program_new ();
193	orc_program_set_2d (p);
194	orc_program_set_name (p, "image_difference_optimized");
195	orc_program_set_backup_function (p, _backup_image_difference_optimized);
196	orc_program_add_source (p, 1, "s1");
197	orc_program_add_source (p, 1, "s2");
198	orc_program_add_accumulator (p, 4, "a1");
199
200	orc_program_append_2 (p, "accsadubl", 0, ORC_VAR_A1, ORC_VAR_S1, ORC_VAR_S2, ORC_VAR_D1);
201
202	orc_program_compile (p);
203	c = orc_program_take_code (p);
204	orc_program_free (p);
205	}
206	p_inited = TRUE;
207	orc_once_mutex_unlock ();
208	}
209	ex->arrays[ORC_VAR_A2] = c;
210	ex->program = 0;
211
212	ex->n = n;
213	ORC_EXECUTOR_M(ex) = m;
214	ex->arrays[ORC_VAR_S1] = (void *)s1;
215	ex->params[ORC_VAR_S1] = s1_stride;
216	ex->arrays[ORC_VAR_S2] = (void *)s2;
217	ex->params[ORC_VAR_S2] = s2_stride;
218
219	func = c->exec;
220	func (ex);
221	*a1 = orc_executor_get_accumulator (ex, ORC_VAR_A1);
222	}
223	#endif
224
225
226	/* image_line_difference_optimized */
227	#ifdef DISABLE_ORC
228	void
229	image_line_difference_optimized (orc_uint32 * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, const orc_uint8 * ORC_RESTRICT s2, int n){
230	int i;
231	const orc_int8 * ORC_RESTRICT ptr4;
232	const orc_int8 * ORC_RESTRICT ptr5;
233	orc_union32 var12 = { 0 };
234	orc_int8 var32;
235	orc_int8 var33;
236
237	ptr4 = (orc_int8 *)s1;
238	ptr5 = (orc_int8 *)s2;
239
240
241	for (i = 0; i < n; i++) {
242	/* 0: loadb */
243	var32 = ptr4[i];
244	/* 1: loadb */
245	var33 = ptr5[i];
246	/* 2: accsadubl */
247	var12.i = var12.i + ORC_ABS((orc_int32)(orc_uint8)var32 - (orc_int32)(orc_uint8)var33);
248	}
249	*a1 = var12.i;
250
251	}
252
253	#else
254	static void
255	_backup_image_line_difference_optimized (OrcExecutor * ORC_RESTRICT ex)
256	{
257	int i;
258	int n = ex->n;
259	const orc_int8 * ORC_RESTRICT ptr4;
260	const orc_int8 * ORC_RESTRICT ptr5;
261	orc_union32 var12 = { 0 };
262	orc_int8 var32;
263	orc_int8 var33;
264
265	ptr4 = (orc_int8 *)ex->arrays[4];
266	ptr5 = (orc_int8 *)ex->arrays[5];
267
268
269	for (i = 0; i < n; i++) {
270	/* 0: loadb */
271	var32 = ptr4[i];
272	/* 1: loadb */
273	var33 = ptr5[i];
274	/* 2: accsadubl */
275	var12.i = var12.i + ORC_ABS((orc_int32)(orc_uint8)var32 - (orc_int32)(orc_uint8)var33);
276	}
277	ex->accumulators[0] = var12.i;
278
279	}
280
281	void
282	image_line_difference_optimized (orc_uint32 * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, const orc_uint8 * ORC_RESTRICT s2, int n)
283	{
284	OrcExecutor _ex, *ex = &_ex;
285	static int p_inited = 0;
286	static OrcCode *c = 0;
287	void (func) (OrcExecutor );
288
289	if (!p_inited) {
290	orc_once_mutex_lock ();
291	if (!p_inited) {
292	OrcProgram *p;
293
294	p = orc_program_new ();
295	orc_program_set_name (p, "image_line_difference_optimized");
296	orc_program_set_backup_function (p, _backup_image_line_difference_optimized);
297	orc_program_add_source (p, 1, "s1");
298	orc_program_add_source (p, 1, "s2");
299	orc_program_add_accumulator (p, 4, "a1");
300
301	orc_program_append_2 (p, "accsadubl", 0, ORC_VAR_A1, ORC_VAR_S1, ORC_VAR_S2, ORC_VAR_D1);
302
303	orc_program_compile (p);
304	c = orc_program_take_code (p);
305	orc_program_free (p);
306	}
307	p_inited = TRUE;
308	orc_once_mutex_unlock ();
309	}
310	ex->arrays[ORC_VAR_A2] = c;
311	ex->program = 0;
312
313	ex->n = n;
314	ex->arrays[ORC_VAR_S1] = (void *)s1;
315	ex->arrays[ORC_VAR_S2] = (void *)s2;
316
317	func = c->exec;
318	func (ex);
319	*a1 = orc_executor_get_accumulator (ex, ORC_VAR_A1);
320	}
321	#endif
322
323
324	/* image_sum_optimized */
325	#ifdef DISABLE_ORC
326	void
327	image_sum_optimized (int * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, int n, int m){
328	int i;
329	int j;
330	const orc_int8 * ORC_RESTRICT ptr4;
331	orc_union32 var12 = { 0 };
332	orc_int8 var34;
333	orc_union16 var35;
334	orc_union32 var36;
335
336	for (j = 0; j < m; j++) {
337	ptr4 = ORC_PTR_OFFSET(s1, s1_stride * j);
338
339
340	for (i = 0; i < n; i++) {
341	/* 0: loadb */
342	var34 = ptr4[i];
343	/* 1: convubw */
344	var35.i = (orc_uint8)var34;
345	/* 2: convuwl */
346	var36.i = (orc_uint16)var35.i;
347	/* 3: accl */
348	var12.i = var12.i + var36.i;
349	}
350	}
351	*a1 = var12.i;
352
353	}
354
355	#else
356	static void
357	_backup_image_sum_optimized (OrcExecutor * ORC_RESTRICT ex)
358	{
359	int i;
360	int j;
361	int n = ex->n;
362	int m = ex->params[ORC_VAR_A1];
363	const orc_int8 * ORC_RESTRICT ptr4;
364	orc_union32 var12 = { 0 };
365	orc_int8 var34;
366	orc_union16 var35;
367	orc_union32 var36;
368
369	for (j = 0; j < m; j++) {
370	ptr4 = ORC_PTR_OFFSET(ex->arrays[4], ex->params[4] * j);
371
372
373	for (i = 0; i < n; i++) {
374	/* 0: loadb */
375	var34 = ptr4[i];
376	/* 1: convubw */
377	var35.i = (orc_uint8)var34;
378	/* 2: convuwl */
379	var36.i = (orc_uint16)var35.i;
380	/* 3: accl */
381	var12.i = var12.i + var36.i;
382	}
383	}
384	ex->accumulators[0] = var12.i;
385
386	}
387
388	void
389	image_sum_optimized (int * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, int n, int m)
390	{
391	OrcExecutor _ex, *ex = &_ex;
392	static int p_inited = 0;
393	static OrcCode *c = 0;
394	void (func) (OrcExecutor );
395
396	if (!p_inited) {
397	orc_once_mutex_lock ();
398	if (!p_inited) {
399	OrcProgram *p;
400
401	p = orc_program_new ();
402	orc_program_set_2d (p);
403	orc_program_set_name (p, "image_sum_optimized");
404	orc_program_set_backup_function (p, _backup_image_sum_optimized);
405	orc_program_add_source (p, 1, "s1");
406	orc_program_add_accumulator (p, 4, "a1");
407	orc_program_add_temporary (p, 2, "t1");
408	orc_program_add_temporary (p, 4, "t2");
409
410	orc_program_append_2 (p, "convubw", 0, ORC_VAR_T1, ORC_VAR_S1, ORC_VAR_D1, ORC_VAR_D1);
411	orc_program_append_2 (p, "convuwl", 0, ORC_VAR_T2, ORC_VAR_T1, ORC_VAR_D1, ORC_VAR_D1);
412	orc_program_append_2 (p, "accl", 0, ORC_VAR_A1, ORC_VAR_T2, ORC_VAR_D1, ORC_VAR_D1);
413
414	orc_program_compile (p);
415	c = orc_program_take_code (p);
416	orc_program_free (p);
417	}
418	p_inited = TRUE;
419	orc_once_mutex_unlock ();
420	}
421	ex->arrays[ORC_VAR_A2] = c;
422	ex->program = 0;
423
424	ex->n = n;
425	ORC_EXECUTOR_M(ex) = m;
426	ex->arrays[ORC_VAR_S1] = (void *)s1;
427	ex->params[ORC_VAR_S1] = s1_stride;
428
429	func = c->exec;
430	func (ex);
431	*a1 = orc_executor_get_accumulator (ex, ORC_VAR_A1);
432	}
433	#endif
434
435
436	/* image_variance_optimized */
437	#ifdef DISABLE_ORC
438	void
439	image_variance_optimized (int * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, int p2, int n, int m){
440	int i;
441	int j;
442	const orc_int8 * ORC_RESTRICT ptr4;
443	orc_union32 var12 = { 0 };
444	orc_int8 var32;
445	orc_int8 var33;
446
447	for (j = 0; j < m; j++) {
448	ptr4 = ORC_PTR_OFFSET(s1, s1_stride * j);
449
450	/* 1: loadpb */
451	var33 = p2;
452
453	for (i = 0; i < n; i++) {
454	/* 0: loadb */
455	var32 = ptr4[i];
456	/* 2: accsadubl */
457	var12.i = var12.i + ORC_ABS((orc_int32)(orc_uint8)var32 - (orc_int32)(orc_uint8)var33);
458	}
459	}
460	*a1 = var12.i;
461
462	}
463
464	#else
465	static void
466	_backup_image_variance_optimized (OrcExecutor * ORC_RESTRICT ex)
467	{
468	int i;
469	int j;
470	int n = ex->n;
471	int m = ex->params[ORC_VAR_A1];
472	const orc_int8 * ORC_RESTRICT ptr4;
473	orc_union32 var12 = { 0 };
474	orc_int8 var32;
475	orc_int8 var33;
476
477	for (j = 0; j < m; j++) {
478	ptr4 = ORC_PTR_OFFSET(ex->arrays[4], ex->params[4] * j);
479
480	/* 1: loadpb */
481	var33 = ex->params[25];
482
483	for (i = 0; i < n; i++) {
484	/* 0: loadb */
485	var32 = ptr4[i];
486	/* 2: accsadubl */
487	var12.i = var12.i + ORC_ABS((orc_int32)(orc_uint8)var32 - (orc_int32)(orc_uint8)var33);
488	}
489	}
490	ex->accumulators[0] = var12.i;
491
492	}
493
494	void
495	image_variance_optimized (int * ORC_RESTRICT a1, const orc_uint8 * ORC_RESTRICT s1, int s1_stride, int p2, int n, int m)
496	{
497	OrcExecutor _ex, *ex = &_ex;
498	static int p_inited = 0;
499	static OrcCode *c = 0;
500	void (func) (OrcExecutor );
501
502	if (!p_inited) {
503	orc_once_mutex_lock ();
504	if (!p_inited) {
505	OrcProgram *p;
506
507	p = orc_program_new ();
508	orc_program_set_2d (p);
509	orc_program_set_name (p, "image_variance_optimized");
510	orc_program_set_backup_function (p, _backup_image_variance_optimized);
511	orc_program_add_source (p, 1, "s1");
512	orc_program_add_accumulator (p, 4, "a1");
513	orc_program_add_parameter (p, 1, "p2");
514
515	orc_program_append_2 (p, "accsadubl", 0, ORC_VAR_A1, ORC_VAR_S1, ORC_VAR_P2, ORC_VAR_D1);
516
517	orc_program_compile (p);
518	c = orc_program_take_code (p);
519	orc_program_free (p);
520	}
521	p_inited = TRUE;
522	orc_once_mutex_unlock ();
523	}
524	ex->arrays[ORC_VAR_A2] = c;
525	ex->program = 0;
526
527	ex->n = n;
528	ORC_EXECUTOR_M(ex) = m;
529	ex->arrays[ORC_VAR_S1] = (void *)s1;
530	ex->params[ORC_VAR_S1] = s1_stride;
531	ex->params[ORC_VAR_P2] = p2;
532
533	func = c->exec;
534	func (ex);
535	*a1 = orc_executor_get_accumulator (ex, ORC_VAR_A1);
536	}
537	#endif
538
539