It's about twice as slow as the I16 version but produces cleaner outputpull/8/merge^2
parent
93a3732fbf
commit
25592e5a6b
@ -0,0 +1,124 @@ |
||||
/* Audio Library for Teensy 3.X
|
||||
* Copyright (c) 2014, Paul Stoffregen, paul@pjrc.com |
||||
* |
||||
* Development of this audio library was funded by PJRC.COM, LLC by sales of |
||||
* Teensy and Audio Adaptor boards. Please support PJRC's efforts to develop |
||||
* open source software by purchasing Teensy or other PJRC products. |
||||
* |
||||
* Permission is hereby granted, free of charge, to any person obtaining a copy |
||||
* of this software and associated documentation files (the "Software"), to deal |
||||
* in the Software without restriction, including without limitation the rights |
||||
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell |
||||
* copies of the Software, and to permit persons to whom the Software is |
||||
* furnished to do so, subject to the following conditions: |
||||
* |
||||
* The above copyright notice, development funding notice, and this permission |
||||
* notice shall be included in all copies or substantial portions of the Software. |
||||
* |
||||
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
||||
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
||||
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
||||
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
||||
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
||||
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN |
||||
* THE SOFTWARE. |
||||
*/ |
||||
|
||||
#include <Arduino.h> |
||||
#include "analyze_fft256_f32.h" |
||||
#include "utility/dspinst.h" |
||||
|
||||
|
||||
static void copy_to_fft_buffer(void *destination, const void *source) |
||||
{ |
||||
const float32_t *src = (const float32_t *)source; |
||||
float32_t *dst = (float32_t *)destination; |
||||
|
||||
for (int i=0; i < AUDIO_BLOCK_SAMPLES; i++) { |
||||
*dst++ = *src++; // real sample plus a zero for imaginary
|
||||
*dst++ = 0; |
||||
} |
||||
} |
||||
|
||||
static void apply_window_to_fft_buffer(void *buffer, const void *window) |
||||
{ |
||||
float32_t *buf = (float32_t *)buffer; |
||||
const int16_t *win = (int16_t *)window;; |
||||
|
||||
for (int i=0; i < 256; i++) { |
||||
*buf *= *win++; |
||||
*buf /= 32768; |
||||
buf += 2; |
||||
} |
||||
} |
||||
|
||||
void AudioAnalyzeFFT256_F32::update(void) |
||||
{ |
||||
audio_block_f32_t *block; |
||||
|
||||
block = receiveReadOnly_f32(); |
||||
if (!block) return; |
||||
#if AUDIO_BLOCK_SAMPLES == 128 |
||||
if (!prevblock) { |
||||
prevblock = block; |
||||
return; |
||||
} |
||||
copy_to_fft_buffer(buffer, prevblock->data); |
||||
copy_to_fft_buffer(buffer+256, block->data); |
||||
//window = AudioWindowBlackmanNuttall256;
|
||||
//window = NULL;
|
||||
if (window) apply_window_to_fft_buffer(buffer, window); |
||||
arm_cfft_radix4_f32(&fft_inst, buffer); |
||||
// G. Heinzel's paper says we're supposed to average the magnitude
|
||||
// squared, then do the square root at the end.
|
||||
if (count == 0) { |
||||
for (int i=0; i < 128; i++) { |
||||
sum[i] = (buffer[i * 2] * buffer[i * 2] + buffer[i * 2 + 1] * buffer[i * 2 + 1]); |
||||
} |
||||
} else { |
||||
for (int i=0; i < 128; i++) { |
||||
sum[i] += (buffer[i * 2] * buffer[i * 2] + buffer[i * 2 + 1] * buffer[i * 2 + 1]); |
||||
} |
||||
} |
||||
if (++count == naverage) { |
||||
count = 0; |
||||
for (int i=0; i < 128; i++) { |
||||
output[i] = sqrtf(sum[i] / naverage) / 64; // I don't know why 64, but a full scale sine wave is 64.
|
||||
} |
||||
outputflag = true; |
||||
} |
||||
release(prevblock); |
||||
prevblock = block; |
||||
#elif AUDIO_BLOCK_SAMPLES == 64 |
||||
if (prevblocks[2] == NULL) { |
||||
prevblocks[2] = prevblocks[1]; |
||||
prevblocks[1] = prevblocks[0]; |
||||
prevblocks[0] = block; |
||||
return; |
||||
} |
||||
if (count == 0) { |
||||
count = 1; |
||||
copy_to_fft_buffer(buffer, prevblocks[2]->data); |
||||
copy_to_fft_buffer(buffer+128, prevblocks[1]->data); |
||||
copy_to_fft_buffer(buffer+256, prevblocks[1]->data); |
||||
copy_to_fft_buffer(buffer+384, block->data); |
||||
if (window) apply_window_to_fft_buffer(buffer, window); |
||||
arm_cfft_radix4_q15(&fft_inst, buffer); |
||||
} else { |
||||
count = 2; |
||||
const uint32_t *p = (uint32_t *)buffer; |
||||
for (int i=0; i < 128; i++) { |
||||
uint32_t tmp = *p++; |
||||
int16_t v1 = tmp & 0xFFFF; |
||||
int16_t v2 = tmp >> 16; |
||||
output[i] = sqrt_uint32_approx(v1 * v1 + v2 * v2); |
||||
} |
||||
} |
||||
release(prevblocks[2]); |
||||
prevblocks[2] = prevblocks[1]; |
||||
prevblocks[1] = prevblocks[0]; |
||||
prevblocks[0] = block; |
||||
#endif |
||||
} |
||||
|
||||
|
@ -0,0 +1,118 @@ |
||||
/* Audio Library for Teensy 3.X
|
||||
* Copyright (c) 2014, Paul Stoffregen, paul@pjrc.com |
||||
* |
||||
* Development of this audio library was funded by PJRC.COM, LLC by sales of |
||||
* Teensy and Audio Adaptor boards. Please support PJRC's efforts to develop |
||||
* open source software by purchasing Teensy or other PJRC products. |
||||
* |
||||
* Permission is hereby granted, free of charge, to any person obtaining a copy |
||||
* of this software and associated documentation files (the "Software"), to deal |
||||
* in the Software without restriction, including without limitation the rights |
||||
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell |
||||
* copies of the Software, and to permit persons to whom the Software is |
||||
* furnished to do so, subject to the following conditions: |
||||
* |
||||
* The above copyright notice, development funding notice, and this permission |
||||
* notice shall be included in all copies or substantial portions of the Software. |
||||
* |
||||
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
||||
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
||||
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
||||
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
||||
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
||||
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN |
||||
* THE SOFTWARE. |
||||
*/ |
||||
|
||||
#ifndef analyze_fft256_f32_h_ |
||||
#define analyze_fft256_f32_h_ |
||||
|
||||
#include "Arduino.h" |
||||
#include "AudioStream_F32.h" |
||||
#include "arm_math.h" |
||||
|
||||
// windows.c
|
||||
extern "C" { |
||||
extern const int16_t AudioWindowHanning256[]; |
||||
extern const int16_t AudioWindowBartlett256[]; |
||||
extern const int16_t AudioWindowBlackman256[]; |
||||
extern const int16_t AudioWindowFlattop256[]; |
||||
extern const int16_t AudioWindowBlackmanHarris256[]; |
||||
extern const int16_t AudioWindowNuttall256[]; |
||||
extern const int16_t AudioWindowBlackmanNuttall256[]; |
||||
extern const int16_t AudioWindowWelch256[]; |
||||
extern const int16_t AudioWindowHamming256[]; |
||||
extern const int16_t AudioWindowCosine256[]; |
||||
extern const int16_t AudioWindowTukey256[]; |
||||
} |
||||
|
||||
class AudioAnalyzeFFT256_F32 : public AudioStream_F32 |
||||
{ |
||||
public: |
||||
AudioAnalyzeFFT256_F32() : AudioStream_F32(1, inputQueueArray), |
||||
window(AudioWindowHanning256), count(0), outputflag(false) { |
||||
arm_cfft_radix4_init_f32(&fft_inst, 256, 0, 1); |
||||
#if AUDIO_BLOCK_SAMPLES == 128 |
||||
prevblock = NULL; |
||||
naverage = 1; |
||||
#elif AUDIO_BLOCK_SAMPLES == 64 |
||||
prevblocks[0] = NULL; |
||||
prevblocks[1] = NULL; |
||||
prevblocks[2] = NULL; |
||||
#endif |
||||
} |
||||
bool available() { |
||||
if (outputflag == true) { |
||||
outputflag = false; |
||||
return true; |
||||
} |
||||
return false; |
||||
} |
||||
float read(unsigned int binNumber) { |
||||
if (binNumber > 127) return 0.0; |
||||
return output[binNumber]; |
||||
} |
||||
float read(unsigned int binFirst, unsigned int binLast) { |
||||
if (binFirst > binLast) { |
||||
unsigned int tmp = binLast; |
||||
binLast = binFirst; |
||||
binFirst = tmp; |
||||
} |
||||
if (binFirst > 127) return 0.0; |
||||
if (binLast > 127) binLast = 127; |
||||
uint32_t sum = 0; |
||||
do { |
||||
sum += output[binFirst++]; |
||||
} while (binFirst <= binLast); |
||||
return sum; |
||||
} |
||||
void averageTogether(uint8_t n) { |
||||
#if AUDIO_BLOCK_SAMPLES == 128 |
||||
if (n == 0) n = 1; |
||||
naverage = n; |
||||
#endif |
||||
} |
||||
void windowFunction(const int16_t *w) { |
||||
window = w; |
||||
} |
||||
virtual void update(void); |
||||
float32_t output[128] __attribute__ ((aligned (4))); |
||||
private: |
||||
const int16_t *window; |
||||
#if AUDIO_BLOCK_SAMPLES == 128 |
||||
audio_block_f32_t *prevblock; |
||||
#elif AUDIO_BLOCK_SAMPLES == 64 |
||||
audio_block_f32_t *prevblocks[3]; |
||||
#endif |
||||
float32_t buffer[512] __attribute__ ((aligned (4))); |
||||
#if AUDIO_BLOCK_SAMPLES == 128 |
||||
float32_t sum[128]; |
||||
uint8_t naverage; |
||||
#endif |
||||
uint8_t count; |
||||
volatile bool outputflag; |
||||
audio_block_f32_t *inputQueueArray[1]; |
||||
arm_cfft_radix4_instance_f32 fft_inst; |
||||
}; |
||||
|
||||
#endif |
Loading…
Reference in new issue