#include "CEnergyBarShader.hpp"
#include "hecl/Pipeline.hpp"
#include "Graphics/CGraphics.hpp"
#include "Graphics/CTexture.hpp"

namespace urde
{

static boo::ObjToken<boo::IShaderPipeline> s_Pipeline;

void CEnergyBarShader::Initialize()
{
    s_Pipeline = hecl::conv->convert(Shader_CEnergyBarShader{});
}

void CEnergyBarShader::Shutdown()
{
    s_Pipeline.reset();
}

void CEnergyBarShader::updateModelMatrix()
{
    m_uniform.m_matrix = CGraphics::GetPerspectiveProjectionMatrix(true) * CGraphics::g_GXModelView.toMatrix4f();
}

void CEnergyBarShader::draw(const zeus::CColor& color0, const std::vector<Vertex>& verts0,
                            const zeus::CColor& color1, const std::vector<Vertex>& verts1,
                            const zeus::CColor& color2, const std::vector<Vertex>& verts2,
                            const CTexture* tex)
{
    size_t totalVerts = verts0.size() + verts1.size() + verts2.size();
    if (!totalVerts)
        return;

    if (totalVerts > m_maxVerts)
    {
        m_maxVerts = totalVerts;
        m_tex = tex;
        CGraphics::CommitResources([this](boo::IGraphicsDataFactory::Context& ctx)
        {
            m_vbo = ctx.newDynamicBuffer(boo::BufferUse::Vertex, sizeof(Vertex), m_maxVerts);
            boo::ObjToken<boo::IGraphicsBuffer> bufs[1];
            boo::PipelineStage stages[] = {boo::PipelineStage::Vertex};
            boo::ObjToken<boo::ITexture> texs[] = {m_tex->GetBooTexture()};
            for (int i=0 ; i<3 ; ++i)
            {
                m_uniBuf[i] = ctx.newDynamicBuffer(boo::BufferUse::Uniform, sizeof(Uniform), 1);
                bufs[0] = m_uniBuf[i].get();
                m_dataBind[i] = ctx.newShaderDataBinding(s_Pipeline,
                                                         m_vbo.get(), nullptr, nullptr, 1, bufs, stages,
                                                         nullptr, nullptr, 1, texs, nullptr, nullptr);
            }
            return true;
        } BooTrace);
    }

    size_t vertIter = 0;
    Vertex* verts = reinterpret_cast<Vertex*>(m_vbo->map(sizeof(Vertex) * totalVerts));
    if (verts0.size())
    {
        memmove(verts, verts0.data(), sizeof(Vertex) * verts0.size());
        vertIter += verts0.size();
    }
    if (verts1.size())
    {
        memmove(verts + vertIter, verts1.data(), sizeof(Vertex) * verts1.size());
        vertIter += verts1.size();
    }
    if (verts2.size())
    {
        memmove(verts + vertIter, verts2.data(), sizeof(Vertex) * verts2.size());
    }
    m_vbo->unmap();

    vertIter = 0;
    if (verts0.size())
    {
        m_uniform.m_color = color0;
        m_uniBuf[0]->load(&m_uniform, sizeof(Uniform));
        CGraphics::SetShaderDataBinding(m_dataBind[0]);
        CGraphics::DrawArray(0, verts0.size());
        vertIter += verts0.size();
    }
    if (verts1.size())
    {
        m_uniform.m_color = color1;
        m_uniBuf[1]->load(&m_uniform, sizeof(Uniform));
        CGraphics::SetShaderDataBinding(m_dataBind[1]);
        CGraphics::DrawArray(vertIter, verts1.size());
        vertIter += verts1.size();
    }
    if (verts2.size())
    {
        m_uniform.m_color = color2;
        m_uniBuf[2]->load(&m_uniform, sizeof(Uniform));
        CGraphics::SetShaderDataBinding(m_dataBind[2]);
        CGraphics::DrawArray(vertIter, verts2.size());
    }
}

}