/*
 * Klang – a node+text-based synthesizer library
 *
 * This file is part of the *wellen* library (https://github.com/dennisppaul/wellen).
 * Copyright (c) 2022 Dennis P Paul.
 *
 * This library 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, version 3.
 *
 * This library 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, see <http://www.gnu.org/licenses/>.
 */

/**
 *       [ NODE_MIXER2         ]
 *       +---------------------+
 *       |                     |
 * IN00--| SIGNAL_0     SIGNAL |--OUT00
 * IN01--| SIGNAL_1            |
 * IN02--| MIX                 |
 *       |                     |
 *       +---------------------+
 */

#ifndef NodeMixer2_hpp
#define NodeMixer2_hpp

#include "KlangNode.hpp"

namespace klang {
    class NodeMixer2 : public Node {
    public:
        static const CHANNEL_ID CH_IN_SIGNAL_0 = 0;
        static const CHANNEL_ID CH_IN_SIGNAL_1 = 1;
        static const CHANNEL_ID CH_IN_MIX      = 2;
        static const CHANNEL_ID NUM_CH_IN      = 3;
        static const CHANNEL_ID NUM_CH_OUT     = 1;

        /* @deprecated */
        static const CHANNEL_ID CH_IN_SIGNAL_LEFT  = 0;
        static const CHANNEL_ID CH_IN_SIGNAL_RIGHT = 1;

        bool connect(Connection* pConnection, CHANNEL_ID pInChannel) {
            if (pInChannel == CH_IN_SIGNAL_0) {
                mConnection_CH_IN_SIGNAL_0 = pConnection;
                return true;
            }
            if (pInChannel == CH_IN_SIGNAL_1) {
                mConnection_CH_IN_SIGNAL_1 = pConnection;
                return true;
            }
            if (pInChannel == CH_IN_MIX) {
                mConnection_CH_IN_MIX = pConnection;
                return true;
            }
            return false;
        }

        bool disconnect(CHANNEL_ID pInChannel) {
            if (pInChannel == CH_IN_SIGNAL_0) {
                mConnection_CH_IN_SIGNAL_0 = nullptr;
                return true;
            }
            if (pInChannel == CH_IN_SIGNAL_1) {
                mConnection_CH_IN_SIGNAL_1 = nullptr;
                return true;
            }
            if (pInChannel == CH_IN_MIX) {
                mConnection_CH_IN_MIX = nullptr;
                return true;
            }
            return false;
        }

        void set_mix(float pMix) {
            mMix = pMix;
        }

        float get_mix() {
            return mMix;
        }

        void update(CHANNEL_ID pChannel, float* pAudioBlock) {
            if (is_not_updated() && pChannel == CH_OUT_SIGNAL && (mConnection_CH_IN_SIGNAL_0 != nullptr && mConnection_CH_IN_SIGNAL_1 != nullptr)) {
                AUDIO_BLOCK_ID mBlock_SIGNAL_0     = AudioBlockPool::NO_ID;
                AUDIO_BLOCK_ID mBlock_SIGNAL_1     = AudioBlockPool::NO_ID;
                AUDIO_BLOCK_ID mBlock_MIX          = AudioBlockPool::NO_ID;
                float*   mBlockData_SIGNAL_0 = nullptr;
                float*   mBlockData_SIGNAL_1 = nullptr;
                float*   mBlockData_MIX      = nullptr;

                if (mConnection_CH_IN_SIGNAL_0 != nullptr) {
                    mBlock_SIGNAL_0     = AudioBlockPool::instance().request();
                    mBlockData_SIGNAL_0 = AudioBlockPool::instance().data(mBlock_SIGNAL_0);
                    mConnection_CH_IN_SIGNAL_0->update(mBlock_SIGNAL_0);
                }
                if (mConnection_CH_IN_SIGNAL_1 != nullptr) {
                    mBlock_SIGNAL_1     = AudioBlockPool::instance().request();
                    mBlockData_SIGNAL_1 = AudioBlockPool::instance().data(mBlock_SIGNAL_1);
                    mConnection_CH_IN_SIGNAL_1->update(mBlock_SIGNAL_1);
                }
                if (mConnection_CH_IN_MIX != nullptr) {
                    mBlock_MIX     = AudioBlockPool::instance().request();
                    mBlockData_MIX = AudioBlockPool::instance().data(mBlock_MIX);
                    mConnection_CH_IN_MIX->update(mBlock_MIX);
                }

                const uint8_t mSignalInputCounter =
                    (mBlockData_SIGNAL_0 == nullptr ? 0 : 1) +
                    (mBlockData_SIGNAL_1 == nullptr ? 0 : 1);
                if (mSignalInputCounter == 0) {
                    memset(pAudioBlock, 0.0, KLANG_SAMPLES_PER_AUDIO_BLOCK * sizeof(float));
                } else {
                    const bool mHasBlockData_MIX_Signal      = mBlockData_MIX != nullptr;
                    const bool mHasBlockData_SIGNAL_0_Signal = mBlockData_SIGNAL_0 != nullptr;
                    const bool mHasBlockData_SIGNAL_1_Signal = mBlockData_SIGNAL_1 != nullptr;
                    for (uint16_t i = 0; i < KLANG_SAMPLES_PER_AUDIO_BLOCK; ++i) {
                        const float m0 = mHasBlockData_MIX_Signal ? (mBlockData_MIX[i]) : mMix;
                        const float m1 = 1.0 - m0;
                        const float s0 = mHasBlockData_SIGNAL_0_Signal ? (mBlockData_SIGNAL_0[i] * m0) : 0.0;
                        const float s1 = mHasBlockData_SIGNAL_1_Signal ? (mBlockData_SIGNAL_1[i] * m1) : 0.0;
                        const float s  = s0 + s1;
                        pAudioBlock[i] = s;
                        // pAudioBlock[i] = s / (float)mSignalInputCounter;
                    }
                }
                AudioBlockPool::instance().release(mBlock_SIGNAL_0);
                AudioBlockPool::instance().release(mBlock_SIGNAL_1);
                AudioBlockPool::instance().release(mBlock_MIX);

                flag_updated();
            } else {
                memset(pAudioBlock, 0.0, KLANG_SAMPLES_PER_AUDIO_BLOCK * sizeof(float));
            }
        }

        void set_command(KLANG_CMD_TYPE pCommand, KLANG_CMD_TYPE* pPayLoad) {
            switch (pCommand) {
                case KLANG_SET_MIX_F32:
                    set_mix(KlangMath::FLOAT_32(pPayLoad));
                    break;
            }
        }

    private:
        Connection* mConnection_CH_IN_SIGNAL_0 = nullptr;
        Connection* mConnection_CH_IN_SIGNAL_1 = nullptr;
        Connection* mConnection_CH_IN_MIX      = nullptr;

        float mMix = 0.5;
    };
}  // namespace klang

#endif /* NodeMixer2_hpp */