summaryrefslogtreecommitdiff
path: root/gr-digital/lib/cma_equalizer_cc_impl.cc
blob: f38a50ea43d7febc71ea3a82252d0e9247246933 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
/* -*- c++ -*- */
/*
 * Copyright 2011,2012 Free Software Foundation, Inc.
 *
 * This file is part of GNU Radio
 *
 * SPDX-License-Identifier: GPL-3.0-or-later
 *
 */

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include "cma_equalizer_cc_impl.h"
#include <gnuradio/io_signature.h>

namespace gr {
namespace digital {

using namespace filter::kernel;

cma_equalizer_cc::sptr
cma_equalizer_cc::make(int num_taps, float modulus, float mu, int sps)
{
    return gnuradio::get_initial_sptr(
        new cma_equalizer_cc_impl(num_taps, modulus, mu, sps));
}

cma_equalizer_cc_impl::cma_equalizer_cc_impl(int num_taps,
                                             float modulus,
                                             float mu,
                                             int sps)
    : sync_decimator("cma_equalizer_cc",
                     io_signature::make(1, 1, sizeof(gr_complex)),
                     io_signature::make(1, 1, sizeof(gr_complex)),
                     sps),
      fir_filter_ccc(sps, std::vector<gr_complex>(num_taps, gr_complex(0, 0))),
      d_new_taps(num_taps, gr_complex(0, 0)),
      d_updated(false),
      d_error(gr_complex(0, 0))
{
    set_modulus(modulus);
    set_gain(mu);
    if (num_taps > 0)
        d_new_taps[0] = 1.0;
    fir_filter_ccc::set_taps(d_new_taps);

    set_history(num_taps);
}

cma_equalizer_cc_impl::~cma_equalizer_cc_impl() {}

void cma_equalizer_cc_impl::set_taps(const std::vector<gr_complex>& taps)
{
    d_new_taps = taps;
    d_updated = true;
}

std::vector<gr_complex> cma_equalizer_cc_impl::taps() const { return d_taps; }

gr_complex cma_equalizer_cc_impl::error(const gr_complex& out)
{
    gr_complex error = out * (norm(out) - d_modulus);
    float re = gr::clip(error.real(), 1.0);
    float im = gr::clip(error.imag(), 1.0);
    return gr_complex(re, im);
}

void cma_equalizer_cc_impl::update_tap(gr_complex& tap, const gr_complex& in)
{
    // Hn+1 = Hn - mu*conj(Xn)*zn*(|zn|^2 - 1)
    tap -= d_mu * conj(in) * d_error;
}

int cma_equalizer_cc_impl::work(int noutput_items,
                                gr_vector_const_void_star& input_items,
                                gr_vector_void_star& output_items)
{
    const gr_complex* in = (const gr_complex*)input_items[0];
    gr_complex* out = (gr_complex*)output_items[0];

    if (d_updated) {
        d_taps = d_new_taps;
        set_history(d_taps.size());
        d_updated = false;
        return 0; // history requirements may have changed.
    }

    int j = 0;
    size_t k, l = d_taps.size();
    for (int i = 0; i < noutput_items; i++) {
        out[i] = filter(&in[j]);

        // Adjust taps
        d_error = error(out[i]);
        for (k = 0; k < l; k++) {
            // Update tap locally from error.
            update_tap(d_taps[k], in[j + k]);

            // Update aligned taps in filter object.
            fir_filter_ccc::update_tap(d_taps[k], k);
        }

        j += decimation();
    }

    return noutput_items;
}

} /* namespace digital */
} /* namespace gr */