/*
 * This file is part of libsidplayfp, a SID player engine.
 *
 * Copyright 2011-2024 Leandro Nini <drfiemost@users.sourceforge.net>
 * Copyright 2007-2010 Antti Lankila
 * Copyright 2004 Dag Lem <resid@nimrod.no>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
 */

#define FILTER_CPP

#include "Filter.h"

namespace reSIDfp
{

void Filter::updateMixing()
{
    currentVolume = volume[vol];

    unsigned int Nsum = 0;
    unsigned int Nmix = 0;

    (filt1 ? Nsum : Nmix)++;
    (filt2 ? Nsum : Nmix)++;

    if (filt3) Nsum++;
    else if (!voice3off) Nmix++;

    (filtE ? Nsum : Nmix)++;

    currentSummer = summer[Nsum];

    if (lp) Nmix++;
    if (bp) Nmix++;
    if (hp) Nmix++;

    currentMixer = mixer[Nmix];
}

void Filter::writeFC_LO(unsigned char fc_lo)
{
    fc = (fc & 0x7f8) | (fc_lo & 0x007);
    updateCenterFrequency();
}

void Filter::writeFC_HI(unsigned char fc_hi)
{
    fc = (fc_hi << 3 & 0x7f8) | (fc & 0x007);
    updateCenterFrequency();
}

void Filter::writeRES_FILT(unsigned char res_filt)
{
    filt = res_filt;

    updateResonance((res_filt >> 4) & 0x0f);

    if (enabled)
    {
        filt1 = (filt & 0x01) != 0;
        filt2 = (filt & 0x02) != 0;
        filt3 = (filt & 0x04) != 0;
        filtE = (filt & 0x08) != 0;
    }

    updateMixing();
}

void Filter::writeMODE_VOL(unsigned char mode_vol)
{
    vol = mode_vol & 0x0f;
    lp = (mode_vol & 0x10) != 0;
    bp = (mode_vol & 0x20) != 0;
    hp = (mode_vol & 0x40) != 0;
    voice3off = (mode_vol & 0x80) != 0;

    updateMixing();
}

Filter::Filter(FilterModelConfig* fmc) :
    fmc(fmc),
    mixer(fmc->getMixer()),
    summer(fmc->getSummer()),
    resonance(fmc->getResonance()),
    volume(fmc->getVolume()),
    hpIntegrator(fmc->buildIntegrator()),
    bpIntegrator(fmc->buildIntegrator()),
    currentMixer(nullptr),
    currentSummer(nullptr),
    currentResonance(nullptr),
    currentVolume(nullptr),
    Vhp(0),
    Vbp(0),
    Vlp(0),
    Ve(0),
    fc(0),
    filt1(false),
    filt2(false),
    filt3(false),
    filtE(false),
    voice3off(false),
    hp(false),
    bp(false),
    lp(false),
    vol(0),
    enabled(true),
    filt(0)
{
    input(0);
}

Filter::~Filter()
{
    delete hpIntegrator;
    delete bpIntegrator;
}

void Filter::enable(bool enable)
{
    enabled = enable;

    if (enabled)
    {
        writeRES_FILT(filt);
    }
    else
    {
        filt1 = filt2 = filt3 = filtE = false;
    }
}

void Filter::reset()
{
    writeFC_LO(0);
    writeFC_HI(0);
    writeMODE_VOL(0);
    writeRES_FILT(0);
}

} // namespace reSIDfp
