/*
 *  Copyright (C) 2017-2018 Team Kodi
 *  This file is part of Kodi - https://kodi.tv
 *
 *  SPDX-License-Identifier: GPL-2.0-or-later
 *  See LICENSES/README.md for more information.
 */

#include "BaseRenderBufferPool.h"

#include "IRenderBuffer.h"
#include "cores/RetroPlayer/rendering/VideoRenderers/RPBaseRenderer.h"
#include "utils/log.h"

#include <mutex>

using namespace KODI;
using namespace RETRO;

CBaseRenderBufferPool::~CBaseRenderBufferPool()
{
  Flush();
}

void CBaseRenderBufferPool::RegisterRenderer(CRPBaseRenderer* renderer)
{
  std::unique_lock lock(m_rendererMutex);

  m_renderers.push_back(renderer);
}

void CBaseRenderBufferPool::UnregisterRenderer(CRPBaseRenderer* renderer)
{
  std::unique_lock lock(m_rendererMutex);

  m_renderers.erase(std::remove(m_renderers.begin(), m_renderers.end(), renderer),
                    m_renderers.end());
}

bool CBaseRenderBufferPool::HasVisibleRenderer() const
{
  std::unique_lock lock(m_rendererMutex);

  for (auto renderer : m_renderers)
  {
    if (renderer->IsVisible())
      return true;
  }

  return false;
}

bool CBaseRenderBufferPool::Configure(AVPixelFormat format)
{
  m_format = format;

  if (ConfigureInternal())
    m_bConfigured = true;

  return m_bConfigured;
}

IRenderBuffer* CBaseRenderBufferPool::GetBuffer(unsigned int width, unsigned int height)
{
  if (!m_bConfigured)
    return nullptr;

  IRenderBuffer* renderBuffer = nullptr;

  void* header = nullptr;

  if (GetHeaderWithTimeout(header))
  {
    std::unique_lock lock(m_bufferMutex);

    for (auto it = m_free.begin(); it != m_free.end(); ++it)
    {
      std::unique_ptr<IRenderBuffer>& buffer = *it;

      // Only return buffers of the same dimensions
      const unsigned int bufferWidth = buffer->GetWidth();
      const unsigned int bufferHeight = buffer->GetHeight();

      if (bufferWidth == width && bufferHeight == height)
      {
        renderBuffer = buffer.release();
        renderBuffer->SetHeader(header);
        m_free.erase(it);
        break;
      }
    }

    if (renderBuffer == nullptr)
    {
      CLog::Log(LOGDEBUG,
                "RetroPlayer[RENDER]: Creating render buffer of size {}x{} for buffer pool", width,
                height);

      std::unique_ptr<IRenderBuffer> renderBufferPtr(CreateRenderBuffer(header));
      if (renderBufferPtr->Allocate(m_format, width, height))
        renderBuffer = renderBufferPtr.release();
      else
        CLog::Log(LOGERROR, "RetroPlayer[RENDER]: Failed to allocate render buffer");
    }

    if (renderBuffer != nullptr)
    {
      renderBuffer->Acquire(GetPtr());
      renderBuffer->Update();
    }
  }

  return renderBuffer;
}

void CBaseRenderBufferPool::Return(IRenderBuffer* buffer)
{
  std::unique_lock lock(m_bufferMutex);

  buffer->SetLoaded(false);
  buffer->SetRendered(false);

  std::unique_ptr<IRenderBuffer> bufferPtr(buffer);
  m_free.emplace_back(std::move(bufferPtr));
}

void CBaseRenderBufferPool::Prime(unsigned int width, unsigned int height)
{
  std::unique_lock lock(m_bufferMutex);

  // Allocate two buffers for double buffering
  unsigned int bufferCount = 2;

  std::vector<IRenderBuffer*> buffers;

  for (unsigned int i = 0; i < bufferCount; i++)
  {
    IRenderBuffer* buffer = GetBuffer(width, height);
    if (buffer == nullptr)
      break;

    if (!SendBuffer(buffer))
      buffers.emplace_back(buffer);
  }

  for (auto buffer : buffers)
    buffer->Release();
}

void CBaseRenderBufferPool::Flush()
{
  std::unique_lock lock(m_bufferMutex);

  m_free.clear();
  m_bConfigured = false;
}
