| Line | Branch | Exec | Source |
|---|---|---|---|
| 1 | |||
| 2 | /* autogenerated from volk_32f_s32f_normalize_a_orc_impl.orc */ | ||
| 3 | |||
| 4 | #ifdef HAVE_CONFIG_H | ||
| 5 | #include "config.h" | ||
| 6 | #endif | ||
| 7 | #include <math.h> | ||
| 8 | |||
| 9 | #ifndef _ORC_INTEGER_TYPEDEFS_ | ||
| 10 | #define _ORC_INTEGER_TYPEDEFS_ | ||
| 11 | #if defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L | ||
| 12 | #include <stdint.h> | ||
| 13 | typedef int8_t orc_int8; | ||
| 14 | typedef int16_t orc_int16; | ||
| 15 | typedef int32_t orc_int32; | ||
| 16 | typedef int64_t orc_int64; | ||
| 17 | typedef uint8_t orc_uint8; | ||
| 18 | typedef uint16_t orc_uint16; | ||
| 19 | typedef uint32_t orc_uint32; | ||
| 20 | typedef uint64_t orc_uint64; | ||
| 21 | #define ORC_UINT64_C(x) UINT64_C(x) | ||
| 22 | #elif defined(_MSC_VER) | ||
| 23 | typedef signed __int8 orc_int8; | ||
| 24 | typedef signed __int16 orc_int16; | ||
| 25 | typedef signed __int32 orc_int32; | ||
| 26 | typedef signed __int64 orc_int64; | ||
| 27 | typedef unsigned __int8 orc_uint8; | ||
| 28 | typedef unsigned __int16 orc_uint16; | ||
| 29 | typedef unsigned __int32 orc_uint32; | ||
| 30 | typedef unsigned __int64 orc_uint64; | ||
| 31 | #define ORC_UINT64_C(x) (x##Ui64) | ||
| 32 | #define inline __inline | ||
| 33 | #else | ||
| 34 | #include <limits.h> | ||
| 35 | typedef signed char orc_int8; | ||
| 36 | typedef short orc_int16; | ||
| 37 | typedef int orc_int32; | ||
| 38 | typedef unsigned char orc_uint8; | ||
| 39 | typedef unsigned short orc_uint16; | ||
| 40 | typedef unsigned int orc_uint32; | ||
| 41 | #if INT_MAX == LONG_MAX | ||
| 42 | typedef long long orc_int64; | ||
| 43 | typedef unsigned long long orc_uint64; | ||
| 44 | #define ORC_UINT64_C(x) (x##ULL) | ||
| 45 | #else | ||
| 46 | typedef long orc_int64; | ||
| 47 | typedef unsigned long orc_uint64; | ||
| 48 | #define ORC_UINT64_C(x) (x##UL) | ||
| 49 | #endif | ||
| 50 | #endif | ||
| 51 | typedef union { orc_int16 i; orc_int8 x2[2]; } orc_union16; | ||
| 52 | typedef union { orc_int32 i; float f; orc_int16 x2[2]; orc_int8 x4[4]; } orc_union32; | ||
| 53 | typedef union { orc_int64 i; double f; orc_int32 x2[2]; float x2f[2]; orc_int16 x4[4]; } orc_union64; | ||
| 54 | #endif | ||
| 55 | #ifndef ORC_RESTRICT | ||
| 56 | #if defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L | ||
| 57 | #define ORC_RESTRICT restrict | ||
| 58 | #elif defined(__GNUC__) && __GNUC__ >= 4 | ||
| 59 | #define ORC_RESTRICT __restrict__ | ||
| 60 | #elif defined(_MSC_VER) | ||
| 61 | #define ORC_RESTRICT __restrict | ||
| 62 | #else | ||
| 63 | #define ORC_RESTRICT | ||
| 64 | #endif | ||
| 65 | #endif | ||
| 66 | |||
| 67 | #ifndef ORC_INTERNAL | ||
| 68 | #if defined(__SUNPRO_C) && (__SUNPRO_C >= 0x590) | ||
| 69 | #define ORC_INTERNAL __attribute__((visibility("hidden"))) | ||
| 70 | #elif defined(__SUNPRO_C) && (__SUNPRO_C >= 0x550) | ||
| 71 | #define ORC_INTERNAL __hidden | ||
| 72 | #elif defined (__GNUC__) | ||
| 73 | #define ORC_INTERNAL __attribute__((visibility("hidden"))) | ||
| 74 | #else | ||
| 75 | #define ORC_INTERNAL | ||
| 76 | #endif | ||
| 77 | #endif | ||
| 78 | |||
| 79 | |||
| 80 | #ifndef DISABLE_ORC | ||
| 81 | #include <orc/orc.h> | ||
| 82 | #endif | ||
| 83 | void volk_32f_s32f_normalize_a_orc_impl (orc_uint32 * ORC_RESTRICT d1, const orc_uint32 * ORC_RESTRICT s1, float p1, int n); | ||
| 84 | |||
| 85 | |||
| 86 | /* begin Orc C target preamble */ | ||
| 87 | #define ORC_CLAMP(x,a,b) ((x)<(a) ? (a) : ((x)>(b) ? (b) : (x))) | ||
| 88 | #define ORC_ABS(a) ((a)<0 ? -(a) : (a)) | ||
| 89 | #define ORC_MIN(a,b) ((a)<(b) ? (a) : (b)) | ||
| 90 | #define ORC_MAX(a,b) ((a)>(b) ? (a) : (b)) | ||
| 91 | #define ORC_SB_MAX 127 | ||
| 92 | #define ORC_SB_MIN (-1-ORC_SB_MAX) | ||
| 93 | #define ORC_UB_MAX (orc_uint8) 255 | ||
| 94 | #define ORC_UB_MIN 0 | ||
| 95 | #define ORC_SW_MAX 32767 | ||
| 96 | #define ORC_SW_MIN (-1-ORC_SW_MAX) | ||
| 97 | #define ORC_UW_MAX (orc_uint16)65535 | ||
| 98 | #define ORC_UW_MIN 0 | ||
| 99 | #define ORC_SL_MAX 2147483647 | ||
| 100 | #define ORC_SL_MIN (-1-ORC_SL_MAX) | ||
| 101 | #define ORC_UL_MAX 4294967295U | ||
| 102 | #define ORC_UL_MIN 0 | ||
| 103 | #define ORC_CLAMP_SB(x) ORC_CLAMP(x,ORC_SB_MIN,ORC_SB_MAX) | ||
| 104 | #define ORC_CLAMP_UB(x) ORC_CLAMP(x,ORC_UB_MIN,ORC_UB_MAX) | ||
| 105 | #define ORC_CLAMP_SW(x) ORC_CLAMP(x,ORC_SW_MIN,ORC_SW_MAX) | ||
| 106 | #define ORC_CLAMP_UW(x) ORC_CLAMP(x,ORC_UW_MIN,ORC_UW_MAX) | ||
| 107 | #define ORC_CLAMP_SL(x) ORC_CLAMP(x,ORC_SL_MIN,ORC_SL_MAX) | ||
| 108 | #define ORC_CLAMP_UL(x) ORC_CLAMP(x,ORC_UL_MIN,ORC_UL_MAX) | ||
| 109 | #define ORC_SWAP_W(x) ((((x)&0xffU)<<8) | (((x)&0xff00U)>>8)) | ||
| 110 | #define ORC_SWAP_L(x) ((((x)&0xffU)<<24) | (((x)&0xff00U)<<8) | (((x)&0xff0000U)>>8) | (((x)&0xff000000U)>>24)) | ||
| 111 | #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)) | ||
| 112 | #define ORC_PTR_OFFSET(ptr,offset) ((void *)(((unsigned char *)(ptr)) + (offset))) | ||
| 113 | #define ORC_DENORMAL(x) ((x) & ((((x)&0x7f800000) == 0) ? 0xff800000 : 0xffffffff)) | ||
| 114 | #define ORC_ISNAN(x) ((((x)&0x7f800000) == 0x7f800000) && (((x)&0x007fffff) != 0)) | ||
| 115 | #define ORC_DENORMAL_DOUBLE(x) ((x) & ((((x)&ORC_UINT64_C(0x7ff0000000000000)) == 0) ? ORC_UINT64_C(0xfff0000000000000) : ORC_UINT64_C(0xffffffffffffffff))) | ||
| 116 | #define ORC_ISNAN_DOUBLE(x) ((((x)&ORC_UINT64_C(0x7ff0000000000000)) == ORC_UINT64_C(0x7ff0000000000000)) && (((x)&ORC_UINT64_C(0x000fffffffffffff)) != 0)) | ||
| 117 | #ifndef ORC_RESTRICT | ||
| 118 | #if defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L | ||
| 119 | #define ORC_RESTRICT restrict | ||
| 120 | #elif defined(__GNUC__) && __GNUC__ >= 4 | ||
| 121 | #define ORC_RESTRICT __restrict__ | ||
| 122 | #else | ||
| 123 | #define ORC_RESTRICT | ||
| 124 | #endif | ||
| 125 | #endif | ||
| 126 | /* end Orc C target preamble */ | ||
| 127 | |||
| 128 | |||
| 129 | |||
| 130 | /* volk_32f_s32f_normalize_a_orc_impl */ | ||
| 131 | #ifdef DISABLE_ORC | ||
| 132 | void | ||
| 133 | volk_32f_s32f_normalize_a_orc_impl (orc_uint32 * ORC_RESTRICT d1, const orc_uint32 * ORC_RESTRICT s1, float p1, int n){ | ||
| 134 | int i; | ||
| 135 | orc_union32 * ORC_RESTRICT ptr0; | ||
| 136 | const orc_union32 * ORC_RESTRICT ptr4; | ||
| 137 | orc_union32 var32; | ||
| 138 | orc_union32 var33; | ||
| 139 | orc_union32 var34; | ||
| 140 | |||
| 141 | ptr0 = (orc_union32 *)d1; | ||
| 142 | ptr4 = (orc_union32 *)s1; | ||
| 143 | |||
| 144 | /* 1: loadpl */ | ||
| 145 | var33.f = p1; | ||
| 146 | |||
| 147 | for (i = 0; i < n; i++) { | ||
| 148 | /* 0: loadl */ | ||
| 149 | var32 = ptr4[i]; | ||
| 150 | /* 2: mulf */ | ||
| 151 | { | ||
| 152 | orc_union32 _src1; | ||
| 153 | orc_union32 _src2; | ||
| 154 | orc_union32 _dest1; | ||
| 155 | _src1.i = ORC_DENORMAL(var32.i); | ||
| 156 | _src2.i = ORC_DENORMAL(var33.i); | ||
| 157 | _dest1.f = _src1.f * _src2.f; | ||
| 158 | var34.i = ORC_DENORMAL(_dest1.i); | ||
| 159 | } | ||
| 160 | /* 3: storel */ | ||
| 161 | ptr0[i] = var34; | ||
| 162 | } | ||
| 163 | |||
| 164 | } | ||
| 165 | |||
| 166 | #else | ||
| 167 | static void | ||
| 168 | ✗ | _backup_volk_32f_s32f_normalize_a_orc_impl (OrcExecutor * ORC_RESTRICT ex) | |
| 169 | { | ||
| 170 | int i; | ||
| 171 | ✗ | int n = ex->n; | |
| 172 | orc_union32 * ORC_RESTRICT ptr0; | ||
| 173 | const orc_union32 * ORC_RESTRICT ptr4; | ||
| 174 | orc_union32 var32; | ||
| 175 | orc_union32 var33; | ||
| 176 | orc_union32 var34; | ||
| 177 | |||
| 178 | ✗ | ptr0 = (orc_union32 *)ex->arrays[0]; | |
| 179 | ✗ | ptr4 = (orc_union32 *)ex->arrays[4]; | |
| 180 | |||
| 181 | /* 1: loadpl */ | ||
| 182 | ✗ | var33.i = ex->params[24]; | |
| 183 | |||
| 184 | ✗ | for (i = 0; i < n; i++) { | |
| 185 | /* 0: loadl */ | ||
| 186 | ✗ | var32 = ptr4[i]; | |
| 187 | /* 2: mulf */ | ||
| 188 | { | ||
| 189 | orc_union32 _src1; | ||
| 190 | orc_union32 _src2; | ||
| 191 | orc_union32 _dest1; | ||
| 192 | ✗ | _src1.i = ORC_DENORMAL(var32.i); | |
| 193 | ✗ | _src2.i = ORC_DENORMAL(var33.i); | |
| 194 | ✗ | _dest1.f = _src1.f * _src2.f; | |
| 195 | ✗ | var34.i = ORC_DENORMAL(_dest1.i); | |
| 196 | } | ||
| 197 | /* 3: storel */ | ||
| 198 | ✗ | ptr0[i] = var34; | |
| 199 | } | ||
| 200 | |||
| 201 | ✗ | } | |
| 202 | |||
| 203 | void | ||
| 204 | 2 | volk_32f_s32f_normalize_a_orc_impl (orc_uint32 * ORC_RESTRICT d1, const orc_uint32 * ORC_RESTRICT s1, float p1, int n) | |
| 205 | { | ||
| 206 | 2 | OrcExecutor _ex, *ex = &_ex; | |
| 207 | static volatile int p_inited = 0; | ||
| 208 | static OrcCode *c = 0; | ||
| 209 | void (*func) (OrcExecutor *); | ||
| 210 | |||
| 211 |
1/2✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.
|
2 | if (!p_inited) { |
| 212 | 2 | orc_once_mutex_lock (); | |
| 213 |
1/2✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.
|
2 | if (!p_inited) { |
| 214 | OrcProgram *p; | ||
| 215 | |||
| 216 | #if 1 | ||
| 217 | static const orc_uint8 bc[] = { | ||
| 218 | 1, 9, 34, 118, 111, 108, 107, 95, 51, 50, 102, 95, 115, 51, 50, 102, | ||
| 219 | 95, 110, 111, 114, 109, 97, 108, 105, 122, 101, 95, 97, 95, 111, 114, 99, | ||
| 220 | 95, 105, 109, 112, 108, 11, 4, 4, 12, 4, 4, 17, 4, 202, 0, 4, | ||
| 221 | 24, 2, 0, | ||
| 222 | }; | ||
| 223 | 2 | p = orc_program_new_from_static_bytecode (bc); | |
| 224 | 2 | orc_program_set_backup_function (p, _backup_volk_32f_s32f_normalize_a_orc_impl); | |
| 225 | #else | ||
| 226 | p = orc_program_new (); | ||
| 227 | orc_program_set_name (p, "volk_32f_s32f_normalize_a_orc_impl"); | ||
| 228 | orc_program_set_backup_function (p, _backup_volk_32f_s32f_normalize_a_orc_impl); | ||
| 229 | orc_program_add_destination (p, 4, "d1"); | ||
| 230 | orc_program_add_source (p, 4, "s1"); | ||
| 231 | orc_program_add_parameter_float (p, 4, "p1"); | ||
| 232 | |||
| 233 | orc_program_append_2 (p, "mulf", 0, ORC_VAR_D1, ORC_VAR_S1, ORC_VAR_P1, ORC_VAR_D1); | ||
| 234 | #endif | ||
| 235 | |||
| 236 | 2 | orc_program_compile (p); | |
| 237 | 2 | c = orc_program_take_code (p); | |
| 238 | 2 | orc_program_free (p); | |
| 239 | } | ||
| 240 | 2 | p_inited = TRUE; | |
| 241 | 2 | orc_once_mutex_unlock (); | |
| 242 | } | ||
| 243 | 2 | ex->arrays[ORC_VAR_A2] = c; | |
| 244 | 2 | ex->program = 0; | |
| 245 | |||
| 246 | 2 | ex->n = n; | |
| 247 | 2 | ex->arrays[ORC_VAR_D1] = d1; | |
| 248 | 2 | ex->arrays[ORC_VAR_S1] = (void *)s1; | |
| 249 | { | ||
| 250 | orc_union32 tmp; | ||
| 251 | 2 | tmp.f = p1; | |
| 252 | 2 | ex->params[ORC_VAR_P1] = tmp.i; | |
| 253 | } | ||
| 254 | |||
| 255 | 2 | func = c->exec; | |
| 256 | 2 | func (ex); | |
| 257 | 2 | } | |
| 258 | #endif | ||
| 259 | |||
| 260 | |||
| 261 |