Chris@12: /* -*- c-basic-offset: 4 indent-tabs-mode: nil -*-  vi:set ts=8 sts=4 sw=4: */
Chris@12: 
Chris@12: /*
Chris@12:     Vamp
Chris@12: 
Chris@12:     An API for audio analysis and feature extraction plugins.
Chris@12: 
Chris@12:     Centre for Digital Music, Queen Mary, University of London.
Chris@12:     Copyright 2006 Chris Cannam.
Chris@12:   
Chris@12:     Permission is hereby granted, free of charge, to any person
Chris@12:     obtaining a copy of this software and associated documentation
Chris@12:     files (the "Software"), to deal in the Software without
Chris@12:     restriction, including without limitation the rights to use, copy,
Chris@12:     modify, merge, publish, distribute, sublicense, and/or sell copies
Chris@12:     of the Software, and to permit persons to whom the Software is
Chris@12:     furnished to do so, subject to the following conditions:
Chris@12: 
Chris@12:     The above copyright notice and this permission notice shall be
Chris@12:     included in all copies or substantial portions of the Software.
Chris@12: 
Chris@12:     THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
Chris@12:     EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
Chris@12:     MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
Chris@12:     NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR
Chris@12:     ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF
Chris@12:     CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
Chris@12:     WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
Chris@12: 
Chris@12:     Except as contained in this notice, the names of the Centre for
Chris@12:     Digital Music; Queen Mary, University of London; and Chris Cannam
Chris@12:     shall not be used in advertising or otherwise to promote the sale,
Chris@12:     use or other dealings in this Software without prior written
Chris@12:     authorization.
Chris@12: */
Chris@12: 
Chris@12: #include "SpectralCentroid.h"
Chris@12: 
Chris@12: using std::string;
Chris@12: using std::vector;
Chris@12: using std::cerr;
Chris@12: using std::endl;
Chris@12: 
Chris@12: #include <math.h>
Chris@12: 
Chris@12: #ifdef __SUNPRO_CC
Chris@12: #include <ieeefp.h>
Chris@12: #define isinf(x) (!finite(x))
Chris@12: #endif
Chris@12: 
Chris@12: #ifdef WIN32
Chris@12: #define isnan(x) false
Chris@12: #define isinf(x) false
Chris@12: #endif
Chris@12: 
Chris@12: SpectralCentroid::SpectralCentroid(float inputSampleRate) :
Chris@12:     Plugin(inputSampleRate),
Chris@12:     m_stepSize(0),
Chris@12:     m_blockSize(0)
Chris@12: {
Chris@12: }
Chris@12: 
Chris@12: SpectralCentroid::~SpectralCentroid()
Chris@12: {
Chris@12: }
Chris@12: 
Chris@12: string
Chris@12: SpectralCentroid::getIdentifier() const
Chris@12: {
Chris@12:     return "spectralcentroid";
Chris@12: }
Chris@12: 
Chris@12: string
Chris@12: SpectralCentroid::getName() const
Chris@12: {
Chris@12:     return "Spectral Centroid";
Chris@12: }
Chris@12: 
Chris@12: string
Chris@12: SpectralCentroid::getDescription() const
Chris@12: {
Chris@12:     return "Calculate the centroid frequency of the spectrum of the input signal";
Chris@12: }
Chris@12: 
Chris@12: string
Chris@12: SpectralCentroid::getMaker() const
Chris@12: {
Chris@12:     return "Vamp SDK Example Plugins";
Chris@12: }
Chris@12: 
Chris@12: int
Chris@12: SpectralCentroid::getPluginVersion() const
Chris@12: {
Chris@12:     return 2;
Chris@12: }
Chris@12: 
Chris@12: string
Chris@12: SpectralCentroid::getCopyright() const
Chris@12: {
Chris@12:     return "Freely redistributable (BSD license)";
Chris@12: }
Chris@12: 
Chris@12: bool
Chris@12: SpectralCentroid::initialise(size_t channels, size_t stepSize, size_t blockSize)
Chris@12: {
Chris@12:     if (channels < getMinChannelCount() ||
Chris@12: 	channels > getMaxChannelCount()) return false;
Chris@12: 
Chris@12:     m_stepSize = stepSize;
Chris@12:     m_blockSize = blockSize;
Chris@12: 
Chris@12:     return true;
Chris@12: }
Chris@12: 
Chris@12: void
Chris@12: SpectralCentroid::reset()
Chris@12: {
Chris@12: }
Chris@12: 
Chris@12: SpectralCentroid::OutputList
Chris@12: SpectralCentroid::getOutputDescriptors() const
Chris@12: {
Chris@12:     OutputList list;
Chris@12: 
Chris@12:     OutputDescriptor d;
Chris@12:     d.identifier = "logcentroid";
Chris@12:     d.name = "Log Frequency Centroid";
Chris@12:     d.description = "Centroid of the log weighted frequency spectrum";
Chris@12:     d.unit = "Hz";
Chris@12:     d.hasFixedBinCount = true;
Chris@12:     d.binCount = 1;
Chris@12:     d.hasKnownExtents = false;
Chris@12:     d.isQuantized = false;
Chris@12:     d.sampleType = OutputDescriptor::OneSamplePerStep;
Chris@12:     list.push_back(d);
Chris@12: 
Chris@12:     d.identifier = "linearcentroid";
Chris@12:     d.name = "Linear Frequency Centroid";
Chris@12:     d.description = "Centroid of the linear frequency spectrum";
Chris@12:     list.push_back(d);
Chris@12: 
Chris@12:     return list;
Chris@12: }
Chris@12: 
Chris@12: SpectralCentroid::FeatureSet
Chris@12: SpectralCentroid::process(const float *const *inputBuffers, Vamp::RealTime timestamp)
Chris@12: {
Chris@12:     if (m_stepSize == 0) {
Chris@12: 	cerr << "ERROR: SpectralCentroid::process: "
Chris@12: 	     << "SpectralCentroid has not been initialised"
Chris@12: 	     << endl;
Chris@12: 	return FeatureSet();
Chris@12:     }
Chris@12: 
Chris@12:     double numLin = 0.0, numLog = 0.0, denom = 0.0;
Chris@12: 
Chris@12:     for (size_t i = 1; i <= m_blockSize/2; ++i) {
Chris@12: 	double freq = (double(i) * m_inputSampleRate) / m_blockSize;
Chris@12: 	double real = inputBuffers[0][i*2];
Chris@12: 	double imag = inputBuffers[0][i*2 + 1];
Chris@12: 	double scalemag = sqrt(real * real + imag * imag) / (m_blockSize/2);
Chris@12: 	numLin += freq * scalemag;
Chris@12:         numLog += log10f(freq) * scalemag;
Chris@12: 	denom += scalemag;
Chris@12:     }
Chris@12: 
Chris@12:     FeatureSet returnFeatures;
Chris@12: 
Chris@12:     if (denom != 0.0) {
Chris@12: 	float centroidLin = float(numLin / denom);
Chris@12: 	float centroidLog = powf(10, float(numLog / denom));
Chris@12: 
Chris@12: 	Feature feature;
Chris@12: 	feature.hasTimestamp = false;
Chris@12: 
Chris@12:         if (!isnan(centroidLog) && !isinf(centroidLog)) {
Chris@12:             feature.values.push_back(centroidLog);
Chris@12:         }
Chris@12: 	returnFeatures[0].push_back(feature);
Chris@12: 
Chris@12:         feature.values.clear();
Chris@12:         if (!isnan(centroidLin) && !isinf(centroidLin)) {
Chris@12:             feature.values.push_back(centroidLin);
Chris@12:         }
Chris@12: 	returnFeatures[1].push_back(feature);
Chris@12:     }
Chris@12: 
Chris@12:     return returnFeatures;
Chris@12: }
Chris@12: 
Chris@12: SpectralCentroid::FeatureSet
Chris@12: SpectralCentroid::getRemainingFeatures()
Chris@12: {
Chris@12:     return FeatureSet();
Chris@12: }
Chris@12: