#include "Audio.h" | #include "Audio.h" | ||||
#include "arm_math.h" | #include "arm_math.h" | ||||
#include "utility/dspinst.h" | |||||
} | } | ||||
} | } | ||||
// computes limit((val >> rshift), 2**bits) | |||||
static inline int32_t signed_saturate_rshift(int32_t val, int bits, int rshift) __attribute__((always_inline)); | |||||
static inline int32_t signed_saturate_rshift(int32_t val, int bits, int rshift) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("ssat %0, %1, %2, asr %3" : "=r" (out) : "I" (bits), "r" (val), "I" (rshift)); | |||||
return out; | |||||
} | |||||
static void apply_window_to_fft_buffer(void *buffer, const void *window) | static void apply_window_to_fft_buffer(void *buffer, const void *window) | ||||
{ | { | ||||
int16_t *buf = (int16_t *)buffer; | int16_t *buf = (int16_t *)buffer; | ||||
/******************************************************************/ | /******************************************************************/ | ||||
// computes ((a[31:0] * b[15:0]) >> 16) | |||||
static inline int32_t signed_multiply_32x16b(int32_t a, uint32_t b) __attribute__((always_inline)); | |||||
static inline int32_t signed_multiply_32x16b(int32_t a, uint32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smulwb %0, %1, %2" : "=r" (out) : "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes ((a[31:0] * b[31:16]) >> 16) | |||||
static inline int32_t signed_multiply_32x16t(int32_t a, uint32_t b) __attribute__((always_inline)); | |||||
static inline int32_t signed_multiply_32x16t(int32_t a, uint32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smulwt %0, %1, %2" : "=r" (out) : "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes (((int64_t)a[31:0] * (int64_t)b[31:0]) >> 32) | |||||
static inline int32_t multiply_32x32_rshift32(int32_t a, int32_t b) __attribute__((always_inline)); | |||||
static inline int32_t multiply_32x32_rshift32(int32_t a, int32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smmul %0, %1, %2" : "=r" (out) : "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes (((int64_t)a[31:0] * (int64_t)b[31:0] + 0x8000000) >> 32) | |||||
static inline int32_t multiply_32x32_rshift32_rounded(int32_t a, int32_t b) __attribute__((always_inline)); | |||||
static inline int32_t multiply_32x32_rshift32_rounded(int32_t a, int32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smmulr %0, %1, %2" : "=r" (out) : "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes sum + (((int64_t)a[31:0] * (int64_t)b[31:0] + 0x8000000) >> 32) | |||||
static inline int32_t multiply_accumulate_32x32_rshift32_rounded(int32_t sum, int32_t a, int32_t b) __attribute__((always_inline)); | |||||
static inline int32_t multiply_accumulate_32x32_rshift32_rounded(int32_t sum, int32_t a, int32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smmlar %0, %2, %3, %1" : "=r" (out) : "r" (sum), "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes sum - (((int64_t)a[31:0] * (int64_t)b[31:0] + 0x8000000) >> 32) | |||||
static inline int32_t multiply_subtract_32x32_rshift32_rounded(int32_t sum, int32_t a, int32_t b) __attribute__((always_inline)); | |||||
static inline int32_t multiply_subtract_32x32_rshift32_rounded(int32_t sum, int32_t a, int32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smmlsr %0, %2, %3, %1" : "=r" (out) : "r" (sum), "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes ((a[15:0] << 16) | b[15:0]) | |||||
static inline uint32_t pack_16x16(int32_t a, int32_t b) __attribute__((always_inline)); | |||||
static inline uint32_t pack_16x16(int32_t a, int32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("pkhbt %0, %1, %2, lsl #16" : "=r" (out) : "r" (b), "r" (a)); | |||||
return out; | |||||
} | |||||
// computes (((a[31:16] + b[31:16]) << 16) | (a[15:0 + b[15:0])) | |||||
static inline uint32_t signed_add_16_and_16(uint32_t a, uint32_t b) __attribute__((always_inline)); | |||||
static inline uint32_t signed_add_16_and_16(uint32_t a, uint32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("qadd16 %0, %1, %2" : "=r" (out) : "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes (sum + ((a[31:0] * b[15:0]) >> 16)) | |||||
static inline int32_t signed_multiply_accumulate_32x16b(int32_t sum, int32_t a, uint32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smlawb %0, %2, %3, %1" : "=r" (out) : "r" (sum), "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes (sum + ((a[31:0] * b[31:16]) >> 16)) | |||||
static inline int32_t signed_multiply_accumulate_32x16t(int32_t sum, int32_t a, uint32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smlawt %0, %2, %3, %1" : "=r" (out) : "r" (sum), "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes logical and, forces compiler to allocate register and use single cycle instruction | |||||
static inline uint32_t logical_and(uint32_t a, uint32_t b) | |||||
{ | |||||
asm volatile("and %0, %1" : "+r" (a) : "r" (b)); | |||||
return a; | |||||
} | |||||
void applyGain(int16_t *data, int32_t mult) | void applyGain(int16_t *data, int32_t mult) | ||||
{ | { | ||||
uint32_t *p = (uint32_t *)data; | uint32_t *p = (uint32_t *)data; |
#! /usr/bin/perl | |||||
use Math::Trig ':pi'; | |||||
$len = 256; | |||||
print "#define SINE_TABLE_LEN $len\n"; | |||||
print "static const int16_t sine_table[] = {\n"; | |||||
for ($i=0; $i <= $len; $i++) { | |||||
$f = sin($i / $len * 2 * pi); | |||||
$d = sprintf "%.0f", $f * 32767.0; | |||||
#print $d; | |||||
printf "%6d", $d + 0; | |||||
print "," if ($i < $len); | |||||
print "\n" if ($i % 10) == 9; | |||||
} | |||||
print "\n" unless ($len % 10) == 9; | |||||
print "};\n"; | |||||
#include <stdint.h> | |||||
// computes limit((val >> rshift), 2**bits) | |||||
static inline int32_t signed_saturate_rshift(int32_t val, int bits, int rshift) __attribute__((always_inline, unused)); | |||||
static inline int32_t signed_saturate_rshift(int32_t val, int bits, int rshift) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("ssat %0, %1, %2, asr %3" : "=r" (out) : "I" (bits), "r" (val), "I" (rshift)); | |||||
return out; | |||||
} | |||||
// computes ((a[31:0] * b[15:0]) >> 16) | |||||
static inline int32_t signed_multiply_32x16b(int32_t a, uint32_t b) __attribute__((always_inline, unused)); | |||||
static inline int32_t signed_multiply_32x16b(int32_t a, uint32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smulwb %0, %1, %2" : "=r" (out) : "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes ((a[31:0] * b[31:16]) >> 16) | |||||
static inline int32_t signed_multiply_32x16t(int32_t a, uint32_t b) __attribute__((always_inline, unused)); | |||||
static inline int32_t signed_multiply_32x16t(int32_t a, uint32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smulwt %0, %1, %2" : "=r" (out) : "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes (((int64_t)a[31:0] * (int64_t)b[31:0]) >> 32) | |||||
static inline int32_t multiply_32x32_rshift32(int32_t a, int32_t b) __attribute__((always_inline, unused)); | |||||
static inline int32_t multiply_32x32_rshift32(int32_t a, int32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smmul %0, %1, %2" : "=r" (out) : "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes (((int64_t)a[31:0] * (int64_t)b[31:0] + 0x8000000) >> 32) | |||||
static inline int32_t multiply_32x32_rshift32_rounded(int32_t a, int32_t b) __attribute__((always_inline, unused)); | |||||
static inline int32_t multiply_32x32_rshift32_rounded(int32_t a, int32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smmulr %0, %1, %2" : "=r" (out) : "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes sum + (((int64_t)a[31:0] * (int64_t)b[31:0] + 0x8000000) >> 32) | |||||
static inline int32_t multiply_accumulate_32x32_rshift32_rounded(int32_t sum, int32_t a, int32_t b) __attribute__((always_inline, unused)); | |||||
static inline int32_t multiply_accumulate_32x32_rshift32_rounded(int32_t sum, int32_t a, int32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smmlar %0, %2, %3, %1" : "=r" (out) : "r" (sum), "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes sum - (((int64_t)a[31:0] * (int64_t)b[31:0] + 0x8000000) >> 32) | |||||
static inline int32_t multiply_subtract_32x32_rshift32_rounded(int32_t sum, int32_t a, int32_t b) __attribute__((always_inline, unused)); | |||||
static inline int32_t multiply_subtract_32x32_rshift32_rounded(int32_t sum, int32_t a, int32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smmlsr %0, %2, %3, %1" : "=r" (out) : "r" (sum), "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes ((a[15:0] << 16) | b[15:0]) | |||||
static inline uint32_t pack_16x16(int32_t a, int32_t b) __attribute__((always_inline, unused)); | |||||
static inline uint32_t pack_16x16(int32_t a, int32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("pkhbt %0, %1, %2, lsl #16" : "=r" (out) : "r" (b), "r" (a)); | |||||
return out; | |||||
} | |||||
// computes (((a[31:16] + b[31:16]) << 16) | (a[15:0 + b[15:0])) | |||||
static inline uint32_t signed_add_16_and_16(uint32_t a, uint32_t b) __attribute__((always_inline, unused)); | |||||
static inline uint32_t signed_add_16_and_16(uint32_t a, uint32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("qadd16 %0, %1, %2" : "=r" (out) : "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes (sum + ((a[31:0] * b[15:0]) >> 16)) | |||||
static inline int32_t signed_multiply_accumulate_32x16b(int32_t sum, int32_t a, uint32_t b) __attribute__((always_inline, unused)); | |||||
static inline int32_t signed_multiply_accumulate_32x16b(int32_t sum, int32_t a, uint32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smlawb %0, %2, %3, %1" : "=r" (out) : "r" (sum), "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes (sum + ((a[31:0] * b[31:16]) >> 16)) | |||||
static inline int32_t signed_multiply_accumulate_32x16t(int32_t sum, int32_t a, uint32_t b) __attribute__((always_inline, unused)); | |||||
static inline int32_t signed_multiply_accumulate_32x16t(int32_t sum, int32_t a, uint32_t b) | |||||
{ | |||||
int32_t out; | |||||
asm volatile("smlawt %0, %2, %3, %1" : "=r" (out) : "r" (sum), "r" (a), "r" (b)); | |||||
return out; | |||||
} | |||||
// computes logical and, forces compiler to allocate register and use single cycle instruction | |||||
static inline uint32_t logical_and(uint32_t a, uint32_t b) __attribute__((always_inline, unused)); | |||||
static inline uint32_t logical_and(uint32_t a, uint32_t b) | |||||
{ | |||||
asm volatile("and %0, %1" : "+r" (a) : "r" (b)); | |||||
return a; | |||||
} | |||||