adamstark@5: //=======================================================================
adamstark@5: /** @file OnsetDetectionFunction.cpp
adamstark@5:  *  @brief A class for calculating onset detection functions
adamstark@5:  *  @author Adam Stark
adamstark@5:  *  @copyright Copyright (C) 2008-2014  Queen Mary University of London
adamstark@5:  *
adamstark@5:  * This program is free software: you can redistribute it and/or modify
adamstark@5:  * it under the terms of the GNU General Public License as published by
adamstark@5:  * the Free Software Foundation, either version 3 of the License, or
adamstark@5:  * (at your option) any later version.
adamstark@5:  *
adamstark@5:  * This program is distributed in the hope that it will be useful,
adamstark@5:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
adamstark@5:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
adamstark@5:  * GNU General Public License for more details.
adamstark@5:  *
adamstark@5:  * You should have received a copy of the GNU General Public License
adamstark@5:  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
adamstark@5:  */
adamstark@5: //=======================================================================
adamstark@5: 
adamstark@5: #include <math.h>
adamstark@5: #include <iostream>
adamstark@5: #include "OnsetDetectionFunction.h"
adamstark@5: using namespace std;
adamstark@5: 
adamstark@5: //-------------------------------------------------------------------------------
adamstark@5: // Constructor
adamstark@5: OnsetDetectionFunction :: OnsetDetectionFunction()
adamstark@5: {	
adamstark@5: 	// indicate that we have not initialised yet
adamstark@5: 	initialised = 0;		
adamstark@5: 	
adamstark@5: 	// set pi
adamstark@5: 	pi = 3.14159265358979;	
adamstark@5: 	
adamstark@5: 	// initialise with hopsize = 512, framesize = 1024, complex spectral difference DF and hanning window
adamstark@5: 	initialise(512,1024,6,1);	
adamstark@5: }
adamstark@5: 
adamstark@5: 
adamstark@5: //-------------------------------------------------------------------------------
adamstark@5: // Constructor (with arguments)
adamstark@5: OnsetDetectionFunction :: OnsetDetectionFunction(int arg_hsize,int arg_fsize,int arg_df_type,int arg_win_type)
adamstark@5: {	
adamstark@5: 	// indicate that we have not initialised yet
adamstark@5: 	initialised = 0;		
adamstark@5: 	
adamstark@5: 	// set pi
adamstark@5: 	pi = 3.14159265358979;	
adamstark@5: 	
adamstark@5: 	// initialise with arguments to constructor
adamstark@5: 	initialise(arg_hsize,arg_fsize,arg_df_type,arg_win_type);
adamstark@5: }
adamstark@5: 
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // Destructor
adamstark@5: OnsetDetectionFunction :: ~OnsetDetectionFunction()
adamstark@5: {
adamstark@5: 	// destroy fft plan
adamstark@5:     fftw_destroy_plan(p);
adamstark@5: 	fftw_free(in); 
adamstark@5: 	fftw_free(out);
adamstark@5: 	
adamstark@5: 	// deallocate memory
adamstark@5: 	delete [] frame;
adamstark@5: 	frame = NULL;	
adamstark@5: 	delete [] window;
adamstark@5: 	window = NULL;									
adamstark@5: 	delete [] wframe;
adamstark@5: 	wframe = NULL;											
adamstark@5: 	delete [] mag;
adamstark@5: 	mag = NULL;
adamstark@5: 	delete [] mag_old;
adamstark@5: 	mag_old = NULL;
adamstark@5: 	delete [] phase;
adamstark@5: 	phase = NULL;
adamstark@5: 	delete [] phase_old;
adamstark@5: 	phase_old = NULL;	
adamstark@5: 	delete [] phase_old_2;
adamstark@5: 	phase_old_2 = NULL;
adamstark@5: }
adamstark@5: 
adamstark@5: //-------------------------------------------------------------------------------
adamstark@5: // Initialisation
adamstark@5: void OnsetDetectionFunction :: initialise(int arg_hsize,int arg_fsize,int arg_df_type,int arg_win_type)
adamstark@5: {
adamstark@5: 	if (initialised == 1) // if we have already initialised some buffers and an FFT plan
adamstark@5: 	{
adamstark@5: 		//////////////////////////////////
adamstark@5: 		// TIDY UP FIRST - If initialise is called after the class has been initialised
adamstark@5: 		// then we want to free up memory and cancel existing FFT plans
adamstark@5: 	
adamstark@5: 		// destroy fft plan
adamstark@5: 		fftw_destroy_plan(p);
adamstark@5: 		fftw_free(in); 
adamstark@5: 		fftw_free(out);
adamstark@5: 	
adamstark@5: 	
adamstark@5: 		// deallocate memory
adamstark@5: 		delete [] frame;
adamstark@5: 		frame = NULL;	
adamstark@5: 		delete [] window;
adamstark@5: 		window = NULL;									
adamstark@5: 		delete [] wframe;
adamstark@5: 		wframe = NULL;											
adamstark@5: 		delete [] mag;
adamstark@5: 		mag = NULL;
adamstark@5: 		delete [] mag_old;
adamstark@5: 		mag_old = NULL;
adamstark@5: 		delete [] phase;
adamstark@5: 		phase = NULL;
adamstark@5: 		delete [] phase_old;
adamstark@5: 		phase_old = NULL;	
adamstark@5: 		delete [] phase_old_2;
adamstark@5: 		phase_old_2 = NULL;
adamstark@5: 	
adamstark@5: 		////// END TIDY UP ///////////////
adamstark@5: 		//////////////////////////////////
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	hopsize = arg_hsize; // set hopsize
adamstark@5: 	framesize = arg_fsize; // set framesize
adamstark@5: 	
adamstark@5: 	df_type = arg_df_type; // set detection function type
adamstark@5: 		
adamstark@5: 	// initialise buffers
adamstark@5: 	frame = new double[framesize];											
adamstark@5: 	window = new double[framesize];	
adamstark@5: 	wframe = new double[framesize];		
adamstark@5: 	
adamstark@5: 	mag = new double[framesize];											
adamstark@5: 	mag_old = new double[framesize];
adamstark@5: 	
adamstark@5: 	phase = new double[framesize];
adamstark@5: 	phase_old = new double[framesize];
adamstark@5: 	phase_old_2 = new double[framesize];
adamstark@5: 	
adamstark@5: 	
adamstark@5: 	// set the window to the specified type
adamstark@5: 	switch (arg_win_type){
adamstark@5: 		case 0:
adamstark@5: 			set_win_rectangular();		// Rectangular window
adamstark@5: 			break;	
adamstark@5: 		case 1:	
adamstark@5: 			set_win_hanning();			// Hanning Window
adamstark@5: 			break;
adamstark@5: 		case 2:
adamstark@5: 			set_win_hamming();			// Hamming Window
adamstark@5: 			break;
adamstark@5: 		case 3:
adamstark@5: 			set_win_blackman();			// Blackman Window
adamstark@5: 			break;
adamstark@5: 		case 4:
adamstark@5: 			set_win_tukey();			// Tukey Window
adamstark@5: 			break;
adamstark@5: 		default:
adamstark@5: 			set_win_hanning();			// DEFAULT: Hanning Window
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	
adamstark@5: 	
adamstark@5: 	
adamstark@5: 	// initialise previous magnitude spectrum to zero
adamstark@5: 	for (int i = 0;i < framesize;i++)
adamstark@5: 	{
adamstark@5: 		mag_old[i] = 0.0;
adamstark@5: 		phase_old[i] = 0.0;
adamstark@5: 		phase_old_2[i] = 0.0;
adamstark@5: 		frame[i] = 0.0;
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	energy_sum_old = 0.0;	// initialise previous energy sum value to zero
adamstark@5: 	
adamstark@5: 	/*  Init fft */
adamstark@5: 	in = (fftw_complex*) fftw_malloc(sizeof(fftw_complex) * framesize);		// complex array to hold fft data
adamstark@5: 	out = (fftw_complex*) fftw_malloc(sizeof(fftw_complex) * framesize);	// complex array to hold fft data
adamstark@5: 	p = fftw_plan_dft_1d(framesize, in, out, FFTW_FORWARD, FFTW_ESTIMATE);	// FFT plan initialisation
adamstark@5: 	
adamstark@5: 	initialised = 1;
adamstark@5: }
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // set the detection function type to that specified by the argument
adamstark@5: void OnsetDetectionFunction :: set_df_type(int arg_df_type)
adamstark@5: {
adamstark@5: 	df_type = arg_df_type; // set detection function type
adamstark@5: }
adamstark@5: 
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // calculates a single detection function sample from a single audio frame.
adamstark@5: double OnsetDetectionFunction :: getDFsample(double inputbuffer[])
adamstark@5: {	
adamstark@5: 	double df_sample;
adamstark@5: 		
adamstark@5: 	// shift audio samples back in frame by hop size
adamstark@5: 	for (int i = 0; i < (framesize-hopsize);i++)
adamstark@5: 	{
adamstark@5: 		frame[i] = frame[i+hopsize];
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	// add new samples to frame from input buffer
adamstark@5: 	int j = 0;
adamstark@5: 	for (int i = (framesize-hopsize);i < framesize;i++)
adamstark@5: 	{
adamstark@5: 		frame[i] = inputbuffer[j];
adamstark@5: 		j++;
adamstark@5: 	}
adamstark@5: 		
adamstark@5: 	switch (df_type){
adamstark@5: 		case 0:
adamstark@5: 			df_sample = energy_envelope();	// calculate energy envelope detection function sample
adamstark@5: 			break;	
adamstark@5: 		case 1:
adamstark@5: 			df_sample = energy_difference();	// calculate half-wave rectified energy difference detection function sample
adamstark@5: 			break;
adamstark@5: 		case 2:
adamstark@5: 			df_sample = spectral_difference();	// calculate spectral difference detection function sample
adamstark@5: 			break;
adamstark@5: 		case 3:
adamstark@5: 			df_sample = spectral_difference_hwr(); // calculate spectral difference detection function sample (half wave rectified)
adamstark@5: 			break;
adamstark@5: 		case 4:
adamstark@5: 			df_sample = phase_deviation();		// calculate phase deviation detection function sample (half wave rectified)
adamstark@5: 			break;
adamstark@5: 		case 5:
adamstark@5: 			df_sample = complex_spectral_difference(); // calcualte complex spectral difference detection function sample
adamstark@5: 			break;
adamstark@5: 		case 6:
adamstark@5: 			df_sample = complex_spectral_difference_hwr();  // calcualte complex spectral difference detection function sample (half-wave rectified)
adamstark@5: 			break;
adamstark@5: 		case 7:
adamstark@5: 			df_sample = high_frequency_content(); // calculate high frequency content detection function sample
adamstark@5: 			break;
adamstark@5: 		case 8:
adamstark@5: 			df_sample = high_frequency_spectral_difference(); // calculate high frequency spectral difference detection function sample
adamstark@5: 			break;
adamstark@5: 		case 9:
adamstark@5: 			df_sample = high_frequency_spectral_difference_hwr(); // calculate high frequency spectral difference detection function (half-wave rectified)
adamstark@5: 			break;
adamstark@5: 		default:
adamstark@5: 			df_sample = 1.0;
adamstark@5: 	}
adamstark@5: 		
adamstark@5: 	return df_sample;
adamstark@5: }
adamstark@5: 
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // performs the fft, storing the complex result in 'out'
adamstark@5: void OnsetDetectionFunction :: perform_FFT()
adamstark@5: {
adamstark@5: 	int fsize2 = (framesize/2);
adamstark@5: 	
adamstark@5: 	// window frame and copy to complex array, swapping the first and second half of the signal
adamstark@5: 	for (int i = 0;i < fsize2;i++)
adamstark@5: 	{
adamstark@5: 		in[i][0] = frame[i+fsize2] * window[i+fsize2];
adamstark@5: 		in[i][1] = 0.0;
adamstark@5: 		in[i+fsize2][0] = frame[i] * window[i];
adamstark@5: 		in[i+fsize2][1] = 0.0;
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	// perform the fft
adamstark@5: 	fftw_execute(p);
adamstark@5: }
adamstark@5: 
adamstark@5: ////////////////////////////////////////////////////////////////////////////////////////////////
adamstark@5: ////////////////////////////////////////////////////////////////////////////////////////////////
adamstark@5: ////////////////////////////// Methods for Detection Functions /////////////////////////////////
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // calculates an energy envelope detection function sample
adamstark@5: double OnsetDetectionFunction :: energy_envelope()
adamstark@5: {
adamstark@5: 	double sum;
adamstark@5: 	
adamstark@5: 	sum = 0;	// initialise sum
adamstark@5: 	
adamstark@5: 	// sum the squares of the samples
adamstark@5: 	for (int i = 0;i < framesize;i++)
adamstark@5: 	{
adamstark@5: 		sum = sum + (frame[i]*frame[i]);
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	return sum;		// return sum
adamstark@5: }
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // calculates a half-wave rectified energy difference detection function sample
adamstark@5: double OnsetDetectionFunction :: energy_difference()
adamstark@5: {
adamstark@5: 	double sum;
adamstark@5: 	double sample;
adamstark@5: 	
adamstark@5: 	sum = 0;	// initialise sum
adamstark@5: 	
adamstark@5: 	// sum the squares of the samples
adamstark@5: 	for (int i = 0;i < framesize;i++)
adamstark@5: 	{
adamstark@5: 		sum = sum + (frame[i]*frame[i]);
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	sample = sum - energy_sum_old;	// sample is first order difference in energy
adamstark@5: 	
adamstark@5: 	energy_sum_old = sum;	// store energy value for next calculation
adamstark@5: 	
adamstark@5: 	if (sample > 0)
adamstark@5: 	{
adamstark@5: 		return sample;		// return difference
adamstark@5: 	}
adamstark@5: 	else
adamstark@5: 	{
adamstark@5: 		return 0;
adamstark@5: 	}
adamstark@5: }
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // calculates a spectral difference detection function sample
adamstark@5: double OnsetDetectionFunction :: spectral_difference()
adamstark@5: {
adamstark@5: 	double diff;
adamstark@5: 	double sum;
adamstark@5: 	
adamstark@5: 	// perform the FFT
adamstark@5: 	perform_FFT();
adamstark@5: 	
adamstark@5: 	// compute first (N/2)+1 mag values
adamstark@5: 	for (int i = 0;i < (framesize/2)+1;i++)
adamstark@5: 	{
adamstark@5: 		mag[i] = sqrt(pow(out[i][0],2) + pow(out[i][1],2));
adamstark@5: 	}
adamstark@5: 	// mag spec symmetric above (N/2)+1 so copy previous values
adamstark@5: 	for (int i = (framesize/2)+1;i < framesize;i++)
adamstark@5: 	{
adamstark@5: 		mag[i] = mag[framesize-i];		
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	sum = 0;	// initialise sum to zero
adamstark@5: 
adamstark@5: 	for (int i = 0;i < framesize;i++)
adamstark@5: 	{
adamstark@5: 		// calculate difference
adamstark@5: 		diff = mag[i] - mag_old[i];
adamstark@5: 		
adamstark@5: 		// ensure all difference values are positive
adamstark@5: 		if (diff < 0)
adamstark@5: 		{
adamstark@5: 			diff = diff*-1;
adamstark@5: 		}
adamstark@5: 		
adamstark@5: 		// add difference to sum
adamstark@5: 		sum = sum+diff;
adamstark@5: 		
adamstark@5: 		// store magnitude spectrum bin for next detection function sample calculation
adamstark@5: 		mag_old[i] = mag[i];
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	return sum;		
adamstark@5: }
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // calculates a spectral difference detection function sample
adamstark@5: double OnsetDetectionFunction :: spectral_difference_hwr()
adamstark@5: {
adamstark@5: 	double diff;
adamstark@5: 	double sum;
adamstark@5: 	
adamstark@5: 	// perform the FFT
adamstark@5: 	perform_FFT();
adamstark@5: 	
adamstark@5: 	// compute first (N/2)+1 mag values
adamstark@5: 	for (int i = 0;i < (framesize/2)+1;i++)
adamstark@5: 	{
adamstark@5: 		mag[i] = sqrt(pow(out[i][0],2) + pow(out[i][1],2));
adamstark@5: 	}
adamstark@5: 	// mag spec symmetric above (N/2)+1 so copy previous values
adamstark@5: 	for (int i = (framesize/2)+1;i < framesize;i++)
adamstark@5: 	{
adamstark@5: 		mag[i] = mag[framesize-i];		
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	sum = 0;	// initialise sum to zero
adamstark@5: 	
adamstark@5: 	for (int i = 0;i < framesize;i++)
adamstark@5: 	{
adamstark@5: 		// calculate difference
adamstark@5: 		diff = mag[i] - mag_old[i];
adamstark@5: 		
adamstark@5: 		// only add up positive differences
adamstark@5: 		if (diff > 0)
adamstark@5: 		{
adamstark@5: 			// add difference to sum
adamstark@5: 			sum = sum+diff;
adamstark@5: 		}
adamstark@5: 		
adamstark@5: 		
adamstark@5: 		
adamstark@5: 		// store magnitude spectrum bin for next detection function sample calculation
adamstark@5: 		mag_old[i] = mag[i];
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	return sum;		
adamstark@5: }
adamstark@5: 
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // calculates a phase deviation detection function sample
adamstark@5: double OnsetDetectionFunction :: phase_deviation()
adamstark@5: {
adamstark@5: 	double dev,pdev;
adamstark@5: 	double sum;
adamstark@5: 	
adamstark@5: 	// perform the FFT
adamstark@5: 	perform_FFT();
adamstark@5: 	
adamstark@5: 	sum = 0; // initialise sum to zero
adamstark@5: 	
adamstark@5: 	// compute phase values from fft output and sum deviations
adamstark@5: 	for (int i = 0;i < framesize;i++)
adamstark@5: 	{
adamstark@5: 		// calculate phase value
adamstark@5: 		phase[i] = atan2(out[i][1],out[i][0]);
adamstark@5: 		
adamstark@5: 		// calculate magnitude value
adamstark@5: 		mag[i] = sqrt(pow(out[i][0],2) + pow(out[i][1],2));
adamstark@5: 		
adamstark@5: 		
adamstark@5: 		// if bin is not just a low energy bin then examine phase deviation
adamstark@5: 		if (mag[i] > 0.1)
adamstark@5: 		{
adamstark@5: 			dev = phase[i] - (2*phase_old[i]) + phase_old_2[i];	// phase deviation
adamstark@5: 			pdev = princarg(dev);	// wrap into [-pi,pi] range
adamstark@5: 		
adamstark@5: 			// make all values positive
adamstark@5: 			if (pdev < 0)	
adamstark@5: 			{
adamstark@5: 				pdev = pdev*-1;
adamstark@5: 			}
adamstark@5: 						
adamstark@5: 			// add to sum
adamstark@5: 			sum = sum + pdev;
adamstark@5: 		}
adamstark@5: 				
adamstark@5: 		// store values for next calculation
adamstark@5: 		phase_old_2[i] = phase_old[i];
adamstark@5: 		phase_old[i] = phase[i];
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	return sum;		
adamstark@5: }
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // calculates a complex spectral difference detection function sample
adamstark@5: double OnsetDetectionFunction :: complex_spectral_difference()
adamstark@5: {
adamstark@5: 	double dev,pdev;
adamstark@5: 	double sum;
adamstark@5: 	double mag_diff,phase_diff;
adamstark@5: 	double value;
adamstark@5: 	
adamstark@5: 	// perform the FFT
adamstark@5: 	perform_FFT();
adamstark@5: 	
adamstark@5: 	sum = 0; // initialise sum to zero
adamstark@5: 	
adamstark@5: 	// compute phase values from fft output and sum deviations
adamstark@5: 	for (int i = 0;i < framesize;i++)
adamstark@5: 	{
adamstark@5: 		// calculate phase value
adamstark@5: 		phase[i] = atan2(out[i][1],out[i][0]);
adamstark@5: 		
adamstark@5: 		// calculate magnitude value
adamstark@5: 		mag[i] = sqrt(pow(out[i][0],2) + pow(out[i][1],2));
adamstark@5: 		
adamstark@5: 		
adamstark@5: 		// phase deviation
adamstark@5: 		dev = phase[i] - (2*phase_old[i]) + phase_old_2[i];	
adamstark@5: 		
adamstark@5: 		// wrap into [-pi,pi] range
adamstark@5: 		pdev = princarg(dev);	
adamstark@5: 		
adamstark@5: 		
adamstark@5: 		// calculate magnitude difference (real part of Euclidean distance between complex frames)
adamstark@5: 		mag_diff = mag[i] - mag_old[i];
adamstark@5: 		
adamstark@5: 		// calculate phase difference (imaginary part of Euclidean distance between complex frames)
adamstark@5: 		phase_diff = -mag[i]*sin(pdev);
adamstark@5: 		
adamstark@5: 
adamstark@5: 		
adamstark@5: 		// square real and imaginary parts, sum and take square root
adamstark@5: 		value = sqrt(pow(mag_diff,2) + pow(phase_diff,2));
adamstark@5: 	
adamstark@5: 			
adamstark@5: 		// add to sum
adamstark@5: 		sum = sum + value;
adamstark@5: 		
adamstark@5: 		
adamstark@5: 		// store values for next calculation
adamstark@5: 		phase_old_2[i] = phase_old[i];
adamstark@5: 		phase_old[i] = phase[i];
adamstark@5: 		mag_old[i] = mag[i];
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	return sum;		
adamstark@5: }
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // calculates a complex spectral difference detection function sample (half-wave rectified)
adamstark@5: double OnsetDetectionFunction :: complex_spectral_difference_hwr()
adamstark@5: {
adamstark@5: 	double dev,pdev;
adamstark@5: 	double sum;
adamstark@5: 	double mag_diff,phase_diff;
adamstark@5: 	double value;
adamstark@5: 	
adamstark@5: 	// perform the FFT
adamstark@5: 	perform_FFT();
adamstark@5: 	
adamstark@5: 	sum = 0; // initialise sum to zero
adamstark@5: 	
adamstark@5: 	// compute phase values from fft output and sum deviations
adamstark@5: 	for (int i = 0;i < framesize;i++)
adamstark@5: 	{
adamstark@5: 		// calculate phase value
adamstark@5: 		phase[i] = atan2(out[i][1],out[i][0]);
adamstark@5: 		
adamstark@5: 		// calculate magnitude value
adamstark@5: 		mag[i] = sqrt(pow(out[i][0],2) + pow(out[i][1],2));
adamstark@5: 		
adamstark@5: 		
adamstark@5: 		// phase deviation
adamstark@5: 		dev = phase[i] - (2*phase_old[i]) + phase_old_2[i];	
adamstark@5: 		
adamstark@5: 		// wrap into [-pi,pi] range
adamstark@5: 		pdev = princarg(dev);	
adamstark@5: 		
adamstark@5: 		
adamstark@5: 		// calculate magnitude difference (real part of Euclidean distance between complex frames)
adamstark@5: 		mag_diff = mag[i] - mag_old[i];
adamstark@5: 		
adamstark@5: 		// if we have a positive change in magnitude, then include in sum, otherwise ignore (half-wave rectification)
adamstark@5: 		if (mag_diff > 0)
adamstark@5: 		{
adamstark@5: 			// calculate phase difference (imaginary part of Euclidean distance between complex frames)
adamstark@5: 			phase_diff = -mag[i]*sin(pdev);
adamstark@5: 
adamstark@5: 			// square real and imaginary parts, sum and take square root
adamstark@5: 			value = sqrt(pow(mag_diff,2) + pow(phase_diff,2));
adamstark@5: 		
adamstark@5: 			// add to sum
adamstark@5: 			sum = sum + value;
adamstark@5: 		}
adamstark@5: 		
adamstark@5: 		// store values for next calculation
adamstark@5: 		phase_old_2[i] = phase_old[i];
adamstark@5: 		phase_old[i] = phase[i];
adamstark@5: 		mag_old[i] = mag[i];
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	return sum;		
adamstark@5: }
adamstark@5: 
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // calculates a high frequency content detection function sample
adamstark@5: double OnsetDetectionFunction :: high_frequency_content()
adamstark@5: {
adamstark@5: 	double sum;
adamstark@5: 	double mag_diff;
adamstark@5: 	
adamstark@5: 	// perform the FFT
adamstark@5: 	perform_FFT();
adamstark@5: 	
adamstark@5: 	sum = 0; // initialise sum to zero
adamstark@5: 	
adamstark@5: 	// compute phase values from fft output and sum deviations
adamstark@5: 	for (int i = 0;i < framesize;i++)
adamstark@5: 	{		
adamstark@5: 		// calculate magnitude value
adamstark@5: 		mag[i] = sqrt(pow(out[i][0],2) + pow(out[i][1],2));
adamstark@5: 		
adamstark@5: 		
adamstark@5: 		sum = sum + (mag[i]*((double) (i+1)));
adamstark@5: 		
adamstark@5: 		// store values for next calculation
adamstark@5: 		mag_old[i] = mag[i];
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	return sum;		
adamstark@5: }
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // calculates a high frequency spectral difference detection function sample
adamstark@5: double OnsetDetectionFunction :: high_frequency_spectral_difference()
adamstark@5: {
adamstark@5: 	double sum;
adamstark@5: 	double mag_diff;
adamstark@5: 	
adamstark@5: 	// perform the FFT
adamstark@5: 	perform_FFT();
adamstark@5: 	
adamstark@5: 	sum = 0; // initialise sum to zero
adamstark@5: 	
adamstark@5: 	// compute phase values from fft output and sum deviations
adamstark@5: 	for (int i = 0;i < framesize;i++)
adamstark@5: 	{		
adamstark@5: 		// calculate magnitude value
adamstark@5: 		mag[i] = sqrt(pow(out[i][0],2) + pow(out[i][1],2));
adamstark@5: 		
adamstark@5: 		// calculate difference
adamstark@5: 		mag_diff = mag[i] - mag_old[i];
adamstark@5: 		
adamstark@5: 		if (mag_diff < 0)
adamstark@5: 		{
adamstark@5: 			mag_diff = -mag_diff;
adamstark@5: 		}
adamstark@5: 		
adamstark@5: 		sum = sum + (mag_diff*((double) (i+1)));
adamstark@5: 		
adamstark@5: 		// store values for next calculation
adamstark@5: 		mag_old[i] = mag[i];
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	return sum;		
adamstark@5: }
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // calculates a high frequency spectral difference detection function sample (half-wave rectified)
adamstark@5: double OnsetDetectionFunction :: high_frequency_spectral_difference_hwr()
adamstark@5: {
adamstark@5: 	double sum;
adamstark@5: 	double mag_diff;
adamstark@5: 	
adamstark@5: 	// perform the FFT
adamstark@5: 	perform_FFT();
adamstark@5: 	
adamstark@5: 	sum = 0; // initialise sum to zero
adamstark@5: 	
adamstark@5: 	// compute phase values from fft output and sum deviations
adamstark@5: 	for (int i = 0;i < framesize;i++)
adamstark@5: 	{		
adamstark@5: 		// calculate magnitude value
adamstark@5: 		mag[i] = sqrt(pow(out[i][0],2) + pow(out[i][1],2));
adamstark@5: 		
adamstark@5: 		// calculate difference
adamstark@5: 		mag_diff = mag[i] - mag_old[i];
adamstark@5: 		
adamstark@5: 		if (mag_diff > 0)
adamstark@5: 		{
adamstark@5: 			sum = sum + (mag_diff*((double) (i+1)));
adamstark@5: 		}
adamstark@5: 
adamstark@5: 		// store values for next calculation
adamstark@5: 		mag_old[i] = mag[i];
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	return sum;		
adamstark@5: }
adamstark@5: 
adamstark@5: 
adamstark@5: ////////////////////////////////////////////////////////////////////////////////////////////////
adamstark@5: ////////////////////////////////////////////////////////////////////////////////////////////////
adamstark@5: ////////////////////////////// Methods to Calculate Windows ////////////////////////////////////
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // HANNING: set the window in the buffer 'window' to a Hanning window
adamstark@5: void OnsetDetectionFunction :: set_win_hanning()
adamstark@5: {
adamstark@5: 	double N;		// variable to store framesize minus 1
adamstark@5: 	
adamstark@5: 	N = (double) (framesize-1);	// framesize minus 1
adamstark@5: 	
adamstark@5: 	// Hanning window calculation
adamstark@5: 	for (int n = 0;n < framesize;n++)
adamstark@5: 	{
adamstark@5: 		window[n] = 0.5*(1-cos(2*pi*(n/N)));
adamstark@5: 	}
adamstark@5: }
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // HAMMING: set the window in the buffer 'window' to a Hanning window
adamstark@5: void OnsetDetectionFunction :: set_win_hamming()
adamstark@5: {
adamstark@5: 	double N;		// variable to store framesize minus 1
adamstark@5: 	double n_val;	// double version of index 'n'
adamstark@5: 	
adamstark@5: 	N = (double) (framesize-1);	// framesize minus 1
adamstark@5: 	n_val = 0;
adamstark@5: 	
adamstark@5: 	// Hamming window calculation
adamstark@5: 	for (int n = 0;n < framesize;n++)
adamstark@5: 	{
adamstark@5: 		window[n] = 0.54 - (0.46*cos(2*pi*(n_val/N)));
adamstark@5: 		n_val = n_val+1;
adamstark@5: 	}
adamstark@5: }
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // BLACKMAN: set the window in the buffer 'window' to a Blackman window
adamstark@5: void OnsetDetectionFunction :: set_win_blackman()
adamstark@5: {
adamstark@5: 	double N;		// variable to store framesize minus 1
adamstark@5: 	double n_val;	// double version of index 'n'
adamstark@5: 	
adamstark@5: 	N = (double) (framesize-1);	// framesize minus 1
adamstark@5: 	n_val = 0;
adamstark@5: 	
adamstark@5: 	// Blackman window calculation
adamstark@5: 	for (int n = 0;n < framesize;n++)
adamstark@5: 	{
adamstark@5: 		window[n] = 0.42 - (0.5*cos(2*pi*(n_val/N))) + (0.08*cos(4*pi*(n_val/N)));
adamstark@5: 		n_val = n_val+1;
adamstark@5: 	}
adamstark@5: }
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // TUKEY: set the window in the buffer 'window' to a Tukey window
adamstark@5: void OnsetDetectionFunction :: set_win_tukey()
adamstark@5: {
adamstark@5: 	double N;		// variable to store framesize minus 1
adamstark@5: 	double n_val;	// double version of index 'n'
adamstark@5: 	double alpha;	// alpha [default value = 0.5];
adamstark@5: 	
adamstark@5: 	int lim1,lim2;
adamstark@5: 	
adamstark@5: 	alpha = 0.5;
adamstark@5: 	
adamstark@5: 	N = (double) (framesize-1);	// framesize minus 1
adamstark@5: 		
adamstark@5: 	// Tukey window calculation
adamstark@5: 	
adamstark@5: 	n_val = (double) (-1*((framesize/2)))+1;
adamstark@5: 
adamstark@5: 	for (int n = 0;n < framesize;n++)	// left taper
adamstark@5: 	{
adamstark@5: 		if ((n_val >= 0) && (n_val <= (alpha*(N/2))))
adamstark@5: 		{
adamstark@5: 			window[n] = 1.0;
adamstark@5: 		}
adamstark@5: 		else if ((n_val <= 0) && (n_val >= (-1*alpha*(N/2))))
adamstark@5: 		{
adamstark@5: 			window[n] = 1.0;
adamstark@5: 		}
adamstark@5: 		else
adamstark@5: 		{
adamstark@5: 			window[n] = 0.5*(1+cos(pi*(((2*n_val)/(alpha*N))-1)));
adamstark@5: 		}
adamstark@5: 
adamstark@5: 		n_val = n_val+1;			 
adamstark@5: 	}
adamstark@5: 
adamstark@5: }
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // RECTANGULAR: set the window in the buffer 'window' to a Rectangular window
adamstark@5: void OnsetDetectionFunction :: set_win_rectangular()
adamstark@5: {
adamstark@5: 	// Rectangular window calculation
adamstark@5: 	for (int n = 0;n < framesize;n++)
adamstark@5: 	{
adamstark@5: 		window[n] = 1.0;
adamstark@5: 	}
adamstark@5: }
adamstark@5: 
adamstark@5: 
adamstark@5: 
adamstark@5: ////////////////////////////////////////////////////////////////////////////////////////////////
adamstark@5: ////////////////////////////////////////////////////////////////////////////////////////////////
adamstark@5: ///////////////////////////////// Other Handy Methods //////////////////////////////////////////
adamstark@5: 
adamstark@5: //--------------------------------------------------------------------------------------
adamstark@5: // set phase values to the range [-pi,pi]
adamstark@5: double OnsetDetectionFunction :: princarg(double phaseval)
adamstark@5: {	
adamstark@5: 	// if phase value is less than or equal to -pi then add 2*pi
adamstark@5: 	while (phaseval <= (-pi)) 
adamstark@5: 	{
adamstark@5: 		phaseval = phaseval + (2*pi);
adamstark@5: 	}
adamstark@5: 	
adamstark@5: 	// if phase value is larger than pi, then subtract 2*pi
adamstark@5: 	while (phaseval > pi)
adamstark@5: 	{
adamstark@5: 		phaseval = phaseval - (2*pi);
adamstark@5: 	}
adamstark@5: 			
adamstark@5: 	return phaseval;
adamstark@5: }
adamstark@5: 
adamstark@5: 
adamstark@5: 
adamstark@5: 
adamstark@5: 
adamstark@5: 
adamstark@5: 
adamstark@5: 
adamstark@5: 
adamstark@5: 
adamstark@5: 
adamstark@5: 
adamstark@5: