]> git.sesse.net Git - nageru/blob - correlation_measurer.cpp
Add missing file.
[nageru] / correlation_measurer.cpp
1 // Adapted from Adriaensen's project Zita-mu1 (as of January 2016).
2 // Original copyright follows:
3 //
4 //  Copyright (C) 2008-2015 Fons Adriaensen <fons@linuxaudio.org>
5 //    
6 //  This program is free software; you can redistribute it and/or modify
7 //  it under the terms of the GNU General Public License as published by
8 //  the Free Software Foundation; either version 3 of the License, or
9 //  (at your option) any later version.
10 //
11 //  This program is distributed in the hope that it will be useful,
12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 //  GNU General Public License for more details.
15 //
16 //  You should have received a copy of the GNU General Public License
17 //  along with this program.  If not, see <http://www.gnu.org/licenses/>.
18
19 #include "correlation_measurer.h"
20
21 #include <assert.h>
22 #include <stdint.h>
23 #include <math.h>
24
25 using namespace std;
26
27 CorrelationMeasurer::CorrelationMeasurer(unsigned sample_rate,
28                                          float lowpass_cutoff_hz,
29                                          float falloff_seconds)
30     : w1(2.0 * M_PI * lowpass_cutoff_hz / sample_rate),
31       w2(1.0 / (falloff_seconds * sample_rate))
32 {
33 }
34
35 void CorrelationMeasurer::process_samples(const std::vector<float> &samples)
36 {
37         assert(samples.size() % 2 == 0);
38
39         // The compiler isn't always happy about modifying members,
40         // since it doesn't always know they can't alias on <samples>.
41         // Help it out a bit.
42         float l = zl, r = zr, ll = zll, lr = zlr, rr = zrr;
43         const float w1c = w1, w2c = w2;
44
45         for (size_t i = 0; i < samples.size(); i += 2) {
46                 // The 1e-15f epsilon is to avoid denormals.
47                 // TODO: Just set the SSE flush-to-zero flags instead.
48                 l += w1c * (samples[i + 0] - l) + 1e-15f;
49                 r += w1c * (samples[i + 1] - r) + 1e-15f;
50                 lr += w2c * (l * r - lr);
51                 ll += w2c * (l * l - ll);
52                 rr += w2c * (r * r - rr);
53         }
54
55         zl = l;
56         zr = r;
57         zll = ll;
58         zlr = lr;
59         zrr = rr;
60 }
61
62 float CorrelationMeasurer::get_correlation() const
63 {
64         // The 1e-12f epsilon is to avoid division by zero.
65         // zll and zrr are both always non-negative, so we do not risk negative values.
66         return zlr / sqrt(zll * zrr + 1e-12f);
67 }