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