#include "module_fsk_demod.h"
#include "common/dsp/filter/firdes.h"
#include "imgui/imgui.h"
#include "logger.h"
#include <volk/volk.h>

namespace satdump
{
    namespace pipeline
    {
        namespace demod
        {
            FSKDemodModule::FSKDemodModule(std::string input_file, std::string output_file_hint, nlohmann::json parameters) : BaseDemodModule(input_file, output_file_hint, parameters)
            {
                // Buffers
                sym_buffer = new int8_t[d_buffer_size * 4];

                // Parse params
                if (parameters.count("basic_shaping") > 0)
                    d_basic_shaping = parameters["basic_shaping"].get<bool>();

                if (parameters.count("rrc_alpha") > 0)
                    d_rrc_alpha = parameters["rrc_alpha"].get<float>();
                else if (!d_basic_shaping)
                    throw satdump_exception("RRC Alpha parameter must be present!");

                if (parameters.count("rrc_taps") > 0)
                    d_rrc_taps = parameters["rrc_taps"].get<int>();

                if (parameters.count("clock_alpha") > 0)
                {
                    float clock_alpha = parameters["clock_alpha"].get<float>();
                    d_clock_gain_omega = pow(clock_alpha, 2) / 4.0;
                    d_clock_gain_mu = clock_alpha;
                }

                if (parameters.count("clock_gain_omega") > 0)
                    d_clock_gain_omega = parameters["clock_gain_omega"].get<float>();

                if (parameters.count("clock_mu") > 0)
                    d_clock_mu = parameters["clock_mu"].get<float>();

                if (parameters.count("clock_gain_mu") > 0)
                    d_clock_gain_mu = parameters["clock_gain_mu"].get<float>();

                if (parameters.count("clock_omega_relative_limit") > 0)
                    d_clock_omega_relative_limit = parameters["clock_omega_relative_limit"].get<float>();

                name = "FSK Demodulator";
                show_freq = false;

                constellation.d_hscale = 80.0 / 100.0;
                constellation.d_vscale = 20.0 / 100.0;

                // MIN_SPS = 1.1;
                // MAX_SPS = 8.0;
            }

            void FSKDemodModule::init()
            {
                BaseDemodModule::initb();

                // Quadrature demod
                qua = std::make_shared<dsp::QuadratureDemodBlock>(agc->output_stream, 1.0f);

                // DC Blocker
                dcb2 = std::make_shared<dsp::CorrectIQBlock<float>>(qua->output_stream);

                // Second AGC (Doppler)
                agc2 = std::make_shared<dsp::AGCBlock<float>>(dcb2->output_stream, 0.1f, 0.5f, 1.0f, 65535.0f);

                // LPF
                std::vector<float> taps = dsp::firdes::root_raised_cosine(1, final_samplerate, d_symbolrate, d_rrc_alpha, d_rrc_taps);
                if (d_basic_shaping)
                {
                    taps.clear();
                    for (int i = 0; i < final_sps; i++)
                        taps.push_back(0.1f);
                }
                rrc = std::make_shared<dsp::FIRBlock<float>>(agc2->output_stream, taps);

                // Clock recovery
                rec = std::make_shared<dsp::MMClockRecoveryBlock<float>>(rrc->output_stream, final_sps, d_clock_gain_omega, d_clock_mu, d_clock_gain_mu, d_clock_omega_relative_limit);
            }

            FSKDemodModule::~FSKDemodModule() { delete[] sym_buffer; }

            void FSKDemodModule::process()
            {
                if (input_data_type == DATA_FILE)
                    filesize = file_source->getFilesize();
                else
                    filesize = 0;

                data_out = std::ofstream(d_output_file_hint + ".soft", std::ios::binary);
                d_output_file = d_output_file_hint + ".soft";

                logger->info("Using input baseband " + d_input_file);
                logger->info("Demodulating to " + d_output_file_hint + ".soft");
                logger->info("Buffer size : " + std::to_string(d_buffer_size));

                time_t lastTime = 0;

                // Start
                BaseDemodModule::start();
                qua->start();
                dcb2->start();
                agc2->start();
                rrc->start();
                rec->start();

                int dat_size = 0;
                while (demod_should_run())
                {
                    dat_size = rec->output_stream->read();

                    if (dat_size <= 0)
                    {
                        rec->output_stream->flush();
                        continue;
                    }

                    // Into const
                    constellation.pushFloatAndGaussian(rec->output_stream->readBuf, rec->output_stream->getDataSize());

                    // Estimate SNR
                    snr_estimator.update((complex_t *)rec->output_stream->readBuf, dat_size / 2);
                    snr = snr_estimator.snr();

                    if (snr > peak_snr)
                        peak_snr = snr;

                    for (int i = 0; i < dat_size; i++)
                        sym_buffer[i] = clamp(rec->output_stream->readBuf[i] * 50);

                    rec->output_stream->flush();

                    if (output_data_type == DATA_FILE)
                        data_out.write((char *)sym_buffer, dat_size);
                    else
                        output_fifo->write((uint8_t *)sym_buffer, dat_size);

                    if (input_data_type == DATA_FILE)
                        progress = file_source->getPosition();

                    if (time(NULL) % 10 == 0 && lastTime != time(NULL))
                    {
                        lastTime = time(NULL);
                        logger->info("Progress " + std::to_string(round(((double)progress / (double)filesize) * 1000.0) / 10.0) + "%%, SNR : " + std::to_string(snr) + "dB," +
                                     " Peak SNR: " + std::to_string(peak_snr) + "dB");
                    }
                }

                logger->info("Demodulation finished");

                if (input_data_type == DATA_FILE)
                    stop();
            }

            nlohmann::json FSKDemodModule::getModuleStats()
            {
                nlohmann::json v; // auto v = satdump::pipeline::base::FileStreamToFileStreamModule::getModuleStats();
                v["progress"] = ((double)progress / (double)filesize);
                v["snr"] = snr;
                v["peak_snr"] = peak_snr;
                return v;
            }

            void FSKDemodModule::stop()
            {
                // Stop
                BaseDemodModule::stop();
                qua->stop();
                dcb2->stop();
                agc2->stop();
                rrc->stop();
                rec->stop();
                rec->output_stream->stopReader();

                if (output_data_type == DATA_FILE)
                    data_out.close();
            }

            std::string FSKDemodModule::getID() { return "fsk_demod"; }

            // std::vector<std::string> FSKDemodModule::getParameters()
            // {
            //     std::vector<std::string> params = {"rrc_alpha", "rrc_taps", "pll_bw", "clock_gain_omega", "clock_mu", "clock_gain_mu", "clock_omega_relative_limit"};
            //     params.insert(params.end(), BaseDemodModule::getParameters().begin(), BaseDemodModule::getParameters().end());
            //     return params;
            // } // TODOREWORK

            std::shared_ptr<ProcessingModule> FSKDemodModule::getInstance(std::string input_file, std::string output_file_hint, nlohmann::json parameters)
            {
                return std::make_shared<FSKDemodModule>(input_file, output_file_hint, parameters);
            }
        } // namespace demod
    } // namespace pipeline
} // namespace satdump